summaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2012-02-14 11:40:06 +0000
committerbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2012-02-14 11:40:06 +0000
commit751fbbe02ef963e7fa013664fde6766db241f7b5 (patch)
treeac9b1f46e74418f9e5224366406fb06bdd0da4b2 /gcc
parentf81734552b886d5e06218e29a2370979a4a57b3f (diff)
downloadgcc-751fbbe02ef963e7fa013664fde6766db241f7b5.tar.gz
2011-02-14 Basile Starynkevitch <basile@starynkevitch.net>
{{Regenerate}} * gcc/melt/generated/meltrunsup-inc.c: Regenerate. * gcc/melt/generated/meltrunsup.h: Regenerate. * gcc/melt/generated/warmelt-base+01.c: Regenerate. * gcc/melt/generated/warmelt-base+02.c: Regenerate. * gcc/melt/generated/warmelt-base+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-base+melttime.h: Regenerate. * gcc/melt/generated/warmelt-base.c: Regenerate. * gcc/melt/generated/warmelt-debug+01.c: Regenerate. * gcc/melt/generated/warmelt-debug+02.c: Regenerate. * gcc/melt/generated/warmelt-debug+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-debug+melttime.h: Regenerate. * gcc/melt/generated/warmelt-debug.c: Regenerate. * gcc/melt/generated/warmelt-first+01.c: Regenerate. * gcc/melt/generated/warmelt-first+02.c: Regenerate. * gcc/melt/generated/warmelt-first+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-first+melttime.h: Regenerate. * gcc/melt/generated/warmelt-first.c: Regenerate. * gcc/melt/generated/warmelt-genobj+01.c: Regenerate. * gcc/melt/generated/warmelt-genobj+02.c: Regenerate. * gcc/melt/generated/warmelt-genobj+03.c: Regenerate. * gcc/melt/generated/warmelt-genobj+04.c: Regenerate. * gcc/melt/generated/warmelt-genobj+05.c: Regenerate. * gcc/melt/generated/warmelt-genobj+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-genobj+melttime.h: Regenerate. * gcc/melt/generated/warmelt-genobj.c: Regenerate. * gcc/melt/generated/warmelt-macro+01.c: Regenerate. * gcc/melt/generated/warmelt-macro+02.c: Regenerate. * gcc/melt/generated/warmelt-macro+03.c: Regenerate. * gcc/melt/generated/warmelt-macro+04.c: Regenerate. * gcc/melt/generated/warmelt-macro+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-macro+melttime.h: Regenerate. * gcc/melt/generated/warmelt-macro.c: Regenerate. * gcc/melt/generated/warmelt-modes+01.c: Regenerate. * gcc/melt/generated/warmelt-modes+02.c: Regenerate. * gcc/melt/generated/warmelt-modes+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-modes+melttime.h: Regenerate. * gcc/melt/generated/warmelt-modes.c: Regenerate. * gcc/melt/generated/warmelt-normal+01.c: Regenerate. * gcc/melt/generated/warmelt-normal+02.c: Regenerate. * gcc/melt/generated/warmelt-normal+03.c: Regenerate. * gcc/melt/generated/warmelt-normal+04.c: Regenerate. * gcc/melt/generated/warmelt-normal+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-normal+melttime.h: Regenerate. * gcc/melt/generated/warmelt-normal.c: Regenerate. * gcc/melt/generated/warmelt-normatch+01.c: Regenerate. * gcc/melt/generated/warmelt-normatch+02.c: Regenerate. * gcc/melt/generated/warmelt-normatch+03.c: Regenerate. * gcc/melt/generated/warmelt-normatch+04.c: Regenerate. * gcc/melt/generated/warmelt-normatch+05.c: New generated file. * gcc/melt/generated/warmelt-normatch+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-normatch+melttime.h: Regenerate. * gcc/melt/generated/warmelt-normatch.c: Regenerate. * gcc/melt/generated/warmelt-outobj+01.c: Regenerate. * gcc/melt/generated/warmelt-outobj+02.c: Regenerate. * gcc/melt/generated/warmelt-outobj+03.c: Regenerate. * gcc/melt/generated/warmelt-outobj+04.c: Regenerate. * gcc/melt/generated/warmelt-outobj+meltdesc.c: Regenerate. * gcc/melt/generated/warmelt-outobj+melttime.h: Regenerate. * gcc/melt/generated/warmelt-outobj.c: Regenerate. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@184205 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ChangeLog.MELT63
-rw-r--r--gcc/melt/generated/meltrunsup-inc.c4
-rw-r--r--gcc/melt/generated/meltrunsup.h4
-rw-r--r--gcc/melt/generated/warmelt-base+01.c181
-rw-r--r--gcc/melt/generated/warmelt-base+02.c451
-rw-r--r--gcc/melt/generated/warmelt-base+meltdesc.c16
-rw-r--r--gcc/melt/generated/warmelt-base+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-base.c5257
-rw-r--r--gcc/melt/generated/warmelt-debug+01.c2615
-rw-r--r--gcc/melt/generated/warmelt-debug+02.c1203
-rw-r--r--gcc/melt/generated/warmelt-debug+meltdesc.c16
-rw-r--r--gcc/melt/generated/warmelt-debug+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-debug.c5055
-rw-r--r--gcc/melt/generated/warmelt-first+01.c83
-rw-r--r--gcc/melt/generated/warmelt-first+02.c18
-rw-r--r--gcc/melt/generated/warmelt-first+meltdesc.c16
-rw-r--r--gcc/melt/generated/warmelt-first+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-first.c1265
-rw-r--r--gcc/melt/generated/warmelt-genobj+01.c319
-rw-r--r--gcc/melt/generated/warmelt-genobj+02.c358
-rw-r--r--gcc/melt/generated/warmelt-genobj+03.c2095
-rw-r--r--gcc/melt/generated/warmelt-genobj+04.c7979
-rw-r--r--gcc/melt/generated/warmelt-genobj+05.c11165
-rw-r--r--gcc/melt/generated/warmelt-genobj+meltdesc.c22
-rw-r--r--gcc/melt/generated/warmelt-genobj+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-genobj.c48204
-rw-r--r--gcc/melt/generated/warmelt-macro+01.c219
-rw-r--r--gcc/melt/generated/warmelt-macro+02.c155
-rw-r--r--gcc/melt/generated/warmelt-macro+03.c161
-rw-r--r--gcc/melt/generated/warmelt-macro+04.c46
-rw-r--r--gcc/melt/generated/warmelt-macro+meltdesc.c20
-rw-r--r--gcc/melt/generated/warmelt-macro+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-macro.c402
-rw-r--r--gcc/melt/generated/warmelt-modes+01.c1687
-rw-r--r--gcc/melt/generated/warmelt-modes+02.c102
-rw-r--r--gcc/melt/generated/warmelt-modes+meltdesc.c16
-rw-r--r--gcc/melt/generated/warmelt-modes+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-modes.c91
-rw-r--r--gcc/melt/generated/warmelt-normal+01.c161
-rw-r--r--gcc/melt/generated/warmelt-normal+02.c360
-rw-r--r--gcc/melt/generated/warmelt-normal+03.c367
-rw-r--r--gcc/melt/generated/warmelt-normal+04.c166
-rw-r--r--gcc/melt/generated/warmelt-normal+meltdesc.c20
-rw-r--r--gcc/melt/generated/warmelt-normal+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-normal.c470
-rw-r--r--gcc/melt/generated/warmelt-normatch+01.c8407
-rw-r--r--gcc/melt/generated/warmelt-normatch+02.c9497
-rw-r--r--gcc/melt/generated/warmelt-normatch+03.c22335
-rw-r--r--gcc/melt/generated/warmelt-normatch+04.c27888
-rw-r--r--gcc/melt/generated/warmelt-normatch+05.c7902
-rw-r--r--gcc/melt/generated/warmelt-normatch+meltdesc.c24
-rw-r--r--gcc/melt/generated/warmelt-normatch+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-normatch.c47811
-rw-r--r--gcc/melt/generated/warmelt-outobj+01.c15
-rw-r--r--gcc/melt/generated/warmelt-outobj+02.c88
-rw-r--r--gcc/melt/generated/warmelt-outobj+03.c63
-rw-r--r--gcc/melt/generated/warmelt-outobj+04.c78
-rw-r--r--gcc/melt/generated/warmelt-outobj+meltdesc.c20
-rw-r--r--gcc/melt/generated/warmelt-outobj+melttime.h10
-rw-r--r--gcc/melt/generated/warmelt-outobj.c37
60 files changed, 117957 insertions, 97130 deletions
diff --git a/gcc/ChangeLog.MELT b/gcc/ChangeLog.MELT
index 3394366709d..1cb1e8c9851 100644
--- a/gcc/ChangeLog.MELT
+++ b/gcc/ChangeLog.MELT
@@ -1,4 +1,67 @@
2011-02-14 Basile Starynkevitch <basile@starynkevitch.net>
+ {{Regenerate}}
+ * gcc/melt/generated/meltrunsup-inc.c: Regenerate.
+ * gcc/melt/generated/meltrunsup.h: Regenerate.
+ * gcc/melt/generated/warmelt-base+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-base+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-base+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-base+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-base.c: Regenerate.
+ * gcc/melt/generated/warmelt-debug+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-debug+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-debug+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-debug+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-debug.c: Regenerate.
+ * gcc/melt/generated/warmelt-first+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-first+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-first+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-first+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-first.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+03.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+04.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+05.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-genobj+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-genobj.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+03.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+04.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-macro+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-macro.c: Regenerate.
+ * gcc/melt/generated/warmelt-modes+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-modes+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-modes+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-modes+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-modes.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+03.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+04.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-normal+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-normal.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+03.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+04.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+05.c: New generated file.
+ * gcc/melt/generated/warmelt-normatch+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-normatch+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-normatch.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+01.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+02.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+03.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+04.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+meltdesc.c: Regenerate.
+ * gcc/melt/generated/warmelt-outobj+melttime.h: Regenerate.
+ * gcc/melt/generated/warmelt-outobj.c: Regenerate.
+
+2011-02-14 Basile Starynkevitch <basile@starynkevitch.net>
+
* melt-runtime.c (meltgc_strbuf_reserve) Improve big buffer debugging.
(READ_ERROR): Untabify.
(meltgc_readsexpr, meltgc_readmacrostringsequence)
diff --git a/gcc/melt/generated/meltrunsup-inc.c b/gcc/melt/generated/meltrunsup-inc.c
index ce61566a2d4..b2c5373b6c4 100644
--- a/gcc/melt/generated/meltrunsup-inc.c
+++ b/gcc/melt/generated/meltrunsup-inc.c
@@ -3058,5 +3058,5 @@ end:
#undef compv
-/*** End of code file meltrunsup-inc.c generated on 2012 Feb 07
- * by GCC MELT 4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+ . ***/
+/*** End of code file meltrunsup-inc.c generated on 2012 Feb 14
+ * by GCC MELT 4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+ . ***/
diff --git a/gcc/melt/generated/meltrunsup.h b/gcc/melt/generated/meltrunsup.h
index c2ceeaf76fa..73187e2ae1c 100644
--- a/gcc/melt/generated/meltrunsup.h
+++ b/gcc/melt/generated/meltrunsup.h
@@ -2338,5 +2338,5 @@ melt_nthval_maptrees (struct meltmaptrees_st *map_s, int ix)
/** end of code generated by generate_runtypesupport_predef_fields **/
-/*** End of declaration file meltrunsup.h generated on 2012 Feb 07
- * by GCC MELT 4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+ . ***/
+/*** End of declaration file meltrunsup.h generated on 2012 Feb 14
+ * by GCC MELT 4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+ . ***/
diff --git a/gcc/melt/generated/warmelt-base+01.c b/gcc/melt/generated/warmelt-base+01.c
index 5c269a745e6..099f64d3fd2 100644
--- a/gcc/melt/generated/warmelt-base+01.c
+++ b/gcc/melt/generated/warmelt-base+01.c
@@ -2264,7 +2264,12 @@ lab_endgetargs:;
;;
MELT_LOCATION
("warmelt-base.melt:1273:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTY__V20*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) ( /*_.VCTY__V20*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2644,7 +2649,11 @@ lab_endgetargs:;
;;
MELT_LOCATION
("warmelt-base.melt:1286:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTY__V26*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTY__V26*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3949,7 +3958,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-base.melt:1327:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VN__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VN__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4087,7 +4102,13 @@ lab_endgetargs:;
/*_.DISCRIM__V4*/ meltfptr[3] =
(melt_discr ((melt_ptr_t) ( /*_.VO__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-base.melt:1332:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4247,7 +4268,13 @@ lab_endgetargs:;
/*_.DISCRIM__V4*/ meltfptr[3] =
(melt_discr ((melt_ptr_t) ( /*_.VA__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-base.melt:1340:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5863,7 +5890,12 @@ lab_endgetargs:;
/*_.HOOKLIST__V5*/ meltfptr[4] = /*_.SETQ___V8*/ meltfptr[6] =
/*_.LIST___V6*/ meltfptr[5];;
MELT_LOCATION ("warmelt-base.melt:1531:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PASS_EXECUTION_CONTAINER */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PASS_EXECUTION_CONTAINER */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6059,7 +6091,13 @@ lab_endgetargs:;
;
/*_.LAMBDA___V15*/ meltfptr[13] = /*_.LAMBDA___V16*/ meltfptr[15];;
MELT_LOCATION ("warmelt-base.melt:1541:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6476,7 +6514,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-base.melt:1568:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[1])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6548,7 +6591,12 @@ lab_endgetargs:;
/*_.LAMBDA___V8*/ meltfptr[7] =
/*_.LAMBDA___V9*/ meltfptr[8];;
MELT_LOCATION ("warmelt-base.melt:1570:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[1])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6881,7 +6929,13 @@ lab_endgetargs:;
/*^cond */
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -7097,7 +7151,13 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_LIST */
;
MELT_LOCATION ("warmelt-base.melt:1612:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^block */
@@ -7249,7 +7309,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7291,7 +7357,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1632:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7328,7 +7399,13 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1636:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7520,7 +7597,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7562,7 +7645,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1655:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7599,7 +7687,13 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1659:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7791,7 +7885,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7810,7 +7910,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:1676:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!PREGENERICIZE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!PREGENERICIZE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8086,7 +8192,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8105,7 +8217,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:1717:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8395,7 +8513,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8438,7 +8561,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1749:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8475,7 +8603,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1753:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
diff --git a/gcc/melt/generated/warmelt-base+02.c b/gcc/melt/generated/warmelt-base+02.c
index b88acdba96a..96db296096c 100644
--- a/gcc/melt/generated/warmelt-base+02.c
+++ b/gcc/melt/generated/warmelt-base+02.c
@@ -1085,7 +1085,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1127,7 +1132,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1775:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHTYPE_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -1164,7 +1174,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1779:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -1351,7 +1366,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1370,7 +1391,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:1808:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1660,7 +1687,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1703,7 +1735,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1841:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -1740,7 +1777,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1845:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -1941,7 +1983,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1983,7 +2030,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1868:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2020,7 +2072,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1872:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2206,7 +2263,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2225,7 +2288,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:1898:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2497,7 +2566,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2540,7 +2614,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1930:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2577,7 +2656,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1934:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2761,7 +2845,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2803,7 +2892,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:1955:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2840,7 +2934,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:1959:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3017,7 +3116,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3036,7 +3141,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:1984:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3318,7 +3429,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3361,7 +3477,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2016:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3398,7 +3519,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2020:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3590,7 +3716,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3632,7 +3763,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2041:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3669,7 +3805,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2045:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3846,7 +3987,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3865,7 +4012,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:2070:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4138,7 +4291,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4181,7 +4339,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2102:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -4218,7 +4381,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2106:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -4402,7 +4570,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4444,7 +4617,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2127:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -4481,7 +4659,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2131:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -4658,7 +4841,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4677,7 +4866,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:2156:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4949,7 +5144,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4992,7 +5192,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2188:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5029,7 +5234,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2192:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5213,7 +5423,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5255,7 +5470,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2213:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5292,7 +5512,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2217:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5461,7 +5686,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5480,7 +5711,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:2245:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5753,7 +5990,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5796,7 +6038,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2277:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5833,7 +6080,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2281:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6019,7 +6271,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6061,7 +6318,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2302:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6098,7 +6360,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2306:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6268,7 +6535,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6287,7 +6560,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-base.melt:2331:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6560,7 +6839,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6603,7 +6887,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2363:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6640,7 +6929,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2367:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6826,7 +7120,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6868,7 +7167,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-base.melt:2388:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!FINISHDECL_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6905,7 +7209,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-base.melt:2392:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7087,7 +7396,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-base.melt:2451:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.C__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7263,7 +7578,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-base.melt:2462:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!VALUE_DESCRIPTOR_LIST_CONTAINER */ meltfrout->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!VALUE_DESCRIPTOR_LIST_CONTAINER */ meltfrout->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7385,7 +7706,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-base.melt:2466:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!VALUE_DESCRIPTOR_LIST_CONTAINER */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!VALUE_DESCRIPTOR_LIST_CONTAINER */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-base+meltdesc.c b/gcc/melt/generated/warmelt-base+meltdesc.c
index 07ccd5bfc86..18acd91bfe4 100644
--- a/gcc/melt/generated/warmelt-base+meltdesc.c
+++ b/gcc/melt/generated/warmelt-base+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-base */
@@ -12,15 +12,15 @@ const char melt_modulename[]="warmelt-base";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-base";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="a9aac5aca24280cf0f8ad093ab3bc90f";
+const char melt_primaryhexmd5[]="86fb3b2d7f981bc699c5f72c41f5d40c";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+01.c #1 */ "28b6e6734f8f7a5e8133818eba9e1ee0",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+02.c #2 */ "51ac129a0add6a1f1a5f27975e233e97",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+01.c #1 */ "ec21b57e9d99cfc8fc55d372696bcf41",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+02.c #2 */ "83ef96668737c02e8078f7be77a90b07",
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -28,9 +28,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=2;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="79a5574e956e77a00b04a4cd733e5ba2" ;
+const char melt_cumulated_hexmd5[]="3641ab7373290499d66f8ff5802ab73f" ;
/* include the timestamp file */
-#define meltmod_warmelt_base_mds__79a5574e956e77a00b04a4cd733e5ba2 1
+#define meltmod_warmelt_base_mds__3641ab7373290499d66f8ff5802ab73f 1
#include "warmelt-base+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-base+melttime.h b/gcc/melt/generated/warmelt-base+melttime.h
index b5f450ba555..df393b450bd 100644
--- a/gcc/melt/generated/warmelt-base+melttime.h
+++ b/gcc/melt/generated/warmelt-base+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-base+melttime.h is included from warmelt-base+meltdesc.c only. */
-#if meltmod_warmelt_base_mds__79a5574e956e77a00b04a4cd733e5ba2
+#if meltmod_warmelt_base_mds__3641ab7373290499d66f8ff5802ab73f
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-base */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:20 2012 CET";
-const long long melt_gen_timenum=1328609120;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:19 2012 CET";
+const long long melt_gen_timenum=1329219199;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_base_mds__79a5574e956e77a00b04a4cd733e5ba2 */
+#else /* ! meltmod_warmelt_base_mds__3641ab7373290499d66f8ff5802ab73f */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-base
-#endif /* meltmod_warmelt_base_mds__79a5574e956e77a00b04a4cd733e5ba2 */
+#endif /* meltmod_warmelt_base_mds__3641ab7373290499d66f8ff5802ab73f */
diff --git a/gcc/melt/generated/warmelt-base.c b/gcc/melt/generated/warmelt-base.c
index 3cef5dc7480..3ab40cf4a99 100644
--- a/gcc/melt/generated/warmelt-base.c
+++ b/gcc/melt/generated/warmelt-base.c
@@ -1787,8 +1787,8 @@ typedef struct frame_start_module_melt_st
void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int);
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 3049
- void *mcfr_varptr[3049];
+#define MELTFRAM_NBVARPTR 3064
+ void *mcfr_varptr[3064];
/*no varnum*/
#define MELTFRAM_NBVARNUM /*none*/0
/*others*/
@@ -1805,7 +1805,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_base iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -2410);
+ iniframp__->mcfr_nbvar == /*minihash */ -4031);
struct cdata_st
{
@@ -4757,118 +4757,133 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
struct MELT_STRING_STRUCT (89) dstr_2883__melt_variadi;
struct MELT_STRING_STRUCT (136) dstr_2884__MELT_AR;
struct MELT_STRING_STRUCT (14) dstr_2885__VARIADIC_CTYPE;
- struct MELT_OBJECT_STRUCT (3) dsym_2886__IV;
- struct MELT_STRING_STRUCT (3) dstr_2887__IV;
- struct MELT_OBJECT_STRUCT (3) dsym_2888__IV;
- struct MELT_STRING_STRUCT (3) dstr_2889__IV;
- struct MELT_OBJECT_STRUCT (3) dsym_2890__IV;
- struct MELT_STRING_STRUCT (3) dstr_2891__IV;
- struct MELT_OBJECT_STRUCT (3) dsym_2892__IV;
- struct MELT_STRING_STRUCT (3) dstr_2893__IV;
- struct MELT_OBJECT_STRUCT (3) dsym_2894__IV;
- struct MELT_STRING_STRUCT (3) dstr_2895__IV;
- struct MELT_OBJECT_STRUCT (3) dsym_2896__ADD2OUT;
- struct MELT_STRING_STRUCT (7) dstr_2897__ADD2OUT;
- struct MELT_OBJECT_STRUCT (3) dsym_2898__COMPARE_NAMED_ALPHA;
- struct MELT_STRING_STRUCT (19) dstr_2899__COMPARE_NAMED_AL;
- struct MELT_OBJECT_STRUCT (3) dsym_2900__CSTRING_PREFIXED;
- struct MELT_STRING_STRUCT (16) dstr_2901__CSTRING_PREFIXED;
- struct MELT_OBJECT_STRUCT (3) dsym_2902__CSTRING_SAME;
- struct MELT_STRING_STRUCT (12) dstr_2903__CSTRING_SAME;
- struct MELT_OBJECT_STRUCT (3) dsym_2904__FOREACH_LONG_UPTO;
- struct MELT_STRING_STRUCT (17) dstr_2905__FOREACH_LONG_UPT;
- struct MELT_OBJECT_STRUCT (3) dsym_2906__MAPSTRING_EVERY;
- struct MELT_STRING_STRUCT (15) dstr_2907__MAPSTRING_EVERY;
- struct MELT_OBJECT_STRUCT (3) dsym_2908__MAPSTRING_ITERATE_TEST;
- struct MELT_STRING_STRUCT (22) dstr_2909__MAPSTRING_ITERAT;
- struct MELT_OBJECT_STRUCT (3) dsym_2910__MULTIPLE_BACKWARD_EVERY;
- struct MELT_STRING_STRUCT (23) dstr_2911__MULTIPLE_BACKWAR;
- struct MELT_OBJECT_STRUCT (3) dsym_2912__MULTIPLE_EVERY;
- struct MELT_STRING_STRUCT (14) dstr_2913__MULTIPLE_EVERY;
- struct MELT_OBJECT_STRUCT (3) dsym_2914__MULTIPLE_EVERY_BOTH;
- struct MELT_STRING_STRUCT (19) dstr_2915__MULTIPLE_EVERY_B;
+ struct MELT_OBJECT_STRUCT (3) dsym_2886__INCREMENT;
+ struct MELT_STRING_STRUCT (9) dstr_2887__INCREMENT;
+ struct MELT_OBJECT_STRUCT (5) dobj_2888__INCREMENT;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_2889__INCREMENT;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_2890__INCREMENT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2891__LEFT;
+ struct MELT_STRING_STRUCT (4) dstr_2892__LEFT;
+ struct MELT_OBJECT_STRUCT (2) dobj_2893;
+ struct MELT_OBJECT_STRUCT (3) dsym_2894__INCR;
+ struct MELT_STRING_STRUCT (4) dstr_2895__INCR;
+ struct MELT_OBJECT_STRUCT (2) dobj_2896;
+ struct MELT_STRING_STRUCT (15) dstr_2897__increment_;
+ struct MELT_STRING_STRUCT (4) dstr_2898__;
+ struct MELT_STRING_STRUCT (5) dstr_2899__;
+ struct MELT_STRING_STRUCT (9) dstr_2900__INCREMENT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2901__IV;
+ struct MELT_STRING_STRUCT (3) dstr_2902__IV;
+ struct MELT_OBJECT_STRUCT (3) dsym_2903__IV;
+ struct MELT_STRING_STRUCT (3) dstr_2904__IV;
+ struct MELT_OBJECT_STRUCT (3) dsym_2905__IV;
+ struct MELT_STRING_STRUCT (3) dstr_2906__IV;
+ struct MELT_OBJECT_STRUCT (3) dsym_2907__IV;
+ struct MELT_STRING_STRUCT (3) dstr_2908__IV;
+ struct MELT_OBJECT_STRUCT (3) dsym_2909__IV;
+ struct MELT_STRING_STRUCT (3) dstr_2910__IV;
+ struct MELT_OBJECT_STRUCT (3) dsym_2911__ADD2OUT;
+ struct MELT_STRING_STRUCT (7) dstr_2912__ADD2OUT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2913__COMPARE_NAMED_ALPHA;
+ struct MELT_STRING_STRUCT (19) dstr_2914__COMPARE_NAMED_AL;
+ struct MELT_OBJECT_STRUCT (3) dsym_2915__CSTRING_PREFIXED;
+ struct MELT_STRING_STRUCT (16) dstr_2916__CSTRING_PREFIXED;
+ struct MELT_OBJECT_STRUCT (3) dsym_2917__CSTRING_SAME;
+ struct MELT_STRING_STRUCT (12) dstr_2918__CSTRING_SAME;
+ struct MELT_OBJECT_STRUCT (3) dsym_2919__FOREACH_LONG_UPTO;
+ struct MELT_STRING_STRUCT (17) dstr_2920__FOREACH_LONG_UPT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2921__MAPSTRING_EVERY;
+ struct MELT_STRING_STRUCT (15) dstr_2922__MAPSTRING_EVERY;
+ struct MELT_OBJECT_STRUCT (3) dsym_2923__MAPSTRING_ITERATE_TEST;
+ struct MELT_STRING_STRUCT (22) dstr_2924__MAPSTRING_ITERAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2925__MULTIPLE_BACKWARD_EVERY;
+ struct MELT_STRING_STRUCT (23) dstr_2926__MULTIPLE_BACKWAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_2927__MULTIPLE_EVERY;
+ struct MELT_STRING_STRUCT (14) dstr_2928__MULTIPLE_EVERY;
+ struct MELT_OBJECT_STRUCT (3) dsym_2929__MULTIPLE_EVERY_BOTH;
+ struct MELT_STRING_STRUCT (19) dstr_2930__MULTIPLE_EVERY_B;
struct MELT_OBJECT_STRUCT (3)
- dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST;
- struct MELT_STRING_STRUCT (38) dstr_2917__REGISTER_ALL_IPA;
+ dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (38) dstr_2932__REGISTER_ALL_IPA;
struct MELT_OBJECT_STRUCT (3)
- dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST;
- struct MELT_STRING_STRUCT (37) dstr_2919__REGISTER_ALL_IPA;
+ dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST;
+ struct MELT_STRING_STRUCT (37) dstr_2934__REGISTER_ALL_IPA;
struct MELT_OBJECT_STRUCT (3)
- dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST;
- struct MELT_STRING_STRUCT (40) dstr_2921__REGISTER_ALL_IPA;
+ dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (40) dstr_2936__REGISTER_ALL_IPA;
struct MELT_OBJECT_STRUCT (3)
- dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST;
- struct MELT_STRING_STRUCT (39) dstr_2923__REGISTER_ALL_IPA;
+ dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST;
+ struct MELT_STRING_STRUCT (39) dstr_2938__REGISTER_ALL_IPA;
struct MELT_OBJECT_STRUCT (3)
- dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST;
- struct MELT_STRING_STRUCT (34) dstr_2925__REGISTER_ALL_PAS;
+ dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (34) dstr_2940__REGISTER_ALL_PAS;
struct MELT_OBJECT_STRUCT (3)
- dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST;
- struct MELT_STRING_STRUCT (33) dstr_2927__REGISTER_ALL_PAS;
+ dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST;
+ struct MELT_STRING_STRUCT (33) dstr_2942__REGISTER_ALL_PAS;
struct MELT_OBJECT_STRUCT (3)
- dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST;
- struct MELT_STRING_STRUCT (36) dstr_2929__REGISTER_ALL_PAS;
+ dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (36) dstr_2944__REGISTER_ALL_PAS;
struct MELT_OBJECT_STRUCT (3)
- dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST;
- struct MELT_STRING_STRUCT (35) dstr_2931__REGISTER_ALL_PAS;
+ dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST;
+ struct MELT_STRING_STRUCT (35) dstr_2946__REGISTER_ALL_PAS;
struct MELT_OBJECT_STRUCT (3)
- dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST;
- struct MELT_STRING_STRUCT (43) dstr_2933__REGISTER_EARLY_G;
+ dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (43) dstr_2948__REGISTER_EARLY_G;
struct MELT_OBJECT_STRUCT (3)
- dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST;
- struct MELT_STRING_STRUCT (42) dstr_2935__REGISTER_EARLY_G;
+ dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST;
+ struct MELT_STRING_STRUCT (42) dstr_2950__REGISTER_EARLY_G;
struct MELT_OBJECT_STRUCT (3)
- dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST;
- struct MELT_STRING_STRUCT (45) dstr_2937__REGISTER_EARLY_G;
+ dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (45) dstr_2952__REGISTER_EARLY_G;
struct MELT_OBJECT_STRUCT (3)
- dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST;
- struct MELT_STRING_STRUCT (44) dstr_2939__REGISTER_EARLY_G;
- struct MELT_OBJECT_STRUCT (3) dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST;
- struct MELT_STRING_STRUCT (31) dstr_2941__REGISTER_FINISH_;
- struct MELT_OBJECT_STRUCT (3) dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST;
- struct MELT_STRING_STRUCT (30) dstr_2943__REGISTER_FINISH_;
- struct MELT_OBJECT_STRUCT (3) dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST;
- struct MELT_STRING_STRUCT (31) dstr_2945__REGISTER_FINISH_;
- struct MELT_OBJECT_STRUCT (3) dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST;
- struct MELT_STRING_STRUCT (30) dstr_2947__REGISTER_FINISH_;
- struct MELT_OBJECT_STRUCT (3) dsym_2948__REGISTER_PASS_EXECUTION_HOOK;
- struct MELT_STRING_STRUCT (28) dstr_2949__REGISTER_PASS_EX;
- struct MELT_OBJECT_STRUCT (3) dsym_2950__REGISTER_PRAGMA_HANDLER;
- struct MELT_STRING_STRUCT (23) dstr_2951__REGISTER_PRAGMA_;
+ dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST;
+ struct MELT_STRING_STRUCT (44) dstr_2954__REGISTER_EARLY_G;
+ struct MELT_OBJECT_STRUCT (3) dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (31) dstr_2956__REGISTER_FINISH_;
+ struct MELT_OBJECT_STRUCT (3) dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST;
+ struct MELT_STRING_STRUCT (30) dstr_2958__REGISTER_FINISH_;
+ struct MELT_OBJECT_STRUCT (3) dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (31) dstr_2960__REGISTER_FINISH_;
+ struct MELT_OBJECT_STRUCT (3) dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST;
+ struct MELT_STRING_STRUCT (30) dstr_2962__REGISTER_FINISH_;
+ struct MELT_OBJECT_STRUCT (3) dsym_2963__REGISTER_PASS_EXECUTION_HOOK;
+ struct MELT_STRING_STRUCT (28) dstr_2964__REGISTER_PASS_EX;
+ struct MELT_OBJECT_STRUCT (3) dsym_2965__REGISTER_PRAGMA_HANDLER;
+ struct MELT_STRING_STRUCT (23) dstr_2966__REGISTER_PRAGMA_;
struct MELT_OBJECT_STRUCT (3)
- dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST;
- struct MELT_STRING_STRUCT (34) dstr_2953__REGISTER_PRE_GEN;
+ dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST;
+ struct MELT_STRING_STRUCT (34) dstr_2968__REGISTER_PRE_GEN;
struct MELT_OBJECT_STRUCT (3)
- dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST;
- struct MELT_STRING_STRUCT (33) dstr_2955__REGISTER_PRE_GEN;
- struct MELT_OBJECT_STRUCT (3) dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST;
- struct MELT_STRING_STRUCT (30) dstr_2957__RETRIEVE_VALUE_D;
- struct MELT_OBJECT_STRUCT (3) dsym_2958__SET_CONTENT;
- struct MELT_STRING_STRUCT (11) dstr_2959__SET_CONTENT;
- struct MELT_OBJECT_STRUCT (3) dsym_2960__SOME_INTEGER_DIFFERENT_FROM;
- struct MELT_STRING_STRUCT (27) dstr_2961__SOME_INTEGER_DIF;
- struct MELT_OBJECT_STRUCT (3) dsym_2962__SOME_INTEGER_EQUAL_TO;
- struct MELT_STRING_STRUCT (21) dstr_2963__SOME_INTEGER_EQU;
- struct MELT_OBJECT_STRUCT (3) dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO;
- struct MELT_STRING_STRUCT (32) dstr_2965__SOME_INTEGER_GRE;
- struct MELT_OBJECT_STRUCT (3) dsym_2966__SOME_INTEGER_GREATER_THAN;
- struct MELT_STRING_STRUCT (25) dstr_2967__SOME_INTEGER_GRE;
- struct MELT_OBJECT_STRUCT (3) dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO;
- struct MELT_STRING_STRUCT (30) dstr_2969__SOME_INTEGER_LOW;
- struct MELT_OBJECT_STRUCT (3) dsym_2970__SOME_INTEGER_LOWER_THAN;
- struct MELT_STRING_STRUCT (23) dstr_2971__SOME_INTEGER_LOW;
- struct MELT_OBJECT_STRUCT (3) dsym_2972__SOME_INTEGER_MULTIPLE;
- struct MELT_STRING_STRUCT (21) dstr_2973__SOME_INTEGER_MUL;
- struct MELT_OBJECT_STRUCT (3) dsym_2974__SOME_STRING_VALUE;
- struct MELT_STRING_STRUCT (17) dstr_2975__SOME_STRING_VALU;
- struct MELT_OBJECT_STRUCT (3) dsym_2976__TUPLE_NTH;
- struct MELT_STRING_STRUCT (9) dstr_2977__TUPLE_NTH;
- struct MELT_OBJECT_STRUCT (3) dsym_2978__TUPLE_SIZED;
- struct MELT_STRING_STRUCT (11) dstr_2979__TUPLE_SIZED;
- struct MELT_OBJECT_STRUCT (3) dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK;
- struct MELT_STRING_STRUCT (30) dstr_2981__UNREGISTER_PASS_;
- struct MELT_OBJECT_STRUCT (3) dsym_2982__GENERATE_MELT_MODULE;
- struct MELT_STRING_STRUCT (20) dstr_2983__GENERATE_MELT_MO;
+ dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST;
+ struct MELT_STRING_STRUCT (33) dstr_2970__REGISTER_PRE_GEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST;
+ struct MELT_STRING_STRUCT (30) dstr_2972__RETRIEVE_VALUE_D;
+ struct MELT_OBJECT_STRUCT (3) dsym_2973__SET_CONTENT;
+ struct MELT_STRING_STRUCT (11) dstr_2974__SET_CONTENT;
+ struct MELT_OBJECT_STRUCT (3) dsym_2975__SOME_INTEGER_DIFFERENT_FROM;
+ struct MELT_STRING_STRUCT (27) dstr_2976__SOME_INTEGER_DIF;
+ struct MELT_OBJECT_STRUCT (3) dsym_2977__SOME_INTEGER_EQUAL_TO;
+ struct MELT_STRING_STRUCT (21) dstr_2978__SOME_INTEGER_EQU;
+ struct MELT_OBJECT_STRUCT (3) dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO;
+ struct MELT_STRING_STRUCT (32) dstr_2980__SOME_INTEGER_GRE;
+ struct MELT_OBJECT_STRUCT (3) dsym_2981__SOME_INTEGER_GREATER_THAN;
+ struct MELT_STRING_STRUCT (25) dstr_2982__SOME_INTEGER_GRE;
+ struct MELT_OBJECT_STRUCT (3) dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO;
+ struct MELT_STRING_STRUCT (30) dstr_2984__SOME_INTEGER_LOW;
+ struct MELT_OBJECT_STRUCT (3) dsym_2985__SOME_INTEGER_LOWER_THAN;
+ struct MELT_STRING_STRUCT (23) dstr_2986__SOME_INTEGER_LOW;
+ struct MELT_OBJECT_STRUCT (3) dsym_2987__SOME_INTEGER_MULTIPLE;
+ struct MELT_STRING_STRUCT (21) dstr_2988__SOME_INTEGER_MUL;
+ struct MELT_OBJECT_STRUCT (3) dsym_2989__SOME_STRING_VALUE;
+ struct MELT_STRING_STRUCT (17) dstr_2990__SOME_STRING_VALU;
+ struct MELT_OBJECT_STRUCT (3) dsym_2991__TUPLE_NTH;
+ struct MELT_STRING_STRUCT (9) dstr_2992__TUPLE_NTH;
+ struct MELT_OBJECT_STRUCT (3) dsym_2993__TUPLE_SIZED;
+ struct MELT_STRING_STRUCT (11) dstr_2994__TUPLE_SIZED;
+ struct MELT_OBJECT_STRUCT (3) dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK;
+ struct MELT_STRING_STRUCT (30) dstr_2996__UNREGISTER_PASS_;
+ struct MELT_OBJECT_STRUCT (3) dsym_2997__GENERATE_MELT_MODULE;
+ struct MELT_STRING_STRUCT (20) dstr_2998__GENERATE_MELT_MO;
long spare_;
} *cdat = NULL;
cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0);
@@ -4918,7 +4933,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3__IGNORE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_3__IGNORE.obj_hash = 526965910;
+ cdat->dobj_3__IGNORE.obj_hash = 368196554;
cdat->dobj_3__IGNORE.obj_len = 5;
/*inimult dtup_4__IGNORE */
@@ -4975,7 +4990,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_8.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_8.obj_num = 0;
- cdat->dobj_8.obj_hash = 418014991;
+ cdat->dobj_8.obj_hash = 994730463;
cdat->dobj_8.obj_len = 2;
@@ -5042,7 +5057,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_14__VOID.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_14__VOID.obj_hash = 842524524;
+ cdat->dobj_14__VOID.obj_hash = 853095695;
cdat->dobj_14__VOID.obj_len = 5;
/*inimult dtup_15__VOID */
@@ -5113,7 +5128,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_21__IS_NOT_OBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_21__IS_NOT_OBJECT.obj_hash = 451749496;
+ cdat->dobj_21__IS_NOT_OBJECT.obj_hash = 991334219;
cdat->dobj_21__IS_NOT_OBJECT.obj_len = 5;
/*inimult dtup_22__IS_NOT_OBJECT */
@@ -5170,7 +5185,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_26.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_26.obj_num = 0;
- cdat->dobj_26.obj_hash = 424513018;
+ cdat->dobj_26.obj_hash = 214572688;
cdat->dobj_26.obj_len = 2;
@@ -5243,7 +5258,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_32__GET_GLOBPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_32__GET_GLOBPREDEF.obj_hash = 855047016;
+ cdat->dobj_32__GET_GLOBPREDEF.obj_hash = 223664586;
cdat->dobj_32__GET_GLOBPREDEF.obj_len = 5;
/*inimult dtup_33__GET_GLOBPREDEF */
@@ -5300,7 +5315,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_37.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_37.obj_num = 0;
- cdat->dobj_37.obj_hash = 357307017;
+ cdat->dobj_37.obj_hash = 420393222;
cdat->dobj_37.obj_len = 2;
@@ -5370,7 +5385,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_43__OBJ_HASH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_43__OBJ_HASH.obj_hash = 1072233012;
+ cdat->dobj_43__OBJ_HASH.obj_hash = 959047789;
cdat->dobj_43__OBJ_HASH.obj_len = 5;
/*inimult dtup_44__OBJ_HASH */
@@ -5401,7 +5416,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_46.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_46.obj_num = 0;
- cdat->dobj_46.obj_hash = 187873797;
+ cdat->dobj_46.obj_hash = 75187073;
cdat->dobj_46.obj_len = 2;
@@ -5473,7 +5488,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_52__CLONE_WITH_DISCRIMINANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_hash = 897249968;
+ cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_hash = 289253248;
cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_len = 5;
/*inimult dtup_53__CLONE_WITH_DISCRIMINANT */
@@ -5532,7 +5547,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_57.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_57.obj_num = 0;
- cdat->dobj_57.obj_hash = 831123566;
+ cdat->dobj_57.obj_hash = 939663624;
cdat->dobj_57.obj_len = 2;
@@ -5579,7 +5594,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_60.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_60.obj_num = 1;
- cdat->dobj_60.obj_hash = 625342903;
+ cdat->dobj_60.obj_hash = 136861170;
cdat->dobj_60.obj_len = 2;
@@ -5657,7 +5672,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_67__OBJ_LEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_67__OBJ_LEN.obj_hash = 120491944;
+ cdat->dobj_67__OBJ_LEN.obj_hash = 7524202;
cdat->dobj_67__OBJ_LEN.obj_len = 5;
/*inimult dtup_68__OBJ_LEN */
@@ -5688,7 +5703,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_70.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_70.obj_num = 0;
- cdat->dobj_70.obj_hash = 686242725;
+ cdat->dobj_70.obj_hash = 438930821;
cdat->dobj_70.obj_len = 2;
@@ -5756,7 +5771,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_76__OBJ_NUM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_76__OBJ_NUM.obj_hash = 487687211;
+ cdat->dobj_76__OBJ_NUM.obj_hash = 1016068024;
cdat->dobj_76__OBJ_NUM.obj_len = 5;
/*inimult dtup_77__OBJ_NUM */
@@ -5787,7 +5802,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_79.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_79.obj_num = 0;
- cdat->dobj_79.obj_hash = 800297575;
+ cdat->dobj_79.obj_hash = 1039223350;
cdat->dobj_79.obj_len = 2;
@@ -5856,7 +5871,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_85__NONZERO_HASH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_85__NONZERO_HASH.obj_hash = 801583814;
+ cdat->dobj_85__NONZERO_HASH.obj_hash = 1052358913;
cdat->dobj_85__NONZERO_HASH.obj_len = 5;
/*inimult dtup_86__NONZERO_HASH */
@@ -5932,7 +5947,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_92__MINOR_GARBCOLL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_92__MINOR_GARBCOLL.obj_hash = 466852740;
+ cdat->dobj_92__MINOR_GARBCOLL.obj_hash = 397570496;
cdat->dobj_92__MINOR_GARBCOLL.obj_len = 5;
/*inimult dtup_93__MINOR_GARBCOLL */
@@ -5989,7 +6004,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_97.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_97.obj_num = 0;
- cdat->dobj_97.obj_hash = 307938622;
+ cdat->dobj_97.obj_hash = 157524844;
cdat->dobj_97.obj_len = 2;
@@ -6065,7 +6080,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_103__FULL_GARBCOLL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_103__FULL_GARBCOLL.obj_hash = 1057937400;
+ cdat->dobj_103__FULL_GARBCOLL.obj_hash = 419941455;
cdat->dobj_103__FULL_GARBCOLL.obj_len = 5;
/*inimult dtup_104__FULL_GARBCOLL */
@@ -6096,7 +6111,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_106.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_106.obj_num = 0;
- cdat->dobj_106.obj_hash = 1010680581;
+ cdat->dobj_106.obj_hash = 11436722;
cdat->dobj_106.obj_len = 2;
@@ -6173,7 +6188,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_112__CHECKCALLSTACK_MSG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_112__CHECKCALLSTACK_MSG.obj_hash = 560054019;
+ cdat->dobj_112__CHECKCALLSTACK_MSG.obj_hash = 711996244;
cdat->dobj_112__CHECKCALLSTACK_MSG.obj_len = 5;
/*inimult dtup_113__CHECKCALLSTACK_MSG */
@@ -6232,7 +6247,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_117.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_117.obj_num = 0;
- cdat->dobj_117.obj_hash = 270923496;
+ cdat->dobj_117.obj_hash = 305797125;
cdat->dobj_117.obj_len = 2;
@@ -6309,7 +6324,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_hash = 485430665;
+ cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_hash = 475721053;
cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_len = 5;
/*inimult dtup_124__MELT_INCREMENT_DBGCOUNTER */
@@ -6386,7 +6401,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_130__CBREAK_MSG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_130__CBREAK_MSG.obj_hash = 4689753;
+ cdat->dobj_130__CBREAK_MSG.obj_hash = 240010100;
cdat->dobj_130__CBREAK_MSG.obj_len = 5;
/*inimult dtup_131__CBREAK_MSG */
@@ -6417,7 +6432,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_133.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_133.obj_num = 0;
- cdat->dobj_133.obj_hash = 720929772;
+ cdat->dobj_133.obj_hash = 725739860;
cdat->dobj_133.obj_len = 2;
@@ -6485,7 +6500,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_139__C_TIME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_139__C_TIME.obj_hash = 481550965;
+ cdat->dobj_139__C_TIME.obj_hash = 321528396;
cdat->dobj_139__C_TIME.obj_len = 5;
/*inimult dtup_140__C_TIME */
@@ -6556,7 +6571,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_146__C_CLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_146__C_CLOCK.obj_hash = 743557471;
+ cdat->dobj_146__C_CLOCK.obj_hash = 768090496;
cdat->dobj_146__C_CLOCK.obj_len = 5;
/*inimult dtup_147__C_CLOCK */
@@ -6626,7 +6641,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_153__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_153__I.obj_hash = 423074299;
+ cdat->dobj_153__I.obj_hash = 226071664;
cdat->dobj_153__I.obj_len = 5;
/*inimult dtup_154__I */
@@ -6683,7 +6698,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_158.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_158.obj_num = 0;
- cdat->dobj_158.obj_hash = 53315661;
+ cdat->dobj_158.obj_hash = 785303486;
cdat->dobj_158.obj_len = 2;
@@ -6730,7 +6745,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_161.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_161.obj_num = 1;
- cdat->dobj_161.obj_hash = 954633642;
+ cdat->dobj_161.obj_hash = 87376693;
cdat->dobj_161.obj_len = 2;
@@ -6803,7 +6818,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_168__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_168__I.obj_hash = 199377400;
+ cdat->dobj_168__I.obj_hash = 59277725;
cdat->dobj_168__I.obj_len = 5;
/*inimult dtup_169__I */
@@ -6834,7 +6849,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_171.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_171.obj_num = 0;
- cdat->dobj_171.obj_hash = 286144958;
+ cdat->dobj_171.obj_hash = 500296450;
cdat->dobj_171.obj_len = 2;
/*^iniobj */
@@ -6855,7 +6870,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_172.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_172.obj_num = 1;
- cdat->dobj_172.obj_hash = 406899918;
+ cdat->dobj_172.obj_hash = 96052113;
cdat->dobj_172.obj_len = 2;
@@ -6928,7 +6943,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_179__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_179__I.obj_hash = 874219607;
+ cdat->dobj_179__I.obj_hash = 875163996;
cdat->dobj_179__I.obj_len = 5;
/*inimult dtup_180__I */
@@ -6959,7 +6974,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_182.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_182.obj_num = 0;
- cdat->dobj_182.obj_hash = 747279875;
+ cdat->dobj_182.obj_hash = 49226009;
cdat->dobj_182.obj_len = 2;
/*^iniobj */
@@ -6980,7 +6995,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_183.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_183.obj_num = 1;
- cdat->dobj_183.obj_hash = 1030438215;
+ cdat->dobj_183.obj_hash = 177186955;
cdat->dobj_183.obj_len = 2;
@@ -7053,7 +7068,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_190__MAXI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_190__MAXI.obj_hash = 670830423;
+ cdat->dobj_190__MAXI.obj_hash = 803252776;
cdat->dobj_190__MAXI.obj_len = 5;
/*inimult dtup_191__MAXI */
@@ -7084,7 +7099,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_193.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_193.obj_num = 0;
- cdat->dobj_193.obj_hash = 269693966;
+ cdat->dobj_193.obj_hash = 107753963;
cdat->dobj_193.obj_len = 2;
/*^iniobj */
@@ -7105,7 +7120,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_194.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_194.obj_num = 1;
- cdat->dobj_194.obj_hash = 437423568;
+ cdat->dobj_194.obj_hash = 310346092;
cdat->dobj_194.obj_len = 2;
@@ -7178,7 +7193,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_201__MINI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_201__MINI.obj_hash = 984296723;
+ cdat->dobj_201__MINI.obj_hash = 454292174;
cdat->dobj_201__MINI.obj_len = 5;
/*inimult dtup_202__MINI */
@@ -7209,7 +7224,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_204.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_204.obj_num = 0;
- cdat->dobj_204.obj_hash = 936092797;
+ cdat->dobj_204.obj_hash = 1057024859;
cdat->dobj_204.obj_len = 2;
/*^iniobj */
@@ -7230,7 +7245,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_205.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_205.obj_num = 1;
- cdat->dobj_205.obj_hash = 890111960;
+ cdat->dobj_205.obj_hash = 111433945;
cdat->dobj_205.obj_len = 2;
@@ -7303,7 +7318,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_212__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_212__I.obj_hash = 283805559;
+ cdat->dobj_212__I.obj_hash = 284547640;
cdat->dobj_212__I.obj_len = 5;
/*inimult dtup_213__I */
@@ -7334,7 +7349,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_215.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_215.obj_num = 0;
- cdat->dobj_215.obj_hash = 817512033;
+ cdat->dobj_215.obj_hash = 174515792;
cdat->dobj_215.obj_len = 2;
/*^iniobj */
@@ -7355,7 +7370,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_216.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_216.obj_num = 1;
- cdat->dobj_216.obj_hash = 832794026;
+ cdat->dobj_216.obj_hash = 333867830;
cdat->dobj_216.obj_len = 2;
@@ -7428,7 +7443,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_223__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_223__I.obj_hash = 92636938;
+ cdat->dobj_223__I.obj_hash = 618392498;
cdat->dobj_223__I.obj_len = 5;
/*inimult dtup_224__I */
@@ -7459,7 +7474,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_226.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_226.obj_num = 0;
- cdat->dobj_226.obj_hash = 258398017;
+ cdat->dobj_226.obj_hash = 612062700;
cdat->dobj_226.obj_len = 2;
/*^iniobj */
@@ -7480,7 +7495,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_227.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_227.obj_num = 1;
- cdat->dobj_227.obj_hash = 23293137;
+ cdat->dobj_227.obj_hash = 929485631;
cdat->dobj_227.obj_len = 2;
@@ -7553,7 +7568,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_234__ANDI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_234__ANDI.obj_hash = 647948259;
+ cdat->dobj_234__ANDI.obj_hash = 499892805;
cdat->dobj_234__ANDI.obj_len = 5;
/*inimult dtup_235__ANDI */
@@ -7584,7 +7599,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_237.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_237.obj_num = 0;
- cdat->dobj_237.obj_hash = 167866816;
+ cdat->dobj_237.obj_hash = 504402532;
cdat->dobj_237.obj_len = 2;
/*^iniobj */
@@ -7605,7 +7620,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_238.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_238.obj_num = 1;
- cdat->dobj_238.obj_hash = 705876254;
+ cdat->dobj_238.obj_hash = 1001860153;
cdat->dobj_238.obj_len = 2;
@@ -7678,7 +7693,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_245__ORI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_245__ORI.obj_hash = 511006384;
+ cdat->dobj_245__ORI.obj_hash = 437705012;
cdat->dobj_245__ORI.obj_len = 5;
/*inimult dtup_246__ORI */
@@ -7709,7 +7724,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_248.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_248.obj_num = 0;
- cdat->dobj_248.obj_hash = 233277668;
+ cdat->dobj_248.obj_hash = 56767861;
cdat->dobj_248.obj_len = 2;
/*^iniobj */
@@ -7730,7 +7745,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_249.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_249.obj_num = 1;
- cdat->dobj_249.obj_hash = 612073040;
+ cdat->dobj_249.obj_hash = 459751371;
cdat->dobj_249.obj_len = 2;
@@ -7803,7 +7818,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_256__XORI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_256__XORI.obj_hash = 885270504;
+ cdat->dobj_256__XORI.obj_hash = 396236701;
cdat->dobj_256__XORI.obj_len = 5;
/*inimult dtup_257__XORI */
@@ -7834,7 +7849,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_259.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_259.obj_num = 0;
- cdat->dobj_259.obj_hash = 947600891;
+ cdat->dobj_259.obj_hash = 573587063;
cdat->dobj_259.obj_len = 2;
/*^iniobj */
@@ -7855,7 +7870,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_260.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_260.obj_num = 1;
- cdat->dobj_260.obj_hash = 172414551;
+ cdat->dobj_260.obj_hash = 687773045;
cdat->dobj_260.obj_len = 2;
@@ -7928,7 +7943,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_267__NEGI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_267__NEGI.obj_hash = 494884634;
+ cdat->dobj_267__NEGI.obj_hash = 210810162;
cdat->dobj_267__NEGI.obj_len = 5;
/*inimult dtup_268__NEGI */
@@ -7985,7 +8000,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_272.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_272.obj_num = 0;
- cdat->dobj_272.obj_hash = 111300386;
+ cdat->dobj_272.obj_hash = 739071000;
cdat->dobj_272.obj_len = 2;
@@ -8051,7 +8066,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_278__NOTI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_278__NOTI.obj_hash = 615113301;
+ cdat->dobj_278__NOTI.obj_hash = 884883683;
cdat->dobj_278__NOTI.obj_len = 5;
/*inimult dtup_279__NOTI */
@@ -8082,7 +8097,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_281.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_281.obj_num = 0;
- cdat->dobj_281.obj_hash = 638104586;
+ cdat->dobj_281.obj_hash = 270998708;
cdat->dobj_281.obj_len = 2;
@@ -8258,7 +8273,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_299__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_299__IVI.obj_hash = 453199675;
+ cdat->dobj_299__IVI.obj_hash = 728453795;
cdat->dobj_299__IVI.obj_len = 5;
/*inimult dtup_300__IVI */
@@ -8289,7 +8304,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_302.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_302.obj_num = 0;
- cdat->dobj_302.obj_hash = 438636983;
+ cdat->dobj_302.obj_hash = 961533849;
cdat->dobj_302.obj_len = 2;
@@ -8336,7 +8351,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_305.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_305.obj_num = 1;
- cdat->dobj_305.obj_hash = 60636637;
+ cdat->dobj_305.obj_hash = 736242660;
cdat->dobj_305.obj_len = 2;
@@ -8420,7 +8435,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_313__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_313__IVI.obj_hash = 1032390595;
+ cdat->dobj_313__IVI.obj_hash = 787314492;
cdat->dobj_313__IVI.obj_len = 5;
/*inimult dtup_314__IVI */
@@ -8451,7 +8466,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_316.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_316.obj_num = 0;
- cdat->dobj_316.obj_hash = 408252418;
+ cdat->dobj_316.obj_hash = 13427805;
cdat->dobj_316.obj_len = 2;
/*^iniobj */
@@ -8472,7 +8487,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_317.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_317.obj_num = 1;
- cdat->dobj_317.obj_hash = 420373370;
+ cdat->dobj_317.obj_hash = 315143244;
cdat->dobj_317.obj_len = 2;
@@ -8556,7 +8571,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_325__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_325__IVI.obj_hash = 153115129;
+ cdat->dobj_325__IVI.obj_hash = 839729192;
cdat->dobj_325__IVI.obj_len = 5;
/*inimult dtup_326__IVI */
@@ -8587,7 +8602,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_328.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_328.obj_num = 0;
- cdat->dobj_328.obj_hash = 701621348;
+ cdat->dobj_328.obj_hash = 58432589;
cdat->dobj_328.obj_len = 2;
/*^iniobj */
@@ -8608,7 +8623,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_329.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_329.obj_num = 1;
- cdat->dobj_329.obj_hash = 405819523;
+ cdat->dobj_329.obj_hash = 90697926;
cdat->dobj_329.obj_len = 2;
@@ -8692,7 +8707,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_337__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_337__IVI.obj_hash = 216449145;
+ cdat->dobj_337__IVI.obj_hash = 647394245;
cdat->dobj_337__IVI.obj_len = 5;
/*inimult dtup_338__IVI */
@@ -8723,7 +8738,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_340.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_340.obj_num = 0;
- cdat->dobj_340.obj_hash = 618744461;
+ cdat->dobj_340.obj_hash = 780847854;
cdat->dobj_340.obj_len = 2;
/*^iniobj */
@@ -8744,7 +8759,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_341.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_341.obj_num = 1;
- cdat->dobj_341.obj_hash = 341671747;
+ cdat->dobj_341.obj_hash = 145910018;
cdat->dobj_341.obj_len = 2;
@@ -8836,7 +8851,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_350__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_350__IVI.obj_hash = 624521420;
+ cdat->dobj_350__IVI.obj_hash = 660486970;
cdat->dobj_350__IVI.obj_len = 5;
/*inimult dtup_351__IVI */
@@ -8867,7 +8882,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_353.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_353.obj_num = 0;
- cdat->dobj_353.obj_hash = 633412736;
+ cdat->dobj_353.obj_hash = 242111167;
cdat->dobj_353.obj_len = 2;
/*^iniobj */
@@ -8888,7 +8903,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_354.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_354.obj_num = 1;
- cdat->dobj_354.obj_hash = 875977040;
+ cdat->dobj_354.obj_hash = 25407065;
cdat->dobj_354.obj_len = 2;
@@ -8980,7 +8995,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_363__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_363__IV.obj_hash = 703501389;
+ cdat->dobj_363__IV.obj_hash = 442386667;
cdat->dobj_363__IV.obj_len = 5;
/*inimult dtup_364__IV */
@@ -9011,7 +9026,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_366.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_366.obj_num = 0;
- cdat->dobj_366.obj_hash = 391259128;
+ cdat->dobj_366.obj_hash = 688191517;
cdat->dobj_366.obj_len = 2;
/*^iniobj */
@@ -9032,7 +9047,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_367.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_367.obj_num = 1;
- cdat->dobj_367.obj_hash = 164217792;
+ cdat->dobj_367.obj_hash = 256482639;
cdat->dobj_367.obj_len = 2;
@@ -9123,7 +9138,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_376__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_376__IV.obj_hash = 517282882;
+ cdat->dobj_376__IV.obj_hash = 92107326;
cdat->dobj_376__IV.obj_len = 5;
/*inimult dtup_377__IV */
@@ -9154,7 +9169,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_379.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_379.obj_num = 0;
- cdat->dobj_379.obj_hash = 536986440;
+ cdat->dobj_379.obj_hash = 319222266;
cdat->dobj_379.obj_len = 2;
/*^iniobj */
@@ -9175,7 +9190,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_380.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_380.obj_num = 1;
- cdat->dobj_380.obj_hash = 742945319;
+ cdat->dobj_380.obj_hash = 211052567;
cdat->dobj_380.obj_len = 2;
@@ -9266,7 +9281,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_389__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_389__IV.obj_hash = 503442414;
+ cdat->dobj_389__IV.obj_hash = 541920919;
cdat->dobj_389__IV.obj_len = 5;
/*inimult dtup_390__IV */
@@ -9297,7 +9312,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_392.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_392.obj_num = 0;
- cdat->dobj_392.obj_hash = 945886917;
+ cdat->dobj_392.obj_hash = 158794059;
cdat->dobj_392.obj_len = 2;
/*^iniobj */
@@ -9318,7 +9333,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_393.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_393.obj_num = 1;
- cdat->dobj_393.obj_hash = 558395928;
+ cdat->dobj_393.obj_hash = 572353253;
cdat->dobj_393.obj_len = 2;
@@ -9409,7 +9424,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_402__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_402__IV.obj_hash = 1001445526;
+ cdat->dobj_402__IV.obj_hash = 359790425;
cdat->dobj_402__IV.obj_len = 5;
/*inimult dtup_403__IV */
@@ -9440,7 +9455,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_405.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_405.obj_num = 0;
- cdat->dobj_405.obj_hash = 965342402;
+ cdat->dobj_405.obj_hash = 732918020;
cdat->dobj_405.obj_len = 2;
/*^iniobj */
@@ -9461,7 +9476,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_406.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_406.obj_num = 1;
- cdat->dobj_406.obj_hash = 209333033;
+ cdat->dobj_406.obj_hash = 883174381;
cdat->dobj_406.obj_len = 2;
@@ -9552,7 +9567,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_415__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_415__IV.obj_hash = 782608765;
+ cdat->dobj_415__IV.obj_hash = 747472873;
cdat->dobj_415__IV.obj_len = 5;
/*inimult dtup_416__IV */
@@ -9583,7 +9598,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_418.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_418.obj_num = 0;
- cdat->dobj_418.obj_hash = 33811860;
+ cdat->dobj_418.obj_hash = 1072633368;
cdat->dobj_418.obj_len = 2;
/*^iniobj */
@@ -9604,7 +9619,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_419.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_419.obj_num = 1;
- cdat->dobj_419.obj_hash = 501047020;
+ cdat->dobj_419.obj_hash = 88824675;
cdat->dobj_419.obj_len = 2;
@@ -9695,7 +9710,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_428__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_428__IV.obj_hash = 1024268263;
+ cdat->dobj_428__IV.obj_hash = 480681387;
cdat->dobj_428__IV.obj_len = 5;
/*inimult dtup_429__IV */
@@ -9726,7 +9741,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_431.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_431.obj_num = 0;
- cdat->dobj_431.obj_hash = 824789901;
+ cdat->dobj_431.obj_hash = 40259452;
cdat->dobj_431.obj_len = 2;
/*^iniobj */
@@ -9747,7 +9762,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_432.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_432.obj_num = 1;
- cdat->dobj_432.obj_hash = 1047931127;
+ cdat->dobj_432.obj_hash = 74830716;
cdat->dobj_432.obj_len = 2;
@@ -9838,7 +9853,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_441__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_441__IVI.obj_hash = 769511192;
+ cdat->dobj_441__IVI.obj_hash = 118659073;
cdat->dobj_441__IVI.obj_len = 5;
/*inimult dtup_442__IVI */
@@ -9869,7 +9884,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_444.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_444.obj_num = 0;
- cdat->dobj_444.obj_hash = 957092612;
+ cdat->dobj_444.obj_hash = 1053034019;
cdat->dobj_444.obj_len = 2;
/*^iniobj */
@@ -9890,7 +9905,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_445.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_445.obj_num = 1;
- cdat->dobj_445.obj_hash = 998375132;
+ cdat->dobj_445.obj_hash = 388208746;
cdat->dobj_445.obj_len = 2;
@@ -9973,7 +9988,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_453__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_453__IVI.obj_hash = 586104862;
+ cdat->dobj_453__IVI.obj_hash = 775835910;
cdat->dobj_453__IVI.obj_len = 5;
/*inimult dtup_454__IVI */
@@ -10004,7 +10019,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_456.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_456.obj_num = 0;
- cdat->dobj_456.obj_hash = 580711806;
+ cdat->dobj_456.obj_hash = 581762544;
cdat->dobj_456.obj_len = 2;
/*^iniobj */
@@ -10025,7 +10040,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_457.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_457.obj_num = 1;
- cdat->dobj_457.obj_hash = 389426196;
+ cdat->dobj_457.obj_hash = 523632524;
cdat->dobj_457.obj_len = 2;
@@ -10108,7 +10123,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_465__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_465__IVI.obj_hash = 43457890;
+ cdat->dobj_465__IVI.obj_hash = 821118884;
cdat->dobj_465__IVI.obj_len = 5;
/*inimult dtup_466__IVI */
@@ -10139,7 +10154,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_468.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_468.obj_num = 0;
- cdat->dobj_468.obj_hash = 943547353;
+ cdat->dobj_468.obj_hash = 411459679;
cdat->dobj_468.obj_len = 2;
/*^iniobj */
@@ -10160,7 +10175,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_469.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_469.obj_num = 1;
- cdat->dobj_469.obj_hash = 29790646;
+ cdat->dobj_469.obj_hash = 70598925;
cdat->dobj_469.obj_len = 2;
@@ -10243,7 +10258,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_477__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_477__IVI.obj_hash = 527036405;
+ cdat->dobj_477__IVI.obj_hash = 321630086;
cdat->dobj_477__IVI.obj_len = 5;
/*inimult dtup_478__IVI */
@@ -10274,7 +10289,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_480.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_480.obj_num = 0;
- cdat->dobj_480.obj_hash = 569490379;
+ cdat->dobj_480.obj_hash = 578004341;
cdat->dobj_480.obj_len = 2;
/*^iniobj */
@@ -10295,7 +10310,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_481.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_481.obj_num = 1;
- cdat->dobj_481.obj_hash = 502597753;
+ cdat->dobj_481.obj_hash = 109633513;
cdat->dobj_481.obj_len = 2;
@@ -10378,7 +10393,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_489__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_489__IVI.obj_hash = 854948877;
+ cdat->dobj_489__IVI.obj_hash = 317592329;
cdat->dobj_489__IVI.obj_len = 5;
/*inimult dtup_490__IVI */
@@ -10409,7 +10424,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_492.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_492.obj_num = 0;
- cdat->dobj_492.obj_hash = 993650135;
+ cdat->dobj_492.obj_hash = 1066473975;
cdat->dobj_492.obj_len = 2;
/*^iniobj */
@@ -10430,7 +10445,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_493.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_493.obj_num = 1;
- cdat->dobj_493.obj_hash = 302157564;
+ cdat->dobj_493.obj_hash = 91400288;
cdat->dobj_493.obj_len = 2;
@@ -10513,7 +10528,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_501__IVI.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_501__IVI.obj_hash = 725823690;
+ cdat->dobj_501__IVI.obj_hash = 265043208;
cdat->dobj_501__IVI.obj_len = 5;
/*inimult dtup_502__IVI */
@@ -10544,7 +10559,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_504.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_504.obj_num = 0;
- cdat->dobj_504.obj_hash = 500989262;
+ cdat->dobj_504.obj_hash = 234658330;
cdat->dobj_504.obj_len = 2;
/*^iniobj */
@@ -10565,7 +10580,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_505.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_505.obj_num = 1;
- cdat->dobj_505.obj_hash = 823609604;
+ cdat->dobj_505.obj_hash = 396791142;
cdat->dobj_505.obj_len = 2;
@@ -10648,7 +10663,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_513__NOTNULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_513__NOTNULL.obj_hash = 695816865;
+ cdat->dobj_513__NOTNULL.obj_hash = 471435676;
cdat->dobj_513__NOTNULL.obj_len = 5;
/*inimult dtup_514__NOTNULL */
@@ -10679,7 +10694,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_516.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_516.obj_num = 0;
- cdat->dobj_516.obj_hash = 234330868;
+ cdat->dobj_516.obj_hash = 906295342;
cdat->dobj_516.obj_len = 2;
@@ -10745,7 +10760,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_522__ZEROP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_522__ZEROP.obj_hash = 1314863;
+ cdat->dobj_522__ZEROP.obj_hash = 1025611740;
cdat->dobj_522__ZEROP.obj_len = 5;
/*inimult dtup_523__ZEROP */
@@ -10776,7 +10791,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_525.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_525.obj_num = 0;
- cdat->dobj_525.obj_hash = 825587197;
+ cdat->dobj_525.obj_hash = 828171647;
cdat->dobj_525.obj_len = 2;
@@ -10846,7 +10861,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_531__OUTCSTRING_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_531__OUTCSTRING_DBG.obj_hash = 280853901;
+ cdat->dobj_531__OUTCSTRING_DBG.obj_hash = 872374668;
cdat->dobj_531__OUTCSTRING_DBG.obj_len = 5;
/*inimult dtup_532__OUTCSTRING_DBG */
@@ -10905,7 +10920,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_536.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_536.obj_num = 0;
- cdat->dobj_536.obj_hash = 786239595;
+ cdat->dobj_536.obj_hash = 137452590;
cdat->dobj_536.obj_len = 2;
@@ -10977,7 +10992,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_542__OUTNUM_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_542__OUTNUM_DBG.obj_hash = 853238293;
+ cdat->dobj_542__OUTNUM_DBG.obj_hash = 81149163;
cdat->dobj_542__OUTNUM_DBG.obj_len = 5;
/*inimult dtup_543__OUTNUM_DBG */
@@ -11034,7 +11049,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_547.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_547.obj_num = 0;
- cdat->dobj_547.obj_hash = 485969961;
+ cdat->dobj_547.obj_hash = 683899439;
cdat->dobj_547.obj_len = 2;
@@ -11081,7 +11096,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_550.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_550.obj_num = 1;
- cdat->dobj_550.obj_hash = 595163875;
+ cdat->dobj_550.obj_hash = 1047581270;
cdat->dobj_550.obj_len = 2;
@@ -11128,7 +11143,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_553.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_553.obj_num = 2;
- cdat->dobj_553.obj_hash = 661548867;
+ cdat->dobj_553.obj_hash = 747279486;
cdat->dobj_553.obj_len = 2;
@@ -11211,7 +11226,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_561__OUTSTR_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_561__OUTSTR_DBG.obj_hash = 1012351889;
+ cdat->dobj_561__OUTSTR_DBG.obj_hash = 657106310;
cdat->dobj_561__OUTSTR_DBG.obj_len = 5;
/*inimult dtup_562__OUTSTR_DBG */
@@ -11268,7 +11283,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_566.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_566.obj_num = 0;
- cdat->dobj_566.obj_hash = 802763507;
+ cdat->dobj_566.obj_hash = 20413272;
cdat->dobj_566.obj_len = 2;
@@ -11340,7 +11355,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_572__OUTSTRBUF_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_572__OUTSTRBUF_DBG.obj_hash = 775446261;
+ cdat->dobj_572__OUTSTRBUF_DBG.obj_hash = 725966783;
cdat->dobj_572__OUTSTRBUF_DBG.obj_len = 5;
/*inimult dtup_573__OUTSTRBUF_DBG */
@@ -11397,7 +11412,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_577.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_577.obj_num = 0;
- cdat->dobj_577.obj_hash = 615277960;
+ cdat->dobj_577.obj_hash = 261632099;
cdat->dobj_577.obj_len = 2;
@@ -11472,7 +11487,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_583__OUTNEWLINE_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_583__OUTNEWLINE_DBG.obj_hash = 470468670;
+ cdat->dobj_583__OUTNEWLINE_DBG.obj_hash = 59786028;
cdat->dobj_583__OUTNEWLINE_DBG.obj_len = 5;
/*inimult dtup_584__OUTNEWLINE_DBG */
@@ -11549,7 +11564,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_590__OUTNUM_ERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_590__OUTNUM_ERR.obj_hash = 218735641;
+ cdat->dobj_590__OUTNUM_ERR.obj_hash = 139375185;
cdat->dobj_590__OUTNUM_ERR.obj_len = 5;
/*inimult dtup_591__OUTNUM_ERR */
@@ -11580,7 +11595,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_593.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_593.obj_num = 0;
- cdat->dobj_593.obj_hash = 679208865;
+ cdat->dobj_593.obj_hash = 474129329;
cdat->dobj_593.obj_len = 2;
/*^iniobj */
@@ -11601,7 +11616,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_594.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_594.obj_num = 1;
- cdat->dobj_594.obj_hash = 791313215;
+ cdat->dobj_594.obj_hash = 755843179;
cdat->dobj_594.obj_len = 2;
/*^iniobj */
@@ -11622,7 +11637,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_595.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_595.obj_num = 2;
- cdat->dobj_595.obj_hash = 521533543;
+ cdat->dobj_595.obj_hash = 868321682;
cdat->dobj_595.obj_len = 2;
@@ -11709,7 +11724,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_603__OUTCSTRING_ERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_603__OUTCSTRING_ERR.obj_hash = 545271689;
+ cdat->dobj_603__OUTCSTRING_ERR.obj_hash = 15744276;
cdat->dobj_603__OUTCSTRING_ERR.obj_len = 5;
/*inimult dtup_604__OUTCSTRING_ERR */
@@ -11742,7 +11757,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_606.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_606.obj_num = 0;
- cdat->dobj_606.obj_hash = 773925066;
+ cdat->dobj_606.obj_hash = 73969881;
cdat->dobj_606.obj_len = 2;
@@ -11817,7 +11832,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_612__OUTSTRBUF_ERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_612__OUTSTRBUF_ERR.obj_hash = 285808417;
+ cdat->dobj_612__OUTSTRBUF_ERR.obj_hash = 239258466;
cdat->dobj_612__OUTSTRBUF_ERR.obj_len = 5;
/*inimult dtup_613__OUTSTRBUF_ERR */
@@ -11848,7 +11863,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_615.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_615.obj_num = 0;
- cdat->dobj_615.obj_hash = 555017309;
+ cdat->dobj_615.obj_hash = 939325716;
cdat->dobj_615.obj_len = 2;
@@ -11922,7 +11937,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_621__PAIR_SET_HEAD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_621__PAIR_SET_HEAD.obj_hash = 237899270;
+ cdat->dobj_621__PAIR_SET_HEAD.obj_hash = 531290323;
cdat->dobj_621__PAIR_SET_HEAD.obj_len = 5;
/*inimult dtup_622__PAIR_SET_HEAD */
@@ -11979,7 +11994,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_626.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_626.obj_num = 0;
- cdat->dobj_626.obj_hash = 886126926;
+ cdat->dobj_626.obj_hash = 349272559;
cdat->dobj_626.obj_len = 2;
@@ -12026,7 +12041,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_629.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_629.obj_num = 1;
- cdat->dobj_629.obj_hash = 134568276;
+ cdat->dobj_629.obj_hash = 327978283;
cdat->dobj_629.obj_len = 2;
@@ -12108,7 +12123,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_636__PAIR_LISTLENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_636__PAIR_LISTLENGTH.obj_hash = 509972198;
+ cdat->dobj_636__PAIR_LISTLENGTH.obj_hash = 1027981749;
cdat->dobj_636__PAIR_LISTLENGTH.obj_len = 5;
/*inimult dtup_637__PAIR_LISTLENGTH */
@@ -12141,7 +12156,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_639.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_639.obj_num = 0;
- cdat->dobj_639.obj_hash = 133522999;
+ cdat->dobj_639.obj_hash = 840674511;
cdat->dobj_639.obj_len = 2;
@@ -12213,7 +12228,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_645__MAKE_PAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_645__MAKE_PAIR.obj_hash = 402509036;
+ cdat->dobj_645__MAKE_PAIR.obj_hash = 489170845;
cdat->dobj_645__MAKE_PAIR.obj_len = 5;
/*inimult dtup_646__MAKE_PAIR */
@@ -12244,7 +12259,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_648.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_648.obj_num = 0;
- cdat->dobj_648.obj_hash = 437795745;
+ cdat->dobj_648.obj_hash = 293985015;
cdat->dobj_648.obj_len = 2;
/*^iniobj */
@@ -12265,7 +12280,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_649.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_649.obj_num = 1;
- cdat->dobj_649.obj_hash = 799788405;
+ cdat->dobj_649.obj_hash = 389986746;
cdat->dobj_649.obj_len = 2;
@@ -12312,7 +12327,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_652.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_652.obj_num = 2;
- cdat->dobj_652.obj_hash = 938156140;
+ cdat->dobj_652.obj_hash = 125246932;
cdat->dobj_652.obj_len = 2;
@@ -12397,7 +12412,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_660__IS_MIXINT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_660__IS_MIXINT.obj_hash = 36547187;
+ cdat->dobj_660__IS_MIXINT.obj_hash = 409690134;
cdat->dobj_660__IS_MIXINT.obj_len = 5;
/*inimult dtup_661__IS_MIXINT */
@@ -12454,7 +12469,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_665.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_665.obj_num = 0;
- cdat->dobj_665.obj_hash = 741691079;
+ cdat->dobj_665.obj_hash = 1031579679;
cdat->dobj_665.obj_len = 2;
@@ -12524,7 +12539,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_671__MIXINT_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_671__MIXINT_VAL.obj_hash = 915722086;
+ cdat->dobj_671__MIXINT_VAL.obj_hash = 458710871;
cdat->dobj_671__MIXINT_VAL.obj_len = 5;
/*inimult dtup_672__MIXINT_VAL */
@@ -12555,7 +12570,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_674.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_674.obj_num = 0;
- cdat->dobj_674.obj_hash = 814462924;
+ cdat->dobj_674.obj_hash = 363339130;
cdat->dobj_674.obj_len = 2;
@@ -12625,7 +12640,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_680__MAKE_MIXINT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_680__MAKE_MIXINT.obj_hash = 187755855;
+ cdat->dobj_680__MAKE_MIXINT.obj_hash = 961352574;
cdat->dobj_680__MAKE_MIXINT.obj_len = 5;
/*inimult dtup_681__MAKE_MIXINT */
@@ -12682,7 +12697,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_685.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_685.obj_num = 0;
- cdat->dobj_685.obj_hash = 743715499;
+ cdat->dobj_685.obj_hash = 903266762;
cdat->dobj_685.obj_len = 2;
/*^iniobj */
@@ -12703,7 +12718,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_686.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_686.obj_num = 1;
- cdat->dobj_686.obj_hash = 1006074646;
+ cdat->dobj_686.obj_hash = 490641001;
cdat->dobj_686.obj_len = 2;
@@ -12750,7 +12765,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_689.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_689.obj_num = 2;
- cdat->dobj_689.obj_hash = 841534350;
+ cdat->dobj_689.obj_hash = 872183177;
cdat->dobj_689.obj_len = 2;
@@ -12835,7 +12850,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_697__IS_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_697__IS_MIXLOC.obj_hash = 881948376;
+ cdat->dobj_697__IS_MIXLOC.obj_hash = 505451282;
cdat->dobj_697__IS_MIXLOC.obj_len = 5;
/*inimult dtup_698__IS_MIXLOC */
@@ -12866,7 +12881,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_700.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_700.obj_num = 0;
- cdat->dobj_700.obj_hash = 91791658;
+ cdat->dobj_700.obj_hash = 901419870;
cdat->dobj_700.obj_len = 2;
@@ -12936,7 +12951,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_706__MIXLOC_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_706__MIXLOC_VAL.obj_hash = 166604036;
+ cdat->dobj_706__MIXLOC_VAL.obj_hash = 681108983;
cdat->dobj_706__MIXLOC_VAL.obj_len = 5;
/*inimult dtup_707__MIXLOC_VAL */
@@ -12967,7 +12982,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_709.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_709.obj_num = 0;
- cdat->dobj_709.obj_hash = 129617545;
+ cdat->dobj_709.obj_hash = 89022590;
cdat->dobj_709.obj_len = 2;
@@ -13040,7 +13055,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_715__MIXLOC_LOCATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_715__MIXLOC_LOCATION.obj_hash = 923350370;
+ cdat->dobj_715__MIXLOC_LOCATION.obj_hash = 245321947;
cdat->dobj_715__MIXLOC_LOCATION.obj_len = 5;
/*inimult dtup_716__MIXLOC_LOCATION */
@@ -13073,7 +13088,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_718.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_718.obj_num = 0;
- cdat->dobj_718.obj_hash = 566035479;
+ cdat->dobj_718.obj_hash = 919776745;
cdat->dobj_718.obj_len = 2;
@@ -13148,7 +13163,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_724__MIXLOC_LOCLINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_724__MIXLOC_LOCLINE.obj_hash = 1002734457;
+ cdat->dobj_724__MIXLOC_LOCLINE.obj_hash = 142131175;
cdat->dobj_724__MIXLOC_LOCLINE.obj_len = 5;
/*inimult dtup_725__MIXLOC_LOCLINE */
@@ -13181,7 +13196,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_727.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_727.obj_num = 0;
- cdat->dobj_727.obj_hash = 981556736;
+ cdat->dobj_727.obj_hash = 840807234;
cdat->dobj_727.obj_len = 2;
@@ -13257,7 +13272,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_733__MIXLOC_LOCFILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_733__MIXLOC_LOCFILE.obj_hash = 873610314;
+ cdat->dobj_733__MIXLOC_LOCFILE.obj_hash = 638655245;
cdat->dobj_733__MIXLOC_LOCFILE.obj_len = 5;
/*inimult dtup_734__MIXLOC_LOCFILE */
@@ -13290,7 +13305,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_736.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_736.obj_num = 0;
- cdat->dobj_736.obj_hash = 619354870;
+ cdat->dobj_736.obj_hash = 368852578;
cdat->dobj_736.obj_len = 2;
@@ -13366,7 +13381,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_742__MIXLOC_LOCBASEFILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_742__MIXLOC_LOCBASEFILE.obj_hash = 776964476;
+ cdat->dobj_742__MIXLOC_LOCBASEFILE.obj_hash = 547641254;
cdat->dobj_742__MIXLOC_LOCBASEFILE.obj_len = 5;
/*inimult dtup_743__MIXLOC_LOCBASEFILE */
@@ -13399,7 +13414,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_745.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_745.obj_num = 0;
- cdat->dobj_745.obj_hash = 408763480;
+ cdat->dobj_745.obj_hash = 817993307;
cdat->dobj_745.obj_len = 2;
@@ -13476,7 +13491,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_751__MAKE_STRING_MIXLOC_FILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_751__MAKE_STRING_MIXLOC_FILE.obj_hash = 120997026;
+ cdat->dobj_751__MAKE_STRING_MIXLOC_FILE.obj_hash = 34570333;
cdat->dobj_751__MAKE_STRING_MIXLOC_FILE.obj_len = 5;
/*inimult dtup_752__MAKE_STRING_MIXLOC_FILE */
@@ -13509,7 +13524,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_754.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_754.obj_num = 0;
- cdat->dobj_754.obj_hash = 394031214;
+ cdat->dobj_754.obj_hash = 449383227;
cdat->dobj_754.obj_len = 2;
/*^iniobj */
@@ -13530,7 +13545,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_755.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_755.obj_num = 1;
- cdat->dobj_755.obj_hash = 467251834;
+ cdat->dobj_755.obj_hash = 694361747;
cdat->dobj_755.obj_len = 2;
@@ -13611,7 +13626,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_762__MAKE_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_762__MAKE_MIXLOC.obj_hash = 782534783;
+ cdat->dobj_762__MAKE_MIXLOC.obj_hash = 837423046;
cdat->dobj_762__MAKE_MIXLOC.obj_len = 5;
/*inimult dtup_763__MAKE_MIXLOC */
@@ -13642,7 +13657,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_765.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_765.obj_num = 0;
- cdat->dobj_765.obj_hash = 784056049;
+ cdat->dobj_765.obj_hash = 808694090;
cdat->dobj_765.obj_len = 2;
/*^iniobj */
@@ -13663,7 +13678,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_766.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_766.obj_num = 1;
- cdat->dobj_766.obj_hash = 875821343;
+ cdat->dobj_766.obj_hash = 988108169;
cdat->dobj_766.obj_len = 2;
/*^iniobj */
@@ -13684,7 +13699,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_767.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_767.obj_num = 2;
- cdat->dobj_767.obj_hash = 706534478;
+ cdat->dobj_767.obj_hash = 848866868;
cdat->dobj_767.obj_len = 2;
@@ -13731,7 +13746,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_770.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_770.obj_num = 3;
- cdat->dobj_770.obj_hash = 362564166;
+ cdat->dobj_770.obj_hash = 422698311;
cdat->dobj_770.obj_len = 2;
@@ -13826,7 +13841,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_779__IS_MIXBIGINT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_779__IS_MIXBIGINT.obj_hash = 81787782;
+ cdat->dobj_779__IS_MIXBIGINT.obj_hash = 388706185;
cdat->dobj_779__IS_MIXBIGINT.obj_len = 5;
/*inimult dtup_780__IS_MIXBIGINT */
@@ -13883,7 +13898,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_784.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_784.obj_num = 0;
- cdat->dobj_784.obj_hash = 882044811;
+ cdat->dobj_784.obj_hash = 78818137;
cdat->dobj_784.obj_len = 2;
@@ -13958,7 +13973,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_790__MIXBIGINT_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_790__MIXBIGINT_VAL.obj_hash = 219705597;
+ cdat->dobj_790__MIXBIGINT_VAL.obj_hash = 88819202;
cdat->dobj_790__MIXBIGINT_VAL.obj_len = 5;
/*inimult dtup_791__MIXBIGINT_VAL */
@@ -13989,7 +14004,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_793.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_793.obj_num = 0;
- cdat->dobj_793.obj_hash = 662497199;
+ cdat->dobj_793.obj_hash = 642244541;
cdat->dobj_793.obj_len = 2;
@@ -14064,7 +14079,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_799__PPSTRBUF_MIXBIGINT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_799__PPSTRBUF_MIXBIGINT.obj_hash = 521724128;
+ cdat->dobj_799__PPSTRBUF_MIXBIGINT.obj_hash = 541996919;
cdat->dobj_799__PPSTRBUF_MIXBIGINT.obj_len = 5;
/*inimult dtup_800__PPSTRBUF_MIXBIGINT */
@@ -14097,7 +14112,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_802.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_802.obj_num = 0;
- cdat->dobj_802.obj_hash = 961228910;
+ cdat->dobj_802.obj_hash = 1037420541;
cdat->dobj_802.obj_len = 2;
@@ -14144,7 +14159,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_805.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_805.obj_num = 1;
- cdat->dobj_805.obj_hash = 582051622;
+ cdat->dobj_805.obj_hash = 748776757;
cdat->dobj_805.obj_len = 2;
/*^iniobj */
@@ -14165,7 +14180,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_806.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_806.obj_num = 2;
- cdat->dobj_806.obj_hash = 386321519;
+ cdat->dobj_806.obj_hash = 15634094;
cdat->dobj_806.obj_len = 2;
@@ -14251,7 +14266,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_814__READ_FILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_814__READ_FILE.obj_hash = 598747368;
+ cdat->dobj_814__READ_FILE.obj_hash = 111925578;
cdat->dobj_814__READ_FILE.obj_len = 5;
/*inimult dtup_815__READ_FILE */
@@ -14308,7 +14323,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_819.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_819.obj_num = 0;
- cdat->dobj_819.obj_hash = 923126358;
+ cdat->dobj_819.obj_hash = 775952572;
cdat->dobj_819.obj_len = 2;
@@ -14377,7 +14392,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_825__READ_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_825__READ_STRV.obj_hash = 95432530;
+ cdat->dobj_825__READ_STRV.obj_hash = 301998775;
cdat->dobj_825__READ_STRV.obj_len = 5;
/*inimult dtup_826__READ_STRV */
@@ -14434,7 +14449,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_830.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_830.obj_num = 0;
- cdat->dobj_830.obj_hash = 577849112;
+ cdat->dobj_830.obj_hash = 178471189;
cdat->dobj_830.obj_len = 2;
@@ -14503,7 +14518,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_836__ERROR_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_836__ERROR_STRV.obj_hash = 533660491;
+ cdat->dobj_836__ERROR_STRV.obj_hash = 150522913;
cdat->dobj_836__ERROR_STRV.obj_len = 5;
/*inimult dtup_837__ERROR_STRV */
@@ -14534,7 +14549,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_839.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_839.obj_num = 0;
- cdat->dobj_839.obj_hash = 183819560;
+ cdat->dobj_839.obj_hash = 860482712;
cdat->dobj_839.obj_len = 2;
@@ -14581,7 +14596,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_842.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_842.obj_num = 1;
- cdat->dobj_842.obj_hash = 338828511;
+ cdat->dobj_842.obj_hash = 86094257;
cdat->dobj_842.obj_len = 2;
/*^iniobj */
@@ -14602,7 +14617,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_843.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_843.obj_num = 2;
- cdat->dobj_843.obj_hash = 119686881;
+ cdat->dobj_843.obj_hash = 690612641;
cdat->dobj_843.obj_len = 2;
@@ -14687,7 +14702,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_851__ERROR_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_851__ERROR_PLAIN.obj_hash = 704502857;
+ cdat->dobj_851__ERROR_PLAIN.obj_hash = 439491317;
cdat->dobj_851__ERROR_PLAIN.obj_len = 5;
/*inimult dtup_852__ERROR_PLAIN */
@@ -14718,7 +14733,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_854.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_854.obj_num = 0;
- cdat->dobj_854.obj_hash = 384050362;
+ cdat->dobj_854.obj_hash = 119917699;
cdat->dobj_854.obj_len = 2;
/*^iniobj */
@@ -14739,7 +14754,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_855.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_855.obj_num = 1;
- cdat->dobj_855.obj_hash = 190419354;
+ cdat->dobj_855.obj_hash = 143829156;
cdat->dobj_855.obj_len = 2;
@@ -14820,7 +14835,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_862__WARNING_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_862__WARNING_STRV.obj_hash = 701112730;
+ cdat->dobj_862__WARNING_STRV.obj_hash = 1040263063;
cdat->dobj_862__WARNING_STRV.obj_len = 5;
/*inimult dtup_863__WARNING_STRV */
@@ -14851,7 +14866,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_865.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_865.obj_num = 0;
- cdat->dobj_865.obj_hash = 202937780;
+ cdat->dobj_865.obj_hash = 22771304;
cdat->dobj_865.obj_len = 2;
/*^iniobj */
@@ -14872,7 +14887,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_866.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_866.obj_num = 1;
- cdat->dobj_866.obj_hash = 722638011;
+ cdat->dobj_866.obj_hash = 201271613;
cdat->dobj_866.obj_len = 2;
/*^iniobj */
@@ -14893,7 +14908,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_867.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_867.obj_num = 2;
- cdat->dobj_867.obj_hash = 444203393;
+ cdat->dobj_867.obj_hash = 977908215;
cdat->dobj_867.obj_len = 2;
@@ -14982,7 +14997,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_875__WARNING_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_875__WARNING_PLAIN.obj_hash = 786190710;
+ cdat->dobj_875__WARNING_PLAIN.obj_hash = 788875106;
cdat->dobj_875__WARNING_PLAIN.obj_len = 5;
/*inimult dtup_876__WARNING_PLAIN */
@@ -15013,7 +15028,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_878.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_878.obj_num = 0;
- cdat->dobj_878.obj_hash = 863693806;
+ cdat->dobj_878.obj_hash = 555707160;
cdat->dobj_878.obj_len = 2;
/*^iniobj */
@@ -15034,7 +15049,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_879.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_879.obj_num = 1;
- cdat->dobj_879.obj_hash = 908430808;
+ cdat->dobj_879.obj_hash = 345098903;
cdat->dobj_879.obj_len = 2;
@@ -15118,7 +15133,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_886__WARNINGMSG_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_886__WARNINGMSG_PLAIN.obj_hash = 980032038;
+ cdat->dobj_886__WARNINGMSG_PLAIN.obj_hash = 999261840;
cdat->dobj_886__WARNINGMSG_PLAIN.obj_len = 5;
/*inimult dtup_887__WARNINGMSG_PLAIN */
@@ -15151,7 +15166,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_889.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_889.obj_num = 0;
- cdat->dobj_889.obj_hash = 10159089;
+ cdat->dobj_889.obj_hash = 925077070;
cdat->dobj_889.obj_len = 2;
@@ -15227,7 +15242,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_895__ERRORMSG_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_895__ERRORMSG_PLAIN.obj_hash = 169369898;
+ cdat->dobj_895__ERRORMSG_PLAIN.obj_hash = 751356166;
cdat->dobj_895__ERRORMSG_PLAIN.obj_len = 5;
/*inimult dtup_896__ERRORMSG_PLAIN */
@@ -15260,7 +15275,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_898.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_898.obj_num = 0;
- cdat->dobj_898.obj_hash = 123175905;
+ cdat->dobj_898.obj_hash = 100706129;
cdat->dobj_898.obj_len = 2;
@@ -15336,7 +15351,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_904__WARNINGMSG_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_904__WARNINGMSG_STRV.obj_hash = 318386971;
+ cdat->dobj_904__WARNINGMSG_STRV.obj_hash = 311855945;
cdat->dobj_904__WARNINGMSG_STRV.obj_len = 5;
/*inimult dtup_905__WARNINGMSG_STRV */
@@ -15369,7 +15384,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_907.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_907.obj_num = 0;
- cdat->dobj_907.obj_hash = 499321307;
+ cdat->dobj_907.obj_hash = 976268126;
cdat->dobj_907.obj_len = 2;
/*^iniobj */
@@ -15390,7 +15405,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_908.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_908.obj_num = 1;
- cdat->dobj_908.obj_hash = 776421;
+ cdat->dobj_908.obj_hash = 245291434;
cdat->dobj_908.obj_len = 2;
@@ -15472,7 +15487,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_915__ERRORMSG_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_915__ERRORMSG_STRV.obj_hash = 382358542;
+ cdat->dobj_915__ERRORMSG_STRV.obj_hash = 585085440;
cdat->dobj_915__ERRORMSG_STRV.obj_len = 5;
/*inimult dtup_916__ERRORMSG_STRV */
@@ -15503,7 +15518,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_918.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_918.obj_num = 0;
- cdat->dobj_918.obj_hash = 931441608;
+ cdat->dobj_918.obj_hash = 895112407;
cdat->dobj_918.obj_len = 2;
/*^iniobj */
@@ -15524,7 +15539,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_919.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_919.obj_num = 1;
- cdat->dobj_919.obj_hash = 72090861;
+ cdat->dobj_919.obj_hash = 235446908;
cdat->dobj_919.obj_len = 2;
@@ -15604,7 +15619,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_926__INFORM_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_926__INFORM_STRV.obj_hash = 203743055;
+ cdat->dobj_926__INFORM_STRV.obj_hash = 61148572;
cdat->dobj_926__INFORM_STRV.obj_len = 5;
/*inimult dtup_927__INFORM_STRV */
@@ -15635,7 +15650,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_929.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_929.obj_num = 0;
- cdat->dobj_929.obj_hash = 586991451;
+ cdat->dobj_929.obj_hash = 505148623;
cdat->dobj_929.obj_len = 2;
/*^iniobj */
@@ -15656,7 +15671,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_930.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_930.obj_num = 1;
- cdat->dobj_930.obj_hash = 849645095;
+ cdat->dobj_930.obj_hash = 28726648;
cdat->dobj_930.obj_len = 2;
/*^iniobj */
@@ -15677,7 +15692,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_931.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_931.obj_num = 2;
- cdat->dobj_931.obj_hash = 280481910;
+ cdat->dobj_931.obj_hash = 605030797;
cdat->dobj_931.obj_len = 2;
@@ -15764,7 +15779,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_939__INFORM_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_939__INFORM_PLAIN.obj_hash = 846094832;
+ cdat->dobj_939__INFORM_PLAIN.obj_hash = 964026492;
cdat->dobj_939__INFORM_PLAIN.obj_len = 5;
/*inimult dtup_940__INFORM_PLAIN */
@@ -15795,7 +15810,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_942.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_942.obj_num = 0;
- cdat->dobj_942.obj_hash = 1059136776;
+ cdat->dobj_942.obj_hash = 384217799;
cdat->dobj_942.obj_len = 2;
/*^iniobj */
@@ -15816,7 +15831,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_943.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_943.obj_num = 1;
- cdat->dobj_943.obj_hash = 792011284;
+ cdat->dobj_943.obj_hash = 1039128119;
cdat->dobj_943.obj_len = 2;
@@ -15900,7 +15915,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_950__INFORMSG_PLAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_950__INFORMSG_PLAIN.obj_hash = 801573522;
+ cdat->dobj_950__INFORMSG_PLAIN.obj_hash = 240989447;
cdat->dobj_950__INFORMSG_PLAIN.obj_len = 5;
/*inimult dtup_951__INFORMSG_PLAIN */
@@ -15933,7 +15948,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_953.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_953.obj_num = 0;
- cdat->dobj_953.obj_hash = 1052212030;
+ cdat->dobj_953.obj_hash = 308383166;
cdat->dobj_953.obj_len = 2;
@@ -16008,7 +16023,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_959__INFORMSG_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_959__INFORMSG_STRV.obj_hash = 693379795;
+ cdat->dobj_959__INFORMSG_STRV.obj_hash = 868272479;
cdat->dobj_959__INFORMSG_STRV.obj_len = 5;
/*inimult dtup_960__INFORMSG_STRV */
@@ -16039,7 +16054,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_962.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_962.obj_num = 0;
- cdat->dobj_962.obj_hash = 435717692;
+ cdat->dobj_962.obj_hash = 379376497;
cdat->dobj_962.obj_len = 2;
/*^iniobj */
@@ -16060,7 +16075,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_963.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_963.obj_num = 1;
- cdat->dobj_963.obj_hash = 248691183;
+ cdat->dobj_963.obj_hash = 848405642;
cdat->dobj_963.obj_len = 2;
@@ -16114,7 +16129,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_968__FOREACH_LONG_UPTO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_968__FOREACH_LONG_UPTO.obj_hash = 957447213;
+ cdat->dobj_968__FOREACH_LONG_UPTO.obj_hash = 756592260;
cdat->dobj_968__FOREACH_LONG_UPTO.obj_len = 7;
@@ -16171,7 +16186,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_972.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_972.obj_num = 0;
- cdat->dobj_972.obj_hash = 420092662;
+ cdat->dobj_972.obj_hash = 607315156;
cdat->dobj_972.obj_len = 2;
@@ -16218,7 +16233,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_975.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_975.obj_num = 1;
- cdat->dobj_975.obj_hash = 672663493;
+ cdat->dobj_975.obj_hash = 320656390;
cdat->dobj_975.obj_len = 2;
/*inimult dtup_976__FOREACH_LONG_UPTO */
@@ -16271,7 +16286,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_979.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_979.obj_num = 0;
- cdat->dobj_979.obj_hash = 1015665578;
+ cdat->dobj_979.obj_hash = 840944316;
cdat->dobj_979.obj_len = 2;
/*inimult dtup_980__FOREACH_LONG_UPTO */
@@ -16417,7 +16432,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_998__SOME_INTEGER_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_998__SOME_INTEGER_MULTIPLE.obj_hash = 892453820;
+ cdat->dobj_998__SOME_INTEGER_MULTIPLE.obj_hash = 281902254;
cdat->dobj_998__SOME_INTEGER_MULTIPLE.obj_len = 9;
@@ -16474,7 +16489,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1002.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1002.obj_num = 0;
- cdat->dobj_1002.obj_hash = 644628399;
+ cdat->dobj_1002.obj_hash = 652068581;
cdat->dobj_1002.obj_len = 2;
/*inimult dtup_1003__SOME_INTEGER_MULTIPLE */
@@ -16500,7 +16515,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1004.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1004.obj_hash = 652068581;
+ cdat->dobj_1004.obj_hash = 93790262;
cdat->dobj_1004.obj_len = 2;
@@ -16547,7 +16562,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1007.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1007.obj_num = 0;
- cdat->dobj_1007.obj_hash = 82276009;
+ cdat->dobj_1007.obj_hash = 974611250;
cdat->dobj_1007.obj_len = 2;
/*inimult dtup_1008__SOME_INTEGER_MULTIPLE */
@@ -16681,7 +16696,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1023__SOME_INTEGER_DIFFERENT_FROM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1023__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 281902254;
+ cdat->dobj_1023__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 732049487;
cdat->dobj_1023__SOME_INTEGER_DIFFERENT_FROM.obj_len = 9;
@@ -16712,7 +16727,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1025.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1025.obj_num = 0;
- cdat->dobj_1025.obj_hash = 350057489;
+ cdat->dobj_1025.obj_hash = 51115062;
cdat->dobj_1025.obj_len = 2;
/*inimult dtup_1026__SOME_INTEGER_DIFFERENT_FROM */
@@ -16738,7 +16753,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1027.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1027.obj_hash = 111691988;
+ cdat->dobj_1027.obj_hash = 823124209;
cdat->dobj_1027.obj_len = 2;
/*inimult dtup_1028__SOME_INTEGER_DIFFERENT_FROM */
@@ -16824,7 +16839,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1036__SOME_INTEGER_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1036__SOME_INTEGER_EQUAL_TO.obj_hash = 732049487;
+ cdat->dobj_1036__SOME_INTEGER_EQUAL_TO.obj_hash = 346387706;
cdat->dobj_1036__SOME_INTEGER_EQUAL_TO.obj_len = 9;
@@ -16855,7 +16870,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1038.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1038.obj_num = 0;
- cdat->dobj_1038.obj_hash = 1020662780;
+ cdat->dobj_1038.obj_hash = 915136132;
cdat->dobj_1038.obj_len = 2;
/*inimult dtup_1039__SOME_INTEGER_EQUAL_TO */
@@ -16881,7 +16896,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1040.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1040.obj_hash = 147928544;
+ cdat->dobj_1040.obj_hash = 461106138;
cdat->dobj_1040.obj_len = 2;
/*inimult dtup_1041__SOME_INTEGER_EQUAL_TO */
@@ -16967,7 +16982,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1049__SOME_INTEGER_GREATER_OR_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1049__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 346387706;
+ cdat->dobj_1049__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 611888649;
cdat->dobj_1049__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_len = 9;
@@ -16998,7 +17013,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1051.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1051.obj_num = 0;
- cdat->dobj_1051.obj_hash = 671961305;
+ cdat->dobj_1051.obj_hash = 659168720;
cdat->dobj_1051.obj_len = 2;
/*inimult dtup_1052__SOME_INTEGER_GREATER_OR_EQUAL_TO */
@@ -17024,7 +17039,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1053.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1053.obj_hash = 84653002;
+ cdat->dobj_1053.obj_hash = 556433142;
cdat->dobj_1053.obj_len = 2;
/*inimult dtup_1054__SOME_INTEGER_GREATER_OR_EQUAL_TO */
@@ -17113,7 +17128,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1062__SOME_INTEGER_GREATER_THAN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1062__SOME_INTEGER_GREATER_THAN.obj_hash = 611888649;
+ cdat->dobj_1062__SOME_INTEGER_GREATER_THAN.obj_hash = 364666416;
cdat->dobj_1062__SOME_INTEGER_GREATER_THAN.obj_len = 9;
@@ -17144,7 +17159,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1064.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1064.obj_num = 0;
- cdat->dobj_1064.obj_hash = 644527014;
+ cdat->dobj_1064.obj_hash = 238327322;
cdat->dobj_1064.obj_len = 2;
/*inimult dtup_1065__SOME_INTEGER_GREATER_THAN */
@@ -17170,7 +17185,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1066.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1066.obj_hash = 859846971;
+ cdat->dobj_1066.obj_hash = 486752128;
cdat->dobj_1066.obj_len = 2;
/*inimult dtup_1067__SOME_INTEGER_GREATER_THAN */
@@ -17259,7 +17274,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1075__SOME_INTEGER_LOWER_OR_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1075__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 364666416;
+ cdat->dobj_1075__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 107558020;
cdat->dobj_1075__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_len = 9;
@@ -17290,7 +17305,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1077.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1077.obj_num = 0;
- cdat->dobj_1077.obj_hash = 419489175;
+ cdat->dobj_1077.obj_hash = 51489104;
cdat->dobj_1077.obj_len = 2;
/*inimult dtup_1078__SOME_INTEGER_LOWER_OR_EQUAL_TO */
@@ -17316,7 +17331,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1079.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1079.obj_hash = 110578419;
+ cdat->dobj_1079.obj_hash = 814314844;
cdat->dobj_1079.obj_len = 2;
/*inimult dtup_1080__SOME_INTEGER_LOWER_OR_EQUAL_TO */
@@ -17405,7 +17420,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1088__SOME_INTEGER_LOWER_THAN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1088__SOME_INTEGER_LOWER_THAN.obj_hash = 107558020;
+ cdat->dobj_1088__SOME_INTEGER_LOWER_THAN.obj_hash = 1006650768;
cdat->dobj_1088__SOME_INTEGER_LOWER_THAN.obj_len = 9;
@@ -17436,7 +17451,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1090.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1090.obj_num = 0;
- cdat->dobj_1090.obj_hash = 912189252;
+ cdat->dobj_1090.obj_hash = 303418964;
cdat->dobj_1090.obj_len = 2;
/*inimult dtup_1091__SOME_INTEGER_LOWER_THAN */
@@ -17462,7 +17477,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1092.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1092.obj_hash = 274248432;
+ cdat->dobj_1092.obj_hash = 182202170;
cdat->dobj_1092.obj_len = 2;
/*inimult dtup_1093__SOME_INTEGER_LOWER_THAN */
@@ -17548,7 +17563,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1101__SOME_STRING_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1101__SOME_STRING_VALUE.obj_hash = 1006650768;
+ cdat->dobj_1101__SOME_STRING_VALUE.obj_hash = 681578649;
cdat->dobj_1101__SOME_STRING_VALUE.obj_len = 9;
@@ -17584,7 +17599,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1104.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1104.obj_hash = 1070815957;
+ cdat->dobj_1104.obj_hash = 18483643;
cdat->dobj_1104.obj_len = 2;
@@ -17631,7 +17646,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1107.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1107.obj_num = 0;
- cdat->dobj_1107.obj_hash = 913214638;
+ cdat->dobj_1107.obj_hash = 963653811;
cdat->dobj_1107.obj_len = 2;
/*inimult dtup_1108__SOME_STRING_VALUE */
@@ -17784,7 +17799,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1123__OUTNEWLINE_ERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1123__OUTNEWLINE_ERR.obj_hash = 578905167;
+ cdat->dobj_1123__OUTNEWLINE_ERR.obj_hash = 820088876;
cdat->dobj_1123__OUTNEWLINE_ERR.obj_len = 5;
/*inimult dtup_1124__OUTNEWLINE_ERR */
@@ -17862,7 +17877,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1130__OUTSTR_ERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1130__OUTSTR_ERR.obj_hash = 306598138;
+ cdat->dobj_1130__OUTSTR_ERR.obj_hash = 236693091;
cdat->dobj_1130__OUTSTR_ERR.obj_len = 5;
/*inimult dtup_1131__OUTSTR_ERR */
@@ -17893,7 +17908,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1133.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1133.obj_num = 0;
- cdat->dobj_1133.obj_hash = 229119971;
+ cdat->dobj_1133.obj_hash = 1073061453;
cdat->dobj_1133.obj_len = 2;
@@ -17966,7 +17981,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1139__MESSAGE_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1139__MESSAGE_DBG.obj_hash = 749847668;
+ cdat->dobj_1139__MESSAGE_DBG.obj_hash = 103914219;
cdat->dobj_1139__MESSAGE_DBG.obj_len = 5;
/*inimult dtup_1140__MESSAGE_DBG */
@@ -17999,7 +18014,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1142.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1142.obj_num = 0;
- cdat->dobj_1142.obj_hash = 132685678;
+ cdat->dobj_1142.obj_hash = 683653369;
cdat->dobj_1142.obj_len = 2;
@@ -18075,7 +18090,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1148__MESSAGENUM_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1148__MESSAGENUM_DBG.obj_hash = 642588646;
+ cdat->dobj_1148__MESSAGENUM_DBG.obj_hash = 898967499;
cdat->dobj_1148__MESSAGENUM_DBG.obj_len = 5;
/*inimult dtup_1149__MESSAGENUM_DBG */
@@ -18108,7 +18123,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1151.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1151.obj_num = 0;
- cdat->dobj_1151.obj_hash = 403011986;
+ cdat->dobj_1151.obj_hash = 321717219;
cdat->dobj_1151.obj_len = 2;
/*^iniobj */
@@ -18129,7 +18144,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1152.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1152.obj_num = 1;
- cdat->dobj_1152.obj_hash = 483810972;
+ cdat->dobj_1152.obj_hash = 430007770;
cdat->dobj_1152.obj_len = 2;
@@ -18209,7 +18224,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1159__MESSAGEVAL_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1159__MESSAGEVAL_DBG.obj_hash = 358397837;
+ cdat->dobj_1159__MESSAGEVAL_DBG.obj_hash = 896059834;
cdat->dobj_1159__MESSAGEVAL_DBG.obj_len = 5;
/*inimult dtup_1160__MESSAGEVAL_DBG */
@@ -18242,7 +18257,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1162.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1162.obj_num = 0;
- cdat->dobj_1162.obj_hash = 847023918;
+ cdat->dobj_1162.obj_hash = 988310303;
cdat->dobj_1162.obj_len = 2;
/*^iniobj */
@@ -18263,7 +18278,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1163.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1163.obj_num = 1;
- cdat->dobj_1163.obj_hash = 989424806;
+ cdat->dobj_1163.obj_hash = 899879137;
cdat->dobj_1163.obj_len = 2;
@@ -18346,7 +18361,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1170__LONGBACKTRACE_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1170__LONGBACKTRACE_DBG.obj_hash = 384499419;
+ cdat->dobj_1170__LONGBACKTRACE_DBG.obj_hash = 684000235;
cdat->dobj_1170__LONGBACKTRACE_DBG.obj_len = 5;
/*inimult dtup_1171__LONGBACKTRACE_DBG */
@@ -18379,7 +18394,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1173.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1173.obj_num = 0;
- cdat->dobj_1173.obj_hash = 94784617;
+ cdat->dobj_1173.obj_hash = 650550465;
cdat->dobj_1173.obj_len = 2;
@@ -18426,7 +18441,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1176.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1176.obj_num = 1;
- cdat->dobj_1176.obj_hash = 930712722;
+ cdat->dobj_1176.obj_hash = 371873233;
cdat->dobj_1176.obj_len = 2;
@@ -18505,7 +18520,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1182__CHECKVAL_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1182__CHECKVAL_DBG.obj_hash = 443401314;
+ cdat->dobj_1182__CHECKVAL_DBG.obj_hash = 143092574;
cdat->dobj_1182__CHECKVAL_DBG.obj_len = 5;
/*inimult dtup_1183__CHECKVAL_DBG */
@@ -18538,7 +18553,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1185.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1185.obj_num = 0;
- cdat->dobj_1185.obj_hash = 677009926;
+ cdat->dobj_1185.obj_hash = 795616667;
cdat->dobj_1185.obj_len = 2;
/*^iniobj */
@@ -18559,7 +18574,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1186.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1186.obj_num = 1;
- cdat->dobj_1186.obj_hash = 111547049;
+ cdat->dobj_1186.obj_hash = 839497740;
cdat->dobj_1186.obj_len = 2;
@@ -18642,7 +18657,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1193__DEBUGCSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1193__DEBUGCSTRING.obj_hash = 179931564;
+ cdat->dobj_1193__DEBUGCSTRING.obj_hash = 305632878;
cdat->dobj_1193__DEBUGCSTRING.obj_len = 5;
/*inimult dtup_1194__DEBUGCSTRING */
@@ -18675,7 +18690,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1196.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1196.obj_num = 0;
- cdat->dobj_1196.obj_hash = 532886194;
+ cdat->dobj_1196.obj_hash = 930769119;
cdat->dobj_1196.obj_len = 2;
/*^iniobj */
@@ -18696,7 +18711,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1197.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1197.obj_num = 1;
- cdat->dobj_1197.obj_hash = 290924710;
+ cdat->dobj_1197.obj_hash = 634896259;
cdat->dobj_1197.obj_len = 2;
@@ -18775,7 +18790,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1204__DEBUGLONG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1204__DEBUGLONG.obj_hash = 34322599;
+ cdat->dobj_1204__DEBUGLONG.obj_hash = 1060750881;
cdat->dobj_1204__DEBUGLONG.obj_len = 5;
/*inimult dtup_1205__DEBUGLONG */
@@ -18806,7 +18821,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1207.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1207.obj_num = 0;
- cdat->dobj_1207.obj_hash = 717397063;
+ cdat->dobj_1207.obj_hash = 925239938;
cdat->dobj_1207.obj_len = 2;
/*^iniobj */
@@ -18827,7 +18842,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1208.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1208.obj_num = 1;
- cdat->dobj_1208.obj_hash = 502324042;
+ cdat->dobj_1208.obj_hash = 543805263;
cdat->dobj_1208.obj_len = 2;
@@ -18907,7 +18922,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1215__MAKE_STRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1215__MAKE_STRBUF.obj_hash = 1033470403;
+ cdat->dobj_1215__MAKE_STRBUF.obj_hash = 750252574;
cdat->dobj_1215__MAKE_STRBUF.obj_len = 5;
/*inimult dtup_1216__MAKE_STRBUF */
@@ -18940,7 +18955,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1218.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1218.obj_num = 0;
- cdat->dobj_1218.obj_hash = 226504451;
+ cdat->dobj_1218.obj_hash = 278314086;
cdat->dobj_1218.obj_len = 2;
@@ -19016,7 +19031,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1224__STRBUF_RESERVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1224__STRBUF_RESERVE.obj_hash = 805672081;
+ cdat->dobj_1224__STRBUF_RESERVE.obj_hash = 925136282;
cdat->dobj_1224__STRBUF_RESERVE.obj_len = 5;
/*inimult dtup_1225__STRBUF_RESERVE */
@@ -19049,7 +19064,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1227.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1227.obj_num = 0;
- cdat->dobj_1227.obj_hash = 103524164;
+ cdat->dobj_1227.obj_hash = 718528458;
cdat->dobj_1227.obj_len = 2;
/*^iniobj */
@@ -19070,7 +19085,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1228.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1228.obj_num = 1;
- cdat->dobj_1228.obj_hash = 500130597;
+ cdat->dobj_1228.obj_hash = 434889911;
cdat->dobj_1228.obj_len = 2;
@@ -19161,7 +19176,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1236__STRBUF_USEDLENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1236__STRBUF_USEDLENGTH.obj_hash = 752341393;
+ cdat->dobj_1236__STRBUF_USEDLENGTH.obj_hash = 329762670;
cdat->dobj_1236__STRBUF_USEDLENGTH.obj_len = 5;
/*inimult dtup_1237__STRBUF_USEDLENGTH */
@@ -19194,7 +19209,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1239.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1239.obj_num = 0;
- cdat->dobj_1239.obj_hash = 431372338;
+ cdat->dobj_1239.obj_hash = 957113648;
cdat->dobj_1239.obj_len = 2;
@@ -19270,7 +19285,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1245__OUTPUT_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1245__OUTPUT_LENGTH.obj_hash = 732960910;
+ cdat->dobj_1245__OUTPUT_LENGTH.obj_hash = 789466879;
cdat->dobj_1245__OUTPUT_LENGTH.obj_len = 5;
/*inimult dtup_1246__OUTPUT_LENGTH */
@@ -19329,7 +19344,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1250.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1250.obj_num = 0;
- cdat->dobj_1250.obj_hash = 495202858;
+ cdat->dobj_1250.obj_hash = 822233777;
cdat->dobj_1250.obj_len = 2;
@@ -19401,7 +19416,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1256__IS_STRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1256__IS_STRBUF.obj_hash = 351716671;
+ cdat->dobj_1256__IS_STRBUF.obj_hash = 166911258;
cdat->dobj_1256__IS_STRBUF.obj_len = 5;
/*inimult dtup_1257__IS_STRBUF */
@@ -19432,7 +19447,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1259.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1259.obj_num = 0;
- cdat->dobj_1259.obj_hash = 461456589;
+ cdat->dobj_1259.obj_hash = 443308728;
cdat->dobj_1259.obj_len = 2;
@@ -19506,7 +19521,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1265__MAKE_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1265__MAKE_STRING.obj_hash = 860040135;
+ cdat->dobj_1265__MAKE_STRING.obj_hash = 266030864;
cdat->dobj_1265__MAKE_STRING.obj_len = 5;
/*inimult dtup_1266__MAKE_STRING */
@@ -19539,7 +19554,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1268.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1268.obj_num = 0;
- cdat->dobj_1268.obj_hash = 9951251;
+ cdat->dobj_1268.obj_hash = 198701937;
cdat->dobj_1268.obj_len = 2;
/*^iniobj */
@@ -19560,7 +19575,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1269.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1269.obj_num = 1;
- cdat->dobj_1269.obj_hash = 616428590;
+ cdat->dobj_1269.obj_hash = 1058641920;
cdat->dobj_1269.obj_len = 2;
@@ -19644,7 +19659,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1276__IS_STRINGCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1276__IS_STRINGCONST.obj_hash = 957640222;
+ cdat->dobj_1276__IS_STRINGCONST.obj_hash = 334242323;
cdat->dobj_1276__IS_STRINGCONST.obj_len = 5;
/*inimult dtup_1277__IS_STRINGCONST */
@@ -19677,7 +19692,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1279.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1279.obj_num = 0;
- cdat->dobj_1279.obj_hash = 503972089;
+ cdat->dobj_1279.obj_hash = 274994712;
cdat->dobj_1279.obj_len = 2;
@@ -19724,7 +19739,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1282.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1282.obj_num = 1;
- cdat->dobj_1282.obj_hash = 162777494;
+ cdat->dobj_1282.obj_hash = 41525162;
cdat->dobj_1282.obj_len = 2;
@@ -19807,7 +19822,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1289__STRING_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1289__STRING_LENGTH.obj_hash = 698027798;
+ cdat->dobj_1289__STRING_LENGTH.obj_hash = 85158044;
cdat->dobj_1289__STRING_LENGTH.obj_len = 5;
/*inimult dtup_1290__STRING_LENGTH */
@@ -19840,7 +19855,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1292.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1292.obj_num = 0;
- cdat->dobj_1292.obj_hash = 488940125;
+ cdat->dobj_1292.obj_hash = 570212653;
cdat->dobj_1292.obj_len = 2;
@@ -19916,7 +19931,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1298__STRING_SUFFIXED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1298__STRING_SUFFIXED.obj_hash = 209330522;
+ cdat->dobj_1298__STRING_SUFFIXED.obj_hash = 905967641;
cdat->dobj_1298__STRING_SUFFIXED.obj_len = 5;
/*inimult dtup_1299__STRING_SUFFIXED */
@@ -19949,7 +19964,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1301.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1301.obj_num = 0;
- cdat->dobj_1301.obj_hash = 992628450;
+ cdat->dobj_1301.obj_hash = 439735083;
cdat->dobj_1301.obj_len = 2;
/*^iniobj */
@@ -19970,7 +19985,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1302.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1302.obj_num = 1;
- cdat->dobj_1302.obj_hash = 488422840;
+ cdat->dobj_1302.obj_hash = 169287939;
cdat->dobj_1302.obj_len = 2;
@@ -20053,7 +20068,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1309__STRING_PREFIXED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1309__STRING_PREFIXED.obj_hash = 49535820;
+ cdat->dobj_1309__STRING_PREFIXED.obj_hash = 379405686;
cdat->dobj_1309__STRING_PREFIXED.obj_len = 5;
/*inimult dtup_1310__STRING_PREFIXED */
@@ -20086,7 +20101,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1312.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1312.obj_num = 0;
- cdat->dobj_1312.obj_hash = 596102370;
+ cdat->dobj_1312.obj_hash = 724603583;
cdat->dobj_1312.obj_len = 2;
/*^iniobj */
@@ -20107,7 +20122,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1313.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1313.obj_num = 1;
- cdat->dobj_1313.obj_hash = 47928109;
+ cdat->dobj_1313.obj_hash = 191154281;
cdat->dobj_1313.obj_len = 2;
@@ -20190,7 +20205,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1320__STRING_STARTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1320__STRING_STARTS.obj_hash = 794109270;
+ cdat->dobj_1320__STRING_STARTS.obj_hash = 529087450;
cdat->dobj_1320__STRING_STARTS.obj_len = 5;
/*inimult dtup_1321__STRING_STARTS */
@@ -20249,7 +20264,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1325.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1325.obj_num = 0;
- cdat->dobj_1325.obj_hash = 141684157;
+ cdat->dobj_1325.obj_hash = 1058463771;
cdat->dobj_1325.obj_len = 2;
@@ -20296,7 +20311,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1328.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1328.obj_num = 1;
- cdat->dobj_1328.obj_hash = 878760674;
+ cdat->dobj_1328.obj_hash = 122390809;
cdat->dobj_1328.obj_len = 2;
@@ -20382,7 +20397,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1335__STRING_ENDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1335__STRING_ENDS.obj_hash = 734381075;
+ cdat->dobj_1335__STRING_ENDS.obj_hash = 641361074;
cdat->dobj_1335__STRING_ENDS.obj_len = 5;
/*inimult dtup_1336__STRING_ENDS */
@@ -20415,7 +20430,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1338.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1338.obj_num = 0;
- cdat->dobj_1338.obj_hash = 180197037;
+ cdat->dobj_1338.obj_hash = 575447722;
cdat->dobj_1338.obj_len = 2;
/*^iniobj */
@@ -20436,7 +20451,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1339.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1339.obj_num = 1;
- cdat->dobj_1339.obj_hash = 344767974;
+ cdat->dobj_1339.obj_hash = 549973568;
cdat->dobj_1339.obj_len = 2;
@@ -20523,7 +20538,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1346__STRING_HEX_MD5SUM_CONSTPATH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1346__STRING_HEX_MD5SUM_CONSTPATH.obj_hash = 107585325;
+ cdat->dobj_1346__STRING_HEX_MD5SUM_CONSTPATH.obj_hash = 21065589;
cdat->dobj_1346__STRING_HEX_MD5SUM_CONSTPATH.obj_len = 5;
/*inimult dtup_1347__STRING_HEX_MD5SUM_CONSTPATH */
@@ -20582,7 +20597,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1351.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1351.obj_num = 0;
- cdat->dobj_1351.obj_hash = 967438133;
+ cdat->dobj_1351.obj_hash = 172513359;
cdat->dobj_1351.obj_len = 2;
@@ -20659,7 +20674,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1357__STRING_HEX_MD5SUM_PATHSTRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1357__STRING_HEX_MD5SUM_PATHSTRV.obj_hash = 829355738;
+ cdat->dobj_1357__STRING_HEX_MD5SUM_PATHSTRV.obj_hash = 56250204;
cdat->dobj_1357__STRING_HEX_MD5SUM_PATHSTRV.obj_len = 5;
/*inimult dtup_1358__STRING_HEX_MD5SUM_PATHSTRV */
@@ -20718,7 +20733,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1362.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1362.obj_num = 0;
- cdat->dobj_1362.obj_hash = 744129207;
+ cdat->dobj_1362.obj_hash = 306818271;
cdat->dobj_1362.obj_len = 2;
@@ -20796,7 +20811,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1368__STRING_HEX_MD5SUM_PATH_SEQUENCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1368__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_hash = 521733294;
+ cdat->dobj_1368__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_hash = 361555690;
cdat->dobj_1368__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_len = 5;
/*inimult dtup_1369__STRING_HEX_MD5SUM_PATH_SEQUENCE */
@@ -20855,7 +20870,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1373.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1373.obj_num = 0;
- cdat->dobj_1373.obj_hash = 551331362;
+ cdat->dobj_1373.obj_hash = 155765141;
cdat->dobj_1373.obj_len = 2;
@@ -20931,7 +20946,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1379__SPLIT_STRING_SPACE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1379__SPLIT_STRING_SPACE.obj_hash = 570319529;
+ cdat->dobj_1379__SPLIT_STRING_SPACE.obj_hash = 28114430;
cdat->dobj_1379__SPLIT_STRING_SPACE.obj_len = 5;
/*inimult dtup_1380__SPLIT_STRING_SPACE */
@@ -20964,7 +20979,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1382.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1382.obj_num = 0;
- cdat->dobj_1382.obj_hash = 949104631;
+ cdat->dobj_1382.obj_hash = 523262295;
cdat->dobj_1382.obj_len = 2;
/*^iniobj */
@@ -20985,7 +21000,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1383.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1383.obj_num = 1;
- cdat->dobj_1383.obj_hash = 159891622;
+ cdat->dobj_1383.obj_hash = 310255847;
cdat->dobj_1383.obj_len = 2;
@@ -21069,7 +21084,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1390__SPLIT_STRING_COMMA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1390__SPLIT_STRING_COMMA.obj_hash = 475510816;
+ cdat->dobj_1390__SPLIT_STRING_COMMA.obj_hash = 875976138;
cdat->dobj_1390__SPLIT_STRING_COMMA.obj_len = 5;
/*inimult dtup_1391__SPLIT_STRING_COMMA */
@@ -21102,7 +21117,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1393.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1393.obj_num = 0;
- cdat->dobj_1393.obj_hash = 400419470;
+ cdat->dobj_1393.obj_hash = 649645132;
cdat->dobj_1393.obj_len = 2;
/*^iniobj */
@@ -21123,7 +21138,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1394.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1394.obj_num = 1;
- cdat->dobj_1394.obj_hash = 546111754;
+ cdat->dobj_1394.obj_hash = 676685698;
cdat->dobj_1394.obj_len = 2;
@@ -21207,7 +21222,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1401__SPLIT_STRING_COLON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1401__SPLIT_STRING_COLON.obj_hash = 1036132194;
+ cdat->dobj_1401__SPLIT_STRING_COLON.obj_hash = 485491872;
cdat->dobj_1401__SPLIT_STRING_COLON.obj_len = 5;
/*inimult dtup_1402__SPLIT_STRING_COLON */
@@ -21240,7 +21255,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1404.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1404.obj_num = 0;
- cdat->dobj_1404.obj_hash = 1059959310;
+ cdat->dobj_1404.obj_hash = 593516466;
cdat->dobj_1404.obj_len = 2;
/*^iniobj */
@@ -21261,7 +21276,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1405.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1405.obj_num = 1;
- cdat->dobj_1405.obj_hash = 404227452;
+ cdat->dobj_1405.obj_hash = 554686121;
cdat->dobj_1405.obj_len = 2;
@@ -21345,7 +21360,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1412__SPLIT_STRING_EQUAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1412__SPLIT_STRING_EQUAL.obj_hash = 296923355;
+ cdat->dobj_1412__SPLIT_STRING_EQUAL.obj_hash = 427994256;
cdat->dobj_1412__SPLIT_STRING_EQUAL.obj_len = 5;
/*inimult dtup_1413__SPLIT_STRING_EQUAL */
@@ -21378,7 +21393,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1415.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1415.obj_num = 0;
- cdat->dobj_1415.obj_hash = 817458449;
+ cdat->dobj_1415.obj_hash = 230970209;
cdat->dobj_1415.obj_len = 2;
/*^iniobj */
@@ -21399,7 +21414,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1416.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1416.obj_num = 1;
- cdat->dobj_1416.obj_hash = 757615239;
+ cdat->dobj_1416.obj_hash = 656379619;
cdat->dobj_1416.obj_len = 2;
@@ -21483,7 +21498,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1423__STRBUF2STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1423__STRBUF2STRING.obj_hash = 165420197;
+ cdat->dobj_1423__STRBUF2STRING.obj_hash = 847525355;
cdat->dobj_1423__STRBUF2STRING.obj_len = 5;
/*inimult dtup_1424__STRBUF2STRING */
@@ -21516,7 +21531,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1426.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1426.obj_num = 0;
- cdat->dobj_1426.obj_hash = 1032187271;
+ cdat->dobj_1426.obj_hash = 238273129;
cdat->dobj_1426.obj_len = 2;
/*^iniobj */
@@ -21537,7 +21552,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1427.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1427.obj_num = 1;
- cdat->dobj_1427.obj_hash = 433473054;
+ cdat->dobj_1427.obj_hash = 1065607062;
cdat->dobj_1427.obj_len = 2;
@@ -21624,7 +21639,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1434__MAKE_STRING_NAKEDBASENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1434__MAKE_STRING_NAKEDBASENAME.obj_hash = 745959061;
+ cdat->dobj_1434__MAKE_STRING_NAKEDBASENAME.obj_hash = 1018759809;
cdat->dobj_1434__MAKE_STRING_NAKEDBASENAME.obj_len = 5;
/*inimult dtup_1435__MAKE_STRING_NAKEDBASENAME */
@@ -21657,7 +21672,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1437.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1437.obj_num = 0;
- cdat->dobj_1437.obj_hash = 937764558;
+ cdat->dobj_1437.obj_hash = 300346664;
cdat->dobj_1437.obj_len = 2;
/*^iniobj */
@@ -21678,7 +21693,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1438.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1438.obj_num = 1;
- cdat->dobj_1438.obj_hash = 51650966;
+ cdat->dobj_1438.obj_hash = 286110706;
cdat->dobj_1438.obj_len = 2;
@@ -21765,7 +21780,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1445__MAKE_STRING_TEMPNAME_SUFFIXED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1445__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 1022101721;
+ cdat->dobj_1445__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 267144307;
cdat->dobj_1445__MAKE_STRING_TEMPNAME_SUFFIXED.obj_len = 5;
/*inimult dtup_1446__MAKE_STRING_TEMPNAME_SUFFIXED */
@@ -21798,7 +21813,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1448.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1448.obj_num = 0;
- cdat->dobj_1448.obj_hash = 751260916;
+ cdat->dobj_1448.obj_hash = 23577968;
cdat->dobj_1448.obj_len = 2;
/*^iniobj */
@@ -21819,7 +21834,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1449.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1449.obj_num = 1;
- cdat->dobj_1449.obj_hash = 893998789;
+ cdat->dobj_1449.obj_hash = 409160706;
cdat->dobj_1449.obj_len = 2;
@@ -21866,7 +21881,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1452.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1452.obj_num = 2;
- cdat->dobj_1452.obj_hash = 574384385;
+ cdat->dobj_1452.obj_hash = 664705484;
cdat->dobj_1452.obj_len = 2;
@@ -21958,7 +21973,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1460__MAKE_STRING_WITHOUT_SUFFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1460__MAKE_STRING_WITHOUT_SUFFIX.obj_hash = 972938920;
+ cdat->dobj_1460__MAKE_STRING_WITHOUT_SUFFIX.obj_hash = 917071010;
cdat->dobj_1460__MAKE_STRING_WITHOUT_SUFFIX.obj_len = 5;
/*inimult dtup_1461__MAKE_STRING_WITHOUT_SUFFIX */
@@ -21991,7 +22006,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1463.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1463.obj_num = 0;
- cdat->dobj_1463.obj_hash = 9913053;
+ cdat->dobj_1463.obj_hash = 118227945;
cdat->dobj_1463.obj_len = 2;
/*^iniobj */
@@ -22012,7 +22027,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1464.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1464.obj_num = 1;
- cdat->dobj_1464.obj_hash = 84168666;
+ cdat->dobj_1464.obj_hash = 679914672;
cdat->dobj_1464.obj_len = 2;
@@ -22059,7 +22074,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1467.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1467.obj_num = 2;
- cdat->dobj_1467.obj_hash = 154273851;
+ cdat->dobj_1467.obj_hash = 364084952;
cdat->dobj_1467.obj_len = 2;
@@ -22152,7 +22167,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1475__MAKE_STRING_GENERATED_C_FILENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1475__MAKE_STRING_GENERATED_C_FILENAME.obj_hash = 911116372;
+ cdat->dobj_1475__MAKE_STRING_GENERATED_C_FILENAME.obj_hash = 584565158;
cdat->dobj_1475__MAKE_STRING_GENERATED_C_FILENAME.obj_len = 5;
/*inimult dtup_1476__MAKE_STRING_GENERATED_C_FILENAME */
@@ -22185,7 +22200,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1478.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1478.obj_num = 0;
- cdat->dobj_1478.obj_hash = 144331465;
+ cdat->dobj_1478.obj_hash = 765836774;
cdat->dobj_1478.obj_len = 2;
@@ -22232,7 +22247,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1481.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1481.obj_num = 1;
- cdat->dobj_1481.obj_hash = 852946037;
+ cdat->dobj_1481.obj_hash = 424400778;
cdat->dobj_1481.obj_len = 2;
@@ -22279,7 +22294,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1484.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1484.obj_num = 2;
- cdat->dobj_1484.obj_hash = 877960580;
+ cdat->dobj_1484.obj_hash = 660782413;
cdat->dobj_1484.obj_len = 2;
@@ -22374,7 +22389,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1492__GENERATE_OPTIMIZED_MELT_MODULE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1492__GENERATE_OPTIMIZED_MELT_MODULE.obj_hash = 340427621;
+ cdat->dobj_1492__GENERATE_OPTIMIZED_MELT_MODULE.obj_hash = 942998465;
cdat->dobj_1492__GENERATE_OPTIMIZED_MELT_MODULE.obj_len = 5;
/*inimult dtup_1493__GENERATE_OPTIMIZED_MELT_MODULE */
@@ -22433,7 +22448,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1497.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1497.obj_num = 0;
- cdat->dobj_1497.obj_hash = 34581646;
+ cdat->dobj_1497.obj_hash = 633031117;
cdat->dobj_1497.obj_len = 2;
@@ -22480,7 +22495,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1500.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1500.obj_num = 1;
- cdat->dobj_1500.obj_hash = 875467156;
+ cdat->dobj_1500.obj_hash = 326967706;
cdat->dobj_1500.obj_len = 2;
@@ -22566,7 +22581,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1507__GENERATE_FLAVORED_MELT_MODULE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1507__GENERATE_FLAVORED_MELT_MODULE.obj_hash = 577047087;
+ cdat->dobj_1507__GENERATE_FLAVORED_MELT_MODULE.obj_hash = 361090113;
cdat->dobj_1507__GENERATE_FLAVORED_MELT_MODULE.obj_len = 5;
/*inimult dtup_1508__GENERATE_FLAVORED_MELT_MODULE */
@@ -22599,7 +22614,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1510.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1510.obj_num = 0;
- cdat->dobj_1510.obj_hash = 461759545;
+ cdat->dobj_1510.obj_hash = 143341692;
cdat->dobj_1510.obj_len = 2;
/*^iniobj */
@@ -22620,7 +22635,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1511.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1511.obj_num = 1;
- cdat->dobj_1511.obj_hash = 738513121;
+ cdat->dobj_1511.obj_hash = 554426959;
cdat->dobj_1511.obj_len = 2;
@@ -22667,7 +22682,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1514.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1514.obj_num = 2;
- cdat->dobj_1514.obj_hash = 334291039;
+ cdat->dobj_1514.obj_hash = 477197725;
cdat->dobj_1514.obj_len = 2;
@@ -22761,7 +22776,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1522__GENERATE_DEBUG_MELT_MODULE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1522__GENERATE_DEBUG_MELT_MODULE.obj_hash = 1019955969;
+ cdat->dobj_1522__GENERATE_DEBUG_MELT_MODULE.obj_hash = 1020352032;
cdat->dobj_1522__GENERATE_DEBUG_MELT_MODULE.obj_len = 5;
/*inimult dtup_1523__GENERATE_DEBUG_MELT_MODULE */
@@ -22794,7 +22809,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1525.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1525.obj_num = 0;
- cdat->dobj_1525.obj_hash = 131798405;
+ cdat->dobj_1525.obj_hash = 598333541;
cdat->dobj_1525.obj_len = 2;
/*^iniobj */
@@ -22815,7 +22830,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1526.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1526.obj_num = 1;
- cdat->dobj_1526.obj_hash = 133123639;
+ cdat->dobj_1526.obj_hash = 97687364;
cdat->dobj_1526.obj_len = 2;
@@ -22901,7 +22916,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1533__GENERATE_QUICKLY_MELT_MODULE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1533__GENERATE_QUICKLY_MELT_MODULE.obj_hash = 509616803;
+ cdat->dobj_1533__GENERATE_QUICKLY_MELT_MODULE.obj_hash = 498797346;
cdat->dobj_1533__GENERATE_QUICKLY_MELT_MODULE.obj_len = 5;
/*inimult dtup_1534__GENERATE_QUICKLY_MELT_MODULE */
@@ -22934,7 +22949,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1536.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1536.obj_num = 0;
- cdat->dobj_1536.obj_hash = 39161305;
+ cdat->dobj_1536.obj_hash = 676447129;
cdat->dobj_1536.obj_len = 2;
/*^iniobj */
@@ -22955,7 +22970,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1537.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1537.obj_num = 1;
- cdat->dobj_1537.obj_hash = 40521826;
+ cdat->dobj_1537.obj_hash = 1020107860;
cdat->dobj_1537.obj_len = 2;
@@ -23041,7 +23056,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1544__START_MELT_MODULE_OF_FLAVOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1544__START_MELT_MODULE_OF_FLAVOR.obj_hash = 909376358;
+ cdat->dobj_1544__START_MELT_MODULE_OF_FLAVOR.obj_hash = 699290226;
cdat->dobj_1544__START_MELT_MODULE_OF_FLAVOR.obj_len = 5;
/*inimult dtup_1545__START_MELT_MODULE_OF_FLAVOR */
@@ -23100,7 +23115,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1549.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1549.obj_num = 0;
- cdat->dobj_1549.obj_hash = 319342984;
+ cdat->dobj_1549.obj_hash = 588142014;
cdat->dobj_1549.obj_len = 2;
@@ -23147,7 +23162,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1552.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1552.obj_num = 1;
- cdat->dobj_1552.obj_hash = 817024922;
+ cdat->dobj_1552.obj_hash = 125959949;
cdat->dobj_1552.obj_len = 2;
/*^iniobj */
@@ -23168,7 +23183,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1553.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1553.obj_num = 2;
- cdat->dobj_1553.obj_hash = 487712055;
+ cdat->dobj_1553.obj_hash = 989982;
cdat->dobj_1553.obj_len = 2;
@@ -23260,7 +23275,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1561__MELT_VERSION_STR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1561__MELT_VERSION_STR.obj_hash = 910928650;
+ cdat->dobj_1561__MELT_VERSION_STR.obj_hash = 252856358;
cdat->dobj_1561__MELT_VERSION_STR.obj_len = 5;
/*inimult dtup_1562__MELT_VERSION_STR */
@@ -23341,7 +23356,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1568__OBJECT_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1568__OBJECT_LENGTH.obj_hash = 81188083;
+ cdat->dobj_1568__OBJECT_LENGTH.obj_hash = 8424505;
cdat->dobj_1568__OBJECT_LENGTH.obj_len = 5;
/*inimult dtup_1569__OBJECT_LENGTH */
@@ -23400,7 +23415,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1573.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1573.obj_num = 0;
- cdat->dobj_1573.obj_hash = 317896435;
+ cdat->dobj_1573.obj_hash = 582278696;
cdat->dobj_1573.obj_len = 2;
@@ -23476,7 +23491,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1579__OBJECT_NTH_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1579__OBJECT_NTH_FIELD.obj_hash = 848292933;
+ cdat->dobj_1579__OBJECT_NTH_FIELD.obj_hash = 1055542742;
cdat->dobj_1579__OBJECT_NTH_FIELD.obj_len = 5;
/*inimult dtup_1580__OBJECT_NTH_FIELD */
@@ -23509,7 +23524,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1582.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1582.obj_num = 0;
- cdat->dobj_1582.obj_hash = 391036931;
+ cdat->dobj_1582.obj_hash = 522661209;
cdat->dobj_1582.obj_len = 2;
/*^iniobj */
@@ -23530,7 +23545,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1583.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1583.obj_num = 1;
- cdat->dobj_1583.obj_hash = 567321072;
+ cdat->dobj_1583.obj_hash = 53619770;
cdat->dobj_1583.obj_len = 2;
@@ -23613,7 +23628,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1590__SUBCLASS_OF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1590__SUBCLASS_OF.obj_hash = 976236416;
+ cdat->dobj_1590__SUBCLASS_OF.obj_hash = 550158434;
cdat->dobj_1590__SUBCLASS_OF.obj_len = 5;
/*inimult dtup_1591__SUBCLASS_OF */
@@ -23672,7 +23687,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1595.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1595.obj_num = 0;
- cdat->dobj_1595.obj_hash = 427836258;
+ cdat->dobj_1595.obj_hash = 463775282;
cdat->dobj_1595.obj_len = 2;
@@ -23719,7 +23734,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1598.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1598.obj_num = 1;
- cdat->dobj_1598.obj_hash = 234509759;
+ cdat->dobj_1598.obj_hash = 672030600;
cdat->dobj_1598.obj_len = 2;
@@ -23805,7 +23820,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1605__SUBCLASS_OR_EQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1605__SUBCLASS_OR_EQ.obj_hash = 120370122;
+ cdat->dobj_1605__SUBCLASS_OR_EQ.obj_hash = 746993248;
cdat->dobj_1605__SUBCLASS_OR_EQ.obj_len = 5;
/*inimult dtup_1606__SUBCLASS_OR_EQ */
@@ -23838,7 +23853,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1608.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1608.obj_num = 0;
- cdat->dobj_1608.obj_hash = 367777842;
+ cdat->dobj_1608.obj_hash = 650711644;
cdat->dobj_1608.obj_len = 2;
/*^iniobj */
@@ -23859,7 +23874,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1609.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1609.obj_num = 1;
- cdat->dobj_1609.obj_hash = 108898396;
+ cdat->dobj_1609.obj_hash = 816895137;
cdat->dobj_1609.obj_len = 2;
@@ -23959,7 +23974,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1618__IS_MULTIPLE_OR_NULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1618__IS_MULTIPLE_OR_NULL.obj_hash = 487347098;
+ cdat->dobj_1618__IS_MULTIPLE_OR_NULL.obj_hash = 752697977;
cdat->dobj_1618__IS_MULTIPLE_OR_NULL.obj_len = 5;
/*inimult dtup_1619__IS_MULTIPLE_OR_NULL */
@@ -24018,7 +24033,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1623.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1623.obj_num = 0;
- cdat->dobj_1623.obj_hash = 1064868442;
+ cdat->dobj_1623.obj_hash = 881612406;
cdat->dobj_1623.obj_len = 2;
@@ -24100,7 +24115,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1630__SUBSEQ_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1630__SUBSEQ_MULTIPLE.obj_hash = 578494877;
+ cdat->dobj_1630__SUBSEQ_MULTIPLE.obj_hash = 216481227;
cdat->dobj_1630__SUBSEQ_MULTIPLE.obj_len = 5;
/*inimult dtup_1631__SUBSEQ_MULTIPLE */
@@ -24133,7 +24148,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1633.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1633.obj_num = 0;
- cdat->dobj_1633.obj_hash = 90404475;
+ cdat->dobj_1633.obj_hash = 838671453;
cdat->dobj_1633.obj_len = 2;
@@ -24180,7 +24195,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1636.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1636.obj_num = 1;
- cdat->dobj_1636.obj_hash = 632005267;
+ cdat->dobj_1636.obj_hash = 884232315;
cdat->dobj_1636.obj_len = 2;
@@ -24227,7 +24242,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1639.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1639.obj_num = 2;
- cdat->dobj_1639.obj_hash = 1027398719;
+ cdat->dobj_1639.obj_hash = 788648986;
cdat->dobj_1639.obj_len = 2;
@@ -24288,7 +24303,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1645__TUPLE_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1645__TUPLE_NTH.obj_hash = 46036702;
+ cdat->dobj_1645__TUPLE_NTH.obj_hash = 216896282;
cdat->dobj_1645__TUPLE_NTH.obj_len = 9;
@@ -24342,7 +24357,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1649.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1649.obj_num = 0;
- cdat->dobj_1649.obj_hash = 443811219;
+ cdat->dobj_1649.obj_hash = 761693851;
cdat->dobj_1649.obj_len = 2;
/*inimult dtup_1650__TUPLE_NTH */
@@ -24393,7 +24408,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1653.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1653.obj_hash = 761693851;
+ cdat->dobj_1653.obj_hash = 609583192;
cdat->dobj_1653.obj_len = 2;
@@ -24440,7 +24455,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1656.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1656.obj_num = 0;
- cdat->dobj_1656.obj_hash = 786506021;
+ cdat->dobj_1656.obj_hash = 886855056;
cdat->dobj_1656.obj_len = 2;
/*inimult dtup_1657__TUPLE_NTH */
@@ -24568,7 +24583,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1671__TUPLE_SIZED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1671__TUPLE_SIZED.obj_hash = 216896282;
+ cdat->dobj_1671__TUPLE_SIZED.obj_hash = 985475581;
cdat->dobj_1671__TUPLE_SIZED.obj_len = 9;
@@ -24625,7 +24640,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1675.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1675.obj_num = 0;
- cdat->dobj_1675.obj_hash = 516929167;
+ cdat->dobj_1675.obj_hash = 645402380;
cdat->dobj_1675.obj_len = 2;
/*inimult dtup_1676__TUPLE_SIZED */
@@ -24677,7 +24692,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1679.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1679.obj_hash = 645402380;
+ cdat->dobj_1679.obj_hash = 733406216;
cdat->dobj_1679.obj_len = 2;
/*inimult dtup_1680__TUPLE_SIZED */
@@ -24873,7 +24888,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1699__MELT_IS_BOOTSTRAPPING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1699__MELT_IS_BOOTSTRAPPING.obj_hash = 722428439;
+ cdat->dobj_1699__MELT_IS_BOOTSTRAPPING.obj_hash = 22901538;
cdat->dobj_1699__MELT_IS_BOOTSTRAPPING.obj_len = 5;
/*inimult dtup_1700__MELT_IS_BOOTSTRAPPING */
@@ -24950,7 +24965,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1706__IS_OUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1706__IS_OUT.obj_hash = 148964505;
+ cdat->dobj_1706__IS_OUT.obj_hash = 66607760;
cdat->dobj_1706__IS_OUT.obj_len = 5;
/*inimult dtup_1707__IS_OUT */
@@ -24981,7 +24996,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1709.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1709.obj_num = 0;
- cdat->dobj_1709.obj_hash = 288703163;
+ cdat->dobj_1709.obj_hash = 1005373360;
cdat->dobj_1709.obj_len = 2;
@@ -25050,7 +25065,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1715__IS_FILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1715__IS_FILE.obj_hash = 1012050376;
+ cdat->dobj_1715__IS_FILE.obj_hash = 713847837;
cdat->dobj_1715__IS_FILE.obj_len = 5;
/*inimult dtup_1716__IS_FILE */
@@ -25081,7 +25096,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1718.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1718.obj_num = 0;
- cdat->dobj_1718.obj_hash = 174651366;
+ cdat->dobj_1718.obj_hash = 697365537;
cdat->dobj_1718.obj_len = 2;
@@ -25154,7 +25169,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1724__ADD2SBUF_STRCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1724__ADD2SBUF_STRCONST.obj_hash = 594316975;
+ cdat->dobj_1724__ADD2SBUF_STRCONST.obj_hash = 1045417306;
cdat->dobj_1724__ADD2SBUF_STRCONST.obj_len = 5;
/*inimult dtup_1725__ADD2SBUF_STRCONST */
@@ -25187,7 +25202,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1727.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1727.obj_num = 0;
- cdat->dobj_1727.obj_hash = 129833748;
+ cdat->dobj_1727.obj_hash = 681687990;
cdat->dobj_1727.obj_len = 2;
/*^iniobj */
@@ -25208,7 +25223,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1728.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1728.obj_num = 1;
- cdat->dobj_1728.obj_hash = 616620322;
+ cdat->dobj_1728.obj_hash = 824897175;
cdat->dobj_1728.obj_len = 2;
@@ -25291,7 +25306,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1735__ADD2SBUF_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1735__ADD2SBUF_STRING.obj_hash = 89861589;
+ cdat->dobj_1735__ADD2SBUF_STRING.obj_hash = 762060790;
cdat->dobj_1735__ADD2SBUF_STRING.obj_len = 5;
/*inimult dtup_1736__ADD2SBUF_STRING */
@@ -25324,7 +25339,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1738.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1738.obj_num = 0;
- cdat->dobj_1738.obj_hash = 715949305;
+ cdat->dobj_1738.obj_hash = 704820995;
cdat->dobj_1738.obj_len = 2;
/*^iniobj */
@@ -25345,7 +25360,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1739.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1739.obj_num = 1;
- cdat->dobj_1739.obj_hash = 712103215;
+ cdat->dobj_1739.obj_hash = 544330709;
cdat->dobj_1739.obj_len = 2;
@@ -25431,7 +25446,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1746__ADD2SBUF_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1746__ADD2SBUF_MIXLOC.obj_hash = 402147363;
+ cdat->dobj_1746__ADD2SBUF_MIXLOC.obj_hash = 946696705;
cdat->dobj_1746__ADD2SBUF_MIXLOC.obj_len = 5;
/*inimult dtup_1747__ADD2SBUF_MIXLOC */
@@ -25464,7 +25479,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1749.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1749.obj_num = 0;
- cdat->dobj_1749.obj_hash = 615624179;
+ cdat->dobj_1749.obj_hash = 926269869;
cdat->dobj_1749.obj_len = 2;
@@ -25511,7 +25526,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1752.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1752.obj_num = 1;
- cdat->dobj_1752.obj_hash = 995157532;
+ cdat->dobj_1752.obj_hash = 199098692;
cdat->dobj_1752.obj_len = 2;
@@ -25605,7 +25620,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1760__ADD2SBUF_SHORT_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1760__ADD2SBUF_SHORT_MIXLOC.obj_hash = 79425245;
+ cdat->dobj_1760__ADD2SBUF_SHORT_MIXLOC.obj_hash = 1013096529;
cdat->dobj_1760__ADD2SBUF_SHORT_MIXLOC.obj_len = 5;
/*inimult dtup_1761__ADD2SBUF_SHORT_MIXLOC */
@@ -25638,7 +25653,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1763.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1763.obj_num = 0;
- cdat->dobj_1763.obj_hash = 688478736;
+ cdat->dobj_1763.obj_hash = 6617917;
cdat->dobj_1763.obj_len = 2;
/*^iniobj */
@@ -25659,7 +25674,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1764.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1764.obj_num = 1;
- cdat->dobj_1764.obj_hash = 445478586;
+ cdat->dobj_1764.obj_hash = 370165328;
cdat->dobj_1764.obj_len = 2;
@@ -25755,7 +25770,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1772__ADD2SBUF_TEXI_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1772__ADD2SBUF_TEXI_MIXLOC.obj_hash = 901135457;
+ cdat->dobj_1772__ADD2SBUF_TEXI_MIXLOC.obj_hash = 1016220198;
cdat->dobj_1772__ADD2SBUF_TEXI_MIXLOC.obj_len = 5;
/*inimult dtup_1773__ADD2SBUF_TEXI_MIXLOC */
@@ -25788,7 +25803,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1775.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1775.obj_num = 0;
- cdat->dobj_1775.obj_hash = 183398569;
+ cdat->dobj_1775.obj_hash = 1038428881;
cdat->dobj_1775.obj_len = 2;
/*^iniobj */
@@ -25809,7 +25824,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1776.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1776.obj_num = 1;
- cdat->dobj_1776.obj_hash = 11323592;
+ cdat->dobj_1776.obj_hash = 806584015;
cdat->dobj_1776.obj_len = 2;
@@ -25904,7 +25919,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1784__ADD2SBUF_INDENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1784__ADD2SBUF_INDENT.obj_hash = 33434593;
+ cdat->dobj_1784__ADD2SBUF_INDENT.obj_hash = 851306303;
cdat->dobj_1784__ADD2SBUF_INDENT.obj_len = 5;
/*inimult dtup_1785__ADD2SBUF_INDENT */
@@ -25937,7 +25952,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1787.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1787.obj_num = 0;
- cdat->dobj_1787.obj_hash = 220856560;
+ cdat->dobj_1787.obj_hash = 299800196;
cdat->dobj_1787.obj_len = 2;
@@ -25984,7 +25999,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1790.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1790.obj_num = 1;
- cdat->dobj_1790.obj_hash = 626377266;
+ cdat->dobj_1790.obj_hash = 736178597;
cdat->dobj_1790.obj_len = 2;
@@ -26067,7 +26082,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1797__ADD2SBUF_INDENTNL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1797__ADD2SBUF_INDENTNL.obj_hash = 841578618;
+ cdat->dobj_1797__ADD2SBUF_INDENTNL.obj_hash = 803891068;
cdat->dobj_1797__ADD2SBUF_INDENTNL.obj_len = 5;
/*inimult dtup_1798__ADD2SBUF_INDENTNL */
@@ -26100,7 +26115,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1800.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1800.obj_num = 0;
- cdat->dobj_1800.obj_hash = 339479159;
+ cdat->dobj_1800.obj_hash = 769176888;
cdat->dobj_1800.obj_len = 2;
/*^iniobj */
@@ -26121,7 +26136,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1801.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1801.obj_num = 1;
- cdat->dobj_1801.obj_hash = 530236718;
+ cdat->dobj_1801.obj_hash = 637357153;
cdat->dobj_1801.obj_len = 2;
@@ -26204,7 +26219,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1808__ADD2SBUF_SBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1808__ADD2SBUF_SBUF.obj_hash = 1001355967;
+ cdat->dobj_1808__ADD2SBUF_SBUF.obj_hash = 771820434;
cdat->dobj_1808__ADD2SBUF_SBUF.obj_len = 5;
/*inimult dtup_1809__ADD2SBUF_SBUF */
@@ -26237,7 +26252,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1811.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1811.obj_num = 0;
- cdat->dobj_1811.obj_hash = 93681283;
+ cdat->dobj_1811.obj_hash = 831507063;
cdat->dobj_1811.obj_len = 2;
@@ -26284,7 +26299,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1814.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1814.obj_num = 1;
- cdat->dobj_1814.obj_hash = 178722448;
+ cdat->dobj_1814.obj_hash = 731188819;
cdat->dobj_1814.obj_len = 2;
@@ -26370,7 +26385,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1821__ADD2SBUF_CENCSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1821__ADD2SBUF_CENCSTRING.obj_hash = 135543139;
+ cdat->dobj_1821__ADD2SBUF_CENCSTRING.obj_hash = 569166302;
cdat->dobj_1821__ADD2SBUF_CENCSTRING.obj_len = 5;
/*inimult dtup_1822__ADD2SBUF_CENCSTRING */
@@ -26403,7 +26418,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1824.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1824.obj_num = 0;
- cdat->dobj_1824.obj_hash = 499488717;
+ cdat->dobj_1824.obj_hash = 139453931;
cdat->dobj_1824.obj_len = 2;
/*^iniobj */
@@ -26424,7 +26439,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1825.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1825.obj_num = 1;
- cdat->dobj_1825.obj_hash = 905896304;
+ cdat->dobj_1825.obj_hash = 848048554;
cdat->dobj_1825.obj_len = 2;
@@ -26510,7 +26525,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1832__ADD2SBUF_CENCSTRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1832__ADD2SBUF_CENCSTRBUF.obj_hash = 831006580;
+ cdat->dobj_1832__ADD2SBUF_CENCSTRBUF.obj_hash = 133746699;
cdat->dobj_1832__ADD2SBUF_CENCSTRBUF.obj_len = 5;
/*inimult dtup_1833__ADD2SBUF_CENCSTRBUF */
@@ -26543,7 +26558,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1835.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1835.obj_num = 0;
- cdat->dobj_1835.obj_hash = 1069651224;
+ cdat->dobj_1835.obj_hash = 517453725;
cdat->dobj_1835.obj_len = 2;
/*^iniobj */
@@ -26564,7 +26579,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1836.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1836.obj_num = 1;
- cdat->dobj_1836.obj_hash = 103420991;
+ cdat->dobj_1836.obj_hash = 381882568;
cdat->dobj_1836.obj_len = 2;
@@ -26650,7 +26665,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1843__ADD2SBUF_CCOMSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1843__ADD2SBUF_CCOMSTRING.obj_hash = 242441478;
+ cdat->dobj_1843__ADD2SBUF_CCOMSTRING.obj_hash = 663643662;
cdat->dobj_1843__ADD2SBUF_CCOMSTRING.obj_len = 5;
/*inimult dtup_1844__ADD2SBUF_CCOMSTRING */
@@ -26683,7 +26698,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1846.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1846.obj_num = 0;
- cdat->dobj_1846.obj_hash = 236763705;
+ cdat->dobj_1846.obj_hash = 263921445;
cdat->dobj_1846.obj_len = 2;
/*^iniobj */
@@ -26704,7 +26719,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1847.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1847.obj_num = 1;
- cdat->dobj_1847.obj_hash = 179387364;
+ cdat->dobj_1847.obj_hash = 864412614;
cdat->dobj_1847.obj_len = 2;
@@ -26790,7 +26805,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1854__ADD2SBUF_CCOMSTRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1854__ADD2SBUF_CCOMSTRBUF.obj_hash = 342787611;
+ cdat->dobj_1854__ADD2SBUF_CCOMSTRBUF.obj_hash = 400878929;
cdat->dobj_1854__ADD2SBUF_CCOMSTRBUF.obj_len = 5;
/*inimult dtup_1855__ADD2SBUF_CCOMSTRBUF */
@@ -26823,7 +26838,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1857.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1857.obj_num = 0;
- cdat->dobj_1857.obj_hash = 964395603;
+ cdat->dobj_1857.obj_hash = 1045632129;
cdat->dobj_1857.obj_len = 2;
/*^iniobj */
@@ -26844,7 +26859,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1858.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1858.obj_num = 1;
- cdat->dobj_1858.obj_hash = 293982592;
+ cdat->dobj_1858.obj_hash = 552052242;
cdat->dobj_1858.obj_len = 2;
@@ -26928,7 +26943,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1865__ADD2SBUF_CCOMCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1865__ADD2SBUF_CCOMCONST.obj_hash = 548873622;
+ cdat->dobj_1865__ADD2SBUF_CCOMCONST.obj_hash = 484161264;
cdat->dobj_1865__ADD2SBUF_CCOMCONST.obj_len = 5;
/*inimult dtup_1866__ADD2SBUF_CCOMCONST */
@@ -26961,7 +26976,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1868.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1868.obj_num = 0;
- cdat->dobj_1868.obj_hash = 165315143;
+ cdat->dobj_1868.obj_hash = 780816515;
cdat->dobj_1868.obj_len = 2;
@@ -27008,7 +27023,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1871.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1871.obj_num = 1;
- cdat->dobj_1871.obj_hash = 1048379233;
+ cdat->dobj_1871.obj_hash = 156231597;
cdat->dobj_1871.obj_len = 2;
@@ -27091,7 +27106,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1878__ADD2SBUF_CIDENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1878__ADD2SBUF_CIDENT.obj_hash = 223465416;
+ cdat->dobj_1878__ADD2SBUF_CIDENT.obj_hash = 472871912;
cdat->dobj_1878__ADD2SBUF_CIDENT.obj_len = 5;
/*inimult dtup_1879__ADD2SBUF_CIDENT */
@@ -27124,7 +27139,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1881.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1881.obj_num = 0;
- cdat->dobj_1881.obj_hash = 812127845;
+ cdat->dobj_1881.obj_hash = 967718077;
cdat->dobj_1881.obj_len = 2;
/*^iniobj */
@@ -27145,7 +27160,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1882.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1882.obj_num = 1;
- cdat->dobj_1882.obj_hash = 176161248;
+ cdat->dobj_1882.obj_hash = 136978959;
cdat->dobj_1882.obj_len = 2;
@@ -27232,7 +27247,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1889__ADD2SBUF_CIDENTPREFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1889__ADD2SBUF_CIDENTPREFIX.obj_hash = 765855441;
+ cdat->dobj_1889__ADD2SBUF_CIDENTPREFIX.obj_hash = 1053508880;
cdat->dobj_1889__ADD2SBUF_CIDENTPREFIX.obj_len = 5;
/*inimult dtup_1890__ADD2SBUF_CIDENTPREFIX */
@@ -27265,7 +27280,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1892.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1892.obj_num = 0;
- cdat->dobj_1892.obj_hash = 808784897;
+ cdat->dobj_1892.obj_hash = 1012343488;
cdat->dobj_1892.obj_len = 2;
/*^iniobj */
@@ -27286,7 +27301,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1893.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1893.obj_num = 1;
- cdat->dobj_1893.obj_hash = 664593077;
+ cdat->dobj_1893.obj_hash = 936050361;
cdat->dobj_1893.obj_len = 2;
@@ -27333,7 +27348,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1896.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1896.obj_num = 2;
- cdat->dobj_1896.obj_hash = 890834179;
+ cdat->dobj_1896.obj_hash = 371643002;
cdat->dobj_1896.obj_len = 2;
@@ -27426,7 +27441,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1904__ADD2SBUF_LONGDEC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1904__ADD2SBUF_LONGDEC.obj_hash = 207371034;
+ cdat->dobj_1904__ADD2SBUF_LONGDEC.obj_hash = 865791075;
cdat->dobj_1904__ADD2SBUF_LONGDEC.obj_len = 5;
/*inimult dtup_1905__ADD2SBUF_LONGDEC */
@@ -27459,7 +27474,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1907.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1907.obj_num = 0;
- cdat->dobj_1907.obj_hash = 209729899;
+ cdat->dobj_1907.obj_hash = 610618714;
cdat->dobj_1907.obj_len = 2;
/*^iniobj */
@@ -27480,7 +27495,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1908.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1908.obj_num = 1;
- cdat->dobj_1908.obj_hash = 738903473;
+ cdat->dobj_1908.obj_hash = 671599244;
cdat->dobj_1908.obj_len = 2;
@@ -27563,7 +27578,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1915__ADD2SBUF_LONGHEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1915__ADD2SBUF_LONGHEX.obj_hash = 571535310;
+ cdat->dobj_1915__ADD2SBUF_LONGHEX.obj_hash = 642786500;
cdat->dobj_1915__ADD2SBUF_LONGHEX.obj_len = 5;
/*inimult dtup_1916__ADD2SBUF_LONGHEX */
@@ -27596,7 +27611,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1918.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1918.obj_num = 0;
- cdat->dobj_1918.obj_hash = 615222551;
+ cdat->dobj_1918.obj_hash = 50827141;
cdat->dobj_1918.obj_len = 2;
/*^iniobj */
@@ -27617,7 +27632,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1919.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1919.obj_num = 1;
- cdat->dobj_1919.obj_hash = 516949789;
+ cdat->dobj_1919.obj_hash = 605994768;
cdat->dobj_1919.obj_len = 2;
@@ -27701,7 +27716,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1926__ADD2SBUF_ROUTINEDESCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1926__ADD2SBUF_ROUTINEDESCR.obj_hash = 516896624;
+ cdat->dobj_1926__ADD2SBUF_ROUTINEDESCR.obj_hash = 1021726096;
cdat->dobj_1926__ADD2SBUF_ROUTINEDESCR.obj_len = 5;
/*inimult dtup_1927__ADD2SBUF_ROUTINEDESCR */
@@ -27734,7 +27749,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1929.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1929.obj_num = 0;
- cdat->dobj_1929.obj_hash = 394625245;
+ cdat->dobj_1929.obj_hash = 639137868;
cdat->dobj_1929.obj_len = 2;
@@ -27781,7 +27796,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1932.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1932.obj_num = 1;
- cdat->dobj_1932.obj_hash = 637561881;
+ cdat->dobj_1932.obj_hash = 460263071;
cdat->dobj_1932.obj_len = 2;
@@ -27868,7 +27883,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1939__OUTPUT_SBUF_STRCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1939__OUTPUT_SBUF_STRCONST.obj_hash = 535055685;
+ cdat->dobj_1939__OUTPUT_SBUF_STRCONST.obj_hash = 1069106806;
cdat->dobj_1939__OUTPUT_SBUF_STRCONST.obj_len = 5;
/*inimult dtup_1940__OUTPUT_SBUF_STRCONST */
@@ -27901,7 +27916,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1942.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1942.obj_num = 0;
- cdat->dobj_1942.obj_hash = 415710161;
+ cdat->dobj_1942.obj_hash = 712707592;
cdat->dobj_1942.obj_len = 2;
@@ -27948,7 +27963,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1945.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1945.obj_num = 1;
- cdat->dobj_1945.obj_hash = 241341899;
+ cdat->dobj_1945.obj_hash = 946198856;
cdat->dobj_1945.obj_len = 2;
@@ -28031,7 +28046,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1952__OUTPUT_SBUF_STRVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1952__OUTPUT_SBUF_STRVAL.obj_hash = 555650919;
+ cdat->dobj_1952__OUTPUT_SBUF_STRVAL.obj_hash = 432079340;
cdat->dobj_1952__OUTPUT_SBUF_STRVAL.obj_len = 5;
/*inimult dtup_1953__OUTPUT_SBUF_STRVAL */
@@ -28064,7 +28079,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1955.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1955.obj_num = 0;
- cdat->dobj_1955.obj_hash = 741790050;
+ cdat->dobj_1955.obj_hash = 701706859;
cdat->dobj_1955.obj_len = 2;
@@ -28111,7 +28126,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1958.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1958.obj_num = 1;
- cdat->dobj_1958.obj_hash = 717250047;
+ cdat->dobj_1958.obj_hash = 119170036;
cdat->dobj_1958.obj_len = 2;
@@ -28199,7 +28214,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1965__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1965__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_hash = 811360347;
+ cdat->dobj_1965__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_hash = 976842903;
cdat->dobj_1965__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_len = 5;
/*inimult dtup_1966__OUTPUT_SBUF_NO_OVERWRITE_STRCONST */
@@ -28232,7 +28247,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1968.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1968.obj_num = 0;
- cdat->dobj_1968.obj_hash = 539531812;
+ cdat->dobj_1968.obj_hash = 1061840043;
cdat->dobj_1968.obj_len = 2;
/*^iniobj */
@@ -28253,7 +28268,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1969.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1969.obj_num = 1;
- cdat->dobj_1969.obj_hash = 16945803;
+ cdat->dobj_1969.obj_hash = 74607894;
cdat->dobj_1969.obj_len = 2;
@@ -28338,7 +28353,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1976__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1976__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_hash = 679194699;
+ cdat->dobj_1976__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_hash = 1073266764;
cdat->dobj_1976__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_len = 5;
/*inimult dtup_1977__OUTPUT_SBUF_NO_OVERWRITE_STRVAL */
@@ -28371,7 +28386,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1979.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1979.obj_num = 0;
- cdat->dobj_1979.obj_hash = 691987893;
+ cdat->dobj_1979.obj_hash = 192294500;
cdat->dobj_1979.obj_len = 2;
/*^iniobj */
@@ -28392,7 +28407,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1980.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1980.obj_num = 1;
- cdat->dobj_1980.obj_hash = 218941611;
+ cdat->dobj_1980.obj_hash = 601738747;
cdat->dobj_1980.obj_len = 2;
@@ -28478,7 +28493,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1987__ADD2OUT_STRCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1987__ADD2OUT_STRCONST.obj_hash = 641375042;
+ cdat->dobj_1987__ADD2OUT_STRCONST.obj_hash = 726824572;
cdat->dobj_1987__ADD2OUT_STRCONST.obj_len = 5;
/*inimult dtup_1988__ADD2OUT_STRCONST */
@@ -28511,7 +28526,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1990.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1990.obj_num = 0;
- cdat->dobj_1990.obj_hash = 37984160;
+ cdat->dobj_1990.obj_hash = 582226667;
cdat->dobj_1990.obj_len = 2;
/*^iniobj */
@@ -28532,7 +28547,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_1991.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1991.obj_num = 1;
- cdat->dobj_1991.obj_hash = 459985396;
+ cdat->dobj_1991.obj_hash = 401623697;
cdat->dobj_1991.obj_len = 2;
@@ -28615,7 +28630,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1998__ADD2OUT_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1998__ADD2OUT_STRING.obj_hash = 338158231;
+ cdat->dobj_1998__ADD2OUT_STRING.obj_hash = 910160745;
cdat->dobj_1998__ADD2OUT_STRING.obj_len = 5;
/*inimult dtup_1999__ADD2OUT_STRING */
@@ -28648,7 +28663,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2001.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2001.obj_num = 0;
- cdat->dobj_2001.obj_hash = 684336771;
+ cdat->dobj_2001.obj_hash = 536339401;
cdat->dobj_2001.obj_len = 2;
/*^iniobj */
@@ -28669,7 +28684,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2002.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2002.obj_num = 1;
- cdat->dobj_2002.obj_hash = 297521544;
+ cdat->dobj_2002.obj_hash = 985581040;
cdat->dobj_2002.obj_len = 2;
@@ -28755,7 +28770,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2009__ADD2OUT_MIXLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2009__ADD2OUT_MIXLOC.obj_hash = 438080770;
+ cdat->dobj_2009__ADD2OUT_MIXLOC.obj_hash = 338657296;
cdat->dobj_2009__ADD2OUT_MIXLOC.obj_len = 5;
/*inimult dtup_2010__ADD2OUT_MIXLOC */
@@ -28788,7 +28803,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2012.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2012.obj_num = 0;
- cdat->dobj_2012.obj_hash = 874196545;
+ cdat->dobj_2012.obj_hash = 865018763;
cdat->dobj_2012.obj_len = 2;
/*^iniobj */
@@ -28809,7 +28824,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2013.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2013.obj_num = 1;
- cdat->dobj_2013.obj_hash = 684898951;
+ cdat->dobj_2013.obj_hash = 517365180;
cdat->dobj_2013.obj_len = 2;
@@ -28902,7 +28917,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2021__ADD2OUT_INDENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2021__ADD2OUT_INDENT.obj_hash = 581400181;
+ cdat->dobj_2021__ADD2OUT_INDENT.obj_hash = 652784381;
cdat->dobj_2021__ADD2OUT_INDENT.obj_len = 5;
/*inimult dtup_2022__ADD2OUT_INDENT */
@@ -28935,7 +28950,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2024.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2024.obj_num = 0;
- cdat->dobj_2024.obj_hash = 974094675;
+ cdat->dobj_2024.obj_hash = 753368623;
cdat->dobj_2024.obj_len = 2;
/*^iniobj */
@@ -28956,7 +28971,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2025.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2025.obj_num = 1;
- cdat->dobj_2025.obj_hash = 672856045;
+ cdat->dobj_2025.obj_hash = 508479128;
cdat->dobj_2025.obj_len = 2;
@@ -29039,7 +29054,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2032__ADD2OUT_INDENTNL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2032__ADD2OUT_INDENTNL.obj_hash = 917982307;
+ cdat->dobj_2032__ADD2OUT_INDENTNL.obj_hash = 892863313;
cdat->dobj_2032__ADD2OUT_INDENTNL.obj_len = 5;
/*inimult dtup_2033__ADD2OUT_INDENTNL */
@@ -29072,7 +29087,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2035.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2035.obj_num = 0;
- cdat->dobj_2035.obj_hash = 961875948;
+ cdat->dobj_2035.obj_hash = 245493846;
cdat->dobj_2035.obj_len = 2;
/*^iniobj */
@@ -29093,7 +29108,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2036.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2036.obj_num = 1;
- cdat->dobj_2036.obj_hash = 468470163;
+ cdat->dobj_2036.obj_hash = 1070981911;
cdat->dobj_2036.obj_len = 2;
@@ -29176,7 +29191,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2043__ADD2OUT_SBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2043__ADD2OUT_SBUF.obj_hash = 703436036;
+ cdat->dobj_2043__ADD2OUT_SBUF.obj_hash = 736046573;
cdat->dobj_2043__ADD2OUT_SBUF.obj_len = 5;
/*inimult dtup_2044__ADD2OUT_SBUF */
@@ -29209,7 +29224,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2046.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2046.obj_num = 0;
- cdat->dobj_2046.obj_hash = 673150598;
+ cdat->dobj_2046.obj_hash = 455407715;
cdat->dobj_2046.obj_len = 2;
/*^iniobj */
@@ -29230,7 +29245,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2047.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2047.obj_num = 1;
- cdat->dobj_2047.obj_hash = 640234649;
+ cdat->dobj_2047.obj_hash = 406529482;
cdat->dobj_2047.obj_len = 2;
@@ -29316,7 +29331,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2054__ADD2OUT_CENCSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2054__ADD2OUT_CENCSTRING.obj_hash = 336343610;
+ cdat->dobj_2054__ADD2OUT_CENCSTRING.obj_hash = 455543999;
cdat->dobj_2054__ADD2OUT_CENCSTRING.obj_len = 5;
/*inimult dtup_2055__ADD2OUT_CENCSTRING */
@@ -29349,7 +29364,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2057.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2057.obj_num = 0;
- cdat->dobj_2057.obj_hash = 851471461;
+ cdat->dobj_2057.obj_hash = 272592286;
cdat->dobj_2057.obj_len = 2;
/*^iniobj */
@@ -29370,7 +29385,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2058.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2058.obj_num = 1;
- cdat->dobj_2058.obj_hash = 520849176;
+ cdat->dobj_2058.obj_hash = 452020961;
cdat->dobj_2058.obj_len = 2;
@@ -29457,7 +29472,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2065__ADD2OUT_CENCSUBSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2065__ADD2OUT_CENCSUBSTRING.obj_hash = 721288802;
+ cdat->dobj_2065__ADD2OUT_CENCSUBSTRING.obj_hash = 57077214;
cdat->dobj_2065__ADD2OUT_CENCSUBSTRING.obj_len = 5;
/*inimult dtup_2066__ADD2OUT_CENCSUBSTRING */
@@ -29490,7 +29505,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2068.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2068.obj_num = 0;
- cdat->dobj_2068.obj_hash = 992829080;
+ cdat->dobj_2068.obj_hash = 865276559;
cdat->dobj_2068.obj_len = 2;
/*^iniobj */
@@ -29511,7 +29526,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2069.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2069.obj_num = 1;
- cdat->dobj_2069.obj_hash = 749637918;
+ cdat->dobj_2069.obj_hash = 375490632;
cdat->dobj_2069.obj_len = 2;
@@ -29558,7 +29573,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2072.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2072.obj_num = 2;
- cdat->dobj_2072.obj_hash = 840530227;
+ cdat->dobj_2072.obj_hash = 855765819;
cdat->dobj_2072.obj_len = 2;
@@ -29605,7 +29620,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2075.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2075.obj_num = 3;
- cdat->dobj_2075.obj_hash = 727656762;
+ cdat->dobj_2075.obj_hash = 856791820;
cdat->dobj_2075.obj_len = 2;
@@ -29703,7 +29718,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2084__ADD2OUT_CENCSTRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2084__ADD2OUT_CENCSTRBUF.obj_hash = 735821587;
+ cdat->dobj_2084__ADD2OUT_CENCSTRBUF.obj_hash = 680894467;
cdat->dobj_2084__ADD2OUT_CENCSTRBUF.obj_len = 5;
/*inimult dtup_2085__ADD2OUT_CENCSTRBUF */
@@ -29736,7 +29751,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2087.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2087.obj_num = 0;
- cdat->dobj_2087.obj_hash = 297717996;
+ cdat->dobj_2087.obj_hash = 915949835;
cdat->dobj_2087.obj_len = 2;
/*^iniobj */
@@ -29757,7 +29772,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2088.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2088.obj_num = 1;
- cdat->dobj_2088.obj_hash = 588747424;
+ cdat->dobj_2088.obj_hash = 792058628;
cdat->dobj_2088.obj_len = 2;
@@ -29843,7 +29858,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2095__ADD2OUT_CCOMSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2095__ADD2OUT_CCOMSTRING.obj_hash = 468190812;
+ cdat->dobj_2095__ADD2OUT_CCOMSTRING.obj_hash = 361363522;
cdat->dobj_2095__ADD2OUT_CCOMSTRING.obj_len = 5;
/*inimult dtup_2096__ADD2OUT_CCOMSTRING */
@@ -29876,7 +29891,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2098.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2098.obj_num = 0;
- cdat->dobj_2098.obj_hash = 591295525;
+ cdat->dobj_2098.obj_hash = 24181223;
cdat->dobj_2098.obj_len = 2;
/*^iniobj */
@@ -29897,7 +29912,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2099.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2099.obj_num = 1;
- cdat->dobj_2099.obj_hash = 122178973;
+ cdat->dobj_2099.obj_hash = 922254466;
cdat->dobj_2099.obj_len = 2;
@@ -29983,7 +29998,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2106__ADD2OUT_CCOMSTRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2106__ADD2OUT_CCOMSTRBUF.obj_hash = 737418223;
+ cdat->dobj_2106__ADD2OUT_CCOMSTRBUF.obj_hash = 874345575;
cdat->dobj_2106__ADD2OUT_CCOMSTRBUF.obj_len = 5;
/*inimult dtup_2107__ADD2OUT_CCOMSTRBUF */
@@ -30016,7 +30031,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2109.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2109.obj_num = 0;
- cdat->dobj_2109.obj_hash = 461788742;
+ cdat->dobj_2109.obj_hash = 581684528;
cdat->dobj_2109.obj_len = 2;
/*^iniobj */
@@ -30037,7 +30052,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2110.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2110.obj_num = 1;
- cdat->dobj_2110.obj_hash = 951383619;
+ cdat->dobj_2110.obj_hash = 825141158;
cdat->dobj_2110.obj_len = 2;
@@ -30123,7 +30138,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2117__ADD2OUT_CCOMCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2117__ADD2OUT_CCOMCONST.obj_hash = 66357371;
+ cdat->dobj_2117__ADD2OUT_CCOMCONST.obj_hash = 791661314;
cdat->dobj_2117__ADD2OUT_CCOMCONST.obj_len = 5;
/*inimult dtup_2118__ADD2OUT_CCOMCONST */
@@ -30156,7 +30171,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2120.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2120.obj_num = 0;
- cdat->dobj_2120.obj_hash = 551303562;
+ cdat->dobj_2120.obj_hash = 429488733;
cdat->dobj_2120.obj_len = 2;
/*^iniobj */
@@ -30177,7 +30192,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2121.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2121.obj_num = 1;
- cdat->dobj_2121.obj_hash = 743554576;
+ cdat->dobj_2121.obj_hash = 1043360957;
cdat->dobj_2121.obj_len = 2;
@@ -30260,7 +30275,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2128__ADD2OUT_CIDENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2128__ADD2OUT_CIDENT.obj_hash = 404746231;
+ cdat->dobj_2128__ADD2OUT_CIDENT.obj_hash = 478292000;
cdat->dobj_2128__ADD2OUT_CIDENT.obj_len = 5;
/*inimult dtup_2129__ADD2OUT_CIDENT */
@@ -30293,7 +30308,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2131.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2131.obj_num = 0;
- cdat->dobj_2131.obj_hash = 793588743;
+ cdat->dobj_2131.obj_hash = 678042295;
cdat->dobj_2131.obj_len = 2;
/*^iniobj */
@@ -30314,7 +30329,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2132.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2132.obj_num = 1;
- cdat->dobj_2132.obj_hash = 431605643;
+ cdat->dobj_2132.obj_hash = 903849314;
cdat->dobj_2132.obj_len = 2;
@@ -30399,7 +30414,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2139__ADD2OUT_CIDENTPREFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2139__ADD2OUT_CIDENTPREFIX.obj_hash = 210473655;
+ cdat->dobj_2139__ADD2OUT_CIDENTPREFIX.obj_hash = 307495368;
cdat->dobj_2139__ADD2OUT_CIDENTPREFIX.obj_len = 5;
/*inimult dtup_2140__ADD2OUT_CIDENTPREFIX */
@@ -30432,7 +30447,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2142.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2142.obj_num = 0;
- cdat->dobj_2142.obj_hash = 502689528;
+ cdat->dobj_2142.obj_hash = 949115342;
cdat->dobj_2142.obj_len = 2;
/*^iniobj */
@@ -30453,7 +30468,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2143.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2143.obj_num = 1;
- cdat->dobj_2143.obj_hash = 1040634853;
+ cdat->dobj_2143.obj_hash = 228849232;
cdat->dobj_2143.obj_len = 2;
/*^iniobj */
@@ -30474,7 +30489,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2144.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2144.obj_num = 2;
- cdat->dobj_2144.obj_hash = 461457795;
+ cdat->dobj_2144.obj_hash = 978862042;
cdat->dobj_2144.obj_len = 2;
@@ -30565,7 +30580,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2152__ADD2OUT_LONGDEC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2152__ADD2OUT_LONGDEC.obj_hash = 428235501;
+ cdat->dobj_2152__ADD2OUT_LONGDEC.obj_hash = 529453043;
cdat->dobj_2152__ADD2OUT_LONGDEC.obj_len = 5;
/*inimult dtup_2153__ADD2OUT_LONGDEC */
@@ -30598,7 +30613,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2155.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2155.obj_num = 0;
- cdat->dobj_2155.obj_hash = 974463193;
+ cdat->dobj_2155.obj_hash = 408634128;
cdat->dobj_2155.obj_len = 2;
/*^iniobj */
@@ -30619,7 +30634,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2156.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2156.obj_num = 1;
- cdat->dobj_2156.obj_hash = 791178640;
+ cdat->dobj_2156.obj_hash = 951238586;
cdat->dobj_2156.obj_len = 2;
@@ -30702,7 +30717,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2163__ADD2OUT_LONGHEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2163__ADD2OUT_LONGHEX.obj_hash = 123412605;
+ cdat->dobj_2163__ADD2OUT_LONGHEX.obj_hash = 620174578;
cdat->dobj_2163__ADD2OUT_LONGHEX.obj_len = 5;
/*inimult dtup_2164__ADD2OUT_LONGHEX */
@@ -30735,7 +30750,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2166.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2166.obj_num = 0;
- cdat->dobj_2166.obj_hash = 893535896;
+ cdat->dobj_2166.obj_hash = 926342696;
cdat->dobj_2166.obj_len = 2;
/*^iniobj */
@@ -30756,7 +30771,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2167.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2167.obj_num = 1;
- cdat->dobj_2167.obj_hash = 530115582;
+ cdat->dobj_2167.obj_hash = 793477064;
cdat->dobj_2167.obj_len = 2;
@@ -30840,7 +30855,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2174__ADD2OUT_ROUTINEDESCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2174__ADD2OUT_ROUTINEDESCR.obj_hash = 22846886;
+ cdat->dobj_2174__ADD2OUT_ROUTINEDESCR.obj_hash = 351472496;
cdat->dobj_2174__ADD2OUT_ROUTINEDESCR.obj_len = 5;
/*inimult dtup_2175__ADD2OUT_ROUTINEDESCR */
@@ -30873,7 +30888,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2177.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2177.obj_num = 0;
- cdat->dobj_2177.obj_hash = 964387605;
+ cdat->dobj_2177.obj_hash = 164370946;
cdat->dobj_2177.obj_len = 2;
/*^iniobj */
@@ -30894,7 +30909,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2178.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2178.obj_num = 1;
- cdat->dobj_2178.obj_hash = 812725378;
+ cdat->dobj_2178.obj_hash = 188666942;
cdat->dobj_2178.obj_len = 2;
@@ -31031,7 +31046,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2189.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2189.obj_num = 0;
- cdat->dobj_2189.obj_hash = 693105399;
+ cdat->dobj_2189.obj_hash = 700410014;
cdat->dobj_2189.obj_len = 2;
/*^iniobj */
@@ -31052,7 +31067,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2190.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2190.obj_num = 1;
- cdat->dobj_2190.obj_hash = 166699410;
+ cdat->dobj_2190.obj_hash = 873574861;
cdat->dobj_2190.obj_len = 2;
/*inimult dtup_2191__ADD_TO_OUT */
@@ -31076,7 +31091,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2192__ADD_TO_OUT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V9*/ meltfptr[8]);
- cdat->dobj_2192__ADD_TO_OUT.obj_hash = 89179197;
+ cdat->dobj_2192__ADD_TO_OUT.obj_hash = 985287811;
cdat->dobj_2192__ADD_TO_OUT.obj_len = 4;
@@ -31523,7 +31538,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2230__CSTRING_SAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_2230__CSTRING_SAME.obj_hash = 321594980;
+ cdat->dobj_2230__CSTRING_SAME.obj_hash = 805211774;
cdat->dobj_2230__CSTRING_SAME.obj_len = 9;
@@ -31554,7 +31569,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2232.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2232.obj_num = 0;
- cdat->dobj_2232.obj_hash = 772997571;
+ cdat->dobj_2232.obj_hash = 936612623;
cdat->dobj_2232.obj_len = 2;
/*inimult dtup_2233__CSTRING_SAME */
@@ -31580,7 +31595,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2234.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_2234.obj_hash = 318882631;
+ cdat->dobj_2234.obj_hash = 1037892981;
cdat->dobj_2234.obj_len = 2;
/*inimult dtup_2235__CSTRING_SAME */
@@ -31680,7 +31695,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2245__CSTRING_PREFIXED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_2245__CSTRING_PREFIXED.obj_hash = 805211774;
+ cdat->dobj_2245__CSTRING_PREFIXED.obj_hash = 570714405;
cdat->dobj_2245__CSTRING_PREFIXED.obj_len = 9;
@@ -31711,7 +31726,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2247.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2247.obj_num = 0;
- cdat->dobj_2247.obj_hash = 325282799;
+ cdat->dobj_2247.obj_hash = 740997124;
cdat->dobj_2247.obj_len = 2;
/*inimult dtup_2248__CSTRING_PREFIXED */
@@ -31737,7 +31752,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2249.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_2249.obj_hash = 565896488;
+ cdat->dobj_2249.obj_hash = 220362838;
cdat->dobj_2249.obj_len = 2;
/*inimult dtup_2250__CSTRING_PREFIXED */
@@ -31877,7 +31892,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2263__CSTRING_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2263__CSTRING_LENGTH.obj_hash = 313060926;
+ cdat->dobj_2263__CSTRING_LENGTH.obj_hash = 617995201;
cdat->dobj_2263__CSTRING_LENGTH.obj_len = 5;
/*inimult dtup_2264__CSTRING_LENGTH */
@@ -31910,7 +31925,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2266.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2266.obj_num = 0;
- cdat->dobj_2266.obj_hash = 582431647;
+ cdat->dobj_2266.obj_hash = 261028653;
cdat->dobj_2266.obj_len = 2;
@@ -32027,7 +32042,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2277__MAPSTRING_SIZE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2277__MAPSTRING_SIZE.obj_hash = 349823168;
+ cdat->dobj_2277__MAPSTRING_SIZE.obj_hash = 942555063;
cdat->dobj_2277__MAPSTRING_SIZE.obj_len = 5;
/*inimult dtup_2278__MAPSTRING_SIZE */
@@ -32086,7 +32101,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2282.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2282.obj_num = 0;
- cdat->dobj_2282.obj_hash = 1067101901;
+ cdat->dobj_2282.obj_hash = 1055343048;
cdat->dobj_2282.obj_len = 2;
@@ -32162,7 +32177,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2288__MAPSTRING_COUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2288__MAPSTRING_COUNT.obj_hash = 474409724;
+ cdat->dobj_2288__MAPSTRING_COUNT.obj_hash = 814006792;
cdat->dobj_2288__MAPSTRING_COUNT.obj_len = 5;
/*inimult dtup_2289__MAPSTRING_COUNT */
@@ -32195,7 +32210,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2291.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2291.obj_num = 0;
- cdat->dobj_2291.obj_hash = 400775250;
+ cdat->dobj_2291.obj_hash = 854590243;
cdat->dobj_2291.obj_len = 2;
@@ -32271,7 +32286,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2297__MAPSTRING_RAWGET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2297__MAPSTRING_RAWGET.obj_hash = 812843595;
+ cdat->dobj_2297__MAPSTRING_RAWGET.obj_hash = 516757131;
cdat->dobj_2297__MAPSTRING_RAWGET.obj_len = 5;
/*inimult dtup_2298__MAPSTRING_RAWGET */
@@ -32304,7 +32319,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2300.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2300.obj_num = 0;
- cdat->dobj_2300.obj_hash = 182848393;
+ cdat->dobj_2300.obj_hash = 593530376;
cdat->dobj_2300.obj_len = 2;
/*^iniobj */
@@ -32325,7 +32340,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2301.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2301.obj_num = 1;
- cdat->dobj_2301.obj_hash = 121799664;
+ cdat->dobj_2301.obj_hash = 1003226804;
cdat->dobj_2301.obj_len = 2;
@@ -32408,7 +32423,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2308__MAPSTRING_RAWPUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2308__MAPSTRING_RAWPUT.obj_hash = 191752290;
+ cdat->dobj_2308__MAPSTRING_RAWPUT.obj_hash = 381446297;
cdat->dobj_2308__MAPSTRING_RAWPUT.obj_len = 5;
/*inimult dtup_2309__MAPSTRING_RAWPUT */
@@ -32441,7 +32456,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2311.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2311.obj_num = 0;
- cdat->dobj_2311.obj_hash = 325807978;
+ cdat->dobj_2311.obj_hash = 750732367;
cdat->dobj_2311.obj_len = 2;
@@ -32488,7 +32503,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2314.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2314.obj_num = 1;
- cdat->dobj_2314.obj_hash = 609798332;
+ cdat->dobj_2314.obj_hash = 396945717;
cdat->dobj_2314.obj_len = 2;
/*^iniobj */
@@ -32509,7 +32524,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2315.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2315.obj_num = 2;
- cdat->dobj_2315.obj_hash = 753078950;
+ cdat->dobj_2315.obj_hash = 466509072;
cdat->dobj_2315.obj_len = 2;
@@ -32602,7 +32617,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2323__MAPSTRING_RAWREMOVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2323__MAPSTRING_RAWREMOVE.obj_hash = 750910185;
+ cdat->dobj_2323__MAPSTRING_RAWREMOVE.obj_hash = 309247102;
cdat->dobj_2323__MAPSTRING_RAWREMOVE.obj_len = 5;
/*inimult dtup_2324__MAPSTRING_RAWREMOVE */
@@ -32635,7 +32650,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2326.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2326.obj_num = 0;
- cdat->dobj_2326.obj_hash = 394083279;
+ cdat->dobj_2326.obj_hash = 599957375;
cdat->dobj_2326.obj_len = 2;
/*^iniobj */
@@ -32656,7 +32671,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2327.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2327.obj_num = 1;
- cdat->dobj_2327.obj_hash = 163123455;
+ cdat->dobj_2327.obj_hash = 851621946;
cdat->dobj_2327.obj_len = 2;
@@ -32796,7 +32811,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2340__MELT_APPLICATION_DEPTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2340__MELT_APPLICATION_DEPTH.obj_hash = 486811906;
+ cdat->dobj_2340__MELT_APPLICATION_DEPTH.obj_hash = 525313922;
cdat->dobj_2340__MELT_APPLICATION_DEPTH.obj_len = 5;
/*inimult dtup_2341__MELT_APPLICATION_DEPTH */
@@ -32878,7 +32893,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2347__MELT_APPLICATION_SHALLOWER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2347__MELT_APPLICATION_SHALLOWER.obj_hash = 164865121;
+ cdat->dobj_2347__MELT_APPLICATION_SHALLOWER.obj_hash = 645154961;
cdat->dobj_2347__MELT_APPLICATION_SHALLOWER.obj_len = 5;
/*inimult dtup_2348__MELT_APPLICATION_SHALLOWER */
@@ -32911,7 +32926,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2350.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2350.obj_num = 0;
- cdat->dobj_2350.obj_hash = 938372778;
+ cdat->dobj_2350.obj_hash = 564954976;
cdat->dobj_2350.obj_len = 2;
@@ -32988,7 +33003,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2356__MELT_APPLICATION_COUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2356__MELT_APPLICATION_COUNT.obj_hash = 547072593;
+ cdat->dobj_2356__MELT_APPLICATION_COUNT.obj_hash = 241099978;
cdat->dobj_2356__MELT_APPLICATION_COUNT.obj_len = 5;
/*inimult dtup_2357__MELT_APPLICATION_COUNT */
@@ -33097,7 +33112,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2365__MELT_MODE_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V19*/ meltfptr[18]);
- cdat->dobj_2365__MELT_MODE_CONTAINER.obj_hash = 1002480117;
+ cdat->dobj_2365__MELT_MODE_CONTAINER.obj_hash = 371621527;
cdat->dobj_2365__MELT_MODE_CONTAINER.obj_len = 1;
@@ -33147,7 +33162,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2368__PASS_EXECUTION_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V19*/ meltfptr[18]);
- cdat->dobj_2368__PASS_EXECUTION_CONTAINER.obj_hash = 804837495;
+ cdat->dobj_2368__PASS_EXECUTION_CONTAINER.obj_hash = 934478102;
cdat->dobj_2368__PASS_EXECUTION_CONTAINER.obj_len = 1;
/*inirout drout_2369__RUN_ALL_PASS_EXECUTION_HOOKS */
@@ -33439,7 +33454,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2391__PREGENERICIZE_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2391__PREGENERICIZE_DELAYED_QUEUE.obj_hash = 331757721;
+ cdat->dobj_2391__PREGENERICIZE_DELAYED_QUEUE.obj_hash = 602847156;
cdat->dobj_2391__PREGENERICIZE_DELAYED_QUEUE.obj_len = 5;
@@ -33584,7 +33599,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2403__FINISHTYPE_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2403__FINISHTYPE_DELAYED_QUEUE.obj_hash = 1033715500;
+ cdat->dobj_2403__FINISHTYPE_DELAYED_QUEUE.obj_hash = 538914093;
cdat->dobj_2403__FINISHTYPE_DELAYED_QUEUE.obj_len = 5;
@@ -33644,7 +33659,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2407__MELT_NOTIFY_FINISH_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2407__MELT_NOTIFY_FINISH_TYPE.obj_hash = 862181796;
+ cdat->dobj_2407__MELT_NOTIFY_FINISH_TYPE.obj_hash = 354494970;
cdat->dobj_2407__MELT_NOTIFY_FINISH_TYPE.obj_len = 5;
/*inimult dtup_2408__MELT_NOTIFY_FINISH_TYPE */
@@ -33785,7 +33800,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2420__MELT_NOTIFY_FINISH_DECL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2420__MELT_NOTIFY_FINISH_DECL.obj_hash = 993967804;
+ cdat->dobj_2420__MELT_NOTIFY_FINISH_DECL.obj_hash = 1016099421;
cdat->dobj_2420__MELT_NOTIFY_FINISH_DECL.obj_len = 5;
/*inimult dtup_2421__MELT_NOTIFY_FINISH_DECL */
@@ -33867,7 +33882,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2427__FINISHDECL_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2427__FINISHDECL_DELAYED_QUEUE.obj_hash = 1053259546;
+ cdat->dobj_2427__FINISHDECL_DELAYED_QUEUE.obj_hash = 177321471;
cdat->dobj_2427__FINISHDECL_DELAYED_QUEUE.obj_len = 5;
@@ -33987,7 +34002,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2437__ALL_PASSES_START_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2437__ALL_PASSES_START_DELAYED_QUEUE.obj_hash = 695795520;
+ cdat->dobj_2437__ALL_PASSES_START_DELAYED_QUEUE.obj_hash = 493602836;
cdat->dobj_2437__ALL_PASSES_START_DELAYED_QUEUE.obj_len = 5;
@@ -34106,7 +34121,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2447__ALL_PASSES_END_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2447__ALL_PASSES_END_DELAYED_QUEUE.obj_hash = 900760146;
+ cdat->dobj_2447__ALL_PASSES_END_DELAYED_QUEUE.obj_hash = 211602723;
cdat->dobj_2447__ALL_PASSES_END_DELAYED_QUEUE.obj_len = 5;
@@ -34226,7 +34241,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2457__ALL_IPA_PASSES_START_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2457__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_hash = 987381227;
+ cdat->dobj_2457__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_hash = 464839496;
cdat->dobj_2457__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_len = 5;
@@ -34349,7 +34364,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2467__ALL_IPA_PASSES_END_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2467__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_hash = 1018748686;
+ cdat->dobj_2467__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_hash = 53555632;
cdat->dobj_2467__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_len = 5;
@@ -34472,7 +34487,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2477__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
cdat->dobj_2477__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.obj_hash =
- 1056970228;
+ 327311716;
cdat->dobj_2477__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.obj_len = 5;
@@ -34595,7 +34610,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2487__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V24*/ meltfptr[23]);
- cdat->dobj_2487__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_hash = 647369852;
+ cdat->dobj_2487__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_hash = 669857745;
cdat->dobj_2487__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_len = 5;
@@ -34718,7 +34733,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2497__CLASS_VALUE_DESCRIPTOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_2497__CLASS_VALUE_DESCRIPTOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_2497__CLASS_VALUE_DESCRIPTOR.obj_hash = 90290473;
+ cdat->dobj_2497__CLASS_VALUE_DESCRIPTOR.obj_hash = 114060031;
cdat->dobj_2497__CLASS_VALUE_DESCRIPTOR.obj_len = 8;
@@ -34789,7 +34804,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2503__VALDESC_OBJMAGIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2503__VALDESC_OBJMAGIC.obj_num = 2;
- cdat->dobj_2503__VALDESC_OBJMAGIC.obj_hash = 702353556;
+ cdat->dobj_2503__VALDESC_OBJMAGIC.obj_hash = 653280716;
cdat->dobj_2503__VALDESC_OBJMAGIC.obj_len = 4;
@@ -34848,7 +34863,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2507__VALDESC_STRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2507__VALDESC_STRUCT.obj_num = 3;
- cdat->dobj_2507__VALDESC_STRUCT.obj_hash = 775321484;
+ cdat->dobj_2507__VALDESC_STRUCT.obj_hash = 533208887;
cdat->dobj_2507__VALDESC_STRUCT.obj_len = 4;
@@ -34907,7 +34922,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2511__VALDESC_UNIONMEM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2511__VALDESC_UNIONMEM.obj_num = 4;
- cdat->dobj_2511__VALDESC_UNIONMEM.obj_hash = 1022352736;
+ cdat->dobj_2511__VALDESC_UNIONMEM.obj_hash = 580646982;
cdat->dobj_2511__VALDESC_UNIONMEM.obj_len = 4;
@@ -34966,7 +34981,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2515__VALDESC_GTY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2515__VALDESC_GTY.obj_num = 5;
- cdat->dobj_2515__VALDESC_GTY.obj_hash = 424048724;
+ cdat->dobj_2515__VALDESC_GTY.obj_hash = 208774636;
cdat->dobj_2515__VALDESC_GTY.obj_len = 4;
@@ -35025,7 +35040,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2519__VALDESC_MEMBCHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2519__VALDESC_MEMBCHUNK.obj_num = 6;
- cdat->dobj_2519__VALDESC_MEMBCHUNK.obj_hash = 870444172;
+ cdat->dobj_2519__VALDESC_MEMBCHUNK.obj_hash = 857981625;
cdat->dobj_2519__VALDESC_MEMBCHUNK.obj_len = 4;
@@ -35084,7 +35099,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2523__VALDESC_DECLCHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2523__VALDESC_DECLCHUNK.obj_num = 7;
- cdat->dobj_2523__VALDESC_DECLCHUNK.obj_hash = 1008624656;
+ cdat->dobj_2523__VALDESC_DECLCHUNK.obj_hash = 720499806;
cdat->dobj_2523__VALDESC_DECLCHUNK.obj_len = 4;
@@ -35143,7 +35158,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2527__VALDESC_COPYCHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2527__VALDESC_COPYCHUNK.obj_num = 8;
- cdat->dobj_2527__VALDESC_COPYCHUNK.obj_hash = 251570308;
+ cdat->dobj_2527__VALDESC_COPYCHUNK.obj_hash = 17463358;
cdat->dobj_2527__VALDESC_COPYCHUNK.obj_len = 4;
@@ -35202,7 +35217,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2531__VALDESC_FORWCHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2531__VALDESC_FORWCHUNK.obj_num = 9;
- cdat->dobj_2531__VALDESC_FORWCHUNK.obj_hash = 474469189;
+ cdat->dobj_2531__VALDESC_FORWCHUNK.obj_hash = 76047853;
cdat->dobj_2531__VALDESC_FORWCHUNK.obj_len = 4;
@@ -35261,7 +35276,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2535__VALDESC_CLONECHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2535__VALDESC_CLONECHUNK.obj_num = 10;
- cdat->dobj_2535__VALDESC_CLONECHUNK.obj_hash = 842766777;
+ cdat->dobj_2535__VALDESC_CLONECHUNK.obj_hash = 157027113;
cdat->dobj_2535__VALDESC_CLONECHUNK.obj_len = 4;
@@ -35324,7 +35339,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_2539__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_2539__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_hash = 76047853;
+ cdat->dobj_2539__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_hash = 283279361;
cdat->dobj_2539__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_len = 8;
@@ -35415,7 +35430,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2547__VALUE_DESCRIPTOR_LIST_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V19*/ meltfptr[18]);
- cdat->dobj_2547__VALUE_DESCRIPTOR_LIST_CONTAINER.obj_hash = 526171469;
+ cdat->dobj_2547__VALUE_DESCRIPTOR_LIST_CONTAINER.obj_hash = 575063183;
cdat->dobj_2547__VALUE_DESCRIPTOR_LIST_CONTAINER.obj_len = 1;
/*inirout drout_2548__INSTALL_VALUE_DESCRIPTOR */
@@ -35502,7 +35517,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2554__VALDESC_OBJECT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2554__VALDESC_OBJECT.obj_hash = 376038348;
+ cdat->dobj_2554__VALDESC_OBJECT.obj_hash = 906271433;
cdat->dobj_2554__VALDESC_OBJECT.obj_len = 11;
@@ -35706,7 +35721,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2566__VALDESC_MAPOBJECTS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2566__VALDESC_MAPOBJECTS.obj_hash = 1044350433;
+ cdat->dobj_2566__VALDESC_MAPOBJECTS.obj_hash = 499010046;
cdat->dobj_2566__VALDESC_MAPOBJECTS.obj_len = 11;
@@ -35955,7 +35970,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2578__VALDESC_MAPSTRINGS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2578__VALDESC_MAPSTRINGS.obj_hash = 637622412;
+ cdat->dobj_2578__VALDESC_MAPSTRINGS.obj_hash = 51889221;
cdat->dobj_2578__VALDESC_MAPSTRINGS.obj_len = 11;
@@ -36178,7 +36193,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2589__VALDESC_DECAY.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2589__VALDESC_DECAY.obj_hash = 61504089;
+ cdat->dobj_2589__VALDESC_DECAY.obj_hash = 141375391;
cdat->dobj_2589__VALDESC_DECAY.obj_len = 11;
@@ -36340,7 +36355,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2602__VALDESC_MULTIPLE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2602__VALDESC_MULTIPLE.obj_hash = 194571588;
+ cdat->dobj_2602__VALDESC_MULTIPLE.obj_hash = 32516719;
cdat->dobj_2602__VALDESC_MULTIPLE.obj_len = 11;
@@ -36524,7 +36539,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2614__VALDESC_CLOSURE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2614__VALDESC_CLOSURE.obj_hash = 234203952;
+ cdat->dobj_2614__VALDESC_CLOSURE.obj_hash = 619151704;
cdat->dobj_2614__VALDESC_CLOSURE.obj_len = 11;
@@ -36710,7 +36725,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2626__VALDESC_ROUTINE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2626__VALDESC_ROUTINE.obj_hash = 727704953;
+ cdat->dobj_2626__VALDESC_ROUTINE.obj_hash = 566323708;
cdat->dobj_2626__VALDESC_ROUTINE.obj_len = 11;
@@ -36881,7 +36896,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2637__VALDESC_STRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2637__VALDESC_STRING.obj_hash = 800975082;
+ cdat->dobj_2637__VALDESC_STRING.obj_hash = 316356233;
cdat->dobj_2637__VALDESC_STRING.obj_len = 11;
@@ -37027,7 +37042,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2648__VALDESC_STRBUF.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2648__VALDESC_STRBUF.obj_hash = 524153571;
+ cdat->dobj_2648__VALDESC_STRBUF.obj_hash = 542956675;
cdat->dobj_2648__VALDESC_STRBUF.obj_len = 11;
@@ -37204,7 +37219,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2658__VALDESC_PAIR.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2658__VALDESC_PAIR.obj_hash = 632064994;
+ cdat->dobj_2658__VALDESC_PAIR.obj_hash = 191133652;
cdat->dobj_2658__VALDESC_PAIR.obj_len = 11;
@@ -37353,7 +37368,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2670__VALDESC_LIST.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2670__VALDESC_LIST.obj_hash = 765076158;
+ cdat->dobj_2670__VALDESC_LIST.obj_hash = 470635385;
cdat->dobj_2670__VALDESC_LIST.obj_len = 11;
@@ -37527,7 +37542,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2682__VALDESC_INT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2682__VALDESC_INT.obj_hash = 261049382;
+ cdat->dobj_2682__VALDESC_INT.obj_hash = 602472380;
cdat->dobj_2682__VALDESC_INT.obj_len = 11;
@@ -37663,7 +37678,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2692__VALDESC_MIXINT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2692__VALDESC_MIXINT.obj_hash = 943191007;
+ cdat->dobj_2692__VALDESC_MIXINT.obj_hash = 17435262;
cdat->dobj_2692__VALDESC_MIXINT.obj_len = 11;
@@ -37793,7 +37808,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2702__VALDESC_MIXLOC.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2702__VALDESC_MIXLOC.obj_hash = 1025567735;
+ cdat->dobj_2702__VALDESC_MIXLOC.obj_hash = 40817373;
cdat->dobj_2702__VALDESC_MIXLOC.obj_len = 11;
@@ -37923,7 +37938,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2712__VALDESC_MIXBIGINT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2564*/ meltfptr[2563]);
- cdat->dobj_2712__VALDESC_MIXBIGINT.obj_hash = 488911057;
+ cdat->dobj_2712__VALDESC_MIXBIGINT.obj_hash = 842037666;
cdat->dobj_2712__VALDESC_MIXBIGINT.obj_len = 11;
@@ -38077,7 +38092,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2722__VALDESC_REAL.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2722__VALDESC_REAL.obj_hash = 271841644;
+ cdat->dobj_2722__VALDESC_REAL.obj_hash = 341145322;
cdat->dobj_2722__VALDESC_REAL.obj_len = 11;
@@ -38198,7 +38213,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2731__VALDESC_SPECIAL_FILE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2731__VALDESC_SPECIAL_FILE.obj_hash = 794337595;
+ cdat->dobj_2731__VALDESC_SPECIAL_FILE.obj_hash = 138066166;
cdat->dobj_2731__VALDESC_SPECIAL_FILE.obj_len = 11;
@@ -38345,7 +38360,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2742__VALDESC_SPECIAL_RAW_FILE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2742__VALDESC_SPECIAL_RAW_FILE.obj_hash = 302162013;
+ cdat->dobj_2742__VALDESC_SPECIAL_RAW_FILE.obj_hash = 564281923;
cdat->dobj_2742__VALDESC_SPECIAL_RAW_FILE.obj_len = 11;
@@ -38496,7 +38511,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2753__VALDESC_SPECIAL_MPFR.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2753__VALDESC_SPECIAL_MPFR.obj_hash = 453397367;
+ cdat->dobj_2753__VALDESC_SPECIAL_MPFR.obj_hash = 212264322;
cdat->dobj_2753__VALDESC_SPECIAL_MPFR.obj_len = 11;
@@ -38644,7 +38659,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2764__VALDESC_SPECIAL_PPL_COEFFICIENT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2764__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_hash = 9986572;
+ cdat->dobj_2764__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_hash = 631981468;
cdat->dobj_2764__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_len = 11;
@@ -38798,7 +38813,8 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2775__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2775__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_hash = 551607658;
+ cdat->dobj_2775__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_hash =
+ 1009605632;
cdat->dobj_2775__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_len = 11;
@@ -38951,7 +38967,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2786__VALDESC_SPECIAL_PPL_CONSTRAINT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2786__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_hash = 356059181;
+ cdat->dobj_2786__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_hash = 125759248;
cdat->dobj_2786__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_len = 11;
@@ -39104,7 +39120,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2797__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2797__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_hash = 356671704;
+ cdat->dobj_2797__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_hash = 785284273;
cdat->dobj_2797__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_len = 11;
@@ -39256,7 +39272,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2808__VALDESC_SPECIAL_PPL_GENERATOR.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2808__VALDESC_SPECIAL_PPL_GENERATOR.obj_hash = 755033494;
+ cdat->dobj_2808__VALDESC_SPECIAL_PPL_GENERATOR.obj_hash = 267593463;
cdat->dobj_2808__VALDESC_SPECIAL_PPL_GENERATOR.obj_len = 11;
@@ -39408,7 +39424,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2819__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2819__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_hash = 470583063;
+ cdat->dobj_2819__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_hash = 1055936757;
cdat->dobj_2819__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_len = 11;
@@ -39561,7 +39577,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2830__VALDESC_SPECIAL_PPL_POLYHEDRON.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2522*/ meltfptr[2521]);
- cdat->dobj_2830__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_hash = 580165774;
+ cdat->dobj_2830__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_hash = 55949739;
cdat->dobj_2830__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_len = 11;
@@ -39712,7 +39728,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2841__VARIADIC_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2841__VARIADIC_INDEX.obj_hash = 846557903;
+ cdat->dobj_2841__VARIADIC_INDEX.obj_hash = 278856466;
cdat->dobj_2841__VARIADIC_INDEX.obj_len = 5;
/*inimult dtup_2842__VARIADIC_INDEX */
@@ -39793,7 +39809,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2848__VARIADIC_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2848__VARIADIC_LENGTH.obj_hash = 392440030;
+ cdat->dobj_2848__VARIADIC_LENGTH.obj_hash = 176597195;
cdat->dobj_2848__VARIADIC_LENGTH.obj_len = 5;
/*inimult dtup_2849__VARIADIC_LENGTH */
@@ -39874,7 +39890,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2855__VARIADIC_SKIP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2855__VARIADIC_SKIP.obj_hash = 681955650;
+ cdat->dobj_2855__VARIADIC_SKIP.obj_hash = 448175482;
cdat->dobj_2855__VARIADIC_SKIP.obj_len = 5;
/*inimult dtup_2856__VARIADIC_SKIP */
@@ -39933,7 +39949,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2860.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2860.obj_num = 0;
- cdat->dobj_2860.obj_hash = 739368585;
+ cdat->dobj_2860.obj_hash = 376390342;
cdat->dobj_2860.obj_len = 2;
@@ -40021,7 +40037,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2866__VARIADIC_TYPE_CODE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2866__VARIADIC_TYPE_CODE.obj_hash = 806974115;
+ cdat->dobj_2866__VARIADIC_TYPE_CODE.obj_hash = 1040047493;
cdat->dobj_2866__VARIADIC_TYPE_CODE.obj_len = 5;
/*inimult dtup_2867__VARIADIC_TYPE_CODE */
@@ -40054,7 +40070,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2869.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2869.obj_num = 0;
- cdat->dobj_2869.obj_hash = 792510035;
+ cdat->dobj_2869.obj_hash = 326717573;
cdat->dobj_2869.obj_len = 2;
@@ -40151,7 +40167,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2877__VARIADIC_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2877__VARIADIC_CTYPE.obj_hash = 1006371843;
+ cdat->dobj_2877__VARIADIC_CTYPE.obj_hash = 878035827;
cdat->dobj_2877__VARIADIC_CTYPE.obj_len = 5;
/*inimult dtup_2878__VARIADIC_CTYPE */
@@ -40184,7 +40200,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
cdat->dobj_2880.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2880.obj_num = 0;
- cdat->dobj_2880.obj_hash = 447901347;
+ cdat->dobj_2880.obj_hash = 1053847072;
cdat->dobj_2880.obj_len = 2;
@@ -40234,1468 +40250,1646 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__,
sizeof (cdat->dstr_2885__VARIADIC_CTYPE.val) -
1);
-/*iniobj dsym_2886__IV*/
+/*iniobj dsym_2886__INCREMENT*/
/*uniqueobj*/ if (! /*_.VALDATA___V2912*/ meltfptr[2911])
/*_.VALDATA___V2912*/
- meltfptr[2911] = (void *) &cdat->dsym_2886__IV;
+ meltfptr[2911] = (void *) &cdat->dsym_2886__INCREMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2886__IV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2886__INCREMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2886__IV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2886__INCREMENT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2886__IV.meltobj_class =
+ cdat->dsym_2886__INCREMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2886__IV.obj_hash = 963441227;
- cdat->dsym_2886__IV.obj_len = 3;
+ cdat->dsym_2886__INCREMENT.obj_hash = 416244744;
+ cdat->dsym_2886__INCREMENT.obj_len = 3;
-/*inistring dstr_2887__IV*/
- /*_.VALSTR___V2913*/ meltfptr[2912] = (void *) &cdat->dstr_2887__IV;
- cdat->dstr_2887__IV.discr =
+/*inistring dstr_2887__INCREMENT*/
+ /*_.VALSTR___V2913*/ meltfptr[2912] = (void *) &cdat->dstr_2887__INCREMENT;
+ cdat->dstr_2887__INCREMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2887__IV.val, "+IV",
- sizeof (cdat->dstr_2887__IV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2887__INCREMENT.val, "INCREMENT",
+ sizeof (cdat->dstr_2887__INCREMENT.val) - 1);
+ MELT_LOCATION ("warmelt-base.melt:3700:/ iniobj");
-/*iniobj dsym_2888__IV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2914*/ meltfptr[2913])
- /*_.VALDATA___V2914*/
- meltfptr[2913] = (void *) &cdat->dsym_2888__IV;
+/*iniobj dobj_2888__INCREMENT*/
+/*_.VALDATA___V2914*/ meltfptr[2913] = (void *) &cdat->dobj_2888__INCREMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2888__IV",
+ melt_assertmsg ("iniobj check.discr isobj dobj_2888__INCREMENT",
+ melt_magic_discr (((void
+ *) (MELT_PREDEF (CLASS_PRIMITIVE))))
+ == MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dobj_2888__INCREMENT",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_PRIMITIVE)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dobj_2888__INCREMENT.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
+ cdat->dobj_2888__INCREMENT.obj_hash = 247188824;
+ cdat->dobj_2888__INCREMENT.obj_len = 5;
+
+ /*inimult dtup_2889__INCREMENT */
+ /*_.VALTUP___V2926*/ meltfptr[2925] = (void *) &cdat->dtup_2889__INCREMENT;
+ cdat->dtup_2889__INCREMENT.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
+ cdat->dtup_2889__INCREMENT.nbval = 5;
+ /*inimult dtup_2890__INCREMENT */
+ /*_.VALTUP___V2922*/ meltfptr[2921] = (void *) &cdat->dtup_2890__INCREMENT;
+ cdat->dtup_2890__INCREMENT.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
+ cdat->dtup_2890__INCREMENT.nbval = 2;
+
+/*iniobj dsym_2891__LEFT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2917*/ meltfptr[2916])
+ /*_.VALDATA___V2917*/
+ meltfptr[2916] = (void *) &cdat->dsym_2891__LEFT;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_2891__LEFT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2888__IV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2891__LEFT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2888__IV.meltobj_class =
+ cdat->dsym_2891__LEFT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2888__IV.obj_hash = 420432976;
- cdat->dsym_2888__IV.obj_len = 3;
+ cdat->dsym_2891__LEFT.obj_hash = 918788793;
+ cdat->dsym_2891__LEFT.obj_len = 3;
-/*inistring dstr_2889__IV*/
- /*_.VALSTR___V2915*/ meltfptr[2914] = (void *) &cdat->dstr_2889__IV;
- cdat->dstr_2889__IV.discr =
+/*inistring dstr_2892__LEFT*/
+ /*_.VALSTR___V2918*/ meltfptr[2917] = (void *) &cdat->dstr_2892__LEFT;
+ cdat->dstr_2892__LEFT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2889__IV.val, "-IV",
- sizeof (cdat->dstr_2889__IV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2892__LEFT.val, "LEFT",
+ sizeof (cdat->dstr_2892__LEFT.val) - 1);
+ /*^iniobj */
-/*iniobj dsym_2890__IV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2916*/ meltfptr[2915])
- /*_.VALDATA___V2916*/
- meltfptr[2915] = (void *) &cdat->dsym_2890__IV;
+/*iniobj dobj_2893*/
+/*_.VALDATA___V2916*/ meltfptr[2915] = (void *) &cdat->dobj_2893;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2890__IV",
+ melt_assertmsg ("iniobj check.discr isobj dobj_2893",
+ melt_magic_discr (((void
+ *) (MELT_PREDEF
+ (CLASS_FORMAL_BINDING)))) ==
+ MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dobj_2893",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dobj_2893.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
+ cdat->dobj_2893.obj_num = 0;
+ cdat->dobj_2893.obj_hash = 69629617;
+ cdat->dobj_2893.obj_len = 2;
+
+
+/*iniobj dsym_2894__INCR*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2920*/ meltfptr[2919])
+ /*_.VALDATA___V2920*/
+ meltfptr[2919] = (void *) &cdat->dsym_2894__INCR;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_2894__INCR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2890__IV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2894__INCR",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2890__IV.meltobj_class =
+ cdat->dsym_2894__INCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2890__IV.obj_hash = 1048301622;
- cdat->dsym_2890__IV.obj_len = 3;
+ cdat->dsym_2894__INCR.obj_hash = 228881933;
+ cdat->dsym_2894__INCR.obj_len = 3;
+
+/*inistring dstr_2895__INCR*/
+ /*_.VALSTR___V2921*/ meltfptr[2920] = (void *) &cdat->dstr_2895__INCR;
+ cdat->dstr_2895__INCR.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2895__INCR.val, "INCR",
+ sizeof (cdat->dstr_2895__INCR.val) - 1);
+ /*^iniobj */
-/*inistring dstr_2891__IV*/
- /*_.VALSTR___V2917*/ meltfptr[2916] = (void *) &cdat->dstr_2891__IV;
- cdat->dstr_2891__IV.discr =
+/*iniobj dobj_2896*/
+/*_.VALDATA___V2919*/ meltfptr[2918] = (void *) &cdat->dobj_2896;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dobj_2896",
+ melt_magic_discr (((void
+ *) (MELT_PREDEF
+ (CLASS_FORMAL_BINDING)))) ==
+ MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dobj_2896",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dobj_2896.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
+ cdat->dobj_2896.obj_num = 1;
+ cdat->dobj_2896.obj_hash = 802694536;
+ cdat->dobj_2896.obj_len = 2;
+
+
+/*inistring dstr_2897__increment_*/
+ /*_.VALSTR___V2923*/ meltfptr[2922] = (void *) &cdat->dstr_2897__increment_;
+ cdat->dstr_2897__increment_.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_VERBATIM_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2897__increment_.val,
+ " /*increment*/ ",
+ sizeof (cdat->dstr_2897__increment_.val) - 1);
+
+/*inistring dstr_2898__*/
+ /*_.VALSTR___V2924*/ meltfptr[2923] = (void *) &cdat->dstr_2898__;
+ cdat->dstr_2898__.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_VERBATIM_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2898__.val, " += ",
+ sizeof (cdat->dstr_2898__.val) - 1);
+
+/*inistring dstr_2899__*/
+ /*_.VALSTR___V2925*/ meltfptr[2924] = (void *) &cdat->dstr_2899__;
+ cdat->dstr_2899__.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_VERBATIM_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2899__.val, "; \n ",
+ sizeof (cdat->dstr_2899__.val) - 1);
+
+/*inistring dstr_2900__INCREMENT*/
+ /*_.VALSTR___V2915*/ meltfptr[2914] = (void *) &cdat->dstr_2900__INCREMENT;
+ cdat->dstr_2900__INCREMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2891__IV.val, "*IV",
- sizeof (cdat->dstr_2891__IV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2900__INCREMENT.val, "INCREMENT",
+ sizeof (cdat->dstr_2900__INCREMENT.val) - 1);
-/*iniobj dsym_2892__IV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2918*/ meltfptr[2917])
- /*_.VALDATA___V2918*/
- meltfptr[2917] = (void *) &cdat->dsym_2892__IV;
+/*iniobj dsym_2901__IV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2927*/ meltfptr[2926])
+ /*_.VALDATA___V2927*/
+ meltfptr[2926] = (void *) &cdat->dsym_2901__IV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2892__IV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2901__IV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2892__IV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2901__IV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2892__IV.meltobj_class =
+ cdat->dsym_2901__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2892__IV.obj_hash = 361162755;
- cdat->dsym_2892__IV.obj_len = 3;
+ cdat->dsym_2901__IV.obj_hash = 963441227;
+ cdat->dsym_2901__IV.obj_len = 3;
-/*inistring dstr_2893__IV*/
- /*_.VALSTR___V2919*/ meltfptr[2918] = (void *) &cdat->dstr_2893__IV;
- cdat->dstr_2893__IV.discr =
+/*inistring dstr_2902__IV*/
+ /*_.VALSTR___V2928*/ meltfptr[2927] = (void *) &cdat->dstr_2902__IV;
+ cdat->dstr_2902__IV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2893__IV.val, "/IV",
- sizeof (cdat->dstr_2893__IV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2902__IV.val, "+IV",
+ sizeof (cdat->dstr_2902__IV.val) - 1);
-/*iniobj dsym_2894__IV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2920*/ meltfptr[2919])
- /*_.VALDATA___V2920*/
- meltfptr[2919] = (void *) &cdat->dsym_2894__IV;
+/*iniobj dsym_2903__IV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2929*/ meltfptr[2928])
+ /*_.VALDATA___V2929*/
+ meltfptr[2928] = (void *) &cdat->dsym_2903__IV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2894__IV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2903__IV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2894__IV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2903__IV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2894__IV.meltobj_class =
+ cdat->dsym_2903__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2894__IV.obj_hash = 69878562;
- cdat->dsym_2894__IV.obj_len = 3;
+ cdat->dsym_2903__IV.obj_hash = 420432976;
+ cdat->dsym_2903__IV.obj_len = 3;
-/*inistring dstr_2895__IV*/
- /*_.VALSTR___V2921*/ meltfptr[2920] = (void *) &cdat->dstr_2895__IV;
- cdat->dstr_2895__IV.discr =
+/*inistring dstr_2904__IV*/
+ /*_.VALSTR___V2930*/ meltfptr[2929] = (void *) &cdat->dstr_2904__IV;
+ cdat->dstr_2904__IV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2895__IV.val, "%IV",
- sizeof (cdat->dstr_2895__IV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2904__IV.val, "-IV",
+ sizeof (cdat->dstr_2904__IV.val) - 1);
-/*iniobj dsym_2896__ADD2OUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2922*/ meltfptr[2921])
- /*_.VALDATA___V2922*/
- meltfptr[2921] = (void *) &cdat->dsym_2896__ADD2OUT;
+/*iniobj dsym_2905__IV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2931*/ meltfptr[2930])
+ /*_.VALDATA___V2931*/
+ meltfptr[2930] = (void *) &cdat->dsym_2905__IV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2896__ADD2OUT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2905__IV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2896__ADD2OUT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2905__IV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2896__ADD2OUT.meltobj_class =
+ cdat->dsym_2905__IV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2896__ADD2OUT.obj_hash = 901325062;
- cdat->dsym_2896__ADD2OUT.obj_len = 3;
+ cdat->dsym_2905__IV.obj_hash = 1048301622;
+ cdat->dsym_2905__IV.obj_len = 3;
-/*inistring dstr_2897__ADD2OUT*/
- /*_.VALSTR___V2923*/ meltfptr[2922] = (void *) &cdat->dstr_2897__ADD2OUT;
- cdat->dstr_2897__ADD2OUT.discr =
+/*inistring dstr_2906__IV*/
+ /*_.VALSTR___V2932*/ meltfptr[2931] = (void *) &cdat->dstr_2906__IV;
+ cdat->dstr_2906__IV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2897__ADD2OUT.val, "ADD2OUT",
- sizeof (cdat->dstr_2897__ADD2OUT.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2906__IV.val, "*IV",
+ sizeof (cdat->dstr_2906__IV.val) - 1);
-/*iniobj dsym_2898__COMPARE_NAMED_ALPHA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2924*/ meltfptr[2923])
- /*_.VALDATA___V2924*/
- meltfptr[2923] = (void *) &cdat->dsym_2898__COMPARE_NAMED_ALPHA;
+/*iniobj dsym_2907__IV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2933*/ meltfptr[2932])
+ /*_.VALDATA___V2933*/
+ meltfptr[2932] = (void *) &cdat->dsym_2907__IV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2898__COMPARE_NAMED_ALPHA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2907__IV",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
+ == MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2907__IV",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_2907__IV.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_2907__IV.obj_hash = 361162755;
+ cdat->dsym_2907__IV.obj_len = 3;
+
+
+/*inistring dstr_2908__IV*/
+ /*_.VALSTR___V2934*/ meltfptr[2933] = (void *) &cdat->dstr_2908__IV;
+ cdat->dstr_2908__IV.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2908__IV.val, "/IV",
+ sizeof (cdat->dstr_2908__IV.val) - 1);
+
+/*iniobj dsym_2909__IV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2935*/ meltfptr[2934])
+ /*_.VALDATA___V2935*/
+ meltfptr[2934] = (void *) &cdat->dsym_2909__IV;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_2909__IV",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
+ == MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2909__IV",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_2909__IV.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_2909__IV.obj_hash = 69878562;
+ cdat->dsym_2909__IV.obj_len = 3;
+
+
+/*inistring dstr_2910__IV*/
+ /*_.VALSTR___V2936*/ meltfptr[2935] = (void *) &cdat->dstr_2910__IV;
+ cdat->dstr_2910__IV.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2910__IV.val, "%IV",
+ sizeof (cdat->dstr_2910__IV.val) - 1);
+
+/*iniobj dsym_2911__ADD2OUT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2937*/ meltfptr[2936])
+ /*_.VALDATA___V2937*/
+ meltfptr[2936] = (void *) &cdat->dsym_2911__ADD2OUT;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_2911__ADD2OUT",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
+ == MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2911__ADD2OUT",
+ ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_2911__ADD2OUT.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_2911__ADD2OUT.obj_hash = 901325062;
+ cdat->dsym_2911__ADD2OUT.obj_len = 3;
+
+
+/*inistring dstr_2912__ADD2OUT*/
+ /*_.VALSTR___V2938*/ meltfptr[2937] = (void *) &cdat->dstr_2912__ADD2OUT;
+ cdat->dstr_2912__ADD2OUT.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_2912__ADD2OUT.val, "ADD2OUT",
+ sizeof (cdat->dstr_2912__ADD2OUT.val) - 1);
+
+/*iniobj dsym_2913__COMPARE_NAMED_ALPHA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2939*/ meltfptr[2938])
+ /*_.VALDATA___V2939*/
+ meltfptr[2938] = (void *) &cdat->dsym_2913__COMPARE_NAMED_ALPHA;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_2913__COMPARE_NAMED_ALPHA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2898__COMPARE_NAMED_ALPHA",
+ ("iniobj check.discr objmagic dsym_2913__COMPARE_NAMED_ALPHA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2898__COMPARE_NAMED_ALPHA.meltobj_class =
+ cdat->dsym_2913__COMPARE_NAMED_ALPHA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2898__COMPARE_NAMED_ALPHA.obj_hash = 155514911;
- cdat->dsym_2898__COMPARE_NAMED_ALPHA.obj_len = 3;
+ cdat->dsym_2913__COMPARE_NAMED_ALPHA.obj_hash = 155514911;
+ cdat->dsym_2913__COMPARE_NAMED_ALPHA.obj_len = 3;
-/*inistring dstr_2899__COMPARE_NAMED_AL*/
- /*_.VALSTR___V2925*/ meltfptr[2924] =
- (void *) &cdat->dstr_2899__COMPARE_NAMED_AL;
- cdat->dstr_2899__COMPARE_NAMED_AL.discr =
+/*inistring dstr_2914__COMPARE_NAMED_AL*/
+ /*_.VALSTR___V2940*/ meltfptr[2939] =
+ (void *) &cdat->dstr_2914__COMPARE_NAMED_AL;
+ cdat->dstr_2914__COMPARE_NAMED_AL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2899__COMPARE_NAMED_AL.val,
+ /*small inistring */ strncpy (cdat->dstr_2914__COMPARE_NAMED_AL.val,
"COMPARE_NAMED_ALPHA",
- sizeof (cdat->dstr_2899__COMPARE_NAMED_AL.
+ sizeof (cdat->dstr_2914__COMPARE_NAMED_AL.
val) - 1);
-/*iniobj dsym_2900__CSTRING_PREFIXED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2926*/ meltfptr[2925])
- /*_.VALDATA___V2926*/
- meltfptr[2925] = (void *) &cdat->dsym_2900__CSTRING_PREFIXED;
+/*iniobj dsym_2915__CSTRING_PREFIXED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2941*/ meltfptr[2940])
+ /*_.VALDATA___V2941*/
+ meltfptr[2940] = (void *) &cdat->dsym_2915__CSTRING_PREFIXED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2900__CSTRING_PREFIXED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2915__CSTRING_PREFIXED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2900__CSTRING_PREFIXED",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2915__CSTRING_PREFIXED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2900__CSTRING_PREFIXED.meltobj_class =
+ cdat->dsym_2915__CSTRING_PREFIXED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2900__CSTRING_PREFIXED.obj_hash = 976907042;
- cdat->dsym_2900__CSTRING_PREFIXED.obj_len = 3;
+ cdat->dsym_2915__CSTRING_PREFIXED.obj_hash = 976907042;
+ cdat->dsym_2915__CSTRING_PREFIXED.obj_len = 3;
-/*inistring dstr_2901__CSTRING_PREFIXED*/
- /*_.VALSTR___V2927*/ meltfptr[2926] =
- (void *) &cdat->dstr_2901__CSTRING_PREFIXED;
- cdat->dstr_2901__CSTRING_PREFIXED.discr =
+/*inistring dstr_2916__CSTRING_PREFIXED*/
+ /*_.VALSTR___V2942*/ meltfptr[2941] =
+ (void *) &cdat->dstr_2916__CSTRING_PREFIXED;
+ cdat->dstr_2916__CSTRING_PREFIXED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2901__CSTRING_PREFIXED.val,
+ /*small inistring */ strncpy (cdat->dstr_2916__CSTRING_PREFIXED.val,
"CSTRING_PREFIXED",
- sizeof (cdat->dstr_2901__CSTRING_PREFIXED.
+ sizeof (cdat->dstr_2916__CSTRING_PREFIXED.
val) - 1);
-/*iniobj dsym_2902__CSTRING_SAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2928*/ meltfptr[2927])
- /*_.VALDATA___V2928*/
- meltfptr[2927] = (void *) &cdat->dsym_2902__CSTRING_SAME;
+/*iniobj dsym_2917__CSTRING_SAME*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2943*/ meltfptr[2942])
+ /*_.VALDATA___V2943*/
+ meltfptr[2942] = (void *) &cdat->dsym_2917__CSTRING_SAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2902__CSTRING_SAME",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2917__CSTRING_SAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2902__CSTRING_SAME",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2917__CSTRING_SAME",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2902__CSTRING_SAME.meltobj_class =
+ cdat->dsym_2917__CSTRING_SAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2902__CSTRING_SAME.obj_hash = 180971052;
- cdat->dsym_2902__CSTRING_SAME.obj_len = 3;
+ cdat->dsym_2917__CSTRING_SAME.obj_hash = 180971052;
+ cdat->dsym_2917__CSTRING_SAME.obj_len = 3;
-/*inistring dstr_2903__CSTRING_SAME*/
- /*_.VALSTR___V2929*/ meltfptr[2928] =
- (void *) &cdat->dstr_2903__CSTRING_SAME;
- cdat->dstr_2903__CSTRING_SAME.discr =
+/*inistring dstr_2918__CSTRING_SAME*/
+ /*_.VALSTR___V2944*/ meltfptr[2943] =
+ (void *) &cdat->dstr_2918__CSTRING_SAME;
+ cdat->dstr_2918__CSTRING_SAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2903__CSTRING_SAME.val,
+ /*small inistring */ strncpy (cdat->dstr_2918__CSTRING_SAME.val,
"CSTRING_SAME",
- sizeof (cdat->dstr_2903__CSTRING_SAME.val) -
+ sizeof (cdat->dstr_2918__CSTRING_SAME.val) -
1);
-/*iniobj dsym_2904__FOREACH_LONG_UPTO*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2930*/ meltfptr[2929])
- /*_.VALDATA___V2930*/
- meltfptr[2929] = (void *) &cdat->dsym_2904__FOREACH_LONG_UPTO;
+/*iniobj dsym_2919__FOREACH_LONG_UPTO*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2945*/ meltfptr[2944])
+ /*_.VALDATA___V2945*/
+ meltfptr[2944] = (void *) &cdat->dsym_2919__FOREACH_LONG_UPTO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2904__FOREACH_LONG_UPTO",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2919__FOREACH_LONG_UPTO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2904__FOREACH_LONG_UPTO",
+ ("iniobj check.discr objmagic dsym_2919__FOREACH_LONG_UPTO",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2904__FOREACH_LONG_UPTO.meltobj_class =
+ cdat->dsym_2919__FOREACH_LONG_UPTO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2904__FOREACH_LONG_UPTO.obj_hash = 84906035;
- cdat->dsym_2904__FOREACH_LONG_UPTO.obj_len = 3;
+ cdat->dsym_2919__FOREACH_LONG_UPTO.obj_hash = 84906035;
+ cdat->dsym_2919__FOREACH_LONG_UPTO.obj_len = 3;
-/*inistring dstr_2905__FOREACH_LONG_UPT*/
- /*_.VALSTR___V2931*/ meltfptr[2930] =
- (void *) &cdat->dstr_2905__FOREACH_LONG_UPT;
- cdat->dstr_2905__FOREACH_LONG_UPT.discr =
+/*inistring dstr_2920__FOREACH_LONG_UPT*/
+ /*_.VALSTR___V2946*/ meltfptr[2945] =
+ (void *) &cdat->dstr_2920__FOREACH_LONG_UPT;
+ cdat->dstr_2920__FOREACH_LONG_UPT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2905__FOREACH_LONG_UPT.val,
+ /*small inistring */ strncpy (cdat->dstr_2920__FOREACH_LONG_UPT.val,
"FOREACH_LONG_UPTO",
- sizeof (cdat->dstr_2905__FOREACH_LONG_UPT.
+ sizeof (cdat->dstr_2920__FOREACH_LONG_UPT.
val) - 1);
-/*iniobj dsym_2906__MAPSTRING_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2932*/ meltfptr[2931])
- /*_.VALDATA___V2932*/
- meltfptr[2931] = (void *) &cdat->dsym_2906__MAPSTRING_EVERY;
+/*iniobj dsym_2921__MAPSTRING_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2947*/ meltfptr[2946])
+ /*_.VALDATA___V2947*/
+ meltfptr[2946] = (void *) &cdat->dsym_2921__MAPSTRING_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2906__MAPSTRING_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2921__MAPSTRING_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2906__MAPSTRING_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2921__MAPSTRING_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2906__MAPSTRING_EVERY.meltobj_class =
+ cdat->dsym_2921__MAPSTRING_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2906__MAPSTRING_EVERY.obj_hash = 173778712;
- cdat->dsym_2906__MAPSTRING_EVERY.obj_len = 3;
+ cdat->dsym_2921__MAPSTRING_EVERY.obj_hash = 173778712;
+ cdat->dsym_2921__MAPSTRING_EVERY.obj_len = 3;
-/*inistring dstr_2907__MAPSTRING_EVERY*/
- /*_.VALSTR___V2933*/ meltfptr[2932] =
- (void *) &cdat->dstr_2907__MAPSTRING_EVERY;
- cdat->dstr_2907__MAPSTRING_EVERY.discr =
+/*inistring dstr_2922__MAPSTRING_EVERY*/
+ /*_.VALSTR___V2948*/ meltfptr[2947] =
+ (void *) &cdat->dstr_2922__MAPSTRING_EVERY;
+ cdat->dstr_2922__MAPSTRING_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2907__MAPSTRING_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_2922__MAPSTRING_EVERY.val,
"MAPSTRING_EVERY",
- sizeof (cdat->dstr_2907__MAPSTRING_EVERY.
+ sizeof (cdat->dstr_2922__MAPSTRING_EVERY.
val) - 1);
-/*iniobj dsym_2908__MAPSTRING_ITERATE_TEST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2934*/ meltfptr[2933])
- /*_.VALDATA___V2934*/
- meltfptr[2933] = (void *) &cdat->dsym_2908__MAPSTRING_ITERATE_TEST;
+/*iniobj dsym_2923__MAPSTRING_ITERATE_TEST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2949*/ meltfptr[2948])
+ /*_.VALDATA___V2949*/
+ meltfptr[2948] = (void *) &cdat->dsym_2923__MAPSTRING_ITERATE_TEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2908__MAPSTRING_ITERATE_TEST",
+ ("iniobj check.discr isobj dsym_2923__MAPSTRING_ITERATE_TEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2908__MAPSTRING_ITERATE_TEST",
+ ("iniobj check.discr objmagic dsym_2923__MAPSTRING_ITERATE_TEST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2908__MAPSTRING_ITERATE_TEST.meltobj_class =
+ cdat->dsym_2923__MAPSTRING_ITERATE_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2908__MAPSTRING_ITERATE_TEST.obj_hash = 933389776;
- cdat->dsym_2908__MAPSTRING_ITERATE_TEST.obj_len = 3;
+ cdat->dsym_2923__MAPSTRING_ITERATE_TEST.obj_hash = 933389776;
+ cdat->dsym_2923__MAPSTRING_ITERATE_TEST.obj_len = 3;
-/*inistring dstr_2909__MAPSTRING_ITERAT*/
- /*_.VALSTR___V2935*/ meltfptr[2934] =
- (void *) &cdat->dstr_2909__MAPSTRING_ITERAT;
- cdat->dstr_2909__MAPSTRING_ITERAT.discr =
+/*inistring dstr_2924__MAPSTRING_ITERAT*/
+ /*_.VALSTR___V2950*/ meltfptr[2949] =
+ (void *) &cdat->dstr_2924__MAPSTRING_ITERAT;
+ cdat->dstr_2924__MAPSTRING_ITERAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2909__MAPSTRING_ITERAT.val,
+ /*small inistring */ strncpy (cdat->dstr_2924__MAPSTRING_ITERAT.val,
"MAPSTRING_ITERATE_TEST",
- sizeof (cdat->dstr_2909__MAPSTRING_ITERAT.
+ sizeof (cdat->dstr_2924__MAPSTRING_ITERAT.
val) - 1);
-/*iniobj dsym_2910__MULTIPLE_BACKWARD_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2936*/ meltfptr[2935])
- /*_.VALDATA___V2936*/
- meltfptr[2935] = (void *) &cdat->dsym_2910__MULTIPLE_BACKWARD_EVERY;
+/*iniobj dsym_2925__MULTIPLE_BACKWARD_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2951*/ meltfptr[2950])
+ /*_.VALDATA___V2951*/
+ meltfptr[2950] = (void *) &cdat->dsym_2925__MULTIPLE_BACKWARD_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2910__MULTIPLE_BACKWARD_EVERY",
+ ("iniobj check.discr isobj dsym_2925__MULTIPLE_BACKWARD_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2910__MULTIPLE_BACKWARD_EVERY",
+ ("iniobj check.discr objmagic dsym_2925__MULTIPLE_BACKWARD_EVERY",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2910__MULTIPLE_BACKWARD_EVERY.meltobj_class =
+ cdat->dsym_2925__MULTIPLE_BACKWARD_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2910__MULTIPLE_BACKWARD_EVERY.obj_hash = 79677830;
- cdat->dsym_2910__MULTIPLE_BACKWARD_EVERY.obj_len = 3;
+ cdat->dsym_2925__MULTIPLE_BACKWARD_EVERY.obj_hash = 79677830;
+ cdat->dsym_2925__MULTIPLE_BACKWARD_EVERY.obj_len = 3;
-/*inistring dstr_2911__MULTIPLE_BACKWAR*/
- /*_.VALSTR___V2937*/ meltfptr[2936] =
- (void *) &cdat->dstr_2911__MULTIPLE_BACKWAR;
- cdat->dstr_2911__MULTIPLE_BACKWAR.discr =
+/*inistring dstr_2926__MULTIPLE_BACKWAR*/
+ /*_.VALSTR___V2952*/ meltfptr[2951] =
+ (void *) &cdat->dstr_2926__MULTIPLE_BACKWAR;
+ cdat->dstr_2926__MULTIPLE_BACKWAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2911__MULTIPLE_BACKWAR.val,
+ /*small inistring */ strncpy (cdat->dstr_2926__MULTIPLE_BACKWAR.val,
"MULTIPLE_BACKWARD_EVERY",
- sizeof (cdat->dstr_2911__MULTIPLE_BACKWAR.
+ sizeof (cdat->dstr_2926__MULTIPLE_BACKWAR.
val) - 1);
-/*iniobj dsym_2912__MULTIPLE_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2938*/ meltfptr[2937])
- /*_.VALDATA___V2938*/
- meltfptr[2937] = (void *) &cdat->dsym_2912__MULTIPLE_EVERY;
+/*iniobj dsym_2927__MULTIPLE_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2953*/ meltfptr[2952])
+ /*_.VALDATA___V2953*/
+ meltfptr[2952] = (void *) &cdat->dsym_2927__MULTIPLE_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2912__MULTIPLE_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2927__MULTIPLE_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2912__MULTIPLE_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2927__MULTIPLE_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2912__MULTIPLE_EVERY.meltobj_class =
+ cdat->dsym_2927__MULTIPLE_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2912__MULTIPLE_EVERY.obj_hash = 130098745;
- cdat->dsym_2912__MULTIPLE_EVERY.obj_len = 3;
+ cdat->dsym_2927__MULTIPLE_EVERY.obj_hash = 130098745;
+ cdat->dsym_2927__MULTIPLE_EVERY.obj_len = 3;
-/*inistring dstr_2913__MULTIPLE_EVERY*/
- /*_.VALSTR___V2939*/ meltfptr[2938] =
- (void *) &cdat->dstr_2913__MULTIPLE_EVERY;
- cdat->dstr_2913__MULTIPLE_EVERY.discr =
+/*inistring dstr_2928__MULTIPLE_EVERY*/
+ /*_.VALSTR___V2954*/ meltfptr[2953] =
+ (void *) &cdat->dstr_2928__MULTIPLE_EVERY;
+ cdat->dstr_2928__MULTIPLE_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2913__MULTIPLE_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_2928__MULTIPLE_EVERY.val,
"MULTIPLE_EVERY",
- sizeof (cdat->dstr_2913__MULTIPLE_EVERY.val) -
+ sizeof (cdat->dstr_2928__MULTIPLE_EVERY.val) -
1);
-/*iniobj dsym_2914__MULTIPLE_EVERY_BOTH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2940*/ meltfptr[2939])
- /*_.VALDATA___V2940*/
- meltfptr[2939] = (void *) &cdat->dsym_2914__MULTIPLE_EVERY_BOTH;
+/*iniobj dsym_2929__MULTIPLE_EVERY_BOTH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2955*/ meltfptr[2954])
+ /*_.VALDATA___V2955*/
+ meltfptr[2954] = (void *) &cdat->dsym_2929__MULTIPLE_EVERY_BOTH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2914__MULTIPLE_EVERY_BOTH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2929__MULTIPLE_EVERY_BOTH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2914__MULTIPLE_EVERY_BOTH",
+ ("iniobj check.discr objmagic dsym_2929__MULTIPLE_EVERY_BOTH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2914__MULTIPLE_EVERY_BOTH.meltobj_class =
+ cdat->dsym_2929__MULTIPLE_EVERY_BOTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2914__MULTIPLE_EVERY_BOTH.obj_hash = 528900272;
- cdat->dsym_2914__MULTIPLE_EVERY_BOTH.obj_len = 3;
+ cdat->dsym_2929__MULTIPLE_EVERY_BOTH.obj_hash = 528900272;
+ cdat->dsym_2929__MULTIPLE_EVERY_BOTH.obj_len = 3;
-/*inistring dstr_2915__MULTIPLE_EVERY_B*/
- /*_.VALSTR___V2941*/ meltfptr[2940] =
- (void *) &cdat->dstr_2915__MULTIPLE_EVERY_B;
- cdat->dstr_2915__MULTIPLE_EVERY_B.discr =
+/*inistring dstr_2930__MULTIPLE_EVERY_B*/
+ /*_.VALSTR___V2956*/ meltfptr[2955] =
+ (void *) &cdat->dstr_2930__MULTIPLE_EVERY_B;
+ cdat->dstr_2930__MULTIPLE_EVERY_B.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2915__MULTIPLE_EVERY_B.val,
+ /*small inistring */ strncpy (cdat->dstr_2930__MULTIPLE_EVERY_B.val,
"MULTIPLE_EVERY_BOTH",
- sizeof (cdat->dstr_2915__MULTIPLE_EVERY_B.
+ sizeof (cdat->dstr_2930__MULTIPLE_EVERY_B.
val) - 1);
-/*iniobj dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2942*/ meltfptr[2941])
- /*_.VALDATA___V2942*/
- meltfptr[2941] =
- (void *) &cdat->dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST;
+/*iniobj dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2957*/ meltfptr[2956])
+ /*_.VALDATA___V2957*/
+ meltfptr[2956] =
+ (void *) &cdat->dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.obj_hash =
+ cdat->dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.obj_hash =
293999316;
- cdat->dsym_2916__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2931__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2917__REGISTER_ALL_IPA*/
- /*_.VALSTR___V2943*/ meltfptr[2942] =
- (void *) &cdat->dstr_2917__REGISTER_ALL_IPA;
- cdat->dstr_2917__REGISTER_ALL_IPA.discr =
+/*inistring dstr_2932__REGISTER_ALL_IPA*/
+ /*_.VALSTR___V2958*/ meltfptr[2957] =
+ (void *) &cdat->dstr_2932__REGISTER_ALL_IPA;
+ cdat->dstr_2932__REGISTER_ALL_IPA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2917__REGISTER_ALL_IPA.val,
+ /*small inistring */ strncpy (cdat->dstr_2932__REGISTER_ALL_IPA.val,
"REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
- sizeof (cdat->dstr_2917__REGISTER_ALL_IPA.
+ sizeof (cdat->dstr_2932__REGISTER_ALL_IPA.
val) - 1);
-/*iniobj dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2944*/ meltfptr[2943])
- /*_.VALDATA___V2944*/
- meltfptr[2943] =
- (void *) &cdat->dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST;
+/*iniobj dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2959*/ meltfptr[2958])
+ /*_.VALDATA___V2959*/
+ meltfptr[2958] =
+ (void *) &cdat->dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.meltobj_class =
+ cdat->dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.obj_hash = 44491589;
- cdat->dsym_2918__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.obj_hash = 44491589;
+ cdat->dsym_2933__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2919__REGISTER_ALL_IPA*/
- /*_.VALSTR___V2945*/ meltfptr[2944] =
- (void *) &cdat->dstr_2919__REGISTER_ALL_IPA;
- cdat->dstr_2919__REGISTER_ALL_IPA.discr =
+/*inistring dstr_2934__REGISTER_ALL_IPA*/
+ /*_.VALSTR___V2960*/ meltfptr[2959] =
+ (void *) &cdat->dstr_2934__REGISTER_ALL_IPA;
+ cdat->dstr_2934__REGISTER_ALL_IPA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2919__REGISTER_ALL_IPA.val,
+ /*small inistring */ strncpy (cdat->dstr_2934__REGISTER_ALL_IPA.val,
"REGISTER_ALL_IPA_PASSES_END_HOOK_LAST",
- sizeof (cdat->dstr_2919__REGISTER_ALL_IPA.
+ sizeof (cdat->dstr_2934__REGISTER_ALL_IPA.
val) - 1);
-/*iniobj dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2946*/ meltfptr[2945])
- /*_.VALDATA___V2946*/
- meltfptr[2945] =
- (void *) &cdat->dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST;
+/*iniobj dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2961*/ meltfptr[2960])
+ /*_.VALDATA___V2961*/
+ meltfptr[2960] =
+ (void *) &cdat->dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.obj_hash =
+ cdat->dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.obj_hash =
227740608;
- cdat->dsym_2920__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2935__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2921__REGISTER_ALL_IPA*/
- /*_.VALSTR___V2947*/ meltfptr[2946] =
- (void *) &cdat->dstr_2921__REGISTER_ALL_IPA;
- cdat->dstr_2921__REGISTER_ALL_IPA.discr =
+/*inistring dstr_2936__REGISTER_ALL_IPA*/
+ /*_.VALSTR___V2962*/ meltfptr[2961] =
+ (void *) &cdat->dstr_2936__REGISTER_ALL_IPA;
+ cdat->dstr_2936__REGISTER_ALL_IPA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2921__REGISTER_ALL_IPA.val,
+ /*small inistring */ strncpy (cdat->dstr_2936__REGISTER_ALL_IPA.val,
"REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
- sizeof (cdat->dstr_2921__REGISTER_ALL_IPA.
+ sizeof (cdat->dstr_2936__REGISTER_ALL_IPA.
val) - 1);
-/*iniobj dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2948*/ meltfptr[2947])
- /*_.VALDATA___V2948*/
- meltfptr[2947] =
- (void *) &cdat->dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST;
+/*iniobj dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2963*/ meltfptr[2962])
+ /*_.VALDATA___V2963*/
+ meltfptr[2962] =
+ (void *) &cdat->dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.meltobj_class =
+ cdat->dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.obj_hash =
+ cdat->dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.obj_hash =
396080944;
- cdat->dsym_2922__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2937__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2923__REGISTER_ALL_IPA*/
- /*_.VALSTR___V2949*/ meltfptr[2948] =
- (void *) &cdat->dstr_2923__REGISTER_ALL_IPA;
- cdat->dstr_2923__REGISTER_ALL_IPA.discr =
+/*inistring dstr_2938__REGISTER_ALL_IPA*/
+ /*_.VALSTR___V2964*/ meltfptr[2963] =
+ (void *) &cdat->dstr_2938__REGISTER_ALL_IPA;
+ cdat->dstr_2938__REGISTER_ALL_IPA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2923__REGISTER_ALL_IPA.val,
+ /*small inistring */ strncpy (cdat->dstr_2938__REGISTER_ALL_IPA.val,
"REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
- sizeof (cdat->dstr_2923__REGISTER_ALL_IPA.
+ sizeof (cdat->dstr_2938__REGISTER_ALL_IPA.
val) - 1);
-/*iniobj dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2950*/ meltfptr[2949])
- /*_.VALDATA___V2950*/
- meltfptr[2949] =
- (void *) &cdat->dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST;
+/*iniobj dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2965*/ meltfptr[2964])
+ /*_.VALDATA___V2965*/
+ meltfptr[2964] =
+ (void *) &cdat->dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST.obj_hash = 119698505;
- cdat->dsym_2924__REGISTER_ALL_PASSES_END_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST.obj_hash = 119698505;
+ cdat->dsym_2939__REGISTER_ALL_PASSES_END_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2925__REGISTER_ALL_PAS*/
- /*_.VALSTR___V2951*/ meltfptr[2950] =
- (void *) &cdat->dstr_2925__REGISTER_ALL_PAS;
- cdat->dstr_2925__REGISTER_ALL_PAS.discr =
+/*inistring dstr_2940__REGISTER_ALL_PAS*/
+ /*_.VALSTR___V2966*/ meltfptr[2965] =
+ (void *) &cdat->dstr_2940__REGISTER_ALL_PAS;
+ cdat->dstr_2940__REGISTER_ALL_PAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2925__REGISTER_ALL_PAS.val,
+ /*small inistring */ strncpy (cdat->dstr_2940__REGISTER_ALL_PAS.val,
"REGISTER_ALL_PASSES_END_HOOK_FIRST",
- sizeof (cdat->dstr_2925__REGISTER_ALL_PAS.
+ sizeof (cdat->dstr_2940__REGISTER_ALL_PAS.
val) - 1);
-/*iniobj dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2952*/ meltfptr[2951])
- /*_.VALDATA___V2952*/
- meltfptr[2951] =
- (void *) &cdat->dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST;
+/*iniobj dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2967*/ meltfptr[2966])
+ /*_.VALDATA___V2967*/
+ meltfptr[2966] =
+ (void *) &cdat->dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST.meltobj_class =
+ cdat->dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST.obj_hash = 868693929;
- cdat->dsym_2926__REGISTER_ALL_PASSES_END_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST.obj_hash = 868693929;
+ cdat->dsym_2941__REGISTER_ALL_PASSES_END_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2927__REGISTER_ALL_PAS*/
- /*_.VALSTR___V2953*/ meltfptr[2952] =
- (void *) &cdat->dstr_2927__REGISTER_ALL_PAS;
- cdat->dstr_2927__REGISTER_ALL_PAS.discr =
+/*inistring dstr_2942__REGISTER_ALL_PAS*/
+ /*_.VALSTR___V2968*/ meltfptr[2967] =
+ (void *) &cdat->dstr_2942__REGISTER_ALL_PAS;
+ cdat->dstr_2942__REGISTER_ALL_PAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2927__REGISTER_ALL_PAS.val,
+ /*small inistring */ strncpy (cdat->dstr_2942__REGISTER_ALL_PAS.val,
"REGISTER_ALL_PASSES_END_HOOK_LAST",
- sizeof (cdat->dstr_2927__REGISTER_ALL_PAS.
+ sizeof (cdat->dstr_2942__REGISTER_ALL_PAS.
val) - 1);
-/*iniobj dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2954*/ meltfptr[2953])
- /*_.VALDATA___V2954*/
- meltfptr[2953] =
- (void *) &cdat->dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST;
+/*iniobj dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2969*/ meltfptr[2968])
+ /*_.VALDATA___V2969*/
+ meltfptr[2968] =
+ (void *) &cdat->dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST.obj_hash = 982518031;
- cdat->dsym_2928__REGISTER_ALL_PASSES_START_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST.obj_hash = 982518031;
+ cdat->dsym_2943__REGISTER_ALL_PASSES_START_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2929__REGISTER_ALL_PAS*/
- /*_.VALSTR___V2955*/ meltfptr[2954] =
- (void *) &cdat->dstr_2929__REGISTER_ALL_PAS;
- cdat->dstr_2929__REGISTER_ALL_PAS.discr =
+/*inistring dstr_2944__REGISTER_ALL_PAS*/
+ /*_.VALSTR___V2970*/ meltfptr[2969] =
+ (void *) &cdat->dstr_2944__REGISTER_ALL_PAS;
+ cdat->dstr_2944__REGISTER_ALL_PAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2929__REGISTER_ALL_PAS.val,
+ /*small inistring */ strncpy (cdat->dstr_2944__REGISTER_ALL_PAS.val,
"REGISTER_ALL_PASSES_START_HOOK_FIRST",
- sizeof (cdat->dstr_2929__REGISTER_ALL_PAS.
+ sizeof (cdat->dstr_2944__REGISTER_ALL_PAS.
val) - 1);
-/*iniobj dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2956*/ meltfptr[2955])
- /*_.VALDATA___V2956*/
- meltfptr[2955] =
- (void *) &cdat->dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST;
+/*iniobj dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2971*/ meltfptr[2970])
+ /*_.VALDATA___V2971*/
+ meltfptr[2970] =
+ (void *) &cdat->dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST.meltobj_class =
+ cdat->dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST.obj_hash = 1007090889;
- cdat->dsym_2930__REGISTER_ALL_PASSES_START_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST.obj_hash = 1007090889;
+ cdat->dsym_2945__REGISTER_ALL_PASSES_START_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2931__REGISTER_ALL_PAS*/
- /*_.VALSTR___V2957*/ meltfptr[2956] =
- (void *) &cdat->dstr_2931__REGISTER_ALL_PAS;
- cdat->dstr_2931__REGISTER_ALL_PAS.discr =
+/*inistring dstr_2946__REGISTER_ALL_PAS*/
+ /*_.VALSTR___V2972*/ meltfptr[2971] =
+ (void *) &cdat->dstr_2946__REGISTER_ALL_PAS;
+ cdat->dstr_2946__REGISTER_ALL_PAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2931__REGISTER_ALL_PAS.val,
+ /*small inistring */ strncpy (cdat->dstr_2946__REGISTER_ALL_PAS.val,
"REGISTER_ALL_PASSES_START_HOOK_LAST",
- sizeof (cdat->dstr_2931__REGISTER_ALL_PAS.
+ sizeof (cdat->dstr_2946__REGISTER_ALL_PAS.
val) - 1);
-/*iniobj dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2958*/ meltfptr[2957])
- /*_.VALDATA___V2958*/
- meltfptr[2957] =
- (void *) &cdat->dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST;
+/*iniobj dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2973*/ meltfptr[2972])
+ /*_.VALDATA___V2973*/
+ meltfptr[2972] =
+ (void *) &cdat->dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.obj_hash =
+ cdat->dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.obj_hash =
673731166;
- cdat->dsym_2932__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2947__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2933__REGISTER_EARLY_G*/
- /*_.VALSTR___V2959*/ meltfptr[2958] =
- (void *) &cdat->dstr_2933__REGISTER_EARLY_G;
- cdat->dstr_2933__REGISTER_EARLY_G.discr =
+/*inistring dstr_2948__REGISTER_EARLY_G*/
+ /*_.VALSTR___V2974*/ meltfptr[2973] =
+ (void *) &cdat->dstr_2948__REGISTER_EARLY_G;
+ cdat->dstr_2948__REGISTER_EARLY_G.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2933__REGISTER_EARLY_G.val,
+ /*small inistring */ strncpy (cdat->dstr_2948__REGISTER_EARLY_G.val,
"REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
- sizeof (cdat->dstr_2933__REGISTER_EARLY_G.
+ sizeof (cdat->dstr_2948__REGISTER_EARLY_G.
val) - 1);
-/*iniobj dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2960*/ meltfptr[2959])
- /*_.VALDATA___V2960*/
- meltfptr[2959] =
- (void *) &cdat->dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST;
+/*iniobj dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2975*/ meltfptr[2974])
+ /*_.VALDATA___V2975*/
+ meltfptr[2974] =
+ (void *) &cdat->dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.meltobj_class =
+ cdat->dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.obj_hash =
+ cdat->dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.obj_hash =
1059306031;
- cdat->dsym_2934__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2949__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2935__REGISTER_EARLY_G*/
- /*_.VALSTR___V2961*/ meltfptr[2960] =
- (void *) &cdat->dstr_2935__REGISTER_EARLY_G;
- cdat->dstr_2935__REGISTER_EARLY_G.discr =
+/*inistring dstr_2950__REGISTER_EARLY_G*/
+ /*_.VALSTR___V2976*/ meltfptr[2975] =
+ (void *) &cdat->dstr_2950__REGISTER_EARLY_G;
+ cdat->dstr_2950__REGISTER_EARLY_G.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2935__REGISTER_EARLY_G.val,
+ /*small inistring */ strncpy (cdat->dstr_2950__REGISTER_EARLY_G.val,
"REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
- sizeof (cdat->dstr_2935__REGISTER_EARLY_G.
+ sizeof (cdat->dstr_2950__REGISTER_EARLY_G.
val) - 1);
-/*iniobj dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2962*/ meltfptr[2961])
- /*_.VALDATA___V2962*/
- meltfptr[2961] =
+/*iniobj dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2977*/ meltfptr[2976])
+ /*_.VALDATA___V2977*/
+ meltfptr[2976] =
(void *) &cdat->
- dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST;
+ dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.
+ cdat->dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.
meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.obj_hash =
+ cdat->dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.obj_hash =
802584752;
- cdat->dsym_2936__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2951__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2937__REGISTER_EARLY_G*/
- /*_.VALSTR___V2963*/ meltfptr[2962] =
- (void *) &cdat->dstr_2937__REGISTER_EARLY_G;
- cdat->dstr_2937__REGISTER_EARLY_G.discr =
+/*inistring dstr_2952__REGISTER_EARLY_G*/
+ /*_.VALSTR___V2978*/ meltfptr[2977] =
+ (void *) &cdat->dstr_2952__REGISTER_EARLY_G;
+ cdat->dstr_2952__REGISTER_EARLY_G.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2937__REGISTER_EARLY_G.val,
+ /*small inistring */ strncpy (cdat->dstr_2952__REGISTER_EARLY_G.val,
"REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
- sizeof (cdat->dstr_2937__REGISTER_EARLY_G.
+ sizeof (cdat->dstr_2952__REGISTER_EARLY_G.
val) - 1);
-/*iniobj dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2964*/ meltfptr[2963])
- /*_.VALDATA___V2964*/
- meltfptr[2963] =
- (void *) &cdat->dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST;
+/*iniobj dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2979*/ meltfptr[2978])
+ /*_.VALDATA___V2979*/
+ meltfptr[2978] =
+ (void *) &cdat->dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.
+ cdat->dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.
meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.obj_hash =
+ cdat->dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.obj_hash =
1001839367;
- cdat->dsym_2938__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2953__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2939__REGISTER_EARLY_G*/
- /*_.VALSTR___V2965*/ meltfptr[2964] =
- (void *) &cdat->dstr_2939__REGISTER_EARLY_G;
- cdat->dstr_2939__REGISTER_EARLY_G.discr =
+/*inistring dstr_2954__REGISTER_EARLY_G*/
+ /*_.VALSTR___V2980*/ meltfptr[2979] =
+ (void *) &cdat->dstr_2954__REGISTER_EARLY_G;
+ cdat->dstr_2954__REGISTER_EARLY_G.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2939__REGISTER_EARLY_G.val,
+ /*small inistring */ strncpy (cdat->dstr_2954__REGISTER_EARLY_G.val,
"REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
- sizeof (cdat->dstr_2939__REGISTER_EARLY_G.
+ sizeof (cdat->dstr_2954__REGISTER_EARLY_G.
val) - 1);
-/*iniobj dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2966*/ meltfptr[2965])
- /*_.VALDATA___V2966*/
- meltfptr[2965] =
- (void *) &cdat->dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST;
+/*iniobj dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2981*/ meltfptr[2980])
+ /*_.VALDATA___V2981*/
+ meltfptr[2980] =
+ (void *) &cdat->dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST.obj_hash = 345948100;
- cdat->dsym_2940__REGISTER_FINISH_DECL_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST.obj_hash = 345948100;
+ cdat->dsym_2955__REGISTER_FINISH_DECL_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2941__REGISTER_FINISH_*/
- /*_.VALSTR___V2967*/ meltfptr[2966] =
- (void *) &cdat->dstr_2941__REGISTER_FINISH_;
- cdat->dstr_2941__REGISTER_FINISH_.discr =
+/*inistring dstr_2956__REGISTER_FINISH_*/
+ /*_.VALSTR___V2982*/ meltfptr[2981] =
+ (void *) &cdat->dstr_2956__REGISTER_FINISH_;
+ cdat->dstr_2956__REGISTER_FINISH_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2941__REGISTER_FINISH_.val,
+ /*small inistring */ strncpy (cdat->dstr_2956__REGISTER_FINISH_.val,
"REGISTER_FINISH_DECL_HOOK_FIRST",
- sizeof (cdat->dstr_2941__REGISTER_FINISH_.
+ sizeof (cdat->dstr_2956__REGISTER_FINISH_.
val) - 1);
-/*iniobj dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2968*/ meltfptr[2967])
- /*_.VALDATA___V2968*/
- meltfptr[2967] =
- (void *) &cdat->dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST;
+/*iniobj dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2983*/ meltfptr[2982])
+ /*_.VALDATA___V2983*/
+ meltfptr[2982] =
+ (void *) &cdat->dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST.meltobj_class =
+ cdat->dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST.obj_hash = 1021827212;
- cdat->dsym_2942__REGISTER_FINISH_DECL_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST.obj_hash = 1021827212;
+ cdat->dsym_2957__REGISTER_FINISH_DECL_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2943__REGISTER_FINISH_*/
- /*_.VALSTR___V2969*/ meltfptr[2968] =
- (void *) &cdat->dstr_2943__REGISTER_FINISH_;
- cdat->dstr_2943__REGISTER_FINISH_.discr =
+/*inistring dstr_2958__REGISTER_FINISH_*/
+ /*_.VALSTR___V2984*/ meltfptr[2983] =
+ (void *) &cdat->dstr_2958__REGISTER_FINISH_;
+ cdat->dstr_2958__REGISTER_FINISH_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2943__REGISTER_FINISH_.val,
+ /*small inistring */ strncpy (cdat->dstr_2958__REGISTER_FINISH_.val,
"REGISTER_FINISH_DECL_HOOK_LAST",
- sizeof (cdat->dstr_2943__REGISTER_FINISH_.
+ sizeof (cdat->dstr_2958__REGISTER_FINISH_.
val) - 1);
-/*iniobj dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2970*/ meltfptr[2969])
- /*_.VALDATA___V2970*/
- meltfptr[2969] =
- (void *) &cdat->dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST;
+/*iniobj dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2985*/ meltfptr[2984])
+ /*_.VALDATA___V2985*/
+ meltfptr[2984] =
+ (void *) &cdat->dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST.obj_hash = 180168054;
- cdat->dsym_2944__REGISTER_FINISH_TYPE_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST.obj_hash = 180168054;
+ cdat->dsym_2959__REGISTER_FINISH_TYPE_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2945__REGISTER_FINISH_*/
- /*_.VALSTR___V2971*/ meltfptr[2970] =
- (void *) &cdat->dstr_2945__REGISTER_FINISH_;
- cdat->dstr_2945__REGISTER_FINISH_.discr =
+/*inistring dstr_2960__REGISTER_FINISH_*/
+ /*_.VALSTR___V2986*/ meltfptr[2985] =
+ (void *) &cdat->dstr_2960__REGISTER_FINISH_;
+ cdat->dstr_2960__REGISTER_FINISH_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2945__REGISTER_FINISH_.val,
+ /*small inistring */ strncpy (cdat->dstr_2960__REGISTER_FINISH_.val,
"REGISTER_FINISH_TYPE_HOOK_FIRST",
- sizeof (cdat->dstr_2945__REGISTER_FINISH_.
+ sizeof (cdat->dstr_2960__REGISTER_FINISH_.
val) - 1);
-/*iniobj dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2972*/ meltfptr[2971])
- /*_.VALDATA___V2972*/
- meltfptr[2971] =
- (void *) &cdat->dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST;
+/*iniobj dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2987*/ meltfptr[2986])
+ /*_.VALDATA___V2987*/
+ meltfptr[2986] =
+ (void *) &cdat->dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST.meltobj_class =
+ cdat->dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST.obj_hash = 857750021;
- cdat->dsym_2946__REGISTER_FINISH_TYPE_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST.obj_hash = 857750021;
+ cdat->dsym_2961__REGISTER_FINISH_TYPE_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2947__REGISTER_FINISH_*/
- /*_.VALSTR___V2973*/ meltfptr[2972] =
- (void *) &cdat->dstr_2947__REGISTER_FINISH_;
- cdat->dstr_2947__REGISTER_FINISH_.discr =
+/*inistring dstr_2962__REGISTER_FINISH_*/
+ /*_.VALSTR___V2988*/ meltfptr[2987] =
+ (void *) &cdat->dstr_2962__REGISTER_FINISH_;
+ cdat->dstr_2962__REGISTER_FINISH_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2947__REGISTER_FINISH_.val,
+ /*small inistring */ strncpy (cdat->dstr_2962__REGISTER_FINISH_.val,
"REGISTER_FINISH_TYPE_HOOK_LAST",
- sizeof (cdat->dstr_2947__REGISTER_FINISH_.
+ sizeof (cdat->dstr_2962__REGISTER_FINISH_.
val) - 1);
-/*iniobj dsym_2948__REGISTER_PASS_EXECUTION_HOOK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2974*/ meltfptr[2973])
- /*_.VALDATA___V2974*/
- meltfptr[2973] = (void *) &cdat->dsym_2948__REGISTER_PASS_EXECUTION_HOOK;
+/*iniobj dsym_2963__REGISTER_PASS_EXECUTION_HOOK*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2989*/ meltfptr[2988])
+ /*_.VALDATA___V2989*/
+ meltfptr[2988] = (void *) &cdat->dsym_2963__REGISTER_PASS_EXECUTION_HOOK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2948__REGISTER_PASS_EXECUTION_HOOK",
+ ("iniobj check.discr isobj dsym_2963__REGISTER_PASS_EXECUTION_HOOK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2948__REGISTER_PASS_EXECUTION_HOOK",
+ ("iniobj check.discr objmagic dsym_2963__REGISTER_PASS_EXECUTION_HOOK",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2948__REGISTER_PASS_EXECUTION_HOOK.meltobj_class =
+ cdat->dsym_2963__REGISTER_PASS_EXECUTION_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2948__REGISTER_PASS_EXECUTION_HOOK.obj_hash = 538658736;
- cdat->dsym_2948__REGISTER_PASS_EXECUTION_HOOK.obj_len = 3;
+ cdat->dsym_2963__REGISTER_PASS_EXECUTION_HOOK.obj_hash = 538658736;
+ cdat->dsym_2963__REGISTER_PASS_EXECUTION_HOOK.obj_len = 3;
-/*inistring dstr_2949__REGISTER_PASS_EX*/
- /*_.VALSTR___V2975*/ meltfptr[2974] =
- (void *) &cdat->dstr_2949__REGISTER_PASS_EX;
- cdat->dstr_2949__REGISTER_PASS_EX.discr =
+/*inistring dstr_2964__REGISTER_PASS_EX*/
+ /*_.VALSTR___V2990*/ meltfptr[2989] =
+ (void *) &cdat->dstr_2964__REGISTER_PASS_EX;
+ cdat->dstr_2964__REGISTER_PASS_EX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2949__REGISTER_PASS_EX.val,
+ /*small inistring */ strncpy (cdat->dstr_2964__REGISTER_PASS_EX.val,
"REGISTER_PASS_EXECUTION_HOOK",
- sizeof (cdat->dstr_2949__REGISTER_PASS_EX.
+ sizeof (cdat->dstr_2964__REGISTER_PASS_EX.
val) - 1);
-/*iniobj dsym_2950__REGISTER_PRAGMA_HANDLER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2976*/ meltfptr[2975])
- /*_.VALDATA___V2976*/
- meltfptr[2975] = (void *) &cdat->dsym_2950__REGISTER_PRAGMA_HANDLER;
+/*iniobj dsym_2965__REGISTER_PRAGMA_HANDLER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2991*/ meltfptr[2990])
+ /*_.VALDATA___V2991*/
+ meltfptr[2990] = (void *) &cdat->dsym_2965__REGISTER_PRAGMA_HANDLER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2950__REGISTER_PRAGMA_HANDLER",
+ ("iniobj check.discr isobj dsym_2965__REGISTER_PRAGMA_HANDLER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2950__REGISTER_PRAGMA_HANDLER",
+ ("iniobj check.discr objmagic dsym_2965__REGISTER_PRAGMA_HANDLER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2950__REGISTER_PRAGMA_HANDLER.meltobj_class =
+ cdat->dsym_2965__REGISTER_PRAGMA_HANDLER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2950__REGISTER_PRAGMA_HANDLER.obj_hash = 198279333;
- cdat->dsym_2950__REGISTER_PRAGMA_HANDLER.obj_len = 3;
+ cdat->dsym_2965__REGISTER_PRAGMA_HANDLER.obj_hash = 198279333;
+ cdat->dsym_2965__REGISTER_PRAGMA_HANDLER.obj_len = 3;
-/*inistring dstr_2951__REGISTER_PRAGMA_*/
- /*_.VALSTR___V2977*/ meltfptr[2976] =
- (void *) &cdat->dstr_2951__REGISTER_PRAGMA_;
- cdat->dstr_2951__REGISTER_PRAGMA_.discr =
+/*inistring dstr_2966__REGISTER_PRAGMA_*/
+ /*_.VALSTR___V2992*/ meltfptr[2991] =
+ (void *) &cdat->dstr_2966__REGISTER_PRAGMA_;
+ cdat->dstr_2966__REGISTER_PRAGMA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2951__REGISTER_PRAGMA_.val,
+ /*small inistring */ strncpy (cdat->dstr_2966__REGISTER_PRAGMA_.val,
"REGISTER_PRAGMA_HANDLER",
- sizeof (cdat->dstr_2951__REGISTER_PRAGMA_.
+ sizeof (cdat->dstr_2966__REGISTER_PRAGMA_.
val) - 1);
-/*iniobj dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2978*/ meltfptr[2977])
- /*_.VALDATA___V2978*/
- meltfptr[2977] =
- (void *) &cdat->dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST;
+/*iniobj dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2993*/ meltfptr[2992])
+ /*_.VALDATA___V2993*/
+ meltfptr[2992] =
+ (void *) &cdat->dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST",
+ ("iniobj check.discr isobj dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST",
+ ("iniobj check.discr objmagic dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST.meltobj_class =
+ cdat->dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST.obj_hash = 445315846;
- cdat->dsym_2952__REGISTER_PRE_GENERICIZE_HOOK_FIRST.obj_len = 3;
+ cdat->dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST.obj_hash = 445315846;
+ cdat->dsym_2967__REGISTER_PRE_GENERICIZE_HOOK_FIRST.obj_len = 3;
-/*inistring dstr_2953__REGISTER_PRE_GEN*/
- /*_.VALSTR___V2979*/ meltfptr[2978] =
- (void *) &cdat->dstr_2953__REGISTER_PRE_GEN;
- cdat->dstr_2953__REGISTER_PRE_GEN.discr =
+/*inistring dstr_2968__REGISTER_PRE_GEN*/
+ /*_.VALSTR___V2994*/ meltfptr[2993] =
+ (void *) &cdat->dstr_2968__REGISTER_PRE_GEN;
+ cdat->dstr_2968__REGISTER_PRE_GEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2953__REGISTER_PRE_GEN.val,
+ /*small inistring */ strncpy (cdat->dstr_2968__REGISTER_PRE_GEN.val,
"REGISTER_PRE_GENERICIZE_HOOK_FIRST",
- sizeof (cdat->dstr_2953__REGISTER_PRE_GEN.
+ sizeof (cdat->dstr_2968__REGISTER_PRE_GEN.
val) - 1);
-/*iniobj dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2980*/ meltfptr[2979])
- /*_.VALDATA___V2980*/
- meltfptr[2979] =
- (void *) &cdat->dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST;
+/*iniobj dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2995*/ meltfptr[2994])
+ /*_.VALDATA___V2995*/
+ meltfptr[2994] =
+ (void *) &cdat->dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST",
+ ("iniobj check.discr isobj dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST",
+ ("iniobj check.discr objmagic dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST.meltobj_class =
+ cdat->dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST.obj_hash = 173713302;
- cdat->dsym_2954__REGISTER_PRE_GENERICIZE_HOOK_LAST.obj_len = 3;
+ cdat->dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST.obj_hash = 173713302;
+ cdat->dsym_2969__REGISTER_PRE_GENERICIZE_HOOK_LAST.obj_len = 3;
-/*inistring dstr_2955__REGISTER_PRE_GEN*/
- /*_.VALSTR___V2981*/ meltfptr[2980] =
- (void *) &cdat->dstr_2955__REGISTER_PRE_GEN;
- cdat->dstr_2955__REGISTER_PRE_GEN.discr =
+/*inistring dstr_2970__REGISTER_PRE_GEN*/
+ /*_.VALSTR___V2996*/ meltfptr[2995] =
+ (void *) &cdat->dstr_2970__REGISTER_PRE_GEN;
+ cdat->dstr_2970__REGISTER_PRE_GEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2955__REGISTER_PRE_GEN.val,
+ /*small inistring */ strncpy (cdat->dstr_2970__REGISTER_PRE_GEN.val,
"REGISTER_PRE_GENERICIZE_HOOK_LAST",
- sizeof (cdat->dstr_2955__REGISTER_PRE_GEN.
+ sizeof (cdat->dstr_2970__REGISTER_PRE_GEN.
val) - 1);
-/*iniobj dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2982*/ meltfptr[2981])
- /*_.VALDATA___V2982*/
- meltfptr[2981] =
- (void *) &cdat->dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST;
+/*iniobj dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2997*/ meltfptr[2996])
+ /*_.VALDATA___V2997*/
+ meltfptr[2996] =
+ (void *) &cdat->dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST",
+ ("iniobj check.discr isobj dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST",
+ ("iniobj check.discr objmagic dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST.meltobj_class =
+ cdat->dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST.obj_hash = 622106470;
- cdat->dsym_2956__RETRIEVE_VALUE_DESCRIPTOR_LIST.obj_len = 3;
+ cdat->dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST.obj_hash = 622106470;
+ cdat->dsym_2971__RETRIEVE_VALUE_DESCRIPTOR_LIST.obj_len = 3;
-/*inistring dstr_2957__RETRIEVE_VALUE_D*/
- /*_.VALSTR___V2983*/ meltfptr[2982] =
- (void *) &cdat->dstr_2957__RETRIEVE_VALUE_D;
- cdat->dstr_2957__RETRIEVE_VALUE_D.discr =
+/*inistring dstr_2972__RETRIEVE_VALUE_D*/
+ /*_.VALSTR___V2998*/ meltfptr[2997] =
+ (void *) &cdat->dstr_2972__RETRIEVE_VALUE_D;
+ cdat->dstr_2972__RETRIEVE_VALUE_D.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2957__RETRIEVE_VALUE_D.val,
+ /*small inistring */ strncpy (cdat->dstr_2972__RETRIEVE_VALUE_D.val,
"RETRIEVE_VALUE_DESCRIPTOR_LIST",
- sizeof (cdat->dstr_2957__RETRIEVE_VALUE_D.
+ sizeof (cdat->dstr_2972__RETRIEVE_VALUE_D.
val) - 1);
-/*iniobj dsym_2958__SET_CONTENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2984*/ meltfptr[2983])
- /*_.VALDATA___V2984*/
- meltfptr[2983] = (void *) &cdat->dsym_2958__SET_CONTENT;
+/*iniobj dsym_2973__SET_CONTENT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V2999*/ meltfptr[2998])
+ /*_.VALDATA___V2999*/
+ meltfptr[2998] = (void *) &cdat->dsym_2973__SET_CONTENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2958__SET_CONTENT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2973__SET_CONTENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2958__SET_CONTENT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2973__SET_CONTENT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2958__SET_CONTENT.meltobj_class =
+ cdat->dsym_2973__SET_CONTENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2958__SET_CONTENT.obj_hash = 1002281179;
- cdat->dsym_2958__SET_CONTENT.obj_len = 3;
+ cdat->dsym_2973__SET_CONTENT.obj_hash = 1002281179;
+ cdat->dsym_2973__SET_CONTENT.obj_len = 3;
-/*inistring dstr_2959__SET_CONTENT*/
- /*_.VALSTR___V2985*/ meltfptr[2984] =
- (void *) &cdat->dstr_2959__SET_CONTENT;
- cdat->dstr_2959__SET_CONTENT.discr =
+/*inistring dstr_2974__SET_CONTENT*/
+ /*_.VALSTR___V3000*/ meltfptr[2999] =
+ (void *) &cdat->dstr_2974__SET_CONTENT;
+ cdat->dstr_2974__SET_CONTENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2959__SET_CONTENT.val,
+ /*small inistring */ strncpy (cdat->dstr_2974__SET_CONTENT.val,
"SET_CONTENT",
- sizeof (cdat->dstr_2959__SET_CONTENT.val) -
+ sizeof (cdat->dstr_2974__SET_CONTENT.val) -
1);
-/*iniobj dsym_2960__SOME_INTEGER_DIFFERENT_FROM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2986*/ meltfptr[2985])
- /*_.VALDATA___V2986*/
- meltfptr[2985] = (void *) &cdat->dsym_2960__SOME_INTEGER_DIFFERENT_FROM;
+/*iniobj dsym_2975__SOME_INTEGER_DIFFERENT_FROM*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3001*/ meltfptr[3000])
+ /*_.VALDATA___V3001*/
+ meltfptr[3000] = (void *) &cdat->dsym_2975__SOME_INTEGER_DIFFERENT_FROM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2960__SOME_INTEGER_DIFFERENT_FROM",
+ ("iniobj check.discr isobj dsym_2975__SOME_INTEGER_DIFFERENT_FROM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2960__SOME_INTEGER_DIFFERENT_FROM",
+ ("iniobj check.discr objmagic dsym_2975__SOME_INTEGER_DIFFERENT_FROM",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2960__SOME_INTEGER_DIFFERENT_FROM.meltobj_class =
+ cdat->dsym_2975__SOME_INTEGER_DIFFERENT_FROM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2960__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 128362274;
- cdat->dsym_2960__SOME_INTEGER_DIFFERENT_FROM.obj_len = 3;
+ cdat->dsym_2975__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 128362274;
+ cdat->dsym_2975__SOME_INTEGER_DIFFERENT_FROM.obj_len = 3;
-/*inistring dstr_2961__SOME_INTEGER_DIF*/
- /*_.VALSTR___V2987*/ meltfptr[2986] =
- (void *) &cdat->dstr_2961__SOME_INTEGER_DIF;
- cdat->dstr_2961__SOME_INTEGER_DIF.discr =
+/*inistring dstr_2976__SOME_INTEGER_DIF*/
+ /*_.VALSTR___V3002*/ meltfptr[3001] =
+ (void *) &cdat->dstr_2976__SOME_INTEGER_DIF;
+ cdat->dstr_2976__SOME_INTEGER_DIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2961__SOME_INTEGER_DIF.val,
+ /*small inistring */ strncpy (cdat->dstr_2976__SOME_INTEGER_DIF.val,
"SOME_INTEGER_DIFFERENT_FROM",
- sizeof (cdat->dstr_2961__SOME_INTEGER_DIF.
+ sizeof (cdat->dstr_2976__SOME_INTEGER_DIF.
val) - 1);
-/*iniobj dsym_2962__SOME_INTEGER_EQUAL_TO*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2988*/ meltfptr[2987])
- /*_.VALDATA___V2988*/
- meltfptr[2987] = (void *) &cdat->dsym_2962__SOME_INTEGER_EQUAL_TO;
+/*iniobj dsym_2977__SOME_INTEGER_EQUAL_TO*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3003*/ meltfptr[3002])
+ /*_.VALDATA___V3003*/
+ meltfptr[3002] = (void *) &cdat->dsym_2977__SOME_INTEGER_EQUAL_TO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2962__SOME_INTEGER_EQUAL_TO",
+ ("iniobj check.discr isobj dsym_2977__SOME_INTEGER_EQUAL_TO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2962__SOME_INTEGER_EQUAL_TO",
+ ("iniobj check.discr objmagic dsym_2977__SOME_INTEGER_EQUAL_TO",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2962__SOME_INTEGER_EQUAL_TO.meltobj_class =
+ cdat->dsym_2977__SOME_INTEGER_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2962__SOME_INTEGER_EQUAL_TO.obj_hash = 247647050;
- cdat->dsym_2962__SOME_INTEGER_EQUAL_TO.obj_len = 3;
+ cdat->dsym_2977__SOME_INTEGER_EQUAL_TO.obj_hash = 247647050;
+ cdat->dsym_2977__SOME_INTEGER_EQUAL_TO.obj_len = 3;
-/*inistring dstr_2963__SOME_INTEGER_EQU*/
- /*_.VALSTR___V2989*/ meltfptr[2988] =
- (void *) &cdat->dstr_2963__SOME_INTEGER_EQU;
- cdat->dstr_2963__SOME_INTEGER_EQU.discr =
+/*inistring dstr_2978__SOME_INTEGER_EQU*/
+ /*_.VALSTR___V3004*/ meltfptr[3003] =
+ (void *) &cdat->dstr_2978__SOME_INTEGER_EQU;
+ cdat->dstr_2978__SOME_INTEGER_EQU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2963__SOME_INTEGER_EQU.val,
+ /*small inistring */ strncpy (cdat->dstr_2978__SOME_INTEGER_EQU.val,
"SOME_INTEGER_EQUAL_TO",
- sizeof (cdat->dstr_2963__SOME_INTEGER_EQU.
+ sizeof (cdat->dstr_2978__SOME_INTEGER_EQU.
val) - 1);
-/*iniobj dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2990*/ meltfptr[2989])
- /*_.VALDATA___V2990*/
- meltfptr[2989] =
- (void *) &cdat->dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO;
+/*iniobj dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3005*/ meltfptr[3004])
+ /*_.VALDATA___V3005*/
+ meltfptr[3004] =
+ (void *) &cdat->dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO",
+ ("iniobj check.discr isobj dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO",
+ ("iniobj check.discr objmagic dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO.meltobj_class =
+ cdat->dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 770615202;
- cdat->dsym_2964__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_len = 3;
+ cdat->dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 770615202;
+ cdat->dsym_2979__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_len = 3;
-/*inistring dstr_2965__SOME_INTEGER_GRE*/
- /*_.VALSTR___V2991*/ meltfptr[2990] =
- (void *) &cdat->dstr_2965__SOME_INTEGER_GRE;
- cdat->dstr_2965__SOME_INTEGER_GRE.discr =
+/*inistring dstr_2980__SOME_INTEGER_GRE*/
+ /*_.VALSTR___V3006*/ meltfptr[3005] =
+ (void *) &cdat->dstr_2980__SOME_INTEGER_GRE;
+ cdat->dstr_2980__SOME_INTEGER_GRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2965__SOME_INTEGER_GRE.val,
+ /*small inistring */ strncpy (cdat->dstr_2980__SOME_INTEGER_GRE.val,
"SOME_INTEGER_GREATER_OR_EQUAL_TO",
- sizeof (cdat->dstr_2965__SOME_INTEGER_GRE.
+ sizeof (cdat->dstr_2980__SOME_INTEGER_GRE.
val) - 1);
-/*iniobj dsym_2966__SOME_INTEGER_GREATER_THAN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2992*/ meltfptr[2991])
- /*_.VALDATA___V2992*/
- meltfptr[2991] = (void *) &cdat->dsym_2966__SOME_INTEGER_GREATER_THAN;
+/*iniobj dsym_2981__SOME_INTEGER_GREATER_THAN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3007*/ meltfptr[3006])
+ /*_.VALDATA___V3007*/
+ meltfptr[3006] = (void *) &cdat->dsym_2981__SOME_INTEGER_GREATER_THAN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2966__SOME_INTEGER_GREATER_THAN",
+ ("iniobj check.discr isobj dsym_2981__SOME_INTEGER_GREATER_THAN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2966__SOME_INTEGER_GREATER_THAN",
+ ("iniobj check.discr objmagic dsym_2981__SOME_INTEGER_GREATER_THAN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2966__SOME_INTEGER_GREATER_THAN.meltobj_class =
+ cdat->dsym_2981__SOME_INTEGER_GREATER_THAN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2966__SOME_INTEGER_GREATER_THAN.obj_hash = 254063814;
- cdat->dsym_2966__SOME_INTEGER_GREATER_THAN.obj_len = 3;
+ cdat->dsym_2981__SOME_INTEGER_GREATER_THAN.obj_hash = 254063814;
+ cdat->dsym_2981__SOME_INTEGER_GREATER_THAN.obj_len = 3;
-/*inistring dstr_2967__SOME_INTEGER_GRE*/
- /*_.VALSTR___V2993*/ meltfptr[2992] =
- (void *) &cdat->dstr_2967__SOME_INTEGER_GRE;
- cdat->dstr_2967__SOME_INTEGER_GRE.discr =
+/*inistring dstr_2982__SOME_INTEGER_GRE*/
+ /*_.VALSTR___V3008*/ meltfptr[3007] =
+ (void *) &cdat->dstr_2982__SOME_INTEGER_GRE;
+ cdat->dstr_2982__SOME_INTEGER_GRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2967__SOME_INTEGER_GRE.val,
+ /*small inistring */ strncpy (cdat->dstr_2982__SOME_INTEGER_GRE.val,
"SOME_INTEGER_GREATER_THAN",
- sizeof (cdat->dstr_2967__SOME_INTEGER_GRE.
+ sizeof (cdat->dstr_2982__SOME_INTEGER_GRE.
val) - 1);
-/*iniobj dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2994*/ meltfptr[2993])
- /*_.VALDATA___V2994*/
- meltfptr[2993] =
- (void *) &cdat->dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO;
+/*iniobj dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3009*/ meltfptr[3008])
+ /*_.VALDATA___V3009*/
+ meltfptr[3008] =
+ (void *) &cdat->dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO",
+ ("iniobj check.discr isobj dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO",
+ ("iniobj check.discr objmagic dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO.meltobj_class =
+ cdat->dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 378760406;
- cdat->dsym_2968__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_len = 3;
+ cdat->dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 378760406;
+ cdat->dsym_2983__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_len = 3;
-/*inistring dstr_2969__SOME_INTEGER_LOW*/
- /*_.VALSTR___V2995*/ meltfptr[2994] =
- (void *) &cdat->dstr_2969__SOME_INTEGER_LOW;
- cdat->dstr_2969__SOME_INTEGER_LOW.discr =
+/*inistring dstr_2984__SOME_INTEGER_LOW*/
+ /*_.VALSTR___V3010*/ meltfptr[3009] =
+ (void *) &cdat->dstr_2984__SOME_INTEGER_LOW;
+ cdat->dstr_2984__SOME_INTEGER_LOW.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2969__SOME_INTEGER_LOW.val,
+ /*small inistring */ strncpy (cdat->dstr_2984__SOME_INTEGER_LOW.val,
"SOME_INTEGER_LOWER_OR_EQUAL_TO",
- sizeof (cdat->dstr_2969__SOME_INTEGER_LOW.
+ sizeof (cdat->dstr_2984__SOME_INTEGER_LOW.
val) - 1);
-/*iniobj dsym_2970__SOME_INTEGER_LOWER_THAN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2996*/ meltfptr[2995])
- /*_.VALDATA___V2996*/
- meltfptr[2995] = (void *) &cdat->dsym_2970__SOME_INTEGER_LOWER_THAN;
+/*iniobj dsym_2985__SOME_INTEGER_LOWER_THAN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3011*/ meltfptr[3010])
+ /*_.VALDATA___V3011*/
+ meltfptr[3010] = (void *) &cdat->dsym_2985__SOME_INTEGER_LOWER_THAN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2970__SOME_INTEGER_LOWER_THAN",
+ ("iniobj check.discr isobj dsym_2985__SOME_INTEGER_LOWER_THAN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2970__SOME_INTEGER_LOWER_THAN",
+ ("iniobj check.discr objmagic dsym_2985__SOME_INTEGER_LOWER_THAN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2970__SOME_INTEGER_LOWER_THAN.meltobj_class =
+ cdat->dsym_2985__SOME_INTEGER_LOWER_THAN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2970__SOME_INTEGER_LOWER_THAN.obj_hash = 631237543;
- cdat->dsym_2970__SOME_INTEGER_LOWER_THAN.obj_len = 3;
+ cdat->dsym_2985__SOME_INTEGER_LOWER_THAN.obj_hash = 631237543;
+ cdat->dsym_2985__SOME_INTEGER_LOWER_THAN.obj_len = 3;
-/*inistring dstr_2971__SOME_INTEGER_LOW*/
- /*_.VALSTR___V2997*/ meltfptr[2996] =
- (void *) &cdat->dstr_2971__SOME_INTEGER_LOW;
- cdat->dstr_2971__SOME_INTEGER_LOW.discr =
+/*inistring dstr_2986__SOME_INTEGER_LOW*/
+ /*_.VALSTR___V3012*/ meltfptr[3011] =
+ (void *) &cdat->dstr_2986__SOME_INTEGER_LOW;
+ cdat->dstr_2986__SOME_INTEGER_LOW.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2971__SOME_INTEGER_LOW.val,
+ /*small inistring */ strncpy (cdat->dstr_2986__SOME_INTEGER_LOW.val,
"SOME_INTEGER_LOWER_THAN",
- sizeof (cdat->dstr_2971__SOME_INTEGER_LOW.
+ sizeof (cdat->dstr_2986__SOME_INTEGER_LOW.
val) - 1);
-/*iniobj dsym_2972__SOME_INTEGER_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V2998*/ meltfptr[2997])
- /*_.VALDATA___V2998*/
- meltfptr[2997] = (void *) &cdat->dsym_2972__SOME_INTEGER_MULTIPLE;
+/*iniobj dsym_2987__SOME_INTEGER_MULTIPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3013*/ meltfptr[3012])
+ /*_.VALDATA___V3013*/
+ meltfptr[3012] = (void *) &cdat->dsym_2987__SOME_INTEGER_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2972__SOME_INTEGER_MULTIPLE",
+ ("iniobj check.discr isobj dsym_2987__SOME_INTEGER_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2972__SOME_INTEGER_MULTIPLE",
+ ("iniobj check.discr objmagic dsym_2987__SOME_INTEGER_MULTIPLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2972__SOME_INTEGER_MULTIPLE.meltobj_class =
+ cdat->dsym_2987__SOME_INTEGER_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2972__SOME_INTEGER_MULTIPLE.obj_hash = 300265104;
- cdat->dsym_2972__SOME_INTEGER_MULTIPLE.obj_len = 3;
+ cdat->dsym_2987__SOME_INTEGER_MULTIPLE.obj_hash = 300265104;
+ cdat->dsym_2987__SOME_INTEGER_MULTIPLE.obj_len = 3;
-/*inistring dstr_2973__SOME_INTEGER_MUL*/
- /*_.VALSTR___V2999*/ meltfptr[2998] =
- (void *) &cdat->dstr_2973__SOME_INTEGER_MUL;
- cdat->dstr_2973__SOME_INTEGER_MUL.discr =
+/*inistring dstr_2988__SOME_INTEGER_MUL*/
+ /*_.VALSTR___V3014*/ meltfptr[3013] =
+ (void *) &cdat->dstr_2988__SOME_INTEGER_MUL;
+ cdat->dstr_2988__SOME_INTEGER_MUL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2973__SOME_INTEGER_MUL.val,
+ /*small inistring */ strncpy (cdat->dstr_2988__SOME_INTEGER_MUL.val,
"SOME_INTEGER_MULTIPLE",
- sizeof (cdat->dstr_2973__SOME_INTEGER_MUL.
+ sizeof (cdat->dstr_2988__SOME_INTEGER_MUL.
val) - 1);
-/*iniobj dsym_2974__SOME_STRING_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V3000*/ meltfptr[2999])
- /*_.VALDATA___V3000*/
- meltfptr[2999] = (void *) &cdat->dsym_2974__SOME_STRING_VALUE;
+/*iniobj dsym_2989__SOME_STRING_VALUE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3015*/ meltfptr[3014])
+ /*_.VALDATA___V3015*/
+ meltfptr[3014] = (void *) &cdat->dsym_2989__SOME_STRING_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2974__SOME_STRING_VALUE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2989__SOME_STRING_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2974__SOME_STRING_VALUE",
+ ("iniobj check.discr objmagic dsym_2989__SOME_STRING_VALUE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2974__SOME_STRING_VALUE.meltobj_class =
+ cdat->dsym_2989__SOME_STRING_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2974__SOME_STRING_VALUE.obj_hash = 73266032;
- cdat->dsym_2974__SOME_STRING_VALUE.obj_len = 3;
+ cdat->dsym_2989__SOME_STRING_VALUE.obj_hash = 73266032;
+ cdat->dsym_2989__SOME_STRING_VALUE.obj_len = 3;
-/*inistring dstr_2975__SOME_STRING_VALU*/
- /*_.VALSTR___V3001*/ meltfptr[3000] =
- (void *) &cdat->dstr_2975__SOME_STRING_VALU;
- cdat->dstr_2975__SOME_STRING_VALU.discr =
+/*inistring dstr_2990__SOME_STRING_VALU*/
+ /*_.VALSTR___V3016*/ meltfptr[3015] =
+ (void *) &cdat->dstr_2990__SOME_STRING_VALU;
+ cdat->dstr_2990__SOME_STRING_VALU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2975__SOME_STRING_VALU.val,
+ /*small inistring */ strncpy (cdat->dstr_2990__SOME_STRING_VALU.val,
"SOME_STRING_VALUE",
- sizeof (cdat->dstr_2975__SOME_STRING_VALU.
+ sizeof (cdat->dstr_2990__SOME_STRING_VALU.
val) - 1);
-/*iniobj dsym_2976__TUPLE_NTH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V3002*/ meltfptr[3001])
- /*_.VALDATA___V3002*/
- meltfptr[3001] = (void *) &cdat->dsym_2976__TUPLE_NTH;
+/*iniobj dsym_2991__TUPLE_NTH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3017*/ meltfptr[3016])
+ /*_.VALDATA___V3017*/
+ meltfptr[3016] = (void *) &cdat->dsym_2991__TUPLE_NTH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2976__TUPLE_NTH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2991__TUPLE_NTH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2976__TUPLE_NTH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2991__TUPLE_NTH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2976__TUPLE_NTH.meltobj_class =
+ cdat->dsym_2991__TUPLE_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2976__TUPLE_NTH.obj_hash = 253823407;
- cdat->dsym_2976__TUPLE_NTH.obj_len = 3;
+ cdat->dsym_2991__TUPLE_NTH.obj_hash = 253823407;
+ cdat->dsym_2991__TUPLE_NTH.obj_len = 3;
-/*inistring dstr_2977__TUPLE_NTH*/
- /*_.VALSTR___V3003*/ meltfptr[3002] = (void *) &cdat->dstr_2977__TUPLE_NTH;
- cdat->dstr_2977__TUPLE_NTH.discr =
+/*inistring dstr_2992__TUPLE_NTH*/
+ /*_.VALSTR___V3018*/ meltfptr[3017] = (void *) &cdat->dstr_2992__TUPLE_NTH;
+ cdat->dstr_2992__TUPLE_NTH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2977__TUPLE_NTH.val, "TUPLE_NTH",
- sizeof (cdat->dstr_2977__TUPLE_NTH.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_2992__TUPLE_NTH.val, "TUPLE_NTH",
+ sizeof (cdat->dstr_2992__TUPLE_NTH.val) - 1);
-/*iniobj dsym_2978__TUPLE_SIZED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V3004*/ meltfptr[3003])
- /*_.VALDATA___V3004*/
- meltfptr[3003] = (void *) &cdat->dsym_2978__TUPLE_SIZED;
+/*iniobj dsym_2993__TUPLE_SIZED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3019*/ meltfptr[3018])
+ /*_.VALDATA___V3019*/
+ meltfptr[3018] = (void *) &cdat->dsym_2993__TUPLE_SIZED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_2978__TUPLE_SIZED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_2993__TUPLE_SIZED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_2978__TUPLE_SIZED",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_2993__TUPLE_SIZED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2978__TUPLE_SIZED.meltobj_class =
+ cdat->dsym_2993__TUPLE_SIZED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2978__TUPLE_SIZED.obj_hash = 620511343;
- cdat->dsym_2978__TUPLE_SIZED.obj_len = 3;
+ cdat->dsym_2993__TUPLE_SIZED.obj_hash = 620511343;
+ cdat->dsym_2993__TUPLE_SIZED.obj_len = 3;
-/*inistring dstr_2979__TUPLE_SIZED*/
- /*_.VALSTR___V3005*/ meltfptr[3004] =
- (void *) &cdat->dstr_2979__TUPLE_SIZED;
- cdat->dstr_2979__TUPLE_SIZED.discr =
+/*inistring dstr_2994__TUPLE_SIZED*/
+ /*_.VALSTR___V3020*/ meltfptr[3019] =
+ (void *) &cdat->dstr_2994__TUPLE_SIZED;
+ cdat->dstr_2994__TUPLE_SIZED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2979__TUPLE_SIZED.val,
+ /*small inistring */ strncpy (cdat->dstr_2994__TUPLE_SIZED.val,
"TUPLE_SIZED",
- sizeof (cdat->dstr_2979__TUPLE_SIZED.val) -
+ sizeof (cdat->dstr_2994__TUPLE_SIZED.val) -
1);
-/*iniobj dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V3006*/ meltfptr[3005])
- /*_.VALDATA___V3006*/
- meltfptr[3005] =
- (void *) &cdat->dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK;
+/*iniobj dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3021*/ meltfptr[3020])
+ /*_.VALDATA___V3021*/
+ meltfptr[3020] =
+ (void *) &cdat->dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK",
+ ("iniobj check.discr isobj dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK",
+ ("iniobj check.discr objmagic dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK.meltobj_class =
+ cdat->dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK.obj_hash = 750037078;
- cdat->dsym_2980__UNREGISTER_PASS_EXECUTION_HOOK.obj_len = 3;
+ cdat->dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK.obj_hash = 750037078;
+ cdat->dsym_2995__UNREGISTER_PASS_EXECUTION_HOOK.obj_len = 3;
-/*inistring dstr_2981__UNREGISTER_PASS_*/
- /*_.VALSTR___V3007*/ meltfptr[3006] =
- (void *) &cdat->dstr_2981__UNREGISTER_PASS_;
- cdat->dstr_2981__UNREGISTER_PASS_.discr =
+/*inistring dstr_2996__UNREGISTER_PASS_*/
+ /*_.VALSTR___V3022*/ meltfptr[3021] =
+ (void *) &cdat->dstr_2996__UNREGISTER_PASS_;
+ cdat->dstr_2996__UNREGISTER_PASS_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2981__UNREGISTER_PASS_.val,
+ /*small inistring */ strncpy (cdat->dstr_2996__UNREGISTER_PASS_.val,
"UNREGISTER_PASS_EXECUTION_HOOK",
- sizeof (cdat->dstr_2981__UNREGISTER_PASS_.
+ sizeof (cdat->dstr_2996__UNREGISTER_PASS_.
val) - 1);
-/*iniobj dsym_2982__GENERATE_MELT_MODULE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V3008*/ meltfptr[3007])
- /*_.VALDATA___V3008*/
- meltfptr[3007] = (void *) &cdat->dsym_2982__GENERATE_MELT_MODULE;
+/*iniobj dsym_2997__GENERATE_MELT_MODULE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V3023*/ meltfptr[3022])
+ /*_.VALDATA___V3023*/
+ meltfptr[3022] = (void *) &cdat->dsym_2997__GENERATE_MELT_MODULE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_2982__GENERATE_MELT_MODULE",
+ ("iniobj check.discr isobj dsym_2997__GENERATE_MELT_MODULE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_2982__GENERATE_MELT_MODULE",
+ ("iniobj check.discr objmagic dsym_2997__GENERATE_MELT_MODULE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_2982__GENERATE_MELT_MODULE.meltobj_class =
+ cdat->dsym_2997__GENERATE_MELT_MODULE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_2982__GENERATE_MELT_MODULE.obj_hash = 308574899;
- cdat->dsym_2982__GENERATE_MELT_MODULE.obj_len = 3;
+ cdat->dsym_2997__GENERATE_MELT_MODULE.obj_hash = 308574899;
+ cdat->dsym_2997__GENERATE_MELT_MODULE.obj_len = 3;
-/*inistring dstr_2983__GENERATE_MELT_MO*/
- /*_.VALSTR___V3009*/ meltfptr[3008] =
- (void *) &cdat->dstr_2983__GENERATE_MELT_MO;
- cdat->dstr_2983__GENERATE_MELT_MO.discr =
+/*inistring dstr_2998__GENERATE_MELT_MO*/
+ /*_.VALSTR___V3024*/ meltfptr[3023] =
+ (void *) &cdat->dstr_2998__GENERATE_MELT_MO;
+ cdat->dstr_2998__GENERATE_MELT_MO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_2983__GENERATE_MELT_MO.val,
+ /*small inistring */ strncpy (cdat->dstr_2998__GENERATE_MELT_MO.val,
"GENERATE_MELT_MODULE",
- sizeof (cdat->dstr_2983__GENERATE_MELT_MO.
+ sizeof (cdat->dstr_2998__GENERATE_MELT_MO.
val) - 1);
cdat = NULL;
melt_prohibit_garbcoll = FALSE;
@@ -41732,13 +41926,13 @@ start_module_melt (void *modargp_)
initial_frame_st meltfram__;
#define meltframe meltfram__
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 3049;
+ meltfram__.mcfr_nbvar = 3064;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -2410;
+ /*minihash */ -4031;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_base;
/**COMMENT: get previous environment **/ ;
@@ -45247,11 +45441,38 @@ start_module_melt (void *modargp_)
/*^getnamedsymbol */
+ /*getnamedsym:INCREMENT */
+ {
+ melt_ptr_t sy_INCREMENT = meltgc_named_symbol ("INCREMENT", MELT_GET);
+ if (sy_INCREMENT && NULL == /*_.VALDATA___V2912*/ meltfptr[2911])
+ /*_.VALDATA___V2912*/ meltfptr[2911] = (void *) sy_INCREMENT;
+ }
+
+ /*^getnamedsymbol */
+
+ /*getnamedsym:LEFT */
+ {
+ melt_ptr_t sy_LEFT = meltgc_named_symbol ("LEFT", MELT_GET);
+ if (sy_LEFT && NULL == /*_.VALDATA___V2917*/ meltfptr[2916])
+ /*_.VALDATA___V2917*/ meltfptr[2916] = (void *) sy_LEFT;
+ }
+
+ /*^getnamedsymbol */
+
+ /*getnamedsym:INCR */
+ {
+ melt_ptr_t sy_INCR = meltgc_named_symbol ("INCR", MELT_GET);
+ if (sy_INCR && NULL == /*_.VALDATA___V2920*/ meltfptr[2919])
+ /*_.VALDATA___V2920*/ meltfptr[2919] = (void *) sy_INCR;
+ }
+
+ /*^getnamedsymbol */
+
/*getnamedsym:+IV */
{
melt_ptr_t sy_IV = meltgc_named_symbol ("+IV", MELT_GET);
- if (sy_IV && NULL == /*_.VALDATA___V2912*/ meltfptr[2911])
- /*_.VALDATA___V2912*/ meltfptr[2911] = (void *) sy_IV;
+ if (sy_IV && NULL == /*_.VALDATA___V2927*/ meltfptr[2926])
+ /*_.VALDATA___V2927*/ meltfptr[2926] = (void *) sy_IV;
}
/*^getnamedsymbol */
@@ -45259,8 +45480,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:-IV */
{
melt_ptr_t sy_IV = meltgc_named_symbol ("-IV", MELT_GET);
- if (sy_IV && NULL == /*_.VALDATA___V2914*/ meltfptr[2913])
- /*_.VALDATA___V2914*/ meltfptr[2913] = (void *) sy_IV;
+ if (sy_IV && NULL == /*_.VALDATA___V2929*/ meltfptr[2928])
+ /*_.VALDATA___V2929*/ meltfptr[2928] = (void *) sy_IV;
}
/*^getnamedsymbol */
@@ -45268,8 +45489,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:*IV */
{
melt_ptr_t sy_IV = meltgc_named_symbol ("*IV", MELT_GET);
- if (sy_IV && NULL == /*_.VALDATA___V2916*/ meltfptr[2915])
- /*_.VALDATA___V2916*/ meltfptr[2915] = (void *) sy_IV;
+ if (sy_IV && NULL == /*_.VALDATA___V2931*/ meltfptr[2930])
+ /*_.VALDATA___V2931*/ meltfptr[2930] = (void *) sy_IV;
}
/*^getnamedsymbol */
@@ -45277,8 +45498,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:/IV */
{
melt_ptr_t sy_IV = meltgc_named_symbol ("/IV", MELT_GET);
- if (sy_IV && NULL == /*_.VALDATA___V2918*/ meltfptr[2917])
- /*_.VALDATA___V2918*/ meltfptr[2917] = (void *) sy_IV;
+ if (sy_IV && NULL == /*_.VALDATA___V2933*/ meltfptr[2932])
+ /*_.VALDATA___V2933*/ meltfptr[2932] = (void *) sy_IV;
}
/*^getnamedsymbol */
@@ -45286,8 +45507,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:%IV */
{
melt_ptr_t sy_IV = meltgc_named_symbol ("%IV", MELT_GET);
- if (sy_IV && NULL == /*_.VALDATA___V2920*/ meltfptr[2919])
- /*_.VALDATA___V2920*/ meltfptr[2919] = (void *) sy_IV;
+ if (sy_IV && NULL == /*_.VALDATA___V2935*/ meltfptr[2934])
+ /*_.VALDATA___V2935*/ meltfptr[2934] = (void *) sy_IV;
}
/*^getnamedsymbol */
@@ -45295,8 +45516,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:ADD2OUT */
{
melt_ptr_t sy_ADD2OUT = meltgc_named_symbol ("ADD2OUT", MELT_GET);
- if (sy_ADD2OUT && NULL == /*_.VALDATA___V2922*/ meltfptr[2921])
- /*_.VALDATA___V2922*/ meltfptr[2921] = (void *) sy_ADD2OUT;
+ if (sy_ADD2OUT && NULL == /*_.VALDATA___V2937*/ meltfptr[2936])
+ /*_.VALDATA___V2937*/ meltfptr[2936] = (void *) sy_ADD2OUT;
}
/*^getnamedsymbol */
@@ -45306,8 +45527,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_COMPARE_NAMED_ALPHA =
meltgc_named_symbol ("COMPARE_NAMED_ALPHA", MELT_GET);
if (sy_COMPARE_NAMED_ALPHA
- && NULL == /*_.VALDATA___V2924*/ meltfptr[2923])
- /*_.VALDATA___V2924*/ meltfptr[2923] = (void *) sy_COMPARE_NAMED_ALPHA;
+ && NULL == /*_.VALDATA___V2939*/ meltfptr[2938])
+ /*_.VALDATA___V2939*/ meltfptr[2938] = (void *) sy_COMPARE_NAMED_ALPHA;
}
/*^getnamedsymbol */
@@ -45316,8 +45537,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CSTRING_PREFIXED =
meltgc_named_symbol ("CSTRING_PREFIXED", MELT_GET);
- if (sy_CSTRING_PREFIXED && NULL == /*_.VALDATA___V2926*/ meltfptr[2925])
- /*_.VALDATA___V2926*/ meltfptr[2925] = (void *) sy_CSTRING_PREFIXED;
+ if (sy_CSTRING_PREFIXED && NULL == /*_.VALDATA___V2941*/ meltfptr[2940])
+ /*_.VALDATA___V2941*/ meltfptr[2940] = (void *) sy_CSTRING_PREFIXED;
}
/*^getnamedsymbol */
@@ -45326,8 +45547,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CSTRING_SAME =
meltgc_named_symbol ("CSTRING_SAME", MELT_GET);
- if (sy_CSTRING_SAME && NULL == /*_.VALDATA___V2928*/ meltfptr[2927])
- /*_.VALDATA___V2928*/ meltfptr[2927] = (void *) sy_CSTRING_SAME;
+ if (sy_CSTRING_SAME && NULL == /*_.VALDATA___V2943*/ meltfptr[2942])
+ /*_.VALDATA___V2943*/ meltfptr[2942] = (void *) sy_CSTRING_SAME;
}
/*^getnamedsymbol */
@@ -45336,8 +45557,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_FOREACH_LONG_UPTO =
meltgc_named_symbol ("FOREACH_LONG_UPTO", MELT_GET);
- if (sy_FOREACH_LONG_UPTO && NULL == /*_.VALDATA___V2930*/ meltfptr[2929])
- /*_.VALDATA___V2930*/ meltfptr[2929] = (void *) sy_FOREACH_LONG_UPTO;
+ if (sy_FOREACH_LONG_UPTO && NULL == /*_.VALDATA___V2945*/ meltfptr[2944])
+ /*_.VALDATA___V2945*/ meltfptr[2944] = (void *) sy_FOREACH_LONG_UPTO;
}
/*^getnamedsymbol */
@@ -45346,8 +45567,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MAPSTRING_EVERY =
meltgc_named_symbol ("MAPSTRING_EVERY", MELT_GET);
- if (sy_MAPSTRING_EVERY && NULL == /*_.VALDATA___V2932*/ meltfptr[2931])
- /*_.VALDATA___V2932*/ meltfptr[2931] = (void *) sy_MAPSTRING_EVERY;
+ if (sy_MAPSTRING_EVERY && NULL == /*_.VALDATA___V2947*/ meltfptr[2946])
+ /*_.VALDATA___V2947*/ meltfptr[2946] = (void *) sy_MAPSTRING_EVERY;
}
/*^getnamedsymbol */
@@ -45357,8 +45578,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MAPSTRING_ITERATE_TEST =
meltgc_named_symbol ("MAPSTRING_ITERATE_TEST", MELT_GET);
if (sy_MAPSTRING_ITERATE_TEST
- && NULL == /*_.VALDATA___V2934*/ meltfptr[2933])
- /*_.VALDATA___V2934*/ meltfptr[2933] =
+ && NULL == /*_.VALDATA___V2949*/ meltfptr[2948])
+ /*_.VALDATA___V2949*/ meltfptr[2948] =
(void *) sy_MAPSTRING_ITERATE_TEST;
}
@@ -45369,8 +45590,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MULTIPLE_BACKWARD_EVERY =
meltgc_named_symbol ("MULTIPLE_BACKWARD_EVERY", MELT_GET);
if (sy_MULTIPLE_BACKWARD_EVERY
- && NULL == /*_.VALDATA___V2936*/ meltfptr[2935])
- /*_.VALDATA___V2936*/ meltfptr[2935] =
+ && NULL == /*_.VALDATA___V2951*/ meltfptr[2950])
+ /*_.VALDATA___V2951*/ meltfptr[2950] =
(void *) sy_MULTIPLE_BACKWARD_EVERY;
}
@@ -45380,8 +45601,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_EVERY =
meltgc_named_symbol ("MULTIPLE_EVERY", MELT_GET);
- if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V2938*/ meltfptr[2937])
- /*_.VALDATA___V2938*/ meltfptr[2937] = (void *) sy_MULTIPLE_EVERY;
+ if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V2953*/ meltfptr[2952])
+ /*_.VALDATA___V2953*/ meltfptr[2952] = (void *) sy_MULTIPLE_EVERY;
}
/*^getnamedsymbol */
@@ -45391,8 +45612,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MULTIPLE_EVERY_BOTH =
meltgc_named_symbol ("MULTIPLE_EVERY_BOTH", MELT_GET);
if (sy_MULTIPLE_EVERY_BOTH
- && NULL == /*_.VALDATA___V2940*/ meltfptr[2939])
- /*_.VALDATA___V2940*/ meltfptr[2939] = (void *) sy_MULTIPLE_EVERY_BOTH;
+ && NULL == /*_.VALDATA___V2955*/ meltfptr[2954])
+ /*_.VALDATA___V2955*/ meltfptr[2954] = (void *) sy_MULTIPLE_EVERY_BOTH;
}
/*^getnamedsymbol */
@@ -45403,8 +45624,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST",
MELT_GET);
if (sy_REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST
- && NULL == /*_.VALDATA___V2942*/ meltfptr[2941])
- /*_.VALDATA___V2942*/ meltfptr[2941] =
+ && NULL == /*_.VALDATA___V2957*/ meltfptr[2956])
+ /*_.VALDATA___V2957*/ meltfptr[2956] =
(void *) sy_REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST;
}
@@ -45415,8 +45636,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_ALL_IPA_PASSES_END_HOOK_LAST =
meltgc_named_symbol ("REGISTER_ALL_IPA_PASSES_END_HOOK_LAST", MELT_GET);
if (sy_REGISTER_ALL_IPA_PASSES_END_HOOK_LAST
- && NULL == /*_.VALDATA___V2944*/ meltfptr[2943])
- /*_.VALDATA___V2944*/ meltfptr[2943] =
+ && NULL == /*_.VALDATA___V2959*/ meltfptr[2958])
+ /*_.VALDATA___V2959*/ meltfptr[2958] =
(void *) sy_REGISTER_ALL_IPA_PASSES_END_HOOK_LAST;
}
@@ -45428,8 +45649,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST",
MELT_GET);
if (sy_REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST
- && NULL == /*_.VALDATA___V2946*/ meltfptr[2945])
- /*_.VALDATA___V2946*/ meltfptr[2945] =
+ && NULL == /*_.VALDATA___V2961*/ meltfptr[2960])
+ /*_.VALDATA___V2961*/ meltfptr[2960] =
(void *) sy_REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST;
}
@@ -45441,8 +45662,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_ALL_IPA_PASSES_START_HOOK_LAST",
MELT_GET);
if (sy_REGISTER_ALL_IPA_PASSES_START_HOOK_LAST
- && NULL == /*_.VALDATA___V2948*/ meltfptr[2947])
- /*_.VALDATA___V2948*/ meltfptr[2947] =
+ && NULL == /*_.VALDATA___V2963*/ meltfptr[2962])
+ /*_.VALDATA___V2963*/ meltfptr[2962] =
(void *) sy_REGISTER_ALL_IPA_PASSES_START_HOOK_LAST;
}
@@ -45453,8 +45674,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_ALL_PASSES_END_HOOK_FIRST =
meltgc_named_symbol ("REGISTER_ALL_PASSES_END_HOOK_FIRST", MELT_GET);
if (sy_REGISTER_ALL_PASSES_END_HOOK_FIRST
- && NULL == /*_.VALDATA___V2950*/ meltfptr[2949])
- /*_.VALDATA___V2950*/ meltfptr[2949] =
+ && NULL == /*_.VALDATA___V2965*/ meltfptr[2964])
+ /*_.VALDATA___V2965*/ meltfptr[2964] =
(void *) sy_REGISTER_ALL_PASSES_END_HOOK_FIRST;
}
@@ -45465,8 +45686,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_ALL_PASSES_END_HOOK_LAST =
meltgc_named_symbol ("REGISTER_ALL_PASSES_END_HOOK_LAST", MELT_GET);
if (sy_REGISTER_ALL_PASSES_END_HOOK_LAST
- && NULL == /*_.VALDATA___V2952*/ meltfptr[2951])
- /*_.VALDATA___V2952*/ meltfptr[2951] =
+ && NULL == /*_.VALDATA___V2967*/ meltfptr[2966])
+ /*_.VALDATA___V2967*/ meltfptr[2966] =
(void *) sy_REGISTER_ALL_PASSES_END_HOOK_LAST;
}
@@ -45477,8 +45698,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_ALL_PASSES_START_HOOK_FIRST =
meltgc_named_symbol ("REGISTER_ALL_PASSES_START_HOOK_FIRST", MELT_GET);
if (sy_REGISTER_ALL_PASSES_START_HOOK_FIRST
- && NULL == /*_.VALDATA___V2954*/ meltfptr[2953])
- /*_.VALDATA___V2954*/ meltfptr[2953] =
+ && NULL == /*_.VALDATA___V2969*/ meltfptr[2968])
+ /*_.VALDATA___V2969*/ meltfptr[2968] =
(void *) sy_REGISTER_ALL_PASSES_START_HOOK_FIRST;
}
@@ -45489,8 +45710,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_ALL_PASSES_START_HOOK_LAST =
meltgc_named_symbol ("REGISTER_ALL_PASSES_START_HOOK_LAST", MELT_GET);
if (sy_REGISTER_ALL_PASSES_START_HOOK_LAST
- && NULL == /*_.VALDATA___V2956*/ meltfptr[2955])
- /*_.VALDATA___V2956*/ meltfptr[2955] =
+ && NULL == /*_.VALDATA___V2971*/ meltfptr[2970])
+ /*_.VALDATA___V2971*/ meltfptr[2970] =
(void *) sy_REGISTER_ALL_PASSES_START_HOOK_LAST;
}
@@ -45502,8 +45723,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST",
MELT_GET);
if (sy_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST
- && NULL == /*_.VALDATA___V2958*/ meltfptr[2957])
- /*_.VALDATA___V2958*/ meltfptr[2957] =
+ && NULL == /*_.VALDATA___V2973*/ meltfptr[2972])
+ /*_.VALDATA___V2973*/ meltfptr[2972] =
(void *) sy_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST;
}
@@ -45515,8 +45736,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST",
MELT_GET);
if (sy_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST
- && NULL == /*_.VALDATA___V2960*/ meltfptr[2959])
- /*_.VALDATA___V2960*/ meltfptr[2959] =
+ && NULL == /*_.VALDATA___V2975*/ meltfptr[2974])
+ /*_.VALDATA___V2975*/ meltfptr[2974] =
(void *) sy_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST;
}
@@ -45528,8 +45749,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST",
MELT_GET);
if (sy_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST
- && NULL == /*_.VALDATA___V2962*/ meltfptr[2961])
- /*_.VALDATA___V2962*/ meltfptr[2961] =
+ && NULL == /*_.VALDATA___V2977*/ meltfptr[2976])
+ /*_.VALDATA___V2977*/ meltfptr[2976] =
(void *) sy_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST;
}
@@ -45541,8 +45762,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST",
MELT_GET);
if (sy_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST
- && NULL == /*_.VALDATA___V2964*/ meltfptr[2963])
- /*_.VALDATA___V2964*/ meltfptr[2963] =
+ && NULL == /*_.VALDATA___V2979*/ meltfptr[2978])
+ /*_.VALDATA___V2979*/ meltfptr[2978] =
(void *) sy_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST;
}
@@ -45553,8 +45774,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_FINISH_DECL_HOOK_FIRST =
meltgc_named_symbol ("REGISTER_FINISH_DECL_HOOK_FIRST", MELT_GET);
if (sy_REGISTER_FINISH_DECL_HOOK_FIRST
- && NULL == /*_.VALDATA___V2966*/ meltfptr[2965])
- /*_.VALDATA___V2966*/ meltfptr[2965] =
+ && NULL == /*_.VALDATA___V2981*/ meltfptr[2980])
+ /*_.VALDATA___V2981*/ meltfptr[2980] =
(void *) sy_REGISTER_FINISH_DECL_HOOK_FIRST;
}
@@ -45565,8 +45786,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_FINISH_DECL_HOOK_LAST =
meltgc_named_symbol ("REGISTER_FINISH_DECL_HOOK_LAST", MELT_GET);
if (sy_REGISTER_FINISH_DECL_HOOK_LAST
- && NULL == /*_.VALDATA___V2968*/ meltfptr[2967])
- /*_.VALDATA___V2968*/ meltfptr[2967] =
+ && NULL == /*_.VALDATA___V2983*/ meltfptr[2982])
+ /*_.VALDATA___V2983*/ meltfptr[2982] =
(void *) sy_REGISTER_FINISH_DECL_HOOK_LAST;
}
@@ -45577,8 +45798,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_FINISH_TYPE_HOOK_FIRST =
meltgc_named_symbol ("REGISTER_FINISH_TYPE_HOOK_FIRST", MELT_GET);
if (sy_REGISTER_FINISH_TYPE_HOOK_FIRST
- && NULL == /*_.VALDATA___V2970*/ meltfptr[2969])
- /*_.VALDATA___V2970*/ meltfptr[2969] =
+ && NULL == /*_.VALDATA___V2985*/ meltfptr[2984])
+ /*_.VALDATA___V2985*/ meltfptr[2984] =
(void *) sy_REGISTER_FINISH_TYPE_HOOK_FIRST;
}
@@ -45589,8 +45810,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_FINISH_TYPE_HOOK_LAST =
meltgc_named_symbol ("REGISTER_FINISH_TYPE_HOOK_LAST", MELT_GET);
if (sy_REGISTER_FINISH_TYPE_HOOK_LAST
- && NULL == /*_.VALDATA___V2972*/ meltfptr[2971])
- /*_.VALDATA___V2972*/ meltfptr[2971] =
+ && NULL == /*_.VALDATA___V2987*/ meltfptr[2986])
+ /*_.VALDATA___V2987*/ meltfptr[2986] =
(void *) sy_REGISTER_FINISH_TYPE_HOOK_LAST;
}
@@ -45601,8 +45822,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_PASS_EXECUTION_HOOK =
meltgc_named_symbol ("REGISTER_PASS_EXECUTION_HOOK", MELT_GET);
if (sy_REGISTER_PASS_EXECUTION_HOOK
- && NULL == /*_.VALDATA___V2974*/ meltfptr[2973])
- /*_.VALDATA___V2974*/ meltfptr[2973] =
+ && NULL == /*_.VALDATA___V2989*/ meltfptr[2988])
+ /*_.VALDATA___V2989*/ meltfptr[2988] =
(void *) sy_REGISTER_PASS_EXECUTION_HOOK;
}
@@ -45613,8 +45834,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_PRAGMA_HANDLER =
meltgc_named_symbol ("REGISTER_PRAGMA_HANDLER", MELT_GET);
if (sy_REGISTER_PRAGMA_HANDLER
- && NULL == /*_.VALDATA___V2976*/ meltfptr[2975])
- /*_.VALDATA___V2976*/ meltfptr[2975] =
+ && NULL == /*_.VALDATA___V2991*/ meltfptr[2990])
+ /*_.VALDATA___V2991*/ meltfptr[2990] =
(void *) sy_REGISTER_PRAGMA_HANDLER;
}
@@ -45625,8 +45846,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_PRE_GENERICIZE_HOOK_FIRST =
meltgc_named_symbol ("REGISTER_PRE_GENERICIZE_HOOK_FIRST", MELT_GET);
if (sy_REGISTER_PRE_GENERICIZE_HOOK_FIRST
- && NULL == /*_.VALDATA___V2978*/ meltfptr[2977])
- /*_.VALDATA___V2978*/ meltfptr[2977] =
+ && NULL == /*_.VALDATA___V2993*/ meltfptr[2992])
+ /*_.VALDATA___V2993*/ meltfptr[2992] =
(void *) sy_REGISTER_PRE_GENERICIZE_HOOK_FIRST;
}
@@ -45637,8 +45858,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_PRE_GENERICIZE_HOOK_LAST =
meltgc_named_symbol ("REGISTER_PRE_GENERICIZE_HOOK_LAST", MELT_GET);
if (sy_REGISTER_PRE_GENERICIZE_HOOK_LAST
- && NULL == /*_.VALDATA___V2980*/ meltfptr[2979])
- /*_.VALDATA___V2980*/ meltfptr[2979] =
+ && NULL == /*_.VALDATA___V2995*/ meltfptr[2994])
+ /*_.VALDATA___V2995*/ meltfptr[2994] =
(void *) sy_REGISTER_PRE_GENERICIZE_HOOK_LAST;
}
@@ -45649,8 +45870,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_RETRIEVE_VALUE_DESCRIPTOR_LIST =
meltgc_named_symbol ("RETRIEVE_VALUE_DESCRIPTOR_LIST", MELT_GET);
if (sy_RETRIEVE_VALUE_DESCRIPTOR_LIST
- && NULL == /*_.VALDATA___V2982*/ meltfptr[2981])
- /*_.VALDATA___V2982*/ meltfptr[2981] =
+ && NULL == /*_.VALDATA___V2997*/ meltfptr[2996])
+ /*_.VALDATA___V2997*/ meltfptr[2996] =
(void *) sy_RETRIEVE_VALUE_DESCRIPTOR_LIST;
}
@@ -45659,8 +45880,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:SET_CONTENT */
{
melt_ptr_t sy_SET_CONTENT = meltgc_named_symbol ("SET_CONTENT", MELT_GET);
- if (sy_SET_CONTENT && NULL == /*_.VALDATA___V2984*/ meltfptr[2983])
- /*_.VALDATA___V2984*/ meltfptr[2983] = (void *) sy_SET_CONTENT;
+ if (sy_SET_CONTENT && NULL == /*_.VALDATA___V2999*/ meltfptr[2998])
+ /*_.VALDATA___V2999*/ meltfptr[2998] = (void *) sy_SET_CONTENT;
}
/*^getnamedsymbol */
@@ -45670,8 +45891,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_DIFFERENT_FROM =
meltgc_named_symbol ("SOME_INTEGER_DIFFERENT_FROM", MELT_GET);
if (sy_SOME_INTEGER_DIFFERENT_FROM
- && NULL == /*_.VALDATA___V2986*/ meltfptr[2985])
- /*_.VALDATA___V2986*/ meltfptr[2985] =
+ && NULL == /*_.VALDATA___V3001*/ meltfptr[3000])
+ /*_.VALDATA___V3001*/ meltfptr[3000] =
(void *) sy_SOME_INTEGER_DIFFERENT_FROM;
}
@@ -45682,8 +45903,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_EQUAL_TO =
meltgc_named_symbol ("SOME_INTEGER_EQUAL_TO", MELT_GET);
if (sy_SOME_INTEGER_EQUAL_TO
- && NULL == /*_.VALDATA___V2988*/ meltfptr[2987])
- /*_.VALDATA___V2988*/ meltfptr[2987] =
+ && NULL == /*_.VALDATA___V3003*/ meltfptr[3002])
+ /*_.VALDATA___V3003*/ meltfptr[3002] =
(void *) sy_SOME_INTEGER_EQUAL_TO;
}
@@ -45694,8 +45915,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_GREATER_OR_EQUAL_TO =
meltgc_named_symbol ("SOME_INTEGER_GREATER_OR_EQUAL_TO", MELT_GET);
if (sy_SOME_INTEGER_GREATER_OR_EQUAL_TO
- && NULL == /*_.VALDATA___V2990*/ meltfptr[2989])
- /*_.VALDATA___V2990*/ meltfptr[2989] =
+ && NULL == /*_.VALDATA___V3005*/ meltfptr[3004])
+ /*_.VALDATA___V3005*/ meltfptr[3004] =
(void *) sy_SOME_INTEGER_GREATER_OR_EQUAL_TO;
}
@@ -45706,8 +45927,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_GREATER_THAN =
meltgc_named_symbol ("SOME_INTEGER_GREATER_THAN", MELT_GET);
if (sy_SOME_INTEGER_GREATER_THAN
- && NULL == /*_.VALDATA___V2992*/ meltfptr[2991])
- /*_.VALDATA___V2992*/ meltfptr[2991] =
+ && NULL == /*_.VALDATA___V3007*/ meltfptr[3006])
+ /*_.VALDATA___V3007*/ meltfptr[3006] =
(void *) sy_SOME_INTEGER_GREATER_THAN;
}
@@ -45718,8 +45939,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_LOWER_OR_EQUAL_TO =
meltgc_named_symbol ("SOME_INTEGER_LOWER_OR_EQUAL_TO", MELT_GET);
if (sy_SOME_INTEGER_LOWER_OR_EQUAL_TO
- && NULL == /*_.VALDATA___V2994*/ meltfptr[2993])
- /*_.VALDATA___V2994*/ meltfptr[2993] =
+ && NULL == /*_.VALDATA___V3009*/ meltfptr[3008])
+ /*_.VALDATA___V3009*/ meltfptr[3008] =
(void *) sy_SOME_INTEGER_LOWER_OR_EQUAL_TO;
}
@@ -45730,8 +45951,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_LOWER_THAN =
meltgc_named_symbol ("SOME_INTEGER_LOWER_THAN", MELT_GET);
if (sy_SOME_INTEGER_LOWER_THAN
- && NULL == /*_.VALDATA___V2996*/ meltfptr[2995])
- /*_.VALDATA___V2996*/ meltfptr[2995] =
+ && NULL == /*_.VALDATA___V3011*/ meltfptr[3010])
+ /*_.VALDATA___V3011*/ meltfptr[3010] =
(void *) sy_SOME_INTEGER_LOWER_THAN;
}
@@ -45742,8 +45963,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SOME_INTEGER_MULTIPLE =
meltgc_named_symbol ("SOME_INTEGER_MULTIPLE", MELT_GET);
if (sy_SOME_INTEGER_MULTIPLE
- && NULL == /*_.VALDATA___V2998*/ meltfptr[2997])
- /*_.VALDATA___V2998*/ meltfptr[2997] =
+ && NULL == /*_.VALDATA___V3013*/ meltfptr[3012])
+ /*_.VALDATA___V3013*/ meltfptr[3012] =
(void *) sy_SOME_INTEGER_MULTIPLE;
}
@@ -45753,8 +45974,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_SOME_STRING_VALUE =
meltgc_named_symbol ("SOME_STRING_VALUE", MELT_GET);
- if (sy_SOME_STRING_VALUE && NULL == /*_.VALDATA___V3000*/ meltfptr[2999])
- /*_.VALDATA___V3000*/ meltfptr[2999] = (void *) sy_SOME_STRING_VALUE;
+ if (sy_SOME_STRING_VALUE && NULL == /*_.VALDATA___V3015*/ meltfptr[3014])
+ /*_.VALDATA___V3015*/ meltfptr[3014] = (void *) sy_SOME_STRING_VALUE;
}
/*^getnamedsymbol */
@@ -45762,8 +45983,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TUPLE_NTH */
{
melt_ptr_t sy_TUPLE_NTH = meltgc_named_symbol ("TUPLE_NTH", MELT_GET);
- if (sy_TUPLE_NTH && NULL == /*_.VALDATA___V3002*/ meltfptr[3001])
- /*_.VALDATA___V3002*/ meltfptr[3001] = (void *) sy_TUPLE_NTH;
+ if (sy_TUPLE_NTH && NULL == /*_.VALDATA___V3017*/ meltfptr[3016])
+ /*_.VALDATA___V3017*/ meltfptr[3016] = (void *) sy_TUPLE_NTH;
}
/*^getnamedsymbol */
@@ -45771,8 +45992,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TUPLE_SIZED */
{
melt_ptr_t sy_TUPLE_SIZED = meltgc_named_symbol ("TUPLE_SIZED", MELT_GET);
- if (sy_TUPLE_SIZED && NULL == /*_.VALDATA___V3004*/ meltfptr[3003])
- /*_.VALDATA___V3004*/ meltfptr[3003] = (void *) sy_TUPLE_SIZED;
+ if (sy_TUPLE_SIZED && NULL == /*_.VALDATA___V3019*/ meltfptr[3018])
+ /*_.VALDATA___V3019*/ meltfptr[3018] = (void *) sy_TUPLE_SIZED;
}
/*^getnamedsymbol */
@@ -45782,8 +46003,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_UNREGISTER_PASS_EXECUTION_HOOK =
meltgc_named_symbol ("UNREGISTER_PASS_EXECUTION_HOOK", MELT_GET);
if (sy_UNREGISTER_PASS_EXECUTION_HOOK
- && NULL == /*_.VALDATA___V3006*/ meltfptr[3005])
- /*_.VALDATA___V3006*/ meltfptr[3005] =
+ && NULL == /*_.VALDATA___V3021*/ meltfptr[3020])
+ /*_.VALDATA___V3021*/ meltfptr[3020] =
(void *) sy_UNREGISTER_PASS_EXECUTION_HOOK;
}
@@ -45794,8 +46015,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_GENERATE_MELT_MODULE =
meltgc_named_symbol ("GENERATE_MELT_MODULE", MELT_GET);
if (sy_GENERATE_MELT_MODULE
- && NULL == /*_.VALDATA___V3008*/ meltfptr[3007])
- /*_.VALDATA___V3008*/ meltfptr[3007] = (void *) sy_GENERATE_MELT_MODULE;
+ && NULL == /*_.VALDATA___V3023*/ meltfptr[3022])
+ /*_.VALDATA___V3023*/ meltfptr[3022] = (void *) sy_GENERATE_MELT_MODULE;
}
/*^comment */
@@ -112874,6 +113095,8 @@ warmelt_base_initialmeltchunk_40 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V2912*/ meltfptr[2911]);
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
@@ -112890,24 +113113,24 @@ warmelt_base_initialmeltchunk_40 (struct frame_start_module_melt_st
obj_vartab[1] = (melt_ptr_t) (
/*_.VALSTR___V2915*/ meltfptr[2914]);
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2914*/ meltfptr[2913]);
-
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2916*/ meltfptr[2915]))
+ ( /*_.VALDATA___V2917*/ meltfptr[2916]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2916*/
- meltfptr[2915]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2916*/ meltfptr[2915]))->
+ ( /*_.VALDATA___V2917*/
+ meltfptr[2916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2917*/ meltfptr[2916]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2917*/ meltfptr[2916]);
+ /*_.VALSTR___V2918*/ meltfptr[2917]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V2917*/ meltfptr[2916]);
#undef meltfram__
@@ -112920,27 +113143,46 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V2916*/ meltfptr[2915]);
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2916*/ meltfptr[2915]))
+ == MELTOBMAG_OBJECT);
+ melt_assertmsg ("putslot checkoff",
+ (0 >= 0
+ && 0 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2916*/
+ meltfptr[2915]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2916*/ meltfptr[2915]))->
+ obj_vartab[0] = (melt_ptr_t) (
+ /*_.VALDATA___V2917*/ meltfptr[2916]);
+
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2918*/ meltfptr[2917]))
+ ( /*_.VALDATA___V2916*/ meltfptr[2915]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2918*/
- meltfptr[2917]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]))->
+ ( /*_.VALDATA___V2916*/
+ meltfptr[2915]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2916*/ meltfptr[2915]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2919*/ meltfptr[2918]);
+ ((void *) (MELT_PREDEF (CTYPE_LONG))));
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2918*/ meltfptr[2917]);
+ meltgc_touch ( /*_.VALDATA___V2916*/ meltfptr[2915]);
/*putslot */
melt_assertmsg ("putslot checkobj",
@@ -112961,841 +113203,1140 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V2920*/ meltfptr[2919]);
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2919*/ meltfptr[2918]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (0 >= 0
+ && 0 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2919*/
+ meltfptr[2918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2919*/ meltfptr[2918]))->
+ obj_vartab[0] = (melt_ptr_t) (
+ /*_.VALDATA___V2920*/ meltfptr[2919]);
+
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2922*/ meltfptr[2921]))
+ ( /*_.VALDATA___V2919*/ meltfptr[2918]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2922*/
- meltfptr[2921]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2922*/ meltfptr[2921]))->
+ ( /*_.VALDATA___V2919*/
+ meltfptr[2918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2919*/ meltfptr[2918]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2923*/ meltfptr[2922]);
+ ((void *) (MELT_PREDEF (CTYPE_LONG))));
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2922*/ meltfptr[2921]);
+ meltgc_touch ( /*_.VALDATA___V2919*/ meltfptr[2918]);
+
+ /*putupl#1398 */
+ melt_assertmsg ("putupl #1398 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2922*/ meltfptr[2921])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1398 checkoff",
+ (0 >= 0
+ && 0 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2922*/
+ meltfptr[2921]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2922*/ meltfptr[2921]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V2916*/ meltfptr[2915]);
+
+ /*putupl#1399 */
+ melt_assertmsg ("putupl #1399 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2922*/ meltfptr[2921])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1399 checkoff",
+ (1 >= 0
+ && 1 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2922*/
+ meltfptr[2921]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2922*/ meltfptr[2921]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V2919*/ meltfptr[2918]);
+
+ /*touch:INITUP_ */
+ meltgc_touch ( /*_.VALTUP___V2922*/ meltfptr[2921]);
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2924*/ meltfptr[2923]))
+ ( /*_.VALDATA___V2914*/ meltfptr[2913]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (2 >= 0
+ && 2 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2914*/
+ meltfptr[2913]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2914*/ meltfptr[2913]))->
+ obj_vartab[2] = (melt_ptr_t) (
+ /*_.VALTUP___V2922*/ meltfptr[2921]);
+
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2914*/ meltfptr[2913]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (3 >= 0
+ && 3 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2914*/
+ meltfptr[2913]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2914*/ meltfptr[2913]))->
+ obj_vartab[3] = (melt_ptr_t) (
+ ((void *) (MELT_PREDEF (CTYPE_VOID))));
+
+ /*putupl#1400 */
+ melt_assertmsg ("putupl #1400 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/ meltfptr[2925])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1400 checkoff",
+ (0 >= 0
+ && 0 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/
+ meltfptr[2925]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2926*/ meltfptr[2925]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALSTR___V2923*/ meltfptr[2922]);
+
+ /*putupl#1401 */
+ melt_assertmsg ("putupl #1401 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/ meltfptr[2925])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1401 checkoff",
+ (1 >= 0
+ && 1 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/
+ meltfptr[2925]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2926*/ meltfptr[2925]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V2917*/ meltfptr[2916]);
+
+ /*putupl#1402 */
+ melt_assertmsg ("putupl #1402 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/ meltfptr[2925])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1402 checkoff",
+ (2 >= 0
+ && 2 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/
+ meltfptr[2925]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2926*/ meltfptr[2925]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALSTR___V2924*/ meltfptr[2923]);
+
+ /*putupl#1403 */
+ melt_assertmsg ("putupl #1403 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/ meltfptr[2925])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1403 checkoff",
+ (3 >= 0
+ && 3 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/
+ meltfptr[2925]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2926*/ meltfptr[2925]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V2920*/ meltfptr[2919]);
+
+ /*putupl#1404 */
+ melt_assertmsg ("putupl #1404 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/ meltfptr[2925])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl #1404 checkoff",
+ (4 >= 0
+ && 4 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.VALTUP___V2926*/
+ meltfptr[2925]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V2926*/ meltfptr[2925]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALSTR___V2925*/ meltfptr[2924]);
+
+ /*touch:INITUP_ */
+ meltgc_touch ( /*_.VALTUP___V2926*/ meltfptr[2925]);
+
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2914*/ meltfptr[2913]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (4 >= 0
+ && 4 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2914*/
+ meltfptr[2913]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2914*/ meltfptr[2913]))->
+ obj_vartab[4] = (melt_ptr_t) (
+ /*_.VALTUP___V2926*/ meltfptr[2925]);
+
+ MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ /*^touch */
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V2914*/ meltfptr[2913]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2927*/ meltfptr[2926]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2927*/
+ meltfptr[2926]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2927*/ meltfptr[2926]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V2928*/ meltfptr[2927]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V2927*/ meltfptr[2926]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2929*/ meltfptr[2928]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V2929*/
+ meltfptr[2928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2929*/ meltfptr[2928]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V2930*/ meltfptr[2929]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V2929*/ meltfptr[2928]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V2931*/ meltfptr[2930]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2924*/
- meltfptr[2923]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2924*/ meltfptr[2923]))->
+ ( /*_.VALDATA___V2931*/
+ meltfptr[2930]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2931*/ meltfptr[2930]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2925*/ meltfptr[2924]);
+ /*_.VALSTR___V2932*/ meltfptr[2931]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2924*/ meltfptr[2923]);
+ meltgc_touch ( /*_.VALDATA___V2931*/ meltfptr[2930]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2926*/ meltfptr[2925]))
+ ( /*_.VALDATA___V2933*/ meltfptr[2932]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2926*/
- meltfptr[2925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2926*/ meltfptr[2925]))->
+ ( /*_.VALDATA___V2933*/
+ meltfptr[2932]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2933*/ meltfptr[2932]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2927*/ meltfptr[2926]);
+ /*_.VALSTR___V2934*/ meltfptr[2933]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2926*/ meltfptr[2925]);
+ meltgc_touch ( /*_.VALDATA___V2933*/ meltfptr[2932]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2928*/ meltfptr[2927]))
+ ( /*_.VALDATA___V2935*/ meltfptr[2934]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2928*/
- meltfptr[2927]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2928*/ meltfptr[2927]))->
+ ( /*_.VALDATA___V2935*/
+ meltfptr[2934]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2935*/ meltfptr[2934]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2929*/ meltfptr[2928]);
+ /*_.VALSTR___V2936*/ meltfptr[2935]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2928*/ meltfptr[2927]);
+ meltgc_touch ( /*_.VALDATA___V2935*/ meltfptr[2934]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2930*/ meltfptr[2929]))
+ ( /*_.VALDATA___V2937*/ meltfptr[2936]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2930*/
- meltfptr[2929]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2930*/ meltfptr[2929]))->
+ ( /*_.VALDATA___V2937*/
+ meltfptr[2936]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2937*/ meltfptr[2936]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2931*/ meltfptr[2930]);
+ /*_.VALSTR___V2938*/ meltfptr[2937]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2930*/ meltfptr[2929]);
+ meltgc_touch ( /*_.VALDATA___V2937*/ meltfptr[2936]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2932*/ meltfptr[2931]))
+ ( /*_.VALDATA___V2939*/ meltfptr[2938]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2932*/
- meltfptr[2931]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2932*/ meltfptr[2931]))->
+ ( /*_.VALDATA___V2939*/
+ meltfptr[2938]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2939*/ meltfptr[2938]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2933*/ meltfptr[2932]);
+ /*_.VALSTR___V2940*/ meltfptr[2939]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2932*/ meltfptr[2931]);
+ meltgc_touch ( /*_.VALDATA___V2939*/ meltfptr[2938]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2934*/ meltfptr[2933]))
+ ( /*_.VALDATA___V2941*/ meltfptr[2940]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2934*/
- meltfptr[2933]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2934*/ meltfptr[2933]))->
+ ( /*_.VALDATA___V2941*/
+ meltfptr[2940]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2941*/ meltfptr[2940]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2935*/ meltfptr[2934]);
+ /*_.VALSTR___V2942*/ meltfptr[2941]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2934*/ meltfptr[2933]);
+ meltgc_touch ( /*_.VALDATA___V2941*/ meltfptr[2940]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2936*/ meltfptr[2935]))
+ ( /*_.VALDATA___V2943*/ meltfptr[2942]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2936*/
- meltfptr[2935]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2936*/ meltfptr[2935]))->
+ ( /*_.VALDATA___V2943*/
+ meltfptr[2942]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2943*/ meltfptr[2942]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2937*/ meltfptr[2936]);
+ /*_.VALSTR___V2944*/ meltfptr[2943]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2936*/ meltfptr[2935]);
+ meltgc_touch ( /*_.VALDATA___V2943*/ meltfptr[2942]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2938*/ meltfptr[2937]))
+ ( /*_.VALDATA___V2945*/ meltfptr[2944]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2938*/
- meltfptr[2937]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2938*/ meltfptr[2937]))->
+ ( /*_.VALDATA___V2945*/
+ meltfptr[2944]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2945*/ meltfptr[2944]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2939*/ meltfptr[2938]);
+ /*_.VALSTR___V2946*/ meltfptr[2945]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2938*/ meltfptr[2937]);
+ meltgc_touch ( /*_.VALDATA___V2945*/ meltfptr[2944]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2940*/ meltfptr[2939]))
+ ( /*_.VALDATA___V2947*/ meltfptr[2946]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2940*/
- meltfptr[2939]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2940*/ meltfptr[2939]))->
+ ( /*_.VALDATA___V2947*/
+ meltfptr[2946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2947*/ meltfptr[2946]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2941*/ meltfptr[2940]);
+ /*_.VALSTR___V2948*/ meltfptr[2947]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2940*/ meltfptr[2939]);
+ meltgc_touch ( /*_.VALDATA___V2947*/ meltfptr[2946]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2942*/ meltfptr[2941]))
+ ( /*_.VALDATA___V2949*/ meltfptr[2948]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2942*/
- meltfptr[2941]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2942*/ meltfptr[2941]))->
+ ( /*_.VALDATA___V2949*/
+ meltfptr[2948]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2949*/ meltfptr[2948]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2943*/ meltfptr[2942]);
+ /*_.VALSTR___V2950*/ meltfptr[2949]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2942*/ meltfptr[2941]);
+ meltgc_touch ( /*_.VALDATA___V2949*/ meltfptr[2948]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2944*/ meltfptr[2943]))
+ ( /*_.VALDATA___V2951*/ meltfptr[2950]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2944*/
- meltfptr[2943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2944*/ meltfptr[2943]))->
+ ( /*_.VALDATA___V2951*/
+ meltfptr[2950]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2951*/ meltfptr[2950]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2945*/ meltfptr[2944]);
+ /*_.VALSTR___V2952*/ meltfptr[2951]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2944*/ meltfptr[2943]);
+ meltgc_touch ( /*_.VALDATA___V2951*/ meltfptr[2950]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2946*/ meltfptr[2945]))
+ ( /*_.VALDATA___V2953*/ meltfptr[2952]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2946*/
- meltfptr[2945]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2946*/ meltfptr[2945]))->
+ ( /*_.VALDATA___V2953*/
+ meltfptr[2952]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2953*/ meltfptr[2952]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2947*/ meltfptr[2946]);
+ /*_.VALSTR___V2954*/ meltfptr[2953]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2946*/ meltfptr[2945]);
+ meltgc_touch ( /*_.VALDATA___V2953*/ meltfptr[2952]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2948*/ meltfptr[2947]))
+ ( /*_.VALDATA___V2955*/ meltfptr[2954]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2948*/
- meltfptr[2947]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2948*/ meltfptr[2947]))->
+ ( /*_.VALDATA___V2955*/
+ meltfptr[2954]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2955*/ meltfptr[2954]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2949*/ meltfptr[2948]);
+ /*_.VALSTR___V2956*/ meltfptr[2955]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2948*/ meltfptr[2947]);
+ meltgc_touch ( /*_.VALDATA___V2955*/ meltfptr[2954]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2950*/ meltfptr[2949]))
+ ( /*_.VALDATA___V2957*/ meltfptr[2956]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2950*/
- meltfptr[2949]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2950*/ meltfptr[2949]))->
+ ( /*_.VALDATA___V2957*/
+ meltfptr[2956]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2957*/ meltfptr[2956]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2951*/ meltfptr[2950]);
+ /*_.VALSTR___V2958*/ meltfptr[2957]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2950*/ meltfptr[2949]);
+ meltgc_touch ( /*_.VALDATA___V2957*/ meltfptr[2956]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2952*/ meltfptr[2951]))
+ ( /*_.VALDATA___V2959*/ meltfptr[2958]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2952*/
- meltfptr[2951]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2952*/ meltfptr[2951]))->
+ ( /*_.VALDATA___V2959*/
+ meltfptr[2958]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2959*/ meltfptr[2958]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2953*/ meltfptr[2952]);
+ /*_.VALSTR___V2960*/ meltfptr[2959]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2952*/ meltfptr[2951]);
+ meltgc_touch ( /*_.VALDATA___V2959*/ meltfptr[2958]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2954*/ meltfptr[2953]))
+ ( /*_.VALDATA___V2961*/ meltfptr[2960]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2954*/
- meltfptr[2953]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2954*/ meltfptr[2953]))->
+ ( /*_.VALDATA___V2961*/
+ meltfptr[2960]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2961*/ meltfptr[2960]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2955*/ meltfptr[2954]);
+ /*_.VALSTR___V2962*/ meltfptr[2961]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2954*/ meltfptr[2953]);
+ meltgc_touch ( /*_.VALDATA___V2961*/ meltfptr[2960]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2956*/ meltfptr[2955]))
+ ( /*_.VALDATA___V2963*/ meltfptr[2962]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2956*/
- meltfptr[2955]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2956*/ meltfptr[2955]))->
+ ( /*_.VALDATA___V2963*/
+ meltfptr[2962]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2963*/ meltfptr[2962]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2957*/ meltfptr[2956]);
+ /*_.VALSTR___V2964*/ meltfptr[2963]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2956*/ meltfptr[2955]);
+ meltgc_touch ( /*_.VALDATA___V2963*/ meltfptr[2962]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2958*/ meltfptr[2957]))
+ ( /*_.VALDATA___V2965*/ meltfptr[2964]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2958*/
- meltfptr[2957]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2958*/ meltfptr[2957]))->
+ ( /*_.VALDATA___V2965*/
+ meltfptr[2964]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2965*/ meltfptr[2964]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2959*/ meltfptr[2958]);
+ /*_.VALSTR___V2966*/ meltfptr[2965]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2958*/ meltfptr[2957]);
+ meltgc_touch ( /*_.VALDATA___V2965*/ meltfptr[2964]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2960*/ meltfptr[2959]))
+ ( /*_.VALDATA___V2967*/ meltfptr[2966]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2960*/
- meltfptr[2959]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2960*/ meltfptr[2959]))->
+ ( /*_.VALDATA___V2967*/
+ meltfptr[2966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2967*/ meltfptr[2966]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2961*/ meltfptr[2960]);
+ /*_.VALSTR___V2968*/ meltfptr[2967]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2960*/ meltfptr[2959]);
+ meltgc_touch ( /*_.VALDATA___V2967*/ meltfptr[2966]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2962*/ meltfptr[2961]))
+ ( /*_.VALDATA___V2969*/ meltfptr[2968]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2962*/
- meltfptr[2961]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2962*/ meltfptr[2961]))->
+ ( /*_.VALDATA___V2969*/
+ meltfptr[2968]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2969*/ meltfptr[2968]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2963*/ meltfptr[2962]);
+ /*_.VALSTR___V2970*/ meltfptr[2969]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2962*/ meltfptr[2961]);
+ meltgc_touch ( /*_.VALDATA___V2969*/ meltfptr[2968]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2964*/ meltfptr[2963]))
+ ( /*_.VALDATA___V2971*/ meltfptr[2970]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2964*/
- meltfptr[2963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2964*/ meltfptr[2963]))->
+ ( /*_.VALDATA___V2971*/
+ meltfptr[2970]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2971*/ meltfptr[2970]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2965*/ meltfptr[2964]);
+ /*_.VALSTR___V2972*/ meltfptr[2971]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2964*/ meltfptr[2963]);
+ meltgc_touch ( /*_.VALDATA___V2971*/ meltfptr[2970]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2966*/ meltfptr[2965]))
+ ( /*_.VALDATA___V2973*/ meltfptr[2972]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2966*/
- meltfptr[2965]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2966*/ meltfptr[2965]))->
+ ( /*_.VALDATA___V2973*/
+ meltfptr[2972]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2973*/ meltfptr[2972]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2967*/ meltfptr[2966]);
+ /*_.VALSTR___V2974*/ meltfptr[2973]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2966*/ meltfptr[2965]);
+ meltgc_touch ( /*_.VALDATA___V2973*/ meltfptr[2972]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2968*/ meltfptr[2967]))
+ ( /*_.VALDATA___V2975*/ meltfptr[2974]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2968*/
- meltfptr[2967]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2968*/ meltfptr[2967]))->
+ ( /*_.VALDATA___V2975*/
+ meltfptr[2974]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2975*/ meltfptr[2974]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2969*/ meltfptr[2968]);
+ /*_.VALSTR___V2976*/ meltfptr[2975]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2968*/ meltfptr[2967]);
+ meltgc_touch ( /*_.VALDATA___V2975*/ meltfptr[2974]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2970*/ meltfptr[2969]))
+ ( /*_.VALDATA___V2977*/ meltfptr[2976]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2970*/
- meltfptr[2969]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2970*/ meltfptr[2969]))->
+ ( /*_.VALDATA___V2977*/
+ meltfptr[2976]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2977*/ meltfptr[2976]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2971*/ meltfptr[2970]);
+ /*_.VALSTR___V2978*/ meltfptr[2977]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2970*/ meltfptr[2969]);
+ meltgc_touch ( /*_.VALDATA___V2977*/ meltfptr[2976]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2972*/ meltfptr[2971]))
+ ( /*_.VALDATA___V2979*/ meltfptr[2978]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2972*/
- meltfptr[2971]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2972*/ meltfptr[2971]))->
+ ( /*_.VALDATA___V2979*/
+ meltfptr[2978]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2979*/ meltfptr[2978]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2973*/ meltfptr[2972]);
+ /*_.VALSTR___V2980*/ meltfptr[2979]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2972*/ meltfptr[2971]);
+ meltgc_touch ( /*_.VALDATA___V2979*/ meltfptr[2978]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2974*/ meltfptr[2973]))
+ ( /*_.VALDATA___V2981*/ meltfptr[2980]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2974*/
- meltfptr[2973]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2974*/ meltfptr[2973]))->
+ ( /*_.VALDATA___V2981*/
+ meltfptr[2980]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2981*/ meltfptr[2980]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2975*/ meltfptr[2974]);
+ /*_.VALSTR___V2982*/ meltfptr[2981]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2974*/ meltfptr[2973]);
+ meltgc_touch ( /*_.VALDATA___V2981*/ meltfptr[2980]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2976*/ meltfptr[2975]))
+ ( /*_.VALDATA___V2983*/ meltfptr[2982]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2976*/
- meltfptr[2975]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2976*/ meltfptr[2975]))->
+ ( /*_.VALDATA___V2983*/
+ meltfptr[2982]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2983*/ meltfptr[2982]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2977*/ meltfptr[2976]);
+ /*_.VALSTR___V2984*/ meltfptr[2983]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2976*/ meltfptr[2975]);
+ meltgc_touch ( /*_.VALDATA___V2983*/ meltfptr[2982]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2978*/ meltfptr[2977]))
+ ( /*_.VALDATA___V2985*/ meltfptr[2984]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2978*/
- meltfptr[2977]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2978*/ meltfptr[2977]))->
+ ( /*_.VALDATA___V2985*/
+ meltfptr[2984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2985*/ meltfptr[2984]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2979*/ meltfptr[2978]);
+ /*_.VALSTR___V2986*/ meltfptr[2985]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2978*/ meltfptr[2977]);
+ meltgc_touch ( /*_.VALDATA___V2985*/ meltfptr[2984]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2980*/ meltfptr[2979]))
+ ( /*_.VALDATA___V2987*/ meltfptr[2986]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2980*/
- meltfptr[2979]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2980*/ meltfptr[2979]))->
+ ( /*_.VALDATA___V2987*/
+ meltfptr[2986]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2987*/ meltfptr[2986]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2981*/ meltfptr[2980]);
+ /*_.VALSTR___V2988*/ meltfptr[2987]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2980*/ meltfptr[2979]);
+ meltgc_touch ( /*_.VALDATA___V2987*/ meltfptr[2986]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2982*/ meltfptr[2981]))
+ ( /*_.VALDATA___V2989*/ meltfptr[2988]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2982*/
- meltfptr[2981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2982*/ meltfptr[2981]))->
+ ( /*_.VALDATA___V2989*/
+ meltfptr[2988]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2989*/ meltfptr[2988]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2983*/ meltfptr[2982]);
+ /*_.VALSTR___V2990*/ meltfptr[2989]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2982*/ meltfptr[2981]);
+ meltgc_touch ( /*_.VALDATA___V2989*/ meltfptr[2988]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2984*/ meltfptr[2983]))
+ ( /*_.VALDATA___V2991*/ meltfptr[2990]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2984*/
- meltfptr[2983]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2984*/ meltfptr[2983]))->
+ ( /*_.VALDATA___V2991*/
+ meltfptr[2990]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2991*/ meltfptr[2990]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2985*/ meltfptr[2984]);
+ /*_.VALSTR___V2992*/ meltfptr[2991]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2984*/ meltfptr[2983]);
+ meltgc_touch ( /*_.VALDATA___V2991*/ meltfptr[2990]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2986*/ meltfptr[2985]))
+ ( /*_.VALDATA___V2993*/ meltfptr[2992]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2986*/
- meltfptr[2985]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2986*/ meltfptr[2985]))->
+ ( /*_.VALDATA___V2993*/
+ meltfptr[2992]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2993*/ meltfptr[2992]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2987*/ meltfptr[2986]);
+ /*_.VALSTR___V2994*/ meltfptr[2993]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2986*/ meltfptr[2985]);
+ meltgc_touch ( /*_.VALDATA___V2993*/ meltfptr[2992]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2988*/ meltfptr[2987]))
+ ( /*_.VALDATA___V2995*/ meltfptr[2994]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2988*/
- meltfptr[2987]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2988*/ meltfptr[2987]))->
+ ( /*_.VALDATA___V2995*/
+ meltfptr[2994]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2995*/ meltfptr[2994]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2989*/ meltfptr[2988]);
+ /*_.VALSTR___V2996*/ meltfptr[2995]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2988*/ meltfptr[2987]);
+ meltgc_touch ( /*_.VALDATA___V2995*/ meltfptr[2994]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2990*/ meltfptr[2989]))
+ ( /*_.VALDATA___V2997*/ meltfptr[2996]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2990*/
- meltfptr[2989]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2990*/ meltfptr[2989]))->
+ ( /*_.VALDATA___V2997*/
+ meltfptr[2996]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2997*/ meltfptr[2996]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2991*/ meltfptr[2990]);
+ /*_.VALSTR___V2998*/ meltfptr[2997]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2990*/ meltfptr[2989]);
+ meltgc_touch ( /*_.VALDATA___V2997*/ meltfptr[2996]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2992*/ meltfptr[2991]))
+ ( /*_.VALDATA___V2999*/ meltfptr[2998]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2992*/
- meltfptr[2991]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2992*/ meltfptr[2991]))->
+ ( /*_.VALDATA___V2999*/
+ meltfptr[2998]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V2999*/ meltfptr[2998]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2993*/ meltfptr[2992]);
+ /*_.VALSTR___V3000*/ meltfptr[2999]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2992*/ meltfptr[2991]);
+ meltgc_touch ( /*_.VALDATA___V2999*/ meltfptr[2998]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2994*/ meltfptr[2993]))
+ ( /*_.VALDATA___V3001*/ meltfptr[3000]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2994*/
- meltfptr[2993]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2994*/ meltfptr[2993]))->
+ ( /*_.VALDATA___V3001*/
+ meltfptr[3000]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3001*/ meltfptr[3000]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2995*/ meltfptr[2994]);
+ /*_.VALSTR___V3002*/ meltfptr[3001]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2994*/ meltfptr[2993]);
+ meltgc_touch ( /*_.VALDATA___V3001*/ meltfptr[3000]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2996*/ meltfptr[2995]))
+ ( /*_.VALDATA___V3003*/ meltfptr[3002]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2996*/
- meltfptr[2995]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2996*/ meltfptr[2995]))->
+ ( /*_.VALDATA___V3003*/
+ meltfptr[3002]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3003*/ meltfptr[3002]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2997*/ meltfptr[2996]);
+ /*_.VALSTR___V3004*/ meltfptr[3003]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2996*/ meltfptr[2995]);
+ meltgc_touch ( /*_.VALDATA___V3003*/ meltfptr[3002]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V2998*/ meltfptr[2997]))
+ ( /*_.VALDATA___V3005*/ meltfptr[3004]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V2998*/
- meltfptr[2997]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V2998*/ meltfptr[2997]))->
+ ( /*_.VALDATA___V3005*/
+ meltfptr[3004]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3005*/ meltfptr[3004]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V2999*/ meltfptr[2998]);
+ /*_.VALSTR___V3006*/ meltfptr[3005]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V2998*/ meltfptr[2997]);
+ meltgc_touch ( /*_.VALDATA___V3005*/ meltfptr[3004]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V3000*/ meltfptr[2999]))
+ ( /*_.VALDATA___V3007*/ meltfptr[3006]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V3000*/
- meltfptr[2999]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V3000*/ meltfptr[2999]))->
+ ( /*_.VALDATA___V3007*/
+ meltfptr[3006]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3007*/ meltfptr[3006]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V3001*/ meltfptr[3000]);
+ /*_.VALSTR___V3008*/ meltfptr[3007]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V3000*/ meltfptr[2999]);
+ meltgc_touch ( /*_.VALDATA___V3007*/ meltfptr[3006]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V3002*/ meltfptr[3001]))
+ ( /*_.VALDATA___V3009*/ meltfptr[3008]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V3002*/
- meltfptr[3001]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V3002*/ meltfptr[3001]))->
+ ( /*_.VALDATA___V3009*/
+ meltfptr[3008]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3009*/ meltfptr[3008]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V3003*/ meltfptr[3002]);
+ /*_.VALSTR___V3010*/ meltfptr[3009]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V3002*/ meltfptr[3001]);
+ meltgc_touch ( /*_.VALDATA___V3009*/ meltfptr[3008]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V3004*/ meltfptr[3003]))
+ ( /*_.VALDATA___V3011*/ meltfptr[3010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V3004*/
- meltfptr[3003]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V3004*/ meltfptr[3003]))->
+ ( /*_.VALDATA___V3011*/
+ meltfptr[3010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3011*/ meltfptr[3010]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V3005*/ meltfptr[3004]);
+ /*_.VALSTR___V3012*/ meltfptr[3011]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V3004*/ meltfptr[3003]);
+ meltgc_touch ( /*_.VALDATA___V3011*/ meltfptr[3010]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V3006*/ meltfptr[3005]))
+ ( /*_.VALDATA___V3013*/ meltfptr[3012]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V3006*/
- meltfptr[3005]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V3006*/ meltfptr[3005]))->
+ ( /*_.VALDATA___V3013*/
+ meltfptr[3012]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3013*/ meltfptr[3012]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V3007*/ meltfptr[3006]);
+ /*_.VALSTR___V3014*/ meltfptr[3013]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V3006*/ meltfptr[3005]);
+ meltgc_touch ( /*_.VALDATA___V3013*/ meltfptr[3012]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V3008*/ meltfptr[3007]))
+ ( /*_.VALDATA___V3015*/ meltfptr[3014]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V3008*/
- meltfptr[3007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V3008*/ meltfptr[3007]))->
+ ( /*_.VALDATA___V3015*/
+ meltfptr[3014]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3015*/ meltfptr[3014]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V3009*/ meltfptr[3008]);
+ /*_.VALSTR___V3016*/ meltfptr[3015]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V3008*/ meltfptr[3007]);
+ meltgc_touch ( /*_.VALDATA___V3015*/ meltfptr[3014]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V3017*/ meltfptr[3016]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V3017*/
+ meltfptr[3016]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3017*/ meltfptr[3016]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V3018*/ meltfptr[3017]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V3017*/ meltfptr[3016]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V3019*/ meltfptr[3018]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V3019*/
+ meltfptr[3018]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3019*/ meltfptr[3018]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V3020*/ meltfptr[3019]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V3019*/ meltfptr[3018]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V3021*/ meltfptr[3020]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V3021*/
+ meltfptr[3020]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3021*/ meltfptr[3020]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V3022*/ meltfptr[3021]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V3021*/ meltfptr[3020]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V3023*/ meltfptr[3022]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V3023*/
+ meltfptr[3022]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V3023*/ meltfptr[3022]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V3024*/ meltfptr[3023]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V3023*/ meltfptr[3022]);
/**COMMENT: before toplevel body **/ ;
@@ -113811,7 +114352,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*then */
{
/*^cond.then */
- /*_.OR___V3010*/ meltfptr[3009] =
+ /*_.OR___V3025*/ meltfptr[3024] =
/*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */
/*_.CONTENV___V2*/ meltfptr[1];;
}
@@ -113827,8 +114368,8 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 3, "SYSDATA_CONT_FRESH_ENV");
- /*_.SYSDATA_CONT_FRESH_ENV__V3011*/
- meltfptr[3010] = slot;
+ /*_.SYSDATA_CONT_FRESH_ENV__V3026*/
+ meltfptr[3025] = slot;
};
;
/*^apply */
@@ -113838,22 +114379,22 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_cstring = "warmelt-base";
- /*_.FUN___V3012*/ meltfptr[3011] =
+ /*_.FUN___V3027*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
- ( /*_.SYSDATA_CONT_FRESH_ENV__V3011*/
- meltfptr[3010]),
+ ( /*_.SYSDATA_CONT_FRESH_ENV__V3026*/
+ meltfptr[3025]),
(melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]),
(MELTBPARSTR_CSTRING ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.OR___V3010*/ meltfptr[3009] = /*_.FUN___V3012*/ meltfptr[3011];;
+ /*_.OR___V3025*/ meltfptr[3024] = /*_.FUN___V3027*/ meltfptr[3026];;
/*epilog */
MELT_LOCATION ("warmelt-base.melt:4:/ clear");
- /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V3011*/ meltfptr[3010] = 0;
+ /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V3026*/ meltfptr[3025] = 0;
/*^clear */
- /*clear *//*_.FUN___V3012*/ meltfptr[3011] = 0;
+ /*clear *//*_.FUN___V3027*/ meltfptr[3026] = 0;
}
;
}
@@ -113866,7 +114407,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.OR___V3010*/ meltfptr[3009] = 0;
+ /*clear *//*_.OR___V3025*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1296:/ initchunk");
@@ -113885,7 +114426,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2222*/ meltfptr[2221];
- /*_.INSTALL_METHOD__V3013*/ meltfptr[3010] =
+ /*_.INSTALL_METHOD__V3028*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V11*/
@@ -113897,7 +114438,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3013*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3028*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1301:/ initchunk");
@@ -113916,7 +114457,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2228*/ meltfptr[2227];
- /*_.INSTALL_METHOD__V3014*/ meltfptr[3011] =
+ /*_.INSTALL_METHOD__V3029*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.DISCR_INTEGER__V12*/ meltfptr[11]),
@@ -113927,7 +114468,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3014*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3029*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1306:/ initchunk");
@@ -113946,7 +114487,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2232*/ meltfptr[2231];
- /*_.INSTALL_METHOD__V3015*/ meltfptr[3009] =
+ /*_.INSTALL_METHOD__V3030*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.DISCR_STRING__V13*/ meltfptr[12]),
@@ -113957,7 +114498,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3015*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3030*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1311:/ initchunk");
@@ -113976,7 +114517,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2236*/ meltfptr[2235];
- /*_.INSTALL_METHOD__V3016*/ meltfptr[3010] =
+ /*_.INSTALL_METHOD__V3031*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.DISCR_STRBUF__V14*/ meltfptr[13]),
@@ -113987,7 +114528,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3016*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3031*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1324:/ initchunk");
@@ -114006,7 +114547,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2240*/ meltfptr[2239];
- /*_.INSTALL_METHOD__V3017*/ meltfptr[3011] =
+ /*_.INSTALL_METHOD__V3032*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V15*/
@@ -114018,7 +114559,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3017*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3032*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1328:/ initchunk");
@@ -114037,7 +114578,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2246*/ meltfptr[2245];
- /*_.INSTALL_METHOD__V3018*/ meltfptr[3009] =
+ /*_.INSTALL_METHOD__V3033*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]),
@@ -114048,7 +114589,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3018*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3033*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:1336:/ initchunk");
@@ -114067,7 +114608,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2248*/ meltfptr[2247];
- /*_.INSTALL_METHOD__V3019*/ meltfptr[3010] =
+ /*_.INSTALL_METHOD__V3034*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]),
@@ -114078,9 +114619,20 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3019*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3034*/ meltfptr[3025] = 0;
}
+
+#undef meltfram__
+} /*end of warmelt_base_initialmeltchunk_41 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
MELT_LOCATION ("warmelt-base.melt:1341:/ initchunk");
/*^block */
/*anyblock */
@@ -114097,7 +114649,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V2252*/ meltfptr[2251];
- /*_.INSTALL_METHOD__V3020*/ meltfptr[3011] =
+ /*_.INSTALL_METHOD__V3035*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V10*/ meltfptr[9]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V18*/
@@ -114109,7 +114661,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V3020*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_METHOD__V3035*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2442:/ initchunk");
@@ -114121,8 +114673,8 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V3021*/
- meltfptr[3009] = slot;
+ /*_.VALUEXPORTER___V3036*/
+ meltfptr[3024] = slot;
};
;
/*^apply */
@@ -114138,7 +114690,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_VALUE_DESCRIPTOR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2520*/ meltfptr[2519]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114157,7 +114709,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_OBJMAGIC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114176,7 +114728,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_STRUCT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2546*/ meltfptr[2545]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114195,7 +114747,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_UNIONMEM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2548*/ meltfptr[2547]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114214,7 +114766,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_GTY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2550*/ meltfptr[2549]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114233,7 +114785,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MEMBCHUNK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2552*/ meltfptr[2551]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114252,7 +114804,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_DECLCHUNK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2554*/ meltfptr[2553]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114271,7 +114823,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_COPYCHUNK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2556*/ meltfptr[2555]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114290,7 +114842,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_FORWCHUNK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2558*/ meltfptr[2557]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114309,7 +114861,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_CLONECHUNK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2560*/ meltfptr[2559]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114328,7 +114880,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_VARISIZED_VALUE_DESCRIPTOR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3021*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3036*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2562*/ meltfptr[2561]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114337,7 +114889,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V3021*/ meltfptr[3009] = 0;
+ /*clear *//*_.VALUEXPORTER___V3036*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2547:/ initchunk");
@@ -114348,7 +114900,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3022*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3037*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2580*/ meltfptr[2579]),
@@ -114359,7 +114911,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3022*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3037*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2649:/ initchunk");
@@ -114370,7 +114922,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3023*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3038*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2592*/ meltfptr[2591]),
@@ -114381,7 +114933,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3023*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3038*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2744:/ initchunk");
@@ -114392,7 +114944,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3024*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3039*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2604*/ meltfptr[2603]),
@@ -114403,7 +114955,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3024*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3039*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2772:/ initchunk");
@@ -114414,7 +114966,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3025*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3040*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2615*/ meltfptr[2614]),
@@ -114425,7 +114977,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3025*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3040*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2831:/ initchunk");
@@ -114436,7 +114988,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3026*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3041*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2628*/ meltfptr[2627]),
@@ -114447,7 +114999,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3026*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3041*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2891:/ initchunk");
@@ -114458,7 +115010,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3027*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3042*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2640*/ meltfptr[2639]),
@@ -114469,7 +115021,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3027*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3042*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2957:/ initchunk");
@@ -114480,7 +115032,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3028*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3043*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2652*/ meltfptr[2651]),
@@ -114491,7 +115043,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3028*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3043*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:2997:/ initchunk");
@@ -114502,7 +115054,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3029*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3044*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2663*/ meltfptr[2662]),
@@ -114513,7 +115065,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3029*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3044*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3052:/ initchunk");
@@ -114524,7 +115076,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3030*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3045*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2674*/ meltfptr[2673]),
@@ -114535,7 +115087,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3030*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3045*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3085:/ initchunk");
@@ -114546,7 +115098,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3031*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3046*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2684*/ meltfptr[2683]),
@@ -114557,7 +115109,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3031*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3046*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3137:/ initchunk");
@@ -114568,7 +115120,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3032*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3047*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2696*/ meltfptr[2695]),
@@ -114579,7 +115131,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3032*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3047*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3167:/ initchunk");
@@ -114590,7 +115142,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3033*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3048*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2708*/ meltfptr[2707]),
@@ -114601,7 +115153,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3033*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3048*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3195:/ initchunk");
@@ -114612,7 +115164,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3034*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3049*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2718*/ meltfptr[2717]),
@@ -114623,7 +115175,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3034*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3049*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3224:/ initchunk");
@@ -114634,7 +115186,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3035*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3050*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2728*/ meltfptr[2727]),
@@ -114645,7 +115197,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3035*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3050*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3262:/ initchunk");
@@ -114656,7 +115208,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3036*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3051*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2738*/ meltfptr[2737]),
@@ -114667,7 +115219,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3036*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3051*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3286:/ initchunk");
@@ -114678,7 +115230,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3037*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3052*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2748*/ meltfptr[2747]),
@@ -114689,7 +115241,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3037*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3052*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3320:/ initchunk");
@@ -114700,7 +115252,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3038*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3053*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2757*/ meltfptr[2756]),
@@ -114711,7 +115263,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3038*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3053*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3352:/ initchunk");
@@ -114722,7 +115274,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3039*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3054*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2768*/ meltfptr[2767]),
@@ -114733,7 +115285,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3039*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3054*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3384:/ initchunk");
@@ -114744,7 +115296,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3040*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3055*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2779*/ meltfptr[2778]),
@@ -114755,7 +115307,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3040*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3055*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3416:/ initchunk");
@@ -114766,7 +115318,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3041*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3056*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2790*/ meltfptr[2789]),
@@ -114777,7 +115329,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3041*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3056*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3449:/ initchunk");
@@ -114788,7 +115340,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3042*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3057*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2801*/ meltfptr[2800]),
@@ -114799,7 +115351,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3042*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3057*/ meltfptr[3024] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3482:/ initchunk");
@@ -114810,7 +115362,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3043*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3058*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2812*/ meltfptr[2811]),
@@ -114821,7 +115373,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3043*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3058*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3515:/ initchunk");
@@ -114832,7 +115384,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3044*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3059*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2823*/ meltfptr[2822]),
@@ -114843,7 +115395,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3044*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3059*/ meltfptr[3026] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3548:/ initchunk");
@@ -114854,7 +115406,7 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3045*/ meltfptr[3009] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3060*/ meltfptr[3024] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2834*/ meltfptr[2833]),
@@ -114865,20 +115417,9 @@ warmelt_base_initialmeltchunk_41 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3045*/ meltfptr[3009] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3060*/ meltfptr[3024] = 0;
}
-
-#undef meltfram__
-} /*end of warmelt_base_initialmeltchunk_41 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
MELT_LOCATION ("warmelt-base.melt:3581:/ initchunk");
/*^block */
/*anyblock */
@@ -114887,7 +115428,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3046*/ meltfptr[3010] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3061*/ meltfptr[3025] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2845*/ meltfptr[2844]),
@@ -114898,7 +115439,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3046*/ meltfptr[3010] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3061*/ meltfptr[3025] = 0;
}
MELT_LOCATION ("warmelt-base.melt:3614:/ initchunk");
@@ -114909,7 +115450,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*^apply */
/*apply */
{
- /*_.INSTALL_VALUE_DESCRIPTOR__V3047*/ meltfptr[3011] =
+ /*_.INSTALL_VALUE_DESCRIPTOR__V3062*/ meltfptr[3026] =
melt_apply ((meltclosure_ptr_t)
( /*_.VALCLO___V2575*/ meltfptr[2574]),
(melt_ptr_t) ( /*_.VALDATA___V2856*/ meltfptr[2855]),
@@ -114920,10 +115461,10 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3047*/ meltfptr[3011] = 0;
+ /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3062*/ meltfptr[3026] = 0;
}
- MELT_LOCATION ("warmelt-base.melt:3700:/ initchunk");
+ MELT_LOCATION ("warmelt-base.melt:3705:/ initchunk");
/*^block */
/*anyblock */
{
@@ -114932,8 +115473,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V3048*/
- meltfptr[3009] = slot;
+ /*_.VALUEXPORTER___V3063*/
+ meltfptr[3024] = slot;
};
;
/*^apply */
@@ -114949,7 +115490,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : !=I */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114968,7 +115509,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : *I */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -114987,7 +115528,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : -I */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115006,7 +115547,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : <=I */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115025,7 +115566,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ==I */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115044,8 +115585,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : +IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2912*/ meltfptr[2911]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2927*/ meltfptr[2926]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115063,8 +115604,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : -IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2914*/ meltfptr[2913]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2929*/ meltfptr[2928]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115082,8 +115623,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : *IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2916*/ meltfptr[2915]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2931*/ meltfptr[2930]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115101,8 +115642,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : /IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2933*/ meltfptr[2932]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115120,8 +115661,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : %IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2920*/ meltfptr[2919]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2935*/ meltfptr[2934]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115139,7 +115680,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : <IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V386*/ meltfptr[385]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115158,7 +115699,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : <=IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115177,7 +115718,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : =IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115196,7 +115737,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : !=IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115215,7 +115756,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : >IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115234,7 +115775,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : >=IV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115253,7 +115794,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : <IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115272,7 +115813,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : <=IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115291,7 +115832,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : =IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115310,7 +115851,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : !=IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115329,7 +115870,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : >IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115348,7 +115889,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : >=IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115367,7 +115908,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : +IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115386,7 +115927,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : -IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115405,7 +115946,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : *IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115424,7 +115965,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : /IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115443,7 +115984,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : %IVI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115462,8 +116003,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2922*/ meltfptr[2921]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2937*/ meltfptr[2936]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -115481,7 +116022,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2140*/ meltfptr[2139]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115500,7 +116041,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMSTRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2129*/ meltfptr[2128]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115519,7 +116060,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115538,7 +116079,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CENCSTRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115557,7 +116098,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CENCSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2077*/ meltfptr[2076]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115576,7 +116117,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CENCSUBSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2088*/ meltfptr[2087]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115595,7 +116136,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CIDENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2151*/ meltfptr[2150]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115614,7 +116155,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CIDENTPREFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2162*/ meltfptr[2161]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115633,7 +116174,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_INDENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2044*/ meltfptr[2043]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115652,7 +116193,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_INDENTNL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115671,7 +116212,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_LONGDEC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2175*/ meltfptr[2174]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115690,7 +116231,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_LONGHEX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2186*/ meltfptr[2185]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115709,7 +116250,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115728,7 +116269,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_ROUTINEDESCR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2197*/ meltfptr[2196]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115747,7 +116288,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_SBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2066*/ meltfptr[2065]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115766,7 +116307,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_STRCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115785,7 +116326,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115804,7 +116345,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1888*/ meltfptr[1887]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115823,7 +116364,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMSTRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1877*/ meltfptr[1876]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115842,7 +116383,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1866*/ meltfptr[1865]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115861,7 +116402,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CENCSTRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115880,7 +116421,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CENCSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115899,7 +116440,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CIDENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115918,7 +116459,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CIDENTPREFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1912*/ meltfptr[1911]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115937,7 +116478,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_INDENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115956,7 +116497,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_INDENTNL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115975,7 +116516,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_LONGDEC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1927*/ meltfptr[1926]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -115994,7 +116535,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_LONGHEX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116013,7 +116554,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116032,7 +116573,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_ROUTINEDESCR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1949*/ meltfptr[1948]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116051,7 +116592,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_SBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116070,7 +116611,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_SHORT_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1783*/ meltfptr[1782]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116089,7 +116630,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_STRCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116108,7 +116649,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116127,7 +116668,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_TEXI_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1795*/ meltfptr[1794]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116146,7 +116687,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ADD_TO_OUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2208*/ meltfptr[2207]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116165,7 +116706,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ANDI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116184,7 +116725,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : C_CLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V169*/ meltfptr[168]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116203,7 +116744,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : C_TIME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V162*/ meltfptr[161]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116222,7 +116763,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CBREAK_MSG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116241,7 +116782,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CHECKCALLSTACK_MSG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116260,7 +116801,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CHECKVAL_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116279,7 +116820,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CLONE_WITH_DISCRIMINANT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V75*/ meltfptr[74]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116298,8 +116839,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : COMPARE_NAMED_ALPHA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2924*/ meltfptr[2923]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2939*/ meltfptr[2938]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -116317,7 +116858,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CSTRING_LENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2286*/ meltfptr[2285]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116336,8 +116877,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CSTRING_PREFIXED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2926*/ meltfptr[2925]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2941*/ meltfptr[2940]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -116355,8 +116896,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CSTRING_SAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2928*/ meltfptr[2927]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2943*/ meltfptr[2942]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -116374,7 +116915,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DEBUGCSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116393,7 +116934,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DEBUGLONG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1227*/ meltfptr[1226]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116412,7 +116953,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ERROR_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116431,7 +116972,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ERROR_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116450,7 +116991,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ERRORMSG_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116469,7 +117010,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ERRORMSG_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116488,8 +117029,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : FOREACH_LONG_UPTO */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2930*/ meltfptr[2929]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2945*/ meltfptr[2944]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -116507,7 +117048,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : FULL_GARBCOLL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V126*/ meltfptr[125]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116526,7 +117067,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GENERATE_DEBUG_MELT_MODULE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116545,7 +117086,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GENERATE_OPTIMIZED_MELT_MODULE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1515*/ meltfptr[1514]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116564,7 +117105,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GENERATE_QUICKLY_MELT_MODULE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116583,7 +117124,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GENERATE_FLAVORED_MELT_MODULE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116602,7 +117143,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GET_GLOBPREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V55*/ meltfptr[54]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116621,7 +117162,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IGNORE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V26*/ meltfptr[25]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116634,13 +117175,32 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V2914*/ meltfptr[2913];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) &
+ /*quasi.cur.mod.env.cont norm.exp.val : INCREMENT */
+/*_.CONTENV___V2*/ meltfptr[1];
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2912*/ meltfptr[2911]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.VALDATA___V964*/ meltfptr[963];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : INFORM_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116659,7 +117219,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : INFORM_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116678,7 +117238,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : INFORMSG_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116697,7 +117257,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : INFORMSG_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116716,7 +117276,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1738*/ meltfptr[1737]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116735,7 +117295,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_MIXBIGINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116754,7 +117314,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_MIXINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V683*/ meltfptr[682]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116773,7 +117333,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116792,7 +117352,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_MULTIPLE_OR_NULL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116811,7 +117371,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_NOT_OBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V44*/ meltfptr[43]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116830,7 +117390,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_OUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1729*/ meltfptr[1728]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116849,7 +117409,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_STRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116868,7 +117428,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : IS_STRINGCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116887,7 +117447,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : LONGBACKTRACE_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116906,7 +117466,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_MIXINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116925,7 +117485,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116944,7 +117504,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_PAIR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116963,7 +117523,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -116982,7 +117542,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117001,7 +117561,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_GENERATED_C_FILENAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1498*/ meltfptr[1497]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117020,7 +117580,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_MIXLOC_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117039,7 +117599,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_NAKEDBASENAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117058,7 +117618,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_TEMPNAME_SUFFIXED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117077,7 +117637,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_WITHOUT_SUFFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117096,7 +117656,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_COUNT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2311*/ meltfptr[2310]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117115,8 +117675,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_EVERY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2932*/ meltfptr[2931]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2947*/ meltfptr[2946]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -117134,8 +117694,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_ITERATE_TEST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2934*/ meltfptr[2933]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2949*/ meltfptr[2948]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -117153,7 +117713,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWGET */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2320*/ meltfptr[2319]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117172,7 +117732,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWPUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2331*/ meltfptr[2330]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117191,7 +117751,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWREMOVE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2346*/ meltfptr[2345]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117210,7 +117770,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_SIZE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2300*/ meltfptr[2299]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117229,7 +117789,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MAXI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117248,7 +117808,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_APPLICATION_COUNT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2379*/ meltfptr[2378]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117267,7 +117827,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_APPLICATION_DEPTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2363*/ meltfptr[2362]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117286,7 +117846,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_APPLICATION_SHALLOWER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2370*/ meltfptr[2369]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117305,7 +117865,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_INCREMENT_DBGCOUNTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117324,7 +117884,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_IS_BOOTSTRAPPING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1722*/ meltfptr[1721]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117343,7 +117903,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_MODE_CONTAINER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2386*/ meltfptr[2385]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117362,7 +117922,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_VERSION_STR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117381,7 +117941,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MESSAGE_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117400,7 +117960,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MESSAGENUM_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117419,7 +117979,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MESSAGEVAL_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117438,7 +117998,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MINI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117457,7 +118017,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MINOR_GARBCOLL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V115*/ meltfptr[114]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117476,7 +118036,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXBIGINT_VAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117495,7 +118055,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXINT_VAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117514,7 +118074,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCATION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117533,7 +118093,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCBASEFILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117552,7 +118112,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCFILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117571,7 +118131,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCLINE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117590,7 +118150,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_VAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V729*/ meltfptr[728]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117609,8 +118169,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_BACKWARD_EVERY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2936*/ meltfptr[2935]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2951*/ meltfptr[2950]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -117628,8 +118188,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_EVERY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2938*/ meltfptr[2937]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2953*/ meltfptr[2952]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -117647,8 +118207,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_EVERY_BOTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2940*/ meltfptr[2939]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2955*/ meltfptr[2954]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -117666,7 +118226,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : NEGI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117685,7 +118245,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : NONZERO_HASH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117704,7 +118264,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : NOTI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117723,7 +118283,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : NOTNULL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117742,7 +118302,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OBJ_HASH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V66*/ meltfptr[65]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117761,7 +118321,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OBJ_LEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V90*/ meltfptr[89]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117780,7 +118340,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OBJ_NUM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V99*/ meltfptr[98]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117799,7 +118359,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OBJECT_LENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1591*/ meltfptr[1590]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117818,7 +118378,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OBJECT_NTH_FIELD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117837,7 +118397,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ORI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117856,7 +118416,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTCSTRING_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117875,7 +118435,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTCSTRING_ERR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117894,7 +118454,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTNEWLINE_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117913,7 +118473,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTNEWLINE_ERR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117932,7 +118492,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTNUM_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117951,7 +118511,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTNUM_ERR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117970,7 +118530,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_LENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -117989,7 +118549,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_NO_OVERWRITE_STRCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1988*/ meltfptr[1987]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118008,7 +118568,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_NO_OVERWRITE_STRVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118027,7 +118587,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_STRCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1962*/ meltfptr[1961]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118046,7 +118606,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_STRVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118065,7 +118625,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTSTR_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118084,7 +118644,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTSTR_ERR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1153*/ meltfptr[1152]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118103,7 +118663,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTSTRBUF_DBG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118122,7 +118682,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : OUTSTRBUF_ERR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118141,7 +118701,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : PAIR_LISTLENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118160,7 +118720,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : PAIR_SET_HEAD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118179,7 +118739,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : PPSTRBUF_MIXBIGINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118198,7 +118758,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : READ_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118217,7 +118777,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : READ_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118236,8 +118796,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2942*/ meltfptr[2941]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2957*/ meltfptr[2956]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118255,8 +118815,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_IPA_PASSES_END_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2944*/ meltfptr[2943]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2959*/ meltfptr[2958]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118274,8 +118834,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2946*/ meltfptr[2945]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2961*/ meltfptr[2960]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118293,8 +118853,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_IPA_PASSES_START_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2948*/ meltfptr[2947]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2963*/ meltfptr[2962]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118312,8 +118872,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_PASSES_END_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2950*/ meltfptr[2949]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2965*/ meltfptr[2964]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118331,8 +118891,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_PASSES_END_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2952*/ meltfptr[2951]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2967*/ meltfptr[2966]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118350,8 +118910,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_PASSES_START_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2954*/ meltfptr[2953]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2969*/ meltfptr[2968]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118369,8 +118929,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_ALL_PASSES_START_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2956*/ meltfptr[2955]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2971*/ meltfptr[2970]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118388,8 +118948,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2958*/ meltfptr[2957]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2973*/ meltfptr[2972]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118407,8 +118967,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2960*/ meltfptr[2959]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2975*/ meltfptr[2974]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118426,8 +118986,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2962*/ meltfptr[2961]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2977*/ meltfptr[2976]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118445,8 +119005,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2964*/ meltfptr[2963]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2979*/ meltfptr[2978]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118464,8 +119024,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_FINISH_DECL_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2966*/ meltfptr[2965]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2981*/ meltfptr[2980]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118483,8 +119043,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_FINISH_DECL_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2968*/ meltfptr[2967]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2983*/ meltfptr[2982]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118502,8 +119062,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_FINISH_TYPE_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2970*/ meltfptr[2969]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2985*/ meltfptr[2984]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118521,8 +119081,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_FINISH_TYPE_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2972*/ meltfptr[2971]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2987*/ meltfptr[2986]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118540,8 +119100,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_PASS_EXECUTION_HOOK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2974*/ meltfptr[2973]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2989*/ meltfptr[2988]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118559,8 +119119,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_PRAGMA_HANDLER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2976*/ meltfptr[2975]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2991*/ meltfptr[2990]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118578,8 +119138,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_PRE_GENERICIZE_HOOK_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2978*/ meltfptr[2977]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2993*/ meltfptr[2992]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118597,8 +119157,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_PRE_GENERICIZE_HOOK_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2980*/ meltfptr[2979]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2995*/ meltfptr[2994]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118616,8 +119176,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : RETRIEVE_VALUE_DESCRIPTOR_LIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2982*/ meltfptr[2981]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2997*/ meltfptr[2996]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118635,8 +119195,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SET_CONTENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2984*/ meltfptr[2983]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V2999*/ meltfptr[2998]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118654,8 +119214,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_DIFFERENT_FROM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2986*/ meltfptr[2985]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3001*/ meltfptr[3000]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118673,8 +119233,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_EQUAL_TO */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2988*/ meltfptr[2987]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3003*/ meltfptr[3002]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118692,8 +119252,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_GREATER_OR_EQUAL_TO */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2990*/ meltfptr[2989]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3005*/ meltfptr[3004]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118711,8 +119271,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_GREATER_THAN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2992*/ meltfptr[2991]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3007*/ meltfptr[3006]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118730,8 +119290,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_LOWER_OR_EQUAL_TO */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2994*/ meltfptr[2993]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3009*/ meltfptr[3008]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118749,8 +119309,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_LOWER_THAN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2996*/ meltfptr[2995]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3011*/ meltfptr[3010]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118768,8 +119328,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_MULTIPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V2998*/ meltfptr[2997]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3013*/ meltfptr[3012]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118787,8 +119347,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SOME_STRING_VALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V3000*/ meltfptr[2999]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3015*/ meltfptr[3014]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -118806,7 +119366,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_COLON */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118825,7 +119385,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_COMMA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1413*/ meltfptr[1412]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118844,7 +119404,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_EQUAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1435*/ meltfptr[1434]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118863,7 +119423,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_SPACE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118882,7 +119442,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : START_MELT_MODULE_OF_FLAVOR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1567*/ meltfptr[1566]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118901,7 +119461,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRBUF2STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118920,7 +119480,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRBUF_RESERVE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118939,7 +119499,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRBUF_USEDLENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118958,7 +119518,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_ENDS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118977,7 +119537,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_HEX_MD5SUM_CONSTPATH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1369*/ meltfptr[1368]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -118996,7 +119556,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_HEX_MD5SUM_PATH_SEQUENCE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119015,7 +119575,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_HEX_MD5SUM_PATHSTRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119034,7 +119594,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_LENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119053,7 +119613,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_PREFIXED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119072,7 +119632,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_STARTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1343*/ meltfptr[1342]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119091,7 +119651,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : STRING_SUFFIXED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119110,7 +119670,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SUBCLASS_OF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1613*/ meltfptr[1612]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119129,7 +119689,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SUBCLASS_OR_EQ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119148,7 +119708,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : SUBSEQ_MULTIPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119167,8 +119727,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : TUPLE_NTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V3002*/ meltfptr[3001]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3017*/ meltfptr[3016]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -119186,8 +119746,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : TUPLE_SIZED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V3004*/ meltfptr[3003]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3019*/ meltfptr[3018]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -119205,8 +119765,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : UNREGISTER_PASS_EXECUTION_HOOK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
- (melt_ptr_t) ( /*_.VALDATA___V3006*/ meltfptr[3005]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
+ (melt_ptr_t) ( /*_.VALDATA___V3021*/ meltfptr[3020]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -119224,7 +119784,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_CLOSURE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2638*/ meltfptr[2637]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119243,7 +119803,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_DECAY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2613*/ meltfptr[2612]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119262,7 +119822,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_INT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2706*/ meltfptr[2705]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119281,7 +119841,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_LIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2694*/ meltfptr[2693]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119300,7 +119860,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MAPOBJECTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2590*/ meltfptr[2589]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119319,7 +119879,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MAPSTRINGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2602*/ meltfptr[2601]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119338,7 +119898,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MIXBIGINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2736*/ meltfptr[2735]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119357,7 +119917,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MIXINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2716*/ meltfptr[2715]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119376,7 +119936,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MIXLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2726*/ meltfptr[2725]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119395,7 +119955,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_MULTIPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2626*/ meltfptr[2625]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119414,7 +119974,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_OBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2578*/ meltfptr[2577]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119433,7 +119993,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_PAIR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2682*/ meltfptr[2681]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119452,7 +120012,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_REAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2746*/ meltfptr[2745]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119471,7 +120031,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_ROUTINE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2650*/ meltfptr[2649]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119490,7 +120050,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2755*/ meltfptr[2754]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119509,7 +120069,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2755*/ meltfptr[2754]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119528,7 +120088,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_MPFR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2777*/ meltfptr[2776]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119547,7 +120107,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_COEFFICIENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2788*/ meltfptr[2787]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119566,7 +120126,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_CONSTRAINT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2810*/ meltfptr[2809]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119585,7 +120145,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2821*/ meltfptr[2820]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119604,7 +120164,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_GENERATOR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2832*/ meltfptr[2831]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119623,7 +120183,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2843*/ meltfptr[2842]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119642,7 +120202,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2799*/ meltfptr[2798]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119661,7 +120221,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_PPL_POLYHEDRON */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2854*/ meltfptr[2853]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119680,7 +120240,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_SPECIAL_RAW_FILE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2766*/ meltfptr[2765]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119699,7 +120259,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_STRBUF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2672*/ meltfptr[2671]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119718,7 +120278,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VALDESC_STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2661*/ meltfptr[2660]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119737,7 +120297,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_CTYPE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2901*/ meltfptr[2900]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119756,7 +120316,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_INDEX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2865*/ meltfptr[2864]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119775,7 +120335,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_LENGTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2872*/ meltfptr[2871]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119794,7 +120354,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_SKIP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2879*/ meltfptr[2878]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119813,7 +120373,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_TYPE_CODE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V2890*/ meltfptr[2889]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119832,7 +120392,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : VOID */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V37*/ meltfptr[36]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119851,7 +120411,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : WARNING_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119870,7 +120430,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : WARNING_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119889,7 +120449,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : WARNINGMSG_PLAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119908,7 +120468,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : WARNINGMSG_STRV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119927,7 +120487,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : XORI */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119946,7 +120506,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : ZEROP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3048*/ meltfptr[3009]),
+ ( /*_.VALUEXPORTER___V3063*/ meltfptr[3024]),
(melt_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -119955,10 +120515,10 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V3048*/ meltfptr[3009] = 0;
+ /*clear *//*_.VALUEXPORTER___V3063*/ meltfptr[3024] = 0;
}
- MELT_LOCATION ("warmelt-base.melt:3975:/ initchunk");
+ MELT_LOCATION ("warmelt-base.melt:3981:/ initchunk");
/*^block */
/*anyblock */
{
@@ -119967,8 +120527,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V3049*/
- meltfptr[3010] = slot;
+ /*_.VALUEXPORTER___V3064*/
+ meltfptr[3025] = slot;
};
;
/*^apply */
@@ -119984,8 +120544,8 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : GENERATE_MELT_MODULE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V3049*/ meltfptr[3010]),
- (melt_ptr_t) ( /*_.VALDATA___V3008*/ meltfptr[3007]),
+ ( /*_.VALUEXPORTER___V3064*/ meltfptr[3025]),
+ (melt_ptr_t) ( /*_.VALDATA___V3023*/ meltfptr[3022]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -119993,7 +120553,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V3049*/ meltfptr[3010] = 0;
+ /*clear *//*_.VALUEXPORTER___V3064*/ meltfptr[3025] = 0;
}
/**COMMENT: after toplevel body **/ ;
@@ -120430,7 +120990,18 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
(void)
meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]));
- /*internsym:IS_MIXBIGINT */
+
+#undef meltfram__
+} /*end of warmelt_base_initialmeltchunk_42 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_base_initialmeltchunk_43 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:IS_MIXBIGINT*/
(void)
meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]));
@@ -120536,18 +121107,7 @@ warmelt_base_initialmeltchunk_42 (struct frame_start_module_melt_st
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V1026*/ meltfptr[1025]));
-
-#undef meltfram__
-} /*end of warmelt_base_initialmeltchunk_42 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_base_initialmeltchunk_43 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:Q*/
+ /*internsym:Q */
(void)
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V1031*/ meltfptr[1030]));
@@ -121057,7 +121617,18 @@ warmelt_base_initialmeltchunk_43 (struct frame_start_module_melt_st
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V1855*/ meltfptr[1854]));
- /*internsym:ADD2SBUF_CCOMSTRING */
+
+#undef meltfram__
+} /*end of warmelt_base_initialmeltchunk_43 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_base_initialmeltchunk_44 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:ADD2SBUF_CCOMSTRING*/
(void)
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V1866*/ meltfptr[1865]));
@@ -121187,18 +121758,7 @@ warmelt_base_initialmeltchunk_43 (struct frame_start_module_melt_st
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V2095*/ meltfptr[2094]));
-
-#undef meltfram__
-} /*end of warmelt_base_initialmeltchunk_43 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_base_initialmeltchunk_44 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:SLEN*/
+ /*internsym:SLEN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V2098*/ meltfptr[2097]));
@@ -121698,261 +122258,276 @@ warmelt_base_initialmeltchunk_44 (struct frame_start_module_melt_st
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V2901*/ meltfptr[2900]));
- /*internsym:+IV */
+ /*internsym:INCREMENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
( /*_.VALDATA___V2912*/ meltfptr[2911]));
+ /*internsym:LEFT */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V2917*/ meltfptr[2916]));
+
+
+#undef meltfram__
+} /*end of warmelt_base_initialmeltchunk_44 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_base_initialmeltchunk_45 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:INCR*/
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V2920*/ meltfptr[2919]));
+
+ /*internsym:+IV */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V2927*/ meltfptr[2926]));
+
/*internsym:-IV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2914*/ meltfptr[2913]));
+ ( /*_.VALDATA___V2929*/ meltfptr[2928]));
/*internsym:*IV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2916*/ meltfptr[2915]));
+ ( /*_.VALDATA___V2931*/ meltfptr[2930]));
/*internsym:/IV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2918*/ meltfptr[2917]));
+ ( /*_.VALDATA___V2933*/ meltfptr[2932]));
/*internsym:%IV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2920*/ meltfptr[2919]));
+ ( /*_.VALDATA___V2935*/ meltfptr[2934]));
/*internsym:ADD2OUT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2922*/ meltfptr[2921]));
+ ( /*_.VALDATA___V2937*/ meltfptr[2936]));
/*internsym:COMPARE_NAMED_ALPHA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2924*/ meltfptr[2923]));
+ ( /*_.VALDATA___V2939*/ meltfptr[2938]));
/*internsym:CSTRING_PREFIXED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2926*/ meltfptr[2925]));
+ ( /*_.VALDATA___V2941*/ meltfptr[2940]));
/*internsym:CSTRING_SAME */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2928*/ meltfptr[2927]));
+ ( /*_.VALDATA___V2943*/ meltfptr[2942]));
/*internsym:FOREACH_LONG_UPTO */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2930*/ meltfptr[2929]));
+ ( /*_.VALDATA___V2945*/ meltfptr[2944]));
/*internsym:MAPSTRING_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2932*/ meltfptr[2931]));
+ ( /*_.VALDATA___V2947*/ meltfptr[2946]));
/*internsym:MAPSTRING_ITERATE_TEST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2934*/ meltfptr[2933]));
+ ( /*_.VALDATA___V2949*/ meltfptr[2948]));
/*internsym:MULTIPLE_BACKWARD_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2936*/ meltfptr[2935]));
+ ( /*_.VALDATA___V2951*/ meltfptr[2950]));
/*internsym:MULTIPLE_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2938*/ meltfptr[2937]));
+ ( /*_.VALDATA___V2953*/ meltfptr[2952]));
/*internsym:MULTIPLE_EVERY_BOTH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2940*/ meltfptr[2939]));
+ ( /*_.VALDATA___V2955*/ meltfptr[2954]));
/*internsym:REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2942*/ meltfptr[2941]));
+ ( /*_.VALDATA___V2957*/ meltfptr[2956]));
/*internsym:REGISTER_ALL_IPA_PASSES_END_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2944*/ meltfptr[2943]));
+ ( /*_.VALDATA___V2959*/ meltfptr[2958]));
/*internsym:REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2946*/ meltfptr[2945]));
+ ( /*_.VALDATA___V2961*/ meltfptr[2960]));
/*internsym:REGISTER_ALL_IPA_PASSES_START_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2948*/ meltfptr[2947]));
+ ( /*_.VALDATA___V2963*/ meltfptr[2962]));
/*internsym:REGISTER_ALL_PASSES_END_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2950*/ meltfptr[2949]));
+ ( /*_.VALDATA___V2965*/ meltfptr[2964]));
/*internsym:REGISTER_ALL_PASSES_END_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2952*/ meltfptr[2951]));
+ ( /*_.VALDATA___V2967*/ meltfptr[2966]));
/*internsym:REGISTER_ALL_PASSES_START_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2954*/ meltfptr[2953]));
+ ( /*_.VALDATA___V2969*/ meltfptr[2968]));
/*internsym:REGISTER_ALL_PASSES_START_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2956*/ meltfptr[2955]));
+ ( /*_.VALDATA___V2971*/ meltfptr[2970]));
/*internsym:REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2958*/ meltfptr[2957]));
+ ( /*_.VALDATA___V2973*/ meltfptr[2972]));
/*internsym:REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2960*/ meltfptr[2959]));
+ ( /*_.VALDATA___V2975*/ meltfptr[2974]));
/*internsym:REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2962*/ meltfptr[2961]));
+ ( /*_.VALDATA___V2977*/ meltfptr[2976]));
/*internsym:REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2964*/ meltfptr[2963]));
+ ( /*_.VALDATA___V2979*/ meltfptr[2978]));
/*internsym:REGISTER_FINISH_DECL_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2966*/ meltfptr[2965]));
-
-
-#undef meltfram__
-} /*end of warmelt_base_initialmeltchunk_44 */
+ ( /*_.VALDATA___V2981*/ meltfptr[2980]));
-void MELT_MODULE_VISIBILITY
-warmelt_base_initialmeltchunk_45 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:REGISTER_FINISH_DECL_HOOK_LAST*/
+ /*internsym:REGISTER_FINISH_DECL_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2968*/ meltfptr[2967]));
+ ( /*_.VALDATA___V2983*/ meltfptr[2982]));
/*internsym:REGISTER_FINISH_TYPE_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2970*/ meltfptr[2969]));
+ ( /*_.VALDATA___V2985*/ meltfptr[2984]));
/*internsym:REGISTER_FINISH_TYPE_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2972*/ meltfptr[2971]));
+ ( /*_.VALDATA___V2987*/ meltfptr[2986]));
/*internsym:REGISTER_PASS_EXECUTION_HOOK */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2974*/ meltfptr[2973]));
+ ( /*_.VALDATA___V2989*/ meltfptr[2988]));
/*internsym:REGISTER_PRAGMA_HANDLER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2976*/ meltfptr[2975]));
+ ( /*_.VALDATA___V2991*/ meltfptr[2990]));
/*internsym:REGISTER_PRE_GENERICIZE_HOOK_FIRST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2978*/ meltfptr[2977]));
+ ( /*_.VALDATA___V2993*/ meltfptr[2992]));
/*internsym:REGISTER_PRE_GENERICIZE_HOOK_LAST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2980*/ meltfptr[2979]));
+ ( /*_.VALDATA___V2995*/ meltfptr[2994]));
/*internsym:RETRIEVE_VALUE_DESCRIPTOR_LIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2982*/ meltfptr[2981]));
+ ( /*_.VALDATA___V2997*/ meltfptr[2996]));
/*internsym:SET_CONTENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2984*/ meltfptr[2983]));
+ ( /*_.VALDATA___V2999*/ meltfptr[2998]));
/*internsym:SOME_INTEGER_DIFFERENT_FROM */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2986*/ meltfptr[2985]));
+ ( /*_.VALDATA___V3001*/ meltfptr[3000]));
/*internsym:SOME_INTEGER_EQUAL_TO */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2988*/ meltfptr[2987]));
+ ( /*_.VALDATA___V3003*/ meltfptr[3002]));
/*internsym:SOME_INTEGER_GREATER_OR_EQUAL_TO */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2990*/ meltfptr[2989]));
+ ( /*_.VALDATA___V3005*/ meltfptr[3004]));
/*internsym:SOME_INTEGER_GREATER_THAN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2992*/ meltfptr[2991]));
+ ( /*_.VALDATA___V3007*/ meltfptr[3006]));
/*internsym:SOME_INTEGER_LOWER_OR_EQUAL_TO */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2994*/ meltfptr[2993]));
+ ( /*_.VALDATA___V3009*/ meltfptr[3008]));
/*internsym:SOME_INTEGER_LOWER_THAN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2996*/ meltfptr[2995]));
+ ( /*_.VALDATA___V3011*/ meltfptr[3010]));
/*internsym:SOME_INTEGER_MULTIPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V2998*/ meltfptr[2997]));
+ ( /*_.VALDATA___V3013*/ meltfptr[3012]));
/*internsym:SOME_STRING_VALUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V3000*/ meltfptr[2999]));
+ ( /*_.VALDATA___V3015*/ meltfptr[3014]));
/*internsym:TUPLE_NTH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V3002*/ meltfptr[3001]));
+ ( /*_.VALDATA___V3017*/ meltfptr[3016]));
/*internsym:TUPLE_SIZED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V3004*/ meltfptr[3003]));
+ ( /*_.VALDATA___V3019*/ meltfptr[3018]));
/*internsym:UNREGISTER_PASS_EXECUTION_HOOK */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V3006*/ meltfptr[3005]));
+ ( /*_.VALDATA___V3021*/ meltfptr[3020]));
/*internsym:GENERATE_MELT_MODULE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V3008*/ meltfptr[3007]));
+ ( /*_.VALDATA___V3023*/ meltfptr[3022]));
/**COMMENT: set retinit from boxloc **/ ;
@@ -121972,20 +122547,20 @@ forward_or_mark_module_start_frame_warmelt_base (struct melt_callframe_st *fp,
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -2410);
+ meltframptr_->mcfr_nbvar == /*minihash */ -4031);
if (!marking && melt_is_forwarding)
{
dbgprintf
("forward_or_mark_module_start_frame_warmelt_base forwarding %d pointers in frame %p",
- 3049, (void *) meltframptr_);
- for (ix = 0; ix < 3049; ix++)
+ 3064, (void *) meltframptr_);
+ for (ix = 0; ix < 3064; ix++)
MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]);
return;
} /*end forwarding */
dbgprintf
("forward_or_mark_module_start_frame_warmelt_base marking in frame %p",
(void *) meltframptr_);
- for (ix = 0; ix < 3049; ix++)
+ for (ix = 0; ix < 3064; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
diff --git a/gcc/melt/generated/warmelt-debug+01.c b/gcc/melt/generated/warmelt-debug+01.c
index a79db52b8bf..eb7960d0395 100644
--- a/gcc/melt/generated/warmelt-debug+01.c
+++ b/gcc/melt/generated/warmelt-debug+01.c
@@ -251,7 +251,22 @@ meltrout_14_warmelt_debug_DBGOUT_STRING_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -266,7 +281,7 @@ meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -281,7 +296,7 @@ meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -296,7 +311,7 @@ meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
+meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -312,7 +327,7 @@ meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
+meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -328,7 +343,7 @@ meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -343,7 +358,7 @@ meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
+meltrout_22_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -356,7 +371,7 @@ meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -371,7 +386,7 @@ meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -386,7 +401,7 @@ meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -401,7 +416,7 @@ meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
+meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -417,7 +432,7 @@ meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
+meltrout_27_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -430,7 +445,7 @@ meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
+meltrout_28_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -443,7 +458,7 @@ meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
+meltrout_29_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -456,7 +471,7 @@ meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
+meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -472,7 +487,7 @@ meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
+meltrout_31_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -485,7 +500,7 @@ meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
+meltrout_32_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -498,7 +513,7 @@ meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
+meltrout_33_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -511,7 +526,7 @@ meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -527,7 +542,7 @@ meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -542,7 +557,7 @@ meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -561,7 +576,7 @@ meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -580,7 +595,7 @@ meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -599,7 +614,7 @@ meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -618,7 +633,7 @@ meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -633,7 +648,7 @@ meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -648,7 +663,7 @@ meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
+meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -667,7 +682,7 @@ meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -682,7 +697,7 @@ meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -701,7 +716,7 @@ meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -720,7 +735,7 @@ meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
+meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -739,7 +754,7 @@ meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
+meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -755,7 +770,7 @@ meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -770,7 +785,7 @@ meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
+meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -786,7 +801,7 @@ meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
+meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -916,7 +931,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!EDGE_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!EDGE_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1123,7 +1145,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!BASICBLOCK_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!BASICBLOCK_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1328,7 +1357,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!LOOP_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!LOOP_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1610,7 +1646,13 @@ lab_endgetargs:;
/*_#DBGCOUNTER__L4*/ meltfnum[3] = 0;;
MELT_LOCATION ("warmelt-debug.melt:275:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -1629,7 +1671,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-debug.melt:276:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -1705,7 +1753,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-debug.melt:298:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -3164,7 +3217,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!TREE_DEBUG_FUNCONT */ meltfrout->tabval[10])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t)
+ (( /*!TREE_DEBUG_FUNCONT */ meltfrout->tabval[10])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3352,7 +3411,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!GIMPLE_DEBUG_FUNCONT */ meltfrout->tabval[12])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t)
+ (( /*!GIMPLE_DEBUG_FUNCONT */ meltfrout->tabval[12])),
+ (melt_ptr_t)
+ (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3550,7 +3616,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!GIMPLESEQ_DEBUG_FUNCONT */ meltfrout->tabval[13])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) (( /*!GIMPLESEQ_DEBUG_FUNCONT */ meltfrout->tabval[13])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3762,7 +3833,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!EDGE_DEBUG_FUNCONT */ meltfrout->tabval[14])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) (( /*!EDGE_DEBUG_FUNCONT */ meltfrout->tabval[14])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3986,7 +4062,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!BASICBLOCK_DEBUG_FUNCONT */ meltfrout->tabval[15])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) (( /*!BASICBLOCK_DEBUG_FUNCONT */ meltfrout->tabval[15])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4224,7 +4305,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!LOOP_DEBUG_FUNCONT */ meltfrout->tabval[16])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) (( /*!LOOP_DEBUG_FUNCONT */ meltfrout->tabval[16])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4456,7 +4542,12 @@ lab_endgetargs:;
;;
MELT_LOCATION
("warmelt-debug.melt:421:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTYP__V66*/ meltfptr[31]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) ( /*_.VCTYP__V66*/ meltfptr[31]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4505,7 +4596,12 @@ lab_endgetargs:;
;
MELT_LOCATION
("warmelt-debug.melt:430:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTYP__V66*/ meltfptr[31]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t) ( /*_.VCTYP__V66*/ meltfptr[31]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5629,8 +5725,8 @@ meltrout_11_warmelt_debug_DBGOUT_FIELDS (meltclosure_ptr_t meltclosp_,
struct melt_callframe_st *mcfr_prev;
#define MELTFRAM_NBVARPTR 21
void *mcfr_varptr[21];
-#define MELTFRAM_NBVARNUM 36
- long mcfr_varnum[36];
+#define MELTFRAM_NBVARNUM 38
+ long mcfr_varnum[38];
/*others*/
long _spare_;
}
@@ -6053,7 +6149,7 @@ lab_endgetargs:;
/*^compute */
/*_#I__L19*/ meltfnum[17] =
- (( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
+ (( /*_#DEPTH__L1*/ meltfnum[0]) <= (1));;
MELT_LOCATION ("warmelt-debug.melt:516:/ cond");
/*cond */ if ( /*_#I__L19*/ meltfnum[17]) /*then */
{
@@ -6132,16 +6228,47 @@ lab_endgetargs:;
/*_#I__L29*/ meltfnum[28] =
(( /*_#IRAW__L28*/ meltfnum[27]) == (0));;
- /*^compute */
+ MELT_LOCATION ("warmelt-debug.melt:521:/ cond");
+ /*cond */ if ( /*_#I__L29*/ meltfnum[28]) /*then */
+ {
+ /*^cond.then */
+ /*_#OR___L30*/ meltfnum[29] =
+ /*_#I__L29*/ meltfnum[28];;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-debug.melt:521:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L31*/ meltfnum[30] =
+ (( /*_#DEPTH__L1*/ meltfnum[0]) <= (1));;
+ /*^compute */
+
+ /*_#OR___L30*/ meltfnum[29] =
+ /*_#I__L31*/ meltfnum[30];;
+ /*epilog */
+ MELT_LOCATION
+ ("warmelt-debug.melt:521:/ clear");
+ /*clear *//*_#I__L31*/ meltfnum[30] = 0;
+ }
+ ;
+ }
+ ;
/*_#OR___L27*/ meltfnum[26] =
- /*_#I__L29*/ meltfnum[28];;
+ /*_#OR___L30*/ meltfnum[29];;
/*epilog */
MELT_LOCATION ("warmelt-debug.melt:521:/ clear");
/*clear *//*_#IRAW__L28*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_#I__L29*/ meltfnum[28] = 0;
+ /*^clear */
+ /*clear *//*_#OR___L30*/ meltfnum[29] = 0;
}
;
}
@@ -6156,7 +6283,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:526:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:527:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.OUT__V11*/
meltfptr[10]),
@@ -6164,33 +6291,33 @@ lab_endgetargs:;
meltfnum[0]), 0);;
}
;
- /*_#STRBUF_USEDLENGTH__L31*/ meltfnum[28] =
+ /*_#STRBUF_USEDLENGTH__L33*/ meltfnum[27] =
melt_strbuf_usedlength ((melt_ptr_t)
( /*_.OUT__V11*/
meltfptr[10]));;
- MELT_LOCATION ("warmelt-debug.melt:527:/ compute");
+ MELT_LOCATION ("warmelt-debug.melt:528:/ compute");
/*_#OUTOFF__L9*/ meltfnum[8] =
- /*_#SETQ___L32*/ meltfnum[31] =
- /*_#STRBUF_USEDLENGTH__L31*/ meltfnum[28];;
+ /*_#SETQ___L34*/ meltfnum[28] =
+ /*_#STRBUF_USEDLENGTH__L33*/ meltfnum[27];;
MELT_LOCATION
- ("warmelt-debug.melt:525:/ quasiblock");
+ ("warmelt-debug.melt:526:/ quasiblock");
- /*_#PROGN___L33*/ meltfnum[32] =
- /*_#SETQ___L32*/ meltfnum[31];;
+ /*_#PROGN___L35*/ meltfnum[29] =
+ /*_#SETQ___L34*/ meltfnum[28];;
/*^compute */
- /*_#IFELSE___L30*/ meltfnum[27] =
- /*_#PROGN___L33*/ meltfnum[32];;
+ /*_#IFELSE___L32*/ meltfnum[30] =
+ /*_#PROGN___L35*/ meltfnum[29];;
/*epilog */
MELT_LOCATION ("warmelt-debug.melt:521:/ clear");
- /*clear *//*_#STRBUF_USEDLENGTH__L31*/ meltfnum[28]
+ /*clear *//*_#STRBUF_USEDLENGTH__L33*/ meltfnum[27]
= 0;
/*^clear */
- /*clear *//*_#SETQ___L32*/ meltfnum[31] = 0;
+ /*clear *//*_#SETQ___L34*/ meltfnum[28] = 0;
/*^clear */
- /*clear *//*_#PROGN___L33*/ meltfnum[32] = 0;
+ /*clear *//*_#PROGN___L35*/ meltfnum[29] = 0;
}
;
}
@@ -6205,19 +6332,19 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:529:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:530:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]),
(" "));
}
;
- /*clear *//*_#IFELSE___L30*/ meltfnum[27] = 0;
+ /*clear *//*_#IFELSE___L32*/ meltfnum[30] = 0;
/*epilog */
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:531:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:532:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURFLD__V18*/ meltfptr[17]), 1, "NAMED_NAME");
@@ -6237,14 +6364,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:532:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:533:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]), ("="));
}
;
- /*_#I__L34*/ meltfnum[28] =
+ /*_#I__L36*/ meltfnum[27] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:533:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:534:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -6253,7 +6380,7 @@ lab_endgetargs:;
argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.DBGI__V3*/ meltfptr[2];
/*^apply.arg */
- argtab[1].meltbp_long = /*_#I__L34*/ meltfnum[28];
+ argtab[1].meltbp_long = /*_#I__L36*/ meltfnum[27];
/*_.DBG_OUT__V21*/ meltfptr[20] =
melt_apply ((meltclosure_ptr_t)
(( /*!DBG_OUT */ meltfrout->tabval[1])),
@@ -6265,7 +6392,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:534:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:535:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]),
( /*_#DEPTH__L1*/ meltfnum[0]),
@@ -6286,11 +6413,11 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_#OR___L27*/ meltfnum[26] = 0;
/*^clear */
- /*clear *//*_#IFELSE___L30*/ meltfnum[27] = 0;
+ /*clear *//*_#IFELSE___L32*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V20*/ meltfptr[19] = 0;
/*^clear */
- /*clear *//*_#I__L34*/ meltfnum[28] = 0;
+ /*clear *//*_#I__L36*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.DBG_OUT__V21*/ meltfptr[20] = 0;
/*epilog */
@@ -6307,11 +6434,11 @@ lab_endgetargs:;
/*clear *//*_#I__L19*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_#OR___L20*/ meltfnum[19] = 0;
- /*_#I__L35*/ meltfnum[31] =
+ /*_#I__L37*/ meltfnum[28] =
(( /*_#IX__L7*/ meltfnum[6]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:536:/ compute");
- /*_#IX__L7*/ meltfnum[6] = /*_#SETQ___L36*/ meltfnum[32] =
- /*_#I__L35*/ meltfnum[31];;
+ MELT_LOCATION ("warmelt-debug.melt:537:/ compute");
+ /*_#IX__L7*/ meltfnum[6] = /*_#SETQ___L38*/ meltfnum[29] =
+ /*_#I__L37*/ meltfnum[28];;
/*epilog */
MELT_LOCATION ("warmelt-debug.melt:507:/ clear");
@@ -6319,9 +6446,9 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_#I__L17*/ meltfnum[16] = 0;
/*^clear */
- /*clear *//*_#I__L35*/ meltfnum[31] = 0;
+ /*clear *//*_#I__L37*/ meltfnum[28] = 0;
/*^clear */
- /*clear *//*_#SETQ___L36*/ meltfnum[32] = 0;
+ /*clear *//*_#SETQ___L38*/ meltfnum[29] = 0;
}
;
;
@@ -6474,7 +6601,7 @@ meltrout_12_warmelt_debug_DBGOUTAGAIN_FIELDS (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:541:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ getarg");
/*_.OBJ__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -6514,7 +6641,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:545:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:546:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6523,7 +6650,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:545:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:546:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -6531,7 +6658,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:545:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:546:/ cond.else");
/*^block */
/*anyblock */
@@ -6545,7 +6672,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (545) ? (545) : __LINE__, __FUNCTION__);
+ (546) ? (546) : __LINE__, __FUNCTION__);
;
}
;
@@ -6560,7 +6687,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:545:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:546:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -6573,7 +6700,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:546:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:547:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6581,7 +6708,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L5*/ meltfnum[3] =
(melt_magic_discr ((melt_ptr_t) ( /*_.OBJ__V2*/ meltfptr[1])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-debug.melt:546:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:547:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -6589,7 +6716,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:546:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:547:/ cond.else");
/*^block */
/*anyblock */
@@ -6603,7 +6730,7 @@ lab_endgetargs:;
melt_assert_failed (("check obj"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (546) ? (546) : __LINE__, __FUNCTION__);
+ (547) ? (547) : __LINE__, __FUNCTION__);
;
}
;
@@ -6618,7 +6745,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:546:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:547:/ clear");
/*clear *//*_#IS_OBJECT__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -6629,7 +6756,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:547:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:548:/ quasiblock");
/*_#NBF__L6*/ meltfnum[3] =
@@ -6642,7 +6769,7 @@ lab_endgetargs:;
/*^compute */
/*_#IX__L7*/ meltfnum[6] = /*_#FROMRANK__L2*/ meltfnum[1];;
- MELT_LOCATION ("warmelt-debug.melt:550:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:551:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CLA__V9*/ meltfptr[8]), 6, "CLASS_FIELDS");
@@ -6650,7 +6777,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:551:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:552:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -6660,14 +6787,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:553:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:554:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L8*/ meltfnum[7] =
(melt_is_out ((melt_ptr_t) /*_.OUT__V11*/ meltfptr[10]));;
- MELT_LOCATION ("warmelt-debug.melt:553:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:554:/ cond");
/*cond */ if ( /*_#IS_OUT__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -6675,7 +6802,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:553:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:554:/ cond.else");
/*^block */
/*anyblock */
@@ -6689,7 +6816,7 @@ lab_endgetargs:;
melt_assert_failed (("check out"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (553) ? (553) : __LINE__, __FUNCTION__);
+ (554) ? (554) : __LINE__, __FUNCTION__);
;
}
;
@@ -6704,7 +6831,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:553:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:554:/ clear");
/*clear *//*_#IS_OUT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -6719,7 +6846,7 @@ lab_endgetargs:;
/*_#I__L9*/ meltfnum[7] =
(( /*_#IX__L7*/ meltfnum[6]) < (0));;
- MELT_LOCATION ("warmelt-debug.melt:554:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:555:/ cond");
/*cond */ if ( /*_#I__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -6732,7 +6859,7 @@ lab_endgetargs:;
/*_#IF___L10*/ meltfnum[9] = /*_#SETQ___L11*/ meltfnum[10];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:554:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:555:/ clear");
/*clear *//*_#SETQ___L11*/ meltfnum[10] = 0;
}
;
@@ -6743,7 +6870,7 @@ lab_endgetargs:;
/*_#IF___L10*/ meltfnum[9] = 0;;
}
;
- MELT_LOCATION ("warmelt-debug.melt:555:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:556:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -6759,7 +6886,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L12*/ meltfnum[10]));;
- MELT_LOCATION ("warmelt-debug.melt:555:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:556:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -6767,7 +6894,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:556:/ loop");
+ MELT_LOCATION ("warmelt-debug.melt:557:/ loop");
/*loop */
{
labloop_FLDLOOP_2:; /*^loopbody */
@@ -6779,7 +6906,7 @@ lab_endgetargs:;
/*_#I__L14*/ meltfnum[13] =
(( /*_#IX__L7*/ meltfnum[6]) >=
( /*_#NBF__L6*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-debug.melt:557:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:558:/ cond");
/*cond */ if ( /*_#I__L14*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -6787,7 +6914,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:558:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:559:/ quasiblock");
/*^compute */
@@ -6806,7 +6933,7 @@ lab_endgetargs:;
;
/*_#I__L15*/ meltfnum[14] =
(( /*_#TORANK__L3*/ meltfnum[2]) > (0));;
- MELT_LOCATION ("warmelt-debug.melt:559:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:560:/ cond");
/*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -6817,7 +6944,7 @@ lab_endgetargs:;
/*_#I__L16*/ meltfnum[15] =
(( /*_#IX__L7*/ meltfnum[6]) >
( /*_#TORANK__L3*/ meltfnum[2]));;
- MELT_LOCATION ("warmelt-debug.melt:559:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:560:/ cond");
/*cond */ if ( /*_#I__L16*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -6826,7 +6953,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-debug.melt:561:/ quasiblock");
+ ("warmelt-debug.melt:562:/ quasiblock");
/*^compute */
@@ -6845,13 +6972,13 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:559:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:560:/ clear");
/*clear *//*_#I__L16*/ meltfnum[15] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:562:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:563:/ quasiblock");
/*_.CURFLD__V18*/ meltfptr[17] =
@@ -6864,7 +6991,7 @@ lab_endgetargs:;
(melt_field_object
((melt_ptr_t) ( /*_.OBJ__V2*/ meltfptr[1]),
( /*_#IX__L7*/ meltfnum[6])));;
- MELT_LOCATION ("warmelt-debug.melt:565:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:566:/ cond");
/*cond */ if ( /*_.CURVAL__V19*/ meltfptr[18]) /*then */
{
/*^cond.then */
@@ -6874,14 +7001,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:567:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:568:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]),
( /*_#DEPTH__L1*/ meltfnum[0]),
64);;
}
;
- MELT_LOCATION ("warmelt-debug.melt:569:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:570:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURFLD__V18*/ meltfptr[17]), 1, "NAMED_NAME");
@@ -6891,7 +7018,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:568:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:569:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]),
melt_string_str ((melt_ptr_t)
@@ -6901,14 +7028,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:570:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:571:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]), ("="));
}
;
/*_#I__L18*/ meltfnum[17] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:571:/ msend");
+ MELT_LOCATION ("warmelt-debug.melt:572:/ msend");
/*msend */
{
union meltparam_un argtab[2];
@@ -6929,19 +7056,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:572:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:573:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.OUT__V11*/ meltfptr[10]),
( /*_#DEPTH__L1*/ meltfnum[0]),
64);;
}
;
- MELT_LOCATION ("warmelt-debug.melt:566:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:567:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:565:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:566:/ clear");
/*clear *//*_.NAMED_NAME__V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_#I__L18*/ meltfnum[17] = 0;
@@ -6953,12 +7080,12 @@ lab_endgetargs:;
;
/*_#I__L19*/ meltfnum[17] =
(( /*_#IX__L7*/ meltfnum[6]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:574:/ compute");
+ MELT_LOCATION ("warmelt-debug.melt:575:/ compute");
/*_#IX__L7*/ meltfnum[6] = /*_#SETQ___L20*/ meltfnum[19] =
/*_#I__L19*/ meltfnum[17];;
/*_#LET___L17*/ meltfnum[15] = /*_#SETQ___L20*/ meltfnum[19];;
- MELT_LOCATION ("warmelt-debug.melt:562:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:563:/ clear");
/*clear *//*_.CURFLD__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.CURVAL__V19*/ meltfptr[18] = 0;
@@ -6968,7 +7095,7 @@ lab_endgetargs:;
/*clear *//*_#SETQ___L20*/ meltfnum[19] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:556:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:557:/ clear");
/*clear *//*_#I__L14*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_#I__L15*/ meltfnum[14] = 0;
@@ -6989,7 +7116,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[14] = /*_.FOREVER___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:555:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:556:/ clear");
/*clear *//*_.FOREVER___V16*/ meltfptr[15] = 0;
}
;
@@ -7004,7 +7131,7 @@ lab_endgetargs:;
/*_.LET___V8*/ meltfptr[6] = /*_.IF___V15*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-debug.melt:547:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:548:/ clear");
/*clear *//*_#NBF__L6*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.CLA__V9*/ meltfptr[8] = 0;
@@ -7028,11 +7155,11 @@ lab_endgetargs:;
/*clear *//*_#MELT_REALLY_NEED_DBGLIM__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V15*/ meltfptr[14] = 0;
- MELT_LOCATION ("warmelt-debug.melt:541:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:541:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -7122,7 +7249,7 @@ meltrout_13_warmelt_debug_DBGOUT_NULL_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:582:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:583:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7148,7 +7275,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:583:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:584:/ quasiblock");
/*^getslot */
@@ -7161,12 +7288,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:585:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:586:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V4*/ meltfptr[3]), ("()"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:583:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:584:/ clear");
/*clear *//*_.OUT__V4*/ meltfptr[3] = 0;
/*epilog */
}
@@ -7248,7 +7375,7 @@ meltrout_14_warmelt_debug_DBGOUT_STRING_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:590:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:591:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7276,7 +7403,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:591:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:592:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7285,7 +7412,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:591:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:592:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7293,7 +7420,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:591:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:592:/ cond.else");
/*^block */
/*anyblock */
@@ -7307,7 +7434,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (591) ? (591) : __LINE__, __FUNCTION__);
+ (592) ? (592) : __LINE__, __FUNCTION__);
;
}
;
@@ -7322,7 +7449,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:591:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:592:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -7333,12 +7460,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:592:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:593:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:593:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:594:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -7349,7 +7476,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_STRING */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:595:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:596:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7359,14 +7486,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:597:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:598:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" \""));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:598:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:599:/ locexp");
meltgc_add_strbuf_cstr ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
melt_string_str ((melt_ptr_t)
@@ -7376,12 +7503,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:599:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:600:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("\""));
}
;
- MELT_LOCATION ("warmelt-debug.melt:596:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:597:/ quasiblock");
/*epilog */
@@ -7390,7 +7517,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:595:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:596:/ cond.else");
/*^block */
/*anyblock */
@@ -7398,12 +7525,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:602:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:603:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:603:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:604:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -7422,14 +7549,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:604:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:605:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("\""));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:605:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:606:/ locexp");
meltgc_add_strbuf_cstr ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
melt_string_str ((melt_ptr_t)
@@ -7439,24 +7566,24 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:606:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:607:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("\""));
}
;
- MELT_LOCATION ("warmelt-debug.melt:601:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:602:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:595:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:596:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:592:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:593:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -7464,7 +7591,7 @@ lab_endgetargs:;
/*clear *//*_#__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:590:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:591:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -7485,7 +7612,538 @@ labend_rout:
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 9
+ long mcfr_varnum[9];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("DBGOUT_STRBUF_METHOD", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-debug.melt:613:/ getarg");
+ /*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.DBGI__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_LONG)
+ goto lab_endgetargs;
+ /*_#DEPTH__L1*/ meltfnum[0] = meltxargtab_[1].meltbp_long;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-debug.melt:614:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L2*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-debug.melt:614:/ cond");
+ /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:614:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check dbgi"),
+ ("warmelt-debug.melt")
+ ? ("warmelt-debug.melt") : __FILE__,
+ (614) ? (614) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:614:/ clear");
+ /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-debug.melt:615:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_STRBUF__L3*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])) ==
+ MELTOBMAG_STRBUF);;
+ MELT_LOCATION ("warmelt-debug.melt:615:/ cond");
+ /*cond */ if ( /*_#IS_STRBUF__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:615:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check self"),
+ ("warmelt-debug.melt")
+ ? ("warmelt-debug.melt") : __FILE__,
+ (615) ? (615) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:615:/ clear");
+ /*clear *//*_#IS_STRBUF__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:616:/ quasiblock");
+
+
+ /*_.DIS__V8*/ meltfptr[6] =
+ (melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-debug.melt:617:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V8*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V8*/ meltfptr[6]), 1, "NAMED_NAME");
+ /*_.DISNAME__V9*/
+ meltfptr[8] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.DISNAME__V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:618:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
+ /*_.SBUF__V10*/
+ meltfptr[9] = slot;
+ };
+ ;
+ /*_#ULEN__L4*/ meltfnum[1] =
+ melt_strbuf_usedlength ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]));;
+ /*^compute */
+
+ /*_#I__L5*/ meltfnum[4] =
+ (( /*_#ULEN__L4*/ meltfnum[1]) > (20));;
+ MELT_LOCATION ("warmelt-debug.melt:621:/ cond");
+ /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.SBUF__V10*/ meltfptr[9]),
+ ( /*_#DEPTH__L1*/ meltfnum[0]), 64);;
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:622:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring = "strbuf.";
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.DISNAME__V9*/ meltfptr[8];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "[ulen=";
+ /*^apply.arg */
+ argtab[3].meltbp_long = /*_#ULEN__L4*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[4].meltbp_cstring = "]<\"";
+ /*_.ADD2OUT__V11*/ meltfptr[10] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ADD2OUT */ meltfrout->tabval[2])),
+ (melt_ptr_t) ( /*_.SBUF__V10*/ meltfptr[9]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_#I__L6*/ meltfnum[5] =
+ (( /*_#DEPTH__L1*/ meltfnum[0]) <= (1));;
+ MELT_LOCATION ("warmelt-debug.melt:623:/ cond");
+ /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L7*/ meltfnum[6] =
+ (( /*_#ULEN__L4*/ meltfnum[1]) < (4000));;
+ MELT_LOCATION ("warmelt-debug.melt:625:/ cond");
+ /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:628:/ locexp");
+ /*OUTALLSTRBUFCHK__1 */ meltgc_add_out_cstr_len
+ ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ melt_strbuf_str ((melt_ptr_t) /*_.SELF__V2*/
+ meltfptr[1]),
+ (int) /*_#ULEN__L4*/ meltfnum[1]);
+ ;
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:625:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:637:/ locexp");
+ /*OUTBIGSLICSTRBUFCHK__1 */
+ const int startslice = 1000;
+ const int endslice = 2500;
+ gcc_assert (startslice + endslice <
+ (int) /*_#ULEN__L4*/ meltfnum[1] - 5);
+ meltgc_add_out_cstr_len ((melt_ptr_t) /*_.SBUF__V10*/
+ meltfptr[9],
+ melt_strbuf_str ((melt_ptr_t)
+ /*_.SELF__V2*/
+ meltfptr[1]),
+ startslice);
+ meltgc_out_printf ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ "\"\n ... %d bytes skipped\n ...\"",
+ (int) /*_#ULEN__L4*/ meltfnum[1] -
+ (startslice + endslice));
+ meltgc_add_out_cstr_len ((melt_ptr_t) /*_.SBUF__V10*/
+ meltfptr[9],
+ (melt_strbuf_str
+ ((melt_ptr_t) /*_.SELF__V2*/
+ meltfptr[1])) +
+ /*_#ULEN__L4*/ meltfnum[1] -
+ endslice,
+ endslice);
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:634:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:623:/ clear");
+ /*clear *//*_#I__L7*/ meltfnum[6] = 0;
+ }
+ ;
+ } /*noelse */
+ ;
+ /*_#I__L8*/ meltfnum[6] =
+ (( /*_#ULEN__L4*/ meltfnum[1]) < (1000));;
+ MELT_LOCATION ("warmelt-debug.melt:657:/ cond");
+ /*cond */ if ( /*_#I__L8*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:660:/ locexp");
+ /*OUTALLTINYSTRBUFCHK__1 */ meltgc_add_out_cstr_len
+ ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ melt_strbuf_str ((melt_ptr_t) /*_.SELF__V2*/ meltfptr[1]),
+ (int) /*_#ULEN__L4*/ meltfnum[1]);
+ ;
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:657:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:670:/ locexp");
+ /*+OUTTINYSLICSTRBUFCHK__1 */
+ const int startslice = 100;
+ const int endslice = 550;
+ gcc_assert (startslice + endslice <
+ (int) /*_#ULEN__L4*/ meltfnum[1] - 5);
+ meltgc_add_out_cstr_len ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ melt_strbuf_str ((melt_ptr_t)
+ /*_.SELF__V2*/
+ meltfptr[1]),
+ startslice);
+ meltgc_out_printf ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ "\"\n ... %d bytes skipped\n ...\"",
+ (int) /*_#ULEN__L4*/ meltfnum[1] -
+ (startslice + endslice));
+ meltgc_add_out_cstr_len ((melt_ptr_t) /*_.SBUF__V10*/ meltfptr[9],
+ (melt_strbuf_str
+ ((melt_ptr_t) /*_.SELF__V2*/
+ meltfptr[1])) +
+ /*_#ULEN__L4*/ meltfnum[1] - endslice,
+ endslice);
+ /*-OUTTINYSLICSTRBUFCHK__1*/
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:667:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:691:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring = "\">";
+ /*_.ADD2OUT__V12*/ meltfptr[11] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ADD2OUT */ meltfrout->tabval[2])),
+ (melt_ptr_t) ( /*_.SBUF__V10*/ meltfptr[9]),
+ (MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_#I__L9*/ meltfnum[8] =
+ (( /*_#ULEN__L4*/ meltfnum[1]) > (60));;
+ MELT_LOCATION ("warmelt-debug.melt:692:/ cond");
+ /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.SBUF__V10*/ meltfptr[9]),
+ ( /*_#DEPTH__L1*/ meltfnum[0]), 64);;
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-debug.melt:616:/ clear");
+ /*clear *//*_.DIS__V8*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.DISNAME__V9*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_.SBUF__V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_#ULEN__L4*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_#I__L5*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V11*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_#I__L6*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_#I__L8*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_#I__L9*/ meltfnum[8] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:613:/ clear");
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("DBGOUT_STRBUF_METHOD", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -7506,7 +8164,7 @@ meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD_st
+ struct frame_meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7545,7 +8203,7 @@ meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:612:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:700:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7573,7 +8231,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:613:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:701:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7582,7 +8240,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:613:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:701:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7590,7 +8248,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:613:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:701:/ cond.else");
/*^block */
/*anyblock */
@@ -7604,7 +8262,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (613) ? (613) : __LINE__, __FUNCTION__);
+ (701) ? (701) : __LINE__, __FUNCTION__);
;
}
;
@@ -7619,7 +8277,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:613:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:701:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -7630,12 +8288,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:614:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:702:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:615:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:703:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -7646,7 +8304,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_INTEGER */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:617:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:705:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7656,7 +8314,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:619:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:707:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" #"));
}
@@ -7665,17 +8323,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:620:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:708:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#GET_INT__L4*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:618:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:706:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:617:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:705:/ clear");
/*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0;
}
;
@@ -7689,12 +8347,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:622:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:710:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:623:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:711:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -7713,7 +8371,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:624:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:712:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("#"));
}
@@ -7722,17 +8380,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:625:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:713:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#GET_INT__L5*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:621:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:709:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:617:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:705:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_#GET_INT__L5*/ meltfnum[3] = 0;
@@ -7741,7 +8399,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-debug.melt:614:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:702:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -7749,7 +8407,7 @@ lab_endgetargs:;
/*clear *//*_#__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:612:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:700:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -7763,14 +8421,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD */
+} /*end meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -7791,7 +8449,7 @@ meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD_st
+ struct frame_meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7830,7 +8488,7 @@ meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:631:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:719:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7858,7 +8516,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:632:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:720:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7867,7 +8525,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:632:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:720:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7875,7 +8533,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:632:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:720:/ cond.else");
/*^block */
/*anyblock */
@@ -7889,7 +8547,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (632) ? (632) : __LINE__, __FUNCTION__);
+ (720) ? (720) : __LINE__, __FUNCTION__);
;
}
;
@@ -7904,7 +8562,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:632:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:720:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -7915,12 +8573,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:633:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:721:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:634:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:722:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -7931,7 +8589,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_MIXED_INTEGER */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:636:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:724:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7941,7 +8599,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:638:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:726:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" #["));
}
@@ -7950,17 +8608,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:639:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:727:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#GET_INT__L4*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:637:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:725:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:636:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:724:/ clear");
/*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0;
}
;
@@ -7974,12 +8632,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:641:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:729:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:642:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:730:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -7998,7 +8656,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:643:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:731:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("#["));
}
@@ -8007,17 +8665,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:644:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:732:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#GET_INT__L5*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:640:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:728:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:636:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:724:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_#GET_INT__L5*/ meltfnum[3] = 0;
@@ -8025,7 +8683,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:646:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:734:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -8041,7 +8699,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L6*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-debug.melt:646:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:734:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -8051,7 +8709,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:648:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:736:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(","));
}
@@ -8062,7 +8720,7 @@ lab_endgetargs:;
/*_#I__L8*/ meltfnum[7] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:649:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:737:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -8080,7 +8738,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:647:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:735:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[12] = /*_.DBG_OUT__V12*/ meltfptr[11];;
@@ -8089,7 +8747,7 @@ lab_endgetargs:;
/*_.IFELSE___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:646:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:734:/ clear");
/*clear *//*_.MIXINT_VAL__V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_#I__L8*/ meltfnum[7] = 0;
@@ -8111,7 +8769,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:651:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:739:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(",.."));
}
@@ -8124,12 +8782,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:653:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:741:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:633:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:721:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -8145,7 +8803,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:631:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:719:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -8159,14 +8817,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD */
+} /*end meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8187,7 +8845,7 @@ meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD_st
+ struct frame_meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8226,7 +8884,7 @@ meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:658:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:746:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8254,7 +8912,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:659:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:747:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8263,7 +8921,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:659:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:747:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8271,7 +8929,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:659:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:747:/ cond.else");
/*^block */
/*anyblock */
@@ -8285,7 +8943,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (659) ? (659) : __LINE__, __FUNCTION__);
+ (747) ? (747) : __LINE__, __FUNCTION__);
;
}
;
@@ -8300,7 +8958,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:659:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:747:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -8313,7 +8971,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:660:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:748:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8321,7 +8979,7 @@ lab_endgetargs:;
/*_#IS_MIXLOC__L3*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])) ==
MELTOBMAG_MIXLOC);;
- MELT_LOCATION ("warmelt-debug.melt:660:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:748:/ cond");
/*cond */ if ( /*_#IS_MIXLOC__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8329,7 +8987,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:660:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:748:/ cond.else");
/*^block */
/*anyblock */
@@ -8343,7 +9001,7 @@ lab_endgetargs:;
melt_assert_failed (("check self mixloc"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (660) ? (660) : __LINE__, __FUNCTION__);
+ (748) ? (748) : __LINE__, __FUNCTION__);
;
}
;
@@ -8358,7 +9016,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:660:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:748:/ clear");
/*clear *//*_#IS_MIXLOC__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -8369,12 +9027,12 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:661:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:749:/ quasiblock");
/*_.DIS__V8*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:662:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:750:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -8385,7 +9043,7 @@ lab_endgetargs:;
/*_#__L4*/ meltfnum[1] =
(( /*_.DIS__V8*/ meltfptr[6]) ==
(( /*!DISCR_MIXED_LOCATION */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:664:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:752:/ cond");
/*cond */ if ( /*_#__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8395,7 +9053,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:666:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:754:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(" #!["));
}
@@ -8404,17 +9062,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:667:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:755:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
( /*_#GET_INT__L5*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:665:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:753:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:664:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:752:/ clear");
/*clear *//*_#GET_INT__L5*/ meltfnum[4] = 0;
}
;
@@ -8428,12 +9086,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:669:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:757:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:670:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:758:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V8*/ meltfptr[6]), 1, "NAMED_NAME");
@@ -8452,7 +9110,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:671:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:759:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
("#!["));
}
@@ -8461,17 +9119,17 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:672:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:760:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
( /*_#GET_INT__L6*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:668:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:756:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:664:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:752:/ clear");
/*clear *//*_.NAMED_NAME__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_#GET_INT__L6*/ meltfnum[4] = 0;
@@ -8479,7 +9137,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:674:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:762:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -8495,7 +9153,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L7*/ meltfnum[4]));;
- MELT_LOCATION ("warmelt-debug.melt:674:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:762:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -8505,14 +9163,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:676:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:764:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(","));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:677:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:765:/ locexp");
/*add2sbufmixloc */
if (melt_magic_discr
((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])) ==
@@ -8533,7 +9191,7 @@ lab_endgetargs:;
} /*end add2sbufmixloc */ ;
}
;
- MELT_LOCATION ("warmelt-debug.melt:675:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:763:/ quasiblock");
/*epilog */
@@ -8542,7 +9200,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:674:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:762:/ cond.else");
/*^block */
/*anyblock */
@@ -8550,7 +9208,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:679:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:767:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(",.."));
}
@@ -8562,12 +9220,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:681:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:769:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]), ("]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:661:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:749:/ clear");
/*clear *//*_.DIS__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.SBUF__V9*/ meltfptr[8] = 0;
@@ -8581,7 +9239,7 @@ lab_endgetargs:;
/*clear *//*_#MELT_REALLY_NEED_DBGLIM__L8*/ meltfnum[7] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:658:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:746:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -8597,14 +9255,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD */
+} /*end meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
+meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -8626,7 +9284,7 @@ meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD_st
+ struct frame_meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8665,7 +9323,7 @@ meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:687:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:775:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8693,7 +9351,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:688:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:776:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8702,7 +9360,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:688:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:776:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8710,7 +9368,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:688:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:776:/ cond.else");
/*^block */
/*anyblock */
@@ -8724,7 +9382,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (688) ? (688) : __LINE__, __FUNCTION__);
+ (776) ? (776) : __LINE__, __FUNCTION__);
;
}
;
@@ -8739,7 +9397,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:688:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:776:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -8752,7 +9410,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:689:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:777:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8760,7 +9418,7 @@ lab_endgetargs:;
/*_#IS_MIXBIGINT__L3*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])) ==
MELTOBMAG_MIXBIGINT);;
- MELT_LOCATION ("warmelt-debug.melt:689:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:777:/ cond");
/*cond */ if ( /*_#IS_MIXBIGINT__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8768,7 +9426,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:689:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:777:/ cond.else");
/*^block */
/*anyblock */
@@ -8782,7 +9440,7 @@ lab_endgetargs:;
melt_assert_failed (("check self mixbigint"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (689) ? (689) : __LINE__, __FUNCTION__);
+ (777) ? (777) : __LINE__, __FUNCTION__);
;
}
;
@@ -8797,7 +9455,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:689:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:777:/ clear");
/*clear *//*_#IS_MIXBIGINT__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -8808,12 +9466,12 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:690:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:778:/ quasiblock");
/*_.DIS__V8*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:691:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:779:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -8823,11 +9481,11 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:693:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:781:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]), (" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:694:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:782:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V8*/ meltfptr[6]), 1, "NAMED_NAME");
@@ -8846,11 +9504,11 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:695:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:783:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]), ("#!["));
}
;
- MELT_LOCATION ("warmelt-debug.melt:696:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:784:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -8866,7 +9524,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L4*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-debug.melt:696:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:784:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -8880,7 +9538,7 @@ lab_endgetargs:;
/*_#I__L6*/ meltfnum[5] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:698:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:786:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -8901,7 +9559,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:699:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:787:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(","));
}
@@ -8910,18 +9568,18 @@ lab_endgetargs:;
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
{
- MELT_LOCATION ("warmelt-debug.melt:700:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:788:/ locexp");
meltgc_ppstrbuf_mixbigint ( /*_.SBUF__V9*/ meltfptr[8],
/*_#I__L7*/ meltfnum[6], /*_.SELF__V2*/
meltfptr[1]);;
}
;
- MELT_LOCATION ("warmelt-debug.melt:697:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:785:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:696:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:784:/ clear");
/*clear *//*_.MIXBIGINT_VAL__V12*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_#I__L6*/ meltfnum[5] = 0;
@@ -8941,7 +9599,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:702:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:790:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]),
(",.."));
}
@@ -8953,12 +9611,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:704:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:792:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V9*/ meltfptr[8]), ("]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:690:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:778:/ clear");
/*clear *//*_.DIS__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.SBUF__V9*/ meltfptr[8] = 0;
@@ -8972,7 +9630,7 @@ lab_endgetargs:;
/*clear *//*_#MELT_REALLY_NEED_DBGLIM__L5*/ meltfnum[4] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:687:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:775:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -8988,14 +9646,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD */
+} /*end meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
+meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -9017,7 +9675,7 @@ meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD_st
+ struct frame_meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9056,7 +9714,7 @@ meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:709:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9084,7 +9742,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:710:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:798:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9093,7 +9751,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:710:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:798:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9101,7 +9759,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:710:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:798:/ cond.else");
/*^block */
/*anyblock */
@@ -9115,7 +9773,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (710) ? (710) : __LINE__, __FUNCTION__);
+ (798) ? (798) : __LINE__, __FUNCTION__);
;
}
;
@@ -9130,7 +9788,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:710:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:798:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -9141,12 +9799,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:711:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:799:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:712:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:800:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -9157,7 +9815,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:714:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:802:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9167,7 +9825,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:715:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:803:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" *"));
}
@@ -9178,7 +9836,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:714:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:802:/ cond.else");
/*^block */
/*anyblock */
@@ -9186,12 +9844,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:717:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:805:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:718:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:806:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -9210,43 +9868,43 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:719:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:807:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("*"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:716:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:804:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:714:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:802:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:720:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:808:/ quasiblock");
/*_#LN__L4*/ meltfnum[3] =
(melt_multiple_length ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:721:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:809:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#LN__L4*/ meltfnum[3]));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:722:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:810:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("["));
}
;
/*_#I__L5*/ meltfnum[4] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:723:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:811:/ cond");
/*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -9254,7 +9912,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:723:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:811:/ cond.else");
/*^block */
/*anyblock */
@@ -9269,7 +9927,7 @@ lab_endgetargs:;
/*_#MELT_REALLY_NEED_DEBUG__L7*/ meltfnum[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:723:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:811:/ clear");
/*clear *//*_#MELT_REALLY_NEED_DEBUG__L7*/ meltfnum[6] = 0;
}
;
@@ -9302,14 +9960,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:727:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:815:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#DEPTH__L1*/ meltfnum[0]),
64);
}
;
- MELT_LOCATION ("warmelt-debug.melt:728:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:816:/ quasiblock");
/*_#CURULEN__L9*/ meltfnum[8] =
@@ -9319,7 +9977,7 @@ lab_endgetargs:;
/*_#I__L10*/ meltfnum[9] =
((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));;
- MELT_LOCATION ("warmelt-debug.melt:729:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:817:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9349,7 +10007,7 @@ lab_endgetargs:;
/*_#I__L13*/ meltfnum[12] =
(( /*_#I__L12*/ meltfnum[11]) > (100));;
- MELT_LOCATION ("warmelt-debug.melt:730:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:818:/ cond");
/*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -9364,7 +10022,7 @@ lab_endgetargs:;
/*_#I__L15*/ meltfnum[14] =
(( /*_#IX__L8*/ meltfnum[6]) <
( /*_#I__L14*/ meltfnum[13]));;
- MELT_LOCATION ("warmelt-debug.melt:730:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:818:/ cond");
/*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -9377,7 +10035,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-debug.melt:732:/ locexp");
+ ("warmelt-debug.melt:820:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V7*/
meltfptr[6]),
@@ -9387,7 +10045,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:730:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:818:/ clear");
/*clear *//*_#I__L16*/ meltfnum[15] = 0;
}
;
@@ -9404,7 +10062,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:728:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:816:/ clear");
/*clear *//*_#CURULEN__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_#I__L10*/ meltfnum[9] = 0;
@@ -9422,7 +10080,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-debug.melt:724:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:812:/ clear");
/*clear *//*_.CURCOMP__V9*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_#IX__L8*/ meltfnum[6] = 0;
@@ -9434,7 +10092,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:723:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:811:/ cond.else");
/*^block */
/*anyblock */
@@ -9442,7 +10100,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:734:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:822:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(".."));
}
@@ -9454,19 +10112,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:736:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:824:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:720:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:808:/ clear");
/*clear *//*_#LN__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_#I__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_#OR___L6*/ meltfnum[5] = 0;
- MELT_LOCATION ("warmelt-debug.melt:711:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:799:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -9474,7 +10132,7 @@ lab_endgetargs:;
/*clear *//*_#__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:709:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -9488,14 +10146,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD */
+} /*end meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9516,7 +10174,7 @@ meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD_st
+ struct frame_meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9555,7 +10213,7 @@ meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:742:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9583,7 +10241,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:743:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:831:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9592,7 +10250,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:743:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:831:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9600,7 +10258,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:743:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:831:/ cond.else");
/*^block */
/*anyblock */
@@ -9614,7 +10272,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (743) ? (743) : __LINE__, __FUNCTION__);
+ (831) ? (831) : __LINE__, __FUNCTION__);
;
}
;
@@ -9629,7 +10287,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:743:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:831:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -9640,12 +10298,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:744:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:832:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:745:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:833:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -9666,7 +10324,7 @@ lab_endgetargs:;
/*_#__L4*/ meltfnum[3] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_ROUTINE */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-debug.melt:748:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:836:/ cond");
/*cond */ if ( /*_#__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -9676,7 +10334,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:749:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:837:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" *rou[%"));
}
@@ -9687,7 +10345,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:748:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:836:/ cond.else");
/*^block */
/*anyblock */
@@ -9695,12 +10353,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:751:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:839:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:752:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:840:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -9719,17 +10377,17 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:753:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:841:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("[%"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:750:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:838:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:748:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:836:/ clear");
/*clear *//*_.NAMED_NAME__V9*/ meltfptr[8] = 0;
}
;
@@ -9737,7 +10395,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:754:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:842:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
melt_routine_descrstr ((melt_ptr_t)
( /*_.SELF__V2*/
@@ -9746,7 +10404,7 @@ lab_endgetargs:;
;
/*_#I__L5*/ meltfnum[4] =
(( /*_#DEPTH__L1*/ meltfnum[0]) < (2));;
- MELT_LOCATION ("warmelt-debug.melt:755:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:843:/ cond");
/*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -9754,7 +10412,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:757:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ quasiblock");
/*^newclosure */
@@ -9811,7 +10469,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V11*/ meltfptr[10] = /*_.LAMBDA___V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-debug.melt:756:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:844:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9830,7 +10488,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[8] = /*_.ROUTINE_EVERY__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:755:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:843:/ clear");
/*clear *//*_.LAMBDA___V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.ROUTINE_EVERY__V13*/ meltfptr[12] = 0;
@@ -9845,12 +10503,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:762:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:850:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("%]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:744:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:832:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -9866,7 +10524,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V10*/ meltfptr[8] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:742:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -9880,14 +10538,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD */
+} /*end meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
+meltrout_22_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9906,7 +10564,7 @@ meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_21_warmelt_debug_LAMBDA___1___st
+ struct frame_meltrout_22_warmelt_debug_LAMBDA___1___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9945,7 +10603,7 @@ meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:757:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ getarg");
/*_.COMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9966,7 +10624,7 @@ lab_endgetargs:;
((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[1]))));;
{
- MELT_LOCATION ("warmelt-debug.melt:758:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:846:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
(( /*~SBUF */ meltfclos->tabval[0])),
( /*_#GET_INT__L2*/ meltfnum[1]), 64);
@@ -9975,7 +10633,7 @@ lab_endgetargs:;
/*_#GET_INT__L3*/ meltfnum[2] =
(melt_get_int
((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[1]))));;
- MELT_LOCATION ("warmelt-debug.melt:759:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:847:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9993,11 +10651,11 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:757:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.DBG_OUT__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-debug.melt:757:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -10020,14 +10678,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_21_warmelt_debug_LAMBDA___1__ */
+} /*end meltrout_22_warmelt_debug_LAMBDA___1__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -10048,7 +10706,7 @@ meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD_st
+ struct frame_meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -10087,7 +10745,7 @@ meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:769:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10115,7 +10773,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:770:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:858:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10124,7 +10782,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:770:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:858:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10132,7 +10790,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:770:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:858:/ cond.else");
/*^block */
/*anyblock */
@@ -10146,7 +10804,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (770) ? (770) : __LINE__, __FUNCTION__);
+ (858) ? (858) : __LINE__, __FUNCTION__);
;
}
;
@@ -10161,7 +10819,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:770:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:858:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -10172,12 +10830,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:771:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:859:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:772:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:860:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -10187,7 +10845,7 @@ lab_endgetargs:;
;
/*_#OLDMAXDEPTH__L3*/ meltfnum[1] =
(melt_get_int ((melt_ptr_t) ( /*_.DBGI_MAXDEPTH__V7*/ meltfptr[6])));;
- MELT_LOCATION ("warmelt-debug.melt:773:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:861:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -10198,7 +10856,7 @@ lab_endgetargs:;
/*_#__L4*/ meltfnum[3] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_CLOSURE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:774:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:862:/ cond");
/*cond */ if ( /*_#__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -10208,7 +10866,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:775:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:863:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]),
(" *clo<"));
}
@@ -10219,7 +10877,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:774:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:862:/ cond.else");
/*^block */
/*anyblock */
@@ -10227,12 +10885,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:777:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:865:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:778:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:866:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -10251,23 +10909,23 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:779:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:867:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]),
("*clo<"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:776:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:864:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:774:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:862:/ clear");
/*clear *//*_.NAMED_NAME__V9*/ meltfptr[8] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:780:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:868:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -10284,7 +10942,7 @@ lab_endgetargs:;
;
/*_.CLOSURE_ROUTINE__V11*/ meltfptr[10] =
(melt_closure_routine ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:781:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:869:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -10301,7 +10959,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:782:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:870:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -10316,7 +10974,7 @@ lab_endgetargs:;
( /*_#OLDMAXDEPTH__L3*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:783:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:871:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -10332,7 +10990,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L5*/ meltfnum[4]));;
- MELT_LOCATION ("warmelt-debug.melt:783:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:871:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -10340,13 +10998,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:784:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:872:/ quasiblock");
/*_#IX__L7*/ meltfnum[6] = 0;;
{
- MELT_LOCATION ("warmelt-debug.melt:785:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:873:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]),
("/"));
}
@@ -10355,12 +11013,12 @@ lab_endgetargs:;
(melt_closure_size ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:786:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:874:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]),
( /*_#CLOSURE_SIZE__L8*/ meltfnum[7]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:787:/ loop");
+ MELT_LOCATION ("warmelt-debug.melt:875:/ loop");
/*loop */
{
labloop_OUTLOOP_1:; /*^loopbody */
@@ -10377,7 +11035,7 @@ lab_endgetargs:;
/*_#I__L10*/ meltfnum[9] =
(( /*_#IX__L7*/ meltfnum[6]) >=
( /*_#CLOSURE_SIZE__L9*/ meltfnum[8]));;
- MELT_LOCATION ("warmelt-debug.melt:788:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:876:/ cond");
/*cond */ if ( /*_#I__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -10385,7 +11043,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:789:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:877:/ quasiblock");
/*^compute */
@@ -10404,13 +11062,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:790:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:878:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V8*/ meltfptr[7]),
( /*_#DEPTH__L1*/ meltfnum[0]), 64);
}
;
- MELT_LOCATION ("warmelt-debug.melt:791:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:879:/ quasiblock");
/*_#CURULEN__L11*/ meltfnum[10] =
@@ -10426,7 +11084,7 @@ lab_endgetargs:;
/*_#I__L12*/ meltfnum[11] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:792:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:880:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -10457,7 +11115,7 @@ lab_endgetargs:;
/*_#I__L15*/ meltfnum[14] =
(( /*_#I__L14*/ meltfnum[13]) > (100));;
- MELT_LOCATION ("warmelt-debug.melt:793:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:881:/ cond");
/*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -10469,7 +11127,7 @@ lab_endgetargs:;
((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));;
{
- MELT_LOCATION ("warmelt-debug.melt:794:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:882:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V8*/ meltfptr[7]),
( /*_#I__L16*/ meltfnum[15]),
@@ -10478,14 +11136,14 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:793:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:881:/ clear");
/*clear *//*_#I__L16*/ meltfnum[15] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:791:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:879:/ clear");
/*clear *//*_#CURULEN__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.CLOSURE_NTH__V19*/ meltfptr[18] = 0;
@@ -10501,12 +11159,12 @@ lab_endgetargs:;
/*clear *//*_#I__L15*/ meltfnum[14] = 0;
/*_#I__L17*/ meltfnum[15] =
(( /*_#IX__L7*/ meltfnum[6]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:795:/ compute");
+ MELT_LOCATION ("warmelt-debug.melt:883:/ compute");
/*_#IX__L7*/ meltfnum[6] = /*_#SETQ___L18*/ meltfnum[10] =
/*_#I__L17*/ meltfnum[15];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:787:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:875:/ clear");
/*clear *//*_#CLOSURE_SIZE__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_#I__L10*/ meltfnum[9] = 0;
@@ -10528,7 +11186,7 @@ lab_endgetargs:;
/*_.LET___V16*/ meltfptr[15] = /*_.FOREVER___V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-debug.melt:784:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:872:/ clear");
/*clear *//*_#IX__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_#CLOSURE_SIZE__L8*/ meltfnum[7] = 0;
@@ -10537,7 +11195,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[14] = /*_.LET___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:783:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:871:/ clear");
/*clear *//*_.LET___V16*/ meltfptr[15] = 0;
}
;
@@ -10550,12 +11208,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:797:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:885:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V8*/ meltfptr[7]), (">"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:771:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:859:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.DBGI_MAXDEPTH__V7*/ meltfptr[6] = 0;
@@ -10583,7 +11241,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V15*/ meltfptr[14] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:769:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -10597,14 +11255,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD */
+} /*end meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -10625,7 +11283,7 @@ meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD_st
+ struct frame_meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -10664,7 +11322,7 @@ meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:805:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10692,7 +11350,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:806:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:894:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10701,7 +11359,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:806:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:894:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10709,7 +11367,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:806:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:894:/ cond.else");
/*^block */
/*anyblock */
@@ -10723,7 +11381,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (806) ? (806) : __LINE__, __FUNCTION__);
+ (894) ? (894) : __LINE__, __FUNCTION__);
;
}
;
@@ -10738,7 +11396,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:806:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:894:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -10749,12 +11407,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:807:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:895:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:808:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:896:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -10765,7 +11423,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_LIST */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:809:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:897:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10775,7 +11433,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:810:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:898:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" *li("));
}
@@ -10786,7 +11444,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:809:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:897:/ cond.else");
/*^block */
/*anyblock */
@@ -10794,12 +11452,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:812:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:900:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:813:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:901:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -10818,23 +11476,23 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:814:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:902:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("("));
}
;
- MELT_LOCATION ("warmelt-debug.melt:811:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:899:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:809:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:897:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:815:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:903:/ quasiblock");
/*_.CURPAIR__V9*/ meltfptr[7] =
@@ -10842,7 +11500,7 @@ lab_endgetargs:;
/*^compute */
/*_#IX__L4*/ meltfnum[3] = 0;;
- MELT_LOCATION ("warmelt-debug.melt:820:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:908:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -10858,7 +11516,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L5*/ meltfnum[4]));;
- MELT_LOCATION ("warmelt-debug.melt:820:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:908:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -10866,7 +11524,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:821:/ loop");
+ MELT_LOCATION ("warmelt-debug.melt:909:/ loop");
/*loop */
{
labloop_LISTLOOP_1:; /*^loopbody */
@@ -10877,7 +11535,7 @@ lab_endgetargs:;
/*_#I__L7*/ meltfnum[6] =
(( /*_#IX__L4*/ meltfnum[3]) > (300));;
- MELT_LOCATION ("warmelt-debug.melt:823:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:911:/ cond");
/*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -10887,13 +11545,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:825:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:913:/ locexp");
meltgc_add_strbuf ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
("..."));
}
;
- MELT_LOCATION ("warmelt-debug.melt:826:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:914:/ quasiblock");
/*^compute */
@@ -10905,7 +11563,7 @@ lab_endgetargs:;
goto labexit_LISTLOOP_1;
}
;
- MELT_LOCATION ("warmelt-debug.melt:824:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:912:/ quasiblock");
/*epilog */
@@ -10921,7 +11579,7 @@ lab_endgetargs:;
/*_#NOT__L9*/ meltfnum[8] =
(!( /*_#IS_PAIR__L8*/ meltfnum[7]));;
- MELT_LOCATION ("warmelt-debug.melt:827:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:915:/ cond");
/*cond */ if ( /*_#NOT__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -10948,13 +11606,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:828:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:916:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#DEPTH__L1*/ meltfnum[0]), 64);
}
;
- MELT_LOCATION ("warmelt-debug.melt:829:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:917:/ quasiblock");
/*_#CURULEN__L10*/ meltfnum[9] =
@@ -10969,7 +11627,7 @@ lab_endgetargs:;
/*_#I__L11*/ meltfnum[10] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:830:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:918:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -10991,12 +11649,12 @@ lab_endgetargs:;
/*_.PAIR_TAIL__V16*/ meltfptr[15] =
(melt_pair_tail
((melt_ptr_t) ( /*_.CURPAIR__V9*/ meltfptr[7])));;
- MELT_LOCATION ("warmelt-debug.melt:831:/ compute");
+ MELT_LOCATION ("warmelt-debug.melt:919:/ compute");
/*_.CURPAIR__V9*/ meltfptr[7] = /*_.SETQ___V17*/ meltfptr[16] =
/*_.PAIR_TAIL__V16*/ meltfptr[15];;
/*_#NULL__L12*/ meltfnum[11] =
(( /*_.CURPAIR__V9*/ meltfptr[7]) == NULL);;
- MELT_LOCATION ("warmelt-debug.melt:833:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:921:/ cond");
/*cond */ if ( /*_#NULL__L12*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -11004,7 +11662,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:834:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:922:/ quasiblock");
/*^compute */
@@ -11023,7 +11681,7 @@ lab_endgetargs:;
;
/*_#I__L13*/ meltfnum[12] =
(( /*_#IX__L4*/ meltfnum[3]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:835:/ compute");
+ MELT_LOCATION ("warmelt-debug.melt:923:/ compute");
/*_#IX__L4*/ meltfnum[3] = /*_#SETQ___L14*/ meltfnum[13] =
/*_#I__L13*/ meltfnum[12];;
/*_#STRBUF_USEDLENGTH__L15*/ meltfnum[14] =
@@ -11038,7 +11696,7 @@ lab_endgetargs:;
/*_#I__L17*/ meltfnum[16] =
(( /*_#I__L16*/ meltfnum[15]) > (100));;
- MELT_LOCATION ("warmelt-debug.melt:836:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:924:/ cond");
/*cond */ if ( /*_#I__L17*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -11050,7 +11708,7 @@ lab_endgetargs:;
((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));;
{
- MELT_LOCATION ("warmelt-debug.melt:837:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:925:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#I__L18*/ meltfnum[17]),
@@ -11059,14 +11717,14 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:836:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:924:/ clear");
/*clear *//*_#I__L18*/ meltfnum[17] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:829:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:917:/ clear");
/*clear *//*_#CURULEN__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.PAIR_HEAD__V14*/ meltfptr[13] = 0;
@@ -11092,7 +11750,7 @@ lab_endgetargs:;
/*clear *//*_#I__L17*/ meltfnum[16] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:821:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:909:/ clear");
/*clear *//*_#I__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_#IS_PAIR__L8*/ meltfnum[7] = 0;
@@ -11113,7 +11771,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = /*_.FOREVER___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:820:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:908:/ clear");
/*clear *//*_.FOREVER___V12*/ meltfptr[11] = 0;
}
;
@@ -11126,12 +11784,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:840:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:928:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), (")"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:815:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:903:/ clear");
/*clear *//*_.CURPAIR__V9*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_#IX__L4*/ meltfnum[3] = 0;
@@ -11144,7 +11802,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-debug.melt:807:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:895:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -11152,7 +11810,7 @@ lab_endgetargs:;
/*clear *//*_#__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:805:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -11166,14 +11824,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD */
+} /*end meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -11194,7 +11852,7 @@ meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD_st
+ struct frame_meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -11233,7 +11891,7 @@ meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:845:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -11261,7 +11919,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:846:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:934:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11270,7 +11928,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:846:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:934:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11278,7 +11936,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:846:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:934:/ cond.else");
/*^block */
/*anyblock */
@@ -11292,7 +11950,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (846) ? (846) : __LINE__, __FUNCTION__);
+ (934) ? (934) : __LINE__, __FUNCTION__);
;
}
;
@@ -11307,7 +11965,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:846:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:934:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -11318,12 +11976,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:847:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:935:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:848:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:936:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -11334,7 +11992,7 @@ lab_endgetargs:;
/*_#__L3*/ meltfnum[1] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_PAIR */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:849:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:937:/ cond");
/*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11344,7 +12002,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:850:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:938:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" *pa(."));
}
@@ -11355,7 +12013,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:849:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:937:/ cond.else");
/*^block */
/*anyblock */
@@ -11363,12 +12021,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:852:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:940:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:853:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:941:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -11387,23 +12045,23 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:854:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:942:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("(."));
}
;
- MELT_LOCATION ("warmelt-debug.melt:851:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:939:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:849:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:937:/ clear");
/*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:855:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:943:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -11419,7 +12077,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L4*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-debug.melt:855:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:943:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -11433,7 +12091,7 @@ lab_endgetargs:;
/*_#I__L6*/ meltfnum[5] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:857:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:945:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -11453,7 +12111,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:858:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:946:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#DEPTH__L1*/ meltfnum[0]), 64);
@@ -11465,7 +12123,7 @@ lab_endgetargs:;
/*_#I__L7*/ meltfnum[6] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:859:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:947:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -11483,7 +12141,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:856:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:944:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[14] = /*_.DBG_OUT__V14*/ meltfptr[13];;
@@ -11492,7 +12150,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = /*_.PROGN___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:855:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:943:/ clear");
/*clear *//*_.PAIR_HEAD__V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_#I__L6*/ meltfnum[5] = 0;
@@ -11517,12 +12175,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:860:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:948:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), (".)"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:847:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:935:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -11538,7 +12196,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:845:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -11552,14 +12210,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD */
+} /*end meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
+meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -11581,7 +12239,7 @@ meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD_st
+ struct frame_meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -11620,7 +12278,7 @@ meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:867:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -11648,7 +12306,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:868:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:956:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11657,7 +12315,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:868:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:956:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11665,7 +12323,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:868:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:956:/ cond.else");
/*^block */
/*anyblock */
@@ -11679,7 +12337,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (868) ? (868) : __LINE__, __FUNCTION__);
+ (956) ? (956) : __LINE__, __FUNCTION__);
;
}
;
@@ -11694,7 +12352,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:868:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:956:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -11705,13 +12363,18 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:869:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:957:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:870:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-debug.melt:958:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DBGI__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11736,14 +12399,14 @@ lab_endgetargs:;
((meltmapobjects_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:873:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:961:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L4*/ meltfnum[3] =
(melt_is_out ((melt_ptr_t) /*_.OUT__V7*/ meltfptr[6]));;
- MELT_LOCATION ("warmelt-debug.melt:873:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:961:/ cond");
/*cond */ if ( /*_#IS_OUT__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -11751,7 +12414,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:873:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:961:/ cond.else");
/*^block */
/*anyblock */
@@ -11765,7 +12428,7 @@ lab_endgetargs:;
melt_assert_failed (("check out at start"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (873) ? (873) : __LINE__, __FUNCTION__);
+ (961) ? (961) : __LINE__, __FUNCTION__);
;
}
;
@@ -11780,7 +12443,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[7] = /*_.IFELSE___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:873:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:961:/ clear");
/*clear *//*_#IS_OUT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
@@ -11796,7 +12459,7 @@ lab_endgetargs:;
/*_#__L5*/ meltfnum[3] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:874:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:962:/ cond");
/*cond */ if ( /*_#__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -11806,7 +12469,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:875:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:963:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
(" {"));
}
@@ -11817,7 +12480,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:874:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:962:/ cond.else");
/*^block */
/*anyblock */
@@ -11825,12 +12488,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:877:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:965:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:878:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:966:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -11849,16 +12512,16 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:879:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:967:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("{"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:876:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:964:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:874:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:962:/ clear");
/*clear *//*_.NAMED_NAME__V10*/ meltfptr[8] = 0;
}
;
@@ -11866,7 +12529,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:880:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:968:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("/"));
}
;
@@ -11875,14 +12538,14 @@ lab_endgetargs:;
((meltmapobjects_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:881:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:969:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
( /*_#MAPOBJECT_COUNT__L6*/ meltfnum[5]));
}
;
/*_#I__L7*/ meltfnum[6] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (2));;
- MELT_LOCATION ("warmelt-debug.melt:882:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:970:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -11898,7 +12561,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#I__L7*/ meltfnum[6],
(int) /*_#GET_INT__L8*/ meltfnum[7]));;
- MELT_LOCATION ("warmelt-debug.melt:882:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:970:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -11906,7 +12569,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:883:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:971:/ quasiblock");
/*_#I__L10*/ meltfnum[9] =
@@ -11931,7 +12594,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[3])),
( /*_#MAPCOUNT__L3*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-debug.melt:891:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:979:/ quasiblock");
/*^newclosure */
@@ -11973,7 +12636,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.TUPL__V16*/ meltfptr[15]);
;
/*_.LAMBDA___V17*/ meltfptr[16] = /*_.LAMBDA___V18*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-debug.melt:889:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:977:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11991,7 +12654,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:899:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:987:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11999,7 +12662,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L11*/ meltfnum[10] =
(melt_magic_discr ((melt_ptr_t) ( /*_.TUPL__V16*/ meltfptr[15]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-debug.melt:899:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:987:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -12007,7 +12670,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:899:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:987:/ cond.else");
/*^block */
/*anyblock */
@@ -12021,7 +12684,7 @@ lab_endgetargs:;
melt_assert_failed (("check tupl"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (899) ? (899) : __LINE__,
+ (987) ? (987) : __LINE__,
__FUNCTION__);
;
}
@@ -12037,7 +12700,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = /*_.IFELSE___V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:899:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:987:/ clear");
/*clear *//*_#IS_MULTIPLE__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
@@ -12048,10 +12711,10 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:901:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:989:/ quasiblock");
- MELT_LOCATION ("warmelt-debug.melt:904:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ quasiblock");
/*^newclosure */
@@ -12074,7 +12737,7 @@ lab_endgetargs:;
meltfrout->tabval[3])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:917:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1005:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12083,7 +12746,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.SORTUPL__V25*/ meltfptr[24])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-debug.melt:917:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1005:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -12091,7 +12754,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:917:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1005:/ cond.else");
/*^block */
/*anyblock */
@@ -12105,7 +12768,7 @@ lab_endgetargs:;
melt_assert_failed (("check sortupl"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (917) ? (917) : __LINE__,
+ (1005) ? (1005) : __LINE__,
__FUNCTION__);
;
}
@@ -12121,7 +12784,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = /*_.IFELSE___V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:917:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1005:/ clear");
/*clear *//*_#IS_MULTIPLE__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V27*/ meltfptr[26] = 0;
@@ -12132,7 +12795,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:920:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1008:/ quasiblock");
/*^newclosure */
@@ -12189,7 +12852,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]);
;
/*_.LAMBDA___V28*/ meltfptr[26] = /*_.LAMBDA___V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-debug.melt:918:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1006:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12208,7 +12871,7 @@ lab_endgetargs:;
/*_.LET___V22*/ meltfptr[20] =
/*_.MULTIPLE_EVERY__V30*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-debug.melt:901:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:989:/ clear");
/*clear *//*_.LAMBDA___V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.SORTUPL__V25*/ meltfptr[24] = 0;
@@ -12220,7 +12883,7 @@ lab_endgetargs:;
/*clear *//*_.MULTIPLE_EVERY__V30*/ meltfptr[29] = 0;
/*_.LET___V13*/ meltfptr[12] = /*_.LET___V22*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-debug.melt:883:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:971:/ clear");
/*clear *//*_#I__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.NEXTDEPTHBOX__V14*/ meltfptr[13] = 0;
@@ -12239,7 +12902,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = /*_.LET___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:882:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:970:/ clear");
/*clear *//*_.LET___V13*/ meltfptr[12] = 0;
}
;
@@ -12252,12 +12915,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:938:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1026:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("}"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:869:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:957:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.OUT__V7*/ meltfptr[6] = 0;
@@ -12281,7 +12944,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:867:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -12295,14 +12958,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD */
+} /*end meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
+meltrout_27_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12321,7 +12984,7 @@ meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_26_warmelt_debug_LAMBDA___2___st
+ struct frame_meltrout_27_warmelt_debug_LAMBDA___2___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12360,7 +13023,7 @@ meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:891:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:979:/ getarg");
/*_.AT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12379,7 +13042,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:892:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:980:/ quasiblock");
/*_#CURCOUNT__L1*/ meltfnum[0] =
@@ -12390,7 +13053,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[0])),
( /*_#CURCOUNT__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-debug.melt:893:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-debug.melt:981:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -12412,11 +13075,11 @@ lab_endgetargs:;
/*^putuple */
/*putupl#1 */
- melt_assertmsg ("putupl [:893] #1 checktup",
+ melt_assertmsg ("putupl [:981] #1 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:893] #1 checkoff",
+ melt_assertmsg ("putupl [:981] #1 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -12427,11 +13090,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#2 */
- melt_assertmsg ("putupl [:893] #2 checktup",
+ melt_assertmsg ("putupl [:981] #2 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:893] #2 checkoff",
+ melt_assertmsg ("putupl [:981] #2 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -12442,11 +13105,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#3 */
- melt_assertmsg ("putupl [:893] #3 checktup",
+ melt_assertmsg ("putupl [:981] #3 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:893] #3 checkoff",
+ melt_assertmsg ("putupl [:981] #3 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -12461,7 +13124,7 @@ lab_endgetargs:;
/*_.ENT__V5*/ meltfptr[4] = /*_.TUPLREC___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:893:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:981:/ clear");
/*clear *//*_.TUPLREC___V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V6*/ meltfptr[5] = 0;
@@ -12469,7 +13132,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:896:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:984:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
(( /*~TUPL */ meltfclos->tabval[1])),
( /*_#CURCOUNT__L1*/ meltfnum[0]),
@@ -12480,13 +13143,13 @@ lab_endgetargs:;
(( /*_#CURCOUNT__L1*/ meltfnum[0]) + (1));;
{
- MELT_LOCATION ("warmelt-debug.melt:897:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:985:/ locexp");
melt_put_int ((melt_ptr_t) (( /*~COUNTBOX */ meltfclos->tabval[0])),
( /*_#I__L2*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:892:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:980:/ clear");
/*clear *//*_#CURCOUNT__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V4*/ meltfptr[3] = 0;
@@ -12507,14 +13170,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_26_warmelt_debug_LAMBDA___2__ */
+} /*end meltrout_27_warmelt_debug_LAMBDA___2__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
+meltrout_28_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12533,7 +13196,7 @@ meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_27_warmelt_debug_LAMBDA___3___st
+ struct frame_meltrout_28_warmelt_debug_LAMBDA___3___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12572,7 +13235,7 @@ meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:904:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ getarg");
/*_.E1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12591,7 +13254,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:905:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:993:/ quasiblock");
/*_.E1AT__V5*/ meltfptr[4] =
@@ -12616,7 +13279,7 @@ lab_endgetargs:;
/*_.E2RK__V10*/ meltfptr[9] =
(melt_multiple_nth ((melt_ptr_t) ( /*_.E2__V3*/ meltfptr[2]), (2)));;
- MELT_LOCATION ("warmelt-debug.melt:912:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1000:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -12647,7 +13310,7 @@ lab_endgetargs:;
;
/*_.LET___V4*/ meltfptr[3] = /*_.COMPARE_OBJ_RANKED__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-debug.melt:905:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:993:/ clear");
/*clear *//*_.E1AT__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.E1VA__V6*/ meltfptr[5] = 0;
@@ -12661,11 +13324,11 @@ lab_endgetargs:;
/*clear *//*_.E2RK__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.COMPARE_OBJ_RANKED__V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-debug.melt:904:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-debug.melt:904:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12684,14 +13347,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_27_warmelt_debug_LAMBDA___3__ */
+} /*end meltrout_28_warmelt_debug_LAMBDA___3__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
+meltrout_29_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12710,7 +13373,7 @@ meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_28_warmelt_debug_LAMBDA___4___st
+ struct frame_meltrout_29_warmelt_debug_LAMBDA___4___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12749,7 +13412,7 @@ meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:920:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1008:/ getarg");
/*_.EL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12765,7 +13428,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:921:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1009:/ quasiblock");
/*_.ELAT__V3*/ meltfptr[2] =
@@ -12774,13 +13437,13 @@ lab_endgetargs:;
/*_.ELVA__V4*/ meltfptr[3] =
(melt_multiple_nth ((melt_ptr_t) ( /*_.EL__V2*/ meltfptr[1]), (1)));;
- MELT_LOCATION ("warmelt-debug.melt:923:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1011:/ quasiblock");
/*_#NEXTDEPTH__L2*/ meltfnum[1] =
(melt_get_int
((melt_ptr_t) (( /*~NEXTDEPTHBOX */ meltfclos->tabval[0]))));;
- MELT_LOCATION ("warmelt-debug.melt:924:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1012:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*~DBGI */ meltfclos->tabval[1])), 2, "DBGI_MAXDEPTH");
@@ -12792,14 +13455,14 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.DBGI_MAXDEPTH__V5*/ meltfptr[4])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:927:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1015:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L4*/ meltfnum[3] =
(melt_is_out ((melt_ptr_t) ( /*~OUT */ meltfclos->tabval[2])));;
- MELT_LOCATION ("warmelt-debug.melt:927:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1015:/ cond");
/*cond */ if ( /*_#IS_OUT__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -12807,7 +13470,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:927:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1015:/ cond.else");
/*^block */
/*anyblock */
@@ -12821,7 +13484,7 @@ lab_endgetargs:;
melt_assert_failed (("check out"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (927) ? (927) : __LINE__, __FUNCTION__);
+ (1015) ? (1015) : __LINE__, __FUNCTION__);
;
}
;
@@ -12836,7 +13499,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:927:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1015:/ clear");
/*clear *//*_#IS_OUT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -12849,19 +13512,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:928:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1016:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) (( /*~OUT */ meltfclos->tabval[2])),
( /*_#NEXTDEPTH__L2*/ meltfnum[1]), 0);;
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:929:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1017:/ locexp");
meltgc_add_out ((melt_ptr_t) (( /*~OUT */ meltfclos->tabval[2])),
("**"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:930:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1018:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*~DBGI */ meltfclos->tabval[1])), 2, "DBGI_MAXDEPTH");
@@ -12875,7 +13538,7 @@ lab_endgetargs:;
melt_put_int ((melt_ptr_t) ( /*_.DBGI_MAXDEPTH__V8*/ meltfptr[6]), (0));
}
;
- MELT_LOCATION ("warmelt-debug.melt:931:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1019:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12893,7 +13556,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:932:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1020:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*~DBGI */ meltfclos->tabval[1])), 2, "DBGI_MAXDEPTH");
@@ -12910,7 +13573,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:933:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1021:/ locexp");
meltgc_add_out ((melt_ptr_t) (( /*~OUT */ meltfclos->tabval[2])),
(" =="));
}
@@ -12919,14 +13582,14 @@ lab_endgetargs:;
(( /*_#NEXTDEPTH__L2*/ meltfnum[1]) + (1));;
{
- MELT_LOCATION ("warmelt-debug.melt:934:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1022:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) (( /*~OUT */ meltfclos->tabval[2])),
( /*_#I__L5*/ meltfnum[3]), 64);;
}
;
/*_#I__L6*/ meltfnum[5] =
(( /*_#NEXTDEPTH__L2*/ meltfnum[1]) + (2));;
- MELT_LOCATION ("warmelt-debug.melt:935:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1023:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12946,13 +13609,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:936:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1024:/ locexp");
meltgc_add_out ((melt_ptr_t) (( /*~OUT */ meltfclos->tabval[2])),
("; "));
}
;
- MELT_LOCATION ("warmelt-debug.melt:923:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1011:/ clear");
/*clear *//*_#NEXTDEPTH__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.DBGI_MAXDEPTH__V5*/ meltfptr[4] = 0;
@@ -12973,7 +13636,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.DBG_OUT__V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-debug.melt:921:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1009:/ clear");
/*clear *//*_.ELAT__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.ELVA__V4*/ meltfptr[3] = 0;
@@ -12990,14 +13653,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_28_warmelt_debug_LAMBDA___4__ */
+} /*end meltrout_29_warmelt_debug_LAMBDA___4__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
+meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -13019,7 +13682,7 @@ meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD_st
+ struct frame_meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13058,7 +13721,7 @@ meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:943:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13086,7 +13749,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:944:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1032:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13095,7 +13758,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:944:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1032:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13103,7 +13766,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:944:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1032:/ cond.else");
/*^block */
/*anyblock */
@@ -13117,7 +13780,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (944) ? (944) : __LINE__, __FUNCTION__);
+ (1032) ? (1032) : __LINE__, __FUNCTION__);
;
}
;
@@ -13132,7 +13795,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:944:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1032:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -13143,12 +13806,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:945:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1033:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:946:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1034:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -13189,7 +13852,7 @@ lab_endgetargs:;
/*_#__L6*/ meltfnum[5] =
(( /*_.DIS__V6*/ meltfptr[4]) ==
(( /*!DISCR_MAP_STRINGS */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-debug.melt:953:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1041:/ cond");
/*cond */ if ( /*_#__L6*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -13199,7 +13862,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:954:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1042:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" <("));
}
@@ -13210,7 +13873,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:953:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1041:/ cond.else");
/*^block */
/*anyblock */
@@ -13218,12 +13881,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:956:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1044:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
(" |"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:957:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1045:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -13242,17 +13905,17 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:958:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1046:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("<("));
}
;
- MELT_LOCATION ("warmelt-debug.melt:955:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1043:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:953:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1041:/ clear");
/*clear *//*_.NAMED_NAME__V11*/ meltfptr[10] = 0;
}
;
@@ -13260,13 +13923,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:959:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1047:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("/"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:960:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1048:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#MAPCOUNT__L4*/ meltfnum[3]));
}
@@ -13278,7 +13941,7 @@ lab_endgetargs:;
/*_#MELT_REALLY_NEED_DEBUG__L8*/ meltfnum[7] =
/*MELT_REALLY_NEED_DEBUG */
(melt_need_debug ((int) /*_#I__L7*/ meltfnum[6]));;
- MELT_LOCATION ("warmelt-debug.melt:961:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1049:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DEBUG__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -13286,7 +13949,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:966:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1054:/ quasiblock");
/*^newclosure */
@@ -13328,7 +13991,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.TUPL__V10*/ meltfptr[9]);
;
/*_.LAMBDA___V13*/ meltfptr[12] = /*_.LAMBDA___V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-debug.melt:964:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1052:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -13344,10 +14007,10 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:975:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1063:/ quasiblock");
- MELT_LOCATION ("warmelt-debug.melt:978:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ quasiblock");
/*^newclosure */
@@ -13369,7 +14032,7 @@ lab_endgetargs:;
meltfrout->tabval[2])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:991:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1079:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13378,7 +14041,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.SORTUPL__V19*/ meltfptr[18])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-debug.melt:991:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1079:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -13386,7 +14049,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:991:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1079:/ cond.else");
/*^block */
/*anyblock */
@@ -13400,7 +14063,7 @@ lab_endgetargs:;
melt_assert_failed (("check sortupl"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (991) ? (991) : __LINE__,
+ (1079) ? (1079) : __LINE__,
__FUNCTION__);
;
}
@@ -13416,7 +14079,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = /*_.IFELSE___V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:991:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1079:/ clear");
/*clear *//*_#IS_MULTIPLE__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
@@ -13427,7 +14090,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:994:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ quasiblock");
/*^newclosure */
@@ -13484,7 +14147,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V22*/ meltfptr[20] = /*_.LAMBDA___V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-debug.melt:992:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1080:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -13503,7 +14166,7 @@ lab_endgetargs:;
/*_.LET___V16*/ meltfptr[15] =
/*_.MULTIPLE_EVERY__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-debug.melt:975:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1063:/ clear");
/*clear *//*_.LAMBDA___V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.SORTUPL__V19*/ meltfptr[18] = 0;
@@ -13513,7 +14176,7 @@ lab_endgetargs:;
/*clear *//*_.LAMBDA___V22*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.MULTIPLE_EVERY__V24*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-debug.melt:962:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1050:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[16] = /*_.LET___V16*/ meltfptr[15];;
@@ -13522,7 +14185,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[10] = /*_.PROGN___V25*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:961:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1049:/ clear");
/*clear *//*_.LAMBDA___V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.MAPSTRING_EVERY__V15*/ meltfptr[14] = 0;
@@ -13541,12 +14204,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1008:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1096:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), (" )>"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:945:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1033:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -13572,7 +14235,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V12*/ meltfptr[10] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:943:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -13586,14 +14249,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD */
+} /*end meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
+meltrout_31_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -13612,7 +14275,7 @@ meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_30_warmelt_debug_LAMBDA___5___st
+ struct frame_meltrout_31_warmelt_debug_LAMBDA___5___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13651,7 +14314,7 @@ meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:966:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1054:/ getarg");
/*_.STR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13670,7 +14333,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:967:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1055:/ quasiblock");
/*_#CURCOUNT__L1*/ meltfnum[0] =
@@ -13681,7 +14344,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[0])),
( /*_#CURCOUNT__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-debug.melt:968:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-debug.melt:1056:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -13703,11 +14366,11 @@ lab_endgetargs:;
/*^putuple */
/*putupl#4 */
- melt_assertmsg ("putupl [:968] #4 checktup",
+ melt_assertmsg ("putupl [:1056] #4 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:968] #4 checkoff",
+ melt_assertmsg ("putupl [:1056] #4 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -13718,11 +14381,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#5 */
- melt_assertmsg ("putupl [:968] #5 checktup",
+ melt_assertmsg ("putupl [:1056] #5 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:968] #5 checkoff",
+ melt_assertmsg ("putupl [:1056] #5 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -13733,11 +14396,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#6 */
- melt_assertmsg ("putupl [:968] #6 checktup",
+ melt_assertmsg ("putupl [:1056] #6 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V6*/ meltfptr[5])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:968] #6 checkoff",
+ melt_assertmsg ("putupl [:1056] #6 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -13752,7 +14415,7 @@ lab_endgetargs:;
/*_.ENT__V5*/ meltfptr[4] = /*_.TUPLREC___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:968:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1056:/ clear");
/*clear *//*_.TUPLREC___V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V6*/ meltfptr[5] = 0;
@@ -13760,7 +14423,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:971:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1059:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
(( /*~TUPL */ meltfclos->tabval[1])),
( /*_#CURCOUNT__L1*/ meltfnum[0]),
@@ -13771,13 +14434,13 @@ lab_endgetargs:;
(( /*_#CURCOUNT__L1*/ meltfnum[0]) + (1));;
{
- MELT_LOCATION ("warmelt-debug.melt:972:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1060:/ locexp");
melt_put_int ((melt_ptr_t) (( /*~COUNTBOX */ meltfclos->tabval[0])),
( /*_#I__L2*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:967:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1055:/ clear");
/*clear *//*_#CURCOUNT__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V4*/ meltfptr[3] = 0;
@@ -13798,14 +14461,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_30_warmelt_debug_LAMBDA___5__ */
+} /*end meltrout_31_warmelt_debug_LAMBDA___5__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
+meltrout_32_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -13824,7 +14487,7 @@ meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_31_warmelt_debug_LAMBDA___6___st
+ struct frame_meltrout_32_warmelt_debug_LAMBDA___6___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13863,7 +14526,7 @@ meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:978:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ getarg");
/*_.E1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13882,7 +14545,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:979:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1067:/ quasiblock");
/*_.E1AT__V5*/ meltfptr[4] =
@@ -13907,7 +14570,7 @@ lab_endgetargs:;
/*_.E2RK__V10*/ meltfptr[9] =
(melt_multiple_nth ((melt_ptr_t) ( /*_.E2__V3*/ meltfptr[2]), (2)));;
- MELT_LOCATION ("warmelt-debug.melt:986:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1074:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -13938,7 +14601,7 @@ lab_endgetargs:;
;
/*_.LET___V4*/ meltfptr[3] = /*_.COMPARE_OBJ_RANKED__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-debug.melt:979:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1067:/ clear");
/*clear *//*_.E1AT__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.E1VA__V6*/ meltfptr[5] = 0;
@@ -13952,11 +14615,11 @@ lab_endgetargs:;
/*clear *//*_.E2RK__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.COMPARE_OBJ_RANKED__V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-debug.melt:978:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-debug.melt:978:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13975,14 +14638,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_31_warmelt_debug_LAMBDA___6__ */
+} /*end meltrout_32_warmelt_debug_LAMBDA___6__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
+meltrout_33_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14001,7 +14664,7 @@ meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_32_warmelt_debug_LAMBDA___7___st
+ struct frame_meltrout_33_warmelt_debug_LAMBDA___7___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14040,7 +14703,7 @@ meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:994:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ getarg");
/*_.EL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14056,7 +14719,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:995:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1083:/ quasiblock");
/*_.CURSTR__V4*/ meltfptr[3] =
@@ -14075,7 +14738,7 @@ lab_endgetargs:;
/*_#IS_STRING__L3*/ meltfnum[2] =
(melt_magic_discr ((melt_ptr_t) ( /*_.CURSTR__V4*/ meltfptr[3])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-debug.melt:999:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1087:/ cond");
/*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -14090,7 +14753,7 @@ lab_endgetargs:;
/*_#IF___L4*/ meltfnum[3] = /*_#NOTNULL__L5*/ meltfnum[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:999:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1087:/ clear");
/*clear *//*_#NOTNULL__L5*/ meltfnum[4] = 0;
}
;
@@ -14101,7 +14764,7 @@ lab_endgetargs:;
/*_#IF___L4*/ meltfnum[3] = 0;;
}
;
- MELT_LOCATION ("warmelt-debug.melt:999:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1087:/ cond");
/*cond */ if ( /*_#IF___L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -14111,7 +14774,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1001:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1089:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
(( /*~SBUF */ meltfclos->tabval[1])),
( /*_#NEXTDEPTH__L2*/ meltfnum[1]), 0);
@@ -14119,12 +14782,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1002:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1090:/ locexp");
meltgc_add_strbuf ((melt_ptr_t)
(( /*~SBUF */ meltfclos->tabval[1])), ("!*"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1003:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1091:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -14144,7 +14807,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1004:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1092:/ locexp");
meltgc_add_strbuf ((melt_ptr_t)
(( /*~SBUF */ meltfclos->tabval[1])),
(" => "));
@@ -14152,7 +14815,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1005:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1093:/ locexp");
meltgc_strbuf_add_indent ((melt_ptr_t)
(( /*~SBUF */ meltfclos->tabval[1])),
( /*_#NEXTDEPTH__L2*/ meltfnum[1]), 64);
@@ -14160,7 +14823,7 @@ lab_endgetargs:;
;
/*_#I__L6*/ meltfnum[4] =
(( /*_#NEXTDEPTH__L2*/ meltfnum[1]) + (2));;
- MELT_LOCATION ("warmelt-debug.melt:1006:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1094:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -14178,7 +14841,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:1000:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1088:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[8] = /*_.DBG_OUT__V8*/ meltfptr[7];;
@@ -14187,7 +14850,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:999:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1087:/ clear");
/*clear *//*_.DBG_OUT__V7*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_#I__L6*/ meltfnum[4] = 0;
@@ -14208,7 +14871,7 @@ lab_endgetargs:;
/*_.LET___V3*/ meltfptr[2] = /*_.IF___V6*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-debug.melt:995:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1083:/ clear");
/*clear *//*_.CURSTR__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.CURVAL__V5*/ meltfptr[4] = 0;
@@ -14220,11 +14883,11 @@ lab_endgetargs:;
/*clear *//*_#IF___L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
- MELT_LOCATION ("warmelt-debug.melt:994:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-debug.melt:994:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14243,14 +14906,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_32_warmelt_debug_LAMBDA___7__ */
+} /*end meltrout_33_warmelt_debug_LAMBDA___7__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -14272,7 +14935,7 @@ meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD_st
+ struct frame_meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14311,7 +14974,7 @@ meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1013:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1101:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14339,7 +15002,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1014:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1102:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14348,7 +15011,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1014:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1102:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14356,7 +15019,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1014:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1102:/ cond.else");
/*^block */
/*anyblock */
@@ -14370,7 +15033,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1014) ? (1014) : __LINE__, __FUNCTION__);
+ (1102) ? (1102) : __LINE__, __FUNCTION__);
;
}
;
@@ -14385,7 +15048,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1014:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1102:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -14396,12 +15059,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1015:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1103:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1016:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1104:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -14411,11 +15074,11 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1017:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1105:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("|"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1018:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1106:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -14434,7 +15097,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1019:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1107:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("/"));
}
;
@@ -14442,17 +15105,17 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1020:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1108:/ locexp");
meltgc_add_strbuf_hex ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#OBJ_HASH__L3*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1021:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1109:/ quasiblock");
/*_#ONUM__L4*/ meltfnum[3] =
(melt_obj_num ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1023:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1111:/ cond");
/*cond */ if ( /*_#ONUM__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -14462,19 +15125,19 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1025:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1113:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("#"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1026:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1114:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#ONUM__L4*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1024:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1112:/ quasiblock");
/*epilog */
@@ -14483,11 +15146,11 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1021:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1109:/ clear");
/*clear *//*_#ONUM__L4*/ meltfnum[3] = 0;
/*_#I__L5*/ meltfnum[3] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:1029:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1117:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -14503,7 +15166,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#I__L5*/ meltfnum[3],
(int) /*_#GET_INT__L6*/ meltfnum[5]));;
- MELT_LOCATION ("warmelt-debug.melt:1028:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1116:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -14513,14 +15176,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1031:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1119:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("{"));
}
;
/*_#I__L8*/ meltfnum[7] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:1032:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1120:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -14545,17 +15208,17 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1033:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1121:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("}"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1030:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1118:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1028:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1116:/ clear");
/*clear *//*_#I__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.DBGOUT_FIELDS__V10*/ meltfptr[9] = 0;
@@ -14564,7 +15227,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1015:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1103:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -14582,7 +15245,7 @@ lab_endgetargs:;
/*clear *//*_#MELT_REALLY_NEED_DBGLIM__L7*/ meltfnum[6] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1013:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1101:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -14596,14 +15259,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD */
+} /*end meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14624,7 +15287,7 @@ meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD_st
+ struct frame_meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14663,7 +15326,7 @@ meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1039:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1127:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14691,7 +15354,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1040:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1128:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14700,7 +15363,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1040:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1128:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14708,7 +15371,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1040:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1128:/ cond.else");
/*^block */
/*anyblock */
@@ -14722,7 +15385,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1040) ? (1040) : __LINE__, __FUNCTION__);
+ (1128) ? (1128) : __LINE__, __FUNCTION__);
;
}
;
@@ -14737,7 +15400,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1040:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1128:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -14748,12 +15411,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1041:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1129:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1042:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1130:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -14763,7 +15426,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1043:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1131:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), (" ?."));
}
;
@@ -14771,7 +15434,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1044:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1132:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14806,12 +15469,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1045:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1133:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), (".? "));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1041:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1129:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -14819,7 +15482,7 @@ lab_endgetargs:;
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1039:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1127:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -14833,14 +15496,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD */
+} /*end meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -14865,7 +15528,7 @@ meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD_st
+ struct frame_meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14904,7 +15567,7 @@ meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1050:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1138:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14932,7 +15595,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1051:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1139:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14941,7 +15604,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1051:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1139:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14949,7 +15612,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1051:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1139:/ cond.else");
/*^block */
/*anyblock */
@@ -14963,7 +15626,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1051) ? (1051) : __LINE__, __FUNCTION__);
+ (1139) ? (1139) : __LINE__, __FUNCTION__);
;
}
;
@@ -14978,7 +15641,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1051:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1139:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -14989,12 +15652,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1052:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1140:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1053:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1141:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -15006,11 +15669,11 @@ lab_endgetargs:;
(melt_obj_num ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1056:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1144:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("^^|"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1057:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1145:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -15029,7 +15692,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1058:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1146:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]), ("/"));
}
;
@@ -15037,12 +15700,12 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1059:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1147:/ locexp");
meltgc_add_strbuf_hex ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#OBJ_HASH__L4*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1060:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1148:/ cond");
/*cond */ if ( /*_#ONUM__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15052,19 +15715,19 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1062:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1150:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
("#"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1063:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1151:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V7*/ meltfptr[6]),
( /*_#ONUM__L3*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1061:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1149:/ quasiblock");
/*epilog */
@@ -15073,7 +15736,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1052:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1140:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.SBUF__V7*/ meltfptr[6] = 0;
@@ -15085,7 +15748,7 @@ lab_endgetargs:;
/*clear *//*_#OBJ_HASH__L4*/ meltfnum[3] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1050:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1138:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -15099,511 +15762,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 17
- void *mcfr_varptr[17];
-#define MELTFRAM_NBVARNUM 9
- long mcfr_varnum[9];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 17; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 17;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("DBGOUT_NAMEDOBJECT_METHOD", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1068:/ getarg");
- /*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.DBGI__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_LONG)
- goto lab_endgetargs;
- /*_#DEPTH__L1*/ meltfnum[0] = meltxargtab_[1].meltbp_long;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1069:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L2*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1069:/ cond");
- /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-debug.melt:1069:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check dbgi"),
- ("warmelt-debug.melt")
- ? ("warmelt-debug.melt") : __FILE__,
- (1069) ? (1069) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-debug.melt:1069:/ clear");
- /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-debug.melt:1070:/ quasiblock");
-
-
- /*_.DIS__V6*/ meltfptr[4] =
- (melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1071:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
- /*_.OUT__V7*/
- meltfptr[6] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-debug.melt:1072:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
- /*_.ONAM__V8*/
- meltfptr[7] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-debug.melt:1073:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 0, "PROP_TABLE");
- /*_.OPROP__V9*/
- meltfptr[8] = slot;
- };
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1075:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_OUT__L3*/ meltfnum[1] =
- (melt_is_out ((melt_ptr_t) /*_.OUT__V7*/ meltfptr[6]));;
- MELT_LOCATION ("warmelt-debug.melt:1075:/ cond");
- /*cond */ if ( /*_#IS_OUT__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-debug.melt:1075:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check out"),
- ("warmelt-debug.melt")
- ? ("warmelt-debug.melt") : __FILE__,
- (1075) ? (1075) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-debug.melt:1075:/ clear");
- /*clear *//*_#IS_OUT__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1076:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("`"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1077:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
- melt_string_str ((melt_ptr_t)
- ( /*_.ONAM__V8*/ meltfptr[7])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1078:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("|"));
- }
- ;
- MELT_LOCATION ("warmelt-debug.melt:1079:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V12*/
- meltfptr[10] = slot;
- };
- ;
-
- {
- /*^locexp */
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V12*/
- meltfptr[10])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1080:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("/"));
- }
- ;
- /*_#OBJ_HASH__L4*/ meltfnum[1] =
- (melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1081:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
- ( /*_#OBJ_HASH__L4*/ meltfnum[1]));
- }
- ;
- MELT_LOCATION ("warmelt-debug.melt:1082:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
- /*_.DBGI_MAXDEPTH__V13*/
- meltfptr[12] = slot;
- };
- ;
- /*_#GET_INT__L5*/ meltfnum[4] =
- (melt_get_int ((melt_ptr_t) ( /*_.DBGI_MAXDEPTH__V13*/ meltfptr[12])));;
- /*^compute */
-
- /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5] =
- ( /*MELT_REALLY_NEED_DBGLIM */
- melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
- (int) /*_#GET_INT__L5*/ meltfnum[4]));;
- MELT_LOCATION ("warmelt-debug.melt:1082:/ cond");
- /*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-debug.melt:1083:/ quasiblock");
-
-
- /*_#ONUM__L7*/ meltfnum[6] =
- (melt_obj_num ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1085:/ cond");
- /*cond */ if ( /*_#ONUM__L7*/ meltfnum[6]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1087:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
- ("#"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1088:/ locexp");
- meltgc_add_out_dec ((melt_ptr_t)
- ( /*_.OUT__V7*/ meltfptr[6]),
- ( /*_#ONUM__L7*/ meltfnum[6]));
- }
- ;
- MELT_LOCATION ("warmelt-debug.melt:1086:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1089:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("{"));
- }
- ;
- MELT_LOCATION ("warmelt-debug.melt:1090:/ cond");
- /*cond */ if ( /*_.OPROP__V9*/ meltfptr[8]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1092:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
- ("prop="));
- }
- ;
- /*_#I__L8*/ meltfnum[7] =
- (( /*_#DEPTH__L1*/ meltfnum[0]) + (3));;
- MELT_LOCATION ("warmelt-debug.melt:1093:/ apply");
- /*apply */
- {
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.DBGI__V3*/ meltfptr[2];
- /*^apply.arg */
- argtab[1].meltbp_long = /*_#I__L8*/ meltfnum[7];
- /*_.DBG_OUT__V15*/ meltfptr[14] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!DBG_OUT */ meltfrout->tabval[1])),
- (melt_ptr_t) ( /*_.OPROP__V9*/ meltfptr[8]),
- (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab,
- "", (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-debug.melt:1091:/ quasiblock");
-
-
- /*_.PROGN___V16*/ meltfptr[15] =
- /*_.DBG_OUT__V15*/ meltfptr[14];;
- /*^compute */
-
- /*_.IF___V14*/ meltfptr[13] = /*_.PROGN___V16*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-debug.melt:1090:/ clear");
- /*clear *//*_#I__L8*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.DBG_OUT__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V16*/ meltfptr[15] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V14*/ meltfptr[13] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#I__L9*/ meltfnum[7] =
- (( /*_#DEPTH__L1*/ meltfnum[0]) + (3));;
- MELT_LOCATION ("warmelt-debug.melt:1095:/ apply");
- /*apply */
- {
- union meltparam_un argtab[4];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.DBGI__V3*/ meltfptr[2];
- /*^apply.arg */
- argtab[1].meltbp_long = /*_#I__L9*/ meltfnum[7];
- /*^apply.arg */
- argtab[2].meltbp_long = 2;
- /*^apply.arg */
- argtab[3].meltbp_long = 0;
- /*_.DBGOUT_FIELDS__V17*/ meltfptr[14] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!DBGOUT_FIELDS */ meltfrout->tabval[2])),
- (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
- (MELTBPARSTR_PTR MELTBPARSTR_LONG MELTBPARSTR_LONG
- MELTBPARSTR_LONG ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-debug.melt:1096:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("}"));
- }
- ;
-
- MELT_LOCATION ("warmelt-debug.melt:1083:/ clear");
- /*clear *//*_#ONUM__L7*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.IF___V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_#I__L9*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.DBGOUT_FIELDS__V17*/ meltfptr[14] = 0;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION ("warmelt-debug.melt:1070:/ clear");
- /*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.OUT__V7*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.ONAM__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_.OPROP__V9*/ meltfptr[8] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V12*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_#OBJ_HASH__L4*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.DBGI_MAXDEPTH__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L5*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5] = 0;
- /*epilog */
-
- MELT_LOCATION ("warmelt-debug.melt:1068:/ clear");
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("DBGOUT_NAMEDOBJECT_METHOD", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD */
+} /*end meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD */
diff --git a/gcc/melt/generated/warmelt-debug+02.c b/gcc/melt/generated/warmelt-debug+02.c
index 3c29e8285cb..7de3582ac17 100644
--- a/gcc/melt/generated/warmelt-debug+02.c
+++ b/gcc/melt/generated/warmelt-debug+02.c
@@ -251,7 +251,22 @@ meltrout_14_warmelt_debug_DBGOUT_STRING_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -266,7 +281,7 @@ meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -281,7 +296,7 @@ meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -296,7 +311,7 @@ meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
+meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -312,7 +327,7 @@ meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
+meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -328,7 +343,7 @@ meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -343,7 +358,7 @@ meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
+meltrout_22_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -356,7 +371,7 @@ meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -371,7 +386,7 @@ meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -386,7 +401,7 @@ meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -401,7 +416,7 @@ meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
+meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -417,7 +432,7 @@ meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
+meltrout_27_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -430,7 +445,7 @@ meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
+meltrout_28_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -443,7 +458,7 @@ meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
+meltrout_29_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -456,7 +471,7 @@ meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
+meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -472,7 +487,7 @@ meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
+meltrout_31_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -485,7 +500,7 @@ meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
+meltrout_32_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -498,7 +513,7 @@ meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
+meltrout_33_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -511,7 +526,7 @@ meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -527,7 +542,7 @@ meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -542,7 +557,7 @@ meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -561,7 +576,7 @@ meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -580,7 +595,7 @@ meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -599,7 +614,7 @@ meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -618,7 +633,7 @@ meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -633,7 +648,7 @@ meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -648,7 +663,7 @@ meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
+meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -667,7 +682,7 @@ meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -682,7 +697,7 @@ meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -701,7 +716,7 @@ meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -720,7 +735,7 @@ meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
+meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -739,7 +754,7 @@ meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
+meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -755,7 +770,7 @@ meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -770,7 +785,7 @@ meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
+meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -786,7 +801,7 @@ meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
+meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -841,20 +856,524 @@ static void forward_or_mark_module_start_frame_warmelt_debug (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 17
+ void *mcfr_varptr[17];
+#define MELTFRAM_NBVARNUM 9
+ long mcfr_varnum[9];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 17; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 17;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("DBGOUT_NAMEDOBJECT_METHOD", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ getarg");
+ /*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.DBGI__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_LONG)
+ goto lab_endgetargs;
+ /*_#DEPTH__L1*/ meltfnum[0] = meltxargtab_[1].meltbp_long;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-debug.melt:1157:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L2*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-debug.melt:1157:/ cond");
+ /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1157:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check dbgi"),
+ ("warmelt-debug.melt")
+ ? ("warmelt-debug.melt") : __FILE__,
+ (1157) ? (1157) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:1157:/ clear");
+ /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1158:/ quasiblock");
+
+
+ /*_.DIS__V6*/ meltfptr[4] =
+ (melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-debug.melt:1159:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
+ /*_.OUT__V7*/
+ meltfptr[6] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1160:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
+ /*_.ONAM__V8*/
+ meltfptr[7] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1161:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 0, "PROP_TABLE");
+ /*_.OPROP__V9*/
+ meltfptr[8] = slot;
+ };
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-debug.melt:1163:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_OUT__L3*/ meltfnum[1] =
+ (melt_is_out ((melt_ptr_t) /*_.OUT__V7*/ meltfptr[6]));;
+ MELT_LOCATION ("warmelt-debug.melt:1163:/ cond");
+ /*cond */ if ( /*_#IS_OUT__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1163:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check out"),
+ ("warmelt-debug.melt")
+ ? ("warmelt-debug.melt") : __FILE__,
+ (1163) ? (1163) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:1163:/ clear");
+ /*clear *//*_#IS_OUT__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1164:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("`"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1165:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.ONAM__V8*/ meltfptr[7])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1166:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("|"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1167:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V12*/
+ meltfptr[10] = slot;
+ };
+ ;
+
+ {
+ /*^locexp */
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V12*/
+ meltfptr[10])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1168:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("/"));
+ }
+ ;
+ /*_#OBJ_HASH__L4*/ meltfnum[1] =
+ (melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1169:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
+ ( /*_#OBJ_HASH__L4*/ meltfnum[1]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1170:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
+ /*_.DBGI_MAXDEPTH__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ /*_#GET_INT__L5*/ meltfnum[4] =
+ (melt_get_int ((melt_ptr_t) ( /*_.DBGI_MAXDEPTH__V13*/ meltfptr[12])));;
+ /*^compute */
+
+ /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5] =
+ ( /*MELT_REALLY_NEED_DBGLIM */
+ melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
+ (int) /*_#GET_INT__L5*/ meltfnum[4]));;
+ MELT_LOCATION ("warmelt-debug.melt:1170:/ cond");
+ /*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-debug.melt:1171:/ quasiblock");
+
+
+ /*_#ONUM__L7*/ meltfnum[6] =
+ (melt_obj_num ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-debug.melt:1173:/ cond");
+ /*cond */ if ( /*_#ONUM__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1175:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
+ ("#"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1176:/ locexp");
+ meltgc_add_out_dec ((melt_ptr_t)
+ ( /*_.OUT__V7*/ meltfptr[6]),
+ ( /*_#ONUM__L7*/ meltfnum[6]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1174:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1177:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("{"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1178:/ cond");
+ /*cond */ if ( /*_.OPROP__V9*/ meltfptr[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1180:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
+ ("prop="));
+ }
+ ;
+ /*_#I__L8*/ meltfnum[7] =
+ (( /*_#DEPTH__L1*/ meltfnum[0]) + (3));;
+ MELT_LOCATION ("warmelt-debug.melt:1181:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DBGI__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[1].meltbp_long = /*_#I__L8*/ meltfnum[7];
+ /*_.DBG_OUT__V15*/ meltfptr[14] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!DBG_OUT */ meltfrout->tabval[1])),
+ (melt_ptr_t) ( /*_.OPROP__V9*/ meltfptr[8]),
+ (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-debug.melt:1179:/ quasiblock");
+
+
+ /*_.PROGN___V16*/ meltfptr[15] =
+ /*_.DBG_OUT__V15*/ meltfptr[14];;
+ /*^compute */
+
+ /*_.IF___V14*/ meltfptr[13] = /*_.PROGN___V16*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:1178:/ clear");
+ /*clear *//*_#I__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.DBG_OUT__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V16*/ meltfptr[15] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V14*/ meltfptr[13] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#I__L9*/ meltfnum[7] =
+ (( /*_#DEPTH__L1*/ meltfnum[0]) + (3));;
+ MELT_LOCATION ("warmelt-debug.melt:1183:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[4];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DBGI__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[1].meltbp_long = /*_#I__L9*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2;
+ /*^apply.arg */
+ argtab[3].meltbp_long = 0;
+ /*_.DBGOUT_FIELDS__V17*/ meltfptr[14] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!DBGOUT_FIELDS */ meltfrout->tabval[2])),
+ (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
+ (MELTBPARSTR_PTR MELTBPARSTR_LONG MELTBPARSTR_LONG
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-debug.melt:1184:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("}"));
+ }
+ ;
+
+ MELT_LOCATION ("warmelt-debug.melt:1171:/ clear");
+ /*clear *//*_#ONUM__L7*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_#I__L9*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.DBGOUT_FIELDS__V17*/ meltfptr[14] = 0;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-debug.melt:1158:/ clear");
+ /*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.OUT__V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.ONAM__V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.OPROP__V9*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V12*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_#OBJ_HASH__L4*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DBGI_MAXDEPTH__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L5*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_#MELT_REALLY_NEED_DBGLIM__L6*/ meltfnum[5] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ clear");
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("DBGOUT_NAMEDOBJECT_METHOD", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
const
melt_argdescr_cell_t
meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
+ union meltparam_un *
+ meltxargtab_,
const
melt_argdescr_cell_t
meltxresdescr_[],
- union meltparam_un
- *meltxrestab_)
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -866,7 +1385,7 @@ meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD_st
+ struct frame_meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -905,7 +1424,7 @@ meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1102:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1190:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -933,7 +1452,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1103:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1191:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -942,7 +1461,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1103:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1191:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -950,7 +1469,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1103:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1191:/ cond.else");
/*^block */
/*anyblock */
@@ -964,7 +1483,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1103) ? (1103) : __LINE__, __FUNCTION__);
+ (1191) ? (1191) : __LINE__, __FUNCTION__);
;
}
;
@@ -979,7 +1498,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1103:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1191:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -990,12 +1509,12 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1104:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1192:/ quasiblock");
/*_.DIS__V6*/ meltfptr[4] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1105:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1193:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -1003,7 +1522,7 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1106:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1194:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
@@ -1013,13 +1532,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1108:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1196:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("^^`"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1109:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1197:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
melt_string_str ((melt_ptr_t)
( /*_.ONAM__V8*/ meltfptr[7])));
@@ -1027,11 +1546,11 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1110:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1198:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("|"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1111:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1199:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[4]), 1, "NAMED_NAME");
@@ -1049,7 +1568,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1112:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1200:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]), ("/"));
}
;
@@ -1057,13 +1576,13 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1113:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1201:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V7*/ meltfptr[6]),
( /*_#OBJ_HASH__L3*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1104:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1192:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.OUT__V7*/ meltfptr[6] = 0;
@@ -1075,7 +1594,7 @@ lab_endgetargs:;
/*clear *//*_#OBJ_HASH__L3*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1102:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1190:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
}
@@ -1089,14 +1608,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD */
+} /*end meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1121,7 +1640,7 @@ meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD_st
+ struct frame_meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -1160,7 +1679,7 @@ meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1119:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1207:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -1188,7 +1707,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1120:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1208:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1197,7 +1716,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1120:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1208:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1205,7 +1724,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1120:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1208:/ cond.else");
/*^block */
/*anyblock */
@@ -1219,7 +1738,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1120) ? (1120) : __LINE__, __FUNCTION__);
+ (1208) ? (1208) : __LINE__, __FUNCTION__);
;
}
;
@@ -1234,7 +1753,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1120:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1208:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -1247,7 +1766,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1121:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1209:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1256,7 +1775,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1121:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1209:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1264,7 +1783,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1121:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1209:/ cond.else");
/*^block */
/*anyblock */
@@ -1278,7 +1797,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1121) ? (1121) : __LINE__, __FUNCTION__);
+ (1209) ? (1209) : __LINE__, __FUNCTION__);
;
}
;
@@ -1293,7 +1812,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1121:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1209:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -1304,7 +1823,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1122:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1210:/ quasiblock");
/*^getslot */
@@ -1315,7 +1834,7 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1123:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1211:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
@@ -1327,13 +1846,13 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1126:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1214:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]), ("$"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1127:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1215:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]),
melt_string_str ((melt_ptr_t)
( /*_.ONAM__V9*/ meltfptr[8])));
@@ -1341,7 +1860,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1128:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1216:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]), ("/"));
}
;
@@ -1349,12 +1868,12 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1129:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1217:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]),
( /*_#OBJ_HASH__L5*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1130:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1218:/ cond");
/*cond */ if ( /*_#SNUM__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1364,18 +1883,18 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1132:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1220:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]), ("#"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1133:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1221:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]),
( /*_#SNUM__L4*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1131:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1219:/ quasiblock");
/*epilog */
@@ -1384,7 +1903,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1122:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1210:/ clear");
/*clear *//*_.OUT__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.ONAM__V9*/ meltfptr[8] = 0;
@@ -1394,7 +1913,7 @@ lab_endgetargs:;
/*clear *//*_#OBJ_HASH__L5*/ meltfnum[4] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1119:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1207:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -1410,14 +1929,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD */
+} /*end meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1438,7 +1957,7 @@ meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD_st
+ struct frame_meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -1477,7 +1996,7 @@ meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1137:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -1505,7 +2024,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1138:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1226:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1514,7 +2033,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1138:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1226:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1522,7 +2041,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1138:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1226:/ cond.else");
/*^block */
/*anyblock */
@@ -1536,7 +2055,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1138) ? (1138) : __LINE__, __FUNCTION__);
+ (1226) ? (1226) : __LINE__, __FUNCTION__);
;
}
;
@@ -1551,7 +2070,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1138:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1226:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -1564,7 +2083,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1139:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1227:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1573,7 +2092,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1139:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1227:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1581,7 +2100,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1139:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1227:/ cond.else");
/*^block */
/*anyblock */
@@ -1595,7 +2114,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1139) ? (1139) : __LINE__, __FUNCTION__);
+ (1227) ? (1227) : __LINE__, __FUNCTION__);
;
}
;
@@ -1610,7 +2129,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1139:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1227:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -1625,7 +2144,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[1] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:1140:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1228:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1633,7 +2152,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1141:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1229:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -1656,7 +2175,7 @@ lab_endgetargs:;
/*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1140:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1228:/ clear");
/*clear *//*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8] = 0;
}
;
@@ -1668,7 +2187,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1142:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1230:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -1691,17 +2210,17 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_SYMBOL_METHOD__V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1140:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1228:/ clear");
/*clear *//*_.DBGOUTAGAIN_SYMBOL_METHOD__V10*/ meltfptr[8] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1137:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:1137:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -1726,14 +2245,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD */
+} /*end meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1754,7 +2273,7 @@ meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD_st
+ struct frame_meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -1793,7 +2312,7 @@ meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1147:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -1821,7 +2340,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1148:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1236:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1830,7 +2349,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1148:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1236:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1838,7 +2357,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1148:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1236:/ cond.else");
/*^block */
/*anyblock */
@@ -1852,7 +2371,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1148) ? (1148) : __LINE__, __FUNCTION__);
+ (1236) ? (1236) : __LINE__, __FUNCTION__);
;
}
;
@@ -1867,7 +2386,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1148:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1236:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -1880,7 +2399,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1149:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1237:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -1889,7 +2408,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1149:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1237:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1897,7 +2416,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1149:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1237:/ cond.else");
/*^block */
/*anyblock */
@@ -1911,7 +2430,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1149) ? (1149) : __LINE__, __FUNCTION__);
+ (1237) ? (1237) : __LINE__, __FUNCTION__);
;
}
;
@@ -1926,7 +2445,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1149:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1237:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -1941,7 +2460,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[1] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:1150:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1238:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -1949,7 +2468,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1151:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1239:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -1972,7 +2491,7 @@ lab_endgetargs:;
/*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1150:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1238:/ clear");
/*clear *//*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8] = 0;
}
;
@@ -1984,7 +2503,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1152:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1240:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -2007,17 +2526,17 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_NAMEDOBJECT_METHOD__V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1150:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1238:/ clear");
/*clear *//*_.DBGOUTAGAIN_NAMEDOBJECT_METHOD__V10*/ meltfptr[8] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1147:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:1147:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -2042,14 +2561,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD */
+} /*end meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
+meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2074,7 +2593,7 @@ meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD_st
+ struct frame_meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2113,7 +2632,7 @@ meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1157:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1245:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2141,7 +2660,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1158:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1246:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2150,7 +2669,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1158:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1246:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2158,7 +2677,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1158:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1246:/ cond.else");
/*^block */
/*anyblock */
@@ -2172,7 +2691,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1158) ? (1158) : __LINE__, __FUNCTION__);
+ (1246) ? (1246) : __LINE__, __FUNCTION__);
;
}
;
@@ -2187,7 +2706,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1158:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1246:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -2200,7 +2719,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1159:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1247:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2209,7 +2728,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_KEYWORD */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1159:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1247:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2217,7 +2736,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1159:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1247:/ cond.else");
/*^block */
/*anyblock */
@@ -2231,7 +2750,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1159) ? (1159) : __LINE__, __FUNCTION__);
+ (1247) ? (1247) : __LINE__, __FUNCTION__);
;
}
;
@@ -2246,7 +2765,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1159:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1247:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -2257,7 +2776,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1160:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1248:/ quasiblock");
/*^getslot */
@@ -2268,7 +2787,7 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1161:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1249:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
@@ -2278,13 +2797,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1163:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1251:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]), ("$:"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1164:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1252:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]),
melt_string_str ((melt_ptr_t)
( /*_.ONAM__V9*/ meltfptr[8])));
@@ -2292,7 +2811,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1165:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1253:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]), ("/"));
}
;
@@ -2300,13 +2819,13 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1166:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1254:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V8*/ meltfptr[6]),
( /*_#OBJ_HASH__L4*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1160:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1248:/ clear");
/*clear *//*_.OUT__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.ONAM__V9*/ meltfptr[8] = 0;
@@ -2314,7 +2833,7 @@ lab_endgetargs:;
/*clear *//*_#OBJ_HASH__L4*/ meltfnum[1] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1157:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1245:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -2330,14 +2849,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD */
+} /*end meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2358,7 +2877,7 @@ meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD_st
+ struct frame_meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2397,7 +2916,7 @@ meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1170:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2425,7 +2944,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1171:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1259:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2434,7 +2953,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1171:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1259:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2442,7 +2961,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1171:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1259:/ cond.else");
/*^block */
/*anyblock */
@@ -2456,7 +2975,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1171) ? (1171) : __LINE__, __FUNCTION__);
+ (1259) ? (1259) : __LINE__, __FUNCTION__);
;
}
;
@@ -2471,7 +2990,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1171:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1259:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -2484,7 +3003,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1172:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1260:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2493,7 +3012,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_KEYWORD */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1172:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1260:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2501,7 +3020,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1172:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1260:/ cond.else");
/*^block */
/*anyblock */
@@ -2515,7 +3034,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1172) ? (1172) : __LINE__, __FUNCTION__);
+ (1260) ? (1260) : __LINE__, __FUNCTION__);
;
}
;
@@ -2530,7 +3049,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1172:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1260:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -2545,7 +3064,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[1] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:1173:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1261:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2553,7 +3072,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1174:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1262:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -2576,7 +3095,7 @@ lab_endgetargs:;
/*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1173:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1261:/ clear");
/*clear *//*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8] = 0;
}
;
@@ -2588,7 +3107,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1175:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1263:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -2611,17 +3130,17 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_KEYWORD_METHOD__V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1173:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1261:/ clear");
/*clear *//*_.DBGOUTAGAIN_KEYWORD_METHOD__V10*/ meltfptr[8] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1170:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:1170:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -2646,14 +3165,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD */
+} /*end meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2678,7 +3197,7 @@ meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD_st
+ struct frame_meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2717,7 +3236,7 @@ meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1180:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1268:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2743,12 +3262,12 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:1181:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1269:/ quasiblock");
/*_.DIS__V4*/ meltfptr[3] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1182:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1270:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -2756,7 +3275,7 @@ lab_endgetargs:;
meltfptr[4] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1183:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1271:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 3, "CSYM_URANK");
@@ -2766,7 +3285,7 @@ lab_endgetargs:;
;
/*_#LRK__L2*/ meltfnum[1] =
(melt_get_int ((melt_ptr_t) ( /*_.OURANK__V6*/ meltfptr[5])));;
- MELT_LOCATION ("warmelt-debug.melt:1185:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1273:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
@@ -2776,13 +3295,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1186:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1274:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]), ("$$"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1187:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1275:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]),
melt_string_str ((melt_ptr_t)
( /*_.ONAM__V7*/ meltfptr[6])));
@@ -2790,20 +3309,20 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1188:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1276:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]), (":"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1189:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1277:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]),
( /*_#LRK__L2*/ meltfnum[1]));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1190:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1278:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]), ("/"));
}
;
@@ -2811,13 +3330,13 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1191:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1279:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]),
( /*_#OBJ_HASH__L3*/ meltfnum[2]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1181:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1269:/ clear");
/*clear *//*_.DIS__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.OUT__V5*/ meltfptr[4] = 0;
@@ -2842,14 +3361,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
+} /*end meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2874,7 +3393,7 @@ meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD_st
+ struct frame_meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2913,7 +3432,7 @@ meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1195:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2941,7 +3460,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1196:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1284:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2950,7 +3469,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1196:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1284:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2958,7 +3477,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1196:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1284:/ cond.else");
/*^block */
/*anyblock */
@@ -2972,7 +3491,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1196) ? (1196) : __LINE__, __FUNCTION__);
+ (1284) ? (1284) : __LINE__, __FUNCTION__);
;
}
;
@@ -2987,7 +3506,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1196:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1284:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -3000,7 +3519,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1197:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1285:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3009,7 +3528,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1197:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1285:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3017,7 +3536,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1197:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1285:/ cond.else");
/*^block */
/*anyblock */
@@ -3031,7 +3550,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1197) ? (1197) : __LINE__, __FUNCTION__);
+ (1285) ? (1285) : __LINE__, __FUNCTION__);
;
}
;
@@ -3046,7 +3565,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1197:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1285:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -3061,7 +3580,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[1] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:1198:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1286:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3069,7 +3588,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1199:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1287:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -3092,7 +3611,7 @@ lab_endgetargs:;
/*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1198:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1286:/ clear");
/*clear *//*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8] = 0;
}
;
@@ -3104,7 +3623,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1200:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1288:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -3127,18 +3646,18 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_CLONED_SYMBOL_METHOD__V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1198:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1286:/ clear");
/*clear *//*_.DBGOUTAGAIN_CLONED_SYMBOL_METHOD__V10*/ meltfptr[8] =
0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1195:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:1195:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -3163,14 +3682,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD */
+} /*end meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
+meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -3195,7 +3714,7 @@ meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD_st
+ struct frame_meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3234,7 +3753,7 @@ meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1206:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -3262,7 +3781,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1207:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1295:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3271,7 +3790,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1207:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1295:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3279,7 +3798,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1207:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1295:/ cond.else");
/*^block */
/*anyblock */
@@ -3293,7 +3812,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1207) ? (1207) : __LINE__, __FUNCTION__);
+ (1295) ? (1295) : __LINE__, __FUNCTION__);
;
}
;
@@ -3308,7 +3827,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1207:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1295:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -3321,7 +3840,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1208:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1296:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3330,7 +3849,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1208:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1296:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3338,7 +3857,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1208:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1296:/ cond.else");
/*^block */
/*anyblock */
@@ -3352,7 +3871,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1208) ? (1208) : __LINE__, __FUNCTION__);
+ (1296) ? (1296) : __LINE__, __FUNCTION__);
;
}
;
@@ -3367,7 +3886,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1208:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1296:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -3378,12 +3897,12 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1209:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1297:/ quasiblock");
/*_.DIS__V8*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1210:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1298:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -3398,7 +3917,7 @@ lab_endgetargs:;
/*_#__L5*/ meltfnum[4] =
(( /*_.DIS__V8*/ meltfptr[6]) ==
(( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1213:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1301:/ cond");
/*cond */ if ( /*_#__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -3408,7 +3927,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1214:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1302:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
("env"));
}
@@ -3419,7 +3938,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1213:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1301:/ cond.else");
/*^block */
/*anyblock */
@@ -3427,11 +3946,11 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1216:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1304:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("|"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1217:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1305:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V8*/ meltfptr[6]), 1, "NAMED_NAME");
@@ -3448,12 +3967,12 @@ lab_endgetargs:;
meltfptr[9])));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1215:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1303:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1213:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1301:/ clear");
/*clear *//*_.NAMED_NAME__V10*/ meltfptr[9] = 0;
}
;
@@ -3461,7 +3980,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1219:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1307:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("/"));
}
;
@@ -3469,12 +3988,12 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1220:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1308:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
( /*_#OBJ_HASH__L6*/ meltfnum[5]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1221:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1309:/ cond");
/*cond */ if ( /*_#ONUM__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3484,18 +4003,18 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1223:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1311:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("#"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1224:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1312:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
( /*_#ONUM__L4*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1222:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1310:/ quasiblock");
/*epilog */
@@ -3505,16 +4024,16 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1225:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1313:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("{"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1226:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1314:/ quasiblock");
/*_#OFFPREV__L7*/ meltfnum[6] =
(melt_get_int ((melt_ptr_t) (( /*!ENV_PREV */ meltfrout->tabval[2]))));;
- MELT_LOCATION ("warmelt-debug.melt:1227:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1315:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -3536,7 +4055,7 @@ lab_endgetargs:;
/*_#I__L11*/ meltfnum[10] =
(( /*_#NEWMAXDEPTH__L10*/ meltfnum[9]) < (0));;
- MELT_LOCATION ("warmelt-debug.melt:1230:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1318:/ cond");
/*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -3550,7 +4069,7 @@ lab_endgetargs:;
/*_#IF___L12*/ meltfnum[11] = /*_#SETQ___L13*/ meltfnum[12];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1230:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1318:/ clear");
/*clear *//*_#SETQ___L13*/ meltfnum[12] = 0;
}
;
@@ -3567,7 +4086,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#OLDMAXDEPTH__L8*/ meltfnum[7]));;
- MELT_LOCATION ("warmelt-debug.melt:1231:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1319:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -3577,7 +4096,7 @@ lab_endgetargs:;
/*_#I__L15*/ meltfnum[14] =
(( /*_#DEPTH__L1*/ meltfnum[0]) > (0));;
- MELT_LOCATION ("warmelt-debug.melt:1233:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1321:/ cond");
/*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -3587,7 +4106,7 @@ lab_endgetargs:;
/*_#I__L16*/ meltfnum[15] =
(( /*_#OLDMAXDEPTH__L8*/ meltfnum[7]) > (3));;
- MELT_LOCATION ("warmelt-debug.melt:1233:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1321:/ cond");
/*cond */ if ( /*_#I__L16*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -3595,7 +4114,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1234:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1322:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -3614,7 +4133,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1233:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1321:/ clear");
/*clear *//*_.DBGI_MAXDEPTH__V12*/ meltfptr[11] = 0;
}
;
@@ -3630,7 +4149,7 @@ lab_endgetargs:;
;
/*_#I__L17*/ meltfnum[15] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:1235:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1323:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -3662,7 +4181,7 @@ lab_endgetargs:;
melt_need_debug_limit ((int) /*_#I__L18*/ meltfnum[17],
(int) /*_#NEWMAXDEPTH__L10*/
meltfnum[9]));;
- MELT_LOCATION ("warmelt-debug.melt:1236:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1324:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L19*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -3672,7 +4191,7 @@ lab_endgetargs:;
/*_#I__L20*/ meltfnum[19] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (2));;
- MELT_LOCATION ("warmelt-debug.melt:1237:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1325:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -3700,7 +4219,7 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_FIELDS__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1236:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1324:/ clear");
/*clear *//*_#I__L20*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.DBGOUTAGAIN_FIELDS__V15*/ meltfptr[14] = 0;
@@ -3718,7 +4237,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1238:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1326:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
(".._.."));
}
@@ -3729,7 +4248,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1239:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1327:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -3745,12 +4264,12 @@ lab_endgetargs:;
( /*_#OLDMAXDEPTH__L8*/ meltfnum[7]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1232:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1320:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1231:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1319:/ clear");
/*clear *//*_#I__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_#I__L17*/ meltfnum[15] = 0;
@@ -3769,7 +4288,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1226:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1314:/ clear");
/*clear *//*_#OFFPREV__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.DBGI_MAXDEPTH__V11*/ meltfptr[9] = 0;
@@ -3787,12 +4306,12 @@ lab_endgetargs:;
/*clear *//*_#MELT_REALLY_NEED_DBGLIM__L14*/ meltfnum[12] = 0;
{
- MELT_LOCATION ("warmelt-debug.melt:1241:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1329:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("}"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1209:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1297:/ clear");
/*clear *//*_.DIS__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.OUT__V9*/ meltfptr[8] = 0;
@@ -3804,7 +4323,7 @@ lab_endgetargs:;
/*clear *//*_#OBJ_HASH__L6*/ meltfnum[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1206:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -3820,14 +4339,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD */
+} /*end meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
+meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -3849,7 +4368,7 @@ meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD_st
+ struct frame_meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3888,7 +4407,7 @@ meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1247:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1335:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -3914,12 +4433,12 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:1248:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1336:/ quasiblock");
/*_.DIS__V4*/ meltfptr[3] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1249:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1337:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -3927,7 +4446,7 @@ lab_endgetargs:;
meltfptr[4] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1250:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1338:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 1, "NAMED_NAME");
@@ -3937,13 +4456,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1251:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1339:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]), (" $!"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1252:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1340:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]),
melt_string_str ((melt_ptr_t)
( /*_.ONAM__V6*/ meltfptr[5])));
@@ -3951,7 +4470,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1253:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1341:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]), ("!/"));
}
;
@@ -3959,13 +4478,13 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1254:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1342:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V5*/ meltfptr[4]),
( /*_#OBJ_HASH__L2*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1248:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1336:/ clear");
/*clear *//*_.DIS__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.OUT__V5*/ meltfptr[4] = 0;
@@ -3986,14 +4505,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD */
+} /*end meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4014,7 +4533,7 @@ meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD_st
+ struct frame_meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4053,7 +4572,7 @@ meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1259:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4081,7 +4600,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1260:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1348:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4090,7 +4609,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1260:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1348:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4098,7 +4617,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1260:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1348:/ cond.else");
/*^block */
/*anyblock */
@@ -4112,7 +4631,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1260) ? (1260) : __LINE__, __FUNCTION__);
+ (1348) ? (1348) : __LINE__, __FUNCTION__);
;
}
;
@@ -4127,7 +4646,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1260:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1348:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -4140,7 +4659,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1261:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1349:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4149,7 +4668,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1261:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1349:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4157,7 +4676,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1261:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1349:/ cond.else");
/*^block */
/*anyblock */
@@ -4171,7 +4690,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1261) ? (1261) : __LINE__, __FUNCTION__);
+ (1349) ? (1349) : __LINE__, __FUNCTION__);
;
}
;
@@ -4186,7 +4705,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1261:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1349:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4201,7 +4720,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[1] =
(( /*_#DEPTH__L1*/ meltfnum[0]) <= (0));;
- MELT_LOCATION ("warmelt-debug.melt:1262:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1350:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4209,7 +4728,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1263:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1351:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -4232,7 +4751,7 @@ lab_endgetargs:;
/*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1262:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1350:/ clear");
/*clear *//*_.DBGOUT_NAMEDOBJECT_METHOD__V9*/ meltfptr[8] = 0;
}
;
@@ -4244,7 +4763,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-debug.melt:1264:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1352:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -4267,17 +4786,17 @@ lab_endgetargs:;
/*_.DBGOUTAGAIN_CTYPE_METHOD__V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1262:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1350:/ clear");
/*clear *//*_.DBGOUTAGAIN_CTYPE_METHOD__V10*/ meltfptr[8] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-debug.melt:1259:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-debug.melt:1259:/ finalreturn");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4302,14 +4821,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD */
+} /*end meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
+meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -4331,7 +4850,7 @@ meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD_st
+ struct frame_meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4370,7 +4889,7 @@ meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1269:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ getarg");
/*_.SELF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4398,7 +4917,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1270:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1358:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4407,7 +4926,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_DEBUG_INFORMATION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-debug.melt:1270:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1358:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4415,7 +4934,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1270:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1358:/ cond.else");
/*^block */
/*anyblock */
@@ -4429,7 +4948,7 @@ lab_endgetargs:;
melt_assert_failed (("check dbgi"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1270) ? (1270) : __LINE__, __FUNCTION__);
+ (1358) ? (1358) : __LINE__, __FUNCTION__);
;
}
;
@@ -4444,7 +4963,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1270:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1358:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -4457,7 +4976,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-debug.melt:1271:/ cppif.then");
+ MELT_LOCATION ("warmelt-debug.melt:1359:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4466,7 +4985,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_ANY_BINDING */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1271:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1359:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4474,7 +4993,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-debug.melt:1271:/ cond.else");
+ MELT_LOCATION ("warmelt-debug.melt:1359:/ cond.else");
/*^block */
/*anyblock */
@@ -4488,7 +5007,7 @@ lab_endgetargs:;
melt_assert_failed (("check self"),
("warmelt-debug.melt")
? ("warmelt-debug.melt") : __FILE__,
- (1271) ? (1271) : __LINE__, __FUNCTION__);
+ (1359) ? (1359) : __LINE__, __FUNCTION__);
;
}
;
@@ -4503,7 +5022,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1271:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1359:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4514,12 +5033,12 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-debug.melt:1272:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1360:/ quasiblock");
/*_.DIS__V8*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-debug.melt:1273:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1361:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 0, "DBGI_OUT");
@@ -4527,7 +5046,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-debug.melt:1274:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1362:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1]), 0, "BINDER");
@@ -4539,18 +5058,18 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1277:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1365:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
( /*_#DEPTH__L1*/ meltfnum[0]), 64);;
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1278:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1366:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("[~"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1279:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1367:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V8*/ meltfptr[6]), 1, "NAMED_NAME");
@@ -4569,7 +5088,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1280:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1368:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("/"));
}
;
@@ -4577,12 +5096,12 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.SELF__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-debug.melt:1281:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1369:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
( /*_#OBJ_HASH__L5*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1282:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1370:/ cond");
/*cond */ if ( /*_#BINDNUM__L4*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4592,18 +5111,18 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1284:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1372:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("#"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1285:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1373:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
( /*_#BINDNUM__L4*/ meltfnum[1]));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1283:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1371:/ quasiblock");
/*epilog */
@@ -4613,13 +5132,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1286:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1374:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), (":"));
}
;
/*_#I__L6*/ meltfnum[5] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (2));;
- MELT_LOCATION ("warmelt-debug.melt:1287:/ msend");
+ MELT_LOCATION ("warmelt-debug.melt:1375:/ msend");
/*msend */
{
union meltparam_un argtab[2];
@@ -4636,7 +5155,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:1288:/ getslot");
+ MELT_LOCATION ("warmelt-debug.melt:1376:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DBGI__V3*/ meltfptr[2]), 2, "DBGI_MAXDEPTH");
@@ -4652,7 +5171,7 @@ lab_endgetargs:;
( /*MELT_REALLY_NEED_DBGLIM */
melt_need_debug_limit ((int) /*_#DEPTH__L1*/ meltfnum[0],
(int) /*_#GET_INT__L7*/ meltfnum[6]));;
- MELT_LOCATION ("warmelt-debug.melt:1288:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1376:/ cond");
/*cond */ if ( /*_#MELT_REALLY_NEED_DBGLIM__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -4662,14 +5181,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-debug.melt:1290:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1378:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]),
("; "));
}
;
/*_#I__L9*/ meltfnum[8] =
(( /*_#DEPTH__L1*/ meltfnum[0]) + (1));;
- MELT_LOCATION ("warmelt-debug.melt:1291:/ apply");
+ MELT_LOCATION ("warmelt-debug.melt:1379:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -4692,7 +5211,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-debug.melt:1289:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1377:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[15] =
@@ -4702,7 +5221,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = /*_.PROGN___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1288:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1376:/ clear");
/*clear *//*_#I__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.DBGOUT_FIELDS__V15*/ meltfptr[14] = 0;
@@ -4719,12 +5238,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1293:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1381:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V9*/ meltfptr[8]), ("~]"));
}
;
- MELT_LOCATION ("warmelt-debug.melt:1272:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1360:/ clear");
/*clear *//*_.DIS__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.OUT__V9*/ meltfptr[8] = 0;
@@ -4750,7 +5269,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-debug.melt:1269:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -4766,14 +5285,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD */
+} /*end meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
+meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4794,7 +5313,7 @@ meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE_st
+ struct frame_meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4834,7 +5353,7 @@ meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-debug.melt:1303:/ getarg");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ getarg");
/*_.VAL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4856,7 +5375,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-debug.melt:1305:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1393:/ quasiblock");
/*_#DBGCOUNTER__L2*/ meltfnum[1] = 0;;
@@ -4878,7 +5397,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
(14)));;
- MELT_LOCATION ("warmelt-debug.melt:1309:/ quasiblock");
+ MELT_LOCATION ("warmelt-debug.melt:1397:/ quasiblock");
/*^rawallocobj */
@@ -4924,13 +5443,13 @@ lab_endgetargs:;
/*_.DBGI__V6*/ meltfptr[5] = /*_.INST__V7*/ meltfptr[6];;
{
- MELT_LOCATION ("warmelt-debug.melt:1314:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1402:/ locexp");
/*_#DBGCOUNTER__L2*/ meltfnum[1] = ++melt_dbgcounter;
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1315:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1403:/ locexp");
melt_putnum (stderr, ("!*!#"), ( /*_#DBGCOUNTER__L2*/ meltfnum[1]),
("/"));
}
@@ -4943,19 +5462,19 @@ lab_endgetargs:;
(( /*_#THE_FRAMEDEPTH__L3*/ meltfnum[2]) - (1));;
{
- MELT_LOCATION ("warmelt-debug.melt:1316:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1404:/ locexp");
melt_putnum (stderr, (""), ( /*_#I__L4*/ meltfnum[3]), (":"));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1317:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1405:/ locexp");
melt_puts (stderr, ( /*_?*/ meltfram__.loc_CSTRING__o0));
}
;
/*_#I__L5*/ meltfnum[4] =
(( /*_#COUNT__L1*/ meltfnum[0]) > (0));;
- MELT_LOCATION ("warmelt-debug.melt:1318:/ cond");
+ MELT_LOCATION ("warmelt-debug.melt:1406:/ cond");
/*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -4975,7 +5494,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-debug.melt:1319:/ msend");
+ MELT_LOCATION ("warmelt-debug.melt:1407:/ msend");
/*msend */
{
union meltparam_un argtab[2];
@@ -4993,18 +5512,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-debug.melt:1320:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1408:/ locexp");
melt_putstrbuf (stderr, (melt_ptr_t) ( /*_.SBUF__V3*/ meltfptr[2]));
}
;
{
- MELT_LOCATION ("warmelt-debug.melt:1321:/ locexp");
+ MELT_LOCATION ("warmelt-debug.melt:1409:/ locexp");
melt_newlineflush (stderr);
}
;
- MELT_LOCATION ("warmelt-debug.melt:1305:/ clear");
+ MELT_LOCATION ("warmelt-debug.melt:1393:/ clear");
/*clear *//*_#DBGCOUNTER__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.SBUF__V3*/ meltfptr[2] = 0;
@@ -5035,7 +5554,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE */
+} /*end meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE */
diff --git a/gcc/melt/generated/warmelt-debug+meltdesc.c b/gcc/melt/generated/warmelt-debug+meltdesc.c
index 8f13c2dd597..40ccf46ad6c 100644
--- a/gcc/melt/generated/warmelt-debug+meltdesc.c
+++ b/gcc/melt/generated/warmelt-debug+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-debug */
@@ -12,15 +12,15 @@ const char melt_modulename[]="warmelt-debug";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-debug";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="e36b76969a8f964046efcd4363c9a8a6";
+const char melt_primaryhexmd5[]="7b20dea4739188f78b6146af05c8b5fb";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+01.c #1 */ "30a9c46e272add5f8cc50610277860f9",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+02.c #2 */ "f1e7dc52f013ef599b093d01693ddee5",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+01.c #1 */ "bf16ab931a1b52c43eb721a30d77617e",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+02.c #2 */ "4a25304fafec5878528e63ccb44bc51e",
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -28,9 +28,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=2;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="dce4010aa392a1c59a1e770f92e46660" ;
+const char melt_cumulated_hexmd5[]="f098eef89444e64d2b84245e80969c37" ;
/* include the timestamp file */
-#define meltmod_warmelt_debug_mds__dce4010aa392a1c59a1e770f92e46660 1
+#define meltmod_warmelt_debug_mds__f098eef89444e64d2b84245e80969c37 1
#include "warmelt-debug+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-debug+melttime.h b/gcc/melt/generated/warmelt-debug+melttime.h
index 18b6618b9c1..5ab40fabd25 100644
--- a/gcc/melt/generated/warmelt-debug+melttime.h
+++ b/gcc/melt/generated/warmelt-debug+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-debug+melttime.h is included from warmelt-debug+meltdesc.c only. */
-#if meltmod_warmelt_debug_mds__dce4010aa392a1c59a1e770f92e46660
+#if meltmod_warmelt_debug_mds__f098eef89444e64d2b84245e80969c37
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-debug */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:21 2012 CET";
-const long long melt_gen_timenum=1328609121;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:20 2012 CET";
+const long long melt_gen_timenum=1329219200;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_debug_mds__dce4010aa392a1c59a1e770f92e46660 */
+#else /* ! meltmod_warmelt_debug_mds__f098eef89444e64d2b84245e80969c37 */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-debug
-#endif /* meltmod_warmelt_debug_mds__dce4010aa392a1c59a1e770f92e46660 */
+#endif /* meltmod_warmelt_debug_mds__f098eef89444e64d2b84245e80969c37 */
diff --git a/gcc/melt/generated/warmelt-debug.c b/gcc/melt/generated/warmelt-debug.c
index 3e640124bbe..7f0a296526d 100644
--- a/gcc/melt/generated/warmelt-debug.c
+++ b/gcc/melt/generated/warmelt-debug.c
@@ -251,7 +251,22 @@ meltrout_14_warmelt_debug_DBGOUT_STRING_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -266,7 +281,7 @@ meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -281,7 +296,7 @@ meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -296,7 +311,7 @@ meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
+meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -312,7 +327,7 @@ meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
+meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -328,7 +343,7 @@ meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -343,7 +358,7 @@ meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
+meltrout_22_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -356,7 +371,7 @@ meltrout_21_warmelt_debug_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -371,7 +386,7 @@ meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -386,7 +401,7 @@ meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -401,7 +416,7 @@ meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
+meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -417,7 +432,7 @@ meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
+meltrout_27_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -430,7 +445,7 @@ meltrout_26_warmelt_debug_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
+meltrout_28_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -443,7 +458,7 @@ meltrout_27_warmelt_debug_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
+meltrout_29_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -456,7 +471,7 @@ meltrout_28_warmelt_debug_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
+meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -472,7 +487,7 @@ meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
+meltrout_31_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -485,7 +500,7 @@ meltrout_30_warmelt_debug_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
+meltrout_32_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -498,7 +513,7 @@ meltrout_31_warmelt_debug_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
+meltrout_33_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -511,7 +526,7 @@ meltrout_32_warmelt_debug_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -527,7 +542,7 @@ meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -542,7 +557,7 @@ meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
+meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -561,7 +576,7 @@ meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -580,7 +595,7 @@ meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
+meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -599,7 +614,7 @@ meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -618,7 +633,7 @@ meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -633,7 +648,7 @@ meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -648,7 +663,7 @@ meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
+meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -667,7 +682,7 @@ meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -682,7 +697,7 @@ meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -701,7 +716,7 @@ meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
+meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -720,7 +735,7 @@ meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
+meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -739,7 +754,7 @@ meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
+meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -755,7 +770,7 @@ meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
+meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -770,7 +785,7 @@ meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
+meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -786,7 +801,7 @@ meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
+meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -956,7 +971,13 @@ lab_endgetargs:;
/*_#DBGCOUNTER__L4*/ meltfnum[3] = 0;;
MELT_LOCATION ("warmelt-debug.melt:83:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -975,7 +996,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-debug.melt:84:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -1051,7 +1078,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-debug.melt:106:/ cond");
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -1651,7 +1683,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!TREE_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!TREE_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1855,7 +1894,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!GIMPLE_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!GIMPLE_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2063,7 +2109,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!GIMPLESEQ_DEBUG_FUNCONT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!GIMPLESEQ_DEBUG_FUNCONT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2201,8 +2254,8 @@ typedef struct frame_start_module_melt_st
void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int);
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 383
- void *mcfr_varptr[383];
+#define MELTFRAM_NBVARPTR 386
+ void *mcfr_varptr[386];
/*no varnum*/
#define MELTFRAM_NBVARNUM /*none*/0
/*others*/
@@ -2219,7 +2272,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_debug iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -338);
+ iniframp__->mcfr_nbvar == /*minihash */ -1403);
struct cdata_st
{
@@ -2385,146 +2438,148 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
struct MELT_CLOSURE_STRUCT (0) dclo_160__DBGOUT_STRING_METHOD;
struct MELT_OBJECT_STRUCT (3) dsym_161__DISCR_STRING;
struct MELT_STRING_STRUCT (12) dstr_162__DISCR_STRING;
- struct MELT_ROUTINE_STRUCT (2) drout_163__DBGOUT_INTEGER_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_164__DBGOUT_INTEGER_METHOD;
- struct MELT_ROUTINE_STRUCT (3) drout_165__DBGOUT_MIXINT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_166__DBGOUT_MIXINT_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_167__DISCR_MIXED_INTEGER;
- struct MELT_STRING_STRUCT (19) dstr_168__DISCR_MIXED_INTE;
- struct MELT_ROUTINE_STRUCT (2) drout_169__DBGOUT_MIXLOC_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_170__DBGOUT_MIXLOC_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_171__DISCR_MIXED_LOCATION;
- struct MELT_STRING_STRUCT (20) dstr_172__DISCR_MIXED_LOCA;
- struct MELT_ROUTINE_STRUCT (2) drout_173__DBGOUT_MIXBIGINT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_174__DBGOUT_MIXBIGINT_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_175__DISCR_MIXED_BIGINT;
- struct MELT_STRING_STRUCT (18) dstr_176__DISCR_MIXED_BIGI;
- struct MELT_ROUTINE_STRUCT (3) drout_177__DBGOUT_MULTIPLE_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_178__DBGOUT_MULTIPLE_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_179__DISCR_MULTIPLE;
- struct MELT_STRING_STRUCT (14) dstr_180__DISCR_MULTIPLE;
- struct MELT_ROUTINE_STRUCT (6) drout_181__DBGOUT_ROUTINE_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_182__DBGOUT_ROUTINE_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_183__DISCR_ROUTINE;
- struct MELT_STRING_STRUCT (13) dstr_184__DISCR_ROUTINE;
- struct MELT_OBJECT_STRUCT (3) dsym_185__ROUTINE_EVERY;
- struct MELT_STRING_STRUCT (13) dstr_186__ROUTINE_EVERY;
- struct MELT_ROUTINE_STRUCT (1) drout_187__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (3) drout_188__DBGOUT_CLOSURE_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_189__DBGOUT_CLOSURE_METHOD;
- struct MELT_ROUTINE_STRUCT (3) drout_190__DBGOUT_LIST_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_191__DBGOUT_LIST_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_192__DISCR_LIST;
- struct MELT_STRING_STRUCT (10) dstr_193__DISCR_LIST;
- struct MELT_ROUTINE_STRUCT (3) drout_194__DBGOUT_PAIR_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_195__DBGOUT_PAIR_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_196__DISCR_PAIR;
- struct MELT_STRING_STRUCT (10) dstr_197__DISCR_PAIR;
- struct MELT_ROUTINE_STRUCT (13) drout_198__DBGOUT_MAPOBJECT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_199__DBGOUT_MAPOBJECT_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_200__MAPOBJECT_EVERY;
- struct MELT_STRING_STRUCT (15) dstr_201__MAPOBJECT_EVERY;
- struct MELT_ROUTINE_STRUCT (1) drout_202__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_203__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_204__COMPARE_OBJ_RANKED;
- struct MELT_STRING_STRUCT (18) dstr_205__COMPARE_OBJ_RANK;
- struct meltint_st dint_206__;
- struct meltint_st dint_207__;
+ struct MELT_ROUTINE_STRUCT (3) drout_163__DBGOUT_STRBUF_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_164__DBGOUT_STRBUF_METHOD;
+ struct MELT_ROUTINE_STRUCT (2) drout_165__DBGOUT_INTEGER_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_166__DBGOUT_INTEGER_METHOD;
+ struct MELT_ROUTINE_STRUCT (3) drout_167__DBGOUT_MIXINT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_168__DBGOUT_MIXINT_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_169__DISCR_MIXED_INTEGER;
+ struct MELT_STRING_STRUCT (19) dstr_170__DISCR_MIXED_INTE;
+ struct MELT_ROUTINE_STRUCT (2) drout_171__DBGOUT_MIXLOC_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_172__DBGOUT_MIXLOC_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_173__DISCR_MIXED_LOCATION;
+ struct MELT_STRING_STRUCT (20) dstr_174__DISCR_MIXED_LOCA;
+ struct MELT_ROUTINE_STRUCT (2) drout_175__DBGOUT_MIXBIGINT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_176__DBGOUT_MIXBIGINT_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_177__DISCR_MIXED_BIGINT;
+ struct MELT_STRING_STRUCT (18) dstr_178__DISCR_MIXED_BIGI;
+ struct MELT_ROUTINE_STRUCT (3) drout_179__DBGOUT_MULTIPLE_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_180__DBGOUT_MULTIPLE_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_181__DISCR_MULTIPLE;
+ struct MELT_STRING_STRUCT (14) dstr_182__DISCR_MULTIPLE;
+ struct MELT_ROUTINE_STRUCT (6) drout_183__DBGOUT_ROUTINE_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_184__DBGOUT_ROUTINE_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_185__DISCR_ROUTINE;
+ struct MELT_STRING_STRUCT (13) dstr_186__DISCR_ROUTINE;
+ struct MELT_OBJECT_STRUCT (3) dsym_187__ROUTINE_EVERY;
+ struct MELT_STRING_STRUCT (13) dstr_188__ROUTINE_EVERY;
+ struct MELT_ROUTINE_STRUCT (1) drout_189__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (3) drout_190__DBGOUT_CLOSURE_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_191__DBGOUT_CLOSURE_METHOD;
+ struct MELT_ROUTINE_STRUCT (3) drout_192__DBGOUT_LIST_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_193__DBGOUT_LIST_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_194__DISCR_LIST;
+ struct MELT_STRING_STRUCT (10) dstr_195__DISCR_LIST;
+ struct MELT_ROUTINE_STRUCT (3) drout_196__DBGOUT_PAIR_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_197__DBGOUT_PAIR_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_198__DISCR_PAIR;
+ struct MELT_STRING_STRUCT (10) dstr_199__DISCR_PAIR;
+ struct MELT_ROUTINE_STRUCT (13) drout_200__DBGOUT_MAPOBJECT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_201__DBGOUT_MAPOBJECT_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_202__MAPOBJECT_EVERY;
+ struct MELT_STRING_STRUCT (15) dstr_203__MAPOBJECT_EVERY;
+ struct MELT_ROUTINE_STRUCT (1) drout_204__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (4) drout_205__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_206__COMPARE_OBJ_RANKED;
+ struct MELT_STRING_STRUCT (18) dstr_207__COMPARE_OBJ_RANK;
struct meltint_st dint_208__;
- struct MELT_OBJECT_STRUCT (3) dsym_209__MULTIPLE_EVERY;
- struct MELT_STRING_STRUCT (14) dstr_210__MULTIPLE_EVERY;
- struct MELT_ROUTINE_STRUCT (2) drout_211__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (12) drout_212__DBGOUT_MAPSTRING_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_213__DBGOUT_MAPSTRING_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_214__DISCR_MAP_STRINGS;
- struct MELT_STRING_STRUCT (17) dstr_215__DISCR_MAP_STRING;
- struct MELT_OBJECT_STRUCT (3) dsym_216__MAPSTRING_EVERY;
- struct MELT_STRING_STRUCT (15) dstr_217__MAPSTRING_EVERY;
- struct MELT_ROUTINE_STRUCT (1) drout_218__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_219__LAMBDA_;
- struct meltint_st dint_220__;
- struct meltint_st dint_221__;
+ struct meltint_st dint_209__;
+ struct meltint_st dint_210__;
+ struct MELT_OBJECT_STRUCT (3) dsym_211__MULTIPLE_EVERY;
+ struct MELT_STRING_STRUCT (14) dstr_212__MULTIPLE_EVERY;
+ struct MELT_ROUTINE_STRUCT (2) drout_213__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (12) drout_214__DBGOUT_MAPSTRING_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_215__DBGOUT_MAPSTRING_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_216__DISCR_MAP_STRINGS;
+ struct MELT_STRING_STRUCT (17) dstr_217__DISCR_MAP_STRING;
+ struct MELT_OBJECT_STRUCT (3) dsym_218__MAPSTRING_EVERY;
+ struct MELT_STRING_STRUCT (15) dstr_219__MAPSTRING_EVERY;
+ struct MELT_ROUTINE_STRUCT (1) drout_220__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (4) drout_221__LAMBDA_;
struct meltint_st dint_222__;
- struct MELT_ROUTINE_STRUCT (1) drout_223__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (2) drout_224__DBGOUT_ANYOBJECT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_225__DBGOUT_ANYOBJECT_METHOD;
- struct MELT_ROUTINE_STRUCT (2) drout_226__DBGOUT_ANYRECV_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_227__DBGOUT_ANYRECV_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_228__DISCR_ANY_RECEIVER;
- struct MELT_STRING_STRUCT (18) dstr_229__DISCR_ANY_RECEIV;
- struct MELT_ROUTINE_STRUCT (1) drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_231__DBGOUTAGAIN_ANYOBJECT_METHOD;
- struct MELT_ROUTINE_STRUCT (3) drout_232__DBGOUT_NAMEDOBJECT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_233__DBGOUT_NAMEDOBJECT_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_234__DBGOUT_NAMEDOBJECT_METHOD;
- struct MELT_STRING_STRUCT (25) dstr_235__DBGOUT_NAMEDOBJE;
- struct MELT_ROUTINE_STRUCT (1) drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_237__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
- struct MELT_ROUTINE_STRUCT (2) drout_238__DBGOUTAGAIN_SYMBOL_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_239__DBGOUTAGAIN_SYMBOL_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_240__CLASS_SYMBOL;
- struct MELT_STRING_STRUCT (12) dstr_241__CLASS_SYMBOL;
- struct MELT_ROUTINE_STRUCT (4) drout_242__DBGOUT_SYMBOL_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_243__DBGOUT_SYMBOL_METHOD;
- struct MELT_ROUTINE_STRUCT (4) drout_244__DBGOUT_CLASS_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_245__DBGOUT_CLASS_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_246__CLASS_CLASS;
- struct MELT_STRING_STRUCT (11) dstr_247__CLASS_CLASS;
- struct MELT_ROUTINE_STRUCT (2) drout_248__DBGOUTAGAIN_KEYWORD_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_249__DBGOUTAGAIN_KEYWORD_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_250__CLASS_KEYWORD;
- struct MELT_STRING_STRUCT (13) dstr_251__CLASS_KEYWORD;
- struct MELT_ROUTINE_STRUCT (4) drout_252__DBGOUT_KEYWORD_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_253__DBGOUT_KEYWORD_METHOD;
+ struct meltint_st dint_223__;
+ struct meltint_st dint_224__;
+ struct MELT_ROUTINE_STRUCT (1) drout_225__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (2) drout_226__DBGOUT_ANYOBJECT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_227__DBGOUT_ANYOBJECT_METHOD;
+ struct MELT_ROUTINE_STRUCT (2) drout_228__DBGOUT_ANYRECV_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_229__DBGOUT_ANYRECV_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_230__DISCR_ANY_RECEIVER;
+ struct MELT_STRING_STRUCT (18) dstr_231__DISCR_ANY_RECEIV;
+ struct MELT_ROUTINE_STRUCT (1) drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_233__DBGOUTAGAIN_ANYOBJECT_METHOD;
+ struct MELT_ROUTINE_STRUCT (3) drout_234__DBGOUT_NAMEDOBJECT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_235__DBGOUT_NAMEDOBJECT_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_236__DBGOUT_NAMEDOBJECT_METHOD;
+ struct MELT_STRING_STRUCT (25) dstr_237__DBGOUT_NAMEDOBJE;
+ struct MELT_ROUTINE_STRUCT (1) drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_239__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
+ struct MELT_ROUTINE_STRUCT (2) drout_240__DBGOUTAGAIN_SYMBOL_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_241__DBGOUTAGAIN_SYMBOL_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_242__CLASS_SYMBOL;
+ struct MELT_STRING_STRUCT (12) dstr_243__CLASS_SYMBOL;
+ struct MELT_ROUTINE_STRUCT (4) drout_244__DBGOUT_SYMBOL_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_245__DBGOUT_SYMBOL_METHOD;
+ struct MELT_ROUTINE_STRUCT (4) drout_246__DBGOUT_CLASS_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_247__DBGOUT_CLASS_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_248__CLASS_CLASS;
+ struct MELT_STRING_STRUCT (11) dstr_249__CLASS_CLASS;
+ struct MELT_ROUTINE_STRUCT (2) drout_250__DBGOUTAGAIN_KEYWORD_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_251__DBGOUTAGAIN_KEYWORD_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_252__CLASS_KEYWORD;
+ struct MELT_STRING_STRUCT (13) dstr_253__CLASS_KEYWORD;
+ struct MELT_ROUTINE_STRUCT (4) drout_254__DBGOUT_KEYWORD_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_255__DBGOUT_KEYWORD_METHOD;
struct MELT_ROUTINE_STRUCT (0)
- drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_255__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_256__CLASS_CLONED_SYMBOL;
- struct MELT_STRING_STRUCT (19) dstr_257__CLASS_CLONED_SYM;
- struct MELT_ROUTINE_STRUCT (4) drout_258__DBGOUT_CLONED_SYMBOL_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_259__DBGOUT_CLONED_SYMBOL_METHOD;
- struct MELT_ROUTINE_STRUCT (5) drout_260__DBGOUT_ENVIRONMENT_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_261__DBGOUT_ENVIRONMENT_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_262__CLASS_ENVIRONMENT;
- struct MELT_STRING_STRUCT (17) dstr_263__CLASS_ENVIRONMEN;
- struct MELT_OBJECT_STRUCT (3) dsym_264__ENV_PREV;
- struct MELT_STRING_STRUCT (8) dstr_265__ENV_PREV;
- struct MELT_ROUTINE_STRUCT (0) drout_266__DBGOUTAGAIN_CTYPE_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_267__DBGOUTAGAIN_CTYPE_METHOD;
- struct MELT_ROUTINE_STRUCT (4) drout_268__DBGOUT_CTYPE_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_269__DBGOUT_CTYPE_METHOD;
- struct MELT_ROUTINE_STRUCT (4) drout_270__DBGOUT_ANYBINDING_METHOD;
- struct MELT_CLOSURE_STRUCT (0) dclo_271__DBGOUT_ANYBINDING_METHOD;
- struct MELT_OBJECT_STRUCT (3) dsym_272__CLASS_ANY_BINDING;
- struct MELT_STRING_STRUCT (17) dstr_273__CLASS_ANY_BINDIN;
- struct MELT_ROUTINE_STRUCT (5) drout_274__DISPLAY_DEBUG_MESSAGE;
- struct MELT_CLOSURE_STRUCT (0) dclo_275__DISPLAY_DEBUG_MESSAGE;
- struct MELT_OBJECT_STRUCT (3) dsym_276__DBG_OUT;
- struct MELT_STRING_STRUCT (7) dstr_277__DBG_OUT;
- struct MELT_OBJECT_STRUCT (3) dsym_278__DBG_OUTOBJECT;
- struct MELT_STRING_STRUCT (13) dstr_279__DBG_OUTOBJECT;
- struct MELT_OBJECT_STRUCT (3) dsym_280__DBGOUT_FIELDS;
- struct MELT_STRING_STRUCT (13) dstr_281__DBGOUT_FIELDS;
- struct MELT_OBJECT_STRUCT (3) dsym_282__DBGOUTAGAIN_FIELDS;
- struct MELT_STRING_STRUCT (18) dstr_283__DBGOUTAGAIN_FIEL;
- struct MELT_OBJECT_STRUCT (3) dsym_284__DEBUG_MSG_FUN;
- struct MELT_STRING_STRUCT (13) dstr_285__DEBUG_MSG_FUN;
- struct MELT_OBJECT_STRUCT (3) dsym_286__DISPLAY_DEBUG_MESSAGE;
- struct MELT_STRING_STRUCT (21) dstr_287__DISPLAY_DEBUG_ME;
- struct MELT_OBJECT_STRUCT (3) dsym_288__MELT_DEBUG_FUN;
- struct MELT_STRING_STRUCT (14) dstr_289__MELT_DEBUG_FUN;
- struct MELT_OBJECT_STRUCT (3) dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN;
- struct MELT_STRING_STRUCT (29) dstr_291__REGISTER_BASICBL;
- struct MELT_OBJECT_STRUCT (3) dsym_292__REGISTER_EDGE_DEBUG_FUN;
- struct MELT_STRING_STRUCT (23) dstr_293__REGISTER_EDGE_DE;
- struct MELT_OBJECT_STRUCT (3) dsym_294__REGISTER_GIMPLE_DEBUG_FUN;
- struct MELT_STRING_STRUCT (25) dstr_295__REGISTER_GIMPLE_;
- struct MELT_OBJECT_STRUCT (3) dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN;
- struct MELT_STRING_STRUCT (28) dstr_297__REGISTER_GIMPLES;
- struct MELT_OBJECT_STRUCT (3) dsym_298__REGISTER_LOOP_DEBUG_FUN;
- struct MELT_STRING_STRUCT (23) dstr_299__REGISTER_LOOP_DE;
- struct MELT_OBJECT_STRUCT (3) dsym_300__REGISTER_TREE_DEBUG_FUN;
- struct MELT_STRING_STRUCT (23) dstr_301__REGISTER_TREE_DE;
+ drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_257__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_258__CLASS_CLONED_SYMBOL;
+ struct MELT_STRING_STRUCT (19) dstr_259__CLASS_CLONED_SYM;
+ struct MELT_ROUTINE_STRUCT (4) drout_260__DBGOUT_CLONED_SYMBOL_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_261__DBGOUT_CLONED_SYMBOL_METHOD;
+ struct MELT_ROUTINE_STRUCT (5) drout_262__DBGOUT_ENVIRONMENT_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_263__DBGOUT_ENVIRONMENT_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_264__CLASS_ENVIRONMENT;
+ struct MELT_STRING_STRUCT (17) dstr_265__CLASS_ENVIRONMEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_266__ENV_PREV;
+ struct MELT_STRING_STRUCT (8) dstr_267__ENV_PREV;
+ struct MELT_ROUTINE_STRUCT (0) drout_268__DBGOUTAGAIN_CTYPE_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_269__DBGOUTAGAIN_CTYPE_METHOD;
+ struct MELT_ROUTINE_STRUCT (4) drout_270__DBGOUT_CTYPE_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_271__DBGOUT_CTYPE_METHOD;
+ struct MELT_ROUTINE_STRUCT (4) drout_272__DBGOUT_ANYBINDING_METHOD;
+ struct MELT_CLOSURE_STRUCT (0) dclo_273__DBGOUT_ANYBINDING_METHOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_274__CLASS_ANY_BINDING;
+ struct MELT_STRING_STRUCT (17) dstr_275__CLASS_ANY_BINDIN;
+ struct MELT_ROUTINE_STRUCT (5) drout_276__DISPLAY_DEBUG_MESSAGE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_277__DISPLAY_DEBUG_MESSAGE;
+ struct MELT_OBJECT_STRUCT (3) dsym_278__DBG_OUT;
+ struct MELT_STRING_STRUCT (7) dstr_279__DBG_OUT;
+ struct MELT_OBJECT_STRUCT (3) dsym_280__DBG_OUTOBJECT;
+ struct MELT_STRING_STRUCT (13) dstr_281__DBG_OUTOBJECT;
+ struct MELT_OBJECT_STRUCT (3) dsym_282__DBGOUT_FIELDS;
+ struct MELT_STRING_STRUCT (13) dstr_283__DBGOUT_FIELDS;
+ struct MELT_OBJECT_STRUCT (3) dsym_284__DBGOUTAGAIN_FIELDS;
+ struct MELT_STRING_STRUCT (18) dstr_285__DBGOUTAGAIN_FIEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_286__DEBUG_MSG_FUN;
+ struct MELT_STRING_STRUCT (13) dstr_287__DEBUG_MSG_FUN;
+ struct MELT_OBJECT_STRUCT (3) dsym_288__DISPLAY_DEBUG_MESSAGE;
+ struct MELT_STRING_STRUCT (21) dstr_289__DISPLAY_DEBUG_ME;
+ struct MELT_OBJECT_STRUCT (3) dsym_290__MELT_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (14) dstr_291__MELT_DEBUG_FUN;
+ struct MELT_OBJECT_STRUCT (3) dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (29) dstr_293__REGISTER_BASICBL;
+ struct MELT_OBJECT_STRUCT (3) dsym_294__REGISTER_EDGE_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (23) dstr_295__REGISTER_EDGE_DE;
+ struct MELT_OBJECT_STRUCT (3) dsym_296__REGISTER_GIMPLE_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (25) dstr_297__REGISTER_GIMPLE_;
+ struct MELT_OBJECT_STRUCT (3) dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (28) dstr_299__REGISTER_GIMPLES;
+ struct MELT_OBJECT_STRUCT (3) dsym_300__REGISTER_LOOP_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (23) dstr_301__REGISTER_LOOP_DE;
+ struct MELT_OBJECT_STRUCT (3) dsym_302__REGISTER_TREE_DEBUG_FUN;
+ struct MELT_STRING_STRUCT (23) dstr_303__REGISTER_TREE_DE;
long spare_;
} *cdat = NULL;
cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0);
@@ -2605,7 +2660,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_5__CLASS_DEBUG_INFORMATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_5__CLASS_DEBUG_INFORMATION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_5__CLASS_DEBUG_INFORMATION.obj_hash = 406209488;
+ cdat->dobj_5__CLASS_DEBUG_INFORMATION.obj_hash = 466277010;
cdat->dobj_5__CLASS_DEBUG_INFORMATION.obj_len = 8;
@@ -2671,7 +2726,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_11__DBGI_OUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_11__DBGI_OUT.obj_num = 0;
- cdat->dobj_11__DBGI_OUT.obj_hash = 930230801;
+ cdat->dobj_11__DBGI_OUT.obj_hash = 451973145;
cdat->dobj_11__DBGI_OUT.obj_len = 4;
@@ -2723,7 +2778,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_15__DBGI_OCCMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_15__DBGI_OCCMAP.obj_num = 1;
- cdat->dobj_15__DBGI_OCCMAP.obj_hash = 492817860;
+ cdat->dobj_15__DBGI_OCCMAP.obj_hash = 179640538;
cdat->dobj_15__DBGI_OCCMAP.obj_len = 4;
@@ -2777,7 +2832,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_19__DBGI_MAXDEPTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_19__DBGI_MAXDEPTH.obj_num = 2;
- cdat->dobj_19__DBGI_MAXDEPTH.obj_hash = 446409942;
+ cdat->dobj_19__DBGI_MAXDEPTH.obj_hash = 282171215;
cdat->dobj_19__DBGI_MAXDEPTH.obj_len = 4;
@@ -2831,7 +2886,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_23__DEBUG_DEPTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_23__DEBUG_DEPTH.obj_hash = 1030737811;
+ cdat->dobj_23__DEBUG_DEPTH.obj_hash = 23198282;
cdat->dobj_23__DEBUG_DEPTH.obj_len = 5;
/*inimult dtup_24__DEBUG_DEPTH */
@@ -2906,7 +2961,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_30__MELT_REALLY_NEED_DEBUG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_30__MELT_REALLY_NEED_DEBUG.obj_hash = 339615749;
+ cdat->dobj_30__MELT_REALLY_NEED_DEBUG.obj_hash = 971662223;
cdat->dobj_30__MELT_REALLY_NEED_DEBUG.obj_len = 5;
/*inimult dtup_31__MELT_REALLY_NEED_DEBUG */
@@ -2965,7 +3020,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_35.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_35.obj_num = 0;
- cdat->dobj_35.obj_hash = 696645619;
+ cdat->dobj_35.obj_hash = 279996657;
cdat->dobj_35.obj_len = 2;
@@ -3039,7 +3094,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_41__MELT_HAS_FLAG_DEBUG_SET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_41__MELT_HAS_FLAG_DEBUG_SET.obj_hash = 1057792384;
+ cdat->dobj_41__MELT_HAS_FLAG_DEBUG_SET.obj_hash = 545623700;
cdat->dobj_41__MELT_HAS_FLAG_DEBUG_SET.obj_len = 5;
/*inimult dtup_42__MELT_HAS_FLAG_DEBUG_SET */
@@ -3118,7 +3173,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_48__MELT_REALLY_NEED_DBGLIM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_48__MELT_REALLY_NEED_DBGLIM.obj_hash = 614014937;
+ cdat->dobj_48__MELT_REALLY_NEED_DBGLIM.obj_hash = 541150080;
cdat->dobj_48__MELT_REALLY_NEED_DBGLIM.obj_len = 5;
/*inimult dtup_49__MELT_REALLY_NEED_DBGLIM */
@@ -3151,7 +3206,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_51.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_51.obj_num = 0;
- cdat->dobj_51.obj_hash = 146425251;
+ cdat->dobj_51.obj_hash = 677903759;
cdat->dobj_51.obj_len = 2;
@@ -3198,7 +3253,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_54.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_54.obj_num = 1;
- cdat->dobj_54.obj_hash = 395695135;
+ cdat->dobj_54.obj_hash = 559451043;
cdat->dobj_54.obj_len = 2;
@@ -3489,7 +3544,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_77.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_77.obj_num = 0;
- cdat->dobj_77.obj_hash = 707995558;
+ cdat->dobj_77.obj_hash = 811434475;
cdat->dobj_77.obj_len = 2;
@@ -3536,7 +3591,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_80.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_80.obj_num = 1;
- cdat->dobj_80.obj_hash = 703400427;
+ cdat->dobj_80.obj_hash = 126413711;
cdat->dobj_80.obj_len = 2;
/*^iniobj */
@@ -3557,7 +3612,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_81.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_81.obj_num = 2;
- cdat->dobj_81.obj_hash = 109983792;
+ cdat->dobj_81.obj_hash = 479861903;
cdat->dobj_81.obj_len = 2;
/*inimult dtup_82__DBG_OUTPUT */
@@ -3580,7 +3635,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_83__DBG_OUTPUT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V13*/ meltfptr[12]);
- cdat->dobj_83__DBG_OUTPUT.obj_hash = 694136124;
+ cdat->dobj_83__DBG_OUTPUT.obj_hash = 325656533;
cdat->dobj_83__DBG_OUTPUT.obj_len = 4;
@@ -3637,7 +3692,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_87.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_87.obj_num = 0;
- cdat->dobj_87.obj_hash = 638609385;
+ cdat->dobj_87.obj_hash = 103220053;
cdat->dobj_87.obj_len = 2;
/*^iniobj */
@@ -3658,7 +3713,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_88.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_88.obj_num = 1;
- cdat->dobj_88.obj_hash = 207591256;
+ cdat->dobj_88.obj_hash = 664199928;
cdat->dobj_88.obj_len = 2;
/*^iniobj */
@@ -3679,7 +3734,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_89.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_89.obj_num = 2;
- cdat->dobj_89.obj_hash = 853581258;
+ cdat->dobj_89.obj_hash = 995770327;
cdat->dobj_89.obj_len = 2;
/*inimult dtup_90__DBG_OUTPUTAGAIN */
@@ -3704,7 +3759,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_91__DBG_OUTPUTAGAIN.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V13*/ meltfptr[12]);
- cdat->dobj_91__DBG_OUTPUTAGAIN.obj_hash = 448589613;
+ cdat->dobj_91__DBG_OUTPUTAGAIN.obj_hash = 44165307;
cdat->dobj_91__DBG_OUTPUTAGAIN.obj_len = 4;
@@ -3791,7 +3846,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_97__TREE_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_97__TREE_DEBUG_FUNCONT.obj_hash = 923866942;
+ cdat->dobj_97__TREE_DEBUG_FUNCONT.obj_hash = 331659275;
cdat->dobj_97__TREE_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_98__REGISTER_TREE_DEBUG_FUN */
@@ -3885,7 +3940,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_104__GIMPLE_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_104__GIMPLE_DEBUG_FUNCONT.obj_hash = 375394474;
+ cdat->dobj_104__GIMPLE_DEBUG_FUNCONT.obj_hash = 93199636;
cdat->dobj_104__GIMPLE_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_105__REGISTER_GIMPLE_DEBUG_FUN */
@@ -3954,7 +4009,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_109__GIMPLESEQ_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_109__GIMPLESEQ_DEBUG_FUNCONT.obj_hash = 796996986;
+ cdat->dobj_109__GIMPLESEQ_DEBUG_FUNCONT.obj_hash = 961111472;
cdat->dobj_109__GIMPLESEQ_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_110__REGISTER_GIMPLESEQ_DEBUG_FUN */
@@ -4021,7 +4076,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_114__EDGE_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_114__EDGE_DEBUG_FUNCONT.obj_hash = 780864641;
+ cdat->dobj_114__EDGE_DEBUG_FUNCONT.obj_hash = 411456036;
cdat->dobj_114__EDGE_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_115__REGISTER_EDGE_DEBUG_FUN */
@@ -4090,7 +4145,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_119__BASICBLOCK_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_119__BASICBLOCK_DEBUG_FUNCONT.obj_hash = 443180895;
+ cdat->dobj_119__BASICBLOCK_DEBUG_FUNCONT.obj_hash = 973459562;
cdat->dobj_119__BASICBLOCK_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_120__REGISTER_BASICBLOCK_DEBUG_FUN */
@@ -4157,7 +4212,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_124__LOOP_DEBUG_FUNCONT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V14*/ meltfptr[13]);
- cdat->dobj_124__LOOP_DEBUG_FUNCONT.obj_hash = 223838919;
+ cdat->dobj_124__LOOP_DEBUG_FUNCONT.obj_hash = 866231001;
cdat->dobj_124__LOOP_DEBUG_FUNCONT.obj_len = 1;
/*inirout drout_125__REGISTER_LOOP_DEBUG_FUN */
@@ -4254,7 +4309,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->dobj_131__DISCR_DEBUG_CLOSURE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_DISCRIMINANT__V16*/ meltfptr[15]);
cdat->dobj_131__DISCR_DEBUG_CLOSURE.obj_num = MELTOBMAG_CLOSURE;
- cdat->dobj_131__DISCR_DEBUG_CLOSURE.obj_hash = 594104138;
+ cdat->dobj_131__DISCR_DEBUG_CLOSURE.obj_hash = 692317732;
cdat->dobj_131__DISCR_DEBUG_CLOSURE.obj_len = 5;
@@ -4478,7 +4533,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->drout_151__DBGOUTAGAIN_FIELDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_151__DBGOUTAGAIN_FIELDS.routdescr,
- "DBGOUTAGAIN_FIELDS @warmelt-debug.melt:541",
+ "DBGOUTAGAIN_FIELDS @warmelt-debug.melt:542",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_151__DBGOUTAGAIN_FIELDS.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_151__DBGOUTAGAIN_FIELDS,
@@ -4497,7 +4552,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->drout_153__DBGOUT_NULL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_153__DBGOUT_NULL_METHOD.routdescr,
- "DBGOUT_NULL_METHOD @warmelt-debug.melt:582",
+ "DBGOUT_NULL_METHOD @warmelt-debug.melt:583",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_153__DBGOUT_NULL_METHOD.nbval = 0;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_153__DBGOUT_NULL_METHOD,
@@ -4574,7 +4629,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
cdat->drout_159__DBGOUT_STRING_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_159__DBGOUT_STRING_METHOD.routdescr,
- "DBGOUT_STRING_METHOD @warmelt-debug.melt:590",
+ "DBGOUT_STRING_METHOD @warmelt-debug.melt:591",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_159__DBGOUT_STRING_METHOD.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_159__DBGOUT_STRING_METHOD,
@@ -4615,1646 +4670,1665 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__,
"DISCR_STRING",
sizeof (cdat->dstr_162__DISCR_STRING.val) -
1);
- /*inirout drout_163__DBGOUT_INTEGER_METHOD */
+ /*inirout drout_163__DBGOUT_STRBUF_METHOD */
/*_.VALROUT___V208*/ meltfptr[207] =
- (void *) &cdat->drout_163__DBGOUT_INTEGER_METHOD;
- cdat->drout_163__DBGOUT_INTEGER_METHOD.discr =
+ (void *) &cdat->drout_163__DBGOUT_STRBUF_METHOD;
+ cdat->drout_163__DBGOUT_STRBUF_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_163__DBGOUT_INTEGER_METHOD.routdescr,
- "DBGOUT_INTEGER_METHOD @warmelt-debug.melt:612",
+ strncpy (cdat->drout_163__DBGOUT_STRBUF_METHOD.routdescr,
+ "DBGOUT_STRBUF_METHOD @warmelt-debug.melt:613",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_163__DBGOUT_INTEGER_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_163__DBGOUT_INTEGER_METHOD,
- meltrout_15_warmelt_debug_DBGOUT_INTEGER_METHOD);
+ cdat->drout_163__DBGOUT_STRBUF_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_163__DBGOUT_STRBUF_METHOD,
+ meltrout_15_warmelt_debug_DBGOUT_STRBUF_METHOD);
- /*iniclos dclo_164__DBGOUT_INTEGER_METHOD */
+ /*iniclos dclo_164__DBGOUT_STRBUF_METHOD */
/*_.VALCLO___V209*/ meltfptr[208] =
- (void *) &cdat->dclo_164__DBGOUT_INTEGER_METHOD;
- cdat->dclo_164__DBGOUT_INTEGER_METHOD.discr =
+ (void *) &cdat->dclo_164__DBGOUT_STRBUF_METHOD;
+ cdat->dclo_164__DBGOUT_STRBUF_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_164__DBGOUT_INTEGER_METHOD.nbval = 0;
+ cdat->dclo_164__DBGOUT_STRBUF_METHOD.nbval = 0;
- /*inirout drout_165__DBGOUT_MIXINT_METHOD */
+ /*inirout drout_165__DBGOUT_INTEGER_METHOD */
/*_.VALROUT___V210*/ meltfptr[209] =
- (void *) &cdat->drout_165__DBGOUT_MIXINT_METHOD;
- cdat->drout_165__DBGOUT_MIXINT_METHOD.discr =
+ (void *) &cdat->drout_165__DBGOUT_INTEGER_METHOD;
+ cdat->drout_165__DBGOUT_INTEGER_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_165__DBGOUT_MIXINT_METHOD.routdescr,
- "DBGOUT_MIXINT_METHOD @warmelt-debug.melt:631",
+ strncpy (cdat->drout_165__DBGOUT_INTEGER_METHOD.routdescr,
+ "DBGOUT_INTEGER_METHOD @warmelt-debug.melt:700",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_165__DBGOUT_MIXINT_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_165__DBGOUT_MIXINT_METHOD,
- meltrout_16_warmelt_debug_DBGOUT_MIXINT_METHOD);
+ cdat->drout_165__DBGOUT_INTEGER_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_165__DBGOUT_INTEGER_METHOD,
+ meltrout_16_warmelt_debug_DBGOUT_INTEGER_METHOD);
- /*iniclos dclo_166__DBGOUT_MIXINT_METHOD */
+ /*iniclos dclo_166__DBGOUT_INTEGER_METHOD */
/*_.VALCLO___V211*/ meltfptr[210] =
- (void *) &cdat->dclo_166__DBGOUT_MIXINT_METHOD;
- cdat->dclo_166__DBGOUT_MIXINT_METHOD.discr =
+ (void *) &cdat->dclo_166__DBGOUT_INTEGER_METHOD;
+ cdat->dclo_166__DBGOUT_INTEGER_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_166__DBGOUT_INTEGER_METHOD.nbval = 0;
+
+ /*inirout drout_167__DBGOUT_MIXINT_METHOD */
+ /*_.VALROUT___V212*/ meltfptr[211] =
+ (void *) &cdat->drout_167__DBGOUT_MIXINT_METHOD;
+ cdat->drout_167__DBGOUT_MIXINT_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_167__DBGOUT_MIXINT_METHOD.routdescr,
+ "DBGOUT_MIXINT_METHOD @warmelt-debug.melt:719",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_167__DBGOUT_MIXINT_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_167__DBGOUT_MIXINT_METHOD,
+ meltrout_17_warmelt_debug_DBGOUT_MIXINT_METHOD);
+
+ /*iniclos dclo_168__DBGOUT_MIXINT_METHOD */
+ /*_.VALCLO___V213*/ meltfptr[212] =
+ (void *) &cdat->dclo_168__DBGOUT_MIXINT_METHOD;
+ cdat->dclo_168__DBGOUT_MIXINT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_166__DBGOUT_MIXINT_METHOD.nbval = 0;
+ cdat->dclo_168__DBGOUT_MIXINT_METHOD.nbval = 0;
-/*iniobj dsym_167__DISCR_MIXED_INTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V212*/ meltfptr[211])
- /*_.VALDATA___V212*/
- meltfptr[211] = (void *) &cdat->dsym_167__DISCR_MIXED_INTEGER;
+/*iniobj dsym_169__DISCR_MIXED_INTEGER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V214*/ meltfptr[213])
+ /*_.VALDATA___V214*/
+ meltfptr[213] = (void *) &cdat->dsym_169__DISCR_MIXED_INTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_167__DISCR_MIXED_INTEGER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_169__DISCR_MIXED_INTEGER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_167__DISCR_MIXED_INTEGER",
+ ("iniobj check.discr objmagic dsym_169__DISCR_MIXED_INTEGER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_167__DISCR_MIXED_INTEGER.meltobj_class =
+ cdat->dsym_169__DISCR_MIXED_INTEGER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_167__DISCR_MIXED_INTEGER.obj_hash = 355248820;
- cdat->dsym_167__DISCR_MIXED_INTEGER.obj_len = 3;
+ cdat->dsym_169__DISCR_MIXED_INTEGER.obj_hash = 355248820;
+ cdat->dsym_169__DISCR_MIXED_INTEGER.obj_len = 3;
-/*inistring dstr_168__DISCR_MIXED_INTE*/
- /*_.VALSTR___V213*/ meltfptr[212] =
- (void *) &cdat->dstr_168__DISCR_MIXED_INTE;
- cdat->dstr_168__DISCR_MIXED_INTE.discr =
+/*inistring dstr_170__DISCR_MIXED_INTE*/
+ /*_.VALSTR___V215*/ meltfptr[214] =
+ (void *) &cdat->dstr_170__DISCR_MIXED_INTE;
+ cdat->dstr_170__DISCR_MIXED_INTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_168__DISCR_MIXED_INTE.val,
+ /*small inistring */ strncpy (cdat->dstr_170__DISCR_MIXED_INTE.val,
"DISCR_MIXED_INTEGER",
- sizeof (cdat->dstr_168__DISCR_MIXED_INTE.
+ sizeof (cdat->dstr_170__DISCR_MIXED_INTE.
val) - 1);
- /*inirout drout_169__DBGOUT_MIXLOC_METHOD */
- /*_.VALROUT___V214*/ meltfptr[213] =
- (void *) &cdat->drout_169__DBGOUT_MIXLOC_METHOD;
- cdat->drout_169__DBGOUT_MIXLOC_METHOD.discr =
+ /*inirout drout_171__DBGOUT_MIXLOC_METHOD */
+ /*_.VALROUT___V216*/ meltfptr[215] =
+ (void *) &cdat->drout_171__DBGOUT_MIXLOC_METHOD;
+ cdat->drout_171__DBGOUT_MIXLOC_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_169__DBGOUT_MIXLOC_METHOD.routdescr,
- "DBGOUT_MIXLOC_METHOD @warmelt-debug.melt:658",
+ strncpy (cdat->drout_171__DBGOUT_MIXLOC_METHOD.routdescr,
+ "DBGOUT_MIXLOC_METHOD @warmelt-debug.melt:746",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_169__DBGOUT_MIXLOC_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_169__DBGOUT_MIXLOC_METHOD,
- meltrout_17_warmelt_debug_DBGOUT_MIXLOC_METHOD);
-
- /*iniclos dclo_170__DBGOUT_MIXLOC_METHOD */
- /*_.VALCLO___V215*/ meltfptr[214] =
- (void *) &cdat->dclo_170__DBGOUT_MIXLOC_METHOD;
- cdat->dclo_170__DBGOUT_MIXLOC_METHOD.discr =
+ cdat->drout_171__DBGOUT_MIXLOC_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_171__DBGOUT_MIXLOC_METHOD,
+ meltrout_18_warmelt_debug_DBGOUT_MIXLOC_METHOD);
+
+ /*iniclos dclo_172__DBGOUT_MIXLOC_METHOD */
+ /*_.VALCLO___V217*/ meltfptr[216] =
+ (void *) &cdat->dclo_172__DBGOUT_MIXLOC_METHOD;
+ cdat->dclo_172__DBGOUT_MIXLOC_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_170__DBGOUT_MIXLOC_METHOD.nbval = 0;
+ cdat->dclo_172__DBGOUT_MIXLOC_METHOD.nbval = 0;
-/*iniobj dsym_171__DISCR_MIXED_LOCATION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V216*/ meltfptr[215])
- /*_.VALDATA___V216*/
- meltfptr[215] = (void *) &cdat->dsym_171__DISCR_MIXED_LOCATION;
+/*iniobj dsym_173__DISCR_MIXED_LOCATION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217])
+ /*_.VALDATA___V218*/
+ meltfptr[217] = (void *) &cdat->dsym_173__DISCR_MIXED_LOCATION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_171__DISCR_MIXED_LOCATION",
+ melt_assertmsg ("iniobj check.discr isobj dsym_173__DISCR_MIXED_LOCATION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_171__DISCR_MIXED_LOCATION",
+ ("iniobj check.discr objmagic dsym_173__DISCR_MIXED_LOCATION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_171__DISCR_MIXED_LOCATION.meltobj_class =
+ cdat->dsym_173__DISCR_MIXED_LOCATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_171__DISCR_MIXED_LOCATION.obj_hash = 1019373807;
- cdat->dsym_171__DISCR_MIXED_LOCATION.obj_len = 3;
+ cdat->dsym_173__DISCR_MIXED_LOCATION.obj_hash = 1019373807;
+ cdat->dsym_173__DISCR_MIXED_LOCATION.obj_len = 3;
-/*inistring dstr_172__DISCR_MIXED_LOCA*/
- /*_.VALSTR___V217*/ meltfptr[216] =
- (void *) &cdat->dstr_172__DISCR_MIXED_LOCA;
- cdat->dstr_172__DISCR_MIXED_LOCA.discr =
+/*inistring dstr_174__DISCR_MIXED_LOCA*/
+ /*_.VALSTR___V219*/ meltfptr[218] =
+ (void *) &cdat->dstr_174__DISCR_MIXED_LOCA;
+ cdat->dstr_174__DISCR_MIXED_LOCA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_172__DISCR_MIXED_LOCA.val,
+ /*small inistring */ strncpy (cdat->dstr_174__DISCR_MIXED_LOCA.val,
"DISCR_MIXED_LOCATION",
- sizeof (cdat->dstr_172__DISCR_MIXED_LOCA.
+ sizeof (cdat->dstr_174__DISCR_MIXED_LOCA.
val) - 1);
- /*inirout drout_173__DBGOUT_MIXBIGINT_METHOD */
- /*_.VALROUT___V218*/ meltfptr[217] =
- (void *) &cdat->drout_173__DBGOUT_MIXBIGINT_METHOD;
- cdat->drout_173__DBGOUT_MIXBIGINT_METHOD.discr =
+ /*inirout drout_175__DBGOUT_MIXBIGINT_METHOD */
+ /*_.VALROUT___V220*/ meltfptr[219] =
+ (void *) &cdat->drout_175__DBGOUT_MIXBIGINT_METHOD;
+ cdat->drout_175__DBGOUT_MIXBIGINT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_173__DBGOUT_MIXBIGINT_METHOD.routdescr,
- "DBGOUT_MIXBIGINT_METHOD @warmelt-debug.melt:687",
+ strncpy (cdat->drout_175__DBGOUT_MIXBIGINT_METHOD.routdescr,
+ "DBGOUT_MIXBIGINT_METHOD @warmelt-debug.melt:775",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_173__DBGOUT_MIXBIGINT_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_173__DBGOUT_MIXBIGINT_METHOD,
- meltrout_18_warmelt_debug_DBGOUT_MIXBIGINT_METHOD);
-
- /*iniclos dclo_174__DBGOUT_MIXBIGINT_METHOD */
- /*_.VALCLO___V219*/ meltfptr[218] =
- (void *) &cdat->dclo_174__DBGOUT_MIXBIGINT_METHOD;
- cdat->dclo_174__DBGOUT_MIXBIGINT_METHOD.discr =
+ cdat->drout_175__DBGOUT_MIXBIGINT_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_175__DBGOUT_MIXBIGINT_METHOD,
+ meltrout_19_warmelt_debug_DBGOUT_MIXBIGINT_METHOD);
+
+ /*iniclos dclo_176__DBGOUT_MIXBIGINT_METHOD */
+ /*_.VALCLO___V221*/ meltfptr[220] =
+ (void *) &cdat->dclo_176__DBGOUT_MIXBIGINT_METHOD;
+ cdat->dclo_176__DBGOUT_MIXBIGINT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_174__DBGOUT_MIXBIGINT_METHOD.nbval = 0;
+ cdat->dclo_176__DBGOUT_MIXBIGINT_METHOD.nbval = 0;
-/*iniobj dsym_175__DISCR_MIXED_BIGINT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V220*/ meltfptr[219])
- /*_.VALDATA___V220*/
- meltfptr[219] = (void *) &cdat->dsym_175__DISCR_MIXED_BIGINT;
+/*iniobj dsym_177__DISCR_MIXED_BIGINT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V222*/ meltfptr[221])
+ /*_.VALDATA___V222*/
+ meltfptr[221] = (void *) &cdat->dsym_177__DISCR_MIXED_BIGINT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_175__DISCR_MIXED_BIGINT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_177__DISCR_MIXED_BIGINT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_175__DISCR_MIXED_BIGINT",
+ ("iniobj check.discr objmagic dsym_177__DISCR_MIXED_BIGINT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_175__DISCR_MIXED_BIGINT.meltobj_class =
+ cdat->dsym_177__DISCR_MIXED_BIGINT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_175__DISCR_MIXED_BIGINT.obj_hash = 484145131;
- cdat->dsym_175__DISCR_MIXED_BIGINT.obj_len = 3;
+ cdat->dsym_177__DISCR_MIXED_BIGINT.obj_hash = 484145131;
+ cdat->dsym_177__DISCR_MIXED_BIGINT.obj_len = 3;
-/*inistring dstr_176__DISCR_MIXED_BIGI*/
- /*_.VALSTR___V221*/ meltfptr[220] =
- (void *) &cdat->dstr_176__DISCR_MIXED_BIGI;
- cdat->dstr_176__DISCR_MIXED_BIGI.discr =
+/*inistring dstr_178__DISCR_MIXED_BIGI*/
+ /*_.VALSTR___V223*/ meltfptr[222] =
+ (void *) &cdat->dstr_178__DISCR_MIXED_BIGI;
+ cdat->dstr_178__DISCR_MIXED_BIGI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_176__DISCR_MIXED_BIGI.val,
+ /*small inistring */ strncpy (cdat->dstr_178__DISCR_MIXED_BIGI.val,
"DISCR_MIXED_BIGINT",
- sizeof (cdat->dstr_176__DISCR_MIXED_BIGI.
+ sizeof (cdat->dstr_178__DISCR_MIXED_BIGI.
val) - 1);
- /*inirout drout_177__DBGOUT_MULTIPLE_METHOD */
- /*_.VALROUT___V222*/ meltfptr[221] =
- (void *) &cdat->drout_177__DBGOUT_MULTIPLE_METHOD;
- cdat->drout_177__DBGOUT_MULTIPLE_METHOD.discr =
+ /*inirout drout_179__DBGOUT_MULTIPLE_METHOD */
+ /*_.VALROUT___V224*/ meltfptr[223] =
+ (void *) &cdat->drout_179__DBGOUT_MULTIPLE_METHOD;
+ cdat->drout_179__DBGOUT_MULTIPLE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_177__DBGOUT_MULTIPLE_METHOD.routdescr,
- "DBGOUT_MULTIPLE_METHOD @warmelt-debug.melt:709",
+ strncpy (cdat->drout_179__DBGOUT_MULTIPLE_METHOD.routdescr,
+ "DBGOUT_MULTIPLE_METHOD @warmelt-debug.melt:797",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_177__DBGOUT_MULTIPLE_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_177__DBGOUT_MULTIPLE_METHOD,
- meltrout_19_warmelt_debug_DBGOUT_MULTIPLE_METHOD);
-
- /*iniclos dclo_178__DBGOUT_MULTIPLE_METHOD */
- /*_.VALCLO___V223*/ meltfptr[222] =
- (void *) &cdat->dclo_178__DBGOUT_MULTIPLE_METHOD;
- cdat->dclo_178__DBGOUT_MULTIPLE_METHOD.discr =
+ cdat->drout_179__DBGOUT_MULTIPLE_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_179__DBGOUT_MULTIPLE_METHOD,
+ meltrout_20_warmelt_debug_DBGOUT_MULTIPLE_METHOD);
+
+ /*iniclos dclo_180__DBGOUT_MULTIPLE_METHOD */
+ /*_.VALCLO___V225*/ meltfptr[224] =
+ (void *) &cdat->dclo_180__DBGOUT_MULTIPLE_METHOD;
+ cdat->dclo_180__DBGOUT_MULTIPLE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_178__DBGOUT_MULTIPLE_METHOD.nbval = 0;
+ cdat->dclo_180__DBGOUT_MULTIPLE_METHOD.nbval = 0;
-/*iniobj dsym_179__DISCR_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V224*/ meltfptr[223])
- /*_.VALDATA___V224*/
- meltfptr[223] = (void *) &cdat->dsym_179__DISCR_MULTIPLE;
+/*iniobj dsym_181__DISCR_MULTIPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V226*/ meltfptr[225])
+ /*_.VALDATA___V226*/
+ meltfptr[225] = (void *) &cdat->dsym_181__DISCR_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_179__DISCR_MULTIPLE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_181__DISCR_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_179__DISCR_MULTIPLE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_181__DISCR_MULTIPLE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_179__DISCR_MULTIPLE.meltobj_class =
+ cdat->dsym_181__DISCR_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_179__DISCR_MULTIPLE.obj_hash = 91864583;
- cdat->dsym_179__DISCR_MULTIPLE.obj_len = 3;
+ cdat->dsym_181__DISCR_MULTIPLE.obj_hash = 91864583;
+ cdat->dsym_181__DISCR_MULTIPLE.obj_len = 3;
-/*inistring dstr_180__DISCR_MULTIPLE*/
- /*_.VALSTR___V225*/ meltfptr[224] =
- (void *) &cdat->dstr_180__DISCR_MULTIPLE;
- cdat->dstr_180__DISCR_MULTIPLE.discr =
+/*inistring dstr_182__DISCR_MULTIPLE*/
+ /*_.VALSTR___V227*/ meltfptr[226] =
+ (void *) &cdat->dstr_182__DISCR_MULTIPLE;
+ cdat->dstr_182__DISCR_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_180__DISCR_MULTIPLE.val,
+ /*small inistring */ strncpy (cdat->dstr_182__DISCR_MULTIPLE.val,
"DISCR_MULTIPLE",
- sizeof (cdat->dstr_180__DISCR_MULTIPLE.val) -
+ sizeof (cdat->dstr_182__DISCR_MULTIPLE.val) -
1);
- /*inirout drout_181__DBGOUT_ROUTINE_METHOD */
- /*_.VALROUT___V226*/ meltfptr[225] =
- (void *) &cdat->drout_181__DBGOUT_ROUTINE_METHOD;
- cdat->drout_181__DBGOUT_ROUTINE_METHOD.discr =
+ /*inirout drout_183__DBGOUT_ROUTINE_METHOD */
+ /*_.VALROUT___V228*/ meltfptr[227] =
+ (void *) &cdat->drout_183__DBGOUT_ROUTINE_METHOD;
+ cdat->drout_183__DBGOUT_ROUTINE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_181__DBGOUT_ROUTINE_METHOD.routdescr,
- "DBGOUT_ROUTINE_METHOD @warmelt-debug.melt:742",
+ strncpy (cdat->drout_183__DBGOUT_ROUTINE_METHOD.routdescr,
+ "DBGOUT_ROUTINE_METHOD @warmelt-debug.melt:830",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_181__DBGOUT_ROUTINE_METHOD.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_181__DBGOUT_ROUTINE_METHOD,
- meltrout_20_warmelt_debug_DBGOUT_ROUTINE_METHOD);
-
- /*iniclos dclo_182__DBGOUT_ROUTINE_METHOD */
- /*_.VALCLO___V228*/ meltfptr[227] =
- (void *) &cdat->dclo_182__DBGOUT_ROUTINE_METHOD;
- cdat->dclo_182__DBGOUT_ROUTINE_METHOD.discr =
+ cdat->drout_183__DBGOUT_ROUTINE_METHOD.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_183__DBGOUT_ROUTINE_METHOD,
+ meltrout_21_warmelt_debug_DBGOUT_ROUTINE_METHOD);
+
+ /*iniclos dclo_184__DBGOUT_ROUTINE_METHOD */
+ /*_.VALCLO___V230*/ meltfptr[229] =
+ (void *) &cdat->dclo_184__DBGOUT_ROUTINE_METHOD;
+ cdat->dclo_184__DBGOUT_ROUTINE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_182__DBGOUT_ROUTINE_METHOD.nbval = 0;
+ cdat->dclo_184__DBGOUT_ROUTINE_METHOD.nbval = 0;
-/*iniobj dsym_183__DISCR_ROUTINE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V229*/ meltfptr[228])
- /*_.VALDATA___V229*/
- meltfptr[228] = (void *) &cdat->dsym_183__DISCR_ROUTINE;
+/*iniobj dsym_185__DISCR_ROUTINE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V231*/ meltfptr[230])
+ /*_.VALDATA___V231*/
+ meltfptr[230] = (void *) &cdat->dsym_185__DISCR_ROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_183__DISCR_ROUTINE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_185__DISCR_ROUTINE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_183__DISCR_ROUTINE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_185__DISCR_ROUTINE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_183__DISCR_ROUTINE.meltobj_class =
+ cdat->dsym_185__DISCR_ROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_183__DISCR_ROUTINE.obj_hash = 30464565;
- cdat->dsym_183__DISCR_ROUTINE.obj_len = 3;
+ cdat->dsym_185__DISCR_ROUTINE.obj_hash = 30464565;
+ cdat->dsym_185__DISCR_ROUTINE.obj_len = 3;
-/*inistring dstr_184__DISCR_ROUTINE*/
- /*_.VALSTR___V230*/ meltfptr[229] = (void *) &cdat->dstr_184__DISCR_ROUTINE;
- cdat->dstr_184__DISCR_ROUTINE.discr =
+/*inistring dstr_186__DISCR_ROUTINE*/
+ /*_.VALSTR___V232*/ meltfptr[231] = (void *) &cdat->dstr_186__DISCR_ROUTINE;
+ cdat->dstr_186__DISCR_ROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_184__DISCR_ROUTINE.val,
+ /*small inistring */ strncpy (cdat->dstr_186__DISCR_ROUTINE.val,
"DISCR_ROUTINE",
- sizeof (cdat->dstr_184__DISCR_ROUTINE.val) -
+ sizeof (cdat->dstr_186__DISCR_ROUTINE.val) -
1);
-/*iniobj dsym_185__ROUTINE_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V231*/ meltfptr[230])
- /*_.VALDATA___V231*/
- meltfptr[230] = (void *) &cdat->dsym_185__ROUTINE_EVERY;
+/*iniobj dsym_187__ROUTINE_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V233*/ meltfptr[232])
+ /*_.VALDATA___V233*/
+ meltfptr[232] = (void *) &cdat->dsym_187__ROUTINE_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_185__ROUTINE_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_187__ROUTINE_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_185__ROUTINE_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_187__ROUTINE_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_185__ROUTINE_EVERY.meltobj_class =
+ cdat->dsym_187__ROUTINE_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_185__ROUTINE_EVERY.obj_hash = 347090207;
- cdat->dsym_185__ROUTINE_EVERY.obj_len = 3;
+ cdat->dsym_187__ROUTINE_EVERY.obj_hash = 347090207;
+ cdat->dsym_187__ROUTINE_EVERY.obj_len = 3;
-/*inistring dstr_186__ROUTINE_EVERY*/
- /*_.VALSTR___V232*/ meltfptr[231] = (void *) &cdat->dstr_186__ROUTINE_EVERY;
- cdat->dstr_186__ROUTINE_EVERY.discr =
+/*inistring dstr_188__ROUTINE_EVERY*/
+ /*_.VALSTR___V234*/ meltfptr[233] = (void *) &cdat->dstr_188__ROUTINE_EVERY;
+ cdat->dstr_188__ROUTINE_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_186__ROUTINE_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_188__ROUTINE_EVERY.val,
"ROUTINE_EVERY",
- sizeof (cdat->dstr_186__ROUTINE_EVERY.val) -
+ sizeof (cdat->dstr_188__ROUTINE_EVERY.val) -
1);
- /*inirout drout_187__LAMBDA_ */
- /*_.VALROUT___V227*/ meltfptr[226] = (void *) &cdat->drout_187__LAMBDA_;
- cdat->drout_187__LAMBDA_.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_187__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:757", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_187__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_187__LAMBDA_,
- meltrout_21_warmelt_debug_LAMBDA___1__);
-
- /*inirout drout_188__DBGOUT_CLOSURE_METHOD */
- /*_.VALROUT___V233*/ meltfptr[232] =
- (void *) &cdat->drout_188__DBGOUT_CLOSURE_METHOD;
- cdat->drout_188__DBGOUT_CLOSURE_METHOD.discr =
+ /*inirout drout_189__LAMBDA_ */
+ /*_.VALROUT___V229*/ meltfptr[228] = (void *) &cdat->drout_189__LAMBDA_;
+ cdat->drout_189__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_188__DBGOUT_CLOSURE_METHOD.routdescr,
- "DBGOUT_CLOSURE_METHOD @warmelt-debug.melt:769",
- MELT_ROUTDESCR_LEN - 1);
- cdat->drout_188__DBGOUT_CLOSURE_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_188__DBGOUT_CLOSURE_METHOD,
- meltrout_22_warmelt_debug_DBGOUT_CLOSURE_METHOD);
-
- /*iniclos dclo_189__DBGOUT_CLOSURE_METHOD */
- /*_.VALCLO___V234*/ meltfptr[233] =
- (void *) &cdat->dclo_189__DBGOUT_CLOSURE_METHOD;
- cdat->dclo_189__DBGOUT_CLOSURE_METHOD.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_189__DBGOUT_CLOSURE_METHOD.nbval = 0;
+ strncpy (cdat->drout_189__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:845", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_189__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_189__LAMBDA_,
+ meltrout_22_warmelt_debug_LAMBDA___1__);
- /*inirout drout_190__DBGOUT_LIST_METHOD */
+ /*inirout drout_190__DBGOUT_CLOSURE_METHOD */
/*_.VALROUT___V235*/ meltfptr[234] =
- (void *) &cdat->drout_190__DBGOUT_LIST_METHOD;
- cdat->drout_190__DBGOUT_LIST_METHOD.discr =
+ (void *) &cdat->drout_190__DBGOUT_CLOSURE_METHOD;
+ cdat->drout_190__DBGOUT_CLOSURE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_190__DBGOUT_LIST_METHOD.routdescr,
- "DBGOUT_LIST_METHOD @warmelt-debug.melt:805",
+ strncpy (cdat->drout_190__DBGOUT_CLOSURE_METHOD.routdescr,
+ "DBGOUT_CLOSURE_METHOD @warmelt-debug.melt:857",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_190__DBGOUT_LIST_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_190__DBGOUT_LIST_METHOD,
- meltrout_23_warmelt_debug_DBGOUT_LIST_METHOD);
+ cdat->drout_190__DBGOUT_CLOSURE_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_190__DBGOUT_CLOSURE_METHOD,
+ meltrout_23_warmelt_debug_DBGOUT_CLOSURE_METHOD);
- /*iniclos dclo_191__DBGOUT_LIST_METHOD */
+ /*iniclos dclo_191__DBGOUT_CLOSURE_METHOD */
/*_.VALCLO___V236*/ meltfptr[235] =
- (void *) &cdat->dclo_191__DBGOUT_LIST_METHOD;
- cdat->dclo_191__DBGOUT_LIST_METHOD.discr =
+ (void *) &cdat->dclo_191__DBGOUT_CLOSURE_METHOD;
+ cdat->dclo_191__DBGOUT_CLOSURE_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_191__DBGOUT_CLOSURE_METHOD.nbval = 0;
+
+ /*inirout drout_192__DBGOUT_LIST_METHOD */
+ /*_.VALROUT___V237*/ meltfptr[236] =
+ (void *) &cdat->drout_192__DBGOUT_LIST_METHOD;
+ cdat->drout_192__DBGOUT_LIST_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_192__DBGOUT_LIST_METHOD.routdescr,
+ "DBGOUT_LIST_METHOD @warmelt-debug.melt:893",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_192__DBGOUT_LIST_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_192__DBGOUT_LIST_METHOD,
+ meltrout_24_warmelt_debug_DBGOUT_LIST_METHOD);
+
+ /*iniclos dclo_193__DBGOUT_LIST_METHOD */
+ /*_.VALCLO___V238*/ meltfptr[237] =
+ (void *) &cdat->dclo_193__DBGOUT_LIST_METHOD;
+ cdat->dclo_193__DBGOUT_LIST_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_191__DBGOUT_LIST_METHOD.nbval = 0;
+ cdat->dclo_193__DBGOUT_LIST_METHOD.nbval = 0;
-/*iniobj dsym_192__DISCR_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V237*/ meltfptr[236])
- /*_.VALDATA___V237*/
- meltfptr[236] = (void *) &cdat->dsym_192__DISCR_LIST;
+/*iniobj dsym_194__DISCR_LIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V239*/ meltfptr[238])
+ /*_.VALDATA___V239*/
+ meltfptr[238] = (void *) &cdat->dsym_194__DISCR_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_192__DISCR_LIST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_194__DISCR_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_192__DISCR_LIST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_194__DISCR_LIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_192__DISCR_LIST.meltobj_class =
+ cdat->dsym_194__DISCR_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_192__DISCR_LIST.obj_hash = 98407634;
- cdat->dsym_192__DISCR_LIST.obj_len = 3;
+ cdat->dsym_194__DISCR_LIST.obj_hash = 98407634;
+ cdat->dsym_194__DISCR_LIST.obj_len = 3;
-/*inistring dstr_193__DISCR_LIST*/
- /*_.VALSTR___V238*/ meltfptr[237] = (void *) &cdat->dstr_193__DISCR_LIST;
- cdat->dstr_193__DISCR_LIST.discr =
+/*inistring dstr_195__DISCR_LIST*/
+ /*_.VALSTR___V240*/ meltfptr[239] = (void *) &cdat->dstr_195__DISCR_LIST;
+ cdat->dstr_195__DISCR_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_193__DISCR_LIST.val, "DISCR_LIST",
- sizeof (cdat->dstr_193__DISCR_LIST.val) - 1);
- /*inirout drout_194__DBGOUT_PAIR_METHOD */
- /*_.VALROUT___V239*/ meltfptr[238] =
- (void *) &cdat->drout_194__DBGOUT_PAIR_METHOD;
- cdat->drout_194__DBGOUT_PAIR_METHOD.discr =
+ /*small inistring */ strncpy (cdat->dstr_195__DISCR_LIST.val, "DISCR_LIST",
+ sizeof (cdat->dstr_195__DISCR_LIST.val) - 1);
+ /*inirout drout_196__DBGOUT_PAIR_METHOD */
+ /*_.VALROUT___V241*/ meltfptr[240] =
+ (void *) &cdat->drout_196__DBGOUT_PAIR_METHOD;
+ cdat->drout_196__DBGOUT_PAIR_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_194__DBGOUT_PAIR_METHOD.routdescr,
- "DBGOUT_PAIR_METHOD @warmelt-debug.melt:845",
+ strncpy (cdat->drout_196__DBGOUT_PAIR_METHOD.routdescr,
+ "DBGOUT_PAIR_METHOD @warmelt-debug.melt:933",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_194__DBGOUT_PAIR_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_194__DBGOUT_PAIR_METHOD,
- meltrout_24_warmelt_debug_DBGOUT_PAIR_METHOD);
-
- /*iniclos dclo_195__DBGOUT_PAIR_METHOD */
- /*_.VALCLO___V240*/ meltfptr[239] =
- (void *) &cdat->dclo_195__DBGOUT_PAIR_METHOD;
- cdat->dclo_195__DBGOUT_PAIR_METHOD.discr =
+ cdat->drout_196__DBGOUT_PAIR_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_196__DBGOUT_PAIR_METHOD,
+ meltrout_25_warmelt_debug_DBGOUT_PAIR_METHOD);
+
+ /*iniclos dclo_197__DBGOUT_PAIR_METHOD */
+ /*_.VALCLO___V242*/ meltfptr[241] =
+ (void *) &cdat->dclo_197__DBGOUT_PAIR_METHOD;
+ cdat->dclo_197__DBGOUT_PAIR_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_195__DBGOUT_PAIR_METHOD.nbval = 0;
+ cdat->dclo_197__DBGOUT_PAIR_METHOD.nbval = 0;
-/*iniobj dsym_196__DISCR_PAIR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V241*/ meltfptr[240])
- /*_.VALDATA___V241*/
- meltfptr[240] = (void *) &cdat->dsym_196__DISCR_PAIR;
+/*iniobj dsym_198__DISCR_PAIR*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V243*/ meltfptr[242])
+ /*_.VALDATA___V243*/
+ meltfptr[242] = (void *) &cdat->dsym_198__DISCR_PAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_196__DISCR_PAIR",
+ melt_assertmsg ("iniobj check.discr isobj dsym_198__DISCR_PAIR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_196__DISCR_PAIR",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_198__DISCR_PAIR",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_196__DISCR_PAIR.meltobj_class =
+ cdat->dsym_198__DISCR_PAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_196__DISCR_PAIR.obj_hash = 69333571;
- cdat->dsym_196__DISCR_PAIR.obj_len = 3;
+ cdat->dsym_198__DISCR_PAIR.obj_hash = 69333571;
+ cdat->dsym_198__DISCR_PAIR.obj_len = 3;
-/*inistring dstr_197__DISCR_PAIR*/
- /*_.VALSTR___V242*/ meltfptr[241] = (void *) &cdat->dstr_197__DISCR_PAIR;
- cdat->dstr_197__DISCR_PAIR.discr =
+/*inistring dstr_199__DISCR_PAIR*/
+ /*_.VALSTR___V244*/ meltfptr[243] = (void *) &cdat->dstr_199__DISCR_PAIR;
+ cdat->dstr_199__DISCR_PAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_197__DISCR_PAIR.val, "DISCR_PAIR",
- sizeof (cdat->dstr_197__DISCR_PAIR.val) - 1);
- /*inirout drout_198__DBGOUT_MAPOBJECT_METHOD */
- /*_.VALROUT___V243*/ meltfptr[242] =
- (void *) &cdat->drout_198__DBGOUT_MAPOBJECT_METHOD;
- cdat->drout_198__DBGOUT_MAPOBJECT_METHOD.discr =
+ /*small inistring */ strncpy (cdat->dstr_199__DISCR_PAIR.val, "DISCR_PAIR",
+ sizeof (cdat->dstr_199__DISCR_PAIR.val) - 1);
+ /*inirout drout_200__DBGOUT_MAPOBJECT_METHOD */
+ /*_.VALROUT___V245*/ meltfptr[244] =
+ (void *) &cdat->drout_200__DBGOUT_MAPOBJECT_METHOD;
+ cdat->drout_200__DBGOUT_MAPOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_198__DBGOUT_MAPOBJECT_METHOD.routdescr,
- "DBGOUT_MAPOBJECT_METHOD @warmelt-debug.melt:867",
+ strncpy (cdat->drout_200__DBGOUT_MAPOBJECT_METHOD.routdescr,
+ "DBGOUT_MAPOBJECT_METHOD @warmelt-debug.melt:955",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_198__DBGOUT_MAPOBJECT_METHOD.nbval = 13;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_198__DBGOUT_MAPOBJECT_METHOD,
- meltrout_25_warmelt_debug_DBGOUT_MAPOBJECT_METHOD);
-
- /*iniclos dclo_199__DBGOUT_MAPOBJECT_METHOD */
- /*_.VALCLO___V250*/ meltfptr[249] =
- (void *) &cdat->dclo_199__DBGOUT_MAPOBJECT_METHOD;
- cdat->dclo_199__DBGOUT_MAPOBJECT_METHOD.discr =
+ cdat->drout_200__DBGOUT_MAPOBJECT_METHOD.nbval = 13;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_200__DBGOUT_MAPOBJECT_METHOD,
+ meltrout_26_warmelt_debug_DBGOUT_MAPOBJECT_METHOD);
+
+ /*iniclos dclo_201__DBGOUT_MAPOBJECT_METHOD */
+ /*_.VALCLO___V252*/ meltfptr[251] =
+ (void *) &cdat->dclo_201__DBGOUT_MAPOBJECT_METHOD;
+ cdat->dclo_201__DBGOUT_MAPOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_199__DBGOUT_MAPOBJECT_METHOD.nbval = 0;
+ cdat->dclo_201__DBGOUT_MAPOBJECT_METHOD.nbval = 0;
-/*iniobj dsym_200__MAPOBJECT_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V251*/ meltfptr[250])
- /*_.VALDATA___V251*/
- meltfptr[250] = (void *) &cdat->dsym_200__MAPOBJECT_EVERY;
+/*iniobj dsym_202__MAPOBJECT_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V253*/ meltfptr[252])
+ /*_.VALDATA___V253*/
+ meltfptr[252] = (void *) &cdat->dsym_202__MAPOBJECT_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_200__MAPOBJECT_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_202__MAPOBJECT_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_200__MAPOBJECT_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_202__MAPOBJECT_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_200__MAPOBJECT_EVERY.meltobj_class =
+ cdat->dsym_202__MAPOBJECT_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_200__MAPOBJECT_EVERY.obj_hash = 726732435;
- cdat->dsym_200__MAPOBJECT_EVERY.obj_len = 3;
+ cdat->dsym_202__MAPOBJECT_EVERY.obj_hash = 726732435;
+ cdat->dsym_202__MAPOBJECT_EVERY.obj_len = 3;
-/*inistring dstr_201__MAPOBJECT_EVERY*/
- /*_.VALSTR___V252*/ meltfptr[251] =
- (void *) &cdat->dstr_201__MAPOBJECT_EVERY;
- cdat->dstr_201__MAPOBJECT_EVERY.discr =
+/*inistring dstr_203__MAPOBJECT_EVERY*/
+ /*_.VALSTR___V254*/ meltfptr[253] =
+ (void *) &cdat->dstr_203__MAPOBJECT_EVERY;
+ cdat->dstr_203__MAPOBJECT_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_201__MAPOBJECT_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_203__MAPOBJECT_EVERY.val,
"MAPOBJECT_EVERY",
- sizeof (cdat->dstr_201__MAPOBJECT_EVERY.val) -
+ sizeof (cdat->dstr_203__MAPOBJECT_EVERY.val) -
1);
- /*inirout drout_202__LAMBDA_ */
- /*_.VALROUT___V244*/ meltfptr[243] = (void *) &cdat->drout_202__LAMBDA_;
- cdat->drout_202__LAMBDA_.discr =
+ /*inirout drout_204__LAMBDA_ */
+ /*_.VALROUT___V246*/ meltfptr[245] = (void *) &cdat->drout_204__LAMBDA_;
+ cdat->drout_204__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_202__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:891", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_202__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_202__LAMBDA_,
- meltrout_26_warmelt_debug_LAMBDA___2__);
-
- /*inirout drout_203__LAMBDA_ */
- /*_.VALROUT___V245*/ meltfptr[244] = (void *) &cdat->drout_203__LAMBDA_;
- cdat->drout_203__LAMBDA_.discr =
+ strncpy (cdat->drout_204__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:979", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_204__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_204__LAMBDA_,
+ meltrout_27_warmelt_debug_LAMBDA___2__);
+
+ /*inirout drout_205__LAMBDA_ */
+ /*_.VALROUT___V247*/ meltfptr[246] = (void *) &cdat->drout_205__LAMBDA_;
+ cdat->drout_205__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_203__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:904", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_203__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_203__LAMBDA_,
- meltrout_27_warmelt_debug_LAMBDA___3__);
+ strncpy (cdat->drout_205__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:992", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_205__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_205__LAMBDA_,
+ meltrout_28_warmelt_debug_LAMBDA___3__);
-/*iniobj dsym_204__COMPARE_OBJ_RANKED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V253*/ meltfptr[252])
- /*_.VALDATA___V253*/
- meltfptr[252] = (void *) &cdat->dsym_204__COMPARE_OBJ_RANKED;
+/*iniobj dsym_206__COMPARE_OBJ_RANKED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V255*/ meltfptr[254])
+ /*_.VALDATA___V255*/
+ meltfptr[254] = (void *) &cdat->dsym_206__COMPARE_OBJ_RANKED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_204__COMPARE_OBJ_RANKED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_206__COMPARE_OBJ_RANKED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_204__COMPARE_OBJ_RANKED",
+ ("iniobj check.discr objmagic dsym_206__COMPARE_OBJ_RANKED",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_204__COMPARE_OBJ_RANKED.meltobj_class =
+ cdat->dsym_206__COMPARE_OBJ_RANKED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_204__COMPARE_OBJ_RANKED.obj_hash = 657124045;
- cdat->dsym_204__COMPARE_OBJ_RANKED.obj_len = 3;
+ cdat->dsym_206__COMPARE_OBJ_RANKED.obj_hash = 657124045;
+ cdat->dsym_206__COMPARE_OBJ_RANKED.obj_len = 3;
-/*inistring dstr_205__COMPARE_OBJ_RANK*/
- /*_.VALSTR___V254*/ meltfptr[253] =
- (void *) &cdat->dstr_205__COMPARE_OBJ_RANK;
- cdat->dstr_205__COMPARE_OBJ_RANK.discr =
+/*inistring dstr_207__COMPARE_OBJ_RANK*/
+ /*_.VALSTR___V256*/ meltfptr[255] =
+ (void *) &cdat->dstr_207__COMPARE_OBJ_RANK;
+ cdat->dstr_207__COMPARE_OBJ_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_205__COMPARE_OBJ_RANK.val,
+ /*small inistring */ strncpy (cdat->dstr_207__COMPARE_OBJ_RANK.val,
"COMPARE_OBJ_RANKED",
- sizeof (cdat->dstr_205__COMPARE_OBJ_RANK.
+ sizeof (cdat->dstr_207__COMPARE_OBJ_RANK.
val) - 1);
- /*iniboxint dint_206__ */
- /*_.VALBXINT___V246*/ meltfptr[245] = (void *) &cdat->dint_206__;
- cdat->dint_206__.discr =
+ /*iniboxint dint_208__ */
+ /*_.VALBXINT___V248*/ meltfptr[247] = (void *) &cdat->dint_208__;
+ cdat->dint_208__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_206__.val = -1;
+ cdat->dint_208__.val = -1;
- /*iniboxint dint_207__ */
- /*_.VALBXINT___V247*/ meltfptr[246] = (void *) &cdat->dint_207__;
- cdat->dint_207__.discr =
+ /*iniboxint dint_209__ */
+ /*_.VALBXINT___V249*/ meltfptr[248] = (void *) &cdat->dint_209__;
+ cdat->dint_209__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_207__.val = 0;
+ cdat->dint_209__.val = 0;
- /*iniboxint dint_208__ */
- /*_.VALBXINT___V248*/ meltfptr[247] = (void *) &cdat->dint_208__;
- cdat->dint_208__.discr =
+ /*iniboxint dint_210__ */
+ /*_.VALBXINT___V250*/ meltfptr[249] = (void *) &cdat->dint_210__;
+ cdat->dint_210__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_208__.val = 1;
+ cdat->dint_210__.val = 1;
-/*iniobj dsym_209__MULTIPLE_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V255*/ meltfptr[254])
- /*_.VALDATA___V255*/
- meltfptr[254] = (void *) &cdat->dsym_209__MULTIPLE_EVERY;
+/*iniobj dsym_211__MULTIPLE_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V257*/ meltfptr[256])
+ /*_.VALDATA___V257*/
+ meltfptr[256] = (void *) &cdat->dsym_211__MULTIPLE_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_209__MULTIPLE_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_211__MULTIPLE_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_209__MULTIPLE_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_211__MULTIPLE_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_209__MULTIPLE_EVERY.meltobj_class =
+ cdat->dsym_211__MULTIPLE_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_209__MULTIPLE_EVERY.obj_hash = 130098745;
- cdat->dsym_209__MULTIPLE_EVERY.obj_len = 3;
+ cdat->dsym_211__MULTIPLE_EVERY.obj_hash = 130098745;
+ cdat->dsym_211__MULTIPLE_EVERY.obj_len = 3;
-/*inistring dstr_210__MULTIPLE_EVERY*/
- /*_.VALSTR___V256*/ meltfptr[255] =
- (void *) &cdat->dstr_210__MULTIPLE_EVERY;
- cdat->dstr_210__MULTIPLE_EVERY.discr =
+/*inistring dstr_212__MULTIPLE_EVERY*/
+ /*_.VALSTR___V258*/ meltfptr[257] =
+ (void *) &cdat->dstr_212__MULTIPLE_EVERY;
+ cdat->dstr_212__MULTIPLE_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_210__MULTIPLE_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_212__MULTIPLE_EVERY.val,
"MULTIPLE_EVERY",
- sizeof (cdat->dstr_210__MULTIPLE_EVERY.val) -
+ sizeof (cdat->dstr_212__MULTIPLE_EVERY.val) -
1);
- /*inirout drout_211__LAMBDA_ */
- /*_.VALROUT___V249*/ meltfptr[248] = (void *) &cdat->drout_211__LAMBDA_;
- cdat->drout_211__LAMBDA_.discr =
+ /*inirout drout_213__LAMBDA_ */
+ /*_.VALROUT___V251*/ meltfptr[250] = (void *) &cdat->drout_213__LAMBDA_;
+ cdat->drout_213__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_211__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:920", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_211__LAMBDA_.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_211__LAMBDA_,
- meltrout_28_warmelt_debug_LAMBDA___4__);
-
- /*inirout drout_212__DBGOUT_MAPSTRING_METHOD */
- /*_.VALROUT___V257*/ meltfptr[256] =
- (void *) &cdat->drout_212__DBGOUT_MAPSTRING_METHOD;
- cdat->drout_212__DBGOUT_MAPSTRING_METHOD.discr =
+ strncpy (cdat->drout_213__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:1008", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_213__LAMBDA_.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_213__LAMBDA_,
+ meltrout_29_warmelt_debug_LAMBDA___4__);
+
+ /*inirout drout_214__DBGOUT_MAPSTRING_METHOD */
+ /*_.VALROUT___V259*/ meltfptr[258] =
+ (void *) &cdat->drout_214__DBGOUT_MAPSTRING_METHOD;
+ cdat->drout_214__DBGOUT_MAPSTRING_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_212__DBGOUT_MAPSTRING_METHOD.routdescr,
- "DBGOUT_MAPSTRING_METHOD @warmelt-debug.melt:943",
+ strncpy (cdat->drout_214__DBGOUT_MAPSTRING_METHOD.routdescr,
+ "DBGOUT_MAPSTRING_METHOD @warmelt-debug.melt:1031",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_212__DBGOUT_MAPSTRING_METHOD.nbval = 12;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_212__DBGOUT_MAPSTRING_METHOD,
- meltrout_29_warmelt_debug_DBGOUT_MAPSTRING_METHOD);
-
- /*iniclos dclo_213__DBGOUT_MAPSTRING_METHOD */
- /*_.VALCLO___V264*/ meltfptr[263] =
- (void *) &cdat->dclo_213__DBGOUT_MAPSTRING_METHOD;
- cdat->dclo_213__DBGOUT_MAPSTRING_METHOD.discr =
+ cdat->drout_214__DBGOUT_MAPSTRING_METHOD.nbval = 12;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_214__DBGOUT_MAPSTRING_METHOD,
+ meltrout_30_warmelt_debug_DBGOUT_MAPSTRING_METHOD);
+
+ /*iniclos dclo_215__DBGOUT_MAPSTRING_METHOD */
+ /*_.VALCLO___V266*/ meltfptr[265] =
+ (void *) &cdat->dclo_215__DBGOUT_MAPSTRING_METHOD;
+ cdat->dclo_215__DBGOUT_MAPSTRING_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_213__DBGOUT_MAPSTRING_METHOD.nbval = 0;
+ cdat->dclo_215__DBGOUT_MAPSTRING_METHOD.nbval = 0;
-/*iniobj dsym_214__DISCR_MAP_STRINGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V265*/ meltfptr[264])
- /*_.VALDATA___V265*/
- meltfptr[264] = (void *) &cdat->dsym_214__DISCR_MAP_STRINGS;
+/*iniobj dsym_216__DISCR_MAP_STRINGS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V267*/ meltfptr[266])
+ /*_.VALDATA___V267*/
+ meltfptr[266] = (void *) &cdat->dsym_216__DISCR_MAP_STRINGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_214__DISCR_MAP_STRINGS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_216__DISCR_MAP_STRINGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_214__DISCR_MAP_STRINGS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_216__DISCR_MAP_STRINGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_214__DISCR_MAP_STRINGS.meltobj_class =
+ cdat->dsym_216__DISCR_MAP_STRINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_214__DISCR_MAP_STRINGS.obj_hash = 344609662;
- cdat->dsym_214__DISCR_MAP_STRINGS.obj_len = 3;
+ cdat->dsym_216__DISCR_MAP_STRINGS.obj_hash = 344609662;
+ cdat->dsym_216__DISCR_MAP_STRINGS.obj_len = 3;
-/*inistring dstr_215__DISCR_MAP_STRING*/
- /*_.VALSTR___V266*/ meltfptr[265] =
- (void *) &cdat->dstr_215__DISCR_MAP_STRING;
- cdat->dstr_215__DISCR_MAP_STRING.discr =
+/*inistring dstr_217__DISCR_MAP_STRING*/
+ /*_.VALSTR___V268*/ meltfptr[267] =
+ (void *) &cdat->dstr_217__DISCR_MAP_STRING;
+ cdat->dstr_217__DISCR_MAP_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_215__DISCR_MAP_STRING.val,
+ /*small inistring */ strncpy (cdat->dstr_217__DISCR_MAP_STRING.val,
"DISCR_MAP_STRINGS",
- sizeof (cdat->dstr_215__DISCR_MAP_STRING.
+ sizeof (cdat->dstr_217__DISCR_MAP_STRING.
val) - 1);
-/*iniobj dsym_216__MAPSTRING_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V267*/ meltfptr[266])
- /*_.VALDATA___V267*/
- meltfptr[266] = (void *) &cdat->dsym_216__MAPSTRING_EVERY;
+/*iniobj dsym_218__MAPSTRING_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V269*/ meltfptr[268])
+ /*_.VALDATA___V269*/
+ meltfptr[268] = (void *) &cdat->dsym_218__MAPSTRING_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_216__MAPSTRING_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_218__MAPSTRING_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_216__MAPSTRING_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_218__MAPSTRING_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_216__MAPSTRING_EVERY.meltobj_class =
+ cdat->dsym_218__MAPSTRING_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_216__MAPSTRING_EVERY.obj_hash = 173778712;
- cdat->dsym_216__MAPSTRING_EVERY.obj_len = 3;
+ cdat->dsym_218__MAPSTRING_EVERY.obj_hash = 173778712;
+ cdat->dsym_218__MAPSTRING_EVERY.obj_len = 3;
-/*inistring dstr_217__MAPSTRING_EVERY*/
- /*_.VALSTR___V268*/ meltfptr[267] =
- (void *) &cdat->dstr_217__MAPSTRING_EVERY;
- cdat->dstr_217__MAPSTRING_EVERY.discr =
+/*inistring dstr_219__MAPSTRING_EVERY*/
+ /*_.VALSTR___V270*/ meltfptr[269] =
+ (void *) &cdat->dstr_219__MAPSTRING_EVERY;
+ cdat->dstr_219__MAPSTRING_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_217__MAPSTRING_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_219__MAPSTRING_EVERY.val,
"MAPSTRING_EVERY",
- sizeof (cdat->dstr_217__MAPSTRING_EVERY.val) -
+ sizeof (cdat->dstr_219__MAPSTRING_EVERY.val) -
1);
- /*inirout drout_218__LAMBDA_ */
- /*_.VALROUT___V258*/ meltfptr[257] = (void *) &cdat->drout_218__LAMBDA_;
- cdat->drout_218__LAMBDA_.discr =
+ /*inirout drout_220__LAMBDA_ */
+ /*_.VALROUT___V260*/ meltfptr[259] = (void *) &cdat->drout_220__LAMBDA_;
+ cdat->drout_220__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_218__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:966", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_218__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_218__LAMBDA_,
- meltrout_30_warmelt_debug_LAMBDA___5__);
-
- /*inirout drout_219__LAMBDA_ */
- /*_.VALROUT___V259*/ meltfptr[258] = (void *) &cdat->drout_219__LAMBDA_;
- cdat->drout_219__LAMBDA_.discr =
+ strncpy (cdat->drout_220__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:1054", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_220__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_220__LAMBDA_,
+ meltrout_31_warmelt_debug_LAMBDA___5__);
+
+ /*inirout drout_221__LAMBDA_ */
+ /*_.VALROUT___V261*/ meltfptr[260] = (void *) &cdat->drout_221__LAMBDA_;
+ cdat->drout_221__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_219__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:978", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_219__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_219__LAMBDA_,
- meltrout_31_warmelt_debug_LAMBDA___6__);
-
- /*iniboxint dint_220__ */
- /*_.VALBXINT___V260*/ meltfptr[259] = (void *) &cdat->dint_220__;
- cdat->dint_220__.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_220__.val = -1;
-
- /*iniboxint dint_221__ */
- /*_.VALBXINT___V261*/ meltfptr[260] = (void *) &cdat->dint_221__;
- cdat->dint_221__.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_221__.val = 0;
+ strncpy (cdat->drout_221__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:1066", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_221__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_221__LAMBDA_,
+ meltrout_32_warmelt_debug_LAMBDA___6__);
/*iniboxint dint_222__ */
/*_.VALBXINT___V262*/ meltfptr[261] = (void *) &cdat->dint_222__;
cdat->dint_222__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_222__.val = 1;
+ cdat->dint_222__.val = -1;
- /*inirout drout_223__LAMBDA_ */
- /*_.VALROUT___V263*/ meltfptr[262] = (void *) &cdat->drout_223__LAMBDA_;
- cdat->drout_223__LAMBDA_.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_223__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-debug.melt:994", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_223__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_223__LAMBDA_,
- meltrout_32_warmelt_debug_LAMBDA___7__);
-
- /*inirout drout_224__DBGOUT_ANYOBJECT_METHOD */
- /*_.VALROUT___V269*/ meltfptr[268] =
- (void *) &cdat->drout_224__DBGOUT_ANYOBJECT_METHOD;
- cdat->drout_224__DBGOUT_ANYOBJECT_METHOD.discr =
+ /*iniboxint dint_223__ */
+ /*_.VALBXINT___V263*/ meltfptr[262] = (void *) &cdat->dint_223__;
+ cdat->dint_223__.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
+ cdat->dint_223__.val = 0;
+
+ /*iniboxint dint_224__ */
+ /*_.VALBXINT___V264*/ meltfptr[263] = (void *) &cdat->dint_224__;
+ cdat->dint_224__.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
+ cdat->dint_224__.val = 1;
+
+ /*inirout drout_225__LAMBDA_ */
+ /*_.VALROUT___V265*/ meltfptr[264] = (void *) &cdat->drout_225__LAMBDA_;
+ cdat->drout_225__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_224__DBGOUT_ANYOBJECT_METHOD.routdescr,
- "DBGOUT_ANYOBJECT_METHOD @warmelt-debug.melt:1013",
- MELT_ROUTDESCR_LEN - 1);
- cdat->drout_224__DBGOUT_ANYOBJECT_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_224__DBGOUT_ANYOBJECT_METHOD,
- meltrout_33_warmelt_debug_DBGOUT_ANYOBJECT_METHOD);
-
- /*iniclos dclo_225__DBGOUT_ANYOBJECT_METHOD */
- /*_.VALCLO___V270*/ meltfptr[269] =
- (void *) &cdat->dclo_225__DBGOUT_ANYOBJECT_METHOD;
- cdat->dclo_225__DBGOUT_ANYOBJECT_METHOD.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_225__DBGOUT_ANYOBJECT_METHOD.nbval = 0;
+ strncpy (cdat->drout_225__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-debug.melt:1082", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_225__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_225__LAMBDA_,
+ meltrout_33_warmelt_debug_LAMBDA___7__);
- /*inirout drout_226__DBGOUT_ANYRECV_METHOD */
+ /*inirout drout_226__DBGOUT_ANYOBJECT_METHOD */
/*_.VALROUT___V271*/ meltfptr[270] =
- (void *) &cdat->drout_226__DBGOUT_ANYRECV_METHOD;
- cdat->drout_226__DBGOUT_ANYRECV_METHOD.discr =
+ (void *) &cdat->drout_226__DBGOUT_ANYOBJECT_METHOD;
+ cdat->drout_226__DBGOUT_ANYOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_226__DBGOUT_ANYRECV_METHOD.routdescr,
- "DBGOUT_ANYRECV_METHOD @warmelt-debug.melt:1039",
+ strncpy (cdat->drout_226__DBGOUT_ANYOBJECT_METHOD.routdescr,
+ "DBGOUT_ANYOBJECT_METHOD @warmelt-debug.melt:1101",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_226__DBGOUT_ANYRECV_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_226__DBGOUT_ANYRECV_METHOD,
- meltrout_34_warmelt_debug_DBGOUT_ANYRECV_METHOD);
+ cdat->drout_226__DBGOUT_ANYOBJECT_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_226__DBGOUT_ANYOBJECT_METHOD,
+ meltrout_34_warmelt_debug_DBGOUT_ANYOBJECT_METHOD);
- /*iniclos dclo_227__DBGOUT_ANYRECV_METHOD */
+ /*iniclos dclo_227__DBGOUT_ANYOBJECT_METHOD */
/*_.VALCLO___V272*/ meltfptr[271] =
- (void *) &cdat->dclo_227__DBGOUT_ANYRECV_METHOD;
- cdat->dclo_227__DBGOUT_ANYRECV_METHOD.discr =
+ (void *) &cdat->dclo_227__DBGOUT_ANYOBJECT_METHOD;
+ cdat->dclo_227__DBGOUT_ANYOBJECT_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_227__DBGOUT_ANYOBJECT_METHOD.nbval = 0;
+
+ /*inirout drout_228__DBGOUT_ANYRECV_METHOD */
+ /*_.VALROUT___V273*/ meltfptr[272] =
+ (void *) &cdat->drout_228__DBGOUT_ANYRECV_METHOD;
+ cdat->drout_228__DBGOUT_ANYRECV_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_228__DBGOUT_ANYRECV_METHOD.routdescr,
+ "DBGOUT_ANYRECV_METHOD @warmelt-debug.melt:1127",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_228__DBGOUT_ANYRECV_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_228__DBGOUT_ANYRECV_METHOD,
+ meltrout_35_warmelt_debug_DBGOUT_ANYRECV_METHOD);
+
+ /*iniclos dclo_229__DBGOUT_ANYRECV_METHOD */
+ /*_.VALCLO___V274*/ meltfptr[273] =
+ (void *) &cdat->dclo_229__DBGOUT_ANYRECV_METHOD;
+ cdat->dclo_229__DBGOUT_ANYRECV_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_227__DBGOUT_ANYRECV_METHOD.nbval = 0;
+ cdat->dclo_229__DBGOUT_ANYRECV_METHOD.nbval = 0;
-/*iniobj dsym_228__DISCR_ANY_RECEIVER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V273*/ meltfptr[272])
- /*_.VALDATA___V273*/
- meltfptr[272] = (void *) &cdat->dsym_228__DISCR_ANY_RECEIVER;
+/*iniobj dsym_230__DISCR_ANY_RECEIVER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V275*/ meltfptr[274])
+ /*_.VALDATA___V275*/
+ meltfptr[274] = (void *) &cdat->dsym_230__DISCR_ANY_RECEIVER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_228__DISCR_ANY_RECEIVER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_230__DISCR_ANY_RECEIVER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_228__DISCR_ANY_RECEIVER",
+ ("iniobj check.discr objmagic dsym_230__DISCR_ANY_RECEIVER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_228__DISCR_ANY_RECEIVER.meltobj_class =
+ cdat->dsym_230__DISCR_ANY_RECEIVER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_228__DISCR_ANY_RECEIVER.obj_hash = 95947314;
- cdat->dsym_228__DISCR_ANY_RECEIVER.obj_len = 3;
+ cdat->dsym_230__DISCR_ANY_RECEIVER.obj_hash = 95947314;
+ cdat->dsym_230__DISCR_ANY_RECEIVER.obj_len = 3;
-/*inistring dstr_229__DISCR_ANY_RECEIV*/
- /*_.VALSTR___V274*/ meltfptr[273] =
- (void *) &cdat->dstr_229__DISCR_ANY_RECEIV;
- cdat->dstr_229__DISCR_ANY_RECEIV.discr =
+/*inistring dstr_231__DISCR_ANY_RECEIV*/
+ /*_.VALSTR___V276*/ meltfptr[275] =
+ (void *) &cdat->dstr_231__DISCR_ANY_RECEIV;
+ cdat->dstr_231__DISCR_ANY_RECEIV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_229__DISCR_ANY_RECEIV.val,
+ /*small inistring */ strncpy (cdat->dstr_231__DISCR_ANY_RECEIV.val,
"DISCR_ANY_RECEIVER",
- sizeof (cdat->dstr_229__DISCR_ANY_RECEIV.
+ sizeof (cdat->dstr_231__DISCR_ANY_RECEIV.
val) - 1);
- /*inirout drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD */
- /*_.VALROUT___V275*/ meltfptr[274] =
- (void *) &cdat->drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD;
- cdat->drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD.discr =
+ /*inirout drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD */
+ /*_.VALROUT___V277*/ meltfptr[276] =
+ (void *) &cdat->drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD;
+ cdat->drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD.routdescr,
- "DBGOUTAGAIN_ANYOBJECT_METHOD @warmelt-debug.melt:1050",
+ strncpy (cdat->drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD.routdescr,
+ "DBGOUTAGAIN_ANYOBJECT_METHOD @warmelt-debug.melt:1138",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_230__DBGOUTAGAIN_ANYOBJECT_METHOD,
- meltrout_35_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD);
-
- /*iniclos dclo_231__DBGOUTAGAIN_ANYOBJECT_METHOD */
- /*_.VALCLO___V276*/ meltfptr[275] =
- (void *) &cdat->dclo_231__DBGOUTAGAIN_ANYOBJECT_METHOD;
- cdat->dclo_231__DBGOUTAGAIN_ANYOBJECT_METHOD.discr =
+ cdat->drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_232__DBGOUTAGAIN_ANYOBJECT_METHOD,
+ meltrout_36_warmelt_debug_DBGOUTAGAIN_ANYOBJECT_METHOD);
+
+ /*iniclos dclo_233__DBGOUTAGAIN_ANYOBJECT_METHOD */
+ /*_.VALCLO___V278*/ meltfptr[277] =
+ (void *) &cdat->dclo_233__DBGOUTAGAIN_ANYOBJECT_METHOD;
+ cdat->dclo_233__DBGOUTAGAIN_ANYOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_231__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 0;
+ cdat->dclo_233__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 0;
- /*inirout drout_232__DBGOUT_NAMEDOBJECT_METHOD */
- /*_.VALROUT___V277*/ meltfptr[276] =
- (void *) &cdat->drout_232__DBGOUT_NAMEDOBJECT_METHOD;
- cdat->drout_232__DBGOUT_NAMEDOBJECT_METHOD.discr =
+ /*inirout drout_234__DBGOUT_NAMEDOBJECT_METHOD */
+ /*_.VALROUT___V279*/ meltfptr[278] =
+ (void *) &cdat->drout_234__DBGOUT_NAMEDOBJECT_METHOD;
+ cdat->drout_234__DBGOUT_NAMEDOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_232__DBGOUT_NAMEDOBJECT_METHOD.routdescr,
- "DBGOUT_NAMEDOBJECT_METHOD @warmelt-debug.melt:1068",
+ strncpy (cdat->drout_234__DBGOUT_NAMEDOBJECT_METHOD.routdescr,
+ "DBGOUT_NAMEDOBJECT_METHOD @warmelt-debug.melt:1156",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_232__DBGOUT_NAMEDOBJECT_METHOD.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_232__DBGOUT_NAMEDOBJECT_METHOD,
- meltrout_36_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD);
-
- /*iniclos dclo_233__DBGOUT_NAMEDOBJECT_METHOD */
- /*_.VALCLO___V278*/ meltfptr[277] =
- (void *) &cdat->dclo_233__DBGOUT_NAMEDOBJECT_METHOD;
- cdat->dclo_233__DBGOUT_NAMEDOBJECT_METHOD.discr =
+ cdat->drout_234__DBGOUT_NAMEDOBJECT_METHOD.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_234__DBGOUT_NAMEDOBJECT_METHOD,
+ meltrout_37_warmelt_debug_DBGOUT_NAMEDOBJECT_METHOD);
+
+ /*iniclos dclo_235__DBGOUT_NAMEDOBJECT_METHOD */
+ /*_.VALCLO___V280*/ meltfptr[279] =
+ (void *) &cdat->dclo_235__DBGOUT_NAMEDOBJECT_METHOD;
+ cdat->dclo_235__DBGOUT_NAMEDOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_233__DBGOUT_NAMEDOBJECT_METHOD.nbval = 0;
+ cdat->dclo_235__DBGOUT_NAMEDOBJECT_METHOD.nbval = 0;
-/*iniobj dsym_234__DBGOUT_NAMEDOBJECT_METHOD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V279*/ meltfptr[278])
- /*_.VALDATA___V279*/
- meltfptr[278] = (void *) &cdat->dsym_234__DBGOUT_NAMEDOBJECT_METHOD;
+/*iniobj dsym_236__DBGOUT_NAMEDOBJECT_METHOD*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V281*/ meltfptr[280])
+ /*_.VALDATA___V281*/
+ meltfptr[280] = (void *) &cdat->dsym_236__DBGOUT_NAMEDOBJECT_METHOD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_234__DBGOUT_NAMEDOBJECT_METHOD",
+ ("iniobj check.discr isobj dsym_236__DBGOUT_NAMEDOBJECT_METHOD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_234__DBGOUT_NAMEDOBJECT_METHOD",
+ ("iniobj check.discr objmagic dsym_236__DBGOUT_NAMEDOBJECT_METHOD",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_234__DBGOUT_NAMEDOBJECT_METHOD.meltobj_class =
+ cdat->dsym_236__DBGOUT_NAMEDOBJECT_METHOD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_234__DBGOUT_NAMEDOBJECT_METHOD.obj_hash = 359355803;
- cdat->dsym_234__DBGOUT_NAMEDOBJECT_METHOD.obj_len = 3;
+ cdat->dsym_236__DBGOUT_NAMEDOBJECT_METHOD.obj_hash = 359355803;
+ cdat->dsym_236__DBGOUT_NAMEDOBJECT_METHOD.obj_len = 3;
-/*inistring dstr_235__DBGOUT_NAMEDOBJE*/
- /*_.VALSTR___V280*/ meltfptr[279] =
- (void *) &cdat->dstr_235__DBGOUT_NAMEDOBJE;
- cdat->dstr_235__DBGOUT_NAMEDOBJE.discr =
+/*inistring dstr_237__DBGOUT_NAMEDOBJE*/
+ /*_.VALSTR___V282*/ meltfptr[281] =
+ (void *) &cdat->dstr_237__DBGOUT_NAMEDOBJE;
+ cdat->dstr_237__DBGOUT_NAMEDOBJE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_235__DBGOUT_NAMEDOBJE.val,
+ /*small inistring */ strncpy (cdat->dstr_237__DBGOUT_NAMEDOBJE.val,
"DBGOUT_NAMEDOBJECT_METHOD",
- sizeof (cdat->dstr_235__DBGOUT_NAMEDOBJE.
+ sizeof (cdat->dstr_237__DBGOUT_NAMEDOBJE.
val) - 1);
- /*inirout drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD */
- /*_.VALROUT___V281*/ meltfptr[280] =
- (void *) &cdat->drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
- cdat->drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr =
+ /*inirout drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD */
+ /*_.VALROUT___V283*/ meltfptr[282] =
+ (void *) &cdat->drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
+ cdat->drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD.routdescr,
- "DBGOUTAGAIN_NAMEDOBJECT_METHOD @warmelt-debug.melt:1102",
+ strncpy (cdat->drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD.routdescr,
+ "DBGOUTAGAIN_NAMEDOBJECT_METHOD @warmelt-debug.melt:1190",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_236__DBGOUTAGAIN_NAMEDOBJECT_METHOD,
- meltrout_37_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD);
-
- /*iniclos dclo_237__DBGOUTAGAIN_NAMEDOBJECT_METHOD */
- /*_.VALCLO___V282*/ meltfptr[281] =
- (void *) &cdat->dclo_237__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
- cdat->dclo_237__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr =
+ cdat->drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_238__DBGOUTAGAIN_NAMEDOBJECT_METHOD,
+ meltrout_38_warmelt_debug_DBGOUTAGAIN_NAMEDOBJECT_METHOD);
+
+ /*iniclos dclo_239__DBGOUTAGAIN_NAMEDOBJECT_METHOD */
+ /*_.VALCLO___V284*/ meltfptr[283] =
+ (void *) &cdat->dclo_239__DBGOUTAGAIN_NAMEDOBJECT_METHOD;
+ cdat->dclo_239__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_237__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 0;
+ cdat->dclo_239__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 0;
- /*inirout drout_238__DBGOUTAGAIN_SYMBOL_METHOD */
- /*_.VALROUT___V283*/ meltfptr[282] =
- (void *) &cdat->drout_238__DBGOUTAGAIN_SYMBOL_METHOD;
- cdat->drout_238__DBGOUTAGAIN_SYMBOL_METHOD.discr =
+ /*inirout drout_240__DBGOUTAGAIN_SYMBOL_METHOD */
+ /*_.VALROUT___V285*/ meltfptr[284] =
+ (void *) &cdat->drout_240__DBGOUTAGAIN_SYMBOL_METHOD;
+ cdat->drout_240__DBGOUTAGAIN_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_238__DBGOUTAGAIN_SYMBOL_METHOD.routdescr,
- "DBGOUTAGAIN_SYMBOL_METHOD @warmelt-debug.melt:1119",
+ strncpy (cdat->drout_240__DBGOUTAGAIN_SYMBOL_METHOD.routdescr,
+ "DBGOUTAGAIN_SYMBOL_METHOD @warmelt-debug.melt:1207",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_238__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_238__DBGOUTAGAIN_SYMBOL_METHOD,
- meltrout_38_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD);
-
- /*iniclos dclo_239__DBGOUTAGAIN_SYMBOL_METHOD */
- /*_.VALCLO___V284*/ meltfptr[283] =
- (void *) &cdat->dclo_239__DBGOUTAGAIN_SYMBOL_METHOD;
- cdat->dclo_239__DBGOUTAGAIN_SYMBOL_METHOD.discr =
+ cdat->drout_240__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_240__DBGOUTAGAIN_SYMBOL_METHOD,
+ meltrout_39_warmelt_debug_DBGOUTAGAIN_SYMBOL_METHOD);
+
+ /*iniclos dclo_241__DBGOUTAGAIN_SYMBOL_METHOD */
+ /*_.VALCLO___V286*/ meltfptr[285] =
+ (void *) &cdat->dclo_241__DBGOUTAGAIN_SYMBOL_METHOD;
+ cdat->dclo_241__DBGOUTAGAIN_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_239__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 0;
+ cdat->dclo_241__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 0;
-/*iniobj dsym_240__CLASS_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V285*/ meltfptr[284])
- /*_.VALDATA___V285*/
- meltfptr[284] = (void *) &cdat->dsym_240__CLASS_SYMBOL;
+/*iniobj dsym_242__CLASS_SYMBOL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V287*/ meltfptr[286])
+ /*_.VALDATA___V287*/
+ meltfptr[286] = (void *) &cdat->dsym_242__CLASS_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_240__CLASS_SYMBOL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_242__CLASS_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_240__CLASS_SYMBOL",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_242__CLASS_SYMBOL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_240__CLASS_SYMBOL.meltobj_class =
+ cdat->dsym_242__CLASS_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_240__CLASS_SYMBOL.obj_hash = 53524182;
- cdat->dsym_240__CLASS_SYMBOL.obj_len = 3;
+ cdat->dsym_242__CLASS_SYMBOL.obj_hash = 53524182;
+ cdat->dsym_242__CLASS_SYMBOL.obj_len = 3;
-/*inistring dstr_241__CLASS_SYMBOL*/
- /*_.VALSTR___V286*/ meltfptr[285] = (void *) &cdat->dstr_241__CLASS_SYMBOL;
- cdat->dstr_241__CLASS_SYMBOL.discr =
+/*inistring dstr_243__CLASS_SYMBOL*/
+ /*_.VALSTR___V288*/ meltfptr[287] = (void *) &cdat->dstr_243__CLASS_SYMBOL;
+ cdat->dstr_243__CLASS_SYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_241__CLASS_SYMBOL.val,
+ /*small inistring */ strncpy (cdat->dstr_243__CLASS_SYMBOL.val,
"CLASS_SYMBOL",
- sizeof (cdat->dstr_241__CLASS_SYMBOL.val) -
+ sizeof (cdat->dstr_243__CLASS_SYMBOL.val) -
1);
- /*inirout drout_242__DBGOUT_SYMBOL_METHOD */
- /*_.VALROUT___V287*/ meltfptr[286] =
- (void *) &cdat->drout_242__DBGOUT_SYMBOL_METHOD;
- cdat->drout_242__DBGOUT_SYMBOL_METHOD.discr =
+ /*inirout drout_244__DBGOUT_SYMBOL_METHOD */
+ /*_.VALROUT___V289*/ meltfptr[288] =
+ (void *) &cdat->drout_244__DBGOUT_SYMBOL_METHOD;
+ cdat->drout_244__DBGOUT_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_242__DBGOUT_SYMBOL_METHOD.routdescr,
- "DBGOUT_SYMBOL_METHOD @warmelt-debug.melt:1137",
+ strncpy (cdat->drout_244__DBGOUT_SYMBOL_METHOD.routdescr,
+ "DBGOUT_SYMBOL_METHOD @warmelt-debug.melt:1225",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_242__DBGOUT_SYMBOL_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_242__DBGOUT_SYMBOL_METHOD,
- meltrout_39_warmelt_debug_DBGOUT_SYMBOL_METHOD);
-
- /*iniclos dclo_243__DBGOUT_SYMBOL_METHOD */
- /*_.VALCLO___V288*/ meltfptr[287] =
- (void *) &cdat->dclo_243__DBGOUT_SYMBOL_METHOD;
- cdat->dclo_243__DBGOUT_SYMBOL_METHOD.discr =
+ cdat->drout_244__DBGOUT_SYMBOL_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_244__DBGOUT_SYMBOL_METHOD,
+ meltrout_40_warmelt_debug_DBGOUT_SYMBOL_METHOD);
+
+ /*iniclos dclo_245__DBGOUT_SYMBOL_METHOD */
+ /*_.VALCLO___V290*/ meltfptr[289] =
+ (void *) &cdat->dclo_245__DBGOUT_SYMBOL_METHOD;
+ cdat->dclo_245__DBGOUT_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_243__DBGOUT_SYMBOL_METHOD.nbval = 0;
+ cdat->dclo_245__DBGOUT_SYMBOL_METHOD.nbval = 0;
- /*inirout drout_244__DBGOUT_CLASS_METHOD */
- /*_.VALROUT___V289*/ meltfptr[288] =
- (void *) &cdat->drout_244__DBGOUT_CLASS_METHOD;
- cdat->drout_244__DBGOUT_CLASS_METHOD.discr =
+ /*inirout drout_246__DBGOUT_CLASS_METHOD */
+ /*_.VALROUT___V291*/ meltfptr[290] =
+ (void *) &cdat->drout_246__DBGOUT_CLASS_METHOD;
+ cdat->drout_246__DBGOUT_CLASS_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_244__DBGOUT_CLASS_METHOD.routdescr,
- "DBGOUT_CLASS_METHOD @warmelt-debug.melt:1147",
+ strncpy (cdat->drout_246__DBGOUT_CLASS_METHOD.routdescr,
+ "DBGOUT_CLASS_METHOD @warmelt-debug.melt:1235",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_244__DBGOUT_CLASS_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_244__DBGOUT_CLASS_METHOD,
- meltrout_40_warmelt_debug_DBGOUT_CLASS_METHOD);
-
- /*iniclos dclo_245__DBGOUT_CLASS_METHOD */
- /*_.VALCLO___V290*/ meltfptr[289] =
- (void *) &cdat->dclo_245__DBGOUT_CLASS_METHOD;
- cdat->dclo_245__DBGOUT_CLASS_METHOD.discr =
+ cdat->drout_246__DBGOUT_CLASS_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_246__DBGOUT_CLASS_METHOD,
+ meltrout_41_warmelt_debug_DBGOUT_CLASS_METHOD);
+
+ /*iniclos dclo_247__DBGOUT_CLASS_METHOD */
+ /*_.VALCLO___V292*/ meltfptr[291] =
+ (void *) &cdat->dclo_247__DBGOUT_CLASS_METHOD;
+ cdat->dclo_247__DBGOUT_CLASS_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_245__DBGOUT_CLASS_METHOD.nbval = 0;
+ cdat->dclo_247__DBGOUT_CLASS_METHOD.nbval = 0;
-/*iniobj dsym_246__CLASS_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V291*/ meltfptr[290])
- /*_.VALDATA___V291*/
- meltfptr[290] = (void *) &cdat->dsym_246__CLASS_CLASS;
+/*iniobj dsym_248__CLASS_CLASS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V293*/ meltfptr[292])
+ /*_.VALDATA___V293*/
+ meltfptr[292] = (void *) &cdat->dsym_248__CLASS_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_246__CLASS_CLASS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_248__CLASS_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_246__CLASS_CLASS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_248__CLASS_CLASS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_246__CLASS_CLASS.meltobj_class =
+ cdat->dsym_248__CLASS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_246__CLASS_CLASS.obj_hash = 60141292;
- cdat->dsym_246__CLASS_CLASS.obj_len = 3;
+ cdat->dsym_248__CLASS_CLASS.obj_hash = 60141292;
+ cdat->dsym_248__CLASS_CLASS.obj_len = 3;
-/*inistring dstr_247__CLASS_CLASS*/
- /*_.VALSTR___V292*/ meltfptr[291] = (void *) &cdat->dstr_247__CLASS_CLASS;
- cdat->dstr_247__CLASS_CLASS.discr =
+/*inistring dstr_249__CLASS_CLASS*/
+ /*_.VALSTR___V294*/ meltfptr[293] = (void *) &cdat->dstr_249__CLASS_CLASS;
+ cdat->dstr_249__CLASS_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_247__CLASS_CLASS.val,
+ /*small inistring */ strncpy (cdat->dstr_249__CLASS_CLASS.val,
"CLASS_CLASS",
- sizeof (cdat->dstr_247__CLASS_CLASS.val) - 1);
- /*inirout drout_248__DBGOUTAGAIN_KEYWORD_METHOD */
- /*_.VALROUT___V293*/ meltfptr[292] =
- (void *) &cdat->drout_248__DBGOUTAGAIN_KEYWORD_METHOD;
- cdat->drout_248__DBGOUTAGAIN_KEYWORD_METHOD.discr =
+ sizeof (cdat->dstr_249__CLASS_CLASS.val) - 1);
+ /*inirout drout_250__DBGOUTAGAIN_KEYWORD_METHOD */
+ /*_.VALROUT___V295*/ meltfptr[294] =
+ (void *) &cdat->drout_250__DBGOUTAGAIN_KEYWORD_METHOD;
+ cdat->drout_250__DBGOUTAGAIN_KEYWORD_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_248__DBGOUTAGAIN_KEYWORD_METHOD.routdescr,
- "DBGOUTAGAIN_KEYWORD_METHOD @warmelt-debug.melt:1157",
+ strncpy (cdat->drout_250__DBGOUTAGAIN_KEYWORD_METHOD.routdescr,
+ "DBGOUTAGAIN_KEYWORD_METHOD @warmelt-debug.melt:1245",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_248__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_248__DBGOUTAGAIN_KEYWORD_METHOD,
- meltrout_41_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD);
-
- /*iniclos dclo_249__DBGOUTAGAIN_KEYWORD_METHOD */
- /*_.VALCLO___V294*/ meltfptr[293] =
- (void *) &cdat->dclo_249__DBGOUTAGAIN_KEYWORD_METHOD;
- cdat->dclo_249__DBGOUTAGAIN_KEYWORD_METHOD.discr =
+ cdat->drout_250__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_250__DBGOUTAGAIN_KEYWORD_METHOD,
+ meltrout_42_warmelt_debug_DBGOUTAGAIN_KEYWORD_METHOD);
+
+ /*iniclos dclo_251__DBGOUTAGAIN_KEYWORD_METHOD */
+ /*_.VALCLO___V296*/ meltfptr[295] =
+ (void *) &cdat->dclo_251__DBGOUTAGAIN_KEYWORD_METHOD;
+ cdat->dclo_251__DBGOUTAGAIN_KEYWORD_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_249__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 0;
+ cdat->dclo_251__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 0;
-/*iniobj dsym_250__CLASS_KEYWORD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V295*/ meltfptr[294])
- /*_.VALDATA___V295*/
- meltfptr[294] = (void *) &cdat->dsym_250__CLASS_KEYWORD;
+/*iniobj dsym_252__CLASS_KEYWORD*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V297*/ meltfptr[296])
+ /*_.VALDATA___V297*/
+ meltfptr[296] = (void *) &cdat->dsym_252__CLASS_KEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_250__CLASS_KEYWORD",
+ melt_assertmsg ("iniobj check.discr isobj dsym_252__CLASS_KEYWORD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_250__CLASS_KEYWORD",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_252__CLASS_KEYWORD",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_250__CLASS_KEYWORD.meltobj_class =
+ cdat->dsym_252__CLASS_KEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_250__CLASS_KEYWORD.obj_hash = 14992133;
- cdat->dsym_250__CLASS_KEYWORD.obj_len = 3;
+ cdat->dsym_252__CLASS_KEYWORD.obj_hash = 14992133;
+ cdat->dsym_252__CLASS_KEYWORD.obj_len = 3;
-/*inistring dstr_251__CLASS_KEYWORD*/
- /*_.VALSTR___V296*/ meltfptr[295] = (void *) &cdat->dstr_251__CLASS_KEYWORD;
- cdat->dstr_251__CLASS_KEYWORD.discr =
+/*inistring dstr_253__CLASS_KEYWORD*/
+ /*_.VALSTR___V298*/ meltfptr[297] = (void *) &cdat->dstr_253__CLASS_KEYWORD;
+ cdat->dstr_253__CLASS_KEYWORD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_251__CLASS_KEYWORD.val,
+ /*small inistring */ strncpy (cdat->dstr_253__CLASS_KEYWORD.val,
"CLASS_KEYWORD",
- sizeof (cdat->dstr_251__CLASS_KEYWORD.val) -
+ sizeof (cdat->dstr_253__CLASS_KEYWORD.val) -
1);
- /*inirout drout_252__DBGOUT_KEYWORD_METHOD */
- /*_.VALROUT___V297*/ meltfptr[296] =
- (void *) &cdat->drout_252__DBGOUT_KEYWORD_METHOD;
- cdat->drout_252__DBGOUT_KEYWORD_METHOD.discr =
+ /*inirout drout_254__DBGOUT_KEYWORD_METHOD */
+ /*_.VALROUT___V299*/ meltfptr[298] =
+ (void *) &cdat->drout_254__DBGOUT_KEYWORD_METHOD;
+ cdat->drout_254__DBGOUT_KEYWORD_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_252__DBGOUT_KEYWORD_METHOD.routdescr,
- "DBGOUT_KEYWORD_METHOD @warmelt-debug.melt:1170",
+ strncpy (cdat->drout_254__DBGOUT_KEYWORD_METHOD.routdescr,
+ "DBGOUT_KEYWORD_METHOD @warmelt-debug.melt:1258",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_252__DBGOUT_KEYWORD_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_252__DBGOUT_KEYWORD_METHOD,
- meltrout_42_warmelt_debug_DBGOUT_KEYWORD_METHOD);
-
- /*iniclos dclo_253__DBGOUT_KEYWORD_METHOD */
- /*_.VALCLO___V298*/ meltfptr[297] =
- (void *) &cdat->dclo_253__DBGOUT_KEYWORD_METHOD;
- cdat->dclo_253__DBGOUT_KEYWORD_METHOD.discr =
+ cdat->drout_254__DBGOUT_KEYWORD_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_254__DBGOUT_KEYWORD_METHOD,
+ meltrout_43_warmelt_debug_DBGOUT_KEYWORD_METHOD);
+
+ /*iniclos dclo_255__DBGOUT_KEYWORD_METHOD */
+ /*_.VALCLO___V300*/ meltfptr[299] =
+ (void *) &cdat->dclo_255__DBGOUT_KEYWORD_METHOD;
+ cdat->dclo_255__DBGOUT_KEYWORD_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_253__DBGOUT_KEYWORD_METHOD.nbval = 0;
+ cdat->dclo_255__DBGOUT_KEYWORD_METHOD.nbval = 0;
- /*inirout drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
- /*_.VALROUT___V299*/ meltfptr[298] =
- (void *) &cdat->drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
- cdat->drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr =
+ /*inirout drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
+ /*_.VALROUT___V301*/ meltfptr[300] =
+ (void *) &cdat->drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
+ cdat->drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.routdescr,
- "DBGOUTAGAIN_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1180",
+ strncpy (cdat->drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.routdescr,
+ "DBGOUTAGAIN_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1268",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0;
+ cdat->drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_254__DBGOUTAGAIN_CLONED_SYMBOL_METHOD,
- meltrout_43_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD);
+ drout_256__DBGOUTAGAIN_CLONED_SYMBOL_METHOD,
+ meltrout_44_warmelt_debug_DBGOUTAGAIN_CLONED_SYMBOL_METHOD);
- /*iniclos dclo_255__DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
- /*_.VALCLO___V300*/ meltfptr[299] =
- (void *) &cdat->dclo_255__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
- cdat->dclo_255__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr =
+ /*iniclos dclo_257__DBGOUTAGAIN_CLONED_SYMBOL_METHOD */
+ /*_.VALCLO___V302*/ meltfptr[301] =
+ (void *) &cdat->dclo_257__DBGOUTAGAIN_CLONED_SYMBOL_METHOD;
+ cdat->dclo_257__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_255__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0;
+ cdat->dclo_257__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0;
-/*iniobj dsym_256__CLASS_CLONED_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V301*/ meltfptr[300])
- /*_.VALDATA___V301*/
- meltfptr[300] = (void *) &cdat->dsym_256__CLASS_CLONED_SYMBOL;
+/*iniobj dsym_258__CLASS_CLONED_SYMBOL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V303*/ meltfptr[302])
+ /*_.VALDATA___V303*/
+ meltfptr[302] = (void *) &cdat->dsym_258__CLASS_CLONED_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_256__CLASS_CLONED_SYMBOL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_258__CLASS_CLONED_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_256__CLASS_CLONED_SYMBOL",
+ ("iniobj check.discr objmagic dsym_258__CLASS_CLONED_SYMBOL",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_256__CLASS_CLONED_SYMBOL.meltobj_class =
+ cdat->dsym_258__CLASS_CLONED_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_256__CLASS_CLONED_SYMBOL.obj_hash = 933549728;
- cdat->dsym_256__CLASS_CLONED_SYMBOL.obj_len = 3;
+ cdat->dsym_258__CLASS_CLONED_SYMBOL.obj_hash = 933549728;
+ cdat->dsym_258__CLASS_CLONED_SYMBOL.obj_len = 3;
-/*inistring dstr_257__CLASS_CLONED_SYM*/
- /*_.VALSTR___V302*/ meltfptr[301] =
- (void *) &cdat->dstr_257__CLASS_CLONED_SYM;
- cdat->dstr_257__CLASS_CLONED_SYM.discr =
+/*inistring dstr_259__CLASS_CLONED_SYM*/
+ /*_.VALSTR___V304*/ meltfptr[303] =
+ (void *) &cdat->dstr_259__CLASS_CLONED_SYM;
+ cdat->dstr_259__CLASS_CLONED_SYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_257__CLASS_CLONED_SYM.val,
+ /*small inistring */ strncpy (cdat->dstr_259__CLASS_CLONED_SYM.val,
"CLASS_CLONED_SYMBOL",
- sizeof (cdat->dstr_257__CLASS_CLONED_SYM.
+ sizeof (cdat->dstr_259__CLASS_CLONED_SYM.
val) - 1);
- /*inirout drout_258__DBGOUT_CLONED_SYMBOL_METHOD */
- /*_.VALROUT___V303*/ meltfptr[302] =
- (void *) &cdat->drout_258__DBGOUT_CLONED_SYMBOL_METHOD;
- cdat->drout_258__DBGOUT_CLONED_SYMBOL_METHOD.discr =
+ /*inirout drout_260__DBGOUT_CLONED_SYMBOL_METHOD */
+ /*_.VALROUT___V305*/ meltfptr[304] =
+ (void *) &cdat->drout_260__DBGOUT_CLONED_SYMBOL_METHOD;
+ cdat->drout_260__DBGOUT_CLONED_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_258__DBGOUT_CLONED_SYMBOL_METHOD.routdescr,
- "DBGOUT_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1195",
+ strncpy (cdat->drout_260__DBGOUT_CLONED_SYMBOL_METHOD.routdescr,
+ "DBGOUT_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1283",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_258__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_258__DBGOUT_CLONED_SYMBOL_METHOD,
- meltrout_44_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD);
-
- /*iniclos dclo_259__DBGOUT_CLONED_SYMBOL_METHOD */
- /*_.VALCLO___V304*/ meltfptr[303] =
- (void *) &cdat->dclo_259__DBGOUT_CLONED_SYMBOL_METHOD;
- cdat->dclo_259__DBGOUT_CLONED_SYMBOL_METHOD.discr =
+ cdat->drout_260__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_260__DBGOUT_CLONED_SYMBOL_METHOD,
+ meltrout_45_warmelt_debug_DBGOUT_CLONED_SYMBOL_METHOD);
+
+ /*iniclos dclo_261__DBGOUT_CLONED_SYMBOL_METHOD */
+ /*_.VALCLO___V306*/ meltfptr[305] =
+ (void *) &cdat->dclo_261__DBGOUT_CLONED_SYMBOL_METHOD;
+ cdat->dclo_261__DBGOUT_CLONED_SYMBOL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_259__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 0;
+ cdat->dclo_261__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 0;
- /*inirout drout_260__DBGOUT_ENVIRONMENT_METHOD */
- /*_.VALROUT___V305*/ meltfptr[304] =
- (void *) &cdat->drout_260__DBGOUT_ENVIRONMENT_METHOD;
- cdat->drout_260__DBGOUT_ENVIRONMENT_METHOD.discr =
+ /*inirout drout_262__DBGOUT_ENVIRONMENT_METHOD */
+ /*_.VALROUT___V307*/ meltfptr[306] =
+ (void *) &cdat->drout_262__DBGOUT_ENVIRONMENT_METHOD;
+ cdat->drout_262__DBGOUT_ENVIRONMENT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_260__DBGOUT_ENVIRONMENT_METHOD.routdescr,
- "DBGOUT_ENVIRONMENT_METHOD @warmelt-debug.melt:1206",
+ strncpy (cdat->drout_262__DBGOUT_ENVIRONMENT_METHOD.routdescr,
+ "DBGOUT_ENVIRONMENT_METHOD @warmelt-debug.melt:1294",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_260__DBGOUT_ENVIRONMENT_METHOD.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_260__DBGOUT_ENVIRONMENT_METHOD,
- meltrout_45_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD);
-
- /*iniclos dclo_261__DBGOUT_ENVIRONMENT_METHOD */
- /*_.VALCLO___V306*/ meltfptr[305] =
- (void *) &cdat->dclo_261__DBGOUT_ENVIRONMENT_METHOD;
- cdat->dclo_261__DBGOUT_ENVIRONMENT_METHOD.discr =
+ cdat->drout_262__DBGOUT_ENVIRONMENT_METHOD.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_262__DBGOUT_ENVIRONMENT_METHOD,
+ meltrout_46_warmelt_debug_DBGOUT_ENVIRONMENT_METHOD);
+
+ /*iniclos dclo_263__DBGOUT_ENVIRONMENT_METHOD */
+ /*_.VALCLO___V308*/ meltfptr[307] =
+ (void *) &cdat->dclo_263__DBGOUT_ENVIRONMENT_METHOD;
+ cdat->dclo_263__DBGOUT_ENVIRONMENT_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_261__DBGOUT_ENVIRONMENT_METHOD.nbval = 0;
+ cdat->dclo_263__DBGOUT_ENVIRONMENT_METHOD.nbval = 0;
-/*iniobj dsym_262__CLASS_ENVIRONMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V307*/ meltfptr[306])
- /*_.VALDATA___V307*/
- meltfptr[306] = (void *) &cdat->dsym_262__CLASS_ENVIRONMENT;
+/*iniobj dsym_264__CLASS_ENVIRONMENT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V309*/ meltfptr[308])
+ /*_.VALDATA___V309*/
+ meltfptr[308] = (void *) &cdat->dsym_264__CLASS_ENVIRONMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_262__CLASS_ENVIRONMENT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_264__CLASS_ENVIRONMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_262__CLASS_ENVIRONMENT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_264__CLASS_ENVIRONMENT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_262__CLASS_ENVIRONMENT.meltobj_class =
+ cdat->dsym_264__CLASS_ENVIRONMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_262__CLASS_ENVIRONMENT.obj_hash = 59212821;
- cdat->dsym_262__CLASS_ENVIRONMENT.obj_len = 3;
+ cdat->dsym_264__CLASS_ENVIRONMENT.obj_hash = 59212821;
+ cdat->dsym_264__CLASS_ENVIRONMENT.obj_len = 3;
-/*inistring dstr_263__CLASS_ENVIRONMEN*/
- /*_.VALSTR___V308*/ meltfptr[307] =
- (void *) &cdat->dstr_263__CLASS_ENVIRONMEN;
- cdat->dstr_263__CLASS_ENVIRONMEN.discr =
+/*inistring dstr_265__CLASS_ENVIRONMEN*/
+ /*_.VALSTR___V310*/ meltfptr[309] =
+ (void *) &cdat->dstr_265__CLASS_ENVIRONMEN;
+ cdat->dstr_265__CLASS_ENVIRONMEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_263__CLASS_ENVIRONMEN.val,
+ /*small inistring */ strncpy (cdat->dstr_265__CLASS_ENVIRONMEN.val,
"CLASS_ENVIRONMENT",
- sizeof (cdat->dstr_263__CLASS_ENVIRONMEN.
+ sizeof (cdat->dstr_265__CLASS_ENVIRONMEN.
val) - 1);
-/*iniobj dsym_264__ENV_PREV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V309*/ meltfptr[308])
- /*_.VALDATA___V309*/
- meltfptr[308] = (void *) &cdat->dsym_264__ENV_PREV;
+/*iniobj dsym_266__ENV_PREV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V311*/ meltfptr[310])
+ /*_.VALDATA___V311*/
+ meltfptr[310] = (void *) &cdat->dsym_266__ENV_PREV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_264__ENV_PREV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_266__ENV_PREV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_264__ENV_PREV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_266__ENV_PREV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_264__ENV_PREV.meltobj_class =
+ cdat->dsym_266__ENV_PREV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_264__ENV_PREV.obj_hash = 363634370;
- cdat->dsym_264__ENV_PREV.obj_len = 3;
+ cdat->dsym_266__ENV_PREV.obj_hash = 363634370;
+ cdat->dsym_266__ENV_PREV.obj_len = 3;
-/*inistring dstr_265__ENV_PREV*/
- /*_.VALSTR___V310*/ meltfptr[309] = (void *) &cdat->dstr_265__ENV_PREV;
- cdat->dstr_265__ENV_PREV.discr =
+/*inistring dstr_267__ENV_PREV*/
+ /*_.VALSTR___V312*/ meltfptr[311] = (void *) &cdat->dstr_267__ENV_PREV;
+ cdat->dstr_267__ENV_PREV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_265__ENV_PREV.val, "ENV_PREV",
- sizeof (cdat->dstr_265__ENV_PREV.val) - 1);
- /*inirout drout_266__DBGOUTAGAIN_CTYPE_METHOD */
- /*_.VALROUT___V311*/ meltfptr[310] =
- (void *) &cdat->drout_266__DBGOUTAGAIN_CTYPE_METHOD;
- cdat->drout_266__DBGOUTAGAIN_CTYPE_METHOD.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_266__DBGOUTAGAIN_CTYPE_METHOD.routdescr,
- "DBGOUTAGAIN_CTYPE_METHOD @warmelt-debug.melt:1247",
- MELT_ROUTDESCR_LEN - 1);
- cdat->drout_266__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_266__DBGOUTAGAIN_CTYPE_METHOD,
- meltrout_46_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD);
-
- /*iniclos dclo_267__DBGOUTAGAIN_CTYPE_METHOD */
- /*_.VALCLO___V312*/ meltfptr[311] =
- (void *) &cdat->dclo_267__DBGOUTAGAIN_CTYPE_METHOD;
- cdat->dclo_267__DBGOUTAGAIN_CTYPE_METHOD.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_267__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0;
-
- /*inirout drout_268__DBGOUT_CTYPE_METHOD */
+ /*small inistring */ strncpy (cdat->dstr_267__ENV_PREV.val, "ENV_PREV",
+ sizeof (cdat->dstr_267__ENV_PREV.val) - 1);
+ /*inirout drout_268__DBGOUTAGAIN_CTYPE_METHOD */
/*_.VALROUT___V313*/ meltfptr[312] =
- (void *) &cdat->drout_268__DBGOUT_CTYPE_METHOD;
- cdat->drout_268__DBGOUT_CTYPE_METHOD.discr =
+ (void *) &cdat->drout_268__DBGOUTAGAIN_CTYPE_METHOD;
+ cdat->drout_268__DBGOUTAGAIN_CTYPE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_268__DBGOUT_CTYPE_METHOD.routdescr,
- "DBGOUT_CTYPE_METHOD @warmelt-debug.melt:1259",
+ strncpy (cdat->drout_268__DBGOUTAGAIN_CTYPE_METHOD.routdescr,
+ "DBGOUTAGAIN_CTYPE_METHOD @warmelt-debug.melt:1335",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_268__DBGOUT_CTYPE_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_268__DBGOUT_CTYPE_METHOD,
- meltrout_47_warmelt_debug_DBGOUT_CTYPE_METHOD);
+ cdat->drout_268__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_268__DBGOUTAGAIN_CTYPE_METHOD,
+ meltrout_47_warmelt_debug_DBGOUTAGAIN_CTYPE_METHOD);
- /*iniclos dclo_269__DBGOUT_CTYPE_METHOD */
+ /*iniclos dclo_269__DBGOUTAGAIN_CTYPE_METHOD */
/*_.VALCLO___V314*/ meltfptr[313] =
- (void *) &cdat->dclo_269__DBGOUT_CTYPE_METHOD;
- cdat->dclo_269__DBGOUT_CTYPE_METHOD.discr =
+ (void *) &cdat->dclo_269__DBGOUTAGAIN_CTYPE_METHOD;
+ cdat->dclo_269__DBGOUTAGAIN_CTYPE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_269__DBGOUT_CTYPE_METHOD.nbval = 0;
+ cdat->dclo_269__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0;
- /*inirout drout_270__DBGOUT_ANYBINDING_METHOD */
+ /*inirout drout_270__DBGOUT_CTYPE_METHOD */
/*_.VALROUT___V315*/ meltfptr[314] =
- (void *) &cdat->drout_270__DBGOUT_ANYBINDING_METHOD;
- cdat->drout_270__DBGOUT_ANYBINDING_METHOD.discr =
+ (void *) &cdat->drout_270__DBGOUT_CTYPE_METHOD;
+ cdat->drout_270__DBGOUT_CTYPE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_270__DBGOUT_ANYBINDING_METHOD.routdescr,
- "DBGOUT_ANYBINDING_METHOD @warmelt-debug.melt:1269",
+ strncpy (cdat->drout_270__DBGOUT_CTYPE_METHOD.routdescr,
+ "DBGOUT_CTYPE_METHOD @warmelt-debug.melt:1347",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_270__DBGOUT_ANYBINDING_METHOD.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_270__DBGOUT_ANYBINDING_METHOD,
- meltrout_48_warmelt_debug_DBGOUT_ANYBINDING_METHOD);
+ cdat->drout_270__DBGOUT_CTYPE_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_270__DBGOUT_CTYPE_METHOD,
+ meltrout_48_warmelt_debug_DBGOUT_CTYPE_METHOD);
- /*iniclos dclo_271__DBGOUT_ANYBINDING_METHOD */
+ /*iniclos dclo_271__DBGOUT_CTYPE_METHOD */
/*_.VALCLO___V316*/ meltfptr[315] =
- (void *) &cdat->dclo_271__DBGOUT_ANYBINDING_METHOD;
- cdat->dclo_271__DBGOUT_ANYBINDING_METHOD.discr =
+ (void *) &cdat->dclo_271__DBGOUT_CTYPE_METHOD;
+ cdat->dclo_271__DBGOUT_CTYPE_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_271__DBGOUT_ANYBINDING_METHOD.nbval = 0;
+ cdat->dclo_271__DBGOUT_CTYPE_METHOD.nbval = 0;
+
+ /*inirout drout_272__DBGOUT_ANYBINDING_METHOD */
+ /*_.VALROUT___V317*/ meltfptr[316] =
+ (void *) &cdat->drout_272__DBGOUT_ANYBINDING_METHOD;
+ cdat->drout_272__DBGOUT_ANYBINDING_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_272__DBGOUT_ANYBINDING_METHOD.routdescr,
+ "DBGOUT_ANYBINDING_METHOD @warmelt-debug.melt:1357",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_272__DBGOUT_ANYBINDING_METHOD.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_272__DBGOUT_ANYBINDING_METHOD,
+ meltrout_49_warmelt_debug_DBGOUT_ANYBINDING_METHOD);
+
+ /*iniclos dclo_273__DBGOUT_ANYBINDING_METHOD */
+ /*_.VALCLO___V318*/ meltfptr[317] =
+ (void *) &cdat->dclo_273__DBGOUT_ANYBINDING_METHOD;
+ cdat->dclo_273__DBGOUT_ANYBINDING_METHOD.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_273__DBGOUT_ANYBINDING_METHOD.nbval = 0;
-/*iniobj dsym_272__CLASS_ANY_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V317*/ meltfptr[316])
- /*_.VALDATA___V317*/
- meltfptr[316] = (void *) &cdat->dsym_272__CLASS_ANY_BINDING;
+/*iniobj dsym_274__CLASS_ANY_BINDING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V319*/ meltfptr[318])
+ /*_.VALDATA___V319*/
+ meltfptr[318] = (void *) &cdat->dsym_274__CLASS_ANY_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_272__CLASS_ANY_BINDING",
+ melt_assertmsg ("iniobj check.discr isobj dsym_274__CLASS_ANY_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_272__CLASS_ANY_BINDING",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_274__CLASS_ANY_BINDING",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_272__CLASS_ANY_BINDING.meltobj_class =
+ cdat->dsym_274__CLASS_ANY_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_272__CLASS_ANY_BINDING.obj_hash = 935770;
- cdat->dsym_272__CLASS_ANY_BINDING.obj_len = 3;
+ cdat->dsym_274__CLASS_ANY_BINDING.obj_hash = 935770;
+ cdat->dsym_274__CLASS_ANY_BINDING.obj_len = 3;
-/*inistring dstr_273__CLASS_ANY_BINDIN*/
- /*_.VALSTR___V318*/ meltfptr[317] =
- (void *) &cdat->dstr_273__CLASS_ANY_BINDIN;
- cdat->dstr_273__CLASS_ANY_BINDIN.discr =
+/*inistring dstr_275__CLASS_ANY_BINDIN*/
+ /*_.VALSTR___V320*/ meltfptr[319] =
+ (void *) &cdat->dstr_275__CLASS_ANY_BINDIN;
+ cdat->dstr_275__CLASS_ANY_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_273__CLASS_ANY_BINDIN.val,
+ /*small inistring */ strncpy (cdat->dstr_275__CLASS_ANY_BINDIN.val,
"CLASS_ANY_BINDING",
- sizeof (cdat->dstr_273__CLASS_ANY_BINDIN.
+ sizeof (cdat->dstr_275__CLASS_ANY_BINDIN.
val) - 1);
- /*inirout drout_274__DISPLAY_DEBUG_MESSAGE */
- /*_.VALROUT___V319*/ meltfptr[318] =
- (void *) &cdat->drout_274__DISPLAY_DEBUG_MESSAGE;
- cdat->drout_274__DISPLAY_DEBUG_MESSAGE.discr =
+ /*inirout drout_276__DISPLAY_DEBUG_MESSAGE */
+ /*_.VALROUT___V321*/ meltfptr[320] =
+ (void *) &cdat->drout_276__DISPLAY_DEBUG_MESSAGE;
+ cdat->drout_276__DISPLAY_DEBUG_MESSAGE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_274__DISPLAY_DEBUG_MESSAGE.routdescr,
- "DISPLAY_DEBUG_MESSAGE @warmelt-debug.melt:1303",
+ strncpy (cdat->drout_276__DISPLAY_DEBUG_MESSAGE.routdescr,
+ "DISPLAY_DEBUG_MESSAGE @warmelt-debug.melt:1391",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_274__DISPLAY_DEBUG_MESSAGE.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_274__DISPLAY_DEBUG_MESSAGE,
- meltrout_49_warmelt_debug_DISPLAY_DEBUG_MESSAGE);
-
- /*iniclos dclo_275__DISPLAY_DEBUG_MESSAGE */
- /*_.VALCLO___V320*/ meltfptr[319] =
- (void *) &cdat->dclo_275__DISPLAY_DEBUG_MESSAGE;
- cdat->dclo_275__DISPLAY_DEBUG_MESSAGE.discr =
+ cdat->drout_276__DISPLAY_DEBUG_MESSAGE.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_276__DISPLAY_DEBUG_MESSAGE,
+ meltrout_50_warmelt_debug_DISPLAY_DEBUG_MESSAGE);
+
+ /*iniclos dclo_277__DISPLAY_DEBUG_MESSAGE */
+ /*_.VALCLO___V322*/ meltfptr[321] =
+ (void *) &cdat->dclo_277__DISPLAY_DEBUG_MESSAGE;
+ cdat->dclo_277__DISPLAY_DEBUG_MESSAGE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_275__DISPLAY_DEBUG_MESSAGE.nbval = 0;
+ cdat->dclo_277__DISPLAY_DEBUG_MESSAGE.nbval = 0;
-/*iniobj dsym_276__DBG_OUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V321*/ meltfptr[320])
- /*_.VALDATA___V321*/
- meltfptr[320] = (void *) &cdat->dsym_276__DBG_OUT;
+/*iniobj dsym_278__DBG_OUT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V323*/ meltfptr[322])
+ /*_.VALDATA___V323*/
+ meltfptr[322] = (void *) &cdat->dsym_278__DBG_OUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_276__DBG_OUT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_278__DBG_OUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_276__DBG_OUT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_278__DBG_OUT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_276__DBG_OUT.meltobj_class =
+ cdat->dsym_278__DBG_OUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_276__DBG_OUT.obj_hash = 492035674;
- cdat->dsym_276__DBG_OUT.obj_len = 3;
+ cdat->dsym_278__DBG_OUT.obj_hash = 492035674;
+ cdat->dsym_278__DBG_OUT.obj_len = 3;
-/*inistring dstr_277__DBG_OUT*/
- /*_.VALSTR___V322*/ meltfptr[321] = (void *) &cdat->dstr_277__DBG_OUT;
- cdat->dstr_277__DBG_OUT.discr =
+/*inistring dstr_279__DBG_OUT*/
+ /*_.VALSTR___V324*/ meltfptr[323] = (void *) &cdat->dstr_279__DBG_OUT;
+ cdat->dstr_279__DBG_OUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_277__DBG_OUT.val, "DBG_OUT",
- sizeof (cdat->dstr_277__DBG_OUT.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_279__DBG_OUT.val, "DBG_OUT",
+ sizeof (cdat->dstr_279__DBG_OUT.val) - 1);
-/*iniobj dsym_278__DBG_OUTOBJECT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V323*/ meltfptr[322])
- /*_.VALDATA___V323*/
- meltfptr[322] = (void *) &cdat->dsym_278__DBG_OUTOBJECT;
+/*iniobj dsym_280__DBG_OUTOBJECT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V325*/ meltfptr[324])
+ /*_.VALDATA___V325*/
+ meltfptr[324] = (void *) &cdat->dsym_280__DBG_OUTOBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_278__DBG_OUTOBJECT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_280__DBG_OUTOBJECT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_278__DBG_OUTOBJECT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_280__DBG_OUTOBJECT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_278__DBG_OUTOBJECT.meltobj_class =
+ cdat->dsym_280__DBG_OUTOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_278__DBG_OUTOBJECT.obj_hash = 723698673;
- cdat->dsym_278__DBG_OUTOBJECT.obj_len = 3;
+ cdat->dsym_280__DBG_OUTOBJECT.obj_hash = 723698673;
+ cdat->dsym_280__DBG_OUTOBJECT.obj_len = 3;
-/*inistring dstr_279__DBG_OUTOBJECT*/
- /*_.VALSTR___V324*/ meltfptr[323] = (void *) &cdat->dstr_279__DBG_OUTOBJECT;
- cdat->dstr_279__DBG_OUTOBJECT.discr =
+/*inistring dstr_281__DBG_OUTOBJECT*/
+ /*_.VALSTR___V326*/ meltfptr[325] = (void *) &cdat->dstr_281__DBG_OUTOBJECT;
+ cdat->dstr_281__DBG_OUTOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_279__DBG_OUTOBJECT.val,
+ /*small inistring */ strncpy (cdat->dstr_281__DBG_OUTOBJECT.val,
"DBG_OUTOBJECT",
- sizeof (cdat->dstr_279__DBG_OUTOBJECT.val) -
+ sizeof (cdat->dstr_281__DBG_OUTOBJECT.val) -
1);
-/*iniobj dsym_280__DBGOUT_FIELDS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V325*/ meltfptr[324])
- /*_.VALDATA___V325*/
- meltfptr[324] = (void *) &cdat->dsym_280__DBGOUT_FIELDS;
+/*iniobj dsym_282__DBGOUT_FIELDS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V327*/ meltfptr[326])
+ /*_.VALDATA___V327*/
+ meltfptr[326] = (void *) &cdat->dsym_282__DBGOUT_FIELDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_280__DBGOUT_FIELDS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_282__DBGOUT_FIELDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_280__DBGOUT_FIELDS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_282__DBGOUT_FIELDS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_280__DBGOUT_FIELDS.meltobj_class =
+ cdat->dsym_282__DBGOUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_280__DBGOUT_FIELDS.obj_hash = 795625446;
- cdat->dsym_280__DBGOUT_FIELDS.obj_len = 3;
+ cdat->dsym_282__DBGOUT_FIELDS.obj_hash = 795625446;
+ cdat->dsym_282__DBGOUT_FIELDS.obj_len = 3;
-/*inistring dstr_281__DBGOUT_FIELDS*/
- /*_.VALSTR___V326*/ meltfptr[325] = (void *) &cdat->dstr_281__DBGOUT_FIELDS;
- cdat->dstr_281__DBGOUT_FIELDS.discr =
+/*inistring dstr_283__DBGOUT_FIELDS*/
+ /*_.VALSTR___V328*/ meltfptr[327] = (void *) &cdat->dstr_283__DBGOUT_FIELDS;
+ cdat->dstr_283__DBGOUT_FIELDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_281__DBGOUT_FIELDS.val,
+ /*small inistring */ strncpy (cdat->dstr_283__DBGOUT_FIELDS.val,
"DBGOUT_FIELDS",
- sizeof (cdat->dstr_281__DBGOUT_FIELDS.val) -
+ sizeof (cdat->dstr_283__DBGOUT_FIELDS.val) -
1);
-/*iniobj dsym_282__DBGOUTAGAIN_FIELDS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V327*/ meltfptr[326])
- /*_.VALDATA___V327*/
- meltfptr[326] = (void *) &cdat->dsym_282__DBGOUTAGAIN_FIELDS;
+/*iniobj dsym_284__DBGOUTAGAIN_FIELDS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V329*/ meltfptr[328])
+ /*_.VALDATA___V329*/
+ meltfptr[328] = (void *) &cdat->dsym_284__DBGOUTAGAIN_FIELDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_282__DBGOUTAGAIN_FIELDS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_284__DBGOUTAGAIN_FIELDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_282__DBGOUTAGAIN_FIELDS",
+ ("iniobj check.discr objmagic dsym_284__DBGOUTAGAIN_FIELDS",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_282__DBGOUTAGAIN_FIELDS.meltobj_class =
+ cdat->dsym_284__DBGOUTAGAIN_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_282__DBGOUTAGAIN_FIELDS.obj_hash = 961773165;
- cdat->dsym_282__DBGOUTAGAIN_FIELDS.obj_len = 3;
+ cdat->dsym_284__DBGOUTAGAIN_FIELDS.obj_hash = 961773165;
+ cdat->dsym_284__DBGOUTAGAIN_FIELDS.obj_len = 3;
-/*inistring dstr_283__DBGOUTAGAIN_FIEL*/
- /*_.VALSTR___V328*/ meltfptr[327] =
- (void *) &cdat->dstr_283__DBGOUTAGAIN_FIEL;
- cdat->dstr_283__DBGOUTAGAIN_FIEL.discr =
+/*inistring dstr_285__DBGOUTAGAIN_FIEL*/
+ /*_.VALSTR___V330*/ meltfptr[329] =
+ (void *) &cdat->dstr_285__DBGOUTAGAIN_FIEL;
+ cdat->dstr_285__DBGOUTAGAIN_FIEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_283__DBGOUTAGAIN_FIEL.val,
+ /*small inistring */ strncpy (cdat->dstr_285__DBGOUTAGAIN_FIEL.val,
"DBGOUTAGAIN_FIELDS",
- sizeof (cdat->dstr_283__DBGOUTAGAIN_FIEL.
+ sizeof (cdat->dstr_285__DBGOUTAGAIN_FIEL.
val) - 1);
-/*iniobj dsym_284__DEBUG_MSG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V329*/ meltfptr[328])
- /*_.VALDATA___V329*/
- meltfptr[328] = (void *) &cdat->dsym_284__DEBUG_MSG_FUN;
+/*iniobj dsym_286__DEBUG_MSG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V331*/ meltfptr[330])
+ /*_.VALDATA___V331*/
+ meltfptr[330] = (void *) &cdat->dsym_286__DEBUG_MSG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_284__DEBUG_MSG_FUN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_286__DEBUG_MSG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_284__DEBUG_MSG_FUN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_286__DEBUG_MSG_FUN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_284__DEBUG_MSG_FUN.meltobj_class =
+ cdat->dsym_286__DEBUG_MSG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_284__DEBUG_MSG_FUN.obj_hash = 938829072;
- cdat->dsym_284__DEBUG_MSG_FUN.obj_len = 3;
+ cdat->dsym_286__DEBUG_MSG_FUN.obj_hash = 938829072;
+ cdat->dsym_286__DEBUG_MSG_FUN.obj_len = 3;
-/*inistring dstr_285__DEBUG_MSG_FUN*/
- /*_.VALSTR___V330*/ meltfptr[329] = (void *) &cdat->dstr_285__DEBUG_MSG_FUN;
- cdat->dstr_285__DEBUG_MSG_FUN.discr =
+/*inistring dstr_287__DEBUG_MSG_FUN*/
+ /*_.VALSTR___V332*/ meltfptr[331] = (void *) &cdat->dstr_287__DEBUG_MSG_FUN;
+ cdat->dstr_287__DEBUG_MSG_FUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_285__DEBUG_MSG_FUN.val,
+ /*small inistring */ strncpy (cdat->dstr_287__DEBUG_MSG_FUN.val,
"DEBUG_MSG_FUN",
- sizeof (cdat->dstr_285__DEBUG_MSG_FUN.val) -
+ sizeof (cdat->dstr_287__DEBUG_MSG_FUN.val) -
1);
-/*iniobj dsym_286__DISPLAY_DEBUG_MESSAGE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V331*/ meltfptr[330])
- /*_.VALDATA___V331*/
- meltfptr[330] = (void *) &cdat->dsym_286__DISPLAY_DEBUG_MESSAGE;
+/*iniobj dsym_288__DISPLAY_DEBUG_MESSAGE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V333*/ meltfptr[332])
+ /*_.VALDATA___V333*/
+ meltfptr[332] = (void *) &cdat->dsym_288__DISPLAY_DEBUG_MESSAGE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_286__DISPLAY_DEBUG_MESSAGE",
+ ("iniobj check.discr isobj dsym_288__DISPLAY_DEBUG_MESSAGE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_286__DISPLAY_DEBUG_MESSAGE",
+ ("iniobj check.discr objmagic dsym_288__DISPLAY_DEBUG_MESSAGE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_286__DISPLAY_DEBUG_MESSAGE.meltobj_class =
+ cdat->dsym_288__DISPLAY_DEBUG_MESSAGE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_286__DISPLAY_DEBUG_MESSAGE.obj_hash = 759618783;
- cdat->dsym_286__DISPLAY_DEBUG_MESSAGE.obj_len = 3;
+ cdat->dsym_288__DISPLAY_DEBUG_MESSAGE.obj_hash = 759618783;
+ cdat->dsym_288__DISPLAY_DEBUG_MESSAGE.obj_len = 3;
-/*inistring dstr_287__DISPLAY_DEBUG_ME*/
- /*_.VALSTR___V332*/ meltfptr[331] =
- (void *) &cdat->dstr_287__DISPLAY_DEBUG_ME;
- cdat->dstr_287__DISPLAY_DEBUG_ME.discr =
+/*inistring dstr_289__DISPLAY_DEBUG_ME*/
+ /*_.VALSTR___V334*/ meltfptr[333] =
+ (void *) &cdat->dstr_289__DISPLAY_DEBUG_ME;
+ cdat->dstr_289__DISPLAY_DEBUG_ME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_287__DISPLAY_DEBUG_ME.val,
+ /*small inistring */ strncpy (cdat->dstr_289__DISPLAY_DEBUG_ME.val,
"DISPLAY_DEBUG_MESSAGE",
- sizeof (cdat->dstr_287__DISPLAY_DEBUG_ME.
+ sizeof (cdat->dstr_289__DISPLAY_DEBUG_ME.
val) - 1);
-/*iniobj dsym_288__MELT_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V333*/ meltfptr[332])
- /*_.VALDATA___V333*/
- meltfptr[332] = (void *) &cdat->dsym_288__MELT_DEBUG_FUN;
+/*iniobj dsym_290__MELT_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V335*/ meltfptr[334])
+ /*_.VALDATA___V335*/
+ meltfptr[334] = (void *) &cdat->dsym_290__MELT_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_288__MELT_DEBUG_FUN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_290__MELT_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_288__MELT_DEBUG_FUN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_290__MELT_DEBUG_FUN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_288__MELT_DEBUG_FUN.meltobj_class =
+ cdat->dsym_290__MELT_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_288__MELT_DEBUG_FUN.obj_hash = 972123377;
- cdat->dsym_288__MELT_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_290__MELT_DEBUG_FUN.obj_hash = 972123377;
+ cdat->dsym_290__MELT_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_289__MELT_DEBUG_FUN*/
- /*_.VALSTR___V334*/ meltfptr[333] =
- (void *) &cdat->dstr_289__MELT_DEBUG_FUN;
- cdat->dstr_289__MELT_DEBUG_FUN.discr =
+/*inistring dstr_291__MELT_DEBUG_FUN*/
+ /*_.VALSTR___V336*/ meltfptr[335] =
+ (void *) &cdat->dstr_291__MELT_DEBUG_FUN;
+ cdat->dstr_291__MELT_DEBUG_FUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_289__MELT_DEBUG_FUN.val,
+ /*small inistring */ strncpy (cdat->dstr_291__MELT_DEBUG_FUN.val,
"MELT_DEBUG_FUN",
- sizeof (cdat->dstr_289__MELT_DEBUG_FUN.val) -
+ sizeof (cdat->dstr_291__MELT_DEBUG_FUN.val) -
1);
-/*iniobj dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V335*/ meltfptr[334])
- /*_.VALDATA___V335*/
- meltfptr[334] = (void *) &cdat->dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN;
+/*iniobj dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V337*/ meltfptr[336])
+ /*_.VALDATA___V337*/
+ meltfptr[336] = (void *) &cdat->dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN.meltobj_class =
+ cdat->dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN.obj_hash = 475134270;
- cdat->dsym_290__REGISTER_BASICBLOCK_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN.obj_hash = 475134270;
+ cdat->dsym_292__REGISTER_BASICBLOCK_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_291__REGISTER_BASICBL*/
- /*_.VALSTR___V336*/ meltfptr[335] =
- (void *) &cdat->dstr_291__REGISTER_BASICBL;
- cdat->dstr_291__REGISTER_BASICBL.discr =
+/*inistring dstr_293__REGISTER_BASICBL*/
+ /*_.VALSTR___V338*/ meltfptr[337] =
+ (void *) &cdat->dstr_293__REGISTER_BASICBL;
+ cdat->dstr_293__REGISTER_BASICBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_291__REGISTER_BASICBL.val,
+ /*small inistring */ strncpy (cdat->dstr_293__REGISTER_BASICBL.val,
"REGISTER_BASICBLOCK_DEBUG_FUN",
- sizeof (cdat->dstr_291__REGISTER_BASICBL.
+ sizeof (cdat->dstr_293__REGISTER_BASICBL.
val) - 1);
-/*iniobj dsym_292__REGISTER_EDGE_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V337*/ meltfptr[336])
- /*_.VALDATA___V337*/
- meltfptr[336] = (void *) &cdat->dsym_292__REGISTER_EDGE_DEBUG_FUN;
+/*iniobj dsym_294__REGISTER_EDGE_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V339*/ meltfptr[338])
+ /*_.VALDATA___V339*/
+ meltfptr[338] = (void *) &cdat->dsym_294__REGISTER_EDGE_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_292__REGISTER_EDGE_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_294__REGISTER_EDGE_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_292__REGISTER_EDGE_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_294__REGISTER_EDGE_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_292__REGISTER_EDGE_DEBUG_FUN.meltobj_class =
+ cdat->dsym_294__REGISTER_EDGE_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_292__REGISTER_EDGE_DEBUG_FUN.obj_hash = 739045024;
- cdat->dsym_292__REGISTER_EDGE_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_294__REGISTER_EDGE_DEBUG_FUN.obj_hash = 739045024;
+ cdat->dsym_294__REGISTER_EDGE_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_293__REGISTER_EDGE_DE*/
- /*_.VALSTR___V338*/ meltfptr[337] =
- (void *) &cdat->dstr_293__REGISTER_EDGE_DE;
- cdat->dstr_293__REGISTER_EDGE_DE.discr =
+/*inistring dstr_295__REGISTER_EDGE_DE*/
+ /*_.VALSTR___V340*/ meltfptr[339] =
+ (void *) &cdat->dstr_295__REGISTER_EDGE_DE;
+ cdat->dstr_295__REGISTER_EDGE_DE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_293__REGISTER_EDGE_DE.val,
+ /*small inistring */ strncpy (cdat->dstr_295__REGISTER_EDGE_DE.val,
"REGISTER_EDGE_DEBUG_FUN",
- sizeof (cdat->dstr_293__REGISTER_EDGE_DE.
+ sizeof (cdat->dstr_295__REGISTER_EDGE_DE.
val) - 1);
-/*iniobj dsym_294__REGISTER_GIMPLE_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V339*/ meltfptr[338])
- /*_.VALDATA___V339*/
- meltfptr[338] = (void *) &cdat->dsym_294__REGISTER_GIMPLE_DEBUG_FUN;
+/*iniobj dsym_296__REGISTER_GIMPLE_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V341*/ meltfptr[340])
+ /*_.VALDATA___V341*/
+ meltfptr[340] = (void *) &cdat->dsym_296__REGISTER_GIMPLE_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_294__REGISTER_GIMPLE_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_296__REGISTER_GIMPLE_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_294__REGISTER_GIMPLE_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_296__REGISTER_GIMPLE_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_294__REGISTER_GIMPLE_DEBUG_FUN.meltobj_class =
+ cdat->dsym_296__REGISTER_GIMPLE_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_294__REGISTER_GIMPLE_DEBUG_FUN.obj_hash = 158282506;
- cdat->dsym_294__REGISTER_GIMPLE_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_296__REGISTER_GIMPLE_DEBUG_FUN.obj_hash = 158282506;
+ cdat->dsym_296__REGISTER_GIMPLE_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_295__REGISTER_GIMPLE_*/
- /*_.VALSTR___V340*/ meltfptr[339] =
- (void *) &cdat->dstr_295__REGISTER_GIMPLE_;
- cdat->dstr_295__REGISTER_GIMPLE_.discr =
+/*inistring dstr_297__REGISTER_GIMPLE_*/
+ /*_.VALSTR___V342*/ meltfptr[341] =
+ (void *) &cdat->dstr_297__REGISTER_GIMPLE_;
+ cdat->dstr_297__REGISTER_GIMPLE_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_295__REGISTER_GIMPLE_.val,
+ /*small inistring */ strncpy (cdat->dstr_297__REGISTER_GIMPLE_.val,
"REGISTER_GIMPLE_DEBUG_FUN",
- sizeof (cdat->dstr_295__REGISTER_GIMPLE_.
+ sizeof (cdat->dstr_297__REGISTER_GIMPLE_.
val) - 1);
-/*iniobj dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V341*/ meltfptr[340])
- /*_.VALDATA___V341*/
- meltfptr[340] = (void *) &cdat->dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN;
+/*iniobj dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V343*/ meltfptr[342])
+ /*_.VALDATA___V343*/
+ meltfptr[342] = (void *) &cdat->dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN.meltobj_class =
+ cdat->dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN.obj_hash = 247154639;
- cdat->dsym_296__REGISTER_GIMPLESEQ_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN.obj_hash = 247154639;
+ cdat->dsym_298__REGISTER_GIMPLESEQ_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_297__REGISTER_GIMPLES*/
- /*_.VALSTR___V342*/ meltfptr[341] =
- (void *) &cdat->dstr_297__REGISTER_GIMPLES;
- cdat->dstr_297__REGISTER_GIMPLES.discr =
+/*inistring dstr_299__REGISTER_GIMPLES*/
+ /*_.VALSTR___V344*/ meltfptr[343] =
+ (void *) &cdat->dstr_299__REGISTER_GIMPLES;
+ cdat->dstr_299__REGISTER_GIMPLES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_297__REGISTER_GIMPLES.val,
+ /*small inistring */ strncpy (cdat->dstr_299__REGISTER_GIMPLES.val,
"REGISTER_GIMPLESEQ_DEBUG_FUN",
- sizeof (cdat->dstr_297__REGISTER_GIMPLES.
+ sizeof (cdat->dstr_299__REGISTER_GIMPLES.
val) - 1);
-/*iniobj dsym_298__REGISTER_LOOP_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V343*/ meltfptr[342])
- /*_.VALDATA___V343*/
- meltfptr[342] = (void *) &cdat->dsym_298__REGISTER_LOOP_DEBUG_FUN;
+/*iniobj dsym_300__REGISTER_LOOP_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V345*/ meltfptr[344])
+ /*_.VALDATA___V345*/
+ meltfptr[344] = (void *) &cdat->dsym_300__REGISTER_LOOP_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_298__REGISTER_LOOP_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_300__REGISTER_LOOP_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_298__REGISTER_LOOP_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_300__REGISTER_LOOP_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_298__REGISTER_LOOP_DEBUG_FUN.meltobj_class =
+ cdat->dsym_300__REGISTER_LOOP_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_298__REGISTER_LOOP_DEBUG_FUN.obj_hash = 182074459;
- cdat->dsym_298__REGISTER_LOOP_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_300__REGISTER_LOOP_DEBUG_FUN.obj_hash = 182074459;
+ cdat->dsym_300__REGISTER_LOOP_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_299__REGISTER_LOOP_DE*/
- /*_.VALSTR___V344*/ meltfptr[343] =
- (void *) &cdat->dstr_299__REGISTER_LOOP_DE;
- cdat->dstr_299__REGISTER_LOOP_DE.discr =
+/*inistring dstr_301__REGISTER_LOOP_DE*/
+ /*_.VALSTR___V346*/ meltfptr[345] =
+ (void *) &cdat->dstr_301__REGISTER_LOOP_DE;
+ cdat->dstr_301__REGISTER_LOOP_DE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_299__REGISTER_LOOP_DE.val,
+ /*small inistring */ strncpy (cdat->dstr_301__REGISTER_LOOP_DE.val,
"REGISTER_LOOP_DEBUG_FUN",
- sizeof (cdat->dstr_299__REGISTER_LOOP_DE.
+ sizeof (cdat->dstr_301__REGISTER_LOOP_DE.
val) - 1);
-/*iniobj dsym_300__REGISTER_TREE_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V345*/ meltfptr[344])
- /*_.VALDATA___V345*/
- meltfptr[344] = (void *) &cdat->dsym_300__REGISTER_TREE_DEBUG_FUN;
+/*iniobj dsym_302__REGISTER_TREE_DEBUG_FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V347*/ meltfptr[346])
+ /*_.VALDATA___V347*/
+ meltfptr[346] = (void *) &cdat->dsym_302__REGISTER_TREE_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_300__REGISTER_TREE_DEBUG_FUN",
+ ("iniobj check.discr isobj dsym_302__REGISTER_TREE_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_300__REGISTER_TREE_DEBUG_FUN",
+ ("iniobj check.discr objmagic dsym_302__REGISTER_TREE_DEBUG_FUN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_300__REGISTER_TREE_DEBUG_FUN.meltobj_class =
+ cdat->dsym_302__REGISTER_TREE_DEBUG_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_300__REGISTER_TREE_DEBUG_FUN.obj_hash = 352695421;
- cdat->dsym_300__REGISTER_TREE_DEBUG_FUN.obj_len = 3;
+ cdat->dsym_302__REGISTER_TREE_DEBUG_FUN.obj_hash = 352695421;
+ cdat->dsym_302__REGISTER_TREE_DEBUG_FUN.obj_len = 3;
-/*inistring dstr_301__REGISTER_TREE_DE*/
- /*_.VALSTR___V346*/ meltfptr[345] =
- (void *) &cdat->dstr_301__REGISTER_TREE_DE;
- cdat->dstr_301__REGISTER_TREE_DE.discr =
+/*inistring dstr_303__REGISTER_TREE_DE*/
+ /*_.VALSTR___V348*/ meltfptr[347] =
+ (void *) &cdat->dstr_303__REGISTER_TREE_DE;
+ cdat->dstr_303__REGISTER_TREE_DE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_301__REGISTER_TREE_DE.val,
+ /*small inistring */ strncpy (cdat->dstr_303__REGISTER_TREE_DE.val,
"REGISTER_TREE_DEBUG_FUN",
- sizeof (cdat->dstr_301__REGISTER_TREE_DE.
+ sizeof (cdat->dstr_303__REGISTER_TREE_DE.
val) - 1);
cdat = NULL;
melt_prohibit_garbcoll = FALSE;
@@ -6291,12 +6365,13 @@ start_module_melt (void *modargp_)
initial_frame_st meltfram__;
#define meltframe meltfram__
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 383;
+ meltfram__.mcfr_nbvar = 386;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -338;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
+ /*minihash */ -1403;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_debug;
/**COMMENT: get previous environment **/ ;
@@ -6756,8 +6831,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MIXED_INTEGER =
meltgc_named_symbol ("DISCR_MIXED_INTEGER", MELT_GET);
- if (sy_DISCR_MIXED_INTEGER && NULL == /*_.VALDATA___V212*/ meltfptr[211])
- /*_.VALDATA___V212*/ meltfptr[211] = (void *) sy_DISCR_MIXED_INTEGER;
+ if (sy_DISCR_MIXED_INTEGER && NULL == /*_.VALDATA___V214*/ meltfptr[213])
+ /*_.VALDATA___V214*/ meltfptr[213] = (void *) sy_DISCR_MIXED_INTEGER;
}
/*^getnamedsymbol */
@@ -6766,8 +6841,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MIXED_LOCATION =
meltgc_named_symbol ("DISCR_MIXED_LOCATION", MELT_GET);
- if (sy_DISCR_MIXED_LOCATION && NULL == /*_.VALDATA___V216*/ meltfptr[215])
- /*_.VALDATA___V216*/ meltfptr[215] = (void *) sy_DISCR_MIXED_LOCATION;
+ if (sy_DISCR_MIXED_LOCATION && NULL == /*_.VALDATA___V218*/ meltfptr[217])
+ /*_.VALDATA___V218*/ meltfptr[217] = (void *) sy_DISCR_MIXED_LOCATION;
}
/*^getnamedsymbol */
@@ -6776,8 +6851,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MIXED_BIGINT =
meltgc_named_symbol ("DISCR_MIXED_BIGINT", MELT_GET);
- if (sy_DISCR_MIXED_BIGINT && NULL == /*_.VALDATA___V220*/ meltfptr[219])
- /*_.VALDATA___V220*/ meltfptr[219] = (void *) sy_DISCR_MIXED_BIGINT;
+ if (sy_DISCR_MIXED_BIGINT && NULL == /*_.VALDATA___V222*/ meltfptr[221])
+ /*_.VALDATA___V222*/ meltfptr[221] = (void *) sy_DISCR_MIXED_BIGINT;
}
/*^getnamedsymbol */
@@ -6786,8 +6861,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MULTIPLE =
meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET);
- if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V224*/ meltfptr[223])
- /*_.VALDATA___V224*/ meltfptr[223] = (void *) sy_DISCR_MULTIPLE;
+ if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V226*/ meltfptr[225])
+ /*_.VALDATA___V226*/ meltfptr[225] = (void *) sy_DISCR_MULTIPLE;
}
/*^getnamedsymbol */
@@ -6796,8 +6871,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_ROUTINE =
meltgc_named_symbol ("DISCR_ROUTINE", MELT_GET);
- if (sy_DISCR_ROUTINE && NULL == /*_.VALDATA___V229*/ meltfptr[228])
- /*_.VALDATA___V229*/ meltfptr[228] = (void *) sy_DISCR_ROUTINE;
+ if (sy_DISCR_ROUTINE && NULL == /*_.VALDATA___V231*/ meltfptr[230])
+ /*_.VALDATA___V231*/ meltfptr[230] = (void *) sy_DISCR_ROUTINE;
}
/*^getnamedsymbol */
@@ -6806,8 +6881,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_ROUTINE_EVERY =
meltgc_named_symbol ("ROUTINE_EVERY", MELT_GET);
- if (sy_ROUTINE_EVERY && NULL == /*_.VALDATA___V231*/ meltfptr[230])
- /*_.VALDATA___V231*/ meltfptr[230] = (void *) sy_ROUTINE_EVERY;
+ if (sy_ROUTINE_EVERY && NULL == /*_.VALDATA___V233*/ meltfptr[232])
+ /*_.VALDATA___V233*/ meltfptr[232] = (void *) sy_ROUTINE_EVERY;
}
/*^getnamedsymbol */
@@ -6815,8 +6890,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DISCR_LIST */
{
melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET);
- if (sy_DISCR_LIST && NULL == /*_.VALDATA___V237*/ meltfptr[236])
- /*_.VALDATA___V237*/ meltfptr[236] = (void *) sy_DISCR_LIST;
+ if (sy_DISCR_LIST && NULL == /*_.VALDATA___V239*/ meltfptr[238])
+ /*_.VALDATA___V239*/ meltfptr[238] = (void *) sy_DISCR_LIST;
}
/*^getnamedsymbol */
@@ -6824,8 +6899,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DISCR_PAIR */
{
melt_ptr_t sy_DISCR_PAIR = meltgc_named_symbol ("DISCR_PAIR", MELT_GET);
- if (sy_DISCR_PAIR && NULL == /*_.VALDATA___V241*/ meltfptr[240])
- /*_.VALDATA___V241*/ meltfptr[240] = (void *) sy_DISCR_PAIR;
+ if (sy_DISCR_PAIR && NULL == /*_.VALDATA___V243*/ meltfptr[242])
+ /*_.VALDATA___V243*/ meltfptr[242] = (void *) sy_DISCR_PAIR;
}
/*^getnamedsymbol */
@@ -6834,8 +6909,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MAPOBJECT_EVERY =
meltgc_named_symbol ("MAPOBJECT_EVERY", MELT_GET);
- if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V251*/ meltfptr[250])
- /*_.VALDATA___V251*/ meltfptr[250] = (void *) sy_MAPOBJECT_EVERY;
+ if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V253*/ meltfptr[252])
+ /*_.VALDATA___V253*/ meltfptr[252] = (void *) sy_MAPOBJECT_EVERY;
}
/*^getnamedsymbol */
@@ -6844,8 +6919,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_COMPARE_OBJ_RANKED =
meltgc_named_symbol ("COMPARE_OBJ_RANKED", MELT_GET);
- if (sy_COMPARE_OBJ_RANKED && NULL == /*_.VALDATA___V253*/ meltfptr[252])
- /*_.VALDATA___V253*/ meltfptr[252] = (void *) sy_COMPARE_OBJ_RANKED;
+ if (sy_COMPARE_OBJ_RANKED && NULL == /*_.VALDATA___V255*/ meltfptr[254])
+ /*_.VALDATA___V255*/ meltfptr[254] = (void *) sy_COMPARE_OBJ_RANKED;
}
/*^getnamedsymbol */
@@ -6854,8 +6929,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_EVERY =
meltgc_named_symbol ("MULTIPLE_EVERY", MELT_GET);
- if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V255*/ meltfptr[254])
- /*_.VALDATA___V255*/ meltfptr[254] = (void *) sy_MULTIPLE_EVERY;
+ if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V257*/ meltfptr[256])
+ /*_.VALDATA___V257*/ meltfptr[256] = (void *) sy_MULTIPLE_EVERY;
}
/*^getnamedsymbol */
@@ -6864,8 +6939,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MAP_STRINGS =
meltgc_named_symbol ("DISCR_MAP_STRINGS", MELT_GET);
- if (sy_DISCR_MAP_STRINGS && NULL == /*_.VALDATA___V265*/ meltfptr[264])
- /*_.VALDATA___V265*/ meltfptr[264] = (void *) sy_DISCR_MAP_STRINGS;
+ if (sy_DISCR_MAP_STRINGS && NULL == /*_.VALDATA___V267*/ meltfptr[266])
+ /*_.VALDATA___V267*/ meltfptr[266] = (void *) sy_DISCR_MAP_STRINGS;
}
/*^getnamedsymbol */
@@ -6874,8 +6949,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MAPSTRING_EVERY =
meltgc_named_symbol ("MAPSTRING_EVERY", MELT_GET);
- if (sy_MAPSTRING_EVERY && NULL == /*_.VALDATA___V267*/ meltfptr[266])
- /*_.VALDATA___V267*/ meltfptr[266] = (void *) sy_MAPSTRING_EVERY;
+ if (sy_MAPSTRING_EVERY && NULL == /*_.VALDATA___V269*/ meltfptr[268])
+ /*_.VALDATA___V269*/ meltfptr[268] = (void *) sy_MAPSTRING_EVERY;
}
/*^getnamedsymbol */
@@ -6884,8 +6959,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_ANY_RECEIVER =
meltgc_named_symbol ("DISCR_ANY_RECEIVER", MELT_GET);
- if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V273*/ meltfptr[272])
- /*_.VALDATA___V273*/ meltfptr[272] = (void *) sy_DISCR_ANY_RECEIVER;
+ if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V275*/ meltfptr[274])
+ /*_.VALDATA___V275*/ meltfptr[274] = (void *) sy_DISCR_ANY_RECEIVER;
}
/*^getnamedsymbol */
@@ -6895,8 +6970,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DBGOUT_NAMEDOBJECT_METHOD =
meltgc_named_symbol ("DBGOUT_NAMEDOBJECT_METHOD", MELT_GET);
if (sy_DBGOUT_NAMEDOBJECT_METHOD
- && NULL == /*_.VALDATA___V279*/ meltfptr[278])
- /*_.VALDATA___V279*/ meltfptr[278] =
+ && NULL == /*_.VALDATA___V281*/ meltfptr[280])
+ /*_.VALDATA___V281*/ meltfptr[280] =
(void *) sy_DBGOUT_NAMEDOBJECT_METHOD;
}
@@ -6906,8 +6981,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SYMBOL =
meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET);
- if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V285*/ meltfptr[284])
- /*_.VALDATA___V285*/ meltfptr[284] = (void *) sy_CLASS_SYMBOL;
+ if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V287*/ meltfptr[286])
+ /*_.VALDATA___V287*/ meltfptr[286] = (void *) sy_CLASS_SYMBOL;
}
/*^getnamedsymbol */
@@ -6915,8 +6990,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_CLASS */
{
melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET);
- if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V291*/ meltfptr[290])
- /*_.VALDATA___V291*/ meltfptr[290] = (void *) sy_CLASS_CLASS;
+ if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V293*/ meltfptr[292])
+ /*_.VALDATA___V293*/ meltfptr[292] = (void *) sy_CLASS_CLASS;
}
/*^getnamedsymbol */
@@ -6925,8 +7000,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_KEYWORD =
meltgc_named_symbol ("CLASS_KEYWORD", MELT_GET);
- if (sy_CLASS_KEYWORD && NULL == /*_.VALDATA___V295*/ meltfptr[294])
- /*_.VALDATA___V295*/ meltfptr[294] = (void *) sy_CLASS_KEYWORD;
+ if (sy_CLASS_KEYWORD && NULL == /*_.VALDATA___V297*/ meltfptr[296])
+ /*_.VALDATA___V297*/ meltfptr[296] = (void *) sy_CLASS_KEYWORD;
}
/*^getnamedsymbol */
@@ -6935,8 +7010,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CLONED_SYMBOL =
meltgc_named_symbol ("CLASS_CLONED_SYMBOL", MELT_GET);
- if (sy_CLASS_CLONED_SYMBOL && NULL == /*_.VALDATA___V301*/ meltfptr[300])
- /*_.VALDATA___V301*/ meltfptr[300] = (void *) sy_CLASS_CLONED_SYMBOL;
+ if (sy_CLASS_CLONED_SYMBOL && NULL == /*_.VALDATA___V303*/ meltfptr[302])
+ /*_.VALDATA___V303*/ meltfptr[302] = (void *) sy_CLASS_CLONED_SYMBOL;
}
/*^getnamedsymbol */
@@ -6945,8 +7020,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ENVIRONMENT =
meltgc_named_symbol ("CLASS_ENVIRONMENT", MELT_GET);
- if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V307*/ meltfptr[306])
- /*_.VALDATA___V307*/ meltfptr[306] = (void *) sy_CLASS_ENVIRONMENT;
+ if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V309*/ meltfptr[308])
+ /*_.VALDATA___V309*/ meltfptr[308] = (void *) sy_CLASS_ENVIRONMENT;
}
/*^getnamedsymbol */
@@ -6954,8 +7029,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:ENV_PREV */
{
melt_ptr_t sy_ENV_PREV = meltgc_named_symbol ("ENV_PREV", MELT_GET);
- if (sy_ENV_PREV && NULL == /*_.VALDATA___V309*/ meltfptr[308])
- /*_.VALDATA___V309*/ meltfptr[308] = (void *) sy_ENV_PREV;
+ if (sy_ENV_PREV && NULL == /*_.VALDATA___V311*/ meltfptr[310])
+ /*_.VALDATA___V311*/ meltfptr[310] = (void *) sy_ENV_PREV;
}
/*^getnamedsymbol */
@@ -6964,8 +7039,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ANY_BINDING =
meltgc_named_symbol ("CLASS_ANY_BINDING", MELT_GET);
- if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V317*/ meltfptr[316])
- /*_.VALDATA___V317*/ meltfptr[316] = (void *) sy_CLASS_ANY_BINDING;
+ if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V319*/ meltfptr[318])
+ /*_.VALDATA___V319*/ meltfptr[318] = (void *) sy_CLASS_ANY_BINDING;
}
/*^getnamedsymbol */
@@ -6973,8 +7048,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DBG_OUT */
{
melt_ptr_t sy_DBG_OUT = meltgc_named_symbol ("DBG_OUT", MELT_GET);
- if (sy_DBG_OUT && NULL == /*_.VALDATA___V321*/ meltfptr[320])
- /*_.VALDATA___V321*/ meltfptr[320] = (void *) sy_DBG_OUT;
+ if (sy_DBG_OUT && NULL == /*_.VALDATA___V323*/ meltfptr[322])
+ /*_.VALDATA___V323*/ meltfptr[322] = (void *) sy_DBG_OUT;
}
/*^getnamedsymbol */
@@ -6983,8 +7058,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DBG_OUTOBJECT =
meltgc_named_symbol ("DBG_OUTOBJECT", MELT_GET);
- if (sy_DBG_OUTOBJECT && NULL == /*_.VALDATA___V323*/ meltfptr[322])
- /*_.VALDATA___V323*/ meltfptr[322] = (void *) sy_DBG_OUTOBJECT;
+ if (sy_DBG_OUTOBJECT && NULL == /*_.VALDATA___V325*/ meltfptr[324])
+ /*_.VALDATA___V325*/ meltfptr[324] = (void *) sy_DBG_OUTOBJECT;
}
/*^getnamedsymbol */
@@ -6993,8 +7068,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DBGOUT_FIELDS =
meltgc_named_symbol ("DBGOUT_FIELDS", MELT_GET);
- if (sy_DBGOUT_FIELDS && NULL == /*_.VALDATA___V325*/ meltfptr[324])
- /*_.VALDATA___V325*/ meltfptr[324] = (void *) sy_DBGOUT_FIELDS;
+ if (sy_DBGOUT_FIELDS && NULL == /*_.VALDATA___V327*/ meltfptr[326])
+ /*_.VALDATA___V327*/ meltfptr[326] = (void *) sy_DBGOUT_FIELDS;
}
/*^getnamedsymbol */
@@ -7003,8 +7078,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DBGOUTAGAIN_FIELDS =
meltgc_named_symbol ("DBGOUTAGAIN_FIELDS", MELT_GET);
- if (sy_DBGOUTAGAIN_FIELDS && NULL == /*_.VALDATA___V327*/ meltfptr[326])
- /*_.VALDATA___V327*/ meltfptr[326] = (void *) sy_DBGOUTAGAIN_FIELDS;
+ if (sy_DBGOUTAGAIN_FIELDS && NULL == /*_.VALDATA___V329*/ meltfptr[328])
+ /*_.VALDATA___V329*/ meltfptr[328] = (void *) sy_DBGOUTAGAIN_FIELDS;
}
/*^getnamedsymbol */
@@ -7013,8 +7088,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DEBUG_MSG_FUN =
meltgc_named_symbol ("DEBUG_MSG_FUN", MELT_GET);
- if (sy_DEBUG_MSG_FUN && NULL == /*_.VALDATA___V329*/ meltfptr[328])
- /*_.VALDATA___V329*/ meltfptr[328] = (void *) sy_DEBUG_MSG_FUN;
+ if (sy_DEBUG_MSG_FUN && NULL == /*_.VALDATA___V331*/ meltfptr[330])
+ /*_.VALDATA___V331*/ meltfptr[330] = (void *) sy_DEBUG_MSG_FUN;
}
/*^getnamedsymbol */
@@ -7024,8 +7099,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISPLAY_DEBUG_MESSAGE =
meltgc_named_symbol ("DISPLAY_DEBUG_MESSAGE", MELT_GET);
if (sy_DISPLAY_DEBUG_MESSAGE
- && NULL == /*_.VALDATA___V331*/ meltfptr[330])
- /*_.VALDATA___V331*/ meltfptr[330] = (void *) sy_DISPLAY_DEBUG_MESSAGE;
+ && NULL == /*_.VALDATA___V333*/ meltfptr[332])
+ /*_.VALDATA___V333*/ meltfptr[332] = (void *) sy_DISPLAY_DEBUG_MESSAGE;
}
/*^getnamedsymbol */
@@ -7034,8 +7109,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MELT_DEBUG_FUN =
meltgc_named_symbol ("MELT_DEBUG_FUN", MELT_GET);
- if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V333*/ meltfptr[332])
- /*_.VALDATA___V333*/ meltfptr[332] = (void *) sy_MELT_DEBUG_FUN;
+ if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V335*/ meltfptr[334])
+ /*_.VALDATA___V335*/ meltfptr[334] = (void *) sy_MELT_DEBUG_FUN;
}
/*^getnamedsymbol */
@@ -7045,8 +7120,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_BASICBLOCK_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_BASICBLOCK_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_BASICBLOCK_DEBUG_FUN
- && NULL == /*_.VALDATA___V335*/ meltfptr[334])
- /*_.VALDATA___V335*/ meltfptr[334] =
+ && NULL == /*_.VALDATA___V337*/ meltfptr[336])
+ /*_.VALDATA___V337*/ meltfptr[336] =
(void *) sy_REGISTER_BASICBLOCK_DEBUG_FUN;
}
@@ -7057,8 +7132,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_EDGE_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_EDGE_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_EDGE_DEBUG_FUN
- && NULL == /*_.VALDATA___V337*/ meltfptr[336])
- /*_.VALDATA___V337*/ meltfptr[336] =
+ && NULL == /*_.VALDATA___V339*/ meltfptr[338])
+ /*_.VALDATA___V339*/ meltfptr[338] =
(void *) sy_REGISTER_EDGE_DEBUG_FUN;
}
@@ -7069,8 +7144,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_GIMPLE_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_GIMPLE_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_GIMPLE_DEBUG_FUN
- && NULL == /*_.VALDATA___V339*/ meltfptr[338])
- /*_.VALDATA___V339*/ meltfptr[338] =
+ && NULL == /*_.VALDATA___V341*/ meltfptr[340])
+ /*_.VALDATA___V341*/ meltfptr[340] =
(void *) sy_REGISTER_GIMPLE_DEBUG_FUN;
}
@@ -7081,8 +7156,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_GIMPLESEQ_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_GIMPLESEQ_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_GIMPLESEQ_DEBUG_FUN
- && NULL == /*_.VALDATA___V341*/ meltfptr[340])
- /*_.VALDATA___V341*/ meltfptr[340] =
+ && NULL == /*_.VALDATA___V343*/ meltfptr[342])
+ /*_.VALDATA___V343*/ meltfptr[342] =
(void *) sy_REGISTER_GIMPLESEQ_DEBUG_FUN;
}
@@ -7093,8 +7168,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_LOOP_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_LOOP_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_LOOP_DEBUG_FUN
- && NULL == /*_.VALDATA___V343*/ meltfptr[342])
- /*_.VALDATA___V343*/ meltfptr[342] =
+ && NULL == /*_.VALDATA___V345*/ meltfptr[344])
+ /*_.VALDATA___V345*/ meltfptr[344] =
(void *) sy_REGISTER_LOOP_DEBUG_FUN;
}
@@ -7105,8 +7180,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_REGISTER_TREE_DEBUG_FUN =
meltgc_named_symbol ("REGISTER_TREE_DEBUG_FUN", MELT_GET);
if (sy_REGISTER_TREE_DEBUG_FUN
- && NULL == /*_.VALDATA___V345*/ meltfptr[344])
- /*_.VALDATA___V345*/ meltfptr[344] =
+ && NULL == /*_.VALDATA___V347*/ meltfptr[346])
+ /*_.VALDATA___V347*/ meltfptr[346] =
(void *) sy_REGISTER_TREE_DEBUG_FUN;
}
@@ -7540,7 +7615,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_MIXED_INTEGER__V25*/ meltfptr[24] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]),
+ (melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7562,7 +7637,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_MIXED_LOCATION__V26*/ meltfptr[25] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]),
+ (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7584,7 +7659,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_MIXED_BIGINT__V27*/ meltfptr[26] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]),
+ (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7606,7 +7681,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_MULTIPLE__V28*/ meltfptr[27] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]),
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7628,7 +7703,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_ROUTINE__V29*/ meltfptr[28] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]),
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7650,7 +7725,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.ROUTINE_EVERY__V30*/ meltfptr[29] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]),
+ (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7672,7 +7747,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_LIST__V31*/ meltfptr[30] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]),
+ (melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7694,7 +7769,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_PAIR__V32*/ meltfptr[31] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]),
+ (melt_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7716,7 +7791,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.MAPOBJECT_EVERY__V33*/ meltfptr[32] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]),
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7738,7 +7813,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]),
+ (melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7760,7 +7835,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.MULTIPLE_EVERY__V35*/ meltfptr[34] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]),
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7782,7 +7857,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_MAP_STRINGS__V36*/ meltfptr[35] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]),
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7804,7 +7879,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.MAPSTRING_EVERY__V37*/ meltfptr[36] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]),
+ (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7826,7 +7901,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.DISCR_ANY_RECEIVER__V38*/ meltfptr[37] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]),
+ (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7848,7 +7923,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_SYMBOL__V39*/ meltfptr[38] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V285*/ meltfptr[284]),
+ (melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7870,7 +7945,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_CLASS__V40*/ meltfptr[39] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]),
+ (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7892,7 +7967,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_KEYWORD__V41*/ meltfptr[40] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V295*/ meltfptr[294]),
+ (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7914,7 +7989,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_CLONED_SYMBOL__V42*/ meltfptr[41] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]),
+ (melt_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7936,7 +8011,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_ENVIRONMENT__V43*/ meltfptr[42] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]),
+ (melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7958,7 +8033,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.ENV_PREV__V44*/ meltfptr[43] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]),
+ (melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -7980,7 +8055,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-debug";
/*_.CLASS_ANY_BINDING__V45*/ meltfptr[44] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]),
+ (melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -10937,7 +11012,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
/*touch:DATACLOSURE_ */
meltgc_touch ( /*_.VALCLO___V195*/ meltfptr[194]);
- MELT_LOCATION ("warmelt-debug.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
@@ -10949,7 +11024,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
@@ -10961,7 +11036,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[1] =
(melt_ptr_t) ( /*_.VALDATA___V109*/ meltfptr[108]);
- MELT_LOCATION ("warmelt-debug.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:542:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
meltgc_touch ( /*_.VALROUT___V196*/ meltfptr[195]);
@@ -11034,7 +11109,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V202*/ meltfptr[201]);
- MELT_LOCATION ("warmelt-debug.melt:590:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:591:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
@@ -11046,7 +11121,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V204*/ meltfptr[203])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:590:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:591:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
@@ -11059,7 +11134,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V204*/ meltfptr[203])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_STRING__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-debug.melt:590:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:591:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
meltgc_touch ( /*_.VALROUT___V204*/ meltfptr[203]);
@@ -11098,7 +11173,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V206*/ meltfptr[205]);
- MELT_LOCATION ("warmelt-debug.melt:612:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:613:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
@@ -11110,7 +11185,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V208*/ meltfptr[207])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:612:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:613:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
@@ -11118,13 +11193,25 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
( /*_.VALROUT___V208*/ meltfptr[207])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg
- ("putroutconst constnull.drout_163__DBGOUT_INTEGER_METHOD#1",
- NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
+ melt_checkmsg ("putroutconst constnull.drout_163__DBGOUT_STRBUF_METHOD#1",
+ NULL != ( /*_.CLASS_NAMED__V20*/ meltfptr[19]));
((meltroutine_ptr_t) /*_.VALROUT___V208*/ meltfptr[207])->tabval[1] =
- (melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
+ (melt_ptr_t) ( /*_.CLASS_NAMED__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-debug.melt:612:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:613:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V208*/ meltfptr[207])) ==
+ MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_163__DBGOUT_STRBUF_METHOD#2",
+ NULL != ( /*_.ADD2OUT__V18*/ meltfptr[17]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V208*/ meltfptr[207])->tabval[2] =
+ (melt_ptr_t) ( /*_.ADD2OUT__V18*/ meltfptr[17]);
+
+ MELT_LOCATION ("warmelt-debug.melt:613:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
meltgc_touch ( /*_.VALROUT___V208*/ meltfptr[207]);
@@ -11144,7 +11231,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
/*touch:DATACLOSURE_ */
meltgc_touch ( /*_.VALCLO___V209*/ meltfptr[208]);
- MELT_LOCATION ("warmelt-debug.melt:631:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
@@ -11156,7 +11243,7 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:631:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
@@ -11164,960 +11251,987 @@ warmelt_debug_initialmeltchunk_2 (struct frame_start_module_melt_st
( /*_.VALROUT___V210*/ meltfptr[209])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_165__DBGOUT_MIXINT_METHOD#1",
- NULL != ( /*_.DISCR_MIXED_INTEGER__V25*/ meltfptr[24]));
+ melt_checkmsg
+ ("putroutconst constnull.drout_165__DBGOUT_INTEGER_METHOD#1",
+ NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[1] =
+ (melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
+
+ MELT_LOCATION ("warmelt-debug.melt:700:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V210*/ meltfptr[209]);
+
+ /*putclosurout#16 */
+ melt_assertmsg ("putclosrout#16 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V211*/ meltfptr[210])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#16 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V211*/ meltfptr[210])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V210*/ meltfptr[209]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V211*/ meltfptr[210]);
+
+ MELT_LOCATION ("warmelt-debug.melt:719:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
+ MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V50*/ meltfptr[49]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V212*/ meltfptr[211])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
+
+ MELT_LOCATION ("warmelt-debug.melt:719:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
+ MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_167__DBGOUT_MIXINT_METHOD#1",
+ NULL != ( /*_.DISCR_MIXED_INTEGER__V25*/ meltfptr[24]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V212*/ meltfptr[211])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MIXED_INTEGER__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-debug.melt:631:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:719:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V212*/ meltfptr[211])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:631:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:719:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V210*/ meltfptr[209]);
+ meltgc_touch ( /*_.VALROUT___V212*/ meltfptr[211]);
- /*putclosurout#16 */
- melt_assertmsg ("putclosrout#16 checkclo",
+ /*putclosurout#17 */
+ melt_assertmsg ("putclosrout#17 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V211*/ meltfptr[210])) ==
+ ( /*_.VALCLO___V213*/ meltfptr[212])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#16 checkrout",
+ melt_assertmsg ("putclosrout#17 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V211*/ meltfptr[210])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V210*/ meltfptr[209]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V213*/ meltfptr[212])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V212*/ meltfptr[211]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V211*/ meltfptr[210]);
+ meltgc_touch ( /*_.VALCLO___V213*/ meltfptr[212]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V212*/ meltfptr[211])) ==
+ ( /*_.VALDATA___V214*/ meltfptr[213])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V212*/
- meltfptr[211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[1] =
+ ( /*_.VALDATA___V214*/
+ meltfptr[213]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V213*/ meltfptr[212]);
+ /*_.VALSTR___V215*/ meltfptr[214]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V212*/ meltfptr[211]);
+ meltgc_touch ( /*_.VALDATA___V214*/ meltfptr[213]);
- MELT_LOCATION ("warmelt-debug.melt:658:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:746:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V214*/ meltfptr[213])) ==
+ ( /*_.VALROUT___V216*/ meltfptr[215])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V214*/ meltfptr[213])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V216*/ meltfptr[215])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:658:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:746:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V214*/ meltfptr[213])) ==
+ ( /*_.VALROUT___V216*/ meltfptr[215])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_169__DBGOUT_MIXLOC_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_171__DBGOUT_MIXLOC_METHOD#1",
NULL != ( /*_.DISCR_MIXED_LOCATION__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V214*/ meltfptr[213])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V216*/ meltfptr[215])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-debug.melt:658:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:746:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V214*/ meltfptr[213]);
+ meltgc_touch ( /*_.VALROUT___V216*/ meltfptr[215]);
- /*putclosurout#17 */
- melt_assertmsg ("putclosrout#17 checkclo",
+ /*putclosurout#18 */
+ melt_assertmsg ("putclosrout#18 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V215*/ meltfptr[214])) ==
+ ( /*_.VALCLO___V217*/ meltfptr[216])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#17 checkrout",
+ melt_assertmsg ("putclosrout#18 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V214*/ meltfptr[213])) ==
+ ( /*_.VALROUT___V216*/ meltfptr[215])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V215*/ meltfptr[214])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V214*/ meltfptr[213]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V217*/ meltfptr[216])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V216*/ meltfptr[215]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V215*/ meltfptr[214]);
+ meltgc_touch ( /*_.VALCLO___V217*/ meltfptr[216]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V216*/ meltfptr[215])) ==
+ ( /*_.VALDATA___V218*/ meltfptr[217])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V216*/
- meltfptr[215]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[1] =
+ ( /*_.VALDATA___V218*/
+ meltfptr[217]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V217*/ meltfptr[216]);
+ /*_.VALSTR___V219*/ meltfptr[218]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V216*/ meltfptr[215]);
+ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]);
- MELT_LOCATION ("warmelt-debug.melt:687:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:775:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V218*/ meltfptr[217])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V218*/ meltfptr[217])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:687:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:775:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V218*/ meltfptr[217])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V218*/ meltfptr[217])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[1] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:687:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:775:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V218*/ meltfptr[217]);
+ meltgc_touch ( /*_.VALROUT___V220*/ meltfptr[219]);
- /*putclosurout#18 */
- melt_assertmsg ("putclosrout#18 checkclo",
+ /*putclosurout#19 */
+ melt_assertmsg ("putclosrout#19 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V219*/ meltfptr[218])) ==
+ ( /*_.VALCLO___V221*/ meltfptr[220])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#18 checkrout",
+ melt_assertmsg ("putclosrout#19 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V218*/ meltfptr[217])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V219*/ meltfptr[218])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V218*/ meltfptr[217]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V221*/ meltfptr[220])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V220*/ meltfptr[219]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V219*/ meltfptr[218]);
+ meltgc_touch ( /*_.VALCLO___V221*/ meltfptr[220]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V220*/ meltfptr[219])) ==
+ ( /*_.VALDATA___V222*/ meltfptr[221])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V220*/
- meltfptr[219]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] =
+ ( /*_.VALDATA___V222*/
+ meltfptr[221]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V221*/ meltfptr[220]);
+ /*_.VALSTR___V223*/ meltfptr[222]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V220*/ meltfptr[219]);
+ meltgc_touch ( /*_.VALDATA___V222*/ meltfptr[221]);
- MELT_LOCATION ("warmelt-debug.melt:709:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V222*/ meltfptr[221])) ==
+ ( /*_.VALROUT___V224*/ meltfptr[223])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V222*/ meltfptr[221])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V224*/ meltfptr[223])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:709:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V222*/ meltfptr[221])) ==
+ ( /*_.VALROUT___V224*/ meltfptr[223])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_177__DBGOUT_MULTIPLE_METHOD#1",
+ ("putroutconst constnull.drout_179__DBGOUT_MULTIPLE_METHOD#1",
NULL != ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V222*/ meltfptr[221])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V224*/ meltfptr[223])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]);
- MELT_LOCATION ("warmelt-debug.melt:709:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V222*/ meltfptr[221])) ==
+ ( /*_.VALROUT___V224*/ meltfptr[223])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V222*/ meltfptr[221])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V224*/ meltfptr[223])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:709:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:797:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V222*/ meltfptr[221]);
+ meltgc_touch ( /*_.VALROUT___V224*/ meltfptr[223]);
- /*putclosurout#19 */
- melt_assertmsg ("putclosrout#19 checkclo",
+ /*putclosurout#20 */
+ melt_assertmsg ("putclosrout#20 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V223*/ meltfptr[222])) ==
+ ( /*_.VALCLO___V225*/ meltfptr[224])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#19 checkrout",
+ melt_assertmsg ("putclosrout#20 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V222*/ meltfptr[221])) ==
+ ( /*_.VALROUT___V224*/ meltfptr[223])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V223*/ meltfptr[222])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V225*/ meltfptr[224])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V224*/ meltfptr[223]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V223*/ meltfptr[222]);
+ meltgc_touch ( /*_.VALCLO___V225*/ meltfptr[224]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V224*/ meltfptr[223])) ==
+ ( /*_.VALDATA___V226*/ meltfptr[225])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V224*/
- meltfptr[223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]))->obj_vartab[1] =
+ ( /*_.VALDATA___V226*/
+ meltfptr[225]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V225*/ meltfptr[224]);
+ /*_.VALSTR___V227*/ meltfptr[226]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V224*/ meltfptr[223]);
+ meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_181__DBGOUT_ROUTINE_METHOD#1",
+ ("putroutconst constnull.drout_183__DBGOUT_ROUTINE_METHOD#1",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_181__DBGOUT_ROUTINE_METHOD#2",
+ ("putroutconst constnull.drout_183__DBGOUT_ROUTINE_METHOD#2",
NULL != ( /*_.DISCR_ROUTINE__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_ROUTINE__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_181__DBGOUT_ROUTINE_METHOD#3",
+ ("putroutconst constnull.drout_183__DBGOUT_ROUTINE_METHOD#3",
NULL != ( /*_.ROUTINE_EVERY__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[3] =
(melt_ptr_t) ( /*_.ROUTINE_EVERY__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[4] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:757:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V227*/ meltfptr[226])) ==
+ ( /*_.VALROUT___V229*/ meltfptr[228])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V227*/ meltfptr[226])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V229*/ meltfptr[228])->tabval[0] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:757:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V227*/ meltfptr[226]);
+ meltgc_touch ( /*_.VALROUT___V229*/ meltfptr[228]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_181__DBGOUT_ROUTINE_METHOD#5",
- NULL != ( /*_.VALROUT___V227*/ meltfptr[226]));
- ((meltroutine_ptr_t) /*_.VALROUT___V226*/ meltfptr[225])->tabval[5] =
- (melt_ptr_t) ( /*_.VALROUT___V227*/ meltfptr[226]);
+ ("putroutconst constnull.drout_183__DBGOUT_ROUTINE_METHOD#5",
+ NULL != ( /*_.VALROUT___V229*/ meltfptr[228]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V228*/ meltfptr[227])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALROUT___V229*/ meltfptr[228]);
- MELT_LOCATION ("warmelt-debug.melt:742:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:830:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V226*/ meltfptr[225]);
+ meltgc_touch ( /*_.VALROUT___V228*/ meltfptr[227]);
- /*putclosurout#20 */
- melt_assertmsg ("putclosrout#20 checkclo",
+ /*putclosurout#21 */
+ melt_assertmsg ("putclosrout#21 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V228*/ meltfptr[227])) ==
+ ( /*_.VALCLO___V230*/ meltfptr[229])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#20 checkrout",
+ melt_assertmsg ("putclosrout#21 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V226*/ meltfptr[225])) ==
+ ( /*_.VALROUT___V228*/ meltfptr[227])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V228*/ meltfptr[227])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V226*/ meltfptr[225]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V230*/ meltfptr[229])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V228*/ meltfptr[227]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V228*/ meltfptr[227]);
+ meltgc_touch ( /*_.VALCLO___V230*/ meltfptr[229]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V229*/ meltfptr[228])) ==
+ ( /*_.VALDATA___V231*/ meltfptr[230])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V229*/
- meltfptr[228]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[1] =
+ ( /*_.VALDATA___V231*/
+ meltfptr[230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V230*/ meltfptr[229]);
+ /*_.VALSTR___V232*/ meltfptr[231]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V229*/ meltfptr[228]);
+ meltgc_touch ( /*_.VALDATA___V231*/ meltfptr[230]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V231*/ meltfptr[230])) ==
+ ( /*_.VALDATA___V233*/ meltfptr[232])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V231*/
- meltfptr[230]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] =
+ ( /*_.VALDATA___V233*/
+ meltfptr[232]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V232*/ meltfptr[231]);
+ /*_.VALSTR___V234*/ meltfptr[233]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V231*/ meltfptr[230]);
+ meltgc_touch ( /*_.VALDATA___V233*/ meltfptr[232]);
- MELT_LOCATION ("warmelt-debug.melt:769:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V233*/ meltfptr[232])) ==
+ ( /*_.VALROUT___V235*/ meltfptr[234])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V233*/ meltfptr[232])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:769:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V233*/ meltfptr[232])) ==
+ ( /*_.VALROUT___V235*/ meltfptr[234])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_188__DBGOUT_CLOSURE_METHOD#1",
+ ("putroutconst constnull.drout_190__DBGOUT_CLOSURE_METHOD#1",
NULL != ( /*_.DISCR_CLOSURE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V233*/ meltfptr[232])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_CLOSURE__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-debug.melt:769:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V233*/ meltfptr[232])) ==
+ ( /*_.VALROUT___V235*/ meltfptr[234])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V233*/ meltfptr[232])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:769:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:857:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V233*/ meltfptr[232]);
+ meltgc_touch ( /*_.VALROUT___V235*/ meltfptr[234]);
- /*putclosurout#21 */
- melt_assertmsg ("putclosrout#21 checkclo",
+ /*putclosurout#22 */
+ melt_assertmsg ("putclosrout#22 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V234*/ meltfptr[233])) ==
+ ( /*_.VALCLO___V236*/ meltfptr[235])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#21 checkrout",
+ melt_assertmsg ("putclosrout#22 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V233*/ meltfptr[232])) ==
+ ( /*_.VALROUT___V235*/ meltfptr[234])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V234*/ meltfptr[233])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V233*/ meltfptr[232]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V236*/ meltfptr[235])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V235*/ meltfptr[234]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V234*/ meltfptr[233]);
+ meltgc_touch ( /*_.VALCLO___V236*/ meltfptr[235]);
- MELT_LOCATION ("warmelt-debug.melt:805:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V235*/ meltfptr[234])) ==
+ ( /*_.VALROUT___V237*/ meltfptr[236])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V237*/ meltfptr[236])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:805:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V235*/ meltfptr[234])) ==
+ ( /*_.VALROUT___V237*/ meltfptr[236])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_190__DBGOUT_LIST_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_192__DBGOUT_LIST_METHOD#1",
NULL != ( /*_.DISCR_LIST__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V237*/ meltfptr[236])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_LIST__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-debug.melt:805:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V235*/ meltfptr[234])) ==
+ ( /*_.VALROUT___V237*/ meltfptr[236])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V235*/ meltfptr[234])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V237*/ meltfptr[236])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:805:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:893:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V235*/ meltfptr[234]);
+ meltgc_touch ( /*_.VALROUT___V237*/ meltfptr[236]);
- /*putclosurout#22 */
- melt_assertmsg ("putclosrout#22 checkclo",
+ /*putclosurout#23 */
+ melt_assertmsg ("putclosrout#23 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V236*/ meltfptr[235])) ==
+ ( /*_.VALCLO___V238*/ meltfptr[237])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#22 checkrout",
+ melt_assertmsg ("putclosrout#23 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V235*/ meltfptr[234])) ==
+ ( /*_.VALROUT___V237*/ meltfptr[236])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V236*/ meltfptr[235])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V235*/ meltfptr[234]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V238*/ meltfptr[237])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V237*/ meltfptr[236]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V236*/ meltfptr[235]);
+ meltgc_touch ( /*_.VALCLO___V238*/ meltfptr[237]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V237*/ meltfptr[236])) ==
+ ( /*_.VALDATA___V239*/ meltfptr[238])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V237*/
- meltfptr[236]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]))->obj_vartab[1] =
+ ( /*_.VALDATA___V239*/
+ meltfptr[238]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V238*/ meltfptr[237]);
+ /*_.VALSTR___V240*/ meltfptr[239]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V237*/ meltfptr[236]);
+ meltgc_touch ( /*_.VALDATA___V239*/ meltfptr[238]);
- MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V239*/ meltfptr[238])) ==
+ ( /*_.VALROUT___V241*/ meltfptr[240])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V239*/ meltfptr[238])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V241*/ meltfptr[240])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V239*/ meltfptr[238])) ==
+ ( /*_.VALROUT___V241*/ meltfptr[240])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_194__DBGOUT_PAIR_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_196__DBGOUT_PAIR_METHOD#1",
NULL != ( /*_.DISCR_PAIR__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V239*/ meltfptr[238])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V241*/ meltfptr[240])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_PAIR__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V239*/ meltfptr[238])) ==
+ ( /*_.VALROUT___V241*/ meltfptr[240])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V239*/ meltfptr[238])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V241*/ meltfptr[240])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:845:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:933:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V239*/ meltfptr[238]);
+ meltgc_touch ( /*_.VALROUT___V241*/ meltfptr[240]);
- /*putclosurout#23 */
- melt_assertmsg ("putclosrout#23 checkclo",
+ /*putclosurout#24 */
+ melt_assertmsg ("putclosrout#24 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V240*/ meltfptr[239])) ==
+ ( /*_.VALCLO___V242*/ meltfptr[241])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#23 checkrout",
+ melt_assertmsg ("putclosrout#24 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V239*/ meltfptr[238])) ==
+ ( /*_.VALROUT___V241*/ meltfptr[240])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V240*/ meltfptr[239])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V239*/ meltfptr[238]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V242*/ meltfptr[241])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V241*/ meltfptr[240]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V240*/ meltfptr[239]);
+ meltgc_touch ( /*_.VALCLO___V242*/ meltfptr[241]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V241*/ meltfptr[240])) ==
+ ( /*_.VALDATA___V243*/ meltfptr[242])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V241*/
- meltfptr[240]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]))->obj_vartab[1] =
+ ( /*_.VALDATA___V243*/
+ meltfptr[242]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V242*/ meltfptr[241]);
+ /*_.VALSTR___V244*/ meltfptr[243]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V241*/ meltfptr[240]);
+ meltgc_touch ( /*_.VALDATA___V243*/ meltfptr[242]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#1",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#1",
NULL != ( /*_.DISCR_MAP_OBJECTS__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#2",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#2",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#3",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#3",
NULL != ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#4",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#4",
NULL != ( /*_.MAPOBJECT_EVERY__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[4] =
(melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#5",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#5",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:891:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:979:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V244*/ meltfptr[243])) ==
+ ( /*_.VALROUT___V246*/ meltfptr[245])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_202__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_204__LAMBDA_#0",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V244*/ meltfptr[243])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:891:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:979:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V244*/ meltfptr[243]);
+ meltgc_touch ( /*_.VALROUT___V246*/ meltfptr[245]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#6",
- NULL != ( /*_.VALROUT___V244*/ meltfptr[243]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[6] =
- (melt_ptr_t) ( /*_.VALROUT___V244*/ meltfptr[243]);
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#6",
+ NULL != ( /*_.VALROUT___V246*/ meltfptr[245]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALROUT___V246*/ meltfptr[245]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#7",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#7",
NULL != ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[7] =
(melt_ptr_t) ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-debug.melt:904:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V245*/ meltfptr[244])) ==
+ ( /*_.VALROUT___V247*/ meltfptr[246])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_203__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_205__LAMBDA_#0",
NULL != ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V247*/ meltfptr[246])->tabval[0] =
(melt_ptr_t) ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-debug.melt:904:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V245*/ meltfptr[244])) ==
+ ( /*_.VALROUT___V247*/ meltfptr[246])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_203__LAMBDA_#1",
- NULL != ( /*_.VALBXINT___V246*/ meltfptr[245]));
- ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[1] =
- (melt_ptr_t) ( /*_.VALBXINT___V246*/ meltfptr[245]);
+ melt_checkmsg ("putroutconst constnull.drout_205__LAMBDA_#1",
+ NULL != ( /*_.VALBXINT___V248*/ meltfptr[247]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V247*/ meltfptr[246])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALBXINT___V248*/ meltfptr[247]);
- MELT_LOCATION ("warmelt-debug.melt:904:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V245*/ meltfptr[244])) ==
+ ( /*_.VALROUT___V247*/ meltfptr[246])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_203__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V247*/ meltfptr[246]));
- ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V247*/ meltfptr[246]);
+ melt_checkmsg ("putroutconst constnull.drout_205__LAMBDA_#2",
+ NULL != ( /*_.VALBXINT___V249*/ meltfptr[248]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V247*/ meltfptr[246])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V249*/ meltfptr[248]);
- MELT_LOCATION ("warmelt-debug.melt:904:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V245*/ meltfptr[244])) ==
+ ( /*_.VALROUT___V247*/ meltfptr[246])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_203__LAMBDA_#3",
- NULL != ( /*_.VALBXINT___V248*/ meltfptr[247]));
- ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[3] =
- (melt_ptr_t) ( /*_.VALBXINT___V248*/ meltfptr[247]);
+ melt_checkmsg ("putroutconst constnull.drout_205__LAMBDA_#3",
+ NULL != ( /*_.VALBXINT___V250*/ meltfptr[249]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V247*/ meltfptr[246])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALBXINT___V250*/ meltfptr[249]);
- MELT_LOCATION ("warmelt-debug.melt:904:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:992:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V245*/ meltfptr[244]);
+ meltgc_touch ( /*_.VALROUT___V247*/ meltfptr[246]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#8",
- NULL != ( /*_.VALROUT___V245*/ meltfptr[244]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[8] =
- (melt_ptr_t) ( /*_.VALROUT___V245*/ meltfptr[244]);
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#8",
+ NULL != ( /*_.VALROUT___V247*/ meltfptr[246]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALROUT___V247*/ meltfptr[246]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#9",
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#9",
NULL != ( /*_.MULTIPLE_EVERY__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[9] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V107*/ meltfptr[106]);
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[10] =
(melt_ptr_t) ( /*_.VALCLO___V107*/ meltfptr[106]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[11] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:920:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1008:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V249*/ meltfptr[248])) ==
+ ( /*_.VALROUT___V251*/ meltfptr[250])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V107*/ meltfptr[106]);
- ((meltroutine_ptr_t) /*_.VALROUT___V249*/ meltfptr[248])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V251*/ meltfptr[250])->tabval[0] =
(melt_ptr_t) ( /*_.VALCLO___V107*/ meltfptr[106]);
- MELT_LOCATION ("warmelt-debug.melt:920:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_debug_initialmeltchunk_2 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_debug_initialmeltchunk_3 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-debug.melt:1008:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V249*/ meltfptr[248])) ==
+ ( /*_.VALROUT___V251*/ meltfptr[250])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V249*/ meltfptr[248])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V251*/ meltfptr[250])->tabval[1] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:920:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1008:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V249*/ meltfptr[248]);
+ meltgc_touch ( /*_.VALROUT___V251*/ meltfptr[250]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_198__DBGOUT_MAPOBJECT_METHOD#12",
- NULL != ( /*_.VALROUT___V249*/ meltfptr[248]));
- ((meltroutine_ptr_t) /*_.VALROUT___V243*/ meltfptr[242])->tabval[12] =
- (melt_ptr_t) ( /*_.VALROUT___V249*/ meltfptr[248]);
+ ("putroutconst constnull.drout_200__DBGOUT_MAPOBJECT_METHOD#12",
+ NULL != ( /*_.VALROUT___V251*/ meltfptr[250]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V245*/ meltfptr[244])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALROUT___V251*/ meltfptr[250]);
- MELT_LOCATION ("warmelt-debug.melt:867:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:955:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V243*/ meltfptr[242]);
+ meltgc_touch ( /*_.VALROUT___V245*/ meltfptr[244]);
- /*putclosurout#24 */
- melt_assertmsg ("putclosrout#24 checkclo",
+ /*putclosurout#25 */
+ melt_assertmsg ("putclosrout#25 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V250*/ meltfptr[249])) ==
+ ( /*_.VALCLO___V252*/ meltfptr[251])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#24 checkrout",
+ melt_assertmsg ("putclosrout#25 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V243*/ meltfptr[242])) ==
+ ( /*_.VALROUT___V245*/ meltfptr[244])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V250*/ meltfptr[249])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V243*/ meltfptr[242]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V252*/ meltfptr[251])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V245*/ meltfptr[244]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V250*/ meltfptr[249]);
-
-
-#undef meltfram__
-} /*end of warmelt_debug_initialmeltchunk_2 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_debug_initialmeltchunk_3 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putslot*/
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V251*/ meltfptr[250])) ==
- MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V251*/
- meltfptr[250]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]))->obj_vartab[1] =
- (melt_ptr_t) (
- /*_.VALSTR___V252*/ meltfptr[251]);
-
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V251*/ meltfptr[250]);
+ meltgc_touch ( /*_.VALCLO___V252*/ meltfptr[251]);
/*putslot */
melt_assertmsg ("putslot checkobj",
@@ -12157,924 +12271,928 @@ warmelt_debug_initialmeltchunk_3 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V255*/ meltfptr[254]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V257*/ meltfptr[256])) ==
+ MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V257*/
+ meltfptr[256]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]))->obj_vartab[1] =
+ (melt_ptr_t) (
+ /*_.VALSTR___V258*/ meltfptr[257]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V257*/ meltfptr[256]);
+
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#1",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#1",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#2",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#2",
NULL != ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#3",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#3",
NULL != ( /*_.DISCR_MAP_STRINGS__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#4",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#4",
NULL != ( /*_.MAPSTRING_EVERY__V37*/ meltfptr[36]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[4] =
(melt_ptr_t) ( /*_.MAPSTRING_EVERY__V37*/ meltfptr[36]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#5",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#5",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:966:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1054:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V258*/ meltfptr[257])) ==
+ ( /*_.VALROUT___V260*/ meltfptr[259])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_218__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_220__LAMBDA_#0",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:966:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1054:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V258*/ meltfptr[257]);
+ meltgc_touch ( /*_.VALROUT___V260*/ meltfptr[259]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#6",
- NULL != ( /*_.VALROUT___V258*/ meltfptr[257]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[6] =
- (melt_ptr_t) ( /*_.VALROUT___V258*/ meltfptr[257]);
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#6",
+ NULL != ( /*_.VALROUT___V260*/ meltfptr[259]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALROUT___V260*/ meltfptr[259]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#7",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#7",
NULL != ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[7] =
(melt_ptr_t) ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-debug.melt:978:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V259*/ meltfptr[258])) ==
+ ( /*_.VALROUT___V261*/ meltfptr[260])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_219__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_221__LAMBDA_#0",
NULL != ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V261*/ meltfptr[260])->tabval[0] =
(melt_ptr_t) ( /*_.COMPARE_OBJ_RANKED__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-debug.melt:978:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V259*/ meltfptr[258])) ==
+ ( /*_.VALROUT___V261*/ meltfptr[260])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_219__LAMBDA_#1",
- NULL != ( /*_.VALBXINT___V260*/ meltfptr[259]));
- ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[1] =
- (melt_ptr_t) ( /*_.VALBXINT___V260*/ meltfptr[259]);
+ melt_checkmsg ("putroutconst constnull.drout_221__LAMBDA_#1",
+ NULL != ( /*_.VALBXINT___V262*/ meltfptr[261]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V261*/ meltfptr[260])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALBXINT___V262*/ meltfptr[261]);
- MELT_LOCATION ("warmelt-debug.melt:978:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V259*/ meltfptr[258])) ==
+ ( /*_.VALROUT___V261*/ meltfptr[260])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_219__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V261*/ meltfptr[260]));
- ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V261*/ meltfptr[260]);
+ melt_checkmsg ("putroutconst constnull.drout_221__LAMBDA_#2",
+ NULL != ( /*_.VALBXINT___V263*/ meltfptr[262]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V261*/ meltfptr[260])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V263*/ meltfptr[262]);
- MELT_LOCATION ("warmelt-debug.melt:978:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V259*/ meltfptr[258])) ==
+ ( /*_.VALROUT___V261*/ meltfptr[260])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_219__LAMBDA_#3",
- NULL != ( /*_.VALBXINT___V262*/ meltfptr[261]));
- ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[3] =
- (melt_ptr_t) ( /*_.VALBXINT___V262*/ meltfptr[261]);
+ melt_checkmsg ("putroutconst constnull.drout_221__LAMBDA_#3",
+ NULL != ( /*_.VALBXINT___V264*/ meltfptr[263]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V261*/ meltfptr[260])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALBXINT___V264*/ meltfptr[263]);
- MELT_LOCATION ("warmelt-debug.melt:978:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1066:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V259*/ meltfptr[258]);
+ meltgc_touch ( /*_.VALROUT___V261*/ meltfptr[260]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#8",
- NULL != ( /*_.VALROUT___V259*/ meltfptr[258]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[8] =
- (melt_ptr_t) ( /*_.VALROUT___V259*/ meltfptr[258]);
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#8",
+ NULL != ( /*_.VALROUT___V261*/ meltfptr[260]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALROUT___V261*/ meltfptr[260]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#9",
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#9",
NULL != ( /*_.MULTIPLE_EVERY__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[9] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[10] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:994:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V263*/ meltfptr[262])) ==
+ ( /*_.VALROUT___V265*/ meltfptr[264])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V263*/ meltfptr[262])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V265*/ meltfptr[264])->tabval[0] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:994:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1082:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V263*/ meltfptr[262]);
+ meltgc_touch ( /*_.VALROUT___V265*/ meltfptr[264]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_212__DBGOUT_MAPSTRING_METHOD#11",
- NULL != ( /*_.VALROUT___V263*/ meltfptr[262]));
- ((meltroutine_ptr_t) /*_.VALROUT___V257*/ meltfptr[256])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V263*/ meltfptr[262]);
+ ("putroutconst constnull.drout_214__DBGOUT_MAPSTRING_METHOD#11",
+ NULL != ( /*_.VALROUT___V265*/ meltfptr[264]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V259*/ meltfptr[258])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V265*/ meltfptr[264]);
- MELT_LOCATION ("warmelt-debug.melt:943:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1031:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V257*/ meltfptr[256]);
+ meltgc_touch ( /*_.VALROUT___V259*/ meltfptr[258]);
- /*putclosurout#25 */
- melt_assertmsg ("putclosrout#25 checkclo",
+ /*putclosurout#26 */
+ melt_assertmsg ("putclosrout#26 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V264*/ meltfptr[263])) ==
+ ( /*_.VALCLO___V266*/ meltfptr[265])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#25 checkrout",
+ melt_assertmsg ("putclosrout#26 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V257*/ meltfptr[256])) ==
+ ( /*_.VALROUT___V259*/ meltfptr[258])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V264*/ meltfptr[263])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V257*/ meltfptr[256]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V266*/ meltfptr[265])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V259*/ meltfptr[258]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V264*/ meltfptr[263]);
+ meltgc_touch ( /*_.VALCLO___V266*/ meltfptr[265]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V265*/ meltfptr[264])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V265*/
- meltfptr[264]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[1] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V266*/ meltfptr[265]);
+ /*_.VALSTR___V268*/ meltfptr[267]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V265*/ meltfptr[264]);
+ meltgc_touch ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V267*/ meltfptr[266])) ==
+ ( /*_.VALDATA___V269*/ meltfptr[268])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V267*/
- meltfptr[266]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[1] =
+ ( /*_.VALDATA___V269*/
+ meltfptr[268]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V268*/ meltfptr[267]);
+ /*_.VALSTR___V270*/ meltfptr[269]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V267*/ meltfptr[266]);
+ meltgc_touch ( /*_.VALDATA___V269*/ meltfptr[268]);
- MELT_LOCATION ("warmelt-debug.melt:1013:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1101:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V269*/ meltfptr[268])) ==
+ ( /*_.VALROUT___V271*/ meltfptr[270])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V269*/ meltfptr[268])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V271*/ meltfptr[270])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1013:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1101:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V269*/ meltfptr[268])) ==
+ ( /*_.VALROUT___V271*/ meltfptr[270])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V195*/ meltfptr[194]);
- ((meltroutine_ptr_t) /*_.VALROUT___V269*/ meltfptr[268])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V271*/ meltfptr[270])->tabval[1] =
(melt_ptr_t) ( /*_.VALCLO___V195*/ meltfptr[194]);
- MELT_LOCATION ("warmelt-debug.melt:1013:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1101:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V269*/ meltfptr[268]);
+ meltgc_touch ( /*_.VALROUT___V271*/ meltfptr[270]);
- /*putclosurout#26 */
- melt_assertmsg ("putclosrout#26 checkclo",
+ /*putclosurout#27 */
+ melt_assertmsg ("putclosrout#27 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V270*/ meltfptr[269])) ==
+ ( /*_.VALCLO___V272*/ meltfptr[271])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#26 checkrout",
+ melt_assertmsg ("putclosrout#27 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V269*/ meltfptr[268])) ==
+ ( /*_.VALROUT___V271*/ meltfptr[270])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V270*/ meltfptr[269])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V269*/ meltfptr[268]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V272*/ meltfptr[271])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V271*/ meltfptr[270]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V270*/ meltfptr[269]);
+ meltgc_touch ( /*_.VALCLO___V272*/ meltfptr[271]);
- MELT_LOCATION ("warmelt-debug.melt:1039:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1127:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V271*/ meltfptr[270])) ==
+ ( /*_.VALROUT___V273*/ meltfptr[272])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V271*/ meltfptr[270])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V273*/ meltfptr[272])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1039:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1127:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V271*/ meltfptr[270])) ==
+ ( /*_.VALROUT___V273*/ meltfptr[272])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_226__DBGOUT_ANYRECV_METHOD#1",
+ ("putroutconst constnull.drout_228__DBGOUT_ANYRECV_METHOD#1",
NULL != ( /*_.CLASS_NAMED__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V271*/ meltfptr[270])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V273*/ meltfptr[272])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-debug.melt:1039:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1127:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V271*/ meltfptr[270]);
+ meltgc_touch ( /*_.VALROUT___V273*/ meltfptr[272]);
- /*putclosurout#27 */
- melt_assertmsg ("putclosrout#27 checkclo",
+ /*putclosurout#28 */
+ melt_assertmsg ("putclosrout#28 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V272*/ meltfptr[271])) ==
+ ( /*_.VALCLO___V274*/ meltfptr[273])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#27 checkrout",
+ melt_assertmsg ("putclosrout#28 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V271*/ meltfptr[270])) ==
+ ( /*_.VALROUT___V273*/ meltfptr[272])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V272*/ meltfptr[271])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V271*/ meltfptr[270]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V274*/ meltfptr[273])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V273*/ meltfptr[272]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V272*/ meltfptr[271]);
+ meltgc_touch ( /*_.VALCLO___V274*/ meltfptr[273]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V273*/ meltfptr[272])) ==
+ ( /*_.VALDATA___V275*/ meltfptr[274])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V273*/
- meltfptr[272]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] =
+ ( /*_.VALDATA___V275*/
+ meltfptr[274]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V274*/ meltfptr[273]);
+ /*_.VALSTR___V276*/ meltfptr[275]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]);
+ meltgc_touch ( /*_.VALDATA___V275*/ meltfptr[274]);
- MELT_LOCATION ("warmelt-debug.melt:1050:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1138:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V275*/ meltfptr[274])) ==
+ ( /*_.VALROUT___V277*/ meltfptr[276])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V275*/ meltfptr[274])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V277*/ meltfptr[276])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1050:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1138:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V275*/ meltfptr[274]);
+ meltgc_touch ( /*_.VALROUT___V277*/ meltfptr[276]);
- /*putclosurout#28 */
- melt_assertmsg ("putclosrout#28 checkclo",
+ /*putclosurout#29 */
+ melt_assertmsg ("putclosrout#29 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V276*/ meltfptr[275])) ==
+ ( /*_.VALCLO___V278*/ meltfptr[277])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#28 checkrout",
+ melt_assertmsg ("putclosrout#29 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V275*/ meltfptr[274])) ==
+ ( /*_.VALROUT___V277*/ meltfptr[276])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V276*/ meltfptr[275])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V275*/ meltfptr[274]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V278*/ meltfptr[277])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V277*/ meltfptr[276]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V276*/ meltfptr[275]);
+ meltgc_touch ( /*_.VALCLO___V278*/ meltfptr[277]);
- MELT_LOCATION ("warmelt-debug.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V277*/ meltfptr[276])) ==
+ ( /*_.VALROUT___V279*/ meltfptr[278])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V277*/ meltfptr[276])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V279*/ meltfptr[278])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V277*/ meltfptr[276])) ==
+ ( /*_.VALROUT___V279*/ meltfptr[278])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V105*/ meltfptr[104]);
- ((meltroutine_ptr_t) /*_.VALROUT___V277*/ meltfptr[276])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V279*/ meltfptr[278])->tabval[1] =
(melt_ptr_t) ( /*_.VALCLO___V105*/ meltfptr[104]);
- MELT_LOCATION ("warmelt-debug.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V277*/ meltfptr[276])) ==
+ ( /*_.VALROUT___V279*/ meltfptr[278])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V195*/ meltfptr[194]);
- ((meltroutine_ptr_t) /*_.VALROUT___V277*/ meltfptr[276])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V279*/ meltfptr[278])->tabval[2] =
(melt_ptr_t) ( /*_.VALCLO___V195*/ meltfptr[194]);
- MELT_LOCATION ("warmelt-debug.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1156:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V277*/ meltfptr[276]);
+ meltgc_touch ( /*_.VALROUT___V279*/ meltfptr[278]);
- /*putclosurout#29 */
- melt_assertmsg ("putclosrout#29 checkclo",
+ /*putclosurout#30 */
+ melt_assertmsg ("putclosrout#30 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V278*/ meltfptr[277])) ==
+ ( /*_.VALCLO___V280*/ meltfptr[279])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#29 checkrout",
+ melt_assertmsg ("putclosrout#30 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V277*/ meltfptr[276])) ==
+ ( /*_.VALROUT___V279*/ meltfptr[278])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V278*/ meltfptr[277])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V277*/ meltfptr[276]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V280*/ meltfptr[279])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V279*/ meltfptr[278]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V278*/ meltfptr[277]);
+ meltgc_touch ( /*_.VALCLO___V280*/ meltfptr[279]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V279*/ meltfptr[278])) ==
+ ( /*_.VALDATA___V281*/ meltfptr[280])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V279*/
- meltfptr[278]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]))->obj_vartab[1] =
+ ( /*_.VALDATA___V281*/
+ meltfptr[280]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V280*/ meltfptr[279]);
+ /*_.VALSTR___V282*/ meltfptr[281]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V279*/ meltfptr[278]);
+ meltgc_touch ( /*_.VALDATA___V281*/ meltfptr[280]);
- MELT_LOCATION ("warmelt-debug.melt:1102:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1190:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V281*/ meltfptr[280])) ==
+ ( /*_.VALROUT___V283*/ meltfptr[282])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V281*/ meltfptr[280])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V283*/ meltfptr[282])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1102:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1190:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V281*/ meltfptr[280]);
+ meltgc_touch ( /*_.VALROUT___V283*/ meltfptr[282]);
- /*putclosurout#30 */
- melt_assertmsg ("putclosrout#30 checkclo",
+ /*putclosurout#31 */
+ melt_assertmsg ("putclosrout#31 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V282*/ meltfptr[281])) ==
+ ( /*_.VALCLO___V284*/ meltfptr[283])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#30 checkrout",
+ melt_assertmsg ("putclosrout#31 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V281*/ meltfptr[280])) ==
+ ( /*_.VALROUT___V283*/ meltfptr[282])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V282*/ meltfptr[281])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V281*/ meltfptr[280]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V284*/ meltfptr[283])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V283*/ meltfptr[282]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V282*/ meltfptr[281]);
+ meltgc_touch ( /*_.VALCLO___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-debug.melt:1119:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1207:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V283*/ meltfptr[282])) ==
+ ( /*_.VALROUT___V285*/ meltfptr[284])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V283*/ meltfptr[282])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V285*/ meltfptr[284])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1119:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1207:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V283*/ meltfptr[282])) ==
+ ( /*_.VALROUT___V285*/ meltfptr[284])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_238__DBGOUTAGAIN_SYMBOL_METHOD#1",
+ ("putroutconst constnull.drout_240__DBGOUTAGAIN_SYMBOL_METHOD#1",
NULL != ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V283*/ meltfptr[282])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V285*/ meltfptr[284])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-debug.melt:1119:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1207:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V283*/ meltfptr[282]);
+ meltgc_touch ( /*_.VALROUT___V285*/ meltfptr[284]);
- /*putclosurout#31 */
- melt_assertmsg ("putclosrout#31 checkclo",
+ /*putclosurout#32 */
+ melt_assertmsg ("putclosrout#32 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V284*/ meltfptr[283])) ==
+ ( /*_.VALCLO___V286*/ meltfptr[285])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#31 checkrout",
+ melt_assertmsg ("putclosrout#32 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V283*/ meltfptr[282])) ==
+ ( /*_.VALROUT___V285*/ meltfptr[284])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V284*/ meltfptr[283])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V283*/ meltfptr[282]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V286*/ meltfptr[285])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V285*/ meltfptr[284]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V284*/ meltfptr[283]);
+ meltgc_touch ( /*_.VALCLO___V286*/ meltfptr[285]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V285*/ meltfptr[284])) ==
+ ( /*_.VALDATA___V287*/ meltfptr[286])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V285*/
- meltfptr[284]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V285*/ meltfptr[284]))->obj_vartab[1] =
+ ( /*_.VALDATA___V287*/
+ meltfptr[286]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V286*/ meltfptr[285]);
+ /*_.VALSTR___V288*/ meltfptr[287]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V285*/ meltfptr[284]);
+ meltgc_touch ( /*_.VALDATA___V287*/ meltfptr[286]);
- MELT_LOCATION ("warmelt-debug.melt:1137:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V287*/ meltfptr[286])) ==
+ ( /*_.VALROUT___V289*/ meltfptr[288])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V287*/ meltfptr[286])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1137:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V287*/ meltfptr[286])) ==
+ ( /*_.VALROUT___V289*/ meltfptr[288])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_242__DBGOUT_SYMBOL_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_244__DBGOUT_SYMBOL_METHOD#1",
NULL != ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V287*/ meltfptr[286])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-debug.melt:1137:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V287*/ meltfptr[286])) ==
+ ( /*_.VALROUT___V289*/ meltfptr[288])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V278*/ meltfptr[277]);
- ((meltroutine_ptr_t) /*_.VALROUT___V287*/ meltfptr[286])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V278*/ meltfptr[277]);
+ NULL != /*_.VALCLO___V280*/ meltfptr[279]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V280*/ meltfptr[279]);
- MELT_LOCATION ("warmelt-debug.melt:1137:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V287*/ meltfptr[286])) ==
+ ( /*_.VALROUT___V289*/ meltfptr[288])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V284*/ meltfptr[283]);
- ((meltroutine_ptr_t) /*_.VALROUT___V287*/ meltfptr[286])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V284*/ meltfptr[283]);
+ NULL != /*_.VALCLO___V286*/ meltfptr[285]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V286*/ meltfptr[285]);
- MELT_LOCATION ("warmelt-debug.melt:1137:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1225:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V287*/ meltfptr[286]);
+ meltgc_touch ( /*_.VALROUT___V289*/ meltfptr[288]);
- /*putclosurout#32 */
- melt_assertmsg ("putclosrout#32 checkclo",
+ /*putclosurout#33 */
+ melt_assertmsg ("putclosrout#33 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V288*/ meltfptr[287])) ==
+ ( /*_.VALCLO___V290*/ meltfptr[289])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#32 checkrout",
+ melt_assertmsg ("putclosrout#33 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V287*/ meltfptr[286])) ==
+ ( /*_.VALROUT___V289*/ meltfptr[288])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V288*/ meltfptr[287])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V287*/ meltfptr[286]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V290*/ meltfptr[289])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V289*/ meltfptr[288]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V288*/ meltfptr[287]);
+ meltgc_touch ( /*_.VALCLO___V290*/ meltfptr[289]);
- MELT_LOCATION ("warmelt-debug.melt:1147:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V289*/ meltfptr[288])) ==
+ ( /*_.VALROUT___V291*/ meltfptr[290])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V291*/ meltfptr[290])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1147:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V289*/ meltfptr[288])) ==
+ ( /*_.VALROUT___V291*/ meltfptr[290])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_244__DBGOUT_CLASS_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_246__DBGOUT_CLASS_METHOD#1",
NULL != ( /*_.CLASS_CLASS__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V291*/ meltfptr[290])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-debug.melt:1147:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V289*/ meltfptr[288])) ==
+ ( /*_.VALROUT___V291*/ meltfptr[290])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V278*/ meltfptr[277]);
- ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V278*/ meltfptr[277]);
+ NULL != /*_.VALCLO___V280*/ meltfptr[279]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V291*/ meltfptr[290])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V280*/ meltfptr[279]);
- MELT_LOCATION ("warmelt-debug.melt:1147:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V289*/ meltfptr[288])) ==
+ ( /*_.VALROUT___V291*/ meltfptr[290])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V282*/ meltfptr[281]);
- ((meltroutine_ptr_t) /*_.VALROUT___V289*/ meltfptr[288])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V282*/ meltfptr[281]);
+ NULL != /*_.VALCLO___V284*/ meltfptr[283]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V291*/ meltfptr[290])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-debug.melt:1147:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1235:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V289*/ meltfptr[288]);
+ meltgc_touch ( /*_.VALROUT___V291*/ meltfptr[290]);
- /*putclosurout#33 */
- melt_assertmsg ("putclosrout#33 checkclo",
+ /*putclosurout#34 */
+ melt_assertmsg ("putclosrout#34 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V290*/ meltfptr[289])) ==
+ ( /*_.VALCLO___V292*/ meltfptr[291])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#33 checkrout",
+ melt_assertmsg ("putclosrout#34 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V289*/ meltfptr[288])) ==
+ ( /*_.VALROUT___V291*/ meltfptr[290])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V290*/ meltfptr[289])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V289*/ meltfptr[288]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V292*/ meltfptr[291])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V291*/ meltfptr[290]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V290*/ meltfptr[289]);
+ meltgc_touch ( /*_.VALCLO___V292*/ meltfptr[291]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V291*/ meltfptr[290])) ==
+ ( /*_.VALDATA___V293*/ meltfptr[292])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V291*/
- meltfptr[290]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]))->obj_vartab[1] =
+ ( /*_.VALDATA___V293*/
+ meltfptr[292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V292*/ meltfptr[291]);
+ /*_.VALSTR___V294*/ meltfptr[293]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V291*/ meltfptr[290]);
+ meltgc_touch ( /*_.VALDATA___V293*/ meltfptr[292]);
- MELT_LOCATION ("warmelt-debug.melt:1157:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1245:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V293*/ meltfptr[292])) ==
+ ( /*_.VALROUT___V295*/ meltfptr[294])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V293*/ meltfptr[292])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V295*/ meltfptr[294])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1157:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1245:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V293*/ meltfptr[292])) ==
+ ( /*_.VALROUT___V295*/ meltfptr[294])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_248__DBGOUTAGAIN_KEYWORD_METHOD#1",
+ ("putroutconst constnull.drout_250__DBGOUTAGAIN_KEYWORD_METHOD#1",
NULL != ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V293*/ meltfptr[292])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V295*/ meltfptr[294])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-debug.melt:1157:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1245:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V293*/ meltfptr[292]);
+ meltgc_touch ( /*_.VALROUT___V295*/ meltfptr[294]);
- /*putclosurout#34 */
- melt_assertmsg ("putclosrout#34 checkclo",
+ /*putclosurout#35 */
+ melt_assertmsg ("putclosrout#35 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V294*/ meltfptr[293])) ==
+ ( /*_.VALCLO___V296*/ meltfptr[295])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#34 checkrout",
+ melt_assertmsg ("putclosrout#35 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V293*/ meltfptr[292])) ==
+ ( /*_.VALROUT___V295*/ meltfptr[294])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V294*/ meltfptr[293])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V293*/ meltfptr[292]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V296*/ meltfptr[295])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V295*/ meltfptr[294]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V294*/ meltfptr[293]);
+ meltgc_touch ( /*_.VALCLO___V296*/ meltfptr[295]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V295*/ meltfptr[294])) ==
+ ( /*_.VALDATA___V297*/ meltfptr[296])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V295*/
- meltfptr[294]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V295*/ meltfptr[294]))->obj_vartab[1] =
+ ( /*_.VALDATA___V297*/
+ meltfptr[296]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V296*/ meltfptr[295]);
+ /*_.VALSTR___V298*/ meltfptr[297]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V295*/ meltfptr[294]);
+ meltgc_touch ( /*_.VALDATA___V297*/ meltfptr[296]);
- MELT_LOCATION ("warmelt-debug.melt:1170:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V297*/ meltfptr[296])) ==
+ ( /*_.VALROUT___V299*/ meltfptr[298])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V297*/ meltfptr[296])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1170:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V297*/ meltfptr[296])) ==
+ ( /*_.VALROUT___V299*/ meltfptr[298])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_252__DBGOUT_KEYWORD_METHOD#1",
+ ("putroutconst constnull.drout_254__DBGOUT_KEYWORD_METHOD#1",
NULL != ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V297*/ meltfptr[296])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-debug.melt:1170:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V297*/ meltfptr[296])) ==
+ ( /*_.VALROUT___V299*/ meltfptr[298])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V278*/ meltfptr[277]);
- ((meltroutine_ptr_t) /*_.VALROUT___V297*/ meltfptr[296])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V278*/ meltfptr[277]);
+ NULL != /*_.VALCLO___V280*/ meltfptr[279]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V280*/ meltfptr[279]);
- MELT_LOCATION ("warmelt-debug.melt:1170:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V297*/ meltfptr[296])) ==
+ ( /*_.VALROUT___V299*/ meltfptr[298])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V294*/ meltfptr[293]);
- ((meltroutine_ptr_t) /*_.VALROUT___V297*/ meltfptr[296])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V294*/ meltfptr[293]);
+ NULL != /*_.VALCLO___V296*/ meltfptr[295]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V296*/ meltfptr[295]);
- MELT_LOCATION ("warmelt-debug.melt:1170:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1258:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V297*/ meltfptr[296]);
-
- /*putclosurout#35 */
- melt_assertmsg ("putclosrout#35 checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V298*/ meltfptr[297])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#35 checkrout",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V297*/ meltfptr[296])) ==
- MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V298*/ meltfptr[297])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V297*/ meltfptr[296]);
-
- /*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V298*/ meltfptr[297]);
+ meltgc_touch ( /*_.VALROUT___V299*/ meltfptr[298]);
/*putclosurout#36 */
melt_assertmsg ("putclosrout#36 checkclo",
@@ -13091,505 +13209,501 @@ warmelt_debug_initialmeltchunk_3 (struct frame_start_module_melt_st
/*touch:DATACLOSURE_ */
meltgc_touch ( /*_.VALCLO___V300*/ meltfptr[299]);
+ /*putclosurout#37 */
+ melt_assertmsg ("putclosrout#37 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V302*/ meltfptr[301])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#37 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V301*/ meltfptr[300])) ==
+ MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V302*/ meltfptr[301])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V301*/ meltfptr[300]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V302*/ meltfptr[301]);
+
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V301*/ meltfptr[300])) ==
+ ( /*_.VALDATA___V303*/ meltfptr[302])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V301*/
- meltfptr[300]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]))->obj_vartab[1] =
+ ( /*_.VALDATA___V303*/
+ meltfptr[302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V302*/ meltfptr[301]);
+ /*_.VALSTR___V304*/ meltfptr[303]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V301*/ meltfptr[300]);
+ meltgc_touch ( /*_.VALDATA___V303*/ meltfptr[302]);
- MELT_LOCATION ("warmelt-debug.melt:1195:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V303*/ meltfptr[302])) ==
+ ( /*_.VALROUT___V305*/ meltfptr[304])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V303*/ meltfptr[302])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1195:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V303*/ meltfptr[302])) ==
+ ( /*_.VALROUT___V305*/ meltfptr[304])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_258__DBGOUT_CLONED_SYMBOL_METHOD#1",
+ ("putroutconst constnull.drout_260__DBGOUT_CLONED_SYMBOL_METHOD#1",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V303*/ meltfptr[302])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-debug.melt:1195:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V303*/ meltfptr[302])) ==
+ ( /*_.VALROUT___V305*/ meltfptr[304])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V278*/ meltfptr[277]);
- ((meltroutine_ptr_t) /*_.VALROUT___V303*/ meltfptr[302])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V278*/ meltfptr[277]);
+ NULL != /*_.VALCLO___V280*/ meltfptr[279]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V280*/ meltfptr[279]);
- MELT_LOCATION ("warmelt-debug.melt:1195:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V303*/ meltfptr[302])) ==
+ ( /*_.VALROUT___V305*/ meltfptr[304])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V300*/ meltfptr[299]);
- ((meltroutine_ptr_t) /*_.VALROUT___V303*/ meltfptr[302])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V300*/ meltfptr[299]);
+ NULL != /*_.VALCLO___V302*/ meltfptr[301]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V302*/ meltfptr[301]);
- MELT_LOCATION ("warmelt-debug.melt:1195:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1283:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V303*/ meltfptr[302]);
+ meltgc_touch ( /*_.VALROUT___V305*/ meltfptr[304]);
- /*putclosurout#37 */
- melt_assertmsg ("putclosrout#37 checkclo",
+ /*putclosurout#38 */
+ melt_assertmsg ("putclosrout#38 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V304*/ meltfptr[303])) ==
+ ( /*_.VALCLO___V306*/ meltfptr[305])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#37 checkrout",
+ melt_assertmsg ("putclosrout#38 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V303*/ meltfptr[302])) ==
+ ( /*_.VALROUT___V305*/ meltfptr[304])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V304*/ meltfptr[303])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V303*/ meltfptr[302]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V306*/ meltfptr[305])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V305*/ meltfptr[304]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V304*/ meltfptr[303]);
+ meltgc_touch ( /*_.VALCLO___V306*/ meltfptr[305]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V307*/ meltfptr[306])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_260__DBGOUT_ENVIRONMENT_METHOD#1",
+ ("putroutconst constnull.drout_262__DBGOUT_ENVIRONMENT_METHOD#1",
NULL != ( /*_.CLASS_ENVIRONMENT__V43*/ meltfptr[42]));
- ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V307*/ meltfptr[306])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V43*/ meltfptr[42]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_260__DBGOUT_ENVIRONMENT_METHOD#2",
+ ("putroutconst constnull.drout_262__DBGOUT_ENVIRONMENT_METHOD#2",
NULL != ( /*_.ENV_PREV__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V307*/ meltfptr[306])->tabval[2] =
(melt_ptr_t) ( /*_.ENV_PREV__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V195*/ meltfptr[194]);
- ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V307*/ meltfptr[306])->tabval[3] =
(melt_ptr_t) ( /*_.VALCLO___V195*/ meltfptr[194]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V197*/ meltfptr[196]);
- ((meltroutine_ptr_t) /*_.VALROUT___V305*/ meltfptr[304])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V307*/ meltfptr[306])->tabval[4] =
(melt_ptr_t) ( /*_.VALCLO___V197*/ meltfptr[196]);
- MELT_LOCATION ("warmelt-debug.melt:1206:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1294:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V305*/ meltfptr[304]);
+ meltgc_touch ( /*_.VALROUT___V307*/ meltfptr[306]);
- /*putclosurout#38 */
- melt_assertmsg ("putclosrout#38 checkclo",
+ /*putclosurout#39 */
+ melt_assertmsg ("putclosrout#39 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V306*/ meltfptr[305])) ==
+ ( /*_.VALCLO___V308*/ meltfptr[307])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#38 checkrout",
+ melt_assertmsg ("putclosrout#39 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V305*/ meltfptr[304])) ==
+ ( /*_.VALROUT___V307*/ meltfptr[306])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V306*/ meltfptr[305])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V305*/ meltfptr[304]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V308*/ meltfptr[307])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V307*/ meltfptr[306]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V306*/ meltfptr[305]);
+ meltgc_touch ( /*_.VALCLO___V308*/ meltfptr[307]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V307*/ meltfptr[306])) ==
+ ( /*_.VALDATA___V309*/ meltfptr[308])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V307*/
- meltfptr[306]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]))->obj_vartab[1] =
+ ( /*_.VALDATA___V309*/
+ meltfptr[308]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V308*/ meltfptr[307]);
+ /*_.VALSTR___V310*/ meltfptr[309]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V307*/ meltfptr[306]);
+ meltgc_touch ( /*_.VALDATA___V309*/ meltfptr[308]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V309*/ meltfptr[308])) ==
+ ( /*_.VALDATA___V311*/ meltfptr[310])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V309*/
- meltfptr[308]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[1] =
+ ( /*_.VALDATA___V311*/
+ meltfptr[310]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V310*/ meltfptr[309]);
+ /*_.VALSTR___V312*/ meltfptr[311]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V309*/ meltfptr[308]);
+ meltgc_touch ( /*_.VALDATA___V311*/ meltfptr[310]);
- /*putclosurout#39 */
- melt_assertmsg ("putclosrout#39 checkclo",
+
+#undef meltfram__
+} /*end of warmelt_debug_initialmeltchunk_3 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*putclosurout#40*/
+ melt_assertmsg ("putclosrout#40 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V312*/ meltfptr[311])) ==
+ ( /*_.VALCLO___V314*/ meltfptr[313])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#39 checkrout",
+ melt_assertmsg ("putclosrout#40 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V311*/ meltfptr[310])) ==
+ ( /*_.VALROUT___V313*/ meltfptr[312])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V312*/ meltfptr[311])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V311*/ meltfptr[310]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V314*/ meltfptr[313])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V313*/ meltfptr[312]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V312*/ meltfptr[311]);
+ meltgc_touch ( /*_.VALCLO___V314*/ meltfptr[313]);
- MELT_LOCATION ("warmelt-debug.melt:1259:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V313*/ meltfptr[312])) ==
+ ( /*_.VALROUT___V315*/ meltfptr[314])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V313*/ meltfptr[312])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1259:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V313*/ meltfptr[312])) ==
+ ( /*_.VALROUT___V315*/ meltfptr[314])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_268__DBGOUT_CTYPE_METHOD#1",
+ melt_checkmsg ("putroutconst constnull.drout_270__DBGOUT_CTYPE_METHOD#1",
NULL != ( /*_.CLASS_CTYPE__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V313*/ meltfptr[312])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-debug.melt:1259:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V313*/ meltfptr[312])) ==
+ ( /*_.VALROUT___V315*/ meltfptr[314])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V278*/ meltfptr[277]);
- ((meltroutine_ptr_t) /*_.VALROUT___V313*/ meltfptr[312])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V278*/ meltfptr[277]);
+ NULL != /*_.VALCLO___V280*/ meltfptr[279]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V280*/ meltfptr[279]);
- MELT_LOCATION ("warmelt-debug.melt:1259:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V313*/ meltfptr[312])) ==
+ ( /*_.VALROUT___V315*/ meltfptr[314])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V312*/ meltfptr[311]);
- ((meltroutine_ptr_t) /*_.VALROUT___V313*/ meltfptr[312])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V312*/ meltfptr[311]);
-
-
-#undef meltfram__
-} /*end of warmelt_debug_initialmeltchunk_3 */
+ NULL != /*_.VALCLO___V314*/ meltfptr[313]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V314*/ meltfptr[313]);
-void MELT_MODULE_VISIBILITY
-warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-debug.melt:1259:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1347:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V313*/ meltfptr[312]);
+ meltgc_touch ( /*_.VALROUT___V315*/ meltfptr[314]);
- /*putclosurout#40 */
- melt_assertmsg ("putclosrout#40 checkclo",
+ /*putclosurout#41 */
+ melt_assertmsg ("putclosrout#41 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V314*/ meltfptr[313])) ==
+ ( /*_.VALCLO___V316*/ meltfptr[315])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#40 checkrout",
+ melt_assertmsg ("putclosrout#41 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V313*/ meltfptr[312])) ==
+ ( /*_.VALROUT___V315*/ meltfptr[314])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V314*/ meltfptr[313])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V313*/ meltfptr[312]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V316*/ meltfptr[315])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V315*/ meltfptr[314]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V314*/ meltfptr[313]);
+ meltgc_touch ( /*_.VALCLO___V316*/ meltfptr[315]);
- MELT_LOCATION ("warmelt-debug.melt:1269:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V315*/ meltfptr[314])) ==
+ ( /*_.VALROUT___V317*/ meltfptr[316])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V317*/ meltfptr[316])->tabval[0] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1269:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V315*/ meltfptr[314])) ==
+ ( /*_.VALROUT___V317*/ meltfptr[316])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_270__DBGOUT_ANYBINDING_METHOD#1",
+ ("putroutconst constnull.drout_272__DBGOUT_ANYBINDING_METHOD#1",
NULL != ( /*_.CLASS_ANY_BINDING__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V317*/ meltfptr[316])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-debug.melt:1269:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V315*/ meltfptr[314])) ==
+ ( /*_.VALROUT___V317*/ meltfptr[316])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V109*/ meltfptr[108]);
- ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V317*/ meltfptr[316])->tabval[2] =
(melt_ptr_t) ( /*_.VALDATA___V109*/ meltfptr[108]);
- MELT_LOCATION ("warmelt-debug.melt:1269:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V315*/ meltfptr[314])) ==
+ ( /*_.VALROUT___V317*/ meltfptr[316])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALCLO___V195*/ meltfptr[194]);
- ((meltroutine_ptr_t) /*_.VALROUT___V315*/ meltfptr[314])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V317*/ meltfptr[316])->tabval[3] =
(melt_ptr_t) ( /*_.VALCLO___V195*/ meltfptr[194]);
- MELT_LOCATION ("warmelt-debug.melt:1269:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1357:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V315*/ meltfptr[314]);
+ meltgc_touch ( /*_.VALROUT___V317*/ meltfptr[316]);
- /*putclosurout#41 */
- melt_assertmsg ("putclosrout#41 checkclo",
+ /*putclosurout#42 */
+ melt_assertmsg ("putclosrout#42 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V316*/ meltfptr[315])) ==
+ ( /*_.VALCLO___V318*/ meltfptr[317])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#41 checkrout",
+ melt_assertmsg ("putclosrout#42 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V315*/ meltfptr[314])) ==
+ ( /*_.VALROUT___V317*/ meltfptr[316])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V316*/ meltfptr[315])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V315*/ meltfptr[314]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V318*/ meltfptr[317])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V317*/ meltfptr[316]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V316*/ meltfptr[315]);
+ meltgc_touch ( /*_.VALCLO___V318*/ meltfptr[317]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V317*/ meltfptr[316])) ==
+ ( /*_.VALDATA___V319*/ meltfptr[318])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V317*/
- meltfptr[316]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]))->obj_vartab[1] =
+ ( /*_.VALDATA___V319*/
+ meltfptr[318]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V318*/ meltfptr[317]);
+ /*_.VALSTR___V320*/ meltfptr[319]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V317*/ meltfptr[316]);
+ meltgc_touch ( /*_.VALDATA___V319*/ meltfptr[318]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_274__DISPLAY_DEBUG_MESSAGE#0",
+ ("putroutconst constnull.drout_276__DISPLAY_DEBUG_MESSAGE#0",
NULL != ( /*_.DISCR_STRBUF__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V321*/ meltfptr[320])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_274__DISPLAY_DEBUG_MESSAGE#1",
+ ("putroutconst constnull.drout_276__DISPLAY_DEBUG_MESSAGE#1",
NULL != ( /*_.DISCR_MAP_OBJECTS__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V321*/ meltfptr[320])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_274__DISPLAY_DEBUG_MESSAGE#2",
+ ("putroutconst constnull.drout_276__DISPLAY_DEBUG_MESSAGE#2",
NULL != ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V321*/ meltfptr[320])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V50*/ meltfptr[49]);
- ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V321*/ meltfptr[320])->tabval[3] =
(melt_ptr_t) ( /*_.VALDATA___V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
NULL != /*_.VALDATA___V111*/ meltfptr[110]);
- ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V321*/ meltfptr[320])->tabval[4] =
(melt_ptr_t) ( /*_.VALDATA___V111*/ meltfptr[110]);
- MELT_LOCATION ("warmelt-debug.melt:1303:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1391:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V319*/ meltfptr[318]);
+ meltgc_touch ( /*_.VALROUT___V321*/ meltfptr[320]);
- /*putclosurout#42 */
- melt_assertmsg ("putclosrout#42 checkclo",
+ /*putclosurout#43 */
+ melt_assertmsg ("putclosrout#43 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V320*/ meltfptr[319])) ==
+ ( /*_.VALCLO___V322*/ meltfptr[321])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#42 checkrout",
+ melt_assertmsg ("putclosrout#43 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V319*/ meltfptr[318])) ==
+ ( /*_.VALROUT___V321*/ meltfptr[320])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V320*/ meltfptr[319])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V319*/ meltfptr[318]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V322*/ meltfptr[321])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V321*/ meltfptr[320]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V320*/ meltfptr[319]);
-
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V321*/ meltfptr[320])) ==
- MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V321*/
- meltfptr[320]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[1] =
- (melt_ptr_t) (
- /*_.VALSTR___V322*/ meltfptr[321]);
-
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V321*/ meltfptr[320]);
+ meltgc_touch ( /*_.VALCLO___V322*/ meltfptr[321]);
/*putslot */
melt_assertmsg ("putslot checkobj",
@@ -13819,6 +13933,25 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V345*/ meltfptr[344]);
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V347*/
+ meltfptr[346]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[1] =
+ (melt_ptr_t) (
+ /*_.VALSTR___V348*/ meltfptr[347]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V347*/ meltfptr[346]);
+
/**COMMENT: before toplevel body **/ ;
MELT_LOCATION ("warmelt-debug.melt:4:/ initchunk");
@@ -13833,7 +13966,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*then */
{
/*^cond.then */
- /*_.OR___V347*/ meltfptr[346] =
+ /*_.OR___V349*/ meltfptr[348] =
/*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */
/*_.CONTENV___V2*/ meltfptr[1];;
}
@@ -13849,8 +13982,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 3, "SYSDATA_CONT_FRESH_ENV");
- /*_.SYSDATA_CONT_FRESH_ENV__V348*/
- meltfptr[347] = slot;
+ /*_.SYSDATA_CONT_FRESH_ENV__V350*/
+ meltfptr[349] = slot;
};
;
/*^apply */
@@ -13860,21 +13993,21 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_cstring = "warmelt-debug";
- /*_.FUN___V349*/ meltfptr[348] =
+ /*_.FUN___V351*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
- ( /*_.SYSDATA_CONT_FRESH_ENV__V348*/ meltfptr[347]),
+ ( /*_.SYSDATA_CONT_FRESH_ENV__V350*/ meltfptr[349]),
(melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]),
(MELTBPARSTR_CSTRING ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.OR___V347*/ meltfptr[346] = /*_.FUN___V349*/ meltfptr[348];;
+ /*_.OR___V349*/ meltfptr[348] = /*_.FUN___V351*/ meltfptr[350];;
/*epilog */
MELT_LOCATION ("warmelt-debug.melt:4:/ clear");
- /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V348*/ meltfptr[347] = 0;
+ /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V350*/ meltfptr[349] = 0;
/*^clear */
- /*clear *//*_.FUN___V349*/ meltfptr[348] = 0;
+ /*clear *//*_.FUN___V351*/ meltfptr[350] = 0;
}
;
}
@@ -13887,7 +14020,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.OR___V347*/ meltfptr[346] = 0;
+ /*clear *//*_.OR___V349*/ meltfptr[348] = 0;
}
MELT_LOCATION ("warmelt-debug.melt:50:/ initchunk");
@@ -13899,8 +14032,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V350*/
- meltfptr[347] = slot;
+ /*_.VALUEXPORTER___V352*/
+ meltfptr[349] = slot;
};
;
/*^apply */
@@ -13916,7 +14049,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_DEBUG_INFORMATION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V350*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V352*/ meltfptr[349]),
(melt_ptr_t) ( /*_.VALDATA___V46*/ meltfptr[45]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -13935,7 +14068,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBGI_OUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V350*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V352*/ meltfptr[349]),
(melt_ptr_t) ( /*_.VALDATA___V60*/ meltfptr[59]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -13954,7 +14087,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBGI_OCCMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V350*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V352*/ meltfptr[349]),
(melt_ptr_t) ( /*_.VALDATA___V62*/ meltfptr[61]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -13973,7 +14106,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBGI_MAXDEPTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V350*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V352*/ meltfptr[349]),
(melt_ptr_t) ( /*_.VALDATA___V64*/ meltfptr[63]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -13982,10 +14115,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V350*/ meltfptr[347] = 0;
+ /*clear *//*_.VALUEXPORTER___V352*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:586:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:587:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14001,7 +14134,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V199*/ meltfptr[198];
- /*_.INSTALL_METHOD__V351*/ meltfptr[348] =
+ /*_.INSTALL_METHOD__V353*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V23*/
@@ -14013,10 +14146,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V351*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V353*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:587:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:588:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14032,7 +14165,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V199*/ meltfptr[198];
- /*_.INSTALL_METHOD__V352*/ meltfptr[346] =
+ /*_.INSTALL_METHOD__V354*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V23*/
@@ -14044,10 +14177,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V352*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V354*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:609:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:610:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14063,7 +14196,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V205*/ meltfptr[204];
- /*_.INSTALL_METHOD__V353*/ meltfptr[347] =
+ /*_.INSTALL_METHOD__V355*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_STRING__V24*/ meltfptr[23]),
@@ -14074,10 +14207,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V353*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V355*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:628:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:694:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14093,10 +14226,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V209*/ meltfptr[208];
- /*_.INSTALL_METHOD__V354*/ meltfptr[348] =
+ /*_.INSTALL_METHOD__V356*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
- (melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.DISCR_STRBUF__V12*/ meltfptr[11]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -14104,10 +14237,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V354*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V356*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:655:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:716:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14123,7 +14256,37 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V211*/ meltfptr[210];
- /*_.INSTALL_METHOD__V355*/ meltfptr[346] =
+ /*_.INSTALL_METHOD__V357*/ meltfptr[348] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
+ (melt_ptr_t) ( /*_.DISCR_INTEGER__V11*/ meltfptr[10]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V357*/ meltfptr[348] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-debug.melt:743:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V213*/ meltfptr[212];
+ /*_.INSTALL_METHOD__V358*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MIXED_INTEGER__V25*/
@@ -14135,10 +14298,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V355*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V358*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:683:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:771:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14153,8 +14316,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V215*/ meltfptr[214];
- /*_.INSTALL_METHOD__V356*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V217*/ meltfptr[216];
+ /*_.INSTALL_METHOD__V359*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V26*/
@@ -14166,10 +14329,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V356*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V359*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:706:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:794:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14184,8 +14347,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V219*/ meltfptr[218];
- /*_.INSTALL_METHOD__V357*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V221*/ meltfptr[220];
+ /*_.INSTALL_METHOD__V360*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MIXED_BIGINT__V27*/
@@ -14197,10 +14360,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V357*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V360*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:739:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:827:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14215,8 +14378,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V223*/ meltfptr[222];
- /*_.INSTALL_METHOD__V358*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V225*/ meltfptr[224];
+ /*_.INSTALL_METHOD__V361*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V28*/ meltfptr[27]),
@@ -14227,10 +14390,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V358*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V361*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:766:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:854:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14245,8 +14408,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V228*/ meltfptr[227];
- /*_.INSTALL_METHOD__V359*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V230*/ meltfptr[229];
+ /*_.INSTALL_METHOD__V362*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_ROUTINE__V29*/ meltfptr[28]),
@@ -14257,10 +14420,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V359*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V362*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:800:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:888:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14275,8 +14438,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V234*/ meltfptr[233];
- /*_.INSTALL_METHOD__V360*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V236*/ meltfptr[235];
+ /*_.INSTALL_METHOD__V363*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_CLOSURE__V17*/ meltfptr[16]),
@@ -14287,10 +14450,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V360*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V363*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:842:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:930:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14305,8 +14468,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V236*/ meltfptr[235];
- /*_.INSTALL_METHOD__V361*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V238*/ meltfptr[237];
+ /*_.INSTALL_METHOD__V364*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_LIST__V31*/ meltfptr[30]),
@@ -14317,10 +14480,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V361*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V364*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:862:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:950:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14335,8 +14498,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V240*/ meltfptr[239];
- /*_.INSTALL_METHOD__V362*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V242*/ meltfptr[241];
+ /*_.INSTALL_METHOD__V365*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_PAIR__V32*/ meltfptr[31]),
@@ -14347,10 +14510,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V362*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V365*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:939:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1027:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14365,8 +14528,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V250*/ meltfptr[249];
- /*_.INSTALL_METHOD__V363*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V252*/ meltfptr[251];
+ /*_.INSTALL_METHOD__V366*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V10*/ meltfptr[9]),
@@ -14377,10 +14540,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V363*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V366*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1009:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1097:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14395,8 +14558,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V264*/ meltfptr[263];
- /*_.INSTALL_METHOD__V364*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V266*/ meltfptr[265];
+ /*_.INSTALL_METHOD__V367*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V36*/ meltfptr[35]),
@@ -14407,10 +14570,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V364*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V367*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1036:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1124:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14425,8 +14588,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V270*/ meltfptr[269];
- /*_.INSTALL_METHOD__V365*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V272*/ meltfptr[271];
+ /*_.INSTALL_METHOD__V368*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]),
@@ -14437,10 +14600,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V365*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V368*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1047:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1135:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14455,8 +14618,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V272*/ meltfptr[271];
- /*_.INSTALL_METHOD__V366*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V274*/ meltfptr[273];
+ /*_.INSTALL_METHOD__V369*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V38*/
@@ -14468,10 +14631,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V366*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V369*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1065:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1153:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14486,8 +14649,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V276*/ meltfptr[275];
- /*_.INSTALL_METHOD__V367*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V278*/ meltfptr[277];
+ /*_.INSTALL_METHOD__V370*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]),
@@ -14498,10 +14661,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V367*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V370*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1098:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1186:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14516,8 +14679,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V278*/ meltfptr[277];
- /*_.INSTALL_METHOD__V368*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V280*/ meltfptr[279];
+ /*_.INSTALL_METHOD__V371*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_NAMED__V20*/ meltfptr[19]),
@@ -14528,10 +14691,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V368*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V371*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1100:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1188:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14540,7 +14703,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V369*/
+ /*_.VALUEXPORTER___V372*/
meltfptr[348] = slot;
};
;
@@ -14551,14 +14714,14 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V278*/ meltfptr[277];
+ (melt_ptr_t *) & /*_.VALCLO___V280*/ meltfptr[279];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : DBGOUT_NAMEDOBJECT_METHOD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V369*/ meltfptr[348]),
- (melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]),
+ ( /*_.VALUEXPORTER___V372*/ meltfptr[348]),
+ (melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -14566,10 +14729,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V369*/ meltfptr[348] = 0;
+ /*clear *//*_.VALUEXPORTER___V372*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1115:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1203:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14584,8 +14747,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V282*/ meltfptr[281];
- /*_.INSTALL_METHOD__V370*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V284*/ meltfptr[283];
+ /*_.INSTALL_METHOD__V373*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_NAMED__V20*/ meltfptr[19]),
@@ -14596,10 +14759,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V370*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V373*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1135:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1223:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14614,8 +14777,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V284*/ meltfptr[283];
- /*_.INSTALL_METHOD__V371*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V286*/ meltfptr[285];
+ /*_.INSTALL_METHOD__V374*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]),
@@ -14626,10 +14789,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V371*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V374*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1143:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1231:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14644,8 +14807,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V288*/ meltfptr[287];
- /*_.INSTALL_METHOD__V372*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V290*/ meltfptr[289];
+ /*_.INSTALL_METHOD__V375*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V39*/ meltfptr[38]),
@@ -14656,10 +14819,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V372*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V375*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1241:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14674,8 +14837,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V290*/ meltfptr[289];
- /*_.INSTALL_METHOD__V373*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V292*/ meltfptr[291];
+ /*_.INSTALL_METHOD__V376*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_CLASS__V40*/ meltfptr[39]),
@@ -14686,10 +14849,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V373*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V376*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1168:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1256:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14704,8 +14867,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V294*/ meltfptr[293];
- /*_.INSTALL_METHOD__V374*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V296*/ meltfptr[295];
+ /*_.INSTALL_METHOD__V377*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]),
@@ -14716,10 +14879,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V374*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V377*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1176:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1264:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14734,8 +14897,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V298*/ meltfptr[297];
- /*_.INSTALL_METHOD__V375*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V300*/ meltfptr[299];
+ /*_.INSTALL_METHOD__V378*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_KEYWORD__V41*/ meltfptr[40]),
@@ -14746,10 +14909,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V375*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V378*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1193:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1281:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14764,8 +14927,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V300*/ meltfptr[299];
- /*_.INSTALL_METHOD__V376*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V302*/ meltfptr[301];
+ /*_.INSTALL_METHOD__V379*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V42*/
@@ -14777,10 +14940,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V376*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V379*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1202:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1290:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14795,8 +14958,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V304*/ meltfptr[303];
- /*_.INSTALL_METHOD__V377*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V306*/ meltfptr[305];
+ /*_.INSTALL_METHOD__V380*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V42*/
@@ -14808,10 +14971,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V377*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V380*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1331:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14826,8 +14989,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V306*/ meltfptr[305];
- /*_.INSTALL_METHOD__V378*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V308*/ meltfptr[307];
+ /*_.INSTALL_METHOD__V381*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V43*/ meltfptr[42]),
@@ -14838,10 +15001,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V378*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V381*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1256:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1344:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14856,8 +15019,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V312*/ meltfptr[311];
- /*_.INSTALL_METHOD__V379*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V314*/ meltfptr[313];
+ /*_.INSTALL_METHOD__V382*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_CTYPE__V21*/ meltfptr[20]),
@@ -14868,10 +15031,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V379*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V382*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1266:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1354:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14886,8 +15049,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V314*/ meltfptr[313];
- /*_.INSTALL_METHOD__V380*/ meltfptr[347] =
+ (melt_ptr_t *) & /*_.VALCLO___V316*/ meltfptr[315];
+ /*_.INSTALL_METHOD__V383*/ meltfptr[350] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_CTYPE__V21*/ meltfptr[20]),
@@ -14898,10 +15061,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V380*/ meltfptr[347] = 0;
+ /*clear *//*_.INSTALL_METHOD__V383*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1295:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1383:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14916,8 +15079,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V316*/ meltfptr[315];
- /*_.INSTALL_METHOD__V381*/ meltfptr[348] =
+ (melt_ptr_t *) & /*_.VALCLO___V318*/ meltfptr[317];
+ /*_.INSTALL_METHOD__V384*/ meltfptr[348] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V45*/ meltfptr[44]),
@@ -14928,10 +15091,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V381*/ meltfptr[348] = 0;
+ /*clear *//*_.INSTALL_METHOD__V384*/ meltfptr[348] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1296:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1384:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14946,8 +15109,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V316*/ meltfptr[315];
- /*_.INSTALL_METHOD__V382*/ meltfptr[346] =
+ (melt_ptr_t *) & /*_.VALCLO___V318*/ meltfptr[317];
+ /*_.INSTALL_METHOD__V385*/ meltfptr[349] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V45*/ meltfptr[44]),
@@ -14958,10 +15121,10 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V382*/ meltfptr[346] = 0;
+ /*clear *//*_.INSTALL_METHOD__V385*/ meltfptr[349] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1326:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1414:/ initchunk");
/*^block */
/*anyblock */
{
@@ -14970,8 +15133,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V383*/
- meltfptr[347] = slot;
+ /*_.VALUEXPORTER___V386*/
+ meltfptr[350] = slot;
};
;
/*^apply */
@@ -14987,8 +15150,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBG_OUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15006,8 +15169,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBG_OUTOBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15025,7 +15188,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBG_OUTPUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V124*/ meltfptr[123]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15044,7 +15207,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBG_OUTPUTAGAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V136*/ meltfptr[135]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15063,8 +15226,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBGOUT_FIELDS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15082,8 +15245,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DBGOUTAGAIN_FIELDS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15101,7 +15264,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DEBUG_DEPTH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V66*/ meltfptr[65]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15120,8 +15283,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DEBUG_MSG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15139,7 +15302,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : DISCR_DEBUG_CLOSURE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15152,14 +15315,14 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V320*/ meltfptr[319];
+ (melt_ptr_t *) & /*_.VALCLO___V322*/ meltfptr[321];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : DISPLAY_DEBUG_MESSAGE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15177,8 +15340,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15196,7 +15359,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_HAS_FLAG_DEBUG_SET */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V84*/ meltfptr[83]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15215,7 +15378,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_REALLY_NEED_DBGLIM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V91*/ meltfptr[90]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15234,7 +15397,7 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : MELT_REALLY_NEED_DEBUG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
(melt_ptr_t) ( /*_.VALDATA___V73*/ meltfptr[72]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -15253,8 +15416,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_BASICBLOCK_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15272,8 +15435,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_EDGE_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15291,8 +15454,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_GIMPLE_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15310,8 +15473,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_GIMPLESEQ_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15329,8 +15492,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_LOOP_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15348,8 +15511,8 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*quasi.cur.mod.env.cont norm.exp.val : REGISTER_TREE_DEBUG_FUN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V383*/ meltfptr[347]),
- (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]),
+ ( /*_.VALUEXPORTER___V386*/ meltfptr[350]),
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15357,16 +15520,22 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V383*/ meltfptr[347] = 0;
+ /*clear *//*_.VALUEXPORTER___V386*/ meltfptr[350] = 0;
}
- MELT_LOCATION ("warmelt-debug.melt:1350:/ initchunk");
+ MELT_LOCATION ("warmelt-debug.melt:1438:/ initchunk");
/*^block */
/*anyblock */
{
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V8*/ meltfptr[7]), (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V9*/ meltfptr[8]))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.INITIAL_SYSTEM_DATA__V8*/
+ meltfptr[7]),
+ (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V9*/ meltfptr[8]))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -15589,7 +15758,18 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
(void)
meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]));
- /*internsym:CLASS_NAMED */
+
+#undef meltfram__
+} /*end of warmelt_debug_initialmeltchunk_4 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_debug_initialmeltchunk_5 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:CLASS_NAMED*/
(void)
meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]));
@@ -15611,154 +15791,143 @@ warmelt_debug_initialmeltchunk_4 (struct frame_start_module_melt_st
/*internsym:DISCR_MIXED_INTEGER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]));
/*internsym:DISCR_MIXED_LOCATION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]));
-
-#undef meltfram__
-} /*end of warmelt_debug_initialmeltchunk_4 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_debug_initialmeltchunk_5 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:DISCR_MIXED_BIGINT*/
+ /*internsym:DISCR_MIXED_BIGINT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]));
/*internsym:DISCR_MULTIPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]));
/*internsym:DISCR_ROUTINE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]));
/*internsym:ROUTINE_EVERY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]));
/*internsym:DISCR_LIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]));
/*internsym:DISCR_PAIR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]));
/*internsym:MAPOBJECT_EVERY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]));
/*internsym:COMPARE_OBJ_RANKED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]));
/*internsym:MULTIPLE_EVERY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]));
/*internsym:DISCR_MAP_STRINGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]));
/*internsym:MAPSTRING_EVERY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]));
/*internsym:DISCR_ANY_RECEIVER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]));
/*internsym:DBGOUT_NAMEDOBJECT_METHOD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]));
/*internsym:CLASS_SYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V285*/ meltfptr[284]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]));
/*internsym:CLASS_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]));
/*internsym:CLASS_KEYWORD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V295*/ meltfptr[294]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]));
/*internsym:CLASS_CLONED_SYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]));
/*internsym:CLASS_ENVIRONMENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]));
/*internsym:ENV_PREV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]));
/*internsym:CLASS_ANY_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]));
/*internsym:DBG_OUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]));
/*internsym:DBG_OUTOBJECT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]));
/*internsym:DBGOUT_FIELDS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]));
/*internsym:DBGOUTAGAIN_FIELDS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]));
/*internsym:DEBUG_MSG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]));
/*internsym:DISPLAY_DEBUG_MESSAGE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]));
/*internsym:MELT_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]));
/*internsym:REGISTER_BASICBLOCK_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]));
/*internsym:REGISTER_EDGE_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]));
/*internsym:REGISTER_GIMPLE_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]));
/*internsym:REGISTER_GIMPLESEQ_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]));
/*internsym:REGISTER_LOOP_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]));
/*internsym:REGISTER_TREE_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]));
/**COMMENT: set retinit from boxloc **/ ;
@@ -15778,20 +15947,20 @@ forward_or_mark_module_start_frame_warmelt_debug (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -338);
+ meltframptr_->mcfr_nbvar == /*minihash */ -1403);
if (!marking && melt_is_forwarding)
{
dbgprintf
("forward_or_mark_module_start_frame_warmelt_debug forwarding %d pointers in frame %p",
- 383, (void *) meltframptr_);
- for (ix = 0; ix < 383; ix++)
+ 386, (void *) meltframptr_);
+ for (ix = 0; ix < 386; ix++)
MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]);
return;
} /*end forwarding */
dbgprintf
("forward_or_mark_module_start_frame_warmelt_debug marking in frame %p",
(void *) meltframptr_);
- for (ix = 0; ix < 383; ix++)
+ for (ix = 0; ix < 386; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
diff --git a/gcc/melt/generated/warmelt-first+01.c b/gcc/melt/generated/warmelt-first+01.c
index 6590a0f9ac2..9071ecbf784 100644
--- a/gcc/melt/generated/warmelt-first+01.c
+++ b/gcc/melt/generated/warmelt-first+01.c
@@ -2162,7 +2162,13 @@ lab_endgetargs:;
/*_.DISCRIM__V9*/ meltfptr[8] =
(melt_discr ((melt_ptr_t) ( /*_.SYMB__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-first.melt:2558:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V9*/
+ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4699,7 +4705,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYM__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4722,7 +4733,13 @@ lab_endgetargs:;
/*_.BINDISCR__V16*/ meltfptr[15] =
(melt_discr ((melt_ptr_t) ( /*_.VALBIND__V12*/ meltfptr[11])));;
MELT_LOCATION ("warmelt-first.melt:2719:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDISCR__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDISCR__V16*/
+ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7255,7 +7272,12 @@ lab_endgetargs:;
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[4])),
( /*_#PASSNUMBER__L1*/ meltfnum[0])));;
MELT_LOCATION ("warmelt-first.melt:2883:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8015,7 +8037,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[1]))));;
MELT_LOCATION ("warmelt-first.melt:2924:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8046,7 +8073,13 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-first.melt:2928:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8244,7 +8277,12 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[1]))));;
MELT_LOCATION ("warmelt-first.melt:2943:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!END_MELT_PASS_EXECUTION_DELAYED_QUEUE */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_DELAYED_QUEUE */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8275,7 +8313,13 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-first.melt:2947:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[4])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[4])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -10312,7 +10356,13 @@ lab_endgetargs:;
(meltobject_ptr_t) ( /*_.OPTSYMB__V2*/
meltfptr[1]));;
MELT_LOCATION ("warmelt-first.melt:3080:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPTSYMB__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPTSYMB__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10401,7 +10451,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPTDEC__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_OPTION_DESCRIPTOR */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPTDEC__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_OPTION_DESCRIPTOR */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11271,7 +11326,13 @@ lab_endgetargs:;
{
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SY__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SY__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-first+02.c b/gcc/melt/generated/warmelt-first+02.c
index eb8ba2a8a6d..38e72698796 100644
--- a/gcc/melt/generated/warmelt-first+02.c
+++ b/gcc/melt/generated/warmelt-first+02.c
@@ -11547,7 +11547,14 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-first.melt:3960:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CONTAINER_CTYPE_GTY_DICT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CONTAINER_CTYPE_GTY_DICT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11666,7 +11673,14 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-first.melt:3965:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CONTAINER_CTYPE_DICT */ meltfrout->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CONTAINER_CTYPE_DICT */
+ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-first+meltdesc.c b/gcc/melt/generated/warmelt-first+meltdesc.c
index 5c70d1b8387..8b2579d788e 100644
--- a/gcc/melt/generated/warmelt-first+meltdesc.c
+++ b/gcc/melt/generated/warmelt-first+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-first */
@@ -12,15 +12,15 @@ const char melt_modulename[]="warmelt-first";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-first";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="38a8272407f24a8f47b6382ba0db420a";
+const char melt_primaryhexmd5[]="6eca8cf3f9843876c1e6fc622548c306";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+01.c #1 */ "79eadd9285d7e0819e9799e91ea95041",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+02.c #2 */ "5e69ce5c189a83205a31de6212ecee33",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+01.c #1 */ "9bcb6bad11d8159c7841d66414439b1c",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+02.c #2 */ "3b71eb3f8cfe1e602f7dd65f7093a272",
/*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+03.c #3 */ "500b5d74a25a35c6ec93b6166ff5daa5",
(const char*)0 };
@@ -28,9 +28,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=3;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="bf9519e32bc1d90abe9e62b8623bd024" ;
+const char melt_cumulated_hexmd5[]="585f310e6cfdcadcffb64c0c2fa1a13b" ;
/* include the timestamp file */
-#define meltmod_warmelt_first_mds__bf9519e32bc1d90abe9e62b8623bd024 1
+#define meltmod_warmelt_first_mds__585f310e6cfdcadcffb64c0c2fa1a13b 1
#include "warmelt-first+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-first+melttime.h b/gcc/melt/generated/warmelt-first+melttime.h
index 8cd22b861d5..c122e31ad76 100644
--- a/gcc/melt/generated/warmelt-first+melttime.h
+++ b/gcc/melt/generated/warmelt-first+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-first+melttime.h is included from warmelt-first+meltdesc.c only. */
-#if meltmod_warmelt_first_mds__bf9519e32bc1d90abe9e62b8623bd024
+#if meltmod_warmelt_first_mds__585f310e6cfdcadcffb64c0c2fa1a13b
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-first */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:19 2012 CET";
-const long long melt_gen_timenum=1328609119;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:18 2012 CET";
+const long long melt_gen_timenum=1329219198;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_first_mds__bf9519e32bc1d90abe9e62b8623bd024 */
+#else /* ! meltmod_warmelt_first_mds__585f310e6cfdcadcffb64c0c2fa1a13b */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-first
-#endif /* meltmod_warmelt_first_mds__bf9519e32bc1d90abe9e62b8623bd024 */
+#endif /* meltmod_warmelt_first_mds__585f310e6cfdcadcffb64c0c2fa1a13b */
diff --git a/gcc/melt/generated/warmelt-first.c b/gcc/melt/generated/warmelt-first.c
index 49085202153..d654d31bafe 100644
--- a/gcc/melt/generated/warmelt-first.c
+++ b/gcc/melt/generated/warmelt-first.c
@@ -1706,7 +1706,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-first.melt:2015:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ALTKW__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ALTKW__V10*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -1738,7 +1743,14 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-first.melt:2016:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CONTAINER_CTYPE_DICT */ meltfrout->tabval[4])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CONTAINER_CTYPE_DICT */
+ meltfrout->tabval[4])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1757,7 +1769,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-first.melt:2017:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CKW__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CKW__V9*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1794,7 +1812,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-first.melt:2020:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CONTAINER_CTYPE_GTY_DICT */ meltfrout->tabval[8])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CONTAINER_CTYPE_GTY_DICT */ meltfrout->tabval[8])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1813,7 +1836,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-first.melt:2021:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CKW__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CKW__V9*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2151,7 +2179,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_first iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -1933);
+ iniframp__->mcfr_nbvar == /*minihash */ -1254);
struct cdata_st
{
@@ -6621,7 +6649,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3__CLASS_ROOT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_3__CLASS_ROOT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_3__CLASS_ROOT.obj_hash = 240932652;
+ cdat->dobj_3__CLASS_ROOT.obj_hash = 997439562;
cdat->dobj_3__CLASS_ROOT.obj_len = 8;
@@ -6695,7 +6723,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_9__CLASS_CONTAINER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_9__CLASS_CONTAINER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_9__CLASS_CONTAINER.obj_hash = 665637252;
+ cdat->dobj_9__CLASS_CONTAINER.obj_hash = 680160737;
cdat->dobj_9__CLASS_CONTAINER.obj_len = 8;
@@ -6761,7 +6789,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_15__CONTAINER_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_15__CONTAINER_VALUE.obj_num = 0;
- cdat->dobj_15__CONTAINER_VALUE.obj_hash = 482839699;
+ cdat->dobj_15__CONTAINER_VALUE.obj_hash = 700246995;
cdat->dobj_15__CONTAINER_VALUE.obj_len = 4;
@@ -6824,7 +6852,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_19__CLASS_PROPED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_19__CLASS_PROPED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_19__CLASS_PROPED.obj_hash = 717798839;
+ cdat->dobj_19__CLASS_PROPED.obj_hash = 959787197;
cdat->dobj_19__CLASS_PROPED.obj_len = 8;
@@ -6887,7 +6915,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_25__PROP_TABLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_25__PROP_TABLE.obj_num = 0;
- cdat->dobj_25__PROP_TABLE.obj_hash = 325791348;
+ cdat->dobj_25__PROP_TABLE.obj_hash = 859524698;
cdat->dobj_25__PROP_TABLE.obj_len = 4;
@@ -6947,7 +6975,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_29__CLASS_NAMED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_29__CLASS_NAMED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_29__CLASS_NAMED.obj_hash = 324614698;
+ cdat->dobj_29__CLASS_NAMED.obj_hash = 856656318;
cdat->dobj_29__CLASS_NAMED.obj_len = 8;
@@ -7009,7 +7037,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_35__NAMED_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_35__NAMED_NAME.obj_num = 1;
- cdat->dobj_35__NAMED_NAME.obj_hash = 687348762;
+ cdat->dobj_35__NAMED_NAME.obj_hash = 727566926;
cdat->dobj_35__NAMED_NAME.obj_len = 4;
@@ -7073,7 +7101,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_39__CLASS_DISCRIMINANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_39__CLASS_DISCRIMINANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_39__CLASS_DISCRIMINANT.obj_hash = 477346576;
+ cdat->dobj_39__CLASS_DISCRIMINANT.obj_hash = 13111438;
cdat->dobj_39__CLASS_DISCRIMINANT.obj_len = 8;
@@ -7141,7 +7169,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_45__DISC_METHODICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_45__DISC_METHODICT.obj_num = 2;
- cdat->dobj_45__DISC_METHODICT.obj_hash = 123502802;
+ cdat->dobj_45__DISC_METHODICT.obj_hash = 159121374;
cdat->dobj_45__DISC_METHODICT.obj_len = 4;
@@ -7195,7 +7223,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_49__DISC_SENDER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_49__DISC_SENDER.obj_num = 3;
- cdat->dobj_49__DISC_SENDER.obj_hash = 90342878;
+ cdat->dobj_49__DISC_SENDER.obj_hash = 142097087;
cdat->dobj_49__DISC_SENDER.obj_len = 4;
@@ -7247,7 +7275,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_53__DISC_SUPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_53__DISC_SUPER.obj_num = 4;
- cdat->dobj_53__DISC_SUPER.obj_hash = 704723678;
+ cdat->dobj_53__DISC_SUPER.obj_hash = 1016790602;
cdat->dobj_53__DISC_SUPER.obj_len = 4;
@@ -7307,7 +7335,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_57__CLASS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_57__CLASS_CLASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_57__CLASS_CLASS.obj_hash = 480482617;
+ cdat->dobj_57__CLASS_CLASS.obj_hash = 785620748;
cdat->dobj_57__CLASS_CLASS.obj_len = 8;
@@ -7371,7 +7399,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_63__CLASS_ANCESTORS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_63__CLASS_ANCESTORS.obj_num = 5;
- cdat->dobj_63__CLASS_ANCESTORS.obj_hash = 407116435;
+ cdat->dobj_63__CLASS_ANCESTORS.obj_hash = 753053001;
cdat->dobj_63__CLASS_ANCESTORS.obj_len = 4;
@@ -7426,7 +7454,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_67__CLASS_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_67__CLASS_FIELDS.obj_num = 6;
- cdat->dobj_67__CLASS_FIELDS.obj_hash = 315275155;
+ cdat->dobj_67__CLASS_FIELDS.obj_hash = 278661651;
cdat->dobj_67__CLASS_FIELDS.obj_len = 4;
@@ -7479,7 +7507,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_71__CLASS_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_71__CLASS_DATA.obj_num = 7;
- cdat->dobj_71__CLASS_DATA.obj_hash = 875377275;
+ cdat->dobj_71__CLASS_DATA.obj_hash = 920390086;
cdat->dobj_71__CLASS_DATA.obj_len = 4;
@@ -7539,7 +7567,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_75__CLASS_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_75__CLASS_FIELD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_75__CLASS_FIELD.obj_hash = 1030380717;
+ cdat->dobj_75__CLASS_FIELD.obj_hash = 667861353;
cdat->dobj_75__CLASS_FIELD.obj_len = 8;
@@ -7602,7 +7630,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_81__FLD_OWNCLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_81__FLD_OWNCLASS.obj_num = 2;
- cdat->dobj_81__FLD_OWNCLASS.obj_hash = 651654086;
+ cdat->dobj_81__FLD_OWNCLASS.obj_hash = 464543012;
cdat->dobj_81__FLD_OWNCLASS.obj_len = 4;
@@ -7655,7 +7683,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_85__FLD_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_85__FLD_DATA.obj_num = 3;
- cdat->dobj_85__FLD_DATA.obj_hash = 575178139;
+ cdat->dobj_85__FLD_DATA.obj_hash = 591294278;
cdat->dobj_85__FLD_DATA.obj_len = 4;
@@ -7719,7 +7747,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_89__CLASS_PRIMITIVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_89__CLASS_PRIMITIVE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_89__CLASS_PRIMITIVE.obj_hash = 362022756;
+ cdat->dobj_89__CLASS_PRIMITIVE.obj_hash = 430205375;
cdat->dobj_89__CLASS_PRIMITIVE.obj_len = 8;
@@ -7785,7 +7813,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_95__PRIM_FORMALS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_95__PRIM_FORMALS.obj_num = 2;
- cdat->dobj_95__PRIM_FORMALS.obj_hash = 338522871;
+ cdat->dobj_95__PRIM_FORMALS.obj_hash = 943347729;
cdat->dobj_95__PRIM_FORMALS.obj_len = 4;
@@ -7838,7 +7866,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_99__PRIM_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_99__PRIM_TYPE.obj_num = 3;
- cdat->dobj_99__PRIM_TYPE.obj_hash = 648416011;
+ cdat->dobj_99__PRIM_TYPE.obj_hash = 22342758;
cdat->dobj_99__PRIM_TYPE.obj_len = 4;
@@ -7894,7 +7922,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_103__PRIM_EXPANSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_103__PRIM_EXPANSION.obj_num = 4;
- cdat->dobj_103__PRIM_EXPANSION.obj_hash = 609247863;
+ cdat->dobj_103__PRIM_EXPANSION.obj_hash = 712989829;
cdat->dobj_103__PRIM_EXPANSION.obj_len = 4;
@@ -7962,7 +7990,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_107__CLASS_CITERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_107__CLASS_CITERATOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_107__CLASS_CITERATOR.obj_hash = 676854184;
+ cdat->dobj_107__CLASS_CITERATOR.obj_hash = 1056287375;
cdat->dobj_107__CLASS_CITERATOR.obj_len = 8;
@@ -8033,7 +8061,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_113__CITER_START_FORMALS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_113__CITER_START_FORMALS.obj_num = 2;
- cdat->dobj_113__CITER_START_FORMALS.obj_hash = 465473557;
+ cdat->dobj_113__CITER_START_FORMALS.obj_hash = 803900714;
cdat->dobj_113__CITER_START_FORMALS.obj_len = 4;
@@ -8089,7 +8117,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_117__CITER_STATE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_117__CITER_STATE.obj_num = 3;
- cdat->dobj_117__CITER_STATE.obj_hash = 891524328;
+ cdat->dobj_117__CITER_STATE.obj_hash = 275351605;
cdat->dobj_117__CITER_STATE.obj_len = 4;
@@ -8146,7 +8174,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_121__CITER_BODY_FORMALS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_121__CITER_BODY_FORMALS.obj_num = 4;
- cdat->dobj_121__CITER_BODY_FORMALS.obj_hash = 285865071;
+ cdat->dobj_121__CITER_BODY_FORMALS.obj_hash = 780506977;
cdat->dobj_121__CITER_BODY_FORMALS.obj_len = 4;
@@ -8205,7 +8233,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_125__CITER_EXPBEFORE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_125__CITER_EXPBEFORE.obj_num = 5;
- cdat->dobj_125__CITER_EXPBEFORE.obj_hash = 834801015;
+ cdat->dobj_125__CITER_EXPBEFORE.obj_hash = 110755199;
cdat->dobj_125__CITER_EXPBEFORE.obj_len = 4;
@@ -8264,7 +8292,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_129__CITER_EXPAFTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_129__CITER_EXPAFTER.obj_num = 6;
- cdat->dobj_129__CITER_EXPAFTER.obj_hash = 436862256;
+ cdat->dobj_129__CITER_EXPAFTER.obj_hash = 321919727;
cdat->dobj_129__CITER_EXPAFTER.obj_len = 4;
@@ -8323,7 +8351,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_133__CLASS_ANY_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_133__CLASS_ANY_MATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_133__CLASS_ANY_MATCHER.obj_hash = 81452098;
+ cdat->dobj_133__CLASS_ANY_MATCHER.obj_hash = 250900334;
cdat->dobj_133__CLASS_ANY_MATCHER.obj_len = 8;
@@ -8390,7 +8418,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_139__AMATCH_IN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_139__AMATCH_IN.obj_num = 2;
- cdat->dobj_139__AMATCH_IN.obj_hash = 665795392;
+ cdat->dobj_139__AMATCH_IN.obj_hash = 1048692247;
cdat->dobj_139__AMATCH_IN.obj_len = 4;
@@ -8446,7 +8474,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_143__AMATCH_MATCHBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_143__AMATCH_MATCHBIND.obj_num = 3;
- cdat->dobj_143__AMATCH_MATCHBIND.obj_hash = 1011982412;
+ cdat->dobj_143__AMATCH_MATCHBIND.obj_hash = 369125490;
cdat->dobj_143__AMATCH_MATCHBIND.obj_len = 4;
@@ -8501,7 +8529,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_147__AMATCH_OUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_147__AMATCH_OUT.obj_num = 4;
- cdat->dobj_147__AMATCH_OUT.obj_hash = 717651601;
+ cdat->dobj_147__AMATCH_OUT.obj_hash = 162338788;
cdat->dobj_147__AMATCH_OUT.obj_len = 4;
@@ -8566,7 +8594,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_151__CLASS_CMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_151__CLASS_CMATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_151__CLASS_CMATCHER.obj_hash = 858709379;
+ cdat->dobj_151__CLASS_CMATCHER.obj_hash = 486860375;
cdat->dobj_151__CLASS_CMATCHER.obj_len = 8;
@@ -8635,7 +8663,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_157__CMATCH_STATE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_157__CMATCH_STATE.obj_num = 5;
- cdat->dobj_157__CMATCH_STATE.obj_hash = 257146521;
+ cdat->dobj_157__CMATCH_STATE.obj_hash = 619926518;
cdat->dobj_157__CMATCH_STATE.obj_len = 4;
@@ -8693,7 +8721,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_161__CMATCH_EXPTEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_161__CMATCH_EXPTEST.obj_num = 6;
- cdat->dobj_161__CMATCH_EXPTEST.obj_hash = 304219869;
+ cdat->dobj_161__CMATCH_EXPTEST.obj_hash = 782951503;
cdat->dobj_161__CMATCH_EXPTEST.obj_len = 4;
@@ -8752,7 +8780,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_165__CMATCH_EXPFILL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_165__CMATCH_EXPFILL.obj_num = 7;
- cdat->dobj_165__CMATCH_EXPFILL.obj_hash = 765713677;
+ cdat->dobj_165__CMATCH_EXPFILL.obj_hash = 573570000;
cdat->dobj_165__CMATCH_EXPFILL.obj_len = 4;
@@ -8811,7 +8839,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_169__CMATCH_EXPOPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_169__CMATCH_EXPOPER.obj_num = 8;
- cdat->dobj_169__CMATCH_EXPOPER.obj_hash = 1035159489;
+ cdat->dobj_169__CMATCH_EXPOPER.obj_hash = 630609443;
cdat->dobj_169__CMATCH_EXPOPER.obj_len = 4;
@@ -8879,7 +8907,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_173__CLASS_FUNMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_173__CLASS_FUNMATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_173__CLASS_FUNMATCHER.obj_hash = 415808312;
+ cdat->dobj_173__CLASS_FUNMATCHER.obj_hash = 857621926;
cdat->dobj_173__CLASS_FUNMATCHER.obj_len = 8;
@@ -8949,7 +8977,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_179__FMATCH_MATCHF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_179__FMATCH_MATCHF.obj_num = 5;
- cdat->dobj_179__FMATCH_MATCHF.obj_hash = 998920630;
+ cdat->dobj_179__FMATCH_MATCHF.obj_hash = 200523210;
cdat->dobj_179__FMATCH_MATCHF.obj_len = 4;
@@ -9006,7 +9034,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_183__FMATCH_APPLYF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_183__FMATCH_APPLYF.obj_num = 6;
- cdat->dobj_183__FMATCH_APPLYF.obj_hash = 61876245;
+ cdat->dobj_183__FMATCH_APPLYF.obj_hash = 537985165;
cdat->dobj_183__FMATCH_APPLYF.obj_len = 4;
@@ -9061,7 +9089,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_187__FMATCH_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_187__FMATCH_DATA.obj_num = 7;
- cdat->dobj_187__FMATCH_DATA.obj_hash = 142289933;
+ cdat->dobj_187__FMATCH_DATA.obj_hash = 272667562;
cdat->dobj_187__FMATCH_DATA.obj_len = 4;
@@ -9126,7 +9154,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_191__CLASS_LOCATED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_191__CLASS_LOCATED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_191__CLASS_LOCATED.obj_hash = 115072626;
+ cdat->dobj_191__CLASS_LOCATED.obj_hash = 1046725849;
cdat->dobj_191__CLASS_LOCATED.obj_len = 8;
@@ -9193,7 +9221,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_197__LOCA_LOCATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_197__LOCA_LOCATION.obj_num = 1;
- cdat->dobj_197__LOCA_LOCATION.obj_hash = 1023761369;
+ cdat->dobj_197__LOCA_LOCATION.obj_hash = 35913395;
cdat->dobj_197__LOCA_LOCATION.obj_len = 4;
@@ -9256,7 +9284,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_201__CLASS_SEXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_201__CLASS_SEXPR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_201__CLASS_SEXPR.obj_hash = 724549797;
+ cdat->dobj_201__CLASS_SEXPR.obj_hash = 953328962;
cdat->dobj_201__CLASS_SEXPR.obj_len = 8;
@@ -9322,7 +9350,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_207__SEXP_CONTENTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_207__SEXP_CONTENTS.obj_num = 2;
- cdat->dobj_207__SEXP_CONTENTS.obj_hash = 687501198;
+ cdat->dobj_207__SEXP_CONTENTS.obj_hash = 509031321;
cdat->dobj_207__SEXP_CONTENTS.obj_len = 4;
@@ -9392,7 +9420,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_211__CLASS_SEXPR_MACROSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_211__CLASS_SEXPR_MACROSTRING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_211__CLASS_SEXPR_MACROSTRING.obj_hash = 544898551;
+ cdat->dobj_211__CLASS_SEXPR_MACROSTRING.obj_hash = 914953260;
cdat->dobj_211__CLASS_SEXPR_MACROSTRING.obj_len = 8;
@@ -9472,7 +9500,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_217__CLASS_INFIX_LEXEME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_217__CLASS_INFIX_LEXEME.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_217__CLASS_INFIX_LEXEME.obj_hash = 989929192;
+ cdat->dobj_217__CLASS_INFIX_LEXEME.obj_hash = 1047285070;
cdat->dobj_217__CLASS_INFIX_LEXEME.obj_len = 8;
@@ -9540,7 +9568,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_223__LEXEME_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_223__LEXEME_DATA.obj_num = 2;
- cdat->dobj_223__LEXEME_DATA.obj_hash = 24123898;
+ cdat->dobj_223__LEXEME_DATA.obj_hash = 332919911;
cdat->dobj_223__LEXEME_DATA.obj_len = 4;
@@ -9609,7 +9637,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_227__CLASS_INFIX_STRING_LITERAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_227__CLASS_INFIX_STRING_LITERAL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_227__CLASS_INFIX_STRING_LITERAL.obj_hash = 429452838;
+ cdat->dobj_227__CLASS_INFIX_STRING_LITERAL.obj_hash = 511159325;
cdat->dobj_227__CLASS_INFIX_STRING_LITERAL.obj_len = 8;
@@ -9692,7 +9720,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_233__CLASS_INFIX_INTEGER_LITERAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_233__CLASS_INFIX_INTEGER_LITERAL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_233__CLASS_INFIX_INTEGER_LITERAL.obj_hash = 625289083;
+ cdat->dobj_233__CLASS_INFIX_INTEGER_LITERAL.obj_hash = 162458439;
cdat->dobj_233__CLASS_INFIX_INTEGER_LITERAL.obj_len = 8;
@@ -9765,7 +9793,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_239__CLASS_INFIX_ANY_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_239__CLASS_INFIX_ANY_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_239__CLASS_INFIX_ANY_SYMBOL.obj_hash = 639568213;
+ cdat->dobj_239__CLASS_INFIX_ANY_SYMBOL.obj_hash = 734440918;
cdat->dobj_239__CLASS_INFIX_ANY_SYMBOL.obj_len = 8;
@@ -9845,7 +9873,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_245__CLASS_INFIX_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_245__CLASS_INFIX_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_245__CLASS_INFIX_SYMBOL.obj_hash = 922468991;
+ cdat->dobj_245__CLASS_INFIX_SYMBOL.obj_hash = 565418341;
cdat->dobj_245__CLASS_INFIX_SYMBOL.obj_len = 8;
@@ -9928,7 +9956,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_251__CLASS_INFIX_ADDITIVE_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_251__CLASS_INFIX_ADDITIVE_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_251__CLASS_INFIX_ADDITIVE_SYMBOL.obj_hash = 515251785;
+ cdat->dobj_251__CLASS_INFIX_ADDITIVE_SYMBOL.obj_hash = 571573052;
cdat->dobj_251__CLASS_INFIX_ADDITIVE_SYMBOL.obj_len = 8;
@@ -10014,7 +10042,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_257__CLASS_INFIX_MULTIPLICATIVE_SYMBOL.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_257__CLASS_INFIX_MULTIPLICATIVE_SYMBOL.obj_hash = 549492037;
+ cdat->dobj_257__CLASS_INFIX_MULTIPLICATIVE_SYMBOL.obj_hash = 994958976;
cdat->dobj_257__CLASS_INFIX_MULTIPLICATIVE_SYMBOL.obj_len = 8;
@@ -10097,7 +10125,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_263__CLASS_INFIX_RELATIONAL_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_263__CLASS_INFIX_RELATIONAL_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_263__CLASS_INFIX_RELATIONAL_SYMBOL.obj_hash = 195761818;
+ cdat->dobj_263__CLASS_INFIX_RELATIONAL_SYMBOL.obj_hash = 957796861;
cdat->dobj_263__CLASS_INFIX_RELATIONAL_SYMBOL.obj_len = 8;
@@ -10180,7 +10208,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_269__CLASS_INFIX_DELIMITER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_269__CLASS_INFIX_DELIMITER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_269__CLASS_INFIX_DELIMITER.obj_hash = 47787910;
+ cdat->dobj_269__CLASS_INFIX_DELIMITER.obj_hash = 1030189313;
cdat->dobj_269__CLASS_INFIX_DELIMITER.obj_len = 8;
@@ -10260,7 +10288,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_275__CLASS_INFIX_KEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_275__CLASS_INFIX_KEYWORD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_275__CLASS_INFIX_KEYWORD.obj_hash = 310985528;
+ cdat->dobj_275__CLASS_INFIX_KEYWORD.obj_hash = 474055601;
cdat->dobj_275__CLASS_INFIX_KEYWORD.obj_len = 8;
@@ -10340,7 +10368,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_281__CLASS_SELECTOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_281__CLASS_SELECTOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_281__CLASS_SELECTOR.obj_hash = 4443849;
+ cdat->dobj_281__CLASS_SELECTOR.obj_hash = 490304385;
cdat->dobj_281__CLASS_SELECTOR.obj_len = 8;
@@ -10410,7 +10438,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_287__SEL_SIGNATURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_287__SEL_SIGNATURE.obj_num = 2;
- cdat->dobj_287__SEL_SIGNATURE.obj_hash = 151780311;
+ cdat->dobj_287__SEL_SIGNATURE.obj_hash = 560853233;
cdat->dobj_287__SEL_SIGNATURE.obj_len = 4;
@@ -10464,7 +10492,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_291__SEL_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_291__SEL_DATA.obj_num = 3;
- cdat->dobj_291__SEL_DATA.obj_hash = 946785188;
+ cdat->dobj_291__SEL_DATA.obj_hash = 740635541;
cdat->dobj_291__SEL_DATA.obj_len = 4;
@@ -10527,7 +10555,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_295__CLASS_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_295__CLASS_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_295__CLASS_SYMBOL.obj_hash = 775128985;
+ cdat->dobj_295__CLASS_SYMBOL.obj_hash = 532122145;
cdat->dobj_295__CLASS_SYMBOL.obj_len = 8;
@@ -10591,7 +10619,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_301__SYMB_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_301__SYMB_DATA.obj_num = 2;
- cdat->dobj_301__SYMB_DATA.obj_hash = 459628119;
+ cdat->dobj_301__SYMB_DATA.obj_hash = 472208827;
cdat->dobj_301__SYMB_DATA.obj_len = 4;
@@ -10647,7 +10675,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_305__CLASS_CLONED_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_305__CLASS_CLONED_SYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_305__CLASS_CLONED_SYMBOL.obj_hash = 468881663;
+ cdat->dobj_305__CLASS_CLONED_SYMBOL.obj_hash = 381364132;
cdat->dobj_305__CLASS_CLONED_SYMBOL.obj_len = 8;
@@ -10714,7 +10742,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_311__CSYM_URANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_311__CSYM_URANK.obj_num = 3;
- cdat->dobj_311__CSYM_URANK.obj_hash = 942347781;
+ cdat->dobj_311__CSYM_URANK.obj_hash = 628218876;
cdat->dobj_311__CSYM_URANK.obj_len = 4;
@@ -10778,7 +10806,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_315__CLASS_KEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_315__CLASS_KEYWORD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_315__CLASS_KEYWORD.obj_hash = 726711289;
+ cdat->dobj_315__CLASS_KEYWORD.obj_hash = 952423350;
cdat->dobj_315__CLASS_KEYWORD.obj_len = 8;
@@ -10851,7 +10879,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_321__CLASS_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_321__CLASS_CTYPE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_321__CLASS_CTYPE.obj_hash = 712275494;
+ cdat->dobj_321__CLASS_CTYPE.obj_hash = 781776945;
cdat->dobj_321__CLASS_CTYPE.obj_len = 8;
@@ -10917,7 +10945,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_327__CTYPE_KEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_327__CTYPE_KEYWORD.obj_num = 2;
- cdat->dobj_327__CTYPE_KEYWORD.obj_hash = 412177378;
+ cdat->dobj_327__CTYPE_KEYWORD.obj_hash = 581286181;
cdat->dobj_327__CTYPE_KEYWORD.obj_len = 4;
@@ -10972,7 +11000,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_331__CTYPE_CNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_331__CTYPE_CNAME.obj_num = 3;
- cdat->dobj_331__CTYPE_CNAME.obj_hash = 808617086;
+ cdat->dobj_331__CTYPE_CNAME.obj_hash = 464755563;
cdat->dobj_331__CTYPE_CNAME.obj_len = 4;
@@ -11028,7 +11056,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_335__CTYPE_PARCHAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_335__CTYPE_PARCHAR.obj_num = 4;
- cdat->dobj_335__CTYPE_PARCHAR.obj_hash = 1019779717;
+ cdat->dobj_335__CTYPE_PARCHAR.obj_hash = 992603758;
cdat->dobj_335__CTYPE_PARCHAR.obj_len = 4;
@@ -11086,7 +11114,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_339__CTYPE_PARSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_339__CTYPE_PARSTRING.obj_num = 5;
- cdat->dobj_339__CTYPE_PARSTRING.obj_hash = 689896519;
+ cdat->dobj_339__CTYPE_PARSTRING.obj_hash = 376403210;
cdat->dobj_339__CTYPE_PARSTRING.obj_len = 4;
@@ -11145,7 +11173,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_343__CTYPE_ARGFIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_343__CTYPE_ARGFIELD.obj_num = 6;
- cdat->dobj_343__CTYPE_ARGFIELD.obj_hash = 408374621;
+ cdat->dobj_343__CTYPE_ARGFIELD.obj_hash = 858287213;
cdat->dobj_343__CTYPE_ARGFIELD.obj_len = 4;
@@ -11204,7 +11232,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_347__CTYPE_RESFIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_347__CTYPE_RESFIELD.obj_num = 7;
- cdat->dobj_347__CTYPE_RESFIELD.obj_hash = 17628592;
+ cdat->dobj_347__CTYPE_RESFIELD.obj_hash = 64630998;
cdat->dobj_347__CTYPE_RESFIELD.obj_len = 4;
@@ -11261,7 +11289,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_351__CTYPE_MARKER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_351__CTYPE_MARKER.obj_num = 8;
- cdat->dobj_351__CTYPE_MARKER.obj_hash = 1037511266;
+ cdat->dobj_351__CTYPE_MARKER.obj_hash = 51855041;
cdat->dobj_351__CTYPE_MARKER.obj_len = 4;
@@ -11316,7 +11344,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_355__CTYPE_DESCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_355__CTYPE_DESCR.obj_num = 9;
- cdat->dobj_355__CTYPE_DESCR.obj_hash = 664595867;
+ cdat->dobj_355__CTYPE_DESCR.obj_hash = 744850239;
cdat->dobj_355__CTYPE_DESCR.obj_len = 4;
@@ -11373,7 +11401,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_359__CTYPE_ALTKEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_359__CTYPE_ALTKEYWORD.obj_num = 10;
- cdat->dobj_359__CTYPE_ALTKEYWORD.obj_hash = 402533347;
+ cdat->dobj_359__CTYPE_ALTKEYWORD.obj_hash = 89558846;
cdat->dobj_359__CTYPE_ALTKEYWORD.obj_len = 4;
@@ -11441,7 +11469,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_363__CLASS_CTYPE_GTY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_363__CLASS_CTYPE_GTY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_363__CLASS_CTYPE_GTY.obj_hash = 354654146;
+ cdat->dobj_363__CLASS_CTYPE_GTY.obj_hash = 836604991;
cdat->dobj_363__CLASS_CTYPE_GTY.obj_len = 8;
@@ -11512,7 +11540,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_369__CTYPG_BOXEDMAGIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_369__CTYPG_BOXEDMAGIC.obj_num = 11;
- cdat->dobj_369__CTYPG_BOXEDMAGIC.obj_hash = 956940319;
+ cdat->dobj_369__CTYPG_BOXEDMAGIC.obj_hash = 32617637;
cdat->dobj_369__CTYPG_BOXEDMAGIC.obj_len = 4;
@@ -11571,7 +11599,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_373__CTYPG_MAPMAGIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_373__CTYPG_MAPMAGIC.obj_num = 12;
- cdat->dobj_373__CTYPG_MAPMAGIC.obj_hash = 546882405;
+ cdat->dobj_373__CTYPG_MAPMAGIC.obj_hash = 576961340;
cdat->dobj_373__CTYPG_MAPMAGIC.obj_len = 4;
@@ -11630,7 +11658,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_377__CTYPG_BOXEDSTRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_377__CTYPG_BOXEDSTRUCT.obj_num = 13;
- cdat->dobj_377__CTYPG_BOXEDSTRUCT.obj_hash = 30586710;
+ cdat->dobj_377__CTYPG_BOXEDSTRUCT.obj_hash = 938066474;
cdat->dobj_377__CTYPG_BOXEDSTRUCT.obj_len = 4;
@@ -11689,7 +11717,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_381__CTYPG_BOXEDUNIMEMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_381__CTYPG_BOXEDUNIMEMB.obj_num = 14;
- cdat->dobj_381__CTYPG_BOXEDUNIMEMB.obj_hash = 708746588;
+ cdat->dobj_381__CTYPG_BOXEDUNIMEMB.obj_hash = 1017583367;
cdat->dobj_381__CTYPG_BOXEDUNIMEMB.obj_len = 4;
@@ -11748,7 +11776,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_385__CTYPG_ENTRYSTRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_385__CTYPG_ENTRYSTRUCT.obj_num = 15;
- cdat->dobj_385__CTYPG_ENTRYSTRUCT.obj_hash = 877481220;
+ cdat->dobj_385__CTYPG_ENTRYSTRUCT.obj_hash = 399334257;
cdat->dobj_385__CTYPG_ENTRYSTRUCT.obj_len = 4;
@@ -11807,7 +11835,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_389__CTYPG_MAPSTRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_389__CTYPG_MAPSTRUCT.obj_num = 16;
- cdat->dobj_389__CTYPG_MAPSTRUCT.obj_hash = 171229134;
+ cdat->dobj_389__CTYPG_MAPSTRUCT.obj_hash = 506370760;
cdat->dobj_389__CTYPG_MAPSTRUCT.obj_len = 4;
@@ -11866,7 +11894,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_393__CTYPG_BOXDISCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_393__CTYPG_BOXDISCR.obj_num = 17;
- cdat->dobj_393__CTYPG_BOXDISCR.obj_hash = 836103941;
+ cdat->dobj_393__CTYPG_BOXDISCR.obj_hash = 422025051;
cdat->dobj_393__CTYPG_BOXDISCR.obj_len = 4;
@@ -11925,7 +11953,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_397__CTYPG_MAPDISCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_397__CTYPG_MAPDISCR.obj_num = 18;
- cdat->dobj_397__CTYPG_MAPDISCR.obj_hash = 987599537;
+ cdat->dobj_397__CTYPG_MAPDISCR.obj_hash = 357770465;
cdat->dobj_397__CTYPG_MAPDISCR.obj_len = 4;
@@ -11984,7 +12012,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_401__CTYPG_MAPUNIMEMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_401__CTYPG_MAPUNIMEMB.obj_num = 19;
- cdat->dobj_401__CTYPG_MAPUNIMEMB.obj_hash = 847621026;
+ cdat->dobj_401__CTYPG_MAPUNIMEMB.obj_hash = 1042887383;
cdat->dobj_401__CTYPG_MAPUNIMEMB.obj_len = 4;
@@ -12041,7 +12069,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_405__CTYPG_BOXFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_405__CTYPG_BOXFUN.obj_num = 20;
- cdat->dobj_405__CTYPG_BOXFUN.obj_hash = 879338193;
+ cdat->dobj_405__CTYPG_BOXFUN.obj_hash = 1033328324;
cdat->dobj_405__CTYPG_BOXFUN.obj_len = 4;
@@ -12099,7 +12127,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_409__CTYPG_UNBOXFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_409__CTYPG_UNBOXFUN.obj_num = 21;
- cdat->dobj_409__CTYPG_UNBOXFUN.obj_hash = 192869738;
+ cdat->dobj_409__CTYPG_UNBOXFUN.obj_hash = 467574096;
cdat->dobj_409__CTYPG_UNBOXFUN.obj_len = 4;
@@ -12158,7 +12186,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_413__CTYPG_UPDATEBOXFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_413__CTYPG_UPDATEBOXFUN.obj_num = 22;
- cdat->dobj_413__CTYPG_UPDATEBOXFUN.obj_hash = 414852848;
+ cdat->dobj_413__CTYPG_UPDATEBOXFUN.obj_hash = 705613934;
cdat->dobj_413__CTYPG_UPDATEBOXFUN.obj_len = 4;
@@ -12217,7 +12245,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_417__CTYPG_NEWMAPFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_417__CTYPG_NEWMAPFUN.obj_num = 23;
- cdat->dobj_417__CTYPG_NEWMAPFUN.obj_hash = 482972186;
+ cdat->dobj_417__CTYPG_NEWMAPFUN.obj_hash = 479863222;
cdat->dobj_417__CTYPG_NEWMAPFUN.obj_len = 4;
@@ -12276,7 +12304,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_421__CTYPG_MAPGETFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_421__CTYPG_MAPGETFUN.obj_num = 24;
- cdat->dobj_421__CTYPG_MAPGETFUN.obj_hash = 480998664;
+ cdat->dobj_421__CTYPG_MAPGETFUN.obj_hash = 876833156;
cdat->dobj_421__CTYPG_MAPGETFUN.obj_len = 4;
@@ -12335,7 +12363,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_425__CTYPG_MAPPUTFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_425__CTYPG_MAPPUTFUN.obj_num = 25;
- cdat->dobj_425__CTYPG_MAPPUTFUN.obj_hash = 171001529;
+ cdat->dobj_425__CTYPG_MAPPUTFUN.obj_hash = 32724520;
cdat->dobj_425__CTYPG_MAPPUTFUN.obj_len = 4;
@@ -12394,7 +12422,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_429__CTYPG_MAPREMOVEFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_429__CTYPG_MAPREMOVEFUN.obj_num = 26;
- cdat->dobj_429__CTYPG_MAPREMOVEFUN.obj_hash = 1021462956;
+ cdat->dobj_429__CTYPG_MAPREMOVEFUN.obj_hash = 806789640;
cdat->dobj_429__CTYPG_MAPREMOVEFUN.obj_len = 4;
@@ -12453,7 +12481,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_433__CTYPG_MAPCOUNTFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_433__CTYPG_MAPCOUNTFUN.obj_num = 27;
- cdat->dobj_433__CTYPG_MAPCOUNTFUN.obj_hash = 352449217;
+ cdat->dobj_433__CTYPG_MAPCOUNTFUN.obj_hash = 140876859;
cdat->dobj_433__CTYPG_MAPCOUNTFUN.obj_len = 4;
@@ -12512,7 +12540,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_437__CTYPG_MAPSIZEFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_437__CTYPG_MAPSIZEFUN.obj_num = 28;
- cdat->dobj_437__CTYPG_MAPSIZEFUN.obj_hash = 1069736844;
+ cdat->dobj_437__CTYPG_MAPSIZEFUN.obj_hash = 478618808;
cdat->dobj_437__CTYPG_MAPSIZEFUN.obj_len = 4;
@@ -12571,7 +12599,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_441__CTYPG_MAPNATTFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_441__CTYPG_MAPNATTFUN.obj_num = 29;
- cdat->dobj_441__CTYPG_MAPNATTFUN.obj_hash = 171240567;
+ cdat->dobj_441__CTYPG_MAPNATTFUN.obj_hash = 153754602;
cdat->dobj_441__CTYPG_MAPNATTFUN.obj_len = 4;
@@ -12630,7 +12658,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_445__CTYPG_MAPNVALFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_445__CTYPG_MAPNVALFUN.obj_num = 30;
- cdat->dobj_445__CTYPG_MAPNVALFUN.obj_hash = 845616407;
+ cdat->dobj_445__CTYPG_MAPNVALFUN.obj_hash = 698733827;
cdat->dobj_445__CTYPG_MAPNVALFUN.obj_len = 4;
@@ -12698,7 +12726,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_449__CLASS_SYSTEM_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_449__CLASS_SYSTEM_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_449__CLASS_SYSTEM_DATA.obj_hash = 67519258;
+ cdat->dobj_449__CLASS_SYSTEM_DATA.obj_hash = 458788411;
cdat->dobj_449__CLASS_SYSTEM_DATA.obj_len = 8;
@@ -12769,7 +12797,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_455__SYSDATA_MODE_DICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_455__SYSDATA_MODE_DICT.obj_num = 2;
- cdat->dobj_455__SYSDATA_MODE_DICT.obj_hash = 721650345;
+ cdat->dobj_455__SYSDATA_MODE_DICT.obj_hash = 870847932;
cdat->dobj_455__SYSDATA_MODE_DICT.obj_len = 4;
@@ -12830,7 +12858,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_459__SYSDATA_CONT_FRESH_ENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_459__SYSDATA_CONT_FRESH_ENV.obj_num = 3;
- cdat->dobj_459__SYSDATA_CONT_FRESH_ENV.obj_hash = 957248456;
+ cdat->dobj_459__SYSDATA_CONT_FRESH_ENV.obj_hash = 363249736;
cdat->dobj_459__SYSDATA_CONT_FRESH_ENV.obj_len = 4;
@@ -12891,7 +12919,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_463__SYSDATA_VALUE_EXPORTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_463__SYSDATA_VALUE_EXPORTER.obj_num = 4;
- cdat->dobj_463__SYSDATA_VALUE_EXPORTER.obj_hash = 454556910;
+ cdat->dobj_463__SYSDATA_VALUE_EXPORTER.obj_hash = 777050723;
cdat->dobj_463__SYSDATA_VALUE_EXPORTER.obj_len = 4;
@@ -12952,7 +12980,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_467__SYSDATA_MACRO_EXPORTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_467__SYSDATA_MACRO_EXPORTER.obj_num = 5;
- cdat->dobj_467__SYSDATA_MACRO_EXPORTER.obj_hash = 309144273;
+ cdat->dobj_467__SYSDATA_MACRO_EXPORTER.obj_hash = 902028786;
cdat->dobj_467__SYSDATA_MACRO_EXPORTER.obj_len = 4;
@@ -13011,7 +13039,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_471__SYSDATA_SYMBOLDICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_471__SYSDATA_SYMBOLDICT.obj_num = 6;
- cdat->dobj_471__SYSDATA_SYMBOLDICT.obj_hash = 422895482;
+ cdat->dobj_471__SYSDATA_SYMBOLDICT.obj_hash = 468940655;
cdat->dobj_471__SYSDATA_SYMBOLDICT.obj_len = 4;
@@ -13070,7 +13098,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_475__SYSDATA_KEYWDICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_475__SYSDATA_KEYWDICT.obj_num = 7;
- cdat->dobj_475__SYSDATA_KEYWDICT.obj_hash = 582584669;
+ cdat->dobj_475__SYSDATA_KEYWDICT.obj_hash = 764057973;
cdat->dobj_475__SYSDATA_KEYWDICT.obj_len = 4;
@@ -13129,7 +13157,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_479__SYSDATA_ADDSYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_479__SYSDATA_ADDSYMBOL.obj_num = 8;
- cdat->dobj_479__SYSDATA_ADDSYMBOL.obj_hash = 740430544;
+ cdat->dobj_479__SYSDATA_ADDSYMBOL.obj_hash = 173936961;
cdat->dobj_479__SYSDATA_ADDSYMBOL.obj_len = 4;
@@ -13188,7 +13216,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_483__SYSDATA_ADDKEYW.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_483__SYSDATA_ADDKEYW.obj_num = 9;
- cdat->dobj_483__SYSDATA_ADDKEYW.obj_hash = 166513385;
+ cdat->dobj_483__SYSDATA_ADDKEYW.obj_hash = 235299539;
cdat->dobj_483__SYSDATA_ADDKEYW.obj_len = 4;
@@ -13247,7 +13275,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_487__SYSDATA_INTERNSYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_487__SYSDATA_INTERNSYMBOL.obj_num = 10;
- cdat->dobj_487__SYSDATA_INTERNSYMBOL.obj_hash = 220699241;
+ cdat->dobj_487__SYSDATA_INTERNSYMBOL.obj_hash = 454194317;
cdat->dobj_487__SYSDATA_INTERNSYMBOL.obj_len = 4;
@@ -13306,7 +13334,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_491__SYSDATA_INTERNKEYW.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_491__SYSDATA_INTERNKEYW.obj_num = 11;
- cdat->dobj_491__SYSDATA_INTERNKEYW.obj_hash = 808767984;
+ cdat->dobj_491__SYSDATA_INTERNKEYW.obj_hash = 372377657;
cdat->dobj_491__SYSDATA_INTERNKEYW.obj_len = 4;
@@ -13367,7 +13395,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_495__SYSDATA_VALUE_IMPORTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_495__SYSDATA_VALUE_IMPORTER.obj_num = 12;
- cdat->dobj_495__SYSDATA_VALUE_IMPORTER.obj_hash = 161999469;
+ cdat->dobj_495__SYSDATA_VALUE_IMPORTER.obj_hash = 247050897;
cdat->dobj_495__SYSDATA_VALUE_IMPORTER.obj_len = 4;
@@ -13426,7 +13454,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_499__SYSDATA_PASS_DICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_499__SYSDATA_PASS_DICT.obj_num = 13;
- cdat->dobj_499__SYSDATA_PASS_DICT.obj_hash = 56268086;
+ cdat->dobj_499__SYSDATA_PASS_DICT.obj_hash = 167557760;
cdat->dobj_499__SYSDATA_PASS_DICT.obj_len = 4;
@@ -13487,7 +13515,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_503__SYSDATA_EXIT_FINALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_503__SYSDATA_EXIT_FINALIZER.obj_num = 14;
- cdat->dobj_503__SYSDATA_EXIT_FINALIZER.obj_hash = 908566285;
+ cdat->dobj_503__SYSDATA_EXIT_FINALIZER.obj_hash = 18878051;
cdat->dobj_503__SYSDATA_EXIT_FINALIZER.obj_len = 4;
@@ -13548,7 +13576,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_507__SYSDATA_MELTATTR_DEFINER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_507__SYSDATA_MELTATTR_DEFINER.obj_num = 15;
- cdat->dobj_507__SYSDATA_MELTATTR_DEFINER.obj_hash = 1003870129;
+ cdat->dobj_507__SYSDATA_MELTATTR_DEFINER.obj_hash = 178493391;
cdat->dobj_507__SYSDATA_MELTATTR_DEFINER.obj_len = 4;
@@ -13609,7 +13637,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_511__SYSDATA_PATMACRO_EXPORTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_511__SYSDATA_PATMACRO_EXPORTER.obj_num = 16;
- cdat->dobj_511__SYSDATA_PATMACRO_EXPORTER.obj_hash = 139661183;
+ cdat->dobj_511__SYSDATA_PATMACRO_EXPORTER.obj_hash = 169422178;
cdat->dobj_511__SYSDATA_PATMACRO_EXPORTER.obj_len = 4;
@@ -13668,7 +13696,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_515__SYSDATA_DEBUGMSG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_515__SYSDATA_DEBUGMSG.obj_num = 17;
- cdat->dobj_515__SYSDATA_DEBUGMSG.obj_hash = 647247124;
+ cdat->dobj_515__SYSDATA_DEBUGMSG.obj_hash = 284032605;
cdat->dobj_515__SYSDATA_DEBUGMSG.obj_len = 4;
@@ -13727,7 +13755,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_519__SYSDATA_STDOUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_519__SYSDATA_STDOUT.obj_num = 18;
- cdat->dobj_519__SYSDATA_STDOUT.obj_hash = 467654295;
+ cdat->dobj_519__SYSDATA_STDOUT.obj_hash = 741973198;
cdat->dobj_519__SYSDATA_STDOUT.obj_len = 4;
@@ -13786,7 +13814,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_523__SYSDATA_STDERR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_523__SYSDATA_STDERR.obj_num = 19;
- cdat->dobj_523__SYSDATA_STDERR.obj_hash = 915418361;
+ cdat->dobj_523__SYSDATA_STDERR.obj_hash = 356321620;
cdat->dobj_523__SYSDATA_STDERR.obj_len = 4;
@@ -13845,7 +13873,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_527__SYSDATA_DUMPFILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_527__SYSDATA_DUMPFILE.obj_num = 20;
- cdat->dobj_527__SYSDATA_DUMPFILE.obj_hash = 128977663;
+ cdat->dobj_527__SYSDATA_DUMPFILE.obj_hash = 449961588;
cdat->dobj_527__SYSDATA_DUMPFILE.obj_len = 4;
@@ -13906,7 +13934,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_531__SYSDATA_PRE_GENERICIZE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_531__SYSDATA_PRE_GENERICIZE.obj_num = 21;
- cdat->dobj_531__SYSDATA_PRE_GENERICIZE.obj_hash = 775255722;
+ cdat->dobj_531__SYSDATA_PRE_GENERICIZE.obj_hash = 1019394513;
cdat->dobj_531__SYSDATA_PRE_GENERICIZE.obj_len = 4;
@@ -13965,7 +13993,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_535__SYSDATA_UNIT_STARTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_535__SYSDATA_UNIT_STARTER.obj_num = 22;
- cdat->dobj_535__SYSDATA_UNIT_STARTER.obj_hash = 922648851;
+ cdat->dobj_535__SYSDATA_UNIT_STARTER.obj_hash = 904416898;
cdat->dobj_535__SYSDATA_UNIT_STARTER.obj_len = 4;
@@ -14026,7 +14054,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_539__SYSDATA_UNIT_FINISHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_539__SYSDATA_UNIT_FINISHER.obj_num = 23;
- cdat->dobj_539__SYSDATA_UNIT_FINISHER.obj_hash = 651855755;
+ cdat->dobj_539__SYSDATA_UNIT_FINISHER.obj_hash = 213609992;
cdat->dobj_539__SYSDATA_UNIT_FINISHER.obj_len = 4;
@@ -14085,7 +14113,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_543__SYSDATA_OPTION_SET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_543__SYSDATA_OPTION_SET.obj_num = 24;
- cdat->dobj_543__SYSDATA_OPTION_SET.obj_hash = 691474523;
+ cdat->dobj_543__SYSDATA_OPTION_SET.obj_hash = 540169337;
cdat->dobj_543__SYSDATA_OPTION_SET.obj_len = 4;
@@ -14146,7 +14174,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_547__SYSDATA_PASSEXEC_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_547__SYSDATA_PASSEXEC_HOOK.obj_num = 25;
- cdat->dobj_547__SYSDATA_PASSEXEC_HOOK.obj_hash = 149673512;
+ cdat->dobj_547__SYSDATA_PASSEXEC_HOOK.obj_hash = 743204997;
cdat->dobj_547__SYSDATA_PASSEXEC_HOOK.obj_len = 4;
@@ -14207,7 +14235,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_551__SYSDATA_MELTPASS_AFTER_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_551__SYSDATA_MELTPASS_AFTER_HOOK.obj_num = 26;
- cdat->dobj_551__SYSDATA_MELTPASS_AFTER_HOOK.obj_hash = 403928742;
+ cdat->dobj_551__SYSDATA_MELTPASS_AFTER_HOOK.obj_hash = 358773056;
cdat->dobj_551__SYSDATA_MELTPASS_AFTER_HOOK.obj_len = 4;
@@ -14266,7 +14294,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_555__SYSDATA_MELTPRAGMAS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_555__SYSDATA_MELTPRAGMAS.obj_num = 27;
- cdat->dobj_555__SYSDATA_MELTPRAGMAS.obj_hash = 6554583;
+ cdat->dobj_555__SYSDATA_MELTPRAGMAS.obj_hash = 97798541;
cdat->dobj_555__SYSDATA_MELTPRAGMAS.obj_len = 4;
@@ -14327,7 +14355,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_559__SYSDATA_FINISHTYPE_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_559__SYSDATA_FINISHTYPE_HOOK.obj_num = 28;
- cdat->dobj_559__SYSDATA_FINISHTYPE_HOOK.obj_hash = 373625535;
+ cdat->dobj_559__SYSDATA_FINISHTYPE_HOOK.obj_hash = 631757908;
cdat->dobj_559__SYSDATA_FINISHTYPE_HOOK.obj_len = 4;
@@ -14388,7 +14416,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_563__SYSDATA_FINISHDECL_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_563__SYSDATA_FINISHDECL_HOOK.obj_num = 29;
- cdat->dobj_563__SYSDATA_FINISHDECL_HOOK.obj_hash = 1064613642;
+ cdat->dobj_563__SYSDATA_FINISHDECL_HOOK.obj_hash = 86408355;
cdat->dobj_563__SYSDATA_FINISHDECL_HOOK.obj_len = 4;
@@ -14449,7 +14477,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_567__SYSDATA_ALL_PASSES_START_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_567__SYSDATA_ALL_PASSES_START_HOOK.obj_num = 30;
- cdat->dobj_567__SYSDATA_ALL_PASSES_START_HOOK.obj_hash = 587026639;
+ cdat->dobj_567__SYSDATA_ALL_PASSES_START_HOOK.obj_hash = 118850077;
cdat->dobj_567__SYSDATA_ALL_PASSES_START_HOOK.obj_len = 4;
@@ -14510,7 +14538,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_571__SYSDATA_ALL_PASSES_END_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_571__SYSDATA_ALL_PASSES_END_HOOK.obj_num = 31;
- cdat->dobj_571__SYSDATA_ALL_PASSES_END_HOOK.obj_hash = 1064734771;
+ cdat->dobj_571__SYSDATA_ALL_PASSES_END_HOOK.obj_hash = 125352998;
cdat->dobj_571__SYSDATA_ALL_PASSES_END_HOOK.obj_len = 4;
@@ -14572,7 +14600,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_575__SYSDATA_ALL_IPA_PASSES_START_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_575__SYSDATA_ALL_IPA_PASSES_START_HOOK.obj_num = 32;
- cdat->dobj_575__SYSDATA_ALL_IPA_PASSES_START_HOOK.obj_hash = 195707471;
+ cdat->dobj_575__SYSDATA_ALL_IPA_PASSES_START_HOOK.obj_hash = 166810972;
cdat->dobj_575__SYSDATA_ALL_IPA_PASSES_START_HOOK.obj_len = 4;
@@ -14633,7 +14661,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_579__SYSDATA_ALL_IPA_PASSES_END_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_579__SYSDATA_ALL_IPA_PASSES_END_HOOK.obj_num = 33;
- cdat->dobj_579__SYSDATA_ALL_IPA_PASSES_END_HOOK.obj_hash = 989021012;
+ cdat->dobj_579__SYSDATA_ALL_IPA_PASSES_END_HOOK.obj_hash = 467266839;
cdat->dobj_579__SYSDATA_ALL_IPA_PASSES_END_HOOK.obj_len = 4;
@@ -14695,7 +14723,8 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_583__SYSDATA_EARLY_GIMPLE_PASSES_START_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_583__SYSDATA_EARLY_GIMPLE_PASSES_START_HOOK.obj_num = 34;
- cdat->dobj_583__SYSDATA_EARLY_GIMPLE_PASSES_START_HOOK.obj_hash = 987397031;
+ cdat->dobj_583__SYSDATA_EARLY_GIMPLE_PASSES_START_HOOK.obj_hash =
+ 1053427137;
cdat->dobj_583__SYSDATA_EARLY_GIMPLE_PASSES_START_HOOK.obj_len = 4;
@@ -14757,7 +14786,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_587__SYSDATA_EARLY_GIMPLE_PASSES_END_HOOK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_587__SYSDATA_EARLY_GIMPLE_PASSES_END_HOOK.obj_num = 35;
- cdat->dobj_587__SYSDATA_EARLY_GIMPLE_PASSES_END_HOOK.obj_hash = 293830690;
+ cdat->dobj_587__SYSDATA_EARLY_GIMPLE_PASSES_END_HOOK.obj_hash = 435926265;
cdat->dobj_587__SYSDATA_EARLY_GIMPLE_PASSES_END_HOOK.obj_len = 4;
@@ -14816,7 +14845,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_591__SYSDATA_SPARE1.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_591__SYSDATA_SPARE1.obj_num = 36;
- cdat->dobj_591__SYSDATA_SPARE1.obj_hash = 823325032;
+ cdat->dobj_591__SYSDATA_SPARE1.obj_hash = 197152153;
cdat->dobj_591__SYSDATA_SPARE1.obj_len = 4;
@@ -14875,7 +14904,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_595__SYSDATA_SPARE2.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_595__SYSDATA_SPARE2.obj_num = 37;
- cdat->dobj_595__SYSDATA_SPARE2.obj_hash = 803926741;
+ cdat->dobj_595__SYSDATA_SPARE2.obj_hash = 84691921;
cdat->dobj_595__SYSDATA_SPARE2.obj_len = 4;
@@ -14934,7 +14963,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_599__SYSDATA_SPARE3.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_599__SYSDATA_SPARE3.obj_num = 38;
- cdat->dobj_599__SYSDATA_SPARE3.obj_hash = 605237027;
+ cdat->dobj_599__SYSDATA_SPARE3.obj_hash = 584198309;
cdat->dobj_599__SYSDATA_SPARE3.obj_len = 4;
@@ -14993,7 +15022,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_603__SYSDATA_SPARE4.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_603__SYSDATA_SPARE4.obj_num = 39;
- cdat->dobj_603__SYSDATA_SPARE4.obj_hash = 653739919;
+ cdat->dobj_603__SYSDATA_SPARE4.obj_hash = 930360397;
cdat->dobj_603__SYSDATA_SPARE4.obj_len = 4;
@@ -15061,7 +15090,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_607__CLASS_ENVIRONMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_607__CLASS_ENVIRONMENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_607__CLASS_ENVIRONMENT.obj_hash = 273245702;
+ cdat->dobj_607__CLASS_ENVIRONMENT.obj_hash = 248232550;
cdat->dobj_607__CLASS_ENVIRONMENT.obj_len = 8;
@@ -15128,7 +15157,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_613__ENV_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_613__ENV_BIND.obj_num = 0;
- cdat->dobj_613__ENV_BIND.obj_hash = 44262401;
+ cdat->dobj_613__ENV_BIND.obj_hash = 531714126;
cdat->dobj_613__ENV_BIND.obj_len = 4;
@@ -15180,7 +15209,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_617__ENV_PREV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_617__ENV_PREV.obj_num = 1;
- cdat->dobj_617__ENV_PREV.obj_hash = 198453076;
+ cdat->dobj_617__ENV_PREV.obj_hash = 286350864;
cdat->dobj_617__ENV_PREV.obj_len = 4;
@@ -15232,7 +15261,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_621__ENV_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_621__ENV_PROC.obj_num = 2;
- cdat->dobj_621__ENV_PROC.obj_hash = 903112140;
+ cdat->dobj_621__ENV_PROC.obj_hash = 656603732;
cdat->dobj_621__ENV_PROC.obj_len = 4;
@@ -15290,7 +15319,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_625__CLASS_DESCRIBED_ENVIRONMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_625__CLASS_DESCRIBED_ENVIRONMENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_625__CLASS_DESCRIBED_ENVIRONMENT.obj_hash = 731702058;
+ cdat->dobj_625__CLASS_DESCRIBED_ENVIRONMENT.obj_hash = 333865049;
cdat->dobj_625__CLASS_DESCRIBED_ENVIRONMENT.obj_len = 8;
@@ -15357,7 +15386,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_631__DENV_DESCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_631__DENV_DESCR.obj_num = 3;
- cdat->dobj_631__DENV_DESCR.obj_hash = 349911697;
+ cdat->dobj_631__DENV_DESCR.obj_hash = 98664106;
cdat->dobj_631__DENV_DESCR.obj_len = 4;
@@ -15413,7 +15442,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_635__CLASS_ANY_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_635__CLASS_ANY_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_635__CLASS_ANY_BINDING.obj_hash = 961493698;
+ cdat->dobj_635__CLASS_ANY_BINDING.obj_hash = 894788421;
cdat->dobj_635__CLASS_ANY_BINDING.obj_len = 8;
@@ -15480,7 +15509,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_641__BINDER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_641__BINDER.obj_num = 0;
- cdat->dobj_641__BINDER.obj_hash = 67185549;
+ cdat->dobj_641__BINDER.obj_hash = 317950413;
cdat->dobj_641__BINDER.obj_len = 4;
@@ -15538,7 +15567,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_645__CLASS_EXPORTED_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_645__CLASS_EXPORTED_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_645__CLASS_EXPORTED_BINDING.obj_hash = 48656621;
+ cdat->dobj_645__CLASS_EXPORTED_BINDING.obj_hash = 346809367;
cdat->dobj_645__CLASS_EXPORTED_BINDING.obj_len = 8;
@@ -15609,7 +15638,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_651__CLASS_MACRO_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_651__CLASS_MACRO_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_651__CLASS_MACRO_BINDING.obj_hash = 398748763;
+ cdat->dobj_651__CLASS_MACRO_BINDING.obj_hash = 293342334;
cdat->dobj_651__CLASS_MACRO_BINDING.obj_len = 8;
@@ -15680,7 +15709,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_657__MBIND_EXPANSER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_657__MBIND_EXPANSER.obj_num = 1;
- cdat->dobj_657__MBIND_EXPANSER.obj_hash = 382070679;
+ cdat->dobj_657__MBIND_EXPANSER.obj_hash = 989971911;
cdat->dobj_657__MBIND_EXPANSER.obj_len = 4;
@@ -15741,7 +15770,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_661__CLASS_PATMACRO_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_661__CLASS_PATMACRO_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_661__CLASS_PATMACRO_BINDING.obj_hash = 806827837;
+ cdat->dobj_661__CLASS_PATMACRO_BINDING.obj_hash = 97060317;
cdat->dobj_661__CLASS_PATMACRO_BINDING.obj_len = 8;
@@ -15812,7 +15841,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_667__PATBIND_EXPANSER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_667__PATBIND_EXPANSER.obj_num = 2;
- cdat->dobj_667__PATBIND_EXPANSER.obj_hash = 536568603;
+ cdat->dobj_667__PATBIND_EXPANSER.obj_hash = 336395752;
cdat->dobj_667__PATBIND_EXPANSER.obj_len = 4;
@@ -15871,7 +15900,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_671__CLASS_VALUE_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_671__CLASS_VALUE_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_671__CLASS_VALUE_BINDING.obj_hash = 871154220;
+ cdat->dobj_671__CLASS_VALUE_BINDING.obj_hash = 741046424;
cdat->dobj_671__CLASS_VALUE_BINDING.obj_len = 8;
@@ -15939,7 +15968,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_677__VBIND_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_677__VBIND_VALUE.obj_num = 1;
- cdat->dobj_677__VBIND_VALUE.obj_hash = 948565292;
+ cdat->dobj_677__VBIND_VALUE.obj_hash = 381817719;
cdat->dobj_677__VBIND_VALUE.obj_len = 4;
@@ -16006,7 +16035,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_681__CLASS_FORMAL_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_681__CLASS_FORMAL_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_681__CLASS_FORMAL_BINDING.obj_hash = 337018063;
+ cdat->dobj_681__CLASS_FORMAL_BINDING.obj_hash = 975214362;
cdat->dobj_681__CLASS_FORMAL_BINDING.obj_len = 8;
@@ -16073,7 +16102,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_687__FBIND_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_687__FBIND_TYPE.obj_num = 1;
- cdat->dobj_687__FBIND_TYPE.obj_hash = 303872640;
+ cdat->dobj_687__FBIND_TYPE.obj_hash = 745298624;
cdat->dobj_687__FBIND_TYPE.obj_len = 4;
@@ -16129,7 +16158,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_691__CLASS_FIXED_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_691__CLASS_FIXED_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_691__CLASS_FIXED_BINDING.obj_hash = 718380551;
+ cdat->dobj_691__CLASS_FIXED_BINDING.obj_hash = 874788585;
cdat->dobj_691__CLASS_FIXED_BINDING.obj_len = 8;
@@ -16198,7 +16227,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_697__FIXBIND_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_697__FIXBIND_DATA.obj_num = 1;
- cdat->dobj_697__FIXBIND_DATA.obj_hash = 409734414;
+ cdat->dobj_697__FIXBIND_DATA.obj_hash = 224359481;
cdat->dobj_697__FIXBIND_DATA.obj_len = 4;
@@ -16258,7 +16287,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_701__CLASS_SELECTOR_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_701__CLASS_SELECTOR_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_701__CLASS_SELECTOR_BINDING.obj_hash = 7463479;
+ cdat->dobj_701__CLASS_SELECTOR_BINDING.obj_hash = 96060730;
cdat->dobj_701__CLASS_SELECTOR_BINDING.obj_len = 8;
@@ -16329,7 +16358,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_707__SBIND_SELECTORDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_707__SBIND_SELECTORDEF.obj_num = 2;
- cdat->dobj_707__SBIND_SELECTORDEF.obj_hash = 327560821;
+ cdat->dobj_707__SBIND_SELECTORDEF.obj_hash = 744948710;
cdat->dobj_707__SBIND_SELECTORDEF.obj_len = 4;
@@ -16390,7 +16419,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_711__CLASS_PRIMITIVE_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_711__CLASS_PRIMITIVE_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_711__CLASS_PRIMITIVE_BINDING.obj_hash = 217439574;
+ cdat->dobj_711__CLASS_PRIMITIVE_BINDING.obj_hash = 741096237;
cdat->dobj_711__CLASS_PRIMITIVE_BINDING.obj_len = 8;
@@ -16460,7 +16489,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_717__PBIND_PRIMDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_717__PBIND_PRIMDEF.obj_num = 2;
- cdat->dobj_717__PBIND_PRIMDEF.obj_hash = 316160670;
+ cdat->dobj_717__PBIND_PRIMDEF.obj_hash = 634352276;
cdat->dobj_717__PBIND_PRIMDEF.obj_len = 4;
@@ -16518,7 +16547,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_721__PBIND_PRIMITIVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_721__PBIND_PRIMITIVE.obj_num = 3;
- cdat->dobj_721__PBIND_PRIMITIVE.obj_hash = 41926193;
+ cdat->dobj_721__PBIND_PRIMITIVE.obj_hash = 560357364;
cdat->dobj_721__PBIND_PRIMITIVE.obj_len = 4;
@@ -16579,7 +16608,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_725__CLASS_CITERATOR_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_725__CLASS_CITERATOR_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_725__CLASS_CITERATOR_BINDING.obj_hash = 753484023;
+ cdat->dobj_725__CLASS_CITERATOR_BINDING.obj_hash = 429471790;
cdat->dobj_725__CLASS_CITERATOR_BINDING.obj_len = 8;
@@ -16650,7 +16679,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_731__CBIND_CITERDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_731__CBIND_CITERDEF.obj_num = 2;
- cdat->dobj_731__CBIND_CITERDEF.obj_hash = 4546021;
+ cdat->dobj_731__CBIND_CITERDEF.obj_hash = 218607229;
cdat->dobj_731__CBIND_CITERDEF.obj_len = 4;
@@ -16709,7 +16738,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_735__CBIND_CITERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_735__CBIND_CITERATOR.obj_num = 3;
- cdat->dobj_735__CBIND_CITERATOR.obj_hash = 899630653;
+ cdat->dobj_735__CBIND_CITERATOR.obj_hash = 969758512;
cdat->dobj_735__CBIND_CITERATOR.obj_len = 4;
@@ -16770,7 +16799,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_739__CLASS_FUNCTION_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_739__CLASS_FUNCTION_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_739__CLASS_FUNCTION_BINDING.obj_hash = 123764201;
+ cdat->dobj_739__CLASS_FUNCTION_BINDING.obj_hash = 963790387;
cdat->dobj_739__CLASS_FUNCTION_BINDING.obj_len = 8;
@@ -16839,7 +16868,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_745__FUBIND_DEFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_745__FUBIND_DEFUN.obj_num = 2;
- cdat->dobj_745__FUBIND_DEFUN.obj_hash = 1057178545;
+ cdat->dobj_745__FUBIND_DEFUN.obj_hash = 208873032;
cdat->dobj_745__FUBIND_DEFUN.obj_len = 4;
@@ -16899,7 +16928,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_749__CLASS_DEFINED_VALUE_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_749__CLASS_DEFINED_VALUE_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_749__CLASS_DEFINED_VALUE_BINDING.obj_hash = 861447829;
+ cdat->dobj_749__CLASS_DEFINED_VALUE_BINDING.obj_hash = 157082354;
cdat->dobj_749__CLASS_DEFINED_VALUE_BINDING.obj_len = 8;
@@ -16970,7 +16999,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_755__DEFVALBIND_DEFINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_755__DEFVALBIND_DEFINE.obj_num = 2;
- cdat->dobj_755__DEFVALBIND_DEFINE.obj_hash = 782291488;
+ cdat->dobj_755__DEFVALBIND_DEFINE.obj_hash = 236285969;
cdat->dobj_755__DEFVALBIND_DEFINE.obj_len = 4;
@@ -17029,7 +17058,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_759__CLASS_CLASS_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_759__CLASS_CLASS_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_759__CLASS_CLASS_BINDING.obj_hash = 789186637;
+ cdat->dobj_759__CLASS_CLASS_BINDING.obj_hash = 1020520229;
cdat->dobj_759__CLASS_CLASS_BINDING.obj_len = 8;
@@ -17100,7 +17129,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_765__CBIND_DEFCLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_765__CBIND_DEFCLASS.obj_num = 2;
- cdat->dobj_765__CBIND_DEFCLASS.obj_hash = 837669717;
+ cdat->dobj_765__CBIND_DEFCLASS.obj_hash = 315992313;
cdat->dobj_765__CBIND_DEFCLASS.obj_len = 4;
@@ -17156,7 +17185,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_769__CBIND_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_769__CBIND_CLASS.obj_num = 3;
- cdat->dobj_769__CBIND_CLASS.obj_hash = 45361574;
+ cdat->dobj_769__CBIND_CLASS.obj_hash = 470442301;
cdat->dobj_769__CBIND_CLASS.obj_len = 4;
@@ -17213,7 +17242,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_773__CLASS_FIELD_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_773__CLASS_FIELD_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_773__CLASS_FIELD_BINDING.obj_hash = 155765355;
+ cdat->dobj_773__CLASS_FIELD_BINDING.obj_hash = 976464128;
cdat->dobj_773__CLASS_FIELD_BINDING.obj_len = 8;
@@ -17284,7 +17313,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_779__FLBIND_CLABIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_779__FLBIND_CLABIND.obj_num = 2;
- cdat->dobj_779__FLBIND_CLABIND.obj_hash = 553152375;
+ cdat->dobj_779__FLBIND_CLABIND.obj_hash = 1026591974;
cdat->dobj_779__FLBIND_CLABIND.obj_len = 4;
@@ -17341,7 +17370,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_783__FLBIND_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_783__FLBIND_FIELD.obj_num = 3;
- cdat->dobj_783__FLBIND_FIELD.obj_hash = 578745342;
+ cdat->dobj_783__FLBIND_FIELD.obj_hash = 167699755;
cdat->dobj_783__FLBIND_FIELD.obj_len = 4;
@@ -17401,7 +17430,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_787__CLASS_INSTANCE_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_787__CLASS_INSTANCE_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_787__CLASS_INSTANCE_BINDING.obj_hash = 762952323;
+ cdat->dobj_787__CLASS_INSTANCE_BINDING.obj_hash = 752307683;
cdat->dobj_787__CLASS_INSTANCE_BINDING.obj_len = 8;
@@ -17470,7 +17499,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_793__IBIND_ICLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_793__IBIND_ICLASS.obj_num = 2;
- cdat->dobj_793__IBIND_ICLASS.obj_hash = 190079899;
+ cdat->dobj_793__IBIND_ICLASS.obj_hash = 1029940640;
cdat->dobj_793__IBIND_ICLASS.obj_len = 4;
@@ -17530,7 +17559,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_797__CLASS_CMATCHER_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_797__CLASS_CMATCHER_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_797__CLASS_CMATCHER_BINDING.obj_hash = 749923510;
+ cdat->dobj_797__CLASS_CMATCHER_BINDING.obj_hash = 950306133;
cdat->dobj_797__CLASS_CMATCHER_BINDING.obj_len = 8;
@@ -17601,7 +17630,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_803__CMBIND_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_803__CMBIND_MATCHER.obj_num = 2;
- cdat->dobj_803__CMBIND_MATCHER.obj_hash = 1070151847;
+ cdat->dobj_803__CMBIND_MATCHER.obj_hash = 678568477;
cdat->dobj_803__CMBIND_MATCHER.obj_len = 4;
@@ -17662,7 +17691,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_807__CLASS_FUNMATCHER_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_807__CLASS_FUNMATCHER_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_807__CLASS_FUNMATCHER_BINDING.obj_hash = 39082242;
+ cdat->dobj_807__CLASS_FUNMATCHER_BINDING.obj_hash = 1051347631;
cdat->dobj_807__CLASS_FUNMATCHER_BINDING.obj_len = 8;
@@ -17733,7 +17762,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_813__FMBIND_FUNMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_813__FMBIND_FUNMATCHER.obj_num = 2;
- cdat->dobj_813__FMBIND_FUNMATCHER.obj_hash = 1071287155;
+ cdat->dobj_813__FMBIND_FUNMATCHER.obj_hash = 627919850;
cdat->dobj_813__FMBIND_FUNMATCHER.obj_len = 4;
@@ -17792,7 +17821,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_817__FMBIND_DEFUNMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_817__FMBIND_DEFUNMATCHER.obj_num = 3;
- cdat->dobj_817__FMBIND_DEFUNMATCHER.obj_hash = 884620326;
+ cdat->dobj_817__FMBIND_DEFUNMATCHER.obj_hash = 951798239;
cdat->dobj_817__FMBIND_DEFUNMATCHER.obj_len = 4;
@@ -17851,7 +17880,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_821__CLASS_LET_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_821__CLASS_LET_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_821__CLASS_LET_BINDING.obj_hash = 361763751;
+ cdat->dobj_821__CLASS_LET_BINDING.obj_hash = 810425706;
cdat->dobj_821__CLASS_LET_BINDING.obj_len = 8;
@@ -17920,7 +17949,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_827__LETBIND_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_827__LETBIND_TYPE.obj_num = 1;
- cdat->dobj_827__LETBIND_TYPE.obj_hash = 51373468;
+ cdat->dobj_827__LETBIND_TYPE.obj_hash = 201132180;
cdat->dobj_827__LETBIND_TYPE.obj_len = 4;
@@ -17976,7 +18005,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_831__LETBIND_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_831__LETBIND_EXPR.obj_num = 2;
- cdat->dobj_831__LETBIND_EXPR.obj_hash = 886315870;
+ cdat->dobj_831__LETBIND_EXPR.obj_hash = 294801941;
cdat->dobj_831__LETBIND_EXPR.obj_len = 4;
@@ -18031,7 +18060,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_835__LETBIND_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_835__LETBIND_LOC.obj_num = 3;
- cdat->dobj_835__LETBIND_LOC.obj_hash = 404380700;
+ cdat->dobj_835__LETBIND_LOC.obj_hash = 236839366;
cdat->dobj_835__LETBIND_LOC.obj_len = 4;
@@ -18088,7 +18117,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_839__CLASS_LETREC_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_839__CLASS_LETREC_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_839__CLASS_LETREC_BINDING.obj_hash = 743903385;
+ cdat->dobj_839__CLASS_LETREC_BINDING.obj_hash = 236836489;
cdat->dobj_839__CLASS_LETREC_BINDING.obj_len = 8;
@@ -18161,7 +18190,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_845__CLASS_NORMAL_LET_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_845__CLASS_NORMAL_LET_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_845__CLASS_NORMAL_LET_BINDING.obj_hash = 1055857425;
+ cdat->dobj_845__CLASS_NORMAL_LET_BINDING.obj_hash = 885637706;
cdat->dobj_845__CLASS_NORMAL_LET_BINDING.obj_len = 8;
@@ -18232,7 +18261,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_851__CLASS_LABEL_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_851__CLASS_LABEL_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_851__CLASS_LABEL_BINDING.obj_hash = 895754993;
+ cdat->dobj_851__CLASS_LABEL_BINDING.obj_hash = 1062451607;
cdat->dobj_851__CLASS_LABEL_BINDING.obj_len = 8;
@@ -18299,7 +18328,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_857__LABIND_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_857__LABIND_LOC.obj_num = 1;
- cdat->dobj_857__LABIND_LOC.obj_hash = 828538409;
+ cdat->dobj_857__LABIND_LOC.obj_hash = 206672384;
cdat->dobj_857__LABIND_LOC.obj_len = 4;
@@ -18354,7 +18383,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_861__LABIND_CLONSY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_861__LABIND_CLONSY.obj_num = 2;
- cdat->dobj_861__LABIND_CLONSY.obj_hash = 542115109;
+ cdat->dobj_861__LABIND_CLONSY.obj_hash = 745442940;
cdat->dobj_861__LABIND_CLONSY.obj_len = 4;
@@ -18408,7 +18437,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_865__LABIND_RES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_865__LABIND_RES.obj_num = 3;
- cdat->dobj_865__LABIND_RES.obj_hash = 643112671;
+ cdat->dobj_865__LABIND_RES.obj_hash = 793701996;
cdat->dobj_865__LABIND_RES.obj_len = 4;
@@ -18473,7 +18502,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_869__CLASS_GCC_PRAGMA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_869__CLASS_GCC_PRAGMA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_869__CLASS_GCC_PRAGMA.obj_hash = 251335864;
+ cdat->dobj_869__CLASS_GCC_PRAGMA.obj_hash = 852526533;
cdat->dobj_869__CLASS_GCC_PRAGMA.obj_len = 8;
@@ -18544,7 +18573,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_875__GCCPRAGMA_HANDLER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_875__GCCPRAGMA_HANDLER.obj_num = 2;
- cdat->dobj_875__GCCPRAGMA_HANDLER.obj_hash = 329188409;
+ cdat->dobj_875__GCCPRAGMA_HANDLER.obj_hash = 183774407;
cdat->dobj_875__GCCPRAGMA_HANDLER.obj_len = 4;
@@ -18603,7 +18632,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_879__GCCPRAGMA_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_879__GCCPRAGMA_DATA.obj_num = 3;
- cdat->dobj_879__GCCPRAGMA_DATA.obj_hash = 805728720;
+ cdat->dobj_879__GCCPRAGMA_DATA.obj_hash = 556645664;
cdat->dobj_879__GCCPRAGMA_DATA.obj_len = 4;
@@ -18671,7 +18700,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_883__CLASS_GCC_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_883__CLASS_GCC_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_883__CLASS_GCC_PASS.obj_hash = 97109190;
+ cdat->dobj_883__CLASS_GCC_PASS.obj_hash = 543484725;
cdat->dobj_883__CLASS_GCC_PASS.obj_len = 8;
@@ -18740,7 +18769,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_889__GCCPASS_GATE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_889__GCCPASS_GATE.obj_num = 2;
- cdat->dobj_889__GCCPASS_GATE.obj_hash = 374983530;
+ cdat->dobj_889__GCCPASS_GATE.obj_hash = 136584274;
cdat->dobj_889__GCCPASS_GATE.obj_len = 4;
@@ -18796,7 +18825,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_893__GCCPASS_EXEC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_893__GCCPASS_EXEC.obj_num = 3;
- cdat->dobj_893__GCCPASS_EXEC.obj_hash = 294506152;
+ cdat->dobj_893__GCCPASS_EXEC.obj_hash = 260249402;
cdat->dobj_893__GCCPASS_EXEC.obj_len = 4;
@@ -18852,7 +18881,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_897__GCCPASS_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_897__GCCPASS_DATA.obj_num = 4;
- cdat->dobj_897__GCCPASS_DATA.obj_hash = 761276875;
+ cdat->dobj_897__GCCPASS_DATA.obj_hash = 1004036868;
cdat->dobj_897__GCCPASS_DATA.obj_len = 4;
@@ -18912,7 +18941,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_901__GCCPASS_PROPERTIES_REQUIRED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_901__GCCPASS_PROPERTIES_REQUIRED.obj_num = 5;
- cdat->dobj_901__GCCPASS_PROPERTIES_REQUIRED.obj_hash = 158548184;
+ cdat->dobj_901__GCCPASS_PROPERTIES_REQUIRED.obj_hash = 292479921;
cdat->dobj_901__GCCPASS_PROPERTIES_REQUIRED.obj_len = 4;
@@ -18973,7 +19002,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_905__GCCPASS_PROPERTIES_PROVIDED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_905__GCCPASS_PROPERTIES_PROVIDED.obj_num = 6;
- cdat->dobj_905__GCCPASS_PROPERTIES_PROVIDED.obj_hash = 120123303;
+ cdat->dobj_905__GCCPASS_PROPERTIES_PROVIDED.obj_hash = 990543767;
cdat->dobj_905__GCCPASS_PROPERTIES_PROVIDED.obj_len = 4;
@@ -19034,7 +19063,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_909__GCCPASS_PROPERTIES_DESTROYED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_909__GCCPASS_PROPERTIES_DESTROYED.obj_num = 7;
- cdat->dobj_909__GCCPASS_PROPERTIES_DESTROYED.obj_hash = 532962326;
+ cdat->dobj_909__GCCPASS_PROPERTIES_DESTROYED.obj_hash = 391916577;
cdat->dobj_909__GCCPASS_PROPERTIES_DESTROYED.obj_len = 4;
@@ -19095,7 +19124,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_913__GCCPASS_TODO_FLAGS_START.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_913__GCCPASS_TODO_FLAGS_START.obj_num = 8;
- cdat->dobj_913__GCCPASS_TODO_FLAGS_START.obj_hash = 56419665;
+ cdat->dobj_913__GCCPASS_TODO_FLAGS_START.obj_hash = 815830114;
cdat->dobj_913__GCCPASS_TODO_FLAGS_START.obj_len = 4;
@@ -19156,7 +19185,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_917__GCCPASS_TODO_FLAGS_FINISH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_917__GCCPASS_TODO_FLAGS_FINISH.obj_num = 9;
- cdat->dobj_917__GCCPASS_TODO_FLAGS_FINISH.obj_hash = 115952245;
+ cdat->dobj_917__GCCPASS_TODO_FLAGS_FINISH.obj_hash = 740964773;
cdat->dobj_917__GCCPASS_TODO_FLAGS_FINISH.obj_len = 4;
@@ -19227,7 +19256,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_921__CLASS_GCC_GIMPLE_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_921__CLASS_GCC_GIMPLE_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_921__CLASS_GCC_GIMPLE_PASS.obj_hash = 1010066617;
+ cdat->dobj_921__CLASS_GCC_GIMPLE_PASS.obj_hash = 573729920;
cdat->dobj_921__CLASS_GCC_GIMPLE_PASS.obj_len = 8;
@@ -19307,7 +19336,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_927__CLASS_GCC_RTL_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_927__CLASS_GCC_RTL_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_927__CLASS_GCC_RTL_PASS.obj_hash = 864839698;
+ cdat->dobj_927__CLASS_GCC_RTL_PASS.obj_hash = 830334452;
cdat->dobj_927__CLASS_GCC_RTL_PASS.obj_len = 8;
@@ -19380,7 +19409,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_933__CLASS_GCC_ANY_IPA_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_933__CLASS_GCC_ANY_IPA_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_933__CLASS_GCC_ANY_IPA_PASS.obj_hash = 541310632;
+ cdat->dobj_933__CLASS_GCC_ANY_IPA_PASS.obj_hash = 805211774;
cdat->dobj_933__CLASS_GCC_ANY_IPA_PASS.obj_len = 8;
@@ -19463,7 +19492,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_939__CLASS_GCC_SIMPLE_IPA_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_939__CLASS_GCC_SIMPLE_IPA_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_939__CLASS_GCC_SIMPLE_IPA_PASS.obj_hash = 174301113;
+ cdat->dobj_939__CLASS_GCC_SIMPLE_IPA_PASS.obj_hash = 755636637;
cdat->dobj_939__CLASS_GCC_SIMPLE_IPA_PASS.obj_len = 8;
@@ -19546,7 +19575,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_945__CLASS_GCC_TRANSFORM_IPA_PASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_945__CLASS_GCC_TRANSFORM_IPA_PASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_945__CLASS_GCC_TRANSFORM_IPA_PASS.obj_hash = 570714405;
+ cdat->dobj_945__CLASS_GCC_TRANSFORM_IPA_PASS.obj_hash = 310232635;
cdat->dobj_945__CLASS_GCC_TRANSFORM_IPA_PASS.obj_len = 8;
@@ -19619,7 +19648,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_951__GCCTRIPAPASS_STMT_FIXUP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_951__GCCTRIPAPASS_STMT_FIXUP.obj_num = 10;
- cdat->dobj_951__GCCTRIPAPASS_STMT_FIXUP.obj_hash = 812827560;
+ cdat->dobj_951__GCCTRIPAPASS_STMT_FIXUP.obj_hash = 145646417;
cdat->dobj_951__GCCTRIPAPASS_STMT_FIXUP.obj_len = 4;
@@ -19680,7 +19709,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_955__GCCTRIPAPASS_FUNCTION_TRANSFORM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_955__GCCTRIPAPASS_FUNCTION_TRANSFORM.obj_num = 11;
- cdat->dobj_955__GCCTRIPAPASS_FUNCTION_TRANSFORM.obj_hash = 882483708;
+ cdat->dobj_955__GCCTRIPAPASS_FUNCTION_TRANSFORM.obj_hash = 894732339;
cdat->dobj_955__GCCTRIPAPASS_FUNCTION_TRANSFORM.obj_len = 4;
@@ -19741,7 +19770,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_959__GCCTRIPAPASS_VARIABLE_TRANSFORM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_959__GCCTRIPAPASS_VARIABLE_TRANSFORM.obj_num = 12;
- cdat->dobj_959__GCCTRIPAPASS_VARIABLE_TRANSFORM.obj_hash = 830469218;
+ cdat->dobj_959__GCCTRIPAPASS_VARIABLE_TRANSFORM.obj_hash = 997494285;
cdat->dobj_959__GCCTRIPAPASS_VARIABLE_TRANSFORM.obj_len = 4;
@@ -19809,7 +19838,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_963__CLASS_MELT_MODE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_963__CLASS_MELT_MODE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_963__CLASS_MELT_MODE.obj_hash = 135312857;
+ cdat->dobj_963__CLASS_MELT_MODE.obj_hash = 652470832;
cdat->dobj_963__CLASS_MELT_MODE.obj_len = 8;
@@ -19879,7 +19908,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_969__MELTMODE_HELP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_969__MELTMODE_HELP.obj_num = 2;
- cdat->dobj_969__MELTMODE_HELP.obj_hash = 624571308;
+ cdat->dobj_969__MELTMODE_HELP.obj_hash = 445129685;
cdat->dobj_969__MELTMODE_HELP.obj_len = 4;
@@ -19935,7 +19964,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_973__MELTMODE_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_973__MELTMODE_FUN.obj_num = 3;
- cdat->dobj_973__MELTMODE_FUN.obj_hash = 799907141;
+ cdat->dobj_973__MELTMODE_FUN.obj_hash = 624895360;
cdat->dobj_973__MELTMODE_FUN.obj_len = 4;
@@ -19992,7 +20021,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_977__MELTMODE_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_977__MELTMODE_DATA.obj_num = 4;
- cdat->dobj_977__MELTMODE_DATA.obj_hash = 808194052;
+ cdat->dobj_977__MELTMODE_DATA.obj_hash = 247822337;
cdat->dobj_977__MELTMODE_DATA.obj_len = 4;
@@ -20048,7 +20077,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_981__CLASS_SOURCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_981__CLASS_SOURCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_981__CLASS_SOURCE.obj_hash = 758439330;
+ cdat->dobj_981__CLASS_SOURCE.obj_hash = 346878648;
cdat->dobj_981__CLASS_SOURCE.obj_len = 8;
@@ -20116,7 +20145,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_987__CLASS_MODULE_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_987__CLASS_MODULE_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_987__CLASS_MODULE_CONTEXT.obj_hash = 554841445;
+ cdat->dobj_987__CLASS_MODULE_CONTEXT.obj_hash = 496740672;
cdat->dobj_987__CLASS_MODULE_CONTEXT.obj_len = 8;
@@ -20187,7 +20216,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_993__MOCX_MODULENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_993__MOCX_MODULENAME.obj_num = 0;
- cdat->dobj_993__MOCX_MODULENAME.obj_hash = 199431987;
+ cdat->dobj_993__MOCX_MODULENAME.obj_hash = 147640884;
cdat->dobj_993__MOCX_MODULENAME.obj_len = 4;
@@ -20246,7 +20275,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_997__MOCX_EXPFIELDICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_997__MOCX_EXPFIELDICT.obj_num = 1;
- cdat->dobj_997__MOCX_EXPFIELDICT.obj_hash = 695695463;
+ cdat->dobj_997__MOCX_EXPFIELDICT.obj_hash = 37090428;
cdat->dobj_997__MOCX_EXPFIELDICT.obj_len = 4;
@@ -20305,7 +20334,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1001__MOCX_EXPCLASSDICT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1001__MOCX_EXPCLASSDICT.obj_num = 2;
- cdat->dobj_1001__MOCX_EXPCLASSDICT.obj_hash = 978700721;
+ cdat->dobj_1001__MOCX_EXPCLASSDICT.obj_hash = 836530562;
cdat->dobj_1001__MOCX_EXPCLASSDICT.obj_len = 4;
@@ -20364,7 +20393,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1005__MOCX_INITIALENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1005__MOCX_INITIALENV.obj_num = 3;
- cdat->dobj_1005__MOCX_INITIALENV.obj_hash = 435980398;
+ cdat->dobj_1005__MOCX_INITIALENV.obj_hash = 608009893;
cdat->dobj_1005__MOCX_INITIALENV.obj_len = 4;
@@ -20423,7 +20452,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1009__MOCX_FUNCOUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1009__MOCX_FUNCOUNT.obj_num = 4;
- cdat->dobj_1009__MOCX_FUNCOUNT.obj_hash = 29297527;
+ cdat->dobj_1009__MOCX_FUNCOUNT.obj_hash = 533561749;
cdat->dobj_1009__MOCX_FUNCOUNT.obj_len = 4;
@@ -20482,7 +20511,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1013__MOCX_FILETUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1013__MOCX_FILETUPLE.obj_num = 5;
- cdat->dobj_1013__MOCX_FILETUPLE.obj_hash = 316889498;
+ cdat->dobj_1013__MOCX_FILETUPLE.obj_hash = 960936341;
cdat->dobj_1013__MOCX_FILETUPLE.obj_len = 4;
@@ -20541,7 +20570,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1017__MOCX_CFLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1017__MOCX_CFLAGS.obj_num = 6;
- cdat->dobj_1017__MOCX_CFLAGS.obj_hash = 847120419;
+ cdat->dobj_1017__MOCX_CFLAGS.obj_hash = 938407756;
cdat->dobj_1017__MOCX_CFLAGS.obj_len = 4;
@@ -20600,7 +20629,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1021__MOCX_LINKFLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1021__MOCX_LINKFLAGS.obj_num = 7;
- cdat->dobj_1021__MOCX_LINKFLAGS.obj_hash = 364886491;
+ cdat->dobj_1021__MOCX_LINKFLAGS.obj_hash = 439649449;
cdat->dobj_1021__MOCX_LINKFLAGS.obj_len = 4;
@@ -20661,7 +20690,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1025__CLASS_NORMALIZATION_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_1025__CLASS_NORMALIZATION_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1025__CLASS_NORMALIZATION_CONTEXT.obj_hash = 148756161;
+ cdat->dobj_1025__CLASS_NORMALIZATION_CONTEXT.obj_hash = 448129967;
cdat->dobj_1025__CLASS_NORMALIZATION_CONTEXT.obj_len = 8;
@@ -20732,7 +20761,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1031__NCTX_INITPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1031__NCTX_INITPROC.obj_num = 0;
- cdat->dobj_1031__NCTX_INITPROC.obj_hash = 885153118;
+ cdat->dobj_1031__NCTX_INITPROC.obj_hash = 123001901;
cdat->dobj_1031__NCTX_INITPROC.obj_len = 4;
@@ -20791,7 +20820,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1035__NCTX_PROCLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1035__NCTX_PROCLIST.obj_num = 1;
- cdat->dobj_1035__NCTX_PROCLIST.obj_hash = 64562807;
+ cdat->dobj_1035__NCTX_PROCLIST.obj_hash = 1013508873;
cdat->dobj_1035__NCTX_PROCLIST.obj_len = 4;
@@ -20850,7 +20879,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1039__NCTX_DATALIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1039__NCTX_DATALIST.obj_num = 2;
- cdat->dobj_1039__NCTX_DATALIST.obj_hash = 238206853;
+ cdat->dobj_1039__NCTX_DATALIST.obj_hash = 86193703;
cdat->dobj_1039__NCTX_DATALIST.obj_len = 4;
@@ -20909,7 +20938,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1043__NCTX_VALUELIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1043__NCTX_VALUELIST.obj_num = 3;
- cdat->dobj_1043__NCTX_VALUELIST.obj_hash = 63548191;
+ cdat->dobj_1043__NCTX_VALUELIST.obj_hash = 859102798;
cdat->dobj_1043__NCTX_VALUELIST.obj_len = 4;
@@ -20968,7 +20997,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1047__NCTX_SYMBMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1047__NCTX_SYMBMAP.obj_num = 4;
- cdat->dobj_1047__NCTX_SYMBMAP.obj_hash = 647040802;
+ cdat->dobj_1047__NCTX_SYMBMAP.obj_hash = 201446081;
cdat->dobj_1047__NCTX_SYMBMAP.obj_len = 4;
@@ -21027,7 +21056,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1051__NCTX_KEYWMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1051__NCTX_KEYWMAP.obj_num = 5;
- cdat->dobj_1051__NCTX_KEYWMAP.obj_hash = 271406599;
+ cdat->dobj_1051__NCTX_KEYWMAP.obj_hash = 240670072;
cdat->dobj_1051__NCTX_KEYWMAP.obj_len = 4;
@@ -21086,7 +21115,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1055__NCTX_SYMBCACHEMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1055__NCTX_SYMBCACHEMAP.obj_num = 6;
- cdat->dobj_1055__NCTX_SYMBCACHEMAP.obj_hash = 223479271;
+ cdat->dobj_1055__NCTX_SYMBCACHEMAP.obj_hash = 981357701;
cdat->dobj_1055__NCTX_SYMBCACHEMAP.obj_len = 4;
@@ -21145,7 +21174,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1059__NCTX_PREDEFMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1059__NCTX_PREDEFMAP.obj_num = 7;
- cdat->dobj_1059__NCTX_PREDEFMAP.obj_hash = 753594400;
+ cdat->dobj_1059__NCTX_PREDEFMAP.obj_hash = 905386333;
cdat->dobj_1059__NCTX_PREDEFMAP.obj_len = 4;
@@ -21204,7 +21233,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1063__NCTX_VALMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1063__NCTX_VALMAP.obj_num = 8;
- cdat->dobj_1063__NCTX_VALMAP.obj_hash = 261307976;
+ cdat->dobj_1063__NCTX_VALMAP.obj_hash = 552542177;
cdat->dobj_1063__NCTX_VALMAP.obj_len = 4;
@@ -21263,7 +21292,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1067__NCTX_VALBINDMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1067__NCTX_VALBINDMAP.obj_num = 9;
- cdat->dobj_1067__NCTX_VALBINDMAP.obj_hash = 1066478506;
+ cdat->dobj_1067__NCTX_VALBINDMAP.obj_hash = 629894410;
cdat->dobj_1067__NCTX_VALBINDMAP.obj_len = 4;
@@ -21322,7 +21351,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1071__NCTX_CURPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1071__NCTX_CURPROC.obj_num = 10;
- cdat->dobj_1071__NCTX_CURPROC.obj_hash = 493491771;
+ cdat->dobj_1071__NCTX_CURPROC.obj_hash = 322240604;
cdat->dobj_1071__NCTX_CURPROC.obj_len = 4;
@@ -21381,7 +21410,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1075__NCTX_MODULCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1075__NCTX_MODULCONTEXT.obj_num = 11;
- cdat->dobj_1075__NCTX_MODULCONTEXT.obj_hash = 1062004350;
+ cdat->dobj_1075__NCTX_MODULCONTEXT.obj_hash = 528925513;
cdat->dobj_1075__NCTX_MODULCONTEXT.obj_len = 4;
@@ -21442,7 +21471,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1079__NCTX_QDATCURMODENVBOX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1079__NCTX_QDATCURMODENVBOX.obj_num = 12;
- cdat->dobj_1079__NCTX_QDATCURMODENVBOX.obj_hash = 943440782;
+ cdat->dobj_1079__NCTX_QDATCURMODENVBOX.obj_hash = 360492771;
cdat->dobj_1079__NCTX_QDATCURMODENVBOX.obj_len = 4;
@@ -21501,7 +21530,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1083__NCTX_QDATPARMODENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1083__NCTX_QDATPARMODENV.obj_num = 13;
- cdat->dobj_1083__NCTX_QDATPARMODENV.obj_hash = 294979320;
+ cdat->dobj_1083__NCTX_QDATPARMODENV.obj_hash = 514918979;
cdat->dobj_1083__NCTX_QDATPARMODENV.obj_len = 4;
@@ -21562,7 +21591,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1087__NCTX_PROCURMODENVLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1087__NCTX_PROCURMODENVLIST.obj_num = 14;
- cdat->dobj_1087__NCTX_PROCURMODENVLIST.obj_hash = 194778084;
+ cdat->dobj_1087__NCTX_PROCURMODENVLIST.obj_hash = 436808514;
cdat->dobj_1087__NCTX_PROCURMODENVLIST.obj_len = 4;
@@ -21623,7 +21652,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1091__CLASS_C_GENERATION_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_1091__CLASS_C_GENERATION_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1091__CLASS_C_GENERATION_CONTEXT.obj_hash = 140889918;
+ cdat->dobj_1091__CLASS_C_GENERATION_CONTEXT.obj_hash = 843969101;
cdat->dobj_1091__CLASS_C_GENERATION_CONTEXT.obj_len = 8;
@@ -21694,7 +21723,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1097__GNCX_OBJROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1097__GNCX_OBJROUT.obj_num = 0;
- cdat->dobj_1097__GNCX_OBJROUT.obj_hash = 275577518;
+ cdat->dobj_1097__GNCX_OBJROUT.obj_hash = 1045796018;
cdat->dobj_1097__GNCX_OBJROUT.obj_len = 4;
@@ -21753,7 +21782,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1101__GNCX_LOCMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1101__GNCX_LOCMAP.obj_num = 1;
- cdat->dobj_1101__GNCX_LOCMAP.obj_hash = 104897670;
+ cdat->dobj_1101__GNCX_LOCMAP.obj_hash = 156789889;
cdat->dobj_1101__GNCX_LOCMAP.obj_len = 4;
@@ -21812,7 +21841,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1105__GNCX_FREEPTRLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1105__GNCX_FREEPTRLIST.obj_num = 2;
- cdat->dobj_1105__GNCX_FREEPTRLIST.obj_hash = 94862719;
+ cdat->dobj_1105__GNCX_FREEPTRLIST.obj_hash = 710695472;
cdat->dobj_1105__GNCX_FREEPTRLIST.obj_len = 4;
@@ -21871,7 +21900,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1109__GNCX_FREELONGLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1109__GNCX_FREELONGLIST.obj_num = 3;
- cdat->dobj_1109__GNCX_FREELONGLIST.obj_hash = 574493546;
+ cdat->dobj_1109__GNCX_FREELONGLIST.obj_hash = 492081593;
cdat->dobj_1109__GNCX_FREELONGLIST.obj_len = 4;
@@ -21930,7 +21959,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1113__GNCX_FREEOTHERMAPS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1113__GNCX_FREEOTHERMAPS.obj_num = 4;
- cdat->dobj_1113__GNCX_FREEOTHERMAPS.obj_hash = 561819130;
+ cdat->dobj_1113__GNCX_FREEOTHERMAPS.obj_hash = 688163332;
cdat->dobj_1113__GNCX_FREEOTHERMAPS.obj_len = 4;
@@ -21989,7 +22018,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1117__GNCX_RETLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1117__GNCX_RETLOC.obj_num = 5;
- cdat->dobj_1117__GNCX_RETLOC.obj_hash = 334324830;
+ cdat->dobj_1117__GNCX_RETLOC.obj_hash = 902047019;
cdat->dobj_1117__GNCX_RETLOC.obj_len = 4;
@@ -22048,7 +22077,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1121__GNCX_COMPICACHE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1121__GNCX_COMPICACHE.obj_num = 6;
- cdat->dobj_1121__GNCX_COMPICACHE.obj_hash = 858831436;
+ cdat->dobj_1121__GNCX_COMPICACHE.obj_hash = 332203691;
cdat->dobj_1121__GNCX_COMPICACHE.obj_len = 4;
@@ -22107,7 +22136,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1125__GNCX_MODULCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1125__GNCX_MODULCONTEXT.obj_num = 7;
- cdat->dobj_1125__GNCX_MODULCONTEXT.obj_hash = 807790398;
+ cdat->dobj_1125__GNCX_MODULCONTEXT.obj_hash = 621198880;
cdat->dobj_1125__GNCX_MODULCONTEXT.obj_len = 4;
@@ -22166,7 +22195,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1129__GNCX_MATCHMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1129__GNCX_MATCHMAP.obj_num = 8;
- cdat->dobj_1129__GNCX_MATCHMAP.obj_hash = 464915348;
+ cdat->dobj_1129__GNCX_MATCHMAP.obj_hash = 538281924;
cdat->dobj_1129__GNCX_MATCHMAP.obj_len = 4;
@@ -22225,7 +22254,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1133__GNCX_ALTMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1133__GNCX_ALTMATCH.obj_num = 9;
- cdat->dobj_1133__GNCX_ALTMATCH.obj_hash = 284079538;
+ cdat->dobj_1133__GNCX_ALTMATCH.obj_hash = 688033715;
cdat->dobj_1133__GNCX_ALTMATCH.obj_len = 4;
@@ -22288,7 +22317,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_1137__CLASS_INITIAL_GENERATION_CONTEXT.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_1137__CLASS_INITIAL_GENERATION_CONTEXT.obj_hash = 166054228;
+ cdat->dobj_1137__CLASS_INITIAL_GENERATION_CONTEXT.obj_hash = 84036012;
cdat->dobj_1137__CLASS_INITIAL_GENERATION_CONTEXT.obj_len = 8;
@@ -22359,7 +22388,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1143__IGNCX_PREVENVLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1143__IGNCX_PREVENVLOC.obj_num = 10;
- cdat->dobj_1143__IGNCX_PREVENVLOC.obj_hash = 40874536;
+ cdat->dobj_1143__IGNCX_PREVENVLOC.obj_hash = 422649495;
cdat->dobj_1143__IGNCX_PREVENVLOC.obj_len = 4;
@@ -22418,7 +22447,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1147__IGNCX_CONTENVLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1147__IGNCX_CONTENVLOC.obj_num = 11;
- cdat->dobj_1147__IGNCX_CONTENVLOC.obj_hash = 476849586;
+ cdat->dobj_1147__IGNCX_CONTENVLOC.obj_hash = 1001800206;
cdat->dobj_1147__IGNCX_CONTENVLOC.obj_len = 4;
@@ -22479,7 +22508,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1151__IGNCX_PROCURMODENVLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1151__IGNCX_PROCURMODENVLIST.obj_num = 12;
- cdat->dobj_1151__IGNCX_PROCURMODENVLIST.obj_hash = 579364838;
+ cdat->dobj_1151__IGNCX_PROCURMODENVLIST.obj_hash = 1016518845;
cdat->dobj_1151__IGNCX_PROCURMODENVLIST.obj_len = 4;
@@ -22538,7 +22567,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1155__IGNCX_IMPORTMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1155__IGNCX_IMPORTMAP.obj_num = 13;
- cdat->dobj_1155__IGNCX_IMPORTMAP.obj_hash = 935044117;
+ cdat->dobj_1155__IGNCX_IMPORTMAP.obj_hash = 187666281;
cdat->dobj_1155__IGNCX_IMPORTMAP.obj_len = 4;
@@ -22599,7 +22628,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1159__CLASS_GENERATED_C_CODE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_1159__CLASS_GENERATED_C_CODE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1159__CLASS_GENERATED_C_CODE.obj_hash = 236040883;
+ cdat->dobj_1159__CLASS_GENERATED_C_CODE.obj_hash = 529016248;
cdat->dobj_1159__CLASS_GENERATED_C_CODE.obj_len = 8;
@@ -22670,7 +22699,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1165__STRINGCONST2VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1165__STRINGCONST2VAL.obj_hash = 1012343488;
+ cdat->dobj_1165__STRINGCONST2VAL.obj_hash = 758977022;
cdat->dobj_1165__STRINGCONST2VAL.obj_len = 5;
/*inimult dtup_1166__STRINGCONST2VAL */
@@ -22729,7 +22758,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1170.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1170.obj_num = 0;
- cdat->dobj_1170.obj_hash = 602889502;
+ cdat->dobj_1170.obj_hash = 371643002;
cdat->dobj_1170.obj_len = 2;
@@ -22776,7 +22805,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1173.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1173.obj_num = 1;
- cdat->dobj_1173.obj_hash = 873715652;
+ cdat->dobj_1173.obj_hash = 1054946281;
cdat->dobj_1173.obj_len = 2;
@@ -22855,7 +22884,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1180__IS_A.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1180__IS_A.obj_hash = 130519565;
+ cdat->dobj_1180__IS_A.obj_hash = 684415034;
cdat->dobj_1180__IS_A.obj_len = 5;
/*inimult dtup_1181__IS_A */
@@ -22912,7 +22941,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1185.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1185.obj_num = 0;
- cdat->dobj_1185.obj_hash = 128880265;
+ cdat->dobj_1185.obj_hash = 510082348;
cdat->dobj_1185.obj_len = 2;
@@ -22959,7 +22988,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1188.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1188.obj_num = 1;
- cdat->dobj_1188.obj_hash = 889148661;
+ cdat->dobj_1188.obj_hash = 902046193;
cdat->dobj_1188.obj_len = 2;
@@ -23038,7 +23067,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1195__IS_NOT_A.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1195__IS_NOT_A.obj_hash = 971289276;
+ cdat->dobj_1195__IS_NOT_A.obj_hash = 231658130;
cdat->dobj_1195__IS_NOT_A.obj_len = 5;
/*inimult dtup_1196__IS_NOT_A */
@@ -23069,7 +23098,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1198.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1198.obj_num = 0;
- cdat->dobj_1198.obj_hash = 460969902;
+ cdat->dobj_1198.obj_hash = 370921080;
cdat->dobj_1198.obj_len = 2;
/*^iniobj */
@@ -23090,7 +23119,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1199.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1199.obj_num = 1;
- cdat->dobj_1199.obj_hash = 623095342;
+ cdat->dobj_1199.obj_hash = 394625245;
cdat->dobj_1199.obj_len = 2;
@@ -23169,7 +23198,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1206__IS_OBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1206__IS_OBJECT.obj_hash = 518219016;
+ cdat->dobj_1206__IS_OBJECT.obj_hash = 809050772;
cdat->dobj_1206__IS_OBJECT.obj_len = 5;
/*inimult dtup_1207__IS_OBJECT */
@@ -23200,7 +23229,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1209.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1209.obj_num = 0;
- cdat->dobj_1209.obj_hash = 179538103;
+ cdat->dobj_1209.obj_hash = 357769641;
cdat->dobj_1209.obj_len = 2;
@@ -23270,7 +23299,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1215__DISCRIM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1215__DISCRIM.obj_hash = 610599670;
+ cdat->dobj_1215__DISCRIM.obj_hash = 626284509;
cdat->dobj_1215__DISCRIM.obj_len = 5;
/*inimult dtup_1216__DISCRIM */
@@ -23327,7 +23356,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1220.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1220.obj_num = 0;
- cdat->dobj_1220.obj_hash = 824388136;
+ cdat->dobj_1220.obj_hash = 946198856;
cdat->dobj_1220.obj_len = 2;
@@ -23396,7 +23425,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1226__GET_INT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1226__GET_INT.obj_hash = 741790050;
+ cdat->dobj_1226__GET_INT.obj_hash = 395926218;
cdat->dobj_1226__GET_INT.obj_len = 5;
/*inimult dtup_1227__GET_INT */
@@ -23427,7 +23456,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1229.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1229.obj_num = 0;
- cdat->dobj_1229.obj_hash = 438256837;
+ cdat->dobj_1229.obj_hash = 914609022;
cdat->dobj_1229.obj_len = 2;
@@ -23496,7 +23525,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1235__PUT_INT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1235__PUT_INT.obj_hash = 459922921;
+ cdat->dobj_1235__PUT_INT.obj_hash = 474625087;
cdat->dobj_1235__PUT_INT.obj_len = 5;
/*inimult dtup_1236__PUT_INT */
@@ -23527,7 +23556,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1238.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1238.obj_num = 0;
- cdat->dobj_1238.obj_hash = 520820692;
+ cdat->dobj_1238.obj_hash = 1628395;
cdat->dobj_1238.obj_len = 2;
@@ -23574,7 +23603,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1241.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1241.obj_num = 1;
- cdat->dobj_1241.obj_hash = 1004616275;
+ cdat->dobj_1241.obj_hash = 270827741;
cdat->dobj_1241.obj_len = 2;
@@ -23650,7 +23679,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1248__.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1248__.obj_hash = 343376887;
+ cdat->dobj_1248__.obj_hash = 334822526;
cdat->dobj_1248__.obj_len = 5;
/*inimult dtup_1249__ */
@@ -23707,7 +23736,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1253.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1253.obj_num = 0;
- cdat->dobj_1253.obj_hash = 753829173;
+ cdat->dobj_1253.obj_hash = 680549844;
cdat->dobj_1253.obj_len = 2;
@@ -23754,7 +23783,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1256.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1256.obj_num = 1;
- cdat->dobj_1256.obj_hash = 8713164;
+ cdat->dobj_1256.obj_hash = 192294500;
cdat->dobj_1256.obj_len = 2;
@@ -23827,7 +23856,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1263__.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1263__.obj_hash = 957487013;
+ cdat->dobj_1263__.obj_hash = 726824572;
cdat->dobj_1263__.obj_len = 5;
/*inimult dtup_1264__ */
@@ -23858,7 +23887,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1266.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1266.obj_num = 0;
- cdat->dobj_1266.obj_hash = 70165565;
+ cdat->dobj_1266.obj_hash = 582226667;
cdat->dobj_1266.obj_len = 2;
/*^iniobj */
@@ -23879,7 +23908,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1267.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1267.obj_num = 1;
- cdat->dobj_1267.obj_hash = 244252657;
+ cdat->dobj_1267.obj_hash = 401623697;
cdat->dobj_1267.obj_len = 2;
@@ -23956,7 +23985,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1274__THE_MELTCALLCOUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1274__THE_MELTCALLCOUNT.obj_hash = 240630990;
+ cdat->dobj_1274__THE_MELTCALLCOUNT.obj_hash = 910160745;
cdat->dobj_1274__THE_MELTCALLCOUNT.obj_len = 5;
/*inimult dtup_1275__THE_MELTCALLCOUNT */
@@ -24037,7 +24066,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1281__THE_CALLCOUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1281__THE_CALLCOUNT.obj_hash = 248748164;
+ cdat->dobj_1281__THE_CALLCOUNT.obj_hash = 208802183;
cdat->dobj_1281__THE_CALLCOUNT.obj_len = 5;
/*inimult dtup_1282__THE_CALLCOUNT */
@@ -24118,7 +24147,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1288__THE_FRAMEDEPTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1288__THE_FRAMEDEPTH.obj_hash = 493302656;
+ cdat->dobj_1288__THE_FRAMEDEPTH.obj_hash = 795843548;
cdat->dobj_1288__THE_FRAMEDEPTH.obj_len = 5;
/*inimult dtup_1289__THE_FRAMEDEPTH */
@@ -24199,7 +24228,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1295__GET_SYMBOLSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1295__GET_SYMBOLSTR.obj_hash = 388559920;
+ cdat->dobj_1295__GET_SYMBOLSTR.obj_hash = 581400181;
cdat->dobj_1295__GET_SYMBOLSTR.obj_len = 5;
/*inimult dtup_1296__GET_SYMBOLSTR */
@@ -24258,7 +24287,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1300.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1300.obj_num = 0;
- cdat->dobj_1300.obj_hash = 496475704;
+ cdat->dobj_1300.obj_hash = 974094675;
cdat->dobj_1300.obj_len = 2;
@@ -24335,7 +24364,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1306__CREATE_SYMBOLSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1306__CREATE_SYMBOLSTR.obj_hash = 809516552;
+ cdat->dobj_1306__CREATE_SYMBOLSTR.obj_hash = 812390773;
cdat->dobj_1306__CREATE_SYMBOLSTR.obj_len = 5;
/*inimult dtup_1307__CREATE_SYMBOLSTR */
@@ -24368,7 +24397,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1309.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1309.obj_num = 0;
- cdat->dobj_1309.obj_hash = 584614212;
+ cdat->dobj_1309.obj_hash = 168530203;
cdat->dobj_1309.obj_len = 2;
@@ -24447,7 +24476,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1315__GET_RAW_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1315__GET_RAW_SYMBOL.obj_hash = 360225329;
+ cdat->dobj_1315__GET_RAW_SYMBOL.obj_hash = 786834994;
cdat->dobj_1315__GET_RAW_SYMBOL.obj_len = 5;
/*inimult dtup_1316__GET_RAW_SYMBOL */
@@ -24506,7 +24535,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1320.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1320.obj_num = 0;
- cdat->dobj_1320.obj_hash = 911869857;
+ cdat->dobj_1320.obj_hash = 580835545;
cdat->dobj_1320.obj_len = 2;
@@ -24582,7 +24611,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1326__GET_KEYWORDSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1326__GET_KEYWORDSTR.obj_hash = 455407715;
+ cdat->dobj_1326__GET_KEYWORDSTR.obj_hash = 657830681;
cdat->dobj_1326__GET_KEYWORDSTR.obj_len = 5;
/*inimult dtup_1327__GET_KEYWORDSTR */
@@ -24615,7 +24644,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1329.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1329.obj_num = 0;
- cdat->dobj_1329.obj_hash = 246156765;
+ cdat->dobj_1329.obj_hash = 245647654;
cdat->dobj_1329.obj_len = 2;
@@ -24692,7 +24721,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1335__CREATE_KEYWORDSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1335__CREATE_KEYWORDSTR.obj_hash = 520849176;
+ cdat->dobj_1335__CREATE_KEYWORDSTR.obj_hash = 486954514;
cdat->dobj_1335__CREATE_KEYWORDSTR.obj_len = 5;
/*inimult dtup_1336__CREATE_KEYWORDSTR */
@@ -24725,7 +24754,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1338.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1338.obj_num = 0;
- cdat->dobj_1338.obj_hash = 439056104;
+ cdat->dobj_1338.obj_hash = 355447826;
cdat->dobj_1338.obj_len = 2;
@@ -24804,7 +24833,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1344__ASSERT_FAILED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1344__ASSERT_FAILED.obj_hash = 65026042;
+ cdat->dobj_1344__ASSERT_FAILED.obj_hash = 52899021;
cdat->dobj_1344__ASSERT_FAILED.obj_len = 5;
/*inimult dtup_1345__ASSERT_FAILED */
@@ -24863,7 +24892,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1349.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1349.obj_num = 0;
- cdat->dobj_1349.obj_hash = 724744730;
+ cdat->dobj_1349.obj_hash = 648884887;
cdat->dobj_1349.obj_len = 2;
@@ -24910,7 +24939,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1352.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1352.obj_num = 1;
- cdat->dobj_1352.obj_hash = 733946822;
+ cdat->dobj_1352.obj_hash = 375490632;
cdat->dobj_1352.obj_len = 2;
@@ -24957,7 +24986,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1355.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1355.obj_num = 2;
- cdat->dobj_1355.obj_hash = 775271015;
+ cdat->dobj_1355.obj_hash = 759138798;
cdat->dobj_1355.obj_len = 2;
@@ -25059,7 +25088,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1365__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1365__I.obj_hash = 297717996;
+ cdat->dobj_1365__I.obj_hash = 886494694;
cdat->dobj_1365__I.obj_len = 5;
/*inimult dtup_1366__I */
@@ -25090,7 +25119,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1368.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1368.obj_num = 0;
- cdat->dobj_1368.obj_hash = 811415483;
+ cdat->dobj_1368.obj_hash = 438394240;
cdat->dobj_1368.obj_len = 2;
/*^iniobj */
@@ -25111,7 +25140,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1369.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1369.obj_num = 1;
- cdat->dobj_1369.obj_hash = 752003171;
+ cdat->dobj_1369.obj_hash = 251460175;
cdat->dobj_1369.obj_len = 2;
@@ -25184,7 +25213,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1376__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1376__I.obj_hash = 591295525;
+ cdat->dobj_1376__I.obj_hash = 396421000;
cdat->dobj_1376__I.obj_len = 5;
/*inimult dtup_1377__I */
@@ -25215,7 +25244,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1379.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1379.obj_num = 0;
- cdat->dobj_1379.obj_hash = 825889019;
+ cdat->dobj_1379.obj_hash = 957877994;
cdat->dobj_1379.obj_len = 2;
/*^iniobj */
@@ -25236,7 +25265,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1380.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1380.obj_num = 1;
- cdat->dobj_1380.obj_hash = 236832236;
+ cdat->dobj_1380.obj_hash = 123683934;
cdat->dobj_1380.obj_len = 2;
@@ -25309,7 +25338,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1387__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1387__I.obj_hash = 461788742;
+ cdat->dobj_1387__I.obj_hash = 625806182;
cdat->dobj_1387__I.obj_len = 5;
/*inimult dtup_1388__I */
@@ -25340,7 +25369,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1390.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1390.obj_num = 0;
- cdat->dobj_1390.obj_hash = 1039538968;
+ cdat->dobj_1390.obj_hash = 903580609;
cdat->dobj_1390.obj_len = 2;
/*^iniobj */
@@ -25361,7 +25390,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1391.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1391.obj_num = 1;
- cdat->dobj_1391.obj_hash = 979542179;
+ cdat->dobj_1391.obj_hash = 995414058;
cdat->dobj_1391.obj_len = 2;
@@ -25434,7 +25463,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1398__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1398__I.obj_hash = 551303562;
+ cdat->dobj_1398__I.obj_hash = 1041542557;
cdat->dobj_1398__I.obj_len = 5;
/*inimult dtup_1399__I */
@@ -25465,7 +25494,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1401.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1401.obj_num = 0;
- cdat->dobj_1401.obj_hash = 58839419;
+ cdat->dobj_1401.obj_hash = 44058797;
cdat->dobj_1401.obj_len = 2;
/*^iniobj */
@@ -25486,7 +25515,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1402.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1402.obj_num = 1;
- cdat->dobj_1402.obj_hash = 150299239;
+ cdat->dobj_1402.obj_hash = 623624651;
cdat->dobj_1402.obj_len = 2;
@@ -25559,7 +25588,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1409__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1409__I.obj_hash = 793588743;
+ cdat->dobj_1409__I.obj_hash = 529245946;
cdat->dobj_1409__I.obj_len = 5;
/*inimult dtup_1410__I */
@@ -25590,7 +25619,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1412.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1412.obj_num = 0;
- cdat->dobj_1412.obj_hash = 767650744;
+ cdat->dobj_1412.obj_hash = 329625896;
cdat->dobj_1412.obj_len = 2;
/*^iniobj */
@@ -25611,7 +25640,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1413.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1413.obj_num = 1;
- cdat->dobj_1413.obj_hash = 304656662;
+ cdat->dobj_1413.obj_hash = 968854678;
cdat->dobj_1413.obj_len = 2;
@@ -25685,7 +25714,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1420__I.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1420__I.obj_hash = 502689528;
+ cdat->dobj_1420__I.obj_hash = 150639049;
cdat->dobj_1420__I.obj_len = 5;
/*inimult dtup_1421__I */
@@ -25716,7 +25745,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1423.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1423.obj_num = 0;
- cdat->dobj_1423.obj_hash = 561626100;
+ cdat->dobj_1423.obj_hash = 461457795;
cdat->dobj_1423.obj_len = 2;
/*^iniobj */
@@ -25737,7 +25766,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1424.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1424.obj_num = 1;
- cdat->dobj_1424.obj_hash = 414536909;
+ cdat->dobj_1424.obj_hash = 773746561;
cdat->dobj_1424.obj_len = 2;
@@ -25811,7 +25840,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1431__IRAW.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1431__IRAW.obj_hash = 926582942;
+ cdat->dobj_1431__IRAW.obj_hash = 873864383;
cdat->dobj_1431__IRAW.obj_len = 5;
/*inimult dtup_1432__IRAW */
@@ -25842,7 +25871,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1434.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1434.obj_num = 0;
- cdat->dobj_1434.obj_hash = 93788765;
+ cdat->dobj_1434.obj_hash = 302786443;
cdat->dobj_1434.obj_len = 2;
/*^iniobj */
@@ -25863,7 +25892,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1435.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1435.obj_num = 1;
- cdat->dobj_1435.obj_hash = 75210055;
+ cdat->dobj_1435.obj_hash = 865866278;
cdat->dobj_1435.obj_len = 2;
@@ -25936,7 +25965,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1442__IRAW.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1442__IRAW.obj_hash = 91061964;
+ cdat->dobj_1442__IRAW.obj_hash = 376326670;
cdat->dobj_1442__IRAW.obj_len = 5;
/*inimult dtup_1443__IRAW */
@@ -25967,7 +25996,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1445.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1445.obj_num = 0;
- cdat->dobj_1445.obj_hash = 931257291;
+ cdat->dobj_1445.obj_hash = 1016293329;
cdat->dobj_1445.obj_len = 2;
/*^iniobj */
@@ -25988,7 +26017,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1446.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1446.obj_num = 1;
- cdat->dobj_1446.obj_hash = 155968600;
+ cdat->dobj_1446.obj_hash = 815155310;
cdat->dobj_1446.obj_len = 2;
@@ -26061,7 +26090,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1453__NOT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1453__NOT.obj_hash = 763996167;
+ cdat->dobj_1453__NOT.obj_hash = 995928208;
cdat->dobj_1453__NOT.obj_len = 5;
/*inimult dtup_1454__NOT */
@@ -26092,7 +26121,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1456.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1456.obj_num = 0;
- cdat->dobj_1456.obj_hash = 457109885;
+ cdat->dobj_1456.obj_hash = 577299852;
cdat->dobj_1456.obj_len = 2;
@@ -26162,7 +26191,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1462__INFORMSG_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1462__INFORMSG_STRV.obj_hash = 113760650;
+ cdat->dobj_1462__INFORMSG_STRV.obj_hash = 528898288;
cdat->dobj_1462__INFORMSG_STRV.obj_len = 5;
/*inimult dtup_1463__INFORMSG_STRV */
@@ -26221,7 +26250,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1467.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1467.obj_num = 0;
- cdat->dobj_1467.obj_hash = 817018131;
+ cdat->dobj_1467.obj_hash = 146756935;
cdat->dobj_1467.obj_len = 2;
/*^iniobj */
@@ -26242,7 +26271,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1468.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1468.obj_num = 1;
- cdat->dobj_1468.obj_hash = 592801149;
+ cdat->dobj_1468.obj_hash = 286311144;
cdat->dobj_1468.obj_len = 2;
@@ -26297,7 +26326,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1473__INTEGER_GREATER_THAN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1473__INTEGER_GREATER_THAN.obj_hash = 857958266;
+ cdat->dobj_1473__INTEGER_GREATER_THAN.obj_hash = 16230929;
cdat->dobj_1473__INTEGER_GREATER_THAN.obj_len = 9;
@@ -26354,7 +26383,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1477.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1477.obj_num = 0;
- cdat->dobj_1477.obj_hash = 120025304;
+ cdat->dobj_1477.obj_hash = 457749546;
cdat->dobj_1477.obj_len = 2;
/*inimult dtup_1478__INTEGER_GREATER_THAN */
@@ -26380,7 +26409,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1479.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1479.obj_hash = 571191637;
+ cdat->dobj_1479.obj_hash = 816535279;
cdat->dobj_1479.obj_len = 2;
/*inimult dtup_1480__INTEGER_GREATER_THAN */
@@ -26494,7 +26523,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1490__NULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1490__NULL.obj_hash = 313231987;
+ cdat->dobj_1490__NULL.obj_hash = 1023388775;
cdat->dobj_1490__NULL.obj_len = 5;
/*inimult dtup_1491__NULL */
@@ -26525,7 +26554,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1493.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1493.obj_num = 0;
- cdat->dobj_1493.obj_hash = 959914759;
+ cdat->dobj_1493.obj_hash = 283044702;
cdat->dobj_1493.obj_len = 2;
@@ -26565,7 +26594,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1497__AS_NULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_1497__AS_NULL.obj_hash = 501897651;
+ cdat->dobj_1497__AS_NULL.obj_hash = 176052572;
cdat->dobj_1497__AS_NULL.obj_len = 9;
@@ -26623,7 +26652,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1502.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1502.obj_hash = 513305449;
+ cdat->dobj_1502.obj_hash = 42940182;
cdat->dobj_1502.obj_len = 2;
/*inimult dtup_1503__AS_NULL */
@@ -26729,7 +26758,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1512__MELT_NEED_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1512__MELT_NEED_DBG.obj_hash = 725105435;
+ cdat->dobj_1512__MELT_NEED_DBG.obj_hash = 821694164;
cdat->dobj_1512__MELT_NEED_DBG.obj_len = 5;
/*inimult dtup_1513__MELT_NEED_DBG */
@@ -26788,7 +26817,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1517.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1517.obj_num = 0;
- cdat->dobj_1517.obj_hash = 175558067;
+ cdat->dobj_1517.obj_hash = 296861453;
cdat->dobj_1517.obj_len = 2;
@@ -26865,7 +26894,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1523__MELT_NEED_DBGLIM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1523__MELT_NEED_DBGLIM.obj_hash = 181369346;
+ cdat->dobj_1523__MELT_NEED_DBGLIM.obj_hash = 595701026;
cdat->dobj_1523__MELT_NEED_DBGLIM.obj_len = 5;
/*inimult dtup_1524__MELT_NEED_DBGLIM */
@@ -26898,7 +26927,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1526.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1526.obj_num = 0;
- cdat->dobj_1526.obj_hash = 193581635;
+ cdat->dobj_1526.obj_hash = 315809776;
cdat->dobj_1526.obj_len = 2;
@@ -26945,7 +26974,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1529.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1529.obj_num = 1;
- cdat->dobj_1529.obj_hash = 587875457;
+ cdat->dobj_1529.obj_hash = 962912539;
cdat->dobj_1529.obj_len = 2;
@@ -27029,7 +27058,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1536__SHORTBACKTRACE_DBG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1536__SHORTBACKTRACE_DBG.obj_hash = 666438195;
+ cdat->dobj_1536__SHORTBACKTRACE_DBG.obj_hash = 352064861;
cdat->dobj_1536__SHORTBACKTRACE_DBG.obj_len = 5;
/*inimult dtup_1537__SHORTBACKTRACE_DBG */
@@ -27062,7 +27091,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1539.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1539.obj_num = 0;
- cdat->dobj_1539.obj_hash = 216622687;
+ cdat->dobj_1539.obj_hash = 331011581;
cdat->dobj_1539.obj_len = 2;
@@ -27109,7 +27138,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1542.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1542.obj_num = 1;
- cdat->dobj_1542.obj_hash = 837127608;
+ cdat->dobj_1542.obj_hash = 301707095;
cdat->dobj_1542.obj_len = 2;
@@ -27192,7 +27221,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1549__THE_NULL_CSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1549__THE_NULL_CSTRING.obj_hash = 696723400;
+ cdat->dobj_1549__THE_NULL_CSTRING.obj_hash = 750810010;
cdat->dobj_1549__THE_NULL_CSTRING.obj_len = 5;
/*inimult dtup_1550__THE_NULL_CSTRING */
@@ -27266,7 +27295,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1556__IS_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1556__IS_STRING.obj_hash = 497340413;
+ cdat->dobj_1556__IS_STRING.obj_hash = 39628584;
cdat->dobj_1556__IS_STRING.obj_len = 5;
/*inimult dtup_1557__IS_STRING */
@@ -27323,7 +27352,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1561.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1561.obj_num = 0;
- cdat->dobj_1561.obj_hash = 909483837;
+ cdat->dobj_1561.obj_hash = 85036229;
cdat->dobj_1561.obj_len = 2;
@@ -27393,7 +27422,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1567__S.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1567__S.obj_hash = 1022089930;
+ cdat->dobj_1567__S.obj_hash = 261019517;
cdat->dobj_1567__S.obj_len = 5;
/*inimult dtup_1568__S */
@@ -27450,7 +27479,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1572.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1572.obj_num = 0;
- cdat->dobj_1572.obj_hash = 53909531;
+ cdat->dobj_1572.obj_hash = 576298101;
cdat->dobj_1572.obj_len = 2;
@@ -27497,7 +27526,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1575.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1575.obj_num = 1;
- cdat->dobj_1575.obj_hash = 282658764;
+ cdat->dobj_1575.obj_hash = 56788710;
cdat->dobj_1575.obj_len = 2;
@@ -27576,7 +27605,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1582__S.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1582__S.obj_hash = 1020668376;
+ cdat->dobj_1582__S.obj_hash = 923276027;
cdat->dobj_1582__S.obj_len = 5;
/*inimult dtup_1583__S */
@@ -27607,7 +27636,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1585.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1585.obj_num = 0;
- cdat->dobj_1585.obj_hash = 1023155995;
+ cdat->dobj_1585.obj_hash = 602467902;
cdat->dobj_1585.obj_len = 2;
/*^iniobj */
@@ -27628,7 +27657,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1586.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1586.obj_num = 1;
- cdat->dobj_1586.obj_hash = 1044970536;
+ cdat->dobj_1586.obj_hash = 462892139;
cdat->dobj_1586.obj_len = 2;
@@ -27763,7 +27792,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1599__MAKE_STRINGCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1599__MAKE_STRINGCONST.obj_hash = 623933069;
+ cdat->dobj_1599__MAKE_STRINGCONST.obj_hash = 109168124;
cdat->dobj_1599__MAKE_STRINGCONST.obj_len = 5;
/*inimult dtup_1600__MAKE_STRINGCONST */
@@ -27822,7 +27851,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1604.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1604.obj_num = 0;
- cdat->dobj_1604.obj_hash = 331367590;
+ cdat->dobj_1604.obj_hash = 618264371;
cdat->dobj_1604.obj_len = 2;
/*^iniobj */
@@ -27843,7 +27872,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1605.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1605.obj_num = 1;
- cdat->dobj_1605.obj_hash = 791431543;
+ cdat->dobj_1605.obj_hash = 966129020;
cdat->dobj_1605.obj_len = 2;
@@ -27922,7 +27951,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1612__STRING_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1612__STRING_.obj_hash = 800741107;
+ cdat->dobj_1612__STRING_.obj_hash = 612973514;
cdat->dobj_1612__STRING_.obj_len = 5;
/*inimult dtup_1613__STRING_ */
@@ -27953,7 +27982,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1615.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1615.obj_num = 0;
- cdat->dobj_1615.obj_hash = 298682764;
+ cdat->dobj_1615.obj_hash = 601450758;
cdat->dobj_1615.obj_len = 2;
/*^iniobj */
@@ -27974,7 +28003,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1616.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1616.obj_num = 1;
- cdat->dobj_1616.obj_hash = 394157650;
+ cdat->dobj_1616.obj_hash = 317080992;
cdat->dobj_1616.obj_len = 2;
@@ -28053,7 +28082,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1623__STRING_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1623__STRING_.obj_hash = 453468918;
+ cdat->dobj_1623__STRING_.obj_hash = 78729328;
cdat->dobj_1623__STRING_.obj_len = 5;
/*inimult dtup_1624__STRING_ */
@@ -28084,7 +28113,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1626.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1626.obj_num = 0;
- cdat->dobj_1626.obj_hash = 891836363;
+ cdat->dobj_1626.obj_hash = 905046139;
cdat->dobj_1626.obj_len = 2;
/*^iniobj */
@@ -28105,7 +28134,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1627.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1627.obj_num = 1;
- cdat->dobj_1627.obj_hash = 589979436;
+ cdat->dobj_1627.obj_hash = 627157521;
cdat->dobj_1627.obj_len = 2;
@@ -28188,7 +28217,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1634__STRING_TO_LONG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1634__STRING_TO_LONG.obj_hash = 55290111;
+ cdat->dobj_1634__STRING_TO_LONG.obj_hash = 429487434;
cdat->dobj_1634__STRING_TO_LONG.obj_len = 5;
/*inimult dtup_1635__STRING_TO_LONG */
@@ -28247,7 +28276,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1639.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1639.obj_num = 0;
- cdat->dobj_1639.obj_hash = 153735574;
+ cdat->dobj_1639.obj_hash = 439953217;
cdat->dobj_1639.obj_len = 2;
@@ -28323,7 +28352,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1645__IS_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1645__IS_MULTIPLE.obj_hash = 1013182054;
+ cdat->dobj_1645__IS_MULTIPLE.obj_hash = 97643728;
cdat->dobj_1645__IS_MULTIPLE.obj_len = 5;
/*inimult dtup_1646__IS_MULTIPLE */
@@ -28382,7 +28411,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1650.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1650.obj_num = 0;
- cdat->dobj_1650.obj_hash = 60368551;
+ cdat->dobj_1650.obj_hash = 454089724;
cdat->dobj_1650.obj_len = 2;
@@ -28459,7 +28488,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1656__MAKE_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1656__MAKE_MULTIPLE.obj_hash = 933374768;
+ cdat->dobj_1656__MAKE_MULTIPLE.obj_hash = 381575916;
cdat->dobj_1656__MAKE_MULTIPLE.obj_len = 5;
/*inimult dtup_1657__MAKE_MULTIPLE */
@@ -28492,7 +28521,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1659.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1659.obj_num = 0;
- cdat->dobj_1659.obj_hash = 846550092;
+ cdat->dobj_1659.obj_hash = 258182560;
cdat->dobj_1659.obj_len = 2;
@@ -28539,7 +28568,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1662.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1662.obj_num = 1;
- cdat->dobj_1662.obj_hash = 883623077;
+ cdat->dobj_1662.obj_hash = 195226070;
cdat->dobj_1662.obj_len = 2;
@@ -28622,7 +28651,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1669__MULTIPLE_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1669__MULTIPLE_NTH.obj_hash = 843344513;
+ cdat->dobj_1669__MULTIPLE_NTH.obj_hash = 777876450;
cdat->dobj_1669__MULTIPLE_NTH.obj_len = 5;
/*inimult dtup_1670__MULTIPLE_NTH */
@@ -28655,7 +28684,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1672.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1672.obj_num = 0;
- cdat->dobj_1672.obj_hash = 357757269;
+ cdat->dobj_1672.obj_hash = 804596290;
cdat->dobj_1672.obj_len = 2;
/*^iniobj */
@@ -28676,7 +28705,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1673.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1673.obj_num = 1;
- cdat->dobj_1673.obj_hash = 547721586;
+ cdat->dobj_1673.obj_hash = 413146379;
cdat->dobj_1673.obj_len = 2;
@@ -28759,7 +28788,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1680__MULTIPLE_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1680__MULTIPLE_LENGTH.obj_hash = 826995315;
+ cdat->dobj_1680__MULTIPLE_LENGTH.obj_hash = 278256948;
cdat->dobj_1680__MULTIPLE_LENGTH.obj_len = 5;
/*inimult dtup_1681__MULTIPLE_LENGTH */
@@ -28792,7 +28821,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1683.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1683.obj_num = 0;
- cdat->dobj_1683.obj_hash = 202009991;
+ cdat->dobj_1683.obj_hash = 343543845;
cdat->dobj_1683.obj_len = 2;
@@ -28868,7 +28897,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1689__MULTIPLE_PUT_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1689__MULTIPLE_PUT_NTH.obj_hash = 488582989;
+ cdat->dobj_1689__MULTIPLE_PUT_NTH.obj_hash = 618930781;
cdat->dobj_1689__MULTIPLE_PUT_NTH.obj_len = 5;
/*inimult dtup_1690__MULTIPLE_PUT_NTH */
@@ -28901,7 +28930,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1692.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1692.obj_num = 0;
- cdat->dobj_1692.obj_hash = 613369687;
+ cdat->dobj_1692.obj_hash = 739154192;
cdat->dobj_1692.obj_len = 2;
/*^iniobj */
@@ -28922,7 +28951,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1693.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1693.obj_num = 1;
- cdat->dobj_1693.obj_hash = 916452244;
+ cdat->dobj_1693.obj_hash = 118098773;
cdat->dobj_1693.obj_len = 2;
/*^iniobj */
@@ -28943,7 +28972,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1694.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1694.obj_num = 2;
- cdat->dobj_1694.obj_hash = 801833934;
+ cdat->dobj_1694.obj_hash = 605416643;
cdat->dobj_1694.obj_len = 2;
@@ -29036,7 +29065,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1702__MULTIPLE_SORT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1702__MULTIPLE_SORT.obj_hash = 182325240;
+ cdat->dobj_1702__MULTIPLE_SORT.obj_hash = 300296800;
cdat->dobj_1702__MULTIPLE_SORT.obj_len = 5;
/*inimult dtup_1703__MULTIPLE_SORT */
@@ -29069,7 +29098,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1705.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1705.obj_num = 0;
- cdat->dobj_1705.obj_hash = 476710177;
+ cdat->dobj_1705.obj_hash = 263209783;
cdat->dobj_1705.obj_len = 2;
@@ -29116,7 +29145,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1708.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1708.obj_num = 1;
- cdat->dobj_1708.obj_hash = 299829350;
+ cdat->dobj_1708.obj_hash = 333672492;
cdat->dobj_1708.obj_len = 2;
@@ -29163,7 +29192,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1711.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1711.obj_num = 2;
- cdat->dobj_1711.obj_hash = 162785633;
+ cdat->dobj_1711.obj_hash = 149383984;
cdat->dobj_1711.obj_len = 2;
@@ -29259,7 +29288,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1719__IS_MAPOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1719__IS_MAPOBJECT.obj_hash = 169910798;
+ cdat->dobj_1719__IS_MAPOBJECT.obj_hash = 678281050;
cdat->dobj_1719__IS_MAPOBJECT.obj_len = 5;
/*inimult dtup_1720__IS_MAPOBJECT */
@@ -29318,7 +29347,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1724.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1724.obj_num = 0;
- cdat->dobj_1724.obj_hash = 581303870;
+ cdat->dobj_1724.obj_hash = 69589220;
cdat->dobj_1724.obj_len = 2;
@@ -29395,7 +29424,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1730__MAPOBJECT_SIZE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1730__MAPOBJECT_SIZE.obj_hash = 562483717;
+ cdat->dobj_1730__MAPOBJECT_SIZE.obj_hash = 20625245;
cdat->dobj_1730__MAPOBJECT_SIZE.obj_len = 5;
/*inimult dtup_1731__MAPOBJECT_SIZE */
@@ -29428,7 +29457,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1733.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1733.obj_num = 0;
- cdat->dobj_1733.obj_hash = 188646670;
+ cdat->dobj_1733.obj_hash = 518097644;
cdat->dobj_1733.obj_len = 2;
@@ -29504,7 +29533,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1739__MAPOBJECT_COUNT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1739__MAPOBJECT_COUNT.obj_hash = 55800360;
+ cdat->dobj_1739__MAPOBJECT_COUNT.obj_hash = 161729249;
cdat->dobj_1739__MAPOBJECT_COUNT.obj_len = 5;
/*inimult dtup_1740__MAPOBJECT_COUNT */
@@ -29537,7 +29566,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1742.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1742.obj_num = 0;
- cdat->dobj_1742.obj_hash = 719593247;
+ cdat->dobj_1742.obj_hash = 204869462;
cdat->dobj_1742.obj_len = 2;
@@ -29613,7 +29642,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1748__MAPOBJECT_NTH_ATTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1748__MAPOBJECT_NTH_ATTR.obj_hash = 334011516;
+ cdat->dobj_1748__MAPOBJECT_NTH_ATTR.obj_hash = 346769415;
cdat->dobj_1748__MAPOBJECT_NTH_ATTR.obj_len = 5;
/*inimult dtup_1749__MAPOBJECT_NTH_ATTR */
@@ -29646,7 +29675,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1751.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1751.obj_num = 0;
- cdat->dobj_1751.obj_hash = 743976156;
+ cdat->dobj_1751.obj_hash = 114594974;
cdat->dobj_1751.obj_len = 2;
/*^iniobj */
@@ -29667,7 +29696,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1752.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1752.obj_num = 1;
- cdat->dobj_1752.obj_hash = 800123827;
+ cdat->dobj_1752.obj_hash = 785017622;
cdat->dobj_1752.obj_len = 2;
@@ -29750,7 +29779,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1759__MAPOBJECT_NTH_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1759__MAPOBJECT_NTH_VAL.obj_hash = 1016242179;
+ cdat->dobj_1759__MAPOBJECT_NTH_VAL.obj_hash = 785639478;
cdat->dobj_1759__MAPOBJECT_NTH_VAL.obj_len = 5;
/*inimult dtup_1760__MAPOBJECT_NTH_VAL */
@@ -29783,7 +29812,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1762.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1762.obj_num = 0;
- cdat->dobj_1762.obj_hash = 645230651;
+ cdat->dobj_1762.obj_hash = 143180907;
cdat->dobj_1762.obj_len = 2;
/*^iniobj */
@@ -29804,7 +29833,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1763.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1763.obj_num = 1;
- cdat->dobj_1763.obj_hash = 753640792;
+ cdat->dobj_1763.obj_hash = 111581823;
cdat->dobj_1763.obj_len = 2;
@@ -29887,7 +29916,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1770__MAPOBJECT_GET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1770__MAPOBJECT_GET.obj_hash = 732370133;
+ cdat->dobj_1770__MAPOBJECT_GET.obj_hash = 241819601;
cdat->dobj_1770__MAPOBJECT_GET.obj_len = 5;
/*inimult dtup_1771__MAPOBJECT_GET */
@@ -29920,7 +29949,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1773.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1773.obj_num = 0;
- cdat->dobj_1773.obj_hash = 1023558877;
+ cdat->dobj_1773.obj_hash = 793004569;
cdat->dobj_1773.obj_len = 2;
@@ -29967,7 +29996,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1776.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1776.obj_num = 1;
- cdat->dobj_1776.obj_hash = 901065014;
+ cdat->dobj_1776.obj_hash = 181333170;
cdat->dobj_1776.obj_len = 2;
@@ -30053,7 +30082,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1783__MAKE_MAPOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1783__MAKE_MAPOBJECT.obj_hash = 343173966;
+ cdat->dobj_1783__MAKE_MAPOBJECT.obj_hash = 886538112;
cdat->dobj_1783__MAKE_MAPOBJECT.obj_len = 5;
/*inimult dtup_1784__MAKE_MAPOBJECT */
@@ -30086,7 +30115,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1786.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1786.obj_num = 0;
- cdat->dobj_1786.obj_hash = 629746470;
+ cdat->dobj_1786.obj_hash = 948783843;
cdat->dobj_1786.obj_len = 2;
@@ -30133,7 +30162,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1789.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1789.obj_num = 1;
- cdat->dobj_1789.obj_hash = 959029665;
+ cdat->dobj_1789.obj_hash = 763091064;
cdat->dobj_1789.obj_len = 2;
@@ -30216,7 +30245,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1796__MAPOBJECT_PUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1796__MAPOBJECT_PUT.obj_hash = 296890401;
+ cdat->dobj_1796__MAPOBJECT_PUT.obj_hash = 587391472;
cdat->dobj_1796__MAPOBJECT_PUT.obj_len = 5;
/*inimult dtup_1797__MAPOBJECT_PUT */
@@ -30249,7 +30278,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1799.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1799.obj_num = 0;
- cdat->dobj_1799.obj_hash = 573049711;
+ cdat->dobj_1799.obj_hash = 165931845;
cdat->dobj_1799.obj_len = 2;
@@ -30296,7 +30325,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1802.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1802.obj_num = 1;
- cdat->dobj_1802.obj_hash = 770309953;
+ cdat->dobj_1802.obj_hash = 134788145;
cdat->dobj_1802.obj_len = 2;
@@ -30343,7 +30372,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1805.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1805.obj_num = 2;
- cdat->dobj_1805.obj_hash = 995576896;
+ cdat->dobj_1805.obj_hash = 909718006;
cdat->dobj_1805.obj_len = 2;
@@ -30435,7 +30464,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1813__MAPOBJECT_REMOVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1813__MAPOBJECT_REMOVE.obj_hash = 422320114;
+ cdat->dobj_1813__MAPOBJECT_REMOVE.obj_hash = 168270296;
cdat->dobj_1813__MAPOBJECT_REMOVE.obj_len = 5;
/*inimult dtup_1814__MAPOBJECT_REMOVE */
@@ -30468,7 +30497,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1816.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1816.obj_num = 0;
- cdat->dobj_1816.obj_hash = 685523442;
+ cdat->dobj_1816.obj_hash = 517285826;
cdat->dobj_1816.obj_len = 2;
/*^iniobj */
@@ -30489,7 +30518,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1817.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1817.obj_num = 1;
- cdat->dobj_1817.obj_hash = 819247151;
+ cdat->dobj_1817.obj_hash = 542050255;
cdat->dobj_1817.obj_len = 2;
@@ -30544,7 +30573,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1822__FOREACH_IN_MAPOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_1822__FOREACH_IN_MAPOBJECT.obj_hash = 617995201;
+ cdat->dobj_1822__FOREACH_IN_MAPOBJECT.obj_hash = 826218780;
cdat->dobj_1822__FOREACH_IN_MAPOBJECT.obj_len = 7;
@@ -30601,7 +30630,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1826.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1826.obj_num = 0;
- cdat->dobj_1826.obj_hash = 213801488;
+ cdat->dobj_1826.obj_hash = 995922339;
cdat->dobj_1826.obj_len = 2;
/*inimult dtup_1827__FOREACH_IN_MAPOBJECT */
@@ -30680,7 +30709,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1832.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1832.obj_num = 0;
- cdat->dobj_1832.obj_hash = 561337881;
+ cdat->dobj_1832.obj_hash = 425394146;
cdat->dobj_1832.obj_len = 2;
@@ -30727,7 +30756,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1835.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1835.obj_num = 1;
- cdat->dobj_1835.obj_hash = 518165417;
+ cdat->dobj_1835.obj_hash = 145690056;
cdat->dobj_1835.obj_len = 2;
/*inimult dtup_1836__FOREACH_IN_MAPOBJECT */
@@ -31014,7 +31043,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1869__IS_MAPSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1869__IS_MAPSTRING.obj_hash = 1058890724;
+ cdat->dobj_1869__IS_MAPSTRING.obj_hash = 73118008;
cdat->dobj_1869__IS_MAPSTRING.obj_len = 5;
/*inimult dtup_1870__IS_MAPSTRING */
@@ -31047,7 +31076,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1872.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1872.obj_num = 0;
- cdat->dobj_1872.obj_hash = 614218557;
+ cdat->dobj_1872.obj_hash = 882716732;
cdat->dobj_1872.obj_len = 2;
@@ -31124,7 +31153,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1878__MAKE_MAPSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1878__MAKE_MAPSTRING.obj_hash = 597288943;
+ cdat->dobj_1878__MAKE_MAPSTRING.obj_hash = 223534532;
cdat->dobj_1878__MAKE_MAPSTRING.obj_len = 5;
/*inimult dtup_1879__MAKE_MAPSTRING */
@@ -31157,7 +31186,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1881.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1881.obj_num = 0;
- cdat->dobj_1881.obj_hash = 555754251;
+ cdat->dobj_1881.obj_hash = 349823168;
cdat->dobj_1881.obj_len = 2;
/*^iniobj */
@@ -31178,7 +31207,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1882.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1882.obj_num = 1;
- cdat->dobj_1882.obj_hash = 565335152;
+ cdat->dobj_1882.obj_hash = 913727363;
cdat->dobj_1882.obj_len = 2;
@@ -31261,7 +31290,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1889__MAPSTRING_PUTSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1889__MAPSTRING_PUTSTR.obj_hash = 377618793;
+ cdat->dobj_1889__MAPSTRING_PUTSTR.obj_hash = 452017755;
cdat->dobj_1889__MAPSTRING_PUTSTR.obj_len = 5;
/*inimult dtup_1890__MAPSTRING_PUTSTR */
@@ -31294,7 +31323,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1892.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1892.obj_num = 0;
- cdat->dobj_1892.obj_hash = 905222899;
+ cdat->dobj_1892.obj_hash = 980840911;
cdat->dobj_1892.obj_len = 2;
@@ -31341,7 +31370,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1895.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1895.obj_num = 1;
- cdat->dobj_1895.obj_hash = 815030120;
+ cdat->dobj_1895.obj_hash = 220167122;
cdat->dobj_1895.obj_len = 2;
/*^iniobj */
@@ -31362,7 +31391,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1896.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1896.obj_num = 2;
- cdat->dobj_1896.obj_hash = 453131992;
+ cdat->dobj_1896.obj_hash = 472996125;
cdat->dobj_1896.obj_len = 2;
@@ -31458,7 +31487,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1904__MAPSTRING_GETSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1904__MAPSTRING_GETSTR.obj_hash = 516757131;
+ cdat->dobj_1904__MAPSTRING_GETSTR.obj_hash = 121799664;
cdat->dobj_1904__MAPSTRING_GETSTR.obj_len = 5;
/*inimult dtup_1905__MAPSTRING_GETSTR */
@@ -31491,7 +31520,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1907.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1907.obj_num = 0;
- cdat->dobj_1907.obj_hash = 593530376;
+ cdat->dobj_1907.obj_hash = 556375950;
cdat->dobj_1907.obj_len = 2;
/*^iniobj */
@@ -31512,7 +31541,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1908.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1908.obj_num = 1;
- cdat->dobj_1908.obj_hash = 1003226804;
+ cdat->dobj_1908.obj_hash = 583356280;
cdat->dobj_1908.obj_len = 2;
@@ -31598,7 +31627,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1915__MAPSTRING_REMOVESTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1915__MAPSTRING_REMOVESTR.obj_hash = 381446297;
+ cdat->dobj_1915__MAPSTRING_REMOVESTR.obj_hash = 609798332;
cdat->dobj_1915__MAPSTRING_REMOVESTR.obj_len = 5;
/*inimult dtup_1916__MAPSTRING_REMOVESTR */
@@ -31631,7 +31660,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1918.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1918.obj_num = 0;
- cdat->dobj_1918.obj_hash = 750732367;
+ cdat->dobj_1918.obj_hash = 901193239;
cdat->dobj_1918.obj_len = 2;
/*^iniobj */
@@ -31652,7 +31681,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1919.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1919.obj_num = 1;
- cdat->dobj_1919.obj_hash = 396945717;
+ cdat->dobj_1919.obj_hash = 600700937;
cdat->dobj_1919.obj_len = 2;
@@ -31739,7 +31768,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1926__MAPSTRING_NTH_ATTRSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1926__MAPSTRING_NTH_ATTRSTR.obj_hash = 750910185;
+ cdat->dobj_1926__MAPSTRING_NTH_ATTRSTR.obj_hash = 741315156;
cdat->dobj_1926__MAPSTRING_NTH_ATTRSTR.obj_len = 5;
/*inimult dtup_1927__MAPSTRING_NTH_ATTRSTR */
@@ -31772,7 +31801,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1929.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1929.obj_num = 0;
- cdat->dobj_1929.obj_hash = 394083279;
+ cdat->dobj_1929.obj_hash = 682966501;
cdat->dobj_1929.obj_len = 2;
@@ -31819,7 +31848,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1932.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1932.obj_num = 1;
- cdat->dobj_1932.obj_hash = 163123455;
+ cdat->dobj_1932.obj_hash = 86046944;
cdat->dobj_1932.obj_len = 2;
/*^iniobj */
@@ -31840,7 +31869,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1933.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1933.obj_num = 2;
- cdat->dobj_1933.obj_hash = 38972605;
+ cdat->dobj_1933.obj_hash = 728825896;
cdat->dobj_1933.obj_len = 2;
@@ -31931,7 +31960,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1941__MAPSTRING_NTH_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1941__MAPSTRING_NTH_VAL.obj_hash = 784664534;
+ cdat->dobj_1941__MAPSTRING_NTH_VAL.obj_hash = 771421030;
cdat->dobj_1941__MAPSTRING_NTH_VAL.obj_len = 5;
/*inimult dtup_1942__MAPSTRING_NTH_VAL */
@@ -31964,7 +31993,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1944.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1944.obj_num = 0;
- cdat->dobj_1944.obj_hash = 891540891;
+ cdat->dobj_1944.obj_hash = 654192505;
cdat->dobj_1944.obj_len = 2;
/*^iniobj */
@@ -31985,7 +32014,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1945.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1945.obj_num = 1;
- cdat->dobj_1945.obj_hash = 265252563;
+ cdat->dobj_1945.obj_hash = 79718908;
cdat->dobj_1945.obj_len = 2;
@@ -32039,7 +32068,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1950__FOREACH_IN_MAPSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_1950__FOREACH_IN_MAPSTRING.obj_hash = 1002696167;
+ cdat->dobj_1950__FOREACH_IN_MAPSTRING.obj_hash = 370130505;
cdat->dobj_1950__FOREACH_IN_MAPSTRING.obj_len = 7;
@@ -32096,7 +32125,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1954.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1954.obj_num = 0;
- cdat->dobj_1954.obj_hash = 308189185;
+ cdat->dobj_1954.obj_hash = 877771480;
cdat->dobj_1954.obj_len = 2;
/*inimult dtup_1955__FOREACH_IN_MAPSTRING */
@@ -32149,7 +32178,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1958.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1958.obj_num = 0;
- cdat->dobj_1958.obj_hash = 844646448;
+ cdat->dobj_1958.obj_hash = 127707174;
cdat->dobj_1958.obj_len = 2;
/*^iniobj */
@@ -32170,7 +32199,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_1959.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1959.obj_num = 1;
- cdat->dobj_1959.obj_hash = 956425144;
+ cdat->dobj_1959.obj_hash = 685123200;
cdat->dobj_1959.obj_len = 2;
/*inimult dtup_1960__FOREACH_IN_MAPSTRING */
@@ -32597,7 +32626,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2009__IS_ROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2009__IS_ROUTINE.obj_hash = 410001566;
+ cdat->dobj_2009__IS_ROUTINE.obj_hash = 65430464;
cdat->dobj_2009__IS_ROUTINE.obj_len = 5;
/*inimult dtup_2010__IS_ROUTINE */
@@ -32654,7 +32683,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2014.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2014.obj_num = 0;
- cdat->dobj_2014.obj_hash = 794702999;
+ cdat->dobj_2014.obj_hash = 890397324;
cdat->dobj_2014.obj_len = 2;
@@ -32728,7 +32757,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2020__ROUTINE_DESCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2020__ROUTINE_DESCR.obj_hash = 412353125;
+ cdat->dobj_2020__ROUTINE_DESCR.obj_hash = 175238266;
cdat->dobj_2020__ROUTINE_DESCR.obj_len = 5;
/*inimult dtup_2021__ROUTINE_DESCR */
@@ -32761,7 +32790,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2023.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2023.obj_num = 0;
- cdat->dobj_2023.obj_hash = 976124996;
+ cdat->dobj_2023.obj_hash = 660175807;
cdat->dobj_2023.obj_len = 2;
@@ -32837,7 +32866,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2029__ROUTINE_SIZE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2029__ROUTINE_SIZE.obj_hash = 499571171;
+ cdat->dobj_2029__ROUTINE_SIZE.obj_hash = 49920811;
cdat->dobj_2029__ROUTINE_SIZE.obj_len = 5;
/*inimult dtup_2030__ROUTINE_SIZE */
@@ -32870,7 +32899,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2032.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2032.obj_num = 0;
- cdat->dobj_2032.obj_hash = 806779402;
+ cdat->dobj_2032.obj_hash = 748287833;
cdat->dobj_2032.obj_len = 2;
@@ -32946,7 +32975,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2038__ROUTINE_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2038__ROUTINE_NTH.obj_hash = 504016349;
+ cdat->dobj_2038__ROUTINE_NTH.obj_hash = 861072389;
cdat->dobj_2038__ROUTINE_NTH.obj_len = 5;
/*inimult dtup_2039__ROUTINE_NTH */
@@ -32979,7 +33008,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2041.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2041.obj_num = 0;
- cdat->dobj_2041.obj_hash = 174210236;
+ cdat->dobj_2041.obj_hash = 877072758;
cdat->dobj_2041.obj_len = 2;
@@ -33026,7 +33055,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2044.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2044.obj_num = 1;
- cdat->dobj_2044.obj_hash = 203809118;
+ cdat->dobj_2044.obj_hash = 12825481;
cdat->dobj_2044.obj_len = 2;
@@ -33106,7 +33135,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2051__IS_CLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2051__IS_CLOSURE.obj_hash = 992207330;
+ cdat->dobj_2051__IS_CLOSURE.obj_hash = 552262279;
cdat->dobj_2051__IS_CLOSURE.obj_len = 5;
/*inimult dtup_2052__IS_CLOSURE */
@@ -33163,7 +33192,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2056.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2056.obj_num = 0;
- cdat->dobj_2056.obj_hash = 1002480117;
+ cdat->dobj_2056.obj_hash = 210300069;
cdat->dobj_2056.obj_len = 2;
@@ -33237,7 +33266,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2062__CLOSURE_SIZE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2062__CLOSURE_SIZE.obj_hash = 190470816;
+ cdat->dobj_2062__CLOSURE_SIZE.obj_hash = 510557879;
cdat->dobj_2062__CLOSURE_SIZE.obj_len = 5;
/*inimult dtup_2063__CLOSURE_SIZE */
@@ -33270,7 +33299,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2065.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2065.obj_num = 0;
- cdat->dobj_2065.obj_hash = 186632128;
+ cdat->dobj_2065.obj_hash = 801269565;
cdat->dobj_2065.obj_len = 2;
@@ -33346,7 +33375,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2071__CLOSURE_ROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2071__CLOSURE_ROUTINE.obj_hash = 997200024;
+ cdat->dobj_2071__CLOSURE_ROUTINE.obj_hash = 389028120;
cdat->dobj_2071__CLOSURE_ROUTINE.obj_len = 5;
/*inimult dtup_2072__CLOSURE_ROUTINE */
@@ -33379,7 +33408,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2074.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2074.obj_num = 0;
- cdat->dobj_2074.obj_hash = 279112702;
+ cdat->dobj_2074.obj_hash = 297997066;
cdat->dobj_2074.obj_len = 2;
@@ -33455,7 +33484,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2080__CLOSURE_NTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2080__CLOSURE_NTH.obj_hash = 127250182;
+ cdat->dobj_2080__CLOSURE_NTH.obj_hash = 798221864;
cdat->dobj_2080__CLOSURE_NTH.obj_len = 5;
/*inimult dtup_2081__CLOSURE_NTH */
@@ -33488,7 +33517,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2083.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2083.obj_num = 0;
- cdat->dobj_2083.obj_hash = 58867936;
+ cdat->dobj_2083.obj_hash = 1041460136;
cdat->dobj_2083.obj_len = 2;
/*^iniobj */
@@ -33509,7 +33538,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2084.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2084.obj_num = 1;
- cdat->dobj_2084.obj_hash = 1017106247;
+ cdat->dobj_2084.obj_hash = 15860163;
cdat->dobj_2084.obj_len = 2;
@@ -33562,7 +33591,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2089__CLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_2089__CLOSURE.obj_hash = 976545081;
+ cdat->dobj_2089__CLOSURE.obj_hash = 972965246;
cdat->dobj_2089__CLOSURE.obj_len = 9;
@@ -33594,7 +33623,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2092.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_2092.obj_hash = 829172348;
+ cdat->dobj_2092.obj_hash = 749276214;
cdat->dobj_2092.obj_len = 2;
/*inimult dtup_2093__CLOSURE */
@@ -33735,7 +33764,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2106__IS_INTEGERBOX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2106__IS_INTEGERBOX.obj_hash = 482328397;
+ cdat->dobj_2106__IS_INTEGERBOX.obj_hash = 393630250;
cdat->dobj_2106__IS_INTEGERBOX.obj_len = 5;
/*inimult dtup_2107__IS_INTEGERBOX */
@@ -33794,7 +33823,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2111.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2111.obj_num = 0;
- cdat->dobj_2111.obj_hash = 199845489;
+ cdat->dobj_2111.obj_hash = 126003681;
cdat->dobj_2111.obj_len = 2;
@@ -33871,7 +33900,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2117__MAKE_INTEGERBOX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2117__MAKE_INTEGERBOX.obj_hash = 862000871;
+ cdat->dobj_2117__MAKE_INTEGERBOX.obj_hash = 554398118;
cdat->dobj_2117__MAKE_INTEGERBOX.obj_len = 5;
/*inimult dtup_2118__MAKE_INTEGERBOX */
@@ -33904,7 +33933,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2120.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2120.obj_num = 0;
- cdat->dobj_2120.obj_hash = 190489278;
+ cdat->dobj_2120.obj_hash = 847240388;
cdat->dobj_2120.obj_len = 2;
/*^iniobj */
@@ -33925,7 +33954,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2121.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2121.obj_num = 1;
- cdat->dobj_2121.obj_hash = 811863058;
+ cdat->dobj_2121.obj_hash = 931428074;
cdat->dobj_2121.obj_len = 2;
@@ -33979,7 +34008,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2126__INTEGERBOX_OF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CMATCHER))));
- cdat->dobj_2126__INTEGERBOX_OF.obj_hash = 37885232;
+ cdat->dobj_2126__INTEGERBOX_OF.obj_hash = 45186774;
cdat->dobj_2126__INTEGERBOX_OF.obj_len = 9;
@@ -34041,7 +34070,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2131.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_2131.obj_hash = 66780501;
+ cdat->dobj_2131.obj_hash = 212999616;
cdat->dobj_2131.obj_len = 2;
@@ -34088,7 +34117,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2134.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2134.obj_num = 0;
- cdat->dobj_2134.obj_hash = 980309151;
+ cdat->dobj_2134.obj_hash = 967223432;
cdat->dobj_2134.obj_len = 2;
/*inimult dtup_2135__INTEGERBOX_OF */
@@ -34242,7 +34271,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2150__IS_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2150__IS_LIST.obj_hash = 1016945162;
+ cdat->dobj_2150__IS_LIST.obj_hash = 979554114;
cdat->dobj_2150__IS_LIST.obj_len = 5;
/*inimult dtup_2151__IS_LIST */
@@ -34299,7 +34328,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2155.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2155.obj_num = 0;
- cdat->dobj_2155.obj_hash = 1032371129;
+ cdat->dobj_2155.obj_hash = 290464341;
cdat->dobj_2155.obj_len = 2;
@@ -34373,7 +34402,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2161__IS_LIST_OR_NULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2161__IS_LIST_OR_NULL.obj_hash = 180093002;
+ cdat->dobj_2161__IS_LIST_OR_NULL.obj_hash = 185043151;
cdat->dobj_2161__IS_LIST_OR_NULL.obj_len = 5;
/*inimult dtup_2162__IS_LIST_OR_NULL */
@@ -34406,7 +34435,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2164.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2164.obj_num = 0;
- cdat->dobj_2164.obj_hash = 1043469851;
+ cdat->dobj_2164.obj_hash = 635768495;
cdat->dobj_2164.obj_len = 2;
@@ -34488,7 +34517,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2171__IS_NON_EMPTY_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2171__IS_NON_EMPTY_LIST.obj_hash = 917173286;
+ cdat->dobj_2171__IS_NON_EMPTY_LIST.obj_hash = 289985186;
cdat->dobj_2171__IS_NON_EMPTY_LIST.obj_len = 5;
/*inimult dtup_2172__IS_NON_EMPTY_LIST */
@@ -34521,7 +34550,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2174.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2174.obj_num = 0;
- cdat->dobj_2174.obj_hash = 965998628;
+ cdat->dobj_2174.obj_hash = 233927443;
cdat->dobj_2174.obj_len = 2;
@@ -34602,7 +34631,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2181__LIST_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2181__LIST_FIRST.obj_hash = 897722470;
+ cdat->dobj_2181__LIST_FIRST.obj_hash = 19869712;
cdat->dobj_2181__LIST_FIRST.obj_len = 5;
/*inimult dtup_2182__LIST_FIRST */
@@ -34633,7 +34662,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2184.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2184.obj_num = 0;
- cdat->dobj_2184.obj_hash = 549424265;
+ cdat->dobj_2184.obj_hash = 734112834;
cdat->dobj_2184.obj_len = 2;
@@ -34702,7 +34731,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2190__LIST_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2190__LIST_LAST.obj_hash = 997048202;
+ cdat->dobj_2190__LIST_LAST.obj_hash = 316792448;
cdat->dobj_2190__LIST_LAST.obj_len = 5;
/*inimult dtup_2191__LIST_LAST */
@@ -34733,7 +34762,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2193.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2193.obj_num = 0;
- cdat->dobj_2193.obj_hash = 286998029;
+ cdat->dobj_2193.obj_hash = 154651142;
cdat->dobj_2193.obj_len = 2;
@@ -34806,7 +34835,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2199__LIST_FIRST_ELEMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2199__LIST_FIRST_ELEMENT.obj_hash = 798802450;
+ cdat->dobj_2199__LIST_FIRST_ELEMENT.obj_hash = 405793493;
cdat->dobj_2199__LIST_FIRST_ELEMENT.obj_len = 5;
/*inimult dtup_2200__LIST_FIRST_ELEMENT */
@@ -34839,7 +34868,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2202.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2202.obj_num = 0;
- cdat->dobj_2202.obj_hash = 280225452;
+ cdat->dobj_2202.obj_hash = 1013682272;
cdat->dobj_2202.obj_len = 2;
@@ -34915,7 +34944,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2208__LIST_LAST_ELEMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2208__LIST_LAST_ELEMENT.obj_hash = 1065288472;
+ cdat->dobj_2208__LIST_LAST_ELEMENT.obj_hash = 915921264;
cdat->dobj_2208__LIST_LAST_ELEMENT.obj_len = 5;
/*inimult dtup_2209__LIST_LAST_ELEMENT */
@@ -34948,7 +34977,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2211.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2211.obj_num = 0;
- cdat->dobj_2211.obj_hash = 982059668;
+ cdat->dobj_2211.obj_hash = 868273534;
cdat->dobj_2211.obj_len = 2;
@@ -35024,7 +35053,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2217__LIST_LENGTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2217__LIST_LENGTH.obj_hash = 691183027;
+ cdat->dobj_2217__LIST_LENGTH.obj_hash = 475923143;
cdat->dobj_2217__LIST_LENGTH.obj_len = 5;
/*inimult dtup_2218__LIST_LENGTH */
@@ -35057,7 +35086,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2220.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2220.obj_num = 0;
- cdat->dobj_2220.obj_hash = 842666042;
+ cdat->dobj_2220.obj_hash = 52232696;
cdat->dobj_2220.obj_len = 2;
@@ -35133,7 +35162,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2226__LIST_APPEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2226__LIST_APPEND.obj_hash = 118002778;
+ cdat->dobj_2226__LIST_APPEND.obj_hash = 11216735;
cdat->dobj_2226__LIST_APPEND.obj_len = 5;
/*inimult dtup_2227__LIST_APPEND */
@@ -35166,7 +35195,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2229.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2229.obj_num = 0;
- cdat->dobj_2229.obj_hash = 1032974816;
+ cdat->dobj_2229.obj_hash = 299689495;
cdat->dobj_2229.obj_len = 2;
@@ -35213,7 +35242,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2232.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2232.obj_num = 1;
- cdat->dobj_2232.obj_hash = 625349596;
+ cdat->dobj_2232.obj_hash = 475335492;
cdat->dobj_2232.obj_len = 2;
@@ -35299,7 +35328,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2239__LIST_PREPEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2239__LIST_PREPEND.obj_hash = 328271393;
+ cdat->dobj_2239__LIST_PREPEND.obj_hash = 381753520;
cdat->dobj_2239__LIST_PREPEND.obj_len = 5;
/*inimult dtup_2240__LIST_PREPEND */
@@ -35332,7 +35361,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2242.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2242.obj_num = 0;
- cdat->dobj_2242.obj_hash = 1011068149;
+ cdat->dobj_2242.obj_hash = 665994014;
cdat->dobj_2242.obj_len = 2;
/*^iniobj */
@@ -35353,7 +35382,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2243.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2243.obj_num = 1;
- cdat->dobj_2243.obj_hash = 1028309448;
+ cdat->dobj_2243.obj_hash = 830892024;
cdat->dobj_2243.obj_len = 2;
@@ -35439,7 +35468,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2250__LIST_POPFIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2250__LIST_POPFIRST.obj_hash = 498266284;
+ cdat->dobj_2250__LIST_POPFIRST.obj_hash = 448678536;
cdat->dobj_2250__LIST_POPFIRST.obj_len = 5;
/*inimult dtup_2251__LIST_POPFIRST */
@@ -35472,7 +35501,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2253.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2253.obj_num = 0;
- cdat->dobj_2253.obj_hash = 867248513;
+ cdat->dobj_2253.obj_hash = 648205990;
cdat->dobj_2253.obj_len = 2;
@@ -35544,7 +35573,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2259__MAKE_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2259__MAKE_LIST.obj_hash = 875041990;
+ cdat->dobj_2259__MAKE_LIST.obj_hash = 295952263;
cdat->dobj_2259__MAKE_LIST.obj_len = 5;
/*inimult dtup_2260__MAKE_LIST */
@@ -35575,7 +35604,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2262.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2262.obj_num = 0;
- cdat->dobj_2262.obj_hash = 127023176;
+ cdat->dobj_2262.obj_hash = 150045982;
cdat->dobj_2262.obj_len = 2;
@@ -35644,7 +35673,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2268__IS_PAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2268__IS_PAIR.obj_hash = 180768427;
+ cdat->dobj_2268__IS_PAIR.obj_hash = 511965040;
cdat->dobj_2268__IS_PAIR.obj_len = 5;
/*inimult dtup_2269__IS_PAIR */
@@ -35701,7 +35730,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2273.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2273.obj_num = 0;
- cdat->dobj_2273.obj_hash = 131772228;
+ cdat->dobj_2273.obj_hash = 522001271;
cdat->dobj_2273.obj_len = 2;
@@ -35771,7 +35800,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2279__PAIR_HEAD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2279__PAIR_HEAD.obj_hash = 484729732;
+ cdat->dobj_2279__PAIR_HEAD.obj_hash = 46833964;
cdat->dobj_2279__PAIR_HEAD.obj_len = 5;
/*inimult dtup_2280__PAIR_HEAD */
@@ -35802,7 +35831,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2282.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2282.obj_num = 0;
- cdat->dobj_2282.obj_hash = 135113609;
+ cdat->dobj_2282.obj_hash = 196423763;
cdat->dobj_2282.obj_len = 2;
@@ -35871,7 +35900,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2288__PAIR_TAIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2288__PAIR_TAIL.obj_hash = 63616708;
+ cdat->dobj_2288__PAIR_TAIL.obj_hash = 387866786;
cdat->dobj_2288__PAIR_TAIL.obj_len = 5;
/*inimult dtup_2289__PAIR_TAIL */
@@ -35902,7 +35931,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2291.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2291.obj_num = 0;
- cdat->dobj_2291.obj_hash = 256844636;
+ cdat->dobj_2291.obj_hash = 338301891;
cdat->dobj_2291.obj_len = 2;
@@ -35975,7 +36004,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2297__WARNINGMSG_STRV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2297__WARNINGMSG_STRV.obj_hash = 162190914;
+ cdat->dobj_2297__WARNINGMSG_STRV.obj_hash = 265626281;
cdat->dobj_2297__WARNINGMSG_STRV.obj_len = 5;
/*inimult dtup_2298__WARNINGMSG_STRV */
@@ -36008,7 +36037,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2300.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2300.obj_num = 0;
- cdat->dobj_2300.obj_hash = 20182088;
+ cdat->dobj_2300.obj_hash = 228345837;
cdat->dobj_2300.obj_len = 2;
/*^iniobj */
@@ -36029,7 +36058,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2301.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2301.obj_num = 1;
- cdat->dobj_2301.obj_hash = 692518215;
+ cdat->dobj_2301.obj_hash = 1936629;
cdat->dobj_2301.obj_len = 2;
@@ -36113,7 +36142,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2308__INFORMSG_LONG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_2308__INFORMSG_LONG.obj_hash = 327896248;
+ cdat->dobj_2308__INFORMSG_LONG.obj_hash = 9815632;
cdat->dobj_2308__INFORMSG_LONG.obj_len = 5;
/*inimult dtup_2309__INFORMSG_LONG */
@@ -36146,7 +36175,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2311.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2311.obj_num = 0;
- cdat->dobj_2311.obj_hash = 374005267;
+ cdat->dobj_2311.obj_hash = 654106899;
cdat->dobj_2311.obj_len = 2;
/*^iniobj */
@@ -36167,7 +36196,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2312.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_2312.obj_num = 1;
- cdat->dobj_2312.obj_hash = 98467611;
+ cdat->dobj_2312.obj_hash = 514275382;
cdat->dobj_2312.obj_len = 2;
@@ -36259,7 +36288,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2319__DISCR_NAME_STRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2319__DISCR_NAME_STRING.obj_num = MELTOBMAG_STRING;
- cdat->dobj_2319__DISCR_NAME_STRING.obj_hash = 768961403;
+ cdat->dobj_2319__DISCR_NAME_STRING.obj_hash = 222482105;
cdat->dobj_2319__DISCR_NAME_STRING.obj_len = 5;
@@ -36315,7 +36344,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2322__DISCR_STRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2322__DISCR_STRING.obj_num = MELTOBMAG_STRING;
- cdat->dobj_2322__DISCR_STRING.obj_hash = 387622904;
+ cdat->dobj_2322__DISCR_STRING.obj_hash = 444118808;
cdat->dobj_2322__DISCR_STRING.obj_len = 5;
@@ -36396,7 +36425,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2327__DISCR_VERBATIM_STRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2327__DISCR_VERBATIM_STRING.obj_num = MELTOBMAG_STRING;
- cdat->dobj_2327__DISCR_VERBATIM_STRING.obj_hash = 90897063;
+ cdat->dobj_2327__DISCR_VERBATIM_STRING.obj_hash = 224475645;
cdat->dobj_2327__DISCR_VERBATIM_STRING.obj_len = 5;
@@ -36463,7 +36492,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2331__DISCR_ANY_RECEIVER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
- cdat->dobj_2331__DISCR_ANY_RECEIVER.obj_hash = 93189428;
+ cdat->dobj_2331__DISCR_ANY_RECEIVER.obj_hash = 627110476;
cdat->dobj_2331__DISCR_ANY_RECEIVER.obj_len = 5;
@@ -36530,7 +36559,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2335__DISCR_NULL_RECEIVER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
- cdat->dobj_2335__DISCR_NULL_RECEIVER.obj_hash = 631357510;
+ cdat->dobj_2335__DISCR_NULL_RECEIVER.obj_hash = 911041214;
cdat->dobj_2335__DISCR_NULL_RECEIVER.obj_len = 5;
@@ -36596,7 +36625,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2339__DISCR_STRBUF.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2339__DISCR_STRBUF.obj_num = MELTOBMAG_STRBUF;
- cdat->dobj_2339__DISCR_STRBUF.obj_hash = 512899922;
+ cdat->dobj_2339__DISCR_STRBUF.obj_hash = 378757266;
cdat->dobj_2339__DISCR_STRBUF.obj_len = 5;
@@ -36663,7 +36692,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2343__DISCR_INTEGER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2343__DISCR_INTEGER.obj_num = MELTOBMAG_INT;
- cdat->dobj_2343__DISCR_INTEGER.obj_hash = 355688936;
+ cdat->dobj_2343__DISCR_INTEGER.obj_hash = 773162004;
cdat->dobj_2343__DISCR_INTEGER.obj_len = 5;
@@ -36726,7 +36755,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2347__DISCR_REAL.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2347__DISCR_REAL.obj_num = MELTOBMAG_REAL;
- cdat->dobj_2347__DISCR_REAL.obj_hash = 389040819;
+ cdat->dobj_2347__DISCR_REAL.obj_hash = 1064564184;
cdat->dobj_2347__DISCR_REAL.obj_len = 5;
@@ -36794,7 +36823,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2351__DISCR_CONSTANT_INTEGER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2351__DISCR_CONSTANT_INTEGER.obj_num = MELTOBMAG_INT;
- cdat->dobj_2351__DISCR_CONSTANT_INTEGER.obj_hash = 175922226;
+ cdat->dobj_2351__DISCR_CONSTANT_INTEGER.obj_hash = 593031533;
cdat->dobj_2351__DISCR_CONSTANT_INTEGER.obj_len = 5;
@@ -36857,7 +36886,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2355__DISCR_LIST.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2355__DISCR_LIST.obj_num = MELTOBMAG_LIST;
- cdat->dobj_2355__DISCR_LIST.obj_hash = 537529230;
+ cdat->dobj_2355__DISCR_LIST.obj_hash = 574765395;
cdat->dobj_2355__DISCR_LIST.obj_len = 5;
@@ -36917,7 +36946,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2359__DISCR_PAIR.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2359__DISCR_PAIR.obj_num = MELTOBMAG_PAIR;
- cdat->dobj_2359__DISCR_PAIR.obj_hash = 56594870;
+ cdat->dobj_2359__DISCR_PAIR.obj_hash = 707653315;
cdat->dobj_2359__DISCR_PAIR.obj_len = 5;
@@ -36981,7 +37010,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2363__DISCR_MULTIPLE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2363__DISCR_MULTIPLE.obj_num = MELTOBMAG_MULTIPLE;
- cdat->dobj_2363__DISCR_MULTIPLE.obj_hash = 1050299554;
+ cdat->dobj_2363__DISCR_MULTIPLE.obj_hash = 287767870;
cdat->dobj_2363__DISCR_MULTIPLE.obj_len = 5;
@@ -37052,7 +37081,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2367__DISCR_FIELD_SEQUENCE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2367__DISCR_FIELD_SEQUENCE.obj_num = MELTOBMAG_MULTIPLE;
- cdat->dobj_2367__DISCR_FIELD_SEQUENCE.obj_hash = 452221447;
+ cdat->dobj_2367__DISCR_FIELD_SEQUENCE.obj_hash = 568406965;
cdat->dobj_2367__DISCR_FIELD_SEQUENCE.obj_len = 5;
@@ -37113,7 +37142,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2371__DISCR_FORMAL_SEQUENCE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2371__DISCR_FORMAL_SEQUENCE.obj_num = MELTOBMAG_MULTIPLE;
- cdat->dobj_2371__DISCR_FORMAL_SEQUENCE.obj_hash = 10099834;
+ cdat->dobj_2371__DISCR_FORMAL_SEQUENCE.obj_hash = 766769855;
cdat->dobj_2371__DISCR_FORMAL_SEQUENCE.obj_len = 5;
@@ -37176,7 +37205,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2375__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_num =
MELTOBMAG_MULTIPLE;
- cdat->dobj_2375__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_hash = 547259246;
+ cdat->dobj_2375__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_hash = 78136615;
cdat->dobj_2375__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_len = 5;
@@ -37239,7 +37268,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2379__DISCR_TREE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2379__DISCR_TREE.obj_num = MELTOBMAG_TREE;
- cdat->dobj_2379__DISCR_TREE.obj_hash = 1067870970;
+ cdat->dobj_2379__DISCR_TREE.obj_hash = 85810582;
cdat->dobj_2379__DISCR_TREE.obj_len = 5;
@@ -37302,7 +37331,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2383__DISCR_GIMPLE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2383__DISCR_GIMPLE.obj_num = MELTOBMAG_GIMPLE;
- cdat->dobj_2383__DISCR_GIMPLE.obj_hash = 815901565;
+ cdat->dobj_2383__DISCR_GIMPLE.obj_hash = 750079053;
cdat->dobj_2383__DISCR_GIMPLE.obj_len = 5;
@@ -37369,7 +37398,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2387__DISCR_GIMPLE_SEQ.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2387__DISCR_GIMPLE_SEQ.obj_num = MELTOBMAG_GIMPLESEQ;
- cdat->dobj_2387__DISCR_GIMPLE_SEQ.obj_hash = 337786338;
+ cdat->dobj_2387__DISCR_GIMPLE_SEQ.obj_hash = 26407439;
cdat->dobj_2387__DISCR_GIMPLE_SEQ.obj_len = 5;
@@ -37432,7 +37461,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2391__DISCR_EDGE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2391__DISCR_EDGE.obj_num = MELTOBMAG_EDGE;
- cdat->dobj_2391__DISCR_EDGE.obj_hash = 921229870;
+ cdat->dobj_2391__DISCR_EDGE.obj_hash = 1011750912;
cdat->dobj_2391__DISCR_EDGE.obj_len = 5;
@@ -37497,7 +37526,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2395__DISCR_BASIC_BLOCK.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2395__DISCR_BASIC_BLOCK.obj_num = MELTOBMAG_BASICBLOCK;
- cdat->dobj_2395__DISCR_BASIC_BLOCK.obj_hash = 707277741;
+ cdat->dobj_2395__DISCR_BASIC_BLOCK.obj_hash = 77072351;
cdat->dobj_2395__DISCR_BASIC_BLOCK.obj_len = 5;
@@ -37560,7 +37589,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2399__DISCR_LOOP.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2399__DISCR_LOOP.obj_num = MELTOBMAG_LOOP;
- cdat->dobj_2399__DISCR_LOOP.obj_hash = 717194951;
+ cdat->dobj_2399__DISCR_LOOP.obj_hash = 191305802;
cdat->dobj_2399__DISCR_LOOP.obj_len = 5;
@@ -37623,7 +37652,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2403__DISCR_BITMAP.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2403__DISCR_BITMAP.obj_num = MELTOBMAG_BITMAP;
- cdat->dobj_2403__DISCR_BITMAP.obj_hash = 110319416;
+ cdat->dobj_2403__DISCR_BITMAP.obj_hash = 967820650;
cdat->dobj_2403__DISCR_BITMAP.obj_len = 5;
@@ -37686,7 +37715,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2407__DISCR_RTX.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2407__DISCR_RTX.obj_num = MELTOBMAG_RTX;
- cdat->dobj_2407__DISCR_RTX.obj_hash = 778062447;
+ cdat->dobj_2407__DISCR_RTX.obj_hash = 19010622;
cdat->dobj_2407__DISCR_RTX.obj_len = 5;
@@ -37749,7 +37778,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2411__DISCR_RTVEC.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2411__DISCR_RTVEC.obj_num = MELTOBMAG_RTVEC;
- cdat->dobj_2411__DISCR_RTVEC.obj_hash = 363223743;
+ cdat->dobj_2411__DISCR_RTVEC.obj_hash = 581089386;
cdat->dobj_2411__DISCR_RTVEC.obj_len = 5;
@@ -37817,7 +37846,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2415__DISCR_MAP_OBJECTS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2415__DISCR_MAP_OBJECTS.obj_num = MELTOBMAG_MAPOBJECTS;
- cdat->dobj_2415__DISCR_MAP_OBJECTS.obj_hash = 354494970;
+ cdat->dobj_2415__DISCR_MAP_OBJECTS.obj_hash = 566992716;
cdat->dobj_2415__DISCR_MAP_OBJECTS.obj_len = 5;
@@ -37885,7 +37914,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2419__DISCR_MAP_STRINGS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2419__DISCR_MAP_STRINGS.obj_num = MELTOBMAG_MAPSTRINGS;
- cdat->dobj_2419__DISCR_MAP_STRINGS.obj_hash = 873286134;
+ cdat->dobj_2419__DISCR_MAP_STRINGS.obj_hash = 158651286;
cdat->dobj_2419__DISCR_MAP_STRINGS.obj_len = 5;
@@ -37952,7 +37981,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2423__DISCR_MAP_TREES.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2423__DISCR_MAP_TREES.obj_num = MELTOBMAG_MAPTREES;
- cdat->dobj_2423__DISCR_MAP_TREES.obj_hash = 612726530;
+ cdat->dobj_2423__DISCR_MAP_TREES.obj_hash = 1028633971;
cdat->dobj_2423__DISCR_MAP_TREES.obj_len = 5;
@@ -38020,7 +38049,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2427__DISCR_MAP_GIMPLES.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2427__DISCR_MAP_GIMPLES.obj_num = MELTOBMAG_MAPGIMPLES;
- cdat->dobj_2427__DISCR_MAP_GIMPLES.obj_hash = 9406714;
+ cdat->dobj_2427__DISCR_MAP_GIMPLES.obj_hash = 1062986913;
cdat->dobj_2427__DISCR_MAP_GIMPLES.obj_len = 5;
@@ -38091,7 +38120,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2431__DISCR_MAP_GIMPLE_SEQS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2431__DISCR_MAP_GIMPLE_SEQS.obj_num = MELTOBMAG_MAPGIMPLESEQS;
- cdat->dobj_2431__DISCR_MAP_GIMPLE_SEQS.obj_hash = 895088673;
+ cdat->dobj_2431__DISCR_MAP_GIMPLE_SEQS.obj_hash = 90074293;
cdat->dobj_2431__DISCR_MAP_GIMPLE_SEQS.obj_len = 5;
@@ -38158,7 +38187,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2435__DISCR_MAP_EDGES.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2435__DISCR_MAP_EDGES.obj_num = MELTOBMAG_MAPEDGES;
- cdat->dobj_2435__DISCR_MAP_EDGES.obj_hash = 61284644;
+ cdat->dobj_2435__DISCR_MAP_EDGES.obj_hash = 229329495;
cdat->dobj_2435__DISCR_MAP_EDGES.obj_len = 5;
@@ -38229,7 +38258,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2439__DISCR_MAP_BASIC_BLOCKS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2439__DISCR_MAP_BASIC_BLOCKS.obj_num = MELTOBMAG_MAPBASICBLOCKS;
- cdat->dobj_2439__DISCR_MAP_BASIC_BLOCKS.obj_hash = 8632488;
+ cdat->dobj_2439__DISCR_MAP_BASIC_BLOCKS.obj_hash = 482057831;
cdat->dobj_2439__DISCR_MAP_BASIC_BLOCKS.obj_len = 5;
@@ -38296,7 +38325,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2443__DISCR_MAP_LOOPS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2443__DISCR_MAP_LOOPS.obj_num = MELTOBMAG_MAPLOOPS;
- cdat->dobj_2443__DISCR_MAP_LOOPS.obj_hash = 737309889;
+ cdat->dobj_2443__DISCR_MAP_LOOPS.obj_hash = 960231545;
cdat->dobj_2443__DISCR_MAP_LOOPS.obj_len = 5;
@@ -38364,7 +38393,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2447__DISCR_MAP_BITMAPS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2447__DISCR_MAP_BITMAPS.obj_num = MELTOBMAG_MAPBITMAPS;
- cdat->dobj_2447__DISCR_MAP_BITMAPS.obj_hash = 442710490;
+ cdat->dobj_2447__DISCR_MAP_BITMAPS.obj_hash = 447042580;
cdat->dobj_2447__DISCR_MAP_BITMAPS.obj_len = 5;
@@ -38431,7 +38460,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2451__DISCR_MAP_RTXS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2451__DISCR_MAP_RTXS.obj_num = MELTOBMAG_MAPRTXS;
- cdat->dobj_2451__DISCR_MAP_RTXS.obj_hash = 678324212;
+ cdat->dobj_2451__DISCR_MAP_RTXS.obj_hash = 912231783;
cdat->dobj_2451__DISCR_MAP_RTXS.obj_len = 5;
@@ -38498,7 +38527,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2455__DISCR_MAP_RTVECS.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2455__DISCR_MAP_RTVECS.obj_num = MELTOBMAG_MAPRTVECS;
- cdat->dobj_2455__DISCR_MAP_RTVECS.obj_hash = 498707019;
+ cdat->dobj_2455__DISCR_MAP_RTVECS.obj_hash = 681273797;
cdat->dobj_2455__DISCR_MAP_RTVECS.obj_len = 5;
@@ -38560,7 +38589,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2459__DISCR_PPL_CONSTRAINT_SYSTEM.obj_num =
MELTOBMAG_SPECPPL_CONSTRAINT_SYSTEM;
- cdat->dobj_2459__DISCR_PPL_CONSTRAINT_SYSTEM.obj_hash = 745035521;
+ cdat->dobj_2459__DISCR_PPL_CONSTRAINT_SYSTEM.obj_hash = 823299441;
cdat->dobj_2459__DISCR_PPL_CONSTRAINT_SYSTEM.obj_len = 5;
@@ -38622,7 +38651,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2463__DISCR_PPL_POLYHEDRON.obj_num =
MELTOBMAG_SPECPPL_POLYHEDRON;
- cdat->dobj_2463__DISCR_PPL_POLYHEDRON.obj_hash = 266431403;
+ cdat->dobj_2463__DISCR_PPL_POLYHEDRON.obj_hash = 104940191;
cdat->dobj_2463__DISCR_PPL_POLYHEDRON.obj_len = 5;
@@ -38677,7 +38706,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2467__DISCR_FILE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2467__DISCR_FILE.obj_num = MELTOBMAG_SPEC_FILE;
- cdat->dobj_2467__DISCR_FILE.obj_hash = 746316170;
+ cdat->dobj_2467__DISCR_FILE.obj_hash = 634857490;
cdat->dobj_2467__DISCR_FILE.obj_len = 5;
@@ -38732,7 +38761,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2471__DISCR_RAWFILE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2471__DISCR_RAWFILE.obj_num = MELTOBMAG_SPEC_RAWFILE;
- cdat->dobj_2471__DISCR_RAWFILE.obj_hash = 465433565;
+ cdat->dobj_2471__DISCR_RAWFILE.obj_hash = 884466930;
cdat->dobj_2471__DISCR_RAWFILE.obj_len = 5;
@@ -38803,7 +38832,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2475__DISCR_CLASS_SEQUENCE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2475__DISCR_CLASS_SEQUENCE.obj_num = MELTOBMAG_MULTIPLE;
- cdat->dobj_2475__DISCR_CLASS_SEQUENCE.obj_hash = 276885059;
+ cdat->dobj_2475__DISCR_CLASS_SEQUENCE.obj_hash = 559801668;
cdat->dobj_2475__DISCR_CLASS_SEQUENCE.obj_len = 5;
@@ -38870,7 +38899,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2479__DISCR_METHOD_MAP.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2479__DISCR_METHOD_MAP.obj_num = MELTOBMAG_MAPOBJECTS;
- cdat->dobj_2479__DISCR_METHOD_MAP.obj_hash = 103588838;
+ cdat->dobj_2479__DISCR_METHOD_MAP.obj_hash = 600432606;
cdat->dobj_2479__DISCR_METHOD_MAP.obj_len = 5;
@@ -38941,7 +38970,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2483__DISCR_CHARACTER_INTEGER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2483__DISCR_CHARACTER_INTEGER.obj_num = MELTOBMAG_INT;
- cdat->dobj_2483__DISCR_CHARACTER_INTEGER.obj_hash = 24239065;
+ cdat->dobj_2483__DISCR_CHARACTER_INTEGER.obj_hash = 422126444;
cdat->dobj_2483__DISCR_CHARACTER_INTEGER.obj_len = 5;
@@ -39009,7 +39038,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2487__DISCR_MIXED_INTEGER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2487__DISCR_MIXED_INTEGER.obj_num = MELTOBMAG_MIXINT;
- cdat->dobj_2487__DISCR_MIXED_INTEGER.obj_hash = 871525837;
+ cdat->dobj_2487__DISCR_MIXED_INTEGER.obj_hash = 23774973;
cdat->dobj_2487__DISCR_MIXED_INTEGER.obj_len = 5;
@@ -39077,7 +39106,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2491__DISCR_MIXED_BIGINT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2491__DISCR_MIXED_BIGINT.obj_num = MELTOBMAG_MIXBIGINT;
- cdat->dobj_2491__DISCR_MIXED_BIGINT.obj_hash = 370237918;
+ cdat->dobj_2491__DISCR_MIXED_BIGINT.obj_hash = 1058574899;
cdat->dobj_2491__DISCR_MIXED_BIGINT.obj_len = 5;
@@ -39148,7 +39177,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2495__DISCR_MIXED_LOCATION.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2495__DISCR_MIXED_LOCATION.obj_num = MELTOBMAG_MIXLOC;
- cdat->dobj_2495__DISCR_MIXED_LOCATION.obj_hash = 285948470;
+ cdat->dobj_2495__DISCR_MIXED_LOCATION.obj_hash = 218423140;
cdat->dobj_2495__DISCR_MIXED_LOCATION.obj_len = 5;
@@ -39215,7 +39244,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2499__DISCR_CLOSURE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2499__DISCR_CLOSURE.obj_num = MELTOBMAG_CLOSURE;
- cdat->dobj_2499__DISCR_CLOSURE.obj_hash = 426719144;
+ cdat->dobj_2499__DISCR_CLOSURE.obj_hash = 1052916528;
cdat->dobj_2499__DISCR_CLOSURE.obj_len = 5;
@@ -39282,7 +39311,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2503__DISCR_ROUTINE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V45*/ meltfptr[44]);
cdat->dobj_2503__DISCR_ROUTINE.obj_num = MELTOBMAG_ROUTINE;
- cdat->dobj_2503__DISCR_ROUTINE.obj_hash = 115627809;
+ cdat->dobj_2503__DISCR_ROUTINE.obj_hash = 170464689;
cdat->dobj_2503__DISCR_ROUTINE.obj_len = 5;
@@ -39342,7 +39371,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2507__CONTAINER_CTYPE_GTY_DICT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V15*/ meltfptr[14]);
- cdat->dobj_2507__CONTAINER_CTYPE_GTY_DICT.obj_hash = 141260616;
+ cdat->dobj_2507__CONTAINER_CTYPE_GTY_DICT.obj_hash = 884659944;
cdat->dobj_2507__CONTAINER_CTYPE_GTY_DICT.obj_len = 1;
@@ -39392,7 +39421,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2510__CONTAINER_CTYPE_DICT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V15*/ meltfptr[14]);
- cdat->dobj_2510__CONTAINER_CTYPE_DICT.obj_hash = 1012191021;
+ cdat->dobj_2510__CONTAINER_CTYPE_DICT.obj_hash = 629826438;
cdat->dobj_2510__CONTAINER_CTYPE_DICT.obj_len = 1;
/*inirout drout_2511__INSTALL_CTYPE_DESCR */
@@ -39467,7 +39496,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2515__CTYPE_VALUE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2515__CTYPE_VALUE.obj_hash = 1009274252;
+ cdat->dobj_2515__CTYPE_VALUE.obj_hash = 942797249;
cdat->dobj_2515__CTYPE_VALUE.obj_len = 11;
@@ -39614,7 +39643,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2527__CTYPE_LONG.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2527__CTYPE_LONG.obj_hash = 94052166;
+ cdat->dobj_2527__CTYPE_LONG.obj_hash = 561261840;
cdat->dobj_2527__CTYPE_LONG.obj_len = 11;
@@ -39748,7 +39777,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2538__CTYPE_TREE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2538__CTYPE_TREE.obj_hash = 1043429625;
+ cdat->dobj_2538__CTYPE_TREE.obj_hash = 477099835;
cdat->dobj_2538__CTYPE_TREE.obj_len = 31;
@@ -40070,7 +40099,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2568__CTYPE_GIMPLE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2568__CTYPE_GIMPLE.obj_hash = 907149235;
+ cdat->dobj_2568__CTYPE_GIMPLE.obj_hash = 743925695;
cdat->dobj_2568__CTYPE_GIMPLE.obj_len = 31;
@@ -40398,7 +40427,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2598__CTYPE_GIMPLE_SEQ.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2598__CTYPE_GIMPLE_SEQ.obj_hash = 554737466;
+ cdat->dobj_2598__CTYPE_GIMPLE_SEQ.obj_hash = 1034224733;
cdat->dobj_2598__CTYPE_GIMPLE_SEQ.obj_len = 31;
@@ -40729,7 +40758,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2628__CTYPE_BASIC_BLOCK.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2628__CTYPE_BASIC_BLOCK.obj_hash = 569953928;
+ cdat->dobj_2628__CTYPE_BASIC_BLOCK.obj_hash = 124310249;
cdat->dobj_2628__CTYPE_BASIC_BLOCK.obj_len = 31;
@@ -41059,7 +41088,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2658__CTYPE_EDGE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2658__CTYPE_EDGE.obj_hash = 240206964;
+ cdat->dobj_2658__CTYPE_EDGE.obj_hash = 892059586;
cdat->dobj_2658__CTYPE_EDGE.obj_len = 31;
@@ -41377,7 +41406,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2688__CTYPE_LOOP.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2688__CTYPE_LOOP.obj_hash = 764383987;
+ cdat->dobj_2688__CTYPE_LOOP.obj_hash = 674026314;
cdat->dobj_2688__CTYPE_LOOP.obj_len = 31;
@@ -41695,7 +41724,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2718__CTYPE_RTX.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2718__CTYPE_RTX.obj_hash = 1062075623;
+ cdat->dobj_2718__CTYPE_RTX.obj_hash = 203696563;
cdat->dobj_2718__CTYPE_RTX.obj_len = 31;
@@ -42011,7 +42040,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2748__CTYPE_BITMAP.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2748__CTYPE_BITMAP.obj_hash = 20118665;
+ cdat->dobj_2748__CTYPE_BITMAP.obj_hash = 664097366;
cdat->dobj_2748__CTYPE_BITMAP.obj_len = 31;
@@ -42338,7 +42367,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2778__CTYPE_RTVEC.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]);
- cdat->dobj_2778__CTYPE_RTVEC.obj_hash = 329497427;
+ cdat->dobj_2778__CTYPE_RTVEC.obj_hash = 38912547;
cdat->dobj_2778__CTYPE_RTVEC.obj_len = 31;
@@ -42669,7 +42698,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2808__CTYPE_PPL_COEFFICIENT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2808__CTYPE_PPL_COEFFICIENT.obj_hash = 939374511;
+ cdat->dobj_2808__CTYPE_PPL_COEFFICIENT.obj_hash = 650307495;
cdat->dobj_2808__CTYPE_PPL_COEFFICIENT.obj_len = 11;
@@ -42819,7 +42848,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2819__CTYPE_PPL_LINEAR_EXPRESSION.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2819__CTYPE_PPL_LINEAR_EXPRESSION.obj_hash = 510102868;
+ cdat->dobj_2819__CTYPE_PPL_LINEAR_EXPRESSION.obj_hash = 852238136;
cdat->dobj_2819__CTYPE_PPL_LINEAR_EXPRESSION.obj_len = 11;
@@ -42969,7 +42998,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2830__CTYPE_PPL_CONSTRAINT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2830__CTYPE_PPL_CONSTRAINT.obj_hash = 968054509;
+ cdat->dobj_2830__CTYPE_PPL_CONSTRAINT.obj_hash = 642762096;
cdat->dobj_2830__CTYPE_PPL_CONSTRAINT.obj_len = 11;
@@ -43119,7 +43148,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2841__CTYPE_PPL_CONSTRAINT_SYSTEM.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2841__CTYPE_PPL_CONSTRAINT_SYSTEM.obj_hash = 747171435;
+ cdat->dobj_2841__CTYPE_PPL_CONSTRAINT_SYSTEM.obj_hash = 902177926;
cdat->dobj_2841__CTYPE_PPL_CONSTRAINT_SYSTEM.obj_len = 11;
@@ -43269,7 +43298,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2852__CTYPE_PPL_POLYHEDRON.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2852__CTYPE_PPL_POLYHEDRON.obj_hash = 591046747;
+ cdat->dobj_2852__CTYPE_PPL_POLYHEDRON.obj_hash = 966593717;
cdat->dobj_2852__CTYPE_PPL_POLYHEDRON.obj_len = 11;
@@ -43412,7 +43441,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2863__CTYPE_VOID.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2863__CTYPE_VOID.obj_hash = 944785596;
+ cdat->dobj_2863__CTYPE_VOID.obj_hash = 513955675;
cdat->dobj_2863__CTYPE_VOID.obj_len = 11;
@@ -43510,7 +43539,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
MELTOBMAG_OBJECT);
cdat->dobj_2870__CTYPE_CSTRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- cdat->dobj_2870__CTYPE_CSTRING.obj_hash = 666281050;
+ cdat->dobj_2870__CTYPE_CSTRING.obj_hash = 588389335;
cdat->dobj_2870__CTYPE_CSTRING.obj_len = 11;
@@ -43701,7 +43730,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2887__CONTAINER_CLONEMAPSTRING.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V15*/ meltfptr[14]);
- cdat->dobj_2887__CONTAINER_CLONEMAPSTRING.obj_hash = 788463862;
+ cdat->dobj_2887__CONTAINER_CLONEMAPSTRING.obj_hash = 22170769;
cdat->dobj_2887__CONTAINER_CLONEMAPSTRING.obj_len = 1;
/*inirout drout_2888__CLONE_SYMBOL */
@@ -43863,7 +43892,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2902__CLASS_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_2902__CLASS_DELAYED_QUEUE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_2902__CLASS_DELAYED_QUEUE.obj_hash = 183436369;
+ cdat->dobj_2902__CLASS_DELAYED_QUEUE.obj_hash = 477700743;
cdat->dobj_2902__CLASS_DELAYED_QUEUE.obj_len = 8;
@@ -43934,7 +43963,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2908__DELQU_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2908__DELQU_FIRST.obj_num = 2;
- cdat->dobj_2908__DELQU_FIRST.obj_hash = 193292190;
+ cdat->dobj_2908__DELQU_FIRST.obj_hash = 1010680581;
cdat->dobj_2908__DELQU_FIRST.obj_len = 4;
@@ -43990,7 +44019,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2912__DELQU_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2912__DELQU_LAST.obj_num = 3;
- cdat->dobj_2912__DELQU_LAST.obj_hash = 583906981;
+ cdat->dobj_2912__DELQU_LAST.obj_hash = 756724418;
cdat->dobj_2912__DELQU_LAST.obj_len = 4;
@@ -44043,7 +44072,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2916__DELQU_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2916__DELQU_DATA.obj_num = 4;
- cdat->dobj_2916__DELQU_DATA.obj_hash = 419941455;
+ cdat->dobj_2916__DELQU_DATA.obj_hash = 546207967;
cdat->dobj_2916__DELQU_DATA.obj_len = 4;
@@ -44098,7 +44127,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2920__FINAL_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]);
- cdat->dobj_2920__FINAL_DELAYED_QUEUE.obj_hash = 276124878;
+ cdat->dobj_2920__FINAL_DELAYED_QUEUE.obj_hash = 666025653;
cdat->dobj_2920__FINAL_DELAYED_QUEUE.obj_len = 5;
@@ -44244,8 +44273,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2933__END_MELT_PASS_EXECUTION_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]);
- cdat->dobj_2933__END_MELT_PASS_EXECUTION_DELAYED_QUEUE.obj_hash =
- 1069132583;
+ cdat->dobj_2933__END_MELT_PASS_EXECUTION_DELAYED_QUEUE.obj_hash = 220778332;
cdat->dobj_2933__END_MELT_PASS_EXECUTION_DELAYED_QUEUE.obj_len = 5;
@@ -44392,7 +44420,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2946__START_UNIT_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]);
- cdat->dobj_2946__START_UNIT_DELAYED_QUEUE.obj_hash = 430442048;
+ cdat->dobj_2946__START_UNIT_DELAYED_QUEUE.obj_hash = 980644081;
cdat->dobj_2946__START_UNIT_DELAYED_QUEUE.obj_len = 5;
@@ -44539,7 +44567,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2959__FINISH_UNIT_DELAYED_QUEUE.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V2918*/ meltfptr[2917]);
- cdat->dobj_2959__FINISH_UNIT_DELAYED_QUEUE.obj_hash = 78260551;
+ cdat->dobj_2959__FINISH_UNIT_DELAYED_QUEUE.obj_hash = 568556591;
cdat->dobj_2959__FINISH_UNIT_DELAYED_QUEUE.obj_len = 5;
@@ -44686,7 +44714,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_2972__OPTION_MAP_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V15*/ meltfptr[14]);
- cdat->dobj_2972__OPTION_MAP_CONTAINER.obj_hash = 417122603;
+ cdat->dobj_2972__OPTION_MAP_CONTAINER.obj_hash = 938676489;
cdat->dobj_2972__OPTION_MAP_CONTAINER.obj_len = 1;
@@ -44737,7 +44765,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2975__CLASS_OPTION_DESCRIPTOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_2975__CLASS_OPTION_DESCRIPTOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_2975__CLASS_OPTION_DESCRIPTOR.obj_hash = 76504901;
+ cdat->dobj_2975__CLASS_OPTION_DESCRIPTOR.obj_hash = 492125699;
cdat->dobj_2975__CLASS_OPTION_DESCRIPTOR.obj_len = 8;
@@ -44808,7 +44836,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2981__OPTDESC_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2981__OPTDESC_NAME.obj_num = 0;
- cdat->dobj_2981__OPTDESC_NAME.obj_hash = 1066167223;
+ cdat->dobj_2981__OPTDESC_NAME.obj_hash = 309874631;
cdat->dobj_2981__OPTDESC_NAME.obj_len = 4;
@@ -44867,7 +44895,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2985__OPTDESC_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2985__OPTDESC_FUN.obj_num = 1;
- cdat->dobj_2985__OPTDESC_FUN.obj_hash = 111300386;
+ cdat->dobj_2985__OPTDESC_FUN.obj_hash = 757165261;
cdat->dobj_2985__OPTDESC_FUN.obj_len = 4;
@@ -44926,7 +44954,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_2989__OPTDESC_HELP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_2989__OPTDESC_HELP.obj_num = 2;
- cdat->dobj_2989__OPTDESC_HELP.obj_hash = 500440698;
+ cdat->dobj_2989__OPTDESC_HELP.obj_hash = 210810162;
cdat->dobj_2989__OPTDESC_HELP.obj_len = 4;
@@ -45088,7 +45116,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3003__MELT_ERROR_COUNTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_3003__MELT_ERROR_COUNTER.obj_hash = 219355580;
+ cdat->dobj_3003__MELT_ERROR_COUNTER.obj_hash = 1069058436;
cdat->dobj_3003__MELT_ERROR_COUNTER.obj_len = 5;
/*inimult dtup_3004__MELT_ERROR_COUNTER */
@@ -45177,7 +45205,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3010__INITIAL_SYSTEM_DATA.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- cdat->dobj_3010__INITIAL_SYSTEM_DATA.obj_hash = 212615284;
+ cdat->dobj_3010__INITIAL_SYSTEM_DATA.obj_hash = 364547622;
cdat->dobj_3010__INITIAL_SYSTEM_DATA.obj_len = 40;
@@ -45245,7 +45273,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3016__FOREACH_PAIR_BETWEEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_3016__FOREACH_PAIR_BETWEEN.obj_hash = 341201262;
+ cdat->dobj_3016__FOREACH_PAIR_BETWEEN.obj_hash = 532894368;
cdat->dobj_3016__FOREACH_PAIR_BETWEEN.obj_len = 7;
@@ -45302,7 +45330,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3020.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3020.obj_num = 0;
- cdat->dobj_3020.obj_hash = 36869582;
+ cdat->dobj_3020.obj_hash = 600173845;
cdat->dobj_3020.obj_len = 2;
@@ -45349,7 +45377,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3023.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3023.obj_num = 1;
- cdat->dobj_3023.obj_hash = 168560196;
+ cdat->dobj_3023.obj_hash = 416792230;
cdat->dobj_3023.obj_len = 2;
/*inimult dtup_3024__FOREACH_PAIR_BETWEEN */
@@ -45428,7 +45456,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3029.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3029.obj_num = 0;
- cdat->dobj_3029.obj_hash = 378348894;
+ cdat->dobj_3029.obj_hash = 546728177;
cdat->dobj_3029.obj_len = 2;
@@ -45475,7 +45503,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3032.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3032.obj_num = 1;
- cdat->dobj_3032.obj_hash = 159700639;
+ cdat->dobj_3032.obj_hash = 207792926;
cdat->dobj_3032.obj_len = 2;
/*inimult dtup_3033__FOREACH_PAIR_BETWEEN */
@@ -45617,7 +45645,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3049__FOREACH_PAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_3049__FOREACH_PAIR.obj_hash = 249014968;
+ cdat->dobj_3049__FOREACH_PAIR.obj_hash = 767687837;
cdat->dobj_3049__FOREACH_PAIR.obj_len = 7;
@@ -45648,7 +45676,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3051.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3051.obj_num = 0;
- cdat->dobj_3051.obj_hash = 959450837;
+ cdat->dobj_3051.obj_hash = 67134547;
cdat->dobj_3051.obj_len = 2;
/*inimult dtup_3052__FOREACH_PAIR */
@@ -45701,7 +45729,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3055.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3055.obj_num = 0;
- cdat->dobj_3055.obj_hash = 954883138;
+ cdat->dobj_3055.obj_hash = 729180005;
cdat->dobj_3055.obj_len = 2;
/*^iniobj */
@@ -45722,7 +45750,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3056.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3056.obj_num = 1;
- cdat->dobj_3056.obj_hash = 300151160;
+ cdat->dobj_3056.obj_hash = 804901368;
cdat->dobj_3056.obj_len = 2;
/*inimult dtup_3057__FOREACH_PAIR */
@@ -45849,7 +45877,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3071__FOREACH_IN_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_3071__FOREACH_IN_LIST.obj_hash = 647635464;
+ cdat->dobj_3071__FOREACH_IN_LIST.obj_hash = 1039405239;
cdat->dobj_3071__FOREACH_IN_LIST.obj_len = 7;
@@ -45906,7 +45934,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3075.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3075.obj_num = 0;
- cdat->dobj_3075.obj_hash = 764311317;
+ cdat->dobj_3075.obj_hash = 786288090;
cdat->dobj_3075.obj_len = 2;
/*inimult dtup_3076__FOREACH_IN_LIST */
@@ -45959,7 +45987,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3079.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3079.obj_num = 0;
- cdat->dobj_3079.obj_hash = 434706494;
+ cdat->dobj_3079.obj_hash = 783243313;
cdat->dobj_3079.obj_len = 2;
/*^iniobj */
@@ -45980,7 +46008,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3080.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3080.obj_num = 1;
- cdat->dobj_3080.obj_hash = 859272230;
+ cdat->dobj_3080.obj_hash = 601365048;
cdat->dobj_3080.obj_len = 2;
/*inimult dtup_3081__FOREACH_IN_LIST */
@@ -46246,7 +46274,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3110__FOREACH_IN_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_3110__FOREACH_IN_MULTIPLE.obj_hash = 223336673;
+ cdat->dobj_3110__FOREACH_IN_MULTIPLE.obj_hash = 495908612;
cdat->dobj_3110__FOREACH_IN_MULTIPLE.obj_len = 7;
@@ -46303,7 +46331,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3114.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3114.obj_num = 0;
- cdat->dobj_3114.obj_hash = 634444293;
+ cdat->dobj_3114.obj_hash = 1036817542;
cdat->dobj_3114.obj_len = 2;
/*inimult dtup_3115__FOREACH_IN_MULTIPLE */
@@ -46382,7 +46410,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3120.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3120.obj_num = 0;
- cdat->dobj_3120.obj_hash = 191081432;
+ cdat->dobj_3120.obj_hash = 983349514;
cdat->dobj_3120.obj_len = 2;
/*^iniobj */
@@ -46403,7 +46431,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3121.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3121.obj_num = 1;
- cdat->dobj_3121.obj_hash = 459787423;
+ cdat->dobj_3121.obj_hash = 407747077;
cdat->dobj_3121.obj_len = 2;
/*inimult dtup_3122__FOREACH_IN_MULTIPLE */
@@ -46553,7 +46581,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3140__FOREACH_IN_MULTIPLE_BACKWARD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CITERATOR))));
- cdat->dobj_3140__FOREACH_IN_MULTIPLE_BACKWARD.obj_hash = 555161279;
+ cdat->dobj_3140__FOREACH_IN_MULTIPLE_BACKWARD.obj_hash = 534594259;
cdat->dobj_3140__FOREACH_IN_MULTIPLE_BACKWARD.obj_len = 7;
@@ -46584,7 +46612,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3142.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3142.obj_num = 0;
- cdat->dobj_3142.obj_hash = 268979293;
+ cdat->dobj_3142.obj_hash = 723779432;
cdat->dobj_3142.obj_len = 2;
/*inimult dtup_3143__FOREACH_IN_MULTIPLE_BACKWARD */
@@ -46640,7 +46668,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3146.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3146.obj_num = 0;
- cdat->dobj_3146.obj_hash = 1008206628;
+ cdat->dobj_3146.obj_hash = 27155736;
cdat->dobj_3146.obj_len = 2;
/*^iniobj */
@@ -46661,7 +46689,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
cdat->dobj_3147.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_3147.obj_num = 1;
- cdat->dobj_3147.obj_hash = 560272005;
+ cdat->dobj_3147.obj_hash = 503025819;
cdat->dobj_3147.obj_len = 2;
/*inimult dtup_3148__FOREACH_IN_MULTIPLE_BACKWARD */
@@ -47042,7 +47070,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_3190__INITIAL_ENVIRONMENT.meltobj_class =
(meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]);
- cdat->dobj_3190__INITIAL_ENVIRONMENT.obj_hash = 827216056;
+ cdat->dobj_3190__INITIAL_ENVIRONMENT.obj_hash = 346266495;
cdat->dobj_3190__INITIAL_ENVIRONMENT.obj_len = 4;
@@ -48697,7 +48725,7 @@ start_module_melt (void *modargp_)
/**initial routine prologue**/
/* set initial frame marking */
((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -1933;
+ /*minihash */ -1254;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_first;
/**COMMENT: get previous environment **/ ;
@@ -129554,7 +129582,14 @@ warmelt_first_initialmeltchunk_40 (struct frame_start_module_melt_st
/*^clear */
/*clear *//*_.D__V3365*/ meltfptr[3364] = 0;
MELT_LOCATION ("warmelt-first.melt:3932:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VALDATA___V2961*/ meltfptr[2960]), (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VALDATA___V2961*/
+ meltfptr[2960]),
+ (melt_ptr_t) ( /*_.VALDATA___V455*/
+ meltfptr[454]))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -141242,7 +141277,7 @@ forward_or_mark_module_start_frame_warmelt_first (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -1933);
+ meltframptr_->mcfr_nbvar == /*minihash */ -1254);
if (!marking && melt_is_forwarding)
{
dbgprintf
diff --git a/gcc/melt/generated/warmelt-genobj+01.c b/gcc/melt/generated/warmelt-genobj+01.c
index b3ca6e9ec5e..b8902e9eaed 100644
--- a/gcc/melt/generated/warmelt-genobj+01.c
+++ b/gcc/melt/generated/warmelt-genobj+01.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -5775,7 +5851,12 @@ lab_endgetargs:;
/*_.RESTNAM__V18*/ meltfptr[17] = ( /*nil */ NULL);;
MELT_LOCATION ("warmelt-genobj.melt:931:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5794,7 +5875,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:932:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5868,7 +5954,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:940:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5999,7 +6090,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:953:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PRONAM__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PRONAM__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6656,7 +6753,12 @@ lab_endgetargs:;
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[27])),
( /*_#NEWNBFILES__L24*/ meltfnum[23])));;
MELT_LOCATION ("warmelt-genobj.melt:1040:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -9304,7 +9406,12 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
MELT_LOCATION ("warmelt-genobj.melt:1109:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9814,7 +9921,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:1150:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.IPRO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.IPRO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10090,7 +10202,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURDEFBIND__V64*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[20])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURDEFBIND__V64*/
+ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[20])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10109,7 +10227,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:1161:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURDEFBIND__V64*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[21])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURDEFBIND__V64*/
+ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[21])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14501,7 +14625,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:1324:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.IMPSYM__V9*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.IMPSYM__V9*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14520,7 +14650,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:1325:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MODCTX */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MODCTX */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19137,7 +19273,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:1534:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYP__V4*/
+ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19156,7 +19298,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:1533:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V51*/ meltfptr[49]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[12])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V51*/ meltfptr[49]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20057,7 +20204,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-genobj.melt:1562:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OLDLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OLDLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJLOCV */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
diff --git a/gcc/melt/generated/warmelt-genobj+02.c b/gcc/melt/generated/warmelt-genobj+02.c
index 3ac4c40156d..4db1a5a87ec 100644
--- a/gcc/melt/generated/warmelt-genobj+02.c
+++ b/gcc/melt/generated/warmelt-genobj+02.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8998,7 +9074,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:2019:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLABIND__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_LABEL_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLABIND__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_LABEL_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12503,7 +12584,13 @@ lab_endgetargs:;
/*_.D__V12*/ meltfptr[8] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-genobj.melt:2144:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.D__V12*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.D__V12*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13017,7 +13104,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13049,7 +13141,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2157:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13068,7 +13165,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2158:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14617,7 +14719,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14649,7 +14756,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2216:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15900,7 +16012,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15932,7 +16049,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2259:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15951,7 +16073,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2260:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17158,7 +17285,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17190,7 +17322,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2299:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17209,7 +17346,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2300:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18328,7 +18470,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18360,7 +18507,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2340:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18379,7 +18531,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2341:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18699,7 +18856,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2353:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLAS__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLAS__V24*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20157,7 +20320,12 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
MELT_LOCATION ("warmelt-genobj.melt:2406:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20176,7 +20344,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:2407:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OBROUT__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OBROUT__V24*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20845,7 +21019,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURLOCSYM__V45*/ meltfptr[41]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURLOCSYM__V45*/
+ meltfptr[41]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-genobj+03.c b/gcc/melt/generated/warmelt-genobj+03.c
index 2d26838b0d9..b5ffab95c20 100644
--- a/gcc/melt/generated/warmelt-genobj+03.c
+++ b/gcc/melt/generated/warmelt-genobj+03.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -11009,7 +11085,12 @@ lab_endgetargs:;
(( /*!DISCR_STRBUF */ meltfrout->tabval[4])),
(char *) 0);;
MELT_LOCATION ("warmelt-genobj.melt:3302:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11132,7 +11213,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:3318:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V13*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V13*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11809,7 +11895,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:3346:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11900,7 +11991,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:3358:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12573,7 +12669,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:3388:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12731,7 +12832,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:3402:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13386,7 +13492,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:3427:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14091,7 +14202,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-genobj.melt:3464:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14120,7 +14236,12 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.NLOCSYMS__V20*/ meltfptr[19]),
( /*_#BINDNUM__L5*/ meltfnum[1])));;
MELT_LOCATION ("warmelt-genobj.melt:3467:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14527,7 +14648,14 @@ lab_endgetargs:;
;
/*_.ININST__V38*/ meltfptr[30] = /*_.INST__V39*/ meltfptr[31];;
MELT_LOCATION ("warmelt-genobj.melt:3491:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLAS__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLAS__V26*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->
+ tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20255,8 +20383,8 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 39
- void *mcfr_varptr[39];
+#define MELTFRAM_NBVARPTR 33
+ void *mcfr_varptr[33];
#define MELTFRAM_NBVARNUM 8
long mcfr_varnum[8];
/*others*/
@@ -20269,13 +20397,13 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 39; ix++)
+ for (ix = 0; ix < 33; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 39;
+ meltfram__.mcfr_nbvar = 33;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -20309,51 +20437,91 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NREP_IFISA */
- meltfrout->tabval[0])));;
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:3738:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:3738:/ cond.else");
-
/*^block */
/*anyblock */
{
-
-
-
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:3738:/ apply");
+ /*apply */
{
- /*^locexp */
- melt_assert_failed (("check rif"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (3738) ? (3738) : __LINE__, __FUNCTION__);
- ;
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3738;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_ifisa rif=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RIF__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
+ 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___V5*/ meltfptr[4] = 0;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3738:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
}
;
}
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
;
+ MELT_LOCATION ("warmelt-genobj.melt:3738:/ quasiblock");
+
+
+ /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
/*^compute */
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
MELT_LOCATION ("warmelt-genobj.melt:3738:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
}
#else /*MELT_HAVE_DEBUG */
@@ -20368,15 +20536,15 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#IS_A__L2*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFISA */
meltfrout->tabval[1])));;
MELT_LOCATION ("warmelt-genobj.melt:3739:/ cond");
- /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
}
else
{
@@ -20391,14 +20559,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check gcx"),
+ melt_assert_failed (("check rif"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
(3739) ? (3739) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
/*epilog */
}
;
@@ -20406,18 +20574,18 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
MELT_LOCATION ("warmelt-genobj.melt:3739:/ clear");
- /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
@@ -20427,97 +20595,56 @@ lab_endgetargs:;
/*anyblock */
{
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L3*/ meltfnum[0] =
- /*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_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[2])));;
MELT_LOCATION ("warmelt-genobj.melt:3740:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:3740:/ cond.else");
+
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3740:/ apply");
- /*apply */
+
+
+
{
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 3740;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "compilobj_nrep_ifisa rif=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.RIF__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (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 gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (3740) ? (3740) : __LINE__, __FUNCTION__);
+ ;
}
;
- /*_.IF___V9*/ meltfptr[8] =
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
/*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:3740:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
}
;
}
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
;
- MELT_LOCATION ("warmelt-genobj.melt:3740:/ quasiblock");
-
-
- /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
/*^compute */
- /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
MELT_LOCATION ("warmelt-genobj.melt:3740:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.PROGN___V11*/ meltfptr[9] = 0;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-genobj.melt:3741:/ quasiblock");
@@ -20528,7 +20655,7 @@ lab_endgetargs:;
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 0, "NREP_LOC");
/*_.LOC__V13*/
- meltfptr[9] = slot;
+ meltfptr[12] = slot;
};
;
MELT_LOCATION ("warmelt-genobj.melt:3742:/ getslot");
@@ -20556,7 +20683,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-genobj.melt:3745:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_IFTESTVALUE */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFTESTVALUE */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20589,12 +20721,12 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#IS_A__L5*/ meltfnum[3] =
+ /*_#IS_A__L5*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NCTYP__V16*/ meltfptr[15]),
(melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->
tabval[4])));;
MELT_LOCATION ("warmelt-genobj.melt:3748:/ cond");
- /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
+ /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*_.IFELSE___V20*/ meltfptr[19] = ( /*nil */ NULL);;
@@ -20631,7 +20763,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION ("warmelt-genobj.melt:3748:/ clear");
- /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
+ /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
}
@@ -20728,159 +20860,36 @@ lab_endgetargs:;
/*_.OELSE__V25*/ meltfptr[24] = NULL;;
}
;
- /*^compute */
-
- /*_.MAKE_STRINGCONST__V27*/ meltfptr[25] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t)
- (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[8])),
- ("/*ifisa*/ melt_is_instance_of((melt_ptr_t)(")));;
- /*^compute */
-
- /*_.MAKE_STRINGCONST__V28*/ meltfptr[27] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t)
- (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[8])),
- ("), (melt_ptr_t)(")));;
- /*^compute */
-
- /*_.MAKE_STRINGCONST__V29*/ meltfptr[28] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t)
- (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[8])), ("))")));;
- MELT_LOCATION ("warmelt-genobj.melt:3756:/ blockmultialloc");
- /*multiallocblock */
- {
- struct meltletrec_1_st
- {
- struct MELT_MULTIPLE_STRUCT (5) rtup_0__TUPLREC__x7;
- long meltletrec_1_endgap;
- } *meltletrec_1_ptr = 0;
- meltletrec_1_ptr =
- (struct meltletrec_1_st *)
- meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
- /*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x7 */
- /*_.TUPLREC___V31*/ meltfptr[30] =
- (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x7;
- meltletrec_1_ptr->rtup_0__TUPLREC__x7.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- meltletrec_1_ptr->rtup_0__TUPLREC__x7.nbval = 5;
-
-
- /*^putuple */
- /*putupl#20 */
- melt_assertmsg ("putupl [:3756] #20 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/ meltfptr[30]))
- == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3756] #20 checkoff",
- (0 >= 0
- && 0 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/
- meltfptr[30]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V31*/ meltfptr[30]))->tabval[0] =
- (melt_ptr_t) ( /*_.MAKE_STRINGCONST__V27*/ meltfptr[25]);
- ;
- /*^putuple */
- /*putupl#21 */
- melt_assertmsg ("putupl [:3756] #21 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/ meltfptr[30]))
- == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3756] #21 checkoff",
- (1 >= 0
- && 1 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/
- meltfptr[30]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V31*/ meltfptr[30]))->tabval[1] =
- (melt_ptr_t) ( /*_.OVAL__V23*/ meltfptr[22]);
- ;
- /*^putuple */
- /*putupl#22 */
- melt_assertmsg ("putupl [:3756] #22 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/ meltfptr[30]))
- == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3756] #22 checkoff",
- (2 >= 0
- && 2 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/
- meltfptr[30]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V31*/ meltfptr[30]))->tabval[2] =
- (melt_ptr_t) ( /*_.MAKE_STRINGCONST__V28*/ meltfptr[27]);
- ;
- /*^putuple */
- /*putupl#23 */
- melt_assertmsg ("putupl [:3756] #23 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/ meltfptr[30]))
- == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3756] #23 checkoff",
- (3 >= 0
- && 3 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/
- meltfptr[30]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V31*/ meltfptr[30]))->tabval[3] =
- (melt_ptr_t) ( /*_.OCLA__V24*/ meltfptr[23]);
- ;
- /*^putuple */
- /*putupl#24 */
- melt_assertmsg ("putupl [:3756] #24 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/ meltfptr[30]))
- == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3756] #24 checkoff",
- (4 >= 0
- && 4 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V31*/
- meltfptr[30]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V31*/ meltfptr[30]))->tabval[4] =
- (melt_ptr_t) ( /*_.MAKE_STRINGCONST__V29*/ meltfptr[28]);
- ;
- /*^touch */
- meltgc_touch ( /*_.TUPLREC___V31*/ meltfptr[30]);
- ;
- /*_.TUPLE___V30*/ meltfptr[29] = /*_.TUPLREC___V31*/ meltfptr[30];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:3756:/ clear");
- /*clear *//*_.TUPLREC___V31*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.TUPLREC___V31*/ meltfptr[30] = 0;
- } /*end multiallocblock */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:3754:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
+ MELT_LOCATION ("warmelt-genobj.melt:3754:/ apply");
+ /*apply */
{
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_OBJEXPV */ meltfrout->
- tabval[7])), (2),
- "CLASS_OBJEXPV");
- /*_.INST__V33*/ meltfptr[32] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBX_CONT",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V33*/ meltfptr[32])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V33*/ meltfptr[32]), (1),
- ( /*_.TUPLE___V30*/ meltfptr[29]), "OBX_CONT");
+ union meltparam_un argtab[6];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!CTYPE_LONG */ meltfrout->tabval[8]);
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "/*ifisa*/ melt_is_instance_of((melt_ptr_t)(";
+ /*^apply.arg */
+ argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.OVAL__V23*/ meltfptr[22];
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "), \n (melt_ptr_t)(";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.OCLA__V24*/ meltfptr[23];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "))\n\t\t\t\t ";
+ /*_.OTEST__V27*/ meltfptr[25] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJLOCATEDEXP */ meltfrout->tabval[7])),
+ (melt_ptr_t) ( /*_.LOC__V13*/ meltfptr[12]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR
+ MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
;
- /*_.OTEST__V32*/ meltfptr[30] = /*_.INST__V33*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-genobj.melt:3766:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3758:/ quasiblock");
/*^rawallocobj */
@@ -20891,7 +20900,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_OBJCOND */ meltfrout->
tabval[9])), (4),
"CLASS_OBJCOND");
- /*_.INST__V35*/ meltfptr[34] =
+ /*_.INST__V29*/ meltfptr[28] =
newobj;
};
;
@@ -20899,42 +20908,42 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @OBI_LOC",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
+ ( /*_.INST__V29*/ meltfptr[28])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (0),
- ( /*_.LOC__V13*/ meltfptr[9]), "OBI_LOC");
+ melt_putfield_object (( /*_.INST__V29*/ meltfptr[28]), (0),
+ ( /*_.LOC__V13*/ meltfptr[12]), "OBI_LOC");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @OBCOND_TEST",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
+ ( /*_.INST__V29*/ meltfptr[28])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (1),
- ( /*_.OTEST__V32*/ meltfptr[30]), "OBCOND_TEST");
+ melt_putfield_object (( /*_.INST__V29*/ meltfptr[28]), (1),
+ ( /*_.OTEST__V27*/ meltfptr[25]), "OBCOND_TEST");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @OBCOND_THEN",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
+ ( /*_.INST__V29*/ meltfptr[28])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (2),
+ melt_putfield_object (( /*_.INST__V29*/ meltfptr[28]), (2),
( /*_.OTHEN__V22*/ meltfptr[21]), "OBCOND_THEN");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @OBCOND_ELSE",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
+ ( /*_.INST__V29*/ meltfptr[28])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (3),
+ melt_putfield_object (( /*_.INST__V29*/ meltfptr[28]), (3),
( /*_.OELSE__V25*/ meltfptr[24]), "OBCOND_ELSE");
;
- /*_.OBIF__V34*/ meltfptr[33] = /*_.INST__V35*/ meltfptr[34];;
+ /*_.OBIF__V28*/ meltfptr[27] = /*_.INST__V29*/ meltfptr[28];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20949,7 +20958,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L7*/ meltfnum[3] =
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[1] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -20957,8 +20966,8 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[3]) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
@@ -20967,7 +20976,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20977,15 +20986,15 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3772;
+ argtab[2].meltbp_long = 3764;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_ifisa obif=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OBIF__V34*/ meltfptr[33];
- /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] =
+ (melt_ptr_t *) & /*_.OBIF__V28*/ meltfptr[27];
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
@@ -20993,48 +21002,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V37*/ meltfptr[36] =
- /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
+ /*_.IF___V31*/ meltfptr[30] =
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V37*/ meltfptr[36] = NULL;;
+ /*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ quasiblock");
- /*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];;
+ /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
/*^compute */
- /*_.IFCPP___V36*/ meltfptr[35] = /*_.PROGN___V39*/ meltfptr[37];;
+ /*_.IFCPP___V30*/ meltfptr[29] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3772:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[3] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:3764:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IF___V37*/ meltfptr[36] = 0;
+ /*clear *//*_.IF___V31*/ meltfptr[30] = 0;
/*^clear */
- /*clear *//*_.PROGN___V39*/ meltfptr[37] = 0;
+ /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V36*/ meltfptr[35] = ( /*nil */ NULL);
+ /*_.IFCPP___V30*/ meltfptr[29] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V21*/ meltfptr[19] = /*_.OBIF__V34*/ meltfptr[33];;
+ /*_.LET___V21*/ meltfptr[19] = /*_.OBIF__V28*/ meltfptr[27];;
MELT_LOCATION ("warmelt-genobj.melt:3749:/ clear");
/*clear *//*_.OTHEN__V22*/ meltfptr[21] = 0;
@@ -21047,23 +21056,15 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.OELSE__V25*/ meltfptr[24] = 0;
/*^clear */
- /*clear *//*_.MAKE_STRINGCONST__V27*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.MAKE_STRINGCONST__V28*/ meltfptr[27] = 0;
+ /*clear *//*_.OTEST__V27*/ meltfptr[25] = 0;
/*^clear */
- /*clear *//*_.MAKE_STRINGCONST__V29*/ meltfptr[28] = 0;
+ /*clear *//*_.OBIF__V28*/ meltfptr[27] = 0;
/*^clear */
- /*clear *//*_.TUPLE___V30*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_.OTEST__V32*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.OBIF__V34*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V36*/ meltfptr[35] = 0;
- /*_.LET___V12*/ meltfptr[8] = /*_.LET___V21*/ meltfptr[19];;
+ /*clear *//*_.IFCPP___V30*/ meltfptr[29] = 0;
+ /*_.LET___V12*/ meltfptr[10] = /*_.LET___V21*/ meltfptr[19];;
MELT_LOCATION ("warmelt-genobj.melt:3741:/ clear");
- /*clear *//*_.LOC__V13*/ meltfptr[9] = 0;
+ /*clear *//*_.LOC__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NTHEN__V14*/ meltfptr[13] = 0;
/*^clear */
@@ -21081,7 +21082,7 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-genobj.melt:3737:/ quasiblock");
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
MELT_LOCATION ("warmelt-genobj.melt:3737:/ finalreturn");
;
/*finalret */ goto labend_rout;
@@ -21090,11 +21091,11 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[6] = 0;
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
/*^clear */
- /*clear *//*_.LET___V12*/ meltfptr[8] = 0;
+ /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
}
;
@@ -21114,7 +21115,819 @@ labend_rout:
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 34
+ void *mcfr_varptr[34];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 34; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 34;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPILOBJ_NREP_IFTUPLESIZED", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ getarg");
+ /*_.RIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.GCX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3772:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:3772:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:3772:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3772;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_ifisa rif=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RIF__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
+ 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);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3772:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3772:/ quasiblock");
+
+
+ /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3772:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3773:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFTUPLESIZED */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:3773:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:3773:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check rif"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (3773) ? (3773) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3773:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3774:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-genobj.melt:3774:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:3774:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (3774) ? (3774) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3774:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3775:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.LOC__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3776:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 2, "NIF_THEN");
+ /*_.NTHEN__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3777:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 3, "NIF_ELSE");
+ /*_.NELSE__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3778:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFTESTVALUE */ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 4, "NIF_TESTVAL");
+ /*_.NVAL__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NVAL__V16*/ meltfptr[15] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3779:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFTUPLESIZED */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 5, "NIF_TUPSIZ");
+ /*_.NTSZ__V17*/
+ meltfptr[16] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NTSZ__V17*/ meltfptr[16] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3781:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-genobj.melt:3781:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:3781:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3781;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_iftuplesized nval=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NVAL__V16*/ meltfptr[15];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " ntsz=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NTSZ__V17*/ meltfptr[16];
+ /*_.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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V19*/ meltfptr[18] =
+ /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3781:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V19*/ meltfptr[18] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3781:/ quasiblock");
+
+
+ /*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
+ /*^compute */
+
+ /*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3781:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V21*/ meltfptr[19] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3782:/ quasiblock");
+
+
+ /*^msend */
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.OTHEN__V23*/ meltfptr[19] =
+ meltgc_send ((melt_ptr_t) ( /*_.NTHEN__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->tabval[4])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3783:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.OVAL__V24*/ meltfptr[23] =
+ meltgc_send ((melt_ptr_t) ( /*_.NVAL__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->tabval[4])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3784:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.OELSE__V25*/ meltfptr[24] =
+ meltgc_send ((melt_ptr_t) ( /*_.NELSE__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->tabval[4])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3785:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.OVAL__V26*/ meltfptr[25] =
+ meltgc_send ((melt_ptr_t) ( /*_.NVAL__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->tabval[4])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3786:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.OTSZ__V27*/ meltfptr[26] =
+ meltgc_send ((melt_ptr_t) ( /*_.NTSZ__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->tabval[4])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3788:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[8];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!CTYPE_LONG */ meltfrout->tabval[6]);
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "/*iftuplesized*/ melt_magic_discr((melt_ptr_t)(";
+ /*^apply.arg */
+ argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.OVAL__V26*/ meltfptr[25];
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ ")) == MELTOBMAG_MULTIPLE\n\t\t\t\t && ((meltmultiple_ptr_t)(";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.OVAL__V26*/ meltfptr[25];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "))->nbval == (int)(";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.OTSZ__V27*/ meltfptr[26];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = ")";
+ /*_.OTEST__V28*/ meltfptr[27] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJLOCATEDEXP */ meltfrout->tabval[5])),
+ (melt_ptr_t) ( /*_.LOC__V13*/ meltfptr[12]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR
+ MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3791:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_OBJCOND */ meltfrout->
+ tabval[7])), (4),
+ "CLASS_OBJCOND");
+ /*_.INST__V30*/ meltfptr[29] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBI_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V30*/ meltfptr[29])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V30*/ meltfptr[29]), (0),
+ ( /*_.LOC__V13*/ meltfptr[12]), "OBI_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBCOND_TEST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V30*/ meltfptr[29])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V30*/ meltfptr[29]), (1),
+ ( /*_.OTEST__V28*/ meltfptr[27]), "OBCOND_TEST");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBCOND_THEN",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V30*/ meltfptr[29])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V30*/ meltfptr[29]), (2),
+ ( /*_.OTHEN__V23*/ meltfptr[19]), "OBCOND_THEN");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBCOND_ELSE",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V30*/ meltfptr[29])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V30*/ meltfptr[29]), (3),
+ ( /*_.OELSE__V25*/ meltfptr[24]), "OBCOND_ELSE");
+ ;
+ /*_.OBIF__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3797:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:3797:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:3797:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3797;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_iftuplesized obif=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBIF__V29*/ meltfptr[28];
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] =
+ 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);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[31] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3797:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3797:/ quasiblock");
+
+
+ /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
+ /*^compute */
+
+ /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3797:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V34*/ meltfptr[32] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V22*/ meltfptr[18] = /*_.OBIF__V29*/ meltfptr[28];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:3782:/ clear");
+ /*clear *//*_.OTHEN__V23*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.OVAL__V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.OELSE__V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.OVAL__V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.OTSZ__V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.OTEST__V28*/ meltfptr[27] = 0;
+ /*^clear */
+ /*clear *//*_.OBIF__V29*/ meltfptr[28] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
+ /*_.LET___V12*/ meltfptr[10] = /*_.LET___V22*/ meltfptr[18];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:3775:/ clear");
+ /*clear *//*_.LOC__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.NTHEN__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NELSE__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.NVAL__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.NTSZ__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V22*/ meltfptr[18] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPILOBJ_NREP_IFTUPLESIZED", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -21139,7 +21952,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC_st
+ struct frame_meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21178,7 +21991,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ getarg");
/*_.RIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21199,7 +22012,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3780:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3804:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21208,7 +22021,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_IFVARIADIC */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:3780:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3804:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21216,7 +22029,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3780:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3804:/ cond.else");
/*^block */
/*anyblock */
@@ -21230,7 +22043,7 @@ lab_endgetargs:;
melt_assert_failed (("check rif"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3780) ? (3780) : __LINE__, __FUNCTION__);
+ (3804) ? (3804) : __LINE__, __FUNCTION__);
;
}
;
@@ -21245,7 +22058,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3780:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3804:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -21258,7 +22071,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3781:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3805:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21267,7 +22080,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:3781:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3805:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21275,7 +22088,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3781:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3805:/ cond.else");
/*^block */
/*anyblock */
@@ -21289,7 +22102,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3781) ? (3781) : __LINE__, __FUNCTION__);
+ (3805) ? (3805) : __LINE__, __FUNCTION__);
;
}
;
@@ -21304,7 +22117,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3781:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3805:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -21317,7 +22130,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21340,7 +22153,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21350,7 +22163,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21360,7 +22173,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3782;
+ argtab[2].meltbp_long = 3806;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_ifvariadic rif=";
/*^apply.arg */
@@ -21380,7 +22193,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -21393,7 +22206,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -21402,7 +22215,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3782:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3806:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -21415,7 +22228,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3783:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3807:/ quasiblock");
/*^getslot */
@@ -21426,7 +22239,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3784:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3808:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 2, "NIF_THEN");
@@ -21434,7 +22247,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3785:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3809:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 3, "NIF_ELSE");
@@ -21442,7 +22255,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3786:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3810:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 4, "NIFV_VARIADIC");
@@ -21450,7 +22263,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3787:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3811:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]), 5, "NIFV_CTYPES");
@@ -21463,7 +22276,7 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.NVCTYPES__V17*/ meltfptr[16])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3790:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3814:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21474,7 +22287,7 @@ lab_endgetargs:;
(melt_unsafe_magic_discr
((melt_ptr_t) ( /*_.NVCTYPES__V17*/ meltfptr[16])) ==
MELTOBMAG_MULTIPLE));;
- MELT_LOCATION ("warmelt-genobj.melt:3790:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3814:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21482,7 +22295,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3790:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3814:/ cond.else");
/*^block */
/*anyblock */
@@ -21496,7 +22309,7 @@ lab_endgetargs:;
melt_assert_failed (("check nvctypes"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3790) ? (3790) : __LINE__, __FUNCTION__);
+ (3814) ? (3814) : __LINE__, __FUNCTION__);
;
}
;
@@ -21511,7 +22324,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3790:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3814:/ clear");
/*clear *//*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
@@ -21524,7 +22337,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3791:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3815:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21534,7 +22347,7 @@ lab_endgetargs:;
( /*_.NVARIADIC__V16*/ meltfptr[15]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:3791:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3815:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21542,7 +22355,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3791:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3815:/ cond.else");
/*^block */
/*anyblock */
@@ -21556,7 +22369,7 @@ lab_endgetargs:;
melt_assert_failed (("check nvariadic"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3791) ? (3791) : __LINE__, __FUNCTION__);
+ (3815) ? (3815) : __LINE__, __FUNCTION__);
;
}
;
@@ -21571,7 +22384,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3791:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3815:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
@@ -21584,7 +22397,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21607,7 +22420,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21617,7 +22430,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -21627,7 +22440,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3792;
+ argtab[2].meltbp_long = 3816;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_ifvariadic nthen=";
/*^apply.arg */
@@ -21659,7 +22472,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -21672,7 +22485,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
@@ -21681,7 +22494,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[20] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3792:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3816:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[22] = 0;
@@ -21694,10 +22507,10 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[20] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3793:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3817:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:3794:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3818:/ apply");
/*apply */
{
/*_.OVARIADICINDEX__V27*/ meltfptr[23] =
@@ -21707,7 +22520,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3795:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3819:/ apply");
/*apply */
{
/*_.OVARIADICLENGTH__V28*/ meltfptr[27] =
@@ -21719,7 +22532,7 @@ lab_endgetargs:;
;
/*_#I__L10*/ meltfnum[8] =
(( /*_#NBVARARG__L5*/ meltfnum[3]) <= (0));;
- MELT_LOCATION ("warmelt-genobj.melt:3797:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3821:/ cond");
/*cond */ if ( /*_#I__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -21739,7 +22552,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])),
(" == ")));;
- MELT_LOCATION ("warmelt-genobj.melt:3798:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:3822:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -21787,7 +22600,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-genobj.melt:3799:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3823:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /5 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -21799,7 +22612,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /7f77a8e checkpair",
+ melt_assertmsg ("putpairtail /31da72d3 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V33*/
meltfptr[32])) ==
@@ -21810,7 +22623,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V33*/ meltfptr[32]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3798:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3822:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /6 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -21822,7 +22635,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /7420f8a checkpair",
+ melt_assertmsg ("putpairtail /3771c76d checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.OVARIADICINDEX__V34*/
meltfptr[33])) ==
@@ -21833,7 +22646,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.OVARIADICINDEX__V34*/ meltfptr[33]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3801:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3825:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /7 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -21845,7 +22658,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /18b59653 checkpair",
+ melt_assertmsg ("putpairtail /c707dcd checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V35*/
meltfptr[34])) ==
@@ -21856,7 +22669,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V35*/ meltfptr[34]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3798:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3822:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /8 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -21887,7 +22700,7 @@ lab_endgetargs:;
/*_.LIST___V32*/ meltfptr[31] = /*_.LIST___V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3798:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3822:/ clear");
/*clear *//*_.PAIROFLIST__V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.OVARIADICINDEX__V34*/ meltfptr[33] = 0;
@@ -21913,7 +22726,7 @@ lab_endgetargs:;
/*_.LIST___V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3797:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3821:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.MAKE_STRINGCONST__V31*/ meltfptr[30] = 0;
@@ -21929,7 +22742,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:3804:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3828:/ quasiblock");
/*_.MAKE_STRINGCONST__V39*/ meltfptr[33] =
@@ -21979,7 +22792,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])),
(" <= ")));;
- MELT_LOCATION ("warmelt-genobj.melt:3805:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:3829:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_2_st
@@ -22069,7 +22882,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-genobj.melt:3806:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3830:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /9 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22081,7 +22894,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /c47f86e checkpair",
+ melt_assertmsg ("putpairtail /33682df3 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V47*/
meltfptr[46])) ==
@@ -22092,7 +22905,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V47*/ meltfptr[46]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3807:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3831:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /a checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22104,7 +22917,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /3e6de388 checkpair",
+ melt_assertmsg ("putpairtail /190a058b checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V48*/
meltfptr[47])) ==
@@ -22115,7 +22928,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V48*/ meltfptr[47]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3808:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3832:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /b checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22127,7 +22940,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /3bd3257e checkpair",
+ melt_assertmsg ("putpairtail /8f370c9 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V49*/
meltfptr[48])) ==
@@ -22138,7 +22951,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V49*/ meltfptr[48]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3805:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3829:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /c checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22150,7 +22963,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /3df792c8 checkpair",
+ melt_assertmsg ("putpairtail /2fc0a2f8 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.OVARIADICINDEX__V50*/
meltfptr[49])) ==
@@ -22161,7 +22974,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.OVARIADICINDEX__V50*/ meltfptr[49]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3810:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3834:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /d checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22173,7 +22986,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /3c94d5c9 checkpair",
+ melt_assertmsg ("putpairtail /139f3729 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V51*/
meltfptr[50])) ==
@@ -22184,7 +22997,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V51*/ meltfptr[50]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3805:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3829:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /e checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22196,7 +23009,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /3c0370e2 checkpair",
+ melt_assertmsg ("putpairtail /1e1fcb22 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.OVARIADICINDEX__V52*/
meltfptr[51])) ==
@@ -22207,7 +23020,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.OVARIADICINDEX__V52*/ meltfptr[51]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3812:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3836:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /f checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22219,7 +23032,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /15e4166d checkpair",
+ melt_assertmsg ("putpairtail /3dd228c7 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V53*/
meltfptr[52])) ==
@@ -22230,7 +23043,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V53*/ meltfptr[52]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3813:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3837:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /10 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22242,7 +23055,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /2e159c1b checkpair",
+ melt_assertmsg ("putpairtail /1c1357ae checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V54*/
meltfptr[53])) ==
@@ -22253,7 +23066,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V54*/ meltfptr[53]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3814:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3838:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /11 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22265,7 +23078,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /21902de5 checkpair",
+ melt_assertmsg ("putpairtail /3770e174 checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.PAIROFLIST__V55*/
meltfptr[54])) ==
@@ -22276,7 +23089,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.PAIROFLIST__V55*/ meltfptr[54]);
;
- MELT_LOCATION ("warmelt-genobj.melt:3805:/ putpairhead");
+ MELT_LOCATION ("warmelt-genobj.melt:3829:/ putpairhead");
/*putpairhead */
melt_assertmsg ("putpairhead /12 checkpair",
melt_magic_discr ((melt_ptr_t)
@@ -22307,7 +23120,7 @@ lab_endgetargs:;
/*_.OVLIST__V46*/ meltfptr[45] = /*_.LIST___V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3805:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3829:/ clear");
/*clear *//*_.PAIROFLIST__V47*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.PAIROFLIST__V48*/ meltfptr[47] = 0;
@@ -22373,7 +23186,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22396,7 +23209,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -22406,7 +23219,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -22417,7 +23230,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3821;
+ argtab[2].meltbp_long = 3845;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic curctyp";
@@ -22444,7 +23257,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
0;
/*^clear */
@@ -22458,7 +23271,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[50] =
@@ -22469,7 +23282,7 @@ lab_endgetargs:;
/*_.PROGN___V62*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3821:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3845:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[48] = 0;
@@ -22484,7 +23297,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3822:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3846:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22495,7 +23308,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->
tabval[8])));;
- MELT_LOCATION ("warmelt-genobj.melt:3822:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3846:/ cond");
/*cond */ if ( /*_#IS_A__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -22503,7 +23316,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3822:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3846:/ cond.else");
/*^block */
/*anyblock */
@@ -22518,7 +23331,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (3822) ? (3822) : __LINE__,
+ (3846) ? (3846) : __LINE__,
__FUNCTION__);
;
}
@@ -22535,7 +23348,7 @@ lab_endgetargs:;
/*_.IFELSE___V64*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3822:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3846:/ clear");
/*clear *//*_#IS_A__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V64*/ meltfptr[52] = 0;
@@ -22555,7 +23368,7 @@ lab_endgetargs:;
(" && meltxargdescr_[")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3823:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3847:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V65*/ meltfptr[53]));
@@ -22563,14 +23376,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:3824:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3848:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.OVARIADICINDEX__V27*/
meltfptr[23]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3825:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3849:/ cond");
/*cond */ if ( /*_#IX__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22585,7 +23398,7 @@ lab_endgetargs:;
tabval[6])), (" + ")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3827:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3851:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V66*/ meltfptr[54]));
@@ -22598,18 +23411,18 @@ lab_endgetargs:;
tabval[7])), ( /*_#IX__L11*/ meltfnum[0])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3828:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3852:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.MAKE_INTEGERBOX__V67*/ meltfptr[55]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3826:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3850:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3825:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3849:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V66*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V67*/ meltfptr[55] = 0;
@@ -22624,14 +23437,20 @@ lab_endgetargs:;
("]== ")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3829:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3853:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V68*/ meltfptr[56]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3832:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V58*/ meltfptr[46]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:3856:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V58*/
+ meltfptr[46]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22660,7 +23479,7 @@ lab_endgetargs:;
meltfptr[49]))));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3830:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3854:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OVLIST__V46*/ meltfptr[45]),
(melt_ptr_t) ( /*_.MAKE_STRING__V70*/
@@ -22673,7 +23492,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:3818:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3842:/ clear");
/*clear *//*_.CURCTYP__V58*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_#IX__L11*/ meltfnum[0] = 0;
@@ -22693,7 +23512,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22716,7 +23535,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -22726,7 +23545,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22737,7 +23556,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3834;
+ argtab[2].meltbp_long = 3858;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic ovlist=";
@@ -22759,7 +23578,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V73*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[54] = 0;
@@ -22772,7 +23591,7 @@ lab_endgetargs:;
/*_.IF___V72*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[55] = /*_.IF___V72*/ meltfptr[52];;
@@ -22781,7 +23600,7 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[50] = /*_.PROGN___V74*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3834:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3858:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V72*/ meltfptr[52] = 0;
@@ -22798,7 +23617,7 @@ lab_endgetargs:;
/*_.LET___V38*/ meltfptr[32] = /*_.OVLIST__V46*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-genobj.melt:3804:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3828:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V39*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V40*/ meltfptr[34] = 0;
@@ -22820,13 +23639,13 @@ lab_endgetargs:;
/*_.LET___V38*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3797:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3821:/ clear");
/*clear *//*_.LET___V38*/ meltfptr[32] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3838:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3862:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -22842,7 +23661,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3837:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3861:/ quasiblock");
/*^rawallocobj */
@@ -22870,7 +23689,7 @@ lab_endgetargs:;
/*_.OTEST__V76*/ meltfptr[52] = /*_.INST__V77*/ meltfptr[55];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22893,7 +23712,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -22903,7 +23722,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22914,7 +23733,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3841;
+ argtab[2].meltbp_long = 3865;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic before compiling nthen=";
@@ -22935,7 +23754,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[35] = 0;
@@ -22948,7 +23767,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[36] = /*_.IF___V79*/ meltfptr[34];;
@@ -22957,7 +23776,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[33] = /*_.PROGN___V81*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3841:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3865:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[34] = 0;
@@ -22970,7 +23789,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3842:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3866:/ quasiblock");
/*^msend */
@@ -22989,7 +23808,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23012,7 +23831,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -23022,7 +23841,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -23033,7 +23852,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3844;
+ argtab[2].meltbp_long = 3868;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic after compiling nthen=";
@@ -23060,7 +23879,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V86*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[50] = 0;
@@ -23073,7 +23892,7 @@ lab_endgetargs:;
/*_.IF___V85*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[32] = /*_.IF___V85*/ meltfptr[45];;
@@ -23082,7 +23901,7 @@ lab_endgetargs:;
/*_.IFCPP___V84*/ meltfptr[31] = /*_.PROGN___V87*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3844:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3868:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V85*/ meltfptr[45] = 0;
@@ -23099,17 +23918,17 @@ lab_endgetargs:;
/*_.LET___V82*/ meltfptr[29] = /*_.OBJTHEN__V83*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-genobj.melt:3842:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3866:/ clear");
/*clear *//*_.OBJTHEN__V83*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.IFCPP___V84*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3840:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3864:/ quasiblock");
/*_.OTHEN__V88*/ meltfptr[35] = /*_.LET___V82*/ meltfptr[29];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23132,7 +23951,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -23142,7 +23961,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23153,7 +23972,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3849;
+ argtab[2].meltbp_long = 3873;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic before compiling nelse=";
@@ -23174,7 +23993,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V91*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[50] = 0;
@@ -23187,7 +24006,7 @@ lab_endgetargs:;
/*_.IF___V90*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ quasiblock");
/*_.PROGN___V92*/ meltfptr[45] = /*_.IF___V90*/ meltfptr[36];;
@@ -23196,7 +24015,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[34] = /*_.PROGN___V92*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3849:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3873:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V90*/ meltfptr[36] = 0;
@@ -23209,7 +24028,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[34] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3850:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3874:/ quasiblock");
/*^msend */
@@ -23228,7 +24047,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23251,7 +24070,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -23261,7 +24080,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -23272,7 +24091,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3852;
+ argtab[2].meltbp_long = 3876;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_ifvariadic after compiling nelse=";
@@ -23299,7 +24118,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V97*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V97*/ meltfptr[36] = 0;
@@ -23312,7 +24131,7 @@ lab_endgetargs:;
/*_.IF___V96*/ meltfptr[50] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ quasiblock");
/*_.PROGN___V98*/ meltfptr[45] = /*_.IF___V96*/ meltfptr[50];;
@@ -23321,7 +24140,7 @@ lab_endgetargs:;
/*_.IFCPP___V95*/ meltfptr[31] = /*_.PROGN___V98*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3852:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3876:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V96*/ meltfptr[50] = 0;
@@ -23338,15 +24157,15 @@ lab_endgetargs:;
/*_.LET___V93*/ meltfptr[32] = /*_.OBJELSE__V94*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-genobj.melt:3850:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3874:/ clear");
/*clear *//*_.OBJELSE__V94*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.IFCPP___V95*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3848:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3872:/ quasiblock");
/*_.OELSE__V99*/ meltfptr[36] = /*_.LET___V93*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-genobj.melt:3855:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3879:/ quasiblock");
/*^rawallocobj */
@@ -23400,7 +24219,7 @@ lab_endgetargs:;
/*_.OCOND__V100*/ meltfptr[50] = /*_.INST__V101*/ meltfptr[45];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23423,7 +24242,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -23433,7 +24252,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23444,7 +24263,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3861;
+ argtab[2].meltbp_long = 3885;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_ifvariadic ocond=";
/*^apply.arg */
@@ -23464,7 +24283,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V104*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] = 0;
@@ -23477,7 +24296,7 @@ lab_endgetargs:;
/*_.IF___V103*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ quasiblock");
/*_.PROGN___V105*/ meltfptr[103] = /*_.IF___V103*/ meltfptr[31];;
@@ -23486,7 +24305,7 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[30] = /*_.PROGN___V105*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3861:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3885:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V103*/ meltfptr[31] = 0;
@@ -23499,16 +24318,16 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3862:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3886:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOND__V100*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-genobj.melt:3862:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3886:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V26*/ meltfptr[22] = /*_.RETURN___V106*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-genobj.melt:3793:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3817:/ clear");
/*clear *//*_.OVARIADICINDEX__V27*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.OVARIADICLENGTH__V28*/ meltfptr[27] = 0;
@@ -23540,7 +24359,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V106*/ meltfptr[31] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V26*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:3783:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3807:/ clear");
/*clear *//*_.LOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NTHEN__V14*/ meltfptr[13] = 0;
@@ -23560,11 +24379,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V22*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.LET___V26*/ meltfptr[22] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -23589,175 +24408,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 5
- void *mcfr_varptr[5];
-#define MELTFRAM_NBVARNUM 1
- long mcfr_varnum[1];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 5; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 5;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("GETCTYPE_IFVARIADIC", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ getarg");
- /*_.RIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.ENV__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3866:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NREP_IFVARIADIC */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:3866:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:3866:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check ifvariadic"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (3866) ? (3866) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:3866:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VOID */ meltfrout->tabval[1]);;
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("GETCTYPE_IFVARIADIC", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC */
+} /*end meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC */
diff --git a/gcc/melt/generated/warmelt-genobj+04.c b/gcc/melt/generated/warmelt-genobj+04.c
index b41eaa77bb1..80d7b94f23d 100644
--- a/gcc/melt/generated/warmelt-genobj+04.c
+++ b/gcc/melt/generated/warmelt-genobj+04.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2885,12 +2961,180 @@ static void forward_or_mark_module_start_frame_warmelt_genobj (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 5
+ void *mcfr_varptr[5];
+#define MELTFRAM_NBVARNUM 1
+ long mcfr_varnum[1];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 5; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 5;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("GETCTYPE_IFVARIADIC", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ getarg");
+ /*_.RIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.ENV__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:3890:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.RIF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFVARIADIC */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-genobj.melt:3890:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:3890:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check ifvariadic"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (3890) ? (3890) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:3890:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VOID */ meltfrout->tabval[1]);;
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("GETCTYPE_IFVARIADIC", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
- union meltparam_un *meltxargtab_,
+ union meltparam_un * meltxargtab_,
const melt_argdescr_cell_t meltxresdescr_[],
- union meltparam_un *meltxrestab_)
+ union meltparam_un * meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -2902,7 +3146,7 @@ meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
#define meltcallcount 0L
#endif
- struct frame_meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT_st
+ struct frame_meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2941,7 +3185,7 @@ meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ getarg");
/*_.NVARG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2962,7 +3206,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2985,7 +3229,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2995,7 +3239,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3005,7 +3249,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3874;
+ argtab[2].meltbp_long = 3898;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_variadic_argument nvarg=";
@@ -3025,7 +3269,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -3038,7 +3282,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -3047,7 +3291,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3874:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3898:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -3062,7 +3306,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3875:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3899:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3070,7 +3314,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NVARG__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_VARIADIC_ARGUMENT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:3875:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3899:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3078,7 +3322,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3875:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3899:/ cond.else");
/*^block */
/*anyblock */
@@ -3092,7 +3336,7 @@ lab_endgetargs:;
melt_assert_failed (("check nvarg"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3875) ? (3875) : __LINE__, __FUNCTION__);
+ (3899) ? (3899) : __LINE__, __FUNCTION__);
;
}
;
@@ -3107,7 +3351,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3875:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3899:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -3120,7 +3364,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3876:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3900:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3129,7 +3373,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:3876:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3900:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3137,7 +3381,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3876:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3900:/ cond.else");
/*^block */
/*anyblock */
@@ -3151,7 +3395,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3876) ? (3876) : __LINE__, __FUNCTION__);
+ (3900) ? (3900) : __LINE__, __FUNCTION__);
;
}
;
@@ -3166,7 +3410,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3876:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3900:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -3177,7 +3421,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3877:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3901:/ quasiblock");
/*^getslot */
@@ -3188,7 +3432,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3878:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3902:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NVARG__V2*/ meltfptr[1]), 1, "NVARG_VARIADIC");
@@ -3196,7 +3440,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3879:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3903:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NVARG__V2*/ meltfptr[1]), 2, "NVARG_CTYP");
@@ -3204,7 +3448,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3880:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3904:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NVARG__V2*/ meltfptr[1]), 3, "NVARG_OFFSET");
@@ -3212,7 +3456,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3881:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3905:/ apply");
/*apply */
{
/*_.OVARIADICINDEX__V17*/ meltfptr[16] =
@@ -3222,7 +3466,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3882:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3906:/ apply");
/*apply */
{
/*_.OVARIADICLENGTH__V18*/ meltfptr[17] =
@@ -3234,7 +3478,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3884:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3908:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3243,7 +3487,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCTYP__V15*/ meltfptr[14]),
(melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->
tabval[5])));;
- MELT_LOCATION ("warmelt-genobj.melt:3884:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3908:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3251,7 +3495,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3884:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3908:/ cond.else");
/*^block */
/*anyblock */
@@ -3265,7 +3509,7 @@ lab_endgetargs:;
melt_assert_failed (("check nctyp"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3884) ? (3884) : __LINE__, __FUNCTION__);
+ (3908) ? (3908) : __LINE__, __FUNCTION__);
;
}
;
@@ -3280,7 +3524,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.IFELSE___V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3884:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3908:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
@@ -3293,7 +3537,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3885:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3909:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3301,7 +3545,7 @@ lab_endgetargs:;
/*_#IS_INTEGERBOX__L6*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NOFFSET__V16*/ meltfptr[15])) ==
MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-genobj.melt:3885:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3909:/ cond");
/*cond */ if ( /*_#IS_INTEGERBOX__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3309,7 +3553,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3885:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3909:/ cond.else");
/*^block */
/*anyblock */
@@ -3323,7 +3567,7 @@ lab_endgetargs:;
melt_assert_failed (("check noffset"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3885) ? (3885) : __LINE__, __FUNCTION__);
+ (3909) ? (3909) : __LINE__, __FUNCTION__);
;
}
;
@@ -3338,7 +3582,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[19] = /*_.IFELSE___V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3885:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3909:/ clear");
/*clear *//*_#IS_INTEGERBOX__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
@@ -3349,13 +3593,13 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3886:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3910:/ quasiblock");
/*_#__L7*/ meltfnum[1] =
(( /*_.NCTYP__V15*/ meltfptr[14]) ==
(( /*!CTYPE_VALUE */ meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-genobj.melt:3888:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3912:/ cond");
/*cond */ if ( /*_#__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3396,34 +3640,34 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[7])),
("].meltbp_aptr)) : NULL)")));;
- MELT_LOCATION ("warmelt-genobj.melt:3889:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:3913:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
{
- struct MELT_MULTIPLE_STRUCT (9) rtup_0__TUPLREC__x8;
+ struct MELT_MULTIPLE_STRUCT (9) rtup_0__TUPLREC__x7;
long meltletrec_1_endgap;
} *meltletrec_1_ptr = 0;
meltletrec_1_ptr =
(struct meltletrec_1_st *)
meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
/*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x8 */
+ /*inimult rtup_0__TUPLREC__x7 */
/*_.TUPLREC___V31*/ meltfptr[30] =
- (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x8;
- meltletrec_1_ptr->rtup_0__TUPLREC__x8.discr =
+ (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x7;
+ meltletrec_1_ptr->rtup_0__TUPLREC__x7.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- meltletrec_1_ptr->rtup_0__TUPLREC__x8.nbval = 9;
+ meltletrec_1_ptr->rtup_0__TUPLREC__x7.nbval = 9;
/*^putuple */
- /*putupl#25 */
- melt_assertmsg ("putupl [:3889] #25 checktup",
+ /*putupl#20 */
+ melt_assertmsg ("putupl [:3913] #20 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #25 checkoff",
+ melt_assertmsg ("putupl [:3913] #20 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -3434,13 +3678,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V25*/ meltfptr[24]);
;
/*^putuple */
- /*putupl#26 */
- melt_assertmsg ("putupl [:3889] #26 checktup",
+ /*putupl#21 */
+ melt_assertmsg ("putupl [:3913] #21 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #26 checkoff",
+ melt_assertmsg ("putupl [:3913] #21 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -3451,13 +3695,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OVARIADICINDEX__V17*/ meltfptr[16]);
;
/*^putuple */
- /*putupl#27 */
- melt_assertmsg ("putupl [:3889] #27 checktup",
+ /*putupl#22 */
+ melt_assertmsg ("putupl [:3913] #22 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #27 checkoff",
+ melt_assertmsg ("putupl [:3913] #22 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -3468,13 +3712,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V26*/ meltfptr[25]);
;
/*^putuple */
- /*putupl#28 */
- melt_assertmsg ("putupl [:3889] #28 checktup",
+ /*putupl#23 */
+ melt_assertmsg ("putupl [:3913] #23 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #28 checkoff",
+ melt_assertmsg ("putupl [:3913] #23 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
@@ -3484,13 +3728,13 @@ lab_endgetargs:;
tabval[3] = (melt_ptr_t) ( /*_.NOFFSET__V16*/ meltfptr[15]);
;
/*^putuple */
- /*putupl#29 */
- melt_assertmsg ("putupl [:3889] #29 checktup",
+ /*putupl#24 */
+ melt_assertmsg ("putupl [:3913] #24 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #29 checkoff",
+ melt_assertmsg ("putupl [:3913] #24 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
@@ -3501,13 +3745,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V27*/ meltfptr[26]);
;
/*^putuple */
- /*putupl#30 */
- melt_assertmsg ("putupl [:3889] #30 checktup",
+ /*putupl#25 */
+ melt_assertmsg ("putupl [:3913] #25 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #30 checkoff",
+ melt_assertmsg ("putupl [:3913] #25 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
@@ -3518,13 +3762,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OVARIADICINDEX__V17*/ meltfptr[16]);
;
/*^putuple */
- /*putupl#31 */
- melt_assertmsg ("putupl [:3889] #31 checktup",
+ /*putupl#26 */
+ melt_assertmsg ("putupl [:3913] #26 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #31 checkoff",
+ melt_assertmsg ("putupl [:3913] #26 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
@@ -3535,13 +3779,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V28*/ meltfptr[27]);
;
/*^putuple */
- /*putupl#32 */
- melt_assertmsg ("putupl [:3889] #32 checktup",
+ /*putupl#27 */
+ melt_assertmsg ("putupl [:3913] #27 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #32 checkoff",
+ melt_assertmsg ("putupl [:3913] #27 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
@@ -3551,13 +3795,13 @@ lab_endgetargs:;
tabval[7] = (melt_ptr_t) ( /*_.NOFFSET__V16*/ meltfptr[15]);
;
/*^putuple */
- /*putupl#33 */
- melt_assertmsg ("putupl [:3889] #33 checktup",
+ /*putupl#28 */
+ melt_assertmsg ("putupl [:3913] #28 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V31*/
meltfptr[30])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3889] #33 checkoff",
+ melt_assertmsg ("putupl [:3913] #28 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
@@ -3574,7 +3818,7 @@ lab_endgetargs:;
/*_.TUPLREC___V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3889:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3913:/ clear");
/*clear *//*_.TUPLREC___V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V31*/ meltfptr[30] = 0;
@@ -3583,7 +3827,7 @@ lab_endgetargs:;
/*_.OTUPLE__V24*/ meltfptr[23] = /*_.TUPLE___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3888:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3912:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V25*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.MAKE_STRINGCONST__V26*/ meltfptr[25] = 0;
@@ -3624,8 +3868,14 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[7])),
("].")));;
- MELT_LOCATION ("warmelt-genobj.melt:3906:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCTYP__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:3930:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCTYP__V15*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3651,34 +3901,34 @@ lab_endgetargs:;
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[7])),
melt_string_str ((melt_ptr_t)
( /*_.CTYPE_ARGFIELD__V35*/ meltfptr[26]))));;
- MELT_LOCATION ("warmelt-genobj.melt:3900:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:3924:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_2_st
{
- struct MELT_MULTIPLE_STRUCT (6) rtup_0__TUPLREC__x9;
+ struct MELT_MULTIPLE_STRUCT (6) rtup_0__TUPLREC__x8;
long meltletrec_2_endgap;
} *meltletrec_2_ptr = 0;
meltletrec_2_ptr =
(struct meltletrec_2_st *)
meltgc_allocate (sizeof (struct meltletrec_2_st), 0);
/*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x9 */
+ /*inimult rtup_0__TUPLREC__x8 */
/*_.TUPLREC___V38*/ meltfptr[29] =
- (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x9;
- meltletrec_2_ptr->rtup_0__TUPLREC__x9.discr =
+ (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x8;
+ meltletrec_2_ptr->rtup_0__TUPLREC__x8.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- meltletrec_2_ptr->rtup_0__TUPLREC__x9.nbval = 6;
+ meltletrec_2_ptr->rtup_0__TUPLREC__x8.nbval = 6;
/*^putuple */
- /*putupl#34 */
- melt_assertmsg ("putupl [:3900] #34 checktup",
+ /*putupl#29 */
+ melt_assertmsg ("putupl [:3924] #29 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #34 checkoff",
+ melt_assertmsg ("putupl [:3924] #29 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -3689,13 +3939,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V32*/ meltfptr[30]);
;
/*^putuple */
- /*putupl#35 */
- melt_assertmsg ("putupl [:3900] #35 checktup",
+ /*putupl#30 */
+ melt_assertmsg ("putupl [:3924] #30 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #35 checkoff",
+ melt_assertmsg ("putupl [:3924] #30 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -3706,13 +3956,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OVARIADICINDEX__V17*/ meltfptr[16]);
;
/*^putuple */
- /*putupl#36 */
- melt_assertmsg ("putupl [:3900] #36 checktup",
+ /*putupl#31 */
+ melt_assertmsg ("putupl [:3924] #31 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #36 checkoff",
+ melt_assertmsg ("putupl [:3924] #31 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -3723,13 +3973,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V33*/ meltfptr[24]);
;
/*^putuple */
- /*putupl#37 */
- melt_assertmsg ("putupl [:3900] #37 checktup",
+ /*putupl#32 */
+ melt_assertmsg ("putupl [:3924] #32 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #37 checkoff",
+ melt_assertmsg ("putupl [:3924] #32 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
@@ -3739,13 +3989,13 @@ lab_endgetargs:;
tabval[3] = (melt_ptr_t) ( /*_.NOFFSET__V16*/ meltfptr[15]);
;
/*^putuple */
- /*putupl#38 */
- melt_assertmsg ("putupl [:3900] #38 checktup",
+ /*putupl#33 */
+ melt_assertmsg ("putupl [:3924] #33 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #38 checkoff",
+ melt_assertmsg ("putupl [:3924] #33 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
@@ -3756,13 +4006,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V34*/ meltfptr[25]);
;
/*^putuple */
- /*putupl#39 */
- melt_assertmsg ("putupl [:3900] #39 checktup",
+ /*putupl#34 */
+ melt_assertmsg ("putupl [:3924] #34 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V38*/
meltfptr[29])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:3900] #39 checkoff",
+ melt_assertmsg ("putupl [:3924] #34 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
@@ -3778,7 +4028,7 @@ lab_endgetargs:;
/*_.TUPLREC___V38*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3900:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3924:/ clear");
/*clear *//*_.TUPLREC___V38*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V38*/ meltfptr[29] = 0;
@@ -3787,7 +4037,7 @@ lab_endgetargs:;
/*_.OTUPLE__V24*/ meltfptr[23] = /*_.TUPLE___V37*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3888:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3912:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V32*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.MAKE_STRINGCONST__V33*/ meltfptr[24] = 0;
@@ -3803,7 +4053,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3908:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3932:/ quasiblock");
/*^rawallocobj */
@@ -3839,7 +4089,7 @@ lab_endgetargs:;
/*_.OCOMP__V39*/ meltfptr[29] = /*_.INST__V40*/ meltfptr[30];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3862,7 +4112,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3872,7 +4122,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3882,7 +4132,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3913;
+ argtab[2].meltbp_long = 3937;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_variadic_argument ocomp=";
@@ -3903,7 +4153,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V43*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[26] = 0;
@@ -3916,7 +4166,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[27] = /*_.IF___V42*/ meltfptr[25];;
@@ -3925,7 +4175,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[24] = /*_.PROGN___V44*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3913:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3937:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V42*/ meltfptr[25] = 0;
@@ -3938,16 +4188,16 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[24] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3914:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3938:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOMP__V39*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-genobj.melt:3914:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3938:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V23*/ meltfptr[21] = /*_.RETURN___V45*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:3886:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3910:/ clear");
/*clear *//*_#__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.OTUPLE__V24*/ meltfptr[23] = 0;
@@ -3959,7 +4209,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V45*/ meltfptr[28] = 0;
/*_.LET___V12*/ meltfptr[10] = /*_.LET___V23*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-genobj.melt:3877:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3901:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NVARIADIC__V14*/ meltfptr[13] = 0;
@@ -3977,11 +4227,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V21*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.LET___V23*/ meltfptr[21] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4006,14 +4256,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT */
+} /*end meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -4038,7 +4288,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC_st
+ struct frame_meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4077,7 +4327,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ getarg");
/*_.RCV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4098,7 +4348,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3921:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3945:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4107,7 +4357,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RCV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_CONSUME_VARIADIC */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:3921:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3945:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4115,7 +4365,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3921:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3945:/ cond.else");
/*^block */
/*anyblock */
@@ -4129,7 +4379,7 @@ lab_endgetargs:;
melt_assert_failed (("check rcv"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3921) ? (3921) : __LINE__, __FUNCTION__);
+ (3945) ? (3945) : __LINE__, __FUNCTION__);
;
}
;
@@ -4144,7 +4394,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3921:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3945:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -4157,7 +4407,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3922:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3946:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4166,7 +4416,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:3922:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3946:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4174,7 +4424,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3922:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3946:/ cond.else");
/*^block */
/*anyblock */
@@ -4188,7 +4438,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3922) ? (3922) : __LINE__, __FUNCTION__);
+ (3946) ? (3946) : __LINE__, __FUNCTION__);
;
}
;
@@ -4203,7 +4453,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3922:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3946:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4216,7 +4466,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4239,7 +4489,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4249,7 +4499,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4259,7 +4509,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3923;
+ argtab[2].meltbp_long = 3947;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_consumevariadic rcv=";
@@ -4280,7 +4530,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -4293,7 +4543,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -4302,7 +4552,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3923:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3947:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -4315,7 +4565,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3924:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3948:/ quasiblock");
/*^getslot */
@@ -4326,7 +4576,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3925:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3949:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RCV__V2*/ meltfptr[1]), 1, "NCONSVA_VARIADIC");
@@ -4334,7 +4584,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3926:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3950:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RCV__V2*/ meltfptr[1]), 2, "NCONSVA_CTYPES");
@@ -4345,7 +4595,7 @@ lab_endgetargs:;
/*_.OLIST__V16*/ meltfptr[15] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[3]))));;
- MELT_LOCATION ("warmelt-genobj.melt:3928:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3952:/ apply");
/*apply */
{
/*_.OVARIADICINDEX__V17*/ meltfptr[16] =
@@ -4355,7 +4605,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3929:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3953:/ apply");
/*apply */
{
/*_.OVARIADICLENGTH__V18*/ meltfptr[17] =
@@ -4367,7 +4617,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3931:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3955:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4378,7 +4628,7 @@ lab_endgetargs:;
(melt_unsafe_magic_discr
((melt_ptr_t) ( /*_.NCTYPES__V15*/ meltfptr[14])) ==
MELTOBMAG_MULTIPLE));;
- MELT_LOCATION ("warmelt-genobj.melt:3931:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3955:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4386,7 +4636,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3931:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3955:/ cond.else");
/*^block */
/*anyblock */
@@ -4400,7 +4650,7 @@ lab_endgetargs:;
melt_assert_failed (("check nctypes"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3931) ? (3931) : __LINE__, __FUNCTION__);
+ (3955) ? (3955) : __LINE__, __FUNCTION__);
;
}
;
@@ -4415,7 +4665,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.IFELSE___V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3931:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3955:/ clear");
/*clear *//*_#IS_MULTIPLE_OR_NULL__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
@@ -4435,7 +4685,7 @@ lab_endgetargs:;
("/*consume variadic ")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3932:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3956:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V21*/
meltfptr[19]));
@@ -4460,7 +4710,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3936:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3960:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4470,7 +4720,7 @@ lab_endgetargs:;
( /*_.CURCTYP__V22*/ meltfptr[21]),
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-genobj.melt:3936:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3960:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4478,7 +4728,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3936:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3960:/ cond.else");
/*^block */
/*anyblock */
@@ -4492,7 +4742,7 @@ lab_endgetargs:;
melt_assert_failed (("check curctyp"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3936) ? (3936) : __LINE__,
+ (3960) ? (3960) : __LINE__,
__FUNCTION__);
;
}
@@ -4508,7 +4758,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.IFELSE___V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3936:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3960:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
@@ -4524,7 +4774,7 @@ lab_endgetargs:;
/*_#__L8*/ meltfnum[3] =
(( /*_.CURCTYP__V22*/ meltfptr[21]) ==
(( /*!CTYPE_VALUE */ meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-genobj.melt:3937:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3961:/ cond");
/*cond */ if ( /*_#__L8*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4539,7 +4789,7 @@ lab_endgetargs:;
("Value")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3938:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3962:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V25*/ meltfptr[23]));
@@ -4547,7 +4797,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3937:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3961:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V25*/ meltfptr[23] = 0;
}
;
@@ -4559,8 +4809,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:3939:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:3963:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4578,8 +4834,14 @@ lab_endgetargs:;
/*_.CTYPE_KEYWORD__V26*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3939:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V26*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:3963:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V26*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4608,7 +4870,7 @@ lab_endgetargs:;
meltfptr[26]))));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3939:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3963:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_STRING__V28*/
@@ -4617,7 +4879,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3937:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3961:/ clear");
/*clear *//*_.CTYPE_KEYWORD__V26*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0;
@@ -4633,7 +4895,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:3933:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3957:/ clear");
/*clear *//*_.CURCTYP__V22*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_#TYPIX__L6*/ meltfnum[0] = 0;
@@ -4649,7 +4911,7 @@ lab_endgetargs:;
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])), (" !*/ ")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3940:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3964:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V29*/
meltfptr[23]));
@@ -4657,7 +4919,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:3941:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3965:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.OVARIADICINDEX__V17*/
meltfptr[16]));
@@ -4669,7 +4931,7 @@ lab_endgetargs:;
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])), (" += ")));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3942:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3966:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V30*/
meltfptr[26]));
@@ -4686,16 +4948,16 @@ lab_endgetargs:;
( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[8])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:3943:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:3967:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.MAKE_INTEGERBOX__V31*/
meltfptr[27]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3944:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3968:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:3945:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3969:/ apply");
/*apply */
{
/*_.OTUPLE__V33*/ meltfptr[32] =
@@ -4705,7 +4967,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3946:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3970:/ quasiblock");
/*^rawallocobj */
@@ -4741,7 +5003,7 @@ lab_endgetargs:;
/*_.OCOMP__V34*/ meltfptr[33] = /*_.INST__V35*/ meltfptr[34];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4764,7 +5026,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -4774,7 +5036,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4785,7 +5047,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3951;
+ argtab[2].meltbp_long = 3975;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_consumevariadic ocomp=";
@@ -4806,7 +5068,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
@@ -4819,7 +5081,7 @@ lab_endgetargs:;
/*_.IF___V37*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ quasiblock");
/*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];;
@@ -4828,7 +5090,7 @@ lab_endgetargs:;
/*_.IFCPP___V36*/ meltfptr[35] = /*_.PROGN___V39*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3951:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3975:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V37*/ meltfptr[36] = 0;
@@ -4841,16 +5103,16 @@ lab_endgetargs:;
/*_.IFCPP___V36*/ meltfptr[35] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3952:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3976:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOMP__V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-genobj.melt:3952:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3976:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V32*/ meltfptr[31] = /*_.RETURN___V40*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-genobj.melt:3944:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3968:/ clear");
/*clear *//*_.OTUPLE__V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.OCOMP__V34*/ meltfptr[33] = 0;
@@ -4860,7 +5122,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V40*/ meltfptr[36] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V32*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-genobj.melt:3924:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3948:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NVARIADIC__V14*/ meltfptr[13] = 0;
@@ -4886,11 +5148,11 @@ lab_endgetargs:;
/*clear *//*_.MAKE_INTEGERBOX__V31*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.LET___V32*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4915,14 +5177,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC */
+} /*end meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4943,7 +5205,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND_st
+ struct frame_meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4982,7 +5244,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -5004,7 +5266,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3958:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3982:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5013,7 +5275,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_OBJCOND */ meltfrout->
tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:3958:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3982:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5021,7 +5283,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3958:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3982:/ cond.else");
/*^block */
/*anyblock */
@@ -5035,7 +5297,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3958) ? (3958) : __LINE__, __FUNCTION__);
+ (3982) ? (3982) : __LINE__, __FUNCTION__);
;
}
;
@@ -5050,7 +5312,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3958:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3982:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -5063,7 +5325,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3959:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3983:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5072,7 +5334,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DESTO__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:3959:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3983:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5080,7 +5342,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3959:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3983:/ cond.else");
/*^block */
/*anyblock */
@@ -5094,7 +5356,7 @@ lab_endgetargs:;
melt_assert_failed (("check desto"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3959) ? (3959) : __LINE__, __FUNCTION__);
+ (3983) ? (3983) : __LINE__, __FUNCTION__);
;
}
;
@@ -5109,7 +5371,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3959:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3983:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -5120,7 +5382,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3960:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3984:/ quasiblock");
/*^getslot */
@@ -5131,7 +5393,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3961:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:3985:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "OBCOND_ELSE");
@@ -5139,7 +5401,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3963:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3987:/ quasiblock");
/*^msend */
@@ -5156,7 +5418,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3964:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:3988:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -5170,7 +5432,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3965:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3989:/ quasiblock");
/*^putslot */
@@ -5197,23 +5459,23 @@ lab_endgetargs:;
/*_.LET___V11*/ meltfptr[10] = /*_.RECV__V2*/ meltfptr[1];;
- MELT_LOCATION ("warmelt-genobj.melt:3963:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3987:/ clear");
/*clear *//*_.DTHEN__V12*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_.DELSE__V13*/ meltfptr[12] = 0;
/*_.LET___V8*/ meltfptr[6] = /*_.LET___V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:3960:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3984:/ clear");
/*clear *//*_.OTHEN__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.OELSE__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.LET___V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -5236,14 +5498,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND */
+} /*end meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -5265,7 +5527,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF_st
+ struct frame_meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -5304,7 +5566,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ getarg");
/*_.PIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -5325,7 +5587,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3975:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:3999:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5334,7 +5596,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PIF__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_CPPIF */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:3975:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:3999:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5342,7 +5604,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3975:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:3999:/ cond.else");
/*^block */
/*anyblock */
@@ -5356,7 +5618,7 @@ lab_endgetargs:;
melt_assert_failed (("check pif"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3975) ? (3975) : __LINE__, __FUNCTION__);
+ (3999) ? (3999) : __LINE__, __FUNCTION__);
;
}
;
@@ -5371,7 +5633,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3975:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:3999:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -5384,7 +5646,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3976:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4000:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5393,7 +5655,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:3976:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4000:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5401,7 +5663,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3976:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4000:/ cond.else");
/*^block */
/*anyblock */
@@ -5415,7 +5677,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (3976) ? (3976) : __LINE__, __FUNCTION__);
+ (4000) ? (4000) : __LINE__, __FUNCTION__);
;
}
;
@@ -5430,7 +5692,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3976:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4000:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -5441,7 +5703,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3977:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4001:/ quasiblock");
/*^getslot */
@@ -5452,7 +5714,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3978:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4002:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PIF__V2*/ meltfptr[1]), 1, "NIFP_COND");
@@ -5460,7 +5722,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3979:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4003:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PIF__V2*/ meltfptr[1]), 2, "NIFP_THEN");
@@ -5468,7 +5730,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3980:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4004:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PIF__V2*/ meltfptr[1]), 3, "NIFP_ELSE");
@@ -5476,7 +5738,7 @@ lab_endgetargs:;
meltfptr[11] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:3981:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4005:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PIF__V2*/ meltfptr[1]), 4, "NIFP_CTYP");
@@ -5488,7 +5750,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCOND__V10*/ meltfptr[9]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:3983:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4007:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5507,7 +5769,7 @@ lab_endgetargs:;
/*_.SCOND__V14*/ meltfptr[13] = /*_.NAMED_NAME__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3983:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4007:/ clear");
/*clear *//*_.NAMED_NAME__V15*/ meltfptr[14] = 0;
}
;
@@ -5522,7 +5784,7 @@ lab_endgetargs:;
/*_#IS_STRING__L4*/ meltfnum[3] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NCOND__V10*/ meltfptr[9]))
== MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:3984:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4008:/ cond");
/*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -5530,7 +5792,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3984:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4008:/ cond.else");
/*^block */
/*anyblock */
@@ -5538,7 +5800,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:3985:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4009:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5551,7 +5813,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:3985:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4009:/ cond.else");
/*^block */
/*anyblock */
@@ -5566,7 +5828,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (3985) ? (3985) : __LINE__,
+ (4009) ? (4009) : __LINE__,
__FUNCTION__);
;
}
@@ -5583,7 +5845,7 @@ lab_endgetargs:;
/*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3985:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4009:/ clear");
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
}
@@ -5592,7 +5854,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:3985:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4009:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[17] =
@@ -5603,7 +5865,7 @@ lab_endgetargs:;
/*_.PROGN___V19*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3984:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4008:/ clear");
/*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.PROGN___V19*/ meltfptr[17] = 0;
@@ -5614,7 +5876,7 @@ lab_endgetargs:;
/*_.SCOND__V14*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:3983:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4007:/ clear");
/*clear *//*_#IS_STRING__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[14] = 0;
@@ -5622,7 +5884,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3986:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4010:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -5636,7 +5898,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3987:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4011:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -5650,7 +5912,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:3988:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4012:/ quasiblock");
/*^rawallocobj */
@@ -5702,16 +5964,16 @@ lab_endgetargs:;
( /*_.OELSE__V21*/ meltfptr[17]), "OBIFP_ELSE");
;
/*_.RES__V22*/ meltfptr[14] = /*_.INST__V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:3994:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4018:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V22*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:3994:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4018:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:3977:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4001:/ clear");
/*clear *//*_.LOC__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.NCOND__V10*/ meltfptr[9] = 0;
@@ -5733,11 +5995,11 @@ lab_endgetargs:;
/*clear *//*_.RES__V22*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.RETURN___V24*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -5760,14 +6022,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF */
+} /*end meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -5788,7 +6050,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF_st
+ struct frame_meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -5827,7 +6089,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -5849,7 +6111,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4001:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4025:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5858,7 +6120,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_OBJCPPIF */ meltfrout->
tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4001:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4025:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5866,7 +6128,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4001:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4025:/ cond.else");
/*^block */
/*anyblock */
@@ -5880,7 +6142,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4001) ? (4001) : __LINE__, __FUNCTION__);
+ (4025) ? (4025) : __LINE__, __FUNCTION__);
;
}
;
@@ -5895,7 +6157,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4001:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4025:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -5908,7 +6170,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4002:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4026:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5917,7 +6179,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.DESTO__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4002:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4026:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5925,7 +6187,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4002:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4026:/ cond.else");
/*^block */
/*anyblock */
@@ -5939,7 +6201,7 @@ lab_endgetargs:;
melt_assert_failed (("check desto"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4002) ? (4002) : __LINE__, __FUNCTION__);
+ (4026) ? (4026) : __LINE__, __FUNCTION__);
;
}
;
@@ -5954,7 +6216,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4002:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4026:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -5965,7 +6227,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4003:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4027:/ quasiblock");
/*^getslot */
@@ -5976,7 +6238,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4004:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4028:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "OBIFP_ELSE");
@@ -5984,7 +6246,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4006:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4030:/ quasiblock");
/*^msend */
@@ -6001,7 +6263,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4007:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4031:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -6015,7 +6277,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4008:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4032:/ quasiblock");
/*^putslot */
@@ -6042,23 +6304,23 @@ lab_endgetargs:;
/*_.LET___V11*/ meltfptr[10] = /*_.RECV__V2*/ meltfptr[1];;
- MELT_LOCATION ("warmelt-genobj.melt:4006:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4030:/ clear");
/*clear *//*_.DTHEN__V12*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_.DELSE__V13*/ meltfptr[12] = 0;
/*_.LET___V8*/ meltfptr[6] = /*_.LET___V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:4003:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4027:/ clear");
/*clear *//*_.OTHEN__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.OELSE__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.LET___V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -6081,14 +6343,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF */
+} /*end meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -6110,7 +6372,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN_st
+ struct frame_meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -6149,7 +6411,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ getarg");
/*_.NRET__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -6170,7 +6432,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4018:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4042:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6179,7 +6441,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NRET__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_RETURN */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4018:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4042:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6187,7 +6449,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4018:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4042:/ cond.else");
/*^block */
/*anyblock */
@@ -6201,7 +6463,7 @@ lab_endgetargs:;
melt_assert_failed (("check nret"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4018) ? (4018) : __LINE__, __FUNCTION__);
+ (4042) ? (4042) : __LINE__, __FUNCTION__);
;
}
;
@@ -6216,7 +6478,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4018:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4042:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -6229,7 +6491,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4019:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4043:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6238,7 +6500,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4019:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4043:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6246,7 +6508,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4019:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4043:/ cond.else");
/*^block */
/*anyblock */
@@ -6260,7 +6522,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4019) ? (4019) : __LINE__, __FUNCTION__);
+ (4043) ? (4043) : __LINE__, __FUNCTION__);
;
}
;
@@ -6275,7 +6537,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4019:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4043:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -6288,7 +6550,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6311,7 +6573,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6321,7 +6583,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6331,7 +6593,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4020;
+ argtab[2].meltbp_long = 4044;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_return nret=";
/*^apply.arg */
@@ -6351,7 +6613,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -6364,7 +6626,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -6373,7 +6635,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4020:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4044:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -6386,7 +6648,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4021:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4045:/ quasiblock");
/*^getslot */
@@ -6397,7 +6659,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4022:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4046:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRET__V2*/ meltfptr[1]), 1, "NRET_MAIN");
@@ -6405,7 +6667,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4023:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4047:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRET__V2*/ meltfptr[1]), 2, "NRET_REST");
@@ -6413,7 +6675,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4024:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4048:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 5, "GNCX_RETLOC");
@@ -6421,7 +6683,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4025:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4049:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -6432,7 +6694,7 @@ lab_endgetargs:;
/*_.OLIS__V18*/ meltfptr[17] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[3]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4027:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4051:/ quasiblock");
/*^rawallocobj */
@@ -6466,7 +6728,7 @@ lab_endgetargs:;
( /*_.OLIS__V18*/ meltfptr[17]), "OBLO_BODYL");
;
/*_.OBLOCK__V19*/ meltfptr[18] = /*_.INST__V20*/ meltfptr[19];;
- MELT_LOCATION ("warmelt-genobj.melt:4030:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4054:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -6482,7 +6744,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4032:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4056:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6491,7 +6753,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.OROUT__V17*/ meltfptr[16]),
(melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-genobj.melt:4032:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4056:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -6499,7 +6761,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4032:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4056:/ cond.else");
/*^block */
/*anyblock */
@@ -6513,7 +6775,7 @@ lab_endgetargs:;
melt_assert_failed (("check orout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4032) ? (4032) : __LINE__, __FUNCTION__);
+ (4056) ? (4056) : __LINE__, __FUNCTION__);
;
}
;
@@ -6528,7 +6790,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = /*_.IFELSE___V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4032:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4056:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
@@ -6541,7 +6803,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4033:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4057:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6552,7 +6814,7 @@ lab_endgetargs:;
(melt_unsafe_magic_discr
((melt_ptr_t) ( /*_.RREST__V15*/ meltfptr[14])) ==
MELTOBMAG_MULTIPLE));;
- MELT_LOCATION ("warmelt-genobj.melt:4033:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4057:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6560,7 +6822,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4033:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4057:/ cond.else");
/*^block */
/*anyblock */
@@ -6574,7 +6836,7 @@ lab_endgetargs:;
melt_assert_failed (("check rrest"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4033) ? (4033) : __LINE__, __FUNCTION__);
+ (4057) ? (4057) : __LINE__, __FUNCTION__);
;
}
;
@@ -6589,7 +6851,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[22] = /*_.IFELSE___V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4033:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4057:/ clear");
/*clear *//*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V25*/ meltfptr[24] = 0;
@@ -6600,7 +6862,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4034:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4058:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.OROUT__V17*/ meltfptr[16]), 7, "OBROUT_RETVAL");
@@ -6610,7 +6872,7 @@ lab_endgetargs:;
;
/*_#NULL__L7*/ meltfnum[3] =
(( /*_.OBROUT_RETVAL__V26*/ meltfptr[24]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:4034:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4058:/ cond");
/*cond */ if ( /*_#NULL__L7*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -6618,7 +6880,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4035:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4059:/ quasiblock");
/*^putslot */
@@ -6640,7 +6902,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4036:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4060:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -6662,7 +6924,7 @@ lab_endgetargs:;
meltfptr[26]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ quasiblock");
/*^newclosure */
@@ -6712,7 +6974,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OLIS__V18*/ meltfptr[17]);
;
/*_.LAMBDA___V28*/ meltfptr[27] = /*_.LAMBDA___V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:4037:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4061:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -6728,7 +6990,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4048:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4072:/ quasiblock");
/*^rawallocobj */
@@ -6755,14 +7017,14 @@ lab_endgetargs:;
/*_.INST___V31*/ meltfptr[30] = /*_.INST__V32*/ meltfptr[31];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4047:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4071:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V18*/ meltfptr[17]),
(melt_ptr_t) ( /*_.INST___V31*/ meltfptr[30]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6785,7 +7047,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6795,7 +7057,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6805,7 +7067,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4050;
+ argtab[2].meltbp_long = 4074;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_return final oblock=";
@@ -6826,7 +7088,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -6839,7 +7101,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -6848,7 +7110,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4050:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4074:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -6865,7 +7127,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[8] = /*_.OBLOCK__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:4021:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4045:/ clear");
/*clear *//*_.RLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.RMAIN__V14*/ meltfptr[13] = 0;
@@ -6899,11 +7161,11 @@ lab_endgetargs:;
/*clear *//*_.INST___V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -6928,14 +7190,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN */
+} /*end meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -6954,7 +7216,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_121_warmelt_genobj_LAMBDA___36___st
+ struct frame_meltrout_122_warmelt_genobj_LAMBDA___36___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -6993,7 +7255,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ getarg");
/*_.RXTRA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7009,14 +7271,14 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4040:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4064:/ quasiblock");
/*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] =
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])),
( /*_#IX__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4044:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4068:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -7031,7 +7293,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4041:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4065:/ quasiblock");
/*^rawallocobj */
@@ -7078,13 +7340,13 @@ lab_endgetargs:;
/*_.OXRES__V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4046:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4070:/ locexp");
meltgc_append_list ((melt_ptr_t) (( /*~OLIS */ meltfclos->tabval[2])),
(melt_ptr_t) ( /*_.OXRES__V5*/ meltfptr[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4040:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4064:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.COMPILE_OBJ__V4*/ meltfptr[3] = 0;
@@ -7103,14 +7365,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_121_warmelt_genobj_LAMBDA___36__ */
+} /*end meltrout_122_warmelt_genobj_LAMBDA___36__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -7129,7 +7391,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_122_warmelt_genobj_LAMBDA___37___st
+ struct frame_meltrout_123_warmelt_genobj_LAMBDA___37___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7168,7 +7430,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4057:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4081:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7192,7 +7454,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] =
( /*!CTYPE_VALUE */ meltfrout->tabval[0]);;
- MELT_LOCATION ("warmelt-genobj.melt:4057:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4081:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -7208,14 +7470,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_122_warmelt_genobj_LAMBDA___37__ */
+} /*end meltrout_123_warmelt_genobj_LAMBDA___37__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -7237,7 +7499,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA_st
+ struct frame_meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7276,7 +7538,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ getarg");
/*_.NLAM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7297,7 +7559,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4066:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4090:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7306,7 +7568,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4066:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4090:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7314,7 +7576,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4066:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4090:/ cond.else");
/*^block */
/*anyblock */
@@ -7328,7 +7590,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4066) ? (4066) : __LINE__, __FUNCTION__);
+ (4090) ? (4090) : __LINE__, __FUNCTION__);
;
}
;
@@ -7343,7 +7605,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4066:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4090:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -7356,7 +7618,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4067:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4091:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7365,7 +7627,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_LAMBDA */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4067:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4091:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7373,7 +7635,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4067:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4091:/ cond.else");
/*^block */
/*anyblock */
@@ -7387,7 +7649,7 @@ lab_endgetargs:;
melt_assert_failed (("check nlam"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4067) ? (4067) : __LINE__, __FUNCTION__);
+ (4091) ? (4091) : __LINE__, __FUNCTION__);
;
}
;
@@ -7402,7 +7664,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4067:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4091:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -7415,7 +7677,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7438,7 +7700,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7448,7 +7710,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7458,7 +7720,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4068;
+ argtab[2].meltbp_long = 4092;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_lambda nlam=";
/*^apply.arg */
@@ -7478,7 +7740,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -7491,7 +7753,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -7500,7 +7762,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4068:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4092:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -7513,7 +7775,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4069:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4093:/ quasiblock");
/*^getslot */
@@ -7524,10 +7786,10 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4070:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4094:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4071:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4095:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 1, "NLAMBDA_PROC");
@@ -7537,7 +7799,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4072:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4096:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7546,7 +7808,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CHECKPRO__V15*/ meltfptr[14]),
(melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4072:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4096:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -7554,7 +7816,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4072:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4096:/ cond.else");
/*^block */
/*anyblock */
@@ -7568,7 +7830,7 @@ lab_endgetargs:;
melt_assert_failed (("check checkpro"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4072) ? (4072) : __LINE__, __FUNCTION__);
+ (4096) ? (4096) : __LINE__, __FUNCTION__);
;
}
;
@@ -7583,7 +7845,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4072:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4096:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -7598,12 +7860,12 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[13] = /*_.CHECKPRO__V15*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:4070:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4094:/ clear");
/*clear *//*_.CHECKPRO__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0;
/*_.NPRO__V18*/ meltfptr[16] = /*_.LET___V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:4074:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4098:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V18*/ meltfptr[16]), 2, "NRPRO_NAME");
@@ -7611,7 +7873,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4075:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4099:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 3, "NLAMBDA_CLOSEDV");
@@ -7622,7 +7884,7 @@ lab_endgetargs:;
/*_#NBCLOSED__L6*/ meltfnum[0] =
(melt_multiple_length
((melt_ptr_t) ( /*_.NCLOVTUP__V20*/ meltfptr[15])));;
- MELT_LOCATION ("warmelt-genobj.melt:4077:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4101:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7637,7 +7899,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4078:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4102:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 2, "NLAMBDA_CONSTROUT");
@@ -7645,7 +7907,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4079:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4103:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -7656,7 +7918,7 @@ lab_endgetargs:;
/*_.OLIS__V24*/ meltfptr[23] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4081:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4105:/ quasiblock");
/*^rawallocobj */
@@ -7697,12 +7959,12 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4086:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4110:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.DESTLIST__V27*/ meltfptr[26]),
(melt_ptr_t) ( /*_.LOCV__V21*/ meltfptr[20]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4094:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4118:/ quasiblock");
/*^msend */
@@ -7721,9 +7983,9 @@ lab_endgetargs:;
;
/*_.LET___V28*/ meltfptr[27] = /*_.CROU__V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:4094:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4118:/ clear");
/*clear *//*_.CROU__V29*/ meltfptr[28] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4093:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4117:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.LET___V28*/ meltfptr[27];;
@@ -7733,7 +7995,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[10])),
( /*_#NBCLOSED__L6*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4088:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4112:/ quasiblock");
/*^rawallocobj */
@@ -7799,12 +8061,12 @@ lab_endgetargs:;
/*_.INST___V32*/ meltfptr[31] = /*_.INST__V33*/ meltfptr[32];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4087:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4111:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.INST___V32*/ meltfptr[31]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ quasiblock");
/*^newclosure */
@@ -7867,7 +8129,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V34*/ meltfptr[33] = /*_.LAMBDA___V35*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-genobj.melt:4099:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4123:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7885,14 +8147,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4110:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4134:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.LOCV__V21*/ meltfptr[20]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7915,7 +8177,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -7925,7 +8187,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7935,7 +8197,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4111;
+ argtab[2].meltbp_long = 4135;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_lambda result oblock=";
@@ -7956,7 +8218,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
@@ -7969,7 +8231,7 @@ lab_endgetargs:;
/*_.IF___V38*/ meltfptr[37] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];;
@@ -7978,7 +8240,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4111:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4135:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[37] = 0;
@@ -7995,7 +8257,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[8] = /*_.OBLOCK__V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:4069:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4093:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.LET___V14*/ meltfptr[13] = 0;
@@ -8033,11 +8295,11 @@ lab_endgetargs:;
/*clear *//*_.MULTIPLE_EVERY__V36*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -8062,14 +8324,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA */
+} /*end meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8088,7 +8350,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_124_warmelt_genobj_LAMBDA___38___st
+ struct frame_meltrout_125_warmelt_genobj_LAMBDA___38___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8127,7 +8389,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ getarg");
/*_.CLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8147,7 +8409,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])),
( /*_#IX__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4108:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4132:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -8162,7 +8424,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4104:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4128:/ quasiblock");
/*^rawallocobj */
@@ -8219,14 +8481,14 @@ lab_endgetargs:;
/*_.INST___V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4102:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4126:/ locexp");
meltgc_append_list ((melt_ptr_t) (( /*~OLIS */ meltfclos->tabval[0])),
(melt_ptr_t) ( /*_.INST___V5*/ meltfptr[4]));
}
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.COMPILE_OBJ__V4*/ meltfptr[3] = 0;
@@ -8244,14 +8506,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_124_warmelt_genobj_LAMBDA___38__ */
+} /*end meltrout_125_warmelt_genobj_LAMBDA___38__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -8276,7 +8538,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST_st
+ struct frame_meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8315,7 +8577,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ getarg");
/*_.NMKI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8336,7 +8598,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4118:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4142:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8345,7 +8607,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4118:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4142:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8353,7 +8615,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4118:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4142:/ cond.else");
/*^block */
/*anyblock */
@@ -8367,7 +8629,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4118) ? (4118) : __LINE__, __FUNCTION__);
+ (4142) ? (4142) : __LINE__, __FUNCTION__);
;
}
;
@@ -8382,7 +8644,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4118:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4142:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -8395,7 +8657,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4119:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4143:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8404,7 +8666,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_INSTANCE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4119:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4143:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8412,7 +8674,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4119:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4143:/ cond.else");
/*^block */
/*anyblock */
@@ -8426,7 +8688,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmki"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4119) ? (4119) : __LINE__, __FUNCTION__);
+ (4143) ? (4143) : __LINE__, __FUNCTION__);
;
}
;
@@ -8441,7 +8703,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4119:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4143:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -8454,7 +8716,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8477,7 +8739,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8487,7 +8749,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8497,7 +8759,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4120;
+ argtab[2].meltbp_long = 4144;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_makeinst nmki=";
/*^apply.arg */
@@ -8517,7 +8779,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -8530,7 +8792,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -8539,7 +8801,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4120:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4144:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -8552,7 +8814,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4121:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4145:/ quasiblock");
/*^getslot */
@@ -8563,7 +8825,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4122:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4146:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 1, "NMINS_CLASS");
@@ -8571,7 +8833,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4123:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4147:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 2, "NMINS_CLADATA");
@@ -8579,7 +8841,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4124:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4148:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 3, "NMINS_FIELDS");
@@ -8589,7 +8851,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4126:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4150:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8598,7 +8860,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCLA__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4126:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4150:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -8606,7 +8868,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4126:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4150:/ cond.else");
/*^block */
/*anyblock */
@@ -8620,7 +8882,7 @@ lab_endgetargs:;
melt_assert_failed (("check ncla"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4126) ? (4126) : __LINE__, __FUNCTION__);
+ (4150) ? (4150) : __LINE__, __FUNCTION__);
;
}
;
@@ -8635,7 +8897,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4126:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4150:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
@@ -8646,7 +8908,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4127:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4151:/ quasiblock");
/*^getslot */
@@ -8665,7 +8927,7 @@ lab_endgetargs:;
/*_.DESTLIST__V21*/ meltfptr[20] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4129:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4153:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8684,7 +8946,7 @@ lab_endgetargs:;
/*_.OLIS__V23*/ meltfptr[22] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4131:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4155:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -8698,7 +8960,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4132:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4156:/ quasiblock");
/*^rawallocobj */
@@ -8738,7 +9000,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[10])),
( /*_#NBFLD__L6*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4139:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4163:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCLA__V14*/ meltfptr[13]), 1, "NAMED_NAME");
@@ -8746,7 +9008,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4135:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4159:/ quasiblock");
/*^rawallocobj */
@@ -8813,19 +9075,19 @@ lab_endgetargs:;
/*_.ORALLOBJ__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4142:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4166:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.DESTLIST__V21*/ meltfptr[20]),
(melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4143:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4167:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.ORALLOBJ__V29*/ meltfptr[28]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ quasiblock");
/*^newclosure */
@@ -8888,7 +9150,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21]);
;
/*_.LAMBDA___V31*/ meltfptr[30] = /*_.LAMBDA___V32*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-genobj.melt:4145:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4169:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8906,14 +9168,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4165:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4189:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8936,7 +9198,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -8946,7 +9208,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8956,7 +9218,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4166;
+ argtab[2].meltbp_long = 4190;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_makeinst result oblock=";
@@ -8977,7 +9239,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -8990,7 +9252,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];;
@@ -8999,7 +9261,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4166:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4190:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[34] = 0;
@@ -9016,7 +9278,7 @@ lab_endgetargs:;
/*_.LET___V19*/ meltfptr[17] = /*_.OBLOCK__V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:4127:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4151:/ clear");
/*clear *//*_.CLASS_FIELDS__V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_#NBFLD__L6*/ meltfnum[0] = 0;
@@ -9044,7 +9306,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V19*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-genobj.melt:4121:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4145:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NCLA__V14*/ meltfptr[13] = 0;
@@ -9056,11 +9318,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.LET___V19*/ meltfptr[17] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9085,14 +9347,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST */
+} /*end meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9111,7 +9373,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_126_warmelt_genobj_LAMBDA___39___st
+ struct frame_meltrout_127_warmelt_genobj_LAMBDA___39___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9150,7 +9412,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ getarg");
/*_.CFLA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9168,7 +9430,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4148:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4172:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9177,7 +9439,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4148:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4172:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9185,7 +9447,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4148:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4172:/ cond.else");
/*^block */
/*anyblock */
@@ -9199,7 +9461,7 @@ lab_endgetargs:;
melt_assert_failed (("compilobj_nrep_makeinst check cfla"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4148) ? (4148) : __LINE__, __FUNCTION__);
+ (4172) ? (4172) : __LINE__, __FUNCTION__);
;
}
;
@@ -9214,7 +9476,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4148:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4172:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0;
@@ -9225,7 +9487,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4149:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4173:/ quasiblock");
/*^getslot */
@@ -9236,7 +9498,7 @@ lab_endgetargs:;
meltfptr[3] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4150:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4174:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]), 1, "NFLA_FIELD");
@@ -9244,7 +9506,7 @@ lab_endgetargs:;
meltfptr[5] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4151:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4175:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]), 2, "NFLA_VAL");
@@ -9254,7 +9516,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4152:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4176:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9263,7 +9525,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CFIELD__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4152:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4176:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9271,7 +9533,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4152:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4176:/ cond.else");
/*^block */
/*anyblock */
@@ -9285,7 +9547,7 @@ lab_endgetargs:;
melt_assert_failed (("compilobj_nrep_makeinst check cfield"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4152) ? (4152) : __LINE__, __FUNCTION__);
+ (4176) ? (4176) : __LINE__, __FUNCTION__);
;
}
;
@@ -9300,7 +9562,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[7] = /*_.IFELSE___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4152:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4176:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
@@ -9311,7 +9573,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4155:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4179:/ quasiblock");
/*^msend */
@@ -9331,7 +9593,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4156:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4180:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9344,7 +9606,7 @@ lab_endgetargs:;
/*_#NOT__L5*/ meltfnum[4] =
(!( /*_#IS_A__L4*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:4156:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4180:/ cond");
/*cond */ if ( /*_#NOT__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -9352,7 +9614,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4156:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4180:/ cond.else");
/*^block */
/*anyblock */
@@ -9363,7 +9625,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compilobj_nrep_makeinst check oval not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4156) ? (4156) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compilobj_nrep_makeinst check oval not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4180) ? (4180) : __LINE__, __FUNCTION__);
;
}
;
@@ -9378,7 +9640,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4156:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4180:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#NOT__L5*/ meltfnum[4] = 0;
@@ -9391,7 +9653,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4158:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4182:/ cond");
/*cond */ if ( /*_.CFLOC__V5*/ meltfptr[3]) /*then */
{
/*^cond.then */
@@ -9399,7 +9661,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4158:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4182:/ cond.else");
/*_.IFELSE___V14*/ meltfptr[12] = ( /*~NLOC */ meltfclos->tabval[2]);;
}
@@ -9414,7 +9676,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[5])),
( /*_#GET_INT__L6*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4157:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4181:/ quasiblock");
/*^rawallocobj */
@@ -9481,7 +9743,7 @@ lab_endgetargs:;
/*_.LET___V10*/ meltfptr[8] = /*_.INST___V16*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-genobj.melt:4155:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4179:/ clear");
/*clear *//*_.OVAL__V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0;
@@ -9495,13 +9757,13 @@ lab_endgetargs:;
/*clear *//*_.INST___V16*/ meltfptr[15] = 0;
{
- MELT_LOCATION ("warmelt-genobj.melt:4153:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4177:/ locexp");
meltgc_append_list ((melt_ptr_t) (( /*~OLIS */ meltfclos->tabval[0])),
(melt_ptr_t) ( /*_.LET___V10*/ meltfptr[8]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4149:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4173:/ clear");
/*clear *//*_.CFLOC__V5*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.CFIELD__V6*/ meltfptr[5] = 0;
@@ -9513,7 +9775,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V10*/ meltfptr[8] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
}
@@ -9527,14 +9789,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_126_warmelt_genobj_LAMBDA___39__ */
+} /*end meltrout_127_warmelt_genobj_LAMBDA___39__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9555,7 +9817,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC_st
+ struct frame_meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9594,7 +9856,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ getarg");
/*_.NPRO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9615,7 +9877,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4175:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4199:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9624,7 +9886,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4175:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4199:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9632,7 +9894,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4175:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4199:/ cond.else");
/*^block */
/*anyblock */
@@ -9646,7 +9908,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4175) ? (4175) : __LINE__, __FUNCTION__);
+ (4199) ? (4199) : __LINE__, __FUNCTION__);
;
}
;
@@ -9661,7 +9923,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4175:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4199:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -9674,7 +9936,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4176:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4200:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9683,7 +9945,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4176:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4200:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9691,7 +9953,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4176:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4200:/ cond.else");
/*^block */
/*anyblock */
@@ -9705,7 +9967,7 @@ lab_endgetargs:;
melt_assert_failed (("check npro"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4176) ? (4176) : __LINE__, __FUNCTION__);
+ (4200) ? (4200) : __LINE__, __FUNCTION__);
;
}
;
@@ -9720,7 +9982,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4176:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4200:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -9733,7 +9995,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9756,7 +10018,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9766,7 +10028,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -9776,7 +10038,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4177;
+ argtab[2].meltbp_long = 4201;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_routproc npro=";
/*^apply.arg */
@@ -9802,7 +10064,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -9815,7 +10077,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -9824,7 +10086,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4177:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4201:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -9839,7 +10101,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4178:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4202:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9852,7 +10114,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4178:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4202:/ cond.else");
/*^block */
/*anyblock */
@@ -9866,7 +10128,7 @@ lab_endgetargs:;
melt_assert_failed (("UNEXPECTED CALL TO compilobj_routproc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4178) ? (4178) : __LINE__, __FUNCTION__);
+ (4202) ? (4202) : __LINE__, __FUNCTION__);
;
}
;
@@ -9881,7 +10143,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4178:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4202:/ clear");
/*clear *//*_.IFELSE___V13*/ meltfptr[9] = 0;
}
@@ -9890,11 +10152,11 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9919,14 +10181,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC */
+} /*end meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9947,7 +10209,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF_st
+ struct frame_meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9986,7 +10248,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ getarg");
/*_.NPR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10007,7 +10269,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4184:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4208:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10016,7 +10278,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4184:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4208:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10024,7 +10286,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4184:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4208:/ cond.else");
/*^block */
/*anyblock */
@@ -10038,7 +10300,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4184) ? (4184) : __LINE__, __FUNCTION__);
+ (4208) ? (4208) : __LINE__, __FUNCTION__);
;
}
;
@@ -10053,7 +10315,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4184:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4208:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -10064,10 +10326,10 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4185:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4209:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4187:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4211:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPR__V2*/ meltfptr[1]), 1, "NRPREDEF");
@@ -10075,7 +10337,7 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4185:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4209:/ quasiblock");
/*^rawallocobj */
@@ -10114,15 +10376,15 @@ lab_endgetargs:;
/*_.LET___V6*/ meltfptr[4] = /*_.OPR__V8*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-genobj.melt:4185:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4209:/ clear");
/*clear *//*_.NRPREDEF__V7*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.OPR__V8*/ meltfptr[7] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -10143,14 +10405,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF */
+} /*end meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -10175,7 +10437,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL_st
+ struct frame_meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -10214,7 +10476,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ getarg");
/*_.NDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10264,7 +10526,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4200:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4224:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10273,7 +10535,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_BOUND_DATA */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4200:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4224:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10281,7 +10543,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4200:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4224:/ cond.else");
/*^block */
/*anyblock */
@@ -10295,7 +10557,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check ndat"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4200) ? (4200) : __LINE__, __FUNCTION__);
+ (4224) ? (4224) : __LINE__, __FUNCTION__);
;
}
;
@@ -10310,7 +10572,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4200:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4224:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -10323,7 +10585,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4201:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4225:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10332,7 +10594,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.OBJ__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4201:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4225:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10340,7 +10602,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4201:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4225:/ cond.else");
/*^block */
/*anyblock */
@@ -10354,7 +10616,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check obj"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4201) ? (4201) : __LINE__, __FUNCTION__);
+ (4225) ? (4225) : __LINE__, __FUNCTION__);
;
}
;
@@ -10369,7 +10631,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4201:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4225:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -10382,7 +10644,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4202:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4226:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10391,7 +10653,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ODISCR__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_OBJVALUE */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:4202:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4226:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10399,7 +10661,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4202:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4226:/ cond.else");
/*^block */
/*anyblock */
@@ -10413,7 +10675,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check odiscr"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4202) ? (4202) : __LINE__, __FUNCTION__);
+ (4226) ? (4226) : __LINE__, __FUNCTION__);
;
}
;
@@ -10428,7 +10690,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4202:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4226:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -10441,7 +10703,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4203:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4227:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10450,7 +10712,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4203:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4227:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10458,7 +10720,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4203:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4227:/ cond.else");
/*^block */
/*anyblock */
@@ -10472,7 +10734,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check irout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4203) ? (4203) : __LINE__, __FUNCTION__);
+ (4227) ? (4227) : __LINE__, __FUNCTION__);
;
}
;
@@ -10487,7 +10749,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4203:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4227:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -10500,7 +10762,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4204:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4228:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10509,7 +10771,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-genobj.melt:4204:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4228:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10517,7 +10779,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4204:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4228:/ cond.else");
/*^block */
/*anyblock */
@@ -10531,7 +10793,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4204) ? (4204) : __LINE__, __FUNCTION__);
+ (4228) ? (4228) : __LINE__, __FUNCTION__);
;
}
;
@@ -10546,7 +10808,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4204:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4228:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -10559,7 +10821,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10582,7 +10844,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10592,7 +10854,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -10602,7 +10864,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4205;
+ argtab[2].meltbp_long = 4229;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compil_data_and_slots_fill start ndat=";
@@ -10641,7 +10903,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -10654,7 +10916,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
@@ -10663,7 +10925,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4205:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4229:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[17] = 0;
@@ -10676,14 +10938,14 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4206:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4230:/ quasiblock");
/*_#IS_A__L8*/ meltfnum[6] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATAINSTANCE */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-genobj.melt:4207:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4231:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -10703,7 +10965,7 @@ lab_endgetargs:;
/*_.NINST_PREDEF__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4207:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4231:/ clear");
/*clear *//*_.NINST_PREDEF__V23*/ meltfptr[22] = 0;
}
;
@@ -10714,7 +10976,7 @@ lab_endgetargs:;
/*_.IPREDEF__V22*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4208:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4232:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]), 3, "OBROUT_BODY");
@@ -10722,7 +10984,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4209:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4233:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]), 12, "OIROUT_FILL");
@@ -10730,7 +10992,7 @@ lab_endgetargs:;
meltfptr[24] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4210:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4234:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -10746,7 +11008,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4211:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4235:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_9_VALUEDATA_ */ meltfrout->tabval[9])), 1, "NAMED_NAME");
@@ -10754,7 +11016,7 @@ lab_endgetargs:;
meltfptr[26] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4212:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4236:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -10762,7 +11024,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4213:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4237:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 3, "NDATA_LOCBIND");
@@ -10770,7 +11032,7 @@ lab_endgetargs:;
meltfptr[28] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4214:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4238:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V6*/ meltfptr[5]), 1, "GNCX_LOCMAP");
@@ -10792,7 +11054,7 @@ lab_endgetargs:;
( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4219:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4243:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10800,7 +11062,7 @@ lab_endgetargs:;
/*_#IS_LIST__L10*/ meltfnum[9] =
(melt_magic_discr ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-genobj.melt:4219:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4243:/ cond");
/*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -10808,7 +11070,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4219:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4243:/ cond.else");
/*^block */
/*anyblock */
@@ -10819,7 +11081,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4219) ? (4219) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4243) ? (4243) : __LINE__, __FUNCTION__);
;
}
;
@@ -10834,7 +11096,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.IFELSE___V34*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4219:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4243:/ clear");
/*clear *//*_#IS_LIST__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0;
@@ -10847,7 +11109,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4220:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4244:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10862,7 +11124,7 @@ lab_endgetargs:;
;
/*_#NULL__L11*/ meltfnum[9] =
(( /*_.OIE_LOCVAR__V36*/ meltfptr[35]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:4220:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4244:/ cond");
/*cond */ if ( /*_#NULL__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -10870,7 +11132,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4220:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4244:/ cond.else");
/*^block */
/*anyblock */
@@ -10881,7 +11143,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compil_data_and_slots_fill check fresh obj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4220) ? (4220) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compil_data_and_slots_fill check fresh obj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4244) ? (4244) : __LINE__, __FUNCTION__);
;
}
;
@@ -10896,7 +11158,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[33] = /*_.IFELSE___V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4220:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4244:/ clear");
/*clear *//*_.OIE_LOCVAR__V36*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_#NULL__L11*/ meltfnum[9] = 0;
@@ -10909,7 +11171,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4221:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4245:/ quasiblock");
/*^putslot */
@@ -10927,7 +11189,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4222:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4246:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10935,7 +11197,7 @@ lab_endgetargs:;
/*_#IS_LIST__L12*/ meltfnum[9] =
(melt_magic_discr ((melt_ptr_t) ( /*_.IFILLLIS__V25*/ meltfptr[24]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-genobj.melt:4222:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4246:/ cond");
/*cond */ if ( /*_#IS_LIST__L12*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -10943,7 +11205,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4222:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4246:/ cond.else");
/*^block */
/*anyblock */
@@ -10954,7 +11216,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compil_data_and_slots_fill check ifilllis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4222) ? (4222) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compil_data_and_slots_fill check ifilllis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4246) ? (4246) : __LINE__, __FUNCTION__);
;
}
;
@@ -10969,7 +11231,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[35] = /*_.IFELSE___V39*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4222:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4246:/ clear");
/*clear *//*_#IS_LIST__L12*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V39*/ meltfptr[36] = 0;
@@ -10982,7 +11244,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4223:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4247:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10990,7 +11252,7 @@ lab_endgetargs:;
/*_#IS_LIST__L13*/ meltfnum[9] =
(melt_magic_discr ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-genobj.melt:4223:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4247:/ cond");
/*cond */ if ( /*_#IS_LIST__L13*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -10998,7 +11260,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4223:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4247:/ cond.else");
/*^block */
/*anyblock */
@@ -11009,7 +11271,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4223) ? (4223) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4247) ? (4247) : __LINE__, __FUNCTION__);
;
}
;
@@ -11024,7 +11286,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[36] = /*_.IFELSE___V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4223:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4247:/ clear");
/*clear *//*_#IS_LIST__L13*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V41*/ meltfptr[40] = 0;
@@ -11035,7 +11297,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[36] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4225:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4249:/ cond");
/*cond */ if ( /*_.IPREDEF__V22*/ meltfptr[18]) /*then */
{
/*^cond.then */
@@ -11043,7 +11305,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4226:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4250:/ quasiblock");
/*_#IS_A__L14*/ meltfnum[9] =
@@ -11051,7 +11313,7 @@ lab_endgetargs:;
( /*_.IPREDEF__V22*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */
meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-genobj.melt:4229:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4253:/ cond");
/*cond */ if ( /*_#IS_A__L14*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -11064,7 +11326,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[13])),
("MELTPREDEFIX(predefinited,")));;
- MELT_LOCATION ("warmelt-genobj.melt:4236:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4260:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.IPREDEF__V22*/ meltfptr[18]), 1, "NAMED_NAME");
@@ -11086,35 +11348,35 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[13])),
(")")));;
- MELT_LOCATION ("warmelt-genobj.melt:4232:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:4256:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
{
- struct MELT_MULTIPLE_STRUCT (3) rtup_0__TUPLREC__x10;
+ struct MELT_MULTIPLE_STRUCT (3) rtup_0__TUPLREC__x9;
long meltletrec_1_endgap;
} *meltletrec_1_ptr = 0;
meltletrec_1_ptr =
(struct meltletrec_1_st *)
meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
/*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x10 */
+ /*inimult rtup_0__TUPLREC__x9 */
/*_.TUPLREC___V48*/ meltfptr[47] =
- (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x10;
- meltletrec_1_ptr->rtup_0__TUPLREC__x10.discr =
+ (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x9;
+ meltletrec_1_ptr->rtup_0__TUPLREC__x9.discr =
(meltobject_ptr_t) (((void
*) (MELT_PREDEF (DISCR_MULTIPLE))));
- meltletrec_1_ptr->rtup_0__TUPLREC__x10.nbval = 3;
+ meltletrec_1_ptr->rtup_0__TUPLREC__x9.nbval = 3;
/*^putuple */
- /*putupl#40 */
- melt_assertmsg ("putupl [:4232] #40 checktup",
+ /*putupl#35 */
+ melt_assertmsg ("putupl [:4256] #35 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V48*/
meltfptr[47])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4232] #40 checkoff",
+ melt_assertmsg ("putupl [:4256] #35 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -11125,13 +11387,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V43*/ meltfptr[42]);
;
/*^putuple */
- /*putupl#41 */
- melt_assertmsg ("putupl [:4232] #41 checktup",
+ /*putupl#36 */
+ melt_assertmsg ("putupl [:4256] #36 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V48*/
meltfptr[47])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4232] #41 checkoff",
+ melt_assertmsg ("putupl [:4256] #36 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -11142,13 +11404,13 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRING__V45*/ meltfptr[44]);
;
/*^putuple */
- /*putupl#42 */
- melt_assertmsg ("putupl [:4232] #42 checktup",
+ /*putupl#37 */
+ melt_assertmsg ("putupl [:4256] #37 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V48*/
meltfptr[47])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4232] #42 checkoff",
+ melt_assertmsg ("putupl [:4256] #37 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -11165,13 +11427,13 @@ lab_endgetargs:;
/*_.TUPLREC___V48*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4232:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4256:/ clear");
/*clear *//*_.TUPLREC___V48*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V48*/ meltfptr[47] = 0;
} /*end multiallocblock */
;
- MELT_LOCATION ("warmelt-genobj.melt:4230:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4254:/ quasiblock");
/*^rawallocobj */
@@ -11205,7 +11467,7 @@ lab_endgetargs:;
/*_.INST___V49*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4229:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4253:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V43*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V44*/ meltfptr[43] = 0;
@@ -11231,7 +11493,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.IPREDEF__V22*/ meltfptr[18])) ==
MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-genobj.melt:4241:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4265:/ cond");
/*cond */ if ( /*_#IS_INTEGERBOX__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -11252,13 +11514,13 @@ lab_endgetargs:;
(( /*!DISCR_VERBATIM_STRING */ meltfrout->
tabval[13])), ("]")));;
MELT_LOCATION
- ("warmelt-genobj.melt:4244:/ blockmultialloc");
+ ("warmelt-genobj.melt:4268:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_2_st
{
struct MELT_MULTIPLE_STRUCT (3)
- rtup_0__TUPLREC__x11;
+ rtup_0__TUPLREC__x10;
long meltletrec_2_endgap;
} *meltletrec_2_ptr = 0;
meltletrec_2_ptr =
@@ -11266,22 +11528,22 @@ lab_endgetargs:;
meltgc_allocate (sizeof (struct meltletrec_2_st),
0);
/*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x11 */
+ /*inimult rtup_0__TUPLREC__x10 */
/*_.TUPLREC___V55*/ meltfptr[46] =
- (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x11;
- meltletrec_2_ptr->rtup_0__TUPLREC__x11.discr =
+ (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x10;
+ meltletrec_2_ptr->rtup_0__TUPLREC__x10.discr =
(meltobject_ptr_t) (((void
*) (MELT_PREDEF
(DISCR_MULTIPLE))));
- meltletrec_2_ptr->rtup_0__TUPLREC__x11.nbval = 3;
+ meltletrec_2_ptr->rtup_0__TUPLREC__x10.nbval = 3;
/*^putuple */
- /*putupl#43 */
- melt_assertmsg ("putupl [:4244] #43 checktup",
+ /*putupl#38 */
+ melt_assertmsg ("putupl [:4268] #38 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4244] #43 checkoff",
+ melt_assertmsg ("putupl [:4268] #38 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -11291,11 +11553,11 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MAKE_STRINGCONST__V52*/ meltfptr[43]);
;
/*^putuple */
- /*putupl#44 */
- melt_assertmsg ("putupl [:4244] #44 checktup",
+ /*putupl#39 */
+ melt_assertmsg ("putupl [:4268] #39 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4244] #44 checkoff",
+ melt_assertmsg ("putupl [:4268] #39 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -11305,11 +11567,11 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.IPREDEF__V22*/ meltfptr[18]);
;
/*^putuple */
- /*putupl#45 */
- melt_assertmsg ("putupl [:4244] #45 checktup",
+ /*putupl#40 */
+ melt_assertmsg ("putupl [:4268] #40 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:4244] #45 checkoff",
+ melt_assertmsg ("putupl [:4268] #40 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -11325,13 +11587,13 @@ lab_endgetargs:;
/*_.TUPLREC___V55*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4244:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4268:/ clear");
/*clear *//*_.TUPLREC___V55*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V55*/ meltfptr[46] = 0;
} /*end multiallocblock */
;
- MELT_LOCATION ("warmelt-genobj.melt:4242:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4266:/ quasiblock");
/*^rawallocobj */
@@ -11364,7 +11626,7 @@ lab_endgetargs:;
/*_.INST___V56*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4241:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4265:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V52*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.MAKE_STRINGCONST__V53*/ meltfptr[44] = 0;
@@ -11387,7 +11649,7 @@ lab_endgetargs:;
/*_.IFELSE___V51*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4229:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4253:/ clear");
/*clear *//*_#IS_INTEGERBOX__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IFELSE___V51*/ meltfptr[42] = 0;
@@ -11399,7 +11661,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[14]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4254:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4278:/ quasiblock");
/*^rawallocobj */
@@ -11434,7 +11696,7 @@ lab_endgetargs:;
;
/*_.OBLOCKPREDEF__V59*/ meltfptr[44] =
/*_.INST__V60*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-genobj.melt:4258:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4282:/ quasiblock");
/*^rawallocobj */
@@ -11488,12 +11750,12 @@ lab_endgetargs:;
"OBCOND_ELSE");
;
/*_.OCONDPREDEF__V61*/ meltfptr[47] = /*_.INST__V62*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-genobj.melt:4265:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:4289:/ compute");
/*_.ISTMTLIS__V31*/ meltfptr[30] = /*_.SETQ___V63*/ meltfptr[62] =
/*_.INITLIS__V58*/ meltfptr[43];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4266:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4290:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.IBODYLIS__V24*/ meltfptr[22]),
(melt_ptr_t) ( /*_.OCONDPREDEF__V61*/
@@ -11501,7 +11763,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4226:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4250:/ clear");
/*clear *//*_#IS_A__L14*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.OTESTPREDEF__V42*/ meltfptr[40] = 0;
@@ -11518,7 +11780,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ quasiblock");
/*^newclosure */
@@ -11581,7 +11843,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.TUPVAR__V32*/ meltfptr[31]);
;
/*_.LAMBDA___V64*/ meltfptr[40] = /*_.LAMBDA___V65*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-genobj.melt:4268:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4292:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11597,7 +11859,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4287:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4311:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 8, "NINST_SLOTS");
@@ -11605,7 +11867,7 @@ lab_endgetargs:;
meltfptr[47] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ quasiblock");
/*^newclosure */
@@ -11668,7 +11930,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.ISTMTLIS__V31*/ meltfptr[30]);
;
/*_.LAMBDA___V68*/ meltfptr[62] = /*_.LAMBDA___V69*/ meltfptr[68];;
- MELT_LOCATION ("warmelt-genobj.melt:4286:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4310:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11684,7 +11946,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4309:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4333:/ cond");
/*cond */ if ( /*_.NLOC__V28*/ meltfptr[27]) /*then */
{
/*^cond.then */
@@ -11692,7 +11954,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4309:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4333:/ cond.else");
/*^block */
/*anyblock */
@@ -11709,13 +11971,13 @@ lab_endgetargs:;
/*_.IFELSE___V71*/ meltfptr[70] = /*_.NREP_LOC__V72*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4309:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4333:/ clear");
/*clear *//*_.NREP_LOC__V72*/ meltfptr[71] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4308:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4332:/ quasiblock");
/*^rawallocobj */
@@ -11760,12 +12022,12 @@ lab_endgetargs:;
/*_.INST___V73*/ meltfptr[71] = /*_.INST__V74*/ meltfptr[73];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4307:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4331:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.ISTMTLIS__V31*/ meltfptr[30]),
(melt_ptr_t) ( /*_.INST___V73*/ meltfptr[71]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4315:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4339:/ quasiblock");
/*^newclosure */
@@ -11802,7 +12064,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.NLOC__V28*/ meltfptr[27]);
;
/*_.LAMBDA___V75*/ meltfptr[74] = /*_.LAMBDA___V76*/ meltfptr[75];;
- MELT_LOCATION ("warmelt-genobj.melt:4313:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4337:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11820,14 +12082,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4324:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4348:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22]),
(melt_ptr_t) ( /*_.OBJ__V3*/ meltfptr[2]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11850,7 +12112,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -11860,7 +12122,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11871,7 +12133,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4326;
+ argtab[2].meltbp_long = 4350;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compil_data_and_slots_fill final dlocbind=";
@@ -11892,7 +12154,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0;
@@ -11905,7 +12167,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[78] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[78];;
@@ -11914,7 +12176,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[77] = /*_.PROGN___V81*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4326:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4350:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[78] = 0;
@@ -11927,16 +12189,16 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[77] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4330:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4354:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.DLOCBIND__V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:4330:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4354:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V21*/ meltfptr[17] = /*_.RETURN___V82*/ meltfptr[78];;
- MELT_LOCATION ("warmelt-genobj.melt:4206:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4230:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IPREDEF__V22*/ meltfptr[18] = 0;
@@ -11990,18 +12252,18 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V78*/ meltfptr[77] = 0;
/*^clear */
/*clear *//*_.RETURN___V82*/ meltfptr[78] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4332:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4356:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-genobj.melt:4332:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4356:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V83*/ meltfptr[79];;
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12034,14 +12296,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL */
+} /*end meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12060,7 +12322,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_130_warmelt_genobj_LAMBDA___40___st
+ struct frame_meltrout_131_warmelt_genobj_LAMBDA___40___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12099,7 +12361,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ getarg");
/*_.LBIND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12117,7 +12379,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4271:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4295:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12126,7 +12388,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4271:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4295:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12134,7 +12396,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4271:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4295:/ cond.else");
/*^block */
/*anyblock */
@@ -12148,7 +12410,7 @@ lab_endgetargs:;
melt_assert_failed (("compil_data_and_slots_fill check lbind"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4271) ? (4271) : __LINE__, __FUNCTION__);
+ (4295) ? (4295) : __LINE__, __FUNCTION__);
;
}
;
@@ -12163,7 +12425,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4271:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4295:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0;
@@ -12174,7 +12436,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4272:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4296:/ quasiblock");
/*^getslot */
@@ -12185,7 +12447,7 @@ lab_endgetargs:;
meltfptr[3] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4273:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4297:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]), 1, "LETBIND_TYPE");
@@ -12193,7 +12455,7 @@ lab_endgetargs:;
meltfptr[5] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4274:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4298:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]), 2, "LETBIND_EXPR");
@@ -12201,7 +12463,7 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4275:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4299:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12218,7 +12480,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4276:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4300:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -12233,7 +12495,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4278:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4302:/ cond");
/*cond */ if ( /*_.OBVA__V8*/ meltfptr[7]) /*then */
{
/*^cond.then */
@@ -12257,7 +12519,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4279:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4303:/ quasiblock");
/*^cond */
@@ -12286,7 +12548,7 @@ lab_endgetargs:;
/*_.OBMY__V10*/ meltfptr[9] = /*_.PUT_OBJDEST__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4279:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4303:/ clear");
/*clear *//*_.PUT_OBJDEST__V11*/ meltfptr[10] = 0;
}
;
@@ -12299,16 +12561,16 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4281:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4305:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~ISTMTLIS */ meltfclos->tabval[2])),
(melt_ptr_t) ( /*_.OBMY__V10*/ meltfptr[9]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4279:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4303:/ clear");
/*clear *//*_.OBMY__V10*/ meltfptr[9] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4283:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4307:/ cond");
/*cond */ if ( /*_.OBVA__V8*/ meltfptr[7]) /*then */
{
/*^cond.then */
@@ -12332,7 +12594,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4272:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4296:/ clear");
/*clear *//*_.BDER__V5*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.CTY__V6*/ meltfptr[5] = 0;
@@ -12344,7 +12606,7 @@ lab_endgetargs:;
/*clear *//*_.OBNX__V9*/ meltfptr[8] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
}
@@ -12358,14 +12620,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_130_warmelt_genobj_LAMBDA___40__ */
+} /*end meltrout_131_warmelt_genobj_LAMBDA___40__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12384,7 +12646,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_131_warmelt_genobj_LAMBDA___41___st
+ struct frame_meltrout_132_warmelt_genobj_LAMBDA___41___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12423,7 +12685,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ getarg");
/*_.SLOVAL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12439,7 +12701,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4289:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4313:/ cond");
/*cond */ if ( /*_.SLOVAL__V2*/ meltfptr[1]) /*then */
{
/*^cond.then */
@@ -12447,7 +12709,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4291:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4315:/ quasiblock");
/*^msend */
@@ -12467,7 +12729,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4293:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4317:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12481,7 +12743,7 @@ lab_endgetargs:;
/*_#NOT__L3*/ meltfnum[2] =
(!( /*_#IS_A__L2*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:4293:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4317:/ cond");
/*cond */ if ( /*_#NOT__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -12489,7 +12751,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4293:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4317:/ cond.else");
/*^block */
/*anyblock */
@@ -12500,7 +12762,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compil_data_and_slots_fill check slobj not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4293) ? (4293) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compil_data_and_slots_fill check slobj not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4317) ? (4317) : __LINE__, __FUNCTION__);
;
}
;
@@ -12515,7 +12777,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4293:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4317:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#NOT__L3*/ meltfnum[2] = 0;
@@ -12528,7 +12790,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4294:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4318:/ quasiblock");
/*_.OOFF__V6*/ meltfptr[4] =
@@ -12536,7 +12798,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
( /*_#SLORK__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4297:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4321:/ quasiblock");
/*^rawallocobj */
@@ -12594,19 +12856,19 @@ lab_endgetargs:;
/*_.OPUT__V7*/ meltfptr[6] = /*_.INST__V8*/ meltfptr[7];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4304:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4328:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~ISTMTLIS */ meltfclos->tabval[3])),
(melt_ptr_t) ( /*_.OPUT__V7*/ meltfptr[6]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4294:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4318:/ clear");
/*clear *//*_.OOFF__V6*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.OPUT__V7*/ meltfptr[6] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4291:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4315:/ clear");
/*clear *//*_.SLOBJ__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
@@ -12628,14 +12890,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_131_warmelt_genobj_LAMBDA___41__ */
+} /*end meltrout_132_warmelt_genobj_LAMBDA___41__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12654,7 +12916,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_132_warmelt_genobj_LAMBDA___42___st
+ struct frame_meltrout_133_warmelt_genobj_LAMBDA___42___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12693,7 +12955,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4315:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4339:/ getarg");
/*_.OBVA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12709,7 +12971,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4316:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4340:/ cond");
/*cond */ if ( /*_.OBVA__V2*/ meltfptr[1]) /*then */
{
/*^cond.then */
@@ -12717,7 +12979,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4319:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4343:/ quasiblock");
/*^rawallocobj */
@@ -12754,18 +13016,18 @@ lab_endgetargs:;
/*_.INST___V3*/ meltfptr[2] = /*_.INST__V4*/ meltfptr[3];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4318:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4342:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~IBODYLIS */ meltfclos->tabval[0])),
(melt_ptr_t) ( /*_.INST___V3*/ meltfptr[2]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4317:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4341:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4316:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4340:/ clear");
/*clear *//*_.INST___V3*/ meltfptr[2] = 0;
}
;
@@ -12784,14 +13046,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_132_warmelt_genobj_LAMBDA___42__ */
+} /*end meltrout_133_warmelt_genobj_LAMBDA___42__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -12808,7 +13070,7 @@ meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
#define meltcallcount 0L
#endif
- struct frame_meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL_st
+ struct frame_meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12848,7 +13110,7 @@ meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ getarg");
/*_.DLOCBIND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12869,7 +13131,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4338:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4362:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12878,7 +13140,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4338:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4362:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12886,7 +13148,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4338:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4362:/ cond.else");
/*^block */
/*anyblock */
@@ -12900,7 +13162,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4338) ? (4338) : __LINE__, __FUNCTION__);
+ (4362) ? (4362) : __LINE__, __FUNCTION__);
;
}
;
@@ -12915,7 +13177,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4338:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4362:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -12928,7 +13190,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12951,7 +13213,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12961,7 +13223,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12971,7 +13233,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4339;
+ argtab[2].meltbp_long = 4363;
/*^apply.arg */
argtab[3].meltbp_cstring =
"dispose_dlocbind_after_data_and_slots_fill dlocbind=";
@@ -12991,7 +13253,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -13004,7 +13266,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -13013,7 +13275,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4339:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4363:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -13026,7 +13288,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4342:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4366:/ quasiblock");
/*^newclosure */
@@ -13050,7 +13312,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V10*/ meltfptr[6] = /*_.LAMBDA___V11*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-genobj.melt:4340:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4364:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -13065,11 +13327,11 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_EVERY__V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13095,14 +13357,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
+} /*end meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -13121,7 +13383,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_134_warmelt_genobj_LAMBDA___43___st
+ struct frame_meltrout_135_warmelt_genobj_LAMBDA___43___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13160,7 +13422,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4342:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4366:/ getarg");
/*_.BND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13196,7 +13458,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] = /*_.DISPOSE_BND_OBJ__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:4342:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4366:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13215,14 +13477,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_134_warmelt_genobj_LAMBDA___43__ */
+} /*end meltrout_135_warmelt_genobj_LAMBDA___43__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -13244,7 +13506,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL_st
+ struct frame_meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13283,7 +13545,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ getarg");
/*_.SYV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13304,7 +13566,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4346:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4370:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13313,7 +13575,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4346:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4370:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13321,7 +13583,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4346:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4370:/ cond.else");
/*^block */
/*anyblock */
@@ -13335,7 +13597,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4346) ? (4346) : __LINE__, __FUNCTION__);
+ (4370) ? (4370) : __LINE__, __FUNCTION__);
;
}
;
@@ -13350,7 +13612,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4346:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4370:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -13363,7 +13625,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4347:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4371:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13372,7 +13634,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATASYMBOL */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4347:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4371:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13380,7 +13642,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4347:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4371:/ cond.else");
/*^block */
/*anyblock */
@@ -13394,7 +13656,7 @@ lab_endgetargs:;
melt_assert_failed (("check syv"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4347) ? (4347) : __LINE__, __FUNCTION__);
+ (4371) ? (4371) : __LINE__, __FUNCTION__);
;
}
;
@@ -13409,7 +13671,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4347:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4371:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -13422,7 +13684,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13445,7 +13707,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13455,7 +13717,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13465,7 +13727,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4348;
+ argtab[2].meltbp_long = 4372;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datasymbol syv=";
/*^apply.arg */
@@ -13485,7 +13747,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -13498,7 +13760,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -13507,7 +13769,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4348:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4372:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -13520,7 +13782,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4349:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4373:/ quasiblock");
/*^getslot */
@@ -13535,7 +13797,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:4351:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4375:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -13545,7 +13807,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4354:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4378:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13554,7 +13816,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4354:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4378:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -13562,7 +13824,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4354:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4378:/ cond.else");
/*^block */
/*anyblock */
@@ -13576,7 +13838,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4354) ? (4354) : __LINE__, __FUNCTION__);
+ (4378) ? (4378) : __LINE__, __FUNCTION__);
;
}
;
@@ -13591,7 +13853,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4354:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4378:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -13602,7 +13864,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4355:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4379:/ cond");
/*cond */ if ( /*_.CHOBJ__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -13612,7 +13874,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13635,7 +13897,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13645,7 +13907,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13656,7 +13918,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4357;
+ argtab[2].meltbp_long = 4381;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_datasymbol found chobj=";
@@ -13678,7 +13940,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -13691,7 +13953,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -13700,7 +13962,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4357:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4381:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -13713,14 +13975,14 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4358:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4382:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:4358:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4382:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4356:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4380:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[20] = /*_.RETURN___V23*/ meltfptr[19];;
@@ -13729,7 +13991,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[16] = /*_.PROGN___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4355:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4379:/ clear");
/*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.RETURN___V23*/ meltfptr[19] = 0;
@@ -13744,10 +14006,10 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4359:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4383:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4360:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4384:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -13769,7 +14031,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4364:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4388:/ quasiblock");
/*^rawallocobj */
@@ -13824,21 +14086,21 @@ lab_endgetargs:;
/*_.OBSYM__V28*/ meltfptr[27] = /*_.INST__V29*/ meltfptr[28];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4371:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4395:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]),
(melt_ptr_t) ( /*_.OBSYM__V28*/ meltfptr[27]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4373:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4397:/ quasiblock");
/*_.NAMBUF__V30*/ meltfptr[29] =
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[7])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:4374:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4398:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -13850,26 +14112,26 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.NDATA_RANK__V31*/ meltfptr[30])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4376:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4400:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]),
("dsym_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4377:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4401:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]),
( /*_#SYRK__L8*/ meltfnum[3]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4378:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4402:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4379:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4403:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 9, "NDSY_NAMESTR");
@@ -13891,7 +14153,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[8])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4380:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4404:/ quasiblock");
/*^putslot */
@@ -13909,7 +14171,7 @@ lab_endgetargs:;
;
- MELT_LOCATION ("warmelt-genobj.melt:4373:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4397:/ clear");
/*clear *//*_.NAMBUF__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.NDATA_RANK__V31*/ meltfptr[30] = 0;
@@ -13919,7 +14181,7 @@ lab_endgetargs:;
/*clear *//*_.NDSY_NAMESTR__V32*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.STRBUF2STRING__V33*/ meltfptr[32] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4383:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4407:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 8, "NINST_SLOTS");
@@ -13932,12 +14194,12 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.NINST_SLOTS__V34*/ meltfptr[29])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4383:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4407:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OBSYM__V28*/ meltfptr[27]),
( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4384:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4408:/ quasiblock");
/*^apply */
@@ -13965,7 +14227,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13988,7 +14250,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -13998,7 +14260,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14009,7 +14271,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4385;
+ argtab[2].meltbp_long = 4409;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datasymbol dlocbind=";
/*^apply.arg */
@@ -14029,7 +14291,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
@@ -14042,7 +14304,7 @@ lab_endgetargs:;
/*_.IF___V38*/ meltfptr[37] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];;
@@ -14051,7 +14313,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[32] = /*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4385:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4409:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[37] = 0;
@@ -14068,13 +14330,13 @@ lab_endgetargs:;
/*_.LET___V35*/ meltfptr[30] = /*_.IFCPP___V37*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-genobj.melt:4384:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4408:/ clear");
/*clear *//*_.DLOCBIND__V36*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.IFCPP___V37*/ meltfptr[32] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14097,7 +14359,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -14107,7 +14369,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14118,7 +14380,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4388;
+ argtab[2].meltbp_long = 4412;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datasymbol final obsym=";
/*^apply.arg */
@@ -14138,7 +14400,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V43*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[31] = 0;
@@ -14151,7 +14413,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[32] = /*_.IF___V42*/ meltfptr[38];;
@@ -14160,7 +14422,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[37] = /*_.PROGN___V44*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4388:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4412:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V42*/ meltfptr[38] = 0;
@@ -14173,16 +14435,16 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[37] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4389:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4413:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OBSYM__V28*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-genobj.melt:4389:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4413:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V25*/ meltfptr[18] = /*_.RETURN___V45*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-genobj.melt:4359:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4383:/ clear");
/*clear *//*_.NDATA_DISCRX__V26*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.ODISCR__V27*/ meltfptr[20] = 0;
@@ -14200,7 +14462,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V45*/ meltfptr[31] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V25*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:4349:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4373:/ clear");
/*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.CHOBJ__V14*/ meltfptr[13] = 0;
@@ -14212,11 +14474,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V18*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.LET___V25*/ meltfptr[18] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14241,14 +14503,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL */
+} /*end meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -14270,7 +14532,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE_st
+ struct frame_meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14309,7 +14571,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ getarg");
/*_.DAI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14330,7 +14592,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4397:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4421:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14339,7 +14601,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4397:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4421:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14347,7 +14609,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4397:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4421:/ cond.else");
/*^block */
/*anyblock */
@@ -14361,7 +14623,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4397) ? (4397) : __LINE__, __FUNCTION__);
+ (4421) ? (4421) : __LINE__, __FUNCTION__);
;
}
;
@@ -14376,7 +14638,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4397:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4421:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -14389,7 +14651,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14412,7 +14674,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14422,7 +14684,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14432,7 +14694,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4398;
+ argtab[2].meltbp_long = 4422;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datainstance dai=";
/*^apply.arg */
@@ -14451,7 +14713,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -14464,7 +14726,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -14473,7 +14735,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4398:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4422:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -14486,7 +14748,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4399:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4423:/ quasiblock");
/*^getslot */
@@ -14501,7 +14763,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V11*/ meltfptr[7]),
(meltobject_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:4401:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4425:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -14511,7 +14773,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4404:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4428:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14520,7 +14782,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:4404:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4428:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -14528,7 +14790,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4404:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4428:/ cond.else");
/*^block */
/*anyblock */
@@ -14542,7 +14804,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4404) ? (4404) : __LINE__, __FUNCTION__);
+ (4428) ? (4428) : __LINE__, __FUNCTION__);
;
}
;
@@ -14557,7 +14819,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4404:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4428:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
@@ -14568,7 +14830,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4405:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4429:/ cond");
/*cond */ if ( /*_.CHOBJ__V12*/ meltfptr[11]) /*then */
{
/*^cond.then */
@@ -14578,7 +14840,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14601,7 +14863,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14611,7 +14873,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14622,7 +14884,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4407;
+ argtab[2].meltbp_long = 4431;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_datainstance return found chobj=";
@@ -14644,7 +14906,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -14657,7 +14919,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
@@ -14666,7 +14928,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4407:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4431:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[17] = 0;
@@ -14679,14 +14941,14 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4408:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4432:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-genobj.melt:4408:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4432:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4406:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4430:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[18] = /*_.RETURN___V21*/ meltfptr[17];;
@@ -14695,7 +14957,7 @@ lab_endgetargs:;
/*_.IF___V16*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4405:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4429:/ clear");
/*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.RETURN___V21*/ meltfptr[17] = 0;
@@ -14710,7 +14972,7 @@ lab_endgetargs:;
/*_.IF___V16*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4409:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4433:/ quasiblock");
/*^getslot */
@@ -14721,7 +14983,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4410:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4434:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -14729,7 +14991,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4412:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4436:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -14737,7 +14999,7 @@ lab_endgetargs:;
meltfptr[25] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4413:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4437:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -14745,7 +15007,7 @@ lab_endgetargs:;
meltfptr[26] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4414:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4438:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 7, "NINST_HASH");
@@ -14753,7 +15015,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4415:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4439:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 6, "NINST_PREDEF");
@@ -14761,7 +15023,7 @@ lab_endgetargs:;
meltfptr[28] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4416:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4440:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 8, "NINST_SLOTS");
@@ -14769,7 +15031,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4417:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4441:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]), 2, "NINIT_TOPL");
@@ -14777,7 +15039,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4418:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4442:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]), 12, "OIROUT_FILL");
@@ -14787,7 +15049,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4422:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4446:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14795,7 +15057,7 @@ lab_endgetargs:;
/*_#IS_INTEGERBOX__L7*/ meltfnum[2] =
(melt_magic_discr ((melt_ptr_t) ( /*_.DRANK__V27*/ meltfptr[26])) ==
MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-genobj.melt:4422:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4446:/ cond");
/*cond */ if ( /*_#IS_INTEGERBOX__L7*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -14803,7 +15065,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4422:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4446:/ cond.else");
/*^block */
/*anyblock */
@@ -14817,7 +15079,7 @@ lab_endgetargs:;
melt_assert_failed (("compilobj_datainstance check drank"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4422) ? (4422) : __LINE__, __FUNCTION__);
+ (4446) ? (4446) : __LINE__, __FUNCTION__);
;
}
;
@@ -14832,7 +15094,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.IFELSE___V34*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4422:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4446:/ clear");
/*clear *//*_#IS_INTEGERBOX__L7*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0;
@@ -14843,7 +15105,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4423:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4447:/ quasiblock");
/*^msend */
@@ -14860,10 +15122,10 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4425:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4449:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4427:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4451:/ cond");
/*cond */ if ( /*_.DPREDEF__V29*/ meltfptr[28]) /*then */
{
/*^cond.then */
@@ -14871,7 +15133,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4428:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4452:/ quasiblock");
/*^rawallocobj */
@@ -14938,7 +15200,7 @@ lab_endgetargs:;
/*_.OINI__V38*/ meltfptr[37] = /*_.INST___V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4427:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4451:/ clear");
/*clear *//*_.INST___V39*/ meltfptr[38] = 0;
}
;
@@ -14950,7 +15212,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4436:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4460:/ quasiblock");
/*^rawallocobj */
@@ -15019,7 +15281,7 @@ lab_endgetargs:;
/*_.OINI__V38*/ meltfptr[37] = /*_.INST___V41*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4427:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4451:/ clear");
/*clear *//*_.INST___V41*/ meltfptr[38] = 0;
}
;
@@ -15035,7 +15297,7 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.DRANK__V27*/ meltfptr[26])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4447:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4471:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V11*/ meltfptr[7]),
(meltobject_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]),
@@ -15044,19 +15306,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4448:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4472:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]),
("dobj_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4449:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4473:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]),
( /*_#DRK__L8*/ meltfnum[0]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4450:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4474:/ cond");
/*cond */ if ( /*_.NAM__V25*/ meltfptr[18]) /*then */
{
/*^cond.then */
@@ -15066,12 +15328,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4451:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4475:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4452:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4476:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V25*/ meltfptr[18]), 1, "NAMED_NAME");
@@ -15089,7 +15351,7 @@ lab_endgetargs:;
meltfptr[43])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4450:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4474:/ quasiblock");
/*epilog */
@@ -15100,14 +15362,14 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4453:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4477:/ quasiblock");
/*_.CNAM__V45*/ meltfptr[43] =
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[8])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4454:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4478:/ quasiblock");
/*^putslot */
@@ -15124,19 +15386,19 @@ lab_endgetargs:;
;
- MELT_LOCATION ("warmelt-genobj.melt:4453:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4477:/ clear");
/*clear *//*_.CNAM__V45*/ meltfptr[43] = 0;
/*_#MULTIPLE_LENGTH__L9*/ meltfnum[2] =
(melt_multiple_length
((melt_ptr_t) ( /*_.DSLOTS__V30*/ meltfptr[29])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4456:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4480:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OINI__V38*/ meltfptr[37]),
( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[2]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4457:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4481:/ quasiblock");
/*^apply */
@@ -15164,7 +15426,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15187,7 +15449,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -15197,7 +15459,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15208,7 +15470,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4458;
+ argtab[2].meltbp_long = 4482;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compil_data_and_slots_fill dlocbind=";
@@ -15229,7 +15491,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0;
@@ -15242,7 +15504,7 @@ lab_endgetargs:;
/*_.IF___V49*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ quasiblock");
/*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];;
@@ -15251,7 +15513,7 @@ lab_endgetargs:;
/*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4458:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4482:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V49*/ meltfptr[48] = 0;
@@ -15268,13 +15530,13 @@ lab_endgetargs:;
/*_.LET___V46*/ meltfptr[43] = /*_.IFCPP___V48*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-genobj.melt:4457:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4481:/ clear");
/*clear *//*_.DLOCBIND__V47*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.IFCPP___V48*/ meltfptr[47] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15297,7 +15559,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -15307,7 +15569,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15318,7 +15580,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4461;
+ argtab[2].meltbp_long = 4485;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datainstance final oini=";
/*^apply.arg */
@@ -15338,7 +15600,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[46] = 0;
@@ -15351,7 +15613,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[49] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[47] = /*_.IF___V53*/ meltfptr[49];;
@@ -15360,7 +15622,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[48] = /*_.PROGN___V55*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4461:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4485:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[49] = 0;
@@ -15377,7 +15639,7 @@ lab_endgetargs:;
/*_.LET___V37*/ meltfptr[36] = /*_.OINI__V38*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-genobj.melt:4425:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4449:/ clear");
/*clear *//*_.OINI__V38*/ meltfptr[37] = 0;
/*^clear */
/*clear *//*_.NAMBUF__V43*/ meltfptr[38] = 0;
@@ -15391,13 +15653,13 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V52*/ meltfptr[48] = 0;
/*_.LET___V35*/ meltfptr[33] = /*_.LET___V37*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-genobj.melt:4423:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4447:/ clear");
/*clear *//*_.CDISX__V36*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.LET___V37*/ meltfptr[36] = 0;
/*_.LET___V23*/ meltfptr[16] = /*_.LET___V35*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-genobj.melt:4409:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4433:/ clear");
/*clear *//*_.LOC__V24*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.NAM__V25*/ meltfptr[18] = 0;
@@ -15421,7 +15683,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V35*/ meltfptr[33] = 0;
/*_.LET___V10*/ meltfptr[6] = /*_.LET___V23*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-genobj.melt:4399:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4423:/ clear");
/*clear *//*_.COMPICACHE__V11*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_.CHOBJ__V12*/ meltfptr[11] = 0;
@@ -15433,11 +15695,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V16*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.LET___V23*/ meltfptr[16] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -15460,14 +15722,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE */
+} /*end meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -15488,7 +15750,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE_st
+ struct frame_meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15527,7 +15789,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ getarg");
/*_.NTI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15548,7 +15810,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4474:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4498:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15557,7 +15819,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATATUPLE */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4474:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4498:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15565,7 +15827,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4474:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4498:/ cond.else");
/*^block */
/*anyblock */
@@ -15579,7 +15841,7 @@ lab_endgetargs:;
melt_assert_failed (("check nti"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4474) ? (4474) : __LINE__, __FUNCTION__);
+ (4498) ? (4498) : __LINE__, __FUNCTION__);
;
}
;
@@ -15594,7 +15856,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4474:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4498:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -15607,7 +15869,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4475:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4499:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15616,7 +15878,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4475:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4499:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15624,7 +15886,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4475:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4499:/ cond.else");
/*^block */
/*anyblock */
@@ -15638,7 +15900,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4475) ? (4475) : __LINE__, __FUNCTION__);
+ (4499) ? (4499) : __LINE__, __FUNCTION__);
;
}
;
@@ -15653,7 +15915,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4475:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4499:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -15666,7 +15928,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15689,7 +15951,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15699,7 +15961,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15709,7 +15971,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4476;
+ argtab[2].meltbp_long = 4500;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_datatuple nti=";
/*^apply.arg */
@@ -15729,7 +15991,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -15742,7 +16004,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -15751,7 +16013,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4476:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4500:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -15764,7 +16026,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4477:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4501:/ quasiblock");
/*^getslot */
@@ -15779,7 +16041,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:4479:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4503:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -15789,7 +16051,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4482:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4506:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15798,7 +16060,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4482:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4506:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -15806,7 +16068,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4482:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4506:/ cond.else");
/*^block */
/*anyblock */
@@ -15820,7 +16082,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4482) ? (4482) : __LINE__, __FUNCTION__);
+ (4506) ? (4506) : __LINE__, __FUNCTION__);
;
}
;
@@ -15835,7 +16097,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4482:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4506:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -15846,7 +16108,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4483:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4507:/ cond");
/*cond */ if ( /*_.CHOBJ__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -15856,7 +16118,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15879,7 +16141,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15889,7 +16151,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15900,7 +16162,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4485;
+ argtab[2].meltbp_long = 4509;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_datatuple found chobj=";
@@ -15922,7 +16184,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -15935,7 +16197,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -15944,7 +16206,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4485:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4509:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -15957,14 +16219,14 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4486:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4510:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:4486:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4510:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4484:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4508:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[20] = /*_.RETURN___V23*/ meltfptr[19];;
@@ -15973,7 +16235,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[16] = /*_.PROGN___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4483:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4507:/ clear");
/*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.RETURN___V23*/ meltfptr[19] = 0;
@@ -15988,7 +16250,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4487:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4511:/ quasiblock");
/*^getslot */
@@ -15999,7 +16261,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ quasiblock");
/*^newclosure */
@@ -16023,7 +16285,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V27*/ meltfptr[20] = /*_.LAMBDA___V28*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-genobj.melt:4488:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4512:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -16039,7 +16301,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4491:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4515:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -16047,7 +16309,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4492:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4516:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -16055,7 +16317,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4493:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4517:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -16069,7 +16331,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4494:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4518:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -16081,7 +16343,7 @@ lab_endgetargs:;
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[8])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:4496:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4520:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -16099,7 +16361,7 @@ lab_endgetargs:;
;
/*_#DRK__L8*/ meltfnum[3] =
(melt_get_int ((melt_ptr_t) ( /*_.DRANK__V31*/ meltfptr[30])));;
- MELT_LOCATION ("warmelt-genobj.melt:4498:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4522:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]), 3, "OBROUT_BODY");
@@ -16107,7 +16369,7 @@ lab_endgetargs:;
meltfptr[35] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4499:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4523:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_11_INITUP_ */ meltfrout->tabval[11])), 1, "NAMED_NAME");
@@ -16117,19 +16379,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4501:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4525:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]),
("dtup_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4502:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4526:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]),
( /*_#DRK__L8*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4503:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4527:/ cond");
/*cond */ if ( /*_.NAM__V33*/ meltfptr[32]) /*then */
{
/*^cond.then */
@@ -16139,12 +16401,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4504:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4528:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4505:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4529:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V33*/ meltfptr[32]), 1, "NAMED_NAME");
@@ -16162,7 +16424,7 @@ lab_endgetargs:;
meltfptr[37])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4503:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4527:/ quasiblock");
/*epilog */
@@ -16173,14 +16435,14 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4506:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4530:/ quasiblock");
/*_.STRBUF2STRING__V40*/ meltfptr[39] =
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[14])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4506:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4530:/ quasiblock");
/*^rawallocobj */
@@ -16245,7 +16507,7 @@ lab_endgetargs:;
/*_.OTUP__V41*/ meltfptr[40] = /*_.INST__V42*/ meltfptr[41];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4514:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4538:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]),
@@ -16257,12 +16519,12 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.NCOMPI__V26*/ meltfptr[19])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4515:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4539:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OTUP__V41*/ meltfptr[40]),
( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4518:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4542:/ quasiblock");
/*^newclosure */
@@ -16312,7 +16574,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OTUP__V41*/ meltfptr[40]);
;
/*_.LAMBDA___V43*/ meltfptr[42] = /*_.LAMBDA___V44*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-genobj.melt:4516:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4540:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -16328,7 +16590,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4528:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4552:/ quasiblock");
/*^rawallocobj */
@@ -16364,14 +16626,14 @@ lab_endgetargs:;
/*_.INST___V46*/ meltfptr[45] = /*_.INST__V47*/ meltfptr[46];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4527:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4551:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V36*/ meltfptr[35]),
(melt_ptr_t) ( /*_.INST___V46*/ meltfptr[45]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16394,7 +16656,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -16404,7 +16666,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16415,7 +16677,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4531;
+ argtab[2].meltbp_long = 4555;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj datatuple otup=";
/*^apply.arg */
@@ -16435,7 +16697,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0;
@@ -16448,7 +16710,7 @@ lab_endgetargs:;
/*_.IF___V49*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ quasiblock");
/*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];;
@@ -16457,7 +16719,7 @@ lab_endgetargs:;
/*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4531:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4555:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V49*/ meltfptr[48] = 0;
@@ -16470,16 +16732,16 @@ lab_endgetargs:;
/*_.IFCPP___V48*/ meltfptr[47] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4532:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4556:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OTUP__V41*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-genobj.melt:4532:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4556:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V39*/ meltfptr[37] = /*_.RETURN___V52*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-genobj.melt:4506:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4530:/ clear");
/*clear *//*_.STRBUF2STRING__V40*/ meltfptr[39] = 0;
/*^clear */
/*clear *//*_.OTUP__V41*/ meltfptr[40] = 0;
@@ -16497,7 +16759,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V52*/ meltfptr[48] = 0;
/*_.LET___V25*/ meltfptr[18] = /*_.LET___V39*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-genobj.melt:4487:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4511:/ clear");
/*clear *//*_.NCOMPI__V26*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.LAMBDA___V27*/ meltfptr[20] = 0;
@@ -16525,7 +16787,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V39*/ meltfptr[37] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V25*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:4477:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4501:/ clear");
/*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.CHOBJ__V14*/ meltfptr[13] = 0;
@@ -16537,11 +16799,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V18*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.LET___V25*/ meltfptr[18] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -16566,14 +16828,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE */
+} /*end meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -16592,7 +16854,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_138_warmelt_genobj_LAMBDA___44___st
+ struct frame_meltrout_139_warmelt_genobj_LAMBDA___44___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16631,7 +16893,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ getarg");
/*_.C__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16673,7 +16935,7 @@ lab_endgetargs:;
/*_.IF___V3*/ meltfptr[2] = /*_.COMPILE_OBJ__V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ clear");
/*clear *//*_.COMPILE_OBJ__V4*/ meltfptr[3] = 0;
}
;
@@ -16684,11 +16946,11 @@ lab_endgetargs:;
/*_.IF___V3*/ meltfptr[2] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -16707,14 +16969,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_138_warmelt_genobj_LAMBDA___44__ */
+} /*end meltrout_139_warmelt_genobj_LAMBDA___44__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -16733,7 +16995,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_139_warmelt_genobj_LAMBDA___45___st
+ struct frame_meltrout_140_warmelt_genobj_LAMBDA___45___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16772,7 +17034,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4518:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4542:/ getarg");
/*_.SCOMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16788,7 +17050,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4519:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4543:/ cond");
/*cond */ if ( /*_.SCOMP__V2*/ meltfptr[1]) /*then */
{
/*^cond.then */
@@ -16796,7 +17058,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4520:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4544:/ quasiblock");
/*_.OCOMP__V3*/ meltfptr[2] =
@@ -16810,7 +17072,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[1])),
( /*_#SRK__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4522:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4546:/ quasiblock");
/*^rawallocobj */
@@ -16858,14 +17120,14 @@ lab_endgetargs:;
/*_.INST___V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4521:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4545:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~INIBODY */ meltfclos->tabval[1])),
(melt_ptr_t) ( /*_.INST___V5*/ meltfptr[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4520:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4544:/ clear");
/*clear *//*_.OCOMP__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V4*/ meltfptr[3] = 0;
@@ -16889,14 +17151,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_139_warmelt_genobj_LAMBDA___45__ */
+} /*end meltrout_140_warmelt_genobj_LAMBDA___45__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -16918,7 +17180,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING_st
+ struct frame_meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16957,7 +17219,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ getarg");
/*_.NDS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16978,7 +17240,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4544:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4568:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16987,7 +17249,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATASTRING */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4544:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4568:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16995,7 +17257,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4544:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4568:/ cond.else");
/*^block */
/*anyblock */
@@ -17009,7 +17271,7 @@ lab_endgetargs:;
melt_assert_failed (("check nds"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4544) ? (4544) : __LINE__, __FUNCTION__);
+ (4568) ? (4568) : __LINE__, __FUNCTION__);
;
}
;
@@ -17024,7 +17286,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4544:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4568:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -17037,7 +17299,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4545:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4569:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17046,7 +17308,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4545:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4569:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17054,7 +17316,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4545:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4569:/ cond.else");
/*^block */
/*anyblock */
@@ -17068,7 +17330,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4545) ? (4545) : __LINE__, __FUNCTION__);
+ (4569) ? (4569) : __LINE__, __FUNCTION__);
;
}
;
@@ -17083,7 +17345,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4545:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4569:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -17094,7 +17356,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4546:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4570:/ quasiblock");
/*^getslot */
@@ -17105,7 +17367,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4547:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4571:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -17119,7 +17381,7 @@ lab_endgetargs:;
(meltobject_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4551:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4575:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17128,7 +17390,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:4551:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4575:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17136,7 +17398,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4551:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4575:/ cond.else");
/*^block */
/*anyblock */
@@ -17150,7 +17412,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4551) ? (4551) : __LINE__, __FUNCTION__);
+ (4575) ? (4575) : __LINE__, __FUNCTION__);
;
}
;
@@ -17165,7 +17427,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4551:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4575:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -17176,7 +17438,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4552:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4576:/ cond");
/*cond */ if ( /*_.CHOBJ__V11*/ meltfptr[10]) /*then */
{
/*^cond.then */
@@ -17184,14 +17446,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4554:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4578:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:4554:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4578:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4553:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4577:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[15] = /*_.RETURN___V15*/ meltfptr[14];;
@@ -17200,7 +17462,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4552:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4576:/ clear");
/*clear *//*_.RETURN___V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.PROGN___V16*/ meltfptr[15] = 0;
@@ -17213,14 +17475,14 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4555:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4579:/ quasiblock");
/*_.NAMBUF__V18*/ meltfptr[15] =
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:4557:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4581:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -17228,7 +17490,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4558:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4582:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17242,7 +17504,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4559:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4583:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 5, "NSTR_STRING");
@@ -17250,7 +17512,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4560:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4584:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -17258,7 +17520,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4561:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4585:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -17266,7 +17528,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4562:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4586:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17284,7 +17546,7 @@ lab_endgetargs:;
;
/*_#DRK__L4*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));;
- MELT_LOCATION ("warmelt-genobj.melt:4564:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4588:/ quasiblock");
/*^rawallocobj */
@@ -17339,7 +17601,7 @@ lab_endgetargs:;
/*_.OSTR__V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4571:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4595:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V9*/ meltfptr[8]),
(meltobject_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]),
@@ -17348,28 +17610,28 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4572:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4596:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("dstr_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4573:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4597:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
( /*_#DRK__L4*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4574:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4598:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("__"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4575:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4599:/ locexp");
meltgc_add_strbuf_cidentprefix ((melt_ptr_t)
( /*_.NAMBUF__V18*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
@@ -17381,12 +17643,12 @@ lab_endgetargs:;
melt_string_length ((melt_ptr_t) ( /*_.ODATA__V21*/ meltfptr[20]));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4576:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4600:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OSTR__V25*/ meltfptr[24]),
( /*_#STRING_LENGTH__L5*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4577:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4601:/ cond");
/*cond */ if ( /*_.NAM__V23*/ meltfptr[22]) /*then */
{
/*^cond.then */
@@ -17396,12 +17658,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4579:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4603:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4580:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4604:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME");
@@ -17419,12 +17681,12 @@ lab_endgetargs:;
meltfptr[26])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4578:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4602:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4577:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4601:/ clear");
/*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0;
}
;
@@ -17434,7 +17696,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[9])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4581:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4605:/ quasiblock");
/*^putslot */
@@ -17453,7 +17715,7 @@ lab_endgetargs:;
/*_.LET___V17*/ meltfptr[14] = /*_.OSTR__V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:4555:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4579:/ clear");
/*clear *//*_.NAMBUF__V18*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NDISX__V19*/ meltfptr[18] = 0;
@@ -17477,7 +17739,7 @@ lab_endgetargs:;
/*clear *//*_.STRBUF2STRING__V28*/ meltfptr[26] = 0;
/*_.LET___V8*/ meltfptr[6] = /*_.LET___V17*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:4546:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4570:/ clear");
/*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0;
@@ -17489,11 +17751,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V14*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.LET___V17*/ meltfptr[14] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -17516,14 +17778,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING */
+} /*end meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -17548,7 +17810,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER_st
+ struct frame_meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -17587,7 +17849,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ getarg");
/*_.NDI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -17608,7 +17870,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4589:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4613:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17617,7 +17879,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATABOXEDINTEGER */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4589:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4613:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17625,7 +17887,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4589:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4613:/ cond.else");
/*^block */
/*anyblock */
@@ -17639,7 +17901,7 @@ lab_endgetargs:;
melt_assert_failed (("check ndi"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4589) ? (4589) : __LINE__, __FUNCTION__);
+ (4613) ? (4613) : __LINE__, __FUNCTION__);
;
}
;
@@ -17654,7 +17916,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4589:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4613:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -17667,7 +17929,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4590:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4614:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17676,7 +17938,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4590:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4614:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17684,7 +17946,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4590:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4614:/ cond.else");
/*^block */
/*anyblock */
@@ -17698,7 +17960,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4590) ? (4590) : __LINE__, __FUNCTION__);
+ (4614) ? (4614) : __LINE__, __FUNCTION__);
;
}
;
@@ -17713,7 +17975,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4590:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4614:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -17724,7 +17986,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4591:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4615:/ quasiblock");
/*^getslot */
@@ -17735,7 +17997,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4592:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4616:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -17749,7 +18011,7 @@ lab_endgetargs:;
(meltobject_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4596:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4620:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17758,7 +18020,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:4596:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4620:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17766,7 +18028,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4596:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4620:/ cond.else");
/*^block */
/*anyblock */
@@ -17780,7 +18042,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4596) ? (4596) : __LINE__, __FUNCTION__);
+ (4620) ? (4620) : __LINE__, __FUNCTION__);
;
}
;
@@ -17795,7 +18057,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4596:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4620:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -17806,7 +18068,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4597:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4621:/ cond");
/*cond */ if ( /*_.CHOBJ__V11*/ meltfptr[10]) /*then */
{
/*^cond.then */
@@ -17814,14 +18076,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4599:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4623:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:4599:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4623:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4598:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4622:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[15] = /*_.RETURN___V15*/ meltfptr[14];;
@@ -17830,7 +18092,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4597:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4621:/ clear");
/*clear *//*_.RETURN___V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.PROGN___V16*/ meltfptr[15] = 0;
@@ -17843,14 +18105,14 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4600:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4624:/ quasiblock");
/*_.NAMBUF__V18*/ meltfptr[15] =
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:4602:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4626:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -17858,7 +18120,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4603:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4627:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17872,7 +18134,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4604:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4628:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 5, "NBOXINT_NUM");
@@ -17880,7 +18142,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4605:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4629:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -17888,7 +18150,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4606:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4630:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -17896,7 +18158,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4607:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4631:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17914,7 +18176,7 @@ lab_endgetargs:;
;
/*_#DRK__L4*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));;
- MELT_LOCATION ("warmelt-genobj.melt:4609:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4633:/ quasiblock");
/*^rawallocobj */
@@ -17969,7 +18231,7 @@ lab_endgetargs:;
/*_.OINT__V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4616:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4640:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V9*/ meltfptr[8]),
(meltobject_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]),
@@ -17978,28 +18240,28 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4617:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4641:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("dint_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4618:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4642:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
( /*_#DRK__L4*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4619:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4643:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("__"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4620:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4644:/ locexp");
meltgc_add_strbuf_cidentprefix ((melt_ptr_t)
( /*_.NAMBUF__V18*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
@@ -18007,7 +18269,7 @@ lab_endgetargs:;
meltfptr[20])), (16));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4621:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4645:/ cond");
/*cond */ if ( /*_.NAM__V23*/ meltfptr[22]) /*then */
{
/*^cond.then */
@@ -18017,12 +18279,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4623:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4647:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4624:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4648:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME");
@@ -18040,12 +18302,12 @@ lab_endgetargs:;
meltfptr[26])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4622:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4646:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4621:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4645:/ clear");
/*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0;
}
;
@@ -18055,7 +18317,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[9])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4625:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4649:/ quasiblock");
/*^putslot */
@@ -18074,7 +18336,7 @@ lab_endgetargs:;
/*_.LET___V17*/ meltfptr[14] = /*_.OINT__V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:4600:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4624:/ clear");
/*clear *//*_.NAMBUF__V18*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NDISX__V19*/ meltfptr[18] = 0;
@@ -18096,7 +18358,7 @@ lab_endgetargs:;
/*clear *//*_.STRBUF2STRING__V28*/ meltfptr[26] = 0;
/*_.LET___V8*/ meltfptr[6] = /*_.LET___V17*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:4591:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4615:/ clear");
/*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0;
@@ -18108,11 +18370,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V14*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.LET___V17*/ meltfptr[14] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -18135,14 +18397,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER */
+} /*end meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -18164,7 +18426,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE_st
+ struct frame_meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -18203,7 +18465,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ getarg");
/*_.NCL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -18224,7 +18486,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4634:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4658:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18233,7 +18495,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATACLOSURE */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4634:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4658:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18241,7 +18503,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4634:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4658:/ cond.else");
/*^block */
/*anyblock */
@@ -18255,7 +18517,7 @@ lab_endgetargs:;
melt_assert_failed (("check ncl"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4634) ? (4634) : __LINE__, __FUNCTION__);
+ (4658) ? (4658) : __LINE__, __FUNCTION__);
;
}
;
@@ -18270,7 +18532,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4634:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4658:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -18283,7 +18545,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4635:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4659:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18292,7 +18554,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4635:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4659:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18300,7 +18562,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4635:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4659:/ cond.else");
/*^block */
/*anyblock */
@@ -18314,7 +18576,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4635) ? (4635) : __LINE__, __FUNCTION__);
+ (4659) ? (4659) : __LINE__, __FUNCTION__);
;
}
;
@@ -18329,7 +18591,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4635:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4659:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -18342,7 +18604,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18365,7 +18627,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18375,7 +18637,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18385,7 +18647,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4636;
+ argtab[2].meltbp_long = 4660;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_dataclosure ncl=";
/*^apply.arg */
@@ -18405,7 +18667,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -18418,7 +18680,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -18427,7 +18689,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4636:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4660:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -18440,7 +18702,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4637:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4661:/ quasiblock");
/*^getslot */
@@ -18451,7 +18713,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4638:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4662:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -18459,7 +18721,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4639:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4663:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V14*/ meltfptr[13]), 3, "OBROUT_BODY");
@@ -18473,7 +18735,7 @@ lab_endgetargs:;
(meltobject_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4642:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4666:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18482,7 +18744,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4642:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4666:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -18490,7 +18752,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4642:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4666:/ cond.else");
/*^block */
/*anyblock */
@@ -18504,7 +18766,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4642) ? (4642) : __LINE__, __FUNCTION__);
+ (4666) ? (4666) : __LINE__, __FUNCTION__);
;
}
;
@@ -18519,7 +18781,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4642:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4666:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
@@ -18530,7 +18792,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4643:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4667:/ cond");
/*cond */ if ( /*_.CHOBJ__V16*/ meltfptr[15]) /*then */
{
/*^cond.then */
@@ -18540,7 +18802,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18563,7 +18825,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18573,7 +18835,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18584,7 +18846,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4645;
+ argtab[2].meltbp_long = 4669;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_dataclosure found chobj=";
@@ -18606,7 +18868,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0;
@@ -18619,7 +18881,7 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ quasiblock");
/*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];;
@@ -18628,7 +18890,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4645:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4669:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V21*/ meltfptr[20] = 0;
@@ -18641,14 +18903,14 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4646:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4670:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V16*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-genobj.melt:4646:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4670:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4644:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4668:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[21] = /*_.RETURN___V24*/ meltfptr[20];;
@@ -18657,7 +18919,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[17] = /*_.PROGN___V25*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4643:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4667:/ clear");
/*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.RETURN___V24*/ meltfptr[20] = 0;
@@ -18672,10 +18934,10 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4647:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4671:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4648:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4672:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -18683,7 +18945,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4649:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4673:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -18691,7 +18953,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4650:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4674:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -18699,7 +18961,7 @@ lab_endgetargs:;
meltfptr[28] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4651:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4675:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -18707,7 +18969,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4652:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4676:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 5, "NDCLO_PROC");
@@ -18715,7 +18977,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4653:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4677:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 6, "NDCLO_CLOSV");
@@ -18731,7 +18993,7 @@ lab_endgetargs:;
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[4])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:4656:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4680:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -18745,7 +19007,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4657:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4681:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -18761,7 +19023,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4658:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4682:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_8_DATACLOSURE_ */ meltfrout->tabval[8])), 1, "NAMED_NAME");
@@ -18771,7 +19033,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4660:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4684:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18780,7 +19042,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V31*/ meltfptr[30]),
(melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */
meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-genobj.melt:4660:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4684:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18788,7 +19050,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4660:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4684:/ cond.else");
/*^block */
/*anyblock */
@@ -18802,7 +19064,7 @@ lab_endgetargs:;
melt_assert_failed (("check npro"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4660) ? (4660) : __LINE__, __FUNCTION__);
+ (4684) ? (4684) : __LINE__, __FUNCTION__);
;
}
;
@@ -18817,7 +19079,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[36] = /*_.IFELSE___V38*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4660:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4684:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V38*/ meltfptr[37] = 0;
@@ -18830,7 +19092,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4661:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4685:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]),
("dclo_"));
}
@@ -18839,12 +19101,12 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.NRANK__V29*/ meltfptr[28])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4662:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4686:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]),
( /*_#GET_INT__L10*/ meltfnum[0]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4663:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4687:/ cond");
/*cond */ if ( /*_.NAM__V27*/ meltfptr[20]) /*then */
{
/*^cond.then */
@@ -18854,12 +19116,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4664:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4688:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4665:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4689:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V27*/ meltfptr[20]), 1, "NAMED_NAME");
@@ -18877,7 +19139,7 @@ lab_endgetargs:;
meltfptr[37])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4663:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4687:/ quasiblock");
/*epilog */
@@ -18888,10 +19150,10 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4666:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4690:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4667:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4691:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V31*/ meltfptr[30]), 6, "NRPRO_DATAROUT");
@@ -18903,7 +19165,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[12])),
melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4669:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4693:/ quasiblock");
/*^rawallocobj */
@@ -18968,14 +19230,14 @@ lab_endgetargs:;
/*_.OICLO__V43*/ meltfptr[42] = /*_.INST__V44*/ meltfptr[43];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4677:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4701:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OICLO__V43*/ meltfptr[42]),
( /*_#NBCLOS__L8*/ meltfnum[3]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4678:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4702:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]),
@@ -18984,7 +19246,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4679:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4703:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18993,7 +19255,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDATAROU__V41*/ meltfptr[40]),
(melt_ptr_t) (( /*!CLASS_NREP_DATAROUTINE */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:4679:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4703:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -19001,7 +19263,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4679:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4703:/ cond.else");
/*^block */
/*anyblock */
@@ -19015,7 +19277,7 @@ lab_endgetargs:;
melt_assert_failed (("check ndatarou"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4679) ? (4679) : __LINE__, __FUNCTION__);
+ (4703) ? (4703) : __LINE__, __FUNCTION__);
;
}
;
@@ -19030,7 +19292,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = /*_.IFELSE___V46*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4679:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4703:/ clear");
/*clear *//*_#IS_A__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V46*/ meltfptr[45] = 0;
@@ -19041,7 +19303,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4680:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4704:/ quasiblock");
/*_.OCROUT__V48*/ meltfptr[47] =
@@ -19049,7 +19311,7 @@ lab_endgetargs:;
( /*_.COMPICACHE__V13*/ meltfptr[9]),
(meltobject_ptr_t) ( /*_.NPRO__V31*/
meltfptr[30]));;
- MELT_LOCATION ("warmelt-genobj.melt:4683:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4707:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19063,7 +19325,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4684:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4708:/ quasiblock");
/*^rawallocobj */
@@ -19114,7 +19376,7 @@ lab_endgetargs:;
(0)));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4692:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4716:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19123,7 +19385,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.OCROUT__V48*/ meltfptr[47]),
(melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */
meltfrout->tabval[16])));;
- MELT_LOCATION ("warmelt-genobj.melt:4692:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4716:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -19131,7 +19393,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4692:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4716:/ cond.else");
/*^block */
/*anyblock */
@@ -19145,7 +19407,7 @@ lab_endgetargs:;
melt_assert_failed (("check ocrout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4692) ? (4692) : __LINE__, __FUNCTION__);
+ (4716) ? (4716) : __LINE__, __FUNCTION__);
;
}
;
@@ -19160,7 +19422,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = /*_.IFELSE___V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4692:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4716:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
@@ -19173,12 +19435,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4693:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4717:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]),
(melt_ptr_t) ( /*_.OCPUTROUT__V50*/ meltfptr[49]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ quasiblock");
/*^newclosure */
@@ -19254,7 +19516,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]);
;
/*_.LAMBDA___V55*/ meltfptr[53] = /*_.LAMBDA___V56*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-genobj.melt:4694:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4718:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -19270,7 +19532,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4707:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4731:/ quasiblock");
/*^rawallocobj */
@@ -19315,14 +19577,14 @@ lab_endgetargs:;
/*_.INST___V58*/ meltfptr[57] = /*_.INST__V59*/ meltfptr[58];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4707:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4731:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]),
(melt_ptr_t) ( /*_.INST___V58*/ meltfptr[57]));
}
;
/*_.LET___V47*/ meltfptr[45] = /*_.OICLO__V43*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-genobj.melt:4680:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4704:/ clear");
/*clear *//*_.OCROUT__V48*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.ODATROUT__V49*/ meltfptr[48] = 0;
@@ -19340,7 +19602,7 @@ lab_endgetargs:;
/*clear *//*_.INST___V58*/ meltfptr[57] = 0;
/*_.LET___V40*/ meltfptr[37] = /*_.LET___V47*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-genobj.melt:4666:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4690:/ clear");
/*clear *//*_.NDATAROU__V41*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.STRBUF2STRING__V42*/ meltfptr[41] = 0;
@@ -19352,7 +19614,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V47*/ meltfptr[45] = 0;
/*_.LET___V26*/ meltfptr[19] = /*_.LET___V40*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-genobj.melt:4647:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4671:/ clear");
/*clear *//*_.NAM__V27*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.DISCX__V28*/ meltfptr[21] = 0;
@@ -19382,7 +19644,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V40*/ meltfptr[37] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V26*/ meltfptr[19];;
- MELT_LOCATION ("warmelt-genobj.melt:4637:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4661:/ clear");
/*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.INIROUT__V14*/ meltfptr[13] = 0;
@@ -19396,11 +19658,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V19*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.LET___V26*/ meltfptr[19] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -19425,14 +19687,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE */
+} /*end meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -19451,7 +19713,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_143_warmelt_genobj_LAMBDA___46___st
+ struct frame_meltrout_144_warmelt_genobj_LAMBDA___46___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -19490,7 +19752,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ getarg");
/*_.CLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -19506,7 +19768,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4697:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4721:/ quasiblock");
/*^msend */
@@ -19532,7 +19794,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
( /*_#GET_INT__L2*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4698:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4722:/ quasiblock");
/*^rawallocobj */
@@ -19588,14 +19850,14 @@ lab_endgetargs:;
/*_.OCPUTCLOS__V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4704:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4728:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~INIBODY */ meltfclos->tabval[4])),
(melt_ptr_t) ( /*_.OCPUTCLOS__V5*/ meltfptr[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4697:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4721:/ clear");
/*clear *//*_.CLOVAL__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_#GET_INT__L2*/ meltfnum[1] = 0;
@@ -19611,14 +19873,14 @@ lab_endgetargs:;
(( /*_#GET_INT__L3*/ meltfnum[1]) + (1));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4706:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4730:/ locexp");
melt_put_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[3])),
( /*_#I__L4*/ meltfnum[3]));
}
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ clear");
/*clear *//*_#GET_INT__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#I__L4*/ meltfnum[3] = 0;
@@ -19634,14 +19896,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_143_warmelt_genobj_LAMBDA___46__ */
+} /*end meltrout_144_warmelt_genobj_LAMBDA___46__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -19663,7 +19925,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE_st
+ struct frame_meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -19702,7 +19964,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ getarg");
/*_.NDROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -19723,7 +19985,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4721:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4745:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19732,7 +19994,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_DATAROUTINE */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4721:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4745:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19740,7 +20002,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4721:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4745:/ cond.else");
/*^block */
/*anyblock */
@@ -19754,7 +20016,7 @@ lab_endgetargs:;
melt_assert_failed (("check ndrou"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4721) ? (4721) : __LINE__, __FUNCTION__);
+ (4745) ? (4745) : __LINE__, __FUNCTION__);
;
}
;
@@ -19769,7 +20031,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4721:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4745:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -19782,7 +20044,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4722:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4746:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19791,7 +20053,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4722:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4746:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19799,7 +20061,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4722:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4746:/ cond.else");
/*^block */
/*anyblock */
@@ -19813,7 +20075,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4722) ? (4722) : __LINE__, __FUNCTION__);
+ (4746) ? (4746) : __LINE__, __FUNCTION__);
;
}
;
@@ -19828,7 +20090,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4722:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4746:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -19839,7 +20101,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4723:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4747:/ quasiblock");
/*^getslot */
@@ -19850,7 +20112,7 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4724:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4748:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT");
@@ -19868,7 +20130,7 @@ lab_endgetargs:;
/*_.UNUSED_STUFF__V12*/ meltfptr[11] = ( /*nil */ NULL);;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4729:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4753:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19877,7 +20139,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]),
(melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:4729:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4753:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19885,7 +20147,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4729:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4753:/ cond.else");
/*^block */
/*anyblock */
@@ -19899,7 +20161,7 @@ lab_endgetargs:;
melt_assert_failed (("check inirout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4729) ? (4729) : __LINE__, __FUNCTION__);
+ (4753) ? (4753) : __LINE__, __FUNCTION__);
;
}
;
@@ -19914,7 +20176,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4729:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4753:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -19925,7 +20187,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4730:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4754:/ cond");
/*cond */ if ( /*_.CHOBJ__V11*/ meltfptr[10]) /*then */
{
/*^cond.then */
@@ -19933,14 +20195,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4732:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4756:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:4732:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4756:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4731:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4755:/ quasiblock");
/*_.PROGN___V17*/ meltfptr[16] = /*_.RETURN___V16*/ meltfptr[15];;
@@ -19949,7 +20211,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[13] = /*_.PROGN___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4730:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4754:/ clear");
/*clear *//*_.RETURN___V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.PROGN___V17*/ meltfptr[16] = 0;
@@ -19962,7 +20224,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4733:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4757:/ quasiblock");
/*^getslot */
@@ -19973,7 +20235,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4734:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4758:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 4, "NDATA_DISCRX");
@@ -19981,7 +20243,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4735:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4759:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -19989,7 +20251,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4736:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4760:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 2, "NDATA_RANK");
@@ -19997,7 +20259,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4737:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4761:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 1, "NDATA_NAME");
@@ -20005,7 +20267,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4738:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4762:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 5, "NDROU_PROC");
@@ -20013,7 +20275,7 @@ lab_endgetargs:;
meltfptr[23] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4739:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4763:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]), 3, "OBROUT_BODY");
@@ -20021,7 +20283,7 @@ lab_endgetargs:;
meltfptr[24] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4740:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4764:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -20039,7 +20301,7 @@ lab_endgetargs:;
;
/*_#NULL__L4*/ meltfnum[0] =
(( /*_.NLOC__V21*/ meltfptr[20]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:4742:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4766:/ cond");
/*cond */ if ( /*_#NULL__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20051,7 +20313,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]),
(melt_ptr_t) (( /*!CLASS_NREP */ meltfrout->
tabval[5])));;
- MELT_LOCATION ("warmelt-genobj.melt:4743:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4767:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -20059,7 +20321,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4744:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4768:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]), 0, "NREP_LOC");
@@ -20073,7 +20335,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = /*_.SETQ___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4743:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4767:/ clear");
/*clear *//*_.NREP_LOC__V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_.SETQ___V30*/ meltfptr[29] = 0;
@@ -20091,7 +20353,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = /*_.IF___V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4742:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4766:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -20106,7 +20368,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4745:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4769:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20114,7 +20376,7 @@ lab_endgetargs:;
/*_#IS_MAPOBJECT__L6*/ meltfnum[4] =
(melt_magic_discr ((melt_ptr_t) ( /*_.COMPICACHE__V9*/ meltfptr[8]))
== MELTOBMAG_MAPOBJECTS);;
- MELT_LOCATION ("warmelt-genobj.melt:4745:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4769:/ cond");
/*cond */ if ( /*_#IS_MAPOBJECT__L6*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -20122,7 +20384,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4745:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4769:/ cond.else");
/*^block */
/*anyblock */
@@ -20136,7 +20398,7 @@ lab_endgetargs:;
melt_assert_failed (("check compicache"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4745) ? (4745) : __LINE__, __FUNCTION__);
+ (4769) ? (4769) : __LINE__, __FUNCTION__);
;
}
;
@@ -20151,7 +20413,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[28] = /*_.IFELSE___V32*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4745:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4769:/ clear");
/*clear *//*_#IS_MAPOBJECT__L6*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IFELSE___V32*/ meltfptr[29] = 0;
@@ -20162,7 +20424,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[28] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4746:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4770:/ quasiblock");
/*_.NAMBUF__V34*/ meltfptr[29] =
@@ -20173,7 +20435,7 @@ lab_endgetargs:;
/*_#DRK__L7*/ meltfnum[4] =
(melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));;
- MELT_LOCATION ("warmelt-genobj.melt:4749:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4773:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -20189,19 +20451,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4751:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4775:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]),
("drout_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4752:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4776:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]),
( /*_#DRK__L7*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4753:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4777:/ cond");
/*cond */ if ( /*_.NAM__V23*/ meltfptr[22]) /*then */
{
/*^cond.then */
@@ -20211,12 +20473,12 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4754:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4778:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]),
("__"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4755:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4779:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME");
@@ -20234,7 +20496,7 @@ lab_endgetargs:;
meltfptr[35])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4753:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4777:/ quasiblock");
/*epilog */
@@ -20245,7 +20507,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4756:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4780:/ quasiblock");
/*_.STRBUF2STRING__V38*/ meltfptr[37] =
@@ -20259,7 +20521,7 @@ lab_endgetargs:;
( /*_.COMPICACHE__V9*/ meltfptr[8]),
(meltobject_ptr_t) ( /*_.NPRO__V24*/
meltfptr[23]));;
- MELT_LOCATION ("warmelt-genobj.melt:4758:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4782:/ quasiblock");
/*^rawallocobj */
@@ -20334,7 +20596,7 @@ lab_endgetargs:;
/*_.OIROUT__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4767:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4791:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.COMPICACHE__V9*/ meltfptr[8]),
(meltobject_ptr_t) ( /*_.NDROU__V2*/
@@ -20346,7 +20608,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]),
(melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */
meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-genobj.melt:4768:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4792:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -20354,7 +20616,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4769:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4793:/ quasiblock");
/*^getslot */
@@ -20374,7 +20636,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[12])), (0)));;
- MELT_LOCATION ("warmelt-genobj.melt:4772:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4796:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_13_IROUTVAL_ */ meltfrout->tabval[13])), 1, "NAMED_NAME");
@@ -20384,12 +20646,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4774:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4798:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.OIROUT__V40*/ meltfptr[39]),
( /*_#NBCONST__L9*/ meltfnum[8]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ quasiblock");
/*^newclosure */
@@ -20476,7 +20738,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.INIBODY__V25*/ meltfptr[24]);
;
/*_.LAMBDA___V47*/ meltfptr[46] = /*_.LAMBDA___V48*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-genobj.melt:4775:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4799:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -20498,7 +20760,7 @@ lab_endgetargs:;
/*_#I__L11*/ meltfnum[10] =
(( /*_#GET_INT__L10*/ meltfnum[9]) > (0));;
- MELT_LOCATION ("warmelt-genobj.melt:4824:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4848:/ cond");
/*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -20506,7 +20768,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4825:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4849:/ quasiblock");
/*^rawallocobj */
@@ -20558,7 +20820,7 @@ lab_endgetargs:;
/*_.INST___V50*/ meltfptr[49] = /*_.INST__V51*/ meltfptr[50];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4825:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4849:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.INIBODY__V25*/ meltfptr[24]),
(melt_ptr_t) ( /*_.INST___V50*/
@@ -20567,7 +20829,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4824:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4848:/ clear");
/*clear *//*_.INST___V50*/ meltfptr[49] = 0;
}
;
@@ -20575,7 +20837,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20598,7 +20860,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -20608,7 +20870,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20619,7 +20881,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4830;
+ argtab[2].meltbp_long = 4854;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_dataroutine final oirout=";
@@ -20641,7 +20903,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0;
@@ -20654,7 +20916,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];;
@@ -20663,7 +20925,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[49] = /*_.PROGN___V55*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4830:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4854:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[52] = 0;
@@ -20680,7 +20942,7 @@ lab_endgetargs:;
/*_.LET___V43*/ meltfptr[42] = /*_.OIROUT__V40*/ meltfptr[39];;
- MELT_LOCATION ("warmelt-genobj.melt:4769:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4793:/ clear");
/*clear *//*_.PCONSTL__V44*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_#NBCONST__L9*/ meltfnum[8] = 0;
@@ -20701,7 +20963,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[41] = /*_.LET___V43*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4768:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4792:/ clear");
/*clear *//*_.LET___V43*/ meltfptr[42] = 0;
}
;
@@ -20716,7 +20978,7 @@ lab_endgetargs:;
/*_.LET___V37*/ meltfptr[35] = /*_.IF___V42*/ meltfptr[41];;
- MELT_LOCATION ("warmelt-genobj.melt:4756:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4780:/ clear");
/*clear *//*_.STRBUF2STRING__V38*/ meltfptr[37] = 0;
/*^clear */
/*clear *//*_.MAPOBJECT_GET__V39*/ meltfptr[38] = 0;
@@ -20728,7 +20990,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V42*/ meltfptr[41] = 0;
/*_.LET___V33*/ meltfptr[27] = /*_.LET___V37*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-genobj.melt:4746:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4770:/ clear");
/*clear *//*_.NAMBUF__V34*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_#DRK__L7*/ meltfnum[4] = 0;
@@ -20738,7 +21000,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V37*/ meltfptr[35] = 0;
/*_.LET___V18*/ meltfptr[15] = /*_.LET___V33*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-genobj.melt:4733:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4757:/ clear");
/*clear *//*_.NAM__V19*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.DISX__V20*/ meltfptr[19] = 0;
@@ -20764,7 +21026,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V33*/ meltfptr[27] = 0;
/*_.LET___V8*/ meltfptr[6] = /*_.LET___V18*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-genobj.melt:4723:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4747:/ clear");
/*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0;
@@ -20778,11 +21040,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V15*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.LET___V18*/ meltfptr[15] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20805,14 +21067,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE */
+} /*end meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -20831,7 +21093,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_145_warmelt_genobj_LAMBDA___47___st
+ struct frame_meltrout_146_warmelt_genobj_LAMBDA___47___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -20870,7 +21132,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ getarg");
/*_.CONSTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -20884,7 +21146,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CONSTX__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_CONSTOCC */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4779:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4803:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20892,7 +21154,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4780:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4804:/ quasiblock");
/*^getslot */
@@ -20905,7 +21167,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4781:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4805:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20915,7 +21177,7 @@ lab_endgetargs:;
( /*_.CNSTBIND__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_ANY_BINDING */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4781:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4805:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20923,7 +21185,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4781:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4805:/ cond.else");
/*^block */
/*anyblock */
@@ -20934,7 +21196,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compilobj_dataroutine check cnstbind"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4781) ? (4781) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compilobj_dataroutine check cnstbind"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4805) ? (4805) : __LINE__, __FUNCTION__);
;
}
;
@@ -20949,7 +21211,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4781:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4805:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
@@ -20960,10 +21222,10 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4782:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4806:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4783:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4807:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -20981,7 +21243,7 @@ lab_endgetargs:;
/*_#OFF__L3*/ meltfnum[1] =
(melt_get_int
((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4786:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4810:/ cond");
/*cond */ if ( /*_.OCONSTX__V7*/ meltfptr[5]) /*then */
{
/*^cond.then */
@@ -20989,14 +21251,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4787:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4811:/ quasiblock");
/*_#IS_A__L4*/ meltfnum[3] =
melt_is_instance_of ((melt_ptr_t)
( /*_.CNSTBIND__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4789:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4813:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -21009,7 +21271,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[5])),
( /*_#OFF__L3*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4790:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4814:/ quasiblock");
/*^rawallocobj */
@@ -21078,7 +21340,7 @@ lab_endgetargs:;
/*_.INST___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4789:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4813:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.INST___V10*/ meltfptr[9] = 0;
@@ -21097,7 +21359,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[5])),
( /*_#OFF__L3*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4795:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4819:/ quasiblock");
/*^rawallocobj */
@@ -21166,7 +21428,7 @@ lab_endgetargs:;
/*_.INST___V13*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4789:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4813:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V12*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.INST___V13*/ meltfptr[9] = 0;
@@ -21176,7 +21438,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4802:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4826:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~INIBODY */ meltfclos->tabval[4])),
(melt_ptr_t) ( /*_.IPUT__V8*/
@@ -21187,14 +21449,14 @@ lab_endgetargs:;
(( /*_#OFF__L3*/ meltfnum[1]) + (1));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4803:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4827:/ locexp");
melt_put_int ((melt_ptr_t)
(( /*~BXOFF */ meltfclos->tabval[1])),
( /*_#I__L5*/ meltfnum[4]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4787:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4811:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IPUT__V8*/ meltfptr[7] = 0;
@@ -21206,13 +21468,13 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4782:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4806:/ clear");
/*clear *//*_.OCONSTX__V7*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_#OFF__L3*/ meltfnum[1] = 0;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.IFCPP___V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:4780:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4804:/ clear");
/*clear *//*_.CNSTBIND__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
@@ -21222,7 +21484,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4779:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4803:/ cond.else");
/*^block */
/*anyblock */
@@ -21232,7 +21494,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CONSTX__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-genobj.melt:4805:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4829:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -21240,10 +21502,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4806:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4830:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4807:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4831:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -21262,7 +21524,7 @@ lab_endgetargs:;
/*_#OFF__L7*/ meltfnum[4] =
(melt_get_int
((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4810:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4834:/ cond");
/*cond */ if ( /*_.OCONSTX__V16*/ meltfptr[9]) /*then */
{
/*^cond.then */
@@ -21270,7 +21532,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4811:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4835:/ quasiblock");
/*_.MAKE_INTEGERBOX__V17*/ meltfptr[7] =
@@ -21278,7 +21540,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[5])),
( /*_#OFF__L7*/ meltfnum[4])));;
- MELT_LOCATION ("warmelt-genobj.melt:4811:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4835:/ quasiblock");
/*^rawallocobj */
@@ -21343,7 +21605,7 @@ lab_endgetargs:;
/*_.INST__V19*/ meltfptr[3];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4816:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4840:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~INIBODY */ meltfclos->
tabval[4])),
@@ -21357,7 +21619,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4817:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4841:/ locexp");
melt_put_int ((melt_ptr_t)
(( /*~BXOFF */ meltfclos->tabval[1])),
( /*_#I__L8*/ meltfnum[1]));
@@ -21365,7 +21627,7 @@ lab_endgetargs:;
;
/*clear *//*_.IFELSE___V15*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4811:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4835:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V17*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_.IPUT__V18*/ meltfptr[5] = 0;
@@ -21377,13 +21639,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4810:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4834:/ cond.else");
/*_.IFELSE___V15*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4806:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4830:/ clear");
/*clear *//*_.OCONSTX__V16*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_#OFF__L7*/ meltfnum[4] = 0;
@@ -21393,7 +21655,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4805:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4829:/ cond.else");
/*^block */
/*anyblock */
@@ -21401,7 +21663,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4819:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4843:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21414,7 +21676,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4819:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4843:/ cond.else");
/*^block */
/*anyblock */
@@ -21425,7 +21687,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compilobj_dataroutine unexepected constx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4819) ? (4819) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compilobj_dataroutine unexepected constx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4843) ? (4843) : __LINE__, __FUNCTION__);
;
}
;
@@ -21441,7 +21703,7 @@ lab_endgetargs:;
/*_.IFELSE___V21*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4819:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4843:/ clear");
/*clear *//*_.IFELSE___V21*/ meltfptr[7] = 0;
}
@@ -21450,7 +21712,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4818:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4842:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[5] =
@@ -21461,7 +21723,7 @@ lab_endgetargs:;
/*_.PROGN___V22*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4805:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4829:/ clear");
/*clear *//*_.IFCPP___V20*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.PROGN___V22*/ meltfptr[5] = 0;
@@ -21472,7 +21734,7 @@ lab_endgetargs:;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V15*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4779:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4803:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[8] = 0;
@@ -21480,11 +21742,11 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21505,14 +21767,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_145_warmelt_genobj_LAMBDA___47__ */
+} /*end meltrout_146_warmelt_genobj_LAMBDA___47__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -21529,7 +21791,7 @@ meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTA
#define meltcallcount 0L
#endif
- struct frame_meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER_st
+ struct frame_meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21570,7 +21832,7 @@ meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTA
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ getarg");
/*_.QDCM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21591,7 +21853,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4839:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4863:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21599,7 +21861,7 @@ lab_endgetargs:;
/*_#IS_A__L1*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.QDCM__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4839:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4863:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21607,7 +21869,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4839:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4863:/ cond.else");
/*^block */
/*anyblock */
@@ -21621,7 +21883,7 @@ lab_endgetargs:;
melt_assert_failed (("check qdcm"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4839) ? (4839) : __LINE__, __FUNCTION__);
+ (4863) ? (4863) : __LINE__, __FUNCTION__);
;
}
;
@@ -21636,7 +21898,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4839:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4863:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -21649,7 +21911,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4840:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4864:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21657,7 +21919,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4840:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4864:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21665,7 +21927,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4840:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4864:/ cond.else");
/*^block */
/*anyblock */
@@ -21679,7 +21941,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4840) ? (4840) : __LINE__, __FUNCTION__);
+ (4864) ? (4864) : __LINE__, __FUNCTION__);
;
}
;
@@ -21694,7 +21956,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4840:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4864:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -21705,7 +21967,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4841:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4865:/ quasiblock");
/*^getslot */
@@ -21716,24 +21978,24 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4843:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4867:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LOCBOX__V9*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4843:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4867:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V10*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-genobj.melt:4841:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4865:/ clear");
/*clear *//*_.LOCBOX__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.RETURN___V10*/ meltfptr[9] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21757,14 +22019,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+} /*end meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -21781,7 +22043,7 @@ meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
#define meltcallcount 0L
#endif
- struct frame_meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT_st
+ struct frame_meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21821,7 +22083,7 @@ meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ getarg");
/*_.QDPM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21842,7 +22104,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4849:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4873:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21850,7 +22112,7 @@ lab_endgetargs:;
/*_#IS_A__L1*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.QDPM__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4849:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4873:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21858,7 +22120,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4849:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4873:/ cond.else");
/*^block */
/*anyblock */
@@ -21872,7 +22134,7 @@ lab_endgetargs:;
melt_assert_failed (("check qdpm"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4849) ? (4849) : __LINE__, __FUNCTION__);
+ (4873) ? (4873) : __LINE__, __FUNCTION__);
;
}
;
@@ -21887,7 +22149,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4849:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4873:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -21900,7 +22162,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4850:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4874:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21908,7 +22170,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4850:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4874:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21916,7 +22178,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4850:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4874:/ cond.else");
/*^block */
/*anyblock */
@@ -21930,7 +22192,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4850) ? (4850) : __LINE__, __FUNCTION__);
+ (4874) ? (4874) : __LINE__, __FUNCTION__);
;
}
;
@@ -21945,7 +22207,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4850:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4874:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -21956,7 +22218,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4851:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4875:/ quasiblock");
/*^getslot */
@@ -21967,24 +22229,24 @@ lab_endgetargs:;
meltfptr[8] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4853:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4877:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.PREVENVLOC__V9*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4853:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4877:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V10*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-genobj.melt:4851:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4875:/ clear");
/*clear *//*_.PREVENVLOC__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.RETURN___V10*/ meltfptr[9] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -22008,14 +22270,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
+} /*end meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -22042,7 +22304,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED_st
+ struct frame_meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -22081,7 +22343,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ getarg");
/*_.NSPR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -22102,7 +22364,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4859:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4883:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22111,7 +22373,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_STORE_PREDEFINED */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4859:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4883:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22119,7 +22381,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4859:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4883:/ cond.else");
/*^block */
/*anyblock */
@@ -22133,7 +22395,7 @@ lab_endgetargs:;
melt_assert_failed (("check nspr"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4859) ? (4859) : __LINE__, __FUNCTION__);
+ (4883) ? (4883) : __LINE__, __FUNCTION__);
;
}
;
@@ -22148,7 +22410,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4859:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4883:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -22161,7 +22423,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4860:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4884:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22170,7 +22432,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4860:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22178,7 +22440,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4860:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond.else");
/*^block */
/*anyblock */
@@ -22192,7 +22454,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4860) ? (4860) : __LINE__, __FUNCTION__);
+ (4884) ? (4884) : __LINE__, __FUNCTION__);
;
}
;
@@ -22207,7 +22469,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4860:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4884:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -22220,7 +22482,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22243,7 +22505,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22253,7 +22515,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22263,7 +22525,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4861;
+ argtab[2].meltbp_long = 4885;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_store_predefined start nspr=";
@@ -22284,7 +22546,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -22297,7 +22559,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -22306,7 +22568,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4861:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4885:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -22319,7 +22581,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4862:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4886:/ quasiblock");
/*^getslot */
@@ -22330,7 +22592,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4863:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4887:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]), 1, "NSTPD_PREDEF");
@@ -22338,7 +22600,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4864:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4888:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]), 2, "NSTPD_VALUE");
@@ -22346,7 +22608,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4865:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4889:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -22367,7 +22629,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NPRED__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[4])));;
- MELT_LOCATION ("warmelt-genobj.melt:4869:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4893:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -22375,11 +22637,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4870:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4894:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NPRED__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NPRED__V14*/
+ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22405,7 +22673,7 @@ lab_endgetargs:;
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[5])),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V20*/ meltfptr[19]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4872:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4896:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22432,12 +22700,12 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4871:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:4895:/ compute");
/*_.RES__V17*/ meltfptr[16] = /*_.SETQ___V23*/ meltfptr[22] =
/*_.MAKE_OBJCOMPUTE__V22*/ meltfptr[21];;
/*_.LET___V19*/ meltfptr[18] = /*_.SETQ___V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:4870:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4894:/ clear");
/*clear *//*_.NAMED_NAME__V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.NAMEPRED__V21*/ meltfptr[20] = 0;
@@ -22448,7 +22716,7 @@ lab_endgetargs:;
/*_.IFELSE___V18*/ meltfptr[17] = /*_.LET___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4869:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4893:/ clear");
/*clear *//*_.LET___V19*/ meltfptr[18] = 0;
}
;
@@ -22463,7 +22731,7 @@ lab_endgetargs:;
/*_#IS_INTEGERBOX__L6*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NPRED__V14*/ meltfptr[13]))
== MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-genobj.melt:4876:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4900:/ cond");
/*cond */ if ( /*_#IS_INTEGERBOX__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22471,7 +22739,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4878:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4902:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22499,14 +22767,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4877:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:4901:/ compute");
/*_.RES__V17*/ meltfptr[16] = /*_.SETQ___V26*/ meltfptr[21] =
/*_.MAKE_OBJCOMPUTE__V25*/ meltfptr[20];;
/*_.IFELSE___V24*/ meltfptr[19] =
/*_.SETQ___V26*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4876:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4900:/ clear");
/*clear *//*_.MAKE_OBJCOMPUTE__V25*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.SETQ___V26*/ meltfptr[21] = 0;
@@ -22522,7 +22790,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22545,7 +22813,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -22555,7 +22823,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22566,7 +22834,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4883;
+ argtab[2].meltbp_long = 4907;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_store_predefined bad npred=";
@@ -22588,7 +22856,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[20] = 0;
@@ -22601,7 +22869,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[21] =
@@ -22612,7 +22880,7 @@ lab_endgetargs:;
/*_.PROGN___V30*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4883:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4907:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[18] = 0;
@@ -22627,7 +22895,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4884:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4908:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22640,7 +22908,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4908:/ cond.else");
/*^block */
/*anyblock */
@@ -22651,7 +22919,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("compilobj_nrep_store_predefined invalid npred"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4884) ? (4884) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("compilobj_nrep_store_predefined invalid npred"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4908) ? (4908) : __LINE__, __FUNCTION__);
;
}
;
@@ -22667,7 +22935,7 @@ lab_endgetargs:;
/*_.IFELSE___V32*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4884:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4908:/ clear");
/*clear *//*_.IFELSE___V32*/ meltfptr[18] = 0;
}
@@ -22676,14 +22944,14 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[20] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4885:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4909:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-genobj.melt:4885:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4909:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:4882:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4906:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[18] =
@@ -22694,7 +22962,7 @@ lab_endgetargs:;
/*_.PROGN___V34*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4876:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4900:/ clear");
/*clear *//*_.IFCPP___V27*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.IFCPP___V31*/ meltfptr[20] = 0;
@@ -22709,7 +22977,7 @@ lab_endgetargs:;
/*_.IFELSE___V18*/ meltfptr[17] = /*_.IFELSE___V24*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4869:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4893:/ clear");
/*clear *//*_#IS_INTEGERBOX__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[19] = 0;
@@ -22719,7 +22987,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22742,7 +23010,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -22752,7 +23020,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22763,7 +23031,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4887;
+ argtab[2].meltbp_long = 4911;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_store_predefined result res=";
@@ -22784,7 +23052,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] = 0;
@@ -22797,7 +23065,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[18] = /*_.IF___V36*/ meltfptr[20];;
@@ -22806,7 +23074,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[22] = /*_.PROGN___V38*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4887:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4911:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[20] = 0;
@@ -22823,7 +23091,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[8] = /*_.RES__V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-genobj.melt:4862:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4886:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NPRED__V14*/ meltfptr[13] = 0;
@@ -22839,11 +23107,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.IFCPP___V35*/ meltfptr[22] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -22868,14 +23136,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED */
+} /*end meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -22892,7 +23160,7 @@ meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CON
#define meltcallcount 0L
#endif
- struct frame_meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER_st
+ struct frame_meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -22933,7 +23201,7 @@ meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CON
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ getarg");
/*_.NUCMEB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -22954,7 +23222,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4896:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4920:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22962,7 +23230,7 @@ lab_endgetargs:;
/*_#IS_A__L1*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4896:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4920:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22970,7 +23238,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4896:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4920:/ cond.else");
/*^block */
/*anyblock */
@@ -22984,7 +23252,7 @@ lab_endgetargs:;
melt_assert_failed (("check nucmeb"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4896) ? (4896) : __LINE__, __FUNCTION__);
+ (4920) ? (4920) : __LINE__, __FUNCTION__);
;
}
;
@@ -22999,7 +23267,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4896:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4920:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -23012,7 +23280,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4897:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4921:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23020,7 +23288,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:4897:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4921:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23028,7 +23296,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4897:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4921:/ cond.else");
/*^block */
/*anyblock */
@@ -23042,7 +23310,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4897) ? (4897) : __LINE__, __FUNCTION__);
+ (4921) ? (4921) : __LINE__, __FUNCTION__);
;
}
;
@@ -23057,7 +23325,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4897:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4921:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -23070,7 +23338,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23093,7 +23361,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23103,7 +23371,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23113,7 +23381,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4898;
+ argtab[2].meltbp_long = 4922;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_update_current_module_environment_container nucmeb=";
@@ -23134,7 +23402,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -23147,7 +23415,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -23156,7 +23424,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4898:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4922:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -23169,7 +23437,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4899:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4923:/ quasiblock");
/*^getslot */
@@ -23180,7 +23448,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4900:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4924:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]), 2, "NCUMEB_COMMENT");
@@ -23188,7 +23456,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4901:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4925:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]), 1, "NUCMEB_EXPR");
@@ -23196,7 +23464,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4902:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4926:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 12, "IGNCX_PROCURMODENVLIST");
@@ -23204,7 +23472,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4903:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4927:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 11, "IGNCX_CONTENVLOC");
@@ -23212,7 +23480,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4904:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4928:/ quasiblock");
/*_.SB__V19*/ meltfptr[18] =
@@ -23221,7 +23489,7 @@ lab_endgetargs:;
(char *) 0);;
{
- MELT_LOCATION ("warmelt-genobj.melt:4906:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4930:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]),
("upd.cur.mod.env.cont"));
}
@@ -23229,7 +23497,7 @@ lab_endgetargs:;
/*_#IS_STRING__L5*/ meltfnum[3] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NCOMM__V14*/ meltfptr[13])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:4907:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4931:/ cond");
/*cond */ if ( /*_#IS_STRING__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -23239,21 +23507,21 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:4909:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4933:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]),
(" : "));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4910:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4934:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]),
melt_string_str ((melt_ptr_t)
( /*_.NCOMM__V14*/
meltfptr[13])));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4908:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4932:/ quasiblock");
/*epilog */
@@ -23263,7 +23531,7 @@ lab_endgetargs:;
;
/*_.LET___V18*/ meltfptr[17] = /*_.SB__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:4904:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4928:/ clear");
/*clear *//*_.SB__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_#IS_STRING__L5*/ meltfnum[3] = 0;
@@ -23279,7 +23547,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[6])),
melt_strbuf_str ((melt_ptr_t) ( /*_.CSBUF__V20*/ meltfptr[18]))));;
- MELT_LOCATION ("warmelt-genobj.melt:4914:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4938:/ quasiblock");
/*^rawallocobj */
@@ -23323,7 +23591,7 @@ lab_endgetargs:;
"OCOMBLO_COMMENT");
;
/*_.OCBLO__V23*/ meltfptr[22] = /*_.INST__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:4919:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4943:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -23337,7 +23605,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ quasiblock");
/*^newclosure */
@@ -23413,7 +23681,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OBODL__V21*/ meltfptr[20]);
;
/*_.LAMBDA___V26*/ meltfptr[25] = /*_.LAMBDA___V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-genobj.melt:4924:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4948:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -23431,7 +23699,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23454,7 +23722,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23464,7 +23732,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23474,7 +23742,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4973;
+ argtab[2].meltbp_long = 4997;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compobj.upd.mod.env.box result ocblo=";
@@ -23495,7 +23763,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0;
@@ -23508,7 +23776,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[29] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[29];;
@@ -23517,7 +23785,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = /*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4973:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4997:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[29] = 0;
@@ -23530,16 +23798,16 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4974:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4998:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OCBLO__V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:4974:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4998:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V33*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-genobj.melt:4899:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4923:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NCOMM__V14*/ meltfptr[13] = 0;
@@ -23569,11 +23837,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_.RETURN___V33*/ meltfptr[29] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -23600,14 +23868,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+} /*end meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -23626,7 +23894,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_150_warmelt_genobj_LAMBDA___48___st
+ struct frame_meltrout_151_warmelt_genobj_LAMBDA___48___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -23665,7 +23933,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ getarg");
/*_.CUROUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -23679,7 +23947,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4927:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4951:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23687,10 +23955,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4928:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4952:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:4929:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4953:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROUT__V2*/ meltfptr[1]), 2, "OBROUT_PROC");
@@ -23698,7 +23966,7 @@ lab_endgetargs:;
meltfptr[2] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4930:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4954:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPROC__V3*/ meltfptr[2]), 5, "NRPRO_CONST");
@@ -23706,7 +23974,7 @@ lab_endgetargs:;
meltfptr[3] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4931:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4955:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPROC__V3*/ meltfptr[2]), 6, "NRPRO_DATAROUT");
@@ -23714,7 +23982,7 @@ lab_endgetargs:;
meltfptr[4] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:4932:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:4956:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -23733,7 +24001,7 @@ lab_endgetargs:;
(meltgc_new_int
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[2])), (0)));;
- MELT_LOCATION ("warmelt-genobj.melt:4934:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:4958:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.ODATAROUT__V6*/ meltfptr[5]), 4, "OIE_LOCVAR");
@@ -23743,7 +24011,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:4936:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:4960:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23753,7 +24021,7 @@ lab_endgetargs:;
( /*_.ODATAROUT__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_OBJINITROUTINE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:4936:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4960:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23761,7 +24029,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:4936:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:4960:/ cond.else");
/*^block */
/*anyblock */
@@ -23775,7 +24043,7 @@ lab_endgetargs:;
melt_assert_failed (("check odatarout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (4936) ? (4936) : __LINE__,
+ (4960) ? (4960) : __LINE__,
__FUNCTION__);
;
}
@@ -23791,7 +24059,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4936:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4960:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -23802,7 +24070,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ quasiblock");
/*^newclosure */
@@ -23904,7 +24172,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*~OBODL */ meltfclos->tabval[4]));
;
/*_.LAMBDA___V11*/ meltfptr[9] = /*_.LAMBDA___V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-genobj.melt:4937:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:4961:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -23928,13 +24196,13 @@ lab_endgetargs:;
(( /*_#GET_INT__L3*/ meltfnum[1]) + (1));;
{
- MELT_LOCATION ("warmelt-genobj.melt:4971:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4995:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.BOXCOUNT__V7*/ meltfptr[6]),
( /*_#I__L4*/ meltfnum[3]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4928:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4952:/ clear");
/*clear *//*_.CURPROC__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.CNSLIS__V4*/ meltfptr[3] = 0;
@@ -23963,7 +24231,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
}
@@ -23977,14 +24245,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_150_warmelt_genobj_LAMBDA___48__ */
+} /*end meltrout_151_warmelt_genobj_LAMBDA___48__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -24003,7 +24271,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_151_warmelt_genobj_LAMBDA___49___st
+ struct frame_meltrout_152_warmelt_genobj_LAMBDA___49___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -24042,7 +24310,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ getarg");
/*_.CURCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -24052,7 +24320,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:4940:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4964:/ quasiblock");
/*_#CURCOUNT__L1*/ meltfnum[0] =
@@ -24062,7 +24330,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.CURCONST__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4943:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:4967:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24070,7 +24338,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4946:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4970:/ quasiblock");
/*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] =
@@ -24078,7 +24346,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
( /*_#CURCOUNT__L1*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:4947:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4971:/ quasiblock");
/*^rawallocobj */
@@ -24132,7 +24400,7 @@ lab_endgetargs:;
"OPRCONST_CVAL");
;
/*_.OPUTROUT__V4*/ meltfptr[3] = /*_.INST__V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:4953:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4977:/ quasiblock");
/*^rawallocobj */
@@ -24178,7 +24446,7 @@ lab_endgetargs:;
"OTOUCH_COMMENT");
;
/*_.OTOUCHROUT__V6*/ meltfptr[5] = /*_.INST__V7*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-genobj.melt:4960:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:4984:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -24235,7 +24503,7 @@ lab_endgetargs:;
/*_.LIST___V8*/ meltfptr[7] = /*_.LIST___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:4960:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4984:/ clear");
/*clear *//*_.OCONTENVLOC__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.LIST___V10*/ meltfptr[9] = 0;
@@ -24245,7 +24513,7 @@ lab_endgetargs:;
/*clear *//*_.LIST___V10*/ meltfptr[9] = 0;
} /*end multiallocblock */
;
- MELT_LOCATION ("warmelt-genobj.melt:4958:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4982:/ quasiblock");
/*^rawallocobj */
@@ -24293,7 +24561,7 @@ lab_endgetargs:;
/*_.OCOPY__V11*/ meltfptr[8] = /*_.INST__V12*/ meltfptr[9];;
{
- MELT_LOCATION ("warmelt-genobj.melt:4964:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4988:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~OBODL */ meltfclos->tabval[5])),
(melt_ptr_t) ( /*_.OPUTROUT__V4*/
@@ -24302,7 +24570,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4965:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4989:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~OBODL */ meltfclos->tabval[5])),
(melt_ptr_t) ( /*_.OTOUCHROUT__V6*/
@@ -24311,14 +24579,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:4966:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:4990:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~OBODL */ meltfclos->tabval[5])),
(melt_ptr_t) ( /*_.OCOPY__V11*/ meltfptr[8]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:4946:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4970:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.OPUTROUT__V4*/ meltfptr[3] = 0;
@@ -24334,7 +24602,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:4940:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:4964:/ clear");
/*clear *//*_#CURCOUNT__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
@@ -24351,14 +24619,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_151_warmelt_genobj_LAMBDA___49__ */
+} /*end meltrout_152_warmelt_genobj_LAMBDA___49__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -24379,7 +24647,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER_st
+ struct frame_meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -24418,7 +24686,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ getarg");
/*_.NTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -24448,7 +24716,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5027:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5051:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24457,7 +24725,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5027:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5051:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24465,7 +24733,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5027:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5051:/ cond.else");
/*^block */
/*anyblock */
@@ -24479,7 +24747,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntester"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5027) ? (5027) : __LINE__, __FUNCTION__);
+ (5051) ? (5051) : __LINE__, __FUNCTION__);
;
}
;
@@ -24494,7 +24762,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5027:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5051:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
@@ -24507,7 +24775,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5028:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5052:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24516,7 +24784,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5028:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5052:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24524,7 +24792,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5028:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5052:/ cond.else");
/*^block */
/*anyblock */
@@ -24538,7 +24806,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5028) ? (5028) : __LINE__, __FUNCTION__);
+ (5052) ? (5052) : __LINE__, __FUNCTION__);
;
}
;
@@ -24553,7 +24821,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[5] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5028:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5052:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -24566,7 +24834,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5029:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5053:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24575,7 +24843,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5029:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5053:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24583,7 +24851,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5029:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5053:/ cond.else");
/*^block */
/*anyblock */
@@ -24597,7 +24865,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5029) ? (5029) : __LINE__, __FUNCTION__);
+ (5053) ? (5053) : __LINE__, __FUNCTION__);
;
}
;
@@ -24612,7 +24880,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5029:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5053:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -24625,7 +24893,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24648,7 +24916,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24658,7 +24926,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -24668,7 +24936,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5030;
+ argtab[2].meltbp_long = 5054;
/*^apply.arg */
argtab[3].meltbp_aptr =
(melt_ptr_t *) & /*_.NTESTER__V2*/ meltfptr[1];
@@ -24691,7 +24959,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
@@ -24704,7 +24972,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
@@ -24713,7 +24981,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = /*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5030:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5054:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -24728,16 +24996,16 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5031:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5055:/ locexp");
melt_puts (stderr, ("* compiltst unimplemented receiver class "));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5032:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5056:/ quasiblock");
/*_.DISCR__V15*/ meltfptr[11] =
(melt_discr ((melt_ptr_t) ( /*_.NTESTER__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5032:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5056:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DISCR__V15*/ meltfptr[11]), 1, "NAMED_NAME");
@@ -24759,13 +25027,13 @@ lab_endgetargs:;
/*clear *//*_.NAMED_NAME__V16*/ meltfptr[12] = 0;
{
- MELT_LOCATION ("warmelt-genobj.melt:5033:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5057:/ locexp");
melt_newlineflush (stderr);
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5034:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5058:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24778,7 +25046,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5034:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5058:/ cond.else");
/*^block */
/*anyblock */
@@ -24789,7 +25057,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("@@compile_tester should be implemented in normtesters-s subclasses"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5034) ? (5034) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("@@compile_tester should be implemented in normtesters-s subclasses"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5058) ? (5058) : __LINE__, __FUNCTION__);
;
}
;
@@ -24804,7 +25072,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[11] = /*_.IFELSE___V18*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5034:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5058:/ clear");
/*clear *//*_.IFELSE___V18*/ meltfptr[12] = 0;
}
@@ -24813,11 +25081,11 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V17*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -24844,4480 +25112,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 178
- void *mcfr_varptr[178];
-#define MELTFRAM_NBVARNUM 63
- long mcfr_varnum[63];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 178; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 178;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("COMPILOBJ_NREP_MATCH", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ getarg");
- /*_.NMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.GCX__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5041:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5041:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5041:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nmat"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (5041) ? (5041) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5041:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5042:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L2*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5042:/ cond");
- /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5042:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check gcx"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (5042) ? (5042) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5042:/ clear");
- /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5043:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L3*/ meltfnum[0] =
- /*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-genobj.melt:5043:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5043:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5043;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "compilobj_nrep_match nmat=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMAT__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V9*/ meltfptr[8] =
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5043:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5043:/ quasiblock");
-
-
- /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
- /*^compute */
-
- /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5043:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V11*/ meltfptr[9] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5044:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-genobj.melt:5045:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
- /*_.NLOC__V13*/
- meltfptr[9] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5046:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 1, "NEXPR_CTYP");
- /*_.NCTYP__V14*/
- meltfptr[13] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5047:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 2, "NMATCH_TESTS");
- /*_.NTESTS__V15*/
- meltfptr[14] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5048:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 3, "NMATCH_STUFFMAP");
- /*_.STUFFMAP__V16*/
- meltfptr[15] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5049:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[0])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 4, "NMATCH_MATCHED");
- /*_.NMATCHED__V17*/
- meltfptr[16] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NMATCHED__V17*/ meltfptr[16] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5050:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
- /*_.MATMAP__V18*/
- meltfptr[17] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5051:/ quasiblock");
-
-
- /*_#NBMAT__L5*/ meltfnum[3] =
- (melt_count_mapobjects
- ((meltmapobjects_ptr_t) ( /*_.MATMAP__V18*/ meltfptr[17])));;
- /*^compute */
-
- /*_.LABUF__V20*/ meltfptr[19] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
- (char *) 0);;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5054:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
- ("mtch"));
- }
- ;
- /*_#I__L6*/ meltfnum[0] =
- (( /*_#NBMAT__L5*/ meltfnum[3]) + (1));;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5055:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
- ( /*_#I__L6*/ meltfnum[0]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5056:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
- ("_"));
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5057:/ quasiblock");
-
-
- /*_.LABSTR__V22*/ meltfptr[21] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t)
- (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[4])),
- melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]))));;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5058:/ locexp");
- meltgc_put_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.MATMAP__V18*/ meltfptr[17]),
- (meltobject_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]),
- (melt_ptr_t) ( /*_.LABSTR__V22*/ meltfptr[21]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5059:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L7*/ meltfnum[6] =
- /*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-genobj.melt:5059:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5059:/ 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-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5059;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match matlabel labstr=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LABSTR__V22*/ meltfptr[21];
- /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V24*/ meltfptr[23] =
- /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5059:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V24*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5059:/ quasiblock");
-
-
- /*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
- /*^compute */
-
- /*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5059:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.IF___V24*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V26*/ meltfptr[24] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.LET___V21*/ meltfptr[20] = /*_.LABSTR__V22*/ meltfptr[21];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5057:/ clear");
- /*clear *//*_.LABSTR__V22*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
- /*_.LET___V19*/ meltfptr[18] = /*_.LET___V21*/ meltfptr[20];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5051:/ clear");
- /*clear *//*_#NBMAT__L5*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.LABUF__V20*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_#I__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.LET___V21*/ meltfptr[20] = 0;
- /*_.MATLABEL__V27*/ meltfptr[23] = /*_.LET___V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:5062:/ quasiblock");
-
-
- /*_.LABUF__V29*/ meltfptr[21] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
- (char *) 0);;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5065:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]),
- melt_string_str ((melt_ptr_t)
- ( /*_.MATLABEL__V27*/
- meltfptr[23])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5066:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]),
- ("_end"));
- }
- ;
- /*_.STRBUF2STRING__V30*/ meltfptr[22] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t)
- (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[4])),
- melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]))));;
- /*^compute */
-
- /*_.LET___V28*/ meltfptr[24] = /*_.STRBUF2STRING__V30*/ meltfptr[22];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5062:/ clear");
- /*clear *//*_.LABUF__V29*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.STRBUF2STRING__V30*/ meltfptr[22] = 0;
- /*_.ENDLABEL__V31*/ meltfptr[19] = /*_.LET___V28*/ meltfptr[24];;
- /*^compute */
-
- /*_.SUBCOMPLIST__V32*/ meltfptr[20] =
- (meltgc_new_list
- ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
- /*^compute */
-
- /*_.OBODYL__V33*/ meltfptr[21] =
- (meltgc_new_list
- ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5072:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_OBJMULTIBLOCK */
- meltfrout->tabval[6])), (4),
- "CLASS_OBJMULTIBLOCK");
- /*_.INST__V35*/ meltfptr[34] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBI_LOC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (0),
- ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBLO_BODYL",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (1),
- ( /*_.OBODYL__V33*/ meltfptr[21]), "OBLO_BODYL");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OMULBLO_SUBCOMP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V35*/ meltfptr[34])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (3),
- (( /*nil */ NULL)), "OMULBLO_SUBCOMP");
- ;
- /*_.OMBLOC__V34*/ meltfptr[22] = /*_.INST__V35*/ meltfptr[34];;
- /*^compute */
-
- /*_.MAKE_INTEGERBOX__V36*/ meltfptr[35] =
- (meltgc_new_int
- ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[8])),
- (0)));;
- MELT_LOCATION ("warmelt-genobj.melt:5077:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_OBJGOTOINSTR */
- meltfrout->tabval[7])), (3),
- "CLASS_OBJGOTOINSTR");
- /*_.INST__V38*/ meltfptr[37] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBI_LOC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V38*/ meltfptr[37])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (0),
- ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBGOTO_PREFIX",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V38*/ meltfptr[37])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (1),
- ( /*_.MATLABEL__V27*/ meltfptr[23]),
- "OBGOTO_PREFIX");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBGOTO_RANK",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V38*/ meltfptr[37])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (2),
- ( /*_.MAKE_INTEGERBOX__V36*/ meltfptr[35]),
- "OBGOTO_RANK");
- ;
- /*_.OFIRSTGOTO__V37*/ meltfptr[36] = /*_.INST__V38*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-genobj.melt:5082:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_OBJLABELINSTR */
- meltfrout->tabval[9])), (3),
- "CLASS_OBJLABELINSTR");
- /*_.INST__V40*/ meltfptr[39] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBI_LOC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V40*/ meltfptr[39])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (0),
- ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBLAB_PREFIX",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V40*/ meltfptr[39])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (1),
- ( /*_.ENDLABEL__V31*/ meltfptr[19]),
- "OBLAB_PREFIX");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OBLAB_RANK",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V40*/ meltfptr[39])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (2),
- (( /*nil */ NULL)), "OBLAB_RANK");
- ;
- /*_.OENDLABEL__V39*/ meltfptr[38] = /*_.INST__V40*/ meltfptr[39];;
- /*^compute */
-
- /*_.MAKE_LIST__V41*/ meltfptr[40] =
- (meltgc_new_list
- ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5086:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
- meltfrout->tabval[10])), (4),
- "CLASS_TESTERCOMPILCONTEXT");
- /*_.INST__V43*/ meltfptr[42] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @TCX_NRMATCH",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V43*/ meltfptr[42])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (1),
- ( /*_.NMAT__V2*/ meltfptr[1]), "TCX_NRMATCH");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @TCX_FREELIST",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V43*/ meltfptr[42])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (2),
- ( /*_.MAKE_LIST__V41*/ meltfptr[40]),
- "TCX_FREELIST");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @TCX_NEXTEST",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V43*/ meltfptr[42])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (3),
- (( /*nil */ NULL)), "TCX_NEXTEST");
- ;
- /*_.TCX__V42*/ meltfptr[41] = /*_.INST__V43*/ meltfptr[42];;
- /*^compute */
-
- /*_.DONETESTS__V44*/ meltfptr[43] =
- (meltgc_new_list
- ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5094:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
- /*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-genobj.melt:5094:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5094:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5094;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "compilobj_nrep_match nmatched=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMATCHED__V17*/ meltfptr[16];
- /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V46*/ meltfptr[45] =
- /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5094:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V46*/ meltfptr[45] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5094:/ quasiblock");
-
-
- /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
- /*^compute */
-
- /*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5094:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V46*/ meltfptr[45] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V48*/ meltfptr[46] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5095:/ msend");
- /*msend */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
- /*_.COMPILE_OBJ__V49*/ meltfptr[45] =
- meltgc_send ((melt_ptr_t) ( /*_.NMATCHED__V17*/ meltfptr[16]),
- (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->
- tabval[11])), (MELTBPARSTR_PTR ""),
- argtab, "", (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5093:/ quasiblock");
-
-
- /*_.OMATCHED__V50*/ meltfptr[46] = /*_.COMPILE_OBJ__V49*/ meltfptr[45];;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5097:/ locexp");
- meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]),
- (melt_ptr_t) ( /*_.OFIRSTGOTO__V37*/ meltfptr[36]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5098:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L11*/ meltfnum[3] =
- /*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-genobj.melt:5098:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[3]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5098:/ apply");
- /*apply */
- {
- union meltparam_un argtab[9];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5098;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "compilobj_nrep_match ntests=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NTESTS__V15*/ meltfptr[14];
- /*^apply.arg */
- argtab[5].meltbp_cstring = " omatched=";
- /*^apply.arg */
- argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.OMATCHED__V50*/ meltfptr[46];
- /*^apply.arg */
- argtab[7].meltbp_cstring = " oendlabel=";
- /*^apply.arg */
- argtab[8].meltbp_aptr =
- (melt_ptr_t *) & /*_.OENDLABEL__V39*/ meltfptr[38];
- /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V52*/ meltfptr[51] =
- /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5098:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V52*/ meltfptr[51] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5098:/ quasiblock");
-
-
- /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
- /*^compute */
-
- /*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5098:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.IF___V52*/ meltfptr[51] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V54*/ meltfptr[52] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V51*/ meltfptr[50] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.NTESTS__V15*/ meltfptr[14]);
- for ( /*_#TESTIX__L13*/ meltfnum[6] = 0;
- ( /*_#TESTIX__L13*/ meltfnum[6] >= 0)
- && ( /*_#TESTIX__L13*/ meltfnum[6] < cit1__EACHTUP_ln);
- /*_#TESTIX__L13*/ meltfnum[6]++)
- {
- /*_.CUROTEST__V55*/ meltfptr[51] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.NTESTS__V15*/ meltfptr[14]),
- /*_#TESTIX__L13*/ meltfnum[6]);
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5102:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L14*/ meltfnum[7] =
- /*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-genobj.melt:5102:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5102:/ apply");
- /*apply */
- {
- union meltparam_un argtab[7];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5102;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match curotest=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CUROTEST__V55*/ meltfptr[51];
- /*^apply.arg */
- argtab[5].meltbp_cstring = " testix=";
- /*^apply.arg */
- argtab[6].meltbp_long = /*_#TESTIX__L13*/ meltfnum[6];
- /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V57*/ meltfptr[56] =
- /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5102:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V57*/ meltfptr[56] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5102:/ quasiblock");
-
-
- /*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];;
- /*^compute */
-
- /*_.IFCPP___V56*/ meltfptr[52] = /*_.PROGN___V59*/ meltfptr[57];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5102:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V57*/ meltfptr[56] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V59*/ meltfptr[57] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V56*/ meltfptr[52] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5103:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L16*/ meltfnum[3] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CUROTEST__V55*/ meltfptr[51]),
- (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
- meltfrout->tabval[12])));;
- MELT_LOCATION ("warmelt-genobj.melt:5103:/ cond");
- /*cond */ if ( /*_#IS_A__L16*/ meltfnum[3]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V61*/ meltfptr[57] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5103:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curotest"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (5103) ? (5103) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V60*/ meltfptr[56] = /*_.IFELSE___V61*/ meltfptr[57];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5103:/ clear");
- /*clear *//*_#IS_A__L16*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V60*/ meltfptr[56] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5104:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#GET_INT__L17*/ meltfnum[0] =
- (melt_get_int
- ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51])));;
- /*^compute */
-
- /*_#I__L18*/ meltfnum[7] =
- (( /*_#GET_INT__L17*/ meltfnum[0]) ==
- ( /*_#TESTIX__L13*/ meltfnum[6]));;
- MELT_LOCATION ("warmelt-genobj.melt:5104:/ cond");
- /*cond */ if ( /*_#I__L18*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V63*/ meltfptr[62] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5104:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curotest rank"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (5104) ? (5104) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V63*/ meltfptr[62] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V62*/ meltfptr[57] = /*_.IFELSE___V63*/ meltfptr[62];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5104:/ clear");
- /*clear *//*_#GET_INT__L17*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_#I__L18*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V63*/ meltfptr[62] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V62*/ meltfptr[57] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_A__L19*/ meltfnum[3] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CUROTEST__V55*/ meltfptr[51]),
- (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:5110:/ cond");
- /*cond */ if ( /*_#IS_A__L19*/ meltfnum[3]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-genobj.melt:5111:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 2, "NTEST_THEN");
- /*_.CURNTHEN__V66*/
- meltfptr[65] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CURNTHEN__V66*/ meltfptr[65] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5112:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 3, "NTEST_ELSE");
- /*_.CURNELSE__V67*/
- meltfptr[66] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CURNELSE__V67*/ meltfptr[66] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#NULL__L20*/ meltfnum[0] =
- (( /*_.CURNTHEN__V66*/ meltfptr[65]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5115:/ cond");
- /*cond */ if ( /*_#NULL__L20*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5116:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L21*/ meltfnum[7] =
- /*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-genobj.melt:5116:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5116:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5116;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match with null then curotest=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CUROTEST__V55*/
- meltfptr[51];
- /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab,
- "", (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V70*/ meltfptr[69] =
- /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5116:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L22*/
- meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70]
- = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V70*/ meltfptr[69] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5116:/ quasiblock");
-
-
- /*_.PROGN___V72*/ meltfptr[70] =
- /*_.IF___V70*/ meltfptr[69];;
- /*^compute */
-
- /*_.IFCPP___V69*/ meltfptr[68] =
- /*_.PROGN___V72*/ meltfptr[70];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5116:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V70*/ meltfptr[69] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V72*/ meltfptr[70] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V69*/ meltfptr[68] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5117:/ locexp");
-
-#if MELT_HAVE_DEBUG
- if (melt_flag_debug)
- melt_dbgshortbacktrace (("compilobj_nrep_match curotest has null then"), (14));
-#endif
- ;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5115:/ quasiblock");
-
-
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V69*/ meltfptr[68] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#NULL__L23*/ meltfnum[21] =
- (( /*_.CURNELSE__V67*/ meltfptr[66]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5119:/ cond");
- /*cond */ if ( /*_#NULL__L23*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-genobj.melt:5120:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L24*/ meltfnum[7] =
- /*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-genobj.melt:5120:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24]
- =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5120:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L25*/
- meltfnum[24];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5120;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match with null else curotest=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CUROTEST__V55*/
- meltfptr[51];
- /*_.MELT_DEBUG_FUN__V76*/ meltfptr[75] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */
- NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""),
- argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V75*/ meltfptr[68] =
- /*_.MELT_DEBUG_FUN__V76*/ meltfptr[75];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5120:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L25*/
- meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V76*/
- meltfptr[75] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V75*/ meltfptr[68] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5120:/ quasiblock");
-
-
- /*_.PROGN___V77*/ meltfptr[75] =
- /*_.IF___V75*/ meltfptr[68];;
- /*^compute */
-
- /*_.IFCPP___V74*/ meltfptr[70] =
- /*_.PROGN___V77*/ meltfptr[75];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5120:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[7] =
- 0;
- /*^clear */
- /*clear *//*_.IF___V75*/ meltfptr[68] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V77*/ meltfptr[75] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V74*/ meltfptr[70] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION
- ("warmelt-genobj.melt:5121:/ locexp");
-
-#if MELT_HAVE_DEBUG
- if (melt_flag_debug)
- melt_dbgshortbacktrace (("compilobj_nrep_match curotest has null else"), (14));
-#endif
- ;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5119:/ quasiblock");
-
-
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V74*/ meltfptr[70] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IFELSE___V73*/ meltfptr[69] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.IFELSE___V68*/ meltfptr[67] =
- /*_.IFELSE___V73*/ meltfptr[69];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5115:/ clear");
- /*clear *//*_#NULL__L23*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V73*/ meltfptr[69] = 0;
- }
- ;
- }
- ;
- /*_.LET___V65*/ meltfptr[64] =
- /*_.IFELSE___V68*/ meltfptr[67];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5111:/ clear");
- /*clear *//*_.CURNTHEN__V66*/ meltfptr[65] = 0;
- /*^clear */
- /*clear *//*_.CURNELSE__V67*/ meltfptr[66] = 0;
- /*^clear */
- /*clear *//*_#NULL__L20*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V68*/ meltfptr[67] = 0;
- /*_.IF___V64*/ meltfptr[62] = /*_.LET___V65*/ meltfptr[64];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5110:/ clear");
- /*clear *//*_.LET___V65*/ meltfptr[64] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V64*/ meltfptr[62] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5124:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-genobj.melt:5125:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
- /*_.LABINS__V78*/ meltfptr[68] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!NORMTESTER_LABELINSTR */ meltfrout->
- tabval[14])),
- (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5126:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 1, "NTEST_MATCHED");
- /*_.CURNMATCHED__V79*/
- meltfptr[75] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CURNMATCHED__V79*/ meltfptr[75] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5128:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L26*/ meltfnum[24] =
- /*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-genobj.melt:5128:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5128:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5128;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "compilobj_nrep_match labins=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LABINS__V78*/ meltfptr[68];
- /*_.MELT_DEBUG_FUN__V82*/ meltfptr[65] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V81*/ meltfptr[69] =
- /*_.MELT_DEBUG_FUN__V82*/ meltfptr[65];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5128:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V82*/ meltfptr[65] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V81*/ meltfptr[69] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5128:/ quasiblock");
-
-
- /*_.PROGN___V83*/ meltfptr[66] = /*_.IF___V81*/ meltfptr[69];;
- /*^compute */
-
- /*_.IFCPP___V80*/ meltfptr[70] = /*_.PROGN___V83*/ meltfptr[66];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5128:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IF___V81*/ meltfptr[69] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V83*/ meltfptr[66] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V80*/ meltfptr[70] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5129:/ quasiblock");
-
-
- /*_#I__L28*/ meltfnum[21] =
- (( /*_#TESTIX__L13*/ meltfnum[6]) + (1));;
- /*^compute */
-
- /*_.NEXTEST__V85*/ meltfptr[64] =
- (melt_multiple_nth
- ((melt_ptr_t) ( /*_.NTESTS__V15*/ meltfptr[14]),
- ( /*_#I__L28*/ meltfnum[21])));;
- MELT_LOCATION ("warmelt-genobj.melt:5130:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V42*/ meltfptr[41]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[10])))) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @TCX_NEXTEST",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TCX__V42*/
- meltfptr[41])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.TCX__V42*/ meltfptr[41]), (3),
- ( /*_.NEXTEST__V85*/ meltfptr[64]),
- "TCX_NEXTEST");
- ;
- /*^touch */
- meltgc_touch ( /*_.TCX__V42*/ meltfptr[41]);
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5131:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L29*/ meltfnum[0] =
- /*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-genobj.melt:5131:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5131:/ apply");
- /*apply */
- {
- union meltparam_un argtab[7];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5131;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match nextest=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NEXTEST__V85*/ meltfptr[64];
- /*^apply.arg */
- argtab[5].meltbp_cstring = " tcx=";
- /*^apply.arg */
- argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.TCX__V42*/ meltfptr[41];
- /*_.MELT_DEBUG_FUN__V88*/ meltfptr[66] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V87*/ meltfptr[69] =
- /*_.MELT_DEBUG_FUN__V88*/ meltfptr[66];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5131:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[66] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V87*/ meltfptr[69] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5131:/ quasiblock");
-
-
- /*_.PROGN___V89*/ meltfptr[66] = /*_.IF___V87*/ meltfptr[69];;
- /*^compute */
-
- /*_.IFCPP___V86*/ meltfptr[65] = /*_.PROGN___V89*/ meltfptr[66];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5131:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V87*/ meltfptr[69] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V89*/ meltfptr[66] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V86*/ meltfptr[65] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.LET___V84*/ meltfptr[67] = /*_.IFCPP___V86*/ meltfptr[65];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5129:/ clear");
- /*clear *//*_#I__L28*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.NEXTEST__V85*/ meltfptr[64] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V86*/ meltfptr[65] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5132:/ quasiblock");
-
-
- /*^multimsend */
- /*multimsend */
- {
- union meltparam_un argtab[2];
- union meltparam_un restab[1];
- memset (&argtab, 0, sizeof (argtab));
- memset (&restab, 0, sizeof (restab));
- /*^multimsend.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2]; /*^multimsend.arg */
- argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.TCX__V42*/ meltfptr[41];
- /*^multimsend.xres */
- restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.CUROBDEST__V91*/ meltfptr[66]; /*^multimsend.send */
- /*_.CURCOMP__V90*/ meltfptr[69] =
- meltgc_send ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]),
- ((melt_ptr_t)
- (( /*!COMPILE_TESTER */ meltfrout->tabval[15]))),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab,
- (MELTBPARSTR_PTR ""), restab);
- }
- ;
- /*^quasiblock */
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5135:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L31*/ meltfnum[24] =
- /*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-genobj.melt:5135:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5135:/ apply");
- /*apply */
- {
- union meltparam_un argtab[7];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5135;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match curcomp=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURCOMP__V90*/ meltfptr[69];
- /*^apply.arg */
- argtab[5].meltbp_cstring = "curobdest=";
- /*^apply.arg */
- argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.CUROBDEST__V91*/ meltfptr[66];
- /*_.MELT_DEBUG_FUN__V94*/ meltfptr[93] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V93*/ meltfptr[65] =
- /*_.MELT_DEBUG_FUN__V94*/ meltfptr[93];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5135:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V94*/ meltfptr[93] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V93*/ meltfptr[65] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5135:/ quasiblock");
-
-
- /*_.PROGN___V95*/ meltfptr[93] = /*_.IF___V93*/ meltfptr[65];;
- /*^compute */
-
- /*_.IFCPP___V92*/ meltfptr[64] = /*_.PROGN___V95*/ meltfptr[93];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5135:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IF___V93*/ meltfptr[65] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V95*/ meltfptr[93] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V92*/ meltfptr[64] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5136:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if ( /*_.CURCOMP__V90*/ meltfptr[69]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V97*/ meltfptr[93] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5136:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curcomp"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") : __FILE__,
- (5136) ? (5136) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V97*/ meltfptr[93] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V96*/ meltfptr[65] = /*_.IFELSE___V97*/ meltfptr[93];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5136:/ clear");
- /*clear *//*_.IFELSE___V97*/ meltfptr[93] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V96*/ meltfptr[65] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5138:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.OBODYL__V33*/ meltfptr[21]),
- (melt_ptr_t) ( /*_.LABINS__V78*/
- meltfptr[68]));
- }
- ;
- /*_#IS_LIST__L33*/ meltfnum[0] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
- MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-genobj.melt:5140:/ cond");
- /*cond */ if ( /*_#IS_LIST__L33*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-genobj.melt:5141:/ quasiblock");
-
-
- /*_.LIST_LAST__V100*/ meltfptr[99] =
- (melt_list_last
- ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])));;
- /*^compute */
-
- /*_.LASTLICOMP__V101*/ meltfptr[100] =
- (melt_pair_head
- ((melt_ptr_t) ( /*_.LIST_LAST__V100*/ meltfptr[99])));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5142:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L34*/ meltfnum[21] =
- /*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-genobj.melt:5142:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5142:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5142;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match lastlicomp=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LASTLICOMP__V101*/
- meltfptr[100];
- /*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V103*/ meltfptr[102] =
- /*_.MELT_DEBUG_FUN__V104*/ meltfptr[103];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5142:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] =
- 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V103*/ meltfptr[102] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5142:/ quasiblock");
-
-
- /*_.PROGN___V105*/ meltfptr[103] =
- /*_.IF___V103*/ meltfptr[102];;
- /*^compute */
-
- /*_.IFCPP___V102*/ meltfptr[101] =
- /*_.PROGN___V105*/ meltfptr[103];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5142:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IF___V103*/ meltfptr[102] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V105*/ meltfptr[103] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V102*/ meltfptr[101] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5143:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURCOMP__V90*/ meltfptr[69];
- /*_.LIST_APPEND2LIST__V106*/ meltfptr[102] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_APPEND2LIST */ meltfrout->
- tabval[16])),
- (melt_ptr_t) ( /*_.OBODYL__V33*/
- meltfptr[21]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.LET___V99*/ meltfptr[98] =
- /*_.LIST_APPEND2LIST__V106*/ meltfptr[102];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5141:/ clear");
- /*clear *//*_.LIST_LAST__V100*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.LASTLICOMP__V101*/ meltfptr[100] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V102*/ meltfptr[101] = 0;
- /*^clear */
- /*clear *//*_.LIST_APPEND2LIST__V106*/ meltfptr[102] = 0;
- /*_.IFELSE___V98*/ meltfptr[93] =
- /*_.LET___V99*/ meltfptr[98];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5140:/ clear");
- /*clear *//*_.LET___V99*/ meltfptr[98] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_MULTIPLE__L36*/ meltfnum[24] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
- MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-genobj.melt:5145:/ cond");
- /*cond */ if ( /*_#IS_MULTIPLE__L36*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-genobj.melt:5146:/ quasiblock");
-
-
- /*_.LASTUPCOMP__V108*/ meltfptr[99] =
- (melt_multiple_nth
- ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69]),
- (-1)));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5147:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L37*/ meltfnum[7] =
- /*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-genobj.melt:5147:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[21] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5147:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[21];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5147;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match lastupcomp=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LASTUPCOMP__V108*/
- meltfptr[99];
- /*_.MELT_DEBUG_FUN__V111*/ meltfptr[102] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab,
- "", (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V110*/ meltfptr[101] =
- /*_.MELT_DEBUG_FUN__V111*/ meltfptr[102];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5147:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L38*/
- meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V111*/
- meltfptr[102] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V110*/ meltfptr[101] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5147:/ quasiblock");
-
-
- /*_.PROGN___V112*/ meltfptr[98] =
- /*_.IF___V110*/ meltfptr[101];;
- /*^compute */
-
- /*_.IFCPP___V109*/ meltfptr[100] =
- /*_.PROGN___V112*/ meltfptr[98];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5147:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V110*/ meltfptr[101] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V112*/ meltfptr[98] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V109*/ meltfptr[100] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit2__EACHTUP: */
- long cit2__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t)
- /*_.CURCOMP__V90*/
- meltfptr[69]);
- for ( /*_#SUBIX__L39*/ meltfnum[21] = 0;
- ( /*_#SUBIX__L39*/ meltfnum[21] >= 0)
- && ( /*_#SUBIX__L39*/ meltfnum[21] <
- cit2__EACHTUP_ln);
- /*_#SUBIX__L39*/ meltfnum[21]++)
- {
- /*_.SUBTEST__V113*/ meltfptr[102] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.CURCOMP__V90*/
- meltfptr[69]),
- /*_#SUBIX__L39*/
- meltfnum[21]);
-
-
-
-
- {
- MELT_LOCATION
- ("warmelt-genobj.melt:5151:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.OBODYL__V33*/
- meltfptr[21]),
- (melt_ptr_t) ( /*_.SUBTEST__V113*/ meltfptr[102]));
- }
- ;
- if ( /*_#SUBIX__L39*/ meltfnum[21] < 0)
- break;
- } /* end cit2__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5148:/ clear");
- /*clear *//*_.SUBTEST__V113*/ meltfptr[102] = 0;
- /*^clear */
- /*clear *//*_#SUBIX__L39*/ meltfnum[21] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
- /*_.IFELSE___V107*/ meltfptr[103] =
- /*_.IFCPP___V109*/ meltfptr[100];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5146:/ clear");
- /*clear *//*_.LASTUPCOMP__V108*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V109*/ meltfptr[100] = 0;
- /*epilog */
- }
- ;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5145:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_OBJECT__L40*/ meltfnum[7] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
- MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5153:/ cond");
- /*cond */ if ( /*_#IS_OBJECT__L40*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-genobj.melt:5154:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L41*/ meltfnum[40] =
- /*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-genobj.melt:5154:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[40]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41]
- =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5154:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L42*/
- meltfnum[41];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5154;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match obj curcomp=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURCOMP__V90*/
- meltfptr[69];
- /*_.MELT_DEBUG_FUN__V117*/ meltfptr[100]
- =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */
- NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""),
- argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V116*/ meltfptr[99] =
- /*_.MELT_DEBUG_FUN__V117*/
- meltfptr[100];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5154:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L42*/
- meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V117*/
- meltfptr[100] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V116*/ meltfptr[99] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5154:/ quasiblock");
-
-
- /*_.PROGN___V118*/ meltfptr[100] =
- /*_.IF___V116*/ meltfptr[99];;
- /*^compute */
-
- /*_.IFCPP___V115*/ meltfptr[98] =
- /*_.PROGN___V118*/ meltfptr[100];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5154:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[40]
- = 0;
- /*^clear */
- /*clear *//*_.IF___V116*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V118*/ meltfptr[100] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V115*/ meltfptr[98] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION
- ("warmelt-genobj.melt:5155:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.OBODYL__V33*/
- meltfptr[21]),
- (melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69]));
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5153:/ quasiblock");
-
-
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V115*/ meltfptr[98] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-genobj.melt:5158:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V120*/ meltfptr[100] =
- ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-genobj.melt:5158:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("unexpected curcomp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5158) ? (5158) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V120*/
- meltfptr[100] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V119*/ meltfptr[99] =
- /*_.IFELSE___V120*/ meltfptr[100];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5158:/ clear");
- /*clear *//*_.IFELSE___V120*/ meltfptr[100] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V119*/ meltfptr[99] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5157:/ quasiblock");
-
-
- /*_.PROGN___V121*/ meltfptr[98] =
- /*_.IFCPP___V119*/ meltfptr[99];;
- /*^compute */
-
- /*_.IFELSE___V114*/ meltfptr[101] =
- /*_.PROGN___V121*/ meltfptr[98];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5153:/ clear");
- /*clear *//*_.IFCPP___V119*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V121*/ meltfptr[98] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V107*/ meltfptr[103] =
- /*_.IFELSE___V114*/ meltfptr[101];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5145:/ clear");
- /*clear *//*_#IS_OBJECT__L40*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V114*/ meltfptr[101] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V98*/ meltfptr[93] =
- /*_.IFELSE___V107*/ meltfptr[103];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5140:/ clear");
- /*clear *//*_#IS_MULTIPLE__L36*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V107*/ meltfptr[103] = 0;
- }
- ;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5161:/ cond");
- /*cond */ if ( /*_.CUROBDEST__V91*/ meltfptr[66]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- meltgc_append_list ((melt_ptr_t)
- ( /*_.SUBCOMPLIST__V32*/ meltfptr[20]),
- (melt_ptr_t) ( /*_.CUROBDEST__V91*/
- meltfptr[66]));
- }
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5163:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.DONETESTS__V44*/ meltfptr[43]),
- (melt_ptr_t) ( /*_.CUROTEST__V55*/
- meltfptr[51]));
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5165:/ quasiblock");
-
-
- /*_.DISPOSABLIST__V122*/ meltfptr[100] =
- (meltgc_new_list
- ((meltobject_ptr_t)
- (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5166:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L43*/ meltfnum[41] =
- /*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-genobj.melt:5166:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L43*/ meltfnum[41]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5166:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5166;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match disposing curotest=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CUROTEST__V55*/ meltfptr[51];
- /*_.MELT_DEBUG_FUN__V125*/ meltfptr[101] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V124*/ meltfptr[98] =
- /*_.MELT_DEBUG_FUN__V125*/ meltfptr[101];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5166:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V125*/ meltfptr[101] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V124*/ meltfptr[98] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5166:/ quasiblock");
-
-
- /*_.PROGN___V126*/ meltfptr[103] = /*_.IF___V124*/ meltfptr[98];;
- /*^compute */
-
- /*_.IFCPP___V123*/ meltfptr[99] =
- /*_.PROGN___V126*/ meltfptr[103];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5166:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L43*/ meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.IF___V124*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V126*/ meltfptr[103] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V123*/ meltfptr[99] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_A__L45*/ meltfnum[7] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CUROTEST__V55*/ meltfptr[51]),
- (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-genobj.melt:5170:/ cond");
- /*cond */ if ( /*_#IS_A__L45*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-genobj.melt:5173:/ quasiblock");
-
-
- /*^newclosure */
- /*newclosure *//*_.LAMBDA___V129*/ meltfptr[103] =
- meltgc_new_closure ((meltobject_ptr_t)
- (((void
- *) (MELT_PREDEF (DISCR_CLOSURE)))),
- (meltroutine_ptr_t) (( /*!konst_20 */
- meltfrout->
- tabval[20])),
- (3));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])));
- ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
- tabval[0] =
- (melt_ptr_t) ( /*_.OMATCHED__V50*/ meltfptr[46]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 1 >= 0
- && 1 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])));
- ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
- tabval[1] =
- (melt_ptr_t) ( /*_.DONETESTS__V44*/ meltfptr[43]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 2 >= 0
- && 2 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.LAMBDA___V129*/
- meltfptr[103])));
- ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
- tabval[2] =
- (melt_ptr_t) ( /*_.DISPOSABLIST__V122*/ meltfptr[100]);
- ;
- /*_.LAMBDA___V128*/ meltfptr[98] =
- /*_.LAMBDA___V129*/ meltfptr[103];;
- MELT_LOCATION ("warmelt-genobj.melt:5171:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.LAMBDA___V128*/ meltfptr[98];
- /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MAPOBJECT_EVERY */ meltfrout->
- tabval[18])),
- (melt_ptr_t) ( /*_.STUFFMAP__V16*/
- meltfptr[15]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IFELSE___V127*/ meltfptr[101] =
- /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5170:/ clear");
- /*clear *//*_.LAMBDA___V128*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#__L46*/ meltfnum[24] =
- (( /*_.CURNMATCHED__V79*/ meltfptr[75]) ==
- ( /*_.NMATCHED__V17*/ meltfptr[16]));;
- MELT_LOCATION ("warmelt-genobj.melt:5188:/ cond");
- /*cond */ if ( /*_#__L46*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5189:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L47*/ meltfnum[40] =
- /*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-genobj.melt:5189:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[40]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[41] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5189:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[41];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5189;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match curnmatched == nmatched=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMATCHED__V17*/
- meltfptr[16];
- /*_.MELT_DEBUG_FUN__V134*/ meltfptr[133] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab,
- "", (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V133*/ meltfptr[132] =
- /*_.MELT_DEBUG_FUN__V134*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5189:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L48*/
- meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V134*/
- meltfptr[133] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V133*/ meltfptr[132] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5189:/ quasiblock");
-
-
- /*_.PROGN___V135*/ meltfptr[133] =
- /*_.IF___V133*/ meltfptr[132];;
- /*^compute */
-
- /*_.IFCPP___V132*/ meltfptr[129] =
- /*_.PROGN___V135*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5189:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.IF___V133*/ meltfptr[132] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V135*/ meltfptr[133] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V132*/ meltfptr[129] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.IFELSE___V131*/ meltfptr[98] =
- /*_.IFCPP___V132*/ meltfptr[129];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5188:/ clear");
- /*clear *//*_.IFCPP___V132*/ meltfptr[129] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_OBJECT__L49*/ meltfnum[41] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75]))
- == MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5194:/ cond");
- /*cond */ if ( /*_#IS_OBJECT__L49*/ meltfnum[41]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-genobj.melt:5195:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L50*/ meltfnum[40] =
- /*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-genobj.melt:5195:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[40]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L51*/ meltfnum[50]
- =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5195:/ apply");
- /*apply */
- {
- union meltparam_un argtab[8];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L51*/
- meltfnum[50];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5195;
- /*^apply.arg */
- argtab[3].meltbp_aptr =
- (melt_ptr_t *) &
- /*_.CURNMATCHED__V79*/ meltfptr[75];
- /*^apply.arg */
- argtab[4].meltbp_cstring =
- "compilobj_nrep_match disposing curnmatched=";
- /*^apply.arg */
- argtab[5].meltbp_aptr =
- (melt_ptr_t *) &
- /*_.CURNMATCHED__V79*/ meltfptr[75];
- /*^apply.arg */
- argtab[6].meltbp_cstring = " omatched=";
- /*^apply.arg */
- argtab[7].meltbp_aptr =
- (melt_ptr_t *) & /*_.OMATCHED__V50*/
- meltfptr[46];
- /*_.MELT_DEBUG_FUN__V139*/ meltfptr[138]
- =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */
- NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_PTR
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""),
- argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V138*/ meltfptr[129] =
- /*_.MELT_DEBUG_FUN__V139*/
- meltfptr[138];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5195:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L51*/
- meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V139*/
- meltfptr[138] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V138*/ meltfptr[129] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5195:/ quasiblock");
-
-
- /*_.PROGN___V140*/ meltfptr[138] =
- /*_.IF___V138*/ meltfptr[129];;
- /*^compute */
-
- /*_.IFCPP___V137*/ meltfptr[133] =
- /*_.PROGN___V140*/ meltfptr[138];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5195:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[40]
- = 0;
- /*^clear */
- /*clear *//*_.IF___V138*/ meltfptr[129] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V140*/ meltfptr[138] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V137*/ meltfptr[133] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5197:/ quasiblock");
-
-
- /*_.STUTESTS__V141*/ meltfptr[129] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.STUFFMAP__V16*/
- meltfptr[15]),
- (meltobject_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75]));;
- MELT_LOCATION
- ("warmelt-genobj.melt:5198:/ quasiblock");
-
-
- /*_.REMSTUFF__V142*/ meltfptr[138] =
- /*_.CURNMATCHED__V79*/ meltfptr[75];;
- /*citerblock FOREACH_IN_LIST */
- {
- /* start cit3__EACHLIST */
- for ( /*_.TESTPAIR__V143*/ meltfptr[142] =
- melt_list_first ( /*_.STUTESTS__V141*/
- meltfptr[129]);
- melt_magic_discr ( /*_.TESTPAIR__V143*/
- meltfptr[142]) ==
- MELTOBMAG_PAIR;
- /*_.TESTPAIR__V143*/ meltfptr[142] =
- melt_pair_tail ( /*_.TESTPAIR__V143*/
- meltfptr[142]))
- {
- /*_.CURTEST__V144*/ meltfptr[143] =
- melt_pair_head ( /*_.TESTPAIR__V143*/
- meltfptr[142]);
-
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5202:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURTEST__V144*/
- meltfptr[143];
- /*_.LIST_FIND__V145*/ meltfptr[144] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_FIND */
- meltfrout->tabval[21])),
- (melt_ptr_t) ( /*_.DONETESTS__V44*/ meltfptr[43]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
- }
- ;
- /*^cond */
- /*cond */ if ( /*_.LIST_FIND__V145*/ meltfptr[144]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5203:/ compute");
- /*_.TESTPAIR__V143*/ meltfptr[142] =
- /*_.SETQ___V147*/ meltfptr[146] =
- ( /*nil */ NULL);;
- /*_.IFELSE___V146*/ meltfptr[145] =
- /*_.SETQ___V147*/ meltfptr[146];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5202:/ clear");
- /*clear *//*_.SETQ___V147*/
- meltfptr[146] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5204:/ compute");
- /*_.REMSTUFF__V142*/ meltfptr[138] =
- /*_.SETQ___V148*/ meltfptr[146] =
- ( /*nil */ NULL);;
- /*_.IFELSE___V146*/ meltfptr[145] =
- /*_.SETQ___V148*/ meltfptr[146];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5202:/ clear");
- /*clear *//*_.SETQ___V148*/
- meltfptr[146] = 0;
- }
- ;
- }
- ;
- } /* end cit3__EACHLIST */
-
- /*citerepilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5199:/ clear");
- /*clear *//*_.TESTPAIR__V143*/ meltfptr[142] =
- 0;
- /*^clear */
- /*clear *//*_.CURTEST__V144*/ meltfptr[143] = 0;
- /*^clear */
- /*clear *//*_.LIST_FIND__V145*/ meltfptr[144] =
- 0;
- /*^clear */
- /*clear *//*_.IFELSE___V146*/ meltfptr[145] = 0;
- } /*endciterblock FOREACH_IN_LIST */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5206:/ cond");
- /*cond */ if ( /*_.REMSTUFF__V142*/ meltfptr[138]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION
- ("warmelt-genobj.melt:5207:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.DISPOSABLIST__V122*/ meltfptr[100]), (melt_ptr_t) ( /*_.REMSTUFF__V142*/ meltfptr[138]));
- }
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5198:/ clear");
- /*clear *//*_.REMSTUFF__V142*/ meltfptr[138] = 0;
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5197:/ clear");
- /*clear *//*_.STUTESTS__V141*/ meltfptr[129] = 0;
- MELT_LOCATION
- ("warmelt-genobj.melt:5194:/ quasiblock");
-
-
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V137*/ meltfptr[133] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IFELSE___V136*/ meltfptr[132] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.IFELSE___V131*/ meltfptr[98] =
- /*_.IFELSE___V136*/ meltfptr[132];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5188:/ clear");
- /*clear *//*_#IS_OBJECT__L49*/ meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V136*/ meltfptr[132] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V127*/ meltfptr[101] =
- /*_.IFELSE___V131*/ meltfptr[98];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5170:/ clear");
- /*clear *//*_#__L46*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V131*/ meltfptr[98] = 0;
- }
- ;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5210:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L52*/ meltfnum[50] =
- /*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-genobj.melt:5210:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[50]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5210:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5210;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match disposablist=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DISPOSABLIST__V122*/ meltfptr[100];
- /*_.MELT_DEBUG_FUN__V151*/ meltfptr[129] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V150*/ meltfptr[138] =
- /*_.MELT_DEBUG_FUN__V151*/ meltfptr[129];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5210:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V151*/ meltfptr[129] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V150*/ meltfptr[138] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5210:/ quasiblock");
-
-
- /*_.PROGN___V152*/ meltfptr[133] = /*_.IF___V150*/ meltfptr[138];;
- /*^compute */
-
- /*_.IFCPP___V149*/ meltfptr[146] =
- /*_.PROGN___V152*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5210:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L52*/ meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.IF___V150*/ meltfptr[138] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V152*/ meltfptr[133] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V149*/ meltfptr[146] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_LIST */
- {
- /* start cit4__EACHLIST */
- for ( /*_.DISPAIR__V153*/ meltfptr[132] =
- melt_list_first ( /*_.DISPOSABLIST__V122*/ meltfptr[100]);
- melt_magic_discr ( /*_.DISPAIR__V153*/ meltfptr[132]) ==
- MELTOBMAG_PAIR;
- /*_.DISPAIR__V153*/ meltfptr[132] =
- melt_pair_tail ( /*_.DISPAIR__V153*/ meltfptr[132]))
- {
- /*_.DISPSTUFF__V154*/ meltfptr[98] =
- melt_pair_head ( /*_.DISPAIR__V153*/ meltfptr[132]);
-
-
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5214:/ locexp");
- meltgc_remove_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.STUFFMAP__V16*/
- meltfptr[15]),
- (meltobject_ptr_t) ( /*_.DISPSTUFF__V154*/ meltfptr[98]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5215:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L54*/ meltfnum[41] =
- /*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-genobj.melt:5215:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L54*/ meltfnum[41]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5215:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5215;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match dispstuff=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DISPSTUFF__V154*/
- meltfptr[98];
- /*_.MELT_DEBUG_FUN__V157*/ meltfptr[133] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V156*/ meltfptr[138] =
- /*_.MELT_DEBUG_FUN__V157*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5215:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V157*/ meltfptr[133] =
- 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V156*/ meltfptr[138] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5215:/ quasiblock");
-
-
- /*_.PROGN___V158*/ meltfptr[133] =
- /*_.IF___V156*/ meltfptr[138];;
- /*^compute */
-
- /*_.IFCPP___V155*/ meltfptr[129] =
- /*_.PROGN___V158*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5215:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L54*/ meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.IF___V156*/ meltfptr[138] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V158*/ meltfptr[133] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V155*/ meltfptr[129] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5216:/ quasiblock");
-
-
- /*^msend */
- /*msend */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
- /*_.DISPOBJ__V160*/ meltfptr[133] =
- meltgc_send ((melt_ptr_t)
- ( /*_.DISPSTUFF__V154*/ meltfptr[98]),
- (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->
- tabval[11])),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5217:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L56*/ meltfnum[40] =
- /*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-genobj.melt:5217:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[40]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5217:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5217;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match dispobj=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DISPOBJ__V160*/
- meltfptr[133];
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[162] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V162*/ meltfptr[161] =
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[162];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5217:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[162] =
- 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V162*/ meltfptr[161] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5217:/ quasiblock");
-
-
- /*_.PROGN___V164*/ meltfptr[162] =
- /*_.IF___V162*/ meltfptr[161];;
- /*^compute */
-
- /*_.IFCPP___V161*/ meltfptr[160] =
- /*_.PROGN___V164*/ meltfptr[162];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5217:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.IF___V162*/ meltfptr[161] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V164*/ meltfptr[162] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V161*/ meltfptr[160] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5218:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L58*/ meltfnum[24] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.DISPOBJ__V160*/ meltfptr[133]),
- (melt_ptr_t) (( /*!CLASS_OBJLOCV */
- meltfrout->
- tabval[22])));;
- MELT_LOCATION ("warmelt-genobj.melt:5218:/ cond");
- /*cond */ if ( /*_#IS_A__L58*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V166*/ meltfptr[162] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5218:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check dispobj"),
- ("warmelt-genobj.melt")
- ? ("warmelt-genobj.melt") :
- __FILE__,
- (5218) ? (5218) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V166*/ meltfptr[162] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V165*/ meltfptr[161] =
- /*_.IFELSE___V166*/ meltfptr[162];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5218:/ clear");
- /*clear *//*_#IS_A__L58*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V166*/ meltfptr[162] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V165*/ meltfptr[161] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#__L59*/ meltfnum[41] =
- (( /*_.DISPOBJ__V160*/ meltfptr[133]) !=
- ( /*_.OMATCHED__V50*/ meltfptr[46]));;
- MELT_LOCATION ("warmelt-genobj.melt:5220:/ cond");
- /*cond */ if ( /*_#__L59*/ meltfnum[41]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-genobj.melt:5221:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
- /*_.DISPOSE_OBJLOC__V168*/ meltfptr[167] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!DISPOSE_OBJLOC */ meltfrout->
- tabval[23])),
- (melt_ptr_t) ( /*_.DISPOBJ__V160*/
- meltfptr[133]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IFELSE___V167*/ meltfptr[162] =
- /*_.DISPOSE_OBJLOC__V168*/ meltfptr[167];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5220:/ clear");
- /*clear *//*_.DISPOSE_OBJLOC__V168*/ meltfptr[167] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5222:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L60*/ meltfnum[50] =
- /*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-genobj.melt:5222:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L60*/ meltfnum[50]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L61*/ meltfnum[40] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-genobj.melt:5222:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L61*/ meltfnum[40];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5222;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match dont dispose omatched=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OMATCHED__V50*/
- meltfptr[46];
- /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */
- meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG
- MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab,
- "", (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V170*/ meltfptr[169] =
- /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-genobj.melt:5222:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L61*/
- meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V171*/
- meltfptr[170] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V170*/ meltfptr[169] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-genobj.melt:5222:/ quasiblock");
-
-
- /*_.PROGN___V172*/ meltfptr[170] =
- /*_.IF___V170*/ meltfptr[169];;
- /*^compute */
-
- /*_.IFCPP___V169*/ meltfptr[167] =
- /*_.PROGN___V172*/ meltfptr[170];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5222:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L60*/ meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.IF___V170*/ meltfptr[169] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V172*/ meltfptr[170] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V169*/ meltfptr[167] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.IFELSE___V167*/ meltfptr[162] =
- /*_.IFCPP___V169*/ meltfptr[167];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5220:/ clear");
- /*clear *//*_.IFCPP___V169*/ meltfptr[167] = 0;
- }
- ;
- }
- ;
- /*_.LET___V159*/ meltfptr[138] =
- /*_.IFELSE___V167*/ meltfptr[162];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5216:/ clear");
- /*clear *//*_.DISPOBJ__V160*/ meltfptr[133] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V161*/ meltfptr[160] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V165*/ meltfptr[161] = 0;
- /*^clear */
- /*clear *//*_#__L59*/ meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V167*/ meltfptr[162] = 0;
- } /* end cit4__EACHLIST */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5211:/ clear");
- /*clear *//*_.DISPAIR__V153*/ meltfptr[132] = 0;
- /*^clear */
- /*clear *//*_.DISPSTUFF__V154*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V155*/ meltfptr[129] = 0;
- /*^clear */
- /*clear *//*_.LET___V159*/ meltfptr[138] = 0;
- } /*endciterblock FOREACH_IN_LIST */
- ;
-
- MELT_LOCATION ("warmelt-genobj.melt:5165:/ clear");
- /*clear *//*_.DISPOSABLIST__V122*/ meltfptr[100] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V123*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L45*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V127*/ meltfptr[101] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V149*/ meltfptr[146] = 0;
-
- MELT_LOCATION ("warmelt-genobj.melt:5132:/ clear");
- /*clear *//*_.IFCPP___V92*/ meltfptr[64] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V96*/ meltfptr[65] = 0;
- /*^clear */
- /*clear *//*_#IS_LIST__L33*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V98*/ meltfptr[93] = 0;
-
- /*^clear */
- /*clear *//*_.CUROBDEST__V91*/ meltfptr[66] = 0;
-
- MELT_LOCATION ("warmelt-genobj.melt:5124:/ clear");
- /*clear *//*_.LABINS__V78*/ meltfptr[68] = 0;
- /*^clear */
- /*clear *//*_.CURNMATCHED__V79*/ meltfptr[75] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V80*/ meltfptr[70] = 0;
- /*^clear */
- /*clear *//*_.LET___V84*/ meltfptr[67] = 0;
- if ( /*_#TESTIX__L13*/ meltfnum[6] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5099:/ clear");
- /*clear *//*_.CUROTEST__V55*/ meltfptr[51] = 0;
- /*^clear */
- /*clear *//*_#TESTIX__L13*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V56*/ meltfptr[52] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V60*/ meltfptr[56] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V62*/ meltfptr[57] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L19*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_.IF___V64*/ meltfptr[62] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
-
- {
- MELT_LOCATION ("warmelt-genobj.melt:5224:/ locexp");
- meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]),
- (melt_ptr_t) ( /*_.OENDLABEL__V39*/ meltfptr[38]));
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5226:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[25]);
- /*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[24])),
- (melt_ptr_t) ( /*_.SUBCOMPLIST__V32*/ meltfptr[20]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5225:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OMBLOC__V34*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_OBJMULTIBLOCK */ meltfrout->tabval[6])))) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @OMULBLO_SUBCOMP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.OMBLOC__V34*/ meltfptr[22]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.OMBLOC__V34*/ meltfptr[22]), (3),
- ( /*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169]),
- "OMULBLO_SUBCOMP");
- ;
- /*^touch */
- meltgc_touch ( /*_.OMBLOC__V34*/ meltfptr[22]);
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5227:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L62*/ meltfnum[24] =
- /*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-genobj.melt:5227:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L62*/ meltfnum[24]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5227:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-genobj.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5227;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "compilobj_nrep_match return ombloc=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OMBLOC__V34*/ meltfptr[22];
- /*_.MELT_DEBUG_FUN__V176*/ meltfptr[133] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V175*/ meltfptr[167] =
- /*_.MELT_DEBUG_FUN__V176*/ meltfptr[133];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5227:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V176*/ meltfptr[133] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V175*/ meltfptr[167] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5227:/ quasiblock");
-
-
- /*_.PROGN___V177*/ meltfptr[160] = /*_.IF___V175*/ meltfptr[167];;
- /*^compute */
-
- /*_.IFCPP___V174*/ meltfptr[170] = /*_.PROGN___V177*/ meltfptr[160];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-genobj.melt:5227:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L62*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IF___V175*/ meltfptr[167] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V177*/ meltfptr[160] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V174*/ meltfptr[170] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-genobj.melt:5228:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.OMBLOC__V34*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:5228:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V178*/ meltfptr[161];;
-
- MELT_LOCATION ("warmelt-genobj.melt:5044:/ clear");
- /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.NCTYP__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.NTESTS__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.STUFFMAP__V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
- /*^clear */
- /*clear *//*_.MATMAP__V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.LET___V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.MATLABEL__V27*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.LET___V28*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.ENDLABEL__V31*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.SUBCOMPLIST__V32*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_.OBODYL__V33*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.OMBLOC__V34*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.MAKE_INTEGERBOX__V36*/ meltfptr[35] = 0;
- /*^clear */
- /*clear *//*_.OFIRSTGOTO__V37*/ meltfptr[36] = 0;
- /*^clear */
- /*clear *//*_.OENDLABEL__V39*/ meltfptr[38] = 0;
- /*^clear */
- /*clear *//*_.MAKE_LIST__V41*/ meltfptr[40] = 0;
- /*^clear */
- /*clear *//*_.TCX__V42*/ meltfptr[41] = 0;
- /*^clear */
- /*clear *//*_.DONETESTS__V44*/ meltfptr[43] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
- /*^clear */
- /*clear *//*_.COMPILE_OBJ__V49*/ meltfptr[45] = 0;
- /*^clear */
- /*clear *//*_.OMATCHED__V50*/ meltfptr[46] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V51*/ meltfptr[50] = 0;
- /*^clear */
- /*clear *//*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V174*/ meltfptr[170] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V178*/ meltfptr[161] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.LET___V12*/ meltfptr[8] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("COMPILOBJ_NREP_MATCH", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH */
+} /*end meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER */
diff --git a/gcc/melt/generated/warmelt-genobj+05.c b/gcc/melt/generated/warmelt-genobj+05.c
index 945acb56d00..b031269c579 100644
--- a/gcc/melt/generated/warmelt-genobj+05.c
+++ b/gcc/melt/generated/warmelt-genobj+05.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2885,14 +2961,4521 @@ static void forward_or_mark_module_start_frame_warmelt_genobj (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 178
+ void *mcfr_varptr[178];
+#define MELTFRAM_NBVARNUM 63
+ long mcfr_varnum[63];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 178; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 178;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPILOBJ_NREP_MATCH", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ getarg");
+ /*_.NMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.GCX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5065:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5065:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5065:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmat"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5065) ? (5065) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5065:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5066:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L2*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5066:/ cond");
+ /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5066:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5066) ? (5066) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5066:/ clear");
+ /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5067:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L3*/ meltfnum[0] =
+ /*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-genobj.melt:5067:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5067:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5067;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_match nmat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMAT__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V9*/ meltfptr[8] =
+ /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5067:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5067:/ quasiblock");
+
+
+ /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5067:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V11*/ meltfptr[9] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5068:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5069:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V13*/
+ meltfptr[9] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5070:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 1, "NEXPR_CTYP");
+ /*_.NCTYP__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5071:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 2, "NMATCH_TESTS");
+ /*_.NTESTS__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5072:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 3, "NMATCH_STUFFMAP");
+ /*_.STUFFMAP__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5073:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH */
+ meltfrout->tabval[0])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 4, "NMATCH_MATCHED");
+ /*_.NMATCHED__V17*/
+ meltfptr[16] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NMATCHED__V17*/ meltfptr[16] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5074:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
+ /*_.MATMAP__V18*/
+ meltfptr[17] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5075:/ quasiblock");
+
+
+ /*_#NBMAT__L5*/ meltfnum[3] =
+ (melt_count_mapobjects
+ ((meltmapobjects_ptr_t) ( /*_.MATMAP__V18*/ meltfptr[17])));;
+ /*^compute */
+
+ /*_.LABUF__V20*/ meltfptr[19] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
+ (char *) 0);;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5078:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
+ ("mtch"));
+ }
+ ;
+ /*_#I__L6*/ meltfnum[0] =
+ (( /*_#NBMAT__L5*/ meltfnum[3]) + (1));;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5079:/ locexp");
+ meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
+ ( /*_#I__L6*/ meltfnum[0]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5080:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]),
+ ("_"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5081:/ quasiblock");
+
+
+ /*_.LABSTR__V22*/ meltfptr[21] =
+ (meltgc_new_stringdup
+ ((meltobject_ptr_t)
+ (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[4])),
+ melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]))));;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5082:/ locexp");
+ meltgc_put_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.MATMAP__V18*/ meltfptr[17]),
+ (meltobject_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) ( /*_.LABSTR__V22*/ meltfptr[21]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5083:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[6] =
+ /*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-genobj.melt:5083:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5083:/ 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-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5083;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match matlabel labstr=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LABSTR__V22*/ meltfptr[21];
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V24*/ meltfptr[23] =
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5083:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V24*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5083:/ quasiblock");
+
+
+ /*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
+ /*^compute */
+
+ /*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5083:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V26*/ meltfptr[24] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V21*/ meltfptr[20] = /*_.LABSTR__V22*/ meltfptr[21];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5081:/ clear");
+ /*clear *//*_.LABSTR__V22*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
+ /*_.LET___V19*/ meltfptr[18] = /*_.LET___V21*/ meltfptr[20];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5075:/ clear");
+ /*clear *//*_#NBMAT__L5*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.LABUF__V20*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_#I__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V21*/ meltfptr[20] = 0;
+ /*_.MATLABEL__V27*/ meltfptr[23] = /*_.LET___V19*/ meltfptr[18];;
+ MELT_LOCATION ("warmelt-genobj.melt:5086:/ quasiblock");
+
+
+ /*_.LABUF__V29*/ meltfptr[21] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[3])),
+ (char *) 0);;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5089:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.MATLABEL__V27*/
+ meltfptr[23])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5090:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]),
+ ("_end"));
+ }
+ ;
+ /*_.STRBUF2STRING__V30*/ meltfptr[22] =
+ (meltgc_new_stringdup
+ ((meltobject_ptr_t)
+ (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[4])),
+ melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]))));;
+ /*^compute */
+
+ /*_.LET___V28*/ meltfptr[24] = /*_.STRBUF2STRING__V30*/ meltfptr[22];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5086:/ clear");
+ /*clear *//*_.LABUF__V29*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.STRBUF2STRING__V30*/ meltfptr[22] = 0;
+ /*_.ENDLABEL__V31*/ meltfptr[19] = /*_.LET___V28*/ meltfptr[24];;
+ /*^compute */
+
+ /*_.SUBCOMPLIST__V32*/ meltfptr[20] =
+ (meltgc_new_list
+ ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
+ /*^compute */
+
+ /*_.OBODYL__V33*/ meltfptr[21] =
+ (meltgc_new_list
+ ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
+ MELT_LOCATION ("warmelt-genobj.melt:5096:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_OBJMULTIBLOCK */
+ meltfrout->tabval[6])), (4),
+ "CLASS_OBJMULTIBLOCK");
+ /*_.INST__V35*/ meltfptr[34] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBI_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V35*/ meltfptr[34])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (0),
+ ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBLO_BODYL",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V35*/ meltfptr[34])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (1),
+ ( /*_.OBODYL__V33*/ meltfptr[21]), "OBLO_BODYL");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OMULBLO_SUBCOMP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V35*/ meltfptr[34])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (3),
+ (( /*nil */ NULL)), "OMULBLO_SUBCOMP");
+ ;
+ /*_.OMBLOC__V34*/ meltfptr[22] = /*_.INST__V35*/ meltfptr[34];;
+ /*^compute */
+
+ /*_.MAKE_INTEGERBOX__V36*/ meltfptr[35] =
+ (meltgc_new_int
+ ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[8])),
+ (0)));;
+ MELT_LOCATION ("warmelt-genobj.melt:5101:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_OBJGOTOINSTR */
+ meltfrout->tabval[7])), (3),
+ "CLASS_OBJGOTOINSTR");
+ /*_.INST__V38*/ meltfptr[37] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBI_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V38*/ meltfptr[37])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (0),
+ ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBGOTO_PREFIX",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V38*/ meltfptr[37])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (1),
+ ( /*_.MATLABEL__V27*/ meltfptr[23]),
+ "OBGOTO_PREFIX");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBGOTO_RANK",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V38*/ meltfptr[37])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V38*/ meltfptr[37]), (2),
+ ( /*_.MAKE_INTEGERBOX__V36*/ meltfptr[35]),
+ "OBGOTO_RANK");
+ ;
+ /*_.OFIRSTGOTO__V37*/ meltfptr[36] = /*_.INST__V38*/ meltfptr[37];;
+ MELT_LOCATION ("warmelt-genobj.melt:5106:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_OBJLABELINSTR */
+ meltfrout->tabval[9])), (3),
+ "CLASS_OBJLABELINSTR");
+ /*_.INST__V40*/ meltfptr[39] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBI_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V40*/ meltfptr[39])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (0),
+ ( /*_.NLOC__V13*/ meltfptr[9]), "OBI_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBLAB_PREFIX",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V40*/ meltfptr[39])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (1),
+ ( /*_.ENDLABEL__V31*/ meltfptr[19]),
+ "OBLAB_PREFIX");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OBLAB_RANK",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V40*/ meltfptr[39])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V40*/ meltfptr[39]), (2),
+ (( /*nil */ NULL)), "OBLAB_RANK");
+ ;
+ /*_.OENDLABEL__V39*/ meltfptr[38] = /*_.INST__V40*/ meltfptr[39];;
+ /*^compute */
+
+ /*_.MAKE_LIST__V41*/ meltfptr[40] =
+ (meltgc_new_list
+ ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
+ MELT_LOCATION ("warmelt-genobj.melt:5110:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
+ meltfrout->tabval[10])), (4),
+ "CLASS_TESTERCOMPILCONTEXT");
+ /*_.INST__V43*/ meltfptr[42] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @TCX_NRMATCH",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V43*/ meltfptr[42])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (1),
+ ( /*_.NMAT__V2*/ meltfptr[1]), "TCX_NRMATCH");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @TCX_FREELIST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V43*/ meltfptr[42])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (2),
+ ( /*_.MAKE_LIST__V41*/ meltfptr[40]),
+ "TCX_FREELIST");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @TCX_NEXTEST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V43*/ meltfptr[42])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V43*/ meltfptr[42]), (3),
+ (( /*nil */ NULL)), "TCX_NEXTEST");
+ ;
+ /*_.TCX__V42*/ meltfptr[41] = /*_.INST__V43*/ meltfptr[42];;
+ /*^compute */
+
+ /*_.DONETESTS__V44*/ meltfptr[43] =
+ (meltgc_new_list
+ ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5118:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
+ /*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-genobj.melt:5118:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5118:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5118;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_match nmatched=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMATCHED__V17*/ meltfptr[16];
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V46*/ meltfptr[45] =
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5118:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V46*/ meltfptr[45] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5118:/ quasiblock");
+
+
+ /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
+ /*^compute */
+
+ /*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5118:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V46*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V48*/ meltfptr[46] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5119:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.COMPILE_OBJ__V49*/ meltfptr[45] =
+ meltgc_send ((melt_ptr_t) ( /*_.NMATCHED__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->
+ tabval[11])), (MELTBPARSTR_PTR ""),
+ argtab, "", (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5117:/ quasiblock");
+
+
+ /*_.OMATCHED__V50*/ meltfptr[46] = /*_.COMPILE_OBJ__V49*/ meltfptr[45];;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5121:/ locexp");
+ meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]),
+ (melt_ptr_t) ( /*_.OFIRSTGOTO__V37*/ meltfptr[36]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5122:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L11*/ meltfnum[3] =
+ /*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-genobj.melt:5122:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[3]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5122:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5122;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_match ntests=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NTESTS__V15*/ meltfptr[14];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " omatched=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OMATCHED__V50*/ meltfptr[46];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " oendlabel=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OENDLABEL__V39*/ meltfptr[38];
+ /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V52*/ meltfptr[51] =
+ /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5122:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V52*/ meltfptr[51] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5122:/ quasiblock");
+
+
+ /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
+ /*^compute */
+
+ /*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5122:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V52*/ meltfptr[51] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V54*/ meltfptr[52] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V51*/ meltfptr[50] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.NTESTS__V15*/ meltfptr[14]);
+ for ( /*_#TESTIX__L13*/ meltfnum[6] = 0;
+ ( /*_#TESTIX__L13*/ meltfnum[6] >= 0)
+ && ( /*_#TESTIX__L13*/ meltfnum[6] < cit1__EACHTUP_ln);
+ /*_#TESTIX__L13*/ meltfnum[6]++)
+ {
+ /*_.CUROTEST__V55*/ meltfptr[51] =
+ melt_multiple_nth ((melt_ptr_t) ( /*_.NTESTS__V15*/ meltfptr[14]),
+ /*_#TESTIX__L13*/ meltfnum[6]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5126:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L14*/ meltfnum[7] =
+ /*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-genobj.melt:5126:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5126:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5126;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match curotest=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CUROTEST__V55*/ meltfptr[51];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " testix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#TESTIX__L13*/ meltfnum[6];
+ /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V57*/ meltfptr[56] =
+ /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5126:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V57*/ meltfptr[56] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5126:/ quasiblock");
+
+
+ /*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];;
+ /*^compute */
+
+ /*_.IFCPP___V56*/ meltfptr[52] = /*_.PROGN___V59*/ meltfptr[57];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5126:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V57*/ meltfptr[56] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V59*/ meltfptr[57] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V56*/ meltfptr[52] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5127:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L16*/ meltfnum[3] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
+ meltfrout->tabval[12])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5127:/ cond");
+ /*cond */ if ( /*_#IS_A__L16*/ meltfnum[3]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V61*/ meltfptr[57] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5127:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curotest"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5127) ? (5127) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V60*/ meltfptr[56] = /*_.IFELSE___V61*/ meltfptr[57];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5127:/ clear");
+ /*clear *//*_#IS_A__L16*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V60*/ meltfptr[56] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5128:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#GET_INT__L17*/ meltfnum[0] =
+ (melt_get_int
+ ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51])));;
+ /*^compute */
+
+ /*_#I__L18*/ meltfnum[7] =
+ (( /*_#GET_INT__L17*/ meltfnum[0]) ==
+ ( /*_#TESTIX__L13*/ meltfnum[6]));;
+ MELT_LOCATION ("warmelt-genobj.melt:5128:/ cond");
+ /*cond */ if ( /*_#I__L18*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V63*/ meltfptr[62] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5128:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curotest rank"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5128) ? (5128) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V63*/ meltfptr[62] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V62*/ meltfptr[57] = /*_.IFELSE___V63*/ meltfptr[62];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5128:/ clear");
+ /*clear *//*_#GET_INT__L17*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_#I__L18*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V63*/ meltfptr[62] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V62*/ meltfptr[57] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_A__L19*/ meltfnum[3] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[13])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5134:/ cond");
+ /*cond */ if ( /*_#IS_A__L19*/ meltfnum[3]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-genobj.melt:5135:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/
+ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 2, "NTEST_THEN");
+ /*_.CURNTHEN__V66*/
+ meltfptr[65] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CURNTHEN__V66*/ meltfptr[65] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5136:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/
+ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 3, "NTEST_ELSE");
+ /*_.CURNELSE__V67*/
+ meltfptr[66] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CURNELSE__V67*/ meltfptr[66] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#NULL__L20*/ meltfnum[0] =
+ (( /*_.CURNTHEN__V66*/ meltfptr[65]) == NULL);;
+ MELT_LOCATION ("warmelt-genobj.melt:5139:/ cond");
+ /*cond */ if ( /*_#NULL__L20*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5140:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L21*/ meltfnum[7] =
+ /*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-genobj.melt:5140:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5140:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5140;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match with null then curotest=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CUROTEST__V55*/
+ meltfptr[51];
+ /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V70*/ meltfptr[69] =
+ /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5140:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L22*/
+ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V70*/ meltfptr[69] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5140:/ quasiblock");
+
+
+ /*_.PROGN___V72*/ meltfptr[70] =
+ /*_.IF___V70*/ meltfptr[69];;
+ /*^compute */
+
+ /*_.IFCPP___V69*/ meltfptr[68] =
+ /*_.PROGN___V72*/ meltfptr[70];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5140:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V70*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V72*/ meltfptr[70] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V69*/ meltfptr[68] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5141:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_match curotest has null then"), (14));
+#endif
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5139:/ quasiblock");
+
+
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V69*/ meltfptr[68] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#NULL__L23*/ meltfnum[21] =
+ (( /*_.CURNELSE__V67*/ meltfptr[66]) == NULL);;
+ MELT_LOCATION ("warmelt-genobj.melt:5143:/ cond");
+ /*cond */ if ( /*_#NULL__L23*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5144:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L24*/ meltfnum[7] =
+ /*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-genobj.melt:5144:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24]
+ =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5144:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L25*/
+ meltfnum[24];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5144;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match with null else curotest=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CUROTEST__V55*/
+ meltfptr[51];
+ /*_.MELT_DEBUG_FUN__V76*/ meltfptr[75] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */
+ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""),
+ argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V75*/ meltfptr[68] =
+ /*_.MELT_DEBUG_FUN__V76*/ meltfptr[75];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5144:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L25*/
+ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V76*/
+ meltfptr[75] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V75*/ meltfptr[68] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5144:/ quasiblock");
+
+
+ /*_.PROGN___V77*/ meltfptr[75] =
+ /*_.IF___V75*/ meltfptr[68];;
+ /*^compute */
+
+ /*_.IFCPP___V74*/ meltfptr[70] =
+ /*_.PROGN___V77*/ meltfptr[75];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5144:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[7] =
+ 0;
+ /*^clear */
+ /*clear *//*_.IF___V75*/ meltfptr[68] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V77*/ meltfptr[75] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V74*/ meltfptr[70] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5145:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_match curotest has null else"), (14));
+#endif
+ ;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5143:/ quasiblock");
+
+
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V74*/ meltfptr[70] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IFELSE___V73*/ meltfptr[69] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V68*/ meltfptr[67] =
+ /*_.IFELSE___V73*/ meltfptr[69];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5139:/ clear");
+ /*clear *//*_#NULL__L23*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V73*/ meltfptr[69] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V65*/ meltfptr[64] =
+ /*_.IFELSE___V68*/ meltfptr[67];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5135:/ clear");
+ /*clear *//*_.CURNTHEN__V66*/ meltfptr[65] = 0;
+ /*^clear */
+ /*clear *//*_.CURNELSE__V67*/ meltfptr[66] = 0;
+ /*^clear */
+ /*clear *//*_#NULL__L20*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V68*/ meltfptr[67] = 0;
+ /*_.IF___V64*/ meltfptr[62] = /*_.LET___V65*/ meltfptr[64];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5134:/ clear");
+ /*clear *//*_.LET___V65*/ meltfptr[64] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V64*/ meltfptr[62] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5148:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5149:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.LABINS__V78*/ meltfptr[68] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!NORMTESTER_LABELINSTR */ meltfrout->
+ tabval[14])),
+ (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5150:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/
+ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), 1, "NTEST_MATCHED");
+ /*_.CURNMATCHED__V79*/
+ meltfptr[75] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CURNMATCHED__V79*/ meltfptr[75] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5152:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L26*/ meltfnum[24] =
+ /*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-genobj.melt:5152:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5152:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5152;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_match labins=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LABINS__V78*/ meltfptr[68];
+ /*_.MELT_DEBUG_FUN__V82*/ meltfptr[65] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V81*/ meltfptr[69] =
+ /*_.MELT_DEBUG_FUN__V82*/ meltfptr[65];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5152:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V82*/ meltfptr[65] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V81*/ meltfptr[69] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5152:/ quasiblock");
+
+
+ /*_.PROGN___V83*/ meltfptr[66] = /*_.IF___V81*/ meltfptr[69];;
+ /*^compute */
+
+ /*_.IFCPP___V80*/ meltfptr[70] = /*_.PROGN___V83*/ meltfptr[66];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5152:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V81*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V83*/ meltfptr[66] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V80*/ meltfptr[70] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5153:/ quasiblock");
+
+
+ /*_#I__L28*/ meltfnum[21] =
+ (( /*_#TESTIX__L13*/ meltfnum[6]) + (1));;
+ /*^compute */
+
+ /*_.NEXTEST__V85*/ meltfptr[64] =
+ (melt_multiple_nth
+ ((melt_ptr_t) ( /*_.NTESTS__V15*/ meltfptr[14]),
+ ( /*_#I__L28*/ meltfnum[21])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5154:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TCX__V42*/ meltfptr[41]),
+ (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[10])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @TCX_NEXTEST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TCX__V42*/
+ meltfptr[41])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.TCX__V42*/ meltfptr[41]), (3),
+ ( /*_.NEXTEST__V85*/ meltfptr[64]),
+ "TCX_NEXTEST");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.TCX__V42*/ meltfptr[41]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5155:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L29*/ meltfnum[0] =
+ /*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-genobj.melt:5155:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5155:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5155;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match nextest=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NEXTEST__V85*/ meltfptr[64];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " tcx=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.TCX__V42*/ meltfptr[41];
+ /*_.MELT_DEBUG_FUN__V88*/ meltfptr[66] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V87*/ meltfptr[69] =
+ /*_.MELT_DEBUG_FUN__V88*/ meltfptr[66];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5155:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[66] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V87*/ meltfptr[69] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5155:/ quasiblock");
+
+
+ /*_.PROGN___V89*/ meltfptr[66] = /*_.IF___V87*/ meltfptr[69];;
+ /*^compute */
+
+ /*_.IFCPP___V86*/ meltfptr[65] = /*_.PROGN___V89*/ meltfptr[66];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5155:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V87*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V89*/ meltfptr[66] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V86*/ meltfptr[65] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V84*/ meltfptr[67] = /*_.IFCPP___V86*/ meltfptr[65];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5153:/ clear");
+ /*clear *//*_#I__L28*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.NEXTEST__V85*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V86*/ meltfptr[65] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5156:/ quasiblock");
+
+
+ /*^multimsend */
+ /*multimsend */
+ {
+ union meltparam_un argtab[2];
+ union meltparam_un restab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ memset (&restab, 0, sizeof (restab));
+ /*^multimsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2]; /*^multimsend.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.TCX__V42*/ meltfptr[41];
+ /*^multimsend.xres */
+ restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.CUROBDEST__V91*/ meltfptr[66]; /*^multimsend.send */
+ /*_.CURCOMP__V90*/ meltfptr[69] =
+ meltgc_send ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]),
+ ((melt_ptr_t)
+ (( /*!COMPILE_TESTER */ meltfrout->tabval[15]))),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab,
+ (MELTBPARSTR_PTR ""), restab);
+ }
+ ;
+ /*^quasiblock */
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5159:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L31*/ meltfnum[24] =
+ /*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-genobj.melt:5159:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5159:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5159;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match curcomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMP__V90*/ meltfptr[69];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "curobdest=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CUROBDEST__V91*/ meltfptr[66];
+ /*_.MELT_DEBUG_FUN__V94*/ meltfptr[93] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V93*/ meltfptr[65] =
+ /*_.MELT_DEBUG_FUN__V94*/ meltfptr[93];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5159:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V94*/ meltfptr[93] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V93*/ meltfptr[65] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5159:/ quasiblock");
+
+
+ /*_.PROGN___V95*/ meltfptr[93] = /*_.IF___V93*/ meltfptr[65];;
+ /*^compute */
+
+ /*_.IFCPP___V92*/ meltfptr[64] = /*_.PROGN___V95*/ meltfptr[93];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5159:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V93*/ meltfptr[65] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V95*/ meltfptr[93] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V92*/ meltfptr[64] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5160:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if ( /*_.CURCOMP__V90*/ meltfptr[69]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V97*/ meltfptr[93] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5160:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curcomp"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5160) ? (5160) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V97*/ meltfptr[93] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V96*/ meltfptr[65] = /*_.IFELSE___V97*/ meltfptr[93];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5160:/ clear");
+ /*clear *//*_.IFELSE___V97*/ meltfptr[93] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V96*/ meltfptr[65] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5162:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.OBODYL__V33*/ meltfptr[21]),
+ (melt_ptr_t) ( /*_.LABINS__V78*/
+ meltfptr[68]));
+ }
+ ;
+ /*_#IS_LIST__L33*/ meltfnum[0] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
+ MELTOBMAG_LIST);;
+ MELT_LOCATION ("warmelt-genobj.melt:5164:/ cond");
+ /*cond */ if ( /*_#IS_LIST__L33*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-genobj.melt:5165:/ quasiblock");
+
+
+ /*_.LIST_LAST__V100*/ meltfptr[99] =
+ (melt_list_last
+ ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])));;
+ /*^compute */
+
+ /*_.LASTLICOMP__V101*/ meltfptr[100] =
+ (melt_pair_head
+ ((melt_ptr_t) ( /*_.LIST_LAST__V100*/ meltfptr[99])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5166:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L34*/ meltfnum[21] =
+ /*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-genobj.melt:5166:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5166:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5166;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match lastlicomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LASTLICOMP__V101*/
+ meltfptr[100];
+ /*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V103*/ meltfptr[102] =
+ /*_.MELT_DEBUG_FUN__V104*/ meltfptr[103];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5166:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V103*/ meltfptr[102] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5166:/ quasiblock");
+
+
+ /*_.PROGN___V105*/ meltfptr[103] =
+ /*_.IF___V103*/ meltfptr[102];;
+ /*^compute */
+
+ /*_.IFCPP___V102*/ meltfptr[101] =
+ /*_.PROGN___V105*/ meltfptr[103];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5166:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V103*/ meltfptr[102] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V105*/ meltfptr[103] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V102*/ meltfptr[101] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5167:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMP__V90*/ meltfptr[69];
+ /*_.LIST_APPEND2LIST__V106*/ meltfptr[102] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_APPEND2LIST */ meltfrout->
+ tabval[16])),
+ (melt_ptr_t) ( /*_.OBODYL__V33*/
+ meltfptr[21]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.LET___V99*/ meltfptr[98] =
+ /*_.LIST_APPEND2LIST__V106*/ meltfptr[102];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5165:/ clear");
+ /*clear *//*_.LIST_LAST__V100*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_.LASTLICOMP__V101*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V102*/ meltfptr[101] = 0;
+ /*^clear */
+ /*clear *//*_.LIST_APPEND2LIST__V106*/ meltfptr[102] = 0;
+ /*_.IFELSE___V98*/ meltfptr[93] =
+ /*_.LET___V99*/ meltfptr[98];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5164:/ clear");
+ /*clear *//*_.LET___V99*/ meltfptr[98] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MULTIPLE__L36*/ meltfnum[24] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
+ MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-genobj.melt:5169:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L36*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-genobj.melt:5170:/ quasiblock");
+
+
+ /*_.LASTUPCOMP__V108*/ meltfptr[99] =
+ (melt_multiple_nth
+ ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69]),
+ (-1)));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5171:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L37*/ meltfnum[7] =
+ /*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-genobj.melt:5171:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[21] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5171:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[21];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5171;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match lastupcomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LASTUPCOMP__V108*/
+ meltfptr[99];
+ /*_.MELT_DEBUG_FUN__V111*/ meltfptr[102] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V110*/ meltfptr[101] =
+ /*_.MELT_DEBUG_FUN__V111*/ meltfptr[102];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5171:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L38*/
+ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V111*/
+ meltfptr[102] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V110*/ meltfptr[101] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5171:/ quasiblock");
+
+
+ /*_.PROGN___V112*/ meltfptr[98] =
+ /*_.IF___V110*/ meltfptr[101];;
+ /*^compute */
+
+ /*_.IFCPP___V109*/ meltfptr[100] =
+ /*_.PROGN___V112*/ meltfptr[98];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5171:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V110*/ meltfptr[101] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V112*/ meltfptr[98] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V109*/ meltfptr[100] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit2__EACHTUP: */
+ long cit2__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t)
+ /*_.CURCOMP__V90*/
+ meltfptr[69]);
+ for ( /*_#SUBIX__L39*/ meltfnum[21] = 0;
+ ( /*_#SUBIX__L39*/ meltfnum[21] >= 0)
+ && ( /*_#SUBIX__L39*/ meltfnum[21] <
+ cit2__EACHTUP_ln);
+ /*_#SUBIX__L39*/ meltfnum[21]++)
+ {
+ /*_.SUBTEST__V113*/ meltfptr[102] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.CURCOMP__V90*/
+ meltfptr[69]),
+ /*_#SUBIX__L39*/
+ meltfnum[21]);
+
+
+
+
+ {
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5175:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.OBODYL__V33*/
+ meltfptr[21]),
+ (melt_ptr_t) ( /*_.SUBTEST__V113*/ meltfptr[102]));
+ }
+ ;
+ if ( /*_#SUBIX__L39*/ meltfnum[21] < 0)
+ break;
+ } /* end cit2__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5172:/ clear");
+ /*clear *//*_.SUBTEST__V113*/ meltfptr[102] = 0;
+ /*^clear */
+ /*clear *//*_#SUBIX__L39*/ meltfnum[21] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+ /*_.IFELSE___V107*/ meltfptr[103] =
+ /*_.IFCPP___V109*/ meltfptr[100];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5170:/ clear");
+ /*clear *//*_.LASTUPCOMP__V108*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V109*/ meltfptr[100] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5169:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_OBJECT__L40*/ meltfnum[7] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) ==
+ MELTOBMAG_OBJECT);;
+ MELT_LOCATION ("warmelt-genobj.melt:5177:/ cond");
+ /*cond */ if ( /*_#IS_OBJECT__L40*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5178:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L41*/ meltfnum[40] =
+ /*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-genobj.melt:5178:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[40]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41]
+ =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5178:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L42*/
+ meltfnum[41];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5178;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match obj curcomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMP__V90*/
+ meltfptr[69];
+ /*_.MELT_DEBUG_FUN__V117*/ meltfptr[100]
+ =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */
+ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""),
+ argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V116*/ meltfptr[99] =
+ /*_.MELT_DEBUG_FUN__V117*/
+ meltfptr[100];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5178:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L42*/
+ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V117*/
+ meltfptr[100] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V116*/ meltfptr[99] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5178:/ quasiblock");
+
+
+ /*_.PROGN___V118*/ meltfptr[100] =
+ /*_.IF___V116*/ meltfptr[99];;
+ /*^compute */
+
+ /*_.IFCPP___V115*/ meltfptr[98] =
+ /*_.PROGN___V118*/ meltfptr[100];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5178:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[40]
+ = 0;
+ /*^clear */
+ /*clear *//*_.IF___V116*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V118*/ meltfptr[100] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V115*/ meltfptr[98] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5179:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.OBODYL__V33*/
+ meltfptr[21]),
+ (melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69]));
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5177:/ quasiblock");
+
+
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V115*/ meltfptr[98] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5182:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V120*/ meltfptr[100] =
+ ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5182:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("unexpected curcomp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5182) ? (5182) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V120*/
+ meltfptr[100] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V119*/ meltfptr[99] =
+ /*_.IFELSE___V120*/ meltfptr[100];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5182:/ clear");
+ /*clear *//*_.IFELSE___V120*/ meltfptr[100] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V119*/ meltfptr[99] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5181:/ quasiblock");
+
+
+ /*_.PROGN___V121*/ meltfptr[98] =
+ /*_.IFCPP___V119*/ meltfptr[99];;
+ /*^compute */
+
+ /*_.IFELSE___V114*/ meltfptr[101] =
+ /*_.PROGN___V121*/ meltfptr[98];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5177:/ clear");
+ /*clear *//*_.IFCPP___V119*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V121*/ meltfptr[98] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V107*/ meltfptr[103] =
+ /*_.IFELSE___V114*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5169:/ clear");
+ /*clear *//*_#IS_OBJECT__L40*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V114*/ meltfptr[101] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V98*/ meltfptr[93] =
+ /*_.IFELSE___V107*/ meltfptr[103];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5164:/ clear");
+ /*clear *//*_#IS_MULTIPLE__L36*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V107*/ meltfptr[103] = 0;
+ }
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5185:/ cond");
+ /*cond */ if ( /*_.CUROBDEST__V91*/ meltfptr[66]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.SUBCOMPLIST__V32*/ meltfptr[20]),
+ (melt_ptr_t) ( /*_.CUROBDEST__V91*/
+ meltfptr[66]));
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5187:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.DONETESTS__V44*/ meltfptr[43]),
+ (melt_ptr_t) ( /*_.CUROTEST__V55*/
+ meltfptr[51]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5189:/ quasiblock");
+
+
+ /*_.DISPOSABLIST__V122*/ meltfptr[100] =
+ (meltgc_new_list
+ ((meltobject_ptr_t)
+ (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5190:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L43*/ meltfnum[41] =
+ /*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-genobj.melt:5190:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L43*/ meltfnum[41]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5190:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5190;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match disposing curotest=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CUROTEST__V55*/ meltfptr[51];
+ /*_.MELT_DEBUG_FUN__V125*/ meltfptr[101] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V124*/ meltfptr[98] =
+ /*_.MELT_DEBUG_FUN__V125*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5190:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V125*/ meltfptr[101] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V124*/ meltfptr[98] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5190:/ quasiblock");
+
+
+ /*_.PROGN___V126*/ meltfptr[103] = /*_.IF___V124*/ meltfptr[98];;
+ /*^compute */
+
+ /*_.IFCPP___V123*/ meltfptr[99] =
+ /*_.PROGN___V126*/ meltfptr[103];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5190:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L43*/ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V124*/ meltfptr[98] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V126*/ meltfptr[103] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V123*/ meltfptr[99] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_A__L45*/ meltfnum[7] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROTEST__V55*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[17])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5194:/ cond");
+ /*cond */ if ( /*_#IS_A__L45*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-genobj.melt:5197:/ quasiblock");
+
+
+ /*^newclosure */
+ /*newclosure *//*_.LAMBDA___V129*/ meltfptr[103] =
+ meltgc_new_closure ((meltobject_ptr_t)
+ (((void
+ *) (MELT_PREDEF (DISCR_CLOSURE)))),
+ (meltroutine_ptr_t) (( /*!konst_20 */
+ meltfrout->
+ tabval[20])),
+ (3));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])));
+ ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
+ tabval[0] =
+ (melt_ptr_t) ( /*_.OMATCHED__V50*/ meltfptr[46]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 1 >= 0
+ && 1 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])));
+ ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
+ tabval[1] =
+ (melt_ptr_t) ( /*_.DONETESTS__V44*/ meltfptr[43]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 2 >= 0
+ && 2 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.LAMBDA___V129*/
+ meltfptr[103])));
+ ((meltclosure_ptr_t) /*_.LAMBDA___V129*/ meltfptr[103])->
+ tabval[2] =
+ (melt_ptr_t) ( /*_.DISPOSABLIST__V122*/ meltfptr[100]);
+ ;
+ /*_.LAMBDA___V128*/ meltfptr[98] =
+ /*_.LAMBDA___V129*/ meltfptr[103];;
+ MELT_LOCATION ("warmelt-genobj.melt:5195:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LAMBDA___V128*/ meltfptr[98];
+ /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAPOBJECT_EVERY */ meltfrout->
+ tabval[18])),
+ (melt_ptr_t) ( /*_.STUFFMAP__V16*/
+ meltfptr[15]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IFELSE___V127*/ meltfptr[101] =
+ /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5194:/ clear");
+ /*clear *//*_.LAMBDA___V128*/ meltfptr[98] = 0;
+ /*^clear */
+ /*clear *//*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#__L46*/ meltfnum[24] =
+ (( /*_.CURNMATCHED__V79*/ meltfptr[75]) ==
+ ( /*_.NMATCHED__V17*/ meltfptr[16]));;
+ MELT_LOCATION ("warmelt-genobj.melt:5212:/ cond");
+ /*cond */ if ( /*_#__L46*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5213:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L47*/ meltfnum[40] =
+ /*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-genobj.melt:5213:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[40]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[41] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5213:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[41];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5213;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match curnmatched == nmatched=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMATCHED__V17*/
+ meltfptr[16];
+ /*_.MELT_DEBUG_FUN__V134*/ meltfptr[133] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V133*/ meltfptr[132] =
+ /*_.MELT_DEBUG_FUN__V134*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5213:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L48*/
+ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V134*/
+ meltfptr[133] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V133*/ meltfptr[132] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5213:/ quasiblock");
+
+
+ /*_.PROGN___V135*/ meltfptr[133] =
+ /*_.IF___V133*/ meltfptr[132];;
+ /*^compute */
+
+ /*_.IFCPP___V132*/ meltfptr[129] =
+ /*_.PROGN___V135*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5213:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V133*/ meltfptr[132] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V135*/ meltfptr[133] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V132*/ meltfptr[129] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V131*/ meltfptr[98] =
+ /*_.IFCPP___V132*/ meltfptr[129];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5212:/ clear");
+ /*clear *//*_.IFCPP___V132*/ meltfptr[129] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_OBJECT__L49*/ meltfnum[41] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75]))
+ == MELTOBMAG_OBJECT);;
+ MELT_LOCATION ("warmelt-genobj.melt:5218:/ cond");
+ /*cond */ if ( /*_#IS_OBJECT__L49*/ meltfnum[41]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5219:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L50*/ meltfnum[40] =
+ /*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-genobj.melt:5219:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[40]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L51*/ meltfnum[50]
+ =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5219:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[8];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L51*/
+ meltfnum[50];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5219;
+ /*^apply.arg */
+ argtab[3].meltbp_aptr =
+ (melt_ptr_t *) &
+ /*_.CURNMATCHED__V79*/ meltfptr[75];
+ /*^apply.arg */
+ argtab[4].meltbp_cstring =
+ "compilobj_nrep_match disposing curnmatched=";
+ /*^apply.arg */
+ argtab[5].meltbp_aptr =
+ (melt_ptr_t *) &
+ /*_.CURNMATCHED__V79*/ meltfptr[75];
+ /*^apply.arg */
+ argtab[6].meltbp_cstring = " omatched=";
+ /*^apply.arg */
+ argtab[7].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OMATCHED__V50*/
+ meltfptr[46];
+ /*_.MELT_DEBUG_FUN__V139*/ meltfptr[138]
+ =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */
+ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_PTR
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""),
+ argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V138*/ meltfptr[129] =
+ /*_.MELT_DEBUG_FUN__V139*/
+ meltfptr[138];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5219:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L51*/
+ meltfnum[50] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V139*/
+ meltfptr[138] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V138*/ meltfptr[129] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5219:/ quasiblock");
+
+
+ /*_.PROGN___V140*/ meltfptr[138] =
+ /*_.IF___V138*/ meltfptr[129];;
+ /*^compute */
+
+ /*_.IFCPP___V137*/ meltfptr[133] =
+ /*_.PROGN___V140*/ meltfptr[138];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5219:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[40]
+ = 0;
+ /*^clear */
+ /*clear *//*_.IF___V138*/ meltfptr[129] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V140*/ meltfptr[138] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V137*/ meltfptr[133] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5221:/ quasiblock");
+
+
+ /*_.STUTESTS__V141*/ meltfptr[129] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.STUFFMAP__V16*/
+ meltfptr[15]),
+ (meltobject_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75]));;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5222:/ quasiblock");
+
+
+ /*_.REMSTUFF__V142*/ meltfptr[138] =
+ /*_.CURNMATCHED__V79*/ meltfptr[75];;
+ /*citerblock FOREACH_IN_LIST */
+ {
+ /* start cit3__EACHLIST */
+ for ( /*_.TESTPAIR__V143*/ meltfptr[142] =
+ melt_list_first ( /*_.STUTESTS__V141*/
+ meltfptr[129]);
+ melt_magic_discr ( /*_.TESTPAIR__V143*/
+ meltfptr[142]) ==
+ MELTOBMAG_PAIR;
+ /*_.TESTPAIR__V143*/ meltfptr[142] =
+ melt_pair_tail ( /*_.TESTPAIR__V143*/
+ meltfptr[142]))
+ {
+ /*_.CURTEST__V144*/ meltfptr[143] =
+ melt_pair_head ( /*_.TESTPAIR__V143*/
+ meltfptr[142]);
+
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5226:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURTEST__V144*/
+ meltfptr[143];
+ /*_.LIST_FIND__V145*/ meltfptr[144] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_FIND */
+ meltfrout->tabval[21])),
+ (melt_ptr_t) ( /*_.DONETESTS__V44*/ meltfptr[43]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
+ }
+ ;
+ /*^cond */
+ /*cond */ if ( /*_.LIST_FIND__V145*/ meltfptr[144]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5227:/ compute");
+ /*_.TESTPAIR__V143*/ meltfptr[142] =
+ /*_.SETQ___V147*/ meltfptr[146] =
+ ( /*nil */ NULL);;
+ /*_.IFELSE___V146*/ meltfptr[145] =
+ /*_.SETQ___V147*/ meltfptr[146];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5226:/ clear");
+ /*clear *//*_.SETQ___V147*/
+ meltfptr[146] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5228:/ compute");
+ /*_.REMSTUFF__V142*/ meltfptr[138] =
+ /*_.SETQ___V148*/ meltfptr[146] =
+ ( /*nil */ NULL);;
+ /*_.IFELSE___V146*/ meltfptr[145] =
+ /*_.SETQ___V148*/ meltfptr[146];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5226:/ clear");
+ /*clear *//*_.SETQ___V148*/
+ meltfptr[146] = 0;
+ }
+ ;
+ }
+ ;
+ } /* end cit3__EACHLIST */
+
+ /*citerepilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5223:/ clear");
+ /*clear *//*_.TESTPAIR__V143*/ meltfptr[142] =
+ 0;
+ /*^clear */
+ /*clear *//*_.CURTEST__V144*/ meltfptr[143] = 0;
+ /*^clear */
+ /*clear *//*_.LIST_FIND__V145*/ meltfptr[144] =
+ 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V146*/ meltfptr[145] = 0;
+ } /*endciterblock FOREACH_IN_LIST */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5230:/ cond");
+ /*cond */ if ( /*_.REMSTUFF__V142*/ meltfptr[138]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5231:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.DISPOSABLIST__V122*/ meltfptr[100]), (melt_ptr_t) ( /*_.REMSTUFF__V142*/ meltfptr[138]));
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5222:/ clear");
+ /*clear *//*_.REMSTUFF__V142*/ meltfptr[138] = 0;
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5221:/ clear");
+ /*clear *//*_.STUTESTS__V141*/ meltfptr[129] = 0;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5218:/ quasiblock");
+
+
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V137*/ meltfptr[133] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IFELSE___V136*/ meltfptr[132] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V131*/ meltfptr[98] =
+ /*_.IFELSE___V136*/ meltfptr[132];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5212:/ clear");
+ /*clear *//*_#IS_OBJECT__L49*/ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V136*/ meltfptr[132] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V127*/ meltfptr[101] =
+ /*_.IFELSE___V131*/ meltfptr[98];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5194:/ clear");
+ /*clear *//*_#__L46*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V131*/ meltfptr[98] = 0;
+ }
+ ;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5234:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L52*/ meltfnum[50] =
+ /*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-genobj.melt:5234:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[50]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5234:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5234;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match disposablist=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISPOSABLIST__V122*/ meltfptr[100];
+ /*_.MELT_DEBUG_FUN__V151*/ meltfptr[129] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V150*/ meltfptr[138] =
+ /*_.MELT_DEBUG_FUN__V151*/ meltfptr[129];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5234:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V151*/ meltfptr[129] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V150*/ meltfptr[138] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5234:/ quasiblock");
+
+
+ /*_.PROGN___V152*/ meltfptr[133] = /*_.IF___V150*/ meltfptr[138];;
+ /*^compute */
+
+ /*_.IFCPP___V149*/ meltfptr[146] =
+ /*_.PROGN___V152*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5234:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L52*/ meltfnum[50] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V150*/ meltfptr[138] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V152*/ meltfptr[133] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V149*/ meltfptr[146] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_LIST */
+ {
+ /* start cit4__EACHLIST */
+ for ( /*_.DISPAIR__V153*/ meltfptr[132] =
+ melt_list_first ( /*_.DISPOSABLIST__V122*/ meltfptr[100]);
+ melt_magic_discr ( /*_.DISPAIR__V153*/ meltfptr[132]) ==
+ MELTOBMAG_PAIR;
+ /*_.DISPAIR__V153*/ meltfptr[132] =
+ melt_pair_tail ( /*_.DISPAIR__V153*/ meltfptr[132]))
+ {
+ /*_.DISPSTUFF__V154*/ meltfptr[98] =
+ melt_pair_head ( /*_.DISPAIR__V153*/ meltfptr[132]);
+
+
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5238:/ locexp");
+ meltgc_remove_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.STUFFMAP__V16*/
+ meltfptr[15]),
+ (meltobject_ptr_t) ( /*_.DISPSTUFF__V154*/ meltfptr[98]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5239:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L54*/ meltfnum[41] =
+ /*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-genobj.melt:5239:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L54*/ meltfnum[41]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5239:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5239;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match dispstuff=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISPSTUFF__V154*/
+ meltfptr[98];
+ /*_.MELT_DEBUG_FUN__V157*/ meltfptr[133] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V156*/ meltfptr[138] =
+ /*_.MELT_DEBUG_FUN__V157*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5239:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V157*/ meltfptr[133] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V156*/ meltfptr[138] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5239:/ quasiblock");
+
+
+ /*_.PROGN___V158*/ meltfptr[133] =
+ /*_.IF___V156*/ meltfptr[138];;
+ /*^compute */
+
+ /*_.IFCPP___V155*/ meltfptr[129] =
+ /*_.PROGN___V158*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5239:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L54*/ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V156*/ meltfptr[138] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V158*/ meltfptr[133] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V155*/ meltfptr[129] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5240:/ quasiblock");
+
+
+ /*^msend */
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.DISPOBJ__V160*/ meltfptr[133] =
+ meltgc_send ((melt_ptr_t)
+ ( /*_.DISPSTUFF__V154*/ meltfptr[98]),
+ (melt_ptr_t) (( /*!COMPILE_OBJ */ meltfrout->
+ tabval[11])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5241:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L56*/ meltfnum[40] =
+ /*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-genobj.melt:5241:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[40]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5241:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5241;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match dispobj=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISPOBJ__V160*/
+ meltfptr[133];
+ /*_.MELT_DEBUG_FUN__V163*/ meltfptr[162] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V162*/ meltfptr[161] =
+ /*_.MELT_DEBUG_FUN__V163*/ meltfptr[162];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5241:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[162] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V162*/ meltfptr[161] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5241:/ quasiblock");
+
+
+ /*_.PROGN___V164*/ meltfptr[162] =
+ /*_.IF___V162*/ meltfptr[161];;
+ /*^compute */
+
+ /*_.IFCPP___V161*/ meltfptr[160] =
+ /*_.PROGN___V164*/ meltfptr[162];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5241:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V162*/ meltfptr[161] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V164*/ meltfptr[162] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V161*/ meltfptr[160] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5242:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L58*/ meltfnum[24] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISPOBJ__V160*/ meltfptr[133]),
+ (melt_ptr_t) (( /*!CLASS_OBJLOCV */
+ meltfrout->
+ tabval[22])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5242:/ cond");
+ /*cond */ if ( /*_#IS_A__L58*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V166*/ meltfptr[162] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5242:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check dispobj"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") :
+ __FILE__,
+ (5242) ? (5242) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V166*/ meltfptr[162] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V165*/ meltfptr[161] =
+ /*_.IFELSE___V166*/ meltfptr[162];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5242:/ clear");
+ /*clear *//*_#IS_A__L58*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V166*/ meltfptr[162] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V165*/ meltfptr[161] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#__L59*/ meltfnum[41] =
+ (( /*_.DISPOBJ__V160*/ meltfptr[133]) !=
+ ( /*_.OMATCHED__V50*/ meltfptr[46]));;
+ MELT_LOCATION ("warmelt-genobj.melt:5244:/ cond");
+ /*cond */ if ( /*_#__L59*/ meltfnum[41]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-genobj.melt:5245:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.DISPOSE_OBJLOC__V168*/ meltfptr[167] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!DISPOSE_OBJLOC */ meltfrout->
+ tabval[23])),
+ (melt_ptr_t) ( /*_.DISPOBJ__V160*/
+ meltfptr[133]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IFELSE___V167*/ meltfptr[162] =
+ /*_.DISPOSE_OBJLOC__V168*/ meltfptr[167];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5244:/ clear");
+ /*clear *//*_.DISPOSE_OBJLOC__V168*/ meltfptr[167] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5246:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L60*/ meltfnum[50] =
+ /*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-genobj.melt:5246:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L60*/ meltfnum[50]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L61*/ meltfnum[40] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5246:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L61*/ meltfnum[40];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5246;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match dont dispose omatched=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OMATCHED__V50*/
+ meltfptr[46];
+ /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V170*/ meltfptr[169] =
+ /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5246:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L61*/
+ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V171*/
+ meltfptr[170] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V170*/ meltfptr[169] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-genobj.melt:5246:/ quasiblock");
+
+
+ /*_.PROGN___V172*/ meltfptr[170] =
+ /*_.IF___V170*/ meltfptr[169];;
+ /*^compute */
+
+ /*_.IFCPP___V169*/ meltfptr[167] =
+ /*_.PROGN___V172*/ meltfptr[170];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5246:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L60*/ meltfnum[50] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V170*/ meltfptr[169] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V172*/ meltfptr[170] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V169*/ meltfptr[167] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V167*/ meltfptr[162] =
+ /*_.IFCPP___V169*/ meltfptr[167];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5244:/ clear");
+ /*clear *//*_.IFCPP___V169*/ meltfptr[167] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V159*/ meltfptr[138] =
+ /*_.IFELSE___V167*/ meltfptr[162];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5240:/ clear");
+ /*clear *//*_.DISPOBJ__V160*/ meltfptr[133] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V161*/ meltfptr[160] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V165*/ meltfptr[161] = 0;
+ /*^clear */
+ /*clear *//*_#__L59*/ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V167*/ meltfptr[162] = 0;
+ } /* end cit4__EACHLIST */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5235:/ clear");
+ /*clear *//*_.DISPAIR__V153*/ meltfptr[132] = 0;
+ /*^clear */
+ /*clear *//*_.DISPSTUFF__V154*/ meltfptr[98] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V155*/ meltfptr[129] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V159*/ meltfptr[138] = 0;
+ } /*endciterblock FOREACH_IN_LIST */
+ ;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5189:/ clear");
+ /*clear *//*_.DISPOSABLIST__V122*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V123*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L45*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V127*/ meltfptr[101] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V149*/ meltfptr[146] = 0;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5156:/ clear");
+ /*clear *//*_.IFCPP___V92*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V96*/ meltfptr[65] = 0;
+ /*^clear */
+ /*clear *//*_#IS_LIST__L33*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V98*/ meltfptr[93] = 0;
+
+ /*^clear */
+ /*clear *//*_.CUROBDEST__V91*/ meltfptr[66] = 0;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5148:/ clear");
+ /*clear *//*_.LABINS__V78*/ meltfptr[68] = 0;
+ /*^clear */
+ /*clear *//*_.CURNMATCHED__V79*/ meltfptr[75] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V80*/ meltfptr[70] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V84*/ meltfptr[67] = 0;
+ if ( /*_#TESTIX__L13*/ meltfnum[6] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5123:/ clear");
+ /*clear *//*_.CUROTEST__V55*/ meltfptr[51] = 0;
+ /*^clear */
+ /*clear *//*_#TESTIX__L13*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V56*/ meltfptr[52] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V60*/ meltfptr[56] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V62*/ meltfptr[57] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L19*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V64*/ meltfptr[62] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5248:/ locexp");
+ meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]),
+ (melt_ptr_t) ( /*_.OENDLABEL__V39*/ meltfptr[38]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5250:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[25]);
+ /*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[24])),
+ (melt_ptr_t) ( /*_.SUBCOMPLIST__V32*/ meltfptr[20]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5249:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OMBLOC__V34*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_OBJMULTIBLOCK */ meltfrout->tabval[6])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @OMULBLO_SUBCOMP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.OMBLOC__V34*/ meltfptr[22]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.OMBLOC__V34*/ meltfptr[22]), (3),
+ ( /*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169]),
+ "OMULBLO_SUBCOMP");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.OMBLOC__V34*/ meltfptr[22]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5251:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L62*/ meltfnum[24] =
+ /*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-genobj.melt:5251:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L62*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5251:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5251;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_match return ombloc=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OMBLOC__V34*/ meltfptr[22];
+ /*_.MELT_DEBUG_FUN__V176*/ meltfptr[133] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V175*/ meltfptr[167] =
+ /*_.MELT_DEBUG_FUN__V176*/ meltfptr[133];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5251:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V176*/ meltfptr[133] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V175*/ meltfptr[167] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5251:/ quasiblock");
+
+
+ /*_.PROGN___V177*/ meltfptr[160] = /*_.IF___V175*/ meltfptr[167];;
+ /*^compute */
+
+ /*_.IFCPP___V174*/ meltfptr[170] = /*_.PROGN___V177*/ meltfptr[160];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5251:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L62*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V175*/ meltfptr[167] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V177*/ meltfptr[160] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V174*/ meltfptr[170] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5252:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OMBLOC__V34*/ meltfptr[22];;
+ MELT_LOCATION ("warmelt-genobj.melt:5252:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V178*/ meltfptr[161];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5068:/ clear");
+ /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.NCTYP__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NTESTS__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.STUFFMAP__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.MATMAP__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.MATLABEL__V27*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V28*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.ENDLABEL__V31*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.SUBCOMPLIST__V32*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.OBODYL__V33*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.OMBLOC__V34*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.MAKE_INTEGERBOX__V36*/ meltfptr[35] = 0;
+ /*^clear */
+ /*clear *//*_.OFIRSTGOTO__V37*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.OENDLABEL__V39*/ meltfptr[38] = 0;
+ /*^clear */
+ /*clear *//*_.MAKE_LIST__V41*/ meltfptr[40] = 0;
+ /*^clear */
+ /*clear *//*_.TCX__V42*/ meltfptr[41] = 0;
+ /*^clear */
+ /*clear *//*_.DONETESTS__V44*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
+ /*^clear */
+ /*clear *//*_.COMPILE_OBJ__V49*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.OMATCHED__V50*/ meltfptr[46] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V51*/ meltfptr[50] = 0;
+ /*^clear */
+ /*clear *//*_.LIST_TO_MULTIPLE__V173*/ meltfptr[169] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V174*/ meltfptr[170] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V178*/ meltfptr[161] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V8*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V12*/ meltfptr[8] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPILOBJ_NREP_MATCH", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
- union meltparam_un *meltxargtab_,
+ union meltparam_un * meltxargtab_,
const melt_argdescr_cell_t
meltxresdescr_[],
- union meltparam_un *meltxrestab_)
+ union meltparam_un * meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -2904,7 +7487,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_154_warmelt_genobj_LAMBDA___50___st
+ struct frame_meltrout_155_warmelt_genobj_LAMBDA___50___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2943,7 +7526,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5173:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5197:/ getarg");
/*_.STUFF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2966,7 +7549,7 @@ lab_endgetargs:;
/*_#__L1*/ meltfnum[0] =
(( /*_.STUFF__V2*/ meltfptr[1]) !=
(( /*~OMATCHED */ meltfclos->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5174:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5198:/ cond");
/*cond */ if ( /*_#__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2974,7 +7557,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5175:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5199:/ quasiblock");
/*_.REMSTUFF__V4*/ meltfptr[3] = /*_.STUFF__V2*/ meltfptr[1];;
@@ -2992,7 +7575,7 @@ lab_endgetargs:;
melt_pair_head ( /*_.TESTPAIR__V5*/ meltfptr[4]);
- MELT_LOCATION ("warmelt-genobj.melt:5179:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5203:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3017,14 +7600,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5180:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:5204:/ compute");
/*_.TESTPAIR__V5*/ meltfptr[4] =
/*_.SETQ___V9*/ meltfptr[8] = ( /*nil */ NULL);;
/*_.IFELSE___V8*/ meltfptr[7] =
/*_.SETQ___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5179:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5203:/ clear");
/*clear *//*_.SETQ___V9*/ meltfptr[8] = 0;
}
;
@@ -3036,14 +7619,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5181:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:5205:/ compute");
/*_.REMSTUFF__V4*/ meltfptr[3] =
/*_.SETQ___V10*/ meltfptr[8] = ( /*nil */ NULL);;
/*_.IFELSE___V8*/ meltfptr[7] =
/*_.SETQ___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5179:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5203:/ clear");
/*clear *//*_.SETQ___V10*/ meltfptr[8] = 0;
}
;
@@ -3053,7 +7636,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5176:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5200:/ clear");
/*clear *//*_.TESTPAIR__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.CURTEST__V6*/ meltfptr[5] = 0;
@@ -3063,7 +7646,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
} /*endciterblock FOREACH_IN_LIST */
;
- MELT_LOCATION ("warmelt-genobj.melt:5183:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5207:/ cond");
/*cond */ if ( /*_.REMSTUFF__V4*/ meltfptr[3]) /*then */
{
/*^cond.then */
@@ -3073,7 +7656,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:5184:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5208:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~DISPOSABLIST */ meltfclos->
tabval[2])),
@@ -3087,7 +7670,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:5175:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5199:/ clear");
/*clear *//*_.REMSTUFF__V4*/ meltfptr[3] = 0;
/*epilog */
}
@@ -3096,7 +7679,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5173:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5197:/ clear");
/*clear *//*_#__L1*/ meltfnum[0] = 0;
}
@@ -3110,14 +7693,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_154_warmelt_genobj_LAMBDA___50__ */
+} /*end meltrout_155_warmelt_genobj_LAMBDA___50__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -3142,7 +7725,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH_st
+ struct frame_meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3181,7 +7764,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ getarg");
/*_.NMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -3202,7 +7785,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5243:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5267:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3211,7 +7794,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_ALTMATCH */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5243:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5267:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3219,7 +7802,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5243:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5267:/ cond.else");
/*^block */
/*anyblock */
@@ -3233,7 +7816,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmat"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5243) ? (5243) : __LINE__, __FUNCTION__);
+ (5267) ? (5267) : __LINE__, __FUNCTION__);
;
}
;
@@ -3248,7 +7831,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5243:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5267:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -3261,7 +7844,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5244:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5268:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3270,7 +7853,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5244:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5268:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3278,7 +7861,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5244:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5268:/ cond.else");
/*^block */
/*anyblock */
@@ -3292,7 +7875,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5244) ? (5244) : __LINE__, __FUNCTION__);
+ (5268) ? (5268) : __LINE__, __FUNCTION__);
;
}
;
@@ -3307,7 +7890,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5244:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5268:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -3320,7 +7903,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3343,7 +7926,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3353,7 +7936,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -3363,14 +7946,14 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5245;
+ argtab[2].meltbp_long = 5269;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nmat=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NMAT__V2*/ meltfptr[1];
/*^apply.arg */
- argtab[5].meltbp_cstring = " gcx=";
+ argtab[5].meltbp_cstring = "\n gcx=";
/*^apply.arg */
argtab[6].meltbp_aptr =
(melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
@@ -3389,7 +7972,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -3402,7 +7985,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -3411,7 +7994,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5245:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5269:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -3424,10 +8007,10 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5246:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5270:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5247:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5271:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -3435,7 +8018,7 @@ lab_endgetargs:;
meltfptr[9] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5248:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5272:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 1, "NEXPR_CTYP");
@@ -3443,7 +8026,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5249:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5273:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 2, "NAMATCH_MATCHED");
@@ -3451,7 +8034,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5250:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5274:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 3, "NAMATCH_RESULT");
@@ -3459,7 +8042,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5251:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5275:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 4, "NAMATCH_BODY");
@@ -3467,7 +8050,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5252:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5276:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 5, "NAMATCH_FLAGS");
@@ -3478,8 +8061,13 @@ lab_endgetargs:;
/*_.OBODYL__V19*/ meltfptr[18] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[3]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5254:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5278:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3497,7 +8085,7 @@ lab_endgetargs:;
/*_.OLDALTMATCH__V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5255:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5279:/ quasiblock");
/*^rawallocobj */
@@ -3532,7 +8120,7 @@ lab_endgetargs:;
/*_.ALTMATCH__V21*/ meltfptr[20] = /*_.INST__V22*/ meltfptr[21];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3555,7 +8143,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -3565,7 +8153,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ apply");
/*apply */
{
union meltparam_un argtab[15];
@@ -3575,7 +8163,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5260;
+ argtab[2].meltbp_long = 5284;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nmatched=";
/*^apply.arg */
@@ -3625,7 +8213,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -3638,7 +8226,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -3647,7 +8235,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5260:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5284:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -3660,8 +8248,13 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5263:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3686,11 +8279,16 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-genobj.melt:5264:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5288:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5265:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRES__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5289:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRES__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3708,7 +8306,7 @@ lab_endgetargs:;
/*_.NSYMBRES__V28*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5266:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5290:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -3726,7 +8324,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5267:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5291:/ quasiblock");
/*^rawallocobj */
@@ -3762,7 +8360,7 @@ lab_endgetargs:;
/*_.OCLEARES__V30*/ meltfptr[29] = /*_.INST__V31*/ meltfptr[30];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5271:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5295:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.OCLEARES__V30*/ meltfptr[29]));
}
@@ -3785,7 +8383,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3808,7 +8406,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -3818,7 +8416,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -3829,7 +8427,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5275;
+ argtab[2].meltbp_long = 5299;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_altmatch curncomp=";
@@ -3856,7 +8454,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -3869,7 +8467,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -3878,7 +8476,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5275:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5299:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -3891,7 +8489,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5276:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5300:/ quasiblock");
/*^msend */
@@ -3911,7 +8509,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3934,7 +8532,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -3944,7 +8542,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3955,7 +8553,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5278;
+ argtab[2].meltbp_long = 5302;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_altmatch curocomp=";
@@ -3977,7 +8575,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -3990,7 +8588,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];;
@@ -3999,7 +8597,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[34] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5278:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5302:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -4014,7 +8612,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5279:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5303:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4023,7 +8621,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.CUROCOMP__V37*/ meltfptr[33])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5279:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5303:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L12*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4031,7 +8629,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5279:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5303:/ cond.else");
/*^block */
/*anyblock */
@@ -4045,7 +8643,7 @@ lab_endgetargs:;
melt_assert_failed (("check curocomp object"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5279) ? (5279) : __LINE__,
+ (5303) ? (5303) : __LINE__,
__FUNCTION__);
;
}
@@ -4061,7 +8659,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[38] = /*_.IFELSE___V43*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5279:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5303:/ clear");
/*clear *//*_#IS_OBJECT__L12*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V43*/ meltfptr[39] = 0;
@@ -4074,7 +8672,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5280:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5304:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OBODYL__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CUROCOMP__V37*/
@@ -4082,7 +8680,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5276:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5300:/ clear");
/*clear *//*_.CUROCOMP__V37*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.IFCPP___V38*/ meltfptr[34] = 0;
@@ -4094,7 +8692,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5272:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5296:/ clear");
/*clear *//*_.CURNCOMP__V32*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_#BODIX__L7*/ meltfnum[0] = 0;
@@ -4104,7 +8702,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4127,7 +8725,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -4137,7 +8735,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4148,7 +8746,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5282;
+ argtab[2].meltbp_long = 5306;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_altmatch obodyl=";
/*^apply.arg */
@@ -4168,7 +8766,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V46*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V46*/ meltfptr[34] = 0;
@@ -4181,7 +8779,7 @@ lab_endgetargs:;
/*_.IF___V45*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ quasiblock");
/*_.PROGN___V47*/ meltfptr[38] = /*_.IF___V45*/ meltfptr[33];;
@@ -4190,7 +8788,7 @@ lab_endgetargs:;
/*_.IFCPP___V44*/ meltfptr[39] = /*_.PROGN___V47*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5282:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5306:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V45*/ meltfptr[33] = 0;
@@ -4203,10 +8801,10 @@ lab_endgetargs:;
/*_.IFCPP___V44*/ meltfptr[39] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5283:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5307:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ quasiblock");
/*^newclosure */
@@ -4230,7 +8828,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]);
;
/*_.LAMBDA___V49*/ meltfptr[33] = /*_.LAMBDA___V50*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-genobj.melt:5284:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5308:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4248,7 +8846,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4271,7 +8869,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4281,7 +8879,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4292,7 +8890,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5292;
+ argtab[2].meltbp_long = 5316;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_altmatch oflags=";
/*^apply.arg */
@@ -4312,7 +8910,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0;
@@ -4325,7 +8923,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];;
@@ -4334,7 +8932,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[51] = /*_.PROGN___V55*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5292:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5316:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[52] = 0;
@@ -4351,13 +8949,13 @@ lab_endgetargs:;
/*_.LET___V48*/ meltfptr[34] = /*_.IFCPP___V52*/ meltfptr[51];;
- MELT_LOCATION ("warmelt-genobj.melt:5283:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5307:/ clear");
/*clear *//*_.LAMBDA___V49*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.OFLAGS__V51*/ meltfptr[50] = 0;
/*^clear */
/*clear *//*_.IFCPP___V52*/ meltfptr[51] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5294:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5318:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4372,8 +8970,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5295:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5319:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -4400,7 +9003,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5296:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5320:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4413,7 +9016,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5296:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5320:/ cond.else");
/*^block */
/*anyblock */
@@ -4427,7 +9030,7 @@ lab_endgetargs:;
melt_assert_failed (("@@unimplemented compilobj_nrep_altmatch"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5296) ? (5296) : __LINE__, __FUNCTION__);
+ (5320) ? (5320) : __LINE__, __FUNCTION__);
;
}
;
@@ -4442,7 +9045,7 @@ lab_endgetargs:;
/*_.IFCPP___V57*/ meltfptr[53] = /*_.IFELSE___V58*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5296:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5320:/ clear");
/*clear *//*_.IFELSE___V58*/ meltfptr[33] = 0;
}
@@ -4455,7 +9058,7 @@ lab_endgetargs:;
/*_.LET___V27*/ meltfptr[23] = /*_.IFCPP___V57*/ meltfptr[53];;
- MELT_LOCATION ("warmelt-genobj.melt:5264:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5288:/ clear");
/*clear *//*_.NSYMBRES__V28*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.OBVARES__V29*/ meltfptr[28] = 0;
@@ -4471,7 +9074,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V57*/ meltfptr[53] = 0;
/*_.LET___V12*/ meltfptr[8] = /*_.LET___V27*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:5246:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5270:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NCTYP__V14*/ meltfptr[13] = 0;
@@ -4493,11 +9096,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.LET___V27*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4522,14 +9125,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH */
+} /*end meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4548,7 +9151,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_156_warmelt_genobj_LAMBDA___51___st
+ struct frame_meltrout_157_warmelt_genobj_LAMBDA___51___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4587,7 +9190,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ getarg");
/*_.CURNFLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4603,7 +9206,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:5287:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5311:/ quasiblock");
/*^msend */
@@ -4621,24 +9224,24 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5289:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5313:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CUROFLAG__V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-genobj.melt:5289:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5313:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V3*/ meltfptr[2] = /*_.RETURN___V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:5287:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5311:/ clear");
/*clear *//*_.CUROFLAG__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.RETURN___V5*/ meltfptr[4] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4657,14 +9260,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_156_warmelt_genobj_LAMBDA___51__ */
+} /*end meltrout_157_warmelt_genobj_LAMBDA___51__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -4689,7 +9292,7 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL_st
+ struct frame_meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4700,10 +9303,10 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 21
- void *mcfr_varptr[21];
-#define MELTFRAM_NBVARNUM 6
- long mcfr_varnum[6];
+#define MELTFRAM_NBVARPTR 26
+ void *mcfr_varptr[26];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
/*others*/
long _spare_;
}
@@ -4714,13 +9317,13 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 21; ix++)
+ for (ix = 0; ix < 26; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 21;
+ meltfram__.mcfr_nbvar = 26;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -4728,7 +9331,7 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ getarg");
/*_.NMLAB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4749,7 +9352,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5303:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5327:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4758,7 +9361,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5303:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5327:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4766,7 +9369,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5303:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5327:/ cond.else");
/*^block */
/*anyblock */
@@ -4780,7 +9383,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmlab"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5303) ? (5303) : __LINE__, __FUNCTION__);
+ (5327) ? (5327) : __LINE__, __FUNCTION__);
;
}
;
@@ -4795,7 +9398,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5303:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5327:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -4808,7 +9411,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5304:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5328:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4817,7 +9420,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5304:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5328:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4825,7 +9428,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5304:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5328:/ cond.else");
/*^block */
/*anyblock */
@@ -4839,7 +9442,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5304) ? (5304) : __LINE__, __FUNCTION__);
+ (5328) ? (5328) : __LINE__, __FUNCTION__);
;
}
;
@@ -4854,7 +9457,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5304:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5328:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4867,7 +9470,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4890,7 +9493,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4900,7 +9503,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -4910,7 +9513,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5305;
+ argtab[2].meltbp_long = 5329;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel nmlab=";
/*^apply.arg */
@@ -4936,7 +9539,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -4949,7 +9552,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -4958,7 +9561,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5305:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5329:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -4971,27 +9574,65 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5306:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5330:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5307:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]), 0, "NREP_LOC");
- /*_.NLOC__V13*/
- meltfptr[9] = slot;
- };
+ MELT_LOCATION ("warmelt-genobj.melt:5331:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMLAB__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP */
+ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V13*/
+ meltfptr[9] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NLOC__V13*/ meltfptr[9] = NULL;;
+ }
;
- MELT_LOCATION ("warmelt-genobj.melt:5308:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]), 1, "NMLAB_STEP");
- /*_.NSTEP__V14*/
- meltfptr[13] = slot;
- };
+ MELT_LOCATION ("warmelt-genobj.melt:5332:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMLAB__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */ meltfrout->tabval[0])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]), 1, "NMLAB_STEP");
+ /*_.NSTEP__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NSTEP__V14*/ meltfptr[13] = NULL;;
+ }
;
- MELT_LOCATION ("warmelt-genobj.melt:5309:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NSTEP__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5333:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NSTEP__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5011,7 +9652,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5034,7 +9675,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -5044,7 +9685,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5054,7 +9695,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5311;
+ argtab[2].meltbp_long = 5335;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel stepixv=";
/*^apply.arg */
@@ -5080,7 +9721,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0;
@@ -5093,7 +9734,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];;
@@ -5102,7 +9743,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5311:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5335:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[16] = 0;
@@ -5116,60 +9757,171 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5336:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_matchlabel"), (12));
+#endif
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5337:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring =
+ "??compilobj_nrep_matchlabel\n#error incomplete compilobj_nrep_matchlabel\n/*nstep=*/ ";
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NSTEP__V14*/ meltfptr[13];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "\n/*stepixv=*/ ";
+ /*^apply.arg */
+ argtab[3].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPIXV__V15*/ meltfptr[14];
+ /*^apply.arg */
+ argtab[4].meltbp_cstring = "\n";
+ /*_.OBJM__V21*/ meltfptr[17] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJCOMPUTE */ meltfrout->tabval[5])),
+ (melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[9]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5343:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[9]),
+ ("not fully implemented compilobj_nrep_matchlabel"),
+ (melt_ptr_t) 0);
+ }
+ ;
+
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5312:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5344:/ cppif.then");
/*^block */
/*anyblock */
{
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:5344:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V21*/ meltfptr[17] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-genobj.melt:5312:/ cond.else");
-
/*^block */
/*anyblock */
{
-
-
-
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5344:/ apply");
+ /*apply */
{
- /*^locexp */
- melt_assert_failed (("@$@unimplemented compilobj_nrep_matchlabel"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5312) ? (5312) : __LINE__, __FUNCTION__);
- ;
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5344;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel objm=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBJM__V21*/ meltfptr[17];
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
}
;
- /*clear *//*_.IFELSE___V21*/ meltfptr[17] = 0;
+ /*_.IF___V23*/ meltfptr[22] =
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5344:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
}
;
}
+ else
+ { /*^cond.else */
+
+ /*_.IF___V23*/ meltfptr[22] = NULL;;
+ }
;
+ MELT_LOCATION ("warmelt-genobj.melt:5344:/ quasiblock");
+
+
+ /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
/*^compute */
- /*_.IFCPP___V20*/ meltfptr[16] = /*_.IFELSE___V21*/ meltfptr[17];;
+ /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5312:/ clear");
- /*clear *//*_.IFELSE___V21*/ meltfptr[17] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5344:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V25*/ meltfptr[23] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V20*/ meltfptr[16] = ( /*nil */ NULL);
+ /*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
+ MELT_LOCATION ("warmelt-genobj.melt:5345:/ quasiblock");
- /*_.LET___V12*/ meltfptr[8] = /*_.IFCPP___V20*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-genobj.melt:5306:/ clear");
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJM__V21*/ meltfptr[17];;
+ MELT_LOCATION ("warmelt-genobj.melt:5345:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V20*/ meltfptr[16] = /*_.RETURN___V26*/ meltfptr[22];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5337:/ clear");
+ /*clear *//*_.OBJM__V21*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0;
+ /*_.LET___V12*/ meltfptr[8] = /*_.LET___V20*/ meltfptr[16];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5330:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.NSTEP__V14*/ meltfptr[13] = 0;
@@ -5178,12 +9930,12 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V20*/ meltfptr[16] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ quasiblock");
+ /*clear *//*_.LET___V20*/ meltfptr[16] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -5208,27 +9960,27 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL */
+} /*end meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -5240,7 +9992,7 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT_st
+ struct frame_meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -5251,10 +10003,10 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 24
- void *mcfr_varptr[24];
-#define MELTFRAM_NBVARNUM 6
- long mcfr_varnum[6];
+#define MELTFRAM_NBVARPTR 27
+ void *mcfr_varptr[27];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
/*others*/
long _spare_;
}
@@ -5265,22 +10017,22 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 24; ix++)
+ for (ix = 0; ix < 27; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 24;
+ meltfram__.mcfr_nbvar = 27;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("COMPILOBJ_NREP_MATCHDATAINIT", meltcallcount);
+ melt_trace_start ("COMPILOBJ_NREP_MATCHFLAG", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ getarg");
- /*_.NMDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ getarg");
+ /*_.NMFLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
/*^getarg */
@@ -5300,23 +10052,141 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5320:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5353:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_INITIALIZER */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5320:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:5353:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ /*^compute */
+
+ /*_.DISCRIM__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5353:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5353;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag nmflag=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMFLAG__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n of discrim=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISCRIM__V6*/ meltfptr[5];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n gcx=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5353:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
}
else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5353:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5353:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5355:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5355:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
- MELT_LOCATION ("warmelt-genobj.melt:5320:/ cond.else");
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5355:/ cond.else");
/*^block */
/*anyblock */
@@ -5327,14 +10197,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check nmdat"),
+ melt_assert_failed (("check nmflag"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5320) ? (5320) : __LINE__, __FUNCTION__);
+ (5355) ? (5355) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
/*epilog */
}
;
@@ -5342,40 +10212,40 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5320:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5355:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+ /*_.IFCPP___V9*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5321:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5356:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L2*/ meltfnum[0] =
+ /*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5321:/ cond");
- /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5356:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
+ /*_.IFELSE___V12*/ meltfptr[4] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5321:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5356:/ cond.else");
/*^block */
/*anyblock */
@@ -5389,11 +10259,11 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5321) ? (5321) : __LINE__, __FUNCTION__);
+ (5356) ? (5356) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
/*epilog */
}
;
@@ -5401,23 +10271,50 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
+ /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5321:/ clear");
- /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5356:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
+ /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
+ MELT_LOCATION ("warmelt-genobj.melt:5357:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5358:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), 1, "NRPFLA_FLAG");
+ /*_.NRFLA__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5359:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), 2, "NRPFLA_NMATCH");
+ /*_.NRMATCH__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5432,7 +10329,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L3*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L5*/ meltfnum[1] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -5440,27 +10337,425 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ apply");
/*apply */
{
union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3];
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5361;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag nrfla=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NRFLA__V15*/ meltfptr[14];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " nrmatch=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NRMATCH__V16*/ meltfptr[15];
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V18*/ meltfptr[17] =
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V18*/ meltfptr[17] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ quasiblock");
+
+
+ /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5361:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5362:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_matchflag"), (12));
+#endif
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5363:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5364:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring =
+ "??compilobj_nrep_matchflag\n\t\t\t #error incomplete compilobj_nrep_matchflag\n\t\t\t /*nrfla=*/ ";
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NRFLA__V15*/ meltfptr[14];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "\n\t\t\t ";
+ /*_.OBJM__V22*/ meltfptr[18] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJCOMPUTE */ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5369:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ ("not fully implemented compilobj_nrep_matchflag"),
+ (melt_ptr_t) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5370:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:5370:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5370:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5322;
+ argtab[2].meltbp_long = 5370;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag objm=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBJM__V22*/ meltfptr[18];
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] =
+ 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);
+ }
+ ;
+ /*_.IF___V24*/ meltfptr[23] =
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5370:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V24*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5370:/ quasiblock");
+
+
+ /*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
+ /*^compute */
+
+ /*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5370:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V26*/ meltfptr[24] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5371:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJM__V22*/ meltfptr[18];;
+ MELT_LOCATION ("warmelt-genobj.melt:5371:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V21*/ meltfptr[17] = /*_.RETURN___V27*/ meltfptr[23];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5363:/ clear");
+ /*clear *//*_.OBJM__V22*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V27*/ meltfptr[23] = 0;
+ /*_.LET___V13*/ meltfptr[4] = /*_.LET___V21*/ meltfptr[17];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5357:/ clear");
+ /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NRFLA__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.NRMATCH__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V21*/ meltfptr[17] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V13*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPILOBJ_NREP_MATCHFLAG", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 30
+ void *mcfr_varptr[30];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 30; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 30;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPILOBJ_NREP_MATCHDATAINIT", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ getarg");
+ /*_.NMDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.GCX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5378:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:5378:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ /*^compute */
+
+ /*_.DISCRIM__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5378:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5378;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_matchdatainit nmdat=";
@@ -5468,169 +10763,329 @@ lab_endgetargs:;
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NMDAT__V2*/ meltfptr[1];
/*^apply.arg */
- argtab[5].meltbp_cstring = " gcx=";
+ argtab[5].meltbp_cstring = "\n of discr=";
/*^apply.arg */
argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISCRIM__V6*/ meltfptr[5];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n gcx=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
(melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] =
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.IF___V9*/ meltfptr[8] =
- /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5378:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
+ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V9*/ meltfptr[8] = NULL;;
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5378:/ quasiblock");
- /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
+ /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
/*^compute */
- /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5322:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5378:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
/*^clear */
- /*clear *//*_.PROGN___V11*/ meltfptr[9] = 0;
+ /*clear *//*_.PROGN___V8*/ meltfptr[5] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL);
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5323:/ quasiblock");
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5380:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_INITIALIZER */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5380:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5380:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmdat"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5380) ? (5380) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];;
+ /*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5324:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5380:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5381:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5381:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5381:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5381) ? (5381) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5381:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5382:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5383:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
- /*_.NLOC__V13*/
- meltfptr[9] = slot;
+ /*_.NLOC__V14*/
+ meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5325:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_ACTION */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5384:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMDAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_ACTION */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 1, "NMDAC_DATA");
- /*_.NDATA__V14*/
- meltfptr[13] = slot;
+ /*_.NDATA__V15*/
+ meltfptr[14] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.NDATA__V14*/ meltfptr[13] = NULL;;
+ /*_.NDATA__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5326:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5385:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NDATA__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), 1, "NRMATD_CTYPE");
- /*_.NDATATYPE__V15*/
- meltfptr[14] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V15*/ meltfptr[14]), 1, "NRMATD_CTYPE");
+ /*_.NDATATYPE__V16*/
+ meltfptr[15] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.NDATATYPE__V15*/ meltfptr[14] = NULL;;
+ /*_.NDATATYPE__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5327:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5386:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NDATA__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), 3, "NRMATD_RANK");
- /*_.NDATARANK__V16*/
- meltfptr[15] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V15*/ meltfptr[14]), 3, "NRMATD_RANK");
+ /*_.NDATARANK__V17*/
+ meltfptr[16] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.NDATARANK__V16*/ meltfptr[15] = NULL;;
+ /*_.NDATARANK__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5328:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5387:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NDATA__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V14*/ meltfptr[13]), 2, "NRMATD_MDATA");
- /*_.MATDATA__V17*/
- meltfptr[16] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDATA__V15*/ meltfptr[14]), 2, "NRMATD_MDATA");
+ /*_.MATDATA__V18*/
+ meltfptr[17] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.MATDATA__V17*/ meltfptr[16] = NULL;;
+ /*_.MATDATA__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5329:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5388:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 9, "GNCX_ALTMATCH");
- /*_.ALTMATCH__V18*/
- meltfptr[17] = slot;
+ /*_.ALTMATCH__V19*/
+ meltfptr[18] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.ALTMATCH__V18*/ meltfptr[17] = NULL;;
+ /*_.ALTMATCH__V19*/ meltfptr[18] = NULL;;
}
;
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5390:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_matchdatainit"), (10));
+#endif
+ ;
+ }
+ ;
+
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5645,7 +11100,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L5*/ meltfnum[3] =
+ /*_#MELT_NEED_DBG__L5*/ meltfnum[1] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -5653,8 +11108,8 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
@@ -5663,7 +11118,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ apply");
/*apply */
{
union meltparam_un argtab[13];
@@ -5673,36 +11128,36 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5331;
+ argtab[2].meltbp_long = 5391;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilobj_nrep_matchdatainit ndata=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NDATA__V14*/ meltfptr[13];
+ (melt_ptr_t *) & /*_.NDATA__V15*/ meltfptr[14];
/*^apply.arg */
- argtab[5].meltbp_cstring = " ndatatype=";
+ argtab[5].meltbp_cstring = "\n ndatatype=";
/*^apply.arg */
argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.NDATATYPE__V15*/ meltfptr[14];
+ (melt_ptr_t *) & /*_.NDATATYPE__V16*/ meltfptr[15];
/*^apply.arg */
argtab[7].meltbp_cstring = " ndatarank=";
/*^apply.arg */
argtab[8].meltbp_aptr =
- (melt_ptr_t *) & /*_.NDATARANK__V16*/ meltfptr[15];
+ (melt_ptr_t *) & /*_.NDATARANK__V17*/ meltfptr[16];
/*^apply.arg */
- argtab[9].meltbp_cstring = " matdata=";
+ argtab[9].meltbp_cstring = "\n matdata=";
/*^apply.arg */
argtab[10].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATDATA__V17*/ meltfptr[16];
+ (melt_ptr_t *) & /*_.MATDATA__V18*/ meltfptr[17];
/*^apply.arg */
- argtab[11].meltbp_cstring = " altmatch=";
+ argtab[11].meltbp_cstring = "\n altmatch=";
/*^apply.arg */
argtab[12].meltbp_aptr =
- (melt_ptr_t *) & /*_.ALTMATCH__V18*/ meltfptr[17];
- /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] =
+ (melt_ptr_t *) & /*_.ALTMATCH__V19*/ meltfptr[18];
+ /*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] =
melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])),
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
@@ -5714,11 +11169,744 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
+ /*_.IF___V21*/ meltfptr[20] =
+ /*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V21*/ meltfptr[20] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ quasiblock");
+
+
+ /*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];;
+ /*^compute */
+
+ /*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V21*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V23*/ meltfptr[21] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5393:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring =
+ "??compilobj_nrep_matchdatainit\n#error incomplete compilobj_nrep_matchdatainit\n/*ndata=*/ ";
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NDATA__V15*/ meltfptr[14];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "\n/*ndatatype=*/ ";
+ /*^apply.arg */
+ argtab[3].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NDATATYPE__V16*/ meltfptr[15];
+ /*^apply.arg */
+ argtab[4].meltbp_cstring = "\n/*matdata=*/ ";
+ /*^apply.arg */
+ argtab[5].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATDATA__V18*/ meltfptr[17];
+ /*^apply.arg */
+ argtab[6].meltbp_cstring = "\n";
+ /*_.OBJC__V25*/ meltfptr[21] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJCOMPUTE */ meltfrout->tabval[5])),
+ (melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR
+ MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5400:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ ("not fully implemented compilobj_nrep_matchdatainit"),
+ (melt_ptr_t) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5401:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:5401:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5401:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5401;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchdatainit objc=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBJC__V25*/ meltfptr[21];
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] =
+ 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);
+ }
+ ;
+ /*_.IF___V27*/ meltfptr[26] =
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5401:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V27*/ meltfptr[26] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5401:/ quasiblock");
+
+
+ /*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];;
+ /*^compute */
+
+ /*_.IFCPP___V26*/ meltfptr[25] = /*_.PROGN___V29*/ meltfptr[27];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5401:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V29*/ meltfptr[27] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V26*/ meltfptr[25] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5402:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJC__V25*/ meltfptr[21];;
+ MELT_LOCATION ("warmelt-genobj.melt:5402:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V24*/ meltfptr[20] = /*_.RETURN___V30*/ meltfptr[26];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5393:/ clear");
+ /*clear *//*_.OBJC__V25*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V30*/ meltfptr[26] = 0;
+ /*_.LET___V13*/ meltfptr[4] = /*_.LET___V24*/ meltfptr[20];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5382:/ clear");
+ /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NDATA__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.NDATATYPE__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.NDATARANK__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.MATDATA__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.ALTMATCH__V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V24*/ meltfptr[20] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V13*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPILOBJ_NREP_MATCHDATAINIT", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 29
+ void *mcfr_varptr[29];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 29; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 29;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPILOBJ_NREP_MATCHEDATA", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ getarg");
+ /*_.NMDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.GCX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5411:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:5411:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ /*^compute */
+
+ /*_.DISCRIM__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5411:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5411;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata nmdat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMDAT__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n of discr=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISCRIM__V6*/ meltfptr[5];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n gcx=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5411:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5411:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5411:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5413:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5413:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5413:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmdat"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5413) ? (5413) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5413:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5414:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5414:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5414:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5414) ? (5414) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5414:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5415:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5416:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5417:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 1, "NRMATD_CTYPE");
+ /*_.NCTYPE__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5418:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMDAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 2, "NRMATD_MDATA");
+ /*_.NRMDATA__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NRMDATA__V16*/ meltfptr[15] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5419:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMDAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 3, "NRMATD_RANK");
+ /*_.NRMRANK__V17*/
+ meltfptr[16] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NRMRANK__V17*/ meltfptr[16] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5420:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 9, "GNCX_ALTMATCH");
+ /*_.ALTMATCH__V18*/
+ meltfptr[17] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.ALTMATCH__V18*/ meltfptr[17] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5422:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("compilobj_nrep_matchdatainit"), (10));
+#endif
+ ;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5423:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-genobj.melt:5423:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5423:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5423;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_matchedata altmatch=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ALTMATCH__V18*/ meltfptr[17];
+ /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] =
+ 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);
+ }
+ ;
/*_.IF___V20*/ meltfptr[19] =
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5423:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -5731,7 +11919,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5423:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -5740,8 +11928,8 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5331:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5423:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
/*^clear */
@@ -5753,22 +11941,426 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
+ MELT_LOCATION ("warmelt-genobj.melt:5424:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring =
+ "??compilobj_nrep_matchedata\n /*nrmrank=*/ ";
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NRMRANK__V17*/ meltfptr[16];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring =
+ "\n#error incomplete compilobj_nrep_matchedata \n";
+ /*_.OBJC__V24*/ meltfptr[20] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJCOMPUTE */ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5429:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ ("not fully implemented compilobj_nrep_matchedata"),
+ (melt_ptr_t) 0);
+ }
+ ;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5333:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5430:/ cppif.then");
/*^block */
/*anyblock */
{
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:5430:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5430:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5430;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata objc=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBJC__V24*/ meltfptr[20];
+ /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] =
+ 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);
+ }
+ ;
+ /*_.IF___V26*/ meltfptr[25] =
+ /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5430:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V26*/ meltfptr[25] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5430:/ quasiblock");
+
+
+ /*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
+ /*^compute */
+
+ /*_.IFCPP___V25*/ meltfptr[24] = /*_.PROGN___V28*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5430:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V28*/ meltfptr[26] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V25*/ meltfptr[24] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5431:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJC__V24*/ meltfptr[20];;
+ MELT_LOCATION ("warmelt-genobj.melt:5431:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V23*/ meltfptr[19] = /*_.RETURN___V29*/ meltfptr[25];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5424:/ clear");
+ /*clear *//*_.OBJC__V24*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V29*/ meltfptr[25] = 0;
+ /*_.LET___V13*/ meltfptr[4] = /*_.LET___V23*/ meltfptr[19];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5415:/ clear");
+ /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NCTYPE__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.NRMDATA__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.NRMRANK__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.ALTMATCH__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V23*/ meltfptr[19] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V13*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPILOBJ_NREP_MATCHEDATA", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 26
+ void *mcfr_varptr[26];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 26; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 26;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPILOBJ_NREP_MATCHJUMP", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ getarg");
+ /*_.NMJUMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.GCX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5440:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-genobj.melt:5440:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V24*/ meltfptr[20] = ( /*nil */ NULL);;
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ /*^compute */
+
+ /*_.DISCRIM__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5440:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5440;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata nmjump=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMJUMP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n of discr=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DISCRIM__V6*/ meltfptr[5];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n gcx=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.GCX__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5440:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
}
else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5440:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5440:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5442:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_JUMP */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5442:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
- MELT_LOCATION ("warmelt-genobj.melt:5333:/ cond.else");
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5442:/ cond.else");
/*^block */
/*anyblock */
@@ -5779,11 +12371,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("@$@unimplemented compilobj_nrep_matchdatainit"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5333) ? (5333) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("check nmjump"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5442) ? (5442) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
/*epilog */
}
;
@@ -5791,43 +12386,372 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
+ /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5333:/ clear");
- /*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5442:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
+ /*_.IFCPP___V9*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
- /*_.LET___V12*/ meltfptr[8] = /*_.IFCPP___V23*/ meltfptr[19];;
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5443:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
- MELT_LOCATION ("warmelt-genobj.melt:5323:/ clear");
- /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.NDATA__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.NDATATYPE__V15*/ meltfptr[14] = 0;
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-genobj.melt:5443:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5443:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check gcx"),
+ ("warmelt-genobj.melt")
+ ? ("warmelt-genobj.melt") : __FILE__,
+ (5443) ? (5443) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5443:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5444:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-genobj.melt:5445:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5446:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 9, "GNCX_ALTMATCH");
+ /*_.ALTMATCH__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.ALTMATCH__V15*/ meltfptr[14] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5448:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-genobj.melt:5448:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5448:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5448;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "compilobj_nrep_matchjump altmatch=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ALTMATCH__V15*/ meltfptr[14];
+ /*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] =
+ 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);
+ }
+ ;
+ /*_.IF___V17*/ meltfptr[16] =
+ /*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V17*/ meltfptr[16] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5448:/ quasiblock");
+
+
+ /*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];;
+ /*^compute */
+
+ /*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V19*/ meltfptr[17] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5449:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring =
+ "??compilobj_nrep_matchjump\n#error incomplete compilobj_nrep_matchjump \n";
+ /*_.OBJC__V21*/ meltfptr[17] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MAKE_OBJCOMPUTE */ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-genobj.melt:5453:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]),
+ ("not fully implemented compilobj_nrep_matchjump"),
+ (melt_ptr_t) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-genobj.melt:5454:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-genobj.melt:5454:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-genobj.melt:5454:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-genobj.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5454;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "compilobj_nrep_matchjump objc=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OBJC__V21*/ meltfptr[17];
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] =
+ 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);
+ }
+ ;
+ /*_.IF___V23*/ meltfptr[22] =
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5454:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V23*/ meltfptr[22] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5454:/ quasiblock");
+
+
+ /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
+ /*^compute */
+
+ /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-genobj.melt:5454:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V25*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-genobj.melt:5455:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJC__V21*/ meltfptr[17];;
+ MELT_LOCATION ("warmelt-genobj.melt:5455:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V20*/ meltfptr[16] = /*_.RETURN___V26*/ meltfptr[22];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5449:/ clear");
+ /*clear *//*_.OBJC__V21*/ meltfptr[17] = 0;
/*^clear */
- /*clear *//*_.NDATARANK__V16*/ meltfptr[15] = 0;
+ /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0;
/*^clear */
- /*clear *//*_.MATDATA__V17*/ meltfptr[16] = 0;
+ /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0;
+ /*_.LET___V13*/ meltfptr[4] = /*_.LET___V20*/ meltfptr[16];;
+
+ MELT_LOCATION ("warmelt-genobj.melt:5444:/ clear");
+ /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0;
/*^clear */
- /*clear *//*_.ALTMATCH__V18*/ meltfptr[17] = 0;
+ /*clear *//*_.ALTMATCH__V15*/ meltfptr[14] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
+ /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V23*/ meltfptr[19] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ quasiblock");
+ /*clear *//*_.LET___V20*/ meltfptr[16] = 0;
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ quasiblock");
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ finalreturn");
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -5835,31 +12759,31 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
+ /*clear *//*_.IFCPP___V9*/ meltfptr[6] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[6] = 0;
+ /*clear *//*_.IFCPP___V11*/ meltfptr[5] = 0;
/*^clear */
- /*clear *//*_.LET___V12*/ meltfptr[8] = 0;
+ /*clear *//*_.LET___V13*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("COMPILOBJ_NREP_MATCHDATAINIT", meltcallcount);
+ melt_trace_end ("COMPILOBJ_NREP_MATCHJUMP", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT */
+} /*end meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -5881,7 +12805,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR_st
+ struct frame_meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -5920,7 +12844,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ getarg");
/*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -5941,7 +12865,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5964,7 +12888,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5974,7 +12898,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5984,7 +12908,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5345;
+ argtab[2].meltbp_long = 5469;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtester_labelinstr start nt=";
/*^apply.arg */
@@ -6003,7 +12927,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -6016,7 +12940,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -6025,7 +12949,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5345:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5469:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -6040,7 +12964,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5346:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5470:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6049,7 +12973,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5346:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5470:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6057,7 +12981,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5346:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5470:/ cond.else");
/*^block */
/*anyblock */
@@ -6071,7 +12995,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5346) ? (5346) : __LINE__, __FUNCTION__);
+ (5470) ? (5470) : __LINE__, __FUNCTION__);
;
}
;
@@ -6086,7 +13010,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5346:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5470:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -6103,7 +13027,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5347:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5471:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6113,7 +13037,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6136,7 +13060,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6146,7 +13070,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -6157,7 +13081,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5349;
+ argtab[2].meltbp_long = 5473;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtester_labelinstr return nil";
@@ -6175,7 +13099,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
@@ -6188,7 +13112,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
@@ -6197,7 +13121,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5349:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5473:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -6210,14 +13134,14 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5350:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5474:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-genobj.melt:5350:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5474:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:5348:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5472:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[12] = /*_.RETURN___V15*/ meltfptr[11];;
@@ -6226,7 +13150,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[5] = /*_.PROGN___V16*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5347:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5471:/ clear");
/*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.RETURN___V15*/ meltfptr[11] = 0;
@@ -6241,10 +13165,10 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5351:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5475:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5352:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5476:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -6254,7 +13178,7 @@ lab_endgetargs:;
;
/*_#NTESTIX__L7*/ meltfnum[5] =
(melt_get_int ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5354:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5478:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -6262,7 +13186,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5355:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5479:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
@@ -6272,7 +13196,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5357:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5481:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6281,7 +13205,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5357:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5481:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6289,7 +13213,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5357:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5481:/ cond.else");
/*^block */
/*anyblock */
@@ -6303,7 +13227,7 @@ lab_endgetargs:;
melt_assert_failed (("check normatch"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5357) ? (5357) : __LINE__, __FUNCTION__);
+ (5481) ? (5481) : __LINE__, __FUNCTION__);
;
}
;
@@ -6318,7 +13242,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5357:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5481:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
@@ -6331,13 +13255,18 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5358:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5482:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5359:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5483:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORMATCH__V19*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6366,7 +13295,7 @@ lab_endgetargs:;
/*_#__L9*/ meltfnum[1] =
(( /*_.MULTIPLE_NTH__V25*/ meltfptr[24]) ==
( /*_.NT__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:5358:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5482:/ cond");
/*cond */ if ( /*_#__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6374,7 +13303,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5358:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5482:/ cond.else");
/*^block */
/*anyblock */
@@ -6388,7 +13317,7 @@ lab_endgetargs:;
melt_assert_failed (("check valid normatch"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5358) ? (5358) : __LINE__, __FUNCTION__);
+ (5482) ? (5482) : __LINE__, __FUNCTION__);
;
}
;
@@ -6403,7 +13332,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5358:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5482:/ clear");
/*clear *//*_.NMATCH_TESTS__V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.MULTIPLE_NTH__V25*/ meltfptr[24] = 0;
@@ -6418,7 +13347,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5362:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5486:/ quasiblock");
/*_.PREFIX__V28*/ meltfptr[24] =
@@ -6426,7 +13355,7 @@ lab_endgetargs:;
( /*_.MATCHMAP__V20*/ meltfptr[19]),
(meltobject_ptr_t) ( /*_.NORMATCH__V19*/
meltfptr[12]));;
- MELT_LOCATION ("warmelt-genobj.melt:5364:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5488:/ quasiblock");
/*^rawallocobj */
@@ -6471,7 +13400,7 @@ lab_endgetargs:;
/*_.LABINS__V29*/ meltfptr[25] = /*_.INST__V30*/ meltfptr[29];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6494,7 +13423,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6504,7 +13433,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6515,7 +13444,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5369;
+ argtab[2].meltbp_long = 5493;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtester_labelinstr result labins=";
@@ -6536,7 +13465,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -6549,7 +13478,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -6558,7 +13487,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5369:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5493:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -6573,7 +13502,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5370:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5494:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6581,7 +13510,7 @@ lab_endgetargs:;
/*_#IS_STRING__L12*/ meltfnum[10] =
(melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V28*/ meltfptr[24])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:5370:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5494:/ cond");
/*cond */ if ( /*_#IS_STRING__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -6589,7 +13518,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5370:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5494:/ cond.else");
/*^block */
/*anyblock */
@@ -6603,7 +13532,7 @@ lab_endgetargs:;
melt_assert_failed (("check prefix"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5370) ? (5370) : __LINE__, __FUNCTION__);
+ (5494) ? (5494) : __LINE__, __FUNCTION__);
;
}
;
@@ -6618,7 +13547,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[31] = /*_.IFELSE___V36*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5370:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5494:/ clear");
/*clear *//*_#IS_STRING__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0;
@@ -6629,16 +13558,16 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[31] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5371:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5495:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LABINS__V29*/ meltfptr[25];;
- MELT_LOCATION ("warmelt-genobj.melt:5371:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5495:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V27*/ meltfptr[23] = /*_.RETURN___V37*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-genobj.melt:5362:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5486:/ clear");
/*clear *//*_.PREFIX__V28*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.LABINS__V29*/ meltfptr[25] = 0;
@@ -6650,7 +13579,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V37*/ meltfptr[32] = 0;
/*_.LET___V17*/ meltfptr[10] = /*_.LET___V27*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:5351:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5475:/ clear");
/*clear *//*_.NLOC__V18*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_#NTESTIX__L7*/ meltfnum[5] = 0;
@@ -6664,11 +13593,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V23*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_.LET___V27*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -6695,14 +13624,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR */
+} /*end meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -6724,7 +13653,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR_st
+ struct frame_meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -6763,7 +13692,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ getarg");
/*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -6784,7 +13713,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6807,7 +13736,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6817,7 +13746,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6827,7 +13756,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5377;
+ argtab[2].meltbp_long = 5501;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtester_gotoinstr start nt=";
/*^apply.arg */
@@ -6846,7 +13775,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -6859,7 +13788,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -6868,7 +13797,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5377:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5501:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -6883,7 +13812,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5378:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5502:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6892,7 +13821,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5378:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5502:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6900,7 +13829,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5378:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5502:/ cond.else");
/*^block */
/*anyblock */
@@ -6914,7 +13843,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5378) ? (5378) : __LINE__, __FUNCTION__);
+ (5502) ? (5502) : __LINE__, __FUNCTION__);
;
}
;
@@ -6929,7 +13858,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5378:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5502:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -6946,7 +13875,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5379:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5503:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6956,7 +13885,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6979,7 +13908,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -6989,7 +13918,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -7000,7 +13929,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5381;
+ argtab[2].meltbp_long = 5505;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtester_gotoinstr return nil";
@@ -7018,7 +13947,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
@@ -7031,7 +13960,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
@@ -7040,7 +13969,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5381:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5505:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -7053,14 +13982,14 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5382:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5506:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-genobj.melt:5382:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5506:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:5380:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5504:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[12] = /*_.RETURN___V15*/ meltfptr[11];;
@@ -7069,7 +13998,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[5] = /*_.PROGN___V16*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5379:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5503:/ clear");
/*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.RETURN___V15*/ meltfptr[11] = 0;
@@ -7084,10 +14013,10 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5383:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5507:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5384:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5508:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -7097,7 +14026,7 @@ lab_endgetargs:;
;
/*_#NTESTIX__L7*/ meltfnum[5] =
(melt_get_int ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5386:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5510:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -7105,7 +14034,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5387:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5511:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
@@ -7115,7 +14044,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7138,7 +14067,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7148,7 +14077,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7158,7 +14087,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5389;
+ argtab[2].meltbp_long = 5513;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtester_gotoinstr normatch=";
/*^apply.arg */
@@ -7178,7 +14107,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -7191,7 +14120,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -7200,7 +14129,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5389:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5513:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -7215,7 +14144,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5390:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5514:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7224,7 +14153,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5390:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5514:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -7232,7 +14161,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5390:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5514:/ cond.else");
/*^block */
/*anyblock */
@@ -7246,7 +14175,7 @@ lab_endgetargs:;
melt_assert_failed (("check normatch"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5390) ? (5390) : __LINE__, __FUNCTION__);
+ (5514) ? (5514) : __LINE__, __FUNCTION__);
;
}
;
@@ -7261,7 +14190,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5390:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5514:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
@@ -7274,13 +14203,18 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5391:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5515:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5392:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5516:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORMATCH__V19*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7309,7 +14243,7 @@ lab_endgetargs:;
/*_#__L11*/ meltfnum[1] =
(( /*_.MULTIPLE_NTH__V29*/ meltfptr[28]) ==
( /*_.NT__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-genobj.melt:5391:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5515:/ cond");
/*cond */ if ( /*_#__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7317,7 +14251,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5391:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5515:/ cond.else");
/*^block */
/*anyblock */
@@ -7331,7 +14265,7 @@ lab_endgetargs:;
melt_assert_failed (("check valid normatch"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5391) ? (5391) : __LINE__, __FUNCTION__);
+ (5515) ? (5515) : __LINE__, __FUNCTION__);
;
}
;
@@ -7346,7 +14280,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[22] = /*_.IFELSE___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5515:/ clear");
/*clear *//*_.NMATCH_TESTS__V28*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.MULTIPLE_NTH__V29*/ meltfptr[28] = 0;
@@ -7361,7 +14295,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5395:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5519:/ quasiblock");
/*_.PREFIX__V32*/ meltfptr[28] =
@@ -7369,7 +14303,7 @@ lab_endgetargs:;
( /*_.MATCHMAP__V20*/ meltfptr[19]),
(meltobject_ptr_t) ( /*_.NORMATCH__V19*/
meltfptr[12]));;
- MELT_LOCATION ("warmelt-genobj.melt:5397:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5521:/ quasiblock");
/*^rawallocobj */
@@ -7414,7 +14348,7 @@ lab_endgetargs:;
/*_.GOINS__V33*/ meltfptr[29] = /*_.INST__V34*/ meltfptr[33];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7437,7 +14371,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -7447,7 +14381,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7458,7 +14392,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5402;
+ argtab[2].meltbp_long = 5526;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtester_gotoinstr result goins=";
/*^apply.arg */
@@ -7478,7 +14412,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0;
@@ -7491,7 +14425,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];;
@@ -7500,7 +14434,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[34] = /*_.PROGN___V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5402:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5526:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[35] = 0;
@@ -7515,7 +14449,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5403:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5527:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7523,7 +14457,7 @@ lab_endgetargs:;
/*_#IS_STRING__L14*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V32*/ meltfptr[28])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:5403:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5527:/ cond");
/*cond */ if ( /*_#IS_STRING__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7531,7 +14465,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5403:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5527:/ cond.else");
/*^block */
/*anyblock */
@@ -7545,7 +14479,7 @@ lab_endgetargs:;
melt_assert_failed (("check prefix"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5403) ? (5403) : __LINE__, __FUNCTION__);
+ (5527) ? (5527) : __LINE__, __FUNCTION__);
;
}
;
@@ -7560,7 +14494,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[35] = /*_.IFELSE___V40*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5403:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5527:/ clear");
/*clear *//*_#IS_STRING__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V40*/ meltfptr[36] = 0;
@@ -7571,16 +14505,16 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[35] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5404:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5528:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V33*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-genobj.melt:5404:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5528:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V31*/ meltfptr[27] = /*_.RETURN___V41*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-genobj.melt:5395:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5519:/ clear");
/*clear *//*_.PREFIX__V32*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_.GOINS__V33*/ meltfptr[29] = 0;
@@ -7592,7 +14526,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V41*/ meltfptr[36] = 0;
/*_.LET___V17*/ meltfptr[10] = /*_.LET___V31*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-genobj.melt:5383:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5507:/ clear");
/*clear *//*_.NLOC__V18*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_#NTESTIX__L7*/ meltfnum[5] = 0;
@@ -7608,11 +14542,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V27*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.LET___V31*/ meltfptr[27] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -7639,14 +14573,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR */
+} /*end meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -7667,7 +14601,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR_st
+ struct frame_meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7706,7 +14640,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ getarg");
/*_.NMA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7737,7 +14671,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5410:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5534:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7746,7 +14680,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NMA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5410:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5534:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7754,7 +14688,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5410:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5534:/ cond.else");
/*^block */
/*anyblock */
@@ -7768,7 +14702,7 @@ lab_endgetargs:;
melt_assert_failed (("check nma"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5410) ? (5410) : __LINE__, __FUNCTION__);
+ (5534) ? (5534) : __LINE__, __FUNCTION__);
;
}
;
@@ -7783,7 +14717,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5410:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5534:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
@@ -7796,7 +14730,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5411:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5535:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7805,7 +14739,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5411:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5535:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7813,7 +14747,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5411:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5535:/ cond.else");
/*^block */
/*anyblock */
@@ -7827,7 +14761,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5411) ? (5411) : __LINE__, __FUNCTION__);
+ (5535) ? (5535) : __LINE__, __FUNCTION__);
;
}
;
@@ -7842,7 +14776,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[5] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5411:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5535:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -7855,7 +14789,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7878,7 +14812,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7888,7 +14822,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7898,7 +14832,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5412;
+ argtab[2].meltbp_long = 5536;
/*^apply.arg */
argtab[3].meltbp_cstring = "endmatch_gotoinstr nma=";
/*^apply.arg */
@@ -7918,7 +14852,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -7931,7 +14865,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -7940,7 +14874,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5412:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -7955,7 +14889,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5413:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5537:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -7964,10 +14898,10 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5414:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5538:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5415:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5539:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
@@ -7987,7 +14921,7 @@ lab_endgetargs:;
(char *) 0);;
{
- MELT_LOCATION ("warmelt-genobj.melt:5419:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5543:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.PREFIX__V15*/ meltfptr[14])));
@@ -7995,12 +14929,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5420:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5544:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]),
("_end /*endmatch*/"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5421:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5545:/ quasiblock");
/*_.STRBUF2STRING__V18*/ meltfptr[17] =
@@ -8008,7 +14942,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[5])),
melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5422:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5546:/ quasiblock");
/*^rawallocobj */
@@ -8054,7 +14988,7 @@ lab_endgetargs:;
/*_.GOINS__V19*/ meltfptr[18] = /*_.INST__V20*/ meltfptr[19];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8077,7 +15011,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -8087,7 +15021,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8097,7 +15031,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5428;
+ argtab[2].meltbp_long = 5552;
/*^apply.arg */
argtab[3].meltbp_cstring = "endmatch_gotoinstr goins=";
/*^apply.arg */
@@ -8117,7 +15051,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -8130,7 +15064,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -8139,7 +15073,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5428:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5552:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -8152,16 +15086,16 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5429:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5553:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:5429:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5553:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V17*/ meltfptr[16] = /*_.RETURN___V25*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-genobj.melt:5421:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5545:/ clear");
/*clear *//*_.STRBUF2STRING__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.GOINS__V19*/ meltfptr[18] = 0;
@@ -8171,7 +15105,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V25*/ meltfptr[21] = 0;
/*_.LET___V13*/ meltfptr[9] = /*_.LET___V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-genobj.melt:5414:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5538:/ clear");
/*clear *//*_.MATCHMAP__V14*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.PREFIX__V15*/ meltfptr[14] = 0;
@@ -8179,11 +15113,11 @@ lab_endgetargs:;
/*clear *//*_.LABUF__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.LET___V17*/ meltfptr[16] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -8208,14 +15142,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR */
+} /*end meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8236,7 +15170,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR_st
+ struct frame_meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8275,7 +15209,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ getarg");
/*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8315,7 +15249,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8338,7 +15272,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8348,7 +15282,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8358,7 +15292,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5434;
+ argtab[2].meltbp_long = 5558;
/*^apply.arg */
argtab[3].meltbp_cstring = "testmatch_gotoinstr ntest=";
/*^apply.arg */
@@ -8377,7 +15311,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -8390,7 +15324,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -8399,7 +15333,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5434:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5558:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -8414,7 +15348,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5435:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5559:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8423,7 +15357,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5435:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5559:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8431,7 +15365,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5435:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5559:/ cond.else");
/*^block */
/*anyblock */
@@ -8445,7 +15379,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntest"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5435) ? (5435) : __LINE__, __FUNCTION__);
+ (5559) ? (5559) : __LINE__, __FUNCTION__);
;
}
;
@@ -8460,7 +15394,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5435:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5559:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -8473,7 +15407,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5436:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5560:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8482,7 +15416,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NMA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5436:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5560:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8490,7 +15424,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5436:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5560:/ cond.else");
/*^block */
/*anyblock */
@@ -8504,7 +15438,7 @@ lab_endgetargs:;
melt_assert_failed (("check nma"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5436) ? (5436) : __LINE__, __FUNCTION__);
+ (5560) ? (5560) : __LINE__, __FUNCTION__);
;
}
;
@@ -8519,7 +15453,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5436:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5560:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -8532,7 +15466,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5437:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5561:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8541,7 +15475,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5437:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5561:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8549,7 +15483,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5437:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5561:/ cond.else");
/*^block */
/*anyblock */
@@ -8563,7 +15497,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5437) ? (5437) : __LINE__, __FUNCTION__);
+ (5561) ? (5561) : __LINE__, __FUNCTION__);
;
}
;
@@ -8578,7 +15512,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5437:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5561:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
@@ -8591,7 +15525,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5438:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5562:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -8600,10 +15534,10 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5439:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5563:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5440:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5564:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]), 8, "GNCX_MATCHMAP");
@@ -8623,7 +15557,7 @@ lab_endgetargs:;
(char *) 0);;
{
- MELT_LOCATION ("warmelt-genobj.melt:5444:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5568:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]),
melt_string_str ((melt_ptr_t)
( /*_.PREFIX__V18*/ meltfptr[17])));
@@ -8633,19 +15567,19 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-genobj.melt:5445:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5569:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]),
( /*_#GET_INT__L6*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5446:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5570:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]),
(" /*testmatch*/"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5447:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5571:/ quasiblock");
/*_.STRBUF2STRING__V21*/ meltfptr[20] =
@@ -8653,7 +15587,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])),
melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5448:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5572:/ quasiblock");
/*^rawallocobj */
@@ -8699,7 +15633,7 @@ lab_endgetargs:;
/*_.GOINS__V22*/ meltfptr[21] = /*_.INST__V23*/ meltfptr[22];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8722,7 +15656,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8732,7 +15666,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8742,7 +15676,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5454;
+ argtab[2].meltbp_long = 5578;
/*^apply.arg */
argtab[3].meltbp_cstring = "testmatch_gotoinstr goins=";
/*^apply.arg */
@@ -8762,7 +15696,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -8775,7 +15709,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -8784,7 +15718,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5454:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5578:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
@@ -8797,16 +15731,16 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5455:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5579:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-genobj.melt:5455:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5579:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V20*/ meltfptr[19] = /*_.RETURN___V28*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:5447:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5571:/ clear");
/*clear *//*_.STRBUF2STRING__V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.GOINS__V22*/ meltfptr[21] = 0;
@@ -8816,7 +15750,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V28*/ meltfptr[24] = 0;
/*_.LET___V16*/ meltfptr[14] = /*_.LET___V20*/ meltfptr[19];;
- MELT_LOCATION ("warmelt-genobj.melt:5439:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5563:/ clear");
/*clear *//*_.MATCHMAP__V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.PREFIX__V18*/ meltfptr[17] = 0;
@@ -8826,11 +15760,11 @@ lab_endgetargs:;
/*clear *//*_#GET_INT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.LET___V20*/ meltfptr[19] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -8857,14 +15791,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR */
+} /*end meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -8889,7 +15823,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST_st
+ struct frame_meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8928,7 +15862,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ getarg");
/*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8958,7 +15892,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8981,7 +15915,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8991,7 +15925,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9001,7 +15935,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5460;
+ argtab[2].meltbp_long = 5584;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtester_free_objloc_list nt=";
/*^apply.arg */
@@ -9020,7 +15954,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -9033,7 +15967,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -9042,7 +15976,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5460:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5584:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -9057,7 +15991,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5461:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5585:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9066,7 +16000,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5461:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5585:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9074,7 +16008,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5461:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5585:/ cond.else");
/*^block */
/*anyblock */
@@ -9088,7 +16022,7 @@ lab_endgetargs:;
melt_assert_failed (("check nt"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5461) ? (5461) : __LINE__, __FUNCTION__);
+ (5585) ? (5585) : __LINE__, __FUNCTION__);
;
}
;
@@ -9103,7 +16037,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5461:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5585:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -9116,7 +16050,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5462:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5586:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9125,7 +16059,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5462:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5586:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9133,7 +16067,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5462:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5586:/ cond.else");
/*^block */
/*anyblock */
@@ -9147,7 +16081,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5462) ? (5462) : __LINE__, __FUNCTION__);
+ (5586) ? (5586) : __LINE__, __FUNCTION__);
;
}
;
@@ -9162,7 +16096,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5462:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5586:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -9175,7 +16109,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5463:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5587:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9184,7 +16118,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5463:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5587:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9192,7 +16126,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5463:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5587:/ cond.else");
/*^block */
/*anyblock */
@@ -9206,7 +16140,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5463) ? (5463) : __LINE__, __FUNCTION__);
+ (5587) ? (5587) : __LINE__, __FUNCTION__);
;
}
;
@@ -9221,7 +16155,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5463:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5587:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -9232,10 +16166,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5464:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5588:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5465:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5589:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST");
@@ -9243,7 +16177,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5466:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5590:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP");
@@ -9253,7 +16187,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9276,7 +16210,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9286,7 +16220,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9296,7 +16230,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5468;
+ argtab[2].meltbp_long = 5592;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtester_free_objloc_list nloclist=";
@@ -9317,7 +16251,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
@@ -9330,7 +16264,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ quasiblock");
/*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
@@ -9339,7 +16273,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5468:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5592:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V19*/ meltfptr[18] = 0;
@@ -9354,7 +16288,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5469:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5593:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -9363,10 +16297,10 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5470:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5594:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ quasiblock");
/*^newclosure */
@@ -9403,7 +16337,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.LOCMAP__V17*/ meltfptr[16]);
;
/*_.LAMBDA___V23*/ meltfptr[19] = /*_.LAMBDA___V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:5471:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5595:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9419,8 +16353,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5484:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5608:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TCX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9438,7 +16377,7 @@ lab_endgetargs:;
/*_.TCX_FREELIST__V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5484:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5608:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9456,7 +16395,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9479,7 +16418,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9489,7 +16428,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9499,7 +16438,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5485;
+ argtab[2].meltbp_long = 5609;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtester_free_objloc_list result freelist=";
@@ -9520,7 +16459,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0;
@@ -9533,7 +16472,7 @@ lab_endgetargs:;
/*_.IF___V29*/ meltfptr[28] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[28];;
@@ -9542,7 +16481,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[27] = /*_.PROGN___V31*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5485:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5609:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V29*/ meltfptr[28] = 0;
@@ -9555,16 +16494,16 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[27] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5486:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5610:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.FREELIST__V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-genobj.melt:5486:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5610:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V22*/ meltfptr[18] = /*_.RETURN___V32*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:5470:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5594:/ clear");
/*clear *//*_.LAMBDA___V23*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.FREELIST__V25*/ meltfptr[24] = 0;
@@ -9578,7 +16517,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V32*/ meltfptr[28] = 0;
/*_.LET___V15*/ meltfptr[13] = /*_.LET___V22*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-genobj.melt:5464:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5588:/ clear");
/*clear *//*_.NLOCLIST__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.LOCMAP__V17*/ meltfptr[16] = 0;
@@ -9586,11 +16525,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.LET___V22*/ meltfptr[18] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9617,14 +16556,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST */
+} /*end meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9643,7 +16582,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_164_warmelt_genobj_LAMBDA___52___st
+ struct frame_meltrout_168_warmelt_genobj_LAMBDA___52___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9682,7 +16621,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ getarg");
/*_.NLOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -9694,7 +16633,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5474:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5598:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9703,7 +16642,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NLOC__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:5474:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5598:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9711,7 +16650,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5474:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5598:/ cond.else");
/*^block */
/*anyblock */
@@ -9725,7 +16664,7 @@ lab_endgetargs:;
melt_assert_failed (("check nloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5474) ? (5474) : __LINE__, __FUNCTION__);
+ (5598) ? (5598) : __LINE__, __FUNCTION__);
;
}
;
@@ -9740,7 +16679,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5474:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5598:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0;
@@ -9751,11 +16690,16 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5475:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5599:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5477:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5601:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9773,8 +16717,13 @@ lab_endgetargs:;
/*_.NOCC_SYMB__V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5478:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5602:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9792,7 +16741,7 @@ lab_endgetargs:;
/*_.NOCC_CTYP__V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5476:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5600:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9811,8 +16760,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5480:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5604:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9832,7 +16786,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5480:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5604:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~LOCMAP */ meltfclos->tabval[1])),
(meltobject_ptr_t) ( /*_.NOCC_BIND__V9*/
@@ -9842,7 +16796,7 @@ lab_endgetargs:;
;
/*_.LET___V5*/ meltfptr[3] = /*_.OBLO__V8*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-genobj.melt:5475:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5599:/ clear");
/*clear *//*_.NOCC_SYMB__V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.NOCC_CTYP__V7*/ meltfptr[6] = 0;
@@ -9850,11 +16804,11 @@ lab_endgetargs:;
/*clear *//*_.OBLO__V8*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_.NOCC_BIND__V9*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9875,14 +16829,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_164_warmelt_genobj_LAMBDA___52__ */
+} /*end meltrout_168_warmelt_genobj_LAMBDA___52__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -9907,7 +16861,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY_st
+ struct frame_meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9946,7 +16900,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ getarg");
/*_.NTA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9976,7 +16930,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9999,7 +16953,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10013,7 +16967,7 @@ lab_endgetargs:;
/*_.DISCRIM__V7*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.NTA__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -10023,7 +16977,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5492;
+ argtab[2].meltbp_long = 5616;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_any nta=";
/*^apply.arg */
@@ -10060,7 +17014,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.DISCRIM__V7*/ meltfptr[6] = 0;
@@ -10075,7 +17029,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -10084,7 +17038,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5492:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5616:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -10097,8 +17051,14 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5495:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5619:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10120,8 +17080,14 @@ lab_endgetargs:;
/*_.DISCRIM__V11*/ meltfptr[5] =
(melt_discr ((melt_ptr_t) ( /*_.NTA__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5497:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V11*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5621:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V11*/ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10141,7 +17107,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5495:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5619:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.NREP_LOC__V10*/ meltfptr[7]),
("**UNIMPLEMENTED normal tester compilation "),
(melt_ptr_t) ( /*_.NAMED_NAME__V12*/ meltfptr[6]));
@@ -10149,7 +17115,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5498:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5622:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10162,7 +17128,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5498:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5622:/ cond.else");
/*^block */
/*anyblock */
@@ -10173,7 +17139,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("@$@UNIMPLEMENTED normal tester compilation"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5498) ? (5498) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("@$@UNIMPLEMENTED normal tester compilation"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5622) ? (5622) : __LINE__, __FUNCTION__);
;
}
;
@@ -10188,7 +17154,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5498:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5622:/ clear");
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
}
@@ -10197,11 +17163,11 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V13*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -10228,14 +17194,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY */
+} /*end meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -10260,7 +17226,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER_st
+ struct frame_meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -10299,7 +17265,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ getarg");
/*_.NTMA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10329,7 +17295,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10352,7 +17318,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10362,7 +17328,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10372,7 +17338,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5504;
+ argtab[2].meltbp_long = 5628;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_matcher ntma=";
/*^apply.arg */
@@ -10391,7 +17357,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -10404,7 +17370,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -10413,7 +17379,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5504:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5628:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -10428,7 +17394,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5505:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5629:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10437,7 +17403,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5505:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5629:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10445,7 +17411,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5505:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5629:/ cond.else");
/*^block */
/*anyblock */
@@ -10459,7 +17425,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntma"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5505) ? (5505) : __LINE__, __FUNCTION__);
+ (5629) ? (5629) : __LINE__, __FUNCTION__);
;
}
;
@@ -10474,7 +17440,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5505:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5629:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -10487,7 +17453,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5506:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5630:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10496,7 +17462,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5506:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5630:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10504,7 +17470,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5506:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5630:/ cond.else");
/*^block */
/*anyblock */
@@ -10518,7 +17484,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5506) ? (5506) : __LINE__, __FUNCTION__);
+ (5630) ? (5630) : __LINE__, __FUNCTION__);
;
}
;
@@ -10533,7 +17499,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5506:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5630:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -10546,7 +17512,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5507:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5631:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10555,7 +17521,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5507:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5631:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10563,7 +17529,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5507:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5631:/ cond.else");
/*^block */
/*anyblock */
@@ -10577,7 +17543,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5507) ? (5507) : __LINE__, __FUNCTION__);
+ (5631) ? (5631) : __LINE__, __FUNCTION__);
;
}
;
@@ -10592,7 +17558,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5507:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5631:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -10603,10 +17569,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5508:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5632:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5509:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5633:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -10614,7 +17580,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5510:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5634:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -10622,7 +17588,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5511:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5635:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -10630,7 +17596,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5512:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5636:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -10638,7 +17604,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5513:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5637:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 7, "NTMATCH_MATCHER");
@@ -10646,7 +17612,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5514:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5638:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 9, "NTMATCH_INARGS");
@@ -10654,7 +17620,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5515:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5639:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 10, "NTMATCH_OUTLOCS");
@@ -10662,7 +17628,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5516:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5640:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -10670,7 +17636,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5517:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5641:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -10685,7 +17651,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5518:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5642:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -10703,7 +17669,7 @@ lab_endgetargs:;
/*_.OLIST__V26*/ meltfptr[25] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5520:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5644:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP");
@@ -10716,7 +17682,7 @@ lab_endgetargs:;
( /*_.MATCHMAP__V27*/ meltfptr[26]),
(meltobject_ptr_t) ( /*_.NORMATCH__V23*/
meltfptr[22]));;
- MELT_LOCATION ("warmelt-genobj.melt:5522:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5646:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -10733,8 +17699,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5523:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5647:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TCX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10754,7 +17725,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10777,7 +17748,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10787,7 +17758,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -10797,7 +17768,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5525;
+ argtab[2].meltbp_long = 5649;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher matchmap=";
@@ -10830,7 +17801,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -10843,7 +17814,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -10852,7 +17823,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5525:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5649:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -10869,7 +17840,7 @@ lab_endgetargs:;
/*_#NULL__L8*/ meltfnum[1] =
(( /*_.GOTOTHEN__V24*/ meltfptr[23]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5527:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5651:/ cond");
/*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10879,7 +17850,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:5528:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5652:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -10888,7 +17859,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5530:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5654:/ cond");
/*cond */ if ( /*_.NEXTEST__V30*/ meltfptr[29]) /*then */
{
/*^cond.then */
@@ -10896,7 +17867,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5531:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5655:/ apply");
/*apply */
{
union meltparam_un argtab[3];
@@ -10925,7 +17896,7 @@ lab_endgetargs:;
/*_.TESTMATCH_GOTOINSTR__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5530:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5654:/ clear");
/*clear *//*_.TESTMATCH_GOTOINSTR__V37*/ meltfptr[36] = 0;
}
;
@@ -10937,7 +17908,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5532:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5656:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -10962,18 +17933,18 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5530:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5654:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V38*/ meltfptr[36] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5529:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:5653:/ compute");
/*_.GOTOTHEN__V24*/ meltfptr[23] = /*_.SETQ___V39*/ meltfptr[36] =
/*_.IFELSE___V36*/ meltfptr[32];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10996,7 +17967,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11006,7 +17977,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11017,7 +17988,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5533;
+ argtab[2].meltbp_long = 5657;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher fixed gotothen=";
@@ -11039,7 +18010,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0;
@@ -11052,7 +18023,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];;
@@ -11061,7 +18032,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5533:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5657:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -11074,7 +18045,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5527:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5651:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[40] = /*_.IFCPP___V40*/ meltfptr[39];;
@@ -11083,7 +18054,7 @@ lab_endgetargs:;
/*_.IFELSE___V35*/ meltfptr[31] = /*_.PROGN___V44*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5527:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5651:/ clear");
/*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.SETQ___V39*/ meltfptr[36] = 0;
@@ -11102,7 +18073,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11125,7 +18096,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -11135,7 +18106,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11146,7 +18117,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5535;
+ argtab[2].meltbp_long = 5659;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher unfixed gotoelse=";
@@ -11167,7 +18138,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V47*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[36] = 0;
@@ -11180,7 +18151,7 @@ lab_endgetargs:;
/*_.IF___V46*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[39] = /*_.IF___V46*/ meltfptr[32];;
@@ -11189,7 +18160,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[41] = /*_.PROGN___V48*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5535:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5659:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V46*/ meltfptr[32] = 0;
@@ -11206,7 +18177,7 @@ lab_endgetargs:;
/*_#NULL__L13*/ meltfnum[0] =
(( /*_.GOTOELSE__V25*/ meltfptr[24]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5536:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5660:/ cond");
/*cond */ if ( /*_#NULL__L13*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11216,7 +18187,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:5537:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5661:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -11225,7 +18196,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5539:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5663:/ cond");
/*cond */ if ( /*_.NEXTEST__V30*/ meltfptr[29]) /*then */
{
/*^cond.then */
@@ -11233,7 +18204,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5540:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5664:/ apply");
/*apply */
{
union meltparam_un argtab[3];
@@ -11262,7 +18233,7 @@ lab_endgetargs:;
/*_.TESTMATCH_GOTOINSTR__V51*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5539:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5663:/ clear");
/*clear *//*_.TESTMATCH_GOTOINSTR__V51*/ meltfptr[32] = 0;
}
;
@@ -11274,7 +18245,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5541:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5665:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -11299,18 +18270,18 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V52*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5539:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5663:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V52*/ meltfptr[39] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5538:/ compute");
+ MELT_LOCATION ("warmelt-genobj.melt:5662:/ compute");
/*_.GOTOELSE__V25*/ meltfptr[24] = /*_.SETQ___V53*/ meltfptr[32] =
/*_.IFELSE___V50*/ meltfptr[36];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11333,7 +18304,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -11343,7 +18314,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11354,7 +18325,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5542;
+ argtab[2].meltbp_long = 5666;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher fixed gotoelse=";
@@ -11376,7 +18347,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V56*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V56*/ meltfptr[55] = 0;
@@ -11389,7 +18360,7 @@ lab_endgetargs:;
/*_.IF___V55*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ quasiblock");
/*_.PROGN___V57*/ meltfptr[55] = /*_.IF___V55*/ meltfptr[54];;
@@ -11398,7 +18369,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[39] = /*_.PROGN___V57*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5542:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V55*/ meltfptr[54] = 0;
@@ -11411,7 +18382,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[39] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5536:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5660:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[54] = /*_.IFCPP___V54*/ meltfptr[39];;
@@ -11420,7 +18391,7 @@ lab_endgetargs:;
/*_.IFELSE___V49*/ meltfptr[40] = /*_.PROGN___V58*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5660:/ clear");
/*clear *//*_.IFELSE___V50*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.SETQ___V53*/ meltfptr[32] = 0;
@@ -11439,7 +18410,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11462,7 +18433,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -11472,7 +18443,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -11483,7 +18454,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5544;
+ argtab[2].meltbp_long = 5668;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher freelist=";
@@ -11510,7 +18481,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[32] = 0;
@@ -11523,7 +18494,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[39] = /*_.IF___V60*/ meltfptr[36];;
@@ -11532,7 +18503,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[55] = /*_.PROGN___V62*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5544:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5668:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[36] = 0;
@@ -11547,7 +18518,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5545:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5669:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11555,7 +18526,7 @@ lab_endgetargs:;
/*_#IS_STRING__L18*/ meltfnum[9] =
(melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V28*/ meltfptr[27])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:5545:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5669:/ cond");
/*cond */ if ( /*_#IS_STRING__L18*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -11563,7 +18534,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5545:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5669:/ cond.else");
/*^block */
/*anyblock */
@@ -11577,7 +18548,7 @@ lab_endgetargs:;
melt_assert_failed (("check prefix"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5545) ? (5545) : __LINE__, __FUNCTION__);
+ (5669) ? (5669) : __LINE__, __FUNCTION__);
;
}
;
@@ -11592,7 +18563,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[54] = /*_.IFELSE___V64*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5545:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5669:/ clear");
/*clear *//*_#IS_STRING__L18*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V64*/ meltfptr[32] = 0;
@@ -11619,7 +18590,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5550:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5674:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11629,7 +18600,7 @@ lab_endgetargs:;
( /*_.OBLOC__V66*/ meltfptr[39]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */
meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-genobj.melt:5550:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5674:/ cond");
/*cond */ if ( /*_#IS_A__L19*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -11637,7 +18608,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5550:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5674:/ cond.else");
/*^block */
/*anyblock */
@@ -11651,7 +18622,7 @@ lab_endgetargs:;
melt_assert_failed (("check obloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5550) ? (5550) : __LINE__,
+ (5674) ? (5674) : __LINE__,
__FUNCTION__);
;
}
@@ -11667,7 +18638,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[32] = /*_.IFELSE___V68*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5550:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5674:/ clear");
/*clear *//*_#IS_A__L19*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IFELSE___V68*/ meltfptr[67] = 0;
@@ -11678,7 +18649,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5551:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5675:/ quasiblock");
/*^quasiblock */
@@ -11718,20 +18689,20 @@ lab_endgetargs:;
/*_.OCLEAROB__V69*/ meltfptr[67] = /*_.INST__V70*/ meltfptr[69];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5555:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5679:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V26*/ meltfptr[25]),
(melt_ptr_t) ( /*_.OCLEAROB__V69*/
meltfptr[67]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5551:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5675:/ clear");
/*clear *//*_.OCLEAROB__V69*/ meltfptr[67] = 0;
} /* end cit1__EACHLIST */
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5547:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5671:/ clear");
/*clear *//*_.LOCPAIR__V65*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.OBLOC__V66*/ meltfptr[39] = 0;
@@ -11741,7 +18712,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11764,7 +18735,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -11774,7 +18745,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11785,7 +18756,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5557;
+ argtab[2].meltbp_long = 5681;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher before nmatcher=";
@@ -11806,7 +18777,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0;
@@ -11819,7 +18790,7 @@ lab_endgetargs:;
/*_.IF___V72*/ meltfptr[71] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[71];;
@@ -11828,7 +18799,7 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[67] = /*_.PROGN___V74*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5557:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5681:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V72*/ meltfptr[71] = 0;
@@ -11841,14 +18812,14 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[67] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5558:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5682:/ quasiblock");
/*_.MAKE_INTEGERBOX__V76*/ meltfptr[72] =
(meltgc_new_int
((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[12])),
(0)));;
- MELT_LOCATION ("warmelt-genobj.melt:5558:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5682:/ quasiblock");
/*^rawallocobj */
@@ -11932,7 +18903,7 @@ lab_endgetargs:;
/*_.MATCX__V77*/ meltfptr[76] = /*_.INST__V78*/ meltfptr[77];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11955,7 +18926,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -11965,7 +18936,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11976,7 +18947,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5567;
+ argtab[2].meltbp_long = 5691;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher matcx=";
@@ -11997,7 +18968,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V81*/ meltfptr[80] = 0;
@@ -12010,7 +18981,7 @@ lab_endgetargs:;
/*_.IF___V80*/ meltfptr[79] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[80] = /*_.IF___V80*/ meltfptr[79];;
@@ -12019,7 +18990,7 @@ lab_endgetargs:;
/*_.IFCPP___V79*/ meltfptr[78] = /*_.PROGN___V82*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5567:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5691:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V80*/ meltfptr[79] = 0;
@@ -12032,7 +19003,7 @@ lab_endgetargs:;
/*_.IFCPP___V79*/ meltfptr[78] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5568:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5692:/ msend");
/*msend */
{
union meltparam_un argtab[2];
@@ -12051,7 +19022,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12074,7 +19045,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -12084,7 +19055,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12095,7 +19066,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5569;
+ argtab[2].meltbp_long = 5693;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_matcher return olist=";
@@ -12116,7 +19087,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0;
@@ -12129,7 +19100,7 @@ lab_endgetargs:;
/*_.IF___V85*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];;
@@ -12138,7 +19109,7 @@ lab_endgetargs:;
/*_.IFCPP___V84*/ meltfptr[80] = /*_.PROGN___V87*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5569:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5693:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V85*/ meltfptr[84] = 0;
@@ -12151,16 +19122,16 @@ lab_endgetargs:;
/*_.IFCPP___V84*/ meltfptr[80] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5570:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5694:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V26*/ meltfptr[25];;
- MELT_LOCATION ("warmelt-genobj.melt:5570:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5694:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V75*/ meltfptr[71] = /*_.RETURN___V88*/ meltfptr[84];;
- MELT_LOCATION ("warmelt-genobj.melt:5558:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5682:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V76*/ meltfptr[72] = 0;
/*^clear */
/*clear *//*_.MATCX__V77*/ meltfptr[76] = 0;
@@ -12174,7 +19145,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V88*/ meltfptr[84] = 0;
/*_.LET___V15*/ meltfptr[13] = /*_.LET___V75*/ meltfptr[71];;
- MELT_LOCATION ("warmelt-genobj.melt:5508:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5632:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -12224,11 +19195,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V71*/ meltfptr[67] = 0;
/*^clear */
/*clear *//*_.LET___V75*/ meltfptr[71] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12255,14 +19226,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER */
+} /*end meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -12287,7 +19258,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE_st
+ struct frame_meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12326,7 +19297,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ getarg");
/*_.NTMI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12356,7 +19327,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12379,7 +19350,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12389,7 +19360,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12399,7 +19370,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5577;
+ argtab[2].meltbp_long = 5701;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance ntmi=";
@@ -12419,7 +19390,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -12432,7 +19403,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -12441,7 +19412,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5577:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5701:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -12456,7 +19427,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5578:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5702:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12465,7 +19436,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5578:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5702:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12473,7 +19444,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5578:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5702:/ cond.else");
/*^block */
/*anyblock */
@@ -12487,7 +19458,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntmi"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5578) ? (5578) : __LINE__, __FUNCTION__);
+ (5702) ? (5702) : __LINE__, __FUNCTION__);
;
}
;
@@ -12502,7 +19473,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5578:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5702:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -12515,7 +19486,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5579:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5703:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12524,7 +19495,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5579:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5703:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12532,7 +19503,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5579:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5703:/ cond.else");
/*^block */
/*anyblock */
@@ -12546,7 +19517,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5579) ? (5579) : __LINE__, __FUNCTION__);
+ (5703) ? (5703) : __LINE__, __FUNCTION__);
;
}
;
@@ -12561,7 +19532,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5579:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5703:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -12574,7 +19545,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5580:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5704:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12583,7 +19554,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5580:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5704:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12591,7 +19562,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5580:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5704:/ cond.else");
/*^block */
/*anyblock */
@@ -12605,7 +19576,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5580) ? (5580) : __LINE__, __FUNCTION__);
+ (5704) ? (5704) : __LINE__, __FUNCTION__);
;
}
;
@@ -12620,7 +19591,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5580:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5704:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -12631,10 +19602,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5581:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5705:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5582:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5706:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -12642,7 +19613,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5583:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5707:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -12650,7 +19621,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5584:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5708:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -12658,7 +19629,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5585:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5709:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -12666,7 +19637,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5586:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5710:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -12674,7 +19645,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5587:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5711:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST");
@@ -12689,7 +19660,7 @@ lab_endgetargs:;
/*_#NTESTIX__L6*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5590:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5714:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 7, "NTINST_CLASS");
@@ -12697,7 +19668,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5591:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5715:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 8, "NTINST_FIELDLOCS");
@@ -12705,7 +19676,7 @@ lab_endgetargs:;
meltfptr[23] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5592:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5716:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12729,13 +19700,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5592:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5716:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5593:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5717:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12758,13 +19729,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5592:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5716:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5594:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5718:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12788,13 +19759,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5594:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5718:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5595:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5719:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12817,13 +19788,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5594:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5718:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5596:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5720:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -12837,7 +19808,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5597:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5721:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -12851,7 +19822,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5598:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5722:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -12876,7 +19847,7 @@ lab_endgetargs:;
/*_.OELSELIST__V35*/ meltfptr[34] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5601:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5725:/ quasiblock");
/*^rawallocobj */
@@ -12910,7 +19881,7 @@ lab_endgetargs:;
( /*_.OTHENLIST__V34*/ meltfptr[33]), "OBLO_BODYL");
;
/*_.OTHENBLOCK__V36*/ meltfptr[35] = /*_.INST__V37*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-genobj.melt:5605:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5729:/ quasiblock");
/*^rawallocobj */
@@ -12944,7 +19915,7 @@ lab_endgetargs:;
( /*_.OELSELIST__V35*/ meltfptr[34]), "OBLO_BODYL");
;
/*_.OELSEBLOCK__V38*/ meltfptr[37] = /*_.INST__V39*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-genobj.melt:5609:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5733:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -12973,7 +19944,7 @@ lab_endgetargs:;
""), argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5613:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5737:/ quasiblock");
/*^rawallocobj */
@@ -13029,7 +20000,7 @@ lab_endgetargs:;
/*_.OCOND__V41*/ meltfptr[40] = /*_.INST__V42*/ meltfptr[41];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13052,7 +20023,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13062,7 +20033,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -13072,7 +20043,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5619;
+ argtab[2].meltbp_long = 5743;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance otest=";
@@ -13111,7 +20082,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
@@ -13124,7 +20095,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];;
@@ -13133,7 +20104,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5619:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5743:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[43] = 0;
@@ -13148,7 +20119,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5622:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5746:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13156,7 +20127,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L9*/ meltfnum[7] =
(melt_magic_discr ((melt_ptr_t) ( /*_.OCLASS__V31*/ meltfptr[29])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5622:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5746:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -13164,7 +20135,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5622:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5746:/ cond.else");
/*^block */
/*anyblock */
@@ -13178,7 +20149,7 @@ lab_endgetargs:;
melt_assert_failed (("check oclass"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5622) ? (5622) : __LINE__, __FUNCTION__);
+ (5746) ? (5746) : __LINE__, __FUNCTION__);
;
}
;
@@ -13193,7 +20164,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = /*_.IFELSE___V48*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5622:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5746:/ clear");
/*clear *//*_#IS_OBJECT__L9*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
@@ -13220,7 +20191,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13243,7 +20214,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13253,7 +20224,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13264,7 +20235,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5627;
+ argtab[2].meltbp_long = 5751;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance obloc=";
@@ -13286,7 +20257,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
@@ -13299,7 +20270,7 @@ lab_endgetargs:;
/*_.IF___V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
@@ -13308,7 +20279,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5627:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5751:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V52*/ meltfptr[51] = 0;
@@ -13323,7 +20294,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5628:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5752:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13333,7 +20304,7 @@ lab_endgetargs:;
( /*_.OBLOC__V50*/ meltfptr[49]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:5628:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5752:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -13341,7 +20312,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5628:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5752:/ cond.else");
/*^block */
/*anyblock */
@@ -13355,7 +20326,7 @@ lab_endgetargs:;
melt_assert_failed (("check obloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5628) ? (5628) : __LINE__,
+ (5752) ? (5752) : __LINE__,
__FUNCTION__);
;
}
@@ -13371,7 +20342,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = /*_.IFELSE___V56*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5628:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5752:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V56*/ meltfptr[52] = 0;
@@ -13382,7 +20353,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5629:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5753:/ quasiblock");
/*^quasiblock */
@@ -13422,20 +20393,20 @@ lab_endgetargs:;
/*_.OCLEAROB__V57*/ meltfptr[52] = /*_.INST__V58*/ meltfptr[57];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5633:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5757:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.OCLEAROB__V57*/
meltfptr[52]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5629:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5753:/ clear");
/*clear *//*_.OCLEAROB__V57*/ meltfptr[52] = 0;
} /* end cit1__EACHLIST */
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5624:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5748:/ clear");
/*clear *//*_.LOCPAIR__V49*/ meltfptr[44] = 0;
/*^clear */
/*clear *//*_.OBLOC__V50*/ meltfptr[49] = 0;
@@ -13447,14 +20418,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5636:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5760:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.OCOND__V41*/ meltfptr[40]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13477,7 +20448,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13487,7 +20458,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -13498,7 +20469,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5639;
+ argtab[2].meltbp_long = 5763;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance ntflds=";
@@ -13525,7 +20496,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[60] = 0;
@@ -13538,7 +20509,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] = /*_.IF___V60*/ meltfptr[59];;
@@ -13547,7 +20518,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[52] = /*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5639:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5763:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[59] = 0;
@@ -13576,7 +20547,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-genobj.melt:5643:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5767:/ cond");
/*cond */ if ( /*_.FLDOC__V63*/ meltfptr[59]) /*then */
{
/*^cond.then */
@@ -13586,7 +20557,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13609,7 +20580,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13619,7 +20590,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -13630,7 +20601,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5645;
+ argtab[2].meltbp_long = 5769;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance fldoc=";
@@ -13658,7 +20629,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V66*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
0;
/*^clear */
@@ -13672,7 +20643,7 @@ lab_endgetargs:;
/*_.IF___V65*/ meltfptr[64] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[65] =
@@ -13683,7 +20654,7 @@ lab_endgetargs:;
/*_.PROGN___V67*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5645:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5769:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[64] = 0;
@@ -13698,7 +20669,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5646:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5770:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13707,7 +20678,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.FLDOC__V63*/ meltfptr[59]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-genobj.melt:5646:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5770:/ cond");
/*cond */ if ( /*_#IS_A__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -13715,7 +20686,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5646:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5770:/ cond.else");
/*^block */
/*anyblock */
@@ -13730,7 +20701,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5646) ? (5646) : __LINE__,
+ (5770) ? (5770) : __LINE__,
__FUNCTION__);
;
}
@@ -13747,7 +20718,7 @@ lab_endgetargs:;
/*_.IFELSE___V69*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5646:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5770:/ clear");
/*clear *//*_#IS_A__L18*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V69*/ meltfptr[65] = 0;
@@ -13758,7 +20729,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5647:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5771:/ quasiblock");
/*^msend */
@@ -13778,7 +20749,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5648:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5772:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLDOC__V63*/ meltfptr[59]), 3, "NOCC_BIND");
@@ -13786,7 +20757,7 @@ lab_endgetargs:;
meltfptr[70] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5649:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5773:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLBIND__V71*/ meltfptr[70]), 2, "LETBIND_EXPR");
@@ -13794,7 +20765,7 @@ lab_endgetargs:;
meltfptr[71] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5650:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5774:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -13813,7 +20784,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5652:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5776:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13822,7 +20793,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.FLBIND__V71*/ meltfptr[70]),
(melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[16])));;
- MELT_LOCATION ("warmelt-genobj.melt:5652:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5776:/ cond");
/*cond */ if ( /*_#IS_A__L19*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13830,7 +20801,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5652:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5776:/ cond.else");
/*^block */
/*anyblock */
@@ -13845,7 +20816,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5652) ? (5652) : __LINE__,
+ (5776) ? (5776) : __LINE__,
__FUNCTION__);
;
}
@@ -13862,7 +20833,7 @@ lab_endgetargs:;
/*_.IFELSE___V75*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5652:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5776:/ clear");
/*clear *//*_#IS_A__L19*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V75*/ meltfptr[74] = 0;
@@ -13875,7 +20846,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5653:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5777:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13884,7 +20855,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.FLDGET__V72*/ meltfptr[71]),
(melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_GET_FIELD */ meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-genobj.melt:5653:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond");
/*cond */ if ( /*_#IS_A__L20*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -13892,7 +20863,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5653:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond.else");
/*^block */
/*anyblock */
@@ -13907,7 +20878,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5653) ? (5653) : __LINE__,
+ (5777) ? (5777) : __LINE__,
__FUNCTION__);
;
}
@@ -13924,7 +20895,7 @@ lab_endgetargs:;
/*_.IFELSE___V77*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5653:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5777:/ clear");
/*clear *//*_#IS_A__L20*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
@@ -13935,7 +20906,7 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[74] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5654:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5778:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -13954,7 +20925,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13977,7 +20948,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13987,7 +20958,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13998,7 +20969,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5655;
+ argtab[2].meltbp_long = 5779;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance ofget=";
@@ -14020,7 +20991,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[16] =
0;
/*^clear */
@@ -14034,7 +21005,7 @@ lab_endgetargs:;
/*_.IF___V80*/ meltfptr[79] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[80] =
@@ -14045,7 +21016,7 @@ lab_endgetargs:;
/*_.PROGN___V82*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5655:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5779:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V80*/ meltfptr[79] = 0;
@@ -14060,7 +21031,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5656:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5780:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14069,7 +21040,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.OFGET__V73*/ meltfptr[72])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5656:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5780:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L23*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -14077,7 +21048,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5656:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5780:/ cond.else");
/*^block */
/*anyblock */
@@ -14092,7 +21063,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5656) ? (5656) : __LINE__,
+ (5780) ? (5780) : __LINE__,
__FUNCTION__);
;
}
@@ -14109,7 +21080,7 @@ lab_endgetargs:;
/*_.IFELSE___V84*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5656:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5780:/ clear");
/*clear *//*_#IS_OBJECT__L23*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V84*/ meltfptr[80] = 0;
@@ -14122,7 +21093,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5657:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5781:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OTHENLIST__V34*/ meltfptr[33]),
(melt_ptr_t) ( /*_.OFGET__V73*/
@@ -14130,7 +21101,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5647:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5771:/ clear");
/*clear *//*_.FLOVAR__V70*/ meltfptr[65] = 0;
/*^clear */
/*clear *//*_.FLBIND__V71*/ meltfptr[70] = 0;
@@ -14148,12 +21119,12 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V79*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.IFCPP___V83*/ meltfptr[79] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5644:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5768:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5643:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5767:/ clear");
/*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0;
/*^clear */
/*clear *//*_.IFCPP___V68*/ meltfptr[64] = 0;
@@ -14167,7 +21138,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5640:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5764:/ clear");
/*clear *//*_.FLDOC__V63*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_#FLDIX__L15*/ meltfnum[7] = 0;
@@ -14175,7 +21146,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5660:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5784:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14183,7 +21154,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L24*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5660:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5784:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L24*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14191,7 +21162,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5660:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5784:/ cond.else");
/*^block */
/*anyblock */
@@ -14205,7 +21176,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotothen"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5660) ? (5660) : __LINE__, __FUNCTION__);
+ (5784) ? (5784) : __LINE__, __FUNCTION__);
;
}
;
@@ -14220,7 +21191,7 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[80] = /*_.IFELSE___V86*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5660:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5784:/ clear");
/*clear *//*_#IS_OBJECT__L24*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V86*/ meltfptr[65] = 0;
@@ -14233,14 +21204,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5661:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5785:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V34*/ meltfptr[33]),
(melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5664:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5788:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14248,7 +21219,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L25*/ meltfnum[16] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5664:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5788:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L25*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -14256,7 +21227,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5664:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5788:/ cond.else");
/*^block */
/*anyblock */
@@ -14270,7 +21241,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotoelse"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5664) ? (5664) : __LINE__, __FUNCTION__);
+ (5788) ? (5788) : __LINE__, __FUNCTION__);
;
}
;
@@ -14285,7 +21256,7 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[70] = /*_.IFELSE___V88*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5664:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5788:/ clear");
/*clear *//*_#IS_OBJECT__L25*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V88*/ meltfptr[71] = 0;
@@ -14298,14 +21269,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5665:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5789:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V35*/ meltfptr[34]),
(melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14328,7 +21299,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14338,7 +21309,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14349,7 +21320,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5666;
+ argtab[2].meltbp_long = 5790;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_instance final olist=";
@@ -14370,7 +21341,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V91*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[74] = 0;
@@ -14383,7 +21354,7 @@ lab_endgetargs:;
/*_.IF___V90*/ meltfptr[73] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ quasiblock");
/*_.PROGN___V92*/ meltfptr[76] = /*_.IF___V90*/ meltfptr[73];;
@@ -14392,7 +21363,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[72] = /*_.PROGN___V92*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5790:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V90*/ meltfptr[73] = 0;
@@ -14405,16 +21376,16 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[72] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5667:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5791:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-genobj.melt:5667:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5791:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V93*/ meltfptr[78];;
- MELT_LOCATION ("warmelt-genobj.melt:5581:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5705:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -14474,11 +21445,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V89*/ meltfptr[72] = 0;
/*^clear */
/*clear *//*_.RETURN___V93*/ meltfptr[78] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14505,14 +21476,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE */
+} /*end meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -14537,7 +21508,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE_st
+ struct frame_meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14576,7 +21547,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ getarg");
/*_.NTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14606,7 +21577,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14629,7 +21600,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14643,7 +21614,7 @@ lab_endgetargs:;
/*_.DISCRIM__V7*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -14653,7 +21624,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5677;
+ argtab[2].meltbp_long = 5801;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_tuple ntup=";
/*^apply.arg */
@@ -14678,7 +21649,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.DISCRIM__V7*/ meltfptr[6] = 0;
@@ -14693,7 +21664,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -14702,7 +21673,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5677:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5801:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -14717,7 +21688,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5678:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5802:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14726,7 +21697,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5678:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5802:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14734,7 +21705,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5678:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5802:/ cond.else");
/*^block */
/*anyblock */
@@ -14748,7 +21719,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntup"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5678) ? (5678) : __LINE__, __FUNCTION__);
+ (5802) ? (5802) : __LINE__, __FUNCTION__);
;
}
;
@@ -14763,7 +21734,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[7] = /*_.IFELSE___V11*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5678:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5802:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[5] = 0;
@@ -14776,7 +21747,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5679:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5803:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14785,7 +21756,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5679:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5803:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14793,7 +21764,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5679:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5803:/ cond.else");
/*^block */
/*anyblock */
@@ -14807,7 +21778,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5679) ? (5679) : __LINE__, __FUNCTION__);
+ (5803) ? (5803) : __LINE__, __FUNCTION__);
;
}
;
@@ -14822,7 +21793,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[6] = /*_.IFELSE___V13*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5679:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5803:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[5] = 0;
@@ -14835,7 +21806,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5680:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5804:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14844,7 +21815,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5680:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5804:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14852,7 +21823,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5680:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5804:/ cond.else");
/*^block */
/*anyblock */
@@ -14866,7 +21837,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5680) ? (5680) : __LINE__, __FUNCTION__);
+ (5804) ? (5804) : __LINE__, __FUNCTION__);
;
}
;
@@ -14881,7 +21852,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[5] = /*_.IFELSE___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5680:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5804:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
@@ -14892,7 +21863,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5681:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5805:/ quasiblock");
/*^getslot */
@@ -14903,7 +21874,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5682:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5806:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -14911,7 +21882,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5683:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5807:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -14919,7 +21890,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5684:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5808:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -14927,7 +21898,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5685:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5809:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -14935,7 +21906,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5686:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5810:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST");
@@ -14943,7 +21914,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5687:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5811:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 7, "NTTUPLE_COMPONENTS");
@@ -14963,7 +21934,7 @@ lab_endgetargs:;
/*_#NTESTIX__L7*/ meltfnum[1] =
(melt_get_int ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5691:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5815:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -14987,13 +21958,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5691:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5815:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5692:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5816:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -15016,13 +21987,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5691:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5815:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5693:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5817:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -15046,13 +22017,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5693:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5817:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5694:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5818:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -15075,13 +22046,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5693:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5817:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5695:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5819:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -15095,7 +22066,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5696:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5820:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -15120,7 +22091,7 @@ lab_endgetargs:;
/*_.OELSELIST__V34*/ meltfptr[33] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5699:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5823:/ quasiblock");
/*^rawallocobj */
@@ -15154,7 +22125,7 @@ lab_endgetargs:;
( /*_.OTHENLIST__V33*/ meltfptr[32]), "OBLO_BODYL");
;
/*_.OTHENBLOCK__V35*/ meltfptr[34] = /*_.INST__V36*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-genobj.melt:5703:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5827:/ quasiblock");
/*^rawallocobj */
@@ -15188,7 +22159,7 @@ lab_endgetargs:;
( /*_.OELSELIST__V34*/ meltfptr[33]), "OBLO_BODYL");
;
/*_.OELSEBLOCK__V37*/ meltfptr[36] = /*_.INST__V38*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-genobj.melt:5707:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5831:/ apply");
/*apply */
{
union meltparam_un argtab[8];
@@ -15224,7 +22195,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5711:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5835:/ quasiblock");
/*^rawallocobj */
@@ -15280,7 +22251,7 @@ lab_endgetargs:;
/*_.OCOND__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15303,7 +22274,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -15313,7 +22284,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -15323,7 +22294,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5717;
+ argtab[2].meltbp_long = 5841;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple omatched=";
@@ -15362,7 +22333,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -15375,7 +22346,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[42] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];;
@@ -15384,7 +22355,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[41] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5717:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5841:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[42] = 0;
@@ -15413,7 +22384,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15436,7 +22407,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -15446,7 +22417,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15457,7 +22428,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5724;
+ argtab[2].meltbp_long = 5848;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple obloc=";
@@ -15479,7 +22450,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0;
@@ -15492,7 +22463,7 @@ lab_endgetargs:;
/*_.IF___V49*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ quasiblock");
/*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];;
@@ -15501,7 +22472,7 @@ lab_endgetargs:;
/*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5724:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5848:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V49*/ meltfptr[48] = 0;
@@ -15516,7 +22487,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5725:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5849:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15526,7 +22497,7 @@ lab_endgetargs:;
( /*_.OBLOC__V47*/ meltfptr[43]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:5725:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5849:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -15534,7 +22505,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5725:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5849:/ cond.else");
/*^block */
/*anyblock */
@@ -15548,7 +22519,7 @@ lab_endgetargs:;
melt_assert_failed (("check obloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5725) ? (5725) : __LINE__,
+ (5849) ? (5849) : __LINE__,
__FUNCTION__);
;
}
@@ -15564,7 +22535,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[48] = /*_.IFELSE___V53*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5725:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5849:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V53*/ meltfptr[49] = 0;
@@ -15575,7 +22546,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[48] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5726:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5850:/ quasiblock");
/*^quasiblock */
@@ -15615,20 +22586,20 @@ lab_endgetargs:;
/*_.OCLEAROB__V54*/ meltfptr[49] = /*_.INST__V55*/ meltfptr[54];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5730:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5854:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.OCLEAROB__V54*/
meltfptr[49]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5726:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5850:/ clear");
/*clear *//*_.OCLEAROB__V54*/ meltfptr[49] = 0;
} /* end cit1__EACHLIST */
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5721:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5845:/ clear");
/*clear *//*_.LOCPAIR__V46*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_.OBLOC__V47*/ meltfptr[43] = 0;
@@ -15640,14 +22611,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5733:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5857:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.OCOND__V40*/ meltfptr[39]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15670,7 +22641,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -15680,7 +22651,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15691,7 +22662,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5736;
+ argtab[2].meltbp_long = 5860;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple ntupcomp=";
@@ -15712,7 +22683,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0;
@@ -15725,7 +22696,7 @@ lab_endgetargs:;
/*_.IF___V57*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ quasiblock");
/*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];;
@@ -15734,7 +22705,7 @@ lab_endgetargs:;
/*_.IFCPP___V56*/ meltfptr[49] = /*_.PROGN___V59*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5736:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5860:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V57*/ meltfptr[56] = 0;
@@ -15766,7 +22737,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15789,7 +22760,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -15799,7 +22770,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -15810,7 +22781,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5740;
+ argtab[2].meltbp_long = 5864;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple curntup=";
@@ -15837,7 +22808,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0;
@@ -15850,7 +22821,7 @@ lab_endgetargs:;
/*_.IF___V62*/ meltfptr[61] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[61];;
@@ -15859,7 +22830,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[57] = /*_.PROGN___V64*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5740:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5864:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V62*/ meltfptr[61] = 0;
@@ -15872,7 +22843,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[57] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5741:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5865:/ cond");
/*cond */ if ( /*_.CURNTUP__V60*/ meltfptr[56]) /*then */
{
/*^cond.then */
@@ -15880,7 +22851,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5742:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5866:/ quasiblock");
/*^msend */
@@ -15900,8 +22871,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5743:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURNTUP__V60*/ meltfptr[56]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[15])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5867:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURNTUP__V60*/
+ meltfptr[56]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15919,8 +22896,14 @@ lab_endgetargs:;
/*_.CNBIND__V66*/ meltfptr[62] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5744:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CNBIND__V66*/ meltfptr[62]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[16])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:5868:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CNBIND__V66*/
+ meltfptr[62]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15938,7 +22921,7 @@ lab_endgetargs:;
/*_.CURBEXP__V67*/ meltfptr[66] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5745:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5869:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -15957,7 +22940,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15980,7 +22963,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -15990,7 +22973,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ apply");
/*apply */
{
union meltparam_un argtab[13];
@@ -16001,7 +22984,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5747;
+ argtab[2].meltbp_long = 5871;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple curovar=";
@@ -16047,7 +23030,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[8] =
0;
/*^clear */
@@ -16061,7 +23044,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] =
@@ -16072,7 +23055,7 @@ lab_endgetargs:;
/*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5747:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -16087,7 +23070,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5750:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5874:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16098,7 +23081,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_OBJLOCV */
meltfrout->
tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:5750:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5874:/ cond");
/*cond */ if ( /*_#IS_A__L20*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -16106,7 +23089,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5750:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5874:/ cond.else");
/*^block */
/*anyblock */
@@ -16121,7 +23104,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5750) ? (5750) : __LINE__,
+ (5874) ? (5874) : __LINE__,
__FUNCTION__);
;
}
@@ -16138,7 +23121,7 @@ lab_endgetargs:;
/*_.IFELSE___V74*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5750:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5874:/ clear");
/*clear *//*_#IS_A__L20*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V74*/ meltfptr[70] = 0;
@@ -16151,7 +23134,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5751:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5875:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16160,7 +23143,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CNBIND__V66*/ meltfptr[62]),
(melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-genobj.melt:5751:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5875:/ cond");
/*cond */ if ( /*_#IS_A__L21*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -16168,7 +23151,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5751:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5875:/ cond.else");
/*^block */
/*anyblock */
@@ -16183,7 +23166,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5751) ? (5751) : __LINE__,
+ (5875) ? (5875) : __LINE__,
__FUNCTION__);
;
}
@@ -16200,7 +23183,7 @@ lab_endgetargs:;
/*_.IFELSE___V76*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5751:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5875:/ clear");
/*clear *//*_#IS_A__L21*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V76*/ meltfptr[75] = 0;
@@ -16213,7 +23196,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5752:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5876:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16222,7 +23205,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURBEXP__V67*/ meltfptr[66]),
(melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[18])));;
- MELT_LOCATION ("warmelt-genobj.melt:5752:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond");
/*cond */ if ( /*_#IS_A__L22*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -16230,7 +23213,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5752:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond.else");
/*^block */
/*anyblock */
@@ -16245,7 +23228,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5752) ? (5752) : __LINE__,
+ (5876) ? (5876) : __LINE__,
__FUNCTION__);
;
}
@@ -16262,7 +23245,7 @@ lab_endgetargs:;
/*_.IFELSE___V78*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5752:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5876:/ clear");
/*clear *//*_#IS_A__L22*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V78*/ meltfptr[77] = 0;
@@ -16275,13 +23258,19 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5753:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5877:/ cppif.then");
/*^block */
/*anyblock */
{
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBEXP__V67*/ meltfptr[66]), (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBEXP__V67*/
+ meltfptr[66]),
+ (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16309,7 +23298,7 @@ lab_endgetargs:;
/*_#I__L24*/ meltfnum[8] =
(( /*_#GET_INT__L23*/ meltfnum[16]) ==
( /*_#TUPIX__L15*/ meltfnum[7]));;
- MELT_LOCATION ("warmelt-genobj.melt:5753:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5877:/ cond");
/*cond */ if ( /*_#I__L24*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -16317,7 +23306,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5753:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5877:/ cond.else");
/*^block */
/*anyblock */
@@ -16332,7 +23321,7 @@ lab_endgetargs:;
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") :
__FILE__,
- (5753) ? (5753) : __LINE__,
+ (5877) ? (5877) : __LINE__,
__FUNCTION__);
;
}
@@ -16349,7 +23338,7 @@ lab_endgetargs:;
/*_.IFELSE___V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5753:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5877:/ clear");
/*clear *//*_.NUNTH_INDEX__V80*/ meltfptr[79] = 0;
/*^clear */
/*clear *//*_#GET_INT__L23*/ meltfnum[16] = 0;
@@ -16364,7 +23353,7 @@ lab_endgetargs:;
/*_.IFCPP___V79*/ meltfptr[77] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5754:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5878:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -16383,7 +23372,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16406,7 +23395,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -16416,7 +23405,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16427,7 +23416,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5755;
+ argtab[2].meltbp_long = 5879;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple updated curoexp=";
@@ -16449,7 +23438,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V85*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[8] =
0;
/*^clear */
@@ -16463,7 +23452,7 @@ lab_endgetargs:;
/*_.IF___V84*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ quasiblock");
/*_.PROGN___V86*/ meltfptr[84] =
@@ -16474,7 +23463,7 @@ lab_endgetargs:;
/*_.PROGN___V86*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5755:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5879:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V84*/ meltfptr[83] = 0;
@@ -16489,7 +23478,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5756:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5880:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OTHENLIST__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.CUROEXP__V68*/
@@ -16497,7 +23486,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5742:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5866:/ clear");
/*clear *//*_.CUROVAR__V65*/ meltfptr[61] = 0;
/*^clear */
/*clear *//*_.CNBIND__V66*/ meltfptr[62] = 0;
@@ -16530,7 +23519,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5737:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5861:/ clear");
/*clear *//*_.CURNTUP__V60*/ meltfptr[56] = 0;
/*^clear */
/*clear *//*_#TUPIX__L15*/ meltfnum[7] = 0;
@@ -16540,7 +23529,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5760:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5884:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16548,7 +23537,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L27*/ meltfnum[8] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5760:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5884:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L27*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -16556,7 +23545,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5760:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5884:/ cond.else");
/*^block */
/*anyblock */
@@ -16570,7 +23559,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotothen"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5760) ? (5760) : __LINE__, __FUNCTION__);
+ (5884) ? (5884) : __LINE__, __FUNCTION__);
;
}
;
@@ -16585,7 +23574,7 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[83] = /*_.IFELSE___V88*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5760:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5884:/ clear");
/*clear *//*_#IS_OBJECT__L27*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V88*/ meltfptr[84] = 0;
@@ -16598,14 +23587,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5761:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5885:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5764:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5888:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16613,7 +23602,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L28*/ meltfnum[16] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5764:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5888:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L28*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -16621,7 +23610,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5764:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5888:/ cond.else");
/*^block */
/*anyblock */
@@ -16635,7 +23624,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotoelse"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5764) ? (5764) : __LINE__, __FUNCTION__);
+ (5888) ? (5888) : __LINE__, __FUNCTION__);
;
}
;
@@ -16650,7 +23639,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[61] = /*_.IFELSE___V90*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5764:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5888:/ clear");
/*clear *//*_#IS_OBJECT__L28*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V90*/ meltfptr[62] = 0;
@@ -16663,14 +23652,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5765:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5889:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V34*/ meltfptr[33]),
(melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16693,7 +23682,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -16703,7 +23692,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16714,7 +23703,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5766;
+ argtab[2].meltbp_long = 5890;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_tuple final olist=";
@@ -16735,7 +23724,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V93*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V93*/ meltfptr[68] = 0;
@@ -16748,7 +23737,7 @@ lab_endgetargs:;
/*_.IF___V92*/ meltfptr[67] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ quasiblock");
/*_.PROGN___V94*/ meltfptr[69] = /*_.IF___V92*/ meltfptr[67];;
@@ -16757,7 +23746,7 @@ lab_endgetargs:;
/*_.IFCPP___V91*/ meltfptr[66] = /*_.PROGN___V94*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5766:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5890:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V92*/ meltfptr[67] = 0;
@@ -16770,16 +23759,16 @@ lab_endgetargs:;
/*_.IFCPP___V91*/ meltfptr[66] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5767:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5891:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:5767:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5891:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V16*/ meltfptr[14] = /*_.RETURN___V95*/ meltfptr[70];;
- MELT_LOCATION ("warmelt-genobj.melt:5681:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5805:/ clear");
/*clear *//*_.NLOC__V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V18*/ meltfptr[17] = 0;
@@ -16835,11 +23824,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V91*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_.RETURN___V95*/ meltfptr[70] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -16866,14 +23855,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE */
+} /*end meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -16898,7 +23887,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME_st
+ struct frame_meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16937,7 +23926,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ getarg");
/*_.NTSA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16967,7 +23956,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16990,7 +23979,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17000,7 +23989,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17010,7 +23999,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5776;
+ argtab[2].meltbp_long = 5900;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_same ntsa=";
/*^apply.arg */
@@ -17029,7 +24018,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -17042,7 +24031,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -17051,7 +24040,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5776:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5900:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -17066,7 +24055,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5777:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5901:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17075,7 +24064,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5901:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17083,7 +24072,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5901:/ cond.else");
/*^block */
/*anyblock */
@@ -17097,7 +24086,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntsa"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5777) ? (5777) : __LINE__, __FUNCTION__);
+ (5901) ? (5901) : __LINE__, __FUNCTION__);
;
}
;
@@ -17112,7 +24101,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5777:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5901:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -17125,7 +24114,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5778:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5902:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17134,7 +24123,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5778:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5902:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17142,7 +24131,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5778:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5902:/ cond.else");
/*^block */
/*anyblock */
@@ -17156,7 +24145,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5778) ? (5778) : __LINE__, __FUNCTION__);
+ (5902) ? (5902) : __LINE__, __FUNCTION__);
;
}
;
@@ -17171,7 +24160,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5778:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5902:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -17184,7 +24173,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5779:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5903:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17193,7 +24182,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5779:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5903:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17201,7 +24190,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5779:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5903:/ cond.else");
/*^block */
/*anyblock */
@@ -17215,7 +24204,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5779) ? (5779) : __LINE__, __FUNCTION__);
+ (5903) ? (5903) : __LINE__, __FUNCTION__);
;
}
;
@@ -17230,7 +24219,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5779:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5903:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -17241,10 +24230,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5780:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5904:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5781:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5905:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -17252,7 +24241,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5782:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5906:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -17260,7 +24249,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5783:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5907:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -17268,7 +24257,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5784:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5908:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -17276,7 +24265,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5785:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5909:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -17284,7 +24273,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5786:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5910:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 7, "NTSAME_IDENTICAL");
@@ -17294,7 +24283,7 @@ lab_endgetargs:;
;
/*_#NTESTIX__L6*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5788:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5912:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17308,7 +24297,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5789:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:5913:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17322,7 +24311,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5790:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5914:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17346,13 +24335,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5790:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5914:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5791:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5915:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -17375,13 +24364,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5790:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5914:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5792:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5916:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17405,13 +24394,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5792:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5916:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5793:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5917:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -17434,13 +24423,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5792:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5916:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V29*/ meltfptr[28] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5794:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5918:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -17465,7 +24454,7 @@ lab_endgetargs:;
/*_.OELSELIST__V32*/ meltfptr[31] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[8]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5797:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5921:/ quasiblock");
/*^rawallocobj */
@@ -17499,7 +24488,7 @@ lab_endgetargs:;
( /*_.OTHENLIST__V31*/ meltfptr[30]), "OBLO_BODYL");
;
/*_.OTHENBLOCK__V33*/ meltfptr[32] = /*_.INST__V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-genobj.melt:5801:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5925:/ quasiblock");
/*^rawallocobj */
@@ -17533,7 +24522,7 @@ lab_endgetargs:;
( /*_.OELSELIST__V32*/ meltfptr[31]), "OBLO_BODYL");
;
/*_.OELSEBLOCK__V35*/ meltfptr[34] = /*_.INST__V36*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-genobj.melt:5805:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5929:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -17562,7 +24551,7 @@ lab_endgetargs:;
""), argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5808:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5932:/ quasiblock");
/*^rawallocobj */
@@ -17623,7 +24612,7 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[8]))));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17646,7 +24635,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17656,7 +24645,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17666,7 +24655,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5815;
+ argtab[2].meltbp_long = 5939;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_same ocond=";
/*^apply.arg */
@@ -17686,7 +24675,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0;
@@ -17699,7 +24688,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[41] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];;
@@ -17708,7 +24697,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5815:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5939:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V42*/ meltfptr[41] = 0;
@@ -17737,7 +24726,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5820:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5944:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17747,7 +24736,7 @@ lab_endgetargs:;
( /*_.OBLOC__V46*/ meltfptr[42]),
(melt_ptr_t) (( /*!CLASS_OBJLOCV */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-genobj.melt:5820:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5944:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -17755,7 +24744,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5820:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5944:/ cond.else");
/*^block */
/*anyblock */
@@ -17769,7 +24758,7 @@ lab_endgetargs:;
melt_assert_failed (("check obloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5820) ? (5820) : __LINE__,
+ (5944) ? (5944) : __LINE__,
__FUNCTION__);
;
}
@@ -17785,7 +24774,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[46] = /*_.IFELSE___V48*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5820:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5944:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V48*/ meltfptr[47] = 0;
@@ -17796,7 +24785,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[46] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5821:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5945:/ quasiblock");
/*^quasiblock */
@@ -17836,20 +24825,20 @@ lab_endgetargs:;
/*_.OCLEAROB__V49*/ meltfptr[47] = /*_.INST__V50*/ meltfptr[49];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5825:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5949:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V40*/ meltfptr[39]),
(melt_ptr_t) ( /*_.OCLEAROB__V49*/
meltfptr[47]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5821:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5945:/ clear");
/*clear *//*_.OCLEAROB__V49*/ meltfptr[47] = 0;
} /* end cit1__EACHLIST */
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5817:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5941:/ clear");
/*clear *//*_.LOCPAIR__V45*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_.OBLOC__V46*/ meltfptr[42] = 0;
@@ -17859,14 +24848,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5828:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5952:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V40*/ meltfptr[39]),
(melt_ptr_t) ( /*_.OCOND__V38*/ meltfptr[37]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5830:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5954:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17874,7 +24863,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L10*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5830:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5954:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17882,7 +24871,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5830:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5954:/ cond.else");
/*^block */
/*anyblock */
@@ -17896,7 +24885,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotothen"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5830) ? (5830) : __LINE__, __FUNCTION__);
+ (5954) ? (5954) : __LINE__, __FUNCTION__);
;
}
;
@@ -17911,7 +24900,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[47] = /*_.IFELSE___V52*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5830:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5954:/ clear");
/*clear *//*_#IS_OBJECT__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V52*/ meltfptr[51] = 0;
@@ -17924,14 +24913,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5831:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5955:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V31*/ meltfptr[30]),
(melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5833:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5957:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17939,7 +24928,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L11*/ meltfnum[7] =
(melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V28*/ meltfptr[27]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:5833:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5957:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L11*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -17947,7 +24936,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5833:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5957:/ cond.else");
/*^block */
/*anyblock */
@@ -17961,7 +24950,7 @@ lab_endgetargs:;
melt_assert_failed (("check gotoelse"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5833) ? (5833) : __LINE__, __FUNCTION__);
+ (5957) ? (5957) : __LINE__, __FUNCTION__);
;
}
;
@@ -17976,7 +24965,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[51] = /*_.IFELSE___V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5833:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5957:/ clear");
/*clear *//*_#IS_OBJECT__L11*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
@@ -17989,14 +24978,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5834:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5958:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V32*/ meltfptr[31]),
(melt_ptr_t) ( /*_.GOTOELSE__V28*/ meltfptr[27]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18019,7 +25008,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18029,7 +25018,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18040,7 +25029,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5835;
+ argtab[2].meltbp_long = 5959;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_same return olist=";
@@ -18061,7 +25050,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
@@ -18074,7 +25063,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];;
@@ -18083,7 +25072,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[53] = /*_.PROGN___V58*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5835:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5959:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[55] = 0;
@@ -18096,16 +25085,16 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[53] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5836:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5960:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V40*/ meltfptr[39];;
- MELT_LOCATION ("warmelt-genobj.melt:5836:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5960:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V59*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-genobj.melt:5780:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5904:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -18157,11 +25146,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V55*/ meltfptr[53] = 0;
/*^clear */
/*clear *//*_.RETURN___V59*/ meltfptr[55] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -18188,14 +25177,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME */
+} /*end meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -18220,7 +25209,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS_st
+ struct frame_meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -18259,7 +25248,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ getarg");
/*_.NTSU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -18289,7 +25278,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18312,7 +25301,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18322,7 +25311,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -18332,7 +25321,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5844;
+ argtab[2].meltbp_long = 5968;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_success ntsu=";
/*^apply.arg */
@@ -18357,7 +25346,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -18370,7 +25359,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -18379,7 +25368,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5844:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5968:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -18394,7 +25383,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5845:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5969:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18403,7 +25392,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5845:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5969:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18411,7 +25400,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5845:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5969:/ cond.else");
/*^block */
/*anyblock */
@@ -18425,7 +25414,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntsu"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5845) ? (5845) : __LINE__, __FUNCTION__);
+ (5969) ? (5969) : __LINE__, __FUNCTION__);
;
}
;
@@ -18440,7 +25429,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5845:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5969:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -18453,7 +25442,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5846:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5970:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18462,7 +25451,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5846:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5970:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18470,7 +25459,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5846:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5970:/ cond.else");
/*^block */
/*anyblock */
@@ -18484,7 +25473,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5846) ? (5846) : __LINE__, __FUNCTION__);
+ (5970) ? (5970) : __LINE__, __FUNCTION__);
;
}
;
@@ -18499,7 +25488,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5846:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5970:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -18512,7 +25501,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5847:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5971:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18521,7 +25510,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5847:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5971:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18529,7 +25518,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5847:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5971:/ cond.else");
/*^block */
/*anyblock */
@@ -18543,7 +25532,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5847) ? (5847) : __LINE__, __FUNCTION__);
+ (5971) ? (5971) : __LINE__, __FUNCTION__);
;
}
;
@@ -18558,7 +25547,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5847:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5971:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -18569,10 +25558,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5848:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5972:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5849:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5973:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -18580,7 +25569,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5850:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5974:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -18588,7 +25577,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5851:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5975:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -18596,7 +25585,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5852:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5976:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -18604,7 +25593,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5853:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5977:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST");
@@ -18612,7 +25601,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5854:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5978:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -18620,7 +25609,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5855:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:5979:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 7, "NTSUCCESS_DO");
@@ -18630,7 +25619,7 @@ lab_endgetargs:;
;
/*_#NTESTIX__L6*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5857:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5981:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -18649,14 +25638,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5859:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5983:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L7*/ meltfnum[1] =
(( /*_.NLOCLIS__V20*/ meltfptr[19]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5859:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5983:/ cond");
/*cond */ if ( /*_#NULL__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18664,7 +25653,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5859:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5983:/ cond.else");
/*^block */
/*anyblock */
@@ -18678,7 +25667,7 @@ lab_endgetargs:;
melt_assert_failed (("check nil nloclis"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5859) ? (5859) : __LINE__, __FUNCTION__);
+ (5983) ? (5983) : __LINE__, __FUNCTION__);
;
}
;
@@ -18693,7 +25682,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.IFELSE___V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5859:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5983:/ clear");
/*clear *//*_#NULL__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V25*/ meltfptr[24] = 0;
@@ -18706,14 +25695,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5860:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5984:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L8*/ meltfnum[1] =
(( /*_.NTHEN__V18*/ meltfptr[17]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5860:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5984:/ cond");
/*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18721,7 +25710,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5860:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5984:/ cond.else");
/*^block */
/*anyblock */
@@ -18735,7 +25724,7 @@ lab_endgetargs:;
melt_assert_failed (("check nil nthen"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5860) ? (5860) : __LINE__, __FUNCTION__);
+ (5984) ? (5984) : __LINE__, __FUNCTION__);
;
}
;
@@ -18750,7 +25739,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[24] = /*_.IFELSE___V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5860:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5984:/ clear");
/*clear *//*_#NULL__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V27*/ meltfptr[26] = 0;
@@ -18763,14 +25752,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5861:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5985:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L9*/ meltfnum[1] =
(( /*_.NELSE__V19*/ meltfptr[18]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5861:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5985:/ cond");
/*cond */ if ( /*_#NULL__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18778,7 +25767,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5861:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:5985:/ cond.else");
/*^block */
/*anyblock */
@@ -18792,7 +25781,7 @@ lab_endgetargs:;
melt_assert_failed (("check nil nelse"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5861) ? (5861) : __LINE__, __FUNCTION__);
+ (5985) ? (5985) : __LINE__, __FUNCTION__);
;
}
;
@@ -18807,7 +25796,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[26] = /*_.IFELSE___V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5861:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5985:/ clear");
/*clear *//*_#NULL__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0;
@@ -18818,7 +25807,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5862:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5986:/ quasiblock");
/*^msend */
@@ -18838,7 +25827,7 @@ lab_endgetargs:;
/*_#IS_LIST__L10*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-genobj.melt:5865:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5989:/ cond");
/*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18848,7 +25837,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:5867:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:5991:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30]),
(melt_ptr_t) ( /*_.GOTOEND__V23*/
meltfptr[22]));
@@ -18856,11 +25845,11 @@ lab_endgetargs:;
;
/*_.LIST_LAST__V33*/ meltfptr[32] =
(melt_list_last ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30])));;
- MELT_LOCATION ("warmelt-genobj.melt:5868:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5992:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OSUCC__V31*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-genobj.melt:5868:/ putxtraresult");
+ MELT_LOCATION ("warmelt-genobj.melt:5992:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -18872,7 +25861,7 @@ lab_endgetargs:;
/*^finalreturn */
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-genobj.melt:5866:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5990:/ quasiblock");
/*_.PROGN___V35*/ meltfptr[34] = /*_.RETURN___V34*/ meltfptr[33];;
@@ -18881,7 +25870,7 @@ lab_endgetargs:;
/*_.IFELSE___V32*/ meltfptr[31] = /*_.PROGN___V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5865:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5989:/ clear");
/*clear *//*_.LIST_LAST__V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.RETURN___V34*/ meltfptr[33] = 0;
@@ -18897,7 +25886,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5869:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:5993:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -18943,7 +25932,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /2fb83c1b checkpair",
+ melt_assertmsg ("putpairtail /3c64178c checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.OSUCC__V37*/
meltfptr[33])) ==
@@ -18985,7 +25974,7 @@ lab_endgetargs:;
/*_.LIST___V36*/ meltfptr[32] = /*_.LIST___V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5869:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5993:/ clear");
/*clear *//*_.OSUCC__V37*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.GOTOEND__V38*/ meltfptr[34] = 0;
@@ -19003,7 +25992,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LIST___V36*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-genobj.melt:5869:/ putxtraresult");
+ MELT_LOCATION ("warmelt-genobj.melt:5993:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -19018,7 +26007,7 @@ lab_endgetargs:;
/*_.IFELSE___V32*/ meltfptr[31] = /*_.RETURN___V40*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5865:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5989:/ clear");
/*clear *//*_.LIST___V36*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.RETURN___V40*/ meltfptr[33] = 0;
@@ -19028,7 +26017,7 @@ lab_endgetargs:;
;
/*_.LET___V30*/ meltfptr[28] = /*_.IFELSE___V32*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-genobj.melt:5862:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5986:/ clear");
/*clear *//*_.OSUCC__V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_#IS_LIST__L10*/ meltfnum[1] = 0;
@@ -19036,7 +26025,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V32*/ meltfptr[31] = 0;
/*_.LET___V15*/ meltfptr[13] = /*_.LET___V30*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:5848:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5972:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -19062,11 +26051,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V28*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.LET___V30*/ meltfptr[28] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -19093,14 +26082,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS */
+} /*end meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -19125,7 +26114,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR_st
+ struct frame_meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -19164,7 +26153,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ getarg");
/*_.NTOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -19194,7 +26183,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19217,7 +26206,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19227,7 +26216,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19237,7 +26226,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5875;
+ argtab[2].meltbp_long = 5999;
/*^apply.arg */
argtab[3].meltbp_cstring = "compiltst_normtester_orclear ntoc=";
/*^apply.arg */
@@ -19256,7 +26245,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -19269,7 +26258,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -19278,7 +26267,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5875:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:5999:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -19293,7 +26282,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5876:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6000:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19302,7 +26291,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_OR_CLEAR */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6000:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19310,7 +26299,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6000:/ cond.else");
/*^block */
/*anyblock */
@@ -19324,7 +26313,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntoc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5876) ? (5876) : __LINE__, __FUNCTION__);
+ (6000) ? (6000) : __LINE__, __FUNCTION__);
;
}
;
@@ -19339,7 +26328,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5876:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6000:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -19352,7 +26341,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5877:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6001:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19361,7 +26350,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5877:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6001:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19369,7 +26358,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5877:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6001:/ cond.else");
/*^block */
/*anyblock */
@@ -19383,7 +26372,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5877) ? (5877) : __LINE__, __FUNCTION__);
+ (6001) ? (6001) : __LINE__, __FUNCTION__);
;
}
;
@@ -19398,7 +26387,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5877:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6001:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -19411,7 +26400,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5878:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6002:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19420,7 +26409,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5878:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6002:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19428,7 +26417,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5878:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6002:/ cond.else");
/*^block */
/*anyblock */
@@ -19442,7 +26431,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5878) ? (5878) : __LINE__, __FUNCTION__);
+ (6002) ? (6002) : __LINE__, __FUNCTION__);
;
}
;
@@ -19457,7 +26446,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5878:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6002:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -19468,10 +26457,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5879:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6003:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5880:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6004:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -19479,7 +26468,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5881:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6005:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -19487,7 +26476,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5882:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6006:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -19495,7 +26484,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5883:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6007:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -19503,7 +26492,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5884:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6008:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -19511,7 +26500,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5885:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6009:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 7, "NTORCLEAR_LOCSYM");
@@ -19519,7 +26508,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5886:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6010:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP");
@@ -19530,7 +26519,7 @@ lab_endgetargs:;
/*_.OLIST__V23*/ meltfptr[22] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5888:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6012:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -19554,13 +26543,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5888:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6012:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5889:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6013:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -19583,7 +26572,7 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5888:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6012:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0;
}
;
@@ -19591,7 +26580,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19614,7 +26603,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19624,7 +26613,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -19634,7 +26623,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5893;
+ argtab[2].meltbp_long = 6017;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_orclear nclear=";
@@ -19667,7 +26656,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -19680,7 +26669,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -19689,7 +26678,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[25] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5893:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6017:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -19704,7 +26693,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5895:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6019:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19712,7 +26701,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L8*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NCLEAR__V21*/ meltfptr[20])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-genobj.melt:5895:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6019:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19720,7 +26709,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5895:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6019:/ cond.else");
/*^block */
/*anyblock */
@@ -19734,7 +26723,7 @@ lab_endgetargs:;
melt_assert_failed (("check nclear"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5895) ? (5895) : __LINE__, __FUNCTION__);
+ (6019) ? (6019) : __LINE__, __FUNCTION__);
;
}
;
@@ -19749,7 +26738,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[27] = /*_.IFELSE___V32*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5895:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6019:/ clear");
/*clear *//*_#IS_MULTIPLE__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V32*/ meltfptr[28] = 0;
@@ -19778,7 +26767,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19801,7 +26790,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19811,7 +26800,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -19822,7 +26811,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5899;
+ argtab[2].meltbp_long = 6023;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_orclear curlocs=";
@@ -19849,7 +26838,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -19862,7 +26851,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];;
@@ -19871,7 +26860,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5899:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6023:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[34] = 0;
@@ -19886,7 +26875,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5900:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6024:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -19895,10 +26884,10 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5901:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6025:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5904:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6028:/ quasiblock");
/*^msend */
@@ -19918,7 +26907,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19941,7 +26930,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -19951,7 +26940,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19962,7 +26951,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5906;
+ argtab[2].meltbp_long = 6030;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_orclear ocurl=";
@@ -19984,7 +26973,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0;
@@ -19997,7 +26986,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];;
@@ -20006,7 +26995,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5906:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6030:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -20023,12 +27012,12 @@ lab_endgetargs:;
/*_.LET___V38*/ meltfptr[34] = /*_.OC__V39*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-genobj.melt:5904:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6028:/ clear");
/*clear *//*_.OC__V39*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.IFCPP___V40*/ meltfptr[39] = 0;
/*_.OCURL__V44*/ meltfptr[40] = /*_.LET___V38*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-genobj.melt:5908:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6032:/ quasiblock");
/*^rawallocobj */
@@ -20065,7 +27054,7 @@ lab_endgetargs:;
/*_.OCLRLOC__V45*/ meltfptr[41] = /*_.INST__V46*/ meltfptr[35];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20088,7 +27077,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20098,7 +27087,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20109,7 +27098,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5913;
+ argtab[2].meltbp_long = 6037;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_orclear oclrloc=";
@@ -20131,7 +27120,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -20144,7 +27133,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];;
@@ -20153,7 +27142,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[39] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5913:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6037:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[47] = 0;
@@ -20168,14 +27157,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5914:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6038:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.OCLRLOC__V45*/
meltfptr[41]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5901:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6025:/ clear");
/*clear *//*_.LET___V38*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.OCURL__V44*/ meltfptr[40] = 0;
@@ -20189,7 +27178,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5896:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6020:/ clear");
/*clear *//*_.CURLOCS__V33*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_#CIX__L9*/ meltfnum[0] = 0;
@@ -20199,14 +27188,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5917:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6041:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20229,7 +27218,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -20239,7 +27228,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20250,7 +27239,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5918;
+ argtab[2].meltbp_long = 6042;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_orclear final olist=";
@@ -20271,7 +27260,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V53*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[34] = 0;
@@ -20284,7 +27273,7 @@ lab_endgetargs:;
/*_.IF___V52*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[40] = /*_.IF___V52*/ meltfptr[48];;
@@ -20293,7 +27282,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[47] = /*_.PROGN___V54*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5918:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6042:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V52*/ meltfptr[48] = 0;
@@ -20306,16 +27295,16 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[47] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5919:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6043:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:5919:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6043:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V55*/ meltfptr[41];;
- MELT_LOCATION ("warmelt-genobj.melt:5879:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6003:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -20343,11 +27332,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V51*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.RETURN___V55*/ meltfptr[41] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20374,14 +27363,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR */
+} /*end meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -20408,7 +27397,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT_st
+ struct frame_meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -20447,7 +27436,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ getarg");
/*_.NTOT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -20477,7 +27466,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20500,7 +27489,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20510,7 +27499,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20520,7 +27509,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5925;
+ argtab[2].meltbp_long = 6049;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_ortransmit ntot=";
@@ -20540,7 +27529,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -20553,7 +27542,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -20562,7 +27551,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5925:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6049:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -20577,7 +27566,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5926:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6050:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20585,7 +27574,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_OR_TRANSMIT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5926:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6050:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20593,7 +27582,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5926:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6050:/ cond.else");
/*^block */
/*anyblock */
@@ -20607,7 +27596,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntot"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5926) ? (5926) : __LINE__, __FUNCTION__);
+ (6050) ? (6050) : __LINE__, __FUNCTION__);
;
}
;
@@ -20622,7 +27611,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5926:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6050:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -20635,7 +27624,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5927:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6051:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20644,7 +27633,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5927:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6051:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20652,7 +27641,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5927:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6051:/ cond.else");
/*^block */
/*anyblock */
@@ -20666,7 +27655,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5927) ? (5927) : __LINE__, __FUNCTION__);
+ (6051) ? (6051) : __LINE__, __FUNCTION__);
;
}
;
@@ -20681,7 +27670,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5927:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6051:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -20694,7 +27683,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5928:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6052:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20703,7 +27692,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5928:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6052:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20711,7 +27700,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5928:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6052:/ cond.else");
/*^block */
/*anyblock */
@@ -20725,7 +27714,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5928) ? (5928) : __LINE__, __FUNCTION__);
+ (6052) ? (6052) : __LINE__, __FUNCTION__);
;
}
;
@@ -20740,7 +27729,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5928:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6052:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -20751,10 +27740,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5929:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6053:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5930:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6054:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -20762,7 +27751,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5931:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6055:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -20770,7 +27759,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5932:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6056:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -20778,7 +27767,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5933:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6057:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 7, "NTORTRANSMIT_DST");
@@ -20786,7 +27775,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5934:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6058:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 8, "NTORTRANSMIT_SRC");
@@ -20794,7 +27783,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5935:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6059:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -20802,7 +27791,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5936:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6060:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 3, "NTEST_ELSE");
@@ -20813,7 +27802,7 @@ lab_endgetargs:;
/*_.OLIST__V23*/ meltfptr[22] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5938:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6062:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -20837,13 +27826,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5938:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6062:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5939:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6063:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -20866,7 +27855,7 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5938:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6062:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0;
}
;
@@ -20874,14 +27863,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5941:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6065:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L6*/ meltfnum[0] =
(( /*_.NELSE__V22*/ meltfptr[21]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:5941:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6065:/ cond");
/*cond */ if ( /*_#NULL__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20889,7 +27878,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5941:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6065:/ cond.else");
/*^block */
/*anyblock */
@@ -20903,7 +27892,7 @@ lab_endgetargs:;
melt_assert_failed (("check null nelse"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5941) ? (5941) : __LINE__, __FUNCTION__);
+ (6065) ? (6065) : __LINE__, __FUNCTION__);
;
}
;
@@ -20918,7 +27907,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[25] = /*_.IFELSE___V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5941:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6065:/ clear");
/*clear *//*_#NULL__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V28*/ meltfptr[27] = 0;
@@ -20931,7 +27920,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5942:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6066:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20949,7 +27938,7 @@ lab_endgetargs:;
/*_#I__L9*/ meltfnum[8] =
(( /*_#MULTIPLE_LENGTH__L7*/ meltfnum[1]) ==
( /*_#MULTIPLE_LENGTH__L8*/ meltfnum[0]));;
- MELT_LOCATION ("warmelt-genobj.melt:5942:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6066:/ cond");
/*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -20957,7 +27946,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5942:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6066:/ cond.else");
/*^block */
/*anyblock */
@@ -20971,7 +27960,7 @@ lab_endgetargs:;
melt_assert_failed (("check same size ntupdst ntupsc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5942) ? (5942) : __LINE__, __FUNCTION__);
+ (6066) ? (6066) : __LINE__, __FUNCTION__);
;
}
;
@@ -20986,7 +27975,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[27] = /*_.IFELSE___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5942:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6066:/ clear");
/*clear *//*_#MULTIPLE_LENGTH__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L8*/ meltfnum[0] = 0;
@@ -21018,7 +28007,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-genobj.melt:5947:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6071:/ quasiblock");
/*_.NCURSRC__V32*/ meltfptr[31] =
@@ -21027,7 +28016,7 @@ lab_endgetargs:;
( /*_#NIX__L10*/ meltfnum[1])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21050,7 +28039,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21060,7 +28049,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -21071,7 +28060,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5949;
+ argtab[2].meltbp_long = 6073;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_ortransmit ncursrc=";
@@ -21104,7 +28093,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -21117,7 +28106,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -21126,7 +28115,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5949:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6073:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -21139,10 +28128,10 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5950:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6074:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5951:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6075:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -21157,7 +28146,7 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5952:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6076:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -21176,7 +28165,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-genobj.melt:5954:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6078:/ quasiblock");
/*^rawallocobj */
@@ -21223,7 +28212,7 @@ lab_endgetargs:;
/*_.OCOMP__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];;
{
- MELT_LOCATION ("warmelt-genobj.melt:5959:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6083:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.DSTLIST__V39*/ meltfptr[38]),
(melt_ptr_t) ( /*_.ODST__V38*/ meltfptr[34]));
@@ -21231,7 +28220,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21254,7 +28243,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -21264,7 +28253,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -21275,7 +28264,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5960;
+ argtab[2].meltbp_long = 6084;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_ortransmit osrc=";
@@ -21309,7 +28298,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -21322,7 +28311,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[42] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];;
@@ -21331,7 +28320,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[41] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5960:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6084:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[42] = 0;
@@ -21346,14 +28335,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5961:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6085:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.OCOMP__V40*/
meltfptr[39]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5950:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6074:/ clear");
/*clear *//*_.OSRC__V37*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.ODST__V38*/ meltfptr[34] = 0;
@@ -21364,7 +28353,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V42*/ meltfptr[41] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5947:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6071:/ clear");
/*clear *//*_.NCURSRC__V32*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
@@ -21374,7 +28363,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5944:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6068:/ clear");
/*clear *//*_.NCURDST__V31*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_#NIX__L10*/ meltfnum[1] = 0;
@@ -21382,14 +28371,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:5963:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6087:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21412,7 +28401,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21422,7 +28411,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21433,7 +28422,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5964;
+ argtab[2].meltbp_long = 6088;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_ortransmit final olist=";
@@ -21454,7 +28443,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V48*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V48*/ meltfptr[33] = 0;
@@ -21467,7 +28456,7 @@ lab_endgetargs:;
/*_.IF___V47*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[34] = /*_.IF___V47*/ meltfptr[43];;
@@ -21476,7 +28465,7 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[42] = /*_.PROGN___V49*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5964:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6088:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V47*/ meltfptr[43] = 0;
@@ -21489,16 +28478,16 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[42] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5965:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6089:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-genobj.melt:5965:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6089:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V50*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-genobj.melt:5929:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6053:/ clear");
/*clear *//*_.NLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0;
@@ -21526,11 +28515,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V46*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_.RETURN___V50*/ meltfptr[38] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21557,14 +28546,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT */
+} /*end meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -21581,7 +28570,7 @@ meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
#define meltcallcount 0L
#endif
- struct frame_meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION_st
+ struct frame_meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21620,7 +28609,7 @@ meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ getarg");
/*_.NTDJ__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21650,7 +28639,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21673,7 +28662,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21683,7 +28672,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21693,7 +28682,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5974;
+ argtab[2].meltbp_long = 6098;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_disjunction ntdj=";
@@ -21713,7 +28702,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -21726,7 +28715,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -21735,7 +28724,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5974:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6098:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -21750,7 +28739,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5975:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6099:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21758,7 +28747,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_DISJUNCTION */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:5975:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6099:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21766,7 +28755,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5975:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6099:/ cond.else");
/*^block */
/*anyblock */
@@ -21780,7 +28769,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntdj"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5975) ? (5975) : __LINE__, __FUNCTION__);
+ (6099) ? (6099) : __LINE__, __FUNCTION__);
;
}
;
@@ -21795,7 +28784,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5975:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6099:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -21808,7 +28797,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5976:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6100:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21817,7 +28806,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:5976:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6100:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21825,7 +28814,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5976:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6100:/ cond.else");
/*^block */
/*anyblock */
@@ -21839,7 +28828,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5976) ? (5976) : __LINE__, __FUNCTION__);
+ (6100) ? (6100) : __LINE__, __FUNCTION__);
;
}
;
@@ -21854,7 +28843,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5976:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6100:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -21867,7 +28856,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5977:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6101:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21876,7 +28865,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:5977:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6101:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21884,7 +28873,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5977:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6101:/ cond.else");
/*^block */
/*anyblock */
@@ -21898,7 +28887,7 @@ lab_endgetargs:;
melt_assert_failed (("check tcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5977) ? (5977) : __LINE__, __FUNCTION__);
+ (6101) ? (6101) : __LINE__, __FUNCTION__);
;
}
;
@@ -21913,7 +28902,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5977:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6101:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -21924,10 +28913,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5978:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6102:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:5979:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6103:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP");
@@ -21935,7 +28924,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5980:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6104:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 0, "NREP_LOC");
@@ -21943,7 +28932,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5981:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6105:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -21951,7 +28940,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5982:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6106:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH");
@@ -21959,7 +28948,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5983:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6107:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 8, "NTDISJ_FRESHORVAR");
@@ -21967,7 +28956,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5984:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6108:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -21991,13 +28980,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5984:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6108:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:5985:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6109:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -22020,13 +29009,13 @@ lab_endgetargs:;
/*_.ENDMATCH_GOTOINSTR__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5984:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6108:/ clear");
/*clear *//*_.ENDMATCH_GOTOINSTR__V23*/ meltfptr[22] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5987:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6111:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -22045,7 +29034,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22068,7 +29057,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22078,7 +29067,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -22088,7 +29077,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5989;
+ argtab[2].meltbp_long = 6113;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_disjunction ndisjlocsy=";
@@ -22121,7 +29110,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
@@ -22134,7 +29123,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
@@ -22143,7 +29132,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[24] = /*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5989:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6113:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[25] = 0;
@@ -22176,7 +29165,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22199,7 +29188,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22209,7 +29198,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -22220,7 +29209,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5994;
+ argtab[2].meltbp_long = 6118;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_disjunction curdisjloc=";
@@ -22247,7 +29236,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -22260,7 +29249,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
@@ -22269,7 +29258,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5994:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6118:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
@@ -22284,7 +29273,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:5995:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6119:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22294,7 +29283,7 @@ lab_endgetargs:;
( /*_.CURDISJLOC__V29*/ meltfptr[25]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-genobj.melt:5995:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6119:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -22302,7 +29291,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:5995:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6119:/ cond.else");
/*^block */
/*anyblock */
@@ -22316,7 +29305,7 @@ lab_endgetargs:;
melt_assert_failed (("check curdisjloc"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (5995) ? (5995) : __LINE__,
+ (6119) ? (6119) : __LINE__,
__FUNCTION__);
;
}
@@ -22332,7 +29321,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = /*_.IFELSE___V35*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:5995:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6119:/ clear");
/*clear *//*_#IS_A__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
@@ -22343,7 +29332,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:5996:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6120:/ quasiblock");
/*^getslot */
@@ -22354,7 +29343,7 @@ lab_endgetargs:;
meltfptr[31] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5997:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6121:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDISJLOC__V29*/ meltfptr[25]), 1, "NOCC_SYMB");
@@ -22362,7 +29351,7 @@ lab_endgetargs:;
meltfptr[36] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5998:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6122:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDISJLOC__V29*/ meltfptr[25]), 2, "NOCC_CTYP");
@@ -22370,7 +29359,7 @@ lab_endgetargs:;
meltfptr[37] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:5999:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6123:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -22392,7 +29381,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22415,7 +29404,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22425,7 +29414,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22436,7 +29425,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6003;
+ argtab[2].meltbp_long = 6127;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compiltst_normtester_disjunction dobva=";
@@ -22458,7 +29447,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0;
@@ -22471,7 +29460,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];;
@@ -22480,7 +29469,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6003:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6127:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -22495,7 +29484,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6004:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6128:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.LOCMAP__V16*/ meltfptr[15]),
(meltobject_ptr_t) ( /*_.DBIND__V36*/
@@ -22505,7 +29494,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:5996:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6120:/ clear");
/*clear *//*_.DBIND__V36*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.DSYMB__V37*/ meltfptr[36] = 0;
@@ -22521,7 +29510,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:5991:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6115:/ clear");
/*clear *//*_.CURDISJLOC__V29*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_#LIX__L8*/ meltfnum[1] = 0;
@@ -22531,16 +29520,16 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V34*/ meltfptr[30] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-genobj.melt:6007:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6131:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.GOTOTHEN__V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-genobj.melt:6007:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6131:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V44*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-genobj.melt:5978:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6102:/ clear");
/*clear *//*_.LOCMAP__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.NLOC__V17*/ meltfptr[16] = 0;
@@ -22560,11 +29549,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V25*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.RETURN___V44*/ meltfptr[40] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -22591,14 +29580,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION */
+} /*end meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -22620,7 +29609,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER_st
+ struct frame_meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -22659,7 +29648,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ getarg");
/*_.CMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -22689,7 +29678,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22712,7 +29701,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22722,7 +29711,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -22732,7 +29721,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6014;
+ argtab[2].meltbp_long = 6138;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher cmat=";
/*^apply.arg */
@@ -22757,7 +29746,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -22770,7 +29759,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -22779,7 +29768,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6014:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6138:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -22794,7 +29783,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6015:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6139:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22803,7 +29792,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CMATCHER */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:6015:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6139:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22811,7 +29800,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6015:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6139:/ cond.else");
/*^block */
/*anyblock */
@@ -22825,7 +29814,7 @@ lab_endgetargs:;
melt_assert_failed (("check cmat"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6015) ? (6015) : __LINE__, __FUNCTION__);
+ (6139) ? (6139) : __LINE__, __FUNCTION__);
;
}
;
@@ -22840,7 +29829,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6015:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6139:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -22853,7 +29842,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6016:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6140:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22862,7 +29851,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:6016:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6140:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22870,7 +29859,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6016:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6140:/ cond.else");
/*^block */
/*anyblock */
@@ -22884,7 +29873,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6016) ? (6016) : __LINE__, __FUNCTION__);
+ (6140) ? (6140) : __LINE__, __FUNCTION__);
;
}
;
@@ -22899,7 +29888,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6016:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6140:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -22912,7 +29901,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6017:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6141:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22921,7 +29910,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:6017:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6141:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22929,7 +29918,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6017:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6141:/ cond.else");
/*^block */
/*anyblock */
@@ -22943,7 +29932,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6017) ? (6017) : __LINE__, __FUNCTION__);
+ (6141) ? (6141) : __LINE__, __FUNCTION__);
;
}
;
@@ -22958,7 +29947,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6017:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6141:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -22969,10 +29958,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6018:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6142:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:6019:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6143:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 2, "AMATCH_IN");
@@ -22980,7 +29969,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6020:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6144:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND");
@@ -22988,7 +29977,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6021:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6145:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 4, "AMATCH_OUT");
@@ -22996,7 +29985,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6022:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6146:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 5, "CMATCH_STATE");
@@ -23004,7 +29993,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6023:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6147:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 6, "CMATCH_EXPTEST");
@@ -23012,7 +30001,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6024:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6148:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 7, "CMATCH_EXPFILL");
@@ -23020,7 +30009,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6026:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6150:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), 2, "MCX_NORMTESTER");
@@ -23054,11 +30043,16 @@ lab_endgetargs:;
(meltgc_new_mapobjects
((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[4])),
( /*_#I__L10*/ meltfnum[9])));;
- MELT_LOCATION ("warmelt-genobj.melt:6033:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6157:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23086,29 +30080,35 @@ lab_endgetargs:;
((1) + ( /*_#GET_INT__L12*/ meltfnum[11]));;
{
- MELT_LOCATION ("warmelt-genobj.melt:6035:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6159:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.BOXCNT__V24*/ meltfptr[23]),
( /*_#CNT__L13*/ meltfnum[12]));
}
;
/*_#LET___L11*/ meltfnum[10] = /*_#CNT__L13*/ meltfnum[12];;
- MELT_LOCATION ("warmelt-genobj.melt:6033:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6157:/ clear");
/*clear *//*_.BOXCNT__V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_#GET_INT__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_#CNT__L13*/ meltfnum[12] = 0;
/*_#MCXCOUNT__L14*/ meltfnum[11] = /*_#LET___L11*/ meltfnum[10];;
- MELT_LOCATION ("warmelt-genobj.melt:6038:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6162:/ quasiblock");
/*_.SBUF__V26*/ meltfptr[25] =
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[5])),
(char *) 0);;
- MELT_LOCATION ("warmelt-genobj.melt:6039:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMSTATE__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6163:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMSTATE__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23128,7 +30128,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6039:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6163:/ locexp");
meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V27*/
@@ -23137,12 +30137,17 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6040:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6164:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), ("_"));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6041:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6165:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23162,7 +30167,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6041:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6165:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]),
melt_string_str ((melt_ptr_t)
( /*_.MCX_SUFFIX__V28*/
@@ -23171,13 +30176,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6042:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6166:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), ("_"));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6043:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6167:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]),
( /*_#MCXCOUNT__L14*/ meltfnum[11]));
}
@@ -23191,7 +30196,7 @@ lab_endgetargs:;
/*_.LET___V25*/ meltfptr[23] = /*_.STRBUF2STRING__V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-genobj.melt:6038:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6162:/ clear");
/*clear *//*_.SBUF__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0;
@@ -23200,8 +30205,13 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.STRBUF2STRING__V29*/ meltfptr[28] = 0;
/*_.UNIQSTATE__V30*/ meltfptr[25] = /*_.LET___V25*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-genobj.melt:6046:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6170:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23221,7 +30231,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6049:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6173:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.SUBSTMAP__V23*/ meltfptr[22]),
(meltobject_ptr_t) ( /*_.CMSTATE__V19*/
@@ -23230,11 +30240,16 @@ lab_endgetargs:;
meltfptr[25]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6051:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6175:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORMTESTER__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORMTESTER__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23254,7 +30269,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23277,7 +30292,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -23287,7 +30302,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23298,7 +30313,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6052;
+ argtab[2].meltbp_long = 6176;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher nmatched=";
/*^apply.arg */
@@ -23318,7 +30333,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -23331,7 +30346,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -23340,7 +30355,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[28] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6052:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6176:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -23353,7 +30368,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[28] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6053:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6177:/ quasiblock");
/*^msend */
@@ -23372,7 +30387,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23395,7 +30410,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -23405,7 +30420,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23416,7 +30431,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6054;
+ argtab[2].meltbp_long = 6178;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher obmatched=";
/*^apply.arg */
@@ -23436,7 +30451,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -23449,7 +30464,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];;
@@ -23458,7 +30473,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[34] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6054:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6178:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -23471,8 +30486,13 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[34] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6056:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMBIND__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[10])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6180:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMBIND__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23492,7 +30512,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6055:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6179:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.SUBSTMAP__V23*/ meltfptr[22]),
(meltobject_ptr_t) ( /*_.BINDER__V42*/
@@ -23502,20 +30522,20 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6053:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6177:/ clear");
/*clear *//*_.OBMATCHED__V37*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.IFCPP___V38*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.BINDER__V42*/ meltfptr[38] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:6051:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6175:/ clear");
/*clear *//*_.NMATCHED__V32*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.IFCPP___V33*/ meltfptr[28] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23538,7 +30558,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -23548,7 +30568,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23559,7 +30579,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6060;
+ argtab[2].meltbp_long = 6184;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher normtester=";
/*^apply.arg */
@@ -23579,7 +30599,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V45*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[34] = 0;
@@ -23592,7 +30612,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[38] = /*_.IF___V44*/ meltfptr[33];;
@@ -23601,7 +30621,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[39] = /*_.PROGN___V46*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6060:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6184:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[33] = 0;
@@ -23614,8 +30634,13 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6063:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORMTESTER__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6187:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORMTESTER__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23633,7 +30658,7 @@ lab_endgetargs:;
/*_.NTMATCH_INARGS__V47*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ quasiblock");
/*^newclosure */
@@ -23670,7 +30695,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]);
;
/*_.LAMBDA___V48*/ meltfptr[28] = /*_.LAMBDA___V49*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-genobj.melt:6062:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6186:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -23688,8 +30713,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6076:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORMTESTER__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6200:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORMTESTER__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23707,7 +30737,7 @@ lab_endgetargs:;
/*_.NTMATCH_OUTLOCS__V51*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ quasiblock");
/*^newclosure */
@@ -23744,7 +30774,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]);
;
/*_.LAMBDA___V52*/ meltfptr[51] = /*_.LAMBDA___V53*/ meltfptr[52];;
- MELT_LOCATION ("warmelt-genobj.melt:6075:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6199:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -23764,7 +30794,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23787,7 +30817,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -23797,7 +30827,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23808,7 +30838,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6087;
+ argtab[2].meltbp_long = 6211;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher substmap=";
/*^apply.arg */
@@ -23828,7 +30858,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
@@ -23841,7 +30871,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];;
@@ -23850,7 +30880,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[54] = /*_.PROGN___V58*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6087:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6211:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[55] = 0;
@@ -23863,10 +30893,10 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[54] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6089:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6213:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ quasiblock");
/*^newclosure */
@@ -23903,7 +30933,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]);
;
/*_.EXPANDER__V60*/ meltfptr[56] = /*_.LAMBDA___V61*/ meltfptr[60];;
- MELT_LOCATION ("warmelt-genobj.melt:6110:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6234:/ apply");
/*apply */
{
/*_.EXPTEST__V62*/ meltfptr[61] =
@@ -23912,7 +30942,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6111:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6235:/ apply");
/*apply */
{
/*_.EXPFILL__V63*/ meltfptr[62] =
@@ -23921,8 +30951,13 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6112:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6236:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23940,7 +30975,7 @@ lab_endgetargs:;
/*_.MLOC__V64*/ meltfptr[63] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6113:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6237:/ quasiblock");
/*^rawallocobj */
@@ -23984,7 +31019,7 @@ lab_endgetargs:;
( /*_.MLOC__V64*/ meltfptr[63]), "OBCX_LOC");
;
/*_.TESTCHUNK__V65*/ meltfptr[64] = /*_.INST__V66*/ meltfptr[65];;
- MELT_LOCATION ("warmelt-genobj.melt:6117:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6241:/ quasiblock");
/*^rawallocobj */
@@ -24030,7 +31065,7 @@ lab_endgetargs:;
/*_.FILLCHUNK__V67*/ meltfptr[66] = /*_.INST__V68*/ meltfptr[67];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24053,7 +31088,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -24063,7 +31098,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -24074,7 +31109,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6122;
+ argtab[2].meltbp_long = 6246;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher exptest=";
/*^apply.arg */
@@ -24112,7 +31147,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -24125,7 +31160,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -24134,7 +31169,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[68] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6122:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6246:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -24149,7 +31184,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6124:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6248:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24162,7 +31197,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6124:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6248:/ cond.else");
/*^block */
/*anyblock */
@@ -24176,7 +31211,7 @@ lab_endgetargs:;
melt_assert_failed (("compilmatcher_cmatcher check exptest"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6124) ? (6124) : __LINE__, __FUNCTION__);
+ (6248) ? (6248) : __LINE__, __FUNCTION__);
;
}
;
@@ -24191,7 +31226,7 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = /*_.IFELSE___V74*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6124:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6248:/ clear");
/*clear *//*_.IFELSE___V74*/ meltfptr[70] = 0;
}
@@ -24200,13 +31235,13 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6125:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6249:/ quasiblock");
/*_.OTHENLIST__V76*/ meltfptr[75] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[32]))));;
- MELT_LOCATION ("warmelt-genobj.melt:6127:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6251:/ quasiblock");
/*^rawallocobj */
@@ -24245,7 +31280,7 @@ lab_endgetargs:;
/*_.OELSELIST__V79*/ meltfptr[78] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[32]))));;
- MELT_LOCATION ("warmelt-genobj.melt:6132:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6256:/ quasiblock");
/*^rawallocobj */
@@ -24279,7 +31314,7 @@ lab_endgetargs:;
( /*_.OELSELIST__V79*/ meltfptr[78]), "OBLO_BODYL");
;
/*_.OELSEBODY__V80*/ meltfptr[79] = /*_.INST__V81*/ meltfptr[80];;
- MELT_LOCATION ("warmelt-genobj.melt:6136:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6260:/ quasiblock");
/*^rawallocobj */
@@ -24336,7 +31371,7 @@ lab_endgetargs:;
/*_.OCOND__V82*/ meltfptr[81] = /*_.INST__V83*/ meltfptr[82];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24359,7 +31394,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24369,7 +31404,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24380,7 +31415,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6143;
+ argtab[2].meltbp_long = 6267;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher ocond=";
/*^apply.arg */
@@ -24400,7 +31435,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0;
@@ -24413,7 +31448,7 @@ lab_endgetargs:;
/*_.IF___V85*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];;
@@ -24422,7 +31457,7 @@ lab_endgetargs:;
/*_.IFCPP___V84*/ meltfptr[83] = /*_.PROGN___V87*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6143:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6267:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V85*/ meltfptr[84] = 0;
@@ -24437,7 +31472,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6144:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6268:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V31*/ meltfptr[26]),
(melt_ptr_t) ( /*_.OCOND__V82*/ meltfptr[81]));
}
@@ -24460,7 +31495,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24483,7 +31518,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24493,7 +31528,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -24504,7 +31539,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6148;
+ argtab[2].meltbp_long = 6272;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilmatcher_cmatcher curout=";
@@ -24531,7 +31566,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V91*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[90] = 0;
@@ -24544,7 +31579,7 @@ lab_endgetargs:;
/*_.IF___V90*/ meltfptr[89] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ quasiblock");
/*_.PROGN___V92*/ meltfptr[90] = /*_.IF___V90*/ meltfptr[89];;
@@ -24553,7 +31588,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[85] = /*_.PROGN___V92*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6148:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V90*/ meltfptr[89] = 0;
@@ -24568,7 +31603,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6149:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6273:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24578,7 +31613,7 @@ lab_endgetargs:;
( /*_.CUROUT__V88*/ meltfptr[84]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[35])));;
- MELT_LOCATION ("warmelt-genobj.melt:6149:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6273:/ cond");
/*cond */ if ( /*_#IS_A__L30*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -24586,7 +31621,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6149:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6273:/ cond.else");
/*^block */
/*anyblock */
@@ -24600,7 +31635,7 @@ lab_endgetargs:;
melt_assert_failed (("check curout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6149) ? (6149) : __LINE__,
+ (6273) ? (6273) : __LINE__,
__FUNCTION__);
;
}
@@ -24616,7 +31651,7 @@ lab_endgetargs:;
/*_.IFCPP___V93*/ meltfptr[89] = /*_.IFELSE___V94*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6149:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6273:/ clear");
/*clear *//*_#IS_A__L30*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IFELSE___V94*/ meltfptr[90] = 0;
@@ -24627,10 +31662,10 @@ lab_endgetargs:;
/*_.IFCPP___V93*/ meltfptr[89] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6150:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6274:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:6152:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6276:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROUT__V88*/ meltfptr[84]), 0, "BINDER");
@@ -24643,7 +31678,7 @@ lab_endgetargs:;
( /*_.SUBSTMAP__V23*/ meltfptr[22]),
(meltobject_ptr_t) ( /*_.BINDER__V95*/
meltfptr[90]));;
- MELT_LOCATION ("warmelt-genobj.melt:6153:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6277:/ quasiblock");
/*^rawallocobj */
@@ -24680,7 +31715,7 @@ lab_endgetargs:;
/*_.OCLEAROUT__V97*/ meltfptr[96] = /*_.INST__V98*/ meltfptr[97];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24703,7 +31738,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24713,7 +31748,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24724,7 +31759,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6156;
+ argtab[2].meltbp_long = 6280;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilmatcher_cmatcher oclearout=";
@@ -24746,7 +31781,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V101*/ meltfptr[100];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V101*/ meltfptr[100] = 0;
@@ -24759,7 +31794,7 @@ lab_endgetargs:;
/*_.IF___V100*/ meltfptr[99] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ quasiblock");
/*_.PROGN___V102*/ meltfptr[100] = /*_.IF___V100*/ meltfptr[99];;
@@ -24769,7 +31804,7 @@ lab_endgetargs:;
/*_.PROGN___V102*/ meltfptr[100];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6156:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6280:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V100*/ meltfptr[99] = 0;
@@ -24784,7 +31819,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6157:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6281:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24793,7 +31828,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.LOCOUT__V96*/ meltfptr[95])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:6157:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6281:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L33*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -24801,7 +31836,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6157:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6281:/ cond.else");
/*^block */
/*anyblock */
@@ -24815,7 +31850,7 @@ lab_endgetargs:;
melt_assert_failed (("check locout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6157) ? (6157) : __LINE__,
+ (6281) ? (6281) : __LINE__,
__FUNCTION__);
;
}
@@ -24832,7 +31867,7 @@ lab_endgetargs:;
/*_.IFELSE___V104*/ meltfptr[100];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6157:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6281:/ clear");
/*clear *//*_#IS_OBJECT__L33*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IFELSE___V104*/ meltfptr[100] = 0;
@@ -24845,7 +31880,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6158:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6282:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OTHENLIST__V76*/ meltfptr[75]),
(melt_ptr_t) ( /*_.OCLEAROUT__V97*/
@@ -24853,7 +31888,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6150:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6274:/ clear");
/*clear *//*_.BINDER__V95*/ meltfptr[90] = 0;
/*^clear */
/*clear *//*_.LOCOUT__V96*/ meltfptr[95] = 0;
@@ -24869,7 +31904,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:6145:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6269:/ clear");
/*clear *//*_.CUROUT__V88*/ meltfptr[84] = 0;
/*^clear */
/*clear *//*_#OUTIX__L27*/ meltfnum[12] = 0;
@@ -24881,13 +31916,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6161:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6285:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V76*/ meltfptr[75]),
(melt_ptr_t) ( /*_.FILLCHUNK__V67*/ meltfptr[66]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6162:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6286:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24907,14 +31947,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6162:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6286:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V76*/ meltfptr[75]),
(melt_ptr_t) ( /*_.MCX_GOTOTHEN__V105*/
meltfptr[100]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6163:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24934,7 +31979,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6163:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6287:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V79*/ meltfptr[78]),
(melt_ptr_t) ( /*_.MCX_GOTOELSE__V106*/
meltfptr[90]));
@@ -24942,7 +31987,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24965,7 +32010,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24975,7 +32020,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L35*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24986,7 +32031,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6164;
+ argtab[2].meltbp_long = 6288;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilmatcher_cmatcher final ocond=";
@@ -25007,7 +32052,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V109*/ meltfptr[98];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V109*/ meltfptr[98] = 0;
@@ -25020,7 +32065,7 @@ lab_endgetargs:;
/*_.IF___V108*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ quasiblock");
/*_.PROGN___V110*/ meltfptr[99] = /*_.IF___V108*/ meltfptr[96];;
@@ -25029,7 +32074,7 @@ lab_endgetargs:;
/*_.IFCPP___V107*/ meltfptr[95] = /*_.PROGN___V110*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6164:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6288:/ clear");
/*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V108*/ meltfptr[96] = 0;
@@ -25046,7 +32091,7 @@ lab_endgetargs:;
/*_.LET___V75*/ meltfptr[70] = /*_.IFCPP___V107*/ meltfptr[95];;
- MELT_LOCATION ("warmelt-genobj.melt:6125:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6249:/ clear");
/*clear *//*_.OTHENLIST__V76*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.OTHENBODY__V77*/ meltfptr[76] = 0;
@@ -25066,7 +32111,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V107*/ meltfptr[95] = 0;
/*_.LET___V59*/ meltfptr[55] = /*_.LET___V75*/ meltfptr[70];;
- MELT_LOCATION ("warmelt-genobj.melt:6089:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6213:/ clear");
/*clear *//*_.EXPANDER__V60*/ meltfptr[56] = 0;
/*^clear */
/*clear *//*_.EXPTEST__V62*/ meltfptr[61] = 0;
@@ -25086,7 +32131,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V75*/ meltfptr[70] = 0;
/*_.LET___V15*/ meltfptr[13] = /*_.LET___V59*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-genobj.melt:6018:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6142:/ clear");
/*clear *//*_.CMINS__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.CMBIND__V17*/ meltfptr[16] = 0;
@@ -25140,11 +32185,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V55*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.LET___V59*/ meltfptr[55] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -25171,14 +32216,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER */
+} /*end meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -25197,7 +32242,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_175_warmelt_genobj_LAMBDA___53___st
+ struct frame_meltrout_179_warmelt_genobj_LAMBDA___53___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -25236,7 +32281,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ getarg");
/*_.CURIN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -25264,7 +32309,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25287,7 +32332,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25297,7 +32342,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -25307,7 +32352,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6066;
+ argtab[2].meltbp_long = 6190;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher curin=";
/*^apply.arg */
@@ -25337,7 +32382,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -25350,7 +32395,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -25359,7 +32404,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6066:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6190:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -25374,7 +32419,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6067:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6191:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25383,7 +32428,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.FORMIN__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:6067:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6191:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -25391,7 +32436,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6067:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6191:/ cond.else");
/*^block */
/*anyblock */
@@ -25405,7 +32450,7 @@ lab_endgetargs:;
melt_assert_failed (("check formin"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6067) ? (6067) : __LINE__, __FUNCTION__);
+ (6191) ? (6191) : __LINE__, __FUNCTION__);
;
}
;
@@ -25420,7 +32465,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6067:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6191:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -25431,7 +32476,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6068:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6192:/ quasiblock");
/*^msend */
@@ -25451,7 +32496,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25474,7 +32519,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25484,7 +32529,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25494,7 +32539,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6069;
+ argtab[2].meltbp_long = 6193;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher oin=";
/*^apply.arg */
@@ -25514,7 +32559,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
@@ -25527,7 +32572,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
@@ -25536,7 +32581,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6069:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6193:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -25549,8 +32594,13 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6071:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMIN__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6195:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMIN__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25570,7 +32620,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6070:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6194:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~SUBSTMAP */ meltfclos->tabval[1])),
(meltobject_ptr_t) ( /*_.BINDER__V15*/
@@ -25579,7 +32629,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6068:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6192:/ clear");
/*clear *//*_.OIN__V10*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
@@ -25587,7 +32637,7 @@ lab_endgetargs:;
/*clear *//*_.BINDER__V15*/ meltfptr[11] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -25603,14 +32653,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_175_warmelt_genobj_LAMBDA___53__ */
+} /*end meltrout_179_warmelt_genobj_LAMBDA___53__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -25629,7 +32679,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_176_warmelt_genobj_LAMBDA___54___st
+ struct frame_meltrout_180_warmelt_genobj_LAMBDA___54___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -25668,7 +32718,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ getarg");
/*_.CUROUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -25696,7 +32746,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25719,7 +32769,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25729,7 +32779,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -25739,7 +32789,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6079;
+ argtab[2].meltbp_long = 6203;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher curout=";
/*^apply.arg */
@@ -25769,7 +32819,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -25782,7 +32832,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -25791,7 +32841,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6079:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6203:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -25806,7 +32856,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6080:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6204:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25815,7 +32865,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.FORMOUT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:6080:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6204:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -25823,7 +32873,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6080:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6204:/ cond.else");
/*^block */
/*anyblock */
@@ -25837,7 +32887,7 @@ lab_endgetargs:;
melt_assert_failed (("check formout"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6080) ? (6080) : __LINE__, __FUNCTION__);
+ (6204) ? (6204) : __LINE__, __FUNCTION__);
;
}
;
@@ -25852,7 +32902,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6080:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6204:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -25863,7 +32913,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6081:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6205:/ quasiblock");
/*^msend */
@@ -25883,7 +32933,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25906,7 +32956,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25916,7 +32966,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -25926,7 +32976,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6082;
+ argtab[2].meltbp_long = 6206;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_cmatcher oout=";
/*^apply.arg */
@@ -25951,7 +33001,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
@@ -25964,7 +33014,7 @@ lab_endgetargs:;
/*_.IF___V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
@@ -25973,7 +33023,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6082:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6206:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -25986,8 +33036,13 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6084:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMOUT__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6208:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMOUT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26007,7 +33062,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6083:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6207:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~SUBSTMAP */ meltfclos->tabval[1])),
(meltobject_ptr_t) ( /*_.BINDER__V15*/
@@ -26016,7 +33071,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6081:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6205:/ clear");
/*clear *//*_.OOUT__V10*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
@@ -26024,7 +33079,7 @@ lab_endgetargs:;
/*clear *//*_.BINDER__V15*/ meltfptr[11] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -26040,14 +33095,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_176_warmelt_genobj_LAMBDA___54__ */
+} /*end meltrout_180_warmelt_genobj_LAMBDA___54__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -26066,7 +33121,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_177_warmelt_genobj_LAMBDA___55___st
+ struct frame_meltrout_181_warmelt_genobj_LAMBDA___55___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -26105,7 +33160,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ getarg");
/*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -26115,7 +33170,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ quasiblock");
/*^newclosure */
@@ -26152,7 +33207,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*~MCX */ meltfclos->tabval[1]));
;
/*_.LAMBDA___V3*/ meltfptr[2] = /*_.LAMBDA___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-genobj.melt:6092:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6216:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -26167,11 +33222,11 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_MAP__V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -26192,14 +33247,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_177_warmelt_genobj_LAMBDA___55__ */
+} /*end meltrout_181_warmelt_genobj_LAMBDA___55__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -26218,7 +33273,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_178_warmelt_genobj_LAMBDA___56___st
+ struct frame_meltrout_182_warmelt_genobj_LAMBDA___56___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -26257,7 +33312,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ getarg");
/*_.C__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -26271,7 +33326,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->
tabval[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:6096:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6220:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26279,7 +33334,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:6097:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6221:/ quasiblock");
/*_.R__V5*/ meltfptr[4] =
@@ -26291,7 +33346,7 @@ lab_endgetargs:;
/*_#NULL__L2*/ meltfnum[1] =
(( /*_.R__V5*/ meltfptr[4]) == NULL);;
- MELT_LOCATION ("warmelt-genobj.melt:6098:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6222:/ cond");
/*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -26299,8 +33354,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:6099:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MCX */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6223:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MCX */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26318,8 +33379,14 @@ lab_endgetargs:;
/*_.MCX_LOC__V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6100:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6224:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.C__V2*/
+ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26339,7 +33406,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6099:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6223:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.MCX_LOC__V6*/ meltfptr[5]),
("invalid symbol to expand for cmatcher"),
@@ -26349,7 +33416,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6098:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6222:/ clear");
/*clear *//*_.MCX_LOC__V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V7*/ meltfptr[6] = 0;
@@ -26359,14 +33426,14 @@ lab_endgetargs:;
;
/*_.LET___V4*/ meltfptr[3] = /*_.R__V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-genobj.melt:6097:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6221:/ clear");
/*clear *//*_.R__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_#NULL__L2*/ meltfnum[1] = 0;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.LET___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6096:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6220:/ clear");
/*clear *//*_.LET___V4*/ meltfptr[3] = 0;
}
;
@@ -26381,7 +33448,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L3*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-genobj.melt:6102:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6226:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -26389,8 +33456,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:6103:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MCX */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6227:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MCX */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26412,7 +33485,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-genobj.melt:6103:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6227:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.MCX_LOC__V9*/ meltfptr[6]),
("invalid object to expand for cmatcher"),
@@ -26422,7 +33495,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V8*/ meltfptr[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6102:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6226:/ clear");
/*clear *//*_.MCX_LOC__V9*/ meltfptr[6] = 0;
}
;
@@ -26437,7 +33510,7 @@ lab_endgetargs:;
/*_#IS_STRING__L4*/ meltfnum[3] =
(melt_magic_discr ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1]))
== MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-genobj.melt:6105:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6229:/ cond");
/*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -26458,7 +33531,7 @@ lab_endgetargs:;
/*_.MAKE_STRING__V11*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6105:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6229:/ clear");
/*clear *//*_.MAKE_STRING__V11*/ meltfptr[3] = 0;
}
;
@@ -26470,8 +33543,15 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:6108:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MCX */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6232:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MCX */
+ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26491,19 +33571,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6108:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6232:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.MCX_LOC__V12*/ meltfptr[6]),
("invalid stuff to expand for cmatcher"),
(melt_ptr_t) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6107:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6231:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6105:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6229:/ clear");
/*clear *//*_.MCX_LOC__V12*/ meltfptr[6] = 0;
}
;
@@ -26513,7 +33593,7 @@ lab_endgetargs:;
/*_.IFELSE___V10*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6102:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6226:/ clear");
/*clear *//*_#IS_STRING__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0;
@@ -26524,7 +33604,7 @@ lab_endgetargs:;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V8*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6096:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6220:/ clear");
/*clear *//*_#IS_OBJECT__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[5] = 0;
@@ -26532,11 +33612,11 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -26557,14 +33637,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_178_warmelt_genobj_LAMBDA___56__ */
+} /*end meltrout_182_warmelt_genobj_LAMBDA___56__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -26589,7 +33669,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER_st
+ struct frame_meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -26628,7 +33708,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ getarg");
/*_.FMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -26658,7 +33738,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26681,7 +33761,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26691,7 +33771,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -26701,7 +33781,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6176;
+ argtab[2].meltbp_long = 6300;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_funmatcher fmat=";
/*^apply.arg */
@@ -26726,7 +33806,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -26739,7 +33819,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -26748,7 +33828,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6176:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -26763,7 +33843,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6177:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6301:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26772,7 +33852,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_FUNMATCHER */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-genobj.melt:6177:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6301:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -26780,7 +33860,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6177:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6301:/ cond.else");
/*^block */
/*anyblock */
@@ -26794,7 +33874,7 @@ lab_endgetargs:;
melt_assert_failed (("check fmat"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6177) ? (6177) : __LINE__, __FUNCTION__);
+ (6301) ? (6301) : __LINE__, __FUNCTION__);
;
}
;
@@ -26809,7 +33889,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6177:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6301:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -26822,7 +33902,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6178:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6302:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26831,7 +33911,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-genobj.melt:6178:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6302:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26839,7 +33919,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6178:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6302:/ cond.else");
/*^block */
/*anyblock */
@@ -26853,7 +33933,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6178) ? (6178) : __LINE__, __FUNCTION__);
+ (6302) ? (6302) : __LINE__, __FUNCTION__);
;
}
;
@@ -26868,7 +33948,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6178:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6302:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -26881,7 +33961,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6179:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6303:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26890,7 +33970,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-genobj.melt:6179:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6303:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -26898,7 +33978,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6179:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6303:/ cond.else");
/*^block */
/*anyblock */
@@ -26912,7 +33992,7 @@ lab_endgetargs:;
melt_assert_failed (("check gcx"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6179) ? (6179) : __LINE__, __FUNCTION__);
+ (6303) ? (6303) : __LINE__, __FUNCTION__);
;
}
;
@@ -26927,7 +34007,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6179:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6303:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -26938,10 +34018,10 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6180:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6304:/ quasiblock");
- MELT_LOCATION ("warmelt-genobj.melt:6181:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6305:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 2, "AMATCH_IN");
@@ -26949,7 +34029,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6182:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6306:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND");
@@ -26957,7 +34037,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6183:/ getslot");
+ MELT_LOCATION ("warmelt-genobj.melt:6307:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 4, "AMATCH_OUT");
@@ -26965,8 +34045,13 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-genobj.melt:6184:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6308:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26984,8 +34069,13 @@ lab_endgetargs:;
/*_.NTMA__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6186:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6310:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27003,8 +34093,13 @@ lab_endgetargs:;
/*_.OLIST__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6187:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6311:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27024,7 +34119,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27047,7 +34142,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -27057,7 +34152,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27067,7 +34162,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6189;
+ argtab[2].meltbp_long = 6313;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_funmatcher ntma=";
/*^apply.arg */
@@ -27087,7 +34182,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -27100,7 +34195,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -27109,7 +34204,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6189:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6313:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -27124,7 +34219,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6190:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6314:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27133,7 +34228,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-genobj.melt:6190:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6314:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -27141,7 +34236,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-genobj.melt:6190:/ cond.else");
+ MELT_LOCATION ("warmelt-genobj.melt:6314:/ cond.else");
/*^block */
/*anyblock */
@@ -27155,7 +34250,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntma"),
("warmelt-genobj.melt")
? ("warmelt-genobj.melt") : __FILE__,
- (6190) ? (6190) : __LINE__, __FUNCTION__);
+ (6314) ? (6314) : __LINE__, __FUNCTION__);
;
}
;
@@ -27170,7 +34265,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6190:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6314:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
@@ -27181,11 +34276,16 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6191:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6315:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTMA__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27203,7 +34303,7 @@ lab_endgetargs:;
/*_.MATNDATA__V27*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6192:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6316:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -27217,8 +34317,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6193:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6317:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTMA__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27236,7 +34341,7 @@ lab_endgetargs:;
/*_.NMATCHED__V29*/ meltfptr[28] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6194:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6318:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -27250,8 +34355,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6195:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6319:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTMA__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27269,8 +34379,13 @@ lab_endgetargs:;
/*_.NINS__V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6196:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6320:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTMA__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27288,7 +34403,7 @@ lab_endgetargs:;
/*_.NOUTS__V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ quasiblock");
/*^newclosure */
@@ -27312,7 +34427,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]);
;
/*_.LAMBDA___V33*/ meltfptr[32] = /*_.LAMBDA___V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-genobj.melt:6197:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6321:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27328,7 +34443,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ quasiblock");
/*^newclosure */
@@ -27352,7 +34467,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]);
;
/*_.LAMBDA___V36*/ meltfptr[35] = /*_.LAMBDA___V37*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-genobj.melt:6202:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6326:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27368,7 +34483,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6207:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6331:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27383,7 +34498,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6208:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6332:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27401,7 +34516,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27424,7 +34539,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -27434,7 +34549,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ apply");
/*apply */
{
union meltparam_un argtab[31];
@@ -27445,7 +34560,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6210;
+ argtab[2].meltbp_long = 6334;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_funmatcher matndata=";
/*^apply.arg */
@@ -27543,7 +34658,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0;
@@ -27556,7 +34671,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[41] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];;
@@ -27565,7 +34680,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6210:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6334:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V42*/ meltfptr[41] = 0;
@@ -27578,7 +34693,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-genobj.melt:6217:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6341:/ quasiblock");
/*_#MULTIPLE_LENGTH__L11*/ meltfnum[1] =
@@ -27593,7 +34708,7 @@ lab_endgetargs:;
(meltgc_new_multiple
((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[14])),
( /*_#I__L12*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-genobj.melt:6221:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:6345:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -27649,7 +34764,7 @@ lab_endgetargs:;
/*_.LIST___V46*/ meltfptr[42] = /*_.LIST___V48*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6221:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6345:/ clear");
/*clear *//*_.OTESTCLOS__V47*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.LIST___V48*/ meltfptr[47] = 0;
@@ -27659,7 +34774,7 @@ lab_endgetargs:;
/*clear *//*_.LIST___V48*/ meltfptr[47] = 0;
} /*end multiallocblock */
;
- MELT_LOCATION ("warmelt-genobj.melt:6219:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6343:/ quasiblock");
/*^rawallocobj */
@@ -27712,7 +34827,7 @@ lab_endgetargs:;
"OGETSL_FIELD");
;
/*_.OGETCLOS__V49*/ meltfptr[46] = /*_.INST__V50*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-genobj.melt:6227:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-genobj.melt:6351:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_2_st
@@ -27768,7 +34883,7 @@ lab_endgetargs:;
/*_.LIST___V51*/ meltfptr[50] = /*_.LIST___V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6227:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6351:/ clear");
/*clear *//*_.OTESTRES__V52*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_.LIST___V53*/ meltfptr[52] = 0;
@@ -27778,7 +34893,7 @@ lab_endgetargs:;
/*clear *//*_.LIST___V53*/ meltfptr[52] = 0;
} /*end multiallocblock */
;
- MELT_LOCATION ("warmelt-genobj.melt:6225:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6349:/ quasiblock");
/*^rawallocobj */
@@ -27844,7 +34959,7 @@ lab_endgetargs:;
/*_.OTHENLIST__V56*/ meltfptr[55] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[18]))));;
- MELT_LOCATION ("warmelt-genobj.melt:6233:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6357:/ quasiblock");
/*^rawallocobj */
@@ -27883,7 +34998,7 @@ lab_endgetargs:;
/*_.OELSELIST__V59*/ meltfptr[58] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[18]))));;
- MELT_LOCATION ("warmelt-genobj.melt:6238:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6362:/ quasiblock");
/*^rawallocobj */
@@ -27917,7 +35032,7 @@ lab_endgetargs:;
( /*_.OELSELIST__V59*/ meltfptr[58]), "OBLO_BODYL");
;
/*_.OELSEBODY__V60*/ meltfptr[59] = /*_.INST__V61*/ meltfptr[60];;
- MELT_LOCATION ("warmelt-genobj.melt:6242:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6366:/ quasiblock");
/*^rawallocobj */
@@ -27973,7 +35088,7 @@ lab_endgetargs:;
/*_.OCOND__V62*/ meltfptr[61] = /*_.INST__V63*/ meltfptr[62];;
{
- MELT_LOCATION ("warmelt-genobj.melt:6249:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6373:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.OARGS__V45*/ meltfptr[41]),
(0),
(melt_ptr_t) ( /*_.OMATDATA__V28*/
@@ -27982,7 +35097,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6250:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6374:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.OARGS__V45*/ meltfptr[41]),
(1),
(melt_ptr_t) ( /*_.OMATCHED__V30*/
@@ -28009,7 +35124,7 @@ lab_endgetargs:;
(( /*_#INIX__L13*/ meltfnum[12]) + (2));;
{
- MELT_LOCATION ("warmelt-genobj.melt:6254:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6378:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.OARGS__V45*/ meltfptr[41]),
( /*_#I__L14*/ meltfnum[13]),
@@ -28023,7 +35138,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:6251:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6375:/ clear");
/*clear *//*_.CURINS__V64*/ meltfptr[63] = 0;
/*^clear */
/*clear *//*_#INIX__L13*/ meltfnum[12] = 0;
@@ -28047,7 +35162,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-genobj.melt:6260:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6384:/ quasiblock");
/*^quasiblock */
@@ -28087,7 +35202,7 @@ lab_endgetargs:;
/*_.OBCL__V66*/ meltfptr[65] = /*_.INST__V67*/ meltfptr[66];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28110,7 +35225,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -28120,7 +35235,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28131,7 +35246,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6263;
+ argtab[2].meltbp_long = 6387;
/*^apply.arg */
argtab[3].meltbp_cstring =
"compilmatcher_funmatcher obcl=";
@@ -28153,7 +35268,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V70*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[69] = 0;
@@ -28166,7 +35281,7 @@ lab_endgetargs:;
/*_.IF___V69*/ meltfptr[68] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ quasiblock");
/*_.PROGN___V71*/ meltfptr[69] = /*_.IF___V69*/ meltfptr[68];;
@@ -28175,7 +35290,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[67] = /*_.PROGN___V71*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6263:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6387:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V69*/ meltfptr[68] = 0;
@@ -28190,14 +35305,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6264:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6388:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.OELSELIST__V59*/ meltfptr[58]),
(melt_ptr_t) ( /*_.OBCL__V66*/ meltfptr[65]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6260:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6384:/ clear");
/*clear *//*_.OBCL__V66*/ meltfptr[65] = 0;
/*^clear */
/*clear *//*_.IFCPP___V68*/ meltfptr[67] = 0;
@@ -28207,13 +35322,13 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-genobj.melt:6257:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6381:/ clear");
/*clear *//*_.CUROUTS__V65*/ meltfptr[64] = 0;
/*^clear */
/*clear *//*_#OUTIX__L15*/ meltfnum[14] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-genobj.melt:6267:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6391:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -28228,7 +35343,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6268:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6392:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -28243,8 +35358,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6270:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6394:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28264,14 +35384,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6270:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6394:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V56*/ meltfptr[55]),
(melt_ptr_t) ( /*_.MCX_GOTOTHEN__V74*/
meltfptr[65]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6271:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-genobj.melt:6395:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCX__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28291,7 +35416,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6271:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6395:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V59*/ meltfptr[58]),
(melt_ptr_t) ( /*_.MCX_GOTOELSE__V75*/
meltfptr[67]));
@@ -28299,7 +35424,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ cppif.then");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28322,7 +35447,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ cond");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -28332,7 +35457,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ apply");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -28343,7 +35468,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-genobj.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6272;
+ argtab[2].meltbp_long = 6396;
/*^apply.arg */
argtab[3].meltbp_cstring = "compilmatcher_funmatcher ogetclos=";
/*^apply.arg */
@@ -28375,7 +35500,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V78*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V78*/ meltfptr[77] = 0;
@@ -28388,7 +35513,7 @@ lab_endgetargs:;
/*_.IF___V77*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ quasiblock");
/*_.PROGN___V79*/ meltfptr[77] = /*_.IF___V77*/ meltfptr[76];;
@@ -28397,7 +35522,7 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[75] = /*_.PROGN___V79*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6396:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V77*/ meltfptr[76] = 0;
@@ -28412,27 +35537,27 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6274:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6398:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.OGETCLOS__V49*/ meltfptr[46]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6275:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6399:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.OMAPP__V54*/ meltfptr[51]));
}
;
{
- MELT_LOCATION ("warmelt-genobj.melt:6276:/ locexp");
+ MELT_LOCATION ("warmelt-genobj.melt:6400:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.OCOND__V62*/ meltfptr[61]));
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6217:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6341:/ clear");
/*clear *//*_#MULTIPLE_LENGTH__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#I__L12*/ meltfnum[0] = 0;
@@ -28467,7 +35592,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V76*/ meltfptr[75] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:6191:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6315:/ clear");
/*clear *//*_.MATNDATA__V27*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.OMATDATA__V28*/ meltfptr[27] = 0;
@@ -28494,7 +35619,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V41*/ meltfptr[40] = 0;
- MELT_LOCATION ("warmelt-genobj.melt:6180:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6304:/ clear");
/*clear *//*_.FMINS__V15*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.FMBIND__V16*/ meltfptr[15] = 0;
@@ -28512,7 +35637,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ clear");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
@@ -28532,14 +35657,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER */
+} /*end meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -28558,7 +35683,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_180_warmelt_genobj_LAMBDA___57___st
+ struct frame_meltrout_184_warmelt_genobj_LAMBDA___57___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -28597,7 +35722,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ getarg");
/*_.THEIN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -28607,7 +35732,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:6200:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6324:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -28622,11 +35747,11 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -28645,14 +35770,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_180_warmelt_genobj_LAMBDA___57__ */
+} /*end meltrout_184_warmelt_genobj_LAMBDA___57__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -28671,7 +35796,7 @@ meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_181_warmelt_genobj_LAMBDA___58___st
+ struct frame_meltrout_185_warmelt_genobj_LAMBDA___58___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -28710,7 +35835,7 @@ meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ getarg");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ getarg");
/*_.THEOUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -28720,7 +35845,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-genobj.melt:6205:/ msend");
+ MELT_LOCATION ("warmelt-genobj.melt:6329:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -28735,11 +35860,11 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ finalreturn");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -28758,7 +35883,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_181_warmelt_genobj_LAMBDA___58__ */
+} /*end meltrout_185_warmelt_genobj_LAMBDA___58__ */
diff --git a/gcc/melt/generated/warmelt-genobj+meltdesc.c b/gcc/melt/generated/warmelt-genobj+meltdesc.c
index 869fff3ce3b..507fa36ff89 100644
--- a/gcc/melt/generated/warmelt-genobj+meltdesc.c
+++ b/gcc/melt/generated/warmelt-genobj+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-genobj */
@@ -12,18 +12,18 @@ const char melt_modulename[]="warmelt-genobj";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-genobj";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="926c023d74e8f6c7a39fdc4ca8ab4924";
+const char melt_primaryhexmd5[]="e05222c0c21cfcde87a32e428ccd5e03";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+01.c #1 */ "5091b6822729c7300e8f78b2b4ef7c3e",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+02.c #2 */ "66d8375d611c2635ca079c9e692285dc",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+03.c #3 */ "bc50a4f23eb5afab85f42be816752721",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+04.c #4 */ "846ef865df44aba0d46aa4c86bf3943a",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+05.c #5 */ "8f79851668714f7d99cf9f19b941ef70",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+01.c #1 */ "43d3cd58985c3f7d9a3c5732703eadd2",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+02.c #2 */ "d6ef27b24e664892a9e6134c3d05a059",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+03.c #3 */ "4967d9b1f51f0b723bc208b74912191b",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+04.c #4 */ "08e780567286f56543c573c3497b21f1",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+05.c #5 */ "1ffadaff047f573c99ad93f5d728225c",
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -31,9 +31,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=5;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="19703689e360867bba7e3d7a10a6e00d" ;
+const char melt_cumulated_hexmd5[]="f34b6a2cd3dd0a5c486860929315f9b6" ;
/* include the timestamp file */
-#define meltmod_warmelt_genobj_mds__19703689e360867bba7e3d7a10a6e00d 1
+#define meltmod_warmelt_genobj_mds__f34b6a2cd3dd0a5c486860929315f9b6 1
#include "warmelt-genobj+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-genobj+melttime.h b/gcc/melt/generated/warmelt-genobj+melttime.h
index 0289da938ba..2ca44bf0946 100644
--- a/gcc/melt/generated/warmelt-genobj+melttime.h
+++ b/gcc/melt/generated/warmelt-genobj+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-genobj+melttime.h is included from warmelt-genobj+meltdesc.c only. */
-#if meltmod_warmelt_genobj_mds__19703689e360867bba7e3d7a10a6e00d
+#if meltmod_warmelt_genobj_mds__f34b6a2cd3dd0a5c486860929315f9b6
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-genobj */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:25 2012 CET";
-const long long melt_gen_timenum=1328609125;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:27 2012 CET";
+const long long melt_gen_timenum=1329219207;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_genobj_mds__19703689e360867bba7e3d7a10a6e00d */
+#else /* ! meltmod_warmelt_genobj_mds__f34b6a2cd3dd0a5c486860929315f9b6 */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-genobj
-#endif /* meltmod_warmelt_genobj_mds__19703689e360867bba7e3d7a10a6e00d */
+#endif /* meltmod_warmelt_genobj_mds__f34b6a2cd3dd0a5c486860929315f9b6 */
diff --git a/gcc/melt/generated/warmelt-genobj.c b/gcc/melt/generated/warmelt-genobj.c
index c9884758bb0..ca9d81908fe 100644
--- a/gcc/melt/generated/warmelt-genobj.c
+++ b/gcc/melt/generated/warmelt-genobj.c
@@ -1707,7 +1707,26 @@ meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
+meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1726,7 +1745,7 @@ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1741,7 +1760,7 @@ meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
+meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1750,7 +1769,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
+meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1769,7 +1788,7 @@ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1784,7 +1803,7 @@ meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
+meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1800,7 +1819,7 @@ meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
+meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1815,7 +1834,7 @@ meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
+meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1831,7 +1850,7 @@ meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
+meltrout_122_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1844,7 +1863,7 @@ meltrout_121_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
+meltrout_123_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1857,7 +1876,7 @@ meltrout_122_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
+meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1873,7 +1892,7 @@ meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
+meltrout_125_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1886,7 +1905,7 @@ meltrout_124_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
+meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1905,7 +1924,7 @@ meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
+meltrout_127_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1918,7 +1937,7 @@ meltrout_126_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
+meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1933,7 +1952,7 @@ meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
+meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1948,7 +1967,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
+meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1967,7 +1986,7 @@ meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1980,7 +1999,7 @@ meltrout_130_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1993,7 +2012,7 @@ meltrout_131_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2006,7 +2025,7 @@ meltrout_132_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
+meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2015,7 +2034,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
+meltrout_135_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2047,7 @@ meltrout_134_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
+meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2044,7 +2063,7 @@ meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
+meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2060,7 +2079,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2075,7 +2094,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2088,7 +2107,7 @@ meltrout_138_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2101,7 +2120,7 @@ meltrout_139_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
+meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2117,7 +2136,7 @@ meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
+meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2136,7 +2155,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
+meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2152,7 +2171,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
+meltrout_144_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2165,7 +2184,7 @@ meltrout_143_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
+meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2181,7 +2200,7 @@ meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
+meltrout_146_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2194,7 +2213,7 @@ meltrout_145_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2203,7 +2222,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
+meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2212,7 +2231,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
+meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2233,7 +2252,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
+meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2242,7 +2261,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
+meltrout_151_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2255,7 +2274,7 @@ meltrout_150_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
+meltrout_152_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2268,7 +2287,7 @@ meltrout_151_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
+meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2283,7 +2302,7 @@ meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
+meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2299,7 +2318,7 @@ meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
+meltrout_155_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2312,7 +2331,7 @@ meltrout_154_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
+meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2331,7 +2350,7 @@ meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
+meltrout_157_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2344,7 +2363,7 @@ meltrout_156_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
+meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2363,7 +2382,26 @@ meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
+meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2382,7 +2420,45 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
+meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2398,7 +2474,7 @@ meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
+meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2414,7 +2490,7 @@ meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2505,7 @@ meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
+meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2444,7 +2520,7 @@ meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
+meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2463,7 +2539,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
+meltrout_168_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2476,7 +2552,7 @@ meltrout_164_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
+meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2495,7 +2571,7 @@ meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
+meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2514,7 +2590,7 @@ meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
+meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2533,7 +2609,7 @@ meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
+meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2552,7 +2628,7 @@ meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
+meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2571,7 +2647,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
+meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2590,7 +2666,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
+meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2609,7 +2685,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
+meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2630,7 +2706,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
+meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -2639,7 +2715,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
+meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -2655,7 +2731,7 @@ meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
+meltrout_179_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2668,7 +2744,7 @@ meltrout_175_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
+meltrout_180_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2681,7 +2757,7 @@ meltrout_176_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
+meltrout_181_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2694,7 +2770,7 @@ meltrout_177_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
+meltrout_182_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2707,7 +2783,7 @@ meltrout_178_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
+meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -2726,7 +2802,7 @@ meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
+meltrout_184_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2739,7 +2815,7 @@ meltrout_180_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_181_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
+meltrout_185_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -5922,8 +5998,8 @@ typedef struct frame_start_module_melt_st
void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int);
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 1936
- void *mcfr_varptr[1936];
+#define MELTFRAM_NBVARPTR 1957
+ void *mcfr_varptr[1957];
/*no varnum*/
#define MELTFRAM_NBVARNUM /*none*/0
/*others*/
@@ -5940,7 +6016,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_genobj iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -3223);
+ iniframp__->mcfr_nbvar == /*minihash */ -675);
struct cdata_st
{
@@ -7320,333 +7396,347 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
struct MELT_STRING_STRUCT (16) dstr_1361__CLASS_NREP_IFISA;
struct MELT_OBJECT_STRUCT (3) dsym_1362__CLASS_NREP_IFTESTVALUE;
struct MELT_STRING_STRUCT (22) dstr_1363__CLASS_NREP_IFTES;
- struct MELT_ROUTINE_STRUCT (14) drout_1364__COMPILOBJ_NREP_IFVARIADIC;
- struct MELT_CLOSURE_STRUCT (0) dclo_1365__COMPILOBJ_NREP_IFVARIADIC;
- struct MELT_OBJECT_STRUCT (3) dsym_1366__CLASS_NREP_IFVARIADIC;
- struct MELT_STRING_STRUCT (21) dstr_1367__CLASS_NREP_IFVAR;
- struct MELT_ROUTINE_STRUCT (2) drout_1368__GETCTYPE_IFVARIADIC;
- struct MELT_CLOSURE_STRUCT (0) dclo_1369__GETCTYPE_IFVARIADIC;
+ struct MELT_ROUTINE_STRUCT (8) drout_1364__COMPILOBJ_NREP_IFTUPLESIZED;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1365__COMPILOBJ_NREP_IFTUPLESIZED;
+ struct MELT_OBJECT_STRUCT (3) dsym_1366__CLASS_NREP_IFTUPLESIZED;
+ struct MELT_STRING_STRUCT (23) dstr_1367__CLASS_NREP_IFTUP;
+ struct MELT_ROUTINE_STRUCT (14) drout_1368__COMPILOBJ_NREP_IFVARIADIC;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1369__COMPILOBJ_NREP_IFVARIADIC;
+ struct MELT_OBJECT_STRUCT (3) dsym_1370__CLASS_NREP_IFVARIADIC;
+ struct MELT_STRING_STRUCT (21) dstr_1371__CLASS_NREP_IFVAR;
+ struct MELT_ROUTINE_STRUCT (2) drout_1372__GETCTYPE_IFVARIADIC;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1373__GETCTYPE_IFVARIADIC;
struct MELT_ROUTINE_STRUCT (9)
- drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
+ drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1371__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
- struct MELT_OBJECT_STRUCT (3) dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT;
- struct MELT_STRING_STRUCT (28) dstr_1373__CLASS_NREP_VARIA;
+ dclo_1375__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT;
+ struct MELT_STRING_STRUCT (28) dstr_1377__CLASS_NREP_VARIA;
struct MELT_ROUTINE_STRUCT (13)
- drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC;
- struct MELT_CLOSURE_STRUCT (0) dclo_1375__COMPILOBJ_NREP_CONSUMEVARIADIC;
- struct MELT_OBJECT_STRUCT (3) dsym_1376__CLASS_NREP_CONSUME_VARIADIC;
- struct MELT_STRING_STRUCT (27) dstr_1377__CLASS_NREP_CONSU;
- struct MELT_ROUTINE_STRUCT (3) drout_1378__PUTOBJDEST_OBJCOND;
- struct MELT_CLOSURE_STRUCT (0) dclo_1379__PUTOBJDEST_OBJCOND;
- struct MELT_ROUTINE_STRUCT (5) drout_1380__COMPILOBJ_NREP_CPPIF;
- struct MELT_CLOSURE_STRUCT (0) dclo_1381__COMPILOBJ_NREP_CPPIF;
- struct MELT_OBJECT_STRUCT (3) dsym_1382__CLASS_NREP_CPPIF;
- struct MELT_STRING_STRUCT (16) dstr_1383__CLASS_NREP_CPPIF;
- struct MELT_ROUTINE_STRUCT (3) drout_1384__PUTOBJDEST_OBJCPPIF;
- struct MELT_CLOSURE_STRUCT (0) dclo_1385__PUTOBJDEST_OBJCPPIF;
- struct MELT_ROUTINE_STRUCT (14) drout_1386__COMPILOBJ_NREP_RETURN;
- struct MELT_CLOSURE_STRUCT (0) dclo_1387__COMPILOBJ_NREP_RETURN;
- struct MELT_OBJECT_STRUCT (3) dsym_1388__CLASS_NREP_RETURN;
- struct MELT_STRING_STRUCT (17) dstr_1389__CLASS_NREP_RETUR;
- struct MELT_ROUTINE_STRUCT (3) drout_1390__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1391__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1392__DISCRCLOSURE_OBJPREDEF;
- struct MELT_STRING_STRUCT (22) dstr_1393__DISCRCLOSURE_OBJ;
- struct MELT_OBJECT_STRUCT (2) dobj_1394__DISCRCLOSURE_OBJPREDEF;
- struct MELT_OBJECT_STRUCT (3) dsym_1395__DISCR_CLOSURE;
- struct MELT_STRING_STRUCT (13) dstr_1396__DISCR_CLOSURE;
- struct MELT_ROUTINE_STRUCT (16) drout_1397__COMPILOBJ_NREP_LAMBDA;
- struct MELT_CLOSURE_STRUCT (0) dclo_1398__COMPILOBJ_NREP_LAMBDA;
- struct MELT_OBJECT_STRUCT (3) dsym_1399__CLASS_NREP_LAMBDA;
- struct MELT_STRING_STRUCT (17) dstr_1400__CLASS_NREP_LAMBD;
- struct MELT_ROUTINE_STRUCT (3) drout_1401__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (19) drout_1402__COMPILOBJ_NREP_MAKEINST;
- struct MELT_CLOSURE_STRUCT (0) dclo_1403__COMPILOBJ_NREP_MAKEINST;
- struct MELT_OBJECT_STRUCT (3) dsym_1404__CLASS_NREP_INSTANCE;
- struct MELT_STRING_STRUCT (19) dstr_1405__CLASS_NREP_INSTA;
- struct MELT_OBJECT_STRUCT (3) dsym_1406__INST;
- struct MELT_STRING_STRUCT (4) dstr_1407__INST;
- struct MELT_ROUTINE_STRUCT (6) drout_1408__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (3) drout_1409__COMPILOBJ_ROUTPROC;
- struct MELT_CLOSURE_STRUCT (0) dclo_1410__COMPILOBJ_ROUTPROC;
- struct MELT_ROUTINE_STRUCT (3) drout_1411__COMPILOBJ_PREDEF;
- struct MELT_CLOSURE_STRUCT (0) dclo_1412__COMPILOBJ_PREDEF;
- struct MELT_OBJECT_STRUCT (3) dsym_1413__CLASS_NREP_PREDEF;
- struct MELT_STRING_STRUCT (17) dstr_1414__CLASS_NREP_PREDE;
- struct MELT_ROUTINE_STRUCT (32) drout_1415__COMPIL_DATA_AND_SLOTS_FILL;
- struct MELT_CLOSURE_STRUCT (0) dclo_1416__COMPIL_DATA_AND_SLOTS_FILL;
- struct MELT_OBJECT_STRUCT (3) dsym_1417__VALDATA_;
- struct MELT_STRING_STRUCT (9) dstr_1418__VALDATA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1419__VALUEDATA_;
- struct MELT_STRING_STRUCT (11) dstr_1420__VALUEDATA_;
- struct MELT_STRING_STRUCT (17) dstr_1421__fill_predef_slot;
- struct MELT_ROUTINE_STRUCT (4) drout_1422__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_1423__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1424__LAMBDA_;
+ drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1379__COMPILOBJ_NREP_CONSUMEVARIADIC;
+ struct MELT_OBJECT_STRUCT (3) dsym_1380__CLASS_NREP_CONSUME_VARIADIC;
+ struct MELT_STRING_STRUCT (27) dstr_1381__CLASS_NREP_CONSU;
+ struct MELT_ROUTINE_STRUCT (3) drout_1382__PUTOBJDEST_OBJCOND;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1383__PUTOBJDEST_OBJCOND;
+ struct MELT_ROUTINE_STRUCT (5) drout_1384__COMPILOBJ_NREP_CPPIF;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1385__COMPILOBJ_NREP_CPPIF;
+ struct MELT_OBJECT_STRUCT (3) dsym_1386__CLASS_NREP_CPPIF;
+ struct MELT_STRING_STRUCT (16) dstr_1387__CLASS_NREP_CPPIF;
+ struct MELT_ROUTINE_STRUCT (3) drout_1388__PUTOBJDEST_OBJCPPIF;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1389__PUTOBJDEST_OBJCPPIF;
+ struct MELT_ROUTINE_STRUCT (14) drout_1390__COMPILOBJ_NREP_RETURN;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1391__COMPILOBJ_NREP_RETURN;
+ struct MELT_OBJECT_STRUCT (3) dsym_1392__CLASS_NREP_RETURN;
+ struct MELT_STRING_STRUCT (17) dstr_1393__CLASS_NREP_RETUR;
+ struct MELT_ROUTINE_STRUCT (3) drout_1394__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1395__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1396__DISCRCLOSURE_OBJPREDEF;
+ struct MELT_STRING_STRUCT (22) dstr_1397__DISCRCLOSURE_OBJ;
+ struct MELT_OBJECT_STRUCT (2) dobj_1398__DISCRCLOSURE_OBJPREDEF;
+ struct MELT_OBJECT_STRUCT (3) dsym_1399__DISCR_CLOSURE;
+ struct MELT_STRING_STRUCT (13) dstr_1400__DISCR_CLOSURE;
+ struct MELT_ROUTINE_STRUCT (16) drout_1401__COMPILOBJ_NREP_LAMBDA;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1402__COMPILOBJ_NREP_LAMBDA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1403__CLASS_NREP_LAMBDA;
+ struct MELT_STRING_STRUCT (17) dstr_1404__CLASS_NREP_LAMBD;
+ struct MELT_ROUTINE_STRUCT (3) drout_1405__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (19) drout_1406__COMPILOBJ_NREP_MAKEINST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1407__COMPILOBJ_NREP_MAKEINST;
+ struct MELT_OBJECT_STRUCT (3) dsym_1408__CLASS_NREP_INSTANCE;
+ struct MELT_STRING_STRUCT (19) dstr_1409__CLASS_NREP_INSTA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1410__INST;
+ struct MELT_STRING_STRUCT (4) dstr_1411__INST;
+ struct MELT_ROUTINE_STRUCT (6) drout_1412__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (3) drout_1413__COMPILOBJ_ROUTPROC;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1414__COMPILOBJ_ROUTPROC;
+ struct MELT_ROUTINE_STRUCT (3) drout_1415__COMPILOBJ_PREDEF;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1416__COMPILOBJ_PREDEF;
+ struct MELT_OBJECT_STRUCT (3) dsym_1417__CLASS_NREP_PREDEF;
+ struct MELT_STRING_STRUCT (17) dstr_1418__CLASS_NREP_PREDE;
+ struct MELT_ROUTINE_STRUCT (32) drout_1419__COMPIL_DATA_AND_SLOTS_FILL;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1420__COMPIL_DATA_AND_SLOTS_FILL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1421__VALDATA_;
+ struct MELT_STRING_STRUCT (9) dstr_1422__VALDATA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1423__VALUEDATA_;
+ struct MELT_STRING_STRUCT (11) dstr_1424__VALUEDATA_;
+ struct MELT_STRING_STRUCT (17) dstr_1425__fill_predef_slot;
+ struct MELT_ROUTINE_STRUCT (4) drout_1426__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (4) drout_1427__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1428__LAMBDA_;
struct MELT_ROUTINE_STRUCT (5)
- drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
+ drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1426__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
- struct MELT_ROUTINE_STRUCT (1) drout_1427__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (10) drout_1428__COMPILOBJ_DATASYMBOL;
- struct MELT_CLOSURE_STRUCT (0) dclo_1429__COMPILOBJ_DATASYMBOL;
- struct MELT_ROUTINE_STRUCT (10) drout_1430__COMPILOBJ_DATAINSTANCE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1431__COMPILOBJ_DATAINSTANCE;
- struct MELT_ROUTINE_STRUCT (20) drout_1432__COMPILOBJ_DATATUPLE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1433__COMPILOBJ_DATATUPLE;
- struct MELT_OBJECT_STRUCT (3) dsym_1434__CLASS_NREP_DATATUPLE;
- struct MELT_STRING_STRUCT (20) dstr_1435__CLASS_NREP_DATAT;
- struct MELT_ROUTINE_STRUCT (1) drout_1436__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1437__VALTUP_;
- struct MELT_STRING_STRUCT (8) dstr_1438__VALTUP_;
- struct MELT_OBJECT_STRUCT (3) dsym_1439__INITUP_;
- struct MELT_STRING_STRUCT (8) dstr_1440__INITUP_;
- struct MELT_ROUTINE_STRUCT (2) drout_1441__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (10) drout_1442__COMPILOBJ_DATASTRING;
- struct MELT_CLOSURE_STRUCT (0) dclo_1443__COMPILOBJ_DATASTRING;
- struct MELT_OBJECT_STRUCT (3) dsym_1444__CLASS_NREP_DATASTRING;
- struct MELT_STRING_STRUCT (21) dstr_1445__CLASS_NREP_DATAS;
- struct MELT_OBJECT_STRUCT (3) dsym_1446__VALSTR_;
- struct MELT_STRING_STRUCT (8) dstr_1447__VALSTR_;
- struct MELT_ROUTINE_STRUCT (10) drout_1448__COMPILOBJ_DATABOXEDINTEGER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1449__COMPILOBJ_DATABOXEDINTEGER;
- struct MELT_OBJECT_STRUCT (3) dsym_1450__CLASS_NREP_DATABOXEDINTEGER;
- struct MELT_STRING_STRUCT (27) dstr_1451__CLASS_NREP_DATAB;
- struct MELT_OBJECT_STRUCT (3) dsym_1452__VALBXINT_;
- struct MELT_STRING_STRUCT (10) dstr_1453__VALBXINT_;
- struct MELT_ROUTINE_STRUCT (23) drout_1454__COMPILOBJ_DATACLOSURE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1455__COMPILOBJ_DATACLOSURE;
- struct MELT_OBJECT_STRUCT (3) dsym_1456__CLASS_NREP_DATACLOSURE;
- struct MELT_STRING_STRUCT (22) dstr_1457__CLASS_NREP_DATAC;
- struct MELT_OBJECT_STRUCT (3) dsym_1458__VALCLO_;
- struct MELT_STRING_STRUCT (8) dstr_1459__VALCLO_;
- struct MELT_OBJECT_STRUCT (3) dsym_1460__DATACLOSURE_;
- struct MELT_STRING_STRUCT (13) dstr_1461__DATACLOSURE_;
- struct MELT_OBJECT_STRUCT (3) dsym_1462__CLASS_NREP_DATAROUTINE;
- struct MELT_STRING_STRUCT (22) dstr_1463__CLASS_NREP_DATAR;
- struct MELT_ROUTINE_STRUCT (3) drout_1464__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (26) drout_1465__COMPILOBJ_DATAROUTINE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1466__COMPILOBJ_DATAROUTINE;
- struct MELT_OBJECT_STRUCT (3) dsym_1467__VALROUT_;
- struct MELT_STRING_STRUCT (9) dstr_1468__VALROUT_;
- struct MELT_OBJECT_STRUCT (3) dsym_1469__IROUTVAL_;
- struct MELT_STRING_STRUCT (10) dstr_1470__IROUTVAL_;
- struct MELT_ROUTINE_STRUCT (8) drout_1471__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1472__CLASS_NREP_QUASIDATA;
- struct MELT_STRING_STRUCT (20) dstr_1473__CLASS_NREP_QUASI;
+ dclo_1430__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
+ struct MELT_ROUTINE_STRUCT (1) drout_1431__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (10) drout_1432__COMPILOBJ_DATASYMBOL;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1433__COMPILOBJ_DATASYMBOL;
+ struct MELT_ROUTINE_STRUCT (10) drout_1434__COMPILOBJ_DATAINSTANCE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1435__COMPILOBJ_DATAINSTANCE;
+ struct MELT_ROUTINE_STRUCT (20) drout_1436__COMPILOBJ_DATATUPLE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1437__COMPILOBJ_DATATUPLE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1438__CLASS_NREP_DATATUPLE;
+ struct MELT_STRING_STRUCT (20) dstr_1439__CLASS_NREP_DATAT;
+ struct MELT_ROUTINE_STRUCT (1) drout_1440__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1441__VALTUP_;
+ struct MELT_STRING_STRUCT (8) dstr_1442__VALTUP_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1443__INITUP_;
+ struct MELT_STRING_STRUCT (8) dstr_1444__INITUP_;
+ struct MELT_ROUTINE_STRUCT (2) drout_1445__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (10) drout_1446__COMPILOBJ_DATASTRING;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1447__COMPILOBJ_DATASTRING;
+ struct MELT_OBJECT_STRUCT (3) dsym_1448__CLASS_NREP_DATASTRING;
+ struct MELT_STRING_STRUCT (21) dstr_1449__CLASS_NREP_DATAS;
+ struct MELT_OBJECT_STRUCT (3) dsym_1450__VALSTR_;
+ struct MELT_STRING_STRUCT (8) dstr_1451__VALSTR_;
+ struct MELT_ROUTINE_STRUCT (10) drout_1452__COMPILOBJ_DATABOXEDINTEGER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1453__COMPILOBJ_DATABOXEDINTEGER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1454__CLASS_NREP_DATABOXEDINTEGER;
+ struct MELT_STRING_STRUCT (27) dstr_1455__CLASS_NREP_DATAB;
+ struct MELT_OBJECT_STRUCT (3) dsym_1456__VALBXINT_;
+ struct MELT_STRING_STRUCT (10) dstr_1457__VALBXINT_;
+ struct MELT_ROUTINE_STRUCT (23) drout_1458__COMPILOBJ_DATACLOSURE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1459__COMPILOBJ_DATACLOSURE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1460__CLASS_NREP_DATACLOSURE;
+ struct MELT_STRING_STRUCT (22) dstr_1461__CLASS_NREP_DATAC;
+ struct MELT_OBJECT_STRUCT (3) dsym_1462__VALCLO_;
+ struct MELT_STRING_STRUCT (8) dstr_1463__VALCLO_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1464__DATACLOSURE_;
+ struct MELT_STRING_STRUCT (13) dstr_1465__DATACLOSURE_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1466__CLASS_NREP_DATAROUTINE;
+ struct MELT_STRING_STRUCT (22) dstr_1467__CLASS_NREP_DATAR;
+ struct MELT_ROUTINE_STRUCT (3) drout_1468__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (26) drout_1469__COMPILOBJ_DATAROUTINE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1470__COMPILOBJ_DATAROUTINE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1471__VALROUT_;
+ struct MELT_STRING_STRUCT (9) dstr_1472__VALROUT_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1473__IROUTVAL_;
+ struct MELT_STRING_STRUCT (10) dstr_1474__IROUTVAL_;
+ struct MELT_ROUTINE_STRUCT (8) drout_1475__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1476__CLASS_NREP_QUASIDATA;
+ struct MELT_STRING_STRUCT (20) dstr_1477__CLASS_NREP_QUASI;
struct MELT_ROUTINE_STRUCT (2)
- drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1475__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ dclo_1479__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
struct MELT_OBJECT_STRUCT (3)
- dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
- struct MELT_STRING_STRUCT (57) dstr_1477__CLASS_NREP_QUASI;
+ dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ struct MELT_STRING_STRUCT (57) dstr_1481__CLASS_NREP_QUASI;
struct MELT_ROUTINE_STRUCT (2)
- drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1479__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ dclo_1483__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
struct MELT_OBJECT_STRUCT (3)
- dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
- struct MELT_STRING_STRUCT (46) dstr_1481__CLASS_NREP_QUASI;
+ dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ struct MELT_STRING_STRUCT (46) dstr_1485__CLASS_NREP_QUASI;
struct MELT_ROUTINE_STRUCT (8)
- drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED;
- struct MELT_CLOSURE_STRUCT (0) dclo_1483__COMPILOBJ_NREP_STORE_PREDEFINED;
- struct MELT_OBJECT_STRUCT (3) dsym_1484__CLASS_NREP_STORE_PREDEFINED;
- struct MELT_STRING_STRUCT (27) dstr_1485__CLASS_NREP_STORE;
+ drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1487__COMPILOBJ_NREP_STORE_PREDEFINED;
+ struct MELT_OBJECT_STRUCT (3) dsym_1488__CLASS_NREP_STORE_PREDEFINED;
+ struct MELT_STRING_STRUCT (27) dstr_1489__CLASS_NREP_STORE;
struct MELT_ROUTINE_STRUCT (20)
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1487__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ dclo_1491__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
struct MELT_OBJECT_STRUCT (3)
- dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
- struct MELT_STRING_STRUCT (54) dstr_1489__CLASS_NREP_UPDAT;
- struct MELT_ROUTINE_STRUCT (11) drout_1490__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (6) drout_1491__LAMBDA_;
- struct MELT_STRING_STRUCT (23) dstr_1492__compobj_upd_mod_;
- struct MELT_OBJECT_STRUCT (3) dsym_1493__COMPILE_MATCHER;
- struct MELT_STRING_STRUCT (15) dstr_1494__COMPILE_MATCHER;
- struct MELT_OBJECT_STRUCT (4) dobj_1495__COMPILE_MATCHER;
- struct MELT_STRING_STRUCT (15) dstr_1496__COMPILE_MATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1497__CLASS_MATCHCOMPILCONTEXT;
- struct MELT_STRING_STRUCT (24) dstr_1498__CLASS_MATCHCOMPI;
- struct MELT_OBJECT_STRUCT (3) dsym_1499__CLASS_PROPED;
- struct MELT_STRING_STRUCT (12) dstr_1500__CLASS_PROPED;
- struct MELT_OBJECT_STRUCT (8) dobj_1501__CLASS_MATCHCOMPILCONTEXT;
+ dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ struct MELT_STRING_STRUCT (54) dstr_1493__CLASS_NREP_UPDAT;
+ struct MELT_ROUTINE_STRUCT (11) drout_1494__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (6) drout_1495__LAMBDA_;
+ struct MELT_STRING_STRUCT (23) dstr_1496__compobj_upd_mod_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1497__COMPILE_MATCHER;
+ struct MELT_STRING_STRUCT (15) dstr_1498__COMPILE_MATCHER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1499__COMPILE_MATCHER;
+ struct MELT_STRING_STRUCT (15) dstr_1500__COMPILE_MATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1501__CLASS_MATCHCOMPILCONTEXT;
struct MELT_STRING_STRUCT (24) dstr_1502__CLASS_MATCHCOMPI;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1503__CLASS_MATCHCOMPILCONTEXT;
- struct MELT_MULTIPLE_STRUCT (8) dtup_1504__CLASS_MATCHCOMPILCONTEXT;
- struct MELT_OBJECT_STRUCT (3) dsym_1505__MCX_LOC;
- struct MELT_STRING_STRUCT (7) dstr_1506__MCX_LOC;
- struct MELT_OBJECT_STRUCT (4) dobj_1507__MCX_LOC;
- struct MELT_STRING_STRUCT (7) dstr_1508__MCX_LOC;
- struct MELT_OBJECT_STRUCT (3) dsym_1509__MCX_NORMTESTER;
- struct MELT_STRING_STRUCT (14) dstr_1510__MCX_NORMTESTER;
- struct MELT_OBJECT_STRUCT (4) dobj_1511__MCX_NORMTESTER;
- struct MELT_STRING_STRUCT (14) dstr_1512__MCX_NORMTESTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1513__MCX_GOTOTHEN;
- struct MELT_STRING_STRUCT (12) dstr_1514__MCX_GOTOTHEN;
- struct MELT_OBJECT_STRUCT (4) dobj_1515__MCX_GOTOTHEN;
- struct MELT_STRING_STRUCT (12) dstr_1516__MCX_GOTOTHEN;
- struct MELT_OBJECT_STRUCT (3) dsym_1517__MCX_GOTOELSE;
- struct MELT_STRING_STRUCT (12) dstr_1518__MCX_GOTOELSE;
- struct MELT_OBJECT_STRUCT (4) dobj_1519__MCX_GOTOELSE;
- struct MELT_STRING_STRUCT (12) dstr_1520__MCX_GOTOELSE;
- struct MELT_OBJECT_STRUCT (3) dsym_1521__MCX_OLIST;
- struct MELT_STRING_STRUCT (9) dstr_1522__MCX_OLIST;
- struct MELT_OBJECT_STRUCT (4) dobj_1523__MCX_OLIST;
- struct MELT_STRING_STRUCT (9) dstr_1524__MCX_OLIST;
- struct MELT_OBJECT_STRUCT (3) dsym_1525__MCX_SUFFIX;
- struct MELT_STRING_STRUCT (10) dstr_1526__MCX_SUFFIX;
- struct MELT_OBJECT_STRUCT (4) dobj_1527__MCX_SUFFIX;
- struct MELT_STRING_STRUCT (10) dstr_1528__MCX_SUFFIX;
- struct MELT_OBJECT_STRUCT (3) dsym_1529__MCX_STATECOUNTER;
- struct MELT_STRING_STRUCT (16) dstr_1530__MCX_STATECOUNTER;
- struct MELT_OBJECT_STRUCT (4) dobj_1531__MCX_STATECOUNTER;
- struct MELT_STRING_STRUCT (16) dstr_1532__MCX_STATECOUNTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1533__COMPILE_TESTER;
- struct MELT_STRING_STRUCT (14) dstr_1534__COMPILE_TESTER;
- struct MELT_OBJECT_STRUCT (4) dobj_1535__COMPILE_TESTER;
- struct MELT_STRING_STRUCT (14) dstr_1536__COMPILE_TESTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1537__CLASS_TESTERCOMPILCONTEXT;
- struct MELT_STRING_STRUCT (25) dstr_1538__CLASS_TESTERCOMP;
- struct MELT_OBJECT_STRUCT (8) dobj_1539__CLASS_TESTERCOMPILCONTEXT;
- struct MELT_STRING_STRUCT (25) dstr_1540__CLASS_TESTERCOMP;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1541__CLASS_TESTERCOMPILCONTEXT;
- struct MELT_MULTIPLE_STRUCT (4) dtup_1542__CLASS_TESTERCOMPILCONTEXT;
- struct MELT_OBJECT_STRUCT (3) dsym_1543__TCX_NRMATCH;
- struct MELT_STRING_STRUCT (11) dstr_1544__TCX_NRMATCH;
- struct MELT_OBJECT_STRUCT (4) dobj_1545__TCX_NRMATCH;
- struct MELT_STRING_STRUCT (11) dstr_1546__TCX_NRMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1547__TCX_FREELIST;
- struct MELT_STRING_STRUCT (12) dstr_1548__TCX_FREELIST;
- struct MELT_OBJECT_STRUCT (4) dobj_1549__TCX_FREELIST;
- struct MELT_STRING_STRUCT (12) dstr_1550__TCX_FREELIST;
- struct MELT_OBJECT_STRUCT (3) dsym_1551__TCX_NEXTEST;
- struct MELT_STRING_STRUCT (11) dstr_1552__TCX_NEXTEST;
- struct MELT_OBJECT_STRUCT (4) dobj_1553__TCX_NEXTEST;
- struct MELT_STRING_STRUCT (11) dstr_1554__TCX_NEXTEST;
- struct MELT_ROUTINE_STRUCT (4) drout_1555__COMPILTST_ANYTESTER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1556__COMPILTST_ANYTESTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1557__CLASS_NORMTESTER_ANY;
- struct MELT_STRING_STRUCT (20) dstr_1558__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (26) drout_1559__COMPILOBJ_NREP_MATCH;
- struct MELT_CLOSURE_STRUCT (0) dclo_1560__COMPILOBJ_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1561__CLASS_NREP_MATCH;
- struct MELT_STRING_STRUCT (16) dstr_1562__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1563__CLASS_NORMTESTER_ANYTESTER;
- struct MELT_STRING_STRUCT (26) dstr_1564__CLASS_NORMTESTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1565__CLASS_NORMTESTER_SUCCESS;
- struct MELT_STRING_STRUCT (24) dstr_1566__CLASS_NORMTESTER;
- struct MELT_OBJECT_STRUCT (3) dsym_1567__MAPOBJECT_EVERY;
- struct MELT_STRING_STRUCT (15) dstr_1568__MAPOBJECT_EVERY;
- struct MELT_ROUTINE_STRUCT (1) drout_1569__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1570__LIST_FIND;
- struct MELT_STRING_STRUCT (9) dstr_1571__LIST_FIND;
- struct MELT_OBJECT_STRUCT (3) dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA;
- struct MELT_STRING_STRUCT (31) dstr_1573__CLASS_ALTERNATE_;
- struct MELT_OBJECT_STRUCT (3) dsym_1574__CLASS_ROOT;
- struct MELT_STRING_STRUCT (10) dstr_1575__CLASS_ROOT;
- struct MELT_OBJECT_STRUCT (8) dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1503__CLASS_PROPED;
+ struct MELT_STRING_STRUCT (12) dstr_1504__CLASS_PROPED;
+ struct MELT_OBJECT_STRUCT (8) dobj_1505__CLASS_MATCHCOMPILCONTEXT;
+ struct MELT_STRING_STRUCT (24) dstr_1506__CLASS_MATCHCOMPI;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1507__CLASS_MATCHCOMPILCONTEXT;
+ struct MELT_MULTIPLE_STRUCT (8) dtup_1508__CLASS_MATCHCOMPILCONTEXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1509__MCX_LOC;
+ struct MELT_STRING_STRUCT (7) dstr_1510__MCX_LOC;
+ struct MELT_OBJECT_STRUCT (4) dobj_1511__MCX_LOC;
+ struct MELT_STRING_STRUCT (7) dstr_1512__MCX_LOC;
+ struct MELT_OBJECT_STRUCT (3) dsym_1513__MCX_NORMTESTER;
+ struct MELT_STRING_STRUCT (14) dstr_1514__MCX_NORMTESTER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1515__MCX_NORMTESTER;
+ struct MELT_STRING_STRUCT (14) dstr_1516__MCX_NORMTESTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1517__MCX_GOTOTHEN;
+ struct MELT_STRING_STRUCT (12) dstr_1518__MCX_GOTOTHEN;
+ struct MELT_OBJECT_STRUCT (4) dobj_1519__MCX_GOTOTHEN;
+ struct MELT_STRING_STRUCT (12) dstr_1520__MCX_GOTOTHEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_1521__MCX_GOTOELSE;
+ struct MELT_STRING_STRUCT (12) dstr_1522__MCX_GOTOELSE;
+ struct MELT_OBJECT_STRUCT (4) dobj_1523__MCX_GOTOELSE;
+ struct MELT_STRING_STRUCT (12) dstr_1524__MCX_GOTOELSE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1525__MCX_OLIST;
+ struct MELT_STRING_STRUCT (9) dstr_1526__MCX_OLIST;
+ struct MELT_OBJECT_STRUCT (4) dobj_1527__MCX_OLIST;
+ struct MELT_STRING_STRUCT (9) dstr_1528__MCX_OLIST;
+ struct MELT_OBJECT_STRUCT (3) dsym_1529__MCX_SUFFIX;
+ struct MELT_STRING_STRUCT (10) dstr_1530__MCX_SUFFIX;
+ struct MELT_OBJECT_STRUCT (4) dobj_1531__MCX_SUFFIX;
+ struct MELT_STRING_STRUCT (10) dstr_1532__MCX_SUFFIX;
+ struct MELT_OBJECT_STRUCT (3) dsym_1533__MCX_STATECOUNTER;
+ struct MELT_STRING_STRUCT (16) dstr_1534__MCX_STATECOUNTER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1535__MCX_STATECOUNTER;
+ struct MELT_STRING_STRUCT (16) dstr_1536__MCX_STATECOUNTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1537__COMPILE_TESTER;
+ struct MELT_STRING_STRUCT (14) dstr_1538__COMPILE_TESTER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1539__COMPILE_TESTER;
+ struct MELT_STRING_STRUCT (14) dstr_1540__COMPILE_TESTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1541__CLASS_TESTERCOMPILCONTEXT;
+ struct MELT_STRING_STRUCT (25) dstr_1542__CLASS_TESTERCOMP;
+ struct MELT_OBJECT_STRUCT (8) dobj_1543__CLASS_TESTERCOMPILCONTEXT;
+ struct MELT_STRING_STRUCT (25) dstr_1544__CLASS_TESTERCOMP;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1545__CLASS_TESTERCOMPILCONTEXT;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_1546__CLASS_TESTERCOMPILCONTEXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1547__TCX_NRMATCH;
+ struct MELT_STRING_STRUCT (11) dstr_1548__TCX_NRMATCH;
+ struct MELT_OBJECT_STRUCT (4) dobj_1549__TCX_NRMATCH;
+ struct MELT_STRING_STRUCT (11) dstr_1550__TCX_NRMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1551__TCX_FREELIST;
+ struct MELT_STRING_STRUCT (12) dstr_1552__TCX_FREELIST;
+ struct MELT_OBJECT_STRUCT (4) dobj_1553__TCX_FREELIST;
+ struct MELT_STRING_STRUCT (12) dstr_1554__TCX_FREELIST;
+ struct MELT_OBJECT_STRUCT (3) dsym_1555__TCX_NEXTEST;
+ struct MELT_STRING_STRUCT (11) dstr_1556__TCX_NEXTEST;
+ struct MELT_OBJECT_STRUCT (4) dobj_1557__TCX_NEXTEST;
+ struct MELT_STRING_STRUCT (11) dstr_1558__TCX_NEXTEST;
+ struct MELT_ROUTINE_STRUCT (4) drout_1559__COMPILTST_ANYTESTER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1560__COMPILTST_ANYTESTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1561__CLASS_NORMTESTER_ANY;
+ struct MELT_STRING_STRUCT (20) dstr_1562__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (26) drout_1563__COMPILOBJ_NREP_MATCH;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1564__COMPILOBJ_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1565__CLASS_NREP_MATCH;
+ struct MELT_STRING_STRUCT (16) dstr_1566__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1567__CLASS_NORMTESTER_ANYTESTER;
+ struct MELT_STRING_STRUCT (26) dstr_1568__CLASS_NORMTESTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1569__CLASS_NORMTESTER_SUCCESS;
+ struct MELT_STRING_STRUCT (24) dstr_1570__CLASS_NORMTESTER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1571__MAPOBJECT_EVERY;
+ struct MELT_STRING_STRUCT (15) dstr_1572__MAPOBJECT_EVERY;
+ struct MELT_ROUTINE_STRUCT (1) drout_1573__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1574__LIST_FIND;
+ struct MELT_STRING_STRUCT (9) dstr_1575__LIST_FIND;
+ struct MELT_OBJECT_STRUCT (3) dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA;
struct MELT_STRING_STRUCT (31) dstr_1577__CLASS_ALTERNATE_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1578__CLASS_ROOT;
+ struct MELT_STRING_STRUCT (10) dstr_1579__CLASS_ROOT;
+ struct MELT_OBJECT_STRUCT (8) dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ struct MELT_STRING_STRUCT (31) dstr_1581__CLASS_ALTERNATE_;
struct MELT_MULTIPLE_STRUCT (1)
- dtup_1578__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ dtup_1582__CLASS_ALTERNATE_MATCH_NREP_DATA;
struct MELT_MULTIPLE_STRUCT (2)
- dtup_1579__CLASS_ALTERNATE_MATCH_NREP_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_1580__ALTMATCHN_PREV;
- struct MELT_STRING_STRUCT (14) dstr_1581__ALTMATCHN_PREV;
- struct MELT_OBJECT_STRUCT (4) dobj_1582__ALTMATCHN_PREV;
- struct MELT_STRING_STRUCT (14) dstr_1583__ALTMATCHN_PREV;
- struct MELT_OBJECT_STRUCT (3) dsym_1584__ALTMATCHN_NREP;
- struct MELT_STRING_STRUCT (14) dstr_1585__ALTMATCHN_NREP;
- struct MELT_OBJECT_STRUCT (4) dobj_1586__ALTMATCHN_NREP;
- struct MELT_STRING_STRUCT (14) dstr_1587__ALTMATCHN_NREP;
- struct MELT_ROUTINE_STRUCT (13) drout_1588__COMPILOBJ_NREP_ALTMATCH;
- struct MELT_CLOSURE_STRUCT (0) dclo_1589__COMPILOBJ_NREP_ALTMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1590__CLASS_NREP_ALTMATCH;
- struct MELT_STRING_STRUCT (19) dstr_1591__CLASS_NREP_ALTMA;
- struct MELT_ROUTINE_STRUCT (1) drout_1592__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_1593__COMPILOBJ_NREP_MATCHLABEL;
- struct MELT_CLOSURE_STRUCT (0) dclo_1594__COMPILOBJ_NREP_MATCHLABEL;
- struct MELT_OBJECT_STRUCT (3) dsym_1595__CLASS_NREP_MATCH_LABEL;
- struct MELT_STRING_STRUCT (22) dstr_1596__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1597__CLASS_MATCH_STEP_WITH_DATA;
- struct MELT_STRING_STRUCT (26) dstr_1598__CLASS_MATCH_STEP;
- struct MELT_ROUTINE_STRUCT (5) drout_1599__COMPILOBJ_NREP_MATCHDATAINIT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1600__COMPILOBJ_NREP_MATCHDATAINIT;
+ dtup_1583__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1584__ALTMATCHN_PREV;
+ struct MELT_STRING_STRUCT (14) dstr_1585__ALTMATCHN_PREV;
+ struct MELT_OBJECT_STRUCT (4) dobj_1586__ALTMATCHN_PREV;
+ struct MELT_STRING_STRUCT (14) dstr_1587__ALTMATCHN_PREV;
+ struct MELT_OBJECT_STRUCT (3) dsym_1588__ALTMATCHN_NREP;
+ struct MELT_STRING_STRUCT (14) dstr_1589__ALTMATCHN_NREP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1590__ALTMATCHN_NREP;
+ struct MELT_STRING_STRUCT (14) dstr_1591__ALTMATCHN_NREP;
+ struct MELT_ROUTINE_STRUCT (13) drout_1592__COMPILOBJ_NREP_ALTMATCH;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1593__COMPILOBJ_NREP_ALTMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1594__CLASS_NREP_ALTMATCH;
+ struct MELT_STRING_STRUCT (19) dstr_1595__CLASS_NREP_ALTMA;
+ struct MELT_ROUTINE_STRUCT (1) drout_1596__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (6) drout_1597__COMPILOBJ_NREP_MATCHLABEL;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1598__COMPILOBJ_NREP_MATCHLABEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1599__CLASS_NREP_MATCH_LABEL;
+ struct MELT_STRING_STRUCT (22) dstr_1600__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1601__CLASS_MATCH_STEP_WITH_DATA;
+ struct MELT_STRING_STRUCT (26) dstr_1602__CLASS_MATCH_STEP;
+ struct MELT_ROUTINE_STRUCT (4) drout_1603__COMPILOBJ_NREP_MATCHFLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1604__COMPILOBJ_NREP_MATCHFLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_1605__CLASS_NREP_MATCH_FLAG;
+ struct MELT_STRING_STRUCT (21) dstr_1606__CLASS_NREP_MATCH;
+ struct MELT_ROUTINE_STRUCT (6) drout_1607__COMPILOBJ_NREP_MATCHDATAINIT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1608__COMPILOBJ_NREP_MATCHDATAINIT;
struct MELT_OBJECT_STRUCT (3)
- dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER;
- struct MELT_STRING_STRUCT (33) dstr_1602__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1603__CLASS_NREP_MATCH_DATA_ACTION;
- struct MELT_STRING_STRUCT (28) dstr_1604__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1605__CLASS_NREP_MATCHED_DATA;
- struct MELT_STRING_STRUCT (23) dstr_1606__CLASS_NREP_MATCH;
- struct MELT_ROUTINE_STRUCT (5) drout_1607__NORMTESTER_LABELINSTR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1608__NORMTESTER_LABELINSTR;
- struct MELT_ROUTINE_STRUCT (5) drout_1609__NORMTESTER_GOTOINSTR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1610__NORMTESTER_GOTOINSTR;
- struct MELT_ROUTINE_STRUCT (6) drout_1611__ENDMATCH_GOTOINSTR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1612__ENDMATCH_GOTOINSTR;
- struct MELT_ROUTINE_STRUCT (7) drout_1613__TESTMATCH_GOTOINSTR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1614__TESTMATCH_GOTOINSTR;
- struct MELT_ROUTINE_STRUCT (10) drout_1615__NORMTESTER_FREE_OBJLOC_LIST;
- struct MELT_CLOSURE_STRUCT (0) dclo_1616__NORMTESTER_FREE_OBJLOC_LIST;
- struct MELT_ROUTINE_STRUCT (3) drout_1617__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (3) drout_1618__COMPILTST_NORMTESTER_ANY;
- struct MELT_CLOSURE_STRUCT (0) dclo_1619__COMPILTST_NORMTESTER_ANY;
- struct MELT_ROUTINE_STRUCT (14) drout_1620__COMPILTST_NORMTESTER_MATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1621__COMPILTST_NORMTESTER_MATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1622__CLASS_NORMTESTER_MATCHER;
- struct MELT_STRING_STRUCT (24) dstr_1623__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (19) drout_1624__COMPILTST_NORMTESTER_INSTANCE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1625__COMPILTST_NORMTESTER_INSTANCE;
- struct MELT_OBJECT_STRUCT (3) dsym_1626__CLASS_NORMTESTER_INSTANCE;
- struct MELT_STRING_STRUCT (25) dstr_1627__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (20) drout_1628__COMPILTST_NORMTESTER_TUPLE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1629__COMPILTST_NORMTESTER_TUPLE;
- struct MELT_OBJECT_STRUCT (3) dsym_1630__CLASS_NORMTESTER_TUPLE;
- struct MELT_STRING_STRUCT (22) dstr_1631__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (15) drout_1632__COMPILTST_NORMTESTER_SAME;
- struct MELT_CLOSURE_STRUCT (0) dclo_1633__COMPILTST_NORMTESTER_SAME;
- struct MELT_OBJECT_STRUCT (3) dsym_1634__CLASS_NORMTESTER_SAME;
- struct MELT_STRING_STRUCT (21) dstr_1635__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (6) drout_1636__COMPILTST_NORMTESTER_SUCCESS;
- struct MELT_CLOSURE_STRUCT (0) dclo_1637__COMPILTST_NORMTESTER_SUCCESS;
- struct MELT_ROUTINE_STRUCT (9) drout_1638__COMPILTST_NORMTESTER_ORCLEAR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1639__COMPILTST_NORMTESTER_ORCLEAR;
- struct MELT_OBJECT_STRUCT (3) dsym_1640__CLASS_NORMTESTER_OR_CLEAR;
+ dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ struct MELT_STRING_STRUCT (33) dstr_1610__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1611__CLASS_NREP_MATCH_DATA_ACTION;
+ struct MELT_STRING_STRUCT (28) dstr_1612__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1613__CLASS_NREP_MATCHED_DATA;
+ struct MELT_STRING_STRUCT (23) dstr_1614__CLASS_NREP_MATCH;
+ struct MELT_ROUTINE_STRUCT (4) drout_1615__COMPILOBJ_NREP_MATCHEDATA;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1616__COMPILOBJ_NREP_MATCHEDATA;
+ struct MELT_ROUTINE_STRUCT (4) drout_1617__COMPILOBJ_NREP_MATCHJUMP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1618__COMPILOBJ_NREP_MATCHJUMP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1619__CLASS_NREP_MATCH_JUMP;
+ struct MELT_STRING_STRUCT (21) dstr_1620__CLASS_NREP_MATCH;
+ struct MELT_ROUTINE_STRUCT (5) drout_1621__NORMTESTER_LABELINSTR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1622__NORMTESTER_LABELINSTR;
+ struct MELT_ROUTINE_STRUCT (5) drout_1623__NORMTESTER_GOTOINSTR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1624__NORMTESTER_GOTOINSTR;
+ struct MELT_ROUTINE_STRUCT (6) drout_1625__ENDMATCH_GOTOINSTR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1626__ENDMATCH_GOTOINSTR;
+ struct MELT_ROUTINE_STRUCT (7) drout_1627__TESTMATCH_GOTOINSTR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1628__TESTMATCH_GOTOINSTR;
+ struct MELT_ROUTINE_STRUCT (10) drout_1629__NORMTESTER_FREE_OBJLOC_LIST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1630__NORMTESTER_FREE_OBJLOC_LIST;
+ struct MELT_ROUTINE_STRUCT (3) drout_1631__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (3) drout_1632__COMPILTST_NORMTESTER_ANY;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1633__COMPILTST_NORMTESTER_ANY;
+ struct MELT_ROUTINE_STRUCT (14) drout_1634__COMPILTST_NORMTESTER_MATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1635__COMPILTST_NORMTESTER_MATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1636__CLASS_NORMTESTER_MATCHER;
+ struct MELT_STRING_STRUCT (24) dstr_1637__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (19) drout_1638__COMPILTST_NORMTESTER_INSTANCE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1639__COMPILTST_NORMTESTER_INSTANCE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1640__CLASS_NORMTESTER_INSTANCE;
struct MELT_STRING_STRUCT (25) dstr_1641__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (20) drout_1642__COMPILTST_NORMTESTER_TUPLE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1643__COMPILTST_NORMTESTER_TUPLE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1644__CLASS_NORMTESTER_TUPLE;
+ struct MELT_STRING_STRUCT (22) dstr_1645__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (15) drout_1646__COMPILTST_NORMTESTER_SAME;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1647__COMPILTST_NORMTESTER_SAME;
+ struct MELT_OBJECT_STRUCT (3) dsym_1648__CLASS_NORMTESTER_SAME;
+ struct MELT_STRING_STRUCT (21) dstr_1649__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (6) drout_1650__COMPILTST_NORMTESTER_SUCCESS;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1651__COMPILTST_NORMTESTER_SUCCESS;
+ struct MELT_ROUTINE_STRUCT (9) drout_1652__COMPILTST_NORMTESTER_ORCLEAR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1653__COMPILTST_NORMTESTER_ORCLEAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_1654__CLASS_NORMTESTER_OR_CLEAR;
+ struct MELT_STRING_STRUCT (25) dstr_1655__CLASS_NORMTESTER;
struct MELT_ROUTINE_STRUCT (9)
- drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1643__COMPILTST_NORMTESTER_ORTRANSMIT;
- struct MELT_OBJECT_STRUCT (3) dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT;
- struct MELT_STRING_STRUCT (28) dstr_1645__CLASS_NORMTESTER;
+ drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1657__COMPILTST_NORMTESTER_ORTRANSMIT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT;
+ struct MELT_STRING_STRUCT (28) dstr_1659__CLASS_NORMTESTER;
struct MELT_ROUTINE_STRUCT (9)
- drout_1646__COMPILTST_NORMTESTER_DISJUNCTION;
+ drout_1660__COMPILTST_NORMTESTER_DISJUNCTION;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1647__COMPILTST_NORMTESTER_DISJUNCTION;
- struct MELT_OBJECT_STRUCT (3) dsym_1648__CLASS_NORMTESTER_DISJUNCTION;
- struct MELT_STRING_STRUCT (28) dstr_1649__CLASS_NORMTESTER;
- struct MELT_ROUTINE_STRUCT (37) drout_1650__COMPILMATCHER_CMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1651__COMPILMATCHER_CMATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1652__CLASS_CMATCHER;
- struct MELT_STRING_STRUCT (14) dstr_1653__CLASS_CMATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1654__MULTIPLE_EVERY_BOTH;
- struct MELT_STRING_STRUCT (19) dstr_1655__MULTIPLE_EVERY_B;
- struct MELT_ROUTINE_STRUCT (4) drout_1656__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_1657__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (6) drout_1658__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (4) drout_1659__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (23) drout_1660__COMPILMATCHER_FUNMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1661__COMPILMATCHER_FUNMATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1662__CLASS_FUNMATCHER;
- struct MELT_STRING_STRUCT (16) dstr_1663__CLASS_FUNMATCHER;
- struct MELT_ROUTINE_STRUCT (1) drout_1664__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1665__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1666__CLOSFUNMATCH;
- struct MELT_STRING_STRUCT (13) dstr_1667__CLOSFUNMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1668__FMATCH_MATCHF;
- struct MELT_STRING_STRUCT (13) dstr_1669__FMATCH_MATCHF;
+ dclo_1661__COMPILTST_NORMTESTER_DISJUNCTION;
+ struct MELT_OBJECT_STRUCT (3) dsym_1662__CLASS_NORMTESTER_DISJUNCTION;
+ struct MELT_STRING_STRUCT (28) dstr_1663__CLASS_NORMTESTER;
+ struct MELT_ROUTINE_STRUCT (37) drout_1664__COMPILMATCHER_CMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1665__COMPILMATCHER_CMATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1666__CLASS_CMATCHER;
+ struct MELT_STRING_STRUCT (14) dstr_1667__CLASS_CMATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1668__MULTIPLE_EVERY_BOTH;
+ struct MELT_STRING_STRUCT (19) dstr_1669__MULTIPLE_EVERY_B;
+ struct MELT_ROUTINE_STRUCT (4) drout_1670__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (4) drout_1671__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (6) drout_1672__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (4) drout_1673__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (23) drout_1674__COMPILMATCHER_FUNMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1675__COMPILMATCHER_FUNMATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1676__CLASS_FUNMATCHER;
+ struct MELT_STRING_STRUCT (16) dstr_1677__CLASS_FUNMATCHER;
+ struct MELT_ROUTINE_STRUCT (1) drout_1678__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1679__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1680__CLOSFUNMATCH;
+ struct MELT_STRING_STRUCT (13) dstr_1681__CLOSFUNMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1682__FMATCH_MATCHF;
+ struct MELT_STRING_STRUCT (13) dstr_1683__FMATCH_MATCHF;
long spare_;
} *cdat = NULL;
cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0);
@@ -7656,9 +7746,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1__CLASS_OBJVALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V150*/ meltfptr[149])
- /*_.VALDATA___V150*/
- meltfptr[149] = (void *) &cdat->dsym_1__CLASS_OBJVALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V153*/ meltfptr[152])
+ /*_.VALDATA___V153*/
+ meltfptr[152] = (void *) &cdat->dsym_1__CLASS_OBJVALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1__CLASS_OBJVALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7675,7 +7765,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_2__CLASS_OBJVALUE*/
- /*_.VALSTR___V151*/ meltfptr[150] = (void *) &cdat->dstr_2__CLASS_OBJVALUE;
+ /*_.VALSTR___V154*/ meltfptr[153] = (void *) &cdat->dstr_2__CLASS_OBJVALUE;
cdat->dstr_2__CLASS_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_2__CLASS_OBJVALUE.val,
@@ -7684,9 +7774,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_3__CLASS_GENERATED_C_CODE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V152*/ meltfptr[151])
- /*_.VALDATA___V152*/
- meltfptr[151] = (void *) &cdat->dsym_3__CLASS_GENERATED_C_CODE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V155*/ meltfptr[154])
+ /*_.VALDATA___V155*/
+ meltfptr[154] = (void *) &cdat->dsym_3__CLASS_GENERATED_C_CODE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_3__CLASS_GENERATED_C_CODE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7703,7 +7793,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_4__CLASS_GENERATED_*/
- /*_.VALSTR___V153*/ meltfptr[152] =
+ /*_.VALSTR___V156*/ meltfptr[155] =
(void *) &cdat->dstr_4__CLASS_GENERATED_;
cdat->dstr_4__CLASS_GENERATED_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7714,7 +7804,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:36:/ iniobj");
/*iniobj dobj_5__CLASS_OBJVALUE*/
-/*_.VALDATA___V154*/ meltfptr[153] = (void *) &cdat->dobj_5__CLASS_OBJVALUE;
+/*_.VALDATA___V157*/ meltfptr[156] = (void *) &cdat->dobj_5__CLASS_OBJVALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_5__CLASS_OBJVALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
@@ -7727,12 +7817,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_5__CLASS_OBJVALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_5__CLASS_OBJVALUE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_5__CLASS_OBJVALUE.obj_hash = 568970505;
+ cdat->dobj_5__CLASS_OBJVALUE.obj_hash = 286860126;
cdat->dobj_5__CLASS_OBJVALUE.obj_len = 8;
/*inistring dstr_6__CLASS_OBJVALUE*/
- /*_.VALSTR___V155*/ meltfptr[154] = (void *) &cdat->dstr_6__CLASS_OBJVALUE;
+ /*_.VALSTR___V158*/ meltfptr[157] = (void *) &cdat->dstr_6__CLASS_OBJVALUE;
cdat->dstr_6__CLASS_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_6__CLASS_OBJVALUE.val,
@@ -7740,20 +7830,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_6__CLASS_OBJVALUE.val) -
1);
/*inimult dtup_7__CLASS_OBJVALUE */
- /*_.VALTUP___V156*/ meltfptr[155] = (void *) &cdat->dtup_7__CLASS_OBJVALUE;
+ /*_.VALTUP___V159*/ meltfptr[158] = (void *) &cdat->dtup_7__CLASS_OBJVALUE;
cdat->dtup_7__CLASS_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_7__CLASS_OBJVALUE.nbval = 2;
/*inimult dtup_8__CLASS_OBJVALUE */
- /*_.VALTUP___V159*/ meltfptr[158] = (void *) &cdat->dtup_8__CLASS_OBJVALUE;
+ /*_.VALTUP___V162*/ meltfptr[161] = (void *) &cdat->dtup_8__CLASS_OBJVALUE;
cdat->dtup_8__CLASS_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_8__CLASS_OBJVALUE.nbval = 1;
/*iniobj dsym_9__OBV_TYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V160*/ meltfptr[159])
- /*_.VALDATA___V160*/
- meltfptr[159] = (void *) &cdat->dsym_9__OBV_TYPE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V163*/ meltfptr[162])
+ /*_.VALDATA___V163*/
+ meltfptr[162] = (void *) &cdat->dsym_9__OBV_TYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_9__OBV_TYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7770,7 +7860,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_10__OBV_TYPE*/
- /*_.VALSTR___V161*/ meltfptr[160] = (void *) &cdat->dstr_10__OBV_TYPE;
+ /*_.VALSTR___V164*/ meltfptr[163] = (void *) &cdat->dstr_10__OBV_TYPE;
cdat->dstr_10__OBV_TYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_10__OBV_TYPE.val, "OBV_TYPE",
@@ -7778,7 +7868,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_11__OBV_TYPE*/
-/*_.VALDATA___V157*/ meltfptr[156] = (void *) &cdat->dobj_11__OBV_TYPE;
+/*_.VALDATA___V160*/ meltfptr[159] = (void *) &cdat->dobj_11__OBV_TYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_11__OBV_TYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -7791,21 +7881,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_11__OBV_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_11__OBV_TYPE.obj_num = 0;
- cdat->dobj_11__OBV_TYPE.obj_hash = 352150662;
+ cdat->dobj_11__OBV_TYPE.obj_hash = 715056247;
cdat->dobj_11__OBV_TYPE.obj_len = 4;
/*inistring dstr_12__OBV_TYPE*/
- /*_.VALSTR___V158*/ meltfptr[157] = (void *) &cdat->dstr_12__OBV_TYPE;
+ /*_.VALSTR___V161*/ meltfptr[160] = (void *) &cdat->dstr_12__OBV_TYPE;
cdat->dstr_12__OBV_TYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_12__OBV_TYPE.val, "OBV_TYPE",
sizeof (cdat->dstr_12__OBV_TYPE.val) - 1);
/*iniobj dsym_13__CLASS_OBJPUREVALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V162*/ meltfptr[161])
- /*_.VALDATA___V162*/
- meltfptr[161] = (void *) &cdat->dsym_13__CLASS_OBJPUREVALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V165*/ meltfptr[164])
+ /*_.VALDATA___V165*/
+ meltfptr[164] = (void *) &cdat->dsym_13__CLASS_OBJPUREVALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_13__CLASS_OBJPUREVALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7822,7 +7912,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_14__CLASS_OBJPUREVAL*/
- /*_.VALSTR___V163*/ meltfptr[162] =
+ /*_.VALSTR___V166*/ meltfptr[165] =
(void *) &cdat->dstr_14__CLASS_OBJPUREVAL;
cdat->dstr_14__CLASS_OBJPUREVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7833,7 +7923,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:43:/ iniobj");
/*iniobj dobj_15__CLASS_OBJPUREVALUE*/
-/*_.VALDATA___V164*/ meltfptr[163] =
+/*_.VALDATA___V167*/ meltfptr[166] =
(void *) &cdat->dobj_15__CLASS_OBJPUREVALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_15__CLASS_OBJPUREVALUE",
@@ -7847,12 +7937,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_15__CLASS_OBJPUREVALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_15__CLASS_OBJPUREVALUE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_15__CLASS_OBJPUREVALUE.obj_hash = 626203829;
+ cdat->dobj_15__CLASS_OBJPUREVALUE.obj_hash = 652068581;
cdat->dobj_15__CLASS_OBJPUREVALUE.obj_len = 8;
/*inistring dstr_16__CLASS_OBJPUREVAL*/
- /*_.VALSTR___V165*/ meltfptr[164] =
+ /*_.VALSTR___V168*/ meltfptr[167] =
(void *) &cdat->dstr_16__CLASS_OBJPUREVAL;
cdat->dstr_16__CLASS_OBJPUREVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7861,22 +7951,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_16__CLASS_OBJPUREVAL.val) -
1);
/*inimult dtup_17__CLASS_OBJPUREVALUE */
- /*_.VALTUP___V166*/ meltfptr[165] =
+ /*_.VALTUP___V169*/ meltfptr[168] =
(void *) &cdat->dtup_17__CLASS_OBJPUREVALUE;
cdat->dtup_17__CLASS_OBJPUREVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_17__CLASS_OBJPUREVALUE.nbval = 3;
/*inimult dtup_18__CLASS_OBJPUREVALUE */
- /*_.VALTUP___V167*/ meltfptr[166] =
+ /*_.VALTUP___V170*/ meltfptr[169] =
(void *) &cdat->dtup_18__CLASS_OBJPUREVALUE;
cdat->dtup_18__CLASS_OBJPUREVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_18__CLASS_OBJPUREVALUE.nbval = 1;
/*iniobj dsym_19__CLASS_OBJLOCV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V168*/ meltfptr[167])
- /*_.VALDATA___V168*/
- meltfptr[167] = (void *) &cdat->dsym_19__CLASS_OBJLOCV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V171*/ meltfptr[170])
+ /*_.VALDATA___V171*/
+ meltfptr[170] = (void *) &cdat->dsym_19__CLASS_OBJLOCV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_19__CLASS_OBJLOCV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7893,7 +7983,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_20__CLASS_OBJLOCV*/
- /*_.VALSTR___V169*/ meltfptr[168] = (void *) &cdat->dstr_20__CLASS_OBJLOCV;
+ /*_.VALSTR___V172*/ meltfptr[171] = (void *) &cdat->dstr_20__CLASS_OBJLOCV;
cdat->dstr_20__CLASS_OBJLOCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_20__CLASS_OBJLOCV.val,
@@ -7903,7 +7993,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:49:/ iniobj");
/*iniobj dobj_21__CLASS_OBJLOCV*/
-/*_.VALDATA___V170*/ meltfptr[169] = (void *) &cdat->dobj_21__CLASS_OBJLOCV;
+/*_.VALDATA___V173*/ meltfptr[172] = (void *) &cdat->dobj_21__CLASS_OBJLOCV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_21__CLASS_OBJLOCV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
@@ -7916,12 +8006,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_21__CLASS_OBJLOCV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_21__CLASS_OBJLOCV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_21__CLASS_OBJLOCV.obj_hash = 392372508;
+ cdat->dobj_21__CLASS_OBJLOCV.obj_hash = 708763689;
cdat->dobj_21__CLASS_OBJLOCV.obj_len = 8;
/*inistring dstr_22__CLASS_OBJLOCV*/
- /*_.VALSTR___V171*/ meltfptr[170] = (void *) &cdat->dstr_22__CLASS_OBJLOCV;
+ /*_.VALSTR___V174*/ meltfptr[173] = (void *) &cdat->dstr_22__CLASS_OBJLOCV;
cdat->dstr_22__CLASS_OBJLOCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_22__CLASS_OBJLOCV.val,
@@ -7929,20 +8019,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_22__CLASS_OBJLOCV.val) -
1);
/*inimult dtup_23__CLASS_OBJLOCV */
- /*_.VALTUP___V172*/ meltfptr[171] = (void *) &cdat->dtup_23__CLASS_OBJLOCV;
+ /*_.VALTUP___V175*/ meltfptr[174] = (void *) &cdat->dtup_23__CLASS_OBJLOCV;
cdat->dtup_23__CLASS_OBJLOCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_23__CLASS_OBJLOCV.nbval = 4;
/*inimult dtup_24__CLASS_OBJLOCV */
- /*_.VALTUP___V179*/ meltfptr[178] = (void *) &cdat->dtup_24__CLASS_OBJLOCV;
+ /*_.VALTUP___V182*/ meltfptr[181] = (void *) &cdat->dtup_24__CLASS_OBJLOCV;
cdat->dtup_24__CLASS_OBJLOCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_24__CLASS_OBJLOCV.nbval = 4;
/*iniobj dsym_25__OBL_OFF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V180*/ meltfptr[179])
- /*_.VALDATA___V180*/
- meltfptr[179] = (void *) &cdat->dsym_25__OBL_OFF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V183*/ meltfptr[182])
+ /*_.VALDATA___V183*/
+ meltfptr[182] = (void *) &cdat->dsym_25__OBL_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_25__OBL_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7959,7 +8049,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_26__OBL_OFF*/
- /*_.VALSTR___V181*/ meltfptr[180] = (void *) &cdat->dstr_26__OBL_OFF;
+ /*_.VALSTR___V184*/ meltfptr[183] = (void *) &cdat->dstr_26__OBL_OFF;
cdat->dstr_26__OBL_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_26__OBL_OFF.val, "OBL_OFF",
@@ -7967,7 +8057,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_27__OBL_OFF*/
-/*_.VALDATA___V173*/ meltfptr[172] = (void *) &cdat->dobj_27__OBL_OFF;
+/*_.VALDATA___V176*/ meltfptr[175] = (void *) &cdat->dobj_27__OBL_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_27__OBL_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -7980,21 +8070,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_27__OBL_OFF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_27__OBL_OFF.obj_num = 1;
- cdat->dobj_27__OBL_OFF.obj_hash = 861916232;
+ cdat->dobj_27__OBL_OFF.obj_hash = 1025253887;
cdat->dobj_27__OBL_OFF.obj_len = 4;
/*inistring dstr_28__OBL_OFF*/
- /*_.VALSTR___V174*/ meltfptr[173] = (void *) &cdat->dstr_28__OBL_OFF;
+ /*_.VALSTR___V177*/ meltfptr[176] = (void *) &cdat->dstr_28__OBL_OFF;
cdat->dstr_28__OBL_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_28__OBL_OFF.val, "OBL_OFF",
sizeof (cdat->dstr_28__OBL_OFF.val) - 1);
/*iniobj dsym_29__OBL_PROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V182*/ meltfptr[181])
- /*_.VALDATA___V182*/
- meltfptr[181] = (void *) &cdat->dsym_29__OBL_PROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V185*/ meltfptr[184])
+ /*_.VALDATA___V185*/
+ meltfptr[184] = (void *) &cdat->dsym_29__OBL_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_29__OBL_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8011,7 +8101,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_30__OBL_PROC*/
- /*_.VALSTR___V183*/ meltfptr[182] = (void *) &cdat->dstr_30__OBL_PROC;
+ /*_.VALSTR___V186*/ meltfptr[185] = (void *) &cdat->dstr_30__OBL_PROC;
cdat->dstr_30__OBL_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_30__OBL_PROC.val, "OBL_PROC",
@@ -8019,7 +8109,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_31__OBL_PROC*/
-/*_.VALDATA___V175*/ meltfptr[174] = (void *) &cdat->dobj_31__OBL_PROC;
+/*_.VALDATA___V178*/ meltfptr[177] = (void *) &cdat->dobj_31__OBL_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_31__OBL_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8032,21 +8122,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_31__OBL_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_31__OBL_PROC.obj_num = 2;
- cdat->dobj_31__OBL_PROC.obj_hash = 337759382;
+ cdat->dobj_31__OBL_PROC.obj_hash = 87661082;
cdat->dobj_31__OBL_PROC.obj_len = 4;
/*inistring dstr_32__OBL_PROC*/
- /*_.VALSTR___V176*/ meltfptr[175] = (void *) &cdat->dstr_32__OBL_PROC;
+ /*_.VALSTR___V179*/ meltfptr[178] = (void *) &cdat->dstr_32__OBL_PROC;
cdat->dstr_32__OBL_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_32__OBL_PROC.val, "OBL_PROC",
sizeof (cdat->dstr_32__OBL_PROC.val) - 1);
/*iniobj dsym_33__OBL_CNAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V184*/ meltfptr[183])
- /*_.VALDATA___V184*/
- meltfptr[183] = (void *) &cdat->dsym_33__OBL_CNAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V187*/ meltfptr[186])
+ /*_.VALDATA___V187*/
+ meltfptr[186] = (void *) &cdat->dsym_33__OBL_CNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_33__OBL_CNAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8063,7 +8153,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_34__OBL_CNAME*/
- /*_.VALSTR___V185*/ meltfptr[184] = (void *) &cdat->dstr_34__OBL_CNAME;
+ /*_.VALSTR___V188*/ meltfptr[187] = (void *) &cdat->dstr_34__OBL_CNAME;
cdat->dstr_34__OBL_CNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_34__OBL_CNAME.val, "OBL_CNAME",
@@ -8071,7 +8161,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_35__OBL_CNAME*/
-/*_.VALDATA___V177*/ meltfptr[176] = (void *) &cdat->dobj_35__OBL_CNAME;
+/*_.VALDATA___V180*/ meltfptr[179] = (void *) &cdat->dobj_35__OBL_CNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_35__OBL_CNAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8084,21 +8174,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_35__OBL_CNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_35__OBL_CNAME.obj_num = 3;
- cdat->dobj_35__OBL_CNAME.obj_hash = 964026492;
+ cdat->dobj_35__OBL_CNAME.obj_hash = 744206584;
cdat->dobj_35__OBL_CNAME.obj_len = 4;
/*inistring dstr_36__OBL_CNAME*/
- /*_.VALSTR___V178*/ meltfptr[177] = (void *) &cdat->dstr_36__OBL_CNAME;
+ /*_.VALSTR___V181*/ meltfptr[180] = (void *) &cdat->dstr_36__OBL_CNAME;
cdat->dstr_36__OBL_CNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_36__OBL_CNAME.val, "OBL_CNAME",
sizeof (cdat->dstr_36__OBL_CNAME.val) - 1);
/*iniobj dsym_37__CLASS_OBJCLOCCV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V186*/ meltfptr[185])
- /*_.VALDATA___V186*/
- meltfptr[185] = (void *) &cdat->dsym_37__CLASS_OBJCLOCCV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V189*/ meltfptr[188])
+ /*_.VALDATA___V189*/
+ meltfptr[188] = (void *) &cdat->dsym_37__CLASS_OBJCLOCCV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_37__CLASS_OBJCLOCCV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8115,7 +8205,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_38__CLASS_OBJCLOCCV*/
- /*_.VALSTR___V187*/ meltfptr[186] =
+ /*_.VALSTR___V190*/ meltfptr[189] =
(void *) &cdat->dstr_38__CLASS_OBJCLOCCV;
cdat->dstr_38__CLASS_OBJCLOCCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8126,7 +8216,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:58:/ iniobj");
/*iniobj dobj_39__CLASS_OBJCLOCCV*/
-/*_.VALDATA___V188*/ meltfptr[187] =
+/*_.VALDATA___V191*/ meltfptr[190] =
(void *) &cdat->dobj_39__CLASS_OBJCLOCCV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_39__CLASS_OBJCLOCCV",
@@ -8140,12 +8230,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_39__CLASS_OBJCLOCCV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_39__CLASS_OBJCLOCCV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_39__CLASS_OBJCLOCCV.obj_hash = 546832170;
+ cdat->dobj_39__CLASS_OBJCLOCCV.obj_hash = 419363846;
cdat->dobj_39__CLASS_OBJCLOCCV.obj_len = 8;
/*inistring dstr_40__CLASS_OBJCLOCCV*/
- /*_.VALSTR___V189*/ meltfptr[188] =
+ /*_.VALSTR___V192*/ meltfptr[191] =
(void *) &cdat->dstr_40__CLASS_OBJCLOCCV;
cdat->dstr_40__CLASS_OBJCLOCCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8154,22 +8244,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_40__CLASS_OBJCLOCCV.val) -
1);
/*inimult dtup_41__CLASS_OBJCLOCCV */
- /*_.VALTUP___V190*/ meltfptr[189] =
+ /*_.VALTUP___V193*/ meltfptr[192] =
(void *) &cdat->dtup_41__CLASS_OBJCLOCCV;
cdat->dtup_41__CLASS_OBJCLOCCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_41__CLASS_OBJCLOCCV.nbval = 4;
/*inimult dtup_42__CLASS_OBJCLOCCV */
- /*_.VALTUP___V197*/ meltfptr[196] =
+ /*_.VALTUP___V200*/ meltfptr[199] =
(void *) &cdat->dtup_42__CLASS_OBJCLOCCV;
cdat->dtup_42__CLASS_OBJCLOCCV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_42__CLASS_OBJCLOCCV.nbval = 4;
/*iniobj dsym_43__OBC_OFF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V198*/ meltfptr[197])
- /*_.VALDATA___V198*/
- meltfptr[197] = (void *) &cdat->dsym_43__OBC_OFF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V201*/ meltfptr[200])
+ /*_.VALDATA___V201*/
+ meltfptr[200] = (void *) &cdat->dsym_43__OBC_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_43__OBC_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8186,7 +8276,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_44__OBC_OFF*/
- /*_.VALSTR___V199*/ meltfptr[198] = (void *) &cdat->dstr_44__OBC_OFF;
+ /*_.VALSTR___V202*/ meltfptr[201] = (void *) &cdat->dstr_44__OBC_OFF;
cdat->dstr_44__OBC_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_44__OBC_OFF.val, "OBC_OFF",
@@ -8194,7 +8284,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_45__OBC_OFF*/
-/*_.VALDATA___V191*/ meltfptr[190] = (void *) &cdat->dobj_45__OBC_OFF;
+/*_.VALDATA___V194*/ meltfptr[193] = (void *) &cdat->dobj_45__OBC_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_45__OBC_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8207,21 +8297,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_45__OBC_OFF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_45__OBC_OFF.obj_num = 1;
- cdat->dobj_45__OBC_OFF.obj_hash = 105682131;
+ cdat->dobj_45__OBC_OFF.obj_hash = 974611250;
cdat->dobj_45__OBC_OFF.obj_len = 4;
/*inistring dstr_46__OBC_OFF*/
- /*_.VALSTR___V192*/ meltfptr[191] = (void *) &cdat->dstr_46__OBC_OFF;
+ /*_.VALSTR___V195*/ meltfptr[194] = (void *) &cdat->dstr_46__OBC_OFF;
cdat->dstr_46__OBC_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_46__OBC_OFF.val, "OBC_OFF",
sizeof (cdat->dstr_46__OBC_OFF.val) - 1);
/*iniobj dsym_47__OBC_PROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V200*/ meltfptr[199])
- /*_.VALDATA___V200*/
- meltfptr[199] = (void *) &cdat->dsym_47__OBC_PROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V203*/ meltfptr[202])
+ /*_.VALDATA___V203*/
+ meltfptr[202] = (void *) &cdat->dsym_47__OBC_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_47__OBC_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8238,7 +8328,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_48__OBC_PROC*/
- /*_.VALSTR___V201*/ meltfptr[200] = (void *) &cdat->dstr_48__OBC_PROC;
+ /*_.VALSTR___V204*/ meltfptr[203] = (void *) &cdat->dstr_48__OBC_PROC;
cdat->dstr_48__OBC_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_48__OBC_PROC.val, "OBC_PROC",
@@ -8246,7 +8336,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_49__OBC_PROC*/
-/*_.VALDATA___V193*/ meltfptr[192] = (void *) &cdat->dobj_49__OBC_PROC;
+/*_.VALDATA___V196*/ meltfptr[195] = (void *) &cdat->dobj_49__OBC_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_49__OBC_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8259,21 +8349,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_49__OBC_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_49__OBC_PROC.obj_num = 2;
- cdat->dobj_49__OBC_PROC.obj_hash = 384217799;
+ cdat->dobj_49__OBC_PROC.obj_hash = 474081997;
cdat->dobj_49__OBC_PROC.obj_len = 4;
/*inistring dstr_50__OBC_PROC*/
- /*_.VALSTR___V194*/ meltfptr[193] = (void *) &cdat->dstr_50__OBC_PROC;
+ /*_.VALSTR___V197*/ meltfptr[196] = (void *) &cdat->dstr_50__OBC_PROC;
cdat->dstr_50__OBC_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_50__OBC_PROC.val, "OBC_PROC",
sizeof (cdat->dstr_50__OBC_PROC.val) - 1);
/*iniobj dsym_51__OBC_NAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V202*/ meltfptr[201])
- /*_.VALDATA___V202*/
- meltfptr[201] = (void *) &cdat->dsym_51__OBC_NAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V205*/ meltfptr[204])
+ /*_.VALDATA___V205*/
+ meltfptr[204] = (void *) &cdat->dsym_51__OBC_NAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_51__OBC_NAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8290,7 +8380,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_52__OBC_NAME*/
- /*_.VALSTR___V203*/ meltfptr[202] = (void *) &cdat->dstr_52__OBC_NAME;
+ /*_.VALSTR___V206*/ meltfptr[205] = (void *) &cdat->dstr_52__OBC_NAME;
cdat->dstr_52__OBC_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_52__OBC_NAME.val, "OBC_NAME",
@@ -8298,7 +8388,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_53__OBC_NAME*/
-/*_.VALDATA___V195*/ meltfptr[194] = (void *) &cdat->dobj_53__OBC_NAME;
+/*_.VALDATA___V198*/ meltfptr[197] = (void *) &cdat->dobj_53__OBC_NAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_53__OBC_NAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8311,21 +8401,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_53__OBC_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_53__OBC_NAME.obj_num = 3;
- cdat->dobj_53__OBC_NAME.obj_hash = 1004427819;
+ cdat->dobj_53__OBC_NAME.obj_hash = 842580691;
cdat->dobj_53__OBC_NAME.obj_len = 4;
/*inistring dstr_54__OBC_NAME*/
- /*_.VALSTR___V196*/ meltfptr[195] = (void *) &cdat->dstr_54__OBC_NAME;
+ /*_.VALSTR___V199*/ meltfptr[198] = (void *) &cdat->dstr_54__OBC_NAME;
cdat->dstr_54__OBC_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_54__OBC_NAME.val, "OBC_NAME",
sizeof (cdat->dstr_54__OBC_NAME.val) - 1);
/*iniobj dsym_55__CLASS_OBJCONSTV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V204*/ meltfptr[203])
- /*_.VALDATA___V204*/
- meltfptr[203] = (void *) &cdat->dsym_55__CLASS_OBJCONSTV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V207*/ meltfptr[206])
+ /*_.VALDATA___V207*/
+ meltfptr[206] = (void *) &cdat->dsym_55__CLASS_OBJCONSTV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_55__CLASS_OBJCONSTV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8342,7 +8432,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_56__CLASS_OBJCONSTV*/
- /*_.VALSTR___V205*/ meltfptr[204] =
+ /*_.VALSTR___V208*/ meltfptr[207] =
(void *) &cdat->dstr_56__CLASS_OBJCONSTV;
cdat->dstr_56__CLASS_OBJCONSTV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8353,7 +8443,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:67:/ iniobj");
/*iniobj dobj_57__CLASS_OBJCONSTV*/
-/*_.VALDATA___V206*/ meltfptr[205] =
+/*_.VALDATA___V209*/ meltfptr[208] =
(void *) &cdat->dobj_57__CLASS_OBJCONSTV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_57__CLASS_OBJCONSTV",
@@ -8367,12 +8457,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_57__CLASS_OBJCONSTV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_57__CLASS_OBJCONSTV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_57__CLASS_OBJCONSTV.obj_hash = 713022078;
+ cdat->dobj_57__CLASS_OBJCONSTV.obj_hash = 89123947;
cdat->dobj_57__CLASS_OBJCONSTV.obj_len = 8;
/*inistring dstr_58__CLASS_OBJCONSTV*/
- /*_.VALSTR___V207*/ meltfptr[206] =
+ /*_.VALSTR___V210*/ meltfptr[209] =
(void *) &cdat->dstr_58__CLASS_OBJCONSTV;
cdat->dstr_58__CLASS_OBJCONSTV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8381,22 +8471,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_58__CLASS_OBJCONSTV.val) -
1);
/*inimult dtup_59__CLASS_OBJCONSTV */
- /*_.VALTUP___V208*/ meltfptr[207] =
+ /*_.VALTUP___V211*/ meltfptr[210] =
(void *) &cdat->dtup_59__CLASS_OBJCONSTV;
cdat->dtup_59__CLASS_OBJCONSTV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_59__CLASS_OBJCONSTV.nbval = 5;
/*inimult dtup_60__CLASS_OBJCONSTV */
- /*_.VALTUP___V209*/ meltfptr[208] =
+ /*_.VALTUP___V212*/ meltfptr[211] =
(void *) &cdat->dtup_60__CLASS_OBJCONSTV;
cdat->dtup_60__CLASS_OBJCONSTV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_60__CLASS_OBJCONSTV.nbval = 4;
/*iniobj dsym_61__CLASS_OBJPREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V210*/ meltfptr[209])
- /*_.VALDATA___V210*/
- meltfptr[209] = (void *) &cdat->dsym_61__CLASS_OBJPREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V213*/ meltfptr[212])
+ /*_.VALDATA___V213*/
+ meltfptr[212] = (void *) &cdat->dsym_61__CLASS_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_61__CLASS_OBJPREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8413,7 +8503,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_62__CLASS_OBJPREDEF*/
- /*_.VALSTR___V211*/ meltfptr[210] =
+ /*_.VALSTR___V214*/ meltfptr[213] =
(void *) &cdat->dstr_62__CLASS_OBJPREDEF;
cdat->dstr_62__CLASS_OBJPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8424,7 +8514,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:73:/ iniobj");
/*iniobj dobj_63__CLASS_OBJPREDEF*/
-/*_.VALDATA___V212*/ meltfptr[211] =
+/*_.VALDATA___V215*/ meltfptr[214] =
(void *) &cdat->dobj_63__CLASS_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_63__CLASS_OBJPREDEF",
@@ -8438,12 +8528,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_63__CLASS_OBJPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_63__CLASS_OBJPREDEF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_63__CLASS_OBJPREDEF.obj_hash = 654998094;
+ cdat->dobj_63__CLASS_OBJPREDEF.obj_hash = 705348723;
cdat->dobj_63__CLASS_OBJPREDEF.obj_len = 8;
/*inistring dstr_64__CLASS_OBJPREDEF*/
- /*_.VALSTR___V213*/ meltfptr[212] =
+ /*_.VALSTR___V216*/ meltfptr[215] =
(void *) &cdat->dstr_64__CLASS_OBJPREDEF;
cdat->dstr_64__CLASS_OBJPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8452,22 +8542,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_64__CLASS_OBJPREDEF.val) -
1);
/*inimult dtup_65__CLASS_OBJPREDEF */
- /*_.VALTUP___V214*/ meltfptr[213] =
+ /*_.VALTUP___V217*/ meltfptr[216] =
(void *) &cdat->dtup_65__CLASS_OBJPREDEF;
cdat->dtup_65__CLASS_OBJPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_65__CLASS_OBJPREDEF.nbval = 4;
/*inimult dtup_66__CLASS_OBJPREDEF */
- /*_.VALTUP___V217*/ meltfptr[216] =
+ /*_.VALTUP___V220*/ meltfptr[219] =
(void *) &cdat->dtup_66__CLASS_OBJPREDEF;
cdat->dtup_66__CLASS_OBJPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_66__CLASS_OBJPREDEF.nbval = 2;
/*iniobj dsym_67__OBPREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217])
- /*_.VALDATA___V218*/
- meltfptr[217] = (void *) &cdat->dsym_67__OBPREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V221*/ meltfptr[220])
+ /*_.VALDATA___V221*/
+ meltfptr[220] = (void *) &cdat->dsym_67__OBPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_67__OBPREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8484,7 +8574,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_68__OBPREDEF*/
- /*_.VALSTR___V219*/ meltfptr[218] = (void *) &cdat->dstr_68__OBPREDEF;
+ /*_.VALSTR___V222*/ meltfptr[221] = (void *) &cdat->dstr_68__OBPREDEF;
cdat->dstr_68__OBPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_68__OBPREDEF.val, "OBPREDEF",
@@ -8492,7 +8582,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_69__OBPREDEF*/
-/*_.VALDATA___V215*/ meltfptr[214] = (void *) &cdat->dobj_69__OBPREDEF;
+/*_.VALDATA___V218*/ meltfptr[217] = (void *) &cdat->dobj_69__OBPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_69__OBPREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8505,21 +8595,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_69__OBPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_69__OBPREDEF.obj_num = 1;
- cdat->dobj_69__OBPREDEF.obj_hash = 495591061;
+ cdat->dobj_69__OBPREDEF.obj_hash = 935997697;
cdat->dobj_69__OBPREDEF.obj_len = 4;
/*inistring dstr_70__OBPREDEF*/
- /*_.VALSTR___V216*/ meltfptr[215] = (void *) &cdat->dstr_70__OBPREDEF;
+ /*_.VALSTR___V219*/ meltfptr[218] = (void *) &cdat->dstr_70__OBPREDEF;
cdat->dstr_70__OBPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_70__OBPREDEF.val, "OBPREDEF",
sizeof (cdat->dstr_70__OBPREDEF.val) - 1);
/*iniobj dsym_71__CLASS_OBJNIL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V220*/ meltfptr[219])
- /*_.VALDATA___V220*/
- meltfptr[219] = (void *) &cdat->dsym_71__CLASS_OBJNIL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V223*/ meltfptr[222])
+ /*_.VALDATA___V223*/
+ meltfptr[222] = (void *) &cdat->dsym_71__CLASS_OBJNIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_71__CLASS_OBJNIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8536,7 +8626,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_72__CLASS_OBJNIL*/
- /*_.VALSTR___V221*/ meltfptr[220] = (void *) &cdat->dstr_72__CLASS_OBJNIL;
+ /*_.VALSTR___V224*/ meltfptr[223] = (void *) &cdat->dstr_72__CLASS_OBJNIL;
cdat->dstr_72__CLASS_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_72__CLASS_OBJNIL.val,
@@ -8545,7 +8635,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:79:/ iniobj");
/*iniobj dobj_73__CLASS_OBJNIL*/
-/*_.VALDATA___V222*/ meltfptr[221] = (void *) &cdat->dobj_73__CLASS_OBJNIL;
+/*_.VALDATA___V225*/ meltfptr[224] = (void *) &cdat->dobj_73__CLASS_OBJNIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_73__CLASS_OBJNIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
@@ -8558,32 +8648,32 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_73__CLASS_OBJNIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_73__CLASS_OBJNIL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_73__CLASS_OBJNIL.obj_hash = 317709599;
+ cdat->dobj_73__CLASS_OBJNIL.obj_hash = 735195453;
cdat->dobj_73__CLASS_OBJNIL.obj_len = 8;
/*inistring dstr_74__CLASS_OBJNIL*/
- /*_.VALSTR___V223*/ meltfptr[222] = (void *) &cdat->dstr_74__CLASS_OBJNIL;
+ /*_.VALSTR___V226*/ meltfptr[225] = (void *) &cdat->dstr_74__CLASS_OBJNIL;
cdat->dstr_74__CLASS_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_74__CLASS_OBJNIL.val,
"CLASS_OBJNIL",
sizeof (cdat->dstr_74__CLASS_OBJNIL.val) - 1);
/*inimult dtup_75__CLASS_OBJNIL */
- /*_.VALTUP___V224*/ meltfptr[223] = (void *) &cdat->dtup_75__CLASS_OBJNIL;
+ /*_.VALTUP___V227*/ meltfptr[226] = (void *) &cdat->dtup_75__CLASS_OBJNIL;
cdat->dtup_75__CLASS_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_75__CLASS_OBJNIL.nbval = 4;
/*inimult dtup_76__CLASS_OBJNIL */
- /*_.VALTUP___V225*/ meltfptr[224] = (void *) &cdat->dtup_76__CLASS_OBJNIL;
+ /*_.VALTUP___V228*/ meltfptr[227] = (void *) &cdat->dtup_76__CLASS_OBJNIL;
cdat->dtup_76__CLASS_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_76__CLASS_OBJNIL.nbval = 1;
/*iniobj dsym_77__CLASS_OBJINITELEM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V226*/ meltfptr[225])
- /*_.VALDATA___V226*/
- meltfptr[225] = (void *) &cdat->dsym_77__CLASS_OBJINITELEM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V229*/ meltfptr[228])
+ /*_.VALDATA___V229*/
+ meltfptr[228] = (void *) &cdat->dsym_77__CLASS_OBJINITELEM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_77__CLASS_OBJINITELEM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8600,7 +8690,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_78__CLASS_OBJINITELE*/
- /*_.VALSTR___V227*/ meltfptr[226] =
+ /*_.VALSTR___V230*/ meltfptr[229] =
(void *) &cdat->dstr_78__CLASS_OBJINITELE;
cdat->dstr_78__CLASS_OBJINITELE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8611,7 +8701,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:84:/ iniobj");
/*iniobj dobj_79__CLASS_OBJINITELEM*/
-/*_.VALDATA___V228*/ meltfptr[227] =
+/*_.VALDATA___V231*/ meltfptr[230] =
(void *) &cdat->dobj_79__CLASS_OBJINITELEM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_79__CLASS_OBJINITELEM",
@@ -8625,12 +8715,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_79__CLASS_OBJINITELEM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_79__CLASS_OBJINITELEM.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_79__CLASS_OBJINITELEM.obj_hash = 131602459;
+ cdat->dobj_79__CLASS_OBJINITELEM.obj_hash = 708972738;
cdat->dobj_79__CLASS_OBJINITELEM.obj_len = 8;
/*inistring dstr_80__CLASS_OBJINITELE*/
- /*_.VALSTR___V229*/ meltfptr[228] =
+ /*_.VALSTR___V232*/ meltfptr[231] =
(void *) &cdat->dstr_80__CLASS_OBJINITELE;
cdat->dstr_80__CLASS_OBJINITELE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8639,22 +8729,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_80__CLASS_OBJINITELE.val) -
1);
/*inimult dtup_81__CLASS_OBJINITELEM */
- /*_.VALTUP___V230*/ meltfptr[229] =
+ /*_.VALTUP___V233*/ meltfptr[232] =
(void *) &cdat->dtup_81__CLASS_OBJINITELEM;
cdat->dtup_81__CLASS_OBJINITELEM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_81__CLASS_OBJINITELEM.nbval = 4;
/*inimult dtup_82__CLASS_OBJINITELEM */
- /*_.VALTUP___V239*/ meltfptr[238] =
+ /*_.VALTUP___V242*/ meltfptr[241] =
(void *) &cdat->dtup_82__CLASS_OBJINITELEM;
cdat->dtup_82__CLASS_OBJINITELEM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_82__CLASS_OBJINITELEM.nbval = 5;
/*iniobj dsym_83__OIE_CNAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V240*/ meltfptr[239])
- /*_.VALDATA___V240*/
- meltfptr[239] = (void *) &cdat->dsym_83__OIE_CNAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V243*/ meltfptr[242])
+ /*_.VALDATA___V243*/
+ meltfptr[242] = (void *) &cdat->dsym_83__OIE_CNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_83__OIE_CNAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8671,7 +8761,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_84__OIE_CNAME*/
- /*_.VALSTR___V241*/ meltfptr[240] = (void *) &cdat->dstr_84__OIE_CNAME;
+ /*_.VALSTR___V244*/ meltfptr[243] = (void *) &cdat->dstr_84__OIE_CNAME;
cdat->dstr_84__OIE_CNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_84__OIE_CNAME.val, "OIE_CNAME",
@@ -8679,7 +8769,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_85__OIE_CNAME*/
-/*_.VALDATA___V231*/ meltfptr[230] = (void *) &cdat->dobj_85__OIE_CNAME;
+/*_.VALDATA___V234*/ meltfptr[233] = (void *) &cdat->dobj_85__OIE_CNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_85__OIE_CNAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8692,21 +8782,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_85__OIE_CNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_85__OIE_CNAME.obj_num = 1;
- cdat->dobj_85__OIE_CNAME.obj_hash = 1052212030;
+ cdat->dobj_85__OIE_CNAME.obj_hash = 27305813;
cdat->dobj_85__OIE_CNAME.obj_len = 4;
/*inistring dstr_86__OIE_CNAME*/
- /*_.VALSTR___V232*/ meltfptr[231] = (void *) &cdat->dstr_86__OIE_CNAME;
+ /*_.VALSTR___V235*/ meltfptr[234] = (void *) &cdat->dstr_86__OIE_CNAME;
cdat->dstr_86__OIE_CNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_86__OIE_CNAME.val, "OIE_CNAME",
sizeof (cdat->dstr_86__OIE_CNAME.val) - 1);
/*iniobj dsym_87__OIE_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V242*/ meltfptr[241])
- /*_.VALDATA___V242*/
- meltfptr[241] = (void *) &cdat->dsym_87__OIE_DATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V245*/ meltfptr[244])
+ /*_.VALDATA___V245*/
+ meltfptr[244] = (void *) &cdat->dsym_87__OIE_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_87__OIE_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8723,7 +8813,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_88__OIE_DATA*/
- /*_.VALSTR___V243*/ meltfptr[242] = (void *) &cdat->dstr_88__OIE_DATA;
+ /*_.VALSTR___V246*/ meltfptr[245] = (void *) &cdat->dstr_88__OIE_DATA;
cdat->dstr_88__OIE_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_88__OIE_DATA.val, "OIE_DATA",
@@ -8731,7 +8821,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_89__OIE_DATA*/
-/*_.VALDATA___V233*/ meltfptr[232] = (void *) &cdat->dobj_89__OIE_DATA;
+/*_.VALDATA___V236*/ meltfptr[235] = (void *) &cdat->dobj_89__OIE_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_89__OIE_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8744,21 +8834,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_89__OIE_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_89__OIE_DATA.obj_num = 2;
- cdat->dobj_89__OIE_DATA.obj_hash = 376782486;
+ cdat->dobj_89__OIE_DATA.obj_hash = 44085869;
cdat->dobj_89__OIE_DATA.obj_len = 4;
/*inistring dstr_90__OIE_DATA*/
- /*_.VALSTR___V234*/ meltfptr[233] = (void *) &cdat->dstr_90__OIE_DATA;
+ /*_.VALSTR___V237*/ meltfptr[236] = (void *) &cdat->dstr_90__OIE_DATA;
cdat->dstr_90__OIE_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_90__OIE_DATA.val, "OIE_DATA",
sizeof (cdat->dstr_90__OIE_DATA.val) - 1);
/*iniobj dsym_91__OIE_DISCR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V244*/ meltfptr[243])
- /*_.VALDATA___V244*/
- meltfptr[243] = (void *) &cdat->dsym_91__OIE_DISCR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V247*/ meltfptr[246])
+ /*_.VALDATA___V247*/
+ meltfptr[246] = (void *) &cdat->dsym_91__OIE_DISCR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_91__OIE_DISCR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8775,7 +8865,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_92__OIE_DISCR*/
- /*_.VALSTR___V245*/ meltfptr[244] = (void *) &cdat->dstr_92__OIE_DISCR;
+ /*_.VALSTR___V248*/ meltfptr[247] = (void *) &cdat->dstr_92__OIE_DISCR;
cdat->dstr_92__OIE_DISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_92__OIE_DISCR.val, "OIE_DISCR",
@@ -8783,7 +8873,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_93__OIE_DISCR*/
-/*_.VALDATA___V235*/ meltfptr[234] = (void *) &cdat->dobj_93__OIE_DISCR;
+/*_.VALDATA___V238*/ meltfptr[237] = (void *) &cdat->dobj_93__OIE_DISCR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_93__OIE_DISCR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8796,21 +8886,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_93__OIE_DISCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_93__OIE_DISCR.obj_num = 3;
- cdat->dobj_93__OIE_DISCR.obj_hash = 707556742;
+ cdat->dobj_93__OIE_DISCR.obj_hash = 744561921;
cdat->dobj_93__OIE_DISCR.obj_len = 4;
/*inistring dstr_94__OIE_DISCR*/
- /*_.VALSTR___V236*/ meltfptr[235] = (void *) &cdat->dstr_94__OIE_DISCR;
+ /*_.VALSTR___V239*/ meltfptr[238] = (void *) &cdat->dstr_94__OIE_DISCR;
cdat->dstr_94__OIE_DISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_94__OIE_DISCR.val, "OIE_DISCR",
sizeof (cdat->dstr_94__OIE_DISCR.val) - 1);
/*iniobj dsym_95__OIE_LOCVAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V246*/ meltfptr[245])
- /*_.VALDATA___V246*/
- meltfptr[245] = (void *) &cdat->dsym_95__OIE_LOCVAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V249*/ meltfptr[248])
+ /*_.VALDATA___V249*/
+ meltfptr[248] = (void *) &cdat->dsym_95__OIE_LOCVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_95__OIE_LOCVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8827,7 +8917,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_96__OIE_LOCVAR*/
- /*_.VALSTR___V247*/ meltfptr[246] = (void *) &cdat->dstr_96__OIE_LOCVAR;
+ /*_.VALSTR___V250*/ meltfptr[249] = (void *) &cdat->dstr_96__OIE_LOCVAR;
cdat->dstr_96__OIE_LOCVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_96__OIE_LOCVAR.val, "OIE_LOCVAR",
@@ -8835,7 +8925,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_97__OIE_LOCVAR*/
-/*_.VALDATA___V237*/ meltfptr[236] = (void *) &cdat->dobj_97__OIE_LOCVAR;
+/*_.VALDATA___V240*/ meltfptr[239] = (void *) &cdat->dobj_97__OIE_LOCVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_97__OIE_LOCVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8848,21 +8938,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_97__OIE_LOCVAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_97__OIE_LOCVAR.obj_num = 4;
- cdat->dobj_97__OIE_LOCVAR.obj_hash = 42321203;
+ cdat->dobj_97__OIE_LOCVAR.obj_hash = 355104814;
cdat->dobj_97__OIE_LOCVAR.obj_len = 4;
/*inistring dstr_98__OIE_LOCVAR*/
- /*_.VALSTR___V238*/ meltfptr[237] = (void *) &cdat->dstr_98__OIE_LOCVAR;
+ /*_.VALSTR___V241*/ meltfptr[240] = (void *) &cdat->dstr_98__OIE_LOCVAR;
cdat->dstr_98__OIE_LOCVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_98__OIE_LOCVAR.val, "OIE_LOCVAR",
sizeof (cdat->dstr_98__OIE_LOCVAR.val) - 1);
/*iniobj dsym_99__CLASS_OBJINITOBJECT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V248*/ meltfptr[247])
- /*_.VALDATA___V248*/
- meltfptr[247] = (void *) &cdat->dsym_99__CLASS_OBJINITOBJECT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V251*/ meltfptr[250])
+ /*_.VALDATA___V251*/
+ meltfptr[250] = (void *) &cdat->dsym_99__CLASS_OBJINITOBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_99__CLASS_OBJINITOBJECT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8879,7 +8969,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_100__CLASS_OBJINITOBJ*/
- /*_.VALSTR___V249*/ meltfptr[248] =
+ /*_.VALSTR___V252*/ meltfptr[251] =
(void *) &cdat->dstr_100__CLASS_OBJINITOBJ;
cdat->dstr_100__CLASS_OBJINITOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8890,7 +8980,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:94:/ iniobj");
/*iniobj dobj_101__CLASS_OBJINITOBJECT*/
-/*_.VALDATA___V250*/ meltfptr[249] =
+/*_.VALDATA___V253*/ meltfptr[252] =
(void *) &cdat->dobj_101__CLASS_OBJINITOBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_101__CLASS_OBJINITOBJECT",
@@ -8904,12 +8994,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_101__CLASS_OBJINITOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_101__CLASS_OBJINITOBJECT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_101__CLASS_OBJINITOBJECT.obj_hash = 56163355;
+ cdat->dobj_101__CLASS_OBJINITOBJECT.obj_hash = 513548486;
cdat->dobj_101__CLASS_OBJINITOBJECT.obj_len = 8;
/*inistring dstr_102__CLASS_OBJINITOBJ*/
- /*_.VALSTR___V251*/ meltfptr[250] =
+ /*_.VALSTR___V254*/ meltfptr[253] =
(void *) &cdat->dstr_102__CLASS_OBJINITOBJ;
cdat->dstr_102__CLASS_OBJINITOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8918,22 +9008,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_102__CLASS_OBJINITOBJ.
val) - 1);
/*inimult dtup_103__CLASS_OBJINITOBJECT */
- /*_.VALTUP___V252*/ meltfptr[251] =
+ /*_.VALTUP___V255*/ meltfptr[254] =
(void *) &cdat->dtup_103__CLASS_OBJINITOBJECT;
cdat->dtup_103__CLASS_OBJINITOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_103__CLASS_OBJINITOBJECT.nbval = 5;
/*inimult dtup_104__CLASS_OBJINITOBJECT */
- /*_.VALTUP___V257*/ meltfptr[256] =
+ /*_.VALTUP___V260*/ meltfptr[259] =
(void *) &cdat->dtup_104__CLASS_OBJINITOBJECT;
cdat->dtup_104__CLASS_OBJINITOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_104__CLASS_OBJINITOBJECT.nbval = 7;
/*iniobj dsym_105__OIO_PREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V258*/ meltfptr[257])
- /*_.VALDATA___V258*/
- meltfptr[257] = (void *) &cdat->dsym_105__OIO_PREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V261*/ meltfptr[260])
+ /*_.VALDATA___V261*/
+ meltfptr[260] = (void *) &cdat->dsym_105__OIO_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_105__OIO_PREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8950,7 +9040,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_106__OIO_PREDEF*/
- /*_.VALSTR___V259*/ meltfptr[258] = (void *) &cdat->dstr_106__OIO_PREDEF;
+ /*_.VALSTR___V262*/ meltfptr[261] = (void *) &cdat->dstr_106__OIO_PREDEF;
cdat->dstr_106__OIO_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_106__OIO_PREDEF.val, "OIO_PREDEF",
@@ -8958,7 +9048,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_107__OIO_PREDEF*/
-/*_.VALDATA___V253*/ meltfptr[252] = (void *) &cdat->dobj_107__OIO_PREDEF;
+/*_.VALDATA___V256*/ meltfptr[255] = (void *) &cdat->dobj_107__OIO_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_107__OIO_PREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8971,21 +9061,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_107__OIO_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_107__OIO_PREDEF.obj_num = 5;
- cdat->dobj_107__OIO_PREDEF.obj_hash = 837936096;
+ cdat->dobj_107__OIO_PREDEF.obj_hash = 226288930;
cdat->dobj_107__OIO_PREDEF.obj_len = 4;
/*inistring dstr_108__OIO_PREDEF*/
- /*_.VALSTR___V254*/ meltfptr[253] = (void *) &cdat->dstr_108__OIO_PREDEF;
+ /*_.VALSTR___V257*/ meltfptr[256] = (void *) &cdat->dstr_108__OIO_PREDEF;
cdat->dstr_108__OIO_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_108__OIO_PREDEF.val, "OIO_PREDEF",
sizeof (cdat->dstr_108__OIO_PREDEF.val) - 1);
/*iniobj dsym_109__OIO_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V260*/ meltfptr[259])
- /*_.VALDATA___V260*/
- meltfptr[259] = (void *) &cdat->dsym_109__OIO_CLASS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V263*/ meltfptr[262])
+ /*_.VALDATA___V263*/
+ meltfptr[262] = (void *) &cdat->dsym_109__OIO_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_109__OIO_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9002,7 +9092,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_110__OIO_CLASS*/
- /*_.VALSTR___V261*/ meltfptr[260] = (void *) &cdat->dstr_110__OIO_CLASS;
+ /*_.VALSTR___V264*/ meltfptr[263] = (void *) &cdat->dstr_110__OIO_CLASS;
cdat->dstr_110__OIO_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_110__OIO_CLASS.val, "OIO_CLASS",
@@ -9010,7 +9100,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_111__OIO_CLASS*/
-/*_.VALDATA___V255*/ meltfptr[254] = (void *) &cdat->dobj_111__OIO_CLASS;
+/*_.VALDATA___V258*/ meltfptr[257] = (void *) &cdat->dobj_111__OIO_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_111__OIO_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -9023,21 +9113,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_111__OIO_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_111__OIO_CLASS.obj_num = 6;
- cdat->dobj_111__OIO_CLASS.obj_hash = 374784640;
+ cdat->dobj_111__OIO_CLASS.obj_hash = 1015911242;
cdat->dobj_111__OIO_CLASS.obj_len = 4;
/*inistring dstr_112__OIO_CLASS*/
- /*_.VALSTR___V256*/ meltfptr[255] = (void *) &cdat->dstr_112__OIO_CLASS;
+ /*_.VALSTR___V259*/ meltfptr[258] = (void *) &cdat->dstr_112__OIO_CLASS;
cdat->dstr_112__OIO_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_112__OIO_CLASS.val, "OIO_CLASS",
sizeof (cdat->dstr_112__OIO_CLASS.val) - 1);
/*iniobj dsym_113__CLASS_OBJINITUNIQUEOBJECT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V262*/ meltfptr[261])
- /*_.VALDATA___V262*/
- meltfptr[261] = (void *) &cdat->dsym_113__CLASS_OBJINITUNIQUEOBJECT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V265*/ meltfptr[264])
+ /*_.VALDATA___V265*/
+ meltfptr[264] = (void *) &cdat->dsym_113__CLASS_OBJINITUNIQUEOBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_113__CLASS_OBJINITUNIQUEOBJECT",
@@ -9055,7 +9145,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_114__CLASS_OBJINITUNI*/
- /*_.VALSTR___V263*/ meltfptr[262] =
+ /*_.VALSTR___V266*/ meltfptr[265] =
(void *) &cdat->dstr_114__CLASS_OBJINITUNI;
cdat->dstr_114__CLASS_OBJINITUNI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9066,7 +9156,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:103:/ iniobj");
/*iniobj dobj_115__CLASS_OBJINITUNIQUEOBJECT*/
-/*_.VALDATA___V264*/ meltfptr[263] =
+/*_.VALDATA___V267*/ meltfptr[266] =
(void *) &cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9081,12 +9171,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 264870404;
+ cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 280067406;
cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_len = 8;
/*inistring dstr_116__CLASS_OBJINITUNI*/
- /*_.VALSTR___V265*/ meltfptr[264] =
+ /*_.VALSTR___V268*/ meltfptr[267] =
(void *) &cdat->dstr_116__CLASS_OBJINITUNI;
cdat->dstr_116__CLASS_OBJINITUNI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9095,22 +9185,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_116__CLASS_OBJINITUNI.
val) - 1);
/*inimult dtup_117__CLASS_OBJINITUNIQUEOBJECT */
- /*_.VALTUP___V266*/ meltfptr[265] =
+ /*_.VALTUP___V269*/ meltfptr[268] =
(void *) &cdat->dtup_117__CLASS_OBJINITUNIQUEOBJECT;
cdat->dtup_117__CLASS_OBJINITUNIQUEOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_117__CLASS_OBJINITUNIQUEOBJECT.nbval = 6;
/*inimult dtup_118__CLASS_OBJINITUNIQUEOBJECT */
- /*_.VALTUP___V267*/ meltfptr[266] =
+ /*_.VALTUP___V270*/ meltfptr[269] =
(void *) &cdat->dtup_118__CLASS_OBJINITUNIQUEOBJECT;
cdat->dtup_118__CLASS_OBJINITUNIQUEOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_118__CLASS_OBJINITUNIQUEOBJECT.nbval = 7;
/*iniobj dsym_119__CLASS_OBJINITMULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V268*/ meltfptr[267])
- /*_.VALDATA___V268*/
- meltfptr[267] = (void *) &cdat->dsym_119__CLASS_OBJINITMULTIPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V271*/ meltfptr[270])
+ /*_.VALDATA___V271*/
+ meltfptr[270] = (void *) &cdat->dsym_119__CLASS_OBJINITMULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_119__CLASS_OBJINITMULTIPLE",
@@ -9128,7 +9218,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_120__CLASS_OBJINITMUL*/
- /*_.VALSTR___V269*/ meltfptr[268] =
+ /*_.VALSTR___V272*/ meltfptr[271] =
(void *) &cdat->dstr_120__CLASS_OBJINITMUL;
cdat->dstr_120__CLASS_OBJINITMUL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9139,7 +9229,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:110:/ iniobj");
/*iniobj dobj_121__CLASS_OBJINITMULTIPLE*/
-/*_.VALDATA___V270*/ meltfptr[269] =
+/*_.VALDATA___V273*/ meltfptr[272] =
(void *) &cdat->dobj_121__CLASS_OBJINITMULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9154,12 +9244,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_121__CLASS_OBJINITMULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_hash = 459112248;
+ cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_hash = 648812688;
cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_len = 8;
/*inistring dstr_122__CLASS_OBJINITMUL*/
- /*_.VALSTR___V271*/ meltfptr[270] =
+ /*_.VALSTR___V274*/ meltfptr[273] =
(void *) &cdat->dstr_122__CLASS_OBJINITMUL;
cdat->dstr_122__CLASS_OBJINITMUL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9168,22 +9258,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_122__CLASS_OBJINITMUL.
val) - 1);
/*inimult dtup_123__CLASS_OBJINITMULTIPLE */
- /*_.VALTUP___V272*/ meltfptr[271] =
+ /*_.VALTUP___V275*/ meltfptr[274] =
(void *) &cdat->dtup_123__CLASS_OBJINITMULTIPLE;
cdat->dtup_123__CLASS_OBJINITMULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_123__CLASS_OBJINITMULTIPLE.nbval = 5;
/*inimult dtup_124__CLASS_OBJINITMULTIPLE */
- /*_.VALTUP___V275*/ meltfptr[274] =
+ /*_.VALTUP___V278*/ meltfptr[277] =
(void *) &cdat->dtup_124__CLASS_OBJINITMULTIPLE;
cdat->dtup_124__CLASS_OBJINITMULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_124__CLASS_OBJINITMULTIPLE.nbval = 6;
/*iniobj dsym_125__OIM_TUPVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V276*/ meltfptr[275])
- /*_.VALDATA___V276*/
- meltfptr[275] = (void *) &cdat->dsym_125__OIM_TUPVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V279*/ meltfptr[278])
+ /*_.VALDATA___V279*/
+ meltfptr[278] = (void *) &cdat->dsym_125__OIM_TUPVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_125__OIM_TUPVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9200,7 +9290,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_126__OIM_TUPVAL*/
- /*_.VALSTR___V277*/ meltfptr[276] = (void *) &cdat->dstr_126__OIM_TUPVAL;
+ /*_.VALSTR___V280*/ meltfptr[279] = (void *) &cdat->dstr_126__OIM_TUPVAL;
cdat->dstr_126__OIM_TUPVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_126__OIM_TUPVAL.val, "OIM_TUPVAL",
@@ -9208,7 +9298,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_127__OIM_TUPVAL*/
-/*_.VALDATA___V273*/ meltfptr[272] = (void *) &cdat->dobj_127__OIM_TUPVAL;
+/*_.VALDATA___V276*/ meltfptr[275] = (void *) &cdat->dobj_127__OIM_TUPVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_127__OIM_TUPVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -9221,21 +9311,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_127__OIM_TUPVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_127__OIM_TUPVAL.obj_num = 5;
- cdat->dobj_127__OIM_TUPVAL.obj_hash = 849827750;
+ cdat->dobj_127__OIM_TUPVAL.obj_hash = 94629514;
cdat->dobj_127__OIM_TUPVAL.obj_len = 4;
/*inistring dstr_128__OIM_TUPVAL*/
- /*_.VALSTR___V274*/ meltfptr[273] = (void *) &cdat->dstr_128__OIM_TUPVAL;
+ /*_.VALSTR___V277*/ meltfptr[276] = (void *) &cdat->dstr_128__OIM_TUPVAL;
cdat->dstr_128__OIM_TUPVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_128__OIM_TUPVAL.val, "OIM_TUPVAL",
sizeof (cdat->dstr_128__OIM_TUPVAL.val) - 1);
/*iniobj dsym_129__CLASS_OBJINITCLOSURE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277])
- /*_.VALDATA___V278*/
- meltfptr[277] = (void *) &cdat->dsym_129__CLASS_OBJINITCLOSURE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V281*/ meltfptr[280])
+ /*_.VALDATA___V281*/
+ meltfptr[280] = (void *) &cdat->dsym_129__CLASS_OBJINITCLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_129__CLASS_OBJINITCLOSURE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9252,7 +9342,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_130__CLASS_OBJINITCLO*/
- /*_.VALSTR___V279*/ meltfptr[278] =
+ /*_.VALSTR___V282*/ meltfptr[281] =
(void *) &cdat->dstr_130__CLASS_OBJINITCLO;
cdat->dstr_130__CLASS_OBJINITCLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9263,7 +9353,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:119:/ iniobj");
/*iniobj dobj_131__CLASS_OBJINITCLOSURE*/
-/*_.VALDATA___V280*/ meltfptr[279] =
+/*_.VALDATA___V283*/ meltfptr[282] =
(void *) &cdat->dobj_131__CLASS_OBJINITCLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_131__CLASS_OBJINITCLOSURE",
@@ -9277,12 +9367,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_131__CLASS_OBJINITCLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_hash = 553802943;
+ cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_hash = 66412141;
cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_len = 8;
/*inistring dstr_132__CLASS_OBJINITCLO*/
- /*_.VALSTR___V281*/ meltfptr[280] =
+ /*_.VALSTR___V284*/ meltfptr[283] =
(void *) &cdat->dstr_132__CLASS_OBJINITCLO;
cdat->dstr_132__CLASS_OBJINITCLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9291,22 +9381,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_132__CLASS_OBJINITCLO.
val) - 1);
/*inimult dtup_133__CLASS_OBJINITCLOSURE */
- /*_.VALTUP___V282*/ meltfptr[281] =
+ /*_.VALTUP___V285*/ meltfptr[284] =
(void *) &cdat->dtup_133__CLASS_OBJINITCLOSURE;
cdat->dtup_133__CLASS_OBJINITCLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_133__CLASS_OBJINITCLOSURE.nbval = 5;
/*inimult dtup_134__CLASS_OBJINITCLOSURE */
- /*_.VALTUP___V285*/ meltfptr[284] =
+ /*_.VALTUP___V288*/ meltfptr[287] =
(void *) &cdat->dtup_134__CLASS_OBJINITCLOSURE;
cdat->dtup_134__CLASS_OBJINITCLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_134__CLASS_OBJINITCLOSURE.nbval = 6;
/*iniobj dsym_135__OICLO_ROUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V286*/ meltfptr[285])
- /*_.VALDATA___V286*/
- meltfptr[285] = (void *) &cdat->dsym_135__OICLO_ROUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V289*/ meltfptr[288])
+ /*_.VALDATA___V289*/
+ meltfptr[288] = (void *) &cdat->dsym_135__OICLO_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_135__OICLO_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9323,7 +9413,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_136__OICLO_ROUT*/
- /*_.VALSTR___V287*/ meltfptr[286] = (void *) &cdat->dstr_136__OICLO_ROUT;
+ /*_.VALSTR___V290*/ meltfptr[289] = (void *) &cdat->dstr_136__OICLO_ROUT;
cdat->dstr_136__OICLO_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_136__OICLO_ROUT.val, "OICLO_ROUT",
@@ -9331,7 +9421,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_137__OICLO_ROUT*/
-/*_.VALDATA___V283*/ meltfptr[282] = (void *) &cdat->dobj_137__OICLO_ROUT;
+/*_.VALDATA___V286*/ meltfptr[285] = (void *) &cdat->dobj_137__OICLO_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_137__OICLO_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -9344,21 +9434,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_137__OICLO_ROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_137__OICLO_ROUT.obj_num = 5;
- cdat->dobj_137__OICLO_ROUT.obj_hash = 248691183;
+ cdat->dobj_137__OICLO_ROUT.obj_hash = 885082453;
cdat->dobj_137__OICLO_ROUT.obj_len = 4;
/*inistring dstr_138__OICLO_ROUT*/
- /*_.VALSTR___V284*/ meltfptr[283] = (void *) &cdat->dstr_138__OICLO_ROUT;
+ /*_.VALSTR___V287*/ meltfptr[286] = (void *) &cdat->dstr_138__OICLO_ROUT;
cdat->dstr_138__OICLO_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_138__OICLO_ROUT.val, "OICLO_ROUT",
sizeof (cdat->dstr_138__OICLO_ROUT.val) - 1);
/*iniobj dsym_139__CLASS_OBJINITROUTINE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V288*/ meltfptr[287])
- /*_.VALDATA___V288*/
- meltfptr[287] = (void *) &cdat->dsym_139__CLASS_OBJINITROUTINE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V291*/ meltfptr[290])
+ /*_.VALDATA___V291*/
+ meltfptr[290] = (void *) &cdat->dsym_139__CLASS_OBJINITROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_139__CLASS_OBJINITROUTINE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9375,7 +9465,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_140__CLASS_OBJINITROU*/
- /*_.VALSTR___V289*/ meltfptr[288] =
+ /*_.VALSTR___V292*/ meltfptr[291] =
(void *) &cdat->dstr_140__CLASS_OBJINITROU;
cdat->dstr_140__CLASS_OBJINITROU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9386,7 +9476,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:127:/ iniobj");
/*iniobj dobj_141__CLASS_OBJINITROUTINE*/
-/*_.VALDATA___V290*/ meltfptr[289] =
+/*_.VALDATA___V293*/ meltfptr[292] =
(void *) &cdat->dobj_141__CLASS_OBJINITROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_141__CLASS_OBJINITROUTINE",
@@ -9400,12 +9490,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_141__CLASS_OBJINITROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_141__CLASS_OBJINITROUTINE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_141__CLASS_OBJINITROUTINE.obj_hash = 896889226;
+ cdat->dobj_141__CLASS_OBJINITROUTINE.obj_hash = 404943055;
cdat->dobj_141__CLASS_OBJINITROUTINE.obj_len = 8;
/*inistring dstr_142__CLASS_OBJINITROU*/
- /*_.VALSTR___V291*/ meltfptr[290] =
+ /*_.VALSTR___V294*/ meltfptr[293] =
(void *) &cdat->dstr_142__CLASS_OBJINITROU;
cdat->dstr_142__CLASS_OBJINITROU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9414,22 +9504,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_142__CLASS_OBJINITROU.
val) - 1);
/*inimult dtup_143__CLASS_OBJINITROUTINE */
- /*_.VALTUP___V292*/ meltfptr[291] =
+ /*_.VALTUP___V295*/ meltfptr[294] =
(void *) &cdat->dtup_143__CLASS_OBJINITROUTINE;
cdat->dtup_143__CLASS_OBJINITROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_143__CLASS_OBJINITROUTINE.nbval = 5;
/*inimult dtup_144__CLASS_OBJINITROUTINE */
- /*_.VALTUP___V295*/ meltfptr[294] =
+ /*_.VALTUP___V298*/ meltfptr[297] =
(void *) &cdat->dtup_144__CLASS_OBJINITROUTINE;
cdat->dtup_144__CLASS_OBJINITROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_144__CLASS_OBJINITROUTINE.nbval = 6;
/*iniobj dsym_145__OIR_PROCROUTINE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V296*/ meltfptr[295])
- /*_.VALDATA___V296*/
- meltfptr[295] = (void *) &cdat->dsym_145__OIR_PROCROUTINE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V299*/ meltfptr[298])
+ /*_.VALDATA___V299*/
+ meltfptr[298] = (void *) &cdat->dsym_145__OIR_PROCROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_145__OIR_PROCROUTINE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9446,7 +9536,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_146__OIR_PROCROUTINE*/
- /*_.VALSTR___V297*/ meltfptr[296] =
+ /*_.VALSTR___V300*/ meltfptr[299] =
(void *) &cdat->dstr_146__OIR_PROCROUTINE;
cdat->dstr_146__OIR_PROCROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9457,7 +9547,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_147__OIR_PROCROUTINE*/
-/*_.VALDATA___V293*/ meltfptr[292] =
+/*_.VALDATA___V296*/ meltfptr[295] =
(void *) &cdat->dobj_147__OIR_PROCROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_147__OIR_PROCROUTINE",
@@ -9471,12 +9561,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_147__OIR_PROCROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_147__OIR_PROCROUTINE.obj_num = 5;
- cdat->dobj_147__OIR_PROCROUTINE.obj_hash = 891541435;
+ cdat->dobj_147__OIR_PROCROUTINE.obj_hash = 343608053;
cdat->dobj_147__OIR_PROCROUTINE.obj_len = 4;
/*inistring dstr_148__OIR_PROCROUTINE*/
- /*_.VALSTR___V294*/ meltfptr[293] =
+ /*_.VALSTR___V297*/ meltfptr[296] =
(void *) &cdat->dstr_148__OIR_PROCROUTINE;
cdat->dstr_148__OIR_PROCROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9486,9 +9576,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_149__CLASS_OBJINITSTRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V298*/ meltfptr[297])
- /*_.VALDATA___V298*/
- meltfptr[297] = (void *) &cdat->dsym_149__CLASS_OBJINITSTRING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V301*/ meltfptr[300])
+ /*_.VALDATA___V301*/
+ meltfptr[300] = (void *) &cdat->dsym_149__CLASS_OBJINITSTRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_149__CLASS_OBJINITSTRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9505,7 +9595,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_150__CLASS_OBJINITSTR*/
- /*_.VALSTR___V299*/ meltfptr[298] =
+ /*_.VALSTR___V302*/ meltfptr[301] =
(void *) &cdat->dstr_150__CLASS_OBJINITSTR;
cdat->dstr_150__CLASS_OBJINITSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9516,7 +9606,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:134:/ iniobj");
/*iniobj dobj_151__CLASS_OBJINITSTRING*/
-/*_.VALDATA___V300*/ meltfptr[299] =
+/*_.VALDATA___V303*/ meltfptr[302] =
(void *) &cdat->dobj_151__CLASS_OBJINITSTRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_151__CLASS_OBJINITSTRING",
@@ -9530,12 +9620,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_151__CLASS_OBJINITSTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_151__CLASS_OBJINITSTRING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_151__CLASS_OBJINITSTRING.obj_hash = 672263051;
+ cdat->dobj_151__CLASS_OBJINITSTRING.obj_hash = 67924247;
cdat->dobj_151__CLASS_OBJINITSTRING.obj_len = 8;
/*inistring dstr_152__CLASS_OBJINITSTR*/
- /*_.VALSTR___V301*/ meltfptr[300] =
+ /*_.VALSTR___V304*/ meltfptr[303] =
(void *) &cdat->dstr_152__CLASS_OBJINITSTR;
cdat->dstr_152__CLASS_OBJINITSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9544,22 +9634,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_152__CLASS_OBJINITSTR.
val) - 1);
/*inimult dtup_153__CLASS_OBJINITSTRING */
- /*_.VALTUP___V302*/ meltfptr[301] =
+ /*_.VALTUP___V305*/ meltfptr[304] =
(void *) &cdat->dtup_153__CLASS_OBJINITSTRING;
cdat->dtup_153__CLASS_OBJINITSTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_153__CLASS_OBJINITSTRING.nbval = 5;
/*inimult dtup_154__CLASS_OBJINITSTRING */
- /*_.VALTUP___V303*/ meltfptr[302] =
+ /*_.VALTUP___V306*/ meltfptr[305] =
(void *) &cdat->dtup_154__CLASS_OBJINITSTRING;
cdat->dtup_154__CLASS_OBJINITSTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_154__CLASS_OBJINITSTRING.nbval = 5;
/*iniobj dsym_155__CLASS_OBJINITPAIR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V304*/ meltfptr[303])
- /*_.VALDATA___V304*/
- meltfptr[303] = (void *) &cdat->dsym_155__CLASS_OBJINITPAIR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V307*/ meltfptr[306])
+ /*_.VALDATA___V307*/
+ meltfptr[306] = (void *) &cdat->dsym_155__CLASS_OBJINITPAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_155__CLASS_OBJINITPAIR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9576,7 +9666,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_156__CLASS_OBJINITPAI*/
- /*_.VALSTR___V305*/ meltfptr[304] =
+ /*_.VALSTR___V308*/ meltfptr[307] =
(void *) &cdat->dstr_156__CLASS_OBJINITPAI;
cdat->dstr_156__CLASS_OBJINITPAI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9587,7 +9677,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:140:/ iniobj");
/*iniobj dobj_157__CLASS_OBJINITPAIR*/
-/*_.VALDATA___V306*/ meltfptr[305] =
+/*_.VALDATA___V309*/ meltfptr[308] =
(void *) &cdat->dobj_157__CLASS_OBJINITPAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_157__CLASS_OBJINITPAIR",
@@ -9601,12 +9691,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_157__CLASS_OBJINITPAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_157__CLASS_OBJINITPAIR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_157__CLASS_OBJINITPAIR.obj_hash = 66009857;
+ cdat->dobj_157__CLASS_OBJINITPAIR.obj_hash = 3771611;
cdat->dobj_157__CLASS_OBJINITPAIR.obj_len = 8;
/*inistring dstr_158__CLASS_OBJINITPAI*/
- /*_.VALSTR___V307*/ meltfptr[306] =
+ /*_.VALSTR___V310*/ meltfptr[309] =
(void *) &cdat->dstr_158__CLASS_OBJINITPAI;
cdat->dstr_158__CLASS_OBJINITPAI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9615,22 +9705,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_158__CLASS_OBJINITPAI.
val) - 1);
/*inimult dtup_159__CLASS_OBJINITPAIR */
- /*_.VALTUP___V308*/ meltfptr[307] =
+ /*_.VALTUP___V311*/ meltfptr[310] =
(void *) &cdat->dtup_159__CLASS_OBJINITPAIR;
cdat->dtup_159__CLASS_OBJINITPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_159__CLASS_OBJINITPAIR.nbval = 5;
/*inimult dtup_160__CLASS_OBJINITPAIR */
- /*_.VALTUP___V309*/ meltfptr[308] =
+ /*_.VALTUP___V312*/ meltfptr[311] =
(void *) &cdat->dtup_160__CLASS_OBJINITPAIR;
cdat->dtup_160__CLASS_OBJINITPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_160__CLASS_OBJINITPAIR.nbval = 5;
/*iniobj dsym_161__CLASS_OBJINITLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V310*/ meltfptr[309])
- /*_.VALDATA___V310*/
- meltfptr[309] = (void *) &cdat->dsym_161__CLASS_OBJINITLIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V313*/ meltfptr[312])
+ /*_.VALDATA___V313*/
+ meltfptr[312] = (void *) &cdat->dsym_161__CLASS_OBJINITLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_161__CLASS_OBJINITLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9647,7 +9737,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_162__CLASS_OBJINITLIS*/
- /*_.VALSTR___V311*/ meltfptr[310] =
+ /*_.VALSTR___V314*/ meltfptr[313] =
(void *) &cdat->dstr_162__CLASS_OBJINITLIS;
cdat->dstr_162__CLASS_OBJINITLIS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9658,7 +9748,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:145:/ iniobj");
/*iniobj dobj_163__CLASS_OBJINITLIST*/
-/*_.VALDATA___V312*/ meltfptr[311] =
+/*_.VALDATA___V315*/ meltfptr[314] =
(void *) &cdat->dobj_163__CLASS_OBJINITLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_163__CLASS_OBJINITLIST",
@@ -9672,12 +9762,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_163__CLASS_OBJINITLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_163__CLASS_OBJINITLIST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_163__CLASS_OBJINITLIST.obj_hash = 253772364;
+ cdat->dobj_163__CLASS_OBJINITLIST.obj_hash = 968646107;
cdat->dobj_163__CLASS_OBJINITLIST.obj_len = 8;
/*inistring dstr_164__CLASS_OBJINITLIS*/
- /*_.VALSTR___V313*/ meltfptr[312] =
+ /*_.VALSTR___V316*/ meltfptr[315] =
(void *) &cdat->dstr_164__CLASS_OBJINITLIS;
cdat->dstr_164__CLASS_OBJINITLIS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9686,22 +9776,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_164__CLASS_OBJINITLIS.
val) - 1);
/*inimult dtup_165__CLASS_OBJINITLIST */
- /*_.VALTUP___V314*/ meltfptr[313] =
+ /*_.VALTUP___V317*/ meltfptr[316] =
(void *) &cdat->dtup_165__CLASS_OBJINITLIST;
cdat->dtup_165__CLASS_OBJINITLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_165__CLASS_OBJINITLIST.nbval = 5;
/*inimult dtup_166__CLASS_OBJINITLIST */
- /*_.VALTUP___V315*/ meltfptr[314] =
+ /*_.VALTUP___V318*/ meltfptr[317] =
(void *) &cdat->dtup_166__CLASS_OBJINITLIST;
cdat->dtup_166__CLASS_OBJINITLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_166__CLASS_OBJINITLIST.nbval = 5;
/*iniobj dsym_167__CLASS_OBJINITBOXINTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V316*/ meltfptr[315])
- /*_.VALDATA___V316*/
- meltfptr[315] = (void *) &cdat->dsym_167__CLASS_OBJINITBOXINTEGER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V319*/ meltfptr[318])
+ /*_.VALDATA___V319*/
+ meltfptr[318] = (void *) &cdat->dsym_167__CLASS_OBJINITBOXINTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_167__CLASS_OBJINITBOXINTEGER",
@@ -9719,7 +9809,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_168__CLASS_OBJINITBOX*/
- /*_.VALSTR___V317*/ meltfptr[316] =
+ /*_.VALSTR___V320*/ meltfptr[319] =
(void *) &cdat->dstr_168__CLASS_OBJINITBOX;
cdat->dstr_168__CLASS_OBJINITBOX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9730,7 +9820,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:151:/ iniobj");
/*iniobj dobj_169__CLASS_OBJINITBOXINTEGER*/
-/*_.VALDATA___V318*/ meltfptr[317] =
+/*_.VALDATA___V321*/ meltfptr[320] =
(void *) &cdat->dobj_169__CLASS_OBJINITBOXINTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9745,12 +9835,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_169__CLASS_OBJINITBOXINTEGER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_hash = 631012672;
+ cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_hash = 302053756;
cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_len = 8;
/*inistring dstr_170__CLASS_OBJINITBOX*/
- /*_.VALSTR___V319*/ meltfptr[318] =
+ /*_.VALSTR___V322*/ meltfptr[321] =
(void *) &cdat->dstr_170__CLASS_OBJINITBOX;
cdat->dstr_170__CLASS_OBJINITBOX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9759,22 +9849,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_170__CLASS_OBJINITBOX.
val) - 1);
/*inimult dtup_171__CLASS_OBJINITBOXINTEGER */
- /*_.VALTUP___V320*/ meltfptr[319] =
+ /*_.VALTUP___V323*/ meltfptr[322] =
(void *) &cdat->dtup_171__CLASS_OBJINITBOXINTEGER;
cdat->dtup_171__CLASS_OBJINITBOXINTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_171__CLASS_OBJINITBOXINTEGER.nbval = 5;
/*inimult dtup_172__CLASS_OBJINITBOXINTEGER */
- /*_.VALTUP___V321*/ meltfptr[320] =
+ /*_.VALTUP___V324*/ meltfptr[323] =
(void *) &cdat->dtup_172__CLASS_OBJINITBOXINTEGER;
cdat->dtup_172__CLASS_OBJINITBOXINTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_172__CLASS_OBJINITBOXINTEGER.nbval = 5;
/*iniobj dsym_173__CLASS_OBJEXPV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V322*/ meltfptr[321])
- /*_.VALDATA___V322*/
- meltfptr[321] = (void *) &cdat->dsym_173__CLASS_OBJEXPV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V325*/ meltfptr[324])
+ /*_.VALDATA___V325*/
+ meltfptr[324] = (void *) &cdat->dsym_173__CLASS_OBJEXPV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_173__CLASS_OBJEXPV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9791,7 +9881,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_174__CLASS_OBJEXPV*/
- /*_.VALSTR___V323*/ meltfptr[322] = (void *) &cdat->dstr_174__CLASS_OBJEXPV;
+ /*_.VALSTR___V326*/ meltfptr[325] = (void *) &cdat->dstr_174__CLASS_OBJEXPV;
cdat->dstr_174__CLASS_OBJEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_174__CLASS_OBJEXPV.val,
@@ -9801,7 +9891,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:158:/ iniobj");
/*iniobj dobj_175__CLASS_OBJEXPV*/
-/*_.VALDATA___V324*/ meltfptr[323] =
+/*_.VALDATA___V327*/ meltfptr[326] =
(void *) &cdat->dobj_175__CLASS_OBJEXPV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_175__CLASS_OBJEXPV",
@@ -9815,12 +9905,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_175__CLASS_OBJEXPV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_175__CLASS_OBJEXPV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_175__CLASS_OBJEXPV.obj_hash = 83578136;
+ cdat->dobj_175__CLASS_OBJEXPV.obj_hash = 485686442;
cdat->dobj_175__CLASS_OBJEXPV.obj_len = 8;
/*inistring dstr_176__CLASS_OBJEXPV*/
- /*_.VALSTR___V325*/ meltfptr[324] = (void *) &cdat->dstr_176__CLASS_OBJEXPV;
+ /*_.VALSTR___V328*/ meltfptr[327] = (void *) &cdat->dstr_176__CLASS_OBJEXPV;
cdat->dstr_176__CLASS_OBJEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_176__CLASS_OBJEXPV.val,
@@ -9828,20 +9918,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_176__CLASS_OBJEXPV.val) -
1);
/*inimult dtup_177__CLASS_OBJEXPV */
- /*_.VALTUP___V326*/ meltfptr[325] = (void *) &cdat->dtup_177__CLASS_OBJEXPV;
+ /*_.VALTUP___V329*/ meltfptr[328] = (void *) &cdat->dtup_177__CLASS_OBJEXPV;
cdat->dtup_177__CLASS_OBJEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_177__CLASS_OBJEXPV.nbval = 3;
/*inimult dtup_178__CLASS_OBJEXPV */
- /*_.VALTUP___V329*/ meltfptr[328] = (void *) &cdat->dtup_178__CLASS_OBJEXPV;
+ /*_.VALTUP___V332*/ meltfptr[331] = (void *) &cdat->dtup_178__CLASS_OBJEXPV;
cdat->dtup_178__CLASS_OBJEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_178__CLASS_OBJEXPV.nbval = 2;
/*iniobj dsym_179__OBX_CONT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V330*/ meltfptr[329])
- /*_.VALDATA___V330*/
- meltfptr[329] = (void *) &cdat->dsym_179__OBX_CONT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V333*/ meltfptr[332])
+ /*_.VALDATA___V333*/
+ meltfptr[332] = (void *) &cdat->dsym_179__OBX_CONT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_179__OBX_CONT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9858,7 +9948,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_180__OBX_CONT*/
- /*_.VALSTR___V331*/ meltfptr[330] = (void *) &cdat->dstr_180__OBX_CONT;
+ /*_.VALSTR___V334*/ meltfptr[333] = (void *) &cdat->dstr_180__OBX_CONT;
cdat->dstr_180__OBX_CONT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_180__OBX_CONT.val, "OBX_CONT",
@@ -9866,7 +9956,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_181__OBX_CONT*/
-/*_.VALDATA___V327*/ meltfptr[326] = (void *) &cdat->dobj_181__OBX_CONT;
+/*_.VALDATA___V330*/ meltfptr[329] = (void *) &cdat->dobj_181__OBX_CONT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_181__OBX_CONT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -9879,21 +9969,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_181__OBX_CONT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_181__OBX_CONT.obj_num = 1;
- cdat->dobj_181__OBX_CONT.obj_hash = 987522583;
+ cdat->dobj_181__OBX_CONT.obj_hash = 147928544;
cdat->dobj_181__OBX_CONT.obj_len = 4;
/*inistring dstr_182__OBX_CONT*/
- /*_.VALSTR___V328*/ meltfptr[327] = (void *) &cdat->dstr_182__OBX_CONT;
+ /*_.VALSTR___V331*/ meltfptr[330] = (void *) &cdat->dstr_182__OBX_CONT;
cdat->dstr_182__OBX_CONT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_182__OBX_CONT.val, "OBX_CONT",
sizeof (cdat->dstr_182__OBX_CONT.val) - 1);
/*iniobj dsym_183__CLASS_OBJLOCATEDEXPV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V332*/ meltfptr[331])
- /*_.VALDATA___V332*/
- meltfptr[331] = (void *) &cdat->dsym_183__CLASS_OBJLOCATEDEXPV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V335*/ meltfptr[334])
+ /*_.VALDATA___V335*/
+ meltfptr[334] = (void *) &cdat->dsym_183__CLASS_OBJLOCATEDEXPV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_183__CLASS_OBJLOCATEDEXPV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9910,7 +10000,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_184__CLASS_OBJLOCATED*/
- /*_.VALSTR___V333*/ meltfptr[332] =
+ /*_.VALSTR___V336*/ meltfptr[335] =
(void *) &cdat->dstr_184__CLASS_OBJLOCATED;
cdat->dstr_184__CLASS_OBJLOCATED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9921,7 +10011,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:164:/ iniobj");
/*iniobj dobj_185__CLASS_OBJLOCATEDEXPV*/
-/*_.VALDATA___V334*/ meltfptr[333] =
+/*_.VALDATA___V337*/ meltfptr[336] =
(void *) &cdat->dobj_185__CLASS_OBJLOCATEDEXPV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_185__CLASS_OBJLOCATEDEXPV",
@@ -9935,12 +10025,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_185__CLASS_OBJLOCATEDEXPV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_hash = 756592260;
+ cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_hash = 185808308;
cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_len = 8;
/*inistring dstr_186__CLASS_OBJLOCATED*/
- /*_.VALSTR___V335*/ meltfptr[334] =
+ /*_.VALSTR___V338*/ meltfptr[337] =
(void *) &cdat->dstr_186__CLASS_OBJLOCATED;
cdat->dstr_186__CLASS_OBJLOCATED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9949,22 +10039,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_186__CLASS_OBJLOCATED.
val) - 1);
/*inimult dtup_187__CLASS_OBJLOCATEDEXPV */
- /*_.VALTUP___V336*/ meltfptr[335] =
+ /*_.VALTUP___V339*/ meltfptr[338] =
(void *) &cdat->dtup_187__CLASS_OBJLOCATEDEXPV;
cdat->dtup_187__CLASS_OBJLOCATEDEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_187__CLASS_OBJLOCATEDEXPV.nbval = 4;
/*inimult dtup_188__CLASS_OBJLOCATEDEXPV */
- /*_.VALTUP___V339*/ meltfptr[338] =
+ /*_.VALTUP___V342*/ meltfptr[341] =
(void *) &cdat->dtup_188__CLASS_OBJLOCATEDEXPV;
cdat->dtup_188__CLASS_OBJLOCATEDEXPV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_188__CLASS_OBJLOCATEDEXPV.nbval = 3;
/*iniobj dsym_189__OBCX_LOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V340*/ meltfptr[339])
- /*_.VALDATA___V340*/
- meltfptr[339] = (void *) &cdat->dsym_189__OBCX_LOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V343*/ meltfptr[342])
+ /*_.VALDATA___V343*/
+ meltfptr[342] = (void *) &cdat->dsym_189__OBCX_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_189__OBCX_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9981,7 +10071,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_190__OBCX_LOC*/
- /*_.VALSTR___V341*/ meltfptr[340] = (void *) &cdat->dstr_190__OBCX_LOC;
+ /*_.VALSTR___V344*/ meltfptr[343] = (void *) &cdat->dstr_190__OBCX_LOC;
cdat->dstr_190__OBCX_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_190__OBCX_LOC.val, "OBCX_LOC",
@@ -9989,7 +10079,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_191__OBCX_LOC*/
-/*_.VALDATA___V337*/ meltfptr[336] = (void *) &cdat->dobj_191__OBCX_LOC;
+/*_.VALDATA___V340*/ meltfptr[339] = (void *) &cdat->dobj_191__OBCX_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_191__OBCX_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10002,21 +10092,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_191__OBCX_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_191__OBCX_LOC.obj_num = 2;
- cdat->dobj_191__OBCX_LOC.obj_hash = 964052591;
+ cdat->dobj_191__OBCX_LOC.obj_hash = 445059858;
cdat->dobj_191__OBCX_LOC.obj_len = 4;
/*inistring dstr_192__OBCX_LOC*/
- /*_.VALSTR___V338*/ meltfptr[337] = (void *) &cdat->dstr_192__OBCX_LOC;
+ /*_.VALSTR___V341*/ meltfptr[340] = (void *) &cdat->dstr_192__OBCX_LOC;
cdat->dstr_192__OBCX_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_192__OBCX_LOC.val, "OBCX_LOC",
sizeof (cdat->dstr_192__OBCX_LOC.val) - 1);
/*iniobj dsym_193__CLASS_OBJINSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V342*/ meltfptr[341])
- /*_.VALDATA___V342*/
- meltfptr[341] = (void *) &cdat->dsym_193__CLASS_OBJINSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V345*/ meltfptr[344])
+ /*_.VALDATA___V345*/
+ meltfptr[344] = (void *) &cdat->dsym_193__CLASS_OBJINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_193__CLASS_OBJINSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10033,7 +10123,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_194__CLASS_OBJINSTR*/
- /*_.VALSTR___V343*/ meltfptr[342] =
+ /*_.VALSTR___V346*/ meltfptr[345] =
(void *) &cdat->dstr_194__CLASS_OBJINSTR;
cdat->dstr_194__CLASS_OBJINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10044,7 +10134,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:170:/ iniobj");
/*iniobj dobj_195__CLASS_OBJINSTR*/
-/*_.VALDATA___V344*/ meltfptr[343] =
+/*_.VALDATA___V347*/ meltfptr[346] =
(void *) &cdat->dobj_195__CLASS_OBJINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_195__CLASS_OBJINSTR",
@@ -10058,12 +10148,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_195__CLASS_OBJINSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_195__CLASS_OBJINSTR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_195__CLASS_OBJINSTR.obj_hash = 740437367;
+ cdat->dobj_195__CLASS_OBJINSTR.obj_hash = 833124013;
cdat->dobj_195__CLASS_OBJINSTR.obj_len = 8;
/*inistring dstr_196__CLASS_OBJINSTR*/
- /*_.VALSTR___V345*/ meltfptr[344] =
+ /*_.VALSTR___V348*/ meltfptr[347] =
(void *) &cdat->dstr_196__CLASS_OBJINSTR;
cdat->dstr_196__CLASS_OBJINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10072,22 +10162,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_196__CLASS_OBJINSTR.val) -
1);
/*inimult dtup_197__CLASS_OBJINSTR */
- /*_.VALTUP___V346*/ meltfptr[345] =
+ /*_.VALTUP___V349*/ meltfptr[348] =
(void *) &cdat->dtup_197__CLASS_OBJINSTR;
cdat->dtup_197__CLASS_OBJINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_197__CLASS_OBJINSTR.nbval = 2;
/*inimult dtup_198__CLASS_OBJINSTR */
- /*_.VALTUP___V349*/ meltfptr[348] =
+ /*_.VALTUP___V352*/ meltfptr[351] =
(void *) &cdat->dtup_198__CLASS_OBJINSTR;
cdat->dtup_198__CLASS_OBJINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_198__CLASS_OBJINSTR.nbval = 1;
/*iniobj dsym_199__OBI_LOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V350*/ meltfptr[349])
- /*_.VALDATA___V350*/
- meltfptr[349] = (void *) &cdat->dsym_199__OBI_LOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V353*/ meltfptr[352])
+ /*_.VALDATA___V353*/
+ meltfptr[352] = (void *) &cdat->dsym_199__OBI_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_199__OBI_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10104,7 +10194,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_200__OBI_LOC*/
- /*_.VALSTR___V351*/ meltfptr[350] = (void *) &cdat->dstr_200__OBI_LOC;
+ /*_.VALSTR___V354*/ meltfptr[353] = (void *) &cdat->dstr_200__OBI_LOC;
cdat->dstr_200__OBI_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_200__OBI_LOC.val, "OBI_LOC",
@@ -10112,7 +10202,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_201__OBI_LOC*/
-/*_.VALDATA___V347*/ meltfptr[346] = (void *) &cdat->dobj_201__OBI_LOC;
+/*_.VALDATA___V350*/ meltfptr[349] = (void *) &cdat->dobj_201__OBI_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_201__OBI_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10125,21 +10215,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_201__OBI_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_201__OBI_LOC.obj_num = 0;
- cdat->dobj_201__OBI_LOC.obj_hash = 735922179;
+ cdat->dobj_201__OBI_LOC.obj_hash = 461106138;
cdat->dobj_201__OBI_LOC.obj_len = 4;
/*inistring dstr_202__OBI_LOC*/
- /*_.VALSTR___V348*/ meltfptr[347] = (void *) &cdat->dstr_202__OBI_LOC;
+ /*_.VALSTR___V351*/ meltfptr[350] = (void *) &cdat->dstr_202__OBI_LOC;
cdat->dstr_202__OBI_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_202__OBI_LOC.val, "OBI_LOC",
sizeof (cdat->dstr_202__OBI_LOC.val) - 1);
/*iniobj dsym_203__CLASS_OBJCOMMENTINSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V352*/ meltfptr[351])
- /*_.VALDATA___V352*/
- meltfptr[351] = (void *) &cdat->dsym_203__CLASS_OBJCOMMENTINSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V355*/ meltfptr[354])
+ /*_.VALDATA___V355*/
+ meltfptr[354] = (void *) &cdat->dsym_203__CLASS_OBJCOMMENTINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_203__CLASS_OBJCOMMENTINSTR",
@@ -10157,7 +10247,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_204__CLASS_OBJCOMMENT*/
- /*_.VALSTR___V353*/ meltfptr[352] =
+ /*_.VALSTR___V356*/ meltfptr[355] =
(void *) &cdat->dstr_204__CLASS_OBJCOMMENT;
cdat->dstr_204__CLASS_OBJCOMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10168,7 +10258,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:175:/ iniobj");
/*iniobj dobj_205__CLASS_OBJCOMMENTINSTR*/
-/*_.VALDATA___V354*/ meltfptr[353] =
+/*_.VALDATA___V357*/ meltfptr[356] =
(void *) &cdat->dobj_205__CLASS_OBJCOMMENTINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -10183,12 +10273,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_205__CLASS_OBJCOMMENTINSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_205__CLASS_OBJCOMMENTINSTR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_205__CLASS_OBJCOMMENTINSTR.obj_hash = 730167625;
+ cdat->dobj_205__CLASS_OBJCOMMENTINSTR.obj_hash = 996600648;
cdat->dobj_205__CLASS_OBJCOMMENTINSTR.obj_len = 8;
/*inistring dstr_206__CLASS_OBJCOMMENT*/
- /*_.VALSTR___V355*/ meltfptr[354] =
+ /*_.VALSTR___V358*/ meltfptr[357] =
(void *) &cdat->dstr_206__CLASS_OBJCOMMENT;
cdat->dstr_206__CLASS_OBJCOMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10197,22 +10287,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_206__CLASS_OBJCOMMENT.
val) - 1);
/*inimult dtup_207__CLASS_OBJCOMMENTINSTR */
- /*_.VALTUP___V356*/ meltfptr[355] =
+ /*_.VALTUP___V359*/ meltfptr[358] =
(void *) &cdat->dtup_207__CLASS_OBJCOMMENTINSTR;
cdat->dtup_207__CLASS_OBJCOMMENTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_207__CLASS_OBJCOMMENTINSTR.nbval = 3;
/*inimult dtup_208__CLASS_OBJCOMMENTINSTR */
- /*_.VALTUP___V359*/ meltfptr[358] =
+ /*_.VALTUP___V362*/ meltfptr[361] =
(void *) &cdat->dtup_208__CLASS_OBJCOMMENTINSTR;
cdat->dtup_208__CLASS_OBJCOMMENTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_208__CLASS_OBJCOMMENTINSTR.nbval = 2;
/*iniobj dsym_209__OBCI_COMMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V360*/ meltfptr[359])
- /*_.VALDATA___V360*/
- meltfptr[359] = (void *) &cdat->dsym_209__OBCI_COMMENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V363*/ meltfptr[362])
+ /*_.VALDATA___V363*/
+ meltfptr[362] = (void *) &cdat->dsym_209__OBCI_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_209__OBCI_COMMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10229,7 +10319,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_210__OBCI_COMMENT*/
- /*_.VALSTR___V361*/ meltfptr[360] = (void *) &cdat->dstr_210__OBCI_COMMENT;
+ /*_.VALSTR___V364*/ meltfptr[363] = (void *) &cdat->dstr_210__OBCI_COMMENT;
cdat->dstr_210__OBCI_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_210__OBCI_COMMENT.val,
@@ -10239,7 +10329,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_211__OBCI_COMMENT*/
-/*_.VALDATA___V357*/ meltfptr[356] = (void *) &cdat->dobj_211__OBCI_COMMENT;
+/*_.VALDATA___V360*/ meltfptr[359] = (void *) &cdat->dobj_211__OBCI_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_211__OBCI_COMMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10252,12 +10342,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_211__OBCI_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_211__OBCI_COMMENT.obj_num = 1;
- cdat->dobj_211__OBCI_COMMENT.obj_hash = 665829651;
+ cdat->dobj_211__OBCI_COMMENT.obj_hash = 746027443;
cdat->dobj_211__OBCI_COMMENT.obj_len = 4;
/*inistring dstr_212__OBCI_COMMENT*/
- /*_.VALSTR___V358*/ meltfptr[357] = (void *) &cdat->dstr_212__OBCI_COMMENT;
+ /*_.VALSTR___V361*/ meltfptr[360] = (void *) &cdat->dstr_212__OBCI_COMMENT;
cdat->dstr_212__OBCI_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_212__OBCI_COMMENT.val,
@@ -10266,9 +10356,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_213__CLASS_OBJDESTINSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V362*/ meltfptr[361])
- /*_.VALDATA___V362*/
- meltfptr[361] = (void *) &cdat->dsym_213__CLASS_OBJDESTINSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V365*/ meltfptr[364])
+ /*_.VALDATA___V365*/
+ meltfptr[364] = (void *) &cdat->dsym_213__CLASS_OBJDESTINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_213__CLASS_OBJDESTINSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10285,7 +10375,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_214__CLASS_OBJDESTINS*/
- /*_.VALSTR___V363*/ meltfptr[362] =
+ /*_.VALSTR___V366*/ meltfptr[365] =
(void *) &cdat->dstr_214__CLASS_OBJDESTINS;
cdat->dstr_214__CLASS_OBJDESTINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10296,7 +10386,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:182:/ iniobj");
/*iniobj dobj_215__CLASS_OBJDESTINSTR*/
-/*_.VALDATA___V364*/ meltfptr[363] =
+/*_.VALDATA___V367*/ meltfptr[366] =
(void *) &cdat->dobj_215__CLASS_OBJDESTINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_215__CLASS_OBJDESTINSTR",
@@ -10310,12 +10400,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_215__CLASS_OBJDESTINSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_215__CLASS_OBJDESTINSTR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_215__CLASS_OBJDESTINSTR.obj_hash = 1015665578;
+ cdat->dobj_215__CLASS_OBJDESTINSTR.obj_hash = 242438522;
cdat->dobj_215__CLASS_OBJDESTINSTR.obj_len = 8;
/*inistring dstr_216__CLASS_OBJDESTINS*/
- /*_.VALSTR___V365*/ meltfptr[364] =
+ /*_.VALSTR___V368*/ meltfptr[367] =
(void *) &cdat->dstr_216__CLASS_OBJDESTINS;
cdat->dstr_216__CLASS_OBJDESTINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10324,22 +10414,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_216__CLASS_OBJDESTINS.
val) - 1);
/*inimult dtup_217__CLASS_OBJDESTINSTR */
- /*_.VALTUP___V366*/ meltfptr[365] =
+ /*_.VALTUP___V369*/ meltfptr[368] =
(void *) &cdat->dtup_217__CLASS_OBJDESTINSTR;
cdat->dtup_217__CLASS_OBJDESTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_217__CLASS_OBJDESTINSTR.nbval = 3;
/*inimult dtup_218__CLASS_OBJDESTINSTR */
- /*_.VALTUP___V369*/ meltfptr[368] =
+ /*_.VALTUP___V372*/ meltfptr[371] =
(void *) &cdat->dtup_218__CLASS_OBJDESTINSTR;
cdat->dtup_218__CLASS_OBJDESTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_218__CLASS_OBJDESTINSTR.nbval = 2;
/*iniobj dsym_219__OBDI_DESTLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V370*/ meltfptr[369])
- /*_.VALDATA___V370*/
- meltfptr[369] = (void *) &cdat->dsym_219__OBDI_DESTLIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V373*/ meltfptr[372])
+ /*_.VALDATA___V373*/
+ meltfptr[372] = (void *) &cdat->dsym_219__OBDI_DESTLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_219__OBDI_DESTLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10356,7 +10446,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_220__OBDI_DESTLIST*/
- /*_.VALSTR___V371*/ meltfptr[370] = (void *) &cdat->dstr_220__OBDI_DESTLIST;
+ /*_.VALSTR___V374*/ meltfptr[373] = (void *) &cdat->dstr_220__OBDI_DESTLIST;
cdat->dstr_220__OBDI_DESTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_220__OBDI_DESTLIST.val,
@@ -10366,7 +10456,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_221__OBDI_DESTLIST*/
-/*_.VALDATA___V367*/ meltfptr[366] =
+/*_.VALDATA___V370*/ meltfptr[369] =
(void *) &cdat->dobj_221__OBDI_DESTLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_221__OBDI_DESTLIST",
@@ -10380,12 +10470,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_221__OBDI_DESTLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_221__OBDI_DESTLIST.obj_num = 1;
- cdat->dobj_221__OBDI_DESTLIST.obj_hash = 186695017;
+ cdat->dobj_221__OBDI_DESTLIST.obj_hash = 191043628;
cdat->dobj_221__OBDI_DESTLIST.obj_len = 4;
/*inistring dstr_222__OBDI_DESTLIST*/
- /*_.VALSTR___V368*/ meltfptr[367] = (void *) &cdat->dstr_222__OBDI_DESTLIST;
+ /*_.VALSTR___V371*/ meltfptr[370] = (void *) &cdat->dstr_222__OBDI_DESTLIST;
cdat->dstr_222__OBDI_DESTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_222__OBDI_DESTLIST.val,
@@ -10394,9 +10484,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_223__CLASS_OBJCOMPUTE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V372*/ meltfptr[371])
- /*_.VALDATA___V372*/
- meltfptr[371] = (void *) &cdat->dsym_223__CLASS_OBJCOMPUTE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V375*/ meltfptr[374])
+ /*_.VALDATA___V375*/
+ meltfptr[374] = (void *) &cdat->dsym_223__CLASS_OBJCOMPUTE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_223__CLASS_OBJCOMPUTE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10413,7 +10503,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_224__CLASS_OBJCOMPUTE*/
- /*_.VALSTR___V373*/ meltfptr[372] =
+ /*_.VALSTR___V376*/ meltfptr[375] =
(void *) &cdat->dstr_224__CLASS_OBJCOMPUTE;
cdat->dstr_224__CLASS_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10424,7 +10514,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:188:/ iniobj");
/*iniobj dobj_225__CLASS_OBJCOMPUTE*/
-/*_.VALDATA___V374*/ meltfptr[373] =
+/*_.VALDATA___V377*/ meltfptr[376] =
(void *) &cdat->dobj_225__CLASS_OBJCOMPUTE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_225__CLASS_OBJCOMPUTE",
@@ -10438,12 +10528,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_225__CLASS_OBJCOMPUTE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_225__CLASS_OBJCOMPUTE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_225__CLASS_OBJCOMPUTE.obj_hash = 675834989;
+ cdat->dobj_225__CLASS_OBJCOMPUTE.obj_hash = 393902729;
cdat->dobj_225__CLASS_OBJCOMPUTE.obj_len = 8;
/*inistring dstr_226__CLASS_OBJCOMPUTE*/
- /*_.VALSTR___V375*/ meltfptr[374] =
+ /*_.VALSTR___V378*/ meltfptr[377] =
(void *) &cdat->dstr_226__CLASS_OBJCOMPUTE;
cdat->dstr_226__CLASS_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10452,22 +10542,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_226__CLASS_OBJCOMPUTE.
val) - 1);
/*inimult dtup_227__CLASS_OBJCOMPUTE */
- /*_.VALTUP___V376*/ meltfptr[375] =
+ /*_.VALTUP___V379*/ meltfptr[378] =
(void *) &cdat->dtup_227__CLASS_OBJCOMPUTE;
cdat->dtup_227__CLASS_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_227__CLASS_OBJCOMPUTE.nbval = 4;
/*inimult dtup_228__CLASS_OBJCOMPUTE */
- /*_.VALTUP___V379*/ meltfptr[378] =
+ /*_.VALTUP___V382*/ meltfptr[381] =
(void *) &cdat->dtup_228__CLASS_OBJCOMPUTE;
cdat->dtup_228__CLASS_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_228__CLASS_OBJCOMPUTE.nbval = 3;
/*iniobj dsym_229__OBCPT_EXPR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V380*/ meltfptr[379])
- /*_.VALDATA___V380*/
- meltfptr[379] = (void *) &cdat->dsym_229__OBCPT_EXPR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V383*/ meltfptr[382])
+ /*_.VALDATA___V383*/
+ meltfptr[382] = (void *) &cdat->dsym_229__OBCPT_EXPR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_229__OBCPT_EXPR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10484,7 +10574,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_230__OBCPT_EXPR*/
- /*_.VALSTR___V381*/ meltfptr[380] = (void *) &cdat->dstr_230__OBCPT_EXPR;
+ /*_.VALSTR___V384*/ meltfptr[383] = (void *) &cdat->dstr_230__OBCPT_EXPR;
cdat->dstr_230__OBCPT_EXPR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_230__OBCPT_EXPR.val, "OBCPT_EXPR",
@@ -10492,7 +10582,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_231__OBCPT_EXPR*/
-/*_.VALDATA___V377*/ meltfptr[376] = (void *) &cdat->dobj_231__OBCPT_EXPR;
+/*_.VALDATA___V380*/ meltfptr[379] = (void *) &cdat->dobj_231__OBCPT_EXPR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_231__OBCPT_EXPR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10505,21 +10595,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_231__OBCPT_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_231__OBCPT_EXPR.obj_num = 2;
- cdat->dobj_231__OBCPT_EXPR.obj_hash = 737782601;
+ cdat->dobj_231__OBCPT_EXPR.obj_hash = 314764040;
cdat->dobj_231__OBCPT_EXPR.obj_len = 4;
/*inistring dstr_232__OBCPT_EXPR*/
- /*_.VALSTR___V378*/ meltfptr[377] = (void *) &cdat->dstr_232__OBCPT_EXPR;
+ /*_.VALSTR___V381*/ meltfptr[380] = (void *) &cdat->dstr_232__OBCPT_EXPR;
cdat->dstr_232__OBCPT_EXPR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_232__OBCPT_EXPR.val, "OBCPT_EXPR",
sizeof (cdat->dstr_232__OBCPT_EXPR.val) - 1);
/*iniobj dsym_233__CLASS_OBJGETARG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V382*/ meltfptr[381])
- /*_.VALDATA___V382*/
- meltfptr[381] = (void *) &cdat->dsym_233__CLASS_OBJGETARG;
+ /*uniqueobj*/ if (! /*_.VALDATA___V385*/ meltfptr[384])
+ /*_.VALDATA___V385*/
+ meltfptr[384] = (void *) &cdat->dsym_233__CLASS_OBJGETARG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_233__CLASS_OBJGETARG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10536,7 +10626,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_234__CLASS_OBJGETARG*/
- /*_.VALSTR___V383*/ meltfptr[382] =
+ /*_.VALSTR___V386*/ meltfptr[385] =
(void *) &cdat->dstr_234__CLASS_OBJGETARG;
cdat->dstr_234__CLASS_OBJGETARG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10547,7 +10637,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:194:/ iniobj");
/*iniobj dobj_235__CLASS_OBJGETARG*/
-/*_.VALDATA___V384*/ meltfptr[383] =
+/*_.VALDATA___V387*/ meltfptr[386] =
(void *) &cdat->dobj_235__CLASS_OBJGETARG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_235__CLASS_OBJGETARG",
@@ -10561,12 +10651,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_235__CLASS_OBJGETARG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_235__CLASS_OBJGETARG.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_235__CLASS_OBJGETARG.obj_hash = 840944316;
+ cdat->dobj_235__CLASS_OBJGETARG.obj_hash = 926849698;
cdat->dobj_235__CLASS_OBJGETARG.obj_len = 8;
/*inistring dstr_236__CLASS_OBJGETARG*/
- /*_.VALSTR___V385*/ meltfptr[384] =
+ /*_.VALSTR___V388*/ meltfptr[387] =
(void *) &cdat->dstr_236__CLASS_OBJGETARG;
cdat->dstr_236__CLASS_OBJGETARG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10575,22 +10665,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_236__CLASS_OBJGETARG.val) -
1);
/*inimult dtup_237__CLASS_OBJGETARG */
- /*_.VALTUP___V386*/ meltfptr[385] =
+ /*_.VALTUP___V389*/ meltfptr[388] =
(void *) &cdat->dtup_237__CLASS_OBJGETARG;
cdat->dtup_237__CLASS_OBJGETARG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_237__CLASS_OBJGETARG.nbval = 3;
/*inimult dtup_238__CLASS_OBJGETARG */
- /*_.VALTUP___V391*/ meltfptr[390] =
+ /*_.VALTUP___V394*/ meltfptr[393] =
(void *) &cdat->dtup_238__CLASS_OBJGETARG;
cdat->dtup_238__CLASS_OBJGETARG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_238__CLASS_OBJGETARG.nbval = 3;
/*iniobj dsym_239__OBARG_OBLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391])
- /*_.VALDATA___V392*/
- meltfptr[391] = (void *) &cdat->dsym_239__OBARG_OBLOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V395*/ meltfptr[394])
+ /*_.VALDATA___V395*/
+ meltfptr[394] = (void *) &cdat->dsym_239__OBARG_OBLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_239__OBARG_OBLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10607,7 +10697,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_240__OBARG_OBLOC*/
- /*_.VALSTR___V393*/ meltfptr[392] = (void *) &cdat->dstr_240__OBARG_OBLOC;
+ /*_.VALSTR___V396*/ meltfptr[395] = (void *) &cdat->dstr_240__OBARG_OBLOC;
cdat->dstr_240__OBARG_OBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_240__OBARG_OBLOC.val,
@@ -10616,7 +10706,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_241__OBARG_OBLOC*/
-/*_.VALDATA___V387*/ meltfptr[386] = (void *) &cdat->dobj_241__OBARG_OBLOC;
+/*_.VALDATA___V390*/ meltfptr[389] = (void *) &cdat->dobj_241__OBARG_OBLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_241__OBARG_OBLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10629,12 +10719,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_241__OBARG_OBLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_241__OBARG_OBLOC.obj_num = 1;
- cdat->dobj_241__OBARG_OBLOC.obj_hash = 249971616;
+ cdat->dobj_241__OBARG_OBLOC.obj_hash = 84653002;
cdat->dobj_241__OBARG_OBLOC.obj_len = 4;
/*inistring dstr_242__OBARG_OBLOC*/
- /*_.VALSTR___V388*/ meltfptr[387] = (void *) &cdat->dstr_242__OBARG_OBLOC;
+ /*_.VALSTR___V391*/ meltfptr[390] = (void *) &cdat->dstr_242__OBARG_OBLOC;
cdat->dstr_242__OBARG_OBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_242__OBARG_OBLOC.val,
@@ -10642,9 +10732,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_242__OBARG_OBLOC.val) - 1);
/*iniobj dsym_243__OBARG_BIND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V394*/ meltfptr[393])
- /*_.VALDATA___V394*/
- meltfptr[393] = (void *) &cdat->dsym_243__OBARG_BIND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V397*/ meltfptr[396])
+ /*_.VALDATA___V397*/
+ meltfptr[396] = (void *) &cdat->dsym_243__OBARG_BIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_243__OBARG_BIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10661,7 +10751,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_244__OBARG_BIND*/
- /*_.VALSTR___V395*/ meltfptr[394] = (void *) &cdat->dstr_244__OBARG_BIND;
+ /*_.VALSTR___V398*/ meltfptr[397] = (void *) &cdat->dstr_244__OBARG_BIND;
cdat->dstr_244__OBARG_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_244__OBARG_BIND.val, "OBARG_BIND",
@@ -10669,7 +10759,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_245__OBARG_BIND*/
-/*_.VALDATA___V389*/ meltfptr[388] = (void *) &cdat->dobj_245__OBARG_BIND;
+/*_.VALDATA___V392*/ meltfptr[391] = (void *) &cdat->dobj_245__OBARG_BIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_245__OBARG_BIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10682,21 +10772,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_245__OBARG_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_245__OBARG_BIND.obj_num = 2;
- cdat->dobj_245__OBARG_BIND.obj_hash = 444410232;
+ cdat->dobj_245__OBARG_BIND.obj_hash = 720424766;
cdat->dobj_245__OBARG_BIND.obj_len = 4;
/*inistring dstr_246__OBARG_BIND*/
- /*_.VALSTR___V390*/ meltfptr[389] = (void *) &cdat->dstr_246__OBARG_BIND;
+ /*_.VALSTR___V393*/ meltfptr[392] = (void *) &cdat->dstr_246__OBARG_BIND;
cdat->dstr_246__OBARG_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_246__OBARG_BIND.val, "OBARG_BIND",
sizeof (cdat->dstr_246__OBARG_BIND.val) - 1);
/*iniobj dsym_247__CLASS_OBJGETARGREST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V396*/ meltfptr[395])
- /*_.VALDATA___V396*/
- meltfptr[395] = (void *) &cdat->dsym_247__CLASS_OBJGETARGREST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V399*/ meltfptr[398])
+ /*_.VALDATA___V399*/
+ meltfptr[398] = (void *) &cdat->dsym_247__CLASS_OBJGETARGREST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_247__CLASS_OBJGETARGREST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10713,7 +10803,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_248__CLASS_OBJGETARGR*/
- /*_.VALSTR___V397*/ meltfptr[396] =
+ /*_.VALSTR___V400*/ meltfptr[399] =
(void *) &cdat->dstr_248__CLASS_OBJGETARGR;
cdat->dstr_248__CLASS_OBJGETARGR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10724,7 +10814,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:201:/ iniobj");
/*iniobj dobj_249__CLASS_OBJGETARGREST*/
-/*_.VALDATA___V398*/ meltfptr[397] =
+/*_.VALDATA___V401*/ meltfptr[400] =
(void *) &cdat->dobj_249__CLASS_OBJGETARGREST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_249__CLASS_OBJGETARGREST",
@@ -10738,12 +10828,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_249__CLASS_OBJGETARGREST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_249__CLASS_OBJGETARGREST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_249__CLASS_OBJGETARGREST.obj_hash = 98463108;
+ cdat->dobj_249__CLASS_OBJGETARGREST.obj_hash = 234315036;
cdat->dobj_249__CLASS_OBJGETARGREST.obj_len = 8;
/*inistring dstr_250__CLASS_OBJGETARGR*/
- /*_.VALSTR___V399*/ meltfptr[398] =
+ /*_.VALSTR___V402*/ meltfptr[401] =
(void *) &cdat->dstr_250__CLASS_OBJGETARGR;
cdat->dstr_250__CLASS_OBJGETARGR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10752,22 +10842,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_250__CLASS_OBJGETARGR.
val) - 1);
/*inimult dtup_251__CLASS_OBJGETARGREST */
- /*_.VALTUP___V400*/ meltfptr[399] =
+ /*_.VALTUP___V403*/ meltfptr[402] =
(void *) &cdat->dtup_251__CLASS_OBJGETARGREST;
cdat->dtup_251__CLASS_OBJGETARGREST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_251__CLASS_OBJGETARGREST.nbval = 4;
/*inimult dtup_252__CLASS_OBJGETARGREST */
- /*_.VALTUP___V403*/ meltfptr[402] =
+ /*_.VALTUP___V406*/ meltfptr[405] =
(void *) &cdat->dtup_252__CLASS_OBJGETARGREST;
cdat->dtup_252__CLASS_OBJGETARGREST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_252__CLASS_OBJGETARGREST.nbval = 4;
/*iniobj dsym_253__OBARG_REST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V404*/ meltfptr[403])
- /*_.VALDATA___V404*/
- meltfptr[403] = (void *) &cdat->dsym_253__OBARG_REST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V407*/ meltfptr[406])
+ /*_.VALDATA___V407*/
+ meltfptr[406] = (void *) &cdat->dsym_253__OBARG_REST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_253__OBARG_REST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10784,7 +10874,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_254__OBARG_REST*/
- /*_.VALSTR___V405*/ meltfptr[404] = (void *) &cdat->dstr_254__OBARG_REST;
+ /*_.VALSTR___V408*/ meltfptr[407] = (void *) &cdat->dstr_254__OBARG_REST;
cdat->dstr_254__OBARG_REST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_254__OBARG_REST.val, "OBARG_REST",
@@ -10792,7 +10882,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_255__OBARG_REST*/
-/*_.VALDATA___V401*/ meltfptr[400] = (void *) &cdat->dobj_255__OBARG_REST;
+/*_.VALDATA___V404*/ meltfptr[403] = (void *) &cdat->dobj_255__OBARG_REST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_255__OBARG_REST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10805,21 +10895,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_255__OBARG_REST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_255__OBARG_REST.obj_num = 3;
- cdat->dobj_255__OBARG_REST.obj_hash = 985282761;
+ cdat->dobj_255__OBARG_REST.obj_hash = 989138435;
cdat->dobj_255__OBARG_REST.obj_len = 4;
/*inistring dstr_256__OBARG_REST*/
- /*_.VALSTR___V402*/ meltfptr[401] = (void *) &cdat->dstr_256__OBARG_REST;
+ /*_.VALSTR___V405*/ meltfptr[404] = (void *) &cdat->dstr_256__OBARG_REST;
cdat->dstr_256__OBARG_REST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_256__OBARG_REST.val, "OBARG_REST",
sizeof (cdat->dstr_256__OBARG_REST.val) - 1);
/*iniobj dsym_257__CLASS_OBJPUTXTRARESULT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V406*/ meltfptr[405])
- /*_.VALDATA___V406*/
- meltfptr[405] = (void *) &cdat->dsym_257__CLASS_OBJPUTXTRARESULT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V409*/ meltfptr[408])
+ /*_.VALDATA___V409*/
+ meltfptr[408] = (void *) &cdat->dsym_257__CLASS_OBJPUTXTRARESULT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_257__CLASS_OBJPUTXTRARESULT",
@@ -10837,7 +10927,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_258__CLASS_OBJPUTXTRA*/
- /*_.VALSTR___V407*/ meltfptr[406] =
+ /*_.VALSTR___V410*/ meltfptr[409] =
(void *) &cdat->dstr_258__CLASS_OBJPUTXTRA;
cdat->dstr_258__CLASS_OBJPUTXTRA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10848,7 +10938,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:208:/ iniobj");
/*iniobj dobj_259__CLASS_OBJPUTXTRARESULT*/
-/*_.VALDATA___V408*/ meltfptr[407] =
+/*_.VALDATA___V411*/ meltfptr[410] =
(void *) &cdat->dobj_259__CLASS_OBJPUTXTRARESULT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -10863,12 +10953,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_259__CLASS_OBJPUTXTRARESULT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_259__CLASS_OBJPUTXTRARESULT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_259__CLASS_OBJPUTXTRARESULT.obj_hash = 193120850;
+ cdat->dobj_259__CLASS_OBJPUTXTRARESULT.obj_hash = 556433142;
cdat->dobj_259__CLASS_OBJPUTXTRARESULT.obj_len = 8;
/*inistring dstr_260__CLASS_OBJPUTXTRA*/
- /*_.VALSTR___V409*/ meltfptr[408] =
+ /*_.VALSTR___V412*/ meltfptr[411] =
(void *) &cdat->dstr_260__CLASS_OBJPUTXTRA;
cdat->dstr_260__CLASS_OBJPUTXTRA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10877,22 +10967,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_260__CLASS_OBJPUTXTRA.
val) - 1);
/*inimult dtup_261__CLASS_OBJPUTXTRARESULT */
- /*_.VALTUP___V410*/ meltfptr[409] =
+ /*_.VALTUP___V413*/ meltfptr[412] =
(void *) &cdat->dtup_261__CLASS_OBJPUTXTRARESULT;
cdat->dtup_261__CLASS_OBJPUTXTRARESULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_261__CLASS_OBJPUTXTRARESULT.nbval = 3;
/*inimult dtup_262__CLASS_OBJPUTXTRARESULT */
- /*_.VALTUP___V415*/ meltfptr[414] =
+ /*_.VALTUP___V418*/ meltfptr[417] =
(void *) &cdat->dtup_262__CLASS_OBJPUTXTRARESULT;
cdat->dtup_262__CLASS_OBJPUTXTRARESULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_262__CLASS_OBJPUTXTRARESULT.nbval = 3;
/*iniobj dsym_263__OBXRES_RANK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V416*/ meltfptr[415])
- /*_.VALDATA___V416*/
- meltfptr[415] = (void *) &cdat->dsym_263__OBXRES_RANK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V419*/ meltfptr[418])
+ /*_.VALDATA___V419*/
+ meltfptr[418] = (void *) &cdat->dsym_263__OBXRES_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_263__OBXRES_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10909,7 +10999,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_264__OBXRES_RANK*/
- /*_.VALSTR___V417*/ meltfptr[416] = (void *) &cdat->dstr_264__OBXRES_RANK;
+ /*_.VALSTR___V420*/ meltfptr[419] = (void *) &cdat->dstr_264__OBXRES_RANK;
cdat->dstr_264__OBXRES_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_264__OBXRES_RANK.val,
@@ -10918,7 +11008,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_265__OBXRES_RANK*/
-/*_.VALDATA___V411*/ meltfptr[410] = (void *) &cdat->dobj_265__OBXRES_RANK;
+/*_.VALDATA___V414*/ meltfptr[413] = (void *) &cdat->dobj_265__OBXRES_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_265__OBXRES_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10931,12 +11021,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_265__OBXRES_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_265__OBXRES_RANK.obj_num = 1;
- cdat->dobj_265__OBXRES_RANK.obj_hash = 934014328;
+ cdat->dobj_265__OBXRES_RANK.obj_hash = 346444616;
cdat->dobj_265__OBXRES_RANK.obj_len = 4;
/*inistring dstr_266__OBXRES_RANK*/
- /*_.VALSTR___V412*/ meltfptr[411] = (void *) &cdat->dstr_266__OBXRES_RANK;
+ /*_.VALSTR___V415*/ meltfptr[414] = (void *) &cdat->dstr_266__OBXRES_RANK;
cdat->dstr_266__OBXRES_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_266__OBXRES_RANK.val,
@@ -10944,9 +11034,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_266__OBXRES_RANK.val) - 1);
/*iniobj dsym_267__OBXRES_OBLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V418*/ meltfptr[417])
- /*_.VALDATA___V418*/
- meltfptr[417] = (void *) &cdat->dsym_267__OBXRES_OBLOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V421*/ meltfptr[420])
+ /*_.VALDATA___V421*/
+ meltfptr[420] = (void *) &cdat->dsym_267__OBXRES_OBLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_267__OBXRES_OBLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10963,7 +11053,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_268__OBXRES_OBLOC*/
- /*_.VALSTR___V419*/ meltfptr[418] = (void *) &cdat->dstr_268__OBXRES_OBLOC;
+ /*_.VALSTR___V422*/ meltfptr[421] = (void *) &cdat->dstr_268__OBXRES_OBLOC;
cdat->dstr_268__OBXRES_OBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_268__OBXRES_OBLOC.val,
@@ -10973,7 +11063,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_269__OBXRES_OBLOC*/
-/*_.VALDATA___V413*/ meltfptr[412] = (void *) &cdat->dobj_269__OBXRES_OBLOC;
+/*_.VALDATA___V416*/ meltfptr[415] = (void *) &cdat->dobj_269__OBXRES_OBLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_269__OBXRES_OBLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10986,12 +11076,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_269__OBXRES_OBLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_269__OBXRES_OBLOC.obj_num = 2;
- cdat->dobj_269__OBXRES_OBLOC.obj_hash = 909310198;
+ cdat->dobj_269__OBXRES_OBLOC.obj_hash = 511650248;
cdat->dobj_269__OBXRES_OBLOC.obj_len = 4;
/*inistring dstr_270__OBXRES_OBLOC*/
- /*_.VALSTR___V414*/ meltfptr[413] = (void *) &cdat->dstr_270__OBXRES_OBLOC;
+ /*_.VALSTR___V417*/ meltfptr[416] = (void *) &cdat->dstr_270__OBXRES_OBLOC;
cdat->dstr_270__OBXRES_OBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_270__OBXRES_OBLOC.val,
@@ -11000,9 +11090,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_271__CLASS_OBJFINALRETURN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V420*/ meltfptr[419])
- /*_.VALDATA___V420*/
- meltfptr[419] = (void *) &cdat->dsym_271__CLASS_OBJFINALRETURN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V423*/ meltfptr[422])
+ /*_.VALDATA___V423*/
+ meltfptr[422] = (void *) &cdat->dsym_271__CLASS_OBJFINALRETURN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_271__CLASS_OBJFINALRETURN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11019,7 +11109,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_272__CLASS_OBJFINALRE*/
- /*_.VALSTR___V421*/ meltfptr[420] =
+ /*_.VALSTR___V424*/ meltfptr[423] =
(void *) &cdat->dstr_272__CLASS_OBJFINALRE;
cdat->dstr_272__CLASS_OBJFINALRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11030,7 +11120,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:215:/ iniobj");
/*iniobj dobj_273__CLASS_OBJFINALRETURN*/
-/*_.VALDATA___V422*/ meltfptr[421] =
+/*_.VALDATA___V425*/ meltfptr[424] =
(void *) &cdat->dobj_273__CLASS_OBJFINALRETURN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_273__CLASS_OBJFINALRETURN",
@@ -11044,12 +11134,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_273__CLASS_OBJFINALRETURN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_273__CLASS_OBJFINALRETURN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_273__CLASS_OBJFINALRETURN.obj_hash = 828244625;
+ cdat->dobj_273__CLASS_OBJFINALRETURN.obj_hash = 154225106;
cdat->dobj_273__CLASS_OBJFINALRETURN.obj_len = 8;
/*inistring dstr_274__CLASS_OBJFINALRE*/
- /*_.VALSTR___V423*/ meltfptr[422] =
+ /*_.VALSTR___V426*/ meltfptr[425] =
(void *) &cdat->dstr_274__CLASS_OBJFINALRE;
cdat->dstr_274__CLASS_OBJFINALRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11058,22 +11148,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_274__CLASS_OBJFINALRE.
val) - 1);
/*inimult dtup_275__CLASS_OBJFINALRETURN */
- /*_.VALTUP___V424*/ meltfptr[423] =
+ /*_.VALTUP___V427*/ meltfptr[426] =
(void *) &cdat->dtup_275__CLASS_OBJFINALRETURN;
cdat->dtup_275__CLASS_OBJFINALRETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_275__CLASS_OBJFINALRETURN.nbval = 3;
/*inimult dtup_276__CLASS_OBJFINALRETURN */
- /*_.VALTUP___V425*/ meltfptr[424] =
+ /*_.VALTUP___V428*/ meltfptr[427] =
(void *) &cdat->dtup_276__CLASS_OBJFINALRETURN;
cdat->dtup_276__CLASS_OBJFINALRETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_276__CLASS_OBJFINALRETURN.nbval = 1;
/*iniobj dsym_277__CLASS_OBJCLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V426*/ meltfptr[425])
- /*_.VALDATA___V426*/
- meltfptr[425] = (void *) &cdat->dsym_277__CLASS_OBJCLEAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V429*/ meltfptr[428])
+ /*_.VALDATA___V429*/
+ meltfptr[428] = (void *) &cdat->dsym_277__CLASS_OBJCLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_277__CLASS_OBJCLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11090,7 +11180,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_278__CLASS_OBJCLEAR*/
- /*_.VALSTR___V427*/ meltfptr[426] =
+ /*_.VALSTR___V430*/ meltfptr[429] =
(void *) &cdat->dstr_278__CLASS_OBJCLEAR;
cdat->dstr_278__CLASS_OBJCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11101,7 +11191,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:221:/ iniobj");
/*iniobj dobj_279__CLASS_OBJCLEAR*/
-/*_.VALDATA___V428*/ meltfptr[427] =
+/*_.VALDATA___V431*/ meltfptr[430] =
(void *) &cdat->dobj_279__CLASS_OBJCLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_279__CLASS_OBJCLEAR",
@@ -11115,12 +11205,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_279__CLASS_OBJCLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_279__CLASS_OBJCLEAR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_279__CLASS_OBJCLEAR.obj_hash = 464576295;
+ cdat->dobj_279__CLASS_OBJCLEAR.obj_hash = 851309675;
cdat->dobj_279__CLASS_OBJCLEAR.obj_len = 8;
/*inistring dstr_280__CLASS_OBJCLEAR*/
- /*_.VALSTR___V429*/ meltfptr[428] =
+ /*_.VALSTR___V432*/ meltfptr[431] =
(void *) &cdat->dstr_280__CLASS_OBJCLEAR;
cdat->dstr_280__CLASS_OBJCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11129,22 +11219,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_280__CLASS_OBJCLEAR.val) -
1);
/*inimult dtup_281__CLASS_OBJCLEAR */
- /*_.VALTUP___V430*/ meltfptr[429] =
+ /*_.VALTUP___V433*/ meltfptr[432] =
(void *) &cdat->dtup_281__CLASS_OBJCLEAR;
cdat->dtup_281__CLASS_OBJCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_281__CLASS_OBJCLEAR.nbval = 3;
/*inimult dtup_282__CLASS_OBJCLEAR */
- /*_.VALTUP___V433*/ meltfptr[432] =
+ /*_.VALTUP___V436*/ meltfptr[435] =
(void *) &cdat->dtup_282__CLASS_OBJCLEAR;
cdat->dtup_282__CLASS_OBJCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_282__CLASS_OBJCLEAR.nbval = 2;
/*iniobj dsym_283__OCLR_VLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V434*/ meltfptr[433])
- /*_.VALDATA___V434*/
- meltfptr[433] = (void *) &cdat->dsym_283__OCLR_VLOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V437*/ meltfptr[436])
+ /*_.VALDATA___V437*/
+ meltfptr[436] = (void *) &cdat->dsym_283__OCLR_VLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_283__OCLR_VLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11161,7 +11251,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_284__OCLR_VLOC*/
- /*_.VALSTR___V435*/ meltfptr[434] = (void *) &cdat->dstr_284__OCLR_VLOC;
+ /*_.VALSTR___V438*/ meltfptr[437] = (void *) &cdat->dstr_284__OCLR_VLOC;
cdat->dstr_284__OCLR_VLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_284__OCLR_VLOC.val, "OCLR_VLOC",
@@ -11169,7 +11259,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_285__OCLR_VLOC*/
-/*_.VALDATA___V431*/ meltfptr[430] = (void *) &cdat->dobj_285__OCLR_VLOC;
+/*_.VALDATA___V434*/ meltfptr[433] = (void *) &cdat->dobj_285__OCLR_VLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_285__OCLR_VLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11182,21 +11272,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_285__OCLR_VLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_285__OCLR_VLOC.obj_num = 1;
- cdat->dobj_285__OCLR_VLOC.obj_hash = 341181814;
+ cdat->dobj_285__OCLR_VLOC.obj_hash = 562819424;
cdat->dobj_285__OCLR_VLOC.obj_len = 4;
/*inistring dstr_286__OCLR_VLOC*/
- /*_.VALSTR___V432*/ meltfptr[431] = (void *) &cdat->dstr_286__OCLR_VLOC;
+ /*_.VALSTR___V435*/ meltfptr[434] = (void *) &cdat->dstr_286__OCLR_VLOC;
cdat->dstr_286__OCLR_VLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_286__OCLR_VLOC.val, "OCLR_VLOC",
sizeof (cdat->dstr_286__OCLR_VLOC.val) - 1);
/*iniobj dsym_287__CLASS_OBJANYBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V436*/ meltfptr[435])
- /*_.VALDATA___V436*/
- meltfptr[435] = (void *) &cdat->dsym_287__CLASS_OBJANYBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V439*/ meltfptr[438])
+ /*_.VALDATA___V439*/
+ meltfptr[438] = (void *) &cdat->dsym_287__CLASS_OBJANYBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_287__CLASS_OBJANYBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11213,7 +11303,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_288__CLASS_OBJANYBLOC*/
- /*_.VALSTR___V437*/ meltfptr[436] =
+ /*_.VALSTR___V440*/ meltfptr[439] =
(void *) &cdat->dstr_288__CLASS_OBJANYBLOC;
cdat->dstr_288__CLASS_OBJANYBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11224,7 +11314,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:229:/ iniobj");
/*iniobj dobj_289__CLASS_OBJANYBLOCK*/
-/*_.VALDATA___V438*/ meltfptr[437] =
+/*_.VALDATA___V441*/ meltfptr[440] =
(void *) &cdat->dobj_289__CLASS_OBJANYBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_289__CLASS_OBJANYBLOCK",
@@ -11238,12 +11328,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_289__CLASS_OBJANYBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_289__CLASS_OBJANYBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_289__CLASS_OBJANYBLOCK.obj_hash = 554985324;
+ cdat->dobj_289__CLASS_OBJANYBLOCK.obj_hash = 926961260;
cdat->dobj_289__CLASS_OBJANYBLOCK.obj_len = 8;
/*inistring dstr_290__CLASS_OBJANYBLOC*/
- /*_.VALSTR___V439*/ meltfptr[438] =
+ /*_.VALSTR___V442*/ meltfptr[441] =
(void *) &cdat->dstr_290__CLASS_OBJANYBLOC;
cdat->dstr_290__CLASS_OBJANYBLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11252,22 +11342,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_290__CLASS_OBJANYBLOC.
val) - 1);
/*inimult dtup_291__CLASS_OBJANYBLOCK */
- /*_.VALTUP___V440*/ meltfptr[439] =
+ /*_.VALTUP___V443*/ meltfptr[442] =
(void *) &cdat->dtup_291__CLASS_OBJANYBLOCK;
cdat->dtup_291__CLASS_OBJANYBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_291__CLASS_OBJANYBLOCK.nbval = 3;
/*inimult dtup_292__CLASS_OBJANYBLOCK */
- /*_.VALTUP___V445*/ meltfptr[444] =
+ /*_.VALTUP___V448*/ meltfptr[447] =
(void *) &cdat->dtup_292__CLASS_OBJANYBLOCK;
cdat->dtup_292__CLASS_OBJANYBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_292__CLASS_OBJANYBLOCK.nbval = 3;
/*iniobj dsym_293__OBLO_BODYL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V446*/ meltfptr[445])
- /*_.VALDATA___V446*/
- meltfptr[445] = (void *) &cdat->dsym_293__OBLO_BODYL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V449*/ meltfptr[448])
+ /*_.VALDATA___V449*/
+ meltfptr[448] = (void *) &cdat->dsym_293__OBLO_BODYL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_293__OBLO_BODYL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11284,7 +11374,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_294__OBLO_BODYL*/
- /*_.VALSTR___V447*/ meltfptr[446] = (void *) &cdat->dstr_294__OBLO_BODYL;
+ /*_.VALSTR___V450*/ meltfptr[449] = (void *) &cdat->dstr_294__OBLO_BODYL;
cdat->dstr_294__OBLO_BODYL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_294__OBLO_BODYL.val, "OBLO_BODYL",
@@ -11292,7 +11382,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_295__OBLO_BODYL*/
-/*_.VALDATA___V441*/ meltfptr[440] = (void *) &cdat->dobj_295__OBLO_BODYL;
+/*_.VALDATA___V444*/ meltfptr[443] = (void *) &cdat->dobj_295__OBLO_BODYL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_295__OBLO_BODYL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11305,21 +11395,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_295__OBLO_BODYL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_295__OBLO_BODYL.obj_num = 1;
- cdat->dobj_295__OBLO_BODYL.obj_hash = 744558195;
+ cdat->dobj_295__OBLO_BODYL.obj_hash = 701062576;
cdat->dobj_295__OBLO_BODYL.obj_len = 4;
/*inistring dstr_296__OBLO_BODYL*/
- /*_.VALSTR___V442*/ meltfptr[441] = (void *) &cdat->dstr_296__OBLO_BODYL;
+ /*_.VALSTR___V445*/ meltfptr[444] = (void *) &cdat->dstr_296__OBLO_BODYL;
cdat->dstr_296__OBLO_BODYL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_296__OBLO_BODYL.val, "OBLO_BODYL",
sizeof (cdat->dstr_296__OBLO_BODYL.val) - 1);
/*iniobj dsym_297__OBLO_EPIL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V448*/ meltfptr[447])
- /*_.VALDATA___V448*/
- meltfptr[447] = (void *) &cdat->dsym_297__OBLO_EPIL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V451*/ meltfptr[450])
+ /*_.VALDATA___V451*/
+ meltfptr[450] = (void *) &cdat->dsym_297__OBLO_EPIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_297__OBLO_EPIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11336,7 +11426,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_298__OBLO_EPIL*/
- /*_.VALSTR___V449*/ meltfptr[448] = (void *) &cdat->dstr_298__OBLO_EPIL;
+ /*_.VALSTR___V452*/ meltfptr[451] = (void *) &cdat->dstr_298__OBLO_EPIL;
cdat->dstr_298__OBLO_EPIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_298__OBLO_EPIL.val, "OBLO_EPIL",
@@ -11344,7 +11434,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_299__OBLO_EPIL*/
-/*_.VALDATA___V443*/ meltfptr[442] = (void *) &cdat->dobj_299__OBLO_EPIL;
+/*_.VALDATA___V446*/ meltfptr[445] = (void *) &cdat->dobj_299__OBLO_EPIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_299__OBLO_EPIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11357,21 +11447,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_299__OBLO_EPIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_299__OBLO_EPIL.obj_num = 2;
- cdat->dobj_299__OBLO_EPIL.obj_hash = 343018584;
+ cdat->dobj_299__OBLO_EPIL.obj_hash = 647775931;
cdat->dobj_299__OBLO_EPIL.obj_len = 4;
/*inistring dstr_300__OBLO_EPIL*/
- /*_.VALSTR___V444*/ meltfptr[443] = (void *) &cdat->dstr_300__OBLO_EPIL;
+ /*_.VALSTR___V447*/ meltfptr[446] = (void *) &cdat->dstr_300__OBLO_EPIL;
cdat->dstr_300__OBLO_EPIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_300__OBLO_EPIL.val, "OBLO_EPIL",
sizeof (cdat->dstr_300__OBLO_EPIL.val) - 1);
/*iniobj dsym_301__CLASS_OBJPLAINBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V450*/ meltfptr[449])
- /*_.VALDATA___V450*/
- meltfptr[449] = (void *) &cdat->dsym_301__CLASS_OBJPLAINBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V453*/ meltfptr[452])
+ /*_.VALDATA___V453*/
+ meltfptr[452] = (void *) &cdat->dsym_301__CLASS_OBJPLAINBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_301__CLASS_OBJPLAINBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11388,7 +11478,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_302__CLASS_OBJPLAINBL*/
- /*_.VALSTR___V451*/ meltfptr[450] =
+ /*_.VALSTR___V454*/ meltfptr[453] =
(void *) &cdat->dstr_302__CLASS_OBJPLAINBL;
cdat->dstr_302__CLASS_OBJPLAINBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11399,7 +11489,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:235:/ iniobj");
/*iniobj dobj_303__CLASS_OBJPLAINBLOCK*/
-/*_.VALDATA___V452*/ meltfptr[451] =
+/*_.VALDATA___V455*/ meltfptr[454] =
(void *) &cdat->dobj_303__CLASS_OBJPLAINBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_303__CLASS_OBJPLAINBLOCK",
@@ -11413,12 +11503,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_303__CLASS_OBJPLAINBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_303__CLASS_OBJPLAINBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_303__CLASS_OBJPLAINBLOCK.obj_hash = 644628399;
+ cdat->dobj_303__CLASS_OBJPLAINBLOCK.obj_hash = 226380922;
cdat->dobj_303__CLASS_OBJPLAINBLOCK.obj_len = 8;
/*inistring dstr_304__CLASS_OBJPLAINBL*/
- /*_.VALSTR___V453*/ meltfptr[452] =
+ /*_.VALSTR___V456*/ meltfptr[455] =
(void *) &cdat->dstr_304__CLASS_OBJPLAINBL;
cdat->dstr_304__CLASS_OBJPLAINBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11427,22 +11517,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_304__CLASS_OBJPLAINBL.
val) - 1);
/*inimult dtup_305__CLASS_OBJPLAINBLOCK */
- /*_.VALTUP___V454*/ meltfptr[453] =
+ /*_.VALTUP___V457*/ meltfptr[456] =
(void *) &cdat->dtup_305__CLASS_OBJPLAINBLOCK;
cdat->dtup_305__CLASS_OBJPLAINBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_305__CLASS_OBJPLAINBLOCK.nbval = 4;
/*inimult dtup_306__CLASS_OBJPLAINBLOCK */
- /*_.VALTUP___V455*/ meltfptr[454] =
+ /*_.VALTUP___V458*/ meltfptr[457] =
(void *) &cdat->dtup_306__CLASS_OBJPLAINBLOCK;
cdat->dtup_306__CLASS_OBJPLAINBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_306__CLASS_OBJPLAINBLOCK.nbval = 3;
/*iniobj dsym_307__CLASS_OBJMULTIALLOCBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V456*/ meltfptr[455])
- /*_.VALDATA___V456*/
- meltfptr[455] = (void *) &cdat->dsym_307__CLASS_OBJMULTIALLOCBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V459*/ meltfptr[458])
+ /*_.VALDATA___V459*/
+ meltfptr[458] = (void *) &cdat->dsym_307__CLASS_OBJMULTIALLOCBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_307__CLASS_OBJMULTIALLOCBLOCK",
@@ -11460,7 +11550,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_308__CLASS_OBJMULTIAL*/
- /*_.VALSTR___V457*/ meltfptr[456] =
+ /*_.VALSTR___V460*/ meltfptr[459] =
(void *) &cdat->dstr_308__CLASS_OBJMULTIAL;
cdat->dstr_308__CLASS_OBJMULTIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11471,7 +11561,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:241:/ iniobj");
/*iniobj dobj_309__CLASS_OBJMULTIALLOCBLOCK*/
-/*_.VALDATA___V458*/ meltfptr[457] =
+/*_.VALDATA___V461*/ meltfptr[460] =
(void *) &cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -11486,12 +11576,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 1062686478;
+ cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 95811920;
cdat->dobj_309__CLASS_OBJMULTIALLOCBLOCK.obj_len = 8;
/*inistring dstr_310__CLASS_OBJMULTIAL*/
- /*_.VALSTR___V459*/ meltfptr[458] =
+ /*_.VALSTR___V462*/ meltfptr[461] =
(void *) &cdat->dstr_310__CLASS_OBJMULTIAL;
cdat->dstr_310__CLASS_OBJMULTIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11500,22 +11590,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_310__CLASS_OBJMULTIAL.
val) - 1);
/*inimult dtup_311__CLASS_OBJMULTIALLOCBLOCK */
- /*_.VALTUP___V460*/ meltfptr[459] =
+ /*_.VALTUP___V463*/ meltfptr[462] =
(void *) &cdat->dtup_311__CLASS_OBJMULTIALLOCBLOCK;
cdat->dtup_311__CLASS_OBJMULTIALLOCBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_311__CLASS_OBJMULTIALLOCBLOCK.nbval = 4;
/*inimult dtup_312__CLASS_OBJMULTIALLOCBLOCK */
- /*_.VALTUP___V465*/ meltfptr[464] =
+ /*_.VALTUP___V468*/ meltfptr[467] =
(void *) &cdat->dtup_312__CLASS_OBJMULTIALLOCBLOCK;
cdat->dtup_312__CLASS_OBJMULTIALLOCBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_312__CLASS_OBJMULTIALLOCBLOCK.nbval = 5;
/*iniobj dsym_313__OMALBLO_ALLSTRUCT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V466*/ meltfptr[465])
- /*_.VALDATA___V466*/
- meltfptr[465] = (void *) &cdat->dsym_313__OMALBLO_ALLSTRUCT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V469*/ meltfptr[468])
+ /*_.VALDATA___V469*/
+ meltfptr[468] = (void *) &cdat->dsym_313__OMALBLO_ALLSTRUCT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_313__OMALBLO_ALLSTRUCT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11532,7 +11622,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_314__OMALBLO_ALLSTRUC*/
- /*_.VALSTR___V467*/ meltfptr[466] =
+ /*_.VALSTR___V470*/ meltfptr[469] =
(void *) &cdat->dstr_314__OMALBLO_ALLSTRUC;
cdat->dstr_314__OMALBLO_ALLSTRUC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11543,7 +11633,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_315__OMALBLO_ALLSTRUCT*/
-/*_.VALDATA___V461*/ meltfptr[460] =
+/*_.VALDATA___V464*/ meltfptr[463] =
(void *) &cdat->dobj_315__OMALBLO_ALLSTRUCT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_315__OMALBLO_ALLSTRUCT",
@@ -11557,12 +11647,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_315__OMALBLO_ALLSTRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_315__OMALBLO_ALLSTRUCT.obj_num = 3;
- cdat->dobj_315__OMALBLO_ALLSTRUCT.obj_hash = 286860126;
+ cdat->dobj_315__OMALBLO_ALLSTRUCT.obj_hash = 969185803;
cdat->dobj_315__OMALBLO_ALLSTRUCT.obj_len = 4;
/*inistring dstr_316__OMALBLO_ALLSTRUC*/
- /*_.VALSTR___V462*/ meltfptr[461] =
+ /*_.VALSTR___V465*/ meltfptr[464] =
(void *) &cdat->dstr_316__OMALBLO_ALLSTRUC;
cdat->dstr_316__OMALBLO_ALLSTRUC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11572,9 +11662,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_317__OMALBLO_NAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V468*/ meltfptr[467])
- /*_.VALDATA___V468*/
- meltfptr[467] = (void *) &cdat->dsym_317__OMALBLO_NAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V471*/ meltfptr[470])
+ /*_.VALDATA___V471*/
+ meltfptr[470] = (void *) &cdat->dsym_317__OMALBLO_NAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_317__OMALBLO_NAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11591,7 +11681,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_318__OMALBLO_NAME*/
- /*_.VALSTR___V469*/ meltfptr[468] = (void *) &cdat->dstr_318__OMALBLO_NAME;
+ /*_.VALSTR___V472*/ meltfptr[471] = (void *) &cdat->dstr_318__OMALBLO_NAME;
cdat->dstr_318__OMALBLO_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_318__OMALBLO_NAME.val,
@@ -11601,7 +11691,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_319__OMALBLO_NAME*/
-/*_.VALDATA___V463*/ meltfptr[462] = (void *) &cdat->dobj_319__OMALBLO_NAME;
+/*_.VALDATA___V466*/ meltfptr[465] = (void *) &cdat->dobj_319__OMALBLO_NAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_319__OMALBLO_NAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11614,12 +11704,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_319__OMALBLO_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_319__OMALBLO_NAME.obj_num = 4;
- cdat->dobj_319__OMALBLO_NAME.obj_hash = 715056247;
+ cdat->dobj_319__OMALBLO_NAME.obj_hash = 791619137;
cdat->dobj_319__OMALBLO_NAME.obj_len = 4;
/*inistring dstr_320__OMALBLO_NAME*/
- /*_.VALSTR___V464*/ meltfptr[463] = (void *) &cdat->dstr_320__OMALBLO_NAME;
+ /*_.VALSTR___V467*/ meltfptr[466] = (void *) &cdat->dstr_320__OMALBLO_NAME;
cdat->dstr_320__OMALBLO_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_320__OMALBLO_NAME.val,
@@ -11628,9 +11718,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_321__CLASS_OBJCOMMENTEDBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V470*/ meltfptr[469])
- /*_.VALDATA___V470*/
- meltfptr[469] = (void *) &cdat->dsym_321__CLASS_OBJCOMMENTEDBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V473*/ meltfptr[472])
+ /*_.VALDATA___V473*/
+ meltfptr[472] = (void *) &cdat->dsym_321__CLASS_OBJCOMMENTEDBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_321__CLASS_OBJCOMMENTEDBLOCK",
@@ -11648,7 +11738,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_322__CLASS_OBJCOMMENT*/
- /*_.VALSTR___V471*/ meltfptr[470] =
+ /*_.VALSTR___V474*/ meltfptr[473] =
(void *) &cdat->dstr_322__CLASS_OBJCOMMENT;
cdat->dstr_322__CLASS_OBJCOMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11659,7 +11749,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:249:/ iniobj");
/*iniobj dobj_323__CLASS_OBJCOMMENTEDBLOCK*/
-/*_.VALDATA___V472*/ meltfptr[471] =
+/*_.VALDATA___V475*/ meltfptr[474] =
(void *) &cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -11674,12 +11764,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 652068581;
+ cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 1003562618;
cdat->dobj_323__CLASS_OBJCOMMENTEDBLOCK.obj_len = 8;
/*inistring dstr_324__CLASS_OBJCOMMENT*/
- /*_.VALSTR___V473*/ meltfptr[472] =
+ /*_.VALSTR___V476*/ meltfptr[475] =
(void *) &cdat->dstr_324__CLASS_OBJCOMMENT;
cdat->dstr_324__CLASS_OBJCOMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11688,22 +11778,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_324__CLASS_OBJCOMMENT.
val) - 1);
/*inimult dtup_325__CLASS_OBJCOMMENTEDBLOCK */
- /*_.VALTUP___V474*/ meltfptr[473] =
+ /*_.VALTUP___V477*/ meltfptr[476] =
(void *) &cdat->dtup_325__CLASS_OBJCOMMENTEDBLOCK;
cdat->dtup_325__CLASS_OBJCOMMENTEDBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_325__CLASS_OBJCOMMENTEDBLOCK.nbval = 4;
/*inimult dtup_326__CLASS_OBJCOMMENTEDBLOCK */
- /*_.VALTUP___V477*/ meltfptr[476] =
+ /*_.VALTUP___V480*/ meltfptr[479] =
(void *) &cdat->dtup_326__CLASS_OBJCOMMENTEDBLOCK;
cdat->dtup_326__CLASS_OBJCOMMENTEDBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_326__CLASS_OBJCOMMENTEDBLOCK.nbval = 4;
/*iniobj dsym_327__OCOMBLO_COMMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V478*/ meltfptr[477])
- /*_.VALDATA___V478*/
- meltfptr[477] = (void *) &cdat->dsym_327__OCOMBLO_COMMENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V481*/ meltfptr[480])
+ /*_.VALDATA___V481*/
+ meltfptr[480] = (void *) &cdat->dsym_327__OCOMBLO_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_327__OCOMBLO_COMMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11720,7 +11810,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_328__OCOMBLO_COMMENT*/
- /*_.VALSTR___V479*/ meltfptr[478] =
+ /*_.VALSTR___V482*/ meltfptr[481] =
(void *) &cdat->dstr_328__OCOMBLO_COMMENT;
cdat->dstr_328__OCOMBLO_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11731,7 +11821,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_329__OCOMBLO_COMMENT*/
-/*_.VALDATA___V475*/ meltfptr[474] =
+/*_.VALDATA___V478*/ meltfptr[477] =
(void *) &cdat->dobj_329__OCOMBLO_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_329__OCOMBLO_COMMENT",
@@ -11745,12 +11835,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_329__OCOMBLO_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_329__OCOMBLO_COMMENT.obj_num = 3;
- cdat->dobj_329__OCOMBLO_COMMENT.obj_hash = 614464002;
+ cdat->dobj_329__OCOMBLO_COMMENT.obj_hash = 817718257;
cdat->dobj_329__OCOMBLO_COMMENT.obj_len = 4;
/*inistring dstr_330__OCOMBLO_COMMENT*/
- /*_.VALSTR___V476*/ meltfptr[475] =
+ /*_.VALSTR___V479*/ meltfptr[478] =
(void *) &cdat->dstr_330__OCOMBLO_COMMENT;
cdat->dstr_330__OCOMBLO_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11760,9 +11850,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_331__CLASS_OBJMULTIBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V480*/ meltfptr[479])
- /*_.VALDATA___V480*/
- meltfptr[479] = (void *) &cdat->dsym_331__CLASS_OBJMULTIBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V483*/ meltfptr[482])
+ /*_.VALDATA___V483*/
+ meltfptr[482] = (void *) &cdat->dsym_331__CLASS_OBJMULTIBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_331__CLASS_OBJMULTIBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11779,7 +11869,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_332__CLASS_OBJMULTIBL*/
- /*_.VALSTR___V481*/ meltfptr[480] =
+ /*_.VALSTR___V484*/ meltfptr[483] =
(void *) &cdat->dstr_332__CLASS_OBJMULTIBL;
cdat->dstr_332__CLASS_OBJMULTIBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11790,7 +11880,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:257:/ iniobj");
/*iniobj dobj_333__CLASS_OBJMULTIBLOCK*/
-/*_.VALDATA___V482*/ meltfptr[481] =
+/*_.VALDATA___V485*/ meltfptr[484] =
(void *) &cdat->dobj_333__CLASS_OBJMULTIBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_333__CLASS_OBJMULTIBLOCK",
@@ -11804,12 +11894,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_333__CLASS_OBJMULTIBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_333__CLASS_OBJMULTIBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_333__CLASS_OBJMULTIBLOCK.obj_hash = 1025253887;
+ cdat->dobj_333__CLASS_OBJMULTIBLOCK.obj_hash = 490817396;
cdat->dobj_333__CLASS_OBJMULTIBLOCK.obj_len = 8;
/*inistring dstr_334__CLASS_OBJMULTIBL*/
- /*_.VALSTR___V483*/ meltfptr[482] =
+ /*_.VALSTR___V486*/ meltfptr[485] =
(void *) &cdat->dstr_334__CLASS_OBJMULTIBL;
cdat->dstr_334__CLASS_OBJMULTIBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11818,22 +11908,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_334__CLASS_OBJMULTIBL.
val) - 1);
/*inimult dtup_335__CLASS_OBJMULTIBLOCK */
- /*_.VALTUP___V484*/ meltfptr[483] =
+ /*_.VALTUP___V487*/ meltfptr[486] =
(void *) &cdat->dtup_335__CLASS_OBJMULTIBLOCK;
cdat->dtup_335__CLASS_OBJMULTIBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_335__CLASS_OBJMULTIBLOCK.nbval = 4;
/*inimult dtup_336__CLASS_OBJMULTIBLOCK */
- /*_.VALTUP___V487*/ meltfptr[486] =
+ /*_.VALTUP___V490*/ meltfptr[489] =
(void *) &cdat->dtup_336__CLASS_OBJMULTIBLOCK;
cdat->dtup_336__CLASS_OBJMULTIBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_336__CLASS_OBJMULTIBLOCK.nbval = 4;
/*iniobj dsym_337__OMULBLO_SUBCOMP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V488*/ meltfptr[487])
- /*_.VALDATA___V488*/
- meltfptr[487] = (void *) &cdat->dsym_337__OMULBLO_SUBCOMP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V491*/ meltfptr[490])
+ /*_.VALDATA___V491*/
+ meltfptr[490] = (void *) &cdat->dsym_337__OMULBLO_SUBCOMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_337__OMULBLO_SUBCOMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11850,7 +11940,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_338__OMULBLO_SUBCOMP*/
- /*_.VALSTR___V489*/ meltfptr[488] =
+ /*_.VALSTR___V492*/ meltfptr[491] =
(void *) &cdat->dstr_338__OMULBLO_SUBCOMP;
cdat->dstr_338__OMULBLO_SUBCOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11861,7 +11951,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_339__OMULBLO_SUBCOMP*/
-/*_.VALDATA___V485*/ meltfptr[484] =
+/*_.VALDATA___V488*/ meltfptr[487] =
(void *) &cdat->dobj_339__OMULBLO_SUBCOMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_339__OMULBLO_SUBCOMP",
@@ -11875,12 +11965,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_339__OMULBLO_SUBCOMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_339__OMULBLO_SUBCOMP.obj_num = 3;
- cdat->dobj_339__OMULBLO_SUBCOMP.obj_hash = 87661082;
+ cdat->dobj_339__OMULBLO_SUBCOMP.obj_hash = 157147990;
cdat->dobj_339__OMULBLO_SUBCOMP.obj_len = 4;
/*inistring dstr_340__OMULBLO_SUBCOMP*/
- /*_.VALSTR___V486*/ meltfptr[485] =
+ /*_.VALSTR___V489*/ meltfptr[488] =
(void *) &cdat->dstr_340__OMULBLO_SUBCOMP;
cdat->dstr_340__OMULBLO_SUBCOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11890,9 +11980,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_341__CLASS_OBJFLAGBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V490*/ meltfptr[489])
- /*_.VALDATA___V490*/
- meltfptr[489] = (void *) &cdat->dsym_341__CLASS_OBJFLAGBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V493*/ meltfptr[492])
+ /*_.VALDATA___V493*/
+ meltfptr[492] = (void *) &cdat->dsym_341__CLASS_OBJFLAGBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_341__CLASS_OBJFLAGBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11909,7 +11999,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_342__CLASS_OBJFLAGBLO*/
- /*_.VALSTR___V491*/ meltfptr[490] =
+ /*_.VALSTR___V494*/ meltfptr[493] =
(void *) &cdat->dstr_342__CLASS_OBJFLAGBLO;
cdat->dstr_342__CLASS_OBJFLAGBLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11920,7 +12010,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:265:/ iniobj");
/*iniobj dobj_343__CLASS_OBJFLAGBLOCK*/
-/*_.VALDATA___V492*/ meltfptr[491] =
+/*_.VALDATA___V495*/ meltfptr[494] =
(void *) &cdat->dobj_343__CLASS_OBJFLAGBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_343__CLASS_OBJFLAGBLOCK",
@@ -11934,12 +12024,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_343__CLASS_OBJFLAGBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_343__CLASS_OBJFLAGBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_343__CLASS_OBJFLAGBLOCK.obj_hash = 93790262;
+ cdat->dobj_343__CLASS_OBJFLAGBLOCK.obj_hash = 251262141;
cdat->dobj_343__CLASS_OBJFLAGBLOCK.obj_len = 8;
/*inistring dstr_344__CLASS_OBJFLAGBLO*/
- /*_.VALSTR___V493*/ meltfptr[492] =
+ /*_.VALSTR___V496*/ meltfptr[495] =
(void *) &cdat->dstr_344__CLASS_OBJFLAGBLO;
cdat->dstr_344__CLASS_OBJFLAGBLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11948,22 +12038,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_344__CLASS_OBJFLAGBLO.
val) - 1);
/*inimult dtup_345__CLASS_OBJFLAGBLOCK */
- /*_.VALTUP___V494*/ meltfptr[493] =
+ /*_.VALTUP___V497*/ meltfptr[496] =
(void *) &cdat->dtup_345__CLASS_OBJFLAGBLOCK;
cdat->dtup_345__CLASS_OBJFLAGBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_345__CLASS_OBJFLAGBLOCK.nbval = 4;
/*inimult dtup_346__CLASS_OBJFLAGBLOCK */
- /*_.VALTUP___V497*/ meltfptr[496] =
+ /*_.VALTUP___V500*/ meltfptr[499] =
(void *) &cdat->dtup_346__CLASS_OBJFLAGBLOCK;
cdat->dtup_346__CLASS_OBJFLAGBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_346__CLASS_OBJFLAGBLOCK.nbval = 4;
/*iniobj dsym_347__OFLABLO_FLAGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V498*/ meltfptr[497])
- /*_.VALDATA___V498*/
- meltfptr[497] = (void *) &cdat->dsym_347__OFLABLO_FLAGS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V501*/ meltfptr[500])
+ /*_.VALDATA___V501*/
+ meltfptr[500] = (void *) &cdat->dsym_347__OFLABLO_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_347__OFLABLO_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11980,7 +12070,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_348__OFLABLO_FLAGS*/
- /*_.VALSTR___V499*/ meltfptr[498] = (void *) &cdat->dstr_348__OFLABLO_FLAGS;
+ /*_.VALSTR___V502*/ meltfptr[501] = (void *) &cdat->dstr_348__OFLABLO_FLAGS;
cdat->dstr_348__OFLABLO_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_348__OFLABLO_FLAGS.val,
@@ -11990,7 +12080,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_349__OFLABLO_FLAGS*/
-/*_.VALDATA___V495*/ meltfptr[494] =
+/*_.VALDATA___V498*/ meltfptr[497] =
(void *) &cdat->dobj_349__OFLABLO_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_349__OFLABLO_FLAGS",
@@ -12004,12 +12094,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_349__OFLABLO_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_349__OFLABLO_FLAGS.obj_num = 3;
- cdat->dobj_349__OFLABLO_FLAGS.obj_hash = 419363846;
+ cdat->dobj_349__OFLABLO_FLAGS.obj_hash = 419489175;
cdat->dobj_349__OFLABLO_FLAGS.obj_len = 4;
/*inistring dstr_350__OFLABLO_FLAGS*/
- /*_.VALSTR___V496*/ meltfptr[495] = (void *) &cdat->dstr_350__OFLABLO_FLAGS;
+ /*_.VALSTR___V499*/ meltfptr[498] = (void *) &cdat->dstr_350__OFLABLO_FLAGS;
cdat->dstr_350__OFLABLO_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_350__OFLABLO_FLAGS.val,
@@ -12018,9 +12108,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_351__CLASS_OBJLABELINSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V500*/ meltfptr[499])
- /*_.VALDATA___V500*/
- meltfptr[499] = (void *) &cdat->dsym_351__CLASS_OBJLABELINSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V503*/ meltfptr[502])
+ /*_.VALDATA___V503*/
+ meltfptr[502] = (void *) &cdat->dsym_351__CLASS_OBJLABELINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_351__CLASS_OBJLABELINSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12037,7 +12127,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_352__CLASS_OBJLABELIN*/
- /*_.VALSTR___V501*/ meltfptr[500] =
+ /*_.VALSTR___V504*/ meltfptr[503] =
(void *) &cdat->dstr_352__CLASS_OBJLABELIN;
cdat->dstr_352__CLASS_OBJLABELIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12048,7 +12138,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:271:/ iniobj");
/*iniobj dobj_353__CLASS_OBJLABELINSTR*/
-/*_.VALDATA___V502*/ meltfptr[501] =
+/*_.VALDATA___V505*/ meltfptr[504] =
(void *) &cdat->dobj_353__CLASS_OBJLABELINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_353__CLASS_OBJLABELINSTR",
@@ -12062,12 +12152,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_353__CLASS_OBJLABELINSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_353__CLASS_OBJLABELINSTR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_353__CLASS_OBJLABELINSTR.obj_hash = 203861055;
+ cdat->dobj_353__CLASS_OBJLABELINSTR.obj_hash = 665884806;
cdat->dobj_353__CLASS_OBJLABELINSTR.obj_len = 8;
/*inistring dstr_354__CLASS_OBJLABELIN*/
- /*_.VALSTR___V503*/ meltfptr[502] =
+ /*_.VALSTR___V506*/ meltfptr[505] =
(void *) &cdat->dstr_354__CLASS_OBJLABELIN;
cdat->dstr_354__CLASS_OBJLABELIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12076,22 +12166,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_354__CLASS_OBJLABELIN.
val) - 1);
/*inimult dtup_355__CLASS_OBJLABELINSTR */
- /*_.VALTUP___V504*/ meltfptr[503] =
+ /*_.VALTUP___V507*/ meltfptr[506] =
(void *) &cdat->dtup_355__CLASS_OBJLABELINSTR;
cdat->dtup_355__CLASS_OBJLABELINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_355__CLASS_OBJLABELINSTR.nbval = 3;
/*inimult dtup_356__CLASS_OBJLABELINSTR */
- /*_.VALTUP___V509*/ meltfptr[508] =
+ /*_.VALTUP___V512*/ meltfptr[511] =
(void *) &cdat->dtup_356__CLASS_OBJLABELINSTR;
cdat->dtup_356__CLASS_OBJLABELINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_356__CLASS_OBJLABELINSTR.nbval = 3;
/*iniobj dsym_357__OBLAB_PREFIX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V510*/ meltfptr[509])
- /*_.VALDATA___V510*/
- meltfptr[509] = (void *) &cdat->dsym_357__OBLAB_PREFIX;
+ /*uniqueobj*/ if (! /*_.VALDATA___V513*/ meltfptr[512])
+ /*_.VALDATA___V513*/
+ meltfptr[512] = (void *) &cdat->dsym_357__OBLAB_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_357__OBLAB_PREFIX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12108,7 +12198,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_358__OBLAB_PREFIX*/
- /*_.VALSTR___V511*/ meltfptr[510] = (void *) &cdat->dstr_358__OBLAB_PREFIX;
+ /*_.VALSTR___V514*/ meltfptr[513] = (void *) &cdat->dstr_358__OBLAB_PREFIX;
cdat->dstr_358__OBLAB_PREFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_358__OBLAB_PREFIX.val,
@@ -12118,7 +12208,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_359__OBLAB_PREFIX*/
-/*_.VALDATA___V505*/ meltfptr[504] = (void *) &cdat->dobj_359__OBLAB_PREFIX;
+/*_.VALDATA___V508*/ meltfptr[507] = (void *) &cdat->dobj_359__OBLAB_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_359__OBLAB_PREFIX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12131,12 +12221,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_359__OBLAB_PREFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_359__OBLAB_PREFIX.obj_num = 1;
- cdat->dobj_359__OBLAB_PREFIX.obj_hash = 896662705;
+ cdat->dobj_359__OBLAB_PREFIX.obj_hash = 606299702;
cdat->dobj_359__OBLAB_PREFIX.obj_len = 4;
/*inistring dstr_360__OBLAB_PREFIX*/
- /*_.VALSTR___V506*/ meltfptr[505] = (void *) &cdat->dstr_360__OBLAB_PREFIX;
+ /*_.VALSTR___V509*/ meltfptr[508] = (void *) &cdat->dstr_360__OBLAB_PREFIX;
cdat->dstr_360__OBLAB_PREFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_360__OBLAB_PREFIX.val,
@@ -12145,9 +12235,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_361__OBLAB_RANK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V512*/ meltfptr[511])
- /*_.VALDATA___V512*/
- meltfptr[511] = (void *) &cdat->dsym_361__OBLAB_RANK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V515*/ meltfptr[514])
+ /*_.VALDATA___V515*/
+ meltfptr[514] = (void *) &cdat->dsym_361__OBLAB_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_361__OBLAB_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12164,7 +12254,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_362__OBLAB_RANK*/
- /*_.VALSTR___V513*/ meltfptr[512] = (void *) &cdat->dstr_362__OBLAB_RANK;
+ /*_.VALSTR___V516*/ meltfptr[515] = (void *) &cdat->dstr_362__OBLAB_RANK;
cdat->dstr_362__OBLAB_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_362__OBLAB_RANK.val, "OBLAB_RANK",
@@ -12172,7 +12262,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_363__OBLAB_RANK*/
-/*_.VALDATA___V507*/ meltfptr[506] = (void *) &cdat->dobj_363__OBLAB_RANK;
+/*_.VALDATA___V510*/ meltfptr[509] = (void *) &cdat->dobj_363__OBLAB_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_363__OBLAB_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12185,21 +12275,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_363__OBLAB_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_363__OBLAB_RANK.obj_num = 2;
- cdat->dobj_363__OBLAB_RANK.obj_hash = 707826008;
+ cdat->dobj_363__OBLAB_RANK.obj_hash = 661987112;
cdat->dobj_363__OBLAB_RANK.obj_len = 4;
/*inistring dstr_364__OBLAB_RANK*/
- /*_.VALSTR___V508*/ meltfptr[507] = (void *) &cdat->dstr_364__OBLAB_RANK;
+ /*_.VALSTR___V511*/ meltfptr[510] = (void *) &cdat->dstr_364__OBLAB_RANK;
cdat->dstr_364__OBLAB_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_364__OBLAB_RANK.val, "OBLAB_RANK",
sizeof (cdat->dstr_364__OBLAB_RANK.val) - 1);
/*iniobj dsym_365__CLASS_OBJGOTOINSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V514*/ meltfptr[513])
- /*_.VALDATA___V514*/
- meltfptr[513] = (void *) &cdat->dsym_365__CLASS_OBJGOTOINSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V517*/ meltfptr[516])
+ /*_.VALDATA___V517*/
+ meltfptr[516] = (void *) &cdat->dsym_365__CLASS_OBJGOTOINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_365__CLASS_OBJGOTOINSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12216,7 +12306,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_366__CLASS_OBJGOTOINS*/
- /*_.VALSTR___V515*/ meltfptr[514] =
+ /*_.VALSTR___V518*/ meltfptr[517] =
(void *) &cdat->dstr_366__CLASS_OBJGOTOINS;
cdat->dstr_366__CLASS_OBJGOTOINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12227,7 +12317,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:278:/ iniobj");
/*iniobj dobj_367__CLASS_OBJGOTOINSTR*/
-/*_.VALDATA___V516*/ meltfptr[515] =
+/*_.VALDATA___V519*/ meltfptr[518] =
(void *) &cdat->dobj_367__CLASS_OBJGOTOINSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_367__CLASS_OBJGOTOINSTR",
@@ -12241,12 +12331,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_367__CLASS_OBJGOTOINSTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_367__CLASS_OBJGOTOINSTR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_367__CLASS_OBJGOTOINSTR.obj_hash = 952827191;
+ cdat->dobj_367__CLASS_OBJGOTOINSTR.obj_hash = 51489104;
cdat->dobj_367__CLASS_OBJGOTOINSTR.obj_len = 8;
/*inistring dstr_368__CLASS_OBJGOTOINS*/
- /*_.VALSTR___V517*/ meltfptr[516] =
+ /*_.VALSTR___V520*/ meltfptr[519] =
(void *) &cdat->dstr_368__CLASS_OBJGOTOINS;
cdat->dstr_368__CLASS_OBJGOTOINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12255,22 +12345,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_368__CLASS_OBJGOTOINS.
val) - 1);
/*inimult dtup_369__CLASS_OBJGOTOINSTR */
- /*_.VALTUP___V518*/ meltfptr[517] =
+ /*_.VALTUP___V521*/ meltfptr[520] =
(void *) &cdat->dtup_369__CLASS_OBJGOTOINSTR;
cdat->dtup_369__CLASS_OBJGOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_369__CLASS_OBJGOTOINSTR.nbval = 3;
/*inimult dtup_370__CLASS_OBJGOTOINSTR */
- /*_.VALTUP___V523*/ meltfptr[522] =
+ /*_.VALTUP___V526*/ meltfptr[525] =
(void *) &cdat->dtup_370__CLASS_OBJGOTOINSTR;
cdat->dtup_370__CLASS_OBJGOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_370__CLASS_OBJGOTOINSTR.nbval = 3;
/*iniobj dsym_371__OBGOTO_PREFIX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V524*/ meltfptr[523])
- /*_.VALDATA___V524*/
- meltfptr[523] = (void *) &cdat->dsym_371__OBGOTO_PREFIX;
+ /*uniqueobj*/ if (! /*_.VALDATA___V527*/ meltfptr[526])
+ /*_.VALDATA___V527*/
+ meltfptr[526] = (void *) &cdat->dsym_371__OBGOTO_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_371__OBGOTO_PREFIX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12287,7 +12377,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_372__OBGOTO_PREFIX*/
- /*_.VALSTR___V525*/ meltfptr[524] = (void *) &cdat->dstr_372__OBGOTO_PREFIX;
+ /*_.VALSTR___V528*/ meltfptr[527] = (void *) &cdat->dstr_372__OBGOTO_PREFIX;
cdat->dstr_372__OBGOTO_PREFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_372__OBGOTO_PREFIX.val,
@@ -12297,7 +12387,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_373__OBGOTO_PREFIX*/
-/*_.VALDATA___V519*/ meltfptr[518] =
+/*_.VALDATA___V522*/ meltfptr[521] =
(void *) &cdat->dobj_373__OBGOTO_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_373__OBGOTO_PREFIX",
@@ -12311,12 +12401,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_373__OBGOTO_PREFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_373__OBGOTO_PREFIX.obj_num = 1;
- cdat->dobj_373__OBGOTO_PREFIX.obj_hash = 705348723;
+ cdat->dobj_373__OBGOTO_PREFIX.obj_hash = 1015628074;
cdat->dobj_373__OBGOTO_PREFIX.obj_len = 4;
/*inistring dstr_374__OBGOTO_PREFIX*/
- /*_.VALSTR___V520*/ meltfptr[519] = (void *) &cdat->dstr_374__OBGOTO_PREFIX;
+ /*_.VALSTR___V523*/ meltfptr[522] = (void *) &cdat->dstr_374__OBGOTO_PREFIX;
cdat->dstr_374__OBGOTO_PREFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_374__OBGOTO_PREFIX.val,
@@ -12325,9 +12415,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_375__OBGOTO_RANK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V526*/ meltfptr[525])
- /*_.VALDATA___V526*/
- meltfptr[525] = (void *) &cdat->dsym_375__OBGOTO_RANK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V529*/ meltfptr[528])
+ /*_.VALDATA___V529*/
+ meltfptr[528] = (void *) &cdat->dsym_375__OBGOTO_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_375__OBGOTO_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12344,7 +12434,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_376__OBGOTO_RANK*/
- /*_.VALSTR___V527*/ meltfptr[526] = (void *) &cdat->dstr_376__OBGOTO_RANK;
+ /*_.VALSTR___V530*/ meltfptr[529] = (void *) &cdat->dstr_376__OBGOTO_RANK;
cdat->dstr_376__OBGOTO_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_376__OBGOTO_RANK.val,
@@ -12353,7 +12443,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_377__OBGOTO_RANK*/
-/*_.VALDATA___V521*/ meltfptr[520] = (void *) &cdat->dobj_377__OBGOTO_RANK;
+/*_.VALDATA___V524*/ meltfptr[523] = (void *) &cdat->dobj_377__OBGOTO_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_377__OBGOTO_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12366,12 +12456,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_377__OBGOTO_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_377__OBGOTO_RANK.obj_num = 2;
- cdat->dobj_377__OBGOTO_RANK.obj_hash = 935997697;
+ cdat->dobj_377__OBGOTO_RANK.obj_hash = 368439209;
cdat->dobj_377__OBGOTO_RANK.obj_len = 4;
/*inistring dstr_378__OBGOTO_RANK*/
- /*_.VALSTR___V522*/ meltfptr[521] = (void *) &cdat->dstr_378__OBGOTO_RANK;
+ /*_.VALSTR___V525*/ meltfptr[524] = (void *) &cdat->dstr_378__OBGOTO_RANK;
cdat->dstr_378__OBGOTO_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_378__OBGOTO_RANK.val,
@@ -12379,9 +12469,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_378__OBGOTO_RANK.val) - 1);
/*iniobj dsym_379__CLASS_OBJLOOP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V528*/ meltfptr[527])
- /*_.VALDATA___V528*/
- meltfptr[527] = (void *) &cdat->dsym_379__CLASS_OBJLOOP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V531*/ meltfptr[530])
+ /*_.VALDATA___V531*/
+ meltfptr[530] = (void *) &cdat->dsym_379__CLASS_OBJLOOP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_379__CLASS_OBJLOOP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12398,7 +12488,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_380__CLASS_OBJLOOP*/
- /*_.VALSTR___V529*/ meltfptr[528] = (void *) &cdat->dstr_380__CLASS_OBJLOOP;
+ /*_.VALSTR___V532*/ meltfptr[531] = (void *) &cdat->dstr_380__CLASS_OBJLOOP;
cdat->dstr_380__CLASS_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_380__CLASS_OBJLOOP.val,
@@ -12408,7 +12498,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:285:/ iniobj");
/*iniobj dobj_381__CLASS_OBJLOOP*/
-/*_.VALDATA___V530*/ meltfptr[529] =
+/*_.VALDATA___V533*/ meltfptr[532] =
(void *) &cdat->dobj_381__CLASS_OBJLOOP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_381__CLASS_OBJLOOP",
@@ -12422,12 +12512,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_381__CLASS_OBJLOOP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_381__CLASS_OBJLOOP.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_381__CLASS_OBJLOOP.obj_hash = 735195453;
+ cdat->dobj_381__CLASS_OBJLOOP.obj_hash = 45606063;
cdat->dobj_381__CLASS_OBJLOOP.obj_len = 8;
/*inistring dstr_382__CLASS_OBJLOOP*/
- /*_.VALSTR___V531*/ meltfptr[530] = (void *) &cdat->dstr_382__CLASS_OBJLOOP;
+ /*_.VALSTR___V534*/ meltfptr[533] = (void *) &cdat->dstr_382__CLASS_OBJLOOP;
cdat->dstr_382__CLASS_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_382__CLASS_OBJLOOP.val,
@@ -12435,20 +12525,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_382__CLASS_OBJLOOP.val) -
1);
/*inimult dtup_383__CLASS_OBJLOOP */
- /*_.VALTUP___V532*/ meltfptr[531] = (void *) &cdat->dtup_383__CLASS_OBJLOOP;
+ /*_.VALTUP___V535*/ meltfptr[534] = (void *) &cdat->dtup_383__CLASS_OBJLOOP;
cdat->dtup_383__CLASS_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_383__CLASS_OBJLOOP.nbval = 4;
/*inimult dtup_384__CLASS_OBJLOOP */
- /*_.VALTUP___V537*/ meltfptr[536] = (void *) &cdat->dtup_384__CLASS_OBJLOOP;
+ /*_.VALTUP___V540*/ meltfptr[539] = (void *) &cdat->dtup_384__CLASS_OBJLOOP;
cdat->dtup_384__CLASS_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_384__CLASS_OBJLOOP.nbval = 5;
/*iniobj dsym_385__OBLOOP_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V538*/ meltfptr[537])
- /*_.VALDATA___V538*/
- meltfptr[537] = (void *) &cdat->dsym_385__OBLOOP_LABEL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V541*/ meltfptr[540])
+ /*_.VALDATA___V541*/
+ meltfptr[540] = (void *) &cdat->dsym_385__OBLOOP_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_385__OBLOOP_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12465,7 +12555,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_386__OBLOOP_LABEL*/
- /*_.VALSTR___V539*/ meltfptr[538] = (void *) &cdat->dstr_386__OBLOOP_LABEL;
+ /*_.VALSTR___V542*/ meltfptr[541] = (void *) &cdat->dstr_386__OBLOOP_LABEL;
cdat->dstr_386__OBLOOP_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_386__OBLOOP_LABEL.val,
@@ -12475,7 +12565,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_387__OBLOOP_LABEL*/
-/*_.VALDATA___V533*/ meltfptr[532] = (void *) &cdat->dobj_387__OBLOOP_LABEL;
+/*_.VALDATA___V536*/ meltfptr[535] = (void *) &cdat->dobj_387__OBLOOP_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_387__OBLOOP_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12488,12 +12578,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_387__OBLOOP_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_387__OBLOOP_LABEL.obj_num = 3;
- cdat->dobj_387__OBLOOP_LABEL.obj_hash = 572256483;
+ cdat->dobj_387__OBLOOP_LABEL.obj_hash = 741810748;
cdat->dobj_387__OBLOOP_LABEL.obj_len = 4;
/*inistring dstr_388__OBLOOP_LABEL*/
- /*_.VALSTR___V534*/ meltfptr[533] = (void *) &cdat->dstr_388__OBLOOP_LABEL;
+ /*_.VALSTR___V537*/ meltfptr[536] = (void *) &cdat->dstr_388__OBLOOP_LABEL;
cdat->dstr_388__OBLOOP_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_388__OBLOOP_LABEL.val,
@@ -12502,9 +12592,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_389__OBLOOP_RESV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V540*/ meltfptr[539])
- /*_.VALDATA___V540*/
- meltfptr[539] = (void *) &cdat->dsym_389__OBLOOP_RESV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V543*/ meltfptr[542])
+ /*_.VALDATA___V543*/
+ meltfptr[542] = (void *) &cdat->dsym_389__OBLOOP_RESV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_389__OBLOOP_RESV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12521,7 +12611,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_390__OBLOOP_RESV*/
- /*_.VALSTR___V541*/ meltfptr[540] = (void *) &cdat->dstr_390__OBLOOP_RESV;
+ /*_.VALSTR___V544*/ meltfptr[543] = (void *) &cdat->dstr_390__OBLOOP_RESV;
cdat->dstr_390__OBLOOP_RESV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_390__OBLOOP_RESV.val,
@@ -12530,7 +12620,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_391__OBLOOP_RESV*/
-/*_.VALDATA___V535*/ meltfptr[534] = (void *) &cdat->dobj_391__OBLOOP_RESV;
+/*_.VALDATA___V538*/ meltfptr[537] = (void *) &cdat->dobj_391__OBLOOP_RESV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_391__OBLOOP_RESV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12543,12 +12633,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_391__OBLOOP_RESV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_391__OBLOOP_RESV.obj_num = 4;
- cdat->dobj_391__OBLOOP_RESV.obj_hash = 620619668;
+ cdat->dobj_391__OBLOOP_RESV.obj_hash = 1009414693;
cdat->dobj_391__OBLOOP_RESV.obj_len = 4;
/*inistring dstr_392__OBLOOP_RESV*/
- /*_.VALSTR___V536*/ meltfptr[535] = (void *) &cdat->dstr_392__OBLOOP_RESV;
+ /*_.VALSTR___V539*/ meltfptr[538] = (void *) &cdat->dstr_392__OBLOOP_RESV;
cdat->dstr_392__OBLOOP_RESV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_392__OBLOOP_RESV.val,
@@ -12556,9 +12646,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_392__OBLOOP_RESV.val) - 1);
/*iniobj dsym_393__CLASS_OBJEXIT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V542*/ meltfptr[541])
- /*_.VALDATA___V542*/
- meltfptr[541] = (void *) &cdat->dsym_393__CLASS_OBJEXIT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V545*/ meltfptr[544])
+ /*_.VALDATA___V545*/
+ meltfptr[544] = (void *) &cdat->dsym_393__CLASS_OBJEXIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_393__CLASS_OBJEXIT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12575,7 +12665,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_394__CLASS_OBJEXIT*/
- /*_.VALSTR___V543*/ meltfptr[542] = (void *) &cdat->dstr_394__CLASS_OBJEXIT;
+ /*_.VALSTR___V546*/ meltfptr[545] = (void *) &cdat->dstr_394__CLASS_OBJEXIT;
cdat->dstr_394__CLASS_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_394__CLASS_OBJEXIT.val,
@@ -12585,7 +12675,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:292:/ iniobj");
/*iniobj dobj_395__CLASS_OBJEXIT*/
-/*_.VALDATA___V544*/ meltfptr[543] =
+/*_.VALDATA___V547*/ meltfptr[546] =
(void *) &cdat->dobj_395__CLASS_OBJEXIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_395__CLASS_OBJEXIT",
@@ -12599,12 +12689,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_395__CLASS_OBJEXIT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_395__CLASS_OBJEXIT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_395__CLASS_OBJEXIT.obj_hash = 44085869;
+ cdat->dobj_395__CLASS_OBJEXIT.obj_hash = 272487417;
cdat->dobj_395__CLASS_OBJEXIT.obj_len = 8;
/*inistring dstr_396__CLASS_OBJEXIT*/
- /*_.VALSTR___V545*/ meltfptr[544] = (void *) &cdat->dstr_396__CLASS_OBJEXIT;
+ /*_.VALSTR___V548*/ meltfptr[547] = (void *) &cdat->dstr_396__CLASS_OBJEXIT;
cdat->dstr_396__CLASS_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_396__CLASS_OBJEXIT.val,
@@ -12612,20 +12702,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_396__CLASS_OBJEXIT.val) -
1);
/*inimult dtup_397__CLASS_OBJEXIT */
- /*_.VALTUP___V546*/ meltfptr[545] = (void *) &cdat->dtup_397__CLASS_OBJEXIT;
+ /*_.VALTUP___V549*/ meltfptr[548] = (void *) &cdat->dtup_397__CLASS_OBJEXIT;
cdat->dtup_397__CLASS_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_397__CLASS_OBJEXIT.nbval = 3;
/*inimult dtup_398__CLASS_OBJEXIT */
- /*_.VALTUP___V549*/ meltfptr[548] = (void *) &cdat->dtup_398__CLASS_OBJEXIT;
+ /*_.VALTUP___V552*/ meltfptr[551] = (void *) &cdat->dtup_398__CLASS_OBJEXIT;
cdat->dtup_398__CLASS_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_398__CLASS_OBJEXIT.nbval = 2;
/*iniobj dsym_399__OBEXIT_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V550*/ meltfptr[549])
- /*_.VALDATA___V550*/
- meltfptr[549] = (void *) &cdat->dsym_399__OBEXIT_LABEL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V553*/ meltfptr[552])
+ /*_.VALDATA___V553*/
+ meltfptr[552] = (void *) &cdat->dsym_399__OBEXIT_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_399__OBEXIT_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12642,7 +12732,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_400__OBEXIT_LABEL*/
- /*_.VALSTR___V551*/ meltfptr[550] = (void *) &cdat->dstr_400__OBEXIT_LABEL;
+ /*_.VALSTR___V554*/ meltfptr[553] = (void *) &cdat->dstr_400__OBEXIT_LABEL;
cdat->dstr_400__OBEXIT_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_400__OBEXIT_LABEL.val,
@@ -12652,7 +12742,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_401__OBEXIT_LABEL*/
-/*_.VALDATA___V547*/ meltfptr[546] = (void *) &cdat->dobj_401__OBEXIT_LABEL;
+/*_.VALDATA___V550*/ meltfptr[549] = (void *) &cdat->dobj_401__OBEXIT_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_401__OBEXIT_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -12665,12 +12755,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_401__OBEXIT_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_401__OBEXIT_LABEL.obj_num = 1;
- cdat->dobj_401__OBEXIT_LABEL.obj_hash = 744561921;
+ cdat->dobj_401__OBEXIT_LABEL.obj_hash = 372908211;
cdat->dobj_401__OBEXIT_LABEL.obj_len = 4;
/*inistring dstr_402__OBEXIT_LABEL*/
- /*_.VALSTR___V548*/ meltfptr[547] = (void *) &cdat->dstr_402__OBEXIT_LABEL;
+ /*_.VALSTR___V551*/ meltfptr[550] = (void *) &cdat->dstr_402__OBEXIT_LABEL;
cdat->dstr_402__OBEXIT_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_402__OBEXIT_LABEL.val,
@@ -12679,9 +12769,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_403__CLASS_OBJAGAIN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V552*/ meltfptr[551])
- /*_.VALDATA___V552*/
- meltfptr[551] = (void *) &cdat->dsym_403__CLASS_OBJAGAIN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V555*/ meltfptr[554])
+ /*_.VALDATA___V555*/
+ meltfptr[554] = (void *) &cdat->dsym_403__CLASS_OBJAGAIN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_403__CLASS_OBJAGAIN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12698,7 +12788,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_404__CLASS_OBJAGAIN*/
- /*_.VALSTR___V553*/ meltfptr[552] =
+ /*_.VALSTR___V556*/ meltfptr[555] =
(void *) &cdat->dstr_404__CLASS_OBJAGAIN;
cdat->dstr_404__CLASS_OBJAGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12709,7 +12799,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:298:/ iniobj");
/*iniobj dobj_405__CLASS_OBJAGAIN*/
-/*_.VALDATA___V554*/ meltfptr[553] =
+/*_.VALDATA___V557*/ meltfptr[556] =
(void *) &cdat->dobj_405__CLASS_OBJAGAIN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_405__CLASS_OBJAGAIN",
@@ -12723,12 +12813,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_405__CLASS_OBJAGAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_405__CLASS_OBJAGAIN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_405__CLASS_OBJAGAIN.obj_hash = 989476179;
+ cdat->dobj_405__CLASS_OBJAGAIN.obj_hash = 177636380;
cdat->dobj_405__CLASS_OBJAGAIN.obj_len = 8;
/*inistring dstr_406__CLASS_OBJAGAIN*/
- /*_.VALSTR___V555*/ meltfptr[554] =
+ /*_.VALSTR___V558*/ meltfptr[557] =
(void *) &cdat->dstr_406__CLASS_OBJAGAIN;
cdat->dstr_406__CLASS_OBJAGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12737,22 +12827,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_406__CLASS_OBJAGAIN.val) -
1);
/*inimult dtup_407__CLASS_OBJAGAIN */
- /*_.VALTUP___V556*/ meltfptr[555] =
+ /*_.VALTUP___V559*/ meltfptr[558] =
(void *) &cdat->dtup_407__CLASS_OBJAGAIN;
cdat->dtup_407__CLASS_OBJAGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_407__CLASS_OBJAGAIN.nbval = 3;
/*inimult dtup_408__CLASS_OBJAGAIN */
- /*_.VALTUP___V559*/ meltfptr[558] =
+ /*_.VALTUP___V562*/ meltfptr[561] =
(void *) &cdat->dtup_408__CLASS_OBJAGAIN;
cdat->dtup_408__CLASS_OBJAGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_408__CLASS_OBJAGAIN.nbval = 2;
/*iniobj dsym_409__OBAGAIN_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V560*/ meltfptr[559])
- /*_.VALDATA___V560*/
- meltfptr[559] = (void *) &cdat->dsym_409__OBAGAIN_LABEL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V563*/ meltfptr[562])
+ /*_.VALDATA___V563*/
+ meltfptr[562] = (void *) &cdat->dsym_409__OBAGAIN_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_409__OBAGAIN_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12769,7 +12859,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_410__OBAGAIN_LABEL*/
- /*_.VALSTR___V561*/ meltfptr[560] = (void *) &cdat->dstr_410__OBAGAIN_LABEL;
+ /*_.VALSTR___V564*/ meltfptr[563] = (void *) &cdat->dstr_410__OBAGAIN_LABEL;
cdat->dstr_410__OBAGAIN_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_410__OBAGAIN_LABEL.val,
@@ -12779,7 +12869,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_411__OBAGAIN_LABEL*/
-/*_.VALDATA___V557*/ meltfptr[556] =
+/*_.VALDATA___V560*/ meltfptr[559] =
(void *) &cdat->dobj_411__OBAGAIN_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_411__OBAGAIN_LABEL",
@@ -12793,12 +12883,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_411__OBAGAIN_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_411__OBAGAIN_LABEL.obj_num = 1;
- cdat->dobj_411__OBAGAIN_LABEL.obj_hash = 513548486;
+ cdat->dobj_411__OBAGAIN_LABEL.obj_hash = 956491007;
cdat->dobj_411__OBAGAIN_LABEL.obj_len = 4;
/*inistring dstr_412__OBAGAIN_LABEL*/
- /*_.VALSTR___V558*/ meltfptr[557] = (void *) &cdat->dstr_412__OBAGAIN_LABEL;
+ /*_.VALSTR___V561*/ meltfptr[560] = (void *) &cdat->dstr_412__OBAGAIN_LABEL;
cdat->dstr_412__OBAGAIN_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_412__OBAGAIN_LABEL.val,
@@ -12807,9 +12897,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_413__CLASS_OBJCITERBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V562*/ meltfptr[561])
- /*_.VALDATA___V562*/
- meltfptr[561] = (void *) &cdat->dsym_413__CLASS_OBJCITERBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V565*/ meltfptr[564])
+ /*_.VALDATA___V565*/
+ meltfptr[564] = (void *) &cdat->dsym_413__CLASS_OBJCITERBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_413__CLASS_OBJCITERBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12826,7 +12916,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_414__CLASS_OBJCITERBL*/
- /*_.VALSTR___V563*/ meltfptr[562] =
+ /*_.VALSTR___V566*/ meltfptr[565] =
(void *) &cdat->dstr_414__CLASS_OBJCITERBL;
cdat->dstr_414__CLASS_OBJCITERBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12837,7 +12927,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:305:/ iniobj");
/*iniobj dobj_415__CLASS_OBJCITERBLOCK*/
-/*_.VALDATA___V564*/ meltfptr[563] =
+/*_.VALDATA___V567*/ meltfptr[566] =
(void *) &cdat->dobj_415__CLASS_OBJCITERBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_415__CLASS_OBJCITERBLOCK",
@@ -12851,12 +12941,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_415__CLASS_OBJCITERBLOCK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_415__CLASS_OBJCITERBLOCK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_415__CLASS_OBJCITERBLOCK.obj_hash = 350057489;
+ cdat->dobj_415__CLASS_OBJCITERBLOCK.obj_hash = 925022160;
cdat->dobj_415__CLASS_OBJCITERBLOCK.obj_len = 8;
/*inistring dstr_416__CLASS_OBJCITERBL*/
- /*_.VALSTR___V565*/ meltfptr[564] =
+ /*_.VALSTR___V568*/ meltfptr[567] =
(void *) &cdat->dstr_416__CLASS_OBJCITERBL;
cdat->dstr_416__CLASS_OBJCITERBL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12865,22 +12955,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_416__CLASS_OBJCITERBL.
val) - 1);
/*inimult dtup_417__CLASS_OBJCITERBLOCK */
- /*_.VALTUP___V566*/ meltfptr[565] =
+ /*_.VALTUP___V569*/ meltfptr[568] =
(void *) &cdat->dtup_417__CLASS_OBJCITERBLOCK;
cdat->dtup_417__CLASS_OBJCITERBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_417__CLASS_OBJCITERBLOCK.nbval = 4;
/*inimult dtup_418__CLASS_OBJCITERBLOCK */
- /*_.VALTUP___V573*/ meltfptr[572] =
+ /*_.VALTUP___V576*/ meltfptr[575] =
(void *) &cdat->dtup_418__CLASS_OBJCITERBLOCK;
cdat->dtup_418__CLASS_OBJCITERBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_418__CLASS_OBJCITERBLOCK.nbval = 6;
/*iniobj dsym_419__OBCITER_CITER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V574*/ meltfptr[573])
- /*_.VALDATA___V574*/
- meltfptr[573] = (void *) &cdat->dsym_419__OBCITER_CITER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V577*/ meltfptr[576])
+ /*_.VALDATA___V577*/
+ meltfptr[576] = (void *) &cdat->dsym_419__OBCITER_CITER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_419__OBCITER_CITER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12897,7 +12987,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_420__OBCITER_CITER*/
- /*_.VALSTR___V575*/ meltfptr[574] = (void *) &cdat->dstr_420__OBCITER_CITER;
+ /*_.VALSTR___V578*/ meltfptr[577] = (void *) &cdat->dstr_420__OBCITER_CITER;
cdat->dstr_420__OBCITER_CITER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_420__OBCITER_CITER.val,
@@ -12907,7 +12997,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_421__OBCITER_CITER*/
-/*_.VALDATA___V567*/ meltfptr[566] =
+/*_.VALDATA___V570*/ meltfptr[569] =
(void *) &cdat->dobj_421__OBCITER_CITER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_421__OBCITER_CITER",
@@ -12921,12 +13011,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_421__OBCITER_CITER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_421__OBCITER_CITER.obj_num = 3;
- cdat->dobj_421__OBCITER_CITER.obj_hash = 127999623;
+ cdat->dobj_421__OBCITER_CITER.obj_hash = 274248432;
cdat->dobj_421__OBCITER_CITER.obj_len = 4;
/*inistring dstr_422__OBCITER_CITER*/
- /*_.VALSTR___V568*/ meltfptr[567] = (void *) &cdat->dstr_422__OBCITER_CITER;
+ /*_.VALSTR___V571*/ meltfptr[570] = (void *) &cdat->dstr_422__OBCITER_CITER;
cdat->dstr_422__OBCITER_CITER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_422__OBCITER_CITER.val,
@@ -12935,9 +13025,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_423__OBCITER_BEFORE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V576*/ meltfptr[575])
- /*_.VALDATA___V576*/
- meltfptr[575] = (void *) &cdat->dsym_423__OBCITER_BEFORE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V579*/ meltfptr[578])
+ /*_.VALDATA___V579*/
+ meltfptr[578] = (void *) &cdat->dsym_423__OBCITER_BEFORE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_423__OBCITER_BEFORE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12954,7 +13044,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_424__OBCITER_BEFORE*/
- /*_.VALSTR___V577*/ meltfptr[576] =
+ /*_.VALSTR___V580*/ meltfptr[579] =
(void *) &cdat->dstr_424__OBCITER_BEFORE;
cdat->dstr_424__OBCITER_BEFORE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12965,7 +13055,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_425__OBCITER_BEFORE*/
-/*_.VALDATA___V569*/ meltfptr[568] =
+/*_.VALDATA___V572*/ meltfptr[571] =
(void *) &cdat->dobj_425__OBCITER_BEFORE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_425__OBCITER_BEFORE",
@@ -12979,12 +13069,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_425__OBCITER_BEFORE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_425__OBCITER_BEFORE.obj_num = 4;
- cdat->dobj_425__OBCITER_BEFORE.obj_hash = 280067406;
+ cdat->dobj_425__OBCITER_BEFORE.obj_hash = 332167797;
cdat->dobj_425__OBCITER_BEFORE.obj_len = 4;
/*inistring dstr_426__OBCITER_BEFORE*/
- /*_.VALSTR___V570*/ meltfptr[569] =
+ /*_.VALSTR___V573*/ meltfptr[572] =
(void *) &cdat->dstr_426__OBCITER_BEFORE;
cdat->dstr_426__OBCITER_BEFORE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12994,9 +13084,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_427__OBCITER_AFTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V578*/ meltfptr[577])
- /*_.VALDATA___V578*/
- meltfptr[577] = (void *) &cdat->dsym_427__OBCITER_AFTER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V581*/ meltfptr[580])
+ /*_.VALDATA___V581*/
+ meltfptr[580] = (void *) &cdat->dsym_427__OBCITER_AFTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_427__OBCITER_AFTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13013,7 +13103,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_428__OBCITER_AFTER*/
- /*_.VALSTR___V579*/ meltfptr[578] = (void *) &cdat->dstr_428__OBCITER_AFTER;
+ /*_.VALSTR___V582*/ meltfptr[581] = (void *) &cdat->dstr_428__OBCITER_AFTER;
cdat->dstr_428__OBCITER_AFTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_428__OBCITER_AFTER.val,
@@ -13023,7 +13113,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_429__OBCITER_AFTER*/
-/*_.VALDATA___V571*/ meltfptr[570] =
+/*_.VALDATA___V574*/ meltfptr[573] =
(void *) &cdat->dobj_429__OBCITER_AFTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_429__OBCITER_AFTER",
@@ -13037,12 +13127,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_429__OBCITER_AFTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_429__OBCITER_AFTER.obj_num = 5;
- cdat->dobj_429__OBCITER_AFTER.obj_hash = 111691988;
+ cdat->dobj_429__OBCITER_AFTER.obj_hash = 303418964;
cdat->dobj_429__OBCITER_AFTER.obj_len = 4;
/*inistring dstr_430__OBCITER_AFTER*/
- /*_.VALSTR___V572*/ meltfptr[571] = (void *) &cdat->dstr_430__OBCITER_AFTER;
+ /*_.VALSTR___V575*/ meltfptr[574] = (void *) &cdat->dstr_430__OBCITER_AFTER;
cdat->dstr_430__OBCITER_AFTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_430__OBCITER_AFTER.val,
@@ -13051,9 +13141,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_431__CLASS_OBJCOND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V580*/ meltfptr[579])
- /*_.VALDATA___V580*/
- meltfptr[579] = (void *) &cdat->dsym_431__CLASS_OBJCOND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V583*/ meltfptr[582])
+ /*_.VALDATA___V583*/
+ meltfptr[582] = (void *) &cdat->dsym_431__CLASS_OBJCOND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_431__CLASS_OBJCOND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13070,7 +13160,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_432__CLASS_OBJCOND*/
- /*_.VALSTR___V581*/ meltfptr[580] = (void *) &cdat->dstr_432__CLASS_OBJCOND;
+ /*_.VALSTR___V584*/ meltfptr[583] = (void *) &cdat->dstr_432__CLASS_OBJCOND;
cdat->dstr_432__CLASS_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_432__CLASS_OBJCOND.val,
@@ -13080,7 +13170,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:313:/ iniobj");
/*iniobj dobj_433__CLASS_OBJCOND*/
-/*_.VALDATA___V582*/ meltfptr[581] =
+/*_.VALDATA___V585*/ meltfptr[584] =
(void *) &cdat->dobj_433__CLASS_OBJCOND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_433__CLASS_OBJCOND",
@@ -13094,12 +13184,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_433__CLASS_OBJCOND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_433__CLASS_OBJCOND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_433__CLASS_OBJCOND.obj_hash = 94629514;
+ cdat->dobj_433__CLASS_OBJCOND.obj_hash = 494034829;
cdat->dobj_433__CLASS_OBJCOND.obj_len = 8;
/*inistring dstr_434__CLASS_OBJCOND*/
- /*_.VALSTR___V583*/ meltfptr[582] = (void *) &cdat->dstr_434__CLASS_OBJCOND;
+ /*_.VALSTR___V586*/ meltfptr[585] = (void *) &cdat->dstr_434__CLASS_OBJCOND;
cdat->dstr_434__CLASS_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_434__CLASS_OBJCOND.val,
@@ -13107,20 +13197,20 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_434__CLASS_OBJCOND.val) -
1);
/*inimult dtup_435__CLASS_OBJCOND */
- /*_.VALTUP___V584*/ meltfptr[583] = (void *) &cdat->dtup_435__CLASS_OBJCOND;
+ /*_.VALTUP___V587*/ meltfptr[586] = (void *) &cdat->dtup_435__CLASS_OBJCOND;
cdat->dtup_435__CLASS_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_435__CLASS_OBJCOND.nbval = 3;
/*inimult dtup_436__CLASS_OBJCOND */
- /*_.VALTUP___V591*/ meltfptr[590] = (void *) &cdat->dtup_436__CLASS_OBJCOND;
+ /*_.VALTUP___V594*/ meltfptr[593] = (void *) &cdat->dtup_436__CLASS_OBJCOND;
cdat->dtup_436__CLASS_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_436__CLASS_OBJCOND.nbval = 4;
/*iniobj dsym_437__OBCOND_TEST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V592*/ meltfptr[591])
- /*_.VALDATA___V592*/
- meltfptr[591] = (void *) &cdat->dsym_437__OBCOND_TEST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V595*/ meltfptr[594])
+ /*_.VALDATA___V595*/
+ meltfptr[594] = (void *) &cdat->dsym_437__OBCOND_TEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_437__OBCOND_TEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13137,7 +13227,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_438__OBCOND_TEST*/
- /*_.VALSTR___V593*/ meltfptr[592] = (void *) &cdat->dstr_438__OBCOND_TEST;
+ /*_.VALSTR___V596*/ meltfptr[595] = (void *) &cdat->dstr_438__OBCOND_TEST;
cdat->dstr_438__OBCOND_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_438__OBCOND_TEST.val,
@@ -13146,7 +13236,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_439__OBCOND_TEST*/
-/*_.VALDATA___V585*/ meltfptr[584] = (void *) &cdat->dobj_439__OBCOND_TEST;
+/*_.VALDATA___V588*/ meltfptr[587] = (void *) &cdat->dobj_439__OBCOND_TEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_439__OBCOND_TEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13159,12 +13249,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_439__OBCOND_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_439__OBCOND_TEST.obj_num = 1;
- cdat->dobj_439__OBCOND_TEST.obj_hash = 1039327075;
+ cdat->dobj_439__OBCOND_TEST.obj_hash = 707991564;
cdat->dobj_439__OBCOND_TEST.obj_len = 4;
/*inistring dstr_440__OBCOND_TEST*/
- /*_.VALSTR___V586*/ meltfptr[585] = (void *) &cdat->dstr_440__OBCOND_TEST;
+ /*_.VALSTR___V589*/ meltfptr[588] = (void *) &cdat->dstr_440__OBCOND_TEST;
cdat->dstr_440__OBCOND_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_440__OBCOND_TEST.val,
@@ -13172,9 +13262,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_440__OBCOND_TEST.val) - 1);
/*iniobj dsym_441__OBCOND_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V594*/ meltfptr[593])
- /*_.VALDATA___V594*/
- meltfptr[593] = (void *) &cdat->dsym_441__OBCOND_THEN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V597*/ meltfptr[596])
+ /*_.VALDATA___V597*/
+ meltfptr[596] = (void *) &cdat->dsym_441__OBCOND_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_441__OBCOND_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13191,7 +13281,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_442__OBCOND_THEN*/
- /*_.VALSTR___V595*/ meltfptr[594] = (void *) &cdat->dstr_442__OBCOND_THEN;
+ /*_.VALSTR___V598*/ meltfptr[597] = (void *) &cdat->dstr_442__OBCOND_THEN;
cdat->dstr_442__OBCOND_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_442__OBCOND_THEN.val,
@@ -13200,7 +13290,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_443__OBCOND_THEN*/
-/*_.VALDATA___V587*/ meltfptr[586] = (void *) &cdat->dobj_443__OBCOND_THEN;
+/*_.VALDATA___V590*/ meltfptr[589] = (void *) &cdat->dobj_443__OBCOND_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_443__OBCOND_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13213,12 +13303,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_443__OBCOND_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_443__OBCOND_THEN.obj_num = 2;
- cdat->dobj_443__OBCOND_THEN.obj_hash = 23067180;
+ cdat->dobj_443__OBCOND_THEN.obj_hash = 947010446;
cdat->dobj_443__OBCOND_THEN.obj_len = 4;
/*inistring dstr_444__OBCOND_THEN*/
- /*_.VALSTR___V588*/ meltfptr[587] = (void *) &cdat->dstr_444__OBCOND_THEN;
+ /*_.VALSTR___V591*/ meltfptr[590] = (void *) &cdat->dstr_444__OBCOND_THEN;
cdat->dstr_444__OBCOND_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_444__OBCOND_THEN.val,
@@ -13226,9 +13316,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_444__OBCOND_THEN.val) - 1);
/*iniobj dsym_445__OBCOND_ELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V596*/ meltfptr[595])
- /*_.VALDATA___V596*/
- meltfptr[595] = (void *) &cdat->dsym_445__OBCOND_ELSE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V599*/ meltfptr[598])
+ /*_.VALDATA___V599*/
+ meltfptr[598] = (void *) &cdat->dsym_445__OBCOND_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_445__OBCOND_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13245,7 +13335,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_446__OBCOND_ELSE*/
- /*_.VALSTR___V597*/ meltfptr[596] = (void *) &cdat->dstr_446__OBCOND_ELSE;
+ /*_.VALSTR___V600*/ meltfptr[599] = (void *) &cdat->dstr_446__OBCOND_ELSE;
cdat->dstr_446__OBCOND_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_446__OBCOND_ELSE.val,
@@ -13254,7 +13344,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_447__OBCOND_ELSE*/
-/*_.VALDATA___V589*/ meltfptr[588] = (void *) &cdat->dobj_447__OBCOND_ELSE;
+/*_.VALDATA___V592*/ meltfptr[591] = (void *) &cdat->dobj_447__OBCOND_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_447__OBCOND_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13267,12 +13357,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_447__OBCOND_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_447__OBCOND_ELSE.obj_num = 3;
- cdat->dobj_447__OBCOND_ELSE.obj_hash = 109394143;
+ cdat->dobj_447__OBCOND_ELSE.obj_hash = 404493362;
cdat->dobj_447__OBCOND_ELSE.obj_len = 4;
/*inistring dstr_448__OBCOND_ELSE*/
- /*_.VALSTR___V590*/ meltfptr[589] = (void *) &cdat->dstr_448__OBCOND_ELSE;
+ /*_.VALSTR___V593*/ meltfptr[592] = (void *) &cdat->dstr_448__OBCOND_ELSE;
cdat->dstr_448__OBCOND_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_448__OBCOND_ELSE.val,
@@ -13280,9 +13370,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_448__OBCOND_ELSE.val) - 1);
/*iniobj dsym_449__CLASS_OBJCPPIF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V598*/ meltfptr[597])
- /*_.VALDATA___V598*/
- meltfptr[597] = (void *) &cdat->dsym_449__CLASS_OBJCPPIF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V601*/ meltfptr[600])
+ /*_.VALDATA___V601*/
+ meltfptr[600] = (void *) &cdat->dsym_449__CLASS_OBJCPPIF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_449__CLASS_OBJCPPIF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13299,7 +13389,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_450__CLASS_OBJCPPIF*/
- /*_.VALSTR___V599*/ meltfptr[598] =
+ /*_.VALSTR___V602*/ meltfptr[601] =
(void *) &cdat->dstr_450__CLASS_OBJCPPIF;
cdat->dstr_450__CLASS_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13310,7 +13400,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:321:/ iniobj");
/*iniobj dobj_451__CLASS_OBJCPPIF*/
-/*_.VALDATA___V600*/ meltfptr[599] =
+/*_.VALDATA___V603*/ meltfptr[602] =
(void *) &cdat->dobj_451__CLASS_OBJCPPIF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_451__CLASS_OBJCPPIF",
@@ -13324,12 +13414,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_451__CLASS_OBJCPPIF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_451__CLASS_OBJCPPIF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_451__CLASS_OBJCPPIF.obj_hash = 768143230;
+ cdat->dobj_451__CLASS_OBJCPPIF.obj_hash = 794452488;
cdat->dobj_451__CLASS_OBJCPPIF.obj_len = 8;
/*inistring dstr_452__CLASS_OBJCPPIF*/
- /*_.VALSTR___V601*/ meltfptr[600] =
+ /*_.VALSTR___V604*/ meltfptr[603] =
(void *) &cdat->dstr_452__CLASS_OBJCPPIF;
cdat->dstr_452__CLASS_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13338,22 +13428,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_452__CLASS_OBJCPPIF.val) -
1);
/*inimult dtup_453__CLASS_OBJCPPIF */
- /*_.VALTUP___V602*/ meltfptr[601] =
+ /*_.VALTUP___V605*/ meltfptr[604] =
(void *) &cdat->dtup_453__CLASS_OBJCPPIF;
cdat->dtup_453__CLASS_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_453__CLASS_OBJCPPIF.nbval = 3;
/*inimult dtup_454__CLASS_OBJCPPIF */
- /*_.VALTUP___V609*/ meltfptr[608] =
+ /*_.VALTUP___V612*/ meltfptr[611] =
(void *) &cdat->dtup_454__CLASS_OBJCPPIF;
cdat->dtup_454__CLASS_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_454__CLASS_OBJCPPIF.nbval = 4;
/*iniobj dsym_455__OBIFP_COND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V610*/ meltfptr[609])
- /*_.VALDATA___V610*/
- meltfptr[609] = (void *) &cdat->dsym_455__OBIFP_COND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V613*/ meltfptr[612])
+ /*_.VALDATA___V613*/
+ meltfptr[612] = (void *) &cdat->dsym_455__OBIFP_COND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_455__OBIFP_COND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13370,7 +13460,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_456__OBIFP_COND*/
- /*_.VALSTR___V611*/ meltfptr[610] = (void *) &cdat->dstr_456__OBIFP_COND;
+ /*_.VALSTR___V614*/ meltfptr[613] = (void *) &cdat->dstr_456__OBIFP_COND;
cdat->dstr_456__OBIFP_COND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_456__OBIFP_COND.val, "OBIFP_COND",
@@ -13378,7 +13468,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_457__OBIFP_COND*/
-/*_.VALDATA___V603*/ meltfptr[602] = (void *) &cdat->dobj_457__OBIFP_COND;
+/*_.VALDATA___V606*/ meltfptr[605] = (void *) &cdat->dobj_457__OBIFP_COND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_457__OBIFP_COND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13391,21 +13481,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_457__OBIFP_COND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_457__OBIFP_COND.obj_num = 1;
- cdat->dobj_457__OBIFP_COND.obj_hash = 358095141;
+ cdat->dobj_457__OBIFP_COND.obj_hash = 482980938;
cdat->dobj_457__OBIFP_COND.obj_len = 4;
/*inistring dstr_458__OBIFP_COND*/
- /*_.VALSTR___V604*/ meltfptr[603] = (void *) &cdat->dstr_458__OBIFP_COND;
+ /*_.VALSTR___V607*/ meltfptr[606] = (void *) &cdat->dstr_458__OBIFP_COND;
cdat->dstr_458__OBIFP_COND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_458__OBIFP_COND.val, "OBIFP_COND",
sizeof (cdat->dstr_458__OBIFP_COND.val) - 1);
/*iniobj dsym_459__OBIFP_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V612*/ meltfptr[611])
- /*_.VALDATA___V612*/
- meltfptr[611] = (void *) &cdat->dsym_459__OBIFP_THEN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V615*/ meltfptr[614])
+ /*_.VALDATA___V615*/
+ meltfptr[614] = (void *) &cdat->dsym_459__OBIFP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_459__OBIFP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13422,7 +13512,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_460__OBIFP_THEN*/
- /*_.VALSTR___V613*/ meltfptr[612] = (void *) &cdat->dstr_460__OBIFP_THEN;
+ /*_.VALSTR___V616*/ meltfptr[615] = (void *) &cdat->dstr_460__OBIFP_THEN;
cdat->dstr_460__OBIFP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_460__OBIFP_THEN.val, "OBIFP_THEN",
@@ -13430,7 +13520,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_461__OBIFP_THEN*/
-/*_.VALDATA___V605*/ meltfptr[604] = (void *) &cdat->dobj_461__OBIFP_THEN;
+/*_.VALDATA___V608*/ meltfptr[607] = (void *) &cdat->dobj_461__OBIFP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_461__OBIFP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13443,21 +13533,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_461__OBIFP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_461__OBIFP_THEN.obj_num = 2;
- cdat->dobj_461__OBIFP_THEN.obj_hash = 67924247;
+ cdat->dobj_461__OBIFP_THEN.obj_hash = 218671349;
cdat->dobj_461__OBIFP_THEN.obj_len = 4;
/*inistring dstr_462__OBIFP_THEN*/
- /*_.VALSTR___V606*/ meltfptr[605] = (void *) &cdat->dstr_462__OBIFP_THEN;
+ /*_.VALSTR___V609*/ meltfptr[608] = (void *) &cdat->dstr_462__OBIFP_THEN;
cdat->dstr_462__OBIFP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_462__OBIFP_THEN.val, "OBIFP_THEN",
sizeof (cdat->dstr_462__OBIFP_THEN.val) - 1);
/*iniobj dsym_463__OBIFP_ELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V614*/ meltfptr[613])
- /*_.VALDATA___V614*/
- meltfptr[613] = (void *) &cdat->dsym_463__OBIFP_ELSE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V617*/ meltfptr[616])
+ /*_.VALDATA___V617*/
+ meltfptr[616] = (void *) &cdat->dsym_463__OBIFP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_463__OBIFP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13474,7 +13564,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_464__OBIFP_ELSE*/
- /*_.VALSTR___V615*/ meltfptr[614] = (void *) &cdat->dstr_464__OBIFP_ELSE;
+ /*_.VALSTR___V618*/ meltfptr[617] = (void *) &cdat->dstr_464__OBIFP_ELSE;
cdat->dstr_464__OBIFP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_464__OBIFP_ELSE.val, "OBIFP_ELSE",
@@ -13482,7 +13572,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_465__OBIFP_ELSE*/
-/*_.VALDATA___V607*/ meltfptr[606] = (void *) &cdat->dobj_465__OBIFP_ELSE;
+/*_.VALDATA___V610*/ meltfptr[609] = (void *) &cdat->dobj_465__OBIFP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_465__OBIFP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -13495,21 +13585,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_465__OBIFP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_465__OBIFP_ELSE.obj_num = 3;
- cdat->dobj_465__OBIFP_ELSE.obj_hash = 459641097;
+ cdat->dobj_465__OBIFP_ELSE.obj_hash = 668034934;
cdat->dobj_465__OBIFP_ELSE.obj_len = 4;
/*inistring dstr_466__OBIFP_ELSE*/
- /*_.VALSTR___V608*/ meltfptr[607] = (void *) &cdat->dstr_466__OBIFP_ELSE;
+ /*_.VALSTR___V611*/ meltfptr[610] = (void *) &cdat->dstr_466__OBIFP_ELSE;
cdat->dstr_466__OBIFP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_466__OBIFP_ELSE.val, "OBIFP_ELSE",
sizeof (cdat->dstr_466__OBIFP_ELSE.val) - 1);
/*iniobj dsym_467__CLASS_OBJINTERNCOMMON*/
- /*uniqueobj*/ if (! /*_.VALDATA___V616*/ meltfptr[615])
- /*_.VALDATA___V616*/
- meltfptr[615] = (void *) &cdat->dsym_467__CLASS_OBJINTERNCOMMON;
+ /*uniqueobj*/ if (! /*_.VALDATA___V619*/ meltfptr[618])
+ /*_.VALDATA___V619*/
+ meltfptr[618] = (void *) &cdat->dsym_467__CLASS_OBJINTERNCOMMON;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_467__CLASS_OBJINTERNCOMMON",
@@ -13527,7 +13617,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_468__CLASS_OBJINTERNC*/
- /*_.VALSTR___V617*/ meltfptr[616] =
+ /*_.VALSTR___V620*/ meltfptr[619] =
(void *) &cdat->dstr_468__CLASS_OBJINTERNC;
cdat->dstr_468__CLASS_OBJINTERNC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13538,7 +13628,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:330:/ iniobj");
/*iniobj dobj_469__CLASS_OBJINTERNCOMMON*/
-/*_.VALDATA___V618*/ meltfptr[617] =
+/*_.VALDATA___V621*/ meltfptr[620] =
(void *) &cdat->dobj_469__CLASS_OBJINTERNCOMMON;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -13553,12 +13643,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_469__CLASS_OBJINTERNCOMMON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_469__CLASS_OBJINTERNCOMMON.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_469__CLASS_OBJINTERNCOMMON.obj_hash = 583940183;
+ cdat->dobj_469__CLASS_OBJINTERNCOMMON.obj_hash = 50501172;
cdat->dobj_469__CLASS_OBJINTERNCOMMON.obj_len = 8;
/*inistring dstr_470__CLASS_OBJINTERNC*/
- /*_.VALSTR___V619*/ meltfptr[618] =
+ /*_.VALSTR___V622*/ meltfptr[621] =
(void *) &cdat->dstr_470__CLASS_OBJINTERNC;
cdat->dstr_470__CLASS_OBJINTERNC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13567,22 +13657,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_470__CLASS_OBJINTERNC.
val) - 1);
/*inimult dtup_471__CLASS_OBJINTERNCOMMON */
- /*_.VALTUP___V620*/ meltfptr[619] =
+ /*_.VALTUP___V623*/ meltfptr[622] =
(void *) &cdat->dtup_471__CLASS_OBJINTERNCOMMON;
cdat->dtup_471__CLASS_OBJINTERNCOMMON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_471__CLASS_OBJINTERNCOMMON.nbval = 3;
/*inimult dtup_472__CLASS_OBJINTERNCOMMON */
- /*_.VALTUP___V623*/ meltfptr[622] =
+ /*_.VALTUP___V626*/ meltfptr[625] =
(void *) &cdat->dtup_472__CLASS_OBJINTERNCOMMON;
cdat->dtup_472__CLASS_OBJINTERNCOMMON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_472__CLASS_OBJINTERNCOMMON.nbval = 2;
/*iniobj dsym_473__OBINTERN_IOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V624*/ meltfptr[623])
- /*_.VALDATA___V624*/
- meltfptr[623] = (void *) &cdat->dsym_473__OBINTERN_IOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V627*/ meltfptr[626])
+ /*_.VALDATA___V627*/
+ meltfptr[626] = (void *) &cdat->dsym_473__OBINTERN_IOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_473__OBINTERN_IOBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13599,7 +13689,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_474__OBINTERN_IOBJ*/
- /*_.VALSTR___V625*/ meltfptr[624] = (void *) &cdat->dstr_474__OBINTERN_IOBJ;
+ /*_.VALSTR___V628*/ meltfptr[627] = (void *) &cdat->dstr_474__OBINTERN_IOBJ;
cdat->dstr_474__OBINTERN_IOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_474__OBINTERN_IOBJ.val,
@@ -13609,7 +13699,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_475__OBINTERN_IOBJ*/
-/*_.VALDATA___V621*/ meltfptr[620] =
+/*_.VALDATA___V624*/ meltfptr[623] =
(void *) &cdat->dobj_475__OBINTERN_IOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_475__OBINTERN_IOBJ",
@@ -13623,12 +13713,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_475__OBINTERN_IOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_475__OBINTERN_IOBJ.obj_num = 1;
- cdat->dobj_475__OBINTERN_IOBJ.obj_hash = 204811291;
+ cdat->dobj_475__OBINTERN_IOBJ.obj_hash = 559059754;
cdat->dobj_475__OBINTERN_IOBJ.obj_len = 4;
/*inistring dstr_476__OBINTERN_IOBJ*/
- /*_.VALSTR___V622*/ meltfptr[621] = (void *) &cdat->dstr_476__OBINTERN_IOBJ;
+ /*_.VALSTR___V625*/ meltfptr[624] = (void *) &cdat->dstr_476__OBINTERN_IOBJ;
cdat->dstr_476__OBINTERN_IOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_476__OBINTERN_IOBJ.val,
@@ -13637,9 +13727,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_477__CLASS_OBJINTERNSYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V626*/ meltfptr[625])
- /*_.VALDATA___V626*/
- meltfptr[625] = (void *) &cdat->dsym_477__CLASS_OBJINTERNSYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V629*/ meltfptr[628])
+ /*_.VALDATA___V629*/
+ meltfptr[628] = (void *) &cdat->dsym_477__CLASS_OBJINTERNSYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_477__CLASS_OBJINTERNSYMBOL",
@@ -13657,7 +13747,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_478__CLASS_OBJINTERNS*/
- /*_.VALSTR___V627*/ meltfptr[626] =
+ /*_.VALSTR___V630*/ meltfptr[629] =
(void *) &cdat->dstr_478__CLASS_OBJINTERNS;
cdat->dstr_478__CLASS_OBJINTERNS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13668,7 +13758,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:336:/ iniobj");
/*iniobj dobj_479__CLASS_OBJINTERNSYMBOL*/
-/*_.VALDATA___V628*/ meltfptr[627] =
+/*_.VALDATA___V631*/ meltfptr[630] =
(void *) &cdat->dobj_479__CLASS_OBJINTERNSYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -13683,12 +13773,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_479__CLASS_OBJINTERNSYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_479__CLASS_OBJINTERNSYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_479__CLASS_OBJINTERNSYMBOL.obj_hash = 610636133;
+ cdat->dobj_479__CLASS_OBJINTERNSYMBOL.obj_hash = 913214638;
cdat->dobj_479__CLASS_OBJINTERNSYMBOL.obj_len = 8;
/*inistring dstr_480__CLASS_OBJINTERNS*/
- /*_.VALSTR___V629*/ meltfptr[628] =
+ /*_.VALSTR___V632*/ meltfptr[631] =
(void *) &cdat->dstr_480__CLASS_OBJINTERNS;
cdat->dstr_480__CLASS_OBJINTERNS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13697,22 +13787,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_480__CLASS_OBJINTERNS.
val) - 1);
/*inimult dtup_481__CLASS_OBJINTERNSYMBOL */
- /*_.VALTUP___V630*/ meltfptr[629] =
+ /*_.VALTUP___V633*/ meltfptr[632] =
(void *) &cdat->dtup_481__CLASS_OBJINTERNSYMBOL;
cdat->dtup_481__CLASS_OBJINTERNSYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_481__CLASS_OBJINTERNSYMBOL.nbval = 4;
/*inimult dtup_482__CLASS_OBJINTERNSYMBOL */
- /*_.VALTUP___V631*/ meltfptr[630] =
+ /*_.VALTUP___V634*/ meltfptr[633] =
(void *) &cdat->dtup_482__CLASS_OBJINTERNSYMBOL;
cdat->dtup_482__CLASS_OBJINTERNSYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_482__CLASS_OBJINTERNSYMBOL.nbval = 2;
/*iniobj dsym_483__CLASS_OBJINTERNKEYWORD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V632*/ meltfptr[631])
- /*_.VALDATA___V632*/
- meltfptr[631] = (void *) &cdat->dsym_483__CLASS_OBJINTERNKEYWORD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V635*/ meltfptr[634])
+ /*_.VALDATA___V635*/
+ meltfptr[634] = (void *) &cdat->dsym_483__CLASS_OBJINTERNKEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_483__CLASS_OBJINTERNKEYWORD",
@@ -13730,7 +13820,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_484__CLASS_OBJINTERNK*/
- /*_.VALSTR___V633*/ meltfptr[632] =
+ /*_.VALSTR___V636*/ meltfptr[635] =
(void *) &cdat->dstr_484__CLASS_OBJINTERNK;
cdat->dstr_484__CLASS_OBJINTERNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13741,7 +13831,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:341:/ iniobj");
/*iniobj dobj_485__CLASS_OBJINTERNKEYWORD*/
-/*_.VALDATA___V634*/ meltfptr[633] =
+/*_.VALDATA___V637*/ meltfptr[636] =
(void *) &cdat->dobj_485__CLASS_OBJINTERNKEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -13756,12 +13846,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_485__CLASS_OBJINTERNKEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_485__CLASS_OBJINTERNKEYWORD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_485__CLASS_OBJINTERNKEYWORD.obj_hash = 1072033908;
+ cdat->dobj_485__CLASS_OBJINTERNKEYWORD.obj_hash = 839265137;
cdat->dobj_485__CLASS_OBJINTERNKEYWORD.obj_len = 8;
/*inistring dstr_486__CLASS_OBJINTERNK*/
- /*_.VALSTR___V635*/ meltfptr[634] =
+ /*_.VALSTR___V638*/ meltfptr[637] =
(void *) &cdat->dstr_486__CLASS_OBJINTERNK;
cdat->dstr_486__CLASS_OBJINTERNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13770,22 +13860,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_486__CLASS_OBJINTERNK.
val) - 1);
/*inimult dtup_487__CLASS_OBJINTERNKEYWORD */
- /*_.VALTUP___V636*/ meltfptr[635] =
+ /*_.VALTUP___V639*/ meltfptr[638] =
(void *) &cdat->dtup_487__CLASS_OBJINTERNKEYWORD;
cdat->dtup_487__CLASS_OBJINTERNKEYWORD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_487__CLASS_OBJINTERNKEYWORD.nbval = 4;
/*inimult dtup_488__CLASS_OBJINTERNKEYWORD */
- /*_.VALTUP___V637*/ meltfptr[636] =
+ /*_.VALTUP___V640*/ meltfptr[639] =
(void *) &cdat->dtup_488__CLASS_OBJINTERNKEYWORD;
cdat->dtup_488__CLASS_OBJINTERNKEYWORD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_488__CLASS_OBJINTERNKEYWORD.nbval = 2;
/*iniobj dsym_489__CLASS_OBJGETNAMEDCOMMON*/
- /*uniqueobj*/ if (! /*_.VALDATA___V638*/ meltfptr[637])
- /*_.VALDATA___V638*/
- meltfptr[637] = (void *) &cdat->dsym_489__CLASS_OBJGETNAMEDCOMMON;
+ /*uniqueobj*/ if (! /*_.VALDATA___V641*/ meltfptr[640])
+ /*_.VALDATA___V641*/
+ meltfptr[640] = (void *) &cdat->dsym_489__CLASS_OBJGETNAMEDCOMMON;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_489__CLASS_OBJGETNAMEDCOMMON",
@@ -13803,7 +13893,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_490__CLASS_OBJGETNAME*/
- /*_.VALSTR___V639*/ meltfptr[638] =
+ /*_.VALSTR___V642*/ meltfptr[641] =
(void *) &cdat->dstr_490__CLASS_OBJGETNAME;
cdat->dstr_490__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13814,7 +13904,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:347:/ iniobj");
/*iniobj dobj_491__CLASS_OBJGETNAMEDCOMMON*/
-/*_.VALDATA___V640*/ meltfptr[639] =
+/*_.VALDATA___V643*/ meltfptr[642] =
(void *) &cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -13829,12 +13919,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON.obj_hash = 141828576;
+ cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON.obj_hash = 18483643;
cdat->dobj_491__CLASS_OBJGETNAMEDCOMMON.obj_len = 8;
/*inistring dstr_492__CLASS_OBJGETNAME*/
- /*_.VALSTR___V641*/ meltfptr[640] =
+ /*_.VALSTR___V644*/ meltfptr[643] =
(void *) &cdat->dstr_492__CLASS_OBJGETNAME;
cdat->dstr_492__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13843,22 +13933,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_492__CLASS_OBJGETNAME.
val) - 1);
/*inimult dtup_493__CLASS_OBJGETNAMEDCOMMON */
- /*_.VALTUP___V642*/ meltfptr[641] =
+ /*_.VALTUP___V645*/ meltfptr[644] =
(void *) &cdat->dtup_493__CLASS_OBJGETNAMEDCOMMON;
cdat->dtup_493__CLASS_OBJGETNAMEDCOMMON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_493__CLASS_OBJGETNAMEDCOMMON.nbval = 3;
/*inimult dtup_494__CLASS_OBJGETNAMEDCOMMON */
- /*_.VALTUP___V645*/ meltfptr[644] =
+ /*_.VALTUP___V648*/ meltfptr[647] =
(void *) &cdat->dtup_494__CLASS_OBJGETNAMEDCOMMON;
cdat->dtup_494__CLASS_OBJGETNAMEDCOMMON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_494__CLASS_OBJGETNAMEDCOMMON.nbval = 2;
/*iniobj dsym_495__OBGNAMED_IOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V646*/ meltfptr[645])
- /*_.VALDATA___V646*/
- meltfptr[645] = (void *) &cdat->dsym_495__OBGNAMED_IOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V649*/ meltfptr[648])
+ /*_.VALDATA___V649*/
+ meltfptr[648] = (void *) &cdat->dsym_495__OBGNAMED_IOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_495__OBGNAMED_IOBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -13875,7 +13965,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_496__OBGNAMED_IOBJ*/
- /*_.VALSTR___V647*/ meltfptr[646] = (void *) &cdat->dstr_496__OBGNAMED_IOBJ;
+ /*_.VALSTR___V650*/ meltfptr[649] = (void *) &cdat->dstr_496__OBGNAMED_IOBJ;
cdat->dstr_496__OBGNAMED_IOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_496__OBGNAMED_IOBJ.val,
@@ -13885,7 +13975,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_497__OBGNAMED_IOBJ*/
-/*_.VALDATA___V643*/ meltfptr[642] =
+/*_.VALDATA___V646*/ meltfptr[645] =
(void *) &cdat->dobj_497__OBGNAMED_IOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_497__OBGNAMED_IOBJ",
@@ -13899,12 +13989,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_497__OBGNAMED_IOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_497__OBGNAMED_IOBJ.obj_num = 1;
- cdat->dobj_497__OBGNAMED_IOBJ.obj_hash = 915136132;
+ cdat->dobj_497__OBGNAMED_IOBJ.obj_hash = 418872250;
cdat->dobj_497__OBGNAMED_IOBJ.obj_len = 4;
/*inistring dstr_498__OBGNAMED_IOBJ*/
- /*_.VALSTR___V644*/ meltfptr[643] = (void *) &cdat->dstr_498__OBGNAMED_IOBJ;
+ /*_.VALSTR___V647*/ meltfptr[646] = (void *) &cdat->dstr_498__OBGNAMED_IOBJ;
cdat->dstr_498__OBGNAMED_IOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_498__OBGNAMED_IOBJ.val,
@@ -13913,9 +14003,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_499__CLASS_OBJGETNAMEDSYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V648*/ meltfptr[647])
- /*_.VALDATA___V648*/
- meltfptr[647] = (void *) &cdat->dsym_499__CLASS_OBJGETNAMEDSYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V651*/ meltfptr[650])
+ /*_.VALDATA___V651*/
+ meltfptr[650] = (void *) &cdat->dsym_499__CLASS_OBJGETNAMEDSYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_499__CLASS_OBJGETNAMEDSYMBOL",
@@ -13933,7 +14023,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_500__CLASS_OBJGETNAME*/
- /*_.VALSTR___V649*/ meltfptr[648] =
+ /*_.VALSTR___V652*/ meltfptr[651] =
(void *) &cdat->dstr_500__CLASS_OBJGETNAME;
cdat->dstr_500__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13944,7 +14034,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:353:/ iniobj");
/*iniobj dobj_501__CLASS_OBJGETNAMEDSYMBOL*/
-/*_.VALDATA___V650*/ meltfptr[649] =
+/*_.VALDATA___V653*/ meltfptr[652] =
(void *) &cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -13959,12 +14049,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 623601358;
+ cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 766829720;
cdat->dobj_501__CLASS_OBJGETNAMEDSYMBOL.obj_len = 8;
/*inistring dstr_502__CLASS_OBJGETNAME*/
- /*_.VALSTR___V651*/ meltfptr[650] =
+ /*_.VALSTR___V654*/ meltfptr[653] =
(void *) &cdat->dstr_502__CLASS_OBJGETNAME;
cdat->dstr_502__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -13973,22 +14063,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_502__CLASS_OBJGETNAME.
val) - 1);
/*inimult dtup_503__CLASS_OBJGETNAMEDSYMBOL */
- /*_.VALTUP___V652*/ meltfptr[651] =
+ /*_.VALTUP___V655*/ meltfptr[654] =
(void *) &cdat->dtup_503__CLASS_OBJGETNAMEDSYMBOL;
cdat->dtup_503__CLASS_OBJGETNAMEDSYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_503__CLASS_OBJGETNAMEDSYMBOL.nbval = 4;
/*inimult dtup_504__CLASS_OBJGETNAMEDSYMBOL */
- /*_.VALTUP___V653*/ meltfptr[652] =
+ /*_.VALTUP___V656*/ meltfptr[655] =
(void *) &cdat->dtup_504__CLASS_OBJGETNAMEDSYMBOL;
cdat->dtup_504__CLASS_OBJGETNAMEDSYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_504__CLASS_OBJGETNAMEDSYMBOL.nbval = 2;
/*iniobj dsym_505__CLASS_OBJGETNAMEDKEYWORD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V654*/ meltfptr[653])
- /*_.VALDATA___V654*/
- meltfptr[653] = (void *) &cdat->dsym_505__CLASS_OBJGETNAMEDKEYWORD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V657*/ meltfptr[656])
+ /*_.VALDATA___V657*/
+ meltfptr[656] = (void *) &cdat->dsym_505__CLASS_OBJGETNAMEDKEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_505__CLASS_OBJGETNAMEDKEYWORD",
@@ -14006,7 +14096,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_506__CLASS_OBJGETNAME*/
- /*_.VALSTR___V655*/ meltfptr[654] =
+ /*_.VALSTR___V658*/ meltfptr[657] =
(void *) &cdat->dstr_506__CLASS_OBJGETNAME;
cdat->dstr_506__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14017,7 +14107,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:358:/ iniobj");
/*iniobj dobj_507__CLASS_OBJGETNAMEDKEYWORD*/
-/*_.VALDATA___V656*/ meltfptr[655] =
+/*_.VALDATA___V659*/ meltfptr[658] =
(void *) &cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -14032,12 +14122,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 461106138;
+ cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 517944653;
cdat->dobj_507__CLASS_OBJGETNAMEDKEYWORD.obj_len = 8;
/*inistring dstr_508__CLASS_OBJGETNAME*/
- /*_.VALSTR___V657*/ meltfptr[656] =
+ /*_.VALSTR___V660*/ meltfptr[659] =
(void *) &cdat->dstr_508__CLASS_OBJGETNAME;
cdat->dstr_508__CLASS_OBJGETNAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14046,22 +14136,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_508__CLASS_OBJGETNAME.
val) - 1);
/*inimult dtup_509__CLASS_OBJGETNAMEDKEYWORD */
- /*_.VALTUP___V658*/ meltfptr[657] =
+ /*_.VALTUP___V661*/ meltfptr[660] =
(void *) &cdat->dtup_509__CLASS_OBJGETNAMEDKEYWORD;
cdat->dtup_509__CLASS_OBJGETNAMEDKEYWORD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_509__CLASS_OBJGETNAMEDKEYWORD.nbval = 4;
/*inimult dtup_510__CLASS_OBJGETNAMEDKEYWORD */
- /*_.VALTUP___V659*/ meltfptr[658] =
+ /*_.VALTUP___V662*/ meltfptr[661] =
(void *) &cdat->dtup_510__CLASS_OBJGETNAMEDKEYWORD;
cdat->dtup_510__CLASS_OBJGETNAMEDKEYWORD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_510__CLASS_OBJGETNAMEDKEYWORD.nbval = 2;
/*iniobj dsym_511__CLASS_OBJAPPLY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V660*/ meltfptr[659])
- /*_.VALDATA___V660*/
- meltfptr[659] = (void *) &cdat->dsym_511__CLASS_OBJAPPLY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V663*/ meltfptr[662])
+ /*_.VALDATA___V663*/
+ meltfptr[662] = (void *) &cdat->dsym_511__CLASS_OBJAPPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_511__CLASS_OBJAPPLY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14078,7 +14168,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_512__CLASS_OBJAPPLY*/
- /*_.VALSTR___V661*/ meltfptr[660] =
+ /*_.VALSTR___V664*/ meltfptr[663] =
(void *) &cdat->dstr_512__CLASS_OBJAPPLY;
cdat->dstr_512__CLASS_OBJAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14089,7 +14179,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:364:/ iniobj");
/*iniobj dobj_513__CLASS_OBJAPPLY*/
-/*_.VALDATA___V662*/ meltfptr[661] =
+/*_.VALDATA___V665*/ meltfptr[664] =
(void *) &cdat->dobj_513__CLASS_OBJAPPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_513__CLASS_OBJAPPLY",
@@ -14103,12 +14193,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_513__CLASS_OBJAPPLY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_513__CLASS_OBJAPPLY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_513__CLASS_OBJAPPLY.obj_hash = 996600648;
+ cdat->dobj_513__CLASS_OBJAPPLY.obj_hash = 228334847;
cdat->dobj_513__CLASS_OBJAPPLY.obj_len = 8;
/*inistring dstr_514__CLASS_OBJAPPLY*/
- /*_.VALSTR___V663*/ meltfptr[662] =
+ /*_.VALSTR___V666*/ meltfptr[665] =
(void *) &cdat->dstr_514__CLASS_OBJAPPLY;
cdat->dstr_514__CLASS_OBJAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14117,22 +14207,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_514__CLASS_OBJAPPLY.val) -
1);
/*inimult dtup_515__CLASS_OBJAPPLY */
- /*_.VALTUP___V664*/ meltfptr[663] =
+ /*_.VALTUP___V667*/ meltfptr[666] =
(void *) &cdat->dtup_515__CLASS_OBJAPPLY;
cdat->dtup_515__CLASS_OBJAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_515__CLASS_OBJAPPLY.nbval = 4;
/*inimult dtup_516__CLASS_OBJAPPLY */
- /*_.VALTUP___V669*/ meltfptr[668] =
+ /*_.VALTUP___V672*/ meltfptr[671] =
(void *) &cdat->dtup_516__CLASS_OBJAPPLY;
cdat->dtup_516__CLASS_OBJAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_516__CLASS_OBJAPPLY.nbval = 4;
/*iniobj dsym_517__OBAPP_CLOS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V670*/ meltfptr[669])
- /*_.VALDATA___V670*/
- meltfptr[669] = (void *) &cdat->dsym_517__OBAPP_CLOS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V673*/ meltfptr[672])
+ /*_.VALDATA___V673*/
+ meltfptr[672] = (void *) &cdat->dsym_517__OBAPP_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_517__OBAPP_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14149,7 +14239,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_518__OBAPP_CLOS*/
- /*_.VALSTR___V671*/ meltfptr[670] = (void *) &cdat->dstr_518__OBAPP_CLOS;
+ /*_.VALSTR___V674*/ meltfptr[673] = (void *) &cdat->dstr_518__OBAPP_CLOS;
cdat->dstr_518__OBAPP_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_518__OBAPP_CLOS.val, "OBAPP_CLOS",
@@ -14157,7 +14247,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_519__OBAPP_CLOS*/
-/*_.VALDATA___V665*/ meltfptr[664] = (void *) &cdat->dobj_519__OBAPP_CLOS;
+/*_.VALDATA___V668*/ meltfptr[667] = (void *) &cdat->dobj_519__OBAPP_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_519__OBAPP_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -14170,21 +14260,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_519__OBAPP_CLOS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_519__OBAPP_CLOS.obj_num = 2;
- cdat->dobj_519__OBAPP_CLOS.obj_hash = 746027443;
+ cdat->dobj_519__OBAPP_CLOS.obj_hash = 532297103;
cdat->dobj_519__OBAPP_CLOS.obj_len = 4;
/*inistring dstr_520__OBAPP_CLOS*/
- /*_.VALSTR___V666*/ meltfptr[665] = (void *) &cdat->dstr_520__OBAPP_CLOS;
+ /*_.VALSTR___V669*/ meltfptr[668] = (void *) &cdat->dstr_520__OBAPP_CLOS;
cdat->dstr_520__OBAPP_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_520__OBAPP_CLOS.val, "OBAPP_CLOS",
sizeof (cdat->dstr_520__OBAPP_CLOS.val) - 1);
/*iniobj dsym_521__OBAPP_ARGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V672*/ meltfptr[671])
- /*_.VALDATA___V672*/
- meltfptr[671] = (void *) &cdat->dsym_521__OBAPP_ARGS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V675*/ meltfptr[674])
+ /*_.VALDATA___V675*/
+ meltfptr[674] = (void *) &cdat->dsym_521__OBAPP_ARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_521__OBAPP_ARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14201,7 +14291,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_522__OBAPP_ARGS*/
- /*_.VALSTR___V673*/ meltfptr[672] = (void *) &cdat->dstr_522__OBAPP_ARGS;
+ /*_.VALSTR___V676*/ meltfptr[675] = (void *) &cdat->dstr_522__OBAPP_ARGS;
cdat->dstr_522__OBAPP_ARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_522__OBAPP_ARGS.val, "OBAPP_ARGS",
@@ -14209,7 +14299,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_523__OBAPP_ARGS*/
-/*_.VALDATA___V667*/ meltfptr[666] = (void *) &cdat->dobj_523__OBAPP_ARGS;
+/*_.VALDATA___V670*/ meltfptr[669] = (void *) &cdat->dobj_523__OBAPP_ARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_523__OBAPP_ARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -14222,21 +14312,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_523__OBAPP_ARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_523__OBAPP_ARGS.obj_num = 3;
- cdat->dobj_523__OBAPP_ARGS.obj_hash = 133369305;
+ cdat->dobj_523__OBAPP_ARGS.obj_hash = 595458464;
cdat->dobj_523__OBAPP_ARGS.obj_len = 4;
/*inistring dstr_524__OBAPP_ARGS*/
- /*_.VALSTR___V668*/ meltfptr[667] = (void *) &cdat->dstr_524__OBAPP_ARGS;
+ /*_.VALSTR___V671*/ meltfptr[670] = (void *) &cdat->dstr_524__OBAPP_ARGS;
cdat->dstr_524__OBAPP_ARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_524__OBAPP_ARGS.val, "OBAPP_ARGS",
sizeof (cdat->dstr_524__OBAPP_ARGS.val) - 1);
/*iniobj dsym_525__CLASS_OBJMULTIAPPLY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V674*/ meltfptr[673])
- /*_.VALDATA___V674*/
- meltfptr[673] = (void *) &cdat->dsym_525__CLASS_OBJMULTIAPPLY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V677*/ meltfptr[676])
+ /*_.VALDATA___V677*/
+ meltfptr[676] = (void *) &cdat->dsym_525__CLASS_OBJMULTIAPPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_525__CLASS_OBJMULTIAPPLY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14253,7 +14343,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_526__CLASS_OBJMULTIAP*/
- /*_.VALSTR___V675*/ meltfptr[674] =
+ /*_.VALSTR___V678*/ meltfptr[677] =
(void *) &cdat->dstr_526__CLASS_OBJMULTIAP;
cdat->dstr_526__CLASS_OBJMULTIAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14264,7 +14354,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:371:/ iniobj");
/*iniobj dobj_527__CLASS_OBJMULTIAPPLY*/
-/*_.VALDATA___V676*/ meltfptr[675] =
+/*_.VALDATA___V679*/ meltfptr[678] =
(void *) &cdat->dobj_527__CLASS_OBJMULTIAPPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_527__CLASS_OBJMULTIAPPLY",
@@ -14278,12 +14368,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_527__CLASS_OBJMULTIAPPLY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_527__CLASS_OBJMULTIAPPLY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_527__CLASS_OBJMULTIAPPLY.obj_hash = 191043628;
+ cdat->dobj_527__CLASS_OBJMULTIAPPLY.obj_hash = 429150863;
cdat->dobj_527__CLASS_OBJMULTIAPPLY.obj_len = 8;
/*inistring dstr_528__CLASS_OBJMULTIAP*/
- /*_.VALSTR___V677*/ meltfptr[676] =
+ /*_.VALSTR___V680*/ meltfptr[679] =
(void *) &cdat->dstr_528__CLASS_OBJMULTIAP;
cdat->dstr_528__CLASS_OBJMULTIAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14292,22 +14382,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_528__CLASS_OBJMULTIAP.
val) - 1);
/*inimult dtup_529__CLASS_OBJMULTIAPPLY */
- /*_.VALTUP___V678*/ meltfptr[677] =
+ /*_.VALTUP___V681*/ meltfptr[680] =
(void *) &cdat->dtup_529__CLASS_OBJMULTIAPPLY;
cdat->dtup_529__CLASS_OBJMULTIAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_529__CLASS_OBJMULTIAPPLY.nbval = 5;
/*inimult dtup_530__CLASS_OBJMULTIAPPLY */
- /*_.VALTUP___V681*/ meltfptr[680] =
+ /*_.VALTUP___V684*/ meltfptr[683] =
(void *) &cdat->dtup_530__CLASS_OBJMULTIAPPLY;
cdat->dtup_530__CLASS_OBJMULTIAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_530__CLASS_OBJMULTIAPPLY.nbval = 5;
/*iniobj dsym_531__OBMULTAPP_XRES*/
- /*uniqueobj*/ if (! /*_.VALDATA___V682*/ meltfptr[681])
- /*_.VALDATA___V682*/
- meltfptr[681] = (void *) &cdat->dsym_531__OBMULTAPP_XRES;
+ /*uniqueobj*/ if (! /*_.VALDATA___V685*/ meltfptr[684])
+ /*_.VALDATA___V685*/
+ meltfptr[684] = (void *) &cdat->dsym_531__OBMULTAPP_XRES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_531__OBMULTAPP_XRES",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14324,7 +14414,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_532__OBMULTAPP_XRES*/
- /*_.VALSTR___V683*/ meltfptr[682] =
+ /*_.VALSTR___V686*/ meltfptr[685] =
(void *) &cdat->dstr_532__OBMULTAPP_XRES;
cdat->dstr_532__OBMULTAPP_XRES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14335,7 +14425,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_533__OBMULTAPP_XRES*/
-/*_.VALDATA___V679*/ meltfptr[678] =
+/*_.VALDATA___V682*/ meltfptr[681] =
(void *) &cdat->dobj_533__OBMULTAPP_XRES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_533__OBMULTAPP_XRES",
@@ -14349,12 +14439,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_533__OBMULTAPP_XRES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_533__OBMULTAPP_XRES.obj_num = 4;
- cdat->dobj_533__OBMULTAPP_XRES.obj_hash = 551734836;
+ cdat->dobj_533__OBMULTAPP_XRES.obj_hash = 47570347;
cdat->dobj_533__OBMULTAPP_XRES.obj_len = 4;
/*inistring dstr_534__OBMULTAPP_XRES*/
- /*_.VALSTR___V680*/ meltfptr[679] =
+ /*_.VALSTR___V683*/ meltfptr[682] =
(void *) &cdat->dstr_534__OBMULTAPP_XRES;
cdat->dstr_534__OBMULTAPP_XRES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14364,9 +14454,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_535__CLASS_OBJMSEND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V684*/ meltfptr[683])
- /*_.VALDATA___V684*/
- meltfptr[683] = (void *) &cdat->dsym_535__CLASS_OBJMSEND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V687*/ meltfptr[686])
+ /*_.VALDATA___V687*/
+ meltfptr[686] = (void *) &cdat->dsym_535__CLASS_OBJMSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_535__CLASS_OBJMSEND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14383,7 +14473,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_536__CLASS_OBJMSEND*/
- /*_.VALSTR___V685*/ meltfptr[684] =
+ /*_.VALSTR___V688*/ meltfptr[687] =
(void *) &cdat->dstr_536__CLASS_OBJMSEND;
cdat->dstr_536__CLASS_OBJMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14394,7 +14484,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:377:/ iniobj");
/*iniobj dobj_537__CLASS_OBJMSEND*/
-/*_.VALDATA___V686*/ meltfptr[685] =
+/*_.VALDATA___V689*/ meltfptr[688] =
(void *) &cdat->dobj_537__CLASS_OBJMSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_537__CLASS_OBJMSEND",
@@ -14408,12 +14498,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_537__CLASS_OBJMSEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_537__CLASS_OBJMSEND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_537__CLASS_OBJMSEND.obj_hash = 314764040;
+ cdat->dobj_537__CLASS_OBJMSEND.obj_hash = 338771978;
cdat->dobj_537__CLASS_OBJMSEND.obj_len = 8;
/*inistring dstr_538__CLASS_OBJMSEND*/
- /*_.VALSTR___V687*/ meltfptr[686] =
+ /*_.VALSTR___V690*/ meltfptr[689] =
(void *) &cdat->dstr_538__CLASS_OBJMSEND;
cdat->dstr_538__CLASS_OBJMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14422,22 +14512,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_538__CLASS_OBJMSEND.val) -
1);
/*inimult dtup_539__CLASS_OBJMSEND */
- /*_.VALTUP___V688*/ meltfptr[687] =
+ /*_.VALTUP___V691*/ meltfptr[690] =
(void *) &cdat->dtup_539__CLASS_OBJMSEND;
cdat->dtup_539__CLASS_OBJMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_539__CLASS_OBJMSEND.nbval = 4;
/*inimult dtup_540__CLASS_OBJMSEND */
- /*_.VALTUP___V695*/ meltfptr[694] =
+ /*_.VALTUP___V698*/ meltfptr[697] =
(void *) &cdat->dtup_540__CLASS_OBJMSEND;
cdat->dtup_540__CLASS_OBJMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_540__CLASS_OBJMSEND.nbval = 5;
/*iniobj dsym_541__OBMSND_SEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V696*/ meltfptr[695])
- /*_.VALDATA___V696*/
- meltfptr[695] = (void *) &cdat->dsym_541__OBMSND_SEL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V699*/ meltfptr[698])
+ /*_.VALDATA___V699*/
+ meltfptr[698] = (void *) &cdat->dsym_541__OBMSND_SEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_541__OBMSND_SEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14454,7 +14544,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_542__OBMSND_SEL*/
- /*_.VALSTR___V697*/ meltfptr[696] = (void *) &cdat->dstr_542__OBMSND_SEL;
+ /*_.VALSTR___V700*/ meltfptr[699] = (void *) &cdat->dstr_542__OBMSND_SEL;
cdat->dstr_542__OBMSND_SEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_542__OBMSND_SEL.val, "OBMSND_SEL",
@@ -14462,7 +14552,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_543__OBMSND_SEL*/
-/*_.VALDATA___V689*/ meltfptr[688] = (void *) &cdat->dobj_543__OBMSND_SEL;
+/*_.VALDATA___V692*/ meltfptr[691] = (void *) &cdat->dobj_543__OBMSND_SEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_543__OBMSND_SEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -14475,21 +14565,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_543__OBMSND_SEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_543__OBMSND_SEL.obj_num = 2;
- cdat->dobj_543__OBMSND_SEL.obj_hash = 740924697;
+ cdat->dobj_543__OBMSND_SEL.obj_hash = 484804283;
cdat->dobj_543__OBMSND_SEL.obj_len = 4;
/*inistring dstr_544__OBMSND_SEL*/
- /*_.VALSTR___V690*/ meltfptr[689] = (void *) &cdat->dstr_544__OBMSND_SEL;
+ /*_.VALSTR___V693*/ meltfptr[692] = (void *) &cdat->dstr_544__OBMSND_SEL;
cdat->dstr_544__OBMSND_SEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_544__OBMSND_SEL.val, "OBMSND_SEL",
sizeof (cdat->dstr_544__OBMSND_SEL.val) - 1);
/*iniobj dsym_545__OBMSND_RECV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V698*/ meltfptr[697])
- /*_.VALDATA___V698*/
- meltfptr[697] = (void *) &cdat->dsym_545__OBMSND_RECV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V701*/ meltfptr[700])
+ /*_.VALDATA___V701*/
+ meltfptr[700] = (void *) &cdat->dsym_545__OBMSND_RECV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_545__OBMSND_RECV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14506,7 +14596,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_546__OBMSND_RECV*/
- /*_.VALSTR___V699*/ meltfptr[698] = (void *) &cdat->dstr_546__OBMSND_RECV;
+ /*_.VALSTR___V702*/ meltfptr[701] = (void *) &cdat->dstr_546__OBMSND_RECV;
cdat->dstr_546__OBMSND_RECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_546__OBMSND_RECV.val,
@@ -14515,7 +14605,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_547__OBMSND_RECV*/
-/*_.VALDATA___V691*/ meltfptr[690] = (void *) &cdat->dobj_547__OBMSND_RECV;
+/*_.VALDATA___V694*/ meltfptr[693] = (void *) &cdat->dobj_547__OBMSND_RECV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_547__OBMSND_RECV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -14528,12 +14618,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_547__OBMSND_RECV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_547__OBMSND_RECV.obj_num = 3;
- cdat->dobj_547__OBMSND_RECV.obj_hash = 889435029;
+ cdat->dobj_547__OBMSND_RECV.obj_hash = 987215677;
cdat->dobj_547__OBMSND_RECV.obj_len = 4;
/*inistring dstr_548__OBMSND_RECV*/
- /*_.VALSTR___V692*/ meltfptr[691] = (void *) &cdat->dstr_548__OBMSND_RECV;
+ /*_.VALSTR___V695*/ meltfptr[694] = (void *) &cdat->dstr_548__OBMSND_RECV;
cdat->dstr_548__OBMSND_RECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_548__OBMSND_RECV.val,
@@ -14541,9 +14631,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_548__OBMSND_RECV.val) - 1);
/*iniobj dsym_549__OBMSND_ARGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V700*/ meltfptr[699])
- /*_.VALDATA___V700*/
- meltfptr[699] = (void *) &cdat->dsym_549__OBMSND_ARGS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V703*/ meltfptr[702])
+ /*_.VALDATA___V703*/
+ meltfptr[702] = (void *) &cdat->dsym_549__OBMSND_ARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_549__OBMSND_ARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14560,7 +14650,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_550__OBMSND_ARGS*/
- /*_.VALSTR___V701*/ meltfptr[700] = (void *) &cdat->dstr_550__OBMSND_ARGS;
+ /*_.VALSTR___V704*/ meltfptr[703] = (void *) &cdat->dstr_550__OBMSND_ARGS;
cdat->dstr_550__OBMSND_ARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_550__OBMSND_ARGS.val,
@@ -14569,7 +14659,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_551__OBMSND_ARGS*/
-/*_.VALDATA___V693*/ meltfptr[692] = (void *) &cdat->dobj_551__OBMSND_ARGS;
+/*_.VALDATA___V696*/ meltfptr[695] = (void *) &cdat->dobj_551__OBMSND_ARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_551__OBMSND_ARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -14582,12 +14672,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_551__OBMSND_ARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_551__OBMSND_ARGS.obj_num = 4;
- cdat->dobj_551__OBMSND_ARGS.obj_hash = 717012482;
+ cdat->dobj_551__OBMSND_ARGS.obj_hash = 509089389;
cdat->dobj_551__OBMSND_ARGS.obj_len = 4;
/*inistring dstr_552__OBMSND_ARGS*/
- /*_.VALSTR___V694*/ meltfptr[693] = (void *) &cdat->dstr_552__OBMSND_ARGS;
+ /*_.VALSTR___V697*/ meltfptr[696] = (void *) &cdat->dstr_552__OBMSND_ARGS;
cdat->dstr_552__OBMSND_ARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_552__OBMSND_ARGS.val,
@@ -14595,9 +14685,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_552__OBMSND_ARGS.val) - 1);
/*iniobj dsym_553__CLASS_OBJMULTIMSEND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V702*/ meltfptr[701])
- /*_.VALDATA___V702*/
- meltfptr[701] = (void *) &cdat->dsym_553__CLASS_OBJMULTIMSEND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V705*/ meltfptr[704])
+ /*_.VALDATA___V705*/
+ meltfptr[704] = (void *) &cdat->dsym_553__CLASS_OBJMULTIMSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_553__CLASS_OBJMULTIMSEND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14614,7 +14704,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_554__CLASS_OBJMULTIMS*/
- /*_.VALSTR___V703*/ meltfptr[702] =
+ /*_.VALSTR___V706*/ meltfptr[705] =
(void *) &cdat->dstr_554__CLASS_OBJMULTIMS;
cdat->dstr_554__CLASS_OBJMULTIMS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14625,7 +14715,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:385:/ iniobj");
/*iniobj dobj_555__CLASS_OBJMULTIMSEND*/
-/*_.VALDATA___V704*/ meltfptr[703] =
+/*_.VALDATA___V707*/ meltfptr[706] =
(void *) &cdat->dobj_555__CLASS_OBJMULTIMSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_555__CLASS_OBJMULTIMSEND",
@@ -14639,12 +14729,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_555__CLASS_OBJMULTIMSEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_555__CLASS_OBJMULTIMSEND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_555__CLASS_OBJMULTIMSEND.obj_hash = 659168720;
+ cdat->dobj_555__CLASS_OBJMULTIMSEND.obj_hash = 578905167;
cdat->dobj_555__CLASS_OBJMULTIMSEND.obj_len = 8;
/*inistring dstr_556__CLASS_OBJMULTIMS*/
- /*_.VALSTR___V705*/ meltfptr[704] =
+ /*_.VALSTR___V708*/ meltfptr[707] =
(void *) &cdat->dstr_556__CLASS_OBJMULTIMS;
cdat->dstr_556__CLASS_OBJMULTIMS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14653,22 +14743,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_556__CLASS_OBJMULTIMS.
val) - 1);
/*inimult dtup_557__CLASS_OBJMULTIMSEND */
- /*_.VALTUP___V706*/ meltfptr[705] =
+ /*_.VALTUP___V709*/ meltfptr[708] =
(void *) &cdat->dtup_557__CLASS_OBJMULTIMSEND;
cdat->dtup_557__CLASS_OBJMULTIMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_557__CLASS_OBJMULTIMSEND.nbval = 5;
/*inimult dtup_558__CLASS_OBJMULTIMSEND */
- /*_.VALTUP___V709*/ meltfptr[708] =
+ /*_.VALTUP___V712*/ meltfptr[711] =
(void *) &cdat->dtup_558__CLASS_OBJMULTIMSEND;
cdat->dtup_558__CLASS_OBJMULTIMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_558__CLASS_OBJMULTIMSEND.nbval = 6;
/*iniobj dsym_559__OBMULTSND_XRES*/
- /*uniqueobj*/ if (! /*_.VALDATA___V710*/ meltfptr[709])
- /*_.VALDATA___V710*/
- meltfptr[709] = (void *) &cdat->dsym_559__OBMULTSND_XRES;
+ /*uniqueobj*/ if (! /*_.VALDATA___V713*/ meltfptr[712])
+ /*_.VALDATA___V713*/
+ meltfptr[712] = (void *) &cdat->dsym_559__OBMULTSND_XRES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_559__OBMULTSND_XRES",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14685,7 +14775,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_560__OBMULTSND_XRES*/
- /*_.VALSTR___V711*/ meltfptr[710] =
+ /*_.VALSTR___V714*/ meltfptr[713] =
(void *) &cdat->dstr_560__OBMULTSND_XRES;
cdat->dstr_560__OBMULTSND_XRES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14696,7 +14786,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_561__OBMULTSND_XRES*/
-/*_.VALDATA___V707*/ meltfptr[706] =
+/*_.VALDATA___V710*/ meltfptr[709] =
(void *) &cdat->dobj_561__OBMULTSND_XRES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_561__OBMULTSND_XRES",
@@ -14710,12 +14800,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_561__OBMULTSND_XRES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_561__OBMULTSND_XRES.obj_num = 5;
- cdat->dobj_561__OBMULTSND_XRES.obj_hash = 139635761;
+ cdat->dobj_561__OBMULTSND_XRES.obj_hash = 670562423;
cdat->dobj_561__OBMULTSND_XRES.obj_len = 4;
/*inistring dstr_562__OBMULTSND_XRES*/
- /*_.VALSTR___V708*/ meltfptr[707] =
+ /*_.VALSTR___V711*/ meltfptr[710] =
(void *) &cdat->dstr_562__OBMULTSND_XRES;
cdat->dstr_562__OBMULTSND_XRES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14725,9 +14815,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_563__CLASS_OBJRAWALLOCOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V712*/ meltfptr[711])
- /*_.VALDATA___V712*/
- meltfptr[711] = (void *) &cdat->dsym_563__CLASS_OBJRAWALLOCOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V715*/ meltfptr[714])
+ /*_.VALDATA___V715*/
+ meltfptr[714] = (void *) &cdat->dsym_563__CLASS_OBJRAWALLOCOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_563__CLASS_OBJRAWALLOCOBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14744,7 +14834,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_564__CLASS_OBJRAWALLO*/
- /*_.VALSTR___V713*/ meltfptr[712] =
+ /*_.VALSTR___V716*/ meltfptr[715] =
(void *) &cdat->dstr_564__CLASS_OBJRAWALLO;
cdat->dstr_564__CLASS_OBJRAWALLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14755,7 +14845,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:391:/ iniobj");
/*iniobj dobj_565__CLASS_OBJRAWALLOCOBJ*/
-/*_.VALDATA___V714*/ meltfptr[713] =
+/*_.VALDATA___V717*/ meltfptr[716] =
(void *) &cdat->dobj_565__CLASS_OBJRAWALLOCOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_565__CLASS_OBJRAWALLOCOBJ",
@@ -14769,12 +14859,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_565__CLASS_OBJRAWALLOCOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_565__CLASS_OBJRAWALLOCOBJ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_565__CLASS_OBJRAWALLOCOBJ.obj_hash = 461960296;
+ cdat->dobj_565__CLASS_OBJRAWALLOCOBJ.obj_hash = 302384328;
cdat->dobj_565__CLASS_OBJRAWALLOCOBJ.obj_len = 8;
/*inistring dstr_566__CLASS_OBJRAWALLO*/
- /*_.VALSTR___V715*/ meltfptr[714] =
+ /*_.VALSTR___V718*/ meltfptr[717] =
(void *) &cdat->dstr_566__CLASS_OBJRAWALLO;
cdat->dstr_566__CLASS_OBJRAWALLO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14783,22 +14873,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_566__CLASS_OBJRAWALLO.
val) - 1);
/*inimult dtup_567__CLASS_OBJRAWALLOCOBJ */
- /*_.VALTUP___V716*/ meltfptr[715] =
+ /*_.VALTUP___V719*/ meltfptr[718] =
(void *) &cdat->dtup_567__CLASS_OBJRAWALLOCOBJ;
cdat->dtup_567__CLASS_OBJRAWALLOCOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_567__CLASS_OBJRAWALLOCOBJ.nbval = 4;
/*inimult dtup_568__CLASS_OBJRAWALLOCOBJ */
- /*_.VALTUP___V723*/ meltfptr[722] =
+ /*_.VALTUP___V726*/ meltfptr[725] =
(void *) &cdat->dtup_568__CLASS_OBJRAWALLOCOBJ;
cdat->dtup_568__CLASS_OBJRAWALLOCOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_568__CLASS_OBJRAWALLOCOBJ.nbval = 5;
/*iniobj dsym_569__OBRALLOBJ_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V724*/ meltfptr[723])
- /*_.VALDATA___V724*/
- meltfptr[723] = (void *) &cdat->dsym_569__OBRALLOBJ_CLASS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V727*/ meltfptr[726])
+ /*_.VALDATA___V727*/
+ meltfptr[726] = (void *) &cdat->dsym_569__OBRALLOBJ_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_569__OBRALLOBJ_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14815,7 +14905,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_570__OBRALLOBJ_CLASS*/
- /*_.VALSTR___V725*/ meltfptr[724] =
+ /*_.VALSTR___V728*/ meltfptr[727] =
(void *) &cdat->dstr_570__OBRALLOBJ_CLASS;
cdat->dstr_570__OBRALLOBJ_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14826,7 +14916,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_571__OBRALLOBJ_CLASS*/
-/*_.VALDATA___V717*/ meltfptr[716] =
+/*_.VALDATA___V720*/ meltfptr[719] =
(void *) &cdat->dobj_571__OBRALLOBJ_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_571__OBRALLOBJ_CLASS",
@@ -14840,12 +14930,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_571__OBRALLOBJ_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_571__OBRALLOBJ_CLASS.obj_num = 2;
- cdat->dobj_571__OBRALLOBJ_CLASS.obj_hash = 331486222;
+ cdat->dobj_571__OBRALLOBJ_CLASS.obj_hash = 99179615;
cdat->dobj_571__OBRALLOBJ_CLASS.obj_len = 4;
/*inistring dstr_572__OBRALLOBJ_CLASS*/
- /*_.VALSTR___V718*/ meltfptr[717] =
+ /*_.VALSTR___V721*/ meltfptr[720] =
(void *) &cdat->dstr_572__OBRALLOBJ_CLASS;
cdat->dstr_572__OBRALLOBJ_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14855,9 +14945,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_573__OBRALLOBJ_LEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V726*/ meltfptr[725])
- /*_.VALDATA___V726*/
- meltfptr[725] = (void *) &cdat->dsym_573__OBRALLOBJ_LEN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V729*/ meltfptr[728])
+ /*_.VALDATA___V729*/
+ meltfptr[728] = (void *) &cdat->dsym_573__OBRALLOBJ_LEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_573__OBRALLOBJ_LEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14874,7 +14964,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_574__OBRALLOBJ_LEN*/
- /*_.VALSTR___V727*/ meltfptr[726] = (void *) &cdat->dstr_574__OBRALLOBJ_LEN;
+ /*_.VALSTR___V730*/ meltfptr[729] = (void *) &cdat->dstr_574__OBRALLOBJ_LEN;
cdat->dstr_574__OBRALLOBJ_LEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_574__OBRALLOBJ_LEN.val,
@@ -14884,7 +14974,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_575__OBRALLOBJ_LEN*/
-/*_.VALDATA___V719*/ meltfptr[718] =
+/*_.VALDATA___V722*/ meltfptr[721] =
(void *) &cdat->dobj_575__OBRALLOBJ_LEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_575__OBRALLOBJ_LEN",
@@ -14898,12 +14988,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_575__OBRALLOBJ_LEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_575__OBRALLOBJ_LEN.obj_num = 3;
- cdat->dobj_575__OBRALLOBJ_LEN.obj_hash = 1044699593;
+ cdat->dobj_575__OBRALLOBJ_LEN.obj_hash = 672349188;
cdat->dobj_575__OBRALLOBJ_LEN.obj_len = 4;
/*inistring dstr_576__OBRALLOBJ_LEN*/
- /*_.VALSTR___V720*/ meltfptr[719] = (void *) &cdat->dstr_576__OBRALLOBJ_LEN;
+ /*_.VALSTR___V723*/ meltfptr[722] = (void *) &cdat->dstr_576__OBRALLOBJ_LEN;
cdat->dstr_576__OBRALLOBJ_LEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_576__OBRALLOBJ_LEN.val,
@@ -14912,9 +15002,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_577__OBRALLOBJ_CLASSNAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V728*/ meltfptr[727])
- /*_.VALDATA___V728*/
- meltfptr[727] = (void *) &cdat->dsym_577__OBRALLOBJ_CLASSNAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V731*/ meltfptr[730])
+ /*_.VALDATA___V731*/
+ meltfptr[730] = (void *) &cdat->dsym_577__OBRALLOBJ_CLASSNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_577__OBRALLOBJ_CLASSNAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14931,7 +15021,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_578__OBRALLOBJ_CLASSN*/
- /*_.VALSTR___V729*/ meltfptr[728] =
+ /*_.VALSTR___V732*/ meltfptr[731] =
(void *) &cdat->dstr_578__OBRALLOBJ_CLASSN;
cdat->dstr_578__OBRALLOBJ_CLASSN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14942,7 +15032,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_579__OBRALLOBJ_CLASSNAME*/
-/*_.VALDATA___V721*/ meltfptr[720] =
+/*_.VALDATA___V724*/ meltfptr[723] =
(void *) &cdat->dobj_579__OBRALLOBJ_CLASSNAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_579__OBRALLOBJ_CLASSNAME",
@@ -14956,12 +15046,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_579__OBRALLOBJ_CLASSNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_579__OBRALLOBJ_CLASSNAME.obj_num = 4;
- cdat->dobj_579__OBRALLOBJ_CLASSNAME.obj_hash = 5184947;
+ cdat->dobj_579__OBRALLOBJ_CLASSNAME.obj_hash = 81260100;
cdat->dobj_579__OBRALLOBJ_CLASSNAME.obj_len = 4;
/*inistring dstr_580__OBRALLOBJ_CLASSN*/
- /*_.VALSTR___V722*/ meltfptr[721] =
+ /*_.VALSTR___V725*/ meltfptr[724] =
(void *) &cdat->dstr_580__OBRALLOBJ_CLASSN;
cdat->dstr_580__OBRALLOBJ_CLASSN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -14971,9 +15061,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_581__CLASS_OBJNEWCLOSURE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V730*/ meltfptr[729])
- /*_.VALDATA___V730*/
- meltfptr[729] = (void *) &cdat->dsym_581__CLASS_OBJNEWCLOSURE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V733*/ meltfptr[732])
+ /*_.VALDATA___V733*/
+ meltfptr[732] = (void *) &cdat->dsym_581__CLASS_OBJNEWCLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_581__CLASS_OBJNEWCLOSURE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -14990,7 +15080,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_582__CLASS_OBJNEWCLOS*/
- /*_.VALSTR___V731*/ meltfptr[730] =
+ /*_.VALSTR___V734*/ meltfptr[733] =
(void *) &cdat->dstr_582__CLASS_OBJNEWCLOS;
cdat->dstr_582__CLASS_OBJNEWCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15001,7 +15091,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:401:/ iniobj");
/*iniobj dobj_583__CLASS_OBJNEWCLOSURE*/
-/*_.VALDATA___V732*/ meltfptr[731] =
+/*_.VALDATA___V735*/ meltfptr[734] =
(void *) &cdat->dobj_583__CLASS_OBJNEWCLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_583__CLASS_OBJNEWCLOSURE",
@@ -15015,12 +15105,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_583__CLASS_OBJNEWCLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_583__CLASS_OBJNEWCLOSURE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_583__CLASS_OBJNEWCLOSURE.obj_hash = 659581709;
+ cdat->dobj_583__CLASS_OBJNEWCLOSURE.obj_hash = 639666053;
cdat->dobj_583__CLASS_OBJNEWCLOSURE.obj_len = 8;
/*inistring dstr_584__CLASS_OBJNEWCLOS*/
- /*_.VALSTR___V733*/ meltfptr[732] =
+ /*_.VALSTR___V736*/ meltfptr[735] =
(void *) &cdat->dstr_584__CLASS_OBJNEWCLOS;
cdat->dstr_584__CLASS_OBJNEWCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15029,22 +15119,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_584__CLASS_OBJNEWCLOS.
val) - 1);
/*inimult dtup_585__CLASS_OBJNEWCLOSURE */
- /*_.VALTUP___V734*/ meltfptr[733] =
+ /*_.VALTUP___V737*/ meltfptr[736] =
(void *) &cdat->dtup_585__CLASS_OBJNEWCLOSURE;
cdat->dtup_585__CLASS_OBJNEWCLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_585__CLASS_OBJNEWCLOSURE.nbval = 4;
/*inimult dtup_586__CLASS_OBJNEWCLOSURE */
- /*_.VALTUP___V741*/ meltfptr[740] =
+ /*_.VALTUP___V744*/ meltfptr[743] =
(void *) &cdat->dtup_586__CLASS_OBJNEWCLOSURE;
cdat->dtup_586__CLASS_OBJNEWCLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_586__CLASS_OBJNEWCLOSURE.nbval = 5;
/*iniobj dsym_587__OBNCLO_DISCR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V742*/ meltfptr[741])
- /*_.VALDATA___V742*/
- meltfptr[741] = (void *) &cdat->dsym_587__OBNCLO_DISCR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V745*/ meltfptr[744])
+ /*_.VALDATA___V745*/
+ meltfptr[744] = (void *) &cdat->dsym_587__OBNCLO_DISCR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_587__OBNCLO_DISCR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15061,7 +15151,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_588__OBNCLO_DISCR*/
- /*_.VALSTR___V743*/ meltfptr[742] = (void *) &cdat->dstr_588__OBNCLO_DISCR;
+ /*_.VALSTR___V746*/ meltfptr[745] = (void *) &cdat->dstr_588__OBNCLO_DISCR;
cdat->dstr_588__OBNCLO_DISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_588__OBNCLO_DISCR.val,
@@ -15071,7 +15161,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_589__OBNCLO_DISCR*/
-/*_.VALDATA___V735*/ meltfptr[734] = (void *) &cdat->dobj_589__OBNCLO_DISCR;
+/*_.VALDATA___V738*/ meltfptr[737] = (void *) &cdat->dobj_589__OBNCLO_DISCR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_589__OBNCLO_DISCR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15084,12 +15174,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_589__OBNCLO_DISCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_589__OBNCLO_DISCR.obj_num = 2;
- cdat->dobj_589__OBNCLO_DISCR.obj_hash = 851309675;
+ cdat->dobj_589__OBNCLO_DISCR.obj_hash = 306598138;
cdat->dobj_589__OBNCLO_DISCR.obj_len = 4;
/*inistring dstr_590__OBNCLO_DISCR*/
- /*_.VALSTR___V736*/ meltfptr[735] = (void *) &cdat->dstr_590__OBNCLO_DISCR;
+ /*_.VALSTR___V739*/ meltfptr[738] = (void *) &cdat->dstr_590__OBNCLO_DISCR;
cdat->dstr_590__OBNCLO_DISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_590__OBNCLO_DISCR.val,
@@ -15098,9 +15188,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_591__OBNCLO_ROUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V744*/ meltfptr[743])
- /*_.VALDATA___V744*/
- meltfptr[743] = (void *) &cdat->dsym_591__OBNCLO_ROUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V747*/ meltfptr[746])
+ /*_.VALDATA___V747*/
+ meltfptr[746] = (void *) &cdat->dsym_591__OBNCLO_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_591__OBNCLO_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15117,7 +15207,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_592__OBNCLO_ROUT*/
- /*_.VALSTR___V745*/ meltfptr[744] = (void *) &cdat->dstr_592__OBNCLO_ROUT;
+ /*_.VALSTR___V748*/ meltfptr[747] = (void *) &cdat->dstr_592__OBNCLO_ROUT;
cdat->dstr_592__OBNCLO_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_592__OBNCLO_ROUT.val,
@@ -15126,7 +15216,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_593__OBNCLO_ROUT*/
-/*_.VALDATA___V737*/ meltfptr[736] = (void *) &cdat->dobj_593__OBNCLO_ROUT;
+/*_.VALDATA___V740*/ meltfptr[739] = (void *) &cdat->dobj_593__OBNCLO_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_593__OBNCLO_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15139,12 +15229,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_593__OBNCLO_ROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_593__OBNCLO_ROUT.obj_num = 3;
- cdat->dobj_593__OBNCLO_ROUT.obj_hash = 562819424;
+ cdat->dobj_593__OBNCLO_ROUT.obj_hash = 296787860;
cdat->dobj_593__OBNCLO_ROUT.obj_len = 4;
/*inistring dstr_594__OBNCLO_ROUT*/
- /*_.VALSTR___V738*/ meltfptr[737] = (void *) &cdat->dstr_594__OBNCLO_ROUT;
+ /*_.VALSTR___V741*/ meltfptr[740] = (void *) &cdat->dstr_594__OBNCLO_ROUT;
cdat->dstr_594__OBNCLO_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_594__OBNCLO_ROUT.val,
@@ -15152,9 +15242,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_594__OBNCLO_ROUT.val) - 1);
/*iniobj dsym_595__OBNCLO_LEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V746*/ meltfptr[745])
- /*_.VALDATA___V746*/
- meltfptr[745] = (void *) &cdat->dsym_595__OBNCLO_LEN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V749*/ meltfptr[748])
+ /*_.VALDATA___V749*/
+ meltfptr[748] = (void *) &cdat->dsym_595__OBNCLO_LEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_595__OBNCLO_LEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15171,7 +15261,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_596__OBNCLO_LEN*/
- /*_.VALSTR___V747*/ meltfptr[746] = (void *) &cdat->dstr_596__OBNCLO_LEN;
+ /*_.VALSTR___V750*/ meltfptr[749] = (void *) &cdat->dstr_596__OBNCLO_LEN;
cdat->dstr_596__OBNCLO_LEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_596__OBNCLO_LEN.val, "OBNCLO_LEN",
@@ -15179,7 +15269,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_597__OBNCLO_LEN*/
-/*_.VALDATA___V739*/ meltfptr[738] = (void *) &cdat->dobj_597__OBNCLO_LEN;
+/*_.VALDATA___V742*/ meltfptr[741] = (void *) &cdat->dobj_597__OBNCLO_LEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_597__OBNCLO_LEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15192,21 +15282,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_597__OBNCLO_LEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_597__OBNCLO_LEN.obj_num = 4;
- cdat->dobj_597__OBNCLO_LEN.obj_hash = 644527014;
+ cdat->dobj_597__OBNCLO_LEN.obj_hash = 925326999;
cdat->dobj_597__OBNCLO_LEN.obj_len = 4;
/*inistring dstr_598__OBNCLO_LEN*/
- /*_.VALSTR___V740*/ meltfptr[739] = (void *) &cdat->dstr_598__OBNCLO_LEN;
+ /*_.VALSTR___V743*/ meltfptr[742] = (void *) &cdat->dstr_598__OBNCLO_LEN;
cdat->dstr_598__OBNCLO_LEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_598__OBNCLO_LEN.val, "OBNCLO_LEN",
sizeof (cdat->dstr_598__OBNCLO_LEN.val) - 1);
/*iniobj dsym_599__CLASS_OBJPUTUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V748*/ meltfptr[747])
- /*_.VALDATA___V748*/
- meltfptr[747] = (void *) &cdat->dsym_599__CLASS_OBJPUTUPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V751*/ meltfptr[750])
+ /*_.VALDATA___V751*/
+ meltfptr[750] = (void *) &cdat->dsym_599__CLASS_OBJPUTUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_599__CLASS_OBJPUTUPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15223,7 +15313,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_600__CLASS_OBJPUTUPLE*/
- /*_.VALSTR___V749*/ meltfptr[748] =
+ /*_.VALSTR___V752*/ meltfptr[751] =
(void *) &cdat->dstr_600__CLASS_OBJPUTUPLE;
cdat->dstr_600__CLASS_OBJPUTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15234,7 +15324,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:409:/ iniobj");
/*iniobj dobj_601__CLASS_OBJPUTUPLE*/
-/*_.VALDATA___V750*/ meltfptr[749] =
+/*_.VALDATA___V753*/ meltfptr[752] =
(void *) &cdat->dobj_601__CLASS_OBJPUTUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_601__CLASS_OBJPUTUPLE",
@@ -15248,12 +15338,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_601__CLASS_OBJPUTUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_601__CLASS_OBJPUTUPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_601__CLASS_OBJPUTUPLE.obj_hash = 701062576;
+ cdat->dobj_601__CLASS_OBJPUTUPLE.obj_hash = 229119971;
cdat->dobj_601__CLASS_OBJPUTUPLE.obj_len = 8;
/*inistring dstr_602__CLASS_OBJPUTUPLE*/
- /*_.VALSTR___V751*/ meltfptr[750] =
+ /*_.VALSTR___V754*/ meltfptr[753] =
(void *) &cdat->dstr_602__CLASS_OBJPUTUPLE;
cdat->dstr_602__CLASS_OBJPUTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15262,22 +15352,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_602__CLASS_OBJPUTUPLE.
val) - 1);
/*inimult dtup_603__CLASS_OBJPUTUPLE */
- /*_.VALTUP___V752*/ meltfptr[751] =
+ /*_.VALTUP___V755*/ meltfptr[754] =
(void *) &cdat->dtup_603__CLASS_OBJPUTUPLE;
cdat->dtup_603__CLASS_OBJPUTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_603__CLASS_OBJPUTUPLE.nbval = 3;
/*inimult dtup_604__CLASS_OBJPUTUPLE */
- /*_.VALTUP___V759*/ meltfptr[758] =
+ /*_.VALTUP___V762*/ meltfptr[761] =
(void *) &cdat->dtup_604__CLASS_OBJPUTUPLE;
cdat->dtup_604__CLASS_OBJPUTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_604__CLASS_OBJPUTUPLE.nbval = 4;
/*iniobj dsym_605__OPUTU_TUPLED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V760*/ meltfptr[759])
- /*_.VALDATA___V760*/
- meltfptr[759] = (void *) &cdat->dsym_605__OPUTU_TUPLED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V763*/ meltfptr[762])
+ /*_.VALDATA___V763*/
+ meltfptr[762] = (void *) &cdat->dsym_605__OPUTU_TUPLED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_605__OPUTU_TUPLED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15294,7 +15384,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_606__OPUTU_TUPLED*/
- /*_.VALSTR___V761*/ meltfptr[760] = (void *) &cdat->dstr_606__OPUTU_TUPLED;
+ /*_.VALSTR___V764*/ meltfptr[763] = (void *) &cdat->dstr_606__OPUTU_TUPLED;
cdat->dstr_606__OPUTU_TUPLED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_606__OPUTU_TUPLED.val,
@@ -15304,7 +15394,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_607__OPUTU_TUPLED*/
-/*_.VALDATA___V753*/ meltfptr[752] = (void *) &cdat->dobj_607__OPUTU_TUPLED;
+/*_.VALDATA___V756*/ meltfptr[755] = (void *) &cdat->dobj_607__OPUTU_TUPLED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_607__OPUTU_TUPLED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15317,12 +15407,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_607__OPUTU_TUPLED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_607__OPUTU_TUPLED.obj_num = 1;
- cdat->dobj_607__OPUTU_TUPLED.obj_hash = 647775931;
+ cdat->dobj_607__OPUTU_TUPLED.obj_hash = 459722678;
cdat->dobj_607__OPUTU_TUPLED.obj_len = 4;
/*inistring dstr_608__OPUTU_TUPLED*/
- /*_.VALSTR___V754*/ meltfptr[753] = (void *) &cdat->dstr_608__OPUTU_TUPLED;
+ /*_.VALSTR___V757*/ meltfptr[756] = (void *) &cdat->dstr_608__OPUTU_TUPLED;
cdat->dstr_608__OPUTU_TUPLED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_608__OPUTU_TUPLED.val,
@@ -15331,9 +15421,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_609__OPUTU_OFFSET*/
- /*uniqueobj*/ if (! /*_.VALDATA___V762*/ meltfptr[761])
- /*_.VALDATA___V762*/
- meltfptr[761] = (void *) &cdat->dsym_609__OPUTU_OFFSET;
+ /*uniqueobj*/ if (! /*_.VALDATA___V765*/ meltfptr[764])
+ /*_.VALDATA___V765*/
+ meltfptr[764] = (void *) &cdat->dsym_609__OPUTU_OFFSET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_609__OPUTU_OFFSET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15350,7 +15440,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_610__OPUTU_OFFSET*/
- /*_.VALSTR___V763*/ meltfptr[762] = (void *) &cdat->dstr_610__OPUTU_OFFSET;
+ /*_.VALSTR___V766*/ meltfptr[765] = (void *) &cdat->dstr_610__OPUTU_OFFSET;
cdat->dstr_610__OPUTU_OFFSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_610__OPUTU_OFFSET.val,
@@ -15360,7 +15450,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_611__OPUTU_OFFSET*/
-/*_.VALDATA___V755*/ meltfptr[754] = (void *) &cdat->dobj_611__OPUTU_OFFSET;
+/*_.VALDATA___V758*/ meltfptr[757] = (void *) &cdat->dobj_611__OPUTU_OFFSET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_611__OPUTU_OFFSET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15373,12 +15463,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_611__OPUTU_OFFSET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_611__OPUTU_OFFSET.obj_num = 2;
- cdat->dobj_611__OPUTU_OFFSET.obj_hash = 295413662;
+ cdat->dobj_611__OPUTU_OFFSET.obj_hash = 537210709;
cdat->dobj_611__OPUTU_OFFSET.obj_len = 4;
/*inistring dstr_612__OPUTU_OFFSET*/
- /*_.VALSTR___V756*/ meltfptr[755] = (void *) &cdat->dstr_612__OPUTU_OFFSET;
+ /*_.VALSTR___V759*/ meltfptr[758] = (void *) &cdat->dstr_612__OPUTU_OFFSET;
cdat->dstr_612__OPUTU_OFFSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_612__OPUTU_OFFSET.val,
@@ -15387,9 +15477,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_613__OPUTU_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V764*/ meltfptr[763])
- /*_.VALDATA___V764*/
- meltfptr[763] = (void *) &cdat->dsym_613__OPUTU_VALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V767*/ meltfptr[766])
+ /*_.VALDATA___V767*/
+ meltfptr[766] = (void *) &cdat->dsym_613__OPUTU_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_613__OPUTU_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15406,7 +15496,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_614__OPUTU_VALUE*/
- /*_.VALSTR___V765*/ meltfptr[764] = (void *) &cdat->dstr_614__OPUTU_VALUE;
+ /*_.VALSTR___V768*/ meltfptr[767] = (void *) &cdat->dstr_614__OPUTU_VALUE;
cdat->dstr_614__OPUTU_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_614__OPUTU_VALUE.val,
@@ -15415,7 +15505,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_615__OPUTU_VALUE*/
-/*_.VALDATA___V757*/ meltfptr[756] = (void *) &cdat->dobj_615__OPUTU_VALUE;
+/*_.VALDATA___V760*/ meltfptr[759] = (void *) &cdat->dobj_615__OPUTU_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_615__OPUTU_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15428,12 +15518,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_615__OPUTU_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_615__OPUTU_VALUE.obj_num = 3;
- cdat->dobj_615__OPUTU_VALUE.obj_hash = 1061594803;
+ cdat->dobj_615__OPUTU_VALUE.obj_hash = 4322264;
cdat->dobj_615__OPUTU_VALUE.obj_len = 4;
/*inistring dstr_616__OPUTU_VALUE*/
- /*_.VALSTR___V758*/ meltfptr[757] = (void *) &cdat->dstr_616__OPUTU_VALUE;
+ /*_.VALSTR___V761*/ meltfptr[760] = (void *) &cdat->dstr_616__OPUTU_VALUE;
cdat->dstr_616__OPUTU_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_616__OPUTU_VALUE.val,
@@ -15441,9 +15531,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_616__OPUTU_VALUE.val) - 1);
/*iniobj dsym_617__CLASS_OBJPUTPAIR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V766*/ meltfptr[765])
- /*_.VALDATA___V766*/
- meltfptr[765] = (void *) &cdat->dsym_617__CLASS_OBJPUTPAIR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V769*/ meltfptr[768])
+ /*_.VALDATA___V769*/
+ meltfptr[768] = (void *) &cdat->dsym_617__CLASS_OBJPUTPAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_617__CLASS_OBJPUTPAIR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15460,7 +15550,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_618__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V767*/ meltfptr[766] =
+ /*_.VALSTR___V770*/ meltfptr[769] =
(void *) &cdat->dstr_618__CLASS_OBJPUTPAIR;
cdat->dstr_618__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15471,7 +15561,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:418:/ iniobj");
/*iniobj dobj_619__CLASS_OBJPUTPAIR*/
-/*_.VALDATA___V768*/ meltfptr[767] =
+/*_.VALDATA___V771*/ meltfptr[770] =
(void *) &cdat->dobj_619__CLASS_OBJPUTPAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_619__CLASS_OBJPUTPAIR",
@@ -15485,12 +15575,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_619__CLASS_OBJPUTPAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_619__CLASS_OBJPUTPAIR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_619__CLASS_OBJPUTPAIR.obj_hash = 529316470;
+ cdat->dobj_619__CLASS_OBJPUTPAIR.obj_hash = 791837060;
cdat->dobj_619__CLASS_OBJPUTPAIR.obj_len = 8;
/*inistring dstr_620__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V769*/ meltfptr[768] =
+ /*_.VALSTR___V772*/ meltfptr[771] =
(void *) &cdat->dstr_620__CLASS_OBJPUTPAIR;
cdat->dstr_620__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15499,22 +15589,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_620__CLASS_OBJPUTPAIR.
val) - 1);
/*inimult dtup_621__CLASS_OBJPUTPAIR */
- /*_.VALTUP___V770*/ meltfptr[769] =
+ /*_.VALTUP___V773*/ meltfptr[772] =
(void *) &cdat->dtup_621__CLASS_OBJPUTPAIR;
cdat->dtup_621__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_621__CLASS_OBJPUTPAIR.nbval = 3;
/*inimult dtup_622__CLASS_OBJPUTPAIR */
- /*_.VALTUP___V773*/ meltfptr[772] =
+ /*_.VALTUP___V776*/ meltfptr[775] =
(void *) &cdat->dtup_622__CLASS_OBJPUTPAIR;
cdat->dtup_622__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_622__CLASS_OBJPUTPAIR.nbval = 2;
/*iniobj dsym_623__OPUTP_PAIR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V774*/ meltfptr[773])
- /*_.VALDATA___V774*/
- meltfptr[773] = (void *) &cdat->dsym_623__OPUTP_PAIR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V777*/ meltfptr[776])
+ /*_.VALDATA___V777*/
+ meltfptr[776] = (void *) &cdat->dsym_623__OPUTP_PAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_623__OPUTP_PAIR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15531,7 +15621,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_624__OPUTP_PAIR*/
- /*_.VALSTR___V775*/ meltfptr[774] = (void *) &cdat->dstr_624__OPUTP_PAIR;
+ /*_.VALSTR___V778*/ meltfptr[777] = (void *) &cdat->dstr_624__OPUTP_PAIR;
cdat->dstr_624__OPUTP_PAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_624__OPUTP_PAIR.val, "OPUTP_PAIR",
@@ -15539,7 +15629,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_625__OPUTP_PAIR*/
-/*_.VALDATA___V771*/ meltfptr[770] = (void *) &cdat->dobj_625__OPUTP_PAIR;
+/*_.VALDATA___V774*/ meltfptr[773] = (void *) &cdat->dobj_625__OPUTP_PAIR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_625__OPUTP_PAIR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15552,21 +15642,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_625__OPUTP_PAIR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_625__OPUTP_PAIR.obj_num = 1;
- cdat->dobj_625__OPUTP_PAIR.obj_hash = 1070960423;
+ cdat->dobj_625__OPUTP_PAIR.obj_hash = 199182248;
cdat->dobj_625__OPUTP_PAIR.obj_len = 4;
/*inistring dstr_626__OPUTP_PAIR*/
- /*_.VALSTR___V772*/ meltfptr[771] = (void *) &cdat->dstr_626__OPUTP_PAIR;
+ /*_.VALSTR___V775*/ meltfptr[774] = (void *) &cdat->dstr_626__OPUTP_PAIR;
cdat->dstr_626__OPUTP_PAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_626__OPUTP_PAIR.val, "OPUTP_PAIR",
sizeof (cdat->dstr_626__OPUTP_PAIR.val) - 1);
/*iniobj dsym_627__CLASS_OBJPUTPAIRHEAD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V776*/ meltfptr[775])
- /*_.VALDATA___V776*/
- meltfptr[775] = (void *) &cdat->dsym_627__CLASS_OBJPUTPAIRHEAD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V779*/ meltfptr[778])
+ /*_.VALDATA___V779*/
+ meltfptr[778] = (void *) &cdat->dsym_627__CLASS_OBJPUTPAIRHEAD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_627__CLASS_OBJPUTPAIRHEAD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15583,7 +15673,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_628__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V777*/ meltfptr[776] =
+ /*_.VALSTR___V780*/ meltfptr[779] =
(void *) &cdat->dstr_628__CLASS_OBJPUTPAIR;
cdat->dstr_628__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15594,7 +15684,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:423:/ iniobj");
/*iniobj dobj_629__CLASS_OBJPUTPAIRHEAD*/
-/*_.VALDATA___V778*/ meltfptr[777] =
+/*_.VALDATA___V781*/ meltfptr[780] =
(void *) &cdat->dobj_629__CLASS_OBJPUTPAIRHEAD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_629__CLASS_OBJPUTPAIRHEAD",
@@ -15608,12 +15698,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_629__CLASS_OBJPUTPAIRHEAD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_629__CLASS_OBJPUTPAIRHEAD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_629__CLASS_OBJPUTPAIRHEAD.obj_hash = 907445174;
+ cdat->dobj_629__CLASS_OBJPUTPAIRHEAD.obj_hash = 1048871745;
cdat->dobj_629__CLASS_OBJPUTPAIRHEAD.obj_len = 8;
/*inistring dstr_630__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V779*/ meltfptr[778] =
+ /*_.VALSTR___V782*/ meltfptr[781] =
(void *) &cdat->dstr_630__CLASS_OBJPUTPAIR;
cdat->dstr_630__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15622,22 +15712,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_630__CLASS_OBJPUTPAIR.
val) - 1);
/*inimult dtup_631__CLASS_OBJPUTPAIRHEAD */
- /*_.VALTUP___V780*/ meltfptr[779] =
+ /*_.VALTUP___V783*/ meltfptr[782] =
(void *) &cdat->dtup_631__CLASS_OBJPUTPAIRHEAD;
cdat->dtup_631__CLASS_OBJPUTPAIRHEAD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_631__CLASS_OBJPUTPAIRHEAD.nbval = 4;
/*inimult dtup_632__CLASS_OBJPUTPAIRHEAD */
- /*_.VALTUP___V783*/ meltfptr[782] =
+ /*_.VALTUP___V786*/ meltfptr[785] =
(void *) &cdat->dtup_632__CLASS_OBJPUTPAIRHEAD;
cdat->dtup_632__CLASS_OBJPUTPAIRHEAD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_632__CLASS_OBJPUTPAIRHEAD.nbval = 3;
/*iniobj dsym_633__OPUTP_HEAD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V784*/ meltfptr[783])
- /*_.VALDATA___V784*/
- meltfptr[783] = (void *) &cdat->dsym_633__OPUTP_HEAD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V787*/ meltfptr[786])
+ /*_.VALDATA___V787*/
+ meltfptr[786] = (void *) &cdat->dsym_633__OPUTP_HEAD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_633__OPUTP_HEAD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15654,7 +15744,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_634__OPUTP_HEAD*/
- /*_.VALSTR___V785*/ meltfptr[784] = (void *) &cdat->dstr_634__OPUTP_HEAD;
+ /*_.VALSTR___V788*/ meltfptr[787] = (void *) &cdat->dstr_634__OPUTP_HEAD;
cdat->dstr_634__OPUTP_HEAD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_634__OPUTP_HEAD.val, "OPUTP_HEAD",
@@ -15662,7 +15752,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_635__OPUTP_HEAD*/
-/*_.VALDATA___V781*/ meltfptr[780] = (void *) &cdat->dobj_635__OPUTP_HEAD;
+/*_.VALDATA___V784*/ meltfptr[783] = (void *) &cdat->dobj_635__OPUTP_HEAD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_635__OPUTP_HEAD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15675,21 +15765,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_635__OPUTP_HEAD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_635__OPUTP_HEAD.obj_num = 2;
- cdat->dobj_635__OPUTP_HEAD.obj_hash = 708578625;
+ cdat->dobj_635__OPUTP_HEAD.obj_hash = 239780846;
cdat->dobj_635__OPUTP_HEAD.obj_len = 4;
/*inistring dstr_636__OPUTP_HEAD*/
- /*_.VALSTR___V782*/ meltfptr[781] = (void *) &cdat->dstr_636__OPUTP_HEAD;
+ /*_.VALSTR___V785*/ meltfptr[784] = (void *) &cdat->dstr_636__OPUTP_HEAD;
cdat->dstr_636__OPUTP_HEAD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_636__OPUTP_HEAD.val, "OPUTP_HEAD",
sizeof (cdat->dstr_636__OPUTP_HEAD.val) - 1);
/*iniobj dsym_637__CLASS_OBJPUTPAIRTAIL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V786*/ meltfptr[785])
- /*_.VALDATA___V786*/
- meltfptr[785] = (void *) &cdat->dsym_637__CLASS_OBJPUTPAIRTAIL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V789*/ meltfptr[788])
+ /*_.VALDATA___V789*/
+ meltfptr[788] = (void *) &cdat->dsym_637__CLASS_OBJPUTPAIRTAIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_637__CLASS_OBJPUTPAIRTAIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15706,7 +15796,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_638__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V787*/ meltfptr[786] =
+ /*_.VALSTR___V790*/ meltfptr[789] =
(void *) &cdat->dstr_638__CLASS_OBJPUTPAIR;
cdat->dstr_638__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15717,7 +15807,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:428:/ iniobj");
/*iniobj dobj_639__CLASS_OBJPUTPAIRTAIL*/
-/*_.VALDATA___V788*/ meltfptr[787] =
+/*_.VALDATA___V791*/ meltfptr[790] =
(void *) &cdat->dobj_639__CLASS_OBJPUTPAIRTAIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_639__CLASS_OBJPUTPAIRTAIL",
@@ -15731,12 +15821,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_639__CLASS_OBJPUTPAIRTAIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_639__CLASS_OBJPUTPAIRTAIL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_639__CLASS_OBJPUTPAIRTAIL.obj_hash = 764641211;
+ cdat->dobj_639__CLASS_OBJPUTPAIRTAIL.obj_hash = 628726542;
cdat->dobj_639__CLASS_OBJPUTPAIRTAIL.obj_len = 8;
/*inistring dstr_640__CLASS_OBJPUTPAIR*/
- /*_.VALSTR___V789*/ meltfptr[788] =
+ /*_.VALSTR___V792*/ meltfptr[791] =
(void *) &cdat->dstr_640__CLASS_OBJPUTPAIR;
cdat->dstr_640__CLASS_OBJPUTPAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15745,22 +15835,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_640__CLASS_OBJPUTPAIR.
val) - 1);
/*inimult dtup_641__CLASS_OBJPUTPAIRTAIL */
- /*_.VALTUP___V790*/ meltfptr[789] =
+ /*_.VALTUP___V793*/ meltfptr[792] =
(void *) &cdat->dtup_641__CLASS_OBJPUTPAIRTAIL;
cdat->dtup_641__CLASS_OBJPUTPAIRTAIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_641__CLASS_OBJPUTPAIRTAIL.nbval = 4;
/*inimult dtup_642__CLASS_OBJPUTPAIRTAIL */
- /*_.VALTUP___V793*/ meltfptr[792] =
+ /*_.VALTUP___V796*/ meltfptr[795] =
(void *) &cdat->dtup_642__CLASS_OBJPUTPAIRTAIL;
cdat->dtup_642__CLASS_OBJPUTPAIRTAIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_642__CLASS_OBJPUTPAIRTAIL.nbval = 3;
/*iniobj dsym_643__OPUTP_TAIL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V794*/ meltfptr[793])
- /*_.VALDATA___V794*/
- meltfptr[793] = (void *) &cdat->dsym_643__OPUTP_TAIL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V797*/ meltfptr[796])
+ /*_.VALDATA___V797*/
+ meltfptr[796] = (void *) &cdat->dsym_643__OPUTP_TAIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_643__OPUTP_TAIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15777,7 +15867,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_644__OPUTP_TAIL*/
- /*_.VALSTR___V795*/ meltfptr[794] = (void *) &cdat->dstr_644__OPUTP_TAIL;
+ /*_.VALSTR___V798*/ meltfptr[797] = (void *) &cdat->dstr_644__OPUTP_TAIL;
cdat->dstr_644__OPUTP_TAIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_644__OPUTP_TAIL.val, "OPUTP_TAIL",
@@ -15785,7 +15875,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_645__OPUTP_TAIL*/
-/*_.VALDATA___V791*/ meltfptr[790] = (void *) &cdat->dobj_645__OPUTP_TAIL;
+/*_.VALDATA___V794*/ meltfptr[793] = (void *) &cdat->dobj_645__OPUTP_TAIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_645__OPUTP_TAIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15798,21 +15888,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_645__OPUTP_TAIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_645__OPUTP_TAIL.obj_num = 2;
- cdat->dobj_645__OPUTP_TAIL.obj_hash = 379460275;
+ cdat->dobj_645__OPUTP_TAIL.obj_hash = 741814451;
cdat->dobj_645__OPUTP_TAIL.obj_len = 4;
/*inistring dstr_646__OPUTP_TAIL*/
- /*_.VALSTR___V792*/ meltfptr[791] = (void *) &cdat->dstr_646__OPUTP_TAIL;
+ /*_.VALSTR___V795*/ meltfptr[794] = (void *) &cdat->dstr_646__OPUTP_TAIL;
cdat->dstr_646__OPUTP_TAIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_646__OPUTP_TAIL.val, "OPUTP_TAIL",
sizeof (cdat->dstr_646__OPUTP_TAIL.val) - 1);
/*iniobj dsym_647__CLASS_OBJPUTLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V796*/ meltfptr[795])
- /*_.VALDATA___V796*/
- meltfptr[795] = (void *) &cdat->dsym_647__CLASS_OBJPUTLIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V799*/ meltfptr[798])
+ /*_.VALDATA___V799*/
+ meltfptr[798] = (void *) &cdat->dsym_647__CLASS_OBJPUTLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_647__CLASS_OBJPUTLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15829,7 +15919,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_648__CLASS_OBJPUTLIST*/
- /*_.VALSTR___V797*/ meltfptr[796] =
+ /*_.VALSTR___V800*/ meltfptr[799] =
(void *) &cdat->dstr_648__CLASS_OBJPUTLIST;
cdat->dstr_648__CLASS_OBJPUTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15840,7 +15930,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:434:/ iniobj");
/*iniobj dobj_649__CLASS_OBJPUTLIST*/
-/*_.VALDATA___V798*/ meltfptr[797] =
+/*_.VALDATA___V801*/ meltfptr[800] =
(void *) &cdat->dobj_649__CLASS_OBJPUTLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_649__CLASS_OBJPUTLIST",
@@ -15854,12 +15944,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_649__CLASS_OBJPUTLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_649__CLASS_OBJPUTLIST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_649__CLASS_OBJPUTLIST.obj_hash = 323585395;
+ cdat->dobj_649__CLASS_OBJPUTLIST.obj_hash = 961430733;
cdat->dobj_649__CLASS_OBJPUTLIST.obj_len = 8;
/*inistring dstr_650__CLASS_OBJPUTLIST*/
- /*_.VALSTR___V799*/ meltfptr[798] =
+ /*_.VALSTR___V802*/ meltfptr[801] =
(void *) &cdat->dstr_650__CLASS_OBJPUTLIST;
cdat->dstr_650__CLASS_OBJPUTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -15868,22 +15958,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_650__CLASS_OBJPUTLIST.
val) - 1);
/*inimult dtup_651__CLASS_OBJPUTLIST */
- /*_.VALTUP___V800*/ meltfptr[799] =
+ /*_.VALTUP___V803*/ meltfptr[802] =
(void *) &cdat->dtup_651__CLASS_OBJPUTLIST;
cdat->dtup_651__CLASS_OBJPUTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_651__CLASS_OBJPUTLIST.nbval = 3;
/*inimult dtup_652__CLASS_OBJPUTLIST */
- /*_.VALTUP___V807*/ meltfptr[806] =
+ /*_.VALTUP___V810*/ meltfptr[809] =
(void *) &cdat->dtup_652__CLASS_OBJPUTLIST;
cdat->dtup_652__CLASS_OBJPUTLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_652__CLASS_OBJPUTLIST.nbval = 4;
/*iniobj dsym_653__OPUTL_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V808*/ meltfptr[807])
- /*_.VALDATA___V808*/
- meltfptr[807] = (void *) &cdat->dsym_653__OPUTL_LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V811*/ meltfptr[810])
+ /*_.VALDATA___V811*/
+ meltfptr[810] = (void *) &cdat->dsym_653__OPUTL_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_653__OPUTL_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15900,7 +15990,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_654__OPUTL_LIST*/
- /*_.VALSTR___V809*/ meltfptr[808] = (void *) &cdat->dstr_654__OPUTL_LIST;
+ /*_.VALSTR___V812*/ meltfptr[811] = (void *) &cdat->dstr_654__OPUTL_LIST;
cdat->dstr_654__OPUTL_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_654__OPUTL_LIST.val, "OPUTL_LIST",
@@ -15908,7 +15998,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_655__OPUTL_LIST*/
-/*_.VALDATA___V801*/ meltfptr[800] = (void *) &cdat->dobj_655__OPUTL_LIST;
+/*_.VALDATA___V804*/ meltfptr[803] = (void *) &cdat->dobj_655__OPUTL_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_655__OPUTL_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15921,21 +16011,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_655__OPUTL_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_655__OPUTL_LIST.obj_num = 1;
- cdat->dobj_655__OPUTL_LIST.obj_hash = 605518662;
+ cdat->dobj_655__OPUTL_LIST.obj_hash = 432032996;
cdat->dobj_655__OPUTL_LIST.obj_len = 4;
/*inistring dstr_656__OPUTL_LIST*/
- /*_.VALSTR___V802*/ meltfptr[801] = (void *) &cdat->dstr_656__OPUTL_LIST;
+ /*_.VALSTR___V805*/ meltfptr[804] = (void *) &cdat->dstr_656__OPUTL_LIST;
cdat->dstr_656__OPUTL_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_656__OPUTL_LIST.val, "OPUTL_LIST",
sizeof (cdat->dstr_656__OPUTL_LIST.val) - 1);
/*iniobj dsym_657__OPUTL_FIRST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V810*/ meltfptr[809])
- /*_.VALDATA___V810*/
- meltfptr[809] = (void *) &cdat->dsym_657__OPUTL_FIRST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V813*/ meltfptr[812])
+ /*_.VALDATA___V813*/
+ meltfptr[812] = (void *) &cdat->dsym_657__OPUTL_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_657__OPUTL_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -15952,7 +16042,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_658__OPUTL_FIRST*/
- /*_.VALSTR___V811*/ meltfptr[810] = (void *) &cdat->dstr_658__OPUTL_FIRST;
+ /*_.VALSTR___V814*/ meltfptr[813] = (void *) &cdat->dstr_658__OPUTL_FIRST;
cdat->dstr_658__OPUTL_FIRST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_658__OPUTL_FIRST.val,
@@ -15961,7 +16051,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_659__OPUTL_FIRST*/
-/*_.VALDATA___V803*/ meltfptr[802] = (void *) &cdat->dobj_659__OPUTL_FIRST;
+/*_.VALDATA___V806*/ meltfptr[805] = (void *) &cdat->dobj_659__OPUTL_FIRST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_659__OPUTL_FIRST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -15974,12 +16064,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_659__OPUTL_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_659__OPUTL_FIRST.obj_num = 2;
- cdat->dobj_659__OPUTL_FIRST.obj_hash = 977886352;
+ cdat->dobj_659__OPUTL_FIRST.obj_hash = 801264731;
cdat->dobj_659__OPUTL_FIRST.obj_len = 4;
/*inistring dstr_660__OPUTL_FIRST*/
- /*_.VALSTR___V804*/ meltfptr[803] = (void *) &cdat->dstr_660__OPUTL_FIRST;
+ /*_.VALSTR___V807*/ meltfptr[806] = (void *) &cdat->dstr_660__OPUTL_FIRST;
cdat->dstr_660__OPUTL_FIRST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_660__OPUTL_FIRST.val,
@@ -15987,9 +16077,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_660__OPUTL_FIRST.val) - 1);
/*iniobj dsym_661__OPUTL_LAST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V812*/ meltfptr[811])
- /*_.VALDATA___V812*/
- meltfptr[811] = (void *) &cdat->dsym_661__OPUTL_LAST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V815*/ meltfptr[814])
+ /*_.VALDATA___V815*/
+ meltfptr[814] = (void *) &cdat->dsym_661__OPUTL_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_661__OPUTL_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16006,7 +16096,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_662__OPUTL_LAST*/
- /*_.VALSTR___V813*/ meltfptr[812] = (void *) &cdat->dstr_662__OPUTL_LAST;
+ /*_.VALSTR___V816*/ meltfptr[815] = (void *) &cdat->dstr_662__OPUTL_LAST;
cdat->dstr_662__OPUTL_LAST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_662__OPUTL_LAST.val, "OPUTL_LAST",
@@ -16014,7 +16104,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_663__OPUTL_LAST*/
-/*_.VALDATA___V805*/ meltfptr[804] = (void *) &cdat->dobj_663__OPUTL_LAST;
+/*_.VALDATA___V808*/ meltfptr[807] = (void *) &cdat->dobj_663__OPUTL_LAST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_663__OPUTL_LAST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16027,21 +16117,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_663__OPUTL_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_663__OPUTL_LAST.obj_num = 3;
- cdat->dobj_663__OPUTL_LAST.obj_hash = 665884806;
+ cdat->dobj_663__OPUTL_LAST.obj_hash = 930781047;
cdat->dobj_663__OPUTL_LAST.obj_len = 4;
/*inistring dstr_664__OPUTL_LAST*/
- /*_.VALSTR___V806*/ meltfptr[805] = (void *) &cdat->dstr_664__OPUTL_LAST;
+ /*_.VALSTR___V809*/ meltfptr[808] = (void *) &cdat->dstr_664__OPUTL_LAST;
cdat->dstr_664__OPUTL_LAST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_664__OPUTL_LAST.val, "OPUTL_LAST",
sizeof (cdat->dstr_664__OPUTL_LAST.val) - 1);
/*iniobj dsym_665__CLASS_OBJPUTSLOT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V814*/ meltfptr[813])
- /*_.VALDATA___V814*/
- meltfptr[813] = (void *) &cdat->dsym_665__CLASS_OBJPUTSLOT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V817*/ meltfptr[816])
+ /*_.VALDATA___V817*/
+ meltfptr[816] = (void *) &cdat->dsym_665__CLASS_OBJPUTSLOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_665__CLASS_OBJPUTSLOT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16058,7 +16148,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_666__CLASS_OBJPUTSLOT*/
- /*_.VALSTR___V815*/ meltfptr[814] =
+ /*_.VALSTR___V818*/ meltfptr[817] =
(void *) &cdat->dstr_666__CLASS_OBJPUTSLOT;
cdat->dstr_666__CLASS_OBJPUTSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16069,7 +16159,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:442:/ iniobj");
/*iniobj dobj_667__CLASS_OBJPUTSLOT*/
-/*_.VALDATA___V816*/ meltfptr[815] =
+/*_.VALDATA___V819*/ meltfptr[818] =
(void *) &cdat->dobj_667__CLASS_OBJPUTSLOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_667__CLASS_OBJPUTSLOT",
@@ -16083,12 +16173,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_667__CLASS_OBJPUTSLOT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_667__CLASS_OBJPUTSLOT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_667__CLASS_OBJPUTSLOT.obj_hash = 110578419;
+ cdat->dobj_667__CLASS_OBJPUTSLOT.obj_hash = 920286524;
cdat->dobj_667__CLASS_OBJPUTSLOT.obj_len = 8;
/*inistring dstr_668__CLASS_OBJPUTSLOT*/
- /*_.VALSTR___V817*/ meltfptr[816] =
+ /*_.VALSTR___V820*/ meltfptr[819] =
(void *) &cdat->dstr_668__CLASS_OBJPUTSLOT;
cdat->dstr_668__CLASS_OBJPUTSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16097,22 +16187,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_668__CLASS_OBJPUTSLOT.
val) - 1);
/*inimult dtup_669__CLASS_OBJPUTSLOT */
- /*_.VALTUP___V818*/ meltfptr[817] =
+ /*_.VALTUP___V821*/ meltfptr[820] =
(void *) &cdat->dtup_669__CLASS_OBJPUTSLOT;
cdat->dtup_669__CLASS_OBJPUTSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_669__CLASS_OBJPUTSLOT.nbval = 3;
/*inimult dtup_670__CLASS_OBJPUTSLOT */
- /*_.VALTUP___V827*/ meltfptr[826] =
+ /*_.VALTUP___V830*/ meltfptr[829] =
(void *) &cdat->dtup_670__CLASS_OBJPUTSLOT;
cdat->dtup_670__CLASS_OBJPUTSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_670__CLASS_OBJPUTSLOT.nbval = 5;
/*iniobj dsym_671__OSLOT_ODATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V828*/ meltfptr[827])
- /*_.VALDATA___V828*/
- meltfptr[827] = (void *) &cdat->dsym_671__OSLOT_ODATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V831*/ meltfptr[830])
+ /*_.VALDATA___V831*/
+ meltfptr[830] = (void *) &cdat->dsym_671__OSLOT_ODATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_671__OSLOT_ODATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16129,7 +16219,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_672__OSLOT_ODATA*/
- /*_.VALSTR___V829*/ meltfptr[828] = (void *) &cdat->dstr_672__OSLOT_ODATA;
+ /*_.VALSTR___V832*/ meltfptr[831] = (void *) &cdat->dstr_672__OSLOT_ODATA;
cdat->dstr_672__OSLOT_ODATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_672__OSLOT_ODATA.val,
@@ -16138,7 +16228,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_673__OSLOT_ODATA*/
-/*_.VALDATA___V819*/ meltfptr[818] = (void *) &cdat->dobj_673__OSLOT_ODATA;
+/*_.VALDATA___V822*/ meltfptr[821] = (void *) &cdat->dobj_673__OSLOT_ODATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_673__OSLOT_ODATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16151,12 +16241,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_673__OSLOT_ODATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_673__OSLOT_ODATA.obj_num = 1;
- cdat->dobj_673__OSLOT_ODATA.obj_hash = 733470885;
+ cdat->dobj_673__OSLOT_ODATA.obj_hash = 644955489;
cdat->dobj_673__OSLOT_ODATA.obj_len = 4;
/*inistring dstr_674__OSLOT_ODATA*/
- /*_.VALSTR___V820*/ meltfptr[819] = (void *) &cdat->dstr_674__OSLOT_ODATA;
+ /*_.VALSTR___V823*/ meltfptr[822] = (void *) &cdat->dstr_674__OSLOT_ODATA;
cdat->dstr_674__OSLOT_ODATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_674__OSLOT_ODATA.val,
@@ -16164,9 +16254,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_674__OSLOT_ODATA.val) - 1);
/*iniobj dsym_675__OSLOT_OFFSET*/
- /*uniqueobj*/ if (! /*_.VALDATA___V830*/ meltfptr[829])
- /*_.VALDATA___V830*/
- meltfptr[829] = (void *) &cdat->dsym_675__OSLOT_OFFSET;
+ /*uniqueobj*/ if (! /*_.VALDATA___V833*/ meltfptr[832])
+ /*_.VALDATA___V833*/
+ meltfptr[832] = (void *) &cdat->dsym_675__OSLOT_OFFSET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_675__OSLOT_OFFSET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16183,7 +16273,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_676__OSLOT_OFFSET*/
- /*_.VALSTR___V831*/ meltfptr[830] = (void *) &cdat->dstr_676__OSLOT_OFFSET;
+ /*_.VALSTR___V834*/ meltfptr[833] = (void *) &cdat->dstr_676__OSLOT_OFFSET;
cdat->dstr_676__OSLOT_OFFSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_676__OSLOT_OFFSET.val,
@@ -16193,7 +16283,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_677__OSLOT_OFFSET*/
-/*_.VALDATA___V821*/ meltfptr[820] = (void *) &cdat->dobj_677__OSLOT_OFFSET;
+/*_.VALDATA___V824*/ meltfptr[823] = (void *) &cdat->dobj_677__OSLOT_OFFSET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_677__OSLOT_OFFSET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16206,12 +16296,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_677__OSLOT_OFFSET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_677__OSLOT_OFFSET.obj_num = 2;
- cdat->dobj_677__OSLOT_OFFSET.obj_hash = 51489104;
+ cdat->dobj_677__OSLOT_OFFSET.obj_hash = 642588646;
cdat->dobj_677__OSLOT_OFFSET.obj_len = 4;
/*inistring dstr_678__OSLOT_OFFSET*/
- /*_.VALSTR___V822*/ meltfptr[821] = (void *) &cdat->dstr_678__OSLOT_OFFSET;
+ /*_.VALSTR___V825*/ meltfptr[824] = (void *) &cdat->dstr_678__OSLOT_OFFSET;
cdat->dstr_678__OSLOT_OFFSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_678__OSLOT_OFFSET.val,
@@ -16220,9 +16310,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_679__OSLOT_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V832*/ meltfptr[831])
- /*_.VALDATA___V832*/
- meltfptr[831] = (void *) &cdat->dsym_679__OSLOT_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V835*/ meltfptr[834])
+ /*_.VALDATA___V835*/
+ meltfptr[834] = (void *) &cdat->dsym_679__OSLOT_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_679__OSLOT_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16239,7 +16329,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_680__OSLOT_FIELD*/
- /*_.VALSTR___V833*/ meltfptr[832] = (void *) &cdat->dstr_680__OSLOT_FIELD;
+ /*_.VALSTR___V836*/ meltfptr[835] = (void *) &cdat->dstr_680__OSLOT_FIELD;
cdat->dstr_680__OSLOT_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_680__OSLOT_FIELD.val,
@@ -16248,7 +16338,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_681__OSLOT_FIELD*/
-/*_.VALDATA___V823*/ meltfptr[822] = (void *) &cdat->dobj_681__OSLOT_FIELD;
+/*_.VALDATA___V826*/ meltfptr[825] = (void *) &cdat->dobj_681__OSLOT_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_681__OSLOT_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16261,12 +16351,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_681__OSLOT_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_681__OSLOT_FIELD.obj_num = 3;
- cdat->dobj_681__OSLOT_FIELD.obj_hash = 1015628074;
+ cdat->dobj_681__OSLOT_FIELD.obj_hash = 230917589;
cdat->dobj_681__OSLOT_FIELD.obj_len = 4;
/*inistring dstr_682__OSLOT_FIELD*/
- /*_.VALSTR___V824*/ meltfptr[823] = (void *) &cdat->dstr_682__OSLOT_FIELD;
+ /*_.VALSTR___V827*/ meltfptr[826] = (void *) &cdat->dstr_682__OSLOT_FIELD;
cdat->dstr_682__OSLOT_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_682__OSLOT_FIELD.val,
@@ -16274,9 +16364,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_682__OSLOT_FIELD.val) - 1);
/*iniobj dsym_683__OSLOT_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V834*/ meltfptr[833])
- /*_.VALDATA___V834*/
- meltfptr[833] = (void *) &cdat->dsym_683__OSLOT_VALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V837*/ meltfptr[836])
+ /*_.VALDATA___V837*/
+ meltfptr[836] = (void *) &cdat->dsym_683__OSLOT_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_683__OSLOT_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16293,7 +16383,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_684__OSLOT_VALUE*/
- /*_.VALSTR___V835*/ meltfptr[834] = (void *) &cdat->dstr_684__OSLOT_VALUE;
+ /*_.VALSTR___V838*/ meltfptr[837] = (void *) &cdat->dstr_684__OSLOT_VALUE;
cdat->dstr_684__OSLOT_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_684__OSLOT_VALUE.val,
@@ -16302,7 +16392,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_685__OSLOT_VALUE*/
-/*_.VALDATA___V825*/ meltfptr[824] = (void *) &cdat->dobj_685__OSLOT_VALUE;
+/*_.VALDATA___V828*/ meltfptr[827] = (void *) &cdat->dobj_685__OSLOT_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_685__OSLOT_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16315,12 +16405,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_685__OSLOT_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_685__OSLOT_VALUE.obj_num = 4;
- cdat->dobj_685__OSLOT_VALUE.obj_hash = 368439209;
+ cdat->dobj_685__OSLOT_VALUE.obj_hash = 166375117;
cdat->dobj_685__OSLOT_VALUE.obj_len = 4;
/*inistring dstr_686__OSLOT_VALUE*/
- /*_.VALSTR___V826*/ meltfptr[825] = (void *) &cdat->dstr_686__OSLOT_VALUE;
+ /*_.VALSTR___V829*/ meltfptr[828] = (void *) &cdat->dstr_686__OSLOT_VALUE;
cdat->dstr_686__OSLOT_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_686__OSLOT_VALUE.val,
@@ -16328,9 +16418,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_686__OSLOT_VALUE.val) - 1);
/*iniobj dsym_687__CLASS_OBJGETSLOT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V836*/ meltfptr[835])
- /*_.VALDATA___V836*/
- meltfptr[835] = (void *) &cdat->dsym_687__CLASS_OBJGETSLOT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V839*/ meltfptr[838])
+ /*_.VALDATA___V839*/
+ meltfptr[838] = (void *) &cdat->dsym_687__CLASS_OBJGETSLOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_687__CLASS_OBJGETSLOT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16347,7 +16437,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_688__CLASS_OBJGETSLOT*/
- /*_.VALSTR___V837*/ meltfptr[836] =
+ /*_.VALSTR___V840*/ meltfptr[839] =
(void *) &cdat->dstr_688__CLASS_OBJGETSLOT;
cdat->dstr_688__CLASS_OBJGETSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16358,7 +16448,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:452:/ iniobj");
/*iniobj dobj_689__CLASS_OBJGETSLOT*/
-/*_.VALDATA___V838*/ meltfptr[837] =
+/*_.VALDATA___V841*/ meltfptr[840] =
(void *) &cdat->dobj_689__CLASS_OBJGETSLOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_689__CLASS_OBJGETSLOT",
@@ -16372,12 +16462,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_689__CLASS_OBJGETSLOT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_689__CLASS_OBJGETSLOT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_689__CLASS_OBJGETSLOT.obj_hash = 45606063;
+ cdat->dobj_689__CLASS_OBJGETSLOT.obj_hash = 403011986;
cdat->dobj_689__CLASS_OBJGETSLOT.obj_len = 8;
/*inistring dstr_690__CLASS_OBJGETSLOT*/
- /*_.VALSTR___V839*/ meltfptr[838] =
+ /*_.VALSTR___V842*/ meltfptr[841] =
(void *) &cdat->dstr_690__CLASS_OBJGETSLOT;
cdat->dstr_690__CLASS_OBJGETSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16386,22 +16476,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_690__CLASS_OBJGETSLOT.
val) - 1);
/*inimult dtup_691__CLASS_OBJGETSLOT */
- /*_.VALTUP___V840*/ meltfptr[839] =
+ /*_.VALTUP___V843*/ meltfptr[842] =
(void *) &cdat->dtup_691__CLASS_OBJGETSLOT;
cdat->dtup_691__CLASS_OBJGETSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_691__CLASS_OBJGETSLOT.nbval = 4;
/*inimult dtup_692__CLASS_OBJGETSLOT */
- /*_.VALTUP___V845*/ meltfptr[844] =
+ /*_.VALTUP___V848*/ meltfptr[847] =
(void *) &cdat->dtup_692__CLASS_OBJGETSLOT;
cdat->dtup_692__CLASS_OBJGETSLOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_692__CLASS_OBJGETSLOT.nbval = 4;
/*iniobj dsym_693__OGETSL_OBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V846*/ meltfptr[845])
- /*_.VALDATA___V846*/
- meltfptr[845] = (void *) &cdat->dsym_693__OGETSL_OBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V849*/ meltfptr[848])
+ /*_.VALDATA___V849*/
+ meltfptr[848] = (void *) &cdat->dsym_693__OGETSL_OBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_693__OGETSL_OBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16418,7 +16508,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_694__OGETSL_OBJ*/
- /*_.VALSTR___V847*/ meltfptr[846] = (void *) &cdat->dstr_694__OGETSL_OBJ;
+ /*_.VALSTR___V850*/ meltfptr[849] = (void *) &cdat->dstr_694__OGETSL_OBJ;
cdat->dstr_694__OGETSL_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_694__OGETSL_OBJ.val, "OGETSL_OBJ",
@@ -16426,7 +16516,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_695__OGETSL_OBJ*/
-/*_.VALDATA___V841*/ meltfptr[840] = (void *) &cdat->dobj_695__OGETSL_OBJ;
+/*_.VALDATA___V844*/ meltfptr[843] = (void *) &cdat->dobj_695__OGETSL_OBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_695__OGETSL_OBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16439,21 +16529,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_695__OGETSL_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_695__OGETSL_OBJ.obj_num = 2;
- cdat->dobj_695__OGETSL_OBJ.obj_hash = 741810748;
+ cdat->dobj_695__OGETSL_OBJ.obj_hash = 607947941;
cdat->dobj_695__OGETSL_OBJ.obj_len = 4;
/*inistring dstr_696__OGETSL_OBJ*/
- /*_.VALSTR___V842*/ meltfptr[841] = (void *) &cdat->dstr_696__OGETSL_OBJ;
+ /*_.VALSTR___V845*/ meltfptr[844] = (void *) &cdat->dstr_696__OGETSL_OBJ;
cdat->dstr_696__OGETSL_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_696__OGETSL_OBJ.val, "OGETSL_OBJ",
sizeof (cdat->dstr_696__OGETSL_OBJ.val) - 1);
/*iniobj dsym_697__OGETSL_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V848*/ meltfptr[847])
- /*_.VALDATA___V848*/
- meltfptr[847] = (void *) &cdat->dsym_697__OGETSL_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V851*/ meltfptr[850])
+ /*_.VALDATA___V851*/
+ meltfptr[850] = (void *) &cdat->dsym_697__OGETSL_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_697__OGETSL_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16470,7 +16560,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_698__OGETSL_FIELD*/
- /*_.VALSTR___V849*/ meltfptr[848] = (void *) &cdat->dstr_698__OGETSL_FIELD;
+ /*_.VALSTR___V852*/ meltfptr[851] = (void *) &cdat->dstr_698__OGETSL_FIELD;
cdat->dstr_698__OGETSL_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_698__OGETSL_FIELD.val,
@@ -16480,7 +16570,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_699__OGETSL_FIELD*/
-/*_.VALDATA___V843*/ meltfptr[842] = (void *) &cdat->dobj_699__OGETSL_FIELD;
+/*_.VALDATA___V846*/ meltfptr[845] = (void *) &cdat->dobj_699__OGETSL_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_699__OGETSL_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16493,12 +16583,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_699__OGETSL_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_699__OGETSL_FIELD.obj_num = 3;
- cdat->dobj_699__OGETSL_FIELD.obj_hash = 1009414693;
+ cdat->dobj_699__OGETSL_FIELD.obj_hash = 483810972;
cdat->dobj_699__OGETSL_FIELD.obj_len = 4;
/*inistring dstr_700__OGETSL_FIELD*/
- /*_.VALSTR___V844*/ meltfptr[843] = (void *) &cdat->dstr_700__OGETSL_FIELD;
+ /*_.VALSTR___V847*/ meltfptr[846] = (void *) &cdat->dstr_700__OGETSL_FIELD;
cdat->dstr_700__OGETSL_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_700__OGETSL_FIELD.val,
@@ -16507,9 +16597,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_701__CLASS_OBJPUTCLOSUROUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V850*/ meltfptr[849])
- /*_.VALDATA___V850*/
- meltfptr[849] = (void *) &cdat->dsym_701__CLASS_OBJPUTCLOSUROUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V853*/ meltfptr[852])
+ /*_.VALDATA___V853*/
+ meltfptr[852] = (void *) &cdat->dsym_701__CLASS_OBJPUTCLOSUROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_701__CLASS_OBJPUTCLOSUROUT",
@@ -16527,7 +16617,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_702__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V851*/ meltfptr[850] =
+ /*_.VALSTR___V854*/ meltfptr[853] =
(void *) &cdat->dstr_702__CLASS_OBJPUTCLOS;
cdat->dstr_702__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16538,7 +16628,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:459:/ iniobj");
/*iniobj dobj_703__CLASS_OBJPUTCLOSUROUT*/
-/*_.VALDATA___V852*/ meltfptr[851] =
+/*_.VALDATA___V855*/ meltfptr[854] =
(void *) &cdat->dobj_703__CLASS_OBJPUTCLOSUROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -16553,12 +16643,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_703__CLASS_OBJPUTCLOSUROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_703__CLASS_OBJPUTCLOSUROUT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_703__CLASS_OBJPUTCLOSUROUT.obj_hash = 272487417;
+ cdat->dobj_703__CLASS_OBJPUTCLOSUROUT.obj_hash = 476876334;
cdat->dobj_703__CLASS_OBJPUTCLOSUROUT.obj_len = 8;
/*inistring dstr_704__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V853*/ meltfptr[852] =
+ /*_.VALSTR___V856*/ meltfptr[855] =
(void *) &cdat->dstr_704__CLASS_OBJPUTCLOS;
cdat->dstr_704__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16567,22 +16657,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_704__CLASS_OBJPUTCLOS.
val) - 1);
/*inimult dtup_705__CLASS_OBJPUTCLOSUROUT */
- /*_.VALTUP___V854*/ meltfptr[853] =
+ /*_.VALTUP___V857*/ meltfptr[856] =
(void *) &cdat->dtup_705__CLASS_OBJPUTCLOSUROUT;
cdat->dtup_705__CLASS_OBJPUTCLOSUROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_705__CLASS_OBJPUTCLOSUROUT.nbval = 3;
/*inimult dtup_706__CLASS_OBJPUTCLOSUROUT */
- /*_.VALTUP___V859*/ meltfptr[858] =
+ /*_.VALTUP___V862*/ meltfptr[861] =
(void *) &cdat->dtup_706__CLASS_OBJPUTCLOSUROUT;
cdat->dtup_706__CLASS_OBJPUTCLOSUROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_706__CLASS_OBJPUTCLOSUROUT.nbval = 3;
/*iniobj dsym_707__OPCLOR_CLOS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V860*/ meltfptr[859])
- /*_.VALDATA___V860*/
- meltfptr[859] = (void *) &cdat->dsym_707__OPCLOR_CLOS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V863*/ meltfptr[862])
+ /*_.VALDATA___V863*/
+ meltfptr[862] = (void *) &cdat->dsym_707__OPCLOR_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_707__OPCLOR_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16599,7 +16689,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_708__OPCLOR_CLOS*/
- /*_.VALSTR___V861*/ meltfptr[860] = (void *) &cdat->dstr_708__OPCLOR_CLOS;
+ /*_.VALSTR___V864*/ meltfptr[863] = (void *) &cdat->dstr_708__OPCLOR_CLOS;
cdat->dstr_708__OPCLOR_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_708__OPCLOR_CLOS.val,
@@ -16608,7 +16698,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_709__OPCLOR_CLOS*/
-/*_.VALDATA___V855*/ meltfptr[854] = (void *) &cdat->dobj_709__OPCLOR_CLOS;
+/*_.VALDATA___V858*/ meltfptr[857] = (void *) &cdat->dobj_709__OPCLOR_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_709__OPCLOR_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16621,12 +16711,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_709__OPCLOR_CLOS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_709__OPCLOR_CLOS.obj_num = 1;
- cdat->dobj_709__OPCLOR_CLOS.obj_hash = 372908211;
+ cdat->dobj_709__OPCLOR_CLOS.obj_hash = 893133541;
cdat->dobj_709__OPCLOR_CLOS.obj_len = 4;
/*inistring dstr_710__OPCLOR_CLOS*/
- /*_.VALSTR___V856*/ meltfptr[855] = (void *) &cdat->dstr_710__OPCLOR_CLOS;
+ /*_.VALSTR___V859*/ meltfptr[858] = (void *) &cdat->dstr_710__OPCLOR_CLOS;
cdat->dstr_710__OPCLOR_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_710__OPCLOR_CLOS.val,
@@ -16634,9 +16724,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_710__OPCLOR_CLOS.val) - 1);
/*iniobj dsym_711__OPCLOR_ROUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V862*/ meltfptr[861])
- /*_.VALDATA___V862*/
- meltfptr[861] = (void *) &cdat->dsym_711__OPCLOR_ROUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V865*/ meltfptr[864])
+ /*_.VALDATA___V865*/
+ meltfptr[864] = (void *) &cdat->dsym_711__OPCLOR_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_711__OPCLOR_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16653,7 +16743,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_712__OPCLOR_ROUT*/
- /*_.VALSTR___V863*/ meltfptr[862] = (void *) &cdat->dstr_712__OPCLOR_ROUT;
+ /*_.VALSTR___V866*/ meltfptr[865] = (void *) &cdat->dstr_712__OPCLOR_ROUT;
cdat->dstr_712__OPCLOR_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_712__OPCLOR_ROUT.val,
@@ -16662,7 +16752,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_713__OPCLOR_ROUT*/
-/*_.VALDATA___V857*/ meltfptr[856] = (void *) &cdat->dobj_713__OPCLOR_ROUT;
+/*_.VALDATA___V860*/ meltfptr[859] = (void *) &cdat->dobj_713__OPCLOR_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_713__OPCLOR_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16675,12 +16765,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_713__OPCLOR_ROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_713__OPCLOR_ROUT.obj_num = 2;
- cdat->dobj_713__OPCLOR_ROUT.obj_hash = 866276697;
+ cdat->dobj_713__OPCLOR_ROUT.obj_hash = 721233985;
cdat->dobj_713__OPCLOR_ROUT.obj_len = 4;
/*inistring dstr_714__OPCLOR_ROUT*/
- /*_.VALSTR___V858*/ meltfptr[857] = (void *) &cdat->dstr_714__OPCLOR_ROUT;
+ /*_.VALSTR___V861*/ meltfptr[860] = (void *) &cdat->dstr_714__OPCLOR_ROUT;
cdat->dstr_714__OPCLOR_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_714__OPCLOR_ROUT.val,
@@ -16688,9 +16778,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_714__OPCLOR_ROUT.val) - 1);
/*iniobj dsym_715__CLASS_OBJPUTCLOSEDV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V864*/ meltfptr[863])
- /*_.VALDATA___V864*/
- meltfptr[863] = (void *) &cdat->dsym_715__CLASS_OBJPUTCLOSEDV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V867*/ meltfptr[866])
+ /*_.VALDATA___V867*/
+ meltfptr[866] = (void *) &cdat->dsym_715__CLASS_OBJPUTCLOSEDV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_715__CLASS_OBJPUTCLOSEDV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16707,7 +16797,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_716__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V865*/ meltfptr[864] =
+ /*_.VALSTR___V868*/ meltfptr[867] =
(void *) &cdat->dstr_716__CLASS_OBJPUTCLOS;
cdat->dstr_716__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16718,7 +16808,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:466:/ iniobj");
/*iniobj dobj_717__CLASS_OBJPUTCLOSEDV*/
-/*_.VALDATA___V866*/ meltfptr[865] =
+/*_.VALDATA___V869*/ meltfptr[868] =
(void *) &cdat->dobj_717__CLASS_OBJPUTCLOSEDV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_717__CLASS_OBJPUTCLOSEDV",
@@ -16732,12 +16822,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_717__CLASS_OBJPUTCLOSEDV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_717__CLASS_OBJPUTCLOSEDV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_717__CLASS_OBJPUTCLOSEDV.obj_hash = 956491007;
+ cdat->dobj_717__CLASS_OBJPUTCLOSEDV.obj_hash = 430007770;
cdat->dobj_717__CLASS_OBJPUTCLOSEDV.obj_len = 8;
/*inistring dstr_718__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V867*/ meltfptr[866] =
+ /*_.VALSTR___V870*/ meltfptr[869] =
(void *) &cdat->dstr_718__CLASS_OBJPUTCLOS;
cdat->dstr_718__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16746,22 +16836,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_718__CLASS_OBJPUTCLOS.
val) - 1);
/*inimult dtup_719__CLASS_OBJPUTCLOSEDV */
- /*_.VALTUP___V868*/ meltfptr[867] =
+ /*_.VALTUP___V871*/ meltfptr[870] =
(void *) &cdat->dtup_719__CLASS_OBJPUTCLOSEDV;
cdat->dtup_719__CLASS_OBJPUTCLOSEDV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_719__CLASS_OBJPUTCLOSEDV.nbval = 3;
/*inimult dtup_720__CLASS_OBJPUTCLOSEDV */
- /*_.VALTUP___V875*/ meltfptr[874] =
+ /*_.VALTUP___V878*/ meltfptr[877] =
(void *) &cdat->dtup_720__CLASS_OBJPUTCLOSEDV;
cdat->dtup_720__CLASS_OBJPUTCLOSEDV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_720__CLASS_OBJPUTCLOSEDV.nbval = 4;
/*iniobj dsym_721__OPCLOV_CLOS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V876*/ meltfptr[875])
- /*_.VALDATA___V876*/
- meltfptr[875] = (void *) &cdat->dsym_721__OPCLOV_CLOS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V879*/ meltfptr[878])
+ /*_.VALDATA___V879*/
+ meltfptr[878] = (void *) &cdat->dsym_721__OPCLOV_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_721__OPCLOV_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16778,7 +16868,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_722__OPCLOV_CLOS*/
- /*_.VALSTR___V877*/ meltfptr[876] = (void *) &cdat->dstr_722__OPCLOV_CLOS;
+ /*_.VALSTR___V880*/ meltfptr[879] = (void *) &cdat->dstr_722__OPCLOV_CLOS;
cdat->dstr_722__OPCLOV_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_722__OPCLOV_CLOS.val,
@@ -16787,7 +16877,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_723__OPCLOV_CLOS*/
-/*_.VALDATA___V869*/ meltfptr[868] = (void *) &cdat->dobj_723__OPCLOV_CLOS;
+/*_.VALDATA___V872*/ meltfptr[871] = (void *) &cdat->dobj_723__OPCLOV_CLOS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_723__OPCLOV_CLOS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16800,12 +16890,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_723__OPCLOV_CLOS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_723__OPCLOV_CLOS.obj_num = 1;
- cdat->dobj_723__OPCLOV_CLOS.obj_hash = 427572235;
+ cdat->dobj_723__OPCLOV_CLOS.obj_hash = 855187088;
cdat->dobj_723__OPCLOV_CLOS.obj_len = 4;
/*inistring dstr_724__OPCLOV_CLOS*/
- /*_.VALSTR___V870*/ meltfptr[869] = (void *) &cdat->dstr_724__OPCLOV_CLOS;
+ /*_.VALSTR___V873*/ meltfptr[872] = (void *) &cdat->dstr_724__OPCLOV_CLOS;
cdat->dstr_724__OPCLOV_CLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_724__OPCLOV_CLOS.val,
@@ -16813,9 +16903,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_724__OPCLOV_CLOS.val) - 1);
/*iniobj dsym_725__OPCLOV_OFF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V878*/ meltfptr[877])
- /*_.VALDATA___V878*/
- meltfptr[877] = (void *) &cdat->dsym_725__OPCLOV_OFF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V881*/ meltfptr[880])
+ /*_.VALDATA___V881*/
+ meltfptr[880] = (void *) &cdat->dsym_725__OPCLOV_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_725__OPCLOV_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16832,7 +16922,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_726__OPCLOV_OFF*/
- /*_.VALSTR___V879*/ meltfptr[878] = (void *) &cdat->dstr_726__OPCLOV_OFF;
+ /*_.VALSTR___V882*/ meltfptr[881] = (void *) &cdat->dstr_726__OPCLOV_OFF;
cdat->dstr_726__OPCLOV_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_726__OPCLOV_OFF.val, "OPCLOV_OFF",
@@ -16840,7 +16930,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_727__OPCLOV_OFF*/
-/*_.VALDATA___V871*/ meltfptr[870] = (void *) &cdat->dobj_727__OPCLOV_OFF;
+/*_.VALDATA___V874*/ meltfptr[873] = (void *) &cdat->dobj_727__OPCLOV_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_727__OPCLOV_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16853,21 +16943,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_727__OPCLOV_OFF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_727__OPCLOV_OFF.obj_num = 2;
- cdat->dobj_727__OPCLOV_OFF.obj_hash = 517787481;
+ cdat->dobj_727__OPCLOV_OFF.obj_hash = 342587311;
cdat->dobj_727__OPCLOV_OFF.obj_len = 4;
/*inistring dstr_728__OPCLOV_OFF*/
- /*_.VALSTR___V872*/ meltfptr[871] = (void *) &cdat->dstr_728__OPCLOV_OFF;
+ /*_.VALSTR___V875*/ meltfptr[874] = (void *) &cdat->dstr_728__OPCLOV_OFF;
cdat->dstr_728__OPCLOV_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_728__OPCLOV_OFF.val, "OPCLOV_OFF",
sizeof (cdat->dstr_728__OPCLOV_OFF.val) - 1);
/*iniobj dsym_729__OPCLOV_CVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V880*/ meltfptr[879])
- /*_.VALDATA___V880*/
- meltfptr[879] = (void *) &cdat->dsym_729__OPCLOV_CVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V883*/ meltfptr[882])
+ /*_.VALDATA___V883*/
+ meltfptr[882] = (void *) &cdat->dsym_729__OPCLOV_CVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_729__OPCLOV_CVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -16884,7 +16974,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_730__OPCLOV_CVAL*/
- /*_.VALSTR___V881*/ meltfptr[880] = (void *) &cdat->dstr_730__OPCLOV_CVAL;
+ /*_.VALSTR___V884*/ meltfptr[883] = (void *) &cdat->dstr_730__OPCLOV_CVAL;
cdat->dstr_730__OPCLOV_CVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_730__OPCLOV_CVAL.val,
@@ -16893,7 +16983,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_731__OPCLOV_CVAL*/
-/*_.VALDATA___V873*/ meltfptr[872] = (void *) &cdat->dobj_731__OPCLOV_CVAL;
+/*_.VALDATA___V876*/ meltfptr[875] = (void *) &cdat->dobj_731__OPCLOV_CVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_731__OPCLOV_CVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -16906,12 +16996,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_731__OPCLOV_CVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_731__OPCLOV_CVAL.obj_num = 3;
- cdat->dobj_731__OPCLOV_CVAL.obj_hash = 521914560;
+ cdat->dobj_731__OPCLOV_CVAL.obj_hash = 505492369;
cdat->dobj_731__OPCLOV_CVAL.obj_len = 4;
/*inistring dstr_732__OPCLOV_CVAL*/
- /*_.VALSTR___V874*/ meltfptr[873] = (void *) &cdat->dstr_732__OPCLOV_CVAL;
+ /*_.VALSTR___V877*/ meltfptr[876] = (void *) &cdat->dstr_732__OPCLOV_CVAL;
cdat->dstr_732__OPCLOV_CVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_732__OPCLOV_CVAL.val,
@@ -16919,9 +17009,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_732__OPCLOV_CVAL.val) - 1);
/*iniobj dsym_733__CLASS_OBJPUTCLOSEDNOTNULLV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V882*/ meltfptr[881])
- /*_.VALDATA___V882*/
- meltfptr[881] = (void *) &cdat->dsym_733__CLASS_OBJPUTCLOSEDNOTNULLV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V885*/ meltfptr[884])
+ /*_.VALDATA___V885*/
+ meltfptr[884] = (void *) &cdat->dsym_733__CLASS_OBJPUTCLOSEDNOTNULLV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_733__CLASS_OBJPUTCLOSEDNOTNULLV",
@@ -16939,7 +17029,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_734__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V883*/ meltfptr[882] =
+ /*_.VALSTR___V886*/ meltfptr[885] =
(void *) &cdat->dstr_734__CLASS_OBJPUTCLOS;
cdat->dstr_734__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16950,7 +17040,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:474:/ iniobj");
/*iniobj dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV*/
-/*_.VALDATA___V884*/ meltfptr[883] =
+/*_.VALDATA___V887*/ meltfptr[886] =
(void *) &cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -16965,12 +17055,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 303418964;
+ cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 280586215;
cdat->dobj_735__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 8;
/*inistring dstr_736__CLASS_OBJPUTCLOS*/
- /*_.VALSTR___V885*/ meltfptr[884] =
+ /*_.VALSTR___V888*/ meltfptr[887] =
(void *) &cdat->dstr_736__CLASS_OBJPUTCLOS;
cdat->dstr_736__CLASS_OBJPUTCLOS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -16979,22 +17069,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_736__CLASS_OBJPUTCLOS.
val) - 1);
/*inimult dtup_737__CLASS_OBJPUTCLOSEDNOTNULLV */
- /*_.VALTUP___V886*/ meltfptr[885] =
+ /*_.VALTUP___V889*/ meltfptr[888] =
(void *) &cdat->dtup_737__CLASS_OBJPUTCLOSEDNOTNULLV;
cdat->dtup_737__CLASS_OBJPUTCLOSEDNOTNULLV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_737__CLASS_OBJPUTCLOSEDNOTNULLV.nbval = 4;
/*inimult dtup_738__CLASS_OBJPUTCLOSEDNOTNULLV */
- /*_.VALTUP___V887*/ meltfptr[886] =
+ /*_.VALTUP___V890*/ meltfptr[889] =
(void *) &cdat->dtup_738__CLASS_OBJPUTCLOSEDNOTNULLV;
cdat->dtup_738__CLASS_OBJPUTCLOSEDNOTNULLV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_738__CLASS_OBJPUTCLOSEDNOTNULLV.nbval = 4;
/*iniobj dsym_739__CLASS_OBJPUTROUTCONST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V888*/ meltfptr[887])
- /*_.VALDATA___V888*/
- meltfptr[887] = (void *) &cdat->dsym_739__CLASS_OBJPUTROUTCONST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V891*/ meltfptr[890])
+ /*_.VALDATA___V891*/
+ meltfptr[890] = (void *) &cdat->dsym_739__CLASS_OBJPUTROUTCONST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_739__CLASS_OBJPUTROUTCONST",
@@ -17012,7 +17102,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_740__CLASS_OBJPUTROUT*/
- /*_.VALSTR___V889*/ meltfptr[888] =
+ /*_.VALSTR___V892*/ meltfptr[891] =
(void *) &cdat->dstr_740__CLASS_OBJPUTROUT;
cdat->dstr_740__CLASS_OBJPUTROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17023,7 +17113,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:480:/ iniobj");
/*iniobj dobj_741__CLASS_OBJPUTROUTCONST*/
-/*_.VALDATA___V890*/ meltfptr[889] =
+/*_.VALDATA___V893*/ meltfptr[892] =
(void *) &cdat->dobj_741__CLASS_OBJPUTROUTCONST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -17038,12 +17128,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_741__CLASS_OBJPUTROUTCONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_741__CLASS_OBJPUTROUTCONST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_741__CLASS_OBJPUTROUTCONST.obj_hash = 494034829;
+ cdat->dobj_741__CLASS_OBJPUTROUTCONST.obj_hash = 39557258;
cdat->dobj_741__CLASS_OBJPUTROUTCONST.obj_len = 8;
/*inistring dstr_742__CLASS_OBJPUTROUT*/
- /*_.VALSTR___V891*/ meltfptr[890] =
+ /*_.VALSTR___V894*/ meltfptr[893] =
(void *) &cdat->dstr_742__CLASS_OBJPUTROUT;
cdat->dstr_742__CLASS_OBJPUTROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17052,22 +17142,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_742__CLASS_OBJPUTROUT.
val) - 1);
/*inimult dtup_743__CLASS_OBJPUTROUTCONST */
- /*_.VALTUP___V892*/ meltfptr[891] =
+ /*_.VALTUP___V895*/ meltfptr[894] =
(void *) &cdat->dtup_743__CLASS_OBJPUTROUTCONST;
cdat->dtup_743__CLASS_OBJPUTROUTCONST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_743__CLASS_OBJPUTROUTCONST.nbval = 3;
/*inimult dtup_744__CLASS_OBJPUTROUTCONST */
- /*_.VALTUP___V899*/ meltfptr[898] =
+ /*_.VALTUP___V902*/ meltfptr[901] =
(void *) &cdat->dtup_744__CLASS_OBJPUTROUTCONST;
cdat->dtup_744__CLASS_OBJPUTROUTCONST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_744__CLASS_OBJPUTROUTCONST.nbval = 4;
/*iniobj dsym_745__OPRCONST_ROUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V900*/ meltfptr[899])
- /*_.VALDATA___V900*/
- meltfptr[899] = (void *) &cdat->dsym_745__OPRCONST_ROUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V903*/ meltfptr[902])
+ /*_.VALDATA___V903*/
+ meltfptr[902] = (void *) &cdat->dsym_745__OPRCONST_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_745__OPRCONST_ROUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17084,7 +17174,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_746__OPRCONST_ROUT*/
- /*_.VALSTR___V901*/ meltfptr[900] = (void *) &cdat->dstr_746__OPRCONST_ROUT;
+ /*_.VALSTR___V904*/ meltfptr[903] = (void *) &cdat->dstr_746__OPRCONST_ROUT;
cdat->dstr_746__OPRCONST_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_746__OPRCONST_ROUT.val,
@@ -17094,7 +17184,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_747__OPRCONST_ROUT*/
-/*_.VALDATA___V893*/ meltfptr[892] =
+/*_.VALDATA___V896*/ meltfptr[895] =
(void *) &cdat->dobj_747__OPRCONST_ROUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_747__OPRCONST_ROUT",
@@ -17108,12 +17198,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_747__OPRCONST_ROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_747__OPRCONST_ROUT.obj_num = 1;
- cdat->dobj_747__OPRCONST_ROUT.obj_hash = 707991564;
+ cdat->dobj_747__OPRCONST_ROUT.obj_hash = 847023918;
cdat->dobj_747__OPRCONST_ROUT.obj_len = 4;
/*inistring dstr_748__OPRCONST_ROUT*/
- /*_.VALSTR___V894*/ meltfptr[893] = (void *) &cdat->dstr_748__OPRCONST_ROUT;
+ /*_.VALSTR___V897*/ meltfptr[896] = (void *) &cdat->dstr_748__OPRCONST_ROUT;
cdat->dstr_748__OPRCONST_ROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_748__OPRCONST_ROUT.val,
@@ -17122,9 +17212,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_749__OPRCONST_OFF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V902*/ meltfptr[901])
- /*_.VALDATA___V902*/
- meltfptr[901] = (void *) &cdat->dsym_749__OPRCONST_OFF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V905*/ meltfptr[904])
+ /*_.VALDATA___V905*/
+ meltfptr[904] = (void *) &cdat->dsym_749__OPRCONST_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_749__OPRCONST_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17141,7 +17231,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_750__OPRCONST_OFF*/
- /*_.VALSTR___V903*/ meltfptr[902] = (void *) &cdat->dstr_750__OPRCONST_OFF;
+ /*_.VALSTR___V906*/ meltfptr[905] = (void *) &cdat->dstr_750__OPRCONST_OFF;
cdat->dstr_750__OPRCONST_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_750__OPRCONST_OFF.val,
@@ -17151,7 +17241,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_751__OPRCONST_OFF*/
-/*_.VALDATA___V895*/ meltfptr[894] = (void *) &cdat->dobj_751__OPRCONST_OFF;
+/*_.VALDATA___V898*/ meltfptr[897] = (void *) &cdat->dobj_751__OPRCONST_OFF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_751__OPRCONST_OFF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17164,12 +17254,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_751__OPRCONST_OFF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_751__OPRCONST_OFF.obj_num = 2;
- cdat->dobj_751__OPRCONST_OFF.obj_hash = 947010446;
+ cdat->dobj_751__OPRCONST_OFF.obj_hash = 460455825;
cdat->dobj_751__OPRCONST_OFF.obj_len = 4;
/*inistring dstr_752__OPRCONST_OFF*/
- /*_.VALSTR___V896*/ meltfptr[895] = (void *) &cdat->dstr_752__OPRCONST_OFF;
+ /*_.VALSTR___V899*/ meltfptr[898] = (void *) &cdat->dstr_752__OPRCONST_OFF;
cdat->dstr_752__OPRCONST_OFF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_752__OPRCONST_OFF.val,
@@ -17178,9 +17268,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_753__OPRCONST_CVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V904*/ meltfptr[903])
- /*_.VALDATA___V904*/
- meltfptr[903] = (void *) &cdat->dsym_753__OPRCONST_CVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V907*/ meltfptr[906])
+ /*_.VALDATA___V907*/
+ meltfptr[906] = (void *) &cdat->dsym_753__OPRCONST_CVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_753__OPRCONST_CVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17197,7 +17287,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_754__OPRCONST_CVAL*/
- /*_.VALSTR___V905*/ meltfptr[904] = (void *) &cdat->dstr_754__OPRCONST_CVAL;
+ /*_.VALSTR___V908*/ meltfptr[907] = (void *) &cdat->dstr_754__OPRCONST_CVAL;
cdat->dstr_754__OPRCONST_CVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_754__OPRCONST_CVAL.val,
@@ -17207,7 +17297,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_755__OPRCONST_CVAL*/
-/*_.VALDATA___V897*/ meltfptr[896] =
+/*_.VALDATA___V900*/ meltfptr[899] =
(void *) &cdat->dobj_755__OPRCONST_CVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_755__OPRCONST_CVAL",
@@ -17221,12 +17311,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_755__OPRCONST_CVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_755__OPRCONST_CVAL.obj_num = 3;
- cdat->dobj_755__OPRCONST_CVAL.obj_hash = 404493362;
+ cdat->dobj_755__OPRCONST_CVAL.obj_hash = 989424806;
cdat->dobj_755__OPRCONST_CVAL.obj_len = 4;
/*inistring dstr_756__OPRCONST_CVAL*/
- /*_.VALSTR___V898*/ meltfptr[897] = (void *) &cdat->dstr_756__OPRCONST_CVAL;
+ /*_.VALSTR___V901*/ meltfptr[900] = (void *) &cdat->dstr_756__OPRCONST_CVAL;
cdat->dstr_756__OPRCONST_CVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_756__OPRCONST_CVAL.val,
@@ -17235,9 +17325,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_757__CLASS_OBJPUTROUTCONSTNOTNULL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V906*/ meltfptr[905])
- /*_.VALDATA___V906*/
- meltfptr[905] = (void *) &cdat->dsym_757__CLASS_OBJPUTROUTCONSTNOTNULL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V909*/ meltfptr[908])
+ /*_.VALDATA___V909*/
+ meltfptr[908] = (void *) &cdat->dsym_757__CLASS_OBJPUTROUTCONSTNOTNULL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_757__CLASS_OBJPUTROUTCONSTNOTNULL",
@@ -17255,7 +17345,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_758__CLASS_OBJPUTROUT*/
- /*_.VALSTR___V907*/ meltfptr[906] =
+ /*_.VALSTR___V910*/ meltfptr[909] =
(void *) &cdat->dstr_758__CLASS_OBJPUTROUT;
cdat->dstr_758__CLASS_OBJPUTROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17266,7 +17356,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:488:/ iniobj");
/*iniobj dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL*/
-/*_.VALDATA___V908*/ meltfptr[907] =
+/*_.VALDATA___V911*/ meltfptr[910] =
(void *) &cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -17281,12 +17371,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 794452488;
+ cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 641725606;
cdat->dobj_759__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 8;
/*inistring dstr_760__CLASS_OBJPUTROUT*/
- /*_.VALSTR___V909*/ meltfptr[908] =
+ /*_.VALSTR___V912*/ meltfptr[911] =
(void *) &cdat->dstr_760__CLASS_OBJPUTROUT;
cdat->dstr_760__CLASS_OBJPUTROUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17295,22 +17385,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_760__CLASS_OBJPUTROUT.
val) - 1);
/*inimult dtup_761__CLASS_OBJPUTROUTCONSTNOTNULL */
- /*_.VALTUP___V910*/ meltfptr[909] =
+ /*_.VALTUP___V913*/ meltfptr[912] =
(void *) &cdat->dtup_761__CLASS_OBJPUTROUTCONSTNOTNULL;
cdat->dtup_761__CLASS_OBJPUTROUTCONSTNOTNULL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_761__CLASS_OBJPUTROUTCONSTNOTNULL.nbval = 4;
/*inimult dtup_762__CLASS_OBJPUTROUTCONSTNOTNULL */
- /*_.VALTUP___V911*/ meltfptr[910] =
+ /*_.VALTUP___V914*/ meltfptr[913] =
(void *) &cdat->dtup_762__CLASS_OBJPUTROUTCONSTNOTNULL;
cdat->dtup_762__CLASS_OBJPUTROUTCONSTNOTNULL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_762__CLASS_OBJPUTROUTCONSTNOTNULL.nbval = 4;
/*iniobj dsym_763__CLASS_OBJTOUCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V912*/ meltfptr[911])
- /*_.VALDATA___V912*/
- meltfptr[911] = (void *) &cdat->dsym_763__CLASS_OBJTOUCH;
+ /*uniqueobj*/ if (! /*_.VALDATA___V915*/ meltfptr[914])
+ /*_.VALDATA___V915*/
+ meltfptr[914] = (void *) &cdat->dsym_763__CLASS_OBJTOUCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_763__CLASS_OBJTOUCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17327,7 +17417,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_764__CLASS_OBJTOUCH*/
- /*_.VALSTR___V913*/ meltfptr[912] =
+ /*_.VALSTR___V916*/ meltfptr[915] =
(void *) &cdat->dstr_764__CLASS_OBJTOUCH;
cdat->dstr_764__CLASS_OBJTOUCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17338,7 +17428,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:494:/ iniobj");
/*iniobj dobj_765__CLASS_OBJTOUCH*/
-/*_.VALDATA___V914*/ meltfptr[913] =
+/*_.VALDATA___V917*/ meltfptr[916] =
(void *) &cdat->dobj_765__CLASS_OBJTOUCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_765__CLASS_OBJTOUCH",
@@ -17352,12 +17442,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_765__CLASS_OBJTOUCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_765__CLASS_OBJTOUCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_765__CLASS_OBJTOUCH.obj_hash = 244614080;
+ cdat->dobj_765__CLASS_OBJTOUCH.obj_hash = 988310303;
cdat->dobj_765__CLASS_OBJTOUCH.obj_len = 8;
/*inistring dstr_766__CLASS_OBJTOUCH*/
- /*_.VALSTR___V915*/ meltfptr[914] =
+ /*_.VALSTR___V918*/ meltfptr[917] =
(void *) &cdat->dstr_766__CLASS_OBJTOUCH;
cdat->dstr_766__CLASS_OBJTOUCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17366,22 +17456,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_766__CLASS_OBJTOUCH.val) -
1);
/*inimult dtup_767__CLASS_OBJTOUCH */
- /*_.VALTUP___V916*/ meltfptr[915] =
+ /*_.VALTUP___V919*/ meltfptr[918] =
(void *) &cdat->dtup_767__CLASS_OBJTOUCH;
cdat->dtup_767__CLASS_OBJTOUCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_767__CLASS_OBJTOUCH.nbval = 3;
/*inimult dtup_768__CLASS_OBJTOUCH */
- /*_.VALTUP___V921*/ meltfptr[920] =
+ /*_.VALTUP___V924*/ meltfptr[923] =
(void *) &cdat->dtup_768__CLASS_OBJTOUCH;
cdat->dtup_768__CLASS_OBJTOUCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_768__CLASS_OBJTOUCH.nbval = 3;
/*iniobj dsym_769__OTOUCH_VAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V922*/ meltfptr[921])
- /*_.VALDATA___V922*/
- meltfptr[921] = (void *) &cdat->dsym_769__OTOUCH_VAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V925*/ meltfptr[924])
+ /*_.VALDATA___V925*/
+ meltfptr[924] = (void *) &cdat->dsym_769__OTOUCH_VAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_769__OTOUCH_VAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17398,7 +17488,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_770__OTOUCH_VAL*/
- /*_.VALSTR___V923*/ meltfptr[922] = (void *) &cdat->dstr_770__OTOUCH_VAL;
+ /*_.VALSTR___V926*/ meltfptr[925] = (void *) &cdat->dstr_770__OTOUCH_VAL;
cdat->dstr_770__OTOUCH_VAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_770__OTOUCH_VAL.val, "OTOUCH_VAL",
@@ -17406,7 +17496,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_771__OTOUCH_VAL*/
-/*_.VALDATA___V917*/ meltfptr[916] = (void *) &cdat->dobj_771__OTOUCH_VAL;
+/*_.VALDATA___V920*/ meltfptr[919] = (void *) &cdat->dobj_771__OTOUCH_VAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_771__OTOUCH_VAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17419,21 +17509,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_771__OTOUCH_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_771__OTOUCH_VAL.obj_num = 1;
- cdat->dobj_771__OTOUCH_VAL.obj_hash = 264833157;
+ cdat->dobj_771__OTOUCH_VAL.obj_hash = 223013330;
cdat->dobj_771__OTOUCH_VAL.obj_len = 4;
/*inistring dstr_772__OTOUCH_VAL*/
- /*_.VALSTR___V918*/ meltfptr[917] = (void *) &cdat->dstr_772__OTOUCH_VAL;
+ /*_.VALSTR___V921*/ meltfptr[920] = (void *) &cdat->dstr_772__OTOUCH_VAL;
cdat->dstr_772__OTOUCH_VAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_772__OTOUCH_VAL.val, "OTOUCH_VAL",
sizeof (cdat->dstr_772__OTOUCH_VAL.val) - 1);
/*iniobj dsym_773__OTOUCH_COMMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V924*/ meltfptr[923])
- /*_.VALDATA___V924*/
- meltfptr[923] = (void *) &cdat->dsym_773__OTOUCH_COMMENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V927*/ meltfptr[926])
+ /*_.VALDATA___V927*/
+ meltfptr[926] = (void *) &cdat->dsym_773__OTOUCH_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_773__OTOUCH_COMMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17450,7 +17540,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_774__OTOUCH_COMMENT*/
- /*_.VALSTR___V925*/ meltfptr[924] =
+ /*_.VALSTR___V928*/ meltfptr[927] =
(void *) &cdat->dstr_774__OTOUCH_COMMENT;
cdat->dstr_774__OTOUCH_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17461,7 +17551,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_775__OTOUCH_COMMENT*/
-/*_.VALDATA___V919*/ meltfptr[918] =
+/*_.VALDATA___V922*/ meltfptr[921] =
(void *) &cdat->dobj_775__OTOUCH_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_775__OTOUCH_COMMENT",
@@ -17475,12 +17565,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_775__OTOUCH_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_775__OTOUCH_COMMENT.obj_num = 2;
- cdat->dobj_775__OTOUCH_COMMENT.obj_hash = 673164443;
+ cdat->dobj_775__OTOUCH_COMMENT.obj_hash = 899879137;
cdat->dobj_775__OTOUCH_COMMENT.obj_len = 4;
/*inistring dstr_776__OTOUCH_COMMENT*/
- /*_.VALSTR___V920*/ meltfptr[919] =
+ /*_.VALSTR___V923*/ meltfptr[922] =
(void *) &cdat->dstr_776__OTOUCH_COMMENT;
cdat->dstr_776__OTOUCH_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17490,9 +17580,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_777__CLASS_OBJSETPREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V926*/ meltfptr[925])
- /*_.VALDATA___V926*/
- meltfptr[925] = (void *) &cdat->dsym_777__CLASS_OBJSETPREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V929*/ meltfptr[928])
+ /*_.VALDATA___V929*/
+ meltfptr[928] = (void *) &cdat->dsym_777__CLASS_OBJSETPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_777__CLASS_OBJSETPREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17509,7 +17599,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_778__CLASS_OBJSETPRED*/
- /*_.VALSTR___V927*/ meltfptr[926] =
+ /*_.VALSTR___V930*/ meltfptr[929] =
(void *) &cdat->dstr_778__CLASS_OBJSETPRED;
cdat->dstr_778__CLASS_OBJSETPRED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17520,7 +17610,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:501:/ iniobj");
/*iniobj dobj_779__CLASS_OBJSETPREDEF*/
-/*_.VALDATA___V928*/ meltfptr[927] =
+/*_.VALDATA___V931*/ meltfptr[930] =
(void *) &cdat->dobj_779__CLASS_OBJSETPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_779__CLASS_OBJSETPREDEF",
@@ -17534,12 +17624,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_779__CLASS_OBJSETPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_779__CLASS_OBJSETPREDEF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_779__CLASS_OBJSETPREDEF.obj_hash = 1070815957;
+ cdat->dobj_779__CLASS_OBJSETPREDEF.obj_hash = 105279212;
cdat->dobj_779__CLASS_OBJSETPREDEF.obj_len = 8;
/*inistring dstr_780__CLASS_OBJSETPRED*/
- /*_.VALSTR___V929*/ meltfptr[928] =
+ /*_.VALSTR___V932*/ meltfptr[931] =
(void *) &cdat->dstr_780__CLASS_OBJSETPRED;
cdat->dstr_780__CLASS_OBJSETPRED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17548,22 +17638,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_780__CLASS_OBJSETPRED.
val) - 1);
/*inimult dtup_781__CLASS_OBJSETPREDEF */
- /*_.VALTUP___V930*/ meltfptr[929] =
+ /*_.VALTUP___V933*/ meltfptr[932] =
(void *) &cdat->dtup_781__CLASS_OBJSETPREDEF;
cdat->dtup_781__CLASS_OBJSETPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_781__CLASS_OBJSETPREDEF.nbval = 3;
/*inimult dtup_782__CLASS_OBJSETPREDEF */
- /*_.VALTUP___V935*/ meltfptr[934] =
+ /*_.VALTUP___V938*/ meltfptr[937] =
(void *) &cdat->dtup_782__CLASS_OBJSETPREDEF;
cdat->dtup_782__CLASS_OBJSETPREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_782__CLASS_OBJSETPREDEF.nbval = 3;
/*iniobj dsym_783__OSPR_OBJECT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V936*/ meltfptr[935])
- /*_.VALDATA___V936*/
- meltfptr[935] = (void *) &cdat->dsym_783__OSPR_OBJECT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V939*/ meltfptr[938])
+ /*_.VALDATA___V939*/
+ meltfptr[938] = (void *) &cdat->dsym_783__OSPR_OBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_783__OSPR_OBJECT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17580,7 +17670,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_784__OSPR_OBJECT*/
- /*_.VALSTR___V937*/ meltfptr[936] = (void *) &cdat->dstr_784__OSPR_OBJECT;
+ /*_.VALSTR___V940*/ meltfptr[939] = (void *) &cdat->dstr_784__OSPR_OBJECT;
cdat->dstr_784__OSPR_OBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_784__OSPR_OBJECT.val,
@@ -17589,7 +17679,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_785__OSPR_OBJECT*/
-/*_.VALDATA___V931*/ meltfptr[930] = (void *) &cdat->dobj_785__OSPR_OBJECT;
+/*_.VALDATA___V934*/ meltfptr[933] = (void *) &cdat->dobj_785__OSPR_OBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_785__OSPR_OBJECT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17602,12 +17692,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_785__OSPR_OBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_785__OSPR_OBJECT.obj_num = 1;
- cdat->dobj_785__OSPR_OBJECT.obj_hash = 952693984;
+ cdat->dobj_785__OSPR_OBJECT.obj_hash = 18382826;
cdat->dobj_785__OSPR_OBJECT.obj_len = 4;
/*inistring dstr_786__OSPR_OBJECT*/
- /*_.VALSTR___V932*/ meltfptr[931] = (void *) &cdat->dstr_786__OSPR_OBJECT;
+ /*_.VALSTR___V935*/ meltfptr[934] = (void *) &cdat->dstr_786__OSPR_OBJECT;
cdat->dstr_786__OSPR_OBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_786__OSPR_OBJECT.val,
@@ -17615,9 +17705,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_786__OSPR_OBJECT.val) - 1);
/*iniobj dsym_787__OSPR_PREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V938*/ meltfptr[937])
- /*_.VALDATA___V938*/
- meltfptr[937] = (void *) &cdat->dsym_787__OSPR_PREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V941*/ meltfptr[940])
+ /*_.VALDATA___V941*/
+ meltfptr[940] = (void *) &cdat->dsym_787__OSPR_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_787__OSPR_PREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17634,7 +17724,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_788__OSPR_PREDEF*/
- /*_.VALSTR___V939*/ meltfptr[938] = (void *) &cdat->dstr_788__OSPR_PREDEF;
+ /*_.VALSTR___V942*/ meltfptr[941] = (void *) &cdat->dstr_788__OSPR_PREDEF;
cdat->dstr_788__OSPR_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_788__OSPR_PREDEF.val,
@@ -17643,7 +17733,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_789__OSPR_PREDEF*/
-/*_.VALDATA___V933*/ meltfptr[932] = (void *) &cdat->dobj_789__OSPR_PREDEF;
+/*_.VALDATA___V936*/ meltfptr[935] = (void *) &cdat->dobj_789__OSPR_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_789__OSPR_PREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17656,12 +17746,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_789__OSPR_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_789__OSPR_PREDEF.obj_num = 2;
- cdat->dobj_789__OSPR_PREDEF.obj_hash = 913214638;
+ cdat->dobj_789__OSPR_PREDEF.obj_hash = 384499419;
cdat->dobj_789__OSPR_PREDEF.obj_len = 4;
/*inistring dstr_790__OSPR_PREDEF*/
- /*_.VALSTR___V934*/ meltfptr[933] = (void *) &cdat->dstr_790__OSPR_PREDEF;
+ /*_.VALSTR___V937*/ meltfptr[936] = (void *) &cdat->dstr_790__OSPR_PREDEF;
cdat->dstr_790__OSPR_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_790__OSPR_PREDEF.val,
@@ -17669,9 +17759,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_790__OSPR_PREDEF.val) - 1);
/*iniobj dsym_791__CLASS_ROUTINEOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V940*/ meltfptr[939])
- /*_.VALDATA___V940*/
- meltfptr[939] = (void *) &cdat->dsym_791__CLASS_ROUTINEOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V943*/ meltfptr[942])
+ /*_.VALDATA___V943*/
+ meltfptr[942] = (void *) &cdat->dsym_791__CLASS_ROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_791__CLASS_ROUTINEOBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17688,7 +17778,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_792__CLASS_ROUTINEOBJ*/
- /*_.VALSTR___V941*/ meltfptr[940] =
+ /*_.VALSTR___V944*/ meltfptr[943] =
(void *) &cdat->dstr_792__CLASS_ROUTINEOBJ;
cdat->dstr_792__CLASS_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17698,9 +17788,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_793__CLASS_NAMED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V942*/ meltfptr[941])
- /*_.VALDATA___V942*/
- meltfptr[941] = (void *) &cdat->dsym_793__CLASS_NAMED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V945*/ meltfptr[944])
+ /*_.VALDATA___V945*/
+ meltfptr[944] = (void *) &cdat->dsym_793__CLASS_NAMED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_793__CLASS_NAMED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17717,7 +17807,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_794__CLASS_NAMED*/
- /*_.VALSTR___V943*/ meltfptr[942] = (void *) &cdat->dstr_794__CLASS_NAMED;
+ /*_.VALSTR___V946*/ meltfptr[945] = (void *) &cdat->dstr_794__CLASS_NAMED;
cdat->dstr_794__CLASS_NAMED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_794__CLASS_NAMED.val,
@@ -17726,7 +17816,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:509:/ iniobj");
/*iniobj dobj_795__CLASS_ROUTINEOBJ*/
-/*_.VALDATA___V944*/ meltfptr[943] =
+/*_.VALDATA___V947*/ meltfptr[946] =
(void *) &cdat->dobj_795__CLASS_ROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_795__CLASS_ROUTINEOBJ",
@@ -17740,12 +17830,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_795__CLASS_ROUTINEOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_795__CLASS_ROUTINEOBJ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_795__CLASS_ROUTINEOBJ.obj_hash = 839265137;
+ cdat->dobj_795__CLASS_ROUTINEOBJ.obj_hash = 657918446;
cdat->dobj_795__CLASS_ROUTINEOBJ.obj_len = 8;
/*inistring dstr_796__CLASS_ROUTINEOBJ*/
- /*_.VALSTR___V945*/ meltfptr[944] =
+ /*_.VALSTR___V948*/ meltfptr[947] =
(void *) &cdat->dstr_796__CLASS_ROUTINEOBJ;
cdat->dstr_796__CLASS_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -17754,22 +17844,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_796__CLASS_ROUTINEOBJ.
val) - 1);
/*inimult dtup_797__CLASS_ROUTINEOBJ */
- /*_.VALTUP___V946*/ meltfptr[945] =
+ /*_.VALTUP___V949*/ meltfptr[948] =
(void *) &cdat->dtup_797__CLASS_ROUTINEOBJ;
cdat->dtup_797__CLASS_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_797__CLASS_ROUTINEOBJ.nbval = 3;
/*inimult dtup_798__CLASS_ROUTINEOBJ */
- /*_.VALTUP___V963*/ meltfptr[962] =
+ /*_.VALTUP___V966*/ meltfptr[965] =
(void *) &cdat->dtup_798__CLASS_ROUTINEOBJ;
cdat->dtup_798__CLASS_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_798__CLASS_ROUTINEOBJ.nbval = 10;
/*iniobj dsym_799__OBROUT_PROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V964*/ meltfptr[963])
- /*_.VALDATA___V964*/
- meltfptr[963] = (void *) &cdat->dsym_799__OBROUT_PROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V967*/ meltfptr[966])
+ /*_.VALDATA___V967*/
+ meltfptr[966] = (void *) &cdat->dsym_799__OBROUT_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_799__OBROUT_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17786,7 +17876,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_800__OBROUT_PROC*/
- /*_.VALSTR___V965*/ meltfptr[964] = (void *) &cdat->dstr_800__OBROUT_PROC;
+ /*_.VALSTR___V968*/ meltfptr[967] = (void *) &cdat->dstr_800__OBROUT_PROC;
cdat->dstr_800__OBROUT_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_800__OBROUT_PROC.val,
@@ -17795,7 +17885,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_801__OBROUT_PROC*/
-/*_.VALDATA___V947*/ meltfptr[946] = (void *) &cdat->dobj_801__OBROUT_PROC;
+/*_.VALDATA___V950*/ meltfptr[949] = (void *) &cdat->dobj_801__OBROUT_PROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_801__OBROUT_PROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17808,12 +17898,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_801__OBROUT_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_801__OBROUT_PROC.obj_num = 2;
- cdat->dobj_801__OBROUT_PROC.obj_hash = 371292529;
+ cdat->dobj_801__OBROUT_PROC.obj_hash = 1025201640;
cdat->dobj_801__OBROUT_PROC.obj_len = 4;
/*inistring dstr_802__OBROUT_PROC*/
- /*_.VALSTR___V948*/ meltfptr[947] = (void *) &cdat->dstr_802__OBROUT_PROC;
+ /*_.VALSTR___V951*/ meltfptr[950] = (void *) &cdat->dstr_802__OBROUT_PROC;
cdat->dstr_802__OBROUT_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_802__OBROUT_PROC.val,
@@ -17821,9 +17911,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_802__OBROUT_PROC.val) - 1);
/*iniobj dsym_803__OBROUT_BODY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V966*/ meltfptr[965])
- /*_.VALDATA___V966*/
- meltfptr[965] = (void *) &cdat->dsym_803__OBROUT_BODY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V969*/ meltfptr[968])
+ /*_.VALDATA___V969*/
+ meltfptr[968] = (void *) &cdat->dsym_803__OBROUT_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_803__OBROUT_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17840,7 +17930,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_804__OBROUT_BODY*/
- /*_.VALSTR___V967*/ meltfptr[966] = (void *) &cdat->dstr_804__OBROUT_BODY;
+ /*_.VALSTR___V970*/ meltfptr[969] = (void *) &cdat->dstr_804__OBROUT_BODY;
cdat->dstr_804__OBROUT_BODY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_804__OBROUT_BODY.val,
@@ -17849,7 +17939,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_805__OBROUT_BODY*/
-/*_.VALDATA___V949*/ meltfptr[948] = (void *) &cdat->dobj_805__OBROUT_BODY;
+/*_.VALDATA___V952*/ meltfptr[951] = (void *) &cdat->dobj_805__OBROUT_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_805__OBROUT_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17862,12 +17952,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_805__OBROUT_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_805__OBROUT_BODY.obj_num = 3;
- cdat->dobj_805__OBROUT_BODY.obj_hash = 183148023;
+ cdat->dobj_805__OBROUT_BODY.obj_hash = 94784617;
cdat->dobj_805__OBROUT_BODY.obj_len = 4;
/*inistring dstr_806__OBROUT_BODY*/
- /*_.VALSTR___V950*/ meltfptr[949] = (void *) &cdat->dstr_806__OBROUT_BODY;
+ /*_.VALSTR___V953*/ meltfptr[952] = (void *) &cdat->dstr_806__OBROUT_BODY;
cdat->dstr_806__OBROUT_BODY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_806__OBROUT_BODY.val,
@@ -17875,9 +17965,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_806__OBROUT_BODY.val) - 1);
/*iniobj dsym_807__OBROUT_NBVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V968*/ meltfptr[967])
- /*_.VALDATA___V968*/
- meltfptr[967] = (void *) &cdat->dsym_807__OBROUT_NBVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V971*/ meltfptr[970])
+ /*_.VALDATA___V971*/
+ meltfptr[970] = (void *) &cdat->dsym_807__OBROUT_NBVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_807__OBROUT_NBVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17894,7 +17984,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_808__OBROUT_NBVAL*/
- /*_.VALSTR___V969*/ meltfptr[968] = (void *) &cdat->dstr_808__OBROUT_NBVAL;
+ /*_.VALSTR___V972*/ meltfptr[971] = (void *) &cdat->dstr_808__OBROUT_NBVAL;
cdat->dstr_808__OBROUT_NBVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_808__OBROUT_NBVAL.val,
@@ -17904,7 +17994,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_809__OBROUT_NBVAL*/
-/*_.VALDATA___V951*/ meltfptr[950] = (void *) &cdat->dobj_809__OBROUT_NBVAL;
+/*_.VALDATA___V954*/ meltfptr[953] = (void *) &cdat->dobj_809__OBROUT_NBVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_809__OBROUT_NBVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -17917,12 +18007,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_809__OBROUT_NBVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_809__OBROUT_NBVAL.obj_num = 4;
- cdat->dobj_809__OBROUT_NBVAL.obj_hash = 856065982;
+ cdat->dobj_809__OBROUT_NBVAL.obj_hash = 485727770;
cdat->dobj_809__OBROUT_NBVAL.obj_len = 4;
/*inistring dstr_810__OBROUT_NBVAL*/
- /*_.VALSTR___V952*/ meltfptr[951] = (void *) &cdat->dstr_810__OBROUT_NBVAL;
+ /*_.VALSTR___V955*/ meltfptr[954] = (void *) &cdat->dstr_810__OBROUT_NBVAL;
cdat->dstr_810__OBROUT_NBVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_810__OBROUT_NBVAL.val,
@@ -17931,9 +18021,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_811__OBROUT_NBLONG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V970*/ meltfptr[969])
- /*_.VALDATA___V970*/
- meltfptr[969] = (void *) &cdat->dsym_811__OBROUT_NBLONG;
+ /*uniqueobj*/ if (! /*_.VALDATA___V973*/ meltfptr[972])
+ /*_.VALDATA___V973*/
+ meltfptr[972] = (void *) &cdat->dsym_811__OBROUT_NBLONG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_811__OBROUT_NBLONG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -17950,7 +18040,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_812__OBROUT_NBLONG*/
- /*_.VALSTR___V971*/ meltfptr[970] = (void *) &cdat->dstr_812__OBROUT_NBLONG;
+ /*_.VALSTR___V974*/ meltfptr[973] = (void *) &cdat->dstr_812__OBROUT_NBLONG;
cdat->dstr_812__OBROUT_NBLONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_812__OBROUT_NBLONG.val,
@@ -17960,7 +18050,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_813__OBROUT_NBLONG*/
-/*_.VALDATA___V953*/ meltfptr[952] =
+/*_.VALDATA___V956*/ meltfptr[955] =
(void *) &cdat->dobj_813__OBROUT_NBLONG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_813__OBROUT_NBLONG",
@@ -17974,12 +18064,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_813__OBROUT_NBLONG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_813__OBROUT_NBLONG.obj_num = 5;
- cdat->dobj_813__OBROUT_NBLONG.obj_hash = 766829720;
+ cdat->dobj_813__OBROUT_NBLONG.obj_hash = 930712722;
cdat->dobj_813__OBROUT_NBLONG.obj_len = 4;
/*inistring dstr_814__OBROUT_NBLONG*/
- /*_.VALSTR___V954*/ meltfptr[953] = (void *) &cdat->dstr_814__OBROUT_NBLONG;
+ /*_.VALSTR___V957*/ meltfptr[956] = (void *) &cdat->dstr_814__OBROUT_NBLONG;
cdat->dstr_814__OBROUT_NBLONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_814__OBROUT_NBLONG.val,
@@ -17988,9 +18078,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_815__OBROUT_OTHERS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V972*/ meltfptr[971])
- /*_.VALDATA___V972*/
- meltfptr[971] = (void *) &cdat->dsym_815__OBROUT_OTHERS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V975*/ meltfptr[974])
+ /*_.VALDATA___V975*/
+ meltfptr[974] = (void *) &cdat->dsym_815__OBROUT_OTHERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_815__OBROUT_OTHERS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18007,7 +18097,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_816__OBROUT_OTHERS*/
- /*_.VALSTR___V973*/ meltfptr[972] = (void *) &cdat->dstr_816__OBROUT_OTHERS;
+ /*_.VALSTR___V976*/ meltfptr[975] = (void *) &cdat->dstr_816__OBROUT_OTHERS;
cdat->dstr_816__OBROUT_OTHERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_816__OBROUT_OTHERS.val,
@@ -18017,7 +18107,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_817__OBROUT_OTHERS*/
-/*_.VALDATA___V955*/ meltfptr[954] =
+/*_.VALDATA___V958*/ meltfptr[957] =
(void *) &cdat->dobj_817__OBROUT_OTHERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_817__OBROUT_OTHERS",
@@ -18031,12 +18121,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_817__OBROUT_OTHERS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_817__OBROUT_OTHERS.obj_num = 6;
- cdat->dobj_817__OBROUT_OTHERS.obj_hash = 511013035;
+ cdat->dobj_817__OBROUT_OTHERS.obj_hash = 803464390;
cdat->dobj_817__OBROUT_OTHERS.obj_len = 4;
/*inistring dstr_818__OBROUT_OTHERS*/
- /*_.VALSTR___V956*/ meltfptr[955] = (void *) &cdat->dstr_818__OBROUT_OTHERS;
+ /*_.VALSTR___V959*/ meltfptr[958] = (void *) &cdat->dstr_818__OBROUT_OTHERS;
cdat->dstr_818__OBROUT_OTHERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_818__OBROUT_OTHERS.val,
@@ -18045,9 +18135,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_819__OBROUT_RETVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V974*/ meltfptr[973])
- /*_.VALDATA___V974*/
- meltfptr[973] = (void *) &cdat->dsym_819__OBROUT_RETVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V977*/ meltfptr[976])
+ /*_.VALDATA___V977*/
+ meltfptr[976] = (void *) &cdat->dsym_819__OBROUT_RETVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_819__OBROUT_RETVAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18064,7 +18154,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_820__OBROUT_RETVAL*/
- /*_.VALSTR___V975*/ meltfptr[974] = (void *) &cdat->dstr_820__OBROUT_RETVAL;
+ /*_.VALSTR___V978*/ meltfptr[977] = (void *) &cdat->dstr_820__OBROUT_RETVAL;
cdat->dstr_820__OBROUT_RETVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_820__OBROUT_RETVAL.val,
@@ -18074,7 +18164,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_821__OBROUT_RETVAL*/
-/*_.VALDATA___V957*/ meltfptr[956] =
+/*_.VALDATA___V960*/ meltfptr[959] =
(void *) &cdat->dobj_821__OBROUT_RETVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_821__OBROUT_RETVAL",
@@ -18088,12 +18178,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_821__OBROUT_RETVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_821__OBROUT_RETVAL.obj_num = 7;
- cdat->dobj_821__OBROUT_RETVAL.obj_hash = 356237741;
+ cdat->dobj_821__OBROUT_RETVAL.obj_hash = 149617405;
cdat->dobj_821__OBROUT_RETVAL.obj_len = 4;
/*inistring dstr_822__OBROUT_RETVAL*/
- /*_.VALSTR___V958*/ meltfptr[957] = (void *) &cdat->dstr_822__OBROUT_RETVAL;
+ /*_.VALSTR___V961*/ meltfptr[960] = (void *) &cdat->dstr_822__OBROUT_RETVAL;
cdat->dstr_822__OBROUT_RETVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_822__OBROUT_RETVAL.val,
@@ -18102,9 +18192,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_823__OBROUT_CNTCITER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V976*/ meltfptr[975])
- /*_.VALDATA___V976*/
- meltfptr[975] = (void *) &cdat->dsym_823__OBROUT_CNTCITER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V979*/ meltfptr[978])
+ /*_.VALDATA___V979*/
+ meltfptr[978] = (void *) &cdat->dsym_823__OBROUT_CNTCITER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_823__OBROUT_CNTCITER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18121,7 +18211,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_824__OBROUT_CNTCITER*/
- /*_.VALSTR___V977*/ meltfptr[976] =
+ /*_.VALSTR___V980*/ meltfptr[979] =
(void *) &cdat->dstr_824__OBROUT_CNTCITER;
cdat->dstr_824__OBROUT_CNTCITER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18132,7 +18222,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_825__OBROUT_CNTCITER*/
-/*_.VALDATA___V959*/ meltfptr[958] =
+/*_.VALDATA___V962*/ meltfptr[961] =
(void *) &cdat->dobj_825__OBROUT_CNTCITER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_825__OBROUT_CNTCITER",
@@ -18146,12 +18236,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_825__OBROUT_CNTCITER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_825__OBROUT_CNTCITER.obj_num = 8;
- cdat->dobj_825__OBROUT_CNTCITER.obj_hash = 228334847;
+ cdat->dobj_825__OBROUT_CNTCITER.obj_hash = 650550465;
cdat->dobj_825__OBROUT_CNTCITER.obj_len = 4;
/*inistring dstr_826__OBROUT_CNTCITER*/
- /*_.VALSTR___V960*/ meltfptr[959] =
+ /*_.VALSTR___V963*/ meltfptr[962] =
(void *) &cdat->dstr_826__OBROUT_CNTCITER;
cdat->dstr_826__OBROUT_CNTCITER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18161,9 +18251,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_827__OBROUT_CNTLETREC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V978*/ meltfptr[977])
- /*_.VALDATA___V978*/
- meltfptr[977] = (void *) &cdat->dsym_827__OBROUT_CNTLETREC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V981*/ meltfptr[980])
+ /*_.VALDATA___V981*/
+ meltfptr[980] = (void *) &cdat->dsym_827__OBROUT_CNTLETREC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_827__OBROUT_CNTLETREC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18180,7 +18270,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_828__OBROUT_CNTLETREC*/
- /*_.VALSTR___V979*/ meltfptr[978] =
+ /*_.VALSTR___V982*/ meltfptr[981] =
(void *) &cdat->dstr_828__OBROUT_CNTLETREC;
cdat->dstr_828__OBROUT_CNTLETREC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18191,7 +18281,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_829__OBROUT_CNTLETREC*/
-/*_.VALDATA___V961*/ meltfptr[960] =
+/*_.VALDATA___V964*/ meltfptr[963] =
(void *) &cdat->dobj_829__OBROUT_CNTLETREC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_829__OBROUT_CNTLETREC",
@@ -18205,12 +18295,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_829__OBROUT_CNTLETREC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_829__OBROUT_CNTLETREC.obj_num = 9;
- cdat->dobj_829__OBROUT_CNTLETREC.obj_hash = 532297103;
+ cdat->dobj_829__OBROUT_CNTLETREC.obj_hash = 937739367;
cdat->dobj_829__OBROUT_CNTLETREC.obj_len = 4;
/*inistring dstr_830__OBROUT_CNTLETREC*/
- /*_.VALSTR___V962*/ meltfptr[961] =
+ /*_.VALSTR___V965*/ meltfptr[964] =
(void *) &cdat->dstr_830__OBROUT_CNTLETREC;
cdat->dstr_830__OBROUT_CNTLETREC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18220,9 +18310,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_831__CLASS_PROCROUTINEOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V980*/ meltfptr[979])
- /*_.VALDATA___V980*/
- meltfptr[979] = (void *) &cdat->dsym_831__CLASS_PROCROUTINEOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V983*/ meltfptr[982])
+ /*_.VALDATA___V983*/
+ meltfptr[982] = (void *) &cdat->dsym_831__CLASS_PROCROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_831__CLASS_PROCROUTINEOBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18239,7 +18329,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_832__CLASS_PROCROUTIN*/
- /*_.VALSTR___V981*/ meltfptr[980] =
+ /*_.VALSTR___V984*/ meltfptr[983] =
(void *) &cdat->dstr_832__CLASS_PROCROUTIN;
cdat->dstr_832__CLASS_PROCROUTIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18250,7 +18340,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:525:/ iniobj");
/*iniobj dobj_833__CLASS_PROCROUTINEOBJ*/
-/*_.VALDATA___V982*/ meltfptr[981] =
+/*_.VALDATA___V985*/ meltfptr[984] =
(void *) &cdat->dobj_833__CLASS_PROCROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_833__CLASS_PROCROUTINEOBJ",
@@ -18264,12 +18354,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_833__CLASS_PROCROUTINEOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_833__CLASS_PROCROUTINEOBJ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_833__CLASS_PROCROUTINEOBJ.obj_hash = 257215268;
+ cdat->dobj_833__CLASS_PROCROUTINEOBJ.obj_hash = 401488759;
cdat->dobj_833__CLASS_PROCROUTINEOBJ.obj_len = 8;
/*inistring dstr_834__CLASS_PROCROUTIN*/
- /*_.VALSTR___V983*/ meltfptr[982] =
+ /*_.VALSTR___V986*/ meltfptr[985] =
(void *) &cdat->dstr_834__CLASS_PROCROUTIN;
cdat->dstr_834__CLASS_PROCROUTIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18278,22 +18368,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_834__CLASS_PROCROUTIN.
val) - 1);
/*inimult dtup_835__CLASS_PROCROUTINEOBJ */
- /*_.VALTUP___V984*/ meltfptr[983] =
+ /*_.VALTUP___V987*/ meltfptr[986] =
(void *) &cdat->dtup_835__CLASS_PROCROUTINEOBJ;
cdat->dtup_835__CLASS_PROCROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_835__CLASS_PROCROUTINEOBJ.nbval = 4;
/*inimult dtup_836__CLASS_PROCROUTINEOBJ */
- /*_.VALTUP___V995*/ meltfptr[994] =
+ /*_.VALTUP___V998*/ meltfptr[997] =
(void *) &cdat->dtup_836__CLASS_PROCROUTINEOBJ;
cdat->dtup_836__CLASS_PROCROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_836__CLASS_PROCROUTINEOBJ.nbval = 15;
/*iniobj dsym_837__OPROUT_GETARGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V996*/ meltfptr[995])
- /*_.VALDATA___V996*/
- meltfptr[995] = (void *) &cdat->dsym_837__OPROUT_GETARGS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V999*/ meltfptr[998])
+ /*_.VALDATA___V999*/
+ meltfptr[998] = (void *) &cdat->dsym_837__OPROUT_GETARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_837__OPROUT_GETARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18310,7 +18400,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_838__OPROUT_GETARGS*/
- /*_.VALSTR___V997*/ meltfptr[996] =
+ /*_.VALSTR___V1000*/ meltfptr[999] =
(void *) &cdat->dstr_838__OPROUT_GETARGS;
cdat->dstr_838__OPROUT_GETARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18321,7 +18411,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_839__OPROUT_GETARGS*/
-/*_.VALDATA___V985*/ meltfptr[984] =
+/*_.VALDATA___V988*/ meltfptr[987] =
(void *) &cdat->dobj_839__OPROUT_GETARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_839__OPROUT_GETARGS",
@@ -18335,12 +18425,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_839__OPROUT_GETARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_839__OPROUT_GETARGS.obj_num = 10;
- cdat->dobj_839__OPROUT_GETARGS.obj_hash = 429150863;
+ cdat->dobj_839__OPROUT_GETARGS.obj_hash = 720767860;
cdat->dobj_839__OPROUT_GETARGS.obj_len = 4;
/*inistring dstr_840__OPROUT_GETARGS*/
- /*_.VALSTR___V986*/ meltfptr[985] =
+ /*_.VALSTR___V989*/ meltfptr[988] =
(void *) &cdat->dstr_840__OPROUT_GETARGS;
cdat->dstr_840__OPROUT_GETARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18350,9 +18440,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_841__OPROUT_LOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V998*/ meltfptr[997])
- /*_.VALDATA___V998*/
- meltfptr[997] = (void *) &cdat->dsym_841__OPROUT_LOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1001*/ meltfptr[1000])
+ /*_.VALDATA___V1001*/
+ meltfptr[1000] = (void *) &cdat->dsym_841__OPROUT_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_841__OPROUT_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18369,7 +18459,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_842__OPROUT_LOC*/
- /*_.VALSTR___V999*/ meltfptr[998] = (void *) &cdat->dstr_842__OPROUT_LOC;
+ /*_.VALSTR___V1002*/ meltfptr[1001] = (void *) &cdat->dstr_842__OPROUT_LOC;
cdat->dstr_842__OPROUT_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_842__OPROUT_LOC.val, "OPROUT_LOC",
@@ -18377,7 +18467,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_843__OPROUT_LOC*/
-/*_.VALDATA___V987*/ meltfptr[986] = (void *) &cdat->dobj_843__OPROUT_LOC;
+/*_.VALDATA___V990*/ meltfptr[989] = (void *) &cdat->dobj_843__OPROUT_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_843__OPROUT_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -18390,21 +18480,21 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_843__OPROUT_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_843__OPROUT_LOC.obj_num = 11;
- cdat->dobj_843__OPROUT_LOC.obj_hash = 47570347;
+ cdat->dobj_843__OPROUT_LOC.obj_hash = 368476447;
cdat->dobj_843__OPROUT_LOC.obj_len = 4;
/*inistring dstr_844__OPROUT_LOC*/
- /*_.VALSTR___V988*/ meltfptr[987] = (void *) &cdat->dstr_844__OPROUT_LOC;
+ /*_.VALSTR___V991*/ meltfptr[990] = (void *) &cdat->dstr_844__OPROUT_LOC;
cdat->dstr_844__OPROUT_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_844__OPROUT_LOC.val, "OPROUT_LOC",
sizeof (cdat->dstr_844__OPROUT_LOC.val) - 1);
/*iniobj dsym_845__OPROUT_FUNAM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1000*/ meltfptr[999])
- /*_.VALDATA___V1000*/
- meltfptr[999] = (void *) &cdat->dsym_845__OPROUT_FUNAM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1003*/ meltfptr[1002])
+ /*_.VALDATA___V1003*/
+ meltfptr[1002] = (void *) &cdat->dsym_845__OPROUT_FUNAM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_845__OPROUT_FUNAM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18421,7 +18511,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_846__OPROUT_FUNAM*/
- /*_.VALSTR___V1001*/ meltfptr[1000] =
+ /*_.VALSTR___V1004*/ meltfptr[1003] =
(void *) &cdat->dstr_846__OPROUT_FUNAM;
cdat->dstr_846__OPROUT_FUNAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18432,7 +18522,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_847__OPROUT_FUNAM*/
-/*_.VALDATA___V989*/ meltfptr[988] = (void *) &cdat->dobj_847__OPROUT_FUNAM;
+/*_.VALDATA___V992*/ meltfptr[991] = (void *) &cdat->dobj_847__OPROUT_FUNAM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_847__OPROUT_FUNAM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -18445,12 +18535,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_847__OPROUT_FUNAM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_847__OPROUT_FUNAM.obj_num = 12;
- cdat->dobj_847__OPROUT_FUNAM.obj_hash = 988928067;
+ cdat->dobj_847__OPROUT_FUNAM.obj_hash = 14625764;
cdat->dobj_847__OPROUT_FUNAM.obj_len = 4;
/*inistring dstr_848__OPROUT_FUNAM*/
- /*_.VALSTR___V990*/ meltfptr[989] = (void *) &cdat->dstr_848__OPROUT_FUNAM;
+ /*_.VALSTR___V993*/ meltfptr[992] = (void *) &cdat->dstr_848__OPROUT_FUNAM;
cdat->dstr_848__OPROUT_FUNAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_848__OPROUT_FUNAM.val,
@@ -18459,9 +18549,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_849__OPROUT_RESTNAM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1002*/ meltfptr[1001])
- /*_.VALDATA___V1002*/
- meltfptr[1001] = (void *) &cdat->dsym_849__OPROUT_RESTNAM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1005*/ meltfptr[1004])
+ /*_.VALDATA___V1005*/
+ meltfptr[1004] = (void *) &cdat->dsym_849__OPROUT_RESTNAM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_849__OPROUT_RESTNAM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18478,7 +18568,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_850__OPROUT_RESTNAM*/
- /*_.VALSTR___V1003*/ meltfptr[1002] =
+ /*_.VALSTR___V1006*/ meltfptr[1005] =
(void *) &cdat->dstr_850__OPROUT_RESTNAM;
cdat->dstr_850__OPROUT_RESTNAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18489,7 +18579,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_851__OPROUT_RESTNAM*/
-/*_.VALDATA___V991*/ meltfptr[990] =
+/*_.VALDATA___V994*/ meltfptr[993] =
(void *) &cdat->dobj_851__OPROUT_RESTNAM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_851__OPROUT_RESTNAM",
@@ -18503,12 +18593,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_851__OPROUT_RESTNAM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_851__OPROUT_RESTNAM.obj_num = 13;
- cdat->dobj_851__OPROUT_RESTNAM.obj_hash = 905663450;
+ cdat->dobj_851__OPROUT_RESTNAM.obj_hash = 443401314;
cdat->dobj_851__OPROUT_RESTNAM.obj_len = 4;
/*inistring dstr_852__OPROUT_RESTNAM*/
- /*_.VALSTR___V992*/ meltfptr[991] =
+ /*_.VALSTR___V995*/ meltfptr[994] =
(void *) &cdat->dstr_852__OPROUT_RESTNAM;
cdat->dstr_852__OPROUT_RESTNAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18518,9 +18608,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_853__OPROUT_FILENUM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1004*/ meltfptr[1003])
- /*_.VALDATA___V1004*/
- meltfptr[1003] = (void *) &cdat->dsym_853__OPROUT_FILENUM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1007*/ meltfptr[1006])
+ /*_.VALDATA___V1007*/
+ meltfptr[1006] = (void *) &cdat->dsym_853__OPROUT_FILENUM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_853__OPROUT_FILENUM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18537,7 +18627,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_854__OPROUT_FILENUM*/
- /*_.VALSTR___V1005*/ meltfptr[1004] =
+ /*_.VALSTR___V1008*/ meltfptr[1007] =
(void *) &cdat->dstr_854__OPROUT_FILENUM;
cdat->dstr_854__OPROUT_FILENUM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18548,7 +18638,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_855__OPROUT_FILENUM*/
-/*_.VALDATA___V993*/ meltfptr[992] =
+/*_.VALDATA___V996*/ meltfptr[995] =
(void *) &cdat->dobj_855__OPROUT_FILENUM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_855__OPROUT_FILENUM",
@@ -18562,12 +18652,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_855__OPROUT_FILENUM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_855__OPROUT_FILENUM.obj_num = 14;
- cdat->dobj_855__OPROUT_FILENUM.obj_hash = 823399128;
+ cdat->dobj_855__OPROUT_FILENUM.obj_hash = 1025540724;
cdat->dobj_855__OPROUT_FILENUM.obj_len = 4;
/*inistring dstr_856__OPROUT_FILENUM*/
- /*_.VALSTR___V994*/ meltfptr[993] =
+ /*_.VALSTR___V997*/ meltfptr[996] =
(void *) &cdat->dstr_856__OPROUT_FILENUM;
cdat->dstr_856__OPROUT_FILENUM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18577,9 +18667,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_857__CLASS_INITIALROUTINEOBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1006*/ meltfptr[1005])
- /*_.VALDATA___V1006*/
- meltfptr[1005] = (void *) &cdat->dsym_857__CLASS_INITIALROUTINEOBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1009*/ meltfptr[1008])
+ /*_.VALDATA___V1009*/
+ meltfptr[1008] = (void *) &cdat->dsym_857__CLASS_INITIALROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_857__CLASS_INITIALROUTINEOBJ",
@@ -18597,7 +18687,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_858__CLASS_INITIALROU*/
- /*_.VALSTR___V1007*/ meltfptr[1006] =
+ /*_.VALSTR___V1010*/ meltfptr[1009] =
(void *) &cdat->dstr_858__CLASS_INITIALROU;
cdat->dstr_858__CLASS_INITIALROU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18608,7 +18698,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:535:/ iniobj");
/*iniobj dobj_859__CLASS_INITIALROUTINEOBJ*/
-/*_.VALDATA___V1008*/ meltfptr[1007] =
+/*_.VALDATA___V1011*/ meltfptr[1010] =
(void *) &cdat->dobj_859__CLASS_INITIALROUTINEOBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -18623,12 +18713,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_859__CLASS_INITIALROUTINEOBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_859__CLASS_INITIALROUTINEOBJ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_859__CLASS_INITIALROUTINEOBJ.obj_hash = 509089389;
+ cdat->dobj_859__CLASS_INITIALROUTINEOBJ.obj_hash = 97398868;
cdat->dobj_859__CLASS_INITIALROUTINEOBJ.obj_len = 8;
/*inistring dstr_860__CLASS_INITIALROU*/
- /*_.VALSTR___V1009*/ meltfptr[1008] =
+ /*_.VALSTR___V1012*/ meltfptr[1011] =
(void *) &cdat->dstr_860__CLASS_INITIALROU;
cdat->dstr_860__CLASS_INITIALROU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18637,22 +18727,22 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_860__CLASS_INITIALROU.
val) - 1);
/*inimult dtup_861__CLASS_INITIALROUTINEOBJ */
- /*_.VALTUP___V1010*/ meltfptr[1009] =
+ /*_.VALTUP___V1013*/ meltfptr[1012] =
(void *) &cdat->dtup_861__CLASS_INITIALROUTINEOBJ;
cdat->dtup_861__CLASS_INITIALROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_861__CLASS_INITIALROUTINEOBJ.nbval = 4;
/*inimult dtup_862__CLASS_INITIALROUTINEOBJ */
- /*_.VALTUP___V1019*/ meltfptr[1018] =
+ /*_.VALTUP___V1022*/ meltfptr[1021] =
(void *) &cdat->dtup_862__CLASS_INITIALROUTINEOBJ;
cdat->dtup_862__CLASS_INITIALROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_862__CLASS_INITIALROUTINEOBJ.nbval = 14;
/*iniobj dsym_863__OIROUT_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1020*/ meltfptr[1019])
- /*_.VALDATA___V1020*/
- meltfptr[1019] = (void *) &cdat->dsym_863__OIROUT_DATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1023*/ meltfptr[1022])
+ /*_.VALDATA___V1023*/
+ meltfptr[1022] = (void *) &cdat->dsym_863__OIROUT_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_863__OIROUT_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18669,7 +18759,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_864__OIROUT_DATA*/
- /*_.VALSTR___V1021*/ meltfptr[1020] = (void *) &cdat->dstr_864__OIROUT_DATA;
+ /*_.VALSTR___V1024*/ meltfptr[1023] = (void *) &cdat->dstr_864__OIROUT_DATA;
cdat->dstr_864__OIROUT_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_864__OIROUT_DATA.val,
@@ -18678,7 +18768,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_865__OIROUT_DATA*/
-/*_.VALDATA___V1011*/ meltfptr[1010] =
+/*_.VALDATA___V1014*/ meltfptr[1013] =
(void *) &cdat->dobj_865__OIROUT_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_865__OIROUT_DATA",
@@ -18692,12 +18782,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_865__OIROUT_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_865__OIROUT_DATA.obj_num = 10;
- cdat->dobj_865__OIROUT_DATA.obj_hash = 88590037;
+ cdat->dobj_865__OIROUT_DATA.obj_hash = 677009926;
cdat->dobj_865__OIROUT_DATA.obj_len = 4;
/*inistring dstr_866__OIROUT_DATA*/
- /*_.VALSTR___V1012*/ meltfptr[1011] = (void *) &cdat->dstr_866__OIROUT_DATA;
+ /*_.VALSTR___V1015*/ meltfptr[1014] = (void *) &cdat->dstr_866__OIROUT_DATA;
cdat->dstr_866__OIROUT_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_866__OIROUT_DATA.val,
@@ -18705,9 +18795,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_866__OIROUT_DATA.val) - 1);
/*iniobj dsym_867__OIROUT_PROLOG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1022*/ meltfptr[1021])
- /*_.VALDATA___V1022*/
- meltfptr[1021] = (void *) &cdat->dsym_867__OIROUT_PROLOG;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1025*/ meltfptr[1024])
+ /*_.VALDATA___V1025*/
+ meltfptr[1024] = (void *) &cdat->dsym_867__OIROUT_PROLOG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_867__OIROUT_PROLOG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18724,7 +18814,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_868__OIROUT_PROLOG*/
- /*_.VALSTR___V1023*/ meltfptr[1022] =
+ /*_.VALSTR___V1026*/ meltfptr[1025] =
(void *) &cdat->dstr_868__OIROUT_PROLOG;
cdat->dstr_868__OIROUT_PROLOG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18735,7 +18825,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_869__OIROUT_PROLOG*/
-/*_.VALDATA___V1013*/ meltfptr[1012] =
+/*_.VALDATA___V1016*/ meltfptr[1015] =
(void *) &cdat->dobj_869__OIROUT_PROLOG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_869__OIROUT_PROLOG",
@@ -18749,12 +18839,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_869__OIROUT_PROLOG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_869__OIROUT_PROLOG.obj_num = 11;
- cdat->dobj_869__OIROUT_PROLOG.obj_hash = 1015170934;
+ cdat->dobj_869__OIROUT_PROLOG.obj_hash = 423680705;
cdat->dobj_869__OIROUT_PROLOG.obj_len = 4;
/*inistring dstr_870__OIROUT_PROLOG*/
- /*_.VALSTR___V1014*/ meltfptr[1013] =
+ /*_.VALSTR___V1017*/ meltfptr[1016] =
(void *) &cdat->dstr_870__OIROUT_PROLOG;
cdat->dstr_870__OIROUT_PROLOG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18764,9 +18854,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_871__OIROUT_FILL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1024*/ meltfptr[1023])
- /*_.VALDATA___V1024*/
- meltfptr[1023] = (void *) &cdat->dsym_871__OIROUT_FILL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1027*/ meltfptr[1026])
+ /*_.VALDATA___V1027*/
+ meltfptr[1026] = (void *) &cdat->dsym_871__OIROUT_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_871__OIROUT_FILL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18783,7 +18873,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_872__OIROUT_FILL*/
- /*_.VALSTR___V1025*/ meltfptr[1024] = (void *) &cdat->dstr_872__OIROUT_FILL;
+ /*_.VALSTR___V1028*/ meltfptr[1027] = (void *) &cdat->dstr_872__OIROUT_FILL;
cdat->dstr_872__OIROUT_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_872__OIROUT_FILL.val,
@@ -18792,7 +18882,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_873__OIROUT_FILL*/
-/*_.VALDATA___V1015*/ meltfptr[1014] =
+/*_.VALDATA___V1018*/ meltfptr[1017] =
(void *) &cdat->dobj_873__OIROUT_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_873__OIROUT_FILL",
@@ -18806,12 +18896,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_873__OIROUT_FILL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_873__OIROUT_FILL.obj_num = 12;
- cdat->dobj_873__OIROUT_FILL.obj_hash = 1012169506;
+ cdat->dobj_873__OIROUT_FILL.obj_hash = 111547049;
cdat->dobj_873__OIROUT_FILL.obj_len = 4;
/*inistring dstr_874__OIROUT_FILL*/
- /*_.VALSTR___V1016*/ meltfptr[1015] = (void *) &cdat->dstr_874__OIROUT_FILL;
+ /*_.VALSTR___V1019*/ meltfptr[1018] = (void *) &cdat->dstr_874__OIROUT_FILL;
cdat->dstr_874__OIROUT_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_874__OIROUT_FILL.val,
@@ -18819,9 +18909,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_874__OIROUT_FILL.val) - 1);
/*iniobj dsym_875__OIROUT_MODULENAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1026*/ meltfptr[1025])
- /*_.VALDATA___V1026*/
- meltfptr[1025] = (void *) &cdat->dsym_875__OIROUT_MODULENAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1029*/ meltfptr[1028])
+ /*_.VALDATA___V1029*/
+ meltfptr[1028] = (void *) &cdat->dsym_875__OIROUT_MODULENAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_875__OIROUT_MODULENAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18838,7 +18928,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_876__OIROUT_MODULENAM*/
- /*_.VALSTR___V1027*/ meltfptr[1026] =
+ /*_.VALSTR___V1030*/ meltfptr[1029] =
(void *) &cdat->dstr_876__OIROUT_MODULENAM;
cdat->dstr_876__OIROUT_MODULENAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18849,7 +18939,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_877__OIROUT_MODULENAME*/
-/*_.VALDATA___V1017*/ meltfptr[1016] =
+/*_.VALDATA___V1020*/ meltfptr[1019] =
(void *) &cdat->dobj_877__OIROUT_MODULENAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_877__OIROUT_MODULENAME",
@@ -18863,12 +18953,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_877__OIROUT_MODULENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_877__OIROUT_MODULENAME.obj_num = 13;
- cdat->dobj_877__OIROUT_MODULENAME.obj_hash = 302384328;
+ cdat->dobj_877__OIROUT_MODULENAME.obj_hash = 669452002;
cdat->dobj_877__OIROUT_MODULENAME.obj_len = 4;
/*inistring dstr_878__OIROUT_MODULENAM*/
- /*_.VALSTR___V1018*/ meltfptr[1017] =
+ /*_.VALSTR___V1021*/ meltfptr[1020] =
(void *) &cdat->dstr_878__OIROUT_MODULENAM;
cdat->dstr_878__OIROUT_MODULENAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18878,9 +18968,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_879__CLASS_OBJBLOCK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1028*/ meltfptr[1027])
- /*_.VALDATA___V1028*/
- meltfptr[1027] = (void *) &cdat->dsym_879__CLASS_OBJBLOCK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1031*/ meltfptr[1030])
+ /*_.VALDATA___V1031*/
+ meltfptr[1030] = (void *) &cdat->dsym_879__CLASS_OBJBLOCK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_879__CLASS_OBJBLOCK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18897,7 +18987,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_880__CLASS_OBJBLOCK*/
- /*_.VALSTR___V1029*/ meltfptr[1028] =
+ /*_.VALSTR___V1032*/ meltfptr[1031] =
(void *) &cdat->dstr_880__CLASS_OBJBLOCK;
cdat->dstr_880__CLASS_OBJBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18906,7 +18996,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_880__CLASS_OBJBLOCK.val) -
1);
/*inirout drout_881__MAKE_OBJLOCATEDEXP */
- /*_.VALROUT___V1030*/ meltfptr[1029] =
+ /*_.VALROUT___V1033*/ meltfptr[1032] =
(void *) &cdat->drout_881__MAKE_OBJLOCATEDEXP;
cdat->drout_881__MAKE_OBJLOCATEDEXP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -18918,7 +19008,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP);
/*iniclos dclo_882__MAKE_OBJLOCATEDEXP */
- /*_.VALCLO___V1031*/ meltfptr[1030] =
+ /*_.VALCLO___V1034*/ meltfptr[1033] =
(void *) &cdat->dclo_882__MAKE_OBJLOCATEDEXP;
cdat->dclo_882__MAKE_OBJLOCATEDEXP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -18926,9 +19016,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_883__MELT_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1032*/ meltfptr[1031])
- /*_.VALDATA___V1032*/
- meltfptr[1031] = (void *) &cdat->dsym_883__MELT_DEBUG_FUN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1035*/ meltfptr[1034])
+ /*_.VALDATA___V1035*/
+ meltfptr[1034] = (void *) &cdat->dsym_883__MELT_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_883__MELT_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18945,7 +19035,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_884__MELT_DEBUG_FUN*/
- /*_.VALSTR___V1033*/ meltfptr[1032] =
+ /*_.VALSTR___V1036*/ meltfptr[1035] =
(void *) &cdat->dstr_884__MELT_DEBUG_FUN;
cdat->dstr_884__MELT_DEBUG_FUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18955,9 +19045,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_885__DISCR_MIXED_LOCATION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1034*/ meltfptr[1033])
- /*_.VALDATA___V1034*/
- meltfptr[1033] = (void *) &cdat->dsym_885__DISCR_MIXED_LOCATION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1037*/ meltfptr[1036])
+ /*_.VALDATA___V1037*/
+ meltfptr[1036] = (void *) &cdat->dsym_885__DISCR_MIXED_LOCATION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_885__DISCR_MIXED_LOCATION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -18974,7 +19064,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_886__DISCR_MIXED_LOCA*/
- /*_.VALSTR___V1035*/ meltfptr[1034] =
+ /*_.VALSTR___V1038*/ meltfptr[1037] =
(void *) &cdat->dstr_886__DISCR_MIXED_LOCA;
cdat->dstr_886__DISCR_MIXED_LOCA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -18984,9 +19074,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_887__CLASS_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1036*/ meltfptr[1035])
- /*_.VALDATA___V1036*/
- meltfptr[1035] = (void *) &cdat->dsym_887__CLASS_CTYPE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1039*/ meltfptr[1038])
+ /*_.VALDATA___V1039*/
+ meltfptr[1038] = (void *) &cdat->dsym_887__CLASS_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_887__CLASS_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19003,7 +19093,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_888__CLASS_CTYPE*/
- /*_.VALSTR___V1037*/ meltfptr[1036] = (void *) &cdat->dstr_888__CLASS_CTYPE;
+ /*_.VALSTR___V1040*/ meltfptr[1039] = (void *) &cdat->dstr_888__CLASS_CTYPE;
cdat->dstr_888__CLASS_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_888__CLASS_CTYPE.val,
@@ -19011,9 +19101,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_888__CLASS_CTYPE.val) - 1);
/*iniobj dsym_889__DISCR_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1038*/ meltfptr[1037])
- /*_.VALDATA___V1038*/
- meltfptr[1037] = (void *) &cdat->dsym_889__DISCR_LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1041*/ meltfptr[1040])
+ /*_.VALDATA___V1041*/
+ meltfptr[1040] = (void *) &cdat->dsym_889__DISCR_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_889__DISCR_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19030,16 +19120,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_890__DISCR_LIST*/
- /*_.VALSTR___V1039*/ meltfptr[1038] = (void *) &cdat->dstr_890__DISCR_LIST;
+ /*_.VALSTR___V1042*/ meltfptr[1041] = (void *) &cdat->dstr_890__DISCR_LIST;
cdat->dstr_890__DISCR_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_890__DISCR_LIST.val, "DISCR_LIST",
sizeof (cdat->dstr_890__DISCR_LIST.val) - 1);
/*iniobj dsym_891__DISCR_CONSTANT_INTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1040*/ meltfptr[1039])
- /*_.VALDATA___V1040*/
- meltfptr[1039] = (void *) &cdat->dsym_891__DISCR_CONSTANT_INTEGER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1043*/ meltfptr[1042])
+ /*_.VALDATA___V1043*/
+ meltfptr[1042] = (void *) &cdat->dsym_891__DISCR_CONSTANT_INTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_891__DISCR_CONSTANT_INTEGER",
@@ -19057,7 +19147,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_892__DISCR_CONSTANT_I*/
- /*_.VALSTR___V1041*/ meltfptr[1040] =
+ /*_.VALSTR___V1044*/ meltfptr[1043] =
(void *) &cdat->dstr_892__DISCR_CONSTANT_I;
cdat->dstr_892__DISCR_CONSTANT_I.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19067,9 +19157,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_893__DISCR_VERBATIM_STRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1042*/ meltfptr[1041])
- /*_.VALDATA___V1042*/
- meltfptr[1041] = (void *) &cdat->dsym_893__DISCR_VERBATIM_STRING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1045*/ meltfptr[1044])
+ /*_.VALDATA___V1045*/
+ meltfptr[1044] = (void *) &cdat->dsym_893__DISCR_VERBATIM_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_893__DISCR_VERBATIM_STRING",
@@ -19087,7 +19177,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_894__DISCR_VERBATIM_S*/
- /*_.VALSTR___V1043*/ meltfptr[1042] =
+ /*_.VALSTR___V1046*/ meltfptr[1045] =
(void *) &cdat->dstr_894__DISCR_VERBATIM_S;
cdat->dstr_894__DISCR_VERBATIM_S.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19097,9 +19187,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_895__LIST_APPEND2LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1044*/ meltfptr[1043])
- /*_.VALDATA___V1044*/
- meltfptr[1043] = (void *) &cdat->dsym_895__LIST_APPEND2LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1047*/ meltfptr[1046])
+ /*_.VALDATA___V1047*/
+ meltfptr[1046] = (void *) &cdat->dsym_895__LIST_APPEND2LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_895__LIST_APPEND2LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19116,7 +19206,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_896__LIST_APPEND2LIST*/
- /*_.VALSTR___V1045*/ meltfptr[1044] =
+ /*_.VALSTR___V1048*/ meltfptr[1047] =
(void *) &cdat->dstr_896__LIST_APPEND2LIST;
cdat->dstr_896__LIST_APPEND2LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19126,9 +19216,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_897__LIST_TO_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1046*/ meltfptr[1045])
- /*_.VALDATA___V1046*/
- meltfptr[1045] = (void *) &cdat->dsym_897__LIST_TO_MULTIPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1049*/ meltfptr[1048])
+ /*_.VALDATA___V1049*/
+ meltfptr[1048] = (void *) &cdat->dsym_897__LIST_TO_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_897__LIST_TO_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19145,7 +19235,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_898__LIST_TO_MULTIPLE*/
- /*_.VALSTR___V1047*/ meltfptr[1046] =
+ /*_.VALSTR___V1050*/ meltfptr[1049] =
(void *) &cdat->dstr_898__LIST_TO_MULTIPLE;
cdat->dstr_898__LIST_TO_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19155,9 +19245,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_899__DISCR_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1048*/ meltfptr[1047])
- /*_.VALDATA___V1048*/
- meltfptr[1047] = (void *) &cdat->dsym_899__DISCR_MULTIPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1051*/ meltfptr[1050])
+ /*_.VALDATA___V1051*/
+ meltfptr[1050] = (void *) &cdat->dsym_899__DISCR_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_899__DISCR_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19174,7 +19264,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_900__DISCR_MULTIPLE*/
- /*_.VALSTR___V1049*/ meltfptr[1048] =
+ /*_.VALSTR___V1052*/ meltfptr[1051] =
(void *) &cdat->dstr_900__DISCR_MULTIPLE;
cdat->dstr_900__DISCR_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19183,7 +19273,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_900__DISCR_MULTIPLE.val) -
1);
/*inirout drout_901__MAKE_OBJCOMPUTE */
- /*_.VALROUT___V1050*/ meltfptr[1049] =
+ /*_.VALROUT___V1053*/ meltfptr[1052] =
(void *) &cdat->drout_901__MAKE_OBJCOMPUTE;
cdat->drout_901__MAKE_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -19195,7 +19285,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE);
/*iniclos dclo_902__MAKE_OBJCOMPUTE */
- /*_.VALCLO___V1051*/ meltfptr[1050] =
+ /*_.VALCLO___V1054*/ meltfptr[1053] =
(void *) &cdat->dclo_902__MAKE_OBJCOMPUTE;
cdat->dclo_902__MAKE_OBJCOMPUTE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -19203,9 +19293,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_903__OUTPUT_C_DECLINIT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1052*/ meltfptr[1051])
- /*_.VALDATA___V1052*/
- meltfptr[1051] = (void *) &cdat->dsym_903__OUTPUT_C_DECLINIT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1055*/ meltfptr[1054])
+ /*_.VALDATA___V1055*/
+ meltfptr[1054] = (void *) &cdat->dsym_903__OUTPUT_C_DECLINIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_903__OUTPUT_C_DECLINIT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19222,7 +19312,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_904__OUTPUT_C_DECLINI*/
- /*_.VALSTR___V1053*/ meltfptr[1052] =
+ /*_.VALSTR___V1056*/ meltfptr[1055] =
(void *) &cdat->dstr_904__OUTPUT_C_DECLINI;
cdat->dstr_904__OUTPUT_C_DECLINI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19232,9 +19322,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_905__CLASS_SELECTOR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1054*/ meltfptr[1053])
- /*_.VALDATA___V1054*/
- meltfptr[1053] = (void *) &cdat->dsym_905__CLASS_SELECTOR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1057*/ meltfptr[1056])
+ /*_.VALDATA___V1057*/
+ meltfptr[1056] = (void *) &cdat->dsym_905__CLASS_SELECTOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_905__CLASS_SELECTOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19251,7 +19341,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_906__CLASS_SELECTOR*/
- /*_.VALSTR___V1055*/ meltfptr[1054] =
+ /*_.VALSTR___V1058*/ meltfptr[1057] =
(void *) &cdat->dstr_906__CLASS_SELECTOR;
cdat->dstr_906__CLASS_SELECTOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19261,9 +19351,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_907__RECV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1056*/ meltfptr[1055])
- /*_.VALDATA___V1056*/
- meltfptr[1055] = (void *) &cdat->dsym_907__RECV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1059*/ meltfptr[1058])
+ /*_.VALDATA___V1059*/
+ meltfptr[1058] = (void *) &cdat->dsym_907__RECV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_907__RECV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19280,7 +19370,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_908__RECV*/
- /*_.VALSTR___V1057*/ meltfptr[1056] = (void *) &cdat->dstr_908__RECV;
+ /*_.VALSTR___V1060*/ meltfptr[1059] = (void *) &cdat->dstr_908__RECV;
cdat->dstr_908__RECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_908__RECV.val, "RECV",
@@ -19288,7 +19378,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:713:/ iniobj");
/*iniobj dobj_909*/
-/*_.VALDATA___V1058*/ meltfptr[1057] = (void *) &cdat->dobj_909;
+/*_.VALDATA___V1061*/ meltfptr[1060] = (void *) &cdat->dobj_909;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_909",
melt_magic_discr (((void
@@ -19303,14 +19393,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_909.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_909.obj_num = 0;
- cdat->dobj_909.obj_hash = 787829489;
+ cdat->dobj_909.obj_hash = 575139434;
cdat->dobj_909.obj_len = 2;
/*iniobj dsym_910__SBUF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1059*/ meltfptr[1058])
- /*_.VALDATA___V1059*/
- meltfptr[1058] = (void *) &cdat->dsym_910__SBUF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1062*/ meltfptr[1061])
+ /*_.VALDATA___V1062*/
+ meltfptr[1061] = (void *) &cdat->dsym_910__SBUF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_910__SBUF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19327,7 +19417,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_911__SBUF*/
- /*_.VALSTR___V1060*/ meltfptr[1059] = (void *) &cdat->dstr_911__SBUF;
+ /*_.VALSTR___V1063*/ meltfptr[1062] = (void *) &cdat->dstr_911__SBUF;
cdat->dstr_911__SBUF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_911__SBUF.val, "SBUF",
@@ -19335,7 +19425,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_912*/
-/*_.VALDATA___V1061*/ meltfptr[1060] = (void *) &cdat->dobj_912;
+/*_.VALDATA___V1064*/ meltfptr[1063] = (void *) &cdat->dobj_912;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_912",
melt_magic_discr (((void
@@ -19350,11 +19440,11 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_912.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_912.obj_num = 1;
- cdat->dobj_912.obj_hash = 1020830290;
+ cdat->dobj_912.obj_hash = 667415251;
cdat->dobj_912.obj_len = 2;
/*inimult dtup_913__OUTPUT_C_DECLINIT */
- /*_.VALTUP___V1062*/ meltfptr[1061] =
+ /*_.VALTUP___V1065*/ meltfptr[1064] =
(void *) &cdat->dtup_913__OUTPUT_C_DECLINIT;
cdat->dtup_913__OUTPUT_C_DECLINIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
@@ -19362,7 +19452,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_914__OUTPUT_C_DECLINIT*/
-/*_.VALDATA___V1063*/ meltfptr[1062] =
+/*_.VALDATA___V1066*/ meltfptr[1065] =
(void *) &cdat->dobj_914__OUTPUT_C_DECLINIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_914__OUTPUT_C_DECLINIT",
@@ -19375,12 +19465,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_914__OUTPUT_C_DECLINIT.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_914__OUTPUT_C_DECLINIT.obj_hash = 1024378813;
+ cdat->dobj_914__OUTPUT_C_DECLINIT.obj_hash = 433227;
cdat->dobj_914__OUTPUT_C_DECLINIT.obj_len = 4;
/*inistring dstr_915__OUTPUT_C_DECLINI*/
- /*_.VALSTR___V1064*/ meltfptr[1063] =
+ /*_.VALSTR___V1067*/ meltfptr[1066] =
(void *) &cdat->dstr_915__OUTPUT_C_DECLINI;
cdat->dstr_915__OUTPUT_C_DECLINI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19390,9 +19480,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_916__PUT_OBJDEST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1065*/ meltfptr[1064])
- /*_.VALDATA___V1065*/
- meltfptr[1064] = (void *) &cdat->dsym_916__PUT_OBJDEST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1068*/ meltfptr[1067])
+ /*_.VALDATA___V1068*/
+ meltfptr[1067] = (void *) &cdat->dsym_916__PUT_OBJDEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_916__PUT_OBJDEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19409,7 +19499,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_917__PUT_OBJDEST*/
- /*_.VALSTR___V1066*/ meltfptr[1065] = (void *) &cdat->dstr_917__PUT_OBJDEST;
+ /*_.VALSTR___V1069*/ meltfptr[1068] = (void *) &cdat->dstr_917__PUT_OBJDEST;
cdat->dstr_917__PUT_OBJDEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_917__PUT_OBJDEST.val,
@@ -19418,7 +19508,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:724:/ iniobj");
/*iniobj dobj_918__PUT_OBJDEST*/
-/*_.VALDATA___V1067*/ meltfptr[1066] =
+/*_.VALDATA___V1070*/ meltfptr[1069] =
(void *) &cdat->dobj_918__PUT_OBJDEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_918__PUT_OBJDEST",
@@ -19431,12 +19521,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_918__PUT_OBJDEST.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_918__PUT_OBJDEST.obj_hash = 698688827;
+ cdat->dobj_918__PUT_OBJDEST.obj_hash = 121160622;
cdat->dobj_918__PUT_OBJDEST.obj_len = 4;
/*inistring dstr_919__PUT_OBJDEST*/
- /*_.VALSTR___V1068*/ meltfptr[1067] = (void *) &cdat->dstr_919__PUT_OBJDEST;
+ /*_.VALSTR___V1071*/ meltfptr[1070] = (void *) &cdat->dstr_919__PUT_OBJDEST;
cdat->dstr_919__PUT_OBJDEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_919__PUT_OBJDEST.val,
@@ -19444,9 +19534,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_919__PUT_OBJDEST.val) - 1);
/*iniobj dsym_920__OUTPUT_C_CODE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1069*/ meltfptr[1068])
- /*_.VALDATA___V1069*/
- meltfptr[1068] = (void *) &cdat->dsym_920__OUTPUT_C_CODE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1072*/ meltfptr[1071])
+ /*_.VALDATA___V1072*/
+ meltfptr[1071] = (void *) &cdat->dsym_920__OUTPUT_C_CODE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_920__OUTPUT_C_CODE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19463,7 +19553,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_921__OUTPUT_C_CODE*/
- /*_.VALSTR___V1070*/ meltfptr[1069] =
+ /*_.VALSTR___V1073*/ meltfptr[1072] =
(void *) &cdat->dstr_921__OUTPUT_C_CODE;
cdat->dstr_921__OUTPUT_C_CODE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19474,7 +19564,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:735:/ iniobj");
/*iniobj dobj_922*/
-/*_.VALDATA___V1071*/ meltfptr[1070] = (void *) &cdat->dobj_922;
+/*_.VALDATA___V1074*/ meltfptr[1073] = (void *) &cdat->dobj_922;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_922",
melt_magic_discr (((void
@@ -19489,14 +19579,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_922.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_922.obj_num = 0;
- cdat->dobj_922.obj_hash = 382079832;
+ cdat->dobj_922.obj_hash = 139210122;
cdat->dobj_922.obj_len = 2;
/*iniobj dsym_923__DECLBUF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1072*/ meltfptr[1071])
- /*_.VALDATA___V1072*/
- meltfptr[1071] = (void *) &cdat->dsym_923__DECLBUF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1075*/ meltfptr[1074])
+ /*_.VALDATA___V1075*/
+ meltfptr[1074] = (void *) &cdat->dsym_923__DECLBUF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_923__DECLBUF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19513,7 +19603,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_924__DECLBUF*/
- /*_.VALSTR___V1073*/ meltfptr[1072] = (void *) &cdat->dstr_924__DECLBUF;
+ /*_.VALSTR___V1076*/ meltfptr[1075] = (void *) &cdat->dstr_924__DECLBUF;
cdat->dstr_924__DECLBUF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_924__DECLBUF.val, "DECLBUF",
@@ -19521,7 +19611,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_925*/
-/*_.VALDATA___V1074*/ meltfptr[1073] = (void *) &cdat->dobj_925;
+/*_.VALDATA___V1077*/ meltfptr[1076] = (void *) &cdat->dobj_925;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_925",
melt_magic_discr (((void
@@ -19536,14 +19626,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_925.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_925.obj_num = 1;
- cdat->dobj_925.obj_hash = 410979049;
+ cdat->dobj_925.obj_hash = 76523529;
cdat->dobj_925.obj_len = 2;
/*iniobj dsym_926__IMPLBUF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1075*/ meltfptr[1074])
- /*_.VALDATA___V1075*/
- meltfptr[1074] = (void *) &cdat->dsym_926__IMPLBUF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1078*/ meltfptr[1077])
+ /*_.VALDATA___V1078*/
+ meltfptr[1077] = (void *) &cdat->dsym_926__IMPLBUF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_926__IMPLBUF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19560,7 +19650,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_927__IMPLBUF*/
- /*_.VALSTR___V1076*/ meltfptr[1075] = (void *) &cdat->dstr_927__IMPLBUF;
+ /*_.VALSTR___V1079*/ meltfptr[1078] = (void *) &cdat->dstr_927__IMPLBUF;
cdat->dstr_927__IMPLBUF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_927__IMPLBUF.val, "IMPLBUF",
@@ -19568,7 +19658,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_928*/
-/*_.VALDATA___V1077*/ meltfptr[1076] = (void *) &cdat->dobj_928;
+/*_.VALDATA___V1080*/ meltfptr[1079] = (void *) &cdat->dobj_928;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_928",
melt_magic_discr (((void
@@ -19583,14 +19673,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_928.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_928.obj_num = 2;
- cdat->dobj_928.obj_hash = 770587867;
+ cdat->dobj_928.obj_hash = 549578031;
cdat->dobj_928.obj_len = 2;
/*iniobj dsym_929__DEPTH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1078*/ meltfptr[1077])
- /*_.VALDATA___V1078*/
- meltfptr[1077] = (void *) &cdat->dsym_929__DEPTH;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1081*/ meltfptr[1080])
+ /*_.VALDATA___V1081*/
+ meltfptr[1080] = (void *) &cdat->dsym_929__DEPTH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_929__DEPTH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19607,7 +19697,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_930__DEPTH*/
- /*_.VALSTR___V1079*/ meltfptr[1078] = (void *) &cdat->dstr_930__DEPTH;
+ /*_.VALSTR___V1082*/ meltfptr[1081] = (void *) &cdat->dstr_930__DEPTH;
cdat->dstr_930__DEPTH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_930__DEPTH.val, "DEPTH",
@@ -19615,7 +19705,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_931*/
-/*_.VALDATA___V1080*/ meltfptr[1079] = (void *) &cdat->dobj_931;
+/*_.VALDATA___V1083*/ meltfptr[1082] = (void *) &cdat->dobj_931;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_931",
melt_magic_discr (((void
@@ -19630,11 +19720,11 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_931.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_931.obj_num = 3;
- cdat->dobj_931.obj_hash = 974018460;
+ cdat->dobj_931.obj_hash = 733436843;
cdat->dobj_931.obj_len = 2;
/*inimult dtup_932__OUTPUT_C_CODE */
- /*_.VALTUP___V1081*/ meltfptr[1080] =
+ /*_.VALTUP___V1084*/ meltfptr[1083] =
(void *) &cdat->dtup_932__OUTPUT_C_CODE;
cdat->dtup_932__OUTPUT_C_CODE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
@@ -19642,7 +19732,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_933__OUTPUT_C_CODE*/
-/*_.VALDATA___V1082*/ meltfptr[1081] =
+/*_.VALDATA___V1085*/ meltfptr[1084] =
(void *) &cdat->dobj_933__OUTPUT_C_CODE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_933__OUTPUT_C_CODE",
@@ -19655,12 +19745,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_933__OUTPUT_C_CODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_933__OUTPUT_C_CODE.obj_hash = 631693972;
+ cdat->dobj_933__OUTPUT_C_CODE.obj_hash = 459262309;
cdat->dobj_933__OUTPUT_C_CODE.obj_len = 4;
/*inistring dstr_934__OUTPUT_C_CODE*/
- /*_.VALSTR___V1083*/ meltfptr[1082] =
+ /*_.VALSTR___V1086*/ meltfptr[1085] =
(void *) &cdat->dstr_934__OUTPUT_C_CODE;
cdat->dstr_934__OUTPUT_C_CODE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19670,9 +19760,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_935__OUTPUT_C_INITIAL_FILL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1084*/ meltfptr[1083])
- /*_.VALDATA___V1084*/
- meltfptr[1083] = (void *) &cdat->dsym_935__OUTPUT_C_INITIAL_FILL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1087*/ meltfptr[1086])
+ /*_.VALDATA___V1087*/
+ meltfptr[1086] = (void *) &cdat->dsym_935__OUTPUT_C_INITIAL_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_935__OUTPUT_C_INITIAL_FILL",
@@ -19690,7 +19780,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_936__OUTPUT_C_INITIAL*/
- /*_.VALSTR___V1085*/ meltfptr[1084] =
+ /*_.VALSTR___V1088*/ meltfptr[1087] =
(void *) &cdat->dstr_936__OUTPUT_C_INITIAL;
cdat->dstr_936__OUTPUT_C_INITIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19701,7 +19791,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:746:/ iniobj");
/*iniobj dobj_937*/
-/*_.VALDATA___V1086*/ meltfptr[1085] = (void *) &cdat->dobj_937;
+/*_.VALDATA___V1089*/ meltfptr[1088] = (void *) &cdat->dobj_937;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_937",
melt_magic_discr (((void
@@ -19716,13 +19806,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_937.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_937.obj_num = 0;
- cdat->dobj_937.obj_hash = 22087975;
+ cdat->dobj_937.obj_hash = 392059813;
cdat->dobj_937.obj_len = 2;
/*^iniobj */
/*iniobj dobj_938*/
-/*_.VALDATA___V1087*/ meltfptr[1086] = (void *) &cdat->dobj_938;
+/*_.VALDATA___V1090*/ meltfptr[1089] = (void *) &cdat->dobj_938;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_938",
melt_magic_discr (((void
@@ -19737,14 +19827,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_938.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_938.obj_num = 1;
- cdat->dobj_938.obj_hash = 452768406;
+ cdat->dobj_938.obj_hash = 655432108;
cdat->dobj_938.obj_len = 2;
/*iniobj dsym_939__PTRSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1088*/ meltfptr[1087])
- /*_.VALDATA___V1088*/
- meltfptr[1087] = (void *) &cdat->dsym_939__PTRSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1091*/ meltfptr[1090])
+ /*_.VALDATA___V1091*/
+ meltfptr[1090] = (void *) &cdat->dsym_939__PTRSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_939__PTRSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19761,7 +19851,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_940__PTRSTR*/
- /*_.VALSTR___V1089*/ meltfptr[1088] = (void *) &cdat->dstr_940__PTRSTR;
+ /*_.VALSTR___V1092*/ meltfptr[1091] = (void *) &cdat->dstr_940__PTRSTR;
cdat->dstr_940__PTRSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_940__PTRSTR.val, "PTRSTR",
@@ -19769,7 +19859,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_941*/
-/*_.VALDATA___V1090*/ meltfptr[1089] = (void *) &cdat->dobj_941;
+/*_.VALDATA___V1093*/ meltfptr[1092] = (void *) &cdat->dobj_941;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_941",
melt_magic_discr (((void
@@ -19784,13 +19874,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_941.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_941.obj_num = 2;
- cdat->dobj_941.obj_hash = 211057375;
+ cdat->dobj_941.obj_hash = 988050529;
cdat->dobj_941.obj_len = 2;
/*^iniobj */
/*iniobj dobj_942*/
-/*_.VALDATA___V1091*/ meltfptr[1090] = (void *) &cdat->dobj_942;
+/*_.VALDATA___V1094*/ meltfptr[1093] = (void *) &cdat->dobj_942;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_942",
melt_magic_discr (((void
@@ -19805,11 +19895,11 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_942.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_942.obj_num = 3;
- cdat->dobj_942.obj_hash = 851735668;
+ cdat->dobj_942.obj_hash = 515399745;
cdat->dobj_942.obj_len = 2;
/*inimult dtup_943__OUTPUT_C_INITIAL_FILL */
- /*_.VALTUP___V1092*/ meltfptr[1091] =
+ /*_.VALTUP___V1095*/ meltfptr[1094] =
(void *) &cdat->dtup_943__OUTPUT_C_INITIAL_FILL;
cdat->dtup_943__OUTPUT_C_INITIAL_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
@@ -19817,7 +19907,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_944__OUTPUT_C_INITIAL_FILL*/
-/*_.VALDATA___V1093*/ meltfptr[1092] =
+/*_.VALDATA___V1096*/ meltfptr[1095] =
(void *) &cdat->dobj_944__OUTPUT_C_INITIAL_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -19831,12 +19921,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_944__OUTPUT_C_INITIAL_FILL.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_944__OUTPUT_C_INITIAL_FILL.obj_hash = 537324868;
+ cdat->dobj_944__OUTPUT_C_INITIAL_FILL.obj_hash = 25812806;
cdat->dobj_944__OUTPUT_C_INITIAL_FILL.obj_len = 4;
/*inistring dstr_945__OUTPUT_C_INITIAL*/
- /*_.VALSTR___V1094*/ meltfptr[1093] =
+ /*_.VALSTR___V1097*/ meltfptr[1096] =
(void *) &cdat->dstr_945__OUTPUT_C_INITIAL;
cdat->dstr_945__OUTPUT_C_INITIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19846,9 +19936,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_946__OUTPUT_C_INITIAL_PREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1095*/ meltfptr[1094])
- /*_.VALDATA___V1095*/
- meltfptr[1094] = (void *) &cdat->dsym_946__OUTPUT_C_INITIAL_PREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1098*/ meltfptr[1097])
+ /*_.VALDATA___V1098*/
+ meltfptr[1097] = (void *) &cdat->dsym_946__OUTPUT_C_INITIAL_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_946__OUTPUT_C_INITIAL_PREDEF",
@@ -19866,7 +19956,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_947__OUTPUT_C_INITIAL*/
- /*_.VALSTR___V1096*/ meltfptr[1095] =
+ /*_.VALSTR___V1099*/ meltfptr[1098] =
(void *) &cdat->dstr_947__OUTPUT_C_INITIAL;
cdat->dstr_947__OUTPUT_C_INITIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -19877,7 +19967,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:757:/ iniobj");
/*iniobj dobj_948*/
-/*_.VALDATA___V1097*/ meltfptr[1096] = (void *) &cdat->dobj_948;
+/*_.VALDATA___V1100*/ meltfptr[1099] = (void *) &cdat->dobj_948;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_948",
melt_magic_discr (((void
@@ -19892,13 +19982,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_948.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_948.obj_num = 0;
- cdat->dobj_948.obj_hash = 525062302;
+ cdat->dobj_948.obj_hash = 29597055;
cdat->dobj_948.obj_len = 2;
/*^iniobj */
/*iniobj dobj_949*/
-/*_.VALDATA___V1098*/ meltfptr[1097] = (void *) &cdat->dobj_949;
+/*_.VALDATA___V1101*/ meltfptr[1100] = (void *) &cdat->dobj_949;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_949",
melt_magic_discr (((void
@@ -19913,14 +20003,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_949.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_949.obj_num = 1;
- cdat->dobj_949.obj_hash = 1051454821;
+ cdat->dobj_949.obj_hash = 33697141;
cdat->dobj_949.obj_len = 2;
/*iniobj dsym_950__PRTRSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1099*/ meltfptr[1098])
- /*_.VALDATA___V1099*/
- meltfptr[1098] = (void *) &cdat->dsym_950__PRTRSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1102*/ meltfptr[1101])
+ /*_.VALDATA___V1102*/
+ meltfptr[1101] = (void *) &cdat->dsym_950__PRTRSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_950__PRTRSTR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -19937,7 +20027,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_951__PRTRSTR*/
- /*_.VALSTR___V1100*/ meltfptr[1099] = (void *) &cdat->dstr_951__PRTRSTR;
+ /*_.VALSTR___V1103*/ meltfptr[1102] = (void *) &cdat->dstr_951__PRTRSTR;
cdat->dstr_951__PRTRSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_951__PRTRSTR.val, "PRTRSTR",
@@ -19945,7 +20035,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_952*/
-/*_.VALDATA___V1101*/ meltfptr[1100] = (void *) &cdat->dobj_952;
+/*_.VALDATA___V1104*/ meltfptr[1103] = (void *) &cdat->dobj_952;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_952",
melt_magic_discr (((void
@@ -19960,13 +20050,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_952.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_952.obj_num = 2;
- cdat->dobj_952.obj_hash = 1003682559;
+ cdat->dobj_952.obj_hash = 230574262;
cdat->dobj_952.obj_len = 2;
/*^iniobj */
/*iniobj dobj_953*/
-/*_.VALDATA___V1102*/ meltfptr[1101] = (void *) &cdat->dobj_953;
+/*_.VALDATA___V1105*/ meltfptr[1104] = (void *) &cdat->dobj_953;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_953",
melt_magic_discr (((void
@@ -19981,11 +20071,11 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_953.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_953.obj_num = 3;
- cdat->dobj_953.obj_hash = 215764780;
+ cdat->dobj_953.obj_hash = 340845944;
cdat->dobj_953.obj_len = 2;
/*inimult dtup_954__OUTPUT_C_INITIAL_PREDEF */
- /*_.VALTUP___V1103*/ meltfptr[1102] =
+ /*_.VALTUP___V1106*/ meltfptr[1105] =
(void *) &cdat->dtup_954__OUTPUT_C_INITIAL_PREDEF;
cdat->dtup_954__OUTPUT_C_INITIAL_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
@@ -19993,7 +20083,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_955__OUTPUT_C_INITIAL_PREDEF*/
-/*_.VALDATA___V1104*/ meltfptr[1103] =
+/*_.VALDATA___V1107*/ meltfptr[1106] =
(void *) &cdat->dobj_955__OUTPUT_C_INITIAL_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -20007,12 +20097,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_955__OUTPUT_C_INITIAL_PREDEF.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_955__OUTPUT_C_INITIAL_PREDEF.obj_hash = 1039216772;
+ cdat->dobj_955__OUTPUT_C_INITIAL_PREDEF.obj_hash = 179089462;
cdat->dobj_955__OUTPUT_C_INITIAL_PREDEF.obj_len = 4;
/*inistring dstr_956__OUTPUT_C_INITIAL*/
- /*_.VALSTR___V1105*/ meltfptr[1104] =
+ /*_.VALSTR___V1108*/ meltfptr[1107] =
(void *) &cdat->dstr_956__OUTPUT_C_INITIAL;
cdat->dstr_956__OUTPUT_C_INITIAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20021,7 +20111,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_956__OUTPUT_C_INITIAL.
val) - 1);
/*inirout drout_957__COMPILOBJ_CATCHALL_NREP */
- /*_.VALROUT___V1106*/ meltfptr[1105] =
+ /*_.VALROUT___V1109*/ meltfptr[1108] =
(void *) &cdat->drout_957__COMPILOBJ_CATCHALL_NREP;
cdat->drout_957__COMPILOBJ_CATCHALL_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20033,7 +20123,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_3_warmelt_genobj_COMPILOBJ_CATCHALL_NREP);
/*iniclos dclo_958__COMPILOBJ_CATCHALL_NREP */
- /*_.VALCLO___V1107*/ meltfptr[1106] =
+ /*_.VALCLO___V1110*/ meltfptr[1109] =
(void *) &cdat->dclo_958__COMPILOBJ_CATCHALL_NREP;
cdat->dclo_958__COMPILOBJ_CATCHALL_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20041,9 +20131,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_959__INSTALL_METHOD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1108*/ meltfptr[1107])
- /*_.VALDATA___V1108*/
- meltfptr[1107] = (void *) &cdat->dsym_959__INSTALL_METHOD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1111*/ meltfptr[1110])
+ /*_.VALDATA___V1111*/
+ meltfptr[1110] = (void *) &cdat->dsym_959__INSTALL_METHOD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_959__INSTALL_METHOD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20060,7 +20150,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_960__INSTALL_METHOD*/
- /*_.VALSTR___V1109*/ meltfptr[1108] =
+ /*_.VALSTR___V1112*/ meltfptr[1111] =
(void *) &cdat->dstr_960__INSTALL_METHOD;
cdat->dstr_960__INSTALL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20070,9 +20160,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_961__CLASS_NREP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1110*/ meltfptr[1109])
- /*_.VALDATA___V1110*/
- meltfptr[1109] = (void *) &cdat->dsym_961__CLASS_NREP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1113*/ meltfptr[1112])
+ /*_.VALDATA___V1113*/
+ meltfptr[1112] = (void *) &cdat->dsym_961__CLASS_NREP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_961__CLASS_NREP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20089,16 +20179,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_962__CLASS_NREP*/
- /*_.VALSTR___V1111*/ meltfptr[1110] = (void *) &cdat->dstr_962__CLASS_NREP;
+ /*_.VALSTR___V1114*/ meltfptr[1113] = (void *) &cdat->dstr_962__CLASS_NREP;
cdat->dstr_962__CLASS_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_962__CLASS_NREP.val, "CLASS_NREP",
sizeof (cdat->dstr_962__CLASS_NREP.val) - 1);
/*iniobj dsym_963__COMPILE_OBJ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1112*/ meltfptr[1111])
- /*_.VALDATA___V1112*/
- meltfptr[1111] = (void *) &cdat->dsym_963__COMPILE_OBJ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1115*/ meltfptr[1114])
+ /*_.VALDATA___V1115*/
+ meltfptr[1114] = (void *) &cdat->dsym_963__COMPILE_OBJ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_963__COMPILE_OBJ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20115,14 +20205,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_964__COMPILE_OBJ*/
- /*_.VALSTR___V1113*/ meltfptr[1112] = (void *) &cdat->dstr_964__COMPILE_OBJ;
+ /*_.VALSTR___V1116*/ meltfptr[1115] = (void *) &cdat->dstr_964__COMPILE_OBJ;
cdat->dstr_964__COMPILE_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_964__COMPILE_OBJ.val,
"COMPILE_OBJ",
sizeof (cdat->dstr_964__COMPILE_OBJ.val) - 1);
/*inirout drout_965__PUTOBJDEST_CATCHALL_OBJCODE */
- /*_.VALROUT___V1114*/ meltfptr[1113] =
+ /*_.VALROUT___V1117*/ meltfptr[1116] =
(void *) &cdat->drout_965__PUTOBJDEST_CATCHALL_OBJCODE;
cdat->drout_965__PUTOBJDEST_CATCHALL_OBJCODE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20134,14 +20224,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_4_warmelt_genobj_PUTOBJDEST_CATCHALL_OBJCODE);
/*iniclos dclo_966__PUTOBJDEST_CATCHALL_OBJCODE */
- /*_.VALCLO___V1115*/ meltfptr[1114] =
+ /*_.VALCLO___V1118*/ meltfptr[1117] =
(void *) &cdat->dclo_966__PUTOBJDEST_CATCHALL_OBJCODE;
cdat->dclo_966__PUTOBJDEST_CATCHALL_OBJCODE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_966__PUTOBJDEST_CATCHALL_OBJCODE.nbval = 0;
/*inirout drout_967__PUTOBJDEST_CATCHALL_ANYDISCR */
- /*_.VALROUT___V1116*/ meltfptr[1115] =
+ /*_.VALROUT___V1119*/ meltfptr[1118] =
(void *) &cdat->drout_967__PUTOBJDEST_CATCHALL_ANYDISCR;
cdat->drout_967__PUTOBJDEST_CATCHALL_ANYDISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20153,7 +20243,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_5_warmelt_genobj_PUTOBJDEST_CATCHALL_ANYDISCR);
/*iniclos dclo_968__PUTOBJDEST_CATCHALL_ANYDISCR */
- /*_.VALCLO___V1117*/ meltfptr[1116] =
+ /*_.VALCLO___V1120*/ meltfptr[1119] =
(void *) &cdat->dclo_968__PUTOBJDEST_CATCHALL_ANYDISCR;
cdat->dclo_968__PUTOBJDEST_CATCHALL_ANYDISCR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20161,9 +20251,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_969__DISCR_ANY_RECEIVER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1118*/ meltfptr[1117])
- /*_.VALDATA___V1118*/
- meltfptr[1117] = (void *) &cdat->dsym_969__DISCR_ANY_RECEIVER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1121*/ meltfptr[1120])
+ /*_.VALDATA___V1121*/
+ meltfptr[1120] = (void *) &cdat->dsym_969__DISCR_ANY_RECEIVER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_969__DISCR_ANY_RECEIVER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20180,7 +20270,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_970__DISCR_ANY_RECEIV*/
- /*_.VALSTR___V1119*/ meltfptr[1118] =
+ /*_.VALSTR___V1122*/ meltfptr[1121] =
(void *) &cdat->dstr_970__DISCR_ANY_RECEIV;
cdat->dstr_970__DISCR_ANY_RECEIV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20189,7 +20279,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_970__DISCR_ANY_RECEIV.
val) - 1);
/*inirout drout_971__GETCTYPE_OBJVALUE */
- /*_.VALROUT___V1120*/ meltfptr[1119] =
+ /*_.VALROUT___V1123*/ meltfptr[1122] =
(void *) &cdat->drout_971__GETCTYPE_OBJVALUE;
cdat->drout_971__GETCTYPE_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20201,7 +20291,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_6_warmelt_genobj_GETCTYPE_OBJVALUE);
/*iniclos dclo_972__GETCTYPE_OBJVALUE */
- /*_.VALCLO___V1121*/ meltfptr[1120] =
+ /*_.VALCLO___V1124*/ meltfptr[1123] =
(void *) &cdat->dclo_972__GETCTYPE_OBJVALUE;
cdat->dclo_972__GETCTYPE_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20209,9 +20299,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_973__GET_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1122*/ meltfptr[1121])
- /*_.VALDATA___V1122*/
- meltfptr[1121] = (void *) &cdat->dsym_973__GET_CTYPE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1125*/ meltfptr[1124])
+ /*_.VALDATA___V1125*/
+ meltfptr[1124] = (void *) &cdat->dsym_973__GET_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_973__GET_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20228,13 +20318,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_974__GET_CTYPE*/
- /*_.VALSTR___V1123*/ meltfptr[1122] = (void *) &cdat->dstr_974__GET_CTYPE;
+ /*_.VALSTR___V1126*/ meltfptr[1125] = (void *) &cdat->dstr_974__GET_CTYPE;
cdat->dstr_974__GET_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_974__GET_CTYPE.val, "GET_CTYPE",
sizeof (cdat->dstr_974__GET_CTYPE.val) - 1);
/*inirout drout_975__GECTYP_OBJNIL */
- /*_.VALROUT___V1124*/ meltfptr[1123] =
+ /*_.VALROUT___V1127*/ meltfptr[1126] =
(void *) &cdat->drout_975__GECTYP_OBJNIL;
cdat->drout_975__GECTYP_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20245,7 +20335,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_7_warmelt_genobj_GECTYP_OBJNIL);
/*iniclos dclo_976__GECTYP_OBJNIL */
- /*_.VALCLO___V1125*/ meltfptr[1124] =
+ /*_.VALCLO___V1128*/ meltfptr[1127] =
(void *) &cdat->dclo_976__GECTYP_OBJNIL;
cdat->dclo_976__GECTYP_OBJNIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20253,9 +20343,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_977__CTYPE_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1126*/ meltfptr[1125])
- /*_.VALDATA___V1126*/
- meltfptr[1125] = (void *) &cdat->dsym_977__CTYPE_VALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1129*/ meltfptr[1128])
+ /*_.VALDATA___V1129*/
+ meltfptr[1128] = (void *) &cdat->dsym_977__CTYPE_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_977__CTYPE_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20272,14 +20362,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_978__CTYPE_VALUE*/
- /*_.VALSTR___V1127*/ meltfptr[1126] = (void *) &cdat->dstr_978__CTYPE_VALUE;
+ /*_.VALSTR___V1130*/ meltfptr[1129] = (void *) &cdat->dstr_978__CTYPE_VALUE;
cdat->dstr_978__CTYPE_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_978__CTYPE_VALUE.val,
"CTYPE_VALUE",
sizeof (cdat->dstr_978__CTYPE_VALUE.val) - 1);
/*inirout drout_979__GECTYP_OBJINITSTRING */
- /*_.VALROUT___V1128*/ meltfptr[1127] =
+ /*_.VALROUT___V1131*/ meltfptr[1130] =
(void *) &cdat->drout_979__GECTYP_OBJINITSTRING;
cdat->drout_979__GECTYP_OBJINITSTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20291,14 +20381,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_8_warmelt_genobj_GECTYP_OBJINITSTRING);
/*iniclos dclo_980__GECTYP_OBJINITSTRING */
- /*_.VALCLO___V1129*/ meltfptr[1128] =
+ /*_.VALCLO___V1132*/ meltfptr[1131] =
(void *) &cdat->dclo_980__GECTYP_OBJINITSTRING;
cdat->dclo_980__GECTYP_OBJINITSTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_980__GECTYP_OBJINITSTRING.nbval = 0;
/*inirout drout_981__DBGOUT_ROUTINEOBJ */
- /*_.VALROUT___V1130*/ meltfptr[1129] =
+ /*_.VALROUT___V1133*/ meltfptr[1132] =
(void *) &cdat->drout_981__DBGOUT_ROUTINEOBJ;
cdat->drout_981__DBGOUT_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20310,7 +20400,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_9_warmelt_genobj_DBGOUT_ROUTINEOBJ);
/*iniclos dclo_982__DBGOUT_ROUTINEOBJ */
- /*_.VALCLO___V1131*/ meltfptr[1130] =
+ /*_.VALCLO___V1134*/ meltfptr[1133] =
(void *) &cdat->dclo_982__DBGOUT_ROUTINEOBJ;
cdat->dclo_982__DBGOUT_ROUTINEOBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20318,9 +20408,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_983__DBGOUT_NAMEDOBJECT_METHOD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1132*/ meltfptr[1131])
- /*_.VALDATA___V1132*/
- meltfptr[1131] = (void *) &cdat->dsym_983__DBGOUT_NAMEDOBJECT_METHOD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1135*/ meltfptr[1134])
+ /*_.VALDATA___V1135*/
+ meltfptr[1134] = (void *) &cdat->dsym_983__DBGOUT_NAMEDOBJECT_METHOD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_983__DBGOUT_NAMEDOBJECT_METHOD",
@@ -20338,7 +20428,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_984__DBGOUT_NAMEDOBJE*/
- /*_.VALSTR___V1133*/ meltfptr[1132] =
+ /*_.VALSTR___V1136*/ meltfptr[1135] =
(void *) &cdat->dstr_984__DBGOUT_NAMEDOBJE;
cdat->dstr_984__DBGOUT_NAMEDOBJE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20348,9 +20438,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_985__DBG_OUTPUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1134*/ meltfptr[1133])
- /*_.VALDATA___V1134*/
- meltfptr[1133] = (void *) &cdat->dsym_985__DBG_OUTPUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1137*/ meltfptr[1136])
+ /*_.VALDATA___V1137*/
+ meltfptr[1136] = (void *) &cdat->dsym_985__DBG_OUTPUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_985__DBG_OUTPUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20367,13 +20457,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_986__DBG_OUTPUT*/
- /*_.VALSTR___V1135*/ meltfptr[1134] = (void *) &cdat->dstr_986__DBG_OUTPUT;
+ /*_.VALSTR___V1138*/ meltfptr[1137] = (void *) &cdat->dstr_986__DBG_OUTPUT;
cdat->dstr_986__DBG_OUTPUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_986__DBG_OUTPUT.val, "DBG_OUTPUT",
sizeof (cdat->dstr_986__DBG_OUTPUT.val) - 1);
/*inirout drout_987__PUTOBJDEST_OBJDESTINSTR */
- /*_.VALROUT___V1136*/ meltfptr[1135] =
+ /*_.VALROUT___V1139*/ meltfptr[1138] =
(void *) &cdat->drout_987__PUTOBJDEST_OBJDESTINSTR;
cdat->drout_987__PUTOBJDEST_OBJDESTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20385,14 +20475,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_10_warmelt_genobj_PUTOBJDEST_OBJDESTINSTR);
/*iniclos dclo_988__PUTOBJDEST_OBJDESTINSTR */
- /*_.VALCLO___V1137*/ meltfptr[1136] =
+ /*_.VALCLO___V1140*/ meltfptr[1139] =
(void *) &cdat->dclo_988__PUTOBJDEST_OBJDESTINSTR;
cdat->dclo_988__PUTOBJDEST_OBJDESTINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_988__PUTOBJDEST_OBJDESTINSTR.nbval = 0;
/*inirout drout_989__PUTOBJDEST_OBJFINALRETURN */
- /*_.VALROUT___V1138*/ meltfptr[1137] =
+ /*_.VALROUT___V1141*/ meltfptr[1140] =
(void *) &cdat->drout_989__PUTOBJDEST_OBJFINALRETURN;
cdat->drout_989__PUTOBJDEST_OBJFINALRETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20404,14 +20494,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_11_warmelt_genobj_PUTOBJDEST_OBJFINALRETURN);
/*iniclos dclo_990__PUTOBJDEST_OBJFINALRETURN */
- /*_.VALCLO___V1139*/ meltfptr[1138] =
+ /*_.VALCLO___V1142*/ meltfptr[1141] =
(void *) &cdat->dclo_990__PUTOBJDEST_OBJFINALRETURN;
cdat->dclo_990__PUTOBJDEST_OBJFINALRETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_990__PUTOBJDEST_OBJFINALRETURN.nbval = 0;
/*inirout drout_991__VARIADIC_IDSTR */
- /*_.VALROUT___V1140*/ meltfptr[1139] =
+ /*_.VALROUT___V1143*/ meltfptr[1142] =
(void *) &cdat->drout_991__VARIADIC_IDSTR;
cdat->drout_991__VARIADIC_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20422,7 +20512,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_12_warmelt_genobj_VARIADIC_IDSTR);
/*iniclos dclo_992__VARIADIC_IDSTR */
- /*_.VALCLO___V1141*/ meltfptr[1140] =
+ /*_.VALCLO___V1144*/ meltfptr[1143] =
(void *) &cdat->dclo_992__VARIADIC_IDSTR;
cdat->dclo_992__VARIADIC_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20430,9 +20520,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_993__AS_NULL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1142*/ meltfptr[1141])
- /*_.VALDATA___V1142*/
- meltfptr[1141] = (void *) &cdat->dsym_993__AS_NULL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1145*/ meltfptr[1144])
+ /*_.VALDATA___V1145*/
+ meltfptr[1144] = (void *) &cdat->dsym_993__AS_NULL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_993__AS_NULL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20449,16 +20539,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_994__AS_NULL*/
- /*_.VALSTR___V1143*/ meltfptr[1142] = (void *) &cdat->dstr_994__AS_NULL;
+ /*_.VALSTR___V1146*/ meltfptr[1145] = (void *) &cdat->dstr_994__AS_NULL;
cdat->dstr_994__AS_NULL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_994__AS_NULL.val, "AS_NULL",
sizeof (cdat->dstr_994__AS_NULL.val) - 1);
/*iniobj dsym_995__CLASS_CLONED_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1144*/ meltfptr[1143])
- /*_.VALDATA___V1144*/
- meltfptr[1143] = (void *) &cdat->dsym_995__CLASS_CLONED_SYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1147*/ meltfptr[1146])
+ /*_.VALDATA___V1147*/
+ meltfptr[1146] = (void *) &cdat->dsym_995__CLASS_CLONED_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_995__CLASS_CLONED_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20475,7 +20565,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_996__CLASS_CLONED_SYM*/
- /*_.VALSTR___V1145*/ meltfptr[1144] =
+ /*_.VALSTR___V1148*/ meltfptr[1147] =
(void *) &cdat->dstr_996__CLASS_CLONED_SYM;
cdat->dstr_996__CLASS_CLONED_SYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20485,9 +20575,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_997__INTEGERBOX_OF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1146*/ meltfptr[1145])
- /*_.VALDATA___V1146*/
- meltfptr[1145] = (void *) &cdat->dsym_997__INTEGERBOX_OF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1149*/ meltfptr[1148])
+ /*_.VALDATA___V1149*/
+ meltfptr[1148] = (void *) &cdat->dsym_997__INTEGERBOX_OF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_997__INTEGERBOX_OF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20504,7 +20594,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_998__INTEGERBOX_OF*/
- /*_.VALSTR___V1147*/ meltfptr[1146] =
+ /*_.VALSTR___V1150*/ meltfptr[1149] =
(void *) &cdat->dstr_998__INTEGERBOX_OF;
cdat->dstr_998__INTEGERBOX_OF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20514,9 +20604,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_999__DISCR_STRBUF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1148*/ meltfptr[1147])
- /*_.VALDATA___V1148*/
- meltfptr[1147] = (void *) &cdat->dsym_999__DISCR_STRBUF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1151*/ meltfptr[1150])
+ /*_.VALDATA___V1151*/
+ meltfptr[1150] = (void *) &cdat->dsym_999__DISCR_STRBUF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_999__DISCR_STRBUF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20533,7 +20623,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1000__DISCR_STRBUF*/
- /*_.VALSTR___V1149*/ meltfptr[1148] =
+ /*_.VALSTR___V1152*/ meltfptr[1151] =
(void *) &cdat->dstr_1000__DISCR_STRBUF;
cdat->dstr_1000__DISCR_STRBUF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20543,9 +20633,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_1001__CLASS_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1150*/ meltfptr[1149])
- /*_.VALDATA___V1150*/
- meltfptr[1149] = (void *) &cdat->dsym_1001__CLASS_SYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1153*/ meltfptr[1152])
+ /*_.VALDATA___V1153*/
+ meltfptr[1152] = (void *) &cdat->dsym_1001__CLASS_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1001__CLASS_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20562,7 +20652,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1002__CLASS_SYMBOL*/
- /*_.VALSTR___V1151*/ meltfptr[1150] =
+ /*_.VALSTR___V1154*/ meltfptr[1153] =
(void *) &cdat->dstr_1002__CLASS_SYMBOL;
cdat->dstr_1002__CLASS_SYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20571,7 +20661,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1002__CLASS_SYMBOL.val) -
1);
/*inirout drout_1003__VARIADIC_INDEX_IDSTR */
- /*_.VALROUT___V1152*/ meltfptr[1151] =
+ /*_.VALROUT___V1155*/ meltfptr[1154] =
(void *) &cdat->drout_1003__VARIADIC_INDEX_IDSTR;
cdat->drout_1003__VARIADIC_INDEX_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20583,14 +20673,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_13_warmelt_genobj_VARIADIC_INDEX_IDSTR);
/*iniclos dclo_1004__VARIADIC_INDEX_IDSTR */
- /*_.VALCLO___V1153*/ meltfptr[1152] =
+ /*_.VALCLO___V1156*/ meltfptr[1155] =
(void *) &cdat->dclo_1004__VARIADIC_INDEX_IDSTR;
cdat->dclo_1004__VARIADIC_INDEX_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1004__VARIADIC_INDEX_IDSTR.nbval = 0;
/*inirout drout_1005__VARIADIC_LENGTH_IDSTR */
- /*_.VALROUT___V1154*/ meltfptr[1153] =
+ /*_.VALROUT___V1157*/ meltfptr[1156] =
(void *) &cdat->drout_1005__VARIADIC_LENGTH_IDSTR;
cdat->drout_1005__VARIADIC_LENGTH_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20602,14 +20692,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_14_warmelt_genobj_VARIADIC_LENGTH_IDSTR);
/*iniclos dclo_1006__VARIADIC_LENGTH_IDSTR */
- /*_.VALCLO___V1155*/ meltfptr[1154] =
+ /*_.VALCLO___V1158*/ meltfptr[1157] =
(void *) &cdat->dclo_1006__VARIADIC_LENGTH_IDSTR;
cdat->dclo_1006__VARIADIC_LENGTH_IDSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1006__VARIADIC_LENGTH_IDSTR.nbval = 0;
/*inirout drout_1007__COMPILE2OBJ_PROCEDURE */
- /*_.VALROUT___V1156*/ meltfptr[1155] =
+ /*_.VALROUT___V1159*/ meltfptr[1158] =
(void *) &cdat->drout_1007__COMPILE2OBJ_PROCEDURE;
cdat->drout_1007__COMPILE2OBJ_PROCEDURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -20621,7 +20711,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_15_warmelt_genobj_COMPILE2OBJ_PROCEDURE);
/*iniclos dclo_1008__COMPILE2OBJ_PROCEDURE */
- /*_.VALCLO___V1167*/ meltfptr[1166] =
+ /*_.VALCLO___V1170*/ meltfptr[1169] =
(void *) &cdat->dclo_1008__COMPILE2OBJ_PROCEDURE;
cdat->dclo_1008__COMPILE2OBJ_PROCEDURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -20629,9 +20719,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1009__CLASS_NREP_ROUTPROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1168*/ meltfptr[1167])
- /*_.VALDATA___V1168*/
- meltfptr[1167] = (void *) &cdat->dsym_1009__CLASS_NREP_ROUTPROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1171*/ meltfptr[1170])
+ /*_.VALDATA___V1171*/
+ meltfptr[1170] = (void *) &cdat->dsym_1009__CLASS_NREP_ROUTPROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1009__CLASS_NREP_ROUTPROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20648,7 +20738,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1010__CLASS_NREP_ROUTP*/
- /*_.VALSTR___V1169*/ meltfptr[1168] =
+ /*_.VALSTR___V1172*/ meltfptr[1171] =
(void *) &cdat->dstr_1010__CLASS_NREP_ROUTP;
cdat->dstr_1010__CLASS_NREP_ROUTP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20658,9 +20748,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1011__CLASS_MODULE_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1170*/ meltfptr[1169])
- /*_.VALDATA___V1170*/
- meltfptr[1169] = (void *) &cdat->dsym_1011__CLASS_MODULE_CONTEXT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1173*/ meltfptr[1172])
+ /*_.VALDATA___V1173*/
+ meltfptr[1172] = (void *) &cdat->dsym_1011__CLASS_MODULE_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1011__CLASS_MODULE_CONTEXT",
@@ -20678,7 +20768,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1012__CLASS_MODULE_CON*/
- /*_.VALSTR___V1171*/ meltfptr[1170] =
+ /*_.VALSTR___V1174*/ meltfptr[1173] =
(void *) &cdat->dstr_1012__CLASS_MODULE_CON;
cdat->dstr_1012__CLASS_MODULE_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20688,9 +20778,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1013__CLASS_NREP_DEFUNROUTPROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1172*/ meltfptr[1171])
- /*_.VALDATA___V1172*/
- meltfptr[1171] = (void *) &cdat->dsym_1013__CLASS_NREP_DEFUNROUTPROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1175*/ meltfptr[1174])
+ /*_.VALDATA___V1175*/
+ meltfptr[1174] = (void *) &cdat->dsym_1013__CLASS_NREP_DEFUNROUTPROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1013__CLASS_NREP_DEFUNROUTPROC",
@@ -20708,7 +20798,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1014__CLASS_NREP_DEFUN*/
- /*_.VALSTR___V1173*/ meltfptr[1172] =
+ /*_.VALSTR___V1176*/ meltfptr[1175] =
(void *) &cdat->dstr_1014__CLASS_NREP_DEFUN;
cdat->dstr_1014__CLASS_NREP_DEFUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20718,9 +20808,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1015__DISCR_STRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1174*/ meltfptr[1173])
- /*_.VALDATA___V1174*/
- meltfptr[1173] = (void *) &cdat->dsym_1015__DISCR_STRING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1177*/ meltfptr[1176])
+ /*_.VALDATA___V1177*/
+ meltfptr[1176] = (void *) &cdat->dsym_1015__DISCR_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1015__DISCR_STRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20737,7 +20827,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1016__DISCR_STRING*/
- /*_.VALSTR___V1175*/ meltfptr[1174] =
+ /*_.VALSTR___V1178*/ meltfptr[1177] =
(void *) &cdat->dstr_1016__DISCR_STRING;
cdat->dstr_1016__DISCR_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20747,9 +20837,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_1017__DISCR_INTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1176*/ meltfptr[1175])
- /*_.VALDATA___V1176*/
- meltfptr[1175] = (void *) &cdat->dsym_1017__DISCR_INTEGER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1179*/ meltfptr[1178])
+ /*_.VALDATA___V1179*/
+ meltfptr[1178] = (void *) &cdat->dsym_1017__DISCR_INTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1017__DISCR_INTEGER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20766,7 +20856,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1018__DISCR_INTEGER*/
- /*_.VALSTR___V1177*/ meltfptr[1176] =
+ /*_.VALSTR___V1180*/ meltfptr[1179] =
(void *) &cdat->dstr_1018__DISCR_INTEGER;
cdat->dstr_1018__DISCR_INTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20776,9 +20866,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_1019__DISCR_MAP_OBJECTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1178*/ meltfptr[1177])
- /*_.VALDATA___V1178*/
- meltfptr[1177] = (void *) &cdat->dsym_1019__DISCR_MAP_OBJECTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1181*/ meltfptr[1180])
+ /*_.VALDATA___V1181*/
+ meltfptr[1180] = (void *) &cdat->dsym_1019__DISCR_MAP_OBJECTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1019__DISCR_MAP_OBJECTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20795,7 +20885,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1020__DISCR_MAP_OBJECT*/
- /*_.VALSTR___V1179*/ meltfptr[1178] =
+ /*_.VALSTR___V1182*/ meltfptr[1181] =
(void *) &cdat->dstr_1020__DISCR_MAP_OBJECT;
cdat->dstr_1020__DISCR_MAP_OBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20805,9 +20895,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1021__CLASS_C_GENERATION_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1180*/ meltfptr[1179])
- /*_.VALDATA___V1180*/
- meltfptr[1179] = (void *) &cdat->dsym_1021__CLASS_C_GENERATION_CONTEXT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1183*/ meltfptr[1182])
+ /*_.VALDATA___V1183*/
+ meltfptr[1182] = (void *) &cdat->dsym_1021__CLASS_C_GENERATION_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1021__CLASS_C_GENERATION_CONTEXT",
@@ -20825,7 +20915,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1022__CLASS_C_GENERATI*/
- /*_.VALSTR___V1181*/ meltfptr[1180] =
+ /*_.VALSTR___V1184*/ meltfptr[1183] =
(void *) &cdat->dstr_1022__CLASS_C_GENERATI;
cdat->dstr_1022__CLASS_C_GENERATI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20835,9 +20925,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1023__RETVAL_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1159*/ meltfptr[1158])
- /*_.VALDATA___V1159*/
- meltfptr[1158] = (void *) &cdat->dsym_1023__RETVAL_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1162*/ meltfptr[1161])
+ /*_.VALDATA___V1162*/
+ meltfptr[1161] = (void *) &cdat->dsym_1023__RETVAL_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1023__RETVAL_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20854,16 +20944,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1024__RETVAL_*/
- /*_.VALSTR___V1160*/ meltfptr[1159] = (void *) &cdat->dstr_1024__RETVAL_;
+ /*_.VALSTR___V1163*/ meltfptr[1162] = (void *) &cdat->dstr_1024__RETVAL_;
cdat->dstr_1024__RETVAL_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1024__RETVAL_.val, "_RETVAL_",
sizeof (cdat->dstr_1024__RETVAL_.val) - 1);
/*iniobj dsym_1025__MULTIPLE_MAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1182*/ meltfptr[1181])
- /*_.VALDATA___V1182*/
- meltfptr[1181] = (void *) &cdat->dsym_1025__MULTIPLE_MAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1185*/ meltfptr[1184])
+ /*_.VALDATA___V1185*/
+ meltfptr[1184] = (void *) &cdat->dsym_1025__MULTIPLE_MAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1025__MULTIPLE_MAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20880,7 +20970,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1026__MULTIPLE_MAP*/
- /*_.VALSTR___V1183*/ meltfptr[1182] =
+ /*_.VALSTR___V1186*/ meltfptr[1185] =
(void *) &cdat->dstr_1026__MULTIPLE_MAP;
cdat->dstr_1026__MULTIPLE_MAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20889,7 +20979,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1026__MULTIPLE_MAP.val) -
1);
/*inirout drout_1027__LAMBDA_ */
- /*_.VALROUT___V1165*/ meltfptr[1164] = (void *) &cdat->drout_1027__LAMBDA_;
+ /*_.VALROUT___V1168*/ meltfptr[1167] = (void *) &cdat->drout_1027__LAMBDA_;
cdat->drout_1027__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1027__LAMBDA_.routdescr,
@@ -20900,9 +20990,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1028__CLASS_FORMAL_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1184*/ meltfptr[1183])
- /*_.VALDATA___V1184*/
- meltfptr[1183] = (void *) &cdat->dsym_1028__CLASS_FORMAL_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1187*/ meltfptr[1186])
+ /*_.VALDATA___V1187*/
+ meltfptr[1186] = (void *) &cdat->dsym_1028__CLASS_FORMAL_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1028__CLASS_FORMAL_BINDING",
@@ -20920,7 +21010,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1029__CLASS_FORMAL_BIN*/
- /*_.VALSTR___V1185*/ meltfptr[1184] =
+ /*_.VALSTR___V1188*/ meltfptr[1187] =
(void *) &cdat->dstr_1029__CLASS_FORMAL_BIN;
cdat->dstr_1029__CLASS_FORMAL_BIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -20930,9 +21020,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1030__CTYPE_LONG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1186*/ meltfptr[1185])
- /*_.VALDATA___V1186*/
- meltfptr[1185] = (void *) &cdat->dsym_1030__CTYPE_LONG;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1189*/ meltfptr[1188])
+ /*_.VALDATA___V1189*/
+ meltfptr[1188] = (void *) &cdat->dsym_1030__CTYPE_LONG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1030__CTYPE_LONG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20949,16 +21039,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1031__CTYPE_LONG*/
- /*_.VALSTR___V1187*/ meltfptr[1186] = (void *) &cdat->dstr_1031__CTYPE_LONG;
+ /*_.VALSTR___V1190*/ meltfptr[1189] = (void *) &cdat->dstr_1031__CTYPE_LONG;
cdat->dstr_1031__CTYPE_LONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1031__CTYPE_LONG.val, "CTYPE_LONG",
sizeof (cdat->dstr_1031__CTYPE_LONG.val) - 1);
/*iniobj dsym_1032__LIST_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1188*/ meltfptr[1187])
- /*_.VALDATA___V1188*/
- meltfptr[1187] = (void *) &cdat->dsym_1032__LIST_EVERY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1191*/ meltfptr[1190])
+ /*_.VALDATA___V1191*/
+ meltfptr[1190] = (void *) &cdat->dsym_1032__LIST_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1032__LIST_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -20975,13 +21065,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1033__LIST_EVERY*/
- /*_.VALSTR___V1189*/ meltfptr[1188] = (void *) &cdat->dstr_1033__LIST_EVERY;
+ /*_.VALSTR___V1192*/ meltfptr[1191] = (void *) &cdat->dstr_1033__LIST_EVERY;
cdat->dstr_1033__LIST_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1033__LIST_EVERY.val, "LIST_EVERY",
sizeof (cdat->dstr_1033__LIST_EVERY.val) - 1);
/*inirout drout_1034__LAMBDA_ */
- /*_.VALROUT___V1166*/ meltfptr[1165] = (void *) &cdat->drout_1034__LAMBDA_;
+ /*_.VALROUT___V1169*/ meltfptr[1168] = (void *) &cdat->drout_1034__LAMBDA_;
cdat->drout_1034__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1034__LAMBDA_.routdescr,
@@ -20992,9 +21082,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1035__INITIALSYSTEMDATA_OBJPREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1190*/ meltfptr[1189])
- /*_.VALDATA___V1190*/
- meltfptr[1189] = (void *) &cdat->dsym_1035__INITIALSYSTEMDATA_OBJPREDEF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1193*/ meltfptr[1192])
+ /*_.VALDATA___V1193*/
+ meltfptr[1192] = (void *) &cdat->dsym_1035__INITIALSYSTEMDATA_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1035__INITIALSYSTEMDATA_OBJPREDEF",
@@ -21012,7 +21102,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1036__INITIALSYSTEMDAT*/
- /*_.VALSTR___V1191*/ meltfptr[1190] =
+ /*_.VALSTR___V1194*/ meltfptr[1193] =
(void *) &cdat->dstr_1036__INITIALSYSTEMDAT;
cdat->dstr_1036__INITIALSYSTEMDAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21023,28 +21113,28 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:1075:/ iniobj");
/*iniobj dobj_1037__INITIALSYSTEMDATA_OBJPREDEF*/
-/*_.VALDATA___V1192*/ meltfptr[1191] =
+/*_.VALDATA___V1195*/ meltfptr[1194] =
(void *) &cdat->dobj_1037__INITIALSYSTEMDATA_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dobj_1037__INITIALSYSTEMDATA_OBJPREDEF",
- melt_magic_discr ( /*_.VALDATA___V212*/ meltfptr[211]) ==
+ melt_magic_discr ( /*_.VALDATA___V215*/ meltfptr[214]) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr objmagic dobj_1037__INITIALSYSTEMDATA_OBJPREDEF",
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1037__INITIALSYSTEMDATA_OBJPREDEF.meltobj_class =
- (meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]);
- cdat->dobj_1037__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 404090170;
+ (meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]);
+ cdat->dobj_1037__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 705809954;
cdat->dobj_1037__INITIALSYSTEMDATA_OBJPREDEF.obj_len = 2;
/*iniobj dsym_1038__INITIAL_SYSTEM_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1193*/ meltfptr[1192])
- /*_.VALDATA___V1193*/
- meltfptr[1192] = (void *) &cdat->dsym_1038__INITIAL_SYSTEM_DATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1196*/ meltfptr[1195])
+ /*_.VALDATA___V1196*/
+ meltfptr[1195] = (void *) &cdat->dsym_1038__INITIAL_SYSTEM_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1038__INITIAL_SYSTEM_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21061,7 +21151,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1039__INITIAL_SYSTEM_D*/
- /*_.VALSTR___V1194*/ meltfptr[1193] =
+ /*_.VALSTR___V1197*/ meltfptr[1196] =
(void *) &cdat->dstr_1039__INITIAL_SYSTEM_D;
cdat->dstr_1039__INITIAL_SYSTEM_D.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21070,7 +21160,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1039__INITIAL_SYSTEM_D.
val) - 1);
/*inirout drout_1040__APPEND_COMMENT */
- /*_.VALROUT___V1195*/ meltfptr[1194] =
+ /*_.VALROUT___V1198*/ meltfptr[1197] =
(void *) &cdat->drout_1040__APPEND_COMMENT;
cdat->drout_1040__APPEND_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21082,14 +21172,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_18_warmelt_genobj_APPEND_COMMENT);
/*iniclos dclo_1041__APPEND_COMMENT */
- /*_.VALCLO___V1196*/ meltfptr[1195] =
+ /*_.VALCLO___V1199*/ meltfptr[1198] =
(void *) &cdat->dclo_1041__APPEND_COMMENT;
cdat->dclo_1041__APPEND_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1041__APPEND_COMMENT.nbval = 0;
/*inirout drout_1042__APPEND_COMMENTCONST */
- /*_.VALROUT___V1197*/ meltfptr[1196] =
+ /*_.VALROUT___V1200*/ meltfptr[1199] =
(void *) &cdat->drout_1042__APPEND_COMMENTCONST;
cdat->drout_1042__APPEND_COMMENTCONST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21101,14 +21191,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_19_warmelt_genobj_APPEND_COMMENTCONST);
/*iniclos dclo_1043__APPEND_COMMENTCONST */
- /*_.VALCLO___V1198*/ meltfptr[1197] =
+ /*_.VALCLO___V1201*/ meltfptr[1200] =
(void *) &cdat->dclo_1043__APPEND_COMMENTCONST;
cdat->dclo_1043__APPEND_COMMENTCONST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1043__APPEND_COMMENTCONST.nbval = 0;
/*inirout drout_1044__COMPILE2OBJ_INITPROC */
- /*_.VALROUT___V1199*/ meltfptr[1198] =
+ /*_.VALROUT___V1202*/ meltfptr[1201] =
(void *) &cdat->drout_1044__COMPILE2OBJ_INITPROC;
cdat->drout_1044__COMPILE2OBJ_INITPROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21120,7 +21210,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_20_warmelt_genobj_COMPILE2OBJ_INITPROC);
/*iniclos dclo_1045__COMPILE2OBJ_INITPROC */
- /*_.VALCLO___V1221*/ meltfptr[1220] =
+ /*_.VALCLO___V1224*/ meltfptr[1223] =
(void *) &cdat->dclo_1045__COMPILE2OBJ_INITPROC;
cdat->dclo_1045__COMPILE2OBJ_INITPROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -21128,9 +21218,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1046__CLASS_NREP_INITPROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1222*/ meltfptr[1221])
- /*_.VALDATA___V1222*/
- meltfptr[1221] = (void *) &cdat->dsym_1046__CLASS_NREP_INITPROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1225*/ meltfptr[1224])
+ /*_.VALDATA___V1225*/
+ meltfptr[1224] = (void *) &cdat->dsym_1046__CLASS_NREP_INITPROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1046__CLASS_NREP_INITPROC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21147,7 +21237,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1047__CLASS_NREP_INITP*/
- /*_.VALSTR___V1223*/ meltfptr[1222] =
+ /*_.VALSTR___V1226*/ meltfptr[1225] =
(void *) &cdat->dstr_1047__CLASS_NREP_INITP;
cdat->dstr_1047__CLASS_NREP_INITP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21157,7 +21247,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*inistring dstr_1048__start_module_mel*/
- /*_.VALSTR___V1200*/ meltfptr[1199] =
+ /*_.VALSTR___V1203*/ meltfptr[1202] =
(void *) &cdat->dstr_1048__start_module_mel;
cdat->dstr_1048__start_module_mel.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21167,9 +21257,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1049__CLASS_INITIAL_GENERATION_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1224*/ meltfptr[1223])
- /*_.VALDATA___V1224*/
- meltfptr[1223] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1227*/ meltfptr[1226])
+ /*_.VALDATA___V1227*/
+ meltfptr[1226] =
(void *) &cdat->dsym_1049__CLASS_INITIAL_GENERATION_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -21188,7 +21278,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1050__CLASS_INITIAL_GE*/
- /*_.VALSTR___V1225*/ meltfptr[1224] =
+ /*_.VALSTR___V1228*/ meltfptr[1227] =
(void *) &cdat->dstr_1050__CLASS_INITIAL_GE;
cdat->dstr_1050__CLASS_INITIAL_GE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21198,9 +21288,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1051__LIST_MAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1226*/ meltfptr[1225])
- /*_.VALDATA___V1226*/
- meltfptr[1225] = (void *) &cdat->dsym_1051__LIST_MAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1229*/ meltfptr[1228])
+ /*_.VALDATA___V1229*/
+ meltfptr[1228] = (void *) &cdat->dsym_1051__LIST_MAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1051__LIST_MAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21217,13 +21307,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1052__LIST_MAP*/
- /*_.VALSTR___V1227*/ meltfptr[1226] = (void *) &cdat->dstr_1052__LIST_MAP;
+ /*_.VALSTR___V1230*/ meltfptr[1229] = (void *) &cdat->dstr_1052__LIST_MAP;
cdat->dstr_1052__LIST_MAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1052__LIST_MAP.val, "LIST_MAP",
sizeof (cdat->dstr_1052__LIST_MAP.val) - 1);
/*inirout drout_1053__LAMBDA_ */
- /*_.VALROUT___V1201*/ meltfptr[1200] = (void *) &cdat->drout_1053__LAMBDA_;
+ /*_.VALROUT___V1204*/ meltfptr[1203] = (void *) &cdat->drout_1053__LAMBDA_;
cdat->drout_1053__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1053__LAMBDA_.routdescr,
@@ -21234,9 +21324,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1054__RETINIT_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1202*/ meltfptr[1201])
- /*_.VALDATA___V1202*/
- meltfptr[1201] = (void *) &cdat->dsym_1054__RETINIT_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1205*/ meltfptr[1204])
+ /*_.VALDATA___V1205*/
+ meltfptr[1204] = (void *) &cdat->dsym_1054__RETINIT_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1054__RETINIT_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21253,16 +21343,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1055__RETINIT_*/
- /*_.VALSTR___V1203*/ meltfptr[1202] = (void *) &cdat->dstr_1055__RETINIT_;
+ /*_.VALSTR___V1206*/ meltfptr[1205] = (void *) &cdat->dstr_1055__RETINIT_;
cdat->dstr_1055__RETINIT_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1055__RETINIT_.val, "_RETINIT_",
sizeof (cdat->dstr_1055__RETINIT_.val) - 1);
/*iniobj dsym_1056__CONTENV_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1204*/ meltfptr[1203])
- /*_.VALDATA___V1204*/
- meltfptr[1203] = (void *) &cdat->dsym_1056__CONTENV_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1207*/ meltfptr[1206])
+ /*_.VALDATA___V1207*/
+ meltfptr[1206] = (void *) &cdat->dsym_1056__CONTENV_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1056__CONTENV_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21279,16 +21369,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1057__CONTENV_*/
- /*_.VALSTR___V1205*/ meltfptr[1204] = (void *) &cdat->dstr_1057__CONTENV_;
+ /*_.VALSTR___V1208*/ meltfptr[1207] = (void *) &cdat->dstr_1057__CONTENV_;
cdat->dstr_1057__CONTENV_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1057__CONTENV_.val, "_CONTENV_",
sizeof (cdat->dstr_1057__CONTENV_.val) - 1);
/*iniobj dsym_1058__FRESHENV_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1206*/ meltfptr[1205])
- /*_.VALDATA___V1206*/
- meltfptr[1205] = (void *) &cdat->dsym_1058__FRESHENV_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1209*/ meltfptr[1208])
+ /*_.VALDATA___V1209*/
+ meltfptr[1208] = (void *) &cdat->dsym_1058__FRESHENV_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1058__FRESHENV_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21305,16 +21395,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1059__FRESHENV_*/
- /*_.VALSTR___V1207*/ meltfptr[1206] = (void *) &cdat->dstr_1059__FRESHENV_;
+ /*_.VALSTR___V1210*/ meltfptr[1209] = (void *) &cdat->dstr_1059__FRESHENV_;
cdat->dstr_1059__FRESHENV_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1059__FRESHENV_.val, "_FRESHENV_",
sizeof (cdat->dstr_1059__FRESHENV_.val) - 1);
/*iniobj dsym_1060__PREVENV_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1208*/ meltfptr[1207])
- /*_.VALDATA___V1208*/
- meltfptr[1207] = (void *) &cdat->dsym_1060__PREVENV_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1211*/ meltfptr[1210])
+ /*_.VALDATA___V1211*/
+ meltfptr[1210] = (void *) &cdat->dsym_1060__PREVENV_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1060__PREVENV_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21331,16 +21421,16 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1061__PREVENV_*/
- /*_.VALSTR___V1209*/ meltfptr[1208] = (void *) &cdat->dstr_1061__PREVENV_;
+ /*_.VALSTR___V1212*/ meltfptr[1211] = (void *) &cdat->dstr_1061__PREVENV_;
cdat->dstr_1061__PREVENV_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1061__PREVENV_.val, "_PREVENV_",
sizeof (cdat->dstr_1061__PREVENV_.val) - 1);
/*iniobj dsym_1062__VALEXPORT_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1210*/ meltfptr[1209])
- /*_.VALDATA___V1210*/
- meltfptr[1209] = (void *) &cdat->dsym_1062__VALEXPORT_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1213*/ meltfptr[1212])
+ /*_.VALDATA___V1213*/
+ meltfptr[1212] = (void *) &cdat->dsym_1062__VALEXPORT_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1062__VALEXPORT_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21357,7 +21447,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1063__VALEXPORT_*/
- /*_.VALSTR___V1211*/ meltfptr[1210] = (void *) &cdat->dstr_1063__VALEXPORT_;
+ /*_.VALSTR___V1214*/ meltfptr[1213] = (void *) &cdat->dstr_1063__VALEXPORT_;
cdat->dstr_1063__VALEXPORT_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1063__VALEXPORT_.val,
@@ -21365,9 +21455,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1063__VALEXPORT_.val) - 1);
/*iniobj dsym_1064__VALIMPORT_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1212*/ meltfptr[1211])
- /*_.VALDATA___V1212*/
- meltfptr[1211] = (void *) &cdat->dsym_1064__VALIMPORT_;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1215*/ meltfptr[1214])
+ /*_.VALDATA___V1215*/
+ meltfptr[1214] = (void *) &cdat->dsym_1064__VALIMPORT_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1064__VALIMPORT_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21384,7 +21474,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1065__VALIMPORT_*/
- /*_.VALSTR___V1213*/ meltfptr[1212] = (void *) &cdat->dstr_1065__VALIMPORT_;
+ /*_.VALSTR___V1216*/ meltfptr[1215] = (void *) &cdat->dstr_1065__VALIMPORT_;
cdat->dstr_1065__VALIMPORT_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1065__VALIMPORT_.val,
@@ -21392,9 +21482,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1065__VALIMPORT_.val) - 1);
/*iniobj dsym_1066__CLASS_ANY_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1228*/ meltfptr[1227])
- /*_.VALDATA___V1228*/
- meltfptr[1227] = (void *) &cdat->dsym_1066__CLASS_ANY_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1231*/ meltfptr[1230])
+ /*_.VALDATA___V1231*/
+ meltfptr[1230] = (void *) &cdat->dsym_1066__CLASS_ANY_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1066__CLASS_ANY_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21411,7 +21501,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1067__CLASS_ANY_BINDIN*/
- /*_.VALSTR___V1229*/ meltfptr[1228] =
+ /*_.VALSTR___V1232*/ meltfptr[1231] =
(void *) &cdat->dstr_1067__CLASS_ANY_BINDIN;
cdat->dstr_1067__CLASS_ANY_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21421,9 +21511,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1068__CLASS_FIXED_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1230*/ meltfptr[1229])
- /*_.VALDATA___V1230*/
- meltfptr[1229] = (void *) &cdat->dsym_1068__CLASS_FIXED_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1233*/ meltfptr[1232])
+ /*_.VALDATA___V1233*/
+ meltfptr[1232] = (void *) &cdat->dsym_1068__CLASS_FIXED_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1068__CLASS_FIXED_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21440,7 +21530,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1069__CLASS_FIXED_BIND*/
- /*_.VALSTR___V1231*/ meltfptr[1230] =
+ /*_.VALSTR___V1234*/ meltfptr[1233] =
(void *) &cdat->dstr_1069__CLASS_FIXED_BIND;
cdat->dstr_1069__CLASS_FIXED_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21450,9 +21540,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1070__CLASS_NREP_SIMPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1232*/ meltfptr[1231])
- /*_.VALDATA___V1232*/
- meltfptr[1231] = (void *) &cdat->dsym_1070__CLASS_NREP_SIMPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1235*/ meltfptr[1234])
+ /*_.VALDATA___V1235*/
+ meltfptr[1234] = (void *) &cdat->dsym_1070__CLASS_NREP_SIMPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1070__CLASS_NREP_SIMPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21469,7 +21559,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1071__CLASS_NREP_SIMPL*/
- /*_.VALSTR___V1233*/ meltfptr[1232] =
+ /*_.VALSTR___V1236*/ meltfptr[1235] =
(void *) &cdat->dstr_1071__CLASS_NREP_SIMPL;
cdat->dstr_1071__CLASS_NREP_SIMPL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21479,9 +21569,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1072__SYSDATA_CONT_FRESH_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1234*/ meltfptr[1233])
- /*_.VALDATA___V1234*/
- meltfptr[1233] = (void *) &cdat->dsym_1072__SYSDATA_CONT_FRESH_ENV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1237*/ meltfptr[1236])
+ /*_.VALDATA___V1237*/
+ meltfptr[1236] = (void *) &cdat->dsym_1072__SYSDATA_CONT_FRESH_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1072__SYSDATA_CONT_FRESH_ENV",
@@ -21499,7 +21589,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1073__SYSDATA_CONT_FRE*/
- /*_.VALSTR___V1235*/ meltfptr[1234] =
+ /*_.VALSTR___V1238*/ meltfptr[1237] =
(void *) &cdat->dstr_1073__SYSDATA_CONT_FRE;
cdat->dstr_1073__SYSDATA_CONT_FRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21508,7 +21598,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1073__SYSDATA_CONT_FRE.
val) - 1);
/*inirout drout_1074__LAMBDA_ */
- /*_.VALROUT___V1214*/ meltfptr[1213] = (void *) &cdat->drout_1074__LAMBDA_;
+ /*_.VALROUT___V1217*/ meltfptr[1216] = (void *) &cdat->drout_1074__LAMBDA_;
cdat->drout_1074__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1074__LAMBDA_.routdescr,
@@ -21519,9 +21609,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1075__CLASS_NREP_IMPORTEDVAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1236*/ meltfptr[1235])
- /*_.VALDATA___V1236*/
- meltfptr[1235] = (void *) &cdat->dsym_1075__CLASS_NREP_IMPORTEDVAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1239*/ meltfptr[1238])
+ /*_.VALDATA___V1239*/
+ meltfptr[1238] = (void *) &cdat->dsym_1075__CLASS_NREP_IMPORTEDVAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1075__CLASS_NREP_IMPORTEDVAL",
@@ -21539,7 +21629,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1076__CLASS_NREP_IMPOR*/
- /*_.VALSTR___V1237*/ meltfptr[1236] =
+ /*_.VALSTR___V1240*/ meltfptr[1239] =
(void *) &cdat->dstr_1076__CLASS_NREP_IMPOR;
cdat->dstr_1076__CLASS_NREP_IMPOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21548,7 +21638,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1076__CLASS_NREP_IMPOR.
val) - 1);
/*inirout drout_1077__LAMBDA_ */
- /*_.VALROUT___V1215*/ meltfptr[1214] = (void *) &cdat->drout_1077__LAMBDA_;
+ /*_.VALROUT___V1218*/ meltfptr[1217] = (void *) &cdat->drout_1077__LAMBDA_;
cdat->drout_1077__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1077__LAMBDA_.routdescr,
@@ -21559,9 +21649,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1078__CLASS_NREP_BOUND_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1238*/ meltfptr[1237])
- /*_.VALDATA___V1238*/
- meltfptr[1237] = (void *) &cdat->dsym_1078__CLASS_NREP_BOUND_DATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1241*/ meltfptr[1240])
+ /*_.VALDATA___V1241*/
+ meltfptr[1240] = (void *) &cdat->dsym_1078__CLASS_NREP_BOUND_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1078__CLASS_NREP_BOUND_DATA",
@@ -21579,7 +21669,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1079__CLASS_NREP_BOUND*/
- /*_.VALSTR___V1239*/ meltfptr[1238] =
+ /*_.VALSTR___V1242*/ meltfptr[1241] =
(void *) &cdat->dstr_1079__CLASS_NREP_BOUND;
cdat->dstr_1079__CLASS_NREP_BOUND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21588,7 +21678,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1079__CLASS_NREP_BOUND.
val) - 1);
/*inirout drout_1080__LAMBDA_ */
- /*_.VALROUT___V1216*/ meltfptr[1215] = (void *) &cdat->drout_1080__LAMBDA_;
+ /*_.VALROUT___V1219*/ meltfptr[1218] = (void *) &cdat->drout_1080__LAMBDA_;
cdat->drout_1080__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1080__LAMBDA_.routdescr,
@@ -21599,9 +21689,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1081__MULTIPLE_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1240*/ meltfptr[1239])
- /*_.VALDATA___V1240*/
- meltfptr[1239] = (void *) &cdat->dsym_1081__MULTIPLE_EVERY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1243*/ meltfptr[1242])
+ /*_.VALDATA___V1243*/
+ meltfptr[1242] = (void *) &cdat->dsym_1081__MULTIPLE_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1081__MULTIPLE_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21618,7 +21708,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1082__MULTIPLE_EVERY*/
- /*_.VALSTR___V1241*/ meltfptr[1240] =
+ /*_.VALSTR___V1244*/ meltfptr[1243] =
(void *) &cdat->dstr_1082__MULTIPLE_EVERY;
cdat->dstr_1082__MULTIPLE_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21627,7 +21717,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1082__MULTIPLE_EVERY.val) -
1);
/*inirout drout_1083__LAMBDA_ */
- /*_.VALROUT___V1217*/ meltfptr[1216] = (void *) &cdat->drout_1083__LAMBDA_;
+ /*_.VALROUT___V1220*/ meltfptr[1219] = (void *) &cdat->drout_1083__LAMBDA_;
cdat->drout_1083__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1083__LAMBDA_.routdescr,
@@ -21638,9 +21728,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1084__CLASS_NREP_DATAKEYWORD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1242*/ meltfptr[1241])
- /*_.VALDATA___V1242*/
- meltfptr[1241] = (void *) &cdat->dsym_1084__CLASS_NREP_DATAKEYWORD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1245*/ meltfptr[1244])
+ /*_.VALDATA___V1245*/
+ meltfptr[1244] = (void *) &cdat->dsym_1084__CLASS_NREP_DATAKEYWORD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1084__CLASS_NREP_DATAKEYWORD",
@@ -21658,7 +21748,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1085__CLASS_NREP_DATAK*/
- /*_.VALSTR___V1243*/ meltfptr[1242] =
+ /*_.VALSTR___V1246*/ meltfptr[1245] =
(void *) &cdat->dstr_1085__CLASS_NREP_DATAK;
cdat->dstr_1085__CLASS_NREP_DATAK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21668,9 +21758,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1086__CLASS_NREP_DATASYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1244*/ meltfptr[1243])
- /*_.VALDATA___V1244*/
- meltfptr[1243] = (void *) &cdat->dsym_1086__CLASS_NREP_DATASYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1247*/ meltfptr[1246])
+ /*_.VALDATA___V1247*/
+ meltfptr[1246] = (void *) &cdat->dsym_1086__CLASS_NREP_DATASYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1086__CLASS_NREP_DATASYMBOL",
@@ -21688,7 +21778,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1087__CLASS_NREP_DATAS*/
- /*_.VALSTR___V1245*/ meltfptr[1244] =
+ /*_.VALSTR___V1248*/ meltfptr[1247] =
(void *) &cdat->dstr_1087__CLASS_NREP_DATAS;
cdat->dstr_1087__CLASS_NREP_DATAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21698,9 +21788,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1088__SYSDATA_VALUE_IMPORTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1246*/ meltfptr[1245])
- /*_.VALDATA___V1246*/
- meltfptr[1245] = (void *) &cdat->dsym_1088__SYSDATA_VALUE_IMPORTER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1249*/ meltfptr[1248])
+ /*_.VALDATA___V1249*/
+ meltfptr[1248] = (void *) &cdat->dsym_1088__SYSDATA_VALUE_IMPORTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1088__SYSDATA_VALUE_IMPORTER",
@@ -21718,7 +21808,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1089__SYSDATA_VALUE_IM*/
- /*_.VALSTR___V1247*/ meltfptr[1246] =
+ /*_.VALSTR___V1250*/ meltfptr[1249] =
(void *) &cdat->dstr_1089__SYSDATA_VALUE_IM;
cdat->dstr_1089__SYSDATA_VALUE_IM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21727,7 +21817,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1089__SYSDATA_VALUE_IM.
val) - 1);
/*inirout drout_1090__LAMBDA_ */
- /*_.VALROUT___V1218*/ meltfptr[1217] = (void *) &cdat->drout_1090__LAMBDA_;
+ /*_.VALROUT___V1221*/ meltfptr[1220] = (void *) &cdat->drout_1090__LAMBDA_;
cdat->drout_1090__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1090__LAMBDA_.routdescr,
@@ -21737,7 +21827,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_26_warmelt_genobj_LAMBDA___8__);
/*inirout drout_1091__LAMBDA_ */
- /*_.VALROUT___V1219*/ meltfptr[1218] = (void *) &cdat->drout_1091__LAMBDA_;
+ /*_.VALROUT___V1222*/ meltfptr[1221] = (void *) &cdat->drout_1091__LAMBDA_;
cdat->drout_1091__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1091__LAMBDA_.routdescr,
@@ -21747,7 +21837,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_27_warmelt_genobj_LAMBDA___9__);
/*inirout drout_1092__LAMBDA_ */
- /*_.VALROUT___V1220*/ meltfptr[1219] = (void *) &cdat->drout_1092__LAMBDA_;
+ /*_.VALROUT___V1223*/ meltfptr[1222] = (void *) &cdat->drout_1092__LAMBDA_;
cdat->drout_1092__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1092__LAMBDA_.routdescr,
@@ -21758,9 +21848,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1093__COMPILE2OBJ_INITPROC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1248*/ meltfptr[1247])
- /*_.VALDATA___V1248*/
- meltfptr[1247] = (void *) &cdat->dsym_1093__COMPILE2OBJ_INITPROC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1251*/ meltfptr[1250])
+ /*_.VALDATA___V1251*/
+ meltfptr[1250] = (void *) &cdat->dsym_1093__COMPILE2OBJ_INITPROC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1093__COMPILE2OBJ_INITPROC",
@@ -21778,7 +21868,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1094__COMPILE2OBJ_INIT*/
- /*_.VALSTR___V1249*/ meltfptr[1248] =
+ /*_.VALSTR___V1252*/ meltfptr[1251] =
(void *) &cdat->dstr_1094__COMPILE2OBJ_INIT;
cdat->dstr_1094__COMPILE2OBJ_INIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21788,9 +21878,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1095__COMPILE2OBJ_PROCEDURE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1250*/ meltfptr[1249])
- /*_.VALDATA___V1250*/
- meltfptr[1249] = (void *) &cdat->dsym_1095__COMPILE2OBJ_PROCEDURE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1253*/ meltfptr[1252])
+ /*_.VALDATA___V1253*/
+ meltfptr[1252] = (void *) &cdat->dsym_1095__COMPILE2OBJ_PROCEDURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1095__COMPILE2OBJ_PROCEDURE",
@@ -21808,7 +21898,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1096__COMPILE2OBJ_PROC*/
- /*_.VALSTR___V1251*/ meltfptr[1250] =
+ /*_.VALSTR___V1254*/ meltfptr[1253] =
(void *) &cdat->dstr_1096__COMPILE2OBJ_PROC;
cdat->dstr_1096__COMPILE2OBJ_PROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21818,9 +21908,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1097__VARIADIC_INDEX_IDSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1252*/ meltfptr[1251])
- /*_.VALDATA___V1252*/
- meltfptr[1251] = (void *) &cdat->dsym_1097__VARIADIC_INDEX_IDSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1255*/ meltfptr[1254])
+ /*_.VALDATA___V1255*/
+ meltfptr[1254] = (void *) &cdat->dsym_1097__VARIADIC_INDEX_IDSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1097__VARIADIC_INDEX_IDSTR",
@@ -21838,7 +21928,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1098__VARIADIC_INDEX_I*/
- /*_.VALSTR___V1253*/ meltfptr[1252] =
+ /*_.VALSTR___V1256*/ meltfptr[1255] =
(void *) &cdat->dstr_1098__VARIADIC_INDEX_I;
cdat->dstr_1098__VARIADIC_INDEX_I.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21848,9 +21938,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1099__VARIADIC_LENGTH_IDSTR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1254*/ meltfptr[1253])
- /*_.VALDATA___V1254*/
- meltfptr[1253] = (void *) &cdat->dsym_1099__VARIADIC_LENGTH_IDSTR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1257*/ meltfptr[1256])
+ /*_.VALDATA___V1257*/
+ meltfptr[1256] = (void *) &cdat->dsym_1099__VARIADIC_LENGTH_IDSTR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1099__VARIADIC_LENGTH_IDSTR",
@@ -21868,7 +21958,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1100__VARIADIC_LENGTH_*/
- /*_.VALSTR___V1255*/ meltfptr[1254] =
+ /*_.VALSTR___V1258*/ meltfptr[1257] =
(void *) &cdat->dstr_1100__VARIADIC_LENGTH_;
cdat->dstr_1100__VARIADIC_LENGTH_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -21877,7 +21967,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1100__VARIADIC_LENGTH_.
val) - 1);
/*inirout drout_1101__GET_FREE_OBJLOCPTR */
- /*_.VALROUT___V1158*/ meltfptr[1157] =
+ /*_.VALROUT___V1161*/ meltfptr[1160] =
(void *) &cdat->drout_1101__GET_FREE_OBJLOCPTR;
cdat->drout_1101__GET_FREE_OBJLOCPTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21889,14 +21979,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_29_warmelt_genobj_GET_FREE_OBJLOCPTR);
/*iniclos dclo_1102__GET_FREE_OBJLOCPTR */
- /*_.VALCLO___V1157*/ meltfptr[1156] =
+ /*_.VALCLO___V1160*/ meltfptr[1159] =
(void *) &cdat->dclo_1102__GET_FREE_OBJLOCPTR;
cdat->dclo_1102__GET_FREE_OBJLOCPTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1102__GET_FREE_OBJLOCPTR.nbval = 0;
/*inirout drout_1103__GET_FREE_OBJLOCLONG */
- /*_.VALROUT___V1162*/ meltfptr[1161] =
+ /*_.VALROUT___V1165*/ meltfptr[1164] =
(void *) &cdat->drout_1103__GET_FREE_OBJLOCLONG;
cdat->drout_1103__GET_FREE_OBJLOCLONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21908,14 +21998,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_30_warmelt_genobj_GET_FREE_OBJLOCLONG);
/*iniclos dclo_1104__GET_FREE_OBJLOCLONG */
- /*_.VALCLO___V1161*/ meltfptr[1160] =
+ /*_.VALCLO___V1164*/ meltfptr[1163] =
(void *) &cdat->dclo_1104__GET_FREE_OBJLOCLONG;
cdat->dclo_1104__GET_FREE_OBJLOCLONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1104__GET_FREE_OBJLOCLONG.nbval = 0;
/*inirout drout_1105__GET_FREE_OBJLOCTYPED */
- /*_.VALROUT___V1164*/ meltfptr[1163] =
+ /*_.VALROUT___V1167*/ meltfptr[1166] =
(void *) &cdat->drout_1105__GET_FREE_OBJLOCTYPED;
cdat->drout_1105__GET_FREE_OBJLOCTYPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21927,7 +22017,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_31_warmelt_genobj_GET_FREE_OBJLOCTYPED);
/*iniclos dclo_1106__GET_FREE_OBJLOCTYPED */
- /*_.VALCLO___V1163*/ meltfptr[1162] =
+ /*_.VALCLO___V1166*/ meltfptr[1165] =
(void *) &cdat->dclo_1106__GET_FREE_OBJLOCTYPED;
cdat->dclo_1106__GET_FREE_OBJLOCTYPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -21935,9 +22025,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1107__CTYPE_VOID*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1256*/ meltfptr[1255])
- /*_.VALDATA___V1256*/
- meltfptr[1255] = (void *) &cdat->dsym_1107__CTYPE_VOID;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1259*/ meltfptr[1258])
+ /*_.VALDATA___V1259*/
+ meltfptr[1258] = (void *) &cdat->dsym_1107__CTYPE_VOID;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1107__CTYPE_VOID",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -21954,13 +22044,13 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1108__CTYPE_VOID*/
- /*_.VALSTR___V1257*/ meltfptr[1256] = (void *) &cdat->dstr_1108__CTYPE_VOID;
+ /*_.VALSTR___V1260*/ meltfptr[1259] = (void *) &cdat->dstr_1108__CTYPE_VOID;
cdat->dstr_1108__CTYPE_VOID.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1108__CTYPE_VOID.val, "CTYPE_VOID",
sizeof (cdat->dstr_1108__CTYPE_VOID.val) - 1);
/*inirout drout_1109__DISPOSE_OBJLOC */
- /*_.VALROUT___V1258*/ meltfptr[1257] =
+ /*_.VALROUT___V1261*/ meltfptr[1260] =
(void *) &cdat->drout_1109__DISPOSE_OBJLOC;
cdat->drout_1109__DISPOSE_OBJLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21972,14 +22062,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_32_warmelt_genobj_DISPOSE_OBJLOC);
/*iniclos dclo_1110__DISPOSE_OBJLOC */
- /*_.VALCLO___V1259*/ meltfptr[1258] =
+ /*_.VALCLO___V1262*/ meltfptr[1261] =
(void *) &cdat->dclo_1110__DISPOSE_OBJLOC;
cdat->dclo_1110__DISPOSE_OBJLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1110__DISPOSE_OBJLOC.nbval = 0;
/*inirout drout_1111__DISPOSE_BND_OBJ */
- /*_.VALROUT___V1260*/ meltfptr[1259] =
+ /*_.VALROUT___V1263*/ meltfptr[1262] =
(void *) &cdat->drout_1111__DISPOSE_BND_OBJ;
cdat->drout_1111__DISPOSE_BND_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -21991,7 +22081,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_33_warmelt_genobj_DISPOSE_BND_OBJ);
/*iniclos dclo_1112__DISPOSE_BND_OBJ */
- /*_.VALCLO___V1261*/ meltfptr[1260] =
+ /*_.VALCLO___V1264*/ meltfptr[1263] =
(void *) &cdat->dclo_1112__DISPOSE_BND_OBJ;
cdat->dclo_1112__DISPOSE_BND_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -21999,9 +22089,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1113__CLASS_LET_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1262*/ meltfptr[1261])
- /*_.VALDATA___V1262*/
- meltfptr[1261] = (void *) &cdat->dsym_1113__CLASS_LET_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1265*/ meltfptr[1264])
+ /*_.VALDATA___V1265*/
+ meltfptr[1264] = (void *) &cdat->dsym_1113__CLASS_LET_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1113__CLASS_LET_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22018,7 +22108,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1114__CLASS_LET_BINDIN*/
- /*_.VALSTR___V1263*/ meltfptr[1262] =
+ /*_.VALSTR___V1266*/ meltfptr[1265] =
(void *) &cdat->dstr_1114__CLASS_LET_BINDIN;
cdat->dstr_1114__CLASS_LET_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22027,7 +22117,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1114__CLASS_LET_BINDIN.
val) - 1);
/*inirout drout_1115__COMPILOBJ_NREP_CHUNK */
- /*_.VALROUT___V1264*/ meltfptr[1263] =
+ /*_.VALROUT___V1267*/ meltfptr[1266] =
(void *) &cdat->drout_1115__COMPILOBJ_NREP_CHUNK;
cdat->drout_1115__COMPILOBJ_NREP_CHUNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22039,7 +22129,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_34_warmelt_genobj_COMPILOBJ_NREP_CHUNK);
/*iniclos dclo_1116__COMPILOBJ_NREP_CHUNK */
- /*_.VALCLO___V1266*/ meltfptr[1265] =
+ /*_.VALCLO___V1269*/ meltfptr[1268] =
(void *) &cdat->dclo_1116__COMPILOBJ_NREP_CHUNK;
cdat->dclo_1116__COMPILOBJ_NREP_CHUNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22047,9 +22137,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1117__CLASS_NREP_CHUNK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1267*/ meltfptr[1266])
- /*_.VALDATA___V1267*/
- meltfptr[1266] = (void *) &cdat->dsym_1117__CLASS_NREP_CHUNK;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1270*/ meltfptr[1269])
+ /*_.VALDATA___V1270*/
+ meltfptr[1269] = (void *) &cdat->dsym_1117__CLASS_NREP_CHUNK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1117__CLASS_NREP_CHUNK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22066,7 +22156,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1118__CLASS_NREP_CHUNK*/
- /*_.VALSTR___V1268*/ meltfptr[1267] =
+ /*_.VALSTR___V1271*/ meltfptr[1270] =
(void *) &cdat->dstr_1118__CLASS_NREP_CHUNK;
cdat->dstr_1118__CLASS_NREP_CHUNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22075,7 +22165,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1118__CLASS_NREP_CHUNK.
val) - 1);
/*inirout drout_1119__LAMBDA_ */
- /*_.VALROUT___V1265*/ meltfptr[1264] = (void *) &cdat->drout_1119__LAMBDA_;
+ /*_.VALROUT___V1268*/ meltfptr[1267] = (void *) &cdat->drout_1119__LAMBDA_;
cdat->drout_1119__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1119__LAMBDA_.routdescr,
@@ -22085,7 +22175,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_35_warmelt_genobj_LAMBDA___11__);
/*inirout drout_1120__GETCTYPE_TYPEXPR */
- /*_.VALROUT___V1269*/ meltfptr[1268] =
+ /*_.VALROUT___V1272*/ meltfptr[1271] =
(void *) &cdat->drout_1120__GETCTYPE_TYPEXPR;
cdat->drout_1120__GETCTYPE_TYPEXPR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22097,7 +22187,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_36_warmelt_genobj_GETCTYPE_TYPEXPR);
/*iniclos dclo_1121__GETCTYPE_TYPEXPR */
- /*_.VALCLO___V1270*/ meltfptr[1269] =
+ /*_.VALCLO___V1273*/ meltfptr[1272] =
(void *) &cdat->dclo_1121__GETCTYPE_TYPEXPR;
cdat->dclo_1121__GETCTYPE_TYPEXPR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22105,9 +22195,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1122__CLASS_NREP_TYPED_EXPRESSION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1271*/ meltfptr[1270])
- /*_.VALDATA___V1271*/
- meltfptr[1270] = (void *) &cdat->dsym_1122__CLASS_NREP_TYPED_EXPRESSION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1274*/ meltfptr[1273])
+ /*_.VALDATA___V1274*/
+ meltfptr[1273] = (void *) &cdat->dsym_1122__CLASS_NREP_TYPED_EXPRESSION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1122__CLASS_NREP_TYPED_EXPRESSION",
@@ -22125,7 +22215,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1123__CLASS_NREP_TYPED*/
- /*_.VALSTR___V1272*/ meltfptr[1271] =
+ /*_.VALSTR___V1275*/ meltfptr[1274] =
(void *) &cdat->dstr_1123__CLASS_NREP_TYPED;
cdat->dstr_1123__CLASS_NREP_TYPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22134,7 +22224,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1123__CLASS_NREP_TYPED.
val) - 1);
/*inirout drout_1124__COMPILOBJ_NREP_NIL */
- /*_.VALROUT___V1273*/ meltfptr[1272] =
+ /*_.VALROUT___V1276*/ meltfptr[1275] =
(void *) &cdat->drout_1124__COMPILOBJ_NREP_NIL;
cdat->drout_1124__COMPILOBJ_NREP_NIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22146,7 +22236,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_37_warmelt_genobj_COMPILOBJ_NREP_NIL);
/*iniclos dclo_1125__COMPILOBJ_NREP_NIL */
- /*_.VALCLO___V1274*/ meltfptr[1273] =
+ /*_.VALCLO___V1277*/ meltfptr[1276] =
(void *) &cdat->dclo_1125__COMPILOBJ_NREP_NIL;
cdat->dclo_1125__COMPILOBJ_NREP_NIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22154,9 +22244,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1126__CLASS_NREP_NIL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1275*/ meltfptr[1274])
- /*_.VALDATA___V1275*/
- meltfptr[1274] = (void *) &cdat->dsym_1126__CLASS_NREP_NIL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1278*/ meltfptr[1277])
+ /*_.VALDATA___V1278*/
+ meltfptr[1277] = (void *) &cdat->dsym_1126__CLASS_NREP_NIL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1126__CLASS_NREP_NIL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22173,7 +22263,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1127__CLASS_NREP_NIL*/
- /*_.VALSTR___V1276*/ meltfptr[1275] =
+ /*_.VALSTR___V1279*/ meltfptr[1278] =
(void *) &cdat->dstr_1127__CLASS_NREP_NIL;
cdat->dstr_1127__CLASS_NREP_NIL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22182,7 +22272,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1127__CLASS_NREP_NIL.val) -
1);
/*inirout drout_1128__COMPILOBJ_NREP_COMMENT */
- /*_.VALROUT___V1277*/ meltfptr[1276] =
+ /*_.VALROUT___V1280*/ meltfptr[1279] =
(void *) &cdat->drout_1128__COMPILOBJ_NREP_COMMENT;
cdat->drout_1128__COMPILOBJ_NREP_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22194,7 +22284,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_38_warmelt_genobj_COMPILOBJ_NREP_COMMENT);
/*iniclos dclo_1129__COMPILOBJ_NREP_COMMENT */
- /*_.VALCLO___V1278*/ meltfptr[1277] =
+ /*_.VALCLO___V1281*/ meltfptr[1280] =
(void *) &cdat->dclo_1129__COMPILOBJ_NREP_COMMENT;
cdat->dclo_1129__COMPILOBJ_NREP_COMMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22202,9 +22292,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1130__CLASS_NREP_COMMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1279*/ meltfptr[1278])
- /*_.VALDATA___V1279*/
- meltfptr[1278] = (void *) &cdat->dsym_1130__CLASS_NREP_COMMENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1282*/ meltfptr[1281])
+ /*_.VALDATA___V1282*/
+ meltfptr[1281] = (void *) &cdat->dsym_1130__CLASS_NREP_COMMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1130__CLASS_NREP_COMMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22221,7 +22311,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1131__CLASS_NREP_COMME*/
- /*_.VALSTR___V1280*/ meltfptr[1279] =
+ /*_.VALSTR___V1283*/ meltfptr[1282] =
(void *) &cdat->dstr_1131__CLASS_NREP_COMME;
cdat->dstr_1131__CLASS_NREP_COMME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22230,7 +22320,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1131__CLASS_NREP_COMME.
val) - 1);
/*inirout drout_1132__COMPILOBJ_NREP_LOCSYMOCC */
- /*_.VALROUT___V1281*/ meltfptr[1280] =
+ /*_.VALROUT___V1284*/ meltfptr[1283] =
(void *) &cdat->drout_1132__COMPILOBJ_NREP_LOCSYMOCC;
cdat->drout_1132__COMPILOBJ_NREP_LOCSYMOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22242,7 +22332,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_39_warmelt_genobj_COMPILOBJ_NREP_LOCSYMOCC);
/*iniclos dclo_1133__COMPILOBJ_NREP_LOCSYMOCC */
- /*_.VALCLO___V1282*/ meltfptr[1281] =
+ /*_.VALCLO___V1285*/ meltfptr[1284] =
(void *) &cdat->dclo_1133__COMPILOBJ_NREP_LOCSYMOCC;
cdat->dclo_1133__COMPILOBJ_NREP_LOCSYMOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22250,9 +22340,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1134__CLASS_NREP_LOCSYMOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1283*/ meltfptr[1282])
- /*_.VALDATA___V1283*/
- meltfptr[1282] = (void *) &cdat->dsym_1134__CLASS_NREP_LOCSYMOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1286*/ meltfptr[1285])
+ /*_.VALDATA___V1286*/
+ meltfptr[1285] = (void *) &cdat->dsym_1134__CLASS_NREP_LOCSYMOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1134__CLASS_NREP_LOCSYMOCC",
@@ -22270,7 +22360,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1135__CLASS_NREP_LOCSY*/
- /*_.VALSTR___V1284*/ meltfptr[1283] =
+ /*_.VALSTR___V1287*/ meltfptr[1286] =
(void *) &cdat->dstr_1135__CLASS_NREP_LOCSY;
cdat->dstr_1135__CLASS_NREP_LOCSY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22279,7 +22369,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1135__CLASS_NREP_LOCSY.
val) - 1);
/*inirout drout_1136__COMPILOBJ_NREP_CLOSEDOCC */
- /*_.VALROUT___V1285*/ meltfptr[1284] =
+ /*_.VALROUT___V1288*/ meltfptr[1287] =
(void *) &cdat->drout_1136__COMPILOBJ_NREP_CLOSEDOCC;
cdat->drout_1136__COMPILOBJ_NREP_CLOSEDOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22291,7 +22381,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_40_warmelt_genobj_COMPILOBJ_NREP_CLOSEDOCC);
/*iniclos dclo_1137__COMPILOBJ_NREP_CLOSEDOCC */
- /*_.VALCLO___V1286*/ meltfptr[1285] =
+ /*_.VALCLO___V1289*/ meltfptr[1288] =
(void *) &cdat->dclo_1137__COMPILOBJ_NREP_CLOSEDOCC;
cdat->dclo_1137__COMPILOBJ_NREP_CLOSEDOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22299,9 +22389,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1138__CLASS_NREP_CLOSEDOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1287*/ meltfptr[1286])
- /*_.VALDATA___V1287*/
- meltfptr[1286] = (void *) &cdat->dsym_1138__CLASS_NREP_CLOSEDOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1290*/ meltfptr[1289])
+ /*_.VALDATA___V1290*/
+ meltfptr[1289] = (void *) &cdat->dsym_1138__CLASS_NREP_CLOSEDOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1138__CLASS_NREP_CLOSEDOCC",
@@ -22319,7 +22409,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1139__CLASS_NREP_CLOSE*/
- /*_.VALSTR___V1288*/ meltfptr[1287] =
+ /*_.VALSTR___V1291*/ meltfptr[1290] =
(void *) &cdat->dstr_1139__CLASS_NREP_CLOSE;
cdat->dstr_1139__CLASS_NREP_CLOSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22328,7 +22418,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1139__CLASS_NREP_CLOSE.
val) - 1);
/*inirout drout_1140__COMPILOBJ_NREP_CONSTOCC */
- /*_.VALROUT___V1289*/ meltfptr[1288] =
+ /*_.VALROUT___V1292*/ meltfptr[1291] =
(void *) &cdat->drout_1140__COMPILOBJ_NREP_CONSTOCC;
cdat->drout_1140__COMPILOBJ_NREP_CONSTOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22340,7 +22430,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_41_warmelt_genobj_COMPILOBJ_NREP_CONSTOCC);
/*iniclos dclo_1141__COMPILOBJ_NREP_CONSTOCC */
- /*_.VALCLO___V1290*/ meltfptr[1289] =
+ /*_.VALCLO___V1293*/ meltfptr[1292] =
(void *) &cdat->dclo_1141__COMPILOBJ_NREP_CONSTOCC;
cdat->dclo_1141__COMPILOBJ_NREP_CONSTOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22348,9 +22438,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1142__CLASS_NREP_CONSTOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1291*/ meltfptr[1290])
- /*_.VALDATA___V1291*/
- meltfptr[1290] = (void *) &cdat->dsym_1142__CLASS_NREP_CONSTOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1294*/ meltfptr[1293])
+ /*_.VALDATA___V1294*/
+ meltfptr[1293] = (void *) &cdat->dsym_1142__CLASS_NREP_CONSTOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1142__CLASS_NREP_CONSTOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22367,7 +22457,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1143__CLASS_NREP_CONST*/
- /*_.VALSTR___V1292*/ meltfptr[1291] =
+ /*_.VALSTR___V1295*/ meltfptr[1294] =
(void *) &cdat->dstr_1143__CLASS_NREP_CONST;
cdat->dstr_1143__CLASS_NREP_CONST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22376,7 +22466,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1143__CLASS_NREP_CONST.
val) - 1);
/*inirout drout_1144__COMPILOBJ_NREP_IMPORTEDVAL */
- /*_.VALROUT___V1293*/ meltfptr[1292] =
+ /*_.VALROUT___V1296*/ meltfptr[1295] =
(void *) &cdat->drout_1144__COMPILOBJ_NREP_IMPORTEDVAL;
cdat->drout_1144__COMPILOBJ_NREP_IMPORTEDVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22388,14 +22478,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_42_warmelt_genobj_COMPILOBJ_NREP_IMPORTEDVAL);
/*iniclos dclo_1145__COMPILOBJ_NREP_IMPORTEDVAL */
- /*_.VALCLO___V1294*/ meltfptr[1293] =
+ /*_.VALCLO___V1297*/ meltfptr[1296] =
(void *) &cdat->dclo_1145__COMPILOBJ_NREP_IMPORTEDVAL;
cdat->dclo_1145__COMPILOBJ_NREP_IMPORTEDVAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1145__COMPILOBJ_NREP_IMPORTEDVAL.nbval = 0;
/*inirout drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT */
- /*_.VALROUT___V1295*/ meltfptr[1294] =
+ /*_.VALROUT___V1298*/ meltfptr[1297] =
(void *) &cdat->drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT;
cdat->drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22408,7 +22498,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_43_warmelt_genobj_COMPILOBJ_NREP_DEFINEDCONSTANT);
/*iniclos dclo_1147__COMPILOBJ_NREP_DEFINEDCONSTANT */
- /*_.VALCLO___V1296*/ meltfptr[1295] =
+ /*_.VALCLO___V1299*/ meltfptr[1298] =
(void *) &cdat->dclo_1147__COMPILOBJ_NREP_DEFINEDCONSTANT;
cdat->dclo_1147__COMPILOBJ_NREP_DEFINEDCONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22416,9 +22506,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1148__CLASS_NREP_DEFINED_CONSTANT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1297*/ meltfptr[1296])
- /*_.VALDATA___V1297*/
- meltfptr[1296] = (void *) &cdat->dsym_1148__CLASS_NREP_DEFINED_CONSTANT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1300*/ meltfptr[1299])
+ /*_.VALDATA___V1300*/
+ meltfptr[1299] = (void *) &cdat->dsym_1148__CLASS_NREP_DEFINED_CONSTANT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1148__CLASS_NREP_DEFINED_CONSTANT",
@@ -22436,7 +22526,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1149__CLASS_NREP_DEFIN*/
- /*_.VALSTR___V1298*/ meltfptr[1297] =
+ /*_.VALSTR___V1301*/ meltfptr[1300] =
(void *) &cdat->dstr_1149__CLASS_NREP_DEFIN;
cdat->dstr_1149__CLASS_NREP_DEFIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22445,7 +22535,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1149__CLASS_NREP_DEFIN.
val) - 1);
/*inirout drout_1150__COMPILOBJ_NREP_QUASICONSTANT */
- /*_.VALROUT___V1299*/ meltfptr[1298] =
+ /*_.VALROUT___V1302*/ meltfptr[1301] =
(void *) &cdat->drout_1150__COMPILOBJ_NREP_QUASICONSTANT;
cdat->drout_1150__COMPILOBJ_NREP_QUASICONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22457,7 +22547,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_44_warmelt_genobj_COMPILOBJ_NREP_QUASICONSTANT);
/*iniclos dclo_1151__COMPILOBJ_NREP_QUASICONSTANT */
- /*_.VALCLO___V1300*/ meltfptr[1299] =
+ /*_.VALCLO___V1303*/ meltfptr[1302] =
(void *) &cdat->dclo_1151__COMPILOBJ_NREP_QUASICONSTANT;
cdat->dclo_1151__COMPILOBJ_NREP_QUASICONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22465,9 +22555,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1152__CLASS_NREP_QUASICONSTANT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1301*/ meltfptr[1300])
- /*_.VALDATA___V1301*/
- meltfptr[1300] = (void *) &cdat->dsym_1152__CLASS_NREP_QUASICONSTANT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1304*/ meltfptr[1303])
+ /*_.VALDATA___V1304*/
+ meltfptr[1303] = (void *) &cdat->dsym_1152__CLASS_NREP_QUASICONSTANT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1152__CLASS_NREP_QUASICONSTANT",
@@ -22485,7 +22575,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1153__CLASS_NREP_QUASI*/
- /*_.VALSTR___V1302*/ meltfptr[1301] =
+ /*_.VALSTR___V1305*/ meltfptr[1304] =
(void *) &cdat->dstr_1153__CLASS_NREP_QUASI;
cdat->dstr_1153__CLASS_NREP_QUASI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22494,7 +22584,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1153__CLASS_NREP_QUASI.
val) - 1);
/*inirout drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALROUT___V1303*/ meltfptr[1302] =
+ /*_.VALROUT___V1306*/ meltfptr[1305] =
(void *) &cdat->
drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
cdat->
@@ -22513,7 +22603,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_45_warmelt_genobj_COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER);
/*iniclos dclo_1155__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALCLO___V1304*/ meltfptr[1303] =
+ /*_.VALCLO___V1307*/ meltfptr[1306] =
(void *) &cdat->
dclo_1155__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
cdat->
@@ -22525,9 +22615,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1156__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1305*/ meltfptr[1304])
- /*_.VALDATA___V1305*/
- meltfptr[1304] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1308*/ meltfptr[1307])
+ /*_.VALDATA___V1308*/
+ meltfptr[1307] =
(void *) &cdat->
dsym_1156__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
@@ -22550,7 +22640,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1157__CLASS_NREP_QUASI*/
- /*_.VALSTR___V1306*/ meltfptr[1305] =
+ /*_.VALSTR___V1309*/ meltfptr[1308] =
(void *) &cdat->dstr_1157__CLASS_NREP_QUASI;
cdat->dstr_1157__CLASS_NREP_QUASI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22559,7 +22649,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1157__CLASS_NREP_QUASI.
val) - 1);
/*inirout drout_1158__COMPILOBJ_NREP_FOREVER */
- /*_.VALROUT___V1307*/ meltfptr[1306] =
+ /*_.VALROUT___V1310*/ meltfptr[1309] =
(void *) &cdat->drout_1158__COMPILOBJ_NREP_FOREVER;
cdat->drout_1158__COMPILOBJ_NREP_FOREVER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22571,7 +22661,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_46_warmelt_genobj_COMPILOBJ_NREP_FOREVER);
/*iniclos dclo_1159__COMPILOBJ_NREP_FOREVER */
- /*_.VALCLO___V1309*/ meltfptr[1308] =
+ /*_.VALCLO___V1312*/ meltfptr[1311] =
(void *) &cdat->dclo_1159__COMPILOBJ_NREP_FOREVER;
cdat->dclo_1159__COMPILOBJ_NREP_FOREVER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22579,9 +22669,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1160__CLASS_NREP_FOREVER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1310*/ meltfptr[1309])
- /*_.VALDATA___V1310*/
- meltfptr[1309] = (void *) &cdat->dsym_1160__CLASS_NREP_FOREVER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1313*/ meltfptr[1312])
+ /*_.VALDATA___V1313*/
+ meltfptr[1312] = (void *) &cdat->dsym_1160__CLASS_NREP_FOREVER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1160__CLASS_NREP_FOREVER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22598,7 +22688,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1161__CLASS_NREP_FOREV*/
- /*_.VALSTR___V1311*/ meltfptr[1310] =
+ /*_.VALSTR___V1314*/ meltfptr[1313] =
(void *) &cdat->dstr_1161__CLASS_NREP_FOREV;
cdat->dstr_1161__CLASS_NREP_FOREV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22608,9 +22698,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1162__CLASS_LABEL_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1312*/ meltfptr[1311])
- /*_.VALDATA___V1312*/
- meltfptr[1311] = (void *) &cdat->dsym_1162__CLASS_LABEL_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1315*/ meltfptr[1314])
+ /*_.VALDATA___V1315*/
+ meltfptr[1314] = (void *) &cdat->dsym_1162__CLASS_LABEL_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1162__CLASS_LABEL_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22627,7 +22717,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1163__CLASS_LABEL_BIND*/
- /*_.VALSTR___V1313*/ meltfptr[1312] =
+ /*_.VALSTR___V1316*/ meltfptr[1315] =
(void *) &cdat->dstr_1163__CLASS_LABEL_BIND;
cdat->dstr_1163__CLASS_LABEL_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22636,7 +22726,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1163__CLASS_LABEL_BIND.
val) - 1);
/*inirout drout_1164__LAMBDA_ */
- /*_.VALROUT___V1308*/ meltfptr[1307] = (void *) &cdat->drout_1164__LAMBDA_;
+ /*_.VALROUT___V1311*/ meltfptr[1310] = (void *) &cdat->drout_1164__LAMBDA_;
cdat->drout_1164__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1164__LAMBDA_.routdescr,
@@ -22646,7 +22736,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_47_warmelt_genobj_LAMBDA___12__);
/*inirout drout_1165__COMPILOBJ_NREP_EXIT */
- /*_.VALROUT___V1314*/ meltfptr[1313] =
+ /*_.VALROUT___V1317*/ meltfptr[1316] =
(void *) &cdat->drout_1165__COMPILOBJ_NREP_EXIT;
cdat->drout_1165__COMPILOBJ_NREP_EXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22658,7 +22748,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_48_warmelt_genobj_COMPILOBJ_NREP_EXIT);
/*iniclos dclo_1166__COMPILOBJ_NREP_EXIT */
- /*_.VALCLO___V1315*/ meltfptr[1314] =
+ /*_.VALCLO___V1318*/ meltfptr[1317] =
(void *) &cdat->dclo_1166__COMPILOBJ_NREP_EXIT;
cdat->dclo_1166__COMPILOBJ_NREP_EXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22666,9 +22756,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1167__CLASS_NREP_EXIT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1316*/ meltfptr[1315])
- /*_.VALDATA___V1316*/
- meltfptr[1315] = (void *) &cdat->dsym_1167__CLASS_NREP_EXIT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1319*/ meltfptr[1318])
+ /*_.VALDATA___V1319*/
+ meltfptr[1318] = (void *) &cdat->dsym_1167__CLASS_NREP_EXIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1167__CLASS_NREP_EXIT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22685,7 +22775,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1168__CLASS_NREP_EXIT*/
- /*_.VALSTR___V1317*/ meltfptr[1316] =
+ /*_.VALSTR___V1320*/ meltfptr[1319] =
(void *) &cdat->dstr_1168__CLASS_NREP_EXIT;
cdat->dstr_1168__CLASS_NREP_EXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22694,7 +22784,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1168__CLASS_NREP_EXIT.
val) - 1);
/*inirout drout_1169__COMPILOBJ_NREP_AGAIN */
- /*_.VALROUT___V1318*/ meltfptr[1317] =
+ /*_.VALROUT___V1321*/ meltfptr[1320] =
(void *) &cdat->drout_1169__COMPILOBJ_NREP_AGAIN;
cdat->drout_1169__COMPILOBJ_NREP_AGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22706,7 +22796,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_49_warmelt_genobj_COMPILOBJ_NREP_AGAIN);
/*iniclos dclo_1170__COMPILOBJ_NREP_AGAIN */
- /*_.VALCLO___V1319*/ meltfptr[1318] =
+ /*_.VALCLO___V1322*/ meltfptr[1321] =
(void *) &cdat->dclo_1170__COMPILOBJ_NREP_AGAIN;
cdat->dclo_1170__COMPILOBJ_NREP_AGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22714,9 +22804,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1171__CLASS_NREP_AGAIN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1320*/ meltfptr[1319])
- /*_.VALDATA___V1320*/
- meltfptr[1319] = (void *) &cdat->dsym_1171__CLASS_NREP_AGAIN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1323*/ meltfptr[1322])
+ /*_.VALDATA___V1323*/
+ meltfptr[1322] = (void *) &cdat->dsym_1171__CLASS_NREP_AGAIN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1171__CLASS_NREP_AGAIN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22733,7 +22823,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1172__CLASS_NREP_AGAIN*/
- /*_.VALSTR___V1321*/ meltfptr[1320] =
+ /*_.VALSTR___V1324*/ meltfptr[1323] =
(void *) &cdat->dstr_1172__CLASS_NREP_AGAIN;
cdat->dstr_1172__CLASS_NREP_AGAIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22742,7 +22832,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1172__CLASS_NREP_AGAIN.
val) - 1);
/*inirout drout_1173__COMPILOBJ_DISCRANY */
- /*_.VALROUT___V1322*/ meltfptr[1321] =
+ /*_.VALROUT___V1325*/ meltfptr[1324] =
(void *) &cdat->drout_1173__COMPILOBJ_DISCRANY;
cdat->drout_1173__COMPILOBJ_DISCRANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22754,14 +22844,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_50_warmelt_genobj_COMPILOBJ_DISCRANY);
/*iniclos dclo_1174__COMPILOBJ_DISCRANY */
- /*_.VALCLO___V1323*/ meltfptr[1322] =
+ /*_.VALCLO___V1326*/ meltfptr[1325] =
(void *) &cdat->dclo_1174__COMPILOBJ_DISCRANY;
cdat->dclo_1174__COMPILOBJ_DISCRANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1174__COMPILOBJ_DISCRANY.nbval = 0;
/*inirout drout_1175__COMPILOBJ_NREP_LET */
- /*_.VALROUT___V1324*/ meltfptr[1323] =
+ /*_.VALROUT___V1327*/ meltfptr[1326] =
(void *) &cdat->drout_1175__COMPILOBJ_NREP_LET;
cdat->drout_1175__COMPILOBJ_NREP_LET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -22773,7 +22863,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_51_warmelt_genobj_COMPILOBJ_NREP_LET);
/*iniclos dclo_1176__COMPILOBJ_NREP_LET */
- /*_.VALCLO___V1328*/ meltfptr[1327] =
+ /*_.VALCLO___V1331*/ meltfptr[1330] =
(void *) &cdat->dclo_1176__COMPILOBJ_NREP_LET;
cdat->dclo_1176__COMPILOBJ_NREP_LET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -22781,9 +22871,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1177__CLASS_NREP_LET*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1329*/ meltfptr[1328])
- /*_.VALDATA___V1329*/
- meltfptr[1328] = (void *) &cdat->dsym_1177__CLASS_NREP_LET;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1332*/ meltfptr[1331])
+ /*_.VALDATA___V1332*/
+ meltfptr[1331] = (void *) &cdat->dsym_1177__CLASS_NREP_LET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1177__CLASS_NREP_LET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22800,7 +22890,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1178__CLASS_NREP_LET*/
- /*_.VALSTR___V1330*/ meltfptr[1329] =
+ /*_.VALSTR___V1333*/ meltfptr[1332] =
(void *) &cdat->dstr_1178__CLASS_NREP_LET;
cdat->dstr_1178__CLASS_NREP_LET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22809,7 +22899,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1178__CLASS_NREP_LET.val) -
1);
/*inirout drout_1179__LAMBDA_ */
- /*_.VALROUT___V1325*/ meltfptr[1324] = (void *) &cdat->drout_1179__LAMBDA_;
+ /*_.VALROUT___V1328*/ meltfptr[1327] = (void *) &cdat->drout_1179__LAMBDA_;
cdat->drout_1179__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1179__LAMBDA_.routdescr,
@@ -22820,9 +22910,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1180__CLASS_NORMAL_LET_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1331*/ meltfptr[1330])
- /*_.VALDATA___V1331*/
- meltfptr[1330] = (void *) &cdat->dsym_1180__CLASS_NORMAL_LET_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1334*/ meltfptr[1333])
+ /*_.VALDATA___V1334*/
+ meltfptr[1333] = (void *) &cdat->dsym_1180__CLASS_NORMAL_LET_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1180__CLASS_NORMAL_LET_BINDING",
@@ -22840,7 +22930,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1181__CLASS_NORMAL_LET*/
- /*_.VALSTR___V1332*/ meltfptr[1331] =
+ /*_.VALSTR___V1335*/ meltfptr[1334] =
(void *) &cdat->dstr_1181__CLASS_NORMAL_LET;
cdat->dstr_1181__CLASS_NORMAL_LET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22850,9 +22940,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1182__CLASS_SEXPR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1333*/ meltfptr[1332])
- /*_.VALDATA___V1333*/
- meltfptr[1332] = (void *) &cdat->dsym_1182__CLASS_SEXPR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1336*/ meltfptr[1335])
+ /*_.VALDATA___V1336*/
+ meltfptr[1335] = (void *) &cdat->dsym_1182__CLASS_SEXPR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1182__CLASS_SEXPR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22869,7 +22959,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1183__CLASS_SEXPR*/
- /*_.VALSTR___V1334*/ meltfptr[1333] =
+ /*_.VALSTR___V1337*/ meltfptr[1336] =
(void *) &cdat->dstr_1183__CLASS_SEXPR;
cdat->dstr_1183__CLASS_SEXPR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22878,7 +22968,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1183__CLASS_SEXPR.val) -
1);
/*inirout drout_1184__LAMBDA_ */
- /*_.VALROUT___V1326*/ meltfptr[1325] = (void *) &cdat->drout_1184__LAMBDA_;
+ /*_.VALROUT___V1329*/ meltfptr[1328] = (void *) &cdat->drout_1184__LAMBDA_;
cdat->drout_1184__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1184__LAMBDA_.routdescr,
@@ -22888,7 +22978,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_53_warmelt_genobj_LAMBDA___14__);
/*inirout drout_1185__LAMBDA_ */
- /*_.VALROUT___V1327*/ meltfptr[1326] = (void *) &cdat->drout_1185__LAMBDA_;
+ /*_.VALROUT___V1330*/ meltfptr[1329] = (void *) &cdat->drout_1185__LAMBDA_;
cdat->drout_1185__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1185__LAMBDA_.routdescr,
@@ -22899,9 +22989,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1186__COMPILE_LETREC_FILL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1335*/ meltfptr[1334])
- /*_.VALDATA___V1335*/
- meltfptr[1334] = (void *) &cdat->dsym_1186__COMPILE_LETREC_FILL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1338*/ meltfptr[1337])
+ /*_.VALDATA___V1338*/
+ meltfptr[1337] = (void *) &cdat->dsym_1186__COMPILE_LETREC_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1186__COMPILE_LETREC_FILL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22918,7 +23008,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1187__COMPILE_LETREC_F*/
- /*_.VALSTR___V1336*/ meltfptr[1335] =
+ /*_.VALSTR___V1339*/ meltfptr[1338] =
(void *) &cdat->dstr_1187__COMPILE_LETREC_F;
cdat->dstr_1187__COMPILE_LETREC_F.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -22929,7 +23019,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-genobj.melt:2131:/ iniobj");
/*iniobj dobj_1188*/
-/*_.VALDATA___V1337*/ meltfptr[1336] = (void *) &cdat->dobj_1188;
+/*_.VALDATA___V1340*/ meltfptr[1339] = (void *) &cdat->dobj_1188;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1188",
melt_magic_discr (((void
@@ -22944,14 +23034,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_1188.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1188.obj_num = 0;
- cdat->dobj_1188.obj_hash = 572458228;
+ cdat->dobj_1188.obj_hash = 800675929;
cdat->dobj_1188.obj_len = 2;
/*iniobj dsym_1189__OBVA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1338*/ meltfptr[1337])
- /*_.VALDATA___V1338*/
- meltfptr[1337] = (void *) &cdat->dsym_1189__OBVA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1341*/ meltfptr[1340])
+ /*_.VALDATA___V1341*/
+ meltfptr[1340] = (void *) &cdat->dsym_1189__OBVA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1189__OBVA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -22968,7 +23058,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1190__OBVA*/
- /*_.VALSTR___V1339*/ meltfptr[1338] = (void *) &cdat->dstr_1190__OBVA;
+ /*_.VALSTR___V1342*/ meltfptr[1341] = (void *) &cdat->dstr_1190__OBVA;
cdat->dstr_1190__OBVA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1190__OBVA.val, "OBVA",
@@ -22976,7 +23066,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_1191*/
-/*_.VALDATA___V1340*/ meltfptr[1339] = (void *) &cdat->dobj_1191;
+/*_.VALDATA___V1343*/ meltfptr[1342] = (void *) &cdat->dobj_1191;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1191",
melt_magic_discr (((void
@@ -22991,14 +23081,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_1191.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1191.obj_num = 1;
- cdat->dobj_1191.obj_hash = 558695356;
+ cdat->dobj_1191.obj_hash = 983620775;
cdat->dobj_1191.obj_len = 2;
/*iniobj dsym_1192__OBODL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1341*/ meltfptr[1340])
- /*_.VALDATA___V1341*/
- meltfptr[1340] = (void *) &cdat->dsym_1192__OBODL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1344*/ meltfptr[1343])
+ /*_.VALDATA___V1344*/
+ meltfptr[1343] = (void *) &cdat->dsym_1192__OBODL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1192__OBODL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23015,7 +23105,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1193__OBODL*/
- /*_.VALSTR___V1342*/ meltfptr[1341] = (void *) &cdat->dstr_1193__OBODL;
+ /*_.VALSTR___V1345*/ meltfptr[1344] = (void *) &cdat->dstr_1193__OBODL;
cdat->dstr_1193__OBODL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1193__OBODL.val, "OBODL",
@@ -23023,7 +23113,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_1194*/
-/*_.VALDATA___V1343*/ meltfptr[1342] = (void *) &cdat->dobj_1194;
+/*_.VALDATA___V1346*/ meltfptr[1345] = (void *) &cdat->dobj_1194;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1194",
melt_magic_discr (((void
@@ -23038,14 +23128,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_1194.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1194.obj_num = 2;
- cdat->dobj_1194.obj_hash = 328702492;
+ cdat->dobj_1194.obj_hash = 97163817;
cdat->dobj_1194.obj_len = 2;
/*iniobj dsym_1195__GCX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1344*/ meltfptr[1343])
- /*_.VALDATA___V1344*/
- meltfptr[1343] = (void *) &cdat->dsym_1195__GCX;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1347*/ meltfptr[1346])
+ /*_.VALDATA___V1347*/
+ meltfptr[1346] = (void *) &cdat->dsym_1195__GCX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1195__GCX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23062,7 +23152,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1196__GCX*/
- /*_.VALSTR___V1345*/ meltfptr[1344] = (void *) &cdat->dstr_1196__GCX;
+ /*_.VALSTR___V1348*/ meltfptr[1347] = (void *) &cdat->dstr_1196__GCX;
cdat->dstr_1196__GCX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1196__GCX.val, "GCX",
@@ -23070,7 +23160,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_1197*/
-/*_.VALDATA___V1346*/ meltfptr[1345] = (void *) &cdat->dobj_1197;
+/*_.VALDATA___V1349*/ meltfptr[1348] = (void *) &cdat->dobj_1197;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1197",
melt_magic_discr (((void
@@ -23085,14 +23175,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_1197.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1197.obj_num = 3;
- cdat->dobj_1197.obj_hash = 194806962;
+ cdat->dobj_1197.obj_hash = 853341251;
cdat->dobj_1197.obj_len = 2;
/*iniobj dsym_1198__SLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1347*/ meltfptr[1346])
- /*_.VALDATA___V1347*/
- meltfptr[1346] = (void *) &cdat->dsym_1198__SLOC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1350*/ meltfptr[1349])
+ /*_.VALDATA___V1350*/
+ meltfptr[1349] = (void *) &cdat->dsym_1198__SLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1198__SLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23109,7 +23199,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1199__SLOC*/
- /*_.VALSTR___V1348*/ meltfptr[1347] = (void *) &cdat->dstr_1199__SLOC;
+ /*_.VALSTR___V1351*/ meltfptr[1350] = (void *) &cdat->dstr_1199__SLOC;
cdat->dstr_1199__SLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_1199__SLOC.val, "SLOC",
@@ -23117,7 +23207,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_1200*/
-/*_.VALDATA___V1349*/ meltfptr[1348] = (void *) &cdat->dobj_1200;
+/*_.VALDATA___V1352*/ meltfptr[1351] = (void *) &cdat->dobj_1200;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1200",
melt_magic_discr (((void
@@ -23132,11 +23222,11 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
cdat->dobj_1200.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1200.obj_num = 4;
- cdat->dobj_1200.obj_hash = 832168856;
+ cdat->dobj_1200.obj_hash = 633661968;
cdat->dobj_1200.obj_len = 2;
/*inimult dtup_1201__COMPILE_LETREC_FILL */
- /*_.VALTUP___V1350*/ meltfptr[1349] =
+ /*_.VALTUP___V1353*/ meltfptr[1352] =
(void *) &cdat->dtup_1201__COMPILE_LETREC_FILL;
cdat->dtup_1201__COMPILE_LETREC_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
@@ -23144,7 +23234,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_1202__COMPILE_LETREC_FILL*/
-/*_.VALDATA___V1351*/ meltfptr[1350] =
+/*_.VALDATA___V1354*/ meltfptr[1353] =
(void *) &cdat->dobj_1202__COMPILE_LETREC_FILL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_1202__COMPILE_LETREC_FILL",
@@ -23157,12 +23247,12 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1202__COMPILE_LETREC_FILL.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_1202__COMPILE_LETREC_FILL.obj_hash = 1049192291;
+ cdat->dobj_1202__COMPILE_LETREC_FILL.obj_hash = 569067675;
cdat->dobj_1202__COMPILE_LETREC_FILL.obj_len = 4;
/*inistring dstr_1203__COMPILE_LETREC_F*/
- /*_.VALSTR___V1352*/ meltfptr[1351] =
+ /*_.VALSTR___V1355*/ meltfptr[1354] =
(void *) &cdat->dstr_1203__COMPILE_LETREC_F;
cdat->dstr_1203__COMPILE_LETREC_F.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23171,7 +23261,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1203__COMPILE_LETREC_F.
val) - 1);
/*inirout drout_1204__FAIL_COMPILETRECFILL */
- /*_.VALROUT___V1353*/ meltfptr[1352] =
+ /*_.VALROUT___V1356*/ meltfptr[1355] =
(void *) &cdat->drout_1204__FAIL_COMPILETRECFILL;
cdat->drout_1204__FAIL_COMPILETRECFILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23183,14 +23273,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_55_warmelt_genobj_FAIL_COMPILETRECFILL);
/*iniclos dclo_1205__FAIL_COMPILETRECFILL */
- /*_.VALCLO___V1354*/ meltfptr[1353] =
+ /*_.VALCLO___V1357*/ meltfptr[1356] =
(void *) &cdat->dclo_1205__FAIL_COMPILETRECFILL;
cdat->dclo_1205__FAIL_COMPILETRECFILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1205__FAIL_COMPILETRECFILL.nbval = 0;
/*inirout drout_1206__COMPILETREC_LAMBDA */
- /*_.VALROUT___V1355*/ meltfptr[1354] =
+ /*_.VALROUT___V1358*/ meltfptr[1357] =
(void *) &cdat->drout_1206__COMPILETREC_LAMBDA;
cdat->drout_1206__COMPILETREC_LAMBDA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23202,7 +23292,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_56_warmelt_genobj_COMPILETREC_LAMBDA);
/*iniclos dclo_1207__COMPILETREC_LAMBDA */
- /*_.VALCLO___V1356*/ meltfptr[1355] =
+ /*_.VALCLO___V1359*/ meltfptr[1358] =
(void *) &cdat->dclo_1207__COMPILETREC_LAMBDA;
cdat->dclo_1207__COMPILETREC_LAMBDA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23210,9 +23300,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1208__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1357*/ meltfptr[1356])
- /*_.VALDATA___V1357*/
- meltfptr[1356] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1360*/ meltfptr[1359])
+ /*_.VALDATA___V1360*/
+ meltfptr[1359] =
(void *) &cdat->dsym_1208__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23232,7 +23322,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1209__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1358*/ meltfptr[1357] =
+ /*_.VALSTR___V1361*/ meltfptr[1360] =
(void *) &cdat->dstr_1209__CLASS_NORMAL_CON;
cdat->dstr_1209__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23242,9 +23332,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1210__CLASS_NORMAL_CONSTRUCTOR_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1359*/ meltfptr[1358])
- /*_.VALDATA___V1359*/
- meltfptr[1358] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1362*/ meltfptr[1361])
+ /*_.VALDATA___V1362*/
+ meltfptr[1361] =
(void *) &cdat->dsym_1210__CLASS_NORMAL_CONSTRUCTOR_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23263,7 +23353,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1211__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1360*/ meltfptr[1359] =
+ /*_.VALSTR___V1363*/ meltfptr[1362] =
(void *) &cdat->dstr_1211__CLASS_NORMAL_CON;
cdat->dstr_1211__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23272,7 +23362,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1211__CLASS_NORMAL_CON.
val) - 1);
/*inirout drout_1212__COMPILETREC_TUPLE */
- /*_.VALROUT___V1361*/ meltfptr[1360] =
+ /*_.VALROUT___V1364*/ meltfptr[1363] =
(void *) &cdat->drout_1212__COMPILETREC_TUPLE;
cdat->drout_1212__COMPILETREC_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23284,7 +23374,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_57_warmelt_genobj_COMPILETREC_TUPLE);
/*iniclos dclo_1213__COMPILETREC_TUPLE */
- /*_.VALCLO___V1362*/ meltfptr[1361] =
+ /*_.VALCLO___V1365*/ meltfptr[1364] =
(void *) &cdat->dclo_1213__COMPILETREC_TUPLE;
cdat->dclo_1213__COMPILETREC_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23292,9 +23382,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1214__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1363*/ meltfptr[1362])
- /*_.VALDATA___V1363*/
- meltfptr[1362] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1366*/ meltfptr[1365])
+ /*_.VALDATA___V1366*/
+ meltfptr[1365] =
(void *) &cdat->dsym_1214__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23314,7 +23404,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1215__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1364*/ meltfptr[1363] =
+ /*_.VALSTR___V1367*/ meltfptr[1366] =
(void *) &cdat->dstr_1215__CLASS_NORMAL_CON;
cdat->dstr_1215__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23323,7 +23413,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1215__CLASS_NORMAL_CON.
val) - 1);
/*inirout drout_1216__COMPILETREC_PAIR */
- /*_.VALROUT___V1365*/ meltfptr[1364] =
+ /*_.VALROUT___V1368*/ meltfptr[1367] =
(void *) &cdat->drout_1216__COMPILETREC_PAIR;
cdat->drout_1216__COMPILETREC_PAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23335,7 +23425,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_58_warmelt_genobj_COMPILETREC_PAIR);
/*iniclos dclo_1217__COMPILETREC_PAIR */
- /*_.VALCLO___V1366*/ meltfptr[1365] =
+ /*_.VALCLO___V1369*/ meltfptr[1368] =
(void *) &cdat->dclo_1217__COMPILETREC_PAIR;
cdat->dclo_1217__COMPILETREC_PAIR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23343,9 +23433,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1218__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1367*/ meltfptr[1366])
- /*_.VALDATA___V1367*/
- meltfptr[1366] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1370*/ meltfptr[1369])
+ /*_.VALDATA___V1370*/
+ meltfptr[1369] =
(void *) &cdat->dsym_1218__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23364,7 +23454,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1219__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1368*/ meltfptr[1367] =
+ /*_.VALSTR___V1371*/ meltfptr[1370] =
(void *) &cdat->dstr_1219__CLASS_NORMAL_CON;
cdat->dstr_1219__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23373,7 +23463,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1219__CLASS_NORMAL_CON.
val) - 1);
/*inirout drout_1220__COMPILETREC_LIST */
- /*_.VALROUT___V1369*/ meltfptr[1368] =
+ /*_.VALROUT___V1372*/ meltfptr[1371] =
(void *) &cdat->drout_1220__COMPILETREC_LIST;
cdat->drout_1220__COMPILETREC_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23385,7 +23475,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_59_warmelt_genobj_COMPILETREC_LIST);
/*iniclos dclo_1221__COMPILETREC_LIST */
- /*_.VALCLO___V1370*/ meltfptr[1369] =
+ /*_.VALCLO___V1373*/ meltfptr[1372] =
(void *) &cdat->dclo_1221__COMPILETREC_LIST;
cdat->dclo_1221__COMPILETREC_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23393,9 +23483,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1222__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1371*/ meltfptr[1370])
- /*_.VALDATA___V1371*/
- meltfptr[1370] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1374*/ meltfptr[1373])
+ /*_.VALDATA___V1374*/
+ meltfptr[1373] =
(void *) &cdat->dsym_1222__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23414,7 +23504,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1223__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1372*/ meltfptr[1371] =
+ /*_.VALSTR___V1375*/ meltfptr[1374] =
(void *) &cdat->dstr_1223__CLASS_NORMAL_CON;
cdat->dstr_1223__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23423,7 +23513,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1223__CLASS_NORMAL_CON.
val) - 1);
/*inirout drout_1224__COMPILETREC_INSTANCE */
- /*_.VALROUT___V1373*/ meltfptr[1372] =
+ /*_.VALROUT___V1376*/ meltfptr[1375] =
(void *) &cdat->drout_1224__COMPILETREC_INSTANCE;
cdat->drout_1224__COMPILETREC_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23435,7 +23525,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_60_warmelt_genobj_COMPILETREC_INSTANCE);
/*iniclos dclo_1225__COMPILETREC_INSTANCE */
- /*_.VALCLO___V1374*/ meltfptr[1373] =
+ /*_.VALCLO___V1377*/ meltfptr[1376] =
(void *) &cdat->dclo_1225__COMPILETREC_INSTANCE;
cdat->dclo_1225__COMPILETREC_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23443,9 +23533,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1226__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1375*/ meltfptr[1374])
- /*_.VALDATA___V1375*/
- meltfptr[1374] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1378*/ meltfptr[1377])
+ /*_.VALDATA___V1378*/
+ meltfptr[1377] =
(void *) &cdat->dsym_1226__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -23465,7 +23555,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1227__CLASS_NORMAL_CON*/
- /*_.VALSTR___V1376*/ meltfptr[1375] =
+ /*_.VALSTR___V1379*/ meltfptr[1378] =
(void *) &cdat->dstr_1227__CLASS_NORMAL_CON;
cdat->dstr_1227__CLASS_NORMAL_CON.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23475,9 +23565,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1228__CLASS_VALUE_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1377*/ meltfptr[1376])
- /*_.VALDATA___V1377*/
- meltfptr[1376] = (void *) &cdat->dsym_1228__CLASS_VALUE_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1380*/ meltfptr[1379])
+ /*_.VALDATA___V1380*/
+ meltfptr[1379] = (void *) &cdat->dsym_1228__CLASS_VALUE_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1228__CLASS_VALUE_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23494,7 +23584,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1229__CLASS_VALUE_BIND*/
- /*_.VALSTR___V1378*/ meltfptr[1377] =
+ /*_.VALSTR___V1381*/ meltfptr[1380] =
(void *) &cdat->dstr_1229__CLASS_VALUE_BIND;
cdat->dstr_1229__CLASS_VALUE_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23504,9 +23594,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1230__CLASS_CLASS_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1379*/ meltfptr[1378])
- /*_.VALDATA___V1379*/
- meltfptr[1378] = (void *) &cdat->dsym_1230__CLASS_CLASS_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1382*/ meltfptr[1381])
+ /*_.VALDATA___V1382*/
+ meltfptr[1381] = (void *) &cdat->dsym_1230__CLASS_CLASS_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1230__CLASS_CLASS_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23523,7 +23613,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1231__CLASS_CLASS_BIND*/
- /*_.VALSTR___V1380*/ meltfptr[1379] =
+ /*_.VALSTR___V1383*/ meltfptr[1382] =
(void *) &cdat->dstr_1231__CLASS_CLASS_BIND;
cdat->dstr_1231__CLASS_CLASS_BIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23533,9 +23623,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1232__CLASS_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1381*/ meltfptr[1380])
- /*_.VALDATA___V1381*/
- meltfptr[1380] = (void *) &cdat->dsym_1232__CLASS_CLASS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1384*/ meltfptr[1383])
+ /*_.VALDATA___V1384*/
+ meltfptr[1383] = (void *) &cdat->dsym_1232__CLASS_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1232__CLASS_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23552,7 +23642,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1233__CLASS_CLASS*/
- /*_.VALSTR___V1382*/ meltfptr[1381] =
+ /*_.VALSTR___V1385*/ meltfptr[1384] =
(void *) &cdat->dstr_1233__CLASS_CLASS;
cdat->dstr_1233__CLASS_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23561,7 +23651,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1233__CLASS_CLASS.val) -
1);
/*inirout drout_1234__COMPILOBJ_NREP_LETREC */
- /*_.VALROUT___V1383*/ meltfptr[1382] =
+ /*_.VALROUT___V1386*/ meltfptr[1385] =
(void *) &cdat->drout_1234__COMPILOBJ_NREP_LETREC;
cdat->drout_1234__COMPILOBJ_NREP_LETREC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23573,7 +23663,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_61_warmelt_genobj_COMPILOBJ_NREP_LETREC);
/*iniclos dclo_1235__COMPILOBJ_NREP_LETREC */
- /*_.VALCLO___V1384*/ meltfptr[1383] =
+ /*_.VALCLO___V1387*/ meltfptr[1386] =
(void *) &cdat->dclo_1235__COMPILOBJ_NREP_LETREC;
cdat->dclo_1235__COMPILOBJ_NREP_LETREC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23581,9 +23671,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1236__CLASS_NREP_LETREC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1385*/ meltfptr[1384])
- /*_.VALDATA___V1385*/
- meltfptr[1384] = (void *) &cdat->dsym_1236__CLASS_NREP_LETREC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1388*/ meltfptr[1387])
+ /*_.VALDATA___V1388*/
+ meltfptr[1387] = (void *) &cdat->dsym_1236__CLASS_NREP_LETREC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1236__CLASS_NREP_LETREC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23600,7 +23690,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1237__CLASS_NREP_LETRE*/
- /*_.VALSTR___V1386*/ meltfptr[1385] =
+ /*_.VALSTR___V1389*/ meltfptr[1388] =
(void *) &cdat->dstr_1237__CLASS_NREP_LETRE;
cdat->dstr_1237__CLASS_NREP_LETRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23610,9 +23700,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1238__CLASS_NREP_SYMOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1387*/ meltfptr[1386])
- /*_.VALDATA___V1387*/
- meltfptr[1386] = (void *) &cdat->dsym_1238__CLASS_NREP_SYMOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1390*/ meltfptr[1389])
+ /*_.VALDATA___V1390*/
+ meltfptr[1389] = (void *) &cdat->dsym_1238__CLASS_NREP_SYMOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1238__CLASS_NREP_SYMOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23629,7 +23719,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1239__CLASS_NREP_SYMOC*/
- /*_.VALSTR___V1388*/ meltfptr[1387] =
+ /*_.VALSTR___V1391*/ meltfptr[1390] =
(void *) &cdat->dstr_1239__CLASS_NREP_SYMOC;
cdat->dstr_1239__CLASS_NREP_SYMOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23638,7 +23728,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1239__CLASS_NREP_SYMOC.
val) - 1);
/*inirout drout_1240__COMPILOBJ_NREP_CITERATION */
- /*_.VALROUT___V1389*/ meltfptr[1388] =
+ /*_.VALROUT___V1392*/ meltfptr[1391] =
(void *) &cdat->drout_1240__COMPILOBJ_NREP_CITERATION;
cdat->drout_1240__COMPILOBJ_NREP_CITERATION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23650,7 +23740,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_62_warmelt_genobj_COMPILOBJ_NREP_CITERATION);
/*iniclos dclo_1241__COMPILOBJ_NREP_CITERATION */
- /*_.VALCLO___V1395*/ meltfptr[1394] =
+ /*_.VALCLO___V1398*/ meltfptr[1397] =
(void *) &cdat->dclo_1241__COMPILOBJ_NREP_CITERATION;
cdat->dclo_1241__COMPILOBJ_NREP_CITERATION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23658,9 +23748,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1242__CLASS_NREP_CITERATION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1396*/ meltfptr[1395])
- /*_.VALDATA___V1396*/
- meltfptr[1395] = (void *) &cdat->dsym_1242__CLASS_NREP_CITERATION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1399*/ meltfptr[1398])
+ /*_.VALDATA___V1399*/
+ meltfptr[1398] = (void *) &cdat->dsym_1242__CLASS_NREP_CITERATION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1242__CLASS_NREP_CITERATION",
@@ -23678,7 +23768,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1243__CLASS_NREP_CITER*/
- /*_.VALSTR___V1397*/ meltfptr[1396] =
+ /*_.VALSTR___V1400*/ meltfptr[1399] =
(void *) &cdat->dstr_1243__CLASS_NREP_CITER;
cdat->dstr_1243__CLASS_NREP_CITER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23688,9 +23778,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1244__CLASS_CITERATOR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1398*/ meltfptr[1397])
- /*_.VALDATA___V1398*/
- meltfptr[1397] = (void *) &cdat->dsym_1244__CLASS_CITERATOR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1401*/ meltfptr[1400])
+ /*_.VALDATA___V1401*/
+ meltfptr[1400] = (void *) &cdat->dsym_1244__CLASS_CITERATOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1244__CLASS_CITERATOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23707,7 +23797,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1245__CLASS_CITERATOR*/
- /*_.VALSTR___V1399*/ meltfptr[1398] =
+ /*_.VALSTR___V1402*/ meltfptr[1401] =
(void *) &cdat->dstr_1245__CLASS_CITERATOR;
cdat->dstr_1245__CLASS_CITERATOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23716,7 +23806,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1245__CLASS_CITERATOR.
val) - 1);
/*inirout drout_1246__LAMBDA_ */
- /*_.VALROUT___V1390*/ meltfptr[1389] = (void *) &cdat->drout_1246__LAMBDA_;
+ /*_.VALROUT___V1393*/ meltfptr[1392] = (void *) &cdat->drout_1246__LAMBDA_;
cdat->drout_1246__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1246__LAMBDA_.routdescr,
@@ -23726,7 +23816,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_63_warmelt_genobj_LAMBDA___16__);
/*inirout drout_1247__LAMBDA_ */
- /*_.VALROUT___V1391*/ meltfptr[1390] = (void *) &cdat->drout_1247__LAMBDA_;
+ /*_.VALROUT___V1394*/ meltfptr[1393] = (void *) &cdat->drout_1247__LAMBDA_;
cdat->drout_1247__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1247__LAMBDA_.routdescr,
@@ -23736,7 +23826,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_64_warmelt_genobj_LAMBDA___17__);
/*inirout drout_1248__LAMBDA_ */
- /*_.VALROUT___V1392*/ meltfptr[1391] = (void *) &cdat->drout_1248__LAMBDA_;
+ /*_.VALROUT___V1395*/ meltfptr[1394] = (void *) &cdat->drout_1248__LAMBDA_;
cdat->drout_1248__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1248__LAMBDA_.routdescr,
@@ -23746,7 +23836,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_65_warmelt_genobj_LAMBDA___18__);
/*inirout drout_1249__LAMBDA_ */
- /*_.VALROUT___V1393*/ meltfptr[1392] = (void *) &cdat->drout_1249__LAMBDA_;
+ /*_.VALROUT___V1396*/ meltfptr[1395] = (void *) &cdat->drout_1249__LAMBDA_;
cdat->drout_1249__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1249__LAMBDA_.routdescr,
@@ -23756,7 +23846,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_66_warmelt_genobj_LAMBDA___19__);
/*inirout drout_1250__LAMBDA_ */
- /*_.VALROUT___V1394*/ meltfptr[1393] = (void *) &cdat->drout_1250__LAMBDA_;
+ /*_.VALROUT___V1397*/ meltfptr[1396] = (void *) &cdat->drout_1250__LAMBDA_;
cdat->drout_1250__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1250__LAMBDA_.routdescr,
@@ -23766,7 +23856,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_67_warmelt_genobj_LAMBDA___20__);
/*inirout drout_1251__COMPILOBJ_NREP_SETQ */
- /*_.VALROUT___V1400*/ meltfptr[1399] =
+ /*_.VALROUT___V1403*/ meltfptr[1402] =
(void *) &cdat->drout_1251__COMPILOBJ_NREP_SETQ;
cdat->drout_1251__COMPILOBJ_NREP_SETQ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23778,7 +23868,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_68_warmelt_genobj_COMPILOBJ_NREP_SETQ);
/*iniclos dclo_1252__COMPILOBJ_NREP_SETQ */
- /*_.VALCLO___V1401*/ meltfptr[1400] =
+ /*_.VALCLO___V1404*/ meltfptr[1403] =
(void *) &cdat->dclo_1252__COMPILOBJ_NREP_SETQ;
cdat->dclo_1252__COMPILOBJ_NREP_SETQ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23786,9 +23876,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1253__CLASS_NREP_SETQ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1402*/ meltfptr[1401])
- /*_.VALDATA___V1402*/
- meltfptr[1401] = (void *) &cdat->dsym_1253__CLASS_NREP_SETQ;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1405*/ meltfptr[1404])
+ /*_.VALDATA___V1405*/
+ meltfptr[1404] = (void *) &cdat->dsym_1253__CLASS_NREP_SETQ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1253__CLASS_NREP_SETQ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23805,7 +23895,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1254__CLASS_NREP_SETQ*/
- /*_.VALSTR___V1403*/ meltfptr[1402] =
+ /*_.VALSTR___V1406*/ meltfptr[1405] =
(void *) &cdat->dstr_1254__CLASS_NREP_SETQ;
cdat->dstr_1254__CLASS_NREP_SETQ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23814,7 +23904,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1254__CLASS_NREP_SETQ.
val) - 1);
/*inirout drout_1255__COMPILOBJ_NREP_PROGN */
- /*_.VALROUT___V1404*/ meltfptr[1403] =
+ /*_.VALROUT___V1407*/ meltfptr[1406] =
(void *) &cdat->drout_1255__COMPILOBJ_NREP_PROGN;
cdat->drout_1255__COMPILOBJ_NREP_PROGN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23826,7 +23916,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_69_warmelt_genobj_COMPILOBJ_NREP_PROGN);
/*iniclos dclo_1256__COMPILOBJ_NREP_PROGN */
- /*_.VALCLO___V1406*/ meltfptr[1405] =
+ /*_.VALCLO___V1409*/ meltfptr[1408] =
(void *) &cdat->dclo_1256__COMPILOBJ_NREP_PROGN;
cdat->dclo_1256__COMPILOBJ_NREP_PROGN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23834,9 +23924,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1257__CLASS_NREP_PROGN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1407*/ meltfptr[1406])
- /*_.VALDATA___V1407*/
- meltfptr[1406] = (void *) &cdat->dsym_1257__CLASS_NREP_PROGN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1410*/ meltfptr[1409])
+ /*_.VALDATA___V1410*/
+ meltfptr[1409] = (void *) &cdat->dsym_1257__CLASS_NREP_PROGN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1257__CLASS_NREP_PROGN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23853,7 +23943,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1258__CLASS_NREP_PROGN*/
- /*_.VALSTR___V1408*/ meltfptr[1407] =
+ /*_.VALSTR___V1411*/ meltfptr[1410] =
(void *) &cdat->dstr_1258__CLASS_NREP_PROGN;
cdat->dstr_1258__CLASS_NREP_PROGN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23862,7 +23952,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1258__CLASS_NREP_PROGN.
val) - 1);
/*inirout drout_1259__LAMBDA_ */
- /*_.VALROUT___V1405*/ meltfptr[1404] = (void *) &cdat->drout_1259__LAMBDA_;
+ /*_.VALROUT___V1408*/ meltfptr[1407] = (void *) &cdat->drout_1259__LAMBDA_;
cdat->drout_1259__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1259__LAMBDA_.routdescr,
@@ -23872,7 +23962,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_70_warmelt_genobj_LAMBDA___21__);
/*inirout drout_1260__COMPILOBJ_NREP_MULTACC */
- /*_.VALROUT___V1409*/ meltfptr[1408] =
+ /*_.VALROUT___V1412*/ meltfptr[1411] =
(void *) &cdat->drout_1260__COMPILOBJ_NREP_MULTACC;
cdat->drout_1260__COMPILOBJ_NREP_MULTACC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23884,7 +23974,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_71_warmelt_genobj_COMPILOBJ_NREP_MULTACC);
/*iniclos dclo_1261__COMPILOBJ_NREP_MULTACC */
- /*_.VALCLO___V1411*/ meltfptr[1410] =
+ /*_.VALCLO___V1414*/ meltfptr[1413] =
(void *) &cdat->dclo_1261__COMPILOBJ_NREP_MULTACC;
cdat->dclo_1261__COMPILOBJ_NREP_MULTACC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23892,9 +23982,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1262__CLASS_NREP_MULTACC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1412*/ meltfptr[1411])
- /*_.VALDATA___V1412*/
- meltfptr[1411] = (void *) &cdat->dsym_1262__CLASS_NREP_MULTACC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1415*/ meltfptr[1414])
+ /*_.VALDATA___V1415*/
+ meltfptr[1414] = (void *) &cdat->dsym_1262__CLASS_NREP_MULTACC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1262__CLASS_NREP_MULTACC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23911,7 +24001,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1263__CLASS_NREP_MULTA*/
- /*_.VALSTR___V1413*/ meltfptr[1412] =
+ /*_.VALSTR___V1416*/ meltfptr[1415] =
(void *) &cdat->dstr_1263__CLASS_NREP_MULTA;
cdat->dstr_1263__CLASS_NREP_MULTA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23920,7 +24010,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1263__CLASS_NREP_MULTA.
val) - 1);
/*inirout drout_1264__LAMBDA_ */
- /*_.VALROUT___V1410*/ meltfptr[1409] = (void *) &cdat->drout_1264__LAMBDA_;
+ /*_.VALROUT___V1413*/ meltfptr[1412] = (void *) &cdat->drout_1264__LAMBDA_;
cdat->drout_1264__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1264__LAMBDA_.routdescr,
@@ -23930,7 +24020,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_72_warmelt_genobj_LAMBDA___22__);
/*inirout drout_1265__COMPILOBJ_NREP_FIELDACC */
- /*_.VALROUT___V1414*/ meltfptr[1413] =
+ /*_.VALROUT___V1417*/ meltfptr[1416] =
(void *) &cdat->drout_1265__COMPILOBJ_NREP_FIELDACC;
cdat->drout_1265__COMPILOBJ_NREP_FIELDACC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -23942,7 +24032,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_73_warmelt_genobj_COMPILOBJ_NREP_FIELDACC);
/*iniclos dclo_1266__COMPILOBJ_NREP_FIELDACC */
- /*_.VALCLO___V1416*/ meltfptr[1415] =
+ /*_.VALCLO___V1419*/ meltfptr[1418] =
(void *) &cdat->dclo_1266__COMPILOBJ_NREP_FIELDACC;
cdat->dclo_1266__COMPILOBJ_NREP_FIELDACC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -23950,9 +24040,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1267__CLASS_NREP_FIELDACC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1417*/ meltfptr[1416])
- /*_.VALDATA___V1417*/
- meltfptr[1416] = (void *) &cdat->dsym_1267__CLASS_NREP_FIELDACC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1420*/ meltfptr[1419])
+ /*_.VALDATA___V1420*/
+ meltfptr[1419] = (void *) &cdat->dsym_1267__CLASS_NREP_FIELDACC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1267__CLASS_NREP_FIELDACC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -23969,7 +24059,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1268__CLASS_NREP_FIELD*/
- /*_.VALSTR___V1418*/ meltfptr[1417] =
+ /*_.VALSTR___V1421*/ meltfptr[1420] =
(void *) &cdat->dstr_1268__CLASS_NREP_FIELD;
cdat->dstr_1268__CLASS_NREP_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -23978,7 +24068,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1268__CLASS_NREP_FIELD.
val) - 1);
/*inirout drout_1269__LAMBDA_ */
- /*_.VALROUT___V1415*/ meltfptr[1414] = (void *) &cdat->drout_1269__LAMBDA_;
+ /*_.VALROUT___V1418*/ meltfptr[1417] = (void *) &cdat->drout_1269__LAMBDA_;
cdat->drout_1269__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1269__LAMBDA_.routdescr,
@@ -23989,9 +24079,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1270__CLASS_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1419*/ meltfptr[1418])
- /*_.VALDATA___V1419*/
- meltfptr[1418] = (void *) &cdat->dsym_1270__CLASS_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1422*/ meltfptr[1421])
+ /*_.VALDATA___V1422*/
+ meltfptr[1421] = (void *) &cdat->dsym_1270__CLASS_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1270__CLASS_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24008,7 +24098,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1271__CLASS_FIELD*/
- /*_.VALSTR___V1420*/ meltfptr[1419] =
+ /*_.VALSTR___V1423*/ meltfptr[1422] =
(void *) &cdat->dstr_1271__CLASS_FIELD;
cdat->dstr_1271__CLASS_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24018,9 +24108,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
1);
/*iniobj dsym_1272__CLASS_NREP_DATAINSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1421*/ meltfptr[1420])
- /*_.VALDATA___V1421*/
- meltfptr[1420] = (void *) &cdat->dsym_1272__CLASS_NREP_DATAINSTANCE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1424*/ meltfptr[1423])
+ /*_.VALDATA___V1424*/
+ meltfptr[1423] = (void *) &cdat->dsym_1272__CLASS_NREP_DATAINSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1272__CLASS_NREP_DATAINSTANCE",
@@ -24038,7 +24128,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1273__CLASS_NREP_DATAI*/
- /*_.VALSTR___V1422*/ meltfptr[1421] =
+ /*_.VALSTR___V1425*/ meltfptr[1424] =
(void *) &cdat->dstr_1273__CLASS_NREP_DATAI;
cdat->dstr_1273__CLASS_NREP_DATAI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24047,7 +24137,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1273__CLASS_NREP_DATAI.
val) - 1);
/*inirout drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD */
- /*_.VALROUT___V1423*/ meltfptr[1422] =
+ /*_.VALROUT___V1426*/ meltfptr[1425] =
(void *) &cdat->drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD;
cdat->drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24060,7 +24150,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_75_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_GET_FIELD);
/*iniclos dclo_1275__COMPILOBJ_NREP_UNSAFE_GET_FIELD */
- /*_.VALCLO___V1424*/ meltfptr[1423] =
+ /*_.VALCLO___V1427*/ meltfptr[1426] =
(void *) &cdat->dclo_1275__COMPILOBJ_NREP_UNSAFE_GET_FIELD;
cdat->dclo_1275__COMPILOBJ_NREP_UNSAFE_GET_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24068,9 +24158,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1276__CLASS_NREP_UNSAFE_GET_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1425*/ meltfptr[1424])
- /*_.VALDATA___V1425*/
- meltfptr[1424] = (void *) &cdat->dsym_1276__CLASS_NREP_UNSAFE_GET_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1428*/ meltfptr[1427])
+ /*_.VALDATA___V1428*/
+ meltfptr[1427] = (void *) &cdat->dsym_1276__CLASS_NREP_UNSAFE_GET_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1276__CLASS_NREP_UNSAFE_GET_FIELD",
@@ -24088,7 +24178,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1277__CLASS_NREP_UNSAF*/
- /*_.VALSTR___V1426*/ meltfptr[1425] =
+ /*_.VALSTR___V1429*/ meltfptr[1428] =
(void *) &cdat->dstr_1277__CLASS_NREP_UNSAF;
cdat->dstr_1277__CLASS_NREP_UNSAF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24097,7 +24187,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1277__CLASS_NREP_UNSAF.
val) - 1);
/*inirout drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS */
- /*_.VALROUT___V1427*/ meltfptr[1426] =
+ /*_.VALROUT___V1430*/ meltfptr[1429] =
(void *) &cdat->drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS;
cdat->drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24110,7 +24200,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_76_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_PUT_FIELDS);
/*iniclos dclo_1279__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS */
- /*_.VALCLO___V1429*/ meltfptr[1428] =
+ /*_.VALCLO___V1432*/ meltfptr[1431] =
(void *) &cdat->dclo_1279__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS;
cdat->dclo_1279__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24118,9 +24208,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1280__CLASS_NREP_UNSAFE_PUT_FIELDS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1430*/ meltfptr[1429])
- /*_.VALDATA___V1430*/
- meltfptr[1429] = (void *) &cdat->dsym_1280__CLASS_NREP_UNSAFE_PUT_FIELDS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1433*/ meltfptr[1432])
+ /*_.VALDATA___V1433*/
+ meltfptr[1432] = (void *) &cdat->dsym_1280__CLASS_NREP_UNSAFE_PUT_FIELDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1280__CLASS_NREP_UNSAFE_PUT_FIELDS",
@@ -24138,7 +24228,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1281__CLASS_NREP_UNSAF*/
- /*_.VALSTR___V1431*/ meltfptr[1430] =
+ /*_.VALSTR___V1434*/ meltfptr[1433] =
(void *) &cdat->dstr_1281__CLASS_NREP_UNSAF;
cdat->dstr_1281__CLASS_NREP_UNSAF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24147,7 +24237,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1281__CLASS_NREP_UNSAF.
val) - 1);
/*inirout drout_1282__LAMBDA_ */
- /*_.VALROUT___V1428*/ meltfptr[1427] = (void *) &cdat->drout_1282__LAMBDA_;
+ /*_.VALROUT___V1431*/ meltfptr[1430] = (void *) &cdat->drout_1282__LAMBDA_;
cdat->drout_1282__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1282__LAMBDA_.routdescr,
@@ -24158,9 +24248,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1283__CLASS_NREP_FIELDASSIGN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1432*/ meltfptr[1431])
- /*_.VALDATA___V1432*/
- meltfptr[1431] = (void *) &cdat->dsym_1283__CLASS_NREP_FIELDASSIGN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1435*/ meltfptr[1434])
+ /*_.VALDATA___V1435*/
+ meltfptr[1434] = (void *) &cdat->dsym_1283__CLASS_NREP_FIELDASSIGN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1283__CLASS_NREP_FIELDASSIGN",
@@ -24178,7 +24268,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1284__CLASS_NREP_FIELD*/
- /*_.VALSTR___V1433*/ meltfptr[1432] =
+ /*_.VALSTR___V1436*/ meltfptr[1435] =
(void *) &cdat->dstr_1284__CLASS_NREP_FIELD;
cdat->dstr_1284__CLASS_NREP_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24187,7 +24277,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1284__CLASS_NREP_FIELD.
val) - 1);
/*inirout drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT */
- /*_.VALROUT___V1434*/ meltfptr[1433] =
+ /*_.VALROUT___V1437*/ meltfptr[1436] =
(void *) &cdat->drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT;
cdat->drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24200,7 +24290,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_78_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT);
/*iniclos dclo_1286__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT */
- /*_.VALCLO___V1435*/ meltfptr[1434] =
+ /*_.VALCLO___V1438*/ meltfptr[1437] =
(void *) &cdat->dclo_1286__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT;
cdat->dclo_1286__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24208,9 +24298,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1287__CLASS_NREP_UNSAFE_NTH_COMPONENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1436*/ meltfptr[1435])
- /*_.VALDATA___V1436*/
- meltfptr[1435] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V1439*/ meltfptr[1438])
+ /*_.VALDATA___V1439*/
+ meltfptr[1438] =
(void *) &cdat->dsym_1287__CLASS_NREP_UNSAFE_NTH_COMPONENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -24229,7 +24319,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1288__CLASS_NREP_UNSAF*/
- /*_.VALSTR___V1437*/ meltfptr[1436] =
+ /*_.VALSTR___V1440*/ meltfptr[1439] =
(void *) &cdat->dstr_1288__CLASS_NREP_UNSAF;
cdat->dstr_1288__CLASS_NREP_UNSAF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24238,7 +24328,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1288__CLASS_NREP_UNSAF.
val) - 1);
/*inirout drout_1289__COMPILOBJ_NREP_APPLY */
- /*_.VALROUT___V1438*/ meltfptr[1437] =
+ /*_.VALROUT___V1441*/ meltfptr[1440] =
(void *) &cdat->drout_1289__COMPILOBJ_NREP_APPLY;
cdat->drout_1289__COMPILOBJ_NREP_APPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24250,7 +24340,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_79_warmelt_genobj_COMPILOBJ_NREP_APPLY);
/*iniclos dclo_1290__COMPILOBJ_NREP_APPLY */
- /*_.VALCLO___V1440*/ meltfptr[1439] =
+ /*_.VALCLO___V1443*/ meltfptr[1442] =
(void *) &cdat->dclo_1290__COMPILOBJ_NREP_APPLY;
cdat->dclo_1290__COMPILOBJ_NREP_APPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24258,9 +24348,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1291__CLASS_NREP_APPLY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1441*/ meltfptr[1440])
- /*_.VALDATA___V1441*/
- meltfptr[1440] = (void *) &cdat->dsym_1291__CLASS_NREP_APPLY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1444*/ meltfptr[1443])
+ /*_.VALDATA___V1444*/
+ meltfptr[1443] = (void *) &cdat->dsym_1291__CLASS_NREP_APPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1291__CLASS_NREP_APPLY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24277,7 +24367,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1292__CLASS_NREP_APPLY*/
- /*_.VALSTR___V1442*/ meltfptr[1441] =
+ /*_.VALSTR___V1445*/ meltfptr[1444] =
(void *) &cdat->dstr_1292__CLASS_NREP_APPLY;
cdat->dstr_1292__CLASS_NREP_APPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24286,7 +24376,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1292__CLASS_NREP_APPLY.
val) - 1);
/*inirout drout_1293__LAMBDA_ */
- /*_.VALROUT___V1439*/ meltfptr[1438] = (void *) &cdat->drout_1293__LAMBDA_;
+ /*_.VALROUT___V1442*/ meltfptr[1441] = (void *) &cdat->drout_1293__LAMBDA_;
cdat->drout_1293__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1293__LAMBDA_.routdescr,
@@ -24296,7 +24386,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_80_warmelt_genobj_LAMBDA___25__);
/*inirout drout_1294__COMPILOBJ_NREP_MULTIAPPLY */
- /*_.VALROUT___V1443*/ meltfptr[1442] =
+ /*_.VALROUT___V1446*/ meltfptr[1445] =
(void *) &cdat->drout_1294__COMPILOBJ_NREP_MULTIAPPLY;
cdat->drout_1294__COMPILOBJ_NREP_MULTIAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24308,7 +24398,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_81_warmelt_genobj_COMPILOBJ_NREP_MULTIAPPLY);
/*iniclos dclo_1295__COMPILOBJ_NREP_MULTIAPPLY */
- /*_.VALCLO___V1449*/ meltfptr[1448] =
+ /*_.VALCLO___V1452*/ meltfptr[1451] =
(void *) &cdat->dclo_1295__COMPILOBJ_NREP_MULTIAPPLY;
cdat->dclo_1295__COMPILOBJ_NREP_MULTIAPPLY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24316,9 +24406,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1296__CLASS_NREP_MULTIAPPLY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1450*/ meltfptr[1449])
- /*_.VALDATA___V1450*/
- meltfptr[1449] = (void *) &cdat->dsym_1296__CLASS_NREP_MULTIAPPLY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1453*/ meltfptr[1452])
+ /*_.VALDATA___V1453*/
+ meltfptr[1452] = (void *) &cdat->dsym_1296__CLASS_NREP_MULTIAPPLY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1296__CLASS_NREP_MULTIAPPLY",
@@ -24336,7 +24426,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1297__CLASS_NREP_MULTI*/
- /*_.VALSTR___V1451*/ meltfptr[1450] =
+ /*_.VALSTR___V1454*/ meltfptr[1453] =
(void *) &cdat->dstr_1297__CLASS_NREP_MULTI;
cdat->dstr_1297__CLASS_NREP_MULTI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24345,7 +24435,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1297__CLASS_NREP_MULTI.
val) - 1);
/*inirout drout_1298__LAMBDA_ */
- /*_.VALROUT___V1444*/ meltfptr[1443] = (void *) &cdat->drout_1298__LAMBDA_;
+ /*_.VALROUT___V1447*/ meltfptr[1446] = (void *) &cdat->drout_1298__LAMBDA_;
cdat->drout_1298__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1298__LAMBDA_.routdescr,
@@ -24355,7 +24445,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_82_warmelt_genobj_LAMBDA___26__);
/*inirout drout_1299__LAMBDA_ */
- /*_.VALROUT___V1445*/ meltfptr[1444] = (void *) &cdat->drout_1299__LAMBDA_;
+ /*_.VALROUT___V1448*/ meltfptr[1447] = (void *) &cdat->drout_1299__LAMBDA_;
cdat->drout_1299__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1299__LAMBDA_.routdescr,
@@ -24365,7 +24455,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_83_warmelt_genobj_LAMBDA___27__);
/*inirout drout_1300__LAMBDA_ */
- /*_.VALROUT___V1446*/ meltfptr[1445] = (void *) &cdat->drout_1300__LAMBDA_;
+ /*_.VALROUT___V1449*/ meltfptr[1448] = (void *) &cdat->drout_1300__LAMBDA_;
cdat->drout_1300__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1300__LAMBDA_.routdescr,
@@ -24375,7 +24465,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_84_warmelt_genobj_LAMBDA___28__);
/*inirout drout_1301__LAMBDA_ */
- /*_.VALROUT___V1447*/ meltfptr[1446] = (void *) &cdat->drout_1301__LAMBDA_;
+ /*_.VALROUT___V1450*/ meltfptr[1449] = (void *) &cdat->drout_1301__LAMBDA_;
cdat->drout_1301__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1301__LAMBDA_.routdescr,
@@ -24385,7 +24475,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_85_warmelt_genobj_LAMBDA___29__);
/*inirout drout_1302__LAMBDA_ */
- /*_.VALROUT___V1448*/ meltfptr[1447] = (void *) &cdat->drout_1302__LAMBDA_;
+ /*_.VALROUT___V1451*/ meltfptr[1450] = (void *) &cdat->drout_1302__LAMBDA_;
cdat->drout_1302__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1302__LAMBDA_.routdescr,
@@ -24395,7 +24485,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_86_warmelt_genobj_LAMBDA___30__);
/*inirout drout_1303__COMPILOBJ_NREP_MSEND */
- /*_.VALROUT___V1452*/ meltfptr[1451] =
+ /*_.VALROUT___V1455*/ meltfptr[1454] =
(void *) &cdat->drout_1303__COMPILOBJ_NREP_MSEND;
cdat->drout_1303__COMPILOBJ_NREP_MSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24407,7 +24497,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_87_warmelt_genobj_COMPILOBJ_NREP_MSEND);
/*iniclos dclo_1304__COMPILOBJ_NREP_MSEND */
- /*_.VALCLO___V1454*/ meltfptr[1453] =
+ /*_.VALCLO___V1457*/ meltfptr[1456] =
(void *) &cdat->dclo_1304__COMPILOBJ_NREP_MSEND;
cdat->dclo_1304__COMPILOBJ_NREP_MSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24415,9 +24505,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1305__CLASS_NREP_MSEND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1455*/ meltfptr[1454])
- /*_.VALDATA___V1455*/
- meltfptr[1454] = (void *) &cdat->dsym_1305__CLASS_NREP_MSEND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1458*/ meltfptr[1457])
+ /*_.VALDATA___V1458*/
+ meltfptr[1457] = (void *) &cdat->dsym_1305__CLASS_NREP_MSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1305__CLASS_NREP_MSEND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24434,7 +24524,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1306__CLASS_NREP_MSEND*/
- /*_.VALSTR___V1456*/ meltfptr[1455] =
+ /*_.VALSTR___V1459*/ meltfptr[1458] =
(void *) &cdat->dstr_1306__CLASS_NREP_MSEND;
cdat->dstr_1306__CLASS_NREP_MSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24443,7 +24533,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1306__CLASS_NREP_MSEND.
val) - 1);
/*inirout drout_1307__LAMBDA_ */
- /*_.VALROUT___V1453*/ meltfptr[1452] = (void *) &cdat->drout_1307__LAMBDA_;
+ /*_.VALROUT___V1456*/ meltfptr[1455] = (void *) &cdat->drout_1307__LAMBDA_;
cdat->drout_1307__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1307__LAMBDA_.routdescr,
@@ -24453,7 +24543,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_88_warmelt_genobj_LAMBDA___31__);
/*inirout drout_1308__COMPILOBJ_NREP_MULTIMSEND */
- /*_.VALROUT___V1457*/ meltfptr[1456] =
+ /*_.VALROUT___V1460*/ meltfptr[1459] =
(void *) &cdat->drout_1308__COMPILOBJ_NREP_MULTIMSEND;
cdat->drout_1308__COMPILOBJ_NREP_MULTIMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24465,7 +24555,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_89_warmelt_genobj_COMPILOBJ_NREP_MULTIMSEND);
/*iniclos dclo_1309__COMPILOBJ_NREP_MULTIMSEND */
- /*_.VALCLO___V1462*/ meltfptr[1461] =
+ /*_.VALCLO___V1465*/ meltfptr[1464] =
(void *) &cdat->dclo_1309__COMPILOBJ_NREP_MULTIMSEND;
cdat->dclo_1309__COMPILOBJ_NREP_MULTIMSEND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24473,9 +24563,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1310__CLASS_NREP_MULTIMSEND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1463*/ meltfptr[1462])
- /*_.VALDATA___V1463*/
- meltfptr[1462] = (void *) &cdat->dsym_1310__CLASS_NREP_MULTIMSEND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1466*/ meltfptr[1465])
+ /*_.VALDATA___V1466*/
+ meltfptr[1465] = (void *) &cdat->dsym_1310__CLASS_NREP_MULTIMSEND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1310__CLASS_NREP_MULTIMSEND",
@@ -24493,7 +24583,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1311__CLASS_NREP_MULTI*/
- /*_.VALSTR___V1464*/ meltfptr[1463] =
+ /*_.VALSTR___V1467*/ meltfptr[1466] =
(void *) &cdat->dstr_1311__CLASS_NREP_MULTI;
cdat->dstr_1311__CLASS_NREP_MULTI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24502,7 +24592,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1311__CLASS_NREP_MULTI.
val) - 1);
/*inirout drout_1312__LAMBDA_ */
- /*_.VALROUT___V1458*/ meltfptr[1457] = (void *) &cdat->drout_1312__LAMBDA_;
+ /*_.VALROUT___V1461*/ meltfptr[1460] = (void *) &cdat->drout_1312__LAMBDA_;
cdat->drout_1312__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1312__LAMBDA_.routdescr,
@@ -24512,7 +24602,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_90_warmelt_genobj_LAMBDA___32__);
/*inirout drout_1313__LAMBDA_ */
- /*_.VALROUT___V1459*/ meltfptr[1458] = (void *) &cdat->drout_1313__LAMBDA_;
+ /*_.VALROUT___V1462*/ meltfptr[1461] = (void *) &cdat->drout_1313__LAMBDA_;
cdat->drout_1313__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1313__LAMBDA_.routdescr,
@@ -24522,7 +24612,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_91_warmelt_genobj_LAMBDA___33__);
/*inirout drout_1314__LAMBDA_ */
- /*_.VALROUT___V1460*/ meltfptr[1459] = (void *) &cdat->drout_1314__LAMBDA_;
+ /*_.VALROUT___V1463*/ meltfptr[1462] = (void *) &cdat->drout_1314__LAMBDA_;
cdat->drout_1314__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1314__LAMBDA_.routdescr,
@@ -24532,7 +24622,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_92_warmelt_genobj_LAMBDA___34__);
/*inirout drout_1315__LAMBDA_ */
- /*_.VALROUT___V1461*/ meltfptr[1460] = (void *) &cdat->drout_1315__LAMBDA_;
+ /*_.VALROUT___V1464*/ meltfptr[1463] = (void *) &cdat->drout_1315__LAMBDA_;
cdat->drout_1315__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_1315__LAMBDA_.routdescr,
@@ -24542,7 +24632,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_93_warmelt_genobj_LAMBDA___35__);
/*inirout drout_1316__COMPILOBJ_ANY_BINDING */
- /*_.VALROUT___V1465*/ meltfptr[1464] =
+ /*_.VALROUT___V1468*/ meltfptr[1467] =
(void *) &cdat->drout_1316__COMPILOBJ_ANY_BINDING;
cdat->drout_1316__COMPILOBJ_ANY_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24554,14 +24644,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_94_warmelt_genobj_COMPILOBJ_ANY_BINDING);
/*iniclos dclo_1317__COMPILOBJ_ANY_BINDING */
- /*_.VALCLO___V1466*/ meltfptr[1465] =
+ /*_.VALCLO___V1469*/ meltfptr[1468] =
(void *) &cdat->dclo_1317__COMPILOBJ_ANY_BINDING;
cdat->dclo_1317__COMPILOBJ_ANY_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1317__COMPILOBJ_ANY_BINDING.nbval = 0;
/*inirout drout_1318__COMPILOBJ_VALUE_BINDING */
- /*_.VALROUT___V1467*/ meltfptr[1466] =
+ /*_.VALROUT___V1470*/ meltfptr[1469] =
(void *) &cdat->drout_1318__COMPILOBJ_VALUE_BINDING;
cdat->drout_1318__COMPILOBJ_VALUE_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24573,14 +24663,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_95_warmelt_genobj_COMPILOBJ_VALUE_BINDING);
/*iniclos dclo_1319__COMPILOBJ_VALUE_BINDING */
- /*_.VALCLO___V1468*/ meltfptr[1467] =
+ /*_.VALCLO___V1471*/ meltfptr[1470] =
(void *) &cdat->dclo_1319__COMPILOBJ_VALUE_BINDING;
cdat->dclo_1319__COMPILOBJ_VALUE_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1319__COMPILOBJ_VALUE_BINDING.nbval = 0;
/*inirout drout_1320__COMPILOBJ_FIXED_BINDING */
- /*_.VALROUT___V1469*/ meltfptr[1468] =
+ /*_.VALROUT___V1472*/ meltfptr[1471] =
(void *) &cdat->drout_1320__COMPILOBJ_FIXED_BINDING;
cdat->drout_1320__COMPILOBJ_FIXED_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24592,14 +24682,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_96_warmelt_genobj_COMPILOBJ_FIXED_BINDING);
/*iniclos dclo_1321__COMPILOBJ_FIXED_BINDING */
- /*_.VALCLO___V1470*/ meltfptr[1469] =
+ /*_.VALCLO___V1473*/ meltfptr[1472] =
(void *) &cdat->dclo_1321__COMPILOBJ_FIXED_BINDING;
cdat->dclo_1321__COMPILOBJ_FIXED_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1321__COMPILOBJ_FIXED_BINDING.nbval = 0;
/*inirout drout_1322__COMPILOBJ_NORMAL_LET_BINDING */
- /*_.VALROUT___V1471*/ meltfptr[1470] =
+ /*_.VALROUT___V1474*/ meltfptr[1473] =
(void *) &cdat->drout_1322__COMPILOBJ_NORMAL_LET_BINDING;
cdat->drout_1322__COMPILOBJ_NORMAL_LET_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24611,14 +24701,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_97_warmelt_genobj_COMPILOBJ_NORMAL_LET_BINDING);
/*iniclos dclo_1323__COMPILOBJ_NORMAL_LET_BINDING */
- /*_.VALCLO___V1472*/ meltfptr[1471] =
+ /*_.VALCLO___V1475*/ meltfptr[1474] =
(void *) &cdat->dclo_1323__COMPILOBJ_NORMAL_LET_BINDING;
cdat->dclo_1323__COMPILOBJ_NORMAL_LET_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1323__COMPILOBJ_NORMAL_LET_BINDING.nbval = 0;
/*inirout drout_1324__COMPILOBJ_CONSLAMBDABIND */
- /*_.VALROUT___V1473*/ meltfptr[1472] =
+ /*_.VALROUT___V1476*/ meltfptr[1475] =
(void *) &cdat->drout_1324__COMPILOBJ_CONSLAMBDABIND;
cdat->drout_1324__COMPILOBJ_CONSLAMBDABIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24630,14 +24720,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_98_warmelt_genobj_COMPILOBJ_CONSLAMBDABIND);
/*iniclos dclo_1325__COMPILOBJ_CONSLAMBDABIND */
- /*_.VALCLO___V1474*/ meltfptr[1473] =
+ /*_.VALCLO___V1477*/ meltfptr[1476] =
(void *) &cdat->dclo_1325__COMPILOBJ_CONSLAMBDABIND;
cdat->dclo_1325__COMPILOBJ_CONSLAMBDABIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1325__COMPILOBJ_CONSLAMBDABIND.nbval = 0;
/*inirout drout_1326__COMPILOBJ_CONSTUPLEBIND */
- /*_.VALROUT___V1475*/ meltfptr[1474] =
+ /*_.VALROUT___V1478*/ meltfptr[1477] =
(void *) &cdat->drout_1326__COMPILOBJ_CONSTUPLEBIND;
cdat->drout_1326__COMPILOBJ_CONSTUPLEBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24649,14 +24739,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_99_warmelt_genobj_COMPILOBJ_CONSTUPLEBIND);
/*iniclos dclo_1327__COMPILOBJ_CONSTUPLEBIND */
- /*_.VALCLO___V1476*/ meltfptr[1475] =
+ /*_.VALCLO___V1479*/ meltfptr[1478] =
(void *) &cdat->dclo_1327__COMPILOBJ_CONSTUPLEBIND;
cdat->dclo_1327__COMPILOBJ_CONSTUPLEBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1327__COMPILOBJ_CONSTUPLEBIND.nbval = 0;
/*inirout drout_1328__COMPILOBJ_CONSPAIRBIND */
- /*_.VALROUT___V1477*/ meltfptr[1476] =
+ /*_.VALROUT___V1480*/ meltfptr[1479] =
(void *) &cdat->drout_1328__COMPILOBJ_CONSPAIRBIND;
cdat->drout_1328__COMPILOBJ_CONSPAIRBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24668,14 +24758,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_100_warmelt_genobj_COMPILOBJ_CONSPAIRBIND);
/*iniclos dclo_1329__COMPILOBJ_CONSPAIRBIND */
- /*_.VALCLO___V1478*/ meltfptr[1477] =
+ /*_.VALCLO___V1481*/ meltfptr[1480] =
(void *) &cdat->dclo_1329__COMPILOBJ_CONSPAIRBIND;
cdat->dclo_1329__COMPILOBJ_CONSPAIRBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1329__COMPILOBJ_CONSPAIRBIND.nbval = 0;
/*inirout drout_1330__COMPILOBJ_CONSLISTBIND */
- /*_.VALROUT___V1479*/ meltfptr[1478] =
+ /*_.VALROUT___V1482*/ meltfptr[1481] =
(void *) &cdat->drout_1330__COMPILOBJ_CONSLISTBIND;
cdat->drout_1330__COMPILOBJ_CONSLISTBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24687,14 +24777,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_101_warmelt_genobj_COMPILOBJ_CONSLISTBIND);
/*iniclos dclo_1331__COMPILOBJ_CONSLISTBIND */
- /*_.VALCLO___V1480*/ meltfptr[1479] =
+ /*_.VALCLO___V1483*/ meltfptr[1482] =
(void *) &cdat->dclo_1331__COMPILOBJ_CONSLISTBIND;
cdat->dclo_1331__COMPILOBJ_CONSLISTBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1331__COMPILOBJ_CONSLISTBIND.nbval = 0;
/*inirout drout_1332__COMPILOBJ_CONSINSTANCEBIND */
- /*_.VALROUT___V1481*/ meltfptr[1480] =
+ /*_.VALROUT___V1484*/ meltfptr[1483] =
(void *) &cdat->drout_1332__COMPILOBJ_CONSINSTANCEBIND;
cdat->drout_1332__COMPILOBJ_CONSINSTANCEBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24706,14 +24796,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_102_warmelt_genobj_COMPILOBJ_CONSINSTANCEBIND);
/*iniclos dclo_1333__COMPILOBJ_CONSINSTANCEBIND */
- /*_.VALCLO___V1482*/ meltfptr[1481] =
+ /*_.VALCLO___V1485*/ meltfptr[1484] =
(void *) &cdat->dclo_1333__COMPILOBJ_CONSINSTANCEBIND;
cdat->dclo_1333__COMPILOBJ_CONSINSTANCEBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1333__COMPILOBJ_CONSINSTANCEBIND.nbval = 0;
/*inirout drout_1334__PUTOBJDEST_OBJVALUE */
- /*_.VALROUT___V1483*/ meltfptr[1482] =
+ /*_.VALROUT___V1486*/ meltfptr[1485] =
(void *) &cdat->drout_1334__PUTOBJDEST_OBJVALUE;
cdat->drout_1334__PUTOBJDEST_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24725,14 +24815,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_103_warmelt_genobj_PUTOBJDEST_OBJVALUE);
/*iniclos dclo_1335__PUTOBJDEST_OBJVALUE */
- /*_.VALCLO___V1484*/ meltfptr[1483] =
+ /*_.VALCLO___V1487*/ meltfptr[1486] =
(void *) &cdat->dclo_1335__PUTOBJDEST_OBJVALUE;
cdat->dclo_1335__PUTOBJDEST_OBJVALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1335__PUTOBJDEST_OBJVALUE.nbval = 0;
/*inirout drout_1336__PUTOBJDEST_INTEGER */
- /*_.VALROUT___V1485*/ meltfptr[1484] =
+ /*_.VALROUT___V1488*/ meltfptr[1487] =
(void *) &cdat->drout_1336__PUTOBJDEST_INTEGER;
cdat->drout_1336__PUTOBJDEST_INTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24744,14 +24834,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_104_warmelt_genobj_PUTOBJDEST_INTEGER);
/*iniclos dclo_1337__PUTOBJDEST_INTEGER */
- /*_.VALCLO___V1486*/ meltfptr[1485] =
+ /*_.VALCLO___V1489*/ meltfptr[1488] =
(void *) &cdat->dclo_1337__PUTOBJDEST_INTEGER;
cdat->dclo_1337__PUTOBJDEST_INTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1337__PUTOBJDEST_INTEGER.nbval = 0;
/*inirout drout_1338__PUTOBJDEST_STRING */
- /*_.VALROUT___V1487*/ meltfptr[1486] =
+ /*_.VALROUT___V1490*/ meltfptr[1489] =
(void *) &cdat->drout_1338__PUTOBJDEST_STRING;
cdat->drout_1338__PUTOBJDEST_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24763,7 +24853,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_105_warmelt_genobj_PUTOBJDEST_STRING);
/*iniclos dclo_1339__PUTOBJDEST_STRING */
- /*_.VALCLO___V1488*/ meltfptr[1487] =
+ /*_.VALCLO___V1491*/ meltfptr[1490] =
(void *) &cdat->dclo_1339__PUTOBJDEST_STRING;
cdat->dclo_1339__PUTOBJDEST_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24771,9 +24861,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1340__CTYPE_CSTRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1489*/ meltfptr[1488])
- /*_.VALDATA___V1489*/
- meltfptr[1488] = (void *) &cdat->dsym_1340__CTYPE_CSTRING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1492*/ meltfptr[1491])
+ /*_.VALDATA___V1492*/
+ meltfptr[1491] = (void *) &cdat->dsym_1340__CTYPE_CSTRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1340__CTYPE_CSTRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24790,7 +24880,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1341__CTYPE_CSTRING*/
- /*_.VALSTR___V1490*/ meltfptr[1489] =
+ /*_.VALSTR___V1493*/ meltfptr[1492] =
(void *) &cdat->dstr_1341__CTYPE_CSTRING;
cdat->dstr_1341__CTYPE_CSTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24799,7 +24889,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1341__CTYPE_CSTRING.val) -
1);
/*inirout drout_1342__PUTOBJDEST_NULL */
- /*_.VALROUT___V1491*/ meltfptr[1490] =
+ /*_.VALROUT___V1494*/ meltfptr[1493] =
(void *) &cdat->drout_1342__PUTOBJDEST_NULL;
cdat->drout_1342__PUTOBJDEST_NULL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24811,7 +24901,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_106_warmelt_genobj_PUTOBJDEST_NULL);
/*iniclos dclo_1343__PUTOBJDEST_NULL */
- /*_.VALCLO___V1492*/ meltfptr[1491] =
+ /*_.VALCLO___V1495*/ meltfptr[1494] =
(void *) &cdat->dclo_1343__PUTOBJDEST_NULL;
cdat->dclo_1343__PUTOBJDEST_NULL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24819,9 +24909,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1344__DISCR_NULL_RECEIVER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1493*/ meltfptr[1492])
- /*_.VALDATA___V1493*/
- meltfptr[1492] = (void *) &cdat->dsym_1344__DISCR_NULL_RECEIVER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1496*/ meltfptr[1495])
+ /*_.VALDATA___V1496*/
+ meltfptr[1495] = (void *) &cdat->dsym_1344__DISCR_NULL_RECEIVER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1344__DISCR_NULL_RECEIVER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24838,7 +24928,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1345__DISCR_NULL_RECEI*/
- /*_.VALSTR___V1494*/ meltfptr[1493] =
+ /*_.VALSTR___V1497*/ meltfptr[1496] =
(void *) &cdat->dstr_1345__DISCR_NULL_RECEI;
cdat->dstr_1345__DISCR_NULL_RECEI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24847,7 +24937,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1345__DISCR_NULL_RECEI.
val) - 1);
/*inirout drout_1346__PUTOBJDEST_OBJANYBLOCK */
- /*_.VALROUT___V1495*/ meltfptr[1494] =
+ /*_.VALROUT___V1498*/ meltfptr[1497] =
(void *) &cdat->drout_1346__PUTOBJDEST_OBJANYBLOCK;
cdat->drout_1346__PUTOBJDEST_OBJANYBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24859,14 +24949,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_107_warmelt_genobj_PUTOBJDEST_OBJANYBLOCK);
/*iniclos dclo_1347__PUTOBJDEST_OBJANYBLOCK */
- /*_.VALCLO___V1496*/ meltfptr[1495] =
+ /*_.VALCLO___V1499*/ meltfptr[1498] =
(void *) &cdat->dclo_1347__PUTOBJDEST_OBJANYBLOCK;
cdat->dclo_1347__PUTOBJDEST_OBJANYBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1347__PUTOBJDEST_OBJANYBLOCK.nbval = 0;
/*inirout drout_1348__PUTOBJDEST_OBJMULTIBLOCK */
- /*_.VALROUT___V1497*/ meltfptr[1496] =
+ /*_.VALROUT___V1500*/ meltfptr[1499] =
(void *) &cdat->drout_1348__PUTOBJDEST_OBJMULTIBLOCK;
cdat->drout_1348__PUTOBJDEST_OBJMULTIBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24878,14 +24968,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_108_warmelt_genobj_PUTOBJDEST_OBJMULTIBLOCK);
/*iniclos dclo_1349__PUTOBJDEST_OBJMULTIBLOCK */
- /*_.VALCLO___V1498*/ meltfptr[1497] =
+ /*_.VALCLO___V1501*/ meltfptr[1500] =
(void *) &cdat->dclo_1349__PUTOBJDEST_OBJMULTIBLOCK;
cdat->dclo_1349__PUTOBJDEST_OBJMULTIBLOCK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1349__PUTOBJDEST_OBJMULTIBLOCK.nbval = 0;
/*inirout drout_1350__PUTOBJDEST_OBJLOOP */
- /*_.VALROUT___V1499*/ meltfptr[1498] =
+ /*_.VALROUT___V1502*/ meltfptr[1501] =
(void *) &cdat->drout_1350__PUTOBJDEST_OBJLOOP;
cdat->drout_1350__PUTOBJDEST_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24897,14 +24987,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_109_warmelt_genobj_PUTOBJDEST_OBJLOOP);
/*iniclos dclo_1351__PUTOBJDEST_OBJLOOP */
- /*_.VALCLO___V1500*/ meltfptr[1499] =
+ /*_.VALCLO___V1503*/ meltfptr[1502] =
(void *) &cdat->dclo_1351__PUTOBJDEST_OBJLOOP;
cdat->dclo_1351__PUTOBJDEST_OBJLOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1351__PUTOBJDEST_OBJLOOP.nbval = 0;
/*inirout drout_1352__PUTOBJDEST_OBJEXIT */
- /*_.VALROUT___V1501*/ meltfptr[1500] =
+ /*_.VALROUT___V1504*/ meltfptr[1503] =
(void *) &cdat->drout_1352__PUTOBJDEST_OBJEXIT;
cdat->drout_1352__PUTOBJDEST_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24916,14 +25006,14 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_110_warmelt_genobj_PUTOBJDEST_OBJEXIT);
/*iniclos dclo_1353__PUTOBJDEST_OBJEXIT */
- /*_.VALCLO___V1502*/ meltfptr[1501] =
+ /*_.VALCLO___V1505*/ meltfptr[1504] =
(void *) &cdat->dclo_1353__PUTOBJDEST_OBJEXIT;
cdat->dclo_1353__PUTOBJDEST_OBJEXIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_1353__PUTOBJDEST_OBJEXIT.nbval = 0;
/*inirout drout_1354__COMPILOBJ_NREP_IF */
- /*_.VALROUT___V1503*/ meltfptr[1502] =
+ /*_.VALROUT___V1506*/ meltfptr[1505] =
(void *) &cdat->drout_1354__COMPILOBJ_NREP_IF;
cdat->drout_1354__COMPILOBJ_NREP_IF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24935,7 +25025,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_111_warmelt_genobj_COMPILOBJ_NREP_IF);
/*iniclos dclo_1355__COMPILOBJ_NREP_IF */
- /*_.VALCLO___V1504*/ meltfptr[1503] =
+ /*_.VALCLO___V1507*/ meltfptr[1506] =
(void *) &cdat->dclo_1355__COMPILOBJ_NREP_IF;
cdat->dclo_1355__COMPILOBJ_NREP_IF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24943,9 +25033,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1356__CLASS_NREP_IF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1505*/ meltfptr[1504])
- /*_.VALDATA___V1505*/
- meltfptr[1504] = (void *) &cdat->dsym_1356__CLASS_NREP_IF;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1508*/ meltfptr[1507])
+ /*_.VALDATA___V1508*/
+ meltfptr[1507] = (void *) &cdat->dsym_1356__CLASS_NREP_IF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1356__CLASS_NREP_IF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -24962,7 +25052,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1357__CLASS_NREP_IF*/
- /*_.VALSTR___V1506*/ meltfptr[1505] =
+ /*_.VALSTR___V1509*/ meltfptr[1508] =
(void *) &cdat->dstr_1357__CLASS_NREP_IF;
cdat->dstr_1357__CLASS_NREP_IF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -24971,7 +25061,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
sizeof (cdat->dstr_1357__CLASS_NREP_IF.val) -
1);
/*inirout drout_1358__COMPILOBJ_NREP_IFISA */
- /*_.VALROUT___V1507*/ meltfptr[1506] =
+ /*_.VALROUT___V1510*/ meltfptr[1509] =
(void *) &cdat->drout_1358__COMPILOBJ_NREP_IFISA;
cdat->drout_1358__COMPILOBJ_NREP_IFISA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -24983,7 +25073,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
meltrout_112_warmelt_genobj_COMPILOBJ_NREP_IFISA);
/*iniclos dclo_1359__COMPILOBJ_NREP_IFISA */
- /*_.VALCLO___V1508*/ meltfptr[1507] =
+ /*_.VALCLO___V1511*/ meltfptr[1510] =
(void *) &cdat->dclo_1359__COMPILOBJ_NREP_IFISA;
cdat->dclo_1359__COMPILOBJ_NREP_IFISA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -24991,9 +25081,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*iniobj dsym_1360__CLASS_NREP_IFISA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1509*/ meltfptr[1508])
- /*_.VALDATA___V1509*/
- meltfptr[1508] = (void *) &cdat->dsym_1360__CLASS_NREP_IFISA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1512*/ meltfptr[1511])
+ /*_.VALDATA___V1512*/
+ meltfptr[1511] = (void *) &cdat->dsym_1360__CLASS_NREP_IFISA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1360__CLASS_NREP_IFISA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -25010,7 +25100,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1361__CLASS_NREP_IFISA*/
- /*_.VALSTR___V1510*/ meltfptr[1509] =
+ /*_.VALSTR___V1513*/ meltfptr[1512] =
(void *) &cdat->dstr_1361__CLASS_NREP_IFISA;
cdat->dstr_1361__CLASS_NREP_IFISA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -25020,9 +25110,9 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_1362__CLASS_NREP_IFTESTVALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1511*/ meltfptr[1510])
- /*_.VALDATA___V1511*/
- meltfptr[1510] = (void *) &cdat->dsym_1362__CLASS_NREP_IFTESTVALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V1514*/ meltfptr[1513])
+ /*_.VALDATA___V1514*/
+ meltfptr[1513] = (void *) &cdat->dsym_1362__CLASS_NREP_IFTESTVALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_1362__CLASS_NREP_IFTESTVALUE",
@@ -25040,7 +25130,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
/*inistring dstr_1363__CLASS_NREP_IFTES*/
- /*_.VALSTR___V1512*/ meltfptr[1511] =
+ /*_.VALSTR___V1515*/ meltfptr[1514] =
(void *) &cdat->dstr_1363__CLASS_NREP_IFTES;
cdat->dstr_1363__CLASS_NREP_IFTES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -25048,3860 +25138,4026 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__,
"CLASS_NREP_IFTESTVALUE",
sizeof (cdat->dstr_1363__CLASS_NREP_IFTES.
val) - 1);
- /*inirout drout_1364__COMPILOBJ_NREP_IFVARIADIC */
- /*_.VALROUT___V1513*/ meltfptr[1512] =
- (void *) &cdat->drout_1364__COMPILOBJ_NREP_IFVARIADIC;
- cdat->drout_1364__COMPILOBJ_NREP_IFVARIADIC.discr =
+ /*inirout drout_1364__COMPILOBJ_NREP_IFTUPLESIZED */
+ /*_.VALROUT___V1516*/ meltfptr[1515] =
+ (void *) &cdat->drout_1364__COMPILOBJ_NREP_IFTUPLESIZED;
+ cdat->drout_1364__COMPILOBJ_NREP_IFTUPLESIZED.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_1364__COMPILOBJ_NREP_IFTUPLESIZED.routdescr,
+ "COMPILOBJ_NREP_IFTUPLESIZED @warmelt-genobj.melt:3771",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1364__COMPILOBJ_NREP_IFTUPLESIZED.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1364__COMPILOBJ_NREP_IFTUPLESIZED,
+ meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED);
+
+ /*iniclos dclo_1365__COMPILOBJ_NREP_IFTUPLESIZED */
+ /*_.VALCLO___V1517*/ meltfptr[1516] =
+ (void *) &cdat->dclo_1365__COMPILOBJ_NREP_IFTUPLESIZED;
+ cdat->dclo_1365__COMPILOBJ_NREP_IFTUPLESIZED.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_1365__COMPILOBJ_NREP_IFTUPLESIZED.nbval = 0;
+
+
+/*iniobj dsym_1366__CLASS_NREP_IFTUPLESIZED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1518*/ meltfptr[1517])
+ /*_.VALDATA___V1518*/
+ meltfptr[1517] = (void *) &cdat->dsym_1366__CLASS_NREP_IFTUPLESIZED;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr isobj dsym_1366__CLASS_NREP_IFTUPLESIZED",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
+ MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr objmagic dsym_1366__CLASS_NREP_IFTUPLESIZED",
+ ((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_1366__CLASS_NREP_IFTUPLESIZED.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_1366__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499;
+ cdat->dsym_1366__CLASS_NREP_IFTUPLESIZED.obj_len = 3;
+
+
+/*inistring dstr_1367__CLASS_NREP_IFTUP*/
+ /*_.VALSTR___V1519*/ meltfptr[1518] =
+ (void *) &cdat->dstr_1367__CLASS_NREP_IFTUP;
+ cdat->dstr_1367__CLASS_NREP_IFTUP.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_1367__CLASS_NREP_IFTUP.val,
+ "CLASS_NREP_IFTUPLESIZED",
+ sizeof (cdat->dstr_1367__CLASS_NREP_IFTUP.
+ val) - 1);
+ /*inirout drout_1368__COMPILOBJ_NREP_IFVARIADIC */
+ /*_.VALROUT___V1520*/ meltfptr[1519] =
+ (void *) &cdat->drout_1368__COMPILOBJ_NREP_IFVARIADIC;
+ cdat->drout_1368__COMPILOBJ_NREP_IFVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1364__COMPILOBJ_NREP_IFVARIADIC.routdescr,
- "COMPILOBJ_NREP_IFVARIADIC @warmelt-genobj.melt:3779",
+ strncpy (cdat->drout_1368__COMPILOBJ_NREP_IFVARIADIC.routdescr,
+ "COMPILOBJ_NREP_IFVARIADIC @warmelt-genobj.melt:3803",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1364__COMPILOBJ_NREP_IFVARIADIC.nbval = 14;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1364__COMPILOBJ_NREP_IFVARIADIC,
- meltrout_113_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC);
-
- /*iniclos dclo_1365__COMPILOBJ_NREP_IFVARIADIC */
- /*_.VALCLO___V1514*/ meltfptr[1513] =
- (void *) &cdat->dclo_1365__COMPILOBJ_NREP_IFVARIADIC;
- cdat->dclo_1365__COMPILOBJ_NREP_IFVARIADIC.discr =
+ cdat->drout_1368__COMPILOBJ_NREP_IFVARIADIC.nbval = 14;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1368__COMPILOBJ_NREP_IFVARIADIC,
+ meltrout_114_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC);
+
+ /*iniclos dclo_1369__COMPILOBJ_NREP_IFVARIADIC */
+ /*_.VALCLO___V1521*/ meltfptr[1520] =
+ (void *) &cdat->dclo_1369__COMPILOBJ_NREP_IFVARIADIC;
+ cdat->dclo_1369__COMPILOBJ_NREP_IFVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1365__COMPILOBJ_NREP_IFVARIADIC.nbval = 0;
+ cdat->dclo_1369__COMPILOBJ_NREP_IFVARIADIC.nbval = 0;
-/*iniobj dsym_1366__CLASS_NREP_IFVARIADIC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1515*/ meltfptr[1514])
- /*_.VALDATA___V1515*/
- meltfptr[1514] = (void *) &cdat->dsym_1366__CLASS_NREP_IFVARIADIC;
+/*iniobj dsym_1370__CLASS_NREP_IFVARIADIC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1522*/ meltfptr[1521])
+ /*_.VALDATA___V1522*/
+ meltfptr[1521] = (void *) &cdat->dsym_1370__CLASS_NREP_IFVARIADIC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1366__CLASS_NREP_IFVARIADIC",
+ ("iniobj check.discr isobj dsym_1370__CLASS_NREP_IFVARIADIC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1366__CLASS_NREP_IFVARIADIC",
+ ("iniobj check.discr objmagic dsym_1370__CLASS_NREP_IFVARIADIC",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1366__CLASS_NREP_IFVARIADIC.meltobj_class =
+ cdat->dsym_1370__CLASS_NREP_IFVARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1366__CLASS_NREP_IFVARIADIC.obj_hash = 711812837;
- cdat->dsym_1366__CLASS_NREP_IFVARIADIC.obj_len = 3;
+ cdat->dsym_1370__CLASS_NREP_IFVARIADIC.obj_hash = 711812837;
+ cdat->dsym_1370__CLASS_NREP_IFVARIADIC.obj_len = 3;
-/*inistring dstr_1367__CLASS_NREP_IFVAR*/
- /*_.VALSTR___V1516*/ meltfptr[1515] =
- (void *) &cdat->dstr_1367__CLASS_NREP_IFVAR;
- cdat->dstr_1367__CLASS_NREP_IFVAR.discr =
+/*inistring dstr_1371__CLASS_NREP_IFVAR*/
+ /*_.VALSTR___V1523*/ meltfptr[1522] =
+ (void *) &cdat->dstr_1371__CLASS_NREP_IFVAR;
+ cdat->dstr_1371__CLASS_NREP_IFVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1367__CLASS_NREP_IFVAR.val,
+ /*small inistring */ strncpy (cdat->dstr_1371__CLASS_NREP_IFVAR.val,
"CLASS_NREP_IFVARIADIC",
- sizeof (cdat->dstr_1367__CLASS_NREP_IFVAR.
+ sizeof (cdat->dstr_1371__CLASS_NREP_IFVAR.
val) - 1);
- /*inirout drout_1368__GETCTYPE_IFVARIADIC */
- /*_.VALROUT___V1517*/ meltfptr[1516] =
- (void *) &cdat->drout_1368__GETCTYPE_IFVARIADIC;
- cdat->drout_1368__GETCTYPE_IFVARIADIC.discr =
+ /*inirout drout_1372__GETCTYPE_IFVARIADIC */
+ /*_.VALROUT___V1524*/ meltfptr[1523] =
+ (void *) &cdat->drout_1372__GETCTYPE_IFVARIADIC;
+ cdat->drout_1372__GETCTYPE_IFVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1368__GETCTYPE_IFVARIADIC.routdescr,
- "GETCTYPE_IFVARIADIC @warmelt-genobj.melt:3865",
+ strncpy (cdat->drout_1372__GETCTYPE_IFVARIADIC.routdescr,
+ "GETCTYPE_IFVARIADIC @warmelt-genobj.melt:3889",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1368__GETCTYPE_IFVARIADIC.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1368__GETCTYPE_IFVARIADIC,
- meltrout_114_warmelt_genobj_GETCTYPE_IFVARIADIC);
-
- /*iniclos dclo_1369__GETCTYPE_IFVARIADIC */
- /*_.VALCLO___V1518*/ meltfptr[1517] =
- (void *) &cdat->dclo_1369__GETCTYPE_IFVARIADIC;
- cdat->dclo_1369__GETCTYPE_IFVARIADIC.discr =
+ cdat->drout_1372__GETCTYPE_IFVARIADIC.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1372__GETCTYPE_IFVARIADIC,
+ meltrout_115_warmelt_genobj_GETCTYPE_IFVARIADIC);
+
+ /*iniclos dclo_1373__GETCTYPE_IFVARIADIC */
+ /*_.VALCLO___V1525*/ meltfptr[1524] =
+ (void *) &cdat->dclo_1373__GETCTYPE_IFVARIADIC;
+ cdat->dclo_1373__GETCTYPE_IFVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1369__GETCTYPE_IFVARIADIC.nbval = 0;
+ cdat->dclo_1373__GETCTYPE_IFVARIADIC.nbval = 0;
- /*inirout drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT */
- /*_.VALROUT___V1519*/ meltfptr[1518] =
- (void *) &cdat->drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
- cdat->drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr =
+ /*inirout drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT */
+ /*_.VALROUT___V1526*/ meltfptr[1525] =
+ (void *) &cdat->drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
+ cdat->drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT.routdescr,
- "COMPILOBJ_NREP_VARIADIC_ARGUMENT @warmelt-genobj.melt:3873",
+ strncpy (cdat->drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT.routdescr,
+ "COMPILOBJ_NREP_VARIADIC_ARGUMENT @warmelt-genobj.melt:3897",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 9;
+ cdat->drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 9;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT,
- meltrout_115_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT);
+ drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT,
+ meltrout_116_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT);
- /*iniclos dclo_1371__COMPILOBJ_NREP_VARIADIC_ARGUMENT */
- /*_.VALCLO___V1520*/ meltfptr[1519] =
- (void *) &cdat->dclo_1371__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
- cdat->dclo_1371__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr =
+ /*iniclos dclo_1375__COMPILOBJ_NREP_VARIADIC_ARGUMENT */
+ /*_.VALCLO___V1527*/ meltfptr[1526] =
+ (void *) &cdat->dclo_1375__COMPILOBJ_NREP_VARIADIC_ARGUMENT;
+ cdat->dclo_1375__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1371__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 0;
+ cdat->dclo_1375__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 0;
-/*iniobj dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1521*/ meltfptr[1520])
- /*_.VALDATA___V1521*/
- meltfptr[1520] = (void *) &cdat->dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT;
+/*iniobj dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1528*/ meltfptr[1527])
+ /*_.VALDATA___V1528*/
+ meltfptr[1527] = (void *) &cdat->dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT",
+ ("iniobj check.discr isobj dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT",
+ ("iniobj check.discr objmagic dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class =
+ cdat->dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 758212506;
- cdat->dsym_1372__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 3;
+ cdat->dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 758212506;
+ cdat->dsym_1376__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 3;
-/*inistring dstr_1373__CLASS_NREP_VARIA*/
- /*_.VALSTR___V1522*/ meltfptr[1521] =
- (void *) &cdat->dstr_1373__CLASS_NREP_VARIA;
- cdat->dstr_1373__CLASS_NREP_VARIA.discr =
+/*inistring dstr_1377__CLASS_NREP_VARIA*/
+ /*_.VALSTR___V1529*/ meltfptr[1528] =
+ (void *) &cdat->dstr_1377__CLASS_NREP_VARIA;
+ cdat->dstr_1377__CLASS_NREP_VARIA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1373__CLASS_NREP_VARIA.val,
+ /*small inistring */ strncpy (cdat->dstr_1377__CLASS_NREP_VARIA.val,
"CLASS_NREP_VARIADIC_ARGUMENT",
- sizeof (cdat->dstr_1373__CLASS_NREP_VARIA.
+ sizeof (cdat->dstr_1377__CLASS_NREP_VARIA.
val) - 1);
- /*inirout drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC */
- /*_.VALROUT___V1523*/ meltfptr[1522] =
- (void *) &cdat->drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC;
- cdat->drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC.discr =
+ /*inirout drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC */
+ /*_.VALROUT___V1530*/ meltfptr[1529] =
+ (void *) &cdat->drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC;
+ cdat->drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC.routdescr,
- "COMPILOBJ_NREP_CONSUMEVARIADIC @warmelt-genobj.melt:3920",
+ strncpy (cdat->drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC.routdescr,
+ "COMPILOBJ_NREP_CONSUMEVARIADIC @warmelt-genobj.melt:3944",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 13;
+ cdat->drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 13;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC,
- meltrout_116_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC);
+ drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC,
+ meltrout_117_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC);
- /*iniclos dclo_1375__COMPILOBJ_NREP_CONSUMEVARIADIC */
- /*_.VALCLO___V1524*/ meltfptr[1523] =
- (void *) &cdat->dclo_1375__COMPILOBJ_NREP_CONSUMEVARIADIC;
- cdat->dclo_1375__COMPILOBJ_NREP_CONSUMEVARIADIC.discr =
+ /*iniclos dclo_1379__COMPILOBJ_NREP_CONSUMEVARIADIC */
+ /*_.VALCLO___V1531*/ meltfptr[1530] =
+ (void *) &cdat->dclo_1379__COMPILOBJ_NREP_CONSUMEVARIADIC;
+ cdat->dclo_1379__COMPILOBJ_NREP_CONSUMEVARIADIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1375__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 0;
+ cdat->dclo_1379__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 0;
-/*iniobj dsym_1376__CLASS_NREP_CONSUME_VARIADIC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1525*/ meltfptr[1524])
- /*_.VALDATA___V1525*/
- meltfptr[1524] = (void *) &cdat->dsym_1376__CLASS_NREP_CONSUME_VARIADIC;
+/*iniobj dsym_1380__CLASS_NREP_CONSUME_VARIADIC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1532*/ meltfptr[1531])
+ /*_.VALDATA___V1532*/
+ meltfptr[1531] = (void *) &cdat->dsym_1380__CLASS_NREP_CONSUME_VARIADIC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1376__CLASS_NREP_CONSUME_VARIADIC",
+ ("iniobj check.discr isobj dsym_1380__CLASS_NREP_CONSUME_VARIADIC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1376__CLASS_NREP_CONSUME_VARIADIC",
+ ("iniobj check.discr objmagic dsym_1380__CLASS_NREP_CONSUME_VARIADIC",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1376__CLASS_NREP_CONSUME_VARIADIC.meltobj_class =
+ cdat->dsym_1380__CLASS_NREP_CONSUME_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1376__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 633396995;
- cdat->dsym_1376__CLASS_NREP_CONSUME_VARIADIC.obj_len = 3;
+ cdat->dsym_1380__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 633396995;
+ cdat->dsym_1380__CLASS_NREP_CONSUME_VARIADIC.obj_len = 3;
-/*inistring dstr_1377__CLASS_NREP_CONSU*/
- /*_.VALSTR___V1526*/ meltfptr[1525] =
- (void *) &cdat->dstr_1377__CLASS_NREP_CONSU;
- cdat->dstr_1377__CLASS_NREP_CONSU.discr =
+/*inistring dstr_1381__CLASS_NREP_CONSU*/
+ /*_.VALSTR___V1533*/ meltfptr[1532] =
+ (void *) &cdat->dstr_1381__CLASS_NREP_CONSU;
+ cdat->dstr_1381__CLASS_NREP_CONSU.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1377__CLASS_NREP_CONSU.val,
+ /*small inistring */ strncpy (cdat->dstr_1381__CLASS_NREP_CONSU.val,
"CLASS_NREP_CONSUME_VARIADIC",
- sizeof (cdat->dstr_1377__CLASS_NREP_CONSU.
+ sizeof (cdat->dstr_1381__CLASS_NREP_CONSU.
val) - 1);
- /*inirout drout_1378__PUTOBJDEST_OBJCOND */
- /*_.VALROUT___V1527*/ meltfptr[1526] =
- (void *) &cdat->drout_1378__PUTOBJDEST_OBJCOND;
- cdat->drout_1378__PUTOBJDEST_OBJCOND.discr =
+ /*inirout drout_1382__PUTOBJDEST_OBJCOND */
+ /*_.VALROUT___V1534*/ meltfptr[1533] =
+ (void *) &cdat->drout_1382__PUTOBJDEST_OBJCOND;
+ cdat->drout_1382__PUTOBJDEST_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1378__PUTOBJDEST_OBJCOND.routdescr,
- "PUTOBJDEST_OBJCOND @warmelt-genobj.melt:3957",
+ strncpy (cdat->drout_1382__PUTOBJDEST_OBJCOND.routdescr,
+ "PUTOBJDEST_OBJCOND @warmelt-genobj.melt:3981",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1378__PUTOBJDEST_OBJCOND.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1378__PUTOBJDEST_OBJCOND,
- meltrout_117_warmelt_genobj_PUTOBJDEST_OBJCOND);
-
- /*iniclos dclo_1379__PUTOBJDEST_OBJCOND */
- /*_.VALCLO___V1528*/ meltfptr[1527] =
- (void *) &cdat->dclo_1379__PUTOBJDEST_OBJCOND;
- cdat->dclo_1379__PUTOBJDEST_OBJCOND.discr =
+ cdat->drout_1382__PUTOBJDEST_OBJCOND.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1382__PUTOBJDEST_OBJCOND,
+ meltrout_118_warmelt_genobj_PUTOBJDEST_OBJCOND);
+
+ /*iniclos dclo_1383__PUTOBJDEST_OBJCOND */
+ /*_.VALCLO___V1535*/ meltfptr[1534] =
+ (void *) &cdat->dclo_1383__PUTOBJDEST_OBJCOND;
+ cdat->dclo_1383__PUTOBJDEST_OBJCOND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1379__PUTOBJDEST_OBJCOND.nbval = 0;
+ cdat->dclo_1383__PUTOBJDEST_OBJCOND.nbval = 0;
- /*inirout drout_1380__COMPILOBJ_NREP_CPPIF */
- /*_.VALROUT___V1529*/ meltfptr[1528] =
- (void *) &cdat->drout_1380__COMPILOBJ_NREP_CPPIF;
- cdat->drout_1380__COMPILOBJ_NREP_CPPIF.discr =
+ /*inirout drout_1384__COMPILOBJ_NREP_CPPIF */
+ /*_.VALROUT___V1536*/ meltfptr[1535] =
+ (void *) &cdat->drout_1384__COMPILOBJ_NREP_CPPIF;
+ cdat->drout_1384__COMPILOBJ_NREP_CPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1380__COMPILOBJ_NREP_CPPIF.routdescr,
- "COMPILOBJ_NREP_CPPIF @warmelt-genobj.melt:3974",
+ strncpy (cdat->drout_1384__COMPILOBJ_NREP_CPPIF.routdescr,
+ "COMPILOBJ_NREP_CPPIF @warmelt-genobj.melt:3998",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1380__COMPILOBJ_NREP_CPPIF.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1380__COMPILOBJ_NREP_CPPIF,
- meltrout_118_warmelt_genobj_COMPILOBJ_NREP_CPPIF);
-
- /*iniclos dclo_1381__COMPILOBJ_NREP_CPPIF */
- /*_.VALCLO___V1530*/ meltfptr[1529] =
- (void *) &cdat->dclo_1381__COMPILOBJ_NREP_CPPIF;
- cdat->dclo_1381__COMPILOBJ_NREP_CPPIF.discr =
+ cdat->drout_1384__COMPILOBJ_NREP_CPPIF.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1384__COMPILOBJ_NREP_CPPIF,
+ meltrout_119_warmelt_genobj_COMPILOBJ_NREP_CPPIF);
+
+ /*iniclos dclo_1385__COMPILOBJ_NREP_CPPIF */
+ /*_.VALCLO___V1537*/ meltfptr[1536] =
+ (void *) &cdat->dclo_1385__COMPILOBJ_NREP_CPPIF;
+ cdat->dclo_1385__COMPILOBJ_NREP_CPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1381__COMPILOBJ_NREP_CPPIF.nbval = 0;
+ cdat->dclo_1385__COMPILOBJ_NREP_CPPIF.nbval = 0;
-/*iniobj dsym_1382__CLASS_NREP_CPPIF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1531*/ meltfptr[1530])
- /*_.VALDATA___V1531*/
- meltfptr[1530] = (void *) &cdat->dsym_1382__CLASS_NREP_CPPIF;
+/*iniobj dsym_1386__CLASS_NREP_CPPIF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1538*/ meltfptr[1537])
+ /*_.VALDATA___V1538*/
+ meltfptr[1537] = (void *) &cdat->dsym_1386__CLASS_NREP_CPPIF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1382__CLASS_NREP_CPPIF",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1386__CLASS_NREP_CPPIF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1382__CLASS_NREP_CPPIF",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1386__CLASS_NREP_CPPIF",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1382__CLASS_NREP_CPPIF.meltobj_class =
+ cdat->dsym_1386__CLASS_NREP_CPPIF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1382__CLASS_NREP_CPPIF.obj_hash = 768655685;
- cdat->dsym_1382__CLASS_NREP_CPPIF.obj_len = 3;
+ cdat->dsym_1386__CLASS_NREP_CPPIF.obj_hash = 768655685;
+ cdat->dsym_1386__CLASS_NREP_CPPIF.obj_len = 3;
-/*inistring dstr_1383__CLASS_NREP_CPPIF*/
- /*_.VALSTR___V1532*/ meltfptr[1531] =
- (void *) &cdat->dstr_1383__CLASS_NREP_CPPIF;
- cdat->dstr_1383__CLASS_NREP_CPPIF.discr =
+/*inistring dstr_1387__CLASS_NREP_CPPIF*/
+ /*_.VALSTR___V1539*/ meltfptr[1538] =
+ (void *) &cdat->dstr_1387__CLASS_NREP_CPPIF;
+ cdat->dstr_1387__CLASS_NREP_CPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1383__CLASS_NREP_CPPIF.val,
+ /*small inistring */ strncpy (cdat->dstr_1387__CLASS_NREP_CPPIF.val,
"CLASS_NREP_CPPIF",
- sizeof (cdat->dstr_1383__CLASS_NREP_CPPIF.
+ sizeof (cdat->dstr_1387__CLASS_NREP_CPPIF.
val) - 1);
- /*inirout drout_1384__PUTOBJDEST_OBJCPPIF */
- /*_.VALROUT___V1533*/ meltfptr[1532] =
- (void *) &cdat->drout_1384__PUTOBJDEST_OBJCPPIF;
- cdat->drout_1384__PUTOBJDEST_OBJCPPIF.discr =
+ /*inirout drout_1388__PUTOBJDEST_OBJCPPIF */
+ /*_.VALROUT___V1540*/ meltfptr[1539] =
+ (void *) &cdat->drout_1388__PUTOBJDEST_OBJCPPIF;
+ cdat->drout_1388__PUTOBJDEST_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1384__PUTOBJDEST_OBJCPPIF.routdescr,
- "PUTOBJDEST_OBJCPPIF @warmelt-genobj.melt:4000",
+ strncpy (cdat->drout_1388__PUTOBJDEST_OBJCPPIF.routdescr,
+ "PUTOBJDEST_OBJCPPIF @warmelt-genobj.melt:4024",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1384__PUTOBJDEST_OBJCPPIF.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1384__PUTOBJDEST_OBJCPPIF,
- meltrout_119_warmelt_genobj_PUTOBJDEST_OBJCPPIF);
-
- /*iniclos dclo_1385__PUTOBJDEST_OBJCPPIF */
- /*_.VALCLO___V1534*/ meltfptr[1533] =
- (void *) &cdat->dclo_1385__PUTOBJDEST_OBJCPPIF;
- cdat->dclo_1385__PUTOBJDEST_OBJCPPIF.discr =
+ cdat->drout_1388__PUTOBJDEST_OBJCPPIF.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1388__PUTOBJDEST_OBJCPPIF,
+ meltrout_120_warmelt_genobj_PUTOBJDEST_OBJCPPIF);
+
+ /*iniclos dclo_1389__PUTOBJDEST_OBJCPPIF */
+ /*_.VALCLO___V1541*/ meltfptr[1540] =
+ (void *) &cdat->dclo_1389__PUTOBJDEST_OBJCPPIF;
+ cdat->dclo_1389__PUTOBJDEST_OBJCPPIF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1385__PUTOBJDEST_OBJCPPIF.nbval = 0;
+ cdat->dclo_1389__PUTOBJDEST_OBJCPPIF.nbval = 0;
- /*inirout drout_1386__COMPILOBJ_NREP_RETURN */
- /*_.VALROUT___V1535*/ meltfptr[1534] =
- (void *) &cdat->drout_1386__COMPILOBJ_NREP_RETURN;
- cdat->drout_1386__COMPILOBJ_NREP_RETURN.discr =
+ /*inirout drout_1390__COMPILOBJ_NREP_RETURN */
+ /*_.VALROUT___V1542*/ meltfptr[1541] =
+ (void *) &cdat->drout_1390__COMPILOBJ_NREP_RETURN;
+ cdat->drout_1390__COMPILOBJ_NREP_RETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1386__COMPILOBJ_NREP_RETURN.routdescr,
- "COMPILOBJ_NREP_RETURN @warmelt-genobj.melt:4017",
+ strncpy (cdat->drout_1390__COMPILOBJ_NREP_RETURN.routdescr,
+ "COMPILOBJ_NREP_RETURN @warmelt-genobj.melt:4041",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1386__COMPILOBJ_NREP_RETURN.nbval = 14;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1386__COMPILOBJ_NREP_RETURN,
- meltrout_120_warmelt_genobj_COMPILOBJ_NREP_RETURN);
-
- /*iniclos dclo_1387__COMPILOBJ_NREP_RETURN */
- /*_.VALCLO___V1537*/ meltfptr[1536] =
- (void *) &cdat->dclo_1387__COMPILOBJ_NREP_RETURN;
- cdat->dclo_1387__COMPILOBJ_NREP_RETURN.discr =
+ cdat->drout_1390__COMPILOBJ_NREP_RETURN.nbval = 14;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1390__COMPILOBJ_NREP_RETURN,
+ meltrout_121_warmelt_genobj_COMPILOBJ_NREP_RETURN);
+
+ /*iniclos dclo_1391__COMPILOBJ_NREP_RETURN */
+ /*_.VALCLO___V1544*/ meltfptr[1543] =
+ (void *) &cdat->dclo_1391__COMPILOBJ_NREP_RETURN;
+ cdat->dclo_1391__COMPILOBJ_NREP_RETURN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1387__COMPILOBJ_NREP_RETURN.nbval = 0;
+ cdat->dclo_1391__COMPILOBJ_NREP_RETURN.nbval = 0;
-/*iniobj dsym_1388__CLASS_NREP_RETURN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1538*/ meltfptr[1537])
- /*_.VALDATA___V1538*/
- meltfptr[1537] = (void *) &cdat->dsym_1388__CLASS_NREP_RETURN;
+/*iniobj dsym_1392__CLASS_NREP_RETURN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1545*/ meltfptr[1544])
+ /*_.VALDATA___V1545*/
+ meltfptr[1544] = (void *) &cdat->dsym_1392__CLASS_NREP_RETURN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1388__CLASS_NREP_RETURN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1392__CLASS_NREP_RETURN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1388__CLASS_NREP_RETURN",
+ ("iniobj check.discr objmagic dsym_1392__CLASS_NREP_RETURN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1388__CLASS_NREP_RETURN.meltobj_class =
+ cdat->dsym_1392__CLASS_NREP_RETURN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1388__CLASS_NREP_RETURN.obj_hash = 622944524;
- cdat->dsym_1388__CLASS_NREP_RETURN.obj_len = 3;
+ cdat->dsym_1392__CLASS_NREP_RETURN.obj_hash = 622944524;
+ cdat->dsym_1392__CLASS_NREP_RETURN.obj_len = 3;
-/*inistring dstr_1389__CLASS_NREP_RETUR*/
- /*_.VALSTR___V1539*/ meltfptr[1538] =
- (void *) &cdat->dstr_1389__CLASS_NREP_RETUR;
- cdat->dstr_1389__CLASS_NREP_RETUR.discr =
+/*inistring dstr_1393__CLASS_NREP_RETUR*/
+ /*_.VALSTR___V1546*/ meltfptr[1545] =
+ (void *) &cdat->dstr_1393__CLASS_NREP_RETUR;
+ cdat->dstr_1393__CLASS_NREP_RETUR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1389__CLASS_NREP_RETUR.val,
+ /*small inistring */ strncpy (cdat->dstr_1393__CLASS_NREP_RETUR.val,
"CLASS_NREP_RETURN",
- sizeof (cdat->dstr_1389__CLASS_NREP_RETUR.
+ sizeof (cdat->dstr_1393__CLASS_NREP_RETUR.
val) - 1);
- /*inirout drout_1390__LAMBDA_ */
- /*_.VALROUT___V1536*/ meltfptr[1535] = (void *) &cdat->drout_1390__LAMBDA_;
- cdat->drout_1390__LAMBDA_.discr =
+ /*inirout drout_1394__LAMBDA_ */
+ /*_.VALROUT___V1543*/ meltfptr[1542] = (void *) &cdat->drout_1394__LAMBDA_;
+ cdat->drout_1394__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1390__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4039", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1390__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1390__LAMBDA_,
- meltrout_121_warmelt_genobj_LAMBDA___36__);
-
- /*inirout drout_1391__LAMBDA_ */
- /*_.VALROUT___V1540*/ meltfptr[1539] = (void *) &cdat->drout_1391__LAMBDA_;
- cdat->drout_1391__LAMBDA_.discr =
+ strncpy (cdat->drout_1394__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4063", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1394__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1394__LAMBDA_,
+ meltrout_122_warmelt_genobj_LAMBDA___36__);
+
+ /*inirout drout_1395__LAMBDA_ */
+ /*_.VALROUT___V1547*/ meltfptr[1546] = (void *) &cdat->drout_1395__LAMBDA_;
+ cdat->drout_1395__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1391__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4057", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1391__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1391__LAMBDA_,
- meltrout_122_warmelt_genobj_LAMBDA___37__);
+ strncpy (cdat->drout_1395__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4081", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1395__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1395__LAMBDA_,
+ meltrout_123_warmelt_genobj_LAMBDA___37__);
-/*iniobj dsym_1392__DISCRCLOSURE_OBJPREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1541*/ meltfptr[1540])
- /*_.VALDATA___V1541*/
- meltfptr[1540] = (void *) &cdat->dsym_1392__DISCRCLOSURE_OBJPREDEF;
+/*iniobj dsym_1396__DISCRCLOSURE_OBJPREDEF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1548*/ meltfptr[1547])
+ /*_.VALDATA___V1548*/
+ meltfptr[1547] = (void *) &cdat->dsym_1396__DISCRCLOSURE_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1392__DISCRCLOSURE_OBJPREDEF",
+ ("iniobj check.discr isobj dsym_1396__DISCRCLOSURE_OBJPREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1392__DISCRCLOSURE_OBJPREDEF",
+ ("iniobj check.discr objmagic dsym_1396__DISCRCLOSURE_OBJPREDEF",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1392__DISCRCLOSURE_OBJPREDEF.meltobj_class =
+ cdat->dsym_1396__DISCRCLOSURE_OBJPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1392__DISCRCLOSURE_OBJPREDEF.obj_hash = 78252136;
- cdat->dsym_1392__DISCRCLOSURE_OBJPREDEF.obj_len = 3;
+ cdat->dsym_1396__DISCRCLOSURE_OBJPREDEF.obj_hash = 78252136;
+ cdat->dsym_1396__DISCRCLOSURE_OBJPREDEF.obj_len = 3;
-/*inistring dstr_1393__DISCRCLOSURE_OBJ*/
- /*_.VALSTR___V1542*/ meltfptr[1541] =
- (void *) &cdat->dstr_1393__DISCRCLOSURE_OBJ;
- cdat->dstr_1393__DISCRCLOSURE_OBJ.discr =
+/*inistring dstr_1397__DISCRCLOSURE_OBJ*/
+ /*_.VALSTR___V1549*/ meltfptr[1548] =
+ (void *) &cdat->dstr_1397__DISCRCLOSURE_OBJ;
+ cdat->dstr_1397__DISCRCLOSURE_OBJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1393__DISCRCLOSURE_OBJ.val,
+ /*small inistring */ strncpy (cdat->dstr_1397__DISCRCLOSURE_OBJ.val,
"DISCRCLOSURE_OBJPREDEF",
- sizeof (cdat->dstr_1393__DISCRCLOSURE_OBJ.
+ sizeof (cdat->dstr_1397__DISCRCLOSURE_OBJ.
val) - 1);
- MELT_LOCATION ("warmelt-genobj.melt:4059:/ iniobj");
+ MELT_LOCATION ("warmelt-genobj.melt:4083:/ iniobj");
-/*iniobj dobj_1394__DISCRCLOSURE_OBJPREDEF*/
-/*_.VALDATA___V1543*/ meltfptr[1542] =
- (void *) &cdat->dobj_1394__DISCRCLOSURE_OBJPREDEF;
+/*iniobj dobj_1398__DISCRCLOSURE_OBJPREDEF*/
+/*_.VALDATA___V1550*/ meltfptr[1549] =
+ (void *) &cdat->dobj_1398__DISCRCLOSURE_OBJPREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1394__DISCRCLOSURE_OBJPREDEF",
- melt_magic_discr ( /*_.VALDATA___V212*/ meltfptr[211]) ==
+ ("iniobj check.discr isobj dobj_1398__DISCRCLOSURE_OBJPREDEF",
+ melt_magic_discr ( /*_.VALDATA___V215*/ meltfptr[214]) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1394__DISCRCLOSURE_OBJPREDEF",
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->
+ ("iniobj check.discr objmagic dobj_1398__DISCRCLOSURE_OBJPREDEF",
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1394__DISCRCLOSURE_OBJPREDEF.meltobj_class =
- (meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]);
- cdat->dobj_1394__DISCRCLOSURE_OBJPREDEF.obj_hash = 404424371;
- cdat->dobj_1394__DISCRCLOSURE_OBJPREDEF.obj_len = 2;
+ cdat->dobj_1398__DISCRCLOSURE_OBJPREDEF.meltobj_class =
+ (meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]);
+ cdat->dobj_1398__DISCRCLOSURE_OBJPREDEF.obj_hash = 357521869;
+ cdat->dobj_1398__DISCRCLOSURE_OBJPREDEF.obj_len = 2;
-/*iniobj dsym_1395__DISCR_CLOSURE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1544*/ meltfptr[1543])
- /*_.VALDATA___V1544*/
- meltfptr[1543] = (void *) &cdat->dsym_1395__DISCR_CLOSURE;
+/*iniobj dsym_1399__DISCR_CLOSURE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1551*/ meltfptr[1550])
+ /*_.VALDATA___V1551*/
+ meltfptr[1550] = (void *) &cdat->dsym_1399__DISCR_CLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1395__DISCR_CLOSURE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1399__DISCR_CLOSURE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1395__DISCR_CLOSURE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1399__DISCR_CLOSURE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1395__DISCR_CLOSURE.meltobj_class =
+ cdat->dsym_1399__DISCR_CLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1395__DISCR_CLOSURE.obj_hash = 99248147;
- cdat->dsym_1395__DISCR_CLOSURE.obj_len = 3;
+ cdat->dsym_1399__DISCR_CLOSURE.obj_hash = 99248147;
+ cdat->dsym_1399__DISCR_CLOSURE.obj_len = 3;
-/*inistring dstr_1396__DISCR_CLOSURE*/
- /*_.VALSTR___V1545*/ meltfptr[1544] =
- (void *) &cdat->dstr_1396__DISCR_CLOSURE;
- cdat->dstr_1396__DISCR_CLOSURE.discr =
+/*inistring dstr_1400__DISCR_CLOSURE*/
+ /*_.VALSTR___V1552*/ meltfptr[1551] =
+ (void *) &cdat->dstr_1400__DISCR_CLOSURE;
+ cdat->dstr_1400__DISCR_CLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1396__DISCR_CLOSURE.val,
+ /*small inistring */ strncpy (cdat->dstr_1400__DISCR_CLOSURE.val,
"DISCR_CLOSURE",
- sizeof (cdat->dstr_1396__DISCR_CLOSURE.val) -
+ sizeof (cdat->dstr_1400__DISCR_CLOSURE.val) -
1);
- /*inirout drout_1397__COMPILOBJ_NREP_LAMBDA */
- /*_.VALROUT___V1546*/ meltfptr[1545] =
- (void *) &cdat->drout_1397__COMPILOBJ_NREP_LAMBDA;
- cdat->drout_1397__COMPILOBJ_NREP_LAMBDA.discr =
+ /*inirout drout_1401__COMPILOBJ_NREP_LAMBDA */
+ /*_.VALROUT___V1553*/ meltfptr[1552] =
+ (void *) &cdat->drout_1401__COMPILOBJ_NREP_LAMBDA;
+ cdat->drout_1401__COMPILOBJ_NREP_LAMBDA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1397__COMPILOBJ_NREP_LAMBDA.routdescr,
- "COMPILOBJ_NREP_LAMBDA @warmelt-genobj.melt:4065",
+ strncpy (cdat->drout_1401__COMPILOBJ_NREP_LAMBDA.routdescr,
+ "COMPILOBJ_NREP_LAMBDA @warmelt-genobj.melt:4089",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1397__COMPILOBJ_NREP_LAMBDA.nbval = 16;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1397__COMPILOBJ_NREP_LAMBDA,
- meltrout_123_warmelt_genobj_COMPILOBJ_NREP_LAMBDA);
-
- /*iniclos dclo_1398__COMPILOBJ_NREP_LAMBDA */
- /*_.VALCLO___V1548*/ meltfptr[1547] =
- (void *) &cdat->dclo_1398__COMPILOBJ_NREP_LAMBDA;
- cdat->dclo_1398__COMPILOBJ_NREP_LAMBDA.discr =
+ cdat->drout_1401__COMPILOBJ_NREP_LAMBDA.nbval = 16;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1401__COMPILOBJ_NREP_LAMBDA,
+ meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA);
+
+ /*iniclos dclo_1402__COMPILOBJ_NREP_LAMBDA */
+ /*_.VALCLO___V1555*/ meltfptr[1554] =
+ (void *) &cdat->dclo_1402__COMPILOBJ_NREP_LAMBDA;
+ cdat->dclo_1402__COMPILOBJ_NREP_LAMBDA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1398__COMPILOBJ_NREP_LAMBDA.nbval = 0;
+ cdat->dclo_1402__COMPILOBJ_NREP_LAMBDA.nbval = 0;
-/*iniobj dsym_1399__CLASS_NREP_LAMBDA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1549*/ meltfptr[1548])
- /*_.VALDATA___V1549*/
- meltfptr[1548] = (void *) &cdat->dsym_1399__CLASS_NREP_LAMBDA;
+/*iniobj dsym_1403__CLASS_NREP_LAMBDA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1556*/ meltfptr[1555])
+ /*_.VALDATA___V1556*/
+ meltfptr[1555] = (void *) &cdat->dsym_1403__CLASS_NREP_LAMBDA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1399__CLASS_NREP_LAMBDA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1403__CLASS_NREP_LAMBDA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1399__CLASS_NREP_LAMBDA",
+ ("iniobj check.discr objmagic dsym_1403__CLASS_NREP_LAMBDA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1399__CLASS_NREP_LAMBDA.meltobj_class =
+ cdat->dsym_1403__CLASS_NREP_LAMBDA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1399__CLASS_NREP_LAMBDA.obj_hash = 16774872;
- cdat->dsym_1399__CLASS_NREP_LAMBDA.obj_len = 3;
+ cdat->dsym_1403__CLASS_NREP_LAMBDA.obj_hash = 16774872;
+ cdat->dsym_1403__CLASS_NREP_LAMBDA.obj_len = 3;
-/*inistring dstr_1400__CLASS_NREP_LAMBD*/
- /*_.VALSTR___V1550*/ meltfptr[1549] =
- (void *) &cdat->dstr_1400__CLASS_NREP_LAMBD;
- cdat->dstr_1400__CLASS_NREP_LAMBD.discr =
+/*inistring dstr_1404__CLASS_NREP_LAMBD*/
+ /*_.VALSTR___V1557*/ meltfptr[1556] =
+ (void *) &cdat->dstr_1404__CLASS_NREP_LAMBD;
+ cdat->dstr_1404__CLASS_NREP_LAMBD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1400__CLASS_NREP_LAMBD.val,
+ /*small inistring */ strncpy (cdat->dstr_1404__CLASS_NREP_LAMBD.val,
"CLASS_NREP_LAMBDA",
- sizeof (cdat->dstr_1400__CLASS_NREP_LAMBD.
+ sizeof (cdat->dstr_1404__CLASS_NREP_LAMBD.
val) - 1);
- /*inirout drout_1401__LAMBDA_ */
- /*_.VALROUT___V1547*/ meltfptr[1546] = (void *) &cdat->drout_1401__LAMBDA_;
- cdat->drout_1401__LAMBDA_.discr =
+ /*inirout drout_1405__LAMBDA_ */
+ /*_.VALROUT___V1554*/ meltfptr[1553] = (void *) &cdat->drout_1405__LAMBDA_;
+ cdat->drout_1405__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1401__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4101", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1401__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1401__LAMBDA_,
- meltrout_124_warmelt_genobj_LAMBDA___38__);
-
- /*inirout drout_1402__COMPILOBJ_NREP_MAKEINST */
- /*_.VALROUT___V1551*/ meltfptr[1550] =
- (void *) &cdat->drout_1402__COMPILOBJ_NREP_MAKEINST;
- cdat->drout_1402__COMPILOBJ_NREP_MAKEINST.discr =
+ strncpy (cdat->drout_1405__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4125", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1405__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1405__LAMBDA_,
+ meltrout_125_warmelt_genobj_LAMBDA___38__);
+
+ /*inirout drout_1406__COMPILOBJ_NREP_MAKEINST */
+ /*_.VALROUT___V1558*/ meltfptr[1557] =
+ (void *) &cdat->drout_1406__COMPILOBJ_NREP_MAKEINST;
+ cdat->drout_1406__COMPILOBJ_NREP_MAKEINST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1402__COMPILOBJ_NREP_MAKEINST.routdescr,
- "COMPILOBJ_NREP_MAKEINST @warmelt-genobj.melt:4117",
+ strncpy (cdat->drout_1406__COMPILOBJ_NREP_MAKEINST.routdescr,
+ "COMPILOBJ_NREP_MAKEINST @warmelt-genobj.melt:4141",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1402__COMPILOBJ_NREP_MAKEINST.nbval = 19;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1402__COMPILOBJ_NREP_MAKEINST,
- meltrout_125_warmelt_genobj_COMPILOBJ_NREP_MAKEINST);
-
- /*iniclos dclo_1403__COMPILOBJ_NREP_MAKEINST */
- /*_.VALCLO___V1555*/ meltfptr[1554] =
- (void *) &cdat->dclo_1403__COMPILOBJ_NREP_MAKEINST;
- cdat->dclo_1403__COMPILOBJ_NREP_MAKEINST.discr =
+ cdat->drout_1406__COMPILOBJ_NREP_MAKEINST.nbval = 19;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1406__COMPILOBJ_NREP_MAKEINST,
+ meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST);
+
+ /*iniclos dclo_1407__COMPILOBJ_NREP_MAKEINST */
+ /*_.VALCLO___V1562*/ meltfptr[1561] =
+ (void *) &cdat->dclo_1407__COMPILOBJ_NREP_MAKEINST;
+ cdat->dclo_1407__COMPILOBJ_NREP_MAKEINST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1403__COMPILOBJ_NREP_MAKEINST.nbval = 0;
+ cdat->dclo_1407__COMPILOBJ_NREP_MAKEINST.nbval = 0;
-/*iniobj dsym_1404__CLASS_NREP_INSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1556*/ meltfptr[1555])
- /*_.VALDATA___V1556*/
- meltfptr[1555] = (void *) &cdat->dsym_1404__CLASS_NREP_INSTANCE;
+/*iniobj dsym_1408__CLASS_NREP_INSTANCE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1563*/ meltfptr[1562])
+ /*_.VALDATA___V1563*/
+ meltfptr[1562] = (void *) &cdat->dsym_1408__CLASS_NREP_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1404__CLASS_NREP_INSTANCE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1408__CLASS_NREP_INSTANCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1404__CLASS_NREP_INSTANCE",
+ ("iniobj check.discr objmagic dsym_1408__CLASS_NREP_INSTANCE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1404__CLASS_NREP_INSTANCE.meltobj_class =
+ cdat->dsym_1408__CLASS_NREP_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1404__CLASS_NREP_INSTANCE.obj_hash = 832794532;
- cdat->dsym_1404__CLASS_NREP_INSTANCE.obj_len = 3;
+ cdat->dsym_1408__CLASS_NREP_INSTANCE.obj_hash = 832794532;
+ cdat->dsym_1408__CLASS_NREP_INSTANCE.obj_len = 3;
-/*inistring dstr_1405__CLASS_NREP_INSTA*/
- /*_.VALSTR___V1557*/ meltfptr[1556] =
- (void *) &cdat->dstr_1405__CLASS_NREP_INSTA;
- cdat->dstr_1405__CLASS_NREP_INSTA.discr =
+/*inistring dstr_1409__CLASS_NREP_INSTA*/
+ /*_.VALSTR___V1564*/ meltfptr[1563] =
+ (void *) &cdat->dstr_1409__CLASS_NREP_INSTA;
+ cdat->dstr_1409__CLASS_NREP_INSTA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1405__CLASS_NREP_INSTA.val,
+ /*small inistring */ strncpy (cdat->dstr_1409__CLASS_NREP_INSTA.val,
"CLASS_NREP_INSTANCE",
- sizeof (cdat->dstr_1405__CLASS_NREP_INSTA.
+ sizeof (cdat->dstr_1409__CLASS_NREP_INSTA.
val) - 1);
-/*iniobj dsym_1406__INST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1552*/ meltfptr[1551])
- /*_.VALDATA___V1552*/
- meltfptr[1551] = (void *) &cdat->dsym_1406__INST;
+/*iniobj dsym_1410__INST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1559*/ meltfptr[1558])
+ /*_.VALDATA___V1559*/
+ meltfptr[1558] = (void *) &cdat->dsym_1410__INST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1406__INST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1410__INST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1406__INST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1410__INST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1406__INST.meltobj_class =
+ cdat->dsym_1410__INST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1406__INST.obj_hash = 36500330;
- cdat->dsym_1406__INST.obj_len = 3;
+ cdat->dsym_1410__INST.obj_hash = 36500330;
+ cdat->dsym_1410__INST.obj_len = 3;
-/*inistring dstr_1407__INST*/
- /*_.VALSTR___V1553*/ meltfptr[1552] = (void *) &cdat->dstr_1407__INST;
- cdat->dstr_1407__INST.discr =
+/*inistring dstr_1411__INST*/
+ /*_.VALSTR___V1560*/ meltfptr[1559] = (void *) &cdat->dstr_1411__INST;
+ cdat->dstr_1411__INST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1407__INST.val, "INST",
- sizeof (cdat->dstr_1407__INST.val) - 1);
- /*inirout drout_1408__LAMBDA_ */
- /*_.VALROUT___V1554*/ meltfptr[1553] = (void *) &cdat->drout_1408__LAMBDA_;
- cdat->drout_1408__LAMBDA_.discr =
+ /*small inistring */ strncpy (cdat->dstr_1411__INST.val, "INST",
+ sizeof (cdat->dstr_1411__INST.val) - 1);
+ /*inirout drout_1412__LAMBDA_ */
+ /*_.VALROUT___V1561*/ meltfptr[1560] = (void *) &cdat->drout_1412__LAMBDA_;
+ cdat->drout_1412__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1408__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4147", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1408__LAMBDA_.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1408__LAMBDA_,
- meltrout_126_warmelt_genobj_LAMBDA___39__);
-
- /*inirout drout_1409__COMPILOBJ_ROUTPROC */
- /*_.VALROUT___V1558*/ meltfptr[1557] =
- (void *) &cdat->drout_1409__COMPILOBJ_ROUTPROC;
- cdat->drout_1409__COMPILOBJ_ROUTPROC.discr =
+ strncpy (cdat->drout_1412__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4171", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1412__LAMBDA_.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1412__LAMBDA_,
+ meltrout_127_warmelt_genobj_LAMBDA___39__);
+
+ /*inirout drout_1413__COMPILOBJ_ROUTPROC */
+ /*_.VALROUT___V1565*/ meltfptr[1564] =
+ (void *) &cdat->drout_1413__COMPILOBJ_ROUTPROC;
+ cdat->drout_1413__COMPILOBJ_ROUTPROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1409__COMPILOBJ_ROUTPROC.routdescr,
- "COMPILOBJ_ROUTPROC @warmelt-genobj.melt:4174",
+ strncpy (cdat->drout_1413__COMPILOBJ_ROUTPROC.routdescr,
+ "COMPILOBJ_ROUTPROC @warmelt-genobj.melt:4198",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1409__COMPILOBJ_ROUTPROC.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1409__COMPILOBJ_ROUTPROC,
- meltrout_127_warmelt_genobj_COMPILOBJ_ROUTPROC);
-
- /*iniclos dclo_1410__COMPILOBJ_ROUTPROC */
- /*_.VALCLO___V1559*/ meltfptr[1558] =
- (void *) &cdat->dclo_1410__COMPILOBJ_ROUTPROC;
- cdat->dclo_1410__COMPILOBJ_ROUTPROC.discr =
+ cdat->drout_1413__COMPILOBJ_ROUTPROC.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1413__COMPILOBJ_ROUTPROC,
+ meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC);
+
+ /*iniclos dclo_1414__COMPILOBJ_ROUTPROC */
+ /*_.VALCLO___V1566*/ meltfptr[1565] =
+ (void *) &cdat->dclo_1414__COMPILOBJ_ROUTPROC;
+ cdat->dclo_1414__COMPILOBJ_ROUTPROC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1410__COMPILOBJ_ROUTPROC.nbval = 0;
+ cdat->dclo_1414__COMPILOBJ_ROUTPROC.nbval = 0;
- /*inirout drout_1411__COMPILOBJ_PREDEF */
- /*_.VALROUT___V1560*/ meltfptr[1559] =
- (void *) &cdat->drout_1411__COMPILOBJ_PREDEF;
- cdat->drout_1411__COMPILOBJ_PREDEF.discr =
+ /*inirout drout_1415__COMPILOBJ_PREDEF */
+ /*_.VALROUT___V1567*/ meltfptr[1566] =
+ (void *) &cdat->drout_1415__COMPILOBJ_PREDEF;
+ cdat->drout_1415__COMPILOBJ_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1411__COMPILOBJ_PREDEF.routdescr,
- "COMPILOBJ_PREDEF @warmelt-genobj.melt:4183",
+ strncpy (cdat->drout_1415__COMPILOBJ_PREDEF.routdescr,
+ "COMPILOBJ_PREDEF @warmelt-genobj.melt:4207",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1411__COMPILOBJ_PREDEF.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1411__COMPILOBJ_PREDEF,
- meltrout_128_warmelt_genobj_COMPILOBJ_PREDEF);
-
- /*iniclos dclo_1412__COMPILOBJ_PREDEF */
- /*_.VALCLO___V1561*/ meltfptr[1560] =
- (void *) &cdat->dclo_1412__COMPILOBJ_PREDEF;
- cdat->dclo_1412__COMPILOBJ_PREDEF.discr =
+ cdat->drout_1415__COMPILOBJ_PREDEF.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1415__COMPILOBJ_PREDEF,
+ meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF);
+
+ /*iniclos dclo_1416__COMPILOBJ_PREDEF */
+ /*_.VALCLO___V1568*/ meltfptr[1567] =
+ (void *) &cdat->dclo_1416__COMPILOBJ_PREDEF;
+ cdat->dclo_1416__COMPILOBJ_PREDEF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1412__COMPILOBJ_PREDEF.nbval = 0;
+ cdat->dclo_1416__COMPILOBJ_PREDEF.nbval = 0;
-/*iniobj dsym_1413__CLASS_NREP_PREDEF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1562*/ meltfptr[1561])
- /*_.VALDATA___V1562*/
- meltfptr[1561] = (void *) &cdat->dsym_1413__CLASS_NREP_PREDEF;
+/*iniobj dsym_1417__CLASS_NREP_PREDEF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1569*/ meltfptr[1568])
+ /*_.VALDATA___V1569*/
+ meltfptr[1568] = (void *) &cdat->dsym_1417__CLASS_NREP_PREDEF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1413__CLASS_NREP_PREDEF",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1417__CLASS_NREP_PREDEF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1413__CLASS_NREP_PREDEF",
+ ("iniobj check.discr objmagic dsym_1417__CLASS_NREP_PREDEF",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1413__CLASS_NREP_PREDEF.meltobj_class =
+ cdat->dsym_1417__CLASS_NREP_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1413__CLASS_NREP_PREDEF.obj_hash = 422259469;
- cdat->dsym_1413__CLASS_NREP_PREDEF.obj_len = 3;
+ cdat->dsym_1417__CLASS_NREP_PREDEF.obj_hash = 422259469;
+ cdat->dsym_1417__CLASS_NREP_PREDEF.obj_len = 3;
-/*inistring dstr_1414__CLASS_NREP_PREDE*/
- /*_.VALSTR___V1563*/ meltfptr[1562] =
- (void *) &cdat->dstr_1414__CLASS_NREP_PREDE;
- cdat->dstr_1414__CLASS_NREP_PREDE.discr =
+/*inistring dstr_1418__CLASS_NREP_PREDE*/
+ /*_.VALSTR___V1570*/ meltfptr[1569] =
+ (void *) &cdat->dstr_1418__CLASS_NREP_PREDE;
+ cdat->dstr_1418__CLASS_NREP_PREDE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1414__CLASS_NREP_PREDE.val,
+ /*small inistring */ strncpy (cdat->dstr_1418__CLASS_NREP_PREDE.val,
"CLASS_NREP_PREDEF",
- sizeof (cdat->dstr_1414__CLASS_NREP_PREDE.
+ sizeof (cdat->dstr_1418__CLASS_NREP_PREDE.
val) - 1);
- /*inirout drout_1415__COMPIL_DATA_AND_SLOTS_FILL */
- /*_.VALROUT___V1564*/ meltfptr[1563] =
- (void *) &cdat->drout_1415__COMPIL_DATA_AND_SLOTS_FILL;
- cdat->drout_1415__COMPIL_DATA_AND_SLOTS_FILL.discr =
+ /*inirout drout_1419__COMPIL_DATA_AND_SLOTS_FILL */
+ /*_.VALROUT___V1571*/ meltfptr[1570] =
+ (void *) &cdat->drout_1419__COMPIL_DATA_AND_SLOTS_FILL;
+ cdat->drout_1419__COMPIL_DATA_AND_SLOTS_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1415__COMPIL_DATA_AND_SLOTS_FILL.routdescr,
- "COMPIL_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4199",
+ strncpy (cdat->drout_1419__COMPIL_DATA_AND_SLOTS_FILL.routdescr,
+ "COMPIL_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4223",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1415__COMPIL_DATA_AND_SLOTS_FILL.nbval = 32;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1415__COMPIL_DATA_AND_SLOTS_FILL,
- meltrout_129_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL);
-
- /*iniclos dclo_1416__COMPIL_DATA_AND_SLOTS_FILL */
- /*_.VALCLO___V1573*/ meltfptr[1572] =
- (void *) &cdat->dclo_1416__COMPIL_DATA_AND_SLOTS_FILL;
- cdat->dclo_1416__COMPIL_DATA_AND_SLOTS_FILL.discr =
+ cdat->drout_1419__COMPIL_DATA_AND_SLOTS_FILL.nbval = 32;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1419__COMPIL_DATA_AND_SLOTS_FILL,
+ meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL);
+
+ /*iniclos dclo_1420__COMPIL_DATA_AND_SLOTS_FILL */
+ /*_.VALCLO___V1580*/ meltfptr[1579] =
+ (void *) &cdat->dclo_1420__COMPIL_DATA_AND_SLOTS_FILL;
+ cdat->dclo_1420__COMPIL_DATA_AND_SLOTS_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1416__COMPIL_DATA_AND_SLOTS_FILL.nbval = 0;
+ cdat->dclo_1420__COMPIL_DATA_AND_SLOTS_FILL.nbval = 0;
-/*iniobj dsym_1417__VALDATA_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1565*/ meltfptr[1564])
- /*_.VALDATA___V1565*/
- meltfptr[1564] = (void *) &cdat->dsym_1417__VALDATA_;
+/*iniobj dsym_1421__VALDATA_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1572*/ meltfptr[1571])
+ /*_.VALDATA___V1572*/
+ meltfptr[1571] = (void *) &cdat->dsym_1421__VALDATA_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1417__VALDATA_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1421__VALDATA_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1417__VALDATA_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1421__VALDATA_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1417__VALDATA_.meltobj_class =
+ cdat->dsym_1421__VALDATA_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1417__VALDATA_.obj_hash = 49606842;
- cdat->dsym_1417__VALDATA_.obj_len = 3;
+ cdat->dsym_1421__VALDATA_.obj_hash = 49606842;
+ cdat->dsym_1421__VALDATA_.obj_len = 3;
-/*inistring dstr_1418__VALDATA_*/
- /*_.VALSTR___V1566*/ meltfptr[1565] = (void *) &cdat->dstr_1418__VALDATA_;
- cdat->dstr_1418__VALDATA_.discr =
+/*inistring dstr_1422__VALDATA_*/
+ /*_.VALSTR___V1573*/ meltfptr[1572] = (void *) &cdat->dstr_1422__VALDATA_;
+ cdat->dstr_1422__VALDATA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1418__VALDATA_.val, "_VALDATA_",
- sizeof (cdat->dstr_1418__VALDATA_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1422__VALDATA_.val, "_VALDATA_",
+ sizeof (cdat->dstr_1422__VALDATA_.val) - 1);
-/*iniobj dsym_1419__VALUEDATA_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1567*/ meltfptr[1566])
- /*_.VALDATA___V1567*/
- meltfptr[1566] = (void *) &cdat->dsym_1419__VALUEDATA_;
+/*iniobj dsym_1423__VALUEDATA_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1574*/ meltfptr[1573])
+ /*_.VALDATA___V1574*/
+ meltfptr[1573] = (void *) &cdat->dsym_1423__VALUEDATA_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1419__VALUEDATA_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1423__VALUEDATA_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1419__VALUEDATA_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1423__VALUEDATA_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1419__VALUEDATA_.meltobj_class =
+ cdat->dsym_1423__VALUEDATA_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1419__VALUEDATA_.obj_hash = 46272601;
- cdat->dsym_1419__VALUEDATA_.obj_len = 3;
+ cdat->dsym_1423__VALUEDATA_.obj_hash = 46272601;
+ cdat->dsym_1423__VALUEDATA_.obj_len = 3;
-/*inistring dstr_1420__VALUEDATA_*/
- /*_.VALSTR___V1568*/ meltfptr[1567] = (void *) &cdat->dstr_1420__VALUEDATA_;
- cdat->dstr_1420__VALUEDATA_.discr =
+/*inistring dstr_1424__VALUEDATA_*/
+ /*_.VALSTR___V1575*/ meltfptr[1574] = (void *) &cdat->dstr_1424__VALUEDATA_;
+ cdat->dstr_1424__VALUEDATA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1420__VALUEDATA_.val,
+ /*small inistring */ strncpy (cdat->dstr_1424__VALUEDATA_.val,
"_VALUEDATA_",
- sizeof (cdat->dstr_1420__VALUEDATA_.val) - 1);
+ sizeof (cdat->dstr_1424__VALUEDATA_.val) - 1);
-/*inistring dstr_1421__fill_predef_slot*/
- /*_.VALSTR___V1569*/ meltfptr[1568] =
- (void *) &cdat->dstr_1421__fill_predef_slot;
- cdat->dstr_1421__fill_predef_slot.discr =
+/*inistring dstr_1425__fill_predef_slot*/
+ /*_.VALSTR___V1576*/ meltfptr[1575] =
+ (void *) &cdat->dstr_1425__fill_predef_slot;
+ cdat->dstr_1425__fill_predef_slot.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1421__fill_predef_slot.val,
+ /*small inistring */ strncpy (cdat->dstr_1425__fill_predef_slot.val,
"fill predef slots",
- sizeof (cdat->dstr_1421__fill_predef_slot.
+ sizeof (cdat->dstr_1425__fill_predef_slot.
val) - 1);
- /*inirout drout_1422__LAMBDA_ */
- /*_.VALROUT___V1570*/ meltfptr[1569] = (void *) &cdat->drout_1422__LAMBDA_;
- cdat->drout_1422__LAMBDA_.discr =
+ /*inirout drout_1426__LAMBDA_ */
+ /*_.VALROUT___V1577*/ meltfptr[1576] = (void *) &cdat->drout_1426__LAMBDA_;
+ cdat->drout_1426__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1422__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4270", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1422__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1422__LAMBDA_,
- meltrout_130_warmelt_genobj_LAMBDA___40__);
-
- /*inirout drout_1423__LAMBDA_ */
- /*_.VALROUT___V1571*/ meltfptr[1570] = (void *) &cdat->drout_1423__LAMBDA_;
- cdat->drout_1423__LAMBDA_.discr =
+ strncpy (cdat->drout_1426__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4294", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1426__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1426__LAMBDA_,
+ meltrout_131_warmelt_genobj_LAMBDA___40__);
+
+ /*inirout drout_1427__LAMBDA_ */
+ /*_.VALROUT___V1578*/ meltfptr[1577] = (void *) &cdat->drout_1427__LAMBDA_;
+ cdat->drout_1427__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1423__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4288", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1423__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1423__LAMBDA_,
- meltrout_131_warmelt_genobj_LAMBDA___41__);
-
- /*inirout drout_1424__LAMBDA_ */
- /*_.VALROUT___V1572*/ meltfptr[1571] = (void *) &cdat->drout_1424__LAMBDA_;
- cdat->drout_1424__LAMBDA_.discr =
+ strncpy (cdat->drout_1427__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4312", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1427__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1427__LAMBDA_,
+ meltrout_132_warmelt_genobj_LAMBDA___41__);
+
+ /*inirout drout_1428__LAMBDA_ */
+ /*_.VALROUT___V1579*/ meltfptr[1578] = (void *) &cdat->drout_1428__LAMBDA_;
+ cdat->drout_1428__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1424__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4315", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1424__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1424__LAMBDA_,
- meltrout_132_warmelt_genobj_LAMBDA___42__);
-
- /*inirout drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
- /*_.VALROUT___V1574*/ meltfptr[1573] =
- (void *) &cdat->drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
- cdat->drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr =
+ strncpy (cdat->drout_1428__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4339", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1428__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1428__LAMBDA_,
+ meltrout_133_warmelt_genobj_LAMBDA___42__);
+
+ /*inirout drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
+ /*_.VALROUT___V1581*/ meltfptr[1580] =
+ (void *) &cdat->drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
+ cdat->drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.
+ strncpy (cdat->drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.
routdescr,
- "DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4337",
+ "DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4361",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 5;
+ cdat->drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL,
- meltrout_133_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL);
+ drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL,
+ meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL);
- /*iniclos dclo_1426__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
- /*_.VALCLO___V1576*/ meltfptr[1575] =
- (void *) &cdat->dclo_1426__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
- cdat->dclo_1426__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr =
+ /*iniclos dclo_1430__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */
+ /*_.VALCLO___V1583*/ meltfptr[1582] =
+ (void *) &cdat->dclo_1430__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL;
+ cdat->dclo_1430__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1426__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 0;
+ cdat->dclo_1430__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 0;
- /*inirout drout_1427__LAMBDA_ */
- /*_.VALROUT___V1575*/ meltfptr[1574] = (void *) &cdat->drout_1427__LAMBDA_;
- cdat->drout_1427__LAMBDA_.discr =
+ /*inirout drout_1431__LAMBDA_ */
+ /*_.VALROUT___V1582*/ meltfptr[1581] = (void *) &cdat->drout_1431__LAMBDA_;
+ cdat->drout_1431__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1427__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4342", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1427__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1427__LAMBDA_,
- meltrout_134_warmelt_genobj_LAMBDA___43__);
-
- /*inirout drout_1428__COMPILOBJ_DATASYMBOL */
- /*_.VALROUT___V1577*/ meltfptr[1576] =
- (void *) &cdat->drout_1428__COMPILOBJ_DATASYMBOL;
- cdat->drout_1428__COMPILOBJ_DATASYMBOL.discr =
+ strncpy (cdat->drout_1431__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4366", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1431__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1431__LAMBDA_,
+ meltrout_135_warmelt_genobj_LAMBDA___43__);
+
+ /*inirout drout_1432__COMPILOBJ_DATASYMBOL */
+ /*_.VALROUT___V1584*/ meltfptr[1583] =
+ (void *) &cdat->drout_1432__COMPILOBJ_DATASYMBOL;
+ cdat->drout_1432__COMPILOBJ_DATASYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1428__COMPILOBJ_DATASYMBOL.routdescr,
- "COMPILOBJ_DATASYMBOL @warmelt-genobj.melt:4345",
+ strncpy (cdat->drout_1432__COMPILOBJ_DATASYMBOL.routdescr,
+ "COMPILOBJ_DATASYMBOL @warmelt-genobj.melt:4369",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1428__COMPILOBJ_DATASYMBOL.nbval = 10;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1428__COMPILOBJ_DATASYMBOL,
- meltrout_135_warmelt_genobj_COMPILOBJ_DATASYMBOL);
-
- /*iniclos dclo_1429__COMPILOBJ_DATASYMBOL */
- /*_.VALCLO___V1578*/ meltfptr[1577] =
- (void *) &cdat->dclo_1429__COMPILOBJ_DATASYMBOL;
- cdat->dclo_1429__COMPILOBJ_DATASYMBOL.discr =
+ cdat->drout_1432__COMPILOBJ_DATASYMBOL.nbval = 10;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1432__COMPILOBJ_DATASYMBOL,
+ meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL);
+
+ /*iniclos dclo_1433__COMPILOBJ_DATASYMBOL */
+ /*_.VALCLO___V1585*/ meltfptr[1584] =
+ (void *) &cdat->dclo_1433__COMPILOBJ_DATASYMBOL;
+ cdat->dclo_1433__COMPILOBJ_DATASYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1429__COMPILOBJ_DATASYMBOL.nbval = 0;
+ cdat->dclo_1433__COMPILOBJ_DATASYMBOL.nbval = 0;
- /*inirout drout_1430__COMPILOBJ_DATAINSTANCE */
- /*_.VALROUT___V1579*/ meltfptr[1578] =
- (void *) &cdat->drout_1430__COMPILOBJ_DATAINSTANCE;
- cdat->drout_1430__COMPILOBJ_DATAINSTANCE.discr =
+ /*inirout drout_1434__COMPILOBJ_DATAINSTANCE */
+ /*_.VALROUT___V1586*/ meltfptr[1585] =
+ (void *) &cdat->drout_1434__COMPILOBJ_DATAINSTANCE;
+ cdat->drout_1434__COMPILOBJ_DATAINSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1430__COMPILOBJ_DATAINSTANCE.routdescr,
- "COMPILOBJ_DATAINSTANCE @warmelt-genobj.melt:4396",
+ strncpy (cdat->drout_1434__COMPILOBJ_DATAINSTANCE.routdescr,
+ "COMPILOBJ_DATAINSTANCE @warmelt-genobj.melt:4420",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1430__COMPILOBJ_DATAINSTANCE.nbval = 10;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1430__COMPILOBJ_DATAINSTANCE,
- meltrout_136_warmelt_genobj_COMPILOBJ_DATAINSTANCE);
-
- /*iniclos dclo_1431__COMPILOBJ_DATAINSTANCE */
- /*_.VALCLO___V1580*/ meltfptr[1579] =
- (void *) &cdat->dclo_1431__COMPILOBJ_DATAINSTANCE;
- cdat->dclo_1431__COMPILOBJ_DATAINSTANCE.discr =
+ cdat->drout_1434__COMPILOBJ_DATAINSTANCE.nbval = 10;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1434__COMPILOBJ_DATAINSTANCE,
+ meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE);
+
+ /*iniclos dclo_1435__COMPILOBJ_DATAINSTANCE */
+ /*_.VALCLO___V1587*/ meltfptr[1586] =
+ (void *) &cdat->dclo_1435__COMPILOBJ_DATAINSTANCE;
+ cdat->dclo_1435__COMPILOBJ_DATAINSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1431__COMPILOBJ_DATAINSTANCE.nbval = 0;
+ cdat->dclo_1435__COMPILOBJ_DATAINSTANCE.nbval = 0;
- /*inirout drout_1432__COMPILOBJ_DATATUPLE */
- /*_.VALROUT___V1581*/ meltfptr[1580] =
- (void *) &cdat->drout_1432__COMPILOBJ_DATATUPLE;
- cdat->drout_1432__COMPILOBJ_DATATUPLE.discr =
+ /*inirout drout_1436__COMPILOBJ_DATATUPLE */
+ /*_.VALROUT___V1588*/ meltfptr[1587] =
+ (void *) &cdat->drout_1436__COMPILOBJ_DATATUPLE;
+ cdat->drout_1436__COMPILOBJ_DATATUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1432__COMPILOBJ_DATATUPLE.routdescr,
- "COMPILOBJ_DATATUPLE @warmelt-genobj.melt:4473",
+ strncpy (cdat->drout_1436__COMPILOBJ_DATATUPLE.routdescr,
+ "COMPILOBJ_DATATUPLE @warmelt-genobj.melt:4497",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1432__COMPILOBJ_DATATUPLE.nbval = 20;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1432__COMPILOBJ_DATATUPLE,
- meltrout_137_warmelt_genobj_COMPILOBJ_DATATUPLE);
-
- /*iniclos dclo_1433__COMPILOBJ_DATATUPLE */
- /*_.VALCLO___V1588*/ meltfptr[1587] =
- (void *) &cdat->dclo_1433__COMPILOBJ_DATATUPLE;
- cdat->dclo_1433__COMPILOBJ_DATATUPLE.discr =
+ cdat->drout_1436__COMPILOBJ_DATATUPLE.nbval = 20;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1436__COMPILOBJ_DATATUPLE,
+ meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE);
+
+ /*iniclos dclo_1437__COMPILOBJ_DATATUPLE */
+ /*_.VALCLO___V1595*/ meltfptr[1594] =
+ (void *) &cdat->dclo_1437__COMPILOBJ_DATATUPLE;
+ cdat->dclo_1437__COMPILOBJ_DATATUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1433__COMPILOBJ_DATATUPLE.nbval = 0;
+ cdat->dclo_1437__COMPILOBJ_DATATUPLE.nbval = 0;
-/*iniobj dsym_1434__CLASS_NREP_DATATUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1589*/ meltfptr[1588])
- /*_.VALDATA___V1589*/
- meltfptr[1588] = (void *) &cdat->dsym_1434__CLASS_NREP_DATATUPLE;
+/*iniobj dsym_1438__CLASS_NREP_DATATUPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1596*/ meltfptr[1595])
+ /*_.VALDATA___V1596*/
+ meltfptr[1595] = (void *) &cdat->dsym_1438__CLASS_NREP_DATATUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1434__CLASS_NREP_DATATUPLE",
+ ("iniobj check.discr isobj dsym_1438__CLASS_NREP_DATATUPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1434__CLASS_NREP_DATATUPLE",
+ ("iniobj check.discr objmagic dsym_1438__CLASS_NREP_DATATUPLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1434__CLASS_NREP_DATATUPLE.meltobj_class =
+ cdat->dsym_1438__CLASS_NREP_DATATUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1434__CLASS_NREP_DATATUPLE.obj_hash = 100529129;
- cdat->dsym_1434__CLASS_NREP_DATATUPLE.obj_len = 3;
+ cdat->dsym_1438__CLASS_NREP_DATATUPLE.obj_hash = 100529129;
+ cdat->dsym_1438__CLASS_NREP_DATATUPLE.obj_len = 3;
-/*inistring dstr_1435__CLASS_NREP_DATAT*/
- /*_.VALSTR___V1590*/ meltfptr[1589] =
- (void *) &cdat->dstr_1435__CLASS_NREP_DATAT;
- cdat->dstr_1435__CLASS_NREP_DATAT.discr =
+/*inistring dstr_1439__CLASS_NREP_DATAT*/
+ /*_.VALSTR___V1597*/ meltfptr[1596] =
+ (void *) &cdat->dstr_1439__CLASS_NREP_DATAT;
+ cdat->dstr_1439__CLASS_NREP_DATAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1435__CLASS_NREP_DATAT.val,
+ /*small inistring */ strncpy (cdat->dstr_1439__CLASS_NREP_DATAT.val,
"CLASS_NREP_DATATUPLE",
- sizeof (cdat->dstr_1435__CLASS_NREP_DATAT.
+ sizeof (cdat->dstr_1439__CLASS_NREP_DATAT.
val) - 1);
- /*inirout drout_1436__LAMBDA_ */
- /*_.VALROUT___V1582*/ meltfptr[1581] = (void *) &cdat->drout_1436__LAMBDA_;
- cdat->drout_1436__LAMBDA_.discr =
+ /*inirout drout_1440__LAMBDA_ */
+ /*_.VALROUT___V1589*/ meltfptr[1588] = (void *) &cdat->drout_1440__LAMBDA_;
+ cdat->drout_1440__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1436__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4490", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1436__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1436__LAMBDA_,
- meltrout_138_warmelt_genobj_LAMBDA___44__);
+ strncpy (cdat->drout_1440__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4514", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1440__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1440__LAMBDA_,
+ meltrout_139_warmelt_genobj_LAMBDA___44__);
-/*iniobj dsym_1437__VALTUP_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1583*/ meltfptr[1582])
- /*_.VALDATA___V1583*/
- meltfptr[1582] = (void *) &cdat->dsym_1437__VALTUP_;
+/*iniobj dsym_1441__VALTUP_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1590*/ meltfptr[1589])
+ /*_.VALDATA___V1590*/
+ meltfptr[1589] = (void *) &cdat->dsym_1441__VALTUP_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1437__VALTUP_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1441__VALTUP_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1437__VALTUP_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1441__VALTUP_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1437__VALTUP_.meltobj_class =
+ cdat->dsym_1441__VALTUP_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1437__VALTUP_.obj_hash = 21536389;
- cdat->dsym_1437__VALTUP_.obj_len = 3;
+ cdat->dsym_1441__VALTUP_.obj_hash = 21536389;
+ cdat->dsym_1441__VALTUP_.obj_len = 3;
-/*inistring dstr_1438__VALTUP_*/
- /*_.VALSTR___V1584*/ meltfptr[1583] = (void *) &cdat->dstr_1438__VALTUP_;
- cdat->dstr_1438__VALTUP_.discr =
+/*inistring dstr_1442__VALTUP_*/
+ /*_.VALSTR___V1591*/ meltfptr[1590] = (void *) &cdat->dstr_1442__VALTUP_;
+ cdat->dstr_1442__VALTUP_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1438__VALTUP_.val, "_VALTUP_",
- sizeof (cdat->dstr_1438__VALTUP_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1442__VALTUP_.val, "_VALTUP_",
+ sizeof (cdat->dstr_1442__VALTUP_.val) - 1);
-/*iniobj dsym_1439__INITUP_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1585*/ meltfptr[1584])
- /*_.VALDATA___V1585*/
- meltfptr[1584] = (void *) &cdat->dsym_1439__INITUP_;
+/*iniobj dsym_1443__INITUP_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1592*/ meltfptr[1591])
+ /*_.VALDATA___V1592*/
+ meltfptr[1591] = (void *) &cdat->dsym_1443__INITUP_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1439__INITUP_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1443__INITUP_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1439__INITUP_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1443__INITUP_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1439__INITUP_.meltobj_class =
+ cdat->dsym_1443__INITUP_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1439__INITUP_.obj_hash = 117725906;
- cdat->dsym_1439__INITUP_.obj_len = 3;
+ cdat->dsym_1443__INITUP_.obj_hash = 117725906;
+ cdat->dsym_1443__INITUP_.obj_len = 3;
-/*inistring dstr_1440__INITUP_*/
- /*_.VALSTR___V1586*/ meltfptr[1585] = (void *) &cdat->dstr_1440__INITUP_;
- cdat->dstr_1440__INITUP_.discr =
+/*inistring dstr_1444__INITUP_*/
+ /*_.VALSTR___V1593*/ meltfptr[1592] = (void *) &cdat->dstr_1444__INITUP_;
+ cdat->dstr_1444__INITUP_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1440__INITUP_.val, "_INITUP_",
- sizeof (cdat->dstr_1440__INITUP_.val) - 1);
- /*inirout drout_1441__LAMBDA_ */
- /*_.VALROUT___V1587*/ meltfptr[1586] = (void *) &cdat->drout_1441__LAMBDA_;
- cdat->drout_1441__LAMBDA_.discr =
+ /*small inistring */ strncpy (cdat->dstr_1444__INITUP_.val, "_INITUP_",
+ sizeof (cdat->dstr_1444__INITUP_.val) - 1);
+ /*inirout drout_1445__LAMBDA_ */
+ /*_.VALROUT___V1594*/ meltfptr[1593] = (void *) &cdat->drout_1445__LAMBDA_;
+ cdat->drout_1445__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1441__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4518", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1441__LAMBDA_.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1441__LAMBDA_,
- meltrout_139_warmelt_genobj_LAMBDA___45__);
-
- /*inirout drout_1442__COMPILOBJ_DATASTRING */
- /*_.VALROUT___V1591*/ meltfptr[1590] =
- (void *) &cdat->drout_1442__COMPILOBJ_DATASTRING;
- cdat->drout_1442__COMPILOBJ_DATASTRING.discr =
+ strncpy (cdat->drout_1445__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4542", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1445__LAMBDA_.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1445__LAMBDA_,
+ meltrout_140_warmelt_genobj_LAMBDA___45__);
+
+ /*inirout drout_1446__COMPILOBJ_DATASTRING */
+ /*_.VALROUT___V1598*/ meltfptr[1597] =
+ (void *) &cdat->drout_1446__COMPILOBJ_DATASTRING;
+ cdat->drout_1446__COMPILOBJ_DATASTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1442__COMPILOBJ_DATASTRING.routdescr,
- "COMPILOBJ_DATASTRING @warmelt-genobj.melt:4543",
+ strncpy (cdat->drout_1446__COMPILOBJ_DATASTRING.routdescr,
+ "COMPILOBJ_DATASTRING @warmelt-genobj.melt:4567",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1442__COMPILOBJ_DATASTRING.nbval = 10;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1442__COMPILOBJ_DATASTRING,
- meltrout_140_warmelt_genobj_COMPILOBJ_DATASTRING);
-
- /*iniclos dclo_1443__COMPILOBJ_DATASTRING */
- /*_.VALCLO___V1594*/ meltfptr[1593] =
- (void *) &cdat->dclo_1443__COMPILOBJ_DATASTRING;
- cdat->dclo_1443__COMPILOBJ_DATASTRING.discr =
+ cdat->drout_1446__COMPILOBJ_DATASTRING.nbval = 10;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1446__COMPILOBJ_DATASTRING,
+ meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING);
+
+ /*iniclos dclo_1447__COMPILOBJ_DATASTRING */
+ /*_.VALCLO___V1601*/ meltfptr[1600] =
+ (void *) &cdat->dclo_1447__COMPILOBJ_DATASTRING;
+ cdat->dclo_1447__COMPILOBJ_DATASTRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1443__COMPILOBJ_DATASTRING.nbval = 0;
+ cdat->dclo_1447__COMPILOBJ_DATASTRING.nbval = 0;
-/*iniobj dsym_1444__CLASS_NREP_DATASTRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1595*/ meltfptr[1594])
- /*_.VALDATA___V1595*/
- meltfptr[1594] = (void *) &cdat->dsym_1444__CLASS_NREP_DATASTRING;
+/*iniobj dsym_1448__CLASS_NREP_DATASTRING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1602*/ meltfptr[1601])
+ /*_.VALDATA___V1602*/
+ meltfptr[1601] = (void *) &cdat->dsym_1448__CLASS_NREP_DATASTRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1444__CLASS_NREP_DATASTRING",
+ ("iniobj check.discr isobj dsym_1448__CLASS_NREP_DATASTRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1444__CLASS_NREP_DATASTRING",
+ ("iniobj check.discr objmagic dsym_1448__CLASS_NREP_DATASTRING",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1444__CLASS_NREP_DATASTRING.meltobj_class =
+ cdat->dsym_1448__CLASS_NREP_DATASTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1444__CLASS_NREP_DATASTRING.obj_hash = 1030159655;
- cdat->dsym_1444__CLASS_NREP_DATASTRING.obj_len = 3;
+ cdat->dsym_1448__CLASS_NREP_DATASTRING.obj_hash = 1030159655;
+ cdat->dsym_1448__CLASS_NREP_DATASTRING.obj_len = 3;
-/*inistring dstr_1445__CLASS_NREP_DATAS*/
- /*_.VALSTR___V1596*/ meltfptr[1595] =
- (void *) &cdat->dstr_1445__CLASS_NREP_DATAS;
- cdat->dstr_1445__CLASS_NREP_DATAS.discr =
+/*inistring dstr_1449__CLASS_NREP_DATAS*/
+ /*_.VALSTR___V1603*/ meltfptr[1602] =
+ (void *) &cdat->dstr_1449__CLASS_NREP_DATAS;
+ cdat->dstr_1449__CLASS_NREP_DATAS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1445__CLASS_NREP_DATAS.val,
+ /*small inistring */ strncpy (cdat->dstr_1449__CLASS_NREP_DATAS.val,
"CLASS_NREP_DATASTRING",
- sizeof (cdat->dstr_1445__CLASS_NREP_DATAS.
+ sizeof (cdat->dstr_1449__CLASS_NREP_DATAS.
val) - 1);
-/*iniobj dsym_1446__VALSTR_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1592*/ meltfptr[1591])
- /*_.VALDATA___V1592*/
- meltfptr[1591] = (void *) &cdat->dsym_1446__VALSTR_;
+/*iniobj dsym_1450__VALSTR_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1599*/ meltfptr[1598])
+ /*_.VALDATA___V1599*/
+ meltfptr[1598] = (void *) &cdat->dsym_1450__VALSTR_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1446__VALSTR_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1450__VALSTR_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1446__VALSTR_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1450__VALSTR_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1446__VALSTR_.meltobj_class =
+ cdat->dsym_1450__VALSTR_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1446__VALSTR_.obj_hash = 24192176;
- cdat->dsym_1446__VALSTR_.obj_len = 3;
+ cdat->dsym_1450__VALSTR_.obj_hash = 24192176;
+ cdat->dsym_1450__VALSTR_.obj_len = 3;
-/*inistring dstr_1447__VALSTR_*/
- /*_.VALSTR___V1593*/ meltfptr[1592] = (void *) &cdat->dstr_1447__VALSTR_;
- cdat->dstr_1447__VALSTR_.discr =
+/*inistring dstr_1451__VALSTR_*/
+ /*_.VALSTR___V1600*/ meltfptr[1599] = (void *) &cdat->dstr_1451__VALSTR_;
+ cdat->dstr_1451__VALSTR_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1447__VALSTR_.val, "_VALSTR_",
- sizeof (cdat->dstr_1447__VALSTR_.val) - 1);
- /*inirout drout_1448__COMPILOBJ_DATABOXEDINTEGER */
- /*_.VALROUT___V1597*/ meltfptr[1596] =
- (void *) &cdat->drout_1448__COMPILOBJ_DATABOXEDINTEGER;
- cdat->drout_1448__COMPILOBJ_DATABOXEDINTEGER.discr =
+ /*small inistring */ strncpy (cdat->dstr_1451__VALSTR_.val, "_VALSTR_",
+ sizeof (cdat->dstr_1451__VALSTR_.val) - 1);
+ /*inirout drout_1452__COMPILOBJ_DATABOXEDINTEGER */
+ /*_.VALROUT___V1604*/ meltfptr[1603] =
+ (void *) &cdat->drout_1452__COMPILOBJ_DATABOXEDINTEGER;
+ cdat->drout_1452__COMPILOBJ_DATABOXEDINTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1448__COMPILOBJ_DATABOXEDINTEGER.routdescr,
- "COMPILOBJ_DATABOXEDINTEGER @warmelt-genobj.melt:4588",
+ strncpy (cdat->drout_1452__COMPILOBJ_DATABOXEDINTEGER.routdescr,
+ "COMPILOBJ_DATABOXEDINTEGER @warmelt-genobj.melt:4612",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1448__COMPILOBJ_DATABOXEDINTEGER.nbval = 10;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1448__COMPILOBJ_DATABOXEDINTEGER,
- meltrout_141_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER);
-
- /*iniclos dclo_1449__COMPILOBJ_DATABOXEDINTEGER */
- /*_.VALCLO___V1600*/ meltfptr[1599] =
- (void *) &cdat->dclo_1449__COMPILOBJ_DATABOXEDINTEGER;
- cdat->dclo_1449__COMPILOBJ_DATABOXEDINTEGER.discr =
+ cdat->drout_1452__COMPILOBJ_DATABOXEDINTEGER.nbval = 10;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1452__COMPILOBJ_DATABOXEDINTEGER,
+ meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER);
+
+ /*iniclos dclo_1453__COMPILOBJ_DATABOXEDINTEGER */
+ /*_.VALCLO___V1607*/ meltfptr[1606] =
+ (void *) &cdat->dclo_1453__COMPILOBJ_DATABOXEDINTEGER;
+ cdat->dclo_1453__COMPILOBJ_DATABOXEDINTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1449__COMPILOBJ_DATABOXEDINTEGER.nbval = 0;
+ cdat->dclo_1453__COMPILOBJ_DATABOXEDINTEGER.nbval = 0;
-/*iniobj dsym_1450__CLASS_NREP_DATABOXEDINTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1601*/ meltfptr[1600])
- /*_.VALDATA___V1601*/
- meltfptr[1600] = (void *) &cdat->dsym_1450__CLASS_NREP_DATABOXEDINTEGER;
+/*iniobj dsym_1454__CLASS_NREP_DATABOXEDINTEGER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1608*/ meltfptr[1607])
+ /*_.VALDATA___V1608*/
+ meltfptr[1607] = (void *) &cdat->dsym_1454__CLASS_NREP_DATABOXEDINTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1450__CLASS_NREP_DATABOXEDINTEGER",
+ ("iniobj check.discr isobj dsym_1454__CLASS_NREP_DATABOXEDINTEGER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1450__CLASS_NREP_DATABOXEDINTEGER",
+ ("iniobj check.discr objmagic dsym_1454__CLASS_NREP_DATABOXEDINTEGER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1450__CLASS_NREP_DATABOXEDINTEGER.meltobj_class =
+ cdat->dsym_1454__CLASS_NREP_DATABOXEDINTEGER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1450__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 874991843;
- cdat->dsym_1450__CLASS_NREP_DATABOXEDINTEGER.obj_len = 3;
+ cdat->dsym_1454__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 874991843;
+ cdat->dsym_1454__CLASS_NREP_DATABOXEDINTEGER.obj_len = 3;
-/*inistring dstr_1451__CLASS_NREP_DATAB*/
- /*_.VALSTR___V1602*/ meltfptr[1601] =
- (void *) &cdat->dstr_1451__CLASS_NREP_DATAB;
- cdat->dstr_1451__CLASS_NREP_DATAB.discr =
+/*inistring dstr_1455__CLASS_NREP_DATAB*/
+ /*_.VALSTR___V1609*/ meltfptr[1608] =
+ (void *) &cdat->dstr_1455__CLASS_NREP_DATAB;
+ cdat->dstr_1455__CLASS_NREP_DATAB.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1451__CLASS_NREP_DATAB.val,
+ /*small inistring */ strncpy (cdat->dstr_1455__CLASS_NREP_DATAB.val,
"CLASS_NREP_DATABOXEDINTEGER",
- sizeof (cdat->dstr_1451__CLASS_NREP_DATAB.
+ sizeof (cdat->dstr_1455__CLASS_NREP_DATAB.
val) - 1);
-/*iniobj dsym_1452__VALBXINT_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1598*/ meltfptr[1597])
- /*_.VALDATA___V1598*/
- meltfptr[1597] = (void *) &cdat->dsym_1452__VALBXINT_;
+/*iniobj dsym_1456__VALBXINT_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1605*/ meltfptr[1604])
+ /*_.VALDATA___V1605*/
+ meltfptr[1604] = (void *) &cdat->dsym_1456__VALBXINT_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1452__VALBXINT_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1456__VALBXINT_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1452__VALBXINT_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1456__VALBXINT_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1452__VALBXINT_.meltobj_class =
+ cdat->dsym_1456__VALBXINT_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1452__VALBXINT_.obj_hash = 190266804;
- cdat->dsym_1452__VALBXINT_.obj_len = 3;
+ cdat->dsym_1456__VALBXINT_.obj_hash = 190266804;
+ cdat->dsym_1456__VALBXINT_.obj_len = 3;
-/*inistring dstr_1453__VALBXINT_*/
- /*_.VALSTR___V1599*/ meltfptr[1598] = (void *) &cdat->dstr_1453__VALBXINT_;
- cdat->dstr_1453__VALBXINT_.discr =
+/*inistring dstr_1457__VALBXINT_*/
+ /*_.VALSTR___V1606*/ meltfptr[1605] = (void *) &cdat->dstr_1457__VALBXINT_;
+ cdat->dstr_1457__VALBXINT_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1453__VALBXINT_.val, "_VALBXINT_",
- sizeof (cdat->dstr_1453__VALBXINT_.val) - 1);
- /*inirout drout_1454__COMPILOBJ_DATACLOSURE */
- /*_.VALROUT___V1603*/ meltfptr[1602] =
- (void *) &cdat->drout_1454__COMPILOBJ_DATACLOSURE;
- cdat->drout_1454__COMPILOBJ_DATACLOSURE.discr =
+ /*small inistring */ strncpy (cdat->dstr_1457__VALBXINT_.val, "_VALBXINT_",
+ sizeof (cdat->dstr_1457__VALBXINT_.val) - 1);
+ /*inirout drout_1458__COMPILOBJ_DATACLOSURE */
+ /*_.VALROUT___V1610*/ meltfptr[1609] =
+ (void *) &cdat->drout_1458__COMPILOBJ_DATACLOSURE;
+ cdat->drout_1458__COMPILOBJ_DATACLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1454__COMPILOBJ_DATACLOSURE.routdescr,
- "COMPILOBJ_DATACLOSURE @warmelt-genobj.melt:4633",
+ strncpy (cdat->drout_1458__COMPILOBJ_DATACLOSURE.routdescr,
+ "COMPILOBJ_DATACLOSURE @warmelt-genobj.melt:4657",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1454__COMPILOBJ_DATACLOSURE.nbval = 23;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1454__COMPILOBJ_DATACLOSURE,
- meltrout_142_warmelt_genobj_COMPILOBJ_DATACLOSURE);
-
- /*iniclos dclo_1455__COMPILOBJ_DATACLOSURE */
- /*_.VALCLO___V1609*/ meltfptr[1608] =
- (void *) &cdat->dclo_1455__COMPILOBJ_DATACLOSURE;
- cdat->dclo_1455__COMPILOBJ_DATACLOSURE.discr =
+ cdat->drout_1458__COMPILOBJ_DATACLOSURE.nbval = 23;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1458__COMPILOBJ_DATACLOSURE,
+ meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE);
+
+ /*iniclos dclo_1459__COMPILOBJ_DATACLOSURE */
+ /*_.VALCLO___V1616*/ meltfptr[1615] =
+ (void *) &cdat->dclo_1459__COMPILOBJ_DATACLOSURE;
+ cdat->dclo_1459__COMPILOBJ_DATACLOSURE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1455__COMPILOBJ_DATACLOSURE.nbval = 0;
+ cdat->dclo_1459__COMPILOBJ_DATACLOSURE.nbval = 0;
-/*iniobj dsym_1456__CLASS_NREP_DATACLOSURE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1610*/ meltfptr[1609])
- /*_.VALDATA___V1610*/
- meltfptr[1609] = (void *) &cdat->dsym_1456__CLASS_NREP_DATACLOSURE;
+/*iniobj dsym_1460__CLASS_NREP_DATACLOSURE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1617*/ meltfptr[1616])
+ /*_.VALDATA___V1617*/
+ meltfptr[1616] = (void *) &cdat->dsym_1460__CLASS_NREP_DATACLOSURE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1456__CLASS_NREP_DATACLOSURE",
+ ("iniobj check.discr isobj dsym_1460__CLASS_NREP_DATACLOSURE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1456__CLASS_NREP_DATACLOSURE",
+ ("iniobj check.discr objmagic dsym_1460__CLASS_NREP_DATACLOSURE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1456__CLASS_NREP_DATACLOSURE.meltobj_class =
+ cdat->dsym_1460__CLASS_NREP_DATACLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1456__CLASS_NREP_DATACLOSURE.obj_hash = 206205313;
- cdat->dsym_1456__CLASS_NREP_DATACLOSURE.obj_len = 3;
+ cdat->dsym_1460__CLASS_NREP_DATACLOSURE.obj_hash = 206205313;
+ cdat->dsym_1460__CLASS_NREP_DATACLOSURE.obj_len = 3;
-/*inistring dstr_1457__CLASS_NREP_DATAC*/
- /*_.VALSTR___V1611*/ meltfptr[1610] =
- (void *) &cdat->dstr_1457__CLASS_NREP_DATAC;
- cdat->dstr_1457__CLASS_NREP_DATAC.discr =
+/*inistring dstr_1461__CLASS_NREP_DATAC*/
+ /*_.VALSTR___V1618*/ meltfptr[1617] =
+ (void *) &cdat->dstr_1461__CLASS_NREP_DATAC;
+ cdat->dstr_1461__CLASS_NREP_DATAC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1457__CLASS_NREP_DATAC.val,
+ /*small inistring */ strncpy (cdat->dstr_1461__CLASS_NREP_DATAC.val,
"CLASS_NREP_DATACLOSURE",
- sizeof (cdat->dstr_1457__CLASS_NREP_DATAC.
+ sizeof (cdat->dstr_1461__CLASS_NREP_DATAC.
val) - 1);
-/*iniobj dsym_1458__VALCLO_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1604*/ meltfptr[1603])
- /*_.VALDATA___V1604*/
- meltfptr[1603] = (void *) &cdat->dsym_1458__VALCLO_;
+/*iniobj dsym_1462__VALCLO_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1611*/ meltfptr[1610])
+ /*_.VALDATA___V1611*/
+ meltfptr[1610] = (void *) &cdat->dsym_1462__VALCLO_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1458__VALCLO_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1462__VALCLO_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1458__VALCLO_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1462__VALCLO_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1458__VALCLO_.meltobj_class =
+ cdat->dsym_1462__VALCLO_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1458__VALCLO_.obj_hash = 107460852;
- cdat->dsym_1458__VALCLO_.obj_len = 3;
+ cdat->dsym_1462__VALCLO_.obj_hash = 107460852;
+ cdat->dsym_1462__VALCLO_.obj_len = 3;
-/*inistring dstr_1459__VALCLO_*/
- /*_.VALSTR___V1605*/ meltfptr[1604] = (void *) &cdat->dstr_1459__VALCLO_;
- cdat->dstr_1459__VALCLO_.discr =
+/*inistring dstr_1463__VALCLO_*/
+ /*_.VALSTR___V1612*/ meltfptr[1611] = (void *) &cdat->dstr_1463__VALCLO_;
+ cdat->dstr_1463__VALCLO_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1459__VALCLO_.val, "_VALCLO_",
- sizeof (cdat->dstr_1459__VALCLO_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1463__VALCLO_.val, "_VALCLO_",
+ sizeof (cdat->dstr_1463__VALCLO_.val) - 1);
-/*iniobj dsym_1460__DATACLOSURE_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1606*/ meltfptr[1605])
- /*_.VALDATA___V1606*/
- meltfptr[1605] = (void *) &cdat->dsym_1460__DATACLOSURE_;
+/*iniobj dsym_1464__DATACLOSURE_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1613*/ meltfptr[1612])
+ /*_.VALDATA___V1613*/
+ meltfptr[1612] = (void *) &cdat->dsym_1464__DATACLOSURE_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1460__DATACLOSURE_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1464__DATACLOSURE_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1460__DATACLOSURE_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1464__DATACLOSURE_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1460__DATACLOSURE_.meltobj_class =
+ cdat->dsym_1464__DATACLOSURE_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1460__DATACLOSURE_.obj_hash = 12102076;
- cdat->dsym_1460__DATACLOSURE_.obj_len = 3;
+ cdat->dsym_1464__DATACLOSURE_.obj_hash = 12102076;
+ cdat->dsym_1464__DATACLOSURE_.obj_len = 3;
-/*inistring dstr_1461__DATACLOSURE_*/
- /*_.VALSTR___V1607*/ meltfptr[1606] =
- (void *) &cdat->dstr_1461__DATACLOSURE_;
- cdat->dstr_1461__DATACLOSURE_.discr =
+/*inistring dstr_1465__DATACLOSURE_*/
+ /*_.VALSTR___V1614*/ meltfptr[1613] =
+ (void *) &cdat->dstr_1465__DATACLOSURE_;
+ cdat->dstr_1465__DATACLOSURE_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1461__DATACLOSURE_.val,
+ /*small inistring */ strncpy (cdat->dstr_1465__DATACLOSURE_.val,
"_DATACLOSURE_",
- sizeof (cdat->dstr_1461__DATACLOSURE_.val) -
+ sizeof (cdat->dstr_1465__DATACLOSURE_.val) -
1);
-/*iniobj dsym_1462__CLASS_NREP_DATAROUTINE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1612*/ meltfptr[1611])
- /*_.VALDATA___V1612*/
- meltfptr[1611] = (void *) &cdat->dsym_1462__CLASS_NREP_DATAROUTINE;
+/*iniobj dsym_1466__CLASS_NREP_DATAROUTINE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1619*/ meltfptr[1618])
+ /*_.VALDATA___V1619*/
+ meltfptr[1618] = (void *) &cdat->dsym_1466__CLASS_NREP_DATAROUTINE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1462__CLASS_NREP_DATAROUTINE",
+ ("iniobj check.discr isobj dsym_1466__CLASS_NREP_DATAROUTINE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1462__CLASS_NREP_DATAROUTINE",
+ ("iniobj check.discr objmagic dsym_1466__CLASS_NREP_DATAROUTINE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1462__CLASS_NREP_DATAROUTINE.meltobj_class =
+ cdat->dsym_1466__CLASS_NREP_DATAROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1462__CLASS_NREP_DATAROUTINE.obj_hash = 675830344;
- cdat->dsym_1462__CLASS_NREP_DATAROUTINE.obj_len = 3;
+ cdat->dsym_1466__CLASS_NREP_DATAROUTINE.obj_hash = 675830344;
+ cdat->dsym_1466__CLASS_NREP_DATAROUTINE.obj_len = 3;
-/*inistring dstr_1463__CLASS_NREP_DATAR*/
- /*_.VALSTR___V1613*/ meltfptr[1612] =
- (void *) &cdat->dstr_1463__CLASS_NREP_DATAR;
- cdat->dstr_1463__CLASS_NREP_DATAR.discr =
+/*inistring dstr_1467__CLASS_NREP_DATAR*/
+ /*_.VALSTR___V1620*/ meltfptr[1619] =
+ (void *) &cdat->dstr_1467__CLASS_NREP_DATAR;
+ cdat->dstr_1467__CLASS_NREP_DATAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1463__CLASS_NREP_DATAR.val,
+ /*small inistring */ strncpy (cdat->dstr_1467__CLASS_NREP_DATAR.val,
"CLASS_NREP_DATAROUTINE",
- sizeof (cdat->dstr_1463__CLASS_NREP_DATAR.
+ sizeof (cdat->dstr_1467__CLASS_NREP_DATAR.
val) - 1);
- /*inirout drout_1464__LAMBDA_ */
- /*_.VALROUT___V1608*/ meltfptr[1607] = (void *) &cdat->drout_1464__LAMBDA_;
- cdat->drout_1464__LAMBDA_.discr =
+ /*inirout drout_1468__LAMBDA_ */
+ /*_.VALROUT___V1615*/ meltfptr[1614] = (void *) &cdat->drout_1468__LAMBDA_;
+ cdat->drout_1468__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1464__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4696", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1464__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1464__LAMBDA_,
- meltrout_143_warmelt_genobj_LAMBDA___46__);
-
- /*inirout drout_1465__COMPILOBJ_DATAROUTINE */
- /*_.VALROUT___V1614*/ meltfptr[1613] =
- (void *) &cdat->drout_1465__COMPILOBJ_DATAROUTINE;
- cdat->drout_1465__COMPILOBJ_DATAROUTINE.discr =
+ strncpy (cdat->drout_1468__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4720", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1468__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1468__LAMBDA_,
+ meltrout_144_warmelt_genobj_LAMBDA___46__);
+
+ /*inirout drout_1469__COMPILOBJ_DATAROUTINE */
+ /*_.VALROUT___V1621*/ meltfptr[1620] =
+ (void *) &cdat->drout_1469__COMPILOBJ_DATAROUTINE;
+ cdat->drout_1469__COMPILOBJ_DATAROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1465__COMPILOBJ_DATAROUTINE.routdescr,
- "COMPILOBJ_DATAROUTINE @warmelt-genobj.melt:4720",
+ strncpy (cdat->drout_1469__COMPILOBJ_DATAROUTINE.routdescr,
+ "COMPILOBJ_DATAROUTINE @warmelt-genobj.melt:4744",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1465__COMPILOBJ_DATAROUTINE.nbval = 26;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1465__COMPILOBJ_DATAROUTINE,
- meltrout_144_warmelt_genobj_COMPILOBJ_DATAROUTINE);
-
- /*iniclos dclo_1466__COMPILOBJ_DATAROUTINE */
- /*_.VALCLO___V1620*/ meltfptr[1619] =
- (void *) &cdat->dclo_1466__COMPILOBJ_DATAROUTINE;
- cdat->dclo_1466__COMPILOBJ_DATAROUTINE.discr =
+ cdat->drout_1469__COMPILOBJ_DATAROUTINE.nbval = 26;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1469__COMPILOBJ_DATAROUTINE,
+ meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE);
+
+ /*iniclos dclo_1470__COMPILOBJ_DATAROUTINE */
+ /*_.VALCLO___V1627*/ meltfptr[1626] =
+ (void *) &cdat->dclo_1470__COMPILOBJ_DATAROUTINE;
+ cdat->dclo_1470__COMPILOBJ_DATAROUTINE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1466__COMPILOBJ_DATAROUTINE.nbval = 0;
+ cdat->dclo_1470__COMPILOBJ_DATAROUTINE.nbval = 0;
-/*iniobj dsym_1467__VALROUT_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1615*/ meltfptr[1614])
- /*_.VALDATA___V1615*/
- meltfptr[1614] = (void *) &cdat->dsym_1467__VALROUT_;
+/*iniobj dsym_1471__VALROUT_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1622*/ meltfptr[1621])
+ /*_.VALDATA___V1622*/
+ meltfptr[1621] = (void *) &cdat->dsym_1471__VALROUT_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1467__VALROUT_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1471__VALROUT_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1467__VALROUT_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1471__VALROUT_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1467__VALROUT_.meltobj_class =
+ cdat->dsym_1471__VALROUT_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1467__VALROUT_.obj_hash = 99461589;
- cdat->dsym_1467__VALROUT_.obj_len = 3;
+ cdat->dsym_1471__VALROUT_.obj_hash = 99461589;
+ cdat->dsym_1471__VALROUT_.obj_len = 3;
-/*inistring dstr_1468__VALROUT_*/
- /*_.VALSTR___V1616*/ meltfptr[1615] = (void *) &cdat->dstr_1468__VALROUT_;
- cdat->dstr_1468__VALROUT_.discr =
+/*inistring dstr_1472__VALROUT_*/
+ /*_.VALSTR___V1623*/ meltfptr[1622] = (void *) &cdat->dstr_1472__VALROUT_;
+ cdat->dstr_1472__VALROUT_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1468__VALROUT_.val, "_VALROUT_",
- sizeof (cdat->dstr_1468__VALROUT_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1472__VALROUT_.val, "_VALROUT_",
+ sizeof (cdat->dstr_1472__VALROUT_.val) - 1);
-/*iniobj dsym_1469__IROUTVAL_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1617*/ meltfptr[1616])
- /*_.VALDATA___V1617*/
- meltfptr[1616] = (void *) &cdat->dsym_1469__IROUTVAL_;
+/*iniobj dsym_1473__IROUTVAL_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1624*/ meltfptr[1623])
+ /*_.VALDATA___V1624*/
+ meltfptr[1623] = (void *) &cdat->dsym_1473__IROUTVAL_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1469__IROUTVAL_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1473__IROUTVAL_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1469__IROUTVAL_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1473__IROUTVAL_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1469__IROUTVAL_.meltobj_class =
+ cdat->dsym_1473__IROUTVAL_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1469__IROUTVAL_.obj_hash = 80558693;
- cdat->dsym_1469__IROUTVAL_.obj_len = 3;
+ cdat->dsym_1473__IROUTVAL_.obj_hash = 80558693;
+ cdat->dsym_1473__IROUTVAL_.obj_len = 3;
-/*inistring dstr_1470__IROUTVAL_*/
- /*_.VALSTR___V1618*/ meltfptr[1617] = (void *) &cdat->dstr_1470__IROUTVAL_;
- cdat->dstr_1470__IROUTVAL_.discr =
+/*inistring dstr_1474__IROUTVAL_*/
+ /*_.VALSTR___V1625*/ meltfptr[1624] = (void *) &cdat->dstr_1474__IROUTVAL_;
+ cdat->dstr_1474__IROUTVAL_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1470__IROUTVAL_.val, "_IROUTVAL_",
- sizeof (cdat->dstr_1470__IROUTVAL_.val) - 1);
- /*inirout drout_1471__LAMBDA_ */
- /*_.VALROUT___V1619*/ meltfptr[1618] = (void *) &cdat->drout_1471__LAMBDA_;
- cdat->drout_1471__LAMBDA_.discr =
+ /*small inistring */ strncpy (cdat->dstr_1474__IROUTVAL_.val, "_IROUTVAL_",
+ sizeof (cdat->dstr_1474__IROUTVAL_.val) - 1);
+ /*inirout drout_1475__LAMBDA_ */
+ /*_.VALROUT___V1626*/ meltfptr[1625] = (void *) &cdat->drout_1475__LAMBDA_;
+ cdat->drout_1475__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1471__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4777", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1471__LAMBDA_.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1471__LAMBDA_,
- meltrout_145_warmelt_genobj_LAMBDA___47__);
+ strncpy (cdat->drout_1475__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4801", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1475__LAMBDA_.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1475__LAMBDA_,
+ meltrout_146_warmelt_genobj_LAMBDA___47__);
-/*iniobj dsym_1472__CLASS_NREP_QUASIDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1621*/ meltfptr[1620])
- /*_.VALDATA___V1621*/
- meltfptr[1620] = (void *) &cdat->dsym_1472__CLASS_NREP_QUASIDATA;
+/*iniobj dsym_1476__CLASS_NREP_QUASIDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1628*/ meltfptr[1627])
+ /*_.VALDATA___V1628*/
+ meltfptr[1627] = (void *) &cdat->dsym_1476__CLASS_NREP_QUASIDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1472__CLASS_NREP_QUASIDATA",
+ ("iniobj check.discr isobj dsym_1476__CLASS_NREP_QUASIDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1472__CLASS_NREP_QUASIDATA",
+ ("iniobj check.discr objmagic dsym_1476__CLASS_NREP_QUASIDATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1472__CLASS_NREP_QUASIDATA.meltobj_class =
+ cdat->dsym_1476__CLASS_NREP_QUASIDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1472__CLASS_NREP_QUASIDATA.obj_hash = 752535427;
- cdat->dsym_1472__CLASS_NREP_QUASIDATA.obj_len = 3;
+ cdat->dsym_1476__CLASS_NREP_QUASIDATA.obj_hash = 752535427;
+ cdat->dsym_1476__CLASS_NREP_QUASIDATA.obj_len = 3;
-/*inistring dstr_1473__CLASS_NREP_QUASI*/
- /*_.VALSTR___V1622*/ meltfptr[1621] =
- (void *) &cdat->dstr_1473__CLASS_NREP_QUASI;
- cdat->dstr_1473__CLASS_NREP_QUASI.discr =
+/*inistring dstr_1477__CLASS_NREP_QUASI*/
+ /*_.VALSTR___V1629*/ meltfptr[1628] =
+ (void *) &cdat->dstr_1477__CLASS_NREP_QUASI;
+ cdat->dstr_1477__CLASS_NREP_QUASI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1473__CLASS_NREP_QUASI.val,
+ /*small inistring */ strncpy (cdat->dstr_1477__CLASS_NREP_QUASI.val,
"CLASS_NREP_QUASIDATA",
- sizeof (cdat->dstr_1473__CLASS_NREP_QUASI.
+ sizeof (cdat->dstr_1477__CLASS_NREP_QUASI.
val) - 1);
- /*inirout drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALROUT___V1623*/ meltfptr[1622] =
+ /*inirout drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+ /*_.VALROUT___V1630*/ meltfptr[1629] =
(void *) &cdat->
- drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
- cdat->drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ cdat->drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
discr = (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->
- drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
routdescr,
- "COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4838",
+ "COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4862",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER,
- meltrout_146_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER);
+ drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER,
+ meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER);
- /*iniclos dclo_1475__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALCLO___V1624*/ meltfptr[1623] =
+ /*iniclos dclo_1479__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+ /*_.VALCLO___V1631*/ meltfptr[1630] =
(void *) &cdat->
- dclo_1475__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
- cdat->dclo_1475__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ dclo_1479__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ cdat->dclo_1479__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
discr = (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1475__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dclo_1479__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
nbval = 0;
-/*iniobj dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1625*/ meltfptr[1624])
- /*_.VALDATA___V1625*/
- meltfptr[1624] =
+/*iniobj dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1632*/ meltfptr[1631])
+ /*_.VALDATA___V1632*/
+ meltfptr[1631] =
(void *) &cdat->
- dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
+ ("iniobj check.discr isobj dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
+ ("iniobj check.discr objmagic dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_hash = 940676789;
- cdat->dsym_1476__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1480__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 3;
-/*inistring dstr_1477__CLASS_NREP_QUASI*/
- /*_.VALSTR___V1626*/ meltfptr[1625] =
- (void *) &cdat->dstr_1477__CLASS_NREP_QUASI;
- cdat->dstr_1477__CLASS_NREP_QUASI.discr =
+/*inistring dstr_1481__CLASS_NREP_QUASI*/
+ /*_.VALSTR___V1633*/ meltfptr[1632] =
+ (void *) &cdat->dstr_1481__CLASS_NREP_QUASI;
+ cdat->dstr_1481__CLASS_NREP_QUASI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1477__CLASS_NREP_QUASI.val,
+ /*small inistring */ strncpy (cdat->dstr_1481__CLASS_NREP_QUASI.val,
"CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
- sizeof (cdat->dstr_1477__CLASS_NREP_QUASI.
+ sizeof (cdat->dstr_1481__CLASS_NREP_QUASI.
val) - 1);
- /*inirout drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
- /*_.VALROUT___V1627*/ meltfptr[1626] =
- (void *) &cdat->drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
- cdat->drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr =
+ /*inirout drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
+ /*_.VALROUT___V1634*/ meltfptr[1633] =
+ (void *) &cdat->drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ cdat->drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.
+ strncpy (cdat->drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.
routdescr,
- "COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT @warmelt-genobj.melt:4848",
+ "COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT @warmelt-genobj.melt:4872",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 2;
+ cdat->drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT,
- meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT);
+ drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT,
+ meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT);
- /*iniclos dclo_1479__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
- /*_.VALCLO___V1628*/ meltfptr[1627] =
- (void *) &cdat->dclo_1479__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
- cdat->dclo_1479__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr =
+ /*iniclos dclo_1483__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
+ /*_.VALCLO___V1635*/ meltfptr[1634] =
+ (void *) &cdat->dclo_1483__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ cdat->dclo_1483__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1479__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 0;
+ cdat->dclo_1483__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 0;
-/*iniobj dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1629*/ meltfptr[1628])
- /*_.VALDATA___V1629*/
- meltfptr[1628] =
+/*iniobj dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1636*/ meltfptr[1635])
+ /*_.VALDATA___V1636*/
+ meltfptr[1635] =
(void *) &cdat->
- dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
+ dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
+ ("iniobj check.discr isobj dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
+ ("iniobj check.discr objmagic dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.
+ cdat->dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.
meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash =
+ cdat->dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash =
876593992;
- cdat->dsym_1480__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 3;
+ cdat->dsym_1484__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 3;
-/*inistring dstr_1481__CLASS_NREP_QUASI*/
- /*_.VALSTR___V1630*/ meltfptr[1629] =
- (void *) &cdat->dstr_1481__CLASS_NREP_QUASI;
- cdat->dstr_1481__CLASS_NREP_QUASI.discr =
+/*inistring dstr_1485__CLASS_NREP_QUASI*/
+ /*_.VALSTR___V1637*/ meltfptr[1636] =
+ (void *) &cdat->dstr_1485__CLASS_NREP_QUASI;
+ cdat->dstr_1485__CLASS_NREP_QUASI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1481__CLASS_NREP_QUASI.val,
+ /*small inistring */ strncpy (cdat->dstr_1485__CLASS_NREP_QUASI.val,
"CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
- sizeof (cdat->dstr_1481__CLASS_NREP_QUASI.
+ sizeof (cdat->dstr_1485__CLASS_NREP_QUASI.
val) - 1);
- /*inirout drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED */
- /*_.VALROUT___V1631*/ meltfptr[1630] =
- (void *) &cdat->drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED;
- cdat->drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED.discr =
+ /*inirout drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED */
+ /*_.VALROUT___V1638*/ meltfptr[1637] =
+ (void *) &cdat->drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED;
+ cdat->drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED.routdescr,
- "COMPILOBJ_NREP_STORE_PREDEFINED @warmelt-genobj.melt:4858",
+ strncpy (cdat->drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED.routdescr,
+ "COMPILOBJ_NREP_STORE_PREDEFINED @warmelt-genobj.melt:4882",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 8;
+ cdat->drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 8;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED,
- meltrout_148_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED);
+ drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED,
+ meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED);
- /*iniclos dclo_1483__COMPILOBJ_NREP_STORE_PREDEFINED */
- /*_.VALCLO___V1632*/ meltfptr[1631] =
- (void *) &cdat->dclo_1483__COMPILOBJ_NREP_STORE_PREDEFINED;
- cdat->dclo_1483__COMPILOBJ_NREP_STORE_PREDEFINED.discr =
+ /*iniclos dclo_1487__COMPILOBJ_NREP_STORE_PREDEFINED */
+ /*_.VALCLO___V1639*/ meltfptr[1638] =
+ (void *) &cdat->dclo_1487__COMPILOBJ_NREP_STORE_PREDEFINED;
+ cdat->dclo_1487__COMPILOBJ_NREP_STORE_PREDEFINED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1483__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 0;
+ cdat->dclo_1487__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 0;
-/*iniobj dsym_1484__CLASS_NREP_STORE_PREDEFINED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1633*/ meltfptr[1632])
- /*_.VALDATA___V1633*/
- meltfptr[1632] = (void *) &cdat->dsym_1484__CLASS_NREP_STORE_PREDEFINED;
+/*iniobj dsym_1488__CLASS_NREP_STORE_PREDEFINED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1640*/ meltfptr[1639])
+ /*_.VALDATA___V1640*/
+ meltfptr[1639] = (void *) &cdat->dsym_1488__CLASS_NREP_STORE_PREDEFINED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1484__CLASS_NREP_STORE_PREDEFINED",
+ ("iniobj check.discr isobj dsym_1488__CLASS_NREP_STORE_PREDEFINED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1484__CLASS_NREP_STORE_PREDEFINED",
+ ("iniobj check.discr objmagic dsym_1488__CLASS_NREP_STORE_PREDEFINED",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1484__CLASS_NREP_STORE_PREDEFINED.meltobj_class =
+ cdat->dsym_1488__CLASS_NREP_STORE_PREDEFINED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1484__CLASS_NREP_STORE_PREDEFINED.obj_hash = 391152767;
- cdat->dsym_1484__CLASS_NREP_STORE_PREDEFINED.obj_len = 3;
+ cdat->dsym_1488__CLASS_NREP_STORE_PREDEFINED.obj_hash = 391152767;
+ cdat->dsym_1488__CLASS_NREP_STORE_PREDEFINED.obj_len = 3;
-/*inistring dstr_1485__CLASS_NREP_STORE*/
- /*_.VALSTR___V1634*/ meltfptr[1633] =
- (void *) &cdat->dstr_1485__CLASS_NREP_STORE;
- cdat->dstr_1485__CLASS_NREP_STORE.discr =
+/*inistring dstr_1489__CLASS_NREP_STORE*/
+ /*_.VALSTR___V1641*/ meltfptr[1640] =
+ (void *) &cdat->dstr_1489__CLASS_NREP_STORE;
+ cdat->dstr_1489__CLASS_NREP_STORE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1485__CLASS_NREP_STORE.val,
+ /*small inistring */ strncpy (cdat->dstr_1489__CLASS_NREP_STORE.val,
"CLASS_NREP_STORE_PREDEFINED",
- sizeof (cdat->dstr_1485__CLASS_NREP_STORE.
+ sizeof (cdat->dstr_1489__CLASS_NREP_STORE.
val) - 1);
- /*inirout drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALROUT___V1635*/ meltfptr[1634] =
+ /*inirout drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+ /*_.VALROUT___V1642*/ meltfptr[1641] =
(void *) &cdat->
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
cdat->
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
discr = (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
routdescr,
- "COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4895",
+ "COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4919",
MELT_ROUTDESCR_LEN - 1);
cdat->
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
nbval = 20;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER,
- meltrout_149_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER);
+ drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER,
+ meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER);
- /*iniclos dclo_1487__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
- /*_.VALCLO___V1639*/ meltfptr[1638] =
+ /*iniclos dclo_1491__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
+ /*_.VALCLO___V1646*/ meltfptr[1645] =
(void *) &cdat->
- dclo_1487__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
- cdat->dclo_1487__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ dclo_1491__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ cdat->dclo_1491__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
discr = (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1487__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dclo_1491__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
nbval = 0;
-/*iniobj dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1640*/ meltfptr[1639])
- /*_.VALDATA___V1640*/
- meltfptr[1639] =
+/*iniobj dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1647*/ meltfptr[1646])
+ /*_.VALDATA___V1647*/
+ meltfptr[1646] =
(void *) &cdat->
- dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
+ dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
+ ("iniobj check.discr isobj dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
+ ("iniobj check.discr objmagic dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_hash = 1007630346;
- cdat->dsym_1488__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
+ cdat->dsym_1492__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 3;
-/*inistring dstr_1489__CLASS_NREP_UPDAT*/
- /*_.VALSTR___V1641*/ meltfptr[1640] =
- (void *) &cdat->dstr_1489__CLASS_NREP_UPDAT;
- cdat->dstr_1489__CLASS_NREP_UPDAT.discr =
+/*inistring dstr_1493__CLASS_NREP_UPDAT*/
+ /*_.VALSTR___V1648*/ meltfptr[1647] =
+ (void *) &cdat->dstr_1493__CLASS_NREP_UPDAT;
+ cdat->dstr_1493__CLASS_NREP_UPDAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1489__CLASS_NREP_UPDAT.val,
+ /*small inistring */ strncpy (cdat->dstr_1493__CLASS_NREP_UPDAT.val,
"CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
- sizeof (cdat->dstr_1489__CLASS_NREP_UPDAT.
+ sizeof (cdat->dstr_1493__CLASS_NREP_UPDAT.
val) - 1);
- /*inirout drout_1490__LAMBDA_ */
- /*_.VALROUT___V1636*/ meltfptr[1635] = (void *) &cdat->drout_1490__LAMBDA_;
- cdat->drout_1490__LAMBDA_.discr =
+ /*inirout drout_1494__LAMBDA_ */
+ /*_.VALROUT___V1643*/ meltfptr[1642] = (void *) &cdat->drout_1494__LAMBDA_;
+ cdat->drout_1494__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1490__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4926", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1490__LAMBDA_.nbval = 11;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1490__LAMBDA_,
- meltrout_150_warmelt_genobj_LAMBDA___48__);
-
- /*inirout drout_1491__LAMBDA_ */
- /*_.VALROUT___V1637*/ meltfptr[1636] = (void *) &cdat->drout_1491__LAMBDA_;
- cdat->drout_1491__LAMBDA_.discr =
+ strncpy (cdat->drout_1494__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4950", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1494__LAMBDA_.nbval = 11;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1494__LAMBDA_,
+ meltrout_151_warmelt_genobj_LAMBDA___48__);
+
+ /*inirout drout_1495__LAMBDA_ */
+ /*_.VALROUT___V1644*/ meltfptr[1643] = (void *) &cdat->drout_1495__LAMBDA_;
+ cdat->drout_1495__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1491__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:4939", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1491__LAMBDA_.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1491__LAMBDA_,
- meltrout_151_warmelt_genobj_LAMBDA___49__);
+ strncpy (cdat->drout_1495__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:4963", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1495__LAMBDA_.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1495__LAMBDA_,
+ meltrout_152_warmelt_genobj_LAMBDA___49__);
-/*inistring dstr_1492__compobj_upd_mod_*/
- /*_.VALSTR___V1638*/ meltfptr[1637] =
- (void *) &cdat->dstr_1492__compobj_upd_mod_;
- cdat->dstr_1492__compobj_upd_mod_.discr =
+/*inistring dstr_1496__compobj_upd_mod_*/
+ /*_.VALSTR___V1645*/ meltfptr[1644] =
+ (void *) &cdat->dstr_1496__compobj_upd_mod_;
+ cdat->dstr_1496__compobj_upd_mod_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1492__compobj_upd_mod_.val,
+ /*small inistring */ strncpy (cdat->dstr_1496__compobj_upd_mod_.val,
"compobj.upd.mod.env.box",
- sizeof (cdat->dstr_1492__compobj_upd_mod_.
+ sizeof (cdat->dstr_1496__compobj_upd_mod_.
val) - 1);
-/*iniobj dsym_1493__COMPILE_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1642*/ meltfptr[1641])
- /*_.VALDATA___V1642*/
- meltfptr[1641] = (void *) &cdat->dsym_1493__COMPILE_MATCHER;
+/*iniobj dsym_1497__COMPILE_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1649*/ meltfptr[1648])
+ /*_.VALDATA___V1649*/
+ meltfptr[1648] = (void *) &cdat->dsym_1497__COMPILE_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1493__COMPILE_MATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1497__COMPILE_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1493__COMPILE_MATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1497__COMPILE_MATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1493__COMPILE_MATCHER.meltobj_class =
+ cdat->dsym_1497__COMPILE_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1493__COMPILE_MATCHER.obj_hash = 1017313272;
- cdat->dsym_1493__COMPILE_MATCHER.obj_len = 3;
+ cdat->dsym_1497__COMPILE_MATCHER.obj_hash = 1017313272;
+ cdat->dsym_1497__COMPILE_MATCHER.obj_len = 3;
-/*inistring dstr_1494__COMPILE_MATCHER*/
- /*_.VALSTR___V1643*/ meltfptr[1642] =
- (void *) &cdat->dstr_1494__COMPILE_MATCHER;
- cdat->dstr_1494__COMPILE_MATCHER.discr =
+/*inistring dstr_1498__COMPILE_MATCHER*/
+ /*_.VALSTR___V1650*/ meltfptr[1649] =
+ (void *) &cdat->dstr_1498__COMPILE_MATCHER;
+ cdat->dstr_1498__COMPILE_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1494__COMPILE_MATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_1498__COMPILE_MATCHER.val,
"COMPILE_MATCHER",
- sizeof (cdat->dstr_1494__COMPILE_MATCHER.
+ sizeof (cdat->dstr_1498__COMPILE_MATCHER.
val) - 1);
- MELT_LOCATION ("warmelt-genobj.melt:4991:/ iniobj");
+ MELT_LOCATION ("warmelt-genobj.melt:5015:/ iniobj");
-/*iniobj dobj_1495__COMPILE_MATCHER*/
-/*_.VALDATA___V1644*/ meltfptr[1643] =
- (void *) &cdat->dobj_1495__COMPILE_MATCHER;
+/*iniobj dobj_1499__COMPILE_MATCHER*/
+/*_.VALDATA___V1651*/ meltfptr[1650] =
+ (void *) &cdat->dobj_1499__COMPILE_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1495__COMPILE_MATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1499__COMPILE_MATCHER",
melt_magic_discr ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1495__COMPILE_MATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1499__COMPILE_MATCHER",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1495__COMPILE_MATCHER.meltobj_class =
+ cdat->dobj_1499__COMPILE_MATCHER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_1495__COMPILE_MATCHER.obj_hash = 109755998;
- cdat->dobj_1495__COMPILE_MATCHER.obj_len = 4;
+ cdat->dobj_1499__COMPILE_MATCHER.obj_hash = 838498519;
+ cdat->dobj_1499__COMPILE_MATCHER.obj_len = 4;
-/*inistring dstr_1496__COMPILE_MATCHER*/
- /*_.VALSTR___V1645*/ meltfptr[1644] =
- (void *) &cdat->dstr_1496__COMPILE_MATCHER;
- cdat->dstr_1496__COMPILE_MATCHER.discr =
+/*inistring dstr_1500__COMPILE_MATCHER*/
+ /*_.VALSTR___V1652*/ meltfptr[1651] =
+ (void *) &cdat->dstr_1500__COMPILE_MATCHER;
+ cdat->dstr_1500__COMPILE_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1496__COMPILE_MATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_1500__COMPILE_MATCHER.val,
"COMPILE_MATCHER",
- sizeof (cdat->dstr_1496__COMPILE_MATCHER.
+ sizeof (cdat->dstr_1500__COMPILE_MATCHER.
val) - 1);
-/*iniobj dsym_1497__CLASS_MATCHCOMPILCONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1646*/ meltfptr[1645])
- /*_.VALDATA___V1646*/
- meltfptr[1645] = (void *) &cdat->dsym_1497__CLASS_MATCHCOMPILCONTEXT;
+/*iniobj dsym_1501__CLASS_MATCHCOMPILCONTEXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1653*/ meltfptr[1652])
+ /*_.VALDATA___V1653*/
+ meltfptr[1652] = (void *) &cdat->dsym_1501__CLASS_MATCHCOMPILCONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1497__CLASS_MATCHCOMPILCONTEXT",
+ ("iniobj check.discr isobj dsym_1501__CLASS_MATCHCOMPILCONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1497__CLASS_MATCHCOMPILCONTEXT",
+ ("iniobj check.discr objmagic dsym_1501__CLASS_MATCHCOMPILCONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1497__CLASS_MATCHCOMPILCONTEXT.meltobj_class =
+ cdat->dsym_1501__CLASS_MATCHCOMPILCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1497__CLASS_MATCHCOMPILCONTEXT.obj_hash = 1041467073;
- cdat->dsym_1497__CLASS_MATCHCOMPILCONTEXT.obj_len = 3;
+ cdat->dsym_1501__CLASS_MATCHCOMPILCONTEXT.obj_hash = 1041467073;
+ cdat->dsym_1501__CLASS_MATCHCOMPILCONTEXT.obj_len = 3;
-/*inistring dstr_1498__CLASS_MATCHCOMPI*/
- /*_.VALSTR___V1647*/ meltfptr[1646] =
- (void *) &cdat->dstr_1498__CLASS_MATCHCOMPI;
- cdat->dstr_1498__CLASS_MATCHCOMPI.discr =
+/*inistring dstr_1502__CLASS_MATCHCOMPI*/
+ /*_.VALSTR___V1654*/ meltfptr[1653] =
+ (void *) &cdat->dstr_1502__CLASS_MATCHCOMPI;
+ cdat->dstr_1502__CLASS_MATCHCOMPI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1498__CLASS_MATCHCOMPI.val,
+ /*small inistring */ strncpy (cdat->dstr_1502__CLASS_MATCHCOMPI.val,
"CLASS_MATCHCOMPILCONTEXT",
- sizeof (cdat->dstr_1498__CLASS_MATCHCOMPI.
+ sizeof (cdat->dstr_1502__CLASS_MATCHCOMPI.
val) - 1);
-/*iniobj dsym_1499__CLASS_PROPED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1648*/ meltfptr[1647])
- /*_.VALDATA___V1648*/
- meltfptr[1647] = (void *) &cdat->dsym_1499__CLASS_PROPED;
+/*iniobj dsym_1503__CLASS_PROPED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1655*/ meltfptr[1654])
+ /*_.VALDATA___V1655*/
+ meltfptr[1654] = (void *) &cdat->dsym_1503__CLASS_PROPED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1499__CLASS_PROPED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1503__CLASS_PROPED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1499__CLASS_PROPED",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1503__CLASS_PROPED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1499__CLASS_PROPED.meltobj_class =
+ cdat->dsym_1503__CLASS_PROPED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1499__CLASS_PROPED.obj_hash = 96765023;
- cdat->dsym_1499__CLASS_PROPED.obj_len = 3;
+ cdat->dsym_1503__CLASS_PROPED.obj_hash = 96765023;
+ cdat->dsym_1503__CLASS_PROPED.obj_len = 3;
-/*inistring dstr_1500__CLASS_PROPED*/
- /*_.VALSTR___V1649*/ meltfptr[1648] =
- (void *) &cdat->dstr_1500__CLASS_PROPED;
- cdat->dstr_1500__CLASS_PROPED.discr =
+/*inistring dstr_1504__CLASS_PROPED*/
+ /*_.VALSTR___V1656*/ meltfptr[1655] =
+ (void *) &cdat->dstr_1504__CLASS_PROPED;
+ cdat->dstr_1504__CLASS_PROPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1500__CLASS_PROPED.val,
+ /*small inistring */ strncpy (cdat->dstr_1504__CLASS_PROPED.val,
"CLASS_PROPED",
- sizeof (cdat->dstr_1500__CLASS_PROPED.val) -
+ sizeof (cdat->dstr_1504__CLASS_PROPED.val) -
1);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ iniobj");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ iniobj");
-/*iniobj dobj_1501__CLASS_MATCHCOMPILCONTEXT*/
-/*_.VALDATA___V1650*/ meltfptr[1649] =
- (void *) &cdat->dobj_1501__CLASS_MATCHCOMPILCONTEXT;
+/*iniobj dobj_1505__CLASS_MATCHCOMPILCONTEXT*/
+/*_.VALDATA___V1657*/ meltfptr[1656] =
+ (void *) &cdat->dobj_1505__CLASS_MATCHCOMPILCONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1501__CLASS_MATCHCOMPILCONTEXT",
+ ("iniobj check.discr isobj dobj_1505__CLASS_MATCHCOMPILCONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1501__CLASS_MATCHCOMPILCONTEXT",
+ ("iniobj check.discr objmagic dobj_1505__CLASS_MATCHCOMPILCONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1501__CLASS_MATCHCOMPILCONTEXT.meltobj_class =
+ cdat->dobj_1505__CLASS_MATCHCOMPILCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1501__CLASS_MATCHCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1501__CLASS_MATCHCOMPILCONTEXT.obj_hash = 746165694;
- cdat->dobj_1501__CLASS_MATCHCOMPILCONTEXT.obj_len = 8;
+ cdat->dobj_1505__CLASS_MATCHCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1505__CLASS_MATCHCOMPILCONTEXT.obj_hash = 437106565;
+ cdat->dobj_1505__CLASS_MATCHCOMPILCONTEXT.obj_len = 8;
-/*inistring dstr_1502__CLASS_MATCHCOMPI*/
- /*_.VALSTR___V1651*/ meltfptr[1650] =
- (void *) &cdat->dstr_1502__CLASS_MATCHCOMPI;
- cdat->dstr_1502__CLASS_MATCHCOMPI.discr =
+/*inistring dstr_1506__CLASS_MATCHCOMPI*/
+ /*_.VALSTR___V1658*/ meltfptr[1657] =
+ (void *) &cdat->dstr_1506__CLASS_MATCHCOMPI;
+ cdat->dstr_1506__CLASS_MATCHCOMPI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1502__CLASS_MATCHCOMPI.val,
+ /*small inistring */ strncpy (cdat->dstr_1506__CLASS_MATCHCOMPI.val,
"CLASS_MATCHCOMPILCONTEXT",
- sizeof (cdat->dstr_1502__CLASS_MATCHCOMPI.
+ sizeof (cdat->dstr_1506__CLASS_MATCHCOMPI.
val) - 1);
- /*inimult dtup_1503__CLASS_MATCHCOMPILCONTEXT */
- /*_.VALTUP___V1652*/ meltfptr[1651] =
- (void *) &cdat->dtup_1503__CLASS_MATCHCOMPILCONTEXT;
- cdat->dtup_1503__CLASS_MATCHCOMPILCONTEXT.discr =
+ /*inimult dtup_1507__CLASS_MATCHCOMPILCONTEXT */
+ /*_.VALTUP___V1659*/ meltfptr[1658] =
+ (void *) &cdat->dtup_1507__CLASS_MATCHCOMPILCONTEXT;
+ cdat->dtup_1507__CLASS_MATCHCOMPILCONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1503__CLASS_MATCHCOMPILCONTEXT.nbval = 2;
- /*inimult dtup_1504__CLASS_MATCHCOMPILCONTEXT */
- /*_.VALTUP___V1667*/ meltfptr[1666] =
- (void *) &cdat->dtup_1504__CLASS_MATCHCOMPILCONTEXT;
- cdat->dtup_1504__CLASS_MATCHCOMPILCONTEXT.discr =
+ cdat->dtup_1507__CLASS_MATCHCOMPILCONTEXT.nbval = 2;
+ /*inimult dtup_1508__CLASS_MATCHCOMPILCONTEXT */
+ /*_.VALTUP___V1674*/ meltfptr[1673] =
+ (void *) &cdat->dtup_1508__CLASS_MATCHCOMPILCONTEXT;
+ cdat->dtup_1508__CLASS_MATCHCOMPILCONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1504__CLASS_MATCHCOMPILCONTEXT.nbval = 8;
+ cdat->dtup_1508__CLASS_MATCHCOMPILCONTEXT.nbval = 8;
-/*iniobj dsym_1505__MCX_LOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1668*/ meltfptr[1667])
- /*_.VALDATA___V1668*/
- meltfptr[1667] = (void *) &cdat->dsym_1505__MCX_LOC;
+/*iniobj dsym_1509__MCX_LOC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1675*/ meltfptr[1674])
+ /*_.VALDATA___V1675*/
+ meltfptr[1674] = (void *) &cdat->dsym_1509__MCX_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1505__MCX_LOC",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1509__MCX_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1505__MCX_LOC",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1509__MCX_LOC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1505__MCX_LOC.meltobj_class =
+ cdat->dsym_1509__MCX_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1505__MCX_LOC.obj_hash = 750608101;
- cdat->dsym_1505__MCX_LOC.obj_len = 3;
+ cdat->dsym_1509__MCX_LOC.obj_hash = 750608101;
+ cdat->dsym_1509__MCX_LOC.obj_len = 3;
-/*inistring dstr_1506__MCX_LOC*/
- /*_.VALSTR___V1669*/ meltfptr[1668] = (void *) &cdat->dstr_1506__MCX_LOC;
- cdat->dstr_1506__MCX_LOC.discr =
+/*inistring dstr_1510__MCX_LOC*/
+ /*_.VALSTR___V1676*/ meltfptr[1675] = (void *) &cdat->dstr_1510__MCX_LOC;
+ cdat->dstr_1510__MCX_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1506__MCX_LOC.val, "MCX_LOC",
- sizeof (cdat->dstr_1506__MCX_LOC.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1510__MCX_LOC.val, "MCX_LOC",
+ sizeof (cdat->dstr_1510__MCX_LOC.val) - 1);
/*^iniobj */
-/*iniobj dobj_1507__MCX_LOC*/
-/*_.VALDATA___V1653*/ meltfptr[1652] = (void *) &cdat->dobj_1507__MCX_LOC;
+/*iniobj dobj_1511__MCX_LOC*/
+/*_.VALDATA___V1660*/ meltfptr[1659] = (void *) &cdat->dobj_1511__MCX_LOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1507__MCX_LOC",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1511__MCX_LOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1507__MCX_LOC",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1511__MCX_LOC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1507__MCX_LOC.meltobj_class =
+ cdat->dobj_1511__MCX_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1507__MCX_LOC.obj_num = 1;
- cdat->dobj_1507__MCX_LOC.obj_hash = 165781882;
- cdat->dobj_1507__MCX_LOC.obj_len = 4;
+ cdat->dobj_1511__MCX_LOC.obj_num = 1;
+ cdat->dobj_1511__MCX_LOC.obj_hash = 992764970;
+ cdat->dobj_1511__MCX_LOC.obj_len = 4;
-/*inistring dstr_1508__MCX_LOC*/
- /*_.VALSTR___V1654*/ meltfptr[1653] = (void *) &cdat->dstr_1508__MCX_LOC;
- cdat->dstr_1508__MCX_LOC.discr =
+/*inistring dstr_1512__MCX_LOC*/
+ /*_.VALSTR___V1661*/ meltfptr[1660] = (void *) &cdat->dstr_1512__MCX_LOC;
+ cdat->dstr_1512__MCX_LOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1508__MCX_LOC.val, "MCX_LOC",
- sizeof (cdat->dstr_1508__MCX_LOC.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1512__MCX_LOC.val, "MCX_LOC",
+ sizeof (cdat->dstr_1512__MCX_LOC.val) - 1);
-/*iniobj dsym_1509__MCX_NORMTESTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1670*/ meltfptr[1669])
- /*_.VALDATA___V1670*/
- meltfptr[1669] = (void *) &cdat->dsym_1509__MCX_NORMTESTER;
+/*iniobj dsym_1513__MCX_NORMTESTER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1677*/ meltfptr[1676])
+ /*_.VALDATA___V1677*/
+ meltfptr[1676] = (void *) &cdat->dsym_1513__MCX_NORMTESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1509__MCX_NORMTESTER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1513__MCX_NORMTESTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1509__MCX_NORMTESTER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1513__MCX_NORMTESTER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1509__MCX_NORMTESTER.meltobj_class =
+ cdat->dsym_1513__MCX_NORMTESTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1509__MCX_NORMTESTER.obj_hash = 385472453;
- cdat->dsym_1509__MCX_NORMTESTER.obj_len = 3;
+ cdat->dsym_1513__MCX_NORMTESTER.obj_hash = 385472453;
+ cdat->dsym_1513__MCX_NORMTESTER.obj_len = 3;
-/*inistring dstr_1510__MCX_NORMTESTER*/
- /*_.VALSTR___V1671*/ meltfptr[1670] =
- (void *) &cdat->dstr_1510__MCX_NORMTESTER;
- cdat->dstr_1510__MCX_NORMTESTER.discr =
+/*inistring dstr_1514__MCX_NORMTESTER*/
+ /*_.VALSTR___V1678*/ meltfptr[1677] =
+ (void *) &cdat->dstr_1514__MCX_NORMTESTER;
+ cdat->dstr_1514__MCX_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1510__MCX_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1514__MCX_NORMTESTER.val,
"MCX_NORMTESTER",
- sizeof (cdat->dstr_1510__MCX_NORMTESTER.val) -
+ sizeof (cdat->dstr_1514__MCX_NORMTESTER.val) -
1);
/*^iniobj */
-/*iniobj dobj_1511__MCX_NORMTESTER*/
-/*_.VALDATA___V1655*/ meltfptr[1654] =
- (void *) &cdat->dobj_1511__MCX_NORMTESTER;
+/*iniobj dobj_1515__MCX_NORMTESTER*/
+/*_.VALDATA___V1662*/ meltfptr[1661] =
+ (void *) &cdat->dobj_1515__MCX_NORMTESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1511__MCX_NORMTESTER",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1515__MCX_NORMTESTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1511__MCX_NORMTESTER",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1515__MCX_NORMTESTER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1511__MCX_NORMTESTER.meltobj_class =
+ cdat->dobj_1515__MCX_NORMTESTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1511__MCX_NORMTESTER.obj_num = 2;
- cdat->dobj_1511__MCX_NORMTESTER.obj_hash = 1059384176;
- cdat->dobj_1511__MCX_NORMTESTER.obj_len = 4;
+ cdat->dobj_1515__MCX_NORMTESTER.obj_num = 2;
+ cdat->dobj_1515__MCX_NORMTESTER.obj_hash = 739403382;
+ cdat->dobj_1515__MCX_NORMTESTER.obj_len = 4;
-/*inistring dstr_1512__MCX_NORMTESTER*/
- /*_.VALSTR___V1656*/ meltfptr[1655] =
- (void *) &cdat->dstr_1512__MCX_NORMTESTER;
- cdat->dstr_1512__MCX_NORMTESTER.discr =
+/*inistring dstr_1516__MCX_NORMTESTER*/
+ /*_.VALSTR___V1663*/ meltfptr[1662] =
+ (void *) &cdat->dstr_1516__MCX_NORMTESTER;
+ cdat->dstr_1516__MCX_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1512__MCX_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1516__MCX_NORMTESTER.val,
"MCX_NORMTESTER",
- sizeof (cdat->dstr_1512__MCX_NORMTESTER.val) -
+ sizeof (cdat->dstr_1516__MCX_NORMTESTER.val) -
1);
-/*iniobj dsym_1513__MCX_GOTOTHEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1672*/ meltfptr[1671])
- /*_.VALDATA___V1672*/
- meltfptr[1671] = (void *) &cdat->dsym_1513__MCX_GOTOTHEN;
+/*iniobj dsym_1517__MCX_GOTOTHEN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1679*/ meltfptr[1678])
+ /*_.VALDATA___V1679*/
+ meltfptr[1678] = (void *) &cdat->dsym_1517__MCX_GOTOTHEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1513__MCX_GOTOTHEN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1517__MCX_GOTOTHEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1513__MCX_GOTOTHEN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1517__MCX_GOTOTHEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1513__MCX_GOTOTHEN.meltobj_class =
+ cdat->dsym_1517__MCX_GOTOTHEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1513__MCX_GOTOTHEN.obj_hash = 294072678;
- cdat->dsym_1513__MCX_GOTOTHEN.obj_len = 3;
+ cdat->dsym_1517__MCX_GOTOTHEN.obj_hash = 294072678;
+ cdat->dsym_1517__MCX_GOTOTHEN.obj_len = 3;
-/*inistring dstr_1514__MCX_GOTOTHEN*/
- /*_.VALSTR___V1673*/ meltfptr[1672] =
- (void *) &cdat->dstr_1514__MCX_GOTOTHEN;
- cdat->dstr_1514__MCX_GOTOTHEN.discr =
+/*inistring dstr_1518__MCX_GOTOTHEN*/
+ /*_.VALSTR___V1680*/ meltfptr[1679] =
+ (void *) &cdat->dstr_1518__MCX_GOTOTHEN;
+ cdat->dstr_1518__MCX_GOTOTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1514__MCX_GOTOTHEN.val,
+ /*small inistring */ strncpy (cdat->dstr_1518__MCX_GOTOTHEN.val,
"MCX_GOTOTHEN",
- sizeof (cdat->dstr_1514__MCX_GOTOTHEN.val) -
+ sizeof (cdat->dstr_1518__MCX_GOTOTHEN.val) -
1);
/*^iniobj */
-/*iniobj dobj_1515__MCX_GOTOTHEN*/
-/*_.VALDATA___V1657*/ meltfptr[1656] =
- (void *) &cdat->dobj_1515__MCX_GOTOTHEN;
+/*iniobj dobj_1519__MCX_GOTOTHEN*/
+/*_.VALDATA___V1664*/ meltfptr[1663] =
+ (void *) &cdat->dobj_1519__MCX_GOTOTHEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1515__MCX_GOTOTHEN",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1519__MCX_GOTOTHEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1515__MCX_GOTOTHEN",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1519__MCX_GOTOTHEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1515__MCX_GOTOTHEN.meltobj_class =
+ cdat->dobj_1519__MCX_GOTOTHEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1515__MCX_GOTOTHEN.obj_num = 3;
- cdat->dobj_1515__MCX_GOTOTHEN.obj_hash = 580935191;
- cdat->dobj_1515__MCX_GOTOTHEN.obj_len = 4;
+ cdat->dobj_1519__MCX_GOTOTHEN.obj_num = 3;
+ cdat->dobj_1519__MCX_GOTOTHEN.obj_hash = 977912653;
+ cdat->dobj_1519__MCX_GOTOTHEN.obj_len = 4;
-/*inistring dstr_1516__MCX_GOTOTHEN*/
- /*_.VALSTR___V1658*/ meltfptr[1657] =
- (void *) &cdat->dstr_1516__MCX_GOTOTHEN;
- cdat->dstr_1516__MCX_GOTOTHEN.discr =
+/*inistring dstr_1520__MCX_GOTOTHEN*/
+ /*_.VALSTR___V1665*/ meltfptr[1664] =
+ (void *) &cdat->dstr_1520__MCX_GOTOTHEN;
+ cdat->dstr_1520__MCX_GOTOTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1516__MCX_GOTOTHEN.val,
+ /*small inistring */ strncpy (cdat->dstr_1520__MCX_GOTOTHEN.val,
"MCX_GOTOTHEN",
- sizeof (cdat->dstr_1516__MCX_GOTOTHEN.val) -
+ sizeof (cdat->dstr_1520__MCX_GOTOTHEN.val) -
1);
-/*iniobj dsym_1517__MCX_GOTOELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1674*/ meltfptr[1673])
- /*_.VALDATA___V1674*/
- meltfptr[1673] = (void *) &cdat->dsym_1517__MCX_GOTOELSE;
+/*iniobj dsym_1521__MCX_GOTOELSE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1681*/ meltfptr[1680])
+ /*_.VALDATA___V1681*/
+ meltfptr[1680] = (void *) &cdat->dsym_1521__MCX_GOTOELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1517__MCX_GOTOELSE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1521__MCX_GOTOELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1517__MCX_GOTOELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1521__MCX_GOTOELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1517__MCX_GOTOELSE.meltobj_class =
+ cdat->dsym_1521__MCX_GOTOELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1517__MCX_GOTOELSE.obj_hash = 673704960;
- cdat->dsym_1517__MCX_GOTOELSE.obj_len = 3;
+ cdat->dsym_1521__MCX_GOTOELSE.obj_hash = 673704960;
+ cdat->dsym_1521__MCX_GOTOELSE.obj_len = 3;
-/*inistring dstr_1518__MCX_GOTOELSE*/
- /*_.VALSTR___V1675*/ meltfptr[1674] =
- (void *) &cdat->dstr_1518__MCX_GOTOELSE;
- cdat->dstr_1518__MCX_GOTOELSE.discr =
+/*inistring dstr_1522__MCX_GOTOELSE*/
+ /*_.VALSTR___V1682*/ meltfptr[1681] =
+ (void *) &cdat->dstr_1522__MCX_GOTOELSE;
+ cdat->dstr_1522__MCX_GOTOELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1518__MCX_GOTOELSE.val,
+ /*small inistring */ strncpy (cdat->dstr_1522__MCX_GOTOELSE.val,
"MCX_GOTOELSE",
- sizeof (cdat->dstr_1518__MCX_GOTOELSE.val) -
+ sizeof (cdat->dstr_1522__MCX_GOTOELSE.val) -
1);
/*^iniobj */
-/*iniobj dobj_1519__MCX_GOTOELSE*/
-/*_.VALDATA___V1659*/ meltfptr[1658] =
- (void *) &cdat->dobj_1519__MCX_GOTOELSE;
+/*iniobj dobj_1523__MCX_GOTOELSE*/
+/*_.VALDATA___V1666*/ meltfptr[1665] =
+ (void *) &cdat->dobj_1523__MCX_GOTOELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1519__MCX_GOTOELSE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1523__MCX_GOTOELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1519__MCX_GOTOELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1523__MCX_GOTOELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1519__MCX_GOTOELSE.meltobj_class =
+ cdat->dobj_1523__MCX_GOTOELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1519__MCX_GOTOELSE.obj_num = 4;
- cdat->dobj_1519__MCX_GOTOELSE.obj_hash = 12608665;
- cdat->dobj_1519__MCX_GOTOELSE.obj_len = 4;
+ cdat->dobj_1523__MCX_GOTOELSE.obj_num = 4;
+ cdat->dobj_1523__MCX_GOTOELSE.obj_hash = 687852814;
+ cdat->dobj_1523__MCX_GOTOELSE.obj_len = 4;
-/*inistring dstr_1520__MCX_GOTOELSE*/
- /*_.VALSTR___V1660*/ meltfptr[1659] =
- (void *) &cdat->dstr_1520__MCX_GOTOELSE;
- cdat->dstr_1520__MCX_GOTOELSE.discr =
+/*inistring dstr_1524__MCX_GOTOELSE*/
+ /*_.VALSTR___V1667*/ meltfptr[1666] =
+ (void *) &cdat->dstr_1524__MCX_GOTOELSE;
+ cdat->dstr_1524__MCX_GOTOELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1520__MCX_GOTOELSE.val,
+ /*small inistring */ strncpy (cdat->dstr_1524__MCX_GOTOELSE.val,
"MCX_GOTOELSE",
- sizeof (cdat->dstr_1520__MCX_GOTOELSE.val) -
+ sizeof (cdat->dstr_1524__MCX_GOTOELSE.val) -
1);
-/*iniobj dsym_1521__MCX_OLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1676*/ meltfptr[1675])
- /*_.VALDATA___V1676*/
- meltfptr[1675] = (void *) &cdat->dsym_1521__MCX_OLIST;
+/*iniobj dsym_1525__MCX_OLIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1683*/ meltfptr[1682])
+ /*_.VALDATA___V1683*/
+ meltfptr[1682] = (void *) &cdat->dsym_1525__MCX_OLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1521__MCX_OLIST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1525__MCX_OLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1521__MCX_OLIST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1525__MCX_OLIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1521__MCX_OLIST.meltobj_class =
+ cdat->dsym_1525__MCX_OLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1521__MCX_OLIST.obj_hash = 25914724;
- cdat->dsym_1521__MCX_OLIST.obj_len = 3;
+ cdat->dsym_1525__MCX_OLIST.obj_hash = 25914724;
+ cdat->dsym_1525__MCX_OLIST.obj_len = 3;
-/*inistring dstr_1522__MCX_OLIST*/
- /*_.VALSTR___V1677*/ meltfptr[1676] = (void *) &cdat->dstr_1522__MCX_OLIST;
- cdat->dstr_1522__MCX_OLIST.discr =
+/*inistring dstr_1526__MCX_OLIST*/
+ /*_.VALSTR___V1684*/ meltfptr[1683] = (void *) &cdat->dstr_1526__MCX_OLIST;
+ cdat->dstr_1526__MCX_OLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1522__MCX_OLIST.val, "MCX_OLIST",
- sizeof (cdat->dstr_1522__MCX_OLIST.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1526__MCX_OLIST.val, "MCX_OLIST",
+ sizeof (cdat->dstr_1526__MCX_OLIST.val) - 1);
/*^iniobj */
-/*iniobj dobj_1523__MCX_OLIST*/
-/*_.VALDATA___V1661*/ meltfptr[1660] = (void *) &cdat->dobj_1523__MCX_OLIST;
+/*iniobj dobj_1527__MCX_OLIST*/
+/*_.VALDATA___V1668*/ meltfptr[1667] = (void *) &cdat->dobj_1527__MCX_OLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1523__MCX_OLIST",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1527__MCX_OLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1523__MCX_OLIST",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1527__MCX_OLIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1523__MCX_OLIST.meltobj_class =
+ cdat->dobj_1527__MCX_OLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1523__MCX_OLIST.obj_num = 5;
- cdat->dobj_1523__MCX_OLIST.obj_hash = 581380670;
- cdat->dobj_1523__MCX_OLIST.obj_len = 4;
+ cdat->dobj_1527__MCX_OLIST.obj_num = 5;
+ cdat->dobj_1527__MCX_OLIST.obj_hash = 787939248;
+ cdat->dobj_1527__MCX_OLIST.obj_len = 4;
-/*inistring dstr_1524__MCX_OLIST*/
- /*_.VALSTR___V1662*/ meltfptr[1661] = (void *) &cdat->dstr_1524__MCX_OLIST;
- cdat->dstr_1524__MCX_OLIST.discr =
+/*inistring dstr_1528__MCX_OLIST*/
+ /*_.VALSTR___V1669*/ meltfptr[1668] = (void *) &cdat->dstr_1528__MCX_OLIST;
+ cdat->dstr_1528__MCX_OLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1524__MCX_OLIST.val, "MCX_OLIST",
- sizeof (cdat->dstr_1524__MCX_OLIST.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1528__MCX_OLIST.val, "MCX_OLIST",
+ sizeof (cdat->dstr_1528__MCX_OLIST.val) - 1);
-/*iniobj dsym_1525__MCX_SUFFIX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1678*/ meltfptr[1677])
- /*_.VALDATA___V1678*/
- meltfptr[1677] = (void *) &cdat->dsym_1525__MCX_SUFFIX;
+/*iniobj dsym_1529__MCX_SUFFIX*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1685*/ meltfptr[1684])
+ /*_.VALDATA___V1685*/
+ meltfptr[1684] = (void *) &cdat->dsym_1529__MCX_SUFFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1525__MCX_SUFFIX",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1529__MCX_SUFFIX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1525__MCX_SUFFIX",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1529__MCX_SUFFIX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1525__MCX_SUFFIX.meltobj_class =
+ cdat->dsym_1529__MCX_SUFFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1525__MCX_SUFFIX.obj_hash = 853231498;
- cdat->dsym_1525__MCX_SUFFIX.obj_len = 3;
+ cdat->dsym_1529__MCX_SUFFIX.obj_hash = 853231498;
+ cdat->dsym_1529__MCX_SUFFIX.obj_len = 3;
-/*inistring dstr_1526__MCX_SUFFIX*/
- /*_.VALSTR___V1679*/ meltfptr[1678] = (void *) &cdat->dstr_1526__MCX_SUFFIX;
- cdat->dstr_1526__MCX_SUFFIX.discr =
+/*inistring dstr_1530__MCX_SUFFIX*/
+ /*_.VALSTR___V1686*/ meltfptr[1685] = (void *) &cdat->dstr_1530__MCX_SUFFIX;
+ cdat->dstr_1530__MCX_SUFFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1526__MCX_SUFFIX.val, "MCX_SUFFIX",
- sizeof (cdat->dstr_1526__MCX_SUFFIX.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1530__MCX_SUFFIX.val, "MCX_SUFFIX",
+ sizeof (cdat->dstr_1530__MCX_SUFFIX.val) - 1);
/*^iniobj */
-/*iniobj dobj_1527__MCX_SUFFIX*/
-/*_.VALDATA___V1663*/ meltfptr[1662] =
- (void *) &cdat->dobj_1527__MCX_SUFFIX;
+/*iniobj dobj_1531__MCX_SUFFIX*/
+/*_.VALDATA___V1670*/ meltfptr[1669] =
+ (void *) &cdat->dobj_1531__MCX_SUFFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1527__MCX_SUFFIX",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1531__MCX_SUFFIX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1527__MCX_SUFFIX",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1531__MCX_SUFFIX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1527__MCX_SUFFIX.meltobj_class =
+ cdat->dobj_1531__MCX_SUFFIX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1527__MCX_SUFFIX.obj_num = 6;
- cdat->dobj_1527__MCX_SUFFIX.obj_hash = 737439964;
- cdat->dobj_1527__MCX_SUFFIX.obj_len = 4;
+ cdat->dobj_1531__MCX_SUFFIX.obj_num = 6;
+ cdat->dobj_1531__MCX_SUFFIX.obj_hash = 584698119;
+ cdat->dobj_1531__MCX_SUFFIX.obj_len = 4;
-/*inistring dstr_1528__MCX_SUFFIX*/
- /*_.VALSTR___V1664*/ meltfptr[1663] = (void *) &cdat->dstr_1528__MCX_SUFFIX;
- cdat->dstr_1528__MCX_SUFFIX.discr =
+/*inistring dstr_1532__MCX_SUFFIX*/
+ /*_.VALSTR___V1671*/ meltfptr[1670] = (void *) &cdat->dstr_1532__MCX_SUFFIX;
+ cdat->dstr_1532__MCX_SUFFIX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1528__MCX_SUFFIX.val, "MCX_SUFFIX",
- sizeof (cdat->dstr_1528__MCX_SUFFIX.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1532__MCX_SUFFIX.val, "MCX_SUFFIX",
+ sizeof (cdat->dstr_1532__MCX_SUFFIX.val) - 1);
-/*iniobj dsym_1529__MCX_STATECOUNTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1680*/ meltfptr[1679])
- /*_.VALDATA___V1680*/
- meltfptr[1679] = (void *) &cdat->dsym_1529__MCX_STATECOUNTER;
+/*iniobj dsym_1533__MCX_STATECOUNTER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1687*/ meltfptr[1686])
+ /*_.VALDATA___V1687*/
+ meltfptr[1686] = (void *) &cdat->dsym_1533__MCX_STATECOUNTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1529__MCX_STATECOUNTER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1533__MCX_STATECOUNTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1529__MCX_STATECOUNTER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1533__MCX_STATECOUNTER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1529__MCX_STATECOUNTER.meltobj_class =
+ cdat->dsym_1533__MCX_STATECOUNTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1529__MCX_STATECOUNTER.obj_hash = 893073031;
- cdat->dsym_1529__MCX_STATECOUNTER.obj_len = 3;
+ cdat->dsym_1533__MCX_STATECOUNTER.obj_hash = 893073031;
+ cdat->dsym_1533__MCX_STATECOUNTER.obj_len = 3;
-/*inistring dstr_1530__MCX_STATECOUNTER*/
- /*_.VALSTR___V1681*/ meltfptr[1680] =
- (void *) &cdat->dstr_1530__MCX_STATECOUNTER;
- cdat->dstr_1530__MCX_STATECOUNTER.discr =
+/*inistring dstr_1534__MCX_STATECOUNTER*/
+ /*_.VALSTR___V1688*/ meltfptr[1687] =
+ (void *) &cdat->dstr_1534__MCX_STATECOUNTER;
+ cdat->dstr_1534__MCX_STATECOUNTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1530__MCX_STATECOUNTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1534__MCX_STATECOUNTER.val,
"MCX_STATECOUNTER",
- sizeof (cdat->dstr_1530__MCX_STATECOUNTER.
+ sizeof (cdat->dstr_1534__MCX_STATECOUNTER.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1531__MCX_STATECOUNTER*/
-/*_.VALDATA___V1665*/ meltfptr[1664] =
- (void *) &cdat->dobj_1531__MCX_STATECOUNTER;
+/*iniobj dobj_1535__MCX_STATECOUNTER*/
+/*_.VALDATA___V1672*/ meltfptr[1671] =
+ (void *) &cdat->dobj_1535__MCX_STATECOUNTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1531__MCX_STATECOUNTER",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1535__MCX_STATECOUNTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1531__MCX_STATECOUNTER",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1535__MCX_STATECOUNTER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1531__MCX_STATECOUNTER.meltobj_class =
+ cdat->dobj_1535__MCX_STATECOUNTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1531__MCX_STATECOUNTER.obj_num = 7;
- cdat->dobj_1531__MCX_STATECOUNTER.obj_hash = 90898955;
- cdat->dobj_1531__MCX_STATECOUNTER.obj_len = 4;
+ cdat->dobj_1535__MCX_STATECOUNTER.obj_num = 7;
+ cdat->dobj_1535__MCX_STATECOUNTER.obj_hash = 284624693;
+ cdat->dobj_1535__MCX_STATECOUNTER.obj_len = 4;
-/*inistring dstr_1532__MCX_STATECOUNTER*/
- /*_.VALSTR___V1666*/ meltfptr[1665] =
- (void *) &cdat->dstr_1532__MCX_STATECOUNTER;
- cdat->dstr_1532__MCX_STATECOUNTER.discr =
+/*inistring dstr_1536__MCX_STATECOUNTER*/
+ /*_.VALSTR___V1673*/ meltfptr[1672] =
+ (void *) &cdat->dstr_1536__MCX_STATECOUNTER;
+ cdat->dstr_1536__MCX_STATECOUNTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1532__MCX_STATECOUNTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1536__MCX_STATECOUNTER.val,
"MCX_STATECOUNTER",
- sizeof (cdat->dstr_1532__MCX_STATECOUNTER.
+ sizeof (cdat->dstr_1536__MCX_STATECOUNTER.
val) - 1);
-/*iniobj dsym_1533__COMPILE_TESTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1682*/ meltfptr[1681])
- /*_.VALDATA___V1682*/
- meltfptr[1681] = (void *) &cdat->dsym_1533__COMPILE_TESTER;
+/*iniobj dsym_1537__COMPILE_TESTER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1689*/ meltfptr[1688])
+ /*_.VALDATA___V1689*/
+ meltfptr[1688] = (void *) &cdat->dsym_1537__COMPILE_TESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1533__COMPILE_TESTER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1537__COMPILE_TESTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1533__COMPILE_TESTER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1537__COMPILE_TESTER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1533__COMPILE_TESTER.meltobj_class =
+ cdat->dsym_1537__COMPILE_TESTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1533__COMPILE_TESTER.obj_hash = 367976153;
- cdat->dsym_1533__COMPILE_TESTER.obj_len = 3;
+ cdat->dsym_1537__COMPILE_TESTER.obj_hash = 367976153;
+ cdat->dsym_1537__COMPILE_TESTER.obj_len = 3;
-/*inistring dstr_1534__COMPILE_TESTER*/
- /*_.VALSTR___V1683*/ meltfptr[1682] =
- (void *) &cdat->dstr_1534__COMPILE_TESTER;
- cdat->dstr_1534__COMPILE_TESTER.discr =
+/*inistring dstr_1538__COMPILE_TESTER*/
+ /*_.VALSTR___V1690*/ meltfptr[1689] =
+ (void *) &cdat->dstr_1538__COMPILE_TESTER;
+ cdat->dstr_1538__COMPILE_TESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1534__COMPILE_TESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1538__COMPILE_TESTER.val,
"COMPILE_TESTER",
- sizeof (cdat->dstr_1534__COMPILE_TESTER.val) -
+ sizeof (cdat->dstr_1538__COMPILE_TESTER.val) -
1);
- MELT_LOCATION ("warmelt-genobj.melt:5013:/ iniobj");
+ MELT_LOCATION ("warmelt-genobj.melt:5037:/ iniobj");
-/*iniobj dobj_1535__COMPILE_TESTER*/
-/*_.VALDATA___V1684*/ meltfptr[1683] =
- (void *) &cdat->dobj_1535__COMPILE_TESTER;
+/*iniobj dobj_1539__COMPILE_TESTER*/
+/*_.VALDATA___V1691*/ meltfptr[1690] =
+ (void *) &cdat->dobj_1539__COMPILE_TESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1535__COMPILE_TESTER",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1539__COMPILE_TESTER",
melt_magic_discr ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1535__COMPILE_TESTER",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1539__COMPILE_TESTER",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1535__COMPILE_TESTER.meltobj_class =
+ cdat->dobj_1539__COMPILE_TESTER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]);
- cdat->dobj_1535__COMPILE_TESTER.obj_hash = 530538156;
- cdat->dobj_1535__COMPILE_TESTER.obj_len = 4;
+ cdat->dobj_1539__COMPILE_TESTER.obj_hash = 85254899;
+ cdat->dobj_1539__COMPILE_TESTER.obj_len = 4;
-/*inistring dstr_1536__COMPILE_TESTER*/
- /*_.VALSTR___V1685*/ meltfptr[1684] =
- (void *) &cdat->dstr_1536__COMPILE_TESTER;
- cdat->dstr_1536__COMPILE_TESTER.discr =
+/*inistring dstr_1540__COMPILE_TESTER*/
+ /*_.VALSTR___V1692*/ meltfptr[1691] =
+ (void *) &cdat->dstr_1540__COMPILE_TESTER;
+ cdat->dstr_1540__COMPILE_TESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1536__COMPILE_TESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1540__COMPILE_TESTER.val,
"COMPILE_TESTER",
- sizeof (cdat->dstr_1536__COMPILE_TESTER.val) -
+ sizeof (cdat->dstr_1540__COMPILE_TESTER.val) -
1);
-/*iniobj dsym_1537__CLASS_TESTERCOMPILCONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1686*/ meltfptr[1685])
- /*_.VALDATA___V1686*/
- meltfptr[1685] = (void *) &cdat->dsym_1537__CLASS_TESTERCOMPILCONTEXT;
+/*iniobj dsym_1541__CLASS_TESTERCOMPILCONTEXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1693*/ meltfptr[1692])
+ /*_.VALDATA___V1693*/
+ meltfptr[1692] = (void *) &cdat->dsym_1541__CLASS_TESTERCOMPILCONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1537__CLASS_TESTERCOMPILCONTEXT",
+ ("iniobj check.discr isobj dsym_1541__CLASS_TESTERCOMPILCONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1537__CLASS_TESTERCOMPILCONTEXT",
+ ("iniobj check.discr objmagic dsym_1541__CLASS_TESTERCOMPILCONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1537__CLASS_TESTERCOMPILCONTEXT.meltobj_class =
+ cdat->dsym_1541__CLASS_TESTERCOMPILCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1537__CLASS_TESTERCOMPILCONTEXT.obj_hash = 340923428;
- cdat->dsym_1537__CLASS_TESTERCOMPILCONTEXT.obj_len = 3;
+ cdat->dsym_1541__CLASS_TESTERCOMPILCONTEXT.obj_hash = 340923428;
+ cdat->dsym_1541__CLASS_TESTERCOMPILCONTEXT.obj_len = 3;
-/*inistring dstr_1538__CLASS_TESTERCOMP*/
- /*_.VALSTR___V1687*/ meltfptr[1686] =
- (void *) &cdat->dstr_1538__CLASS_TESTERCOMP;
- cdat->dstr_1538__CLASS_TESTERCOMP.discr =
+/*inistring dstr_1542__CLASS_TESTERCOMP*/
+ /*_.VALSTR___V1694*/ meltfptr[1693] =
+ (void *) &cdat->dstr_1542__CLASS_TESTERCOMP;
+ cdat->dstr_1542__CLASS_TESTERCOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1538__CLASS_TESTERCOMP.val,
+ /*small inistring */ strncpy (cdat->dstr_1542__CLASS_TESTERCOMP.val,
"CLASS_TESTERCOMPILCONTEXT",
- sizeof (cdat->dstr_1538__CLASS_TESTERCOMP.
+ sizeof (cdat->dstr_1542__CLASS_TESTERCOMP.
val) - 1);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ iniobj");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ iniobj");
-/*iniobj dobj_1539__CLASS_TESTERCOMPILCONTEXT*/
-/*_.VALDATA___V1688*/ meltfptr[1687] =
- (void *) &cdat->dobj_1539__CLASS_TESTERCOMPILCONTEXT;
+/*iniobj dobj_1543__CLASS_TESTERCOMPILCONTEXT*/
+/*_.VALDATA___V1695*/ meltfptr[1694] =
+ (void *) &cdat->dobj_1543__CLASS_TESTERCOMPILCONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1539__CLASS_TESTERCOMPILCONTEXT",
+ ("iniobj check.discr isobj dobj_1543__CLASS_TESTERCOMPILCONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1539__CLASS_TESTERCOMPILCONTEXT",
+ ("iniobj check.discr objmagic dobj_1543__CLASS_TESTERCOMPILCONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1539__CLASS_TESTERCOMPILCONTEXT.meltobj_class =
+ cdat->dobj_1543__CLASS_TESTERCOMPILCONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1539__CLASS_TESTERCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1539__CLASS_TESTERCOMPILCONTEXT.obj_hash = 1053834963;
- cdat->dobj_1539__CLASS_TESTERCOMPILCONTEXT.obj_len = 8;
+ cdat->dobj_1543__CLASS_TESTERCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1543__CLASS_TESTERCOMPILCONTEXT.obj_hash = 199620465;
+ cdat->dobj_1543__CLASS_TESTERCOMPILCONTEXT.obj_len = 8;
-/*inistring dstr_1540__CLASS_TESTERCOMP*/
- /*_.VALSTR___V1689*/ meltfptr[1688] =
- (void *) &cdat->dstr_1540__CLASS_TESTERCOMP;
- cdat->dstr_1540__CLASS_TESTERCOMP.discr =
+/*inistring dstr_1544__CLASS_TESTERCOMP*/
+ /*_.VALSTR___V1696*/ meltfptr[1695] =
+ (void *) &cdat->dstr_1544__CLASS_TESTERCOMP;
+ cdat->dstr_1544__CLASS_TESTERCOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1540__CLASS_TESTERCOMP.val,
+ /*small inistring */ strncpy (cdat->dstr_1544__CLASS_TESTERCOMP.val,
"CLASS_TESTERCOMPILCONTEXT",
- sizeof (cdat->dstr_1540__CLASS_TESTERCOMP.
+ sizeof (cdat->dstr_1544__CLASS_TESTERCOMP.
val) - 1);
- /*inimult dtup_1541__CLASS_TESTERCOMPILCONTEXT */
- /*_.VALTUP___V1690*/ meltfptr[1689] =
- (void *) &cdat->dtup_1541__CLASS_TESTERCOMPILCONTEXT;
- cdat->dtup_1541__CLASS_TESTERCOMPILCONTEXT.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1541__CLASS_TESTERCOMPILCONTEXT.nbval = 2;
- /*inimult dtup_1542__CLASS_TESTERCOMPILCONTEXT */
+ /*inimult dtup_1545__CLASS_TESTERCOMPILCONTEXT */
/*_.VALTUP___V1697*/ meltfptr[1696] =
- (void *) &cdat->dtup_1542__CLASS_TESTERCOMPILCONTEXT;
- cdat->dtup_1542__CLASS_TESTERCOMPILCONTEXT.discr =
+ (void *) &cdat->dtup_1545__CLASS_TESTERCOMPILCONTEXT;
+ cdat->dtup_1545__CLASS_TESTERCOMPILCONTEXT.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_1545__CLASS_TESTERCOMPILCONTEXT.nbval = 2;
+ /*inimult dtup_1546__CLASS_TESTERCOMPILCONTEXT */
+ /*_.VALTUP___V1704*/ meltfptr[1703] =
+ (void *) &cdat->dtup_1546__CLASS_TESTERCOMPILCONTEXT;
+ cdat->dtup_1546__CLASS_TESTERCOMPILCONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1542__CLASS_TESTERCOMPILCONTEXT.nbval = 4;
+ cdat->dtup_1546__CLASS_TESTERCOMPILCONTEXT.nbval = 4;
-/*iniobj dsym_1543__TCX_NRMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1698*/ meltfptr[1697])
- /*_.VALDATA___V1698*/
- meltfptr[1697] = (void *) &cdat->dsym_1543__TCX_NRMATCH;
+/*iniobj dsym_1547__TCX_NRMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1705*/ meltfptr[1704])
+ /*_.VALDATA___V1705*/
+ meltfptr[1704] = (void *) &cdat->dsym_1547__TCX_NRMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1543__TCX_NRMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1547__TCX_NRMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1543__TCX_NRMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1547__TCX_NRMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1543__TCX_NRMATCH.meltobj_class =
+ cdat->dsym_1547__TCX_NRMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1543__TCX_NRMATCH.obj_hash = 969696101;
- cdat->dsym_1543__TCX_NRMATCH.obj_len = 3;
+ cdat->dsym_1547__TCX_NRMATCH.obj_hash = 969696101;
+ cdat->dsym_1547__TCX_NRMATCH.obj_len = 3;
-/*inistring dstr_1544__TCX_NRMATCH*/
- /*_.VALSTR___V1699*/ meltfptr[1698] =
- (void *) &cdat->dstr_1544__TCX_NRMATCH;
- cdat->dstr_1544__TCX_NRMATCH.discr =
+/*inistring dstr_1548__TCX_NRMATCH*/
+ /*_.VALSTR___V1706*/ meltfptr[1705] =
+ (void *) &cdat->dstr_1548__TCX_NRMATCH;
+ cdat->dstr_1548__TCX_NRMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1544__TCX_NRMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1548__TCX_NRMATCH.val,
"TCX_NRMATCH",
- sizeof (cdat->dstr_1544__TCX_NRMATCH.val) -
+ sizeof (cdat->dstr_1548__TCX_NRMATCH.val) -
1);
/*^iniobj */
-/*iniobj dobj_1545__TCX_NRMATCH*/
-/*_.VALDATA___V1691*/ meltfptr[1690] =
- (void *) &cdat->dobj_1545__TCX_NRMATCH;
+/*iniobj dobj_1549__TCX_NRMATCH*/
+/*_.VALDATA___V1698*/ meltfptr[1697] =
+ (void *) &cdat->dobj_1549__TCX_NRMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1545__TCX_NRMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1549__TCX_NRMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1545__TCX_NRMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1549__TCX_NRMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1545__TCX_NRMATCH.meltobj_class =
+ cdat->dobj_1549__TCX_NRMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1545__TCX_NRMATCH.obj_num = 1;
- cdat->dobj_1545__TCX_NRMATCH.obj_hash = 678096003;
- cdat->dobj_1545__TCX_NRMATCH.obj_len = 4;
+ cdat->dobj_1549__TCX_NRMATCH.obj_num = 1;
+ cdat->dobj_1549__TCX_NRMATCH.obj_hash = 839490186;
+ cdat->dobj_1549__TCX_NRMATCH.obj_len = 4;
-/*inistring dstr_1546__TCX_NRMATCH*/
- /*_.VALSTR___V1692*/ meltfptr[1691] =
- (void *) &cdat->dstr_1546__TCX_NRMATCH;
- cdat->dstr_1546__TCX_NRMATCH.discr =
+/*inistring dstr_1550__TCX_NRMATCH*/
+ /*_.VALSTR___V1699*/ meltfptr[1698] =
+ (void *) &cdat->dstr_1550__TCX_NRMATCH;
+ cdat->dstr_1550__TCX_NRMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1546__TCX_NRMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1550__TCX_NRMATCH.val,
"TCX_NRMATCH",
- sizeof (cdat->dstr_1546__TCX_NRMATCH.val) -
+ sizeof (cdat->dstr_1550__TCX_NRMATCH.val) -
1);
-/*iniobj dsym_1547__TCX_FREELIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1700*/ meltfptr[1699])
- /*_.VALDATA___V1700*/
- meltfptr[1699] = (void *) &cdat->dsym_1547__TCX_FREELIST;
+/*iniobj dsym_1551__TCX_FREELIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1707*/ meltfptr[1706])
+ /*_.VALDATA___V1707*/
+ meltfptr[1706] = (void *) &cdat->dsym_1551__TCX_FREELIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1547__TCX_FREELIST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1551__TCX_FREELIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1547__TCX_FREELIST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1551__TCX_FREELIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1547__TCX_FREELIST.meltobj_class =
+ cdat->dsym_1551__TCX_FREELIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1547__TCX_FREELIST.obj_hash = 514682872;
- cdat->dsym_1547__TCX_FREELIST.obj_len = 3;
+ cdat->dsym_1551__TCX_FREELIST.obj_hash = 514682872;
+ cdat->dsym_1551__TCX_FREELIST.obj_len = 3;
-/*inistring dstr_1548__TCX_FREELIST*/
- /*_.VALSTR___V1701*/ meltfptr[1700] =
- (void *) &cdat->dstr_1548__TCX_FREELIST;
- cdat->dstr_1548__TCX_FREELIST.discr =
+/*inistring dstr_1552__TCX_FREELIST*/
+ /*_.VALSTR___V1708*/ meltfptr[1707] =
+ (void *) &cdat->dstr_1552__TCX_FREELIST;
+ cdat->dstr_1552__TCX_FREELIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1548__TCX_FREELIST.val,
+ /*small inistring */ strncpy (cdat->dstr_1552__TCX_FREELIST.val,
"TCX_FREELIST",
- sizeof (cdat->dstr_1548__TCX_FREELIST.val) -
+ sizeof (cdat->dstr_1552__TCX_FREELIST.val) -
1);
/*^iniobj */
-/*iniobj dobj_1549__TCX_FREELIST*/
-/*_.VALDATA___V1693*/ meltfptr[1692] =
- (void *) &cdat->dobj_1549__TCX_FREELIST;
+/*iniobj dobj_1553__TCX_FREELIST*/
+/*_.VALDATA___V1700*/ meltfptr[1699] =
+ (void *) &cdat->dobj_1553__TCX_FREELIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1549__TCX_FREELIST",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1553__TCX_FREELIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1549__TCX_FREELIST",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1553__TCX_FREELIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1549__TCX_FREELIST.meltobj_class =
+ cdat->dobj_1553__TCX_FREELIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1549__TCX_FREELIST.obj_num = 2;
- cdat->dobj_1549__TCX_FREELIST.obj_hash = 776891886;
- cdat->dobj_1549__TCX_FREELIST.obj_len = 4;
+ cdat->dobj_1553__TCX_FREELIST.obj_num = 2;
+ cdat->dobj_1553__TCX_FREELIST.obj_hash = 895272960;
+ cdat->dobj_1553__TCX_FREELIST.obj_len = 4;
-/*inistring dstr_1550__TCX_FREELIST*/
- /*_.VALSTR___V1694*/ meltfptr[1693] =
- (void *) &cdat->dstr_1550__TCX_FREELIST;
- cdat->dstr_1550__TCX_FREELIST.discr =
+/*inistring dstr_1554__TCX_FREELIST*/
+ /*_.VALSTR___V1701*/ meltfptr[1700] =
+ (void *) &cdat->dstr_1554__TCX_FREELIST;
+ cdat->dstr_1554__TCX_FREELIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1550__TCX_FREELIST.val,
+ /*small inistring */ strncpy (cdat->dstr_1554__TCX_FREELIST.val,
"TCX_FREELIST",
- sizeof (cdat->dstr_1550__TCX_FREELIST.val) -
+ sizeof (cdat->dstr_1554__TCX_FREELIST.val) -
1);
-/*iniobj dsym_1551__TCX_NEXTEST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1702*/ meltfptr[1701])
- /*_.VALDATA___V1702*/
- meltfptr[1701] = (void *) &cdat->dsym_1551__TCX_NEXTEST;
+/*iniobj dsym_1555__TCX_NEXTEST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1709*/ meltfptr[1708])
+ /*_.VALDATA___V1709*/
+ meltfptr[1708] = (void *) &cdat->dsym_1555__TCX_NEXTEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1551__TCX_NEXTEST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1555__TCX_NEXTEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1551__TCX_NEXTEST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1555__TCX_NEXTEST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1551__TCX_NEXTEST.meltobj_class =
+ cdat->dsym_1555__TCX_NEXTEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1551__TCX_NEXTEST.obj_hash = 64609921;
- cdat->dsym_1551__TCX_NEXTEST.obj_len = 3;
+ cdat->dsym_1555__TCX_NEXTEST.obj_hash = 64609921;
+ cdat->dsym_1555__TCX_NEXTEST.obj_len = 3;
-/*inistring dstr_1552__TCX_NEXTEST*/
- /*_.VALSTR___V1703*/ meltfptr[1702] =
- (void *) &cdat->dstr_1552__TCX_NEXTEST;
- cdat->dstr_1552__TCX_NEXTEST.discr =
+/*inistring dstr_1556__TCX_NEXTEST*/
+ /*_.VALSTR___V1710*/ meltfptr[1709] =
+ (void *) &cdat->dstr_1556__TCX_NEXTEST;
+ cdat->dstr_1556__TCX_NEXTEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1552__TCX_NEXTEST.val,
+ /*small inistring */ strncpy (cdat->dstr_1556__TCX_NEXTEST.val,
"TCX_NEXTEST",
- sizeof (cdat->dstr_1552__TCX_NEXTEST.val) -
+ sizeof (cdat->dstr_1556__TCX_NEXTEST.val) -
1);
/*^iniobj */
-/*iniobj dobj_1553__TCX_NEXTEST*/
-/*_.VALDATA___V1695*/ meltfptr[1694] =
- (void *) &cdat->dobj_1553__TCX_NEXTEST;
+/*iniobj dobj_1557__TCX_NEXTEST*/
+/*_.VALDATA___V1702*/ meltfptr[1701] =
+ (void *) &cdat->dobj_1557__TCX_NEXTEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1553__TCX_NEXTEST",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1557__TCX_NEXTEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1553__TCX_NEXTEST",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1557__TCX_NEXTEST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1553__TCX_NEXTEST.meltobj_class =
+ cdat->dobj_1557__TCX_NEXTEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1553__TCX_NEXTEST.obj_num = 3;
- cdat->dobj_1553__TCX_NEXTEST.obj_hash = 1024631422;
- cdat->dobj_1553__TCX_NEXTEST.obj_len = 4;
+ cdat->dobj_1557__TCX_NEXTEST.obj_num = 3;
+ cdat->dobj_1557__TCX_NEXTEST.obj_hash = 847095183;
+ cdat->dobj_1557__TCX_NEXTEST.obj_len = 4;
-/*inistring dstr_1554__TCX_NEXTEST*/
- /*_.VALSTR___V1696*/ meltfptr[1695] =
- (void *) &cdat->dstr_1554__TCX_NEXTEST;
- cdat->dstr_1554__TCX_NEXTEST.discr =
+/*inistring dstr_1558__TCX_NEXTEST*/
+ /*_.VALSTR___V1703*/ meltfptr[1702] =
+ (void *) &cdat->dstr_1558__TCX_NEXTEST;
+ cdat->dstr_1558__TCX_NEXTEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1554__TCX_NEXTEST.val,
+ /*small inistring */ strncpy (cdat->dstr_1558__TCX_NEXTEST.val,
"TCX_NEXTEST",
- sizeof (cdat->dstr_1554__TCX_NEXTEST.val) -
+ sizeof (cdat->dstr_1558__TCX_NEXTEST.val) -
1);
- /*inirout drout_1555__COMPILTST_ANYTESTER */
- /*_.VALROUT___V1704*/ meltfptr[1703] =
- (void *) &cdat->drout_1555__COMPILTST_ANYTESTER;
- cdat->drout_1555__COMPILTST_ANYTESTER.discr =
+ /*inirout drout_1559__COMPILTST_ANYTESTER */
+ /*_.VALROUT___V1711*/ meltfptr[1710] =
+ (void *) &cdat->drout_1559__COMPILTST_ANYTESTER;
+ cdat->drout_1559__COMPILTST_ANYTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1555__COMPILTST_ANYTESTER.routdescr,
- "COMPILTST_ANYTESTER @warmelt-genobj.melt:5026",
+ strncpy (cdat->drout_1559__COMPILTST_ANYTESTER.routdescr,
+ "COMPILTST_ANYTESTER @warmelt-genobj.melt:5050",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1555__COMPILTST_ANYTESTER.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1555__COMPILTST_ANYTESTER,
- meltrout_152_warmelt_genobj_COMPILTST_ANYTESTER);
-
- /*iniclos dclo_1556__COMPILTST_ANYTESTER */
- /*_.VALCLO___V1705*/ meltfptr[1704] =
- (void *) &cdat->dclo_1556__COMPILTST_ANYTESTER;
- cdat->dclo_1556__COMPILTST_ANYTESTER.discr =
+ cdat->drout_1559__COMPILTST_ANYTESTER.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1559__COMPILTST_ANYTESTER,
+ meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER);
+
+ /*iniclos dclo_1560__COMPILTST_ANYTESTER */
+ /*_.VALCLO___V1712*/ meltfptr[1711] =
+ (void *) &cdat->dclo_1560__COMPILTST_ANYTESTER;
+ cdat->dclo_1560__COMPILTST_ANYTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1556__COMPILTST_ANYTESTER.nbval = 0;
+ cdat->dclo_1560__COMPILTST_ANYTESTER.nbval = 0;
-/*iniobj dsym_1557__CLASS_NORMTESTER_ANY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1706*/ meltfptr[1705])
- /*_.VALDATA___V1706*/
- meltfptr[1705] = (void *) &cdat->dsym_1557__CLASS_NORMTESTER_ANY;
+/*iniobj dsym_1561__CLASS_NORMTESTER_ANY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1713*/ meltfptr[1712])
+ /*_.VALDATA___V1713*/
+ meltfptr[1712] = (void *) &cdat->dsym_1561__CLASS_NORMTESTER_ANY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1557__CLASS_NORMTESTER_ANY",
+ ("iniobj check.discr isobj dsym_1561__CLASS_NORMTESTER_ANY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1557__CLASS_NORMTESTER_ANY",
+ ("iniobj check.discr objmagic dsym_1561__CLASS_NORMTESTER_ANY",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1557__CLASS_NORMTESTER_ANY.meltobj_class =
+ cdat->dsym_1561__CLASS_NORMTESTER_ANY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1557__CLASS_NORMTESTER_ANY.obj_hash = 734583955;
- cdat->dsym_1557__CLASS_NORMTESTER_ANY.obj_len = 3;
+ cdat->dsym_1561__CLASS_NORMTESTER_ANY.obj_hash = 734583955;
+ cdat->dsym_1561__CLASS_NORMTESTER_ANY.obj_len = 3;
-/*inistring dstr_1558__CLASS_NORMTESTER*/
- /*_.VALSTR___V1707*/ meltfptr[1706] =
- (void *) &cdat->dstr_1558__CLASS_NORMTESTER;
- cdat->dstr_1558__CLASS_NORMTESTER.discr =
+/*inistring dstr_1562__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1714*/ meltfptr[1713] =
+ (void *) &cdat->dstr_1562__CLASS_NORMTESTER;
+ cdat->dstr_1562__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1558__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1562__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_ANY",
- sizeof (cdat->dstr_1558__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1562__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1559__COMPILOBJ_NREP_MATCH */
- /*_.VALROUT___V1708*/ meltfptr[1707] =
- (void *) &cdat->drout_1559__COMPILOBJ_NREP_MATCH;
- cdat->drout_1559__COMPILOBJ_NREP_MATCH.discr =
+ /*inirout drout_1563__COMPILOBJ_NREP_MATCH */
+ /*_.VALROUT___V1715*/ meltfptr[1714] =
+ (void *) &cdat->drout_1563__COMPILOBJ_NREP_MATCH;
+ cdat->drout_1563__COMPILOBJ_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1559__COMPILOBJ_NREP_MATCH.routdescr,
- "COMPILOBJ_NREP_MATCH @warmelt-genobj.melt:5040",
+ strncpy (cdat->drout_1563__COMPILOBJ_NREP_MATCH.routdescr,
+ "COMPILOBJ_NREP_MATCH @warmelt-genobj.melt:5064",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1559__COMPILOBJ_NREP_MATCH.nbval = 26;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1559__COMPILOBJ_NREP_MATCH,
- meltrout_153_warmelt_genobj_COMPILOBJ_NREP_MATCH);
-
- /*iniclos dclo_1560__COMPILOBJ_NREP_MATCH */
- /*_.VALCLO___V1712*/ meltfptr[1711] =
- (void *) &cdat->dclo_1560__COMPILOBJ_NREP_MATCH;
- cdat->dclo_1560__COMPILOBJ_NREP_MATCH.discr =
+ cdat->drout_1563__COMPILOBJ_NREP_MATCH.nbval = 26;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1563__COMPILOBJ_NREP_MATCH,
+ meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH);
+
+ /*iniclos dclo_1564__COMPILOBJ_NREP_MATCH */
+ /*_.VALCLO___V1719*/ meltfptr[1718] =
+ (void *) &cdat->dclo_1564__COMPILOBJ_NREP_MATCH;
+ cdat->dclo_1564__COMPILOBJ_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1560__COMPILOBJ_NREP_MATCH.nbval = 0;
+ cdat->dclo_1564__COMPILOBJ_NREP_MATCH.nbval = 0;
-/*iniobj dsym_1561__CLASS_NREP_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1713*/ meltfptr[1712])
- /*_.VALDATA___V1713*/
- meltfptr[1712] = (void *) &cdat->dsym_1561__CLASS_NREP_MATCH;
+/*iniobj dsym_1565__CLASS_NREP_MATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1720*/ meltfptr[1719])
+ /*_.VALDATA___V1720*/
+ meltfptr[1719] = (void *) &cdat->dsym_1565__CLASS_NREP_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1561__CLASS_NREP_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1565__CLASS_NREP_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1561__CLASS_NREP_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1565__CLASS_NREP_MATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1561__CLASS_NREP_MATCH.meltobj_class =
+ cdat->dsym_1565__CLASS_NREP_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1561__CLASS_NREP_MATCH.obj_hash = 624411385;
- cdat->dsym_1561__CLASS_NREP_MATCH.obj_len = 3;
+ cdat->dsym_1565__CLASS_NREP_MATCH.obj_hash = 624411385;
+ cdat->dsym_1565__CLASS_NREP_MATCH.obj_len = 3;
-/*inistring dstr_1562__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1714*/ meltfptr[1713] =
- (void *) &cdat->dstr_1562__CLASS_NREP_MATCH;
- cdat->dstr_1562__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1566__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1721*/ meltfptr[1720] =
+ (void *) &cdat->dstr_1566__CLASS_NREP_MATCH;
+ cdat->dstr_1566__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1562__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1566__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH",
- sizeof (cdat->dstr_1562__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1566__CLASS_NREP_MATCH.
val) - 1);
-/*iniobj dsym_1563__CLASS_NORMTESTER_ANYTESTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1715*/ meltfptr[1714])
- /*_.VALDATA___V1715*/
- meltfptr[1714] = (void *) &cdat->dsym_1563__CLASS_NORMTESTER_ANYTESTER;
+/*iniobj dsym_1567__CLASS_NORMTESTER_ANYTESTER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1722*/ meltfptr[1721])
+ /*_.VALDATA___V1722*/
+ meltfptr[1721] = (void *) &cdat->dsym_1567__CLASS_NORMTESTER_ANYTESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1563__CLASS_NORMTESTER_ANYTESTER",
+ ("iniobj check.discr isobj dsym_1567__CLASS_NORMTESTER_ANYTESTER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1563__CLASS_NORMTESTER_ANYTESTER",
+ ("iniobj check.discr objmagic dsym_1567__CLASS_NORMTESTER_ANYTESTER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1563__CLASS_NORMTESTER_ANYTESTER.meltobj_class =
+ cdat->dsym_1567__CLASS_NORMTESTER_ANYTESTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1563__CLASS_NORMTESTER_ANYTESTER.obj_hash = 827354043;
- cdat->dsym_1563__CLASS_NORMTESTER_ANYTESTER.obj_len = 3;
+ cdat->dsym_1567__CLASS_NORMTESTER_ANYTESTER.obj_hash = 827354043;
+ cdat->dsym_1567__CLASS_NORMTESTER_ANYTESTER.obj_len = 3;
-/*inistring dstr_1564__CLASS_NORMTESTER*/
- /*_.VALSTR___V1716*/ meltfptr[1715] =
- (void *) &cdat->dstr_1564__CLASS_NORMTESTER;
- cdat->dstr_1564__CLASS_NORMTESTER.discr =
+/*inistring dstr_1568__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1723*/ meltfptr[1722] =
+ (void *) &cdat->dstr_1568__CLASS_NORMTESTER;
+ cdat->dstr_1568__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1564__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1568__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_ANYTESTER",
- sizeof (cdat->dstr_1564__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1568__CLASS_NORMTESTER.
val) - 1);
-/*iniobj dsym_1565__CLASS_NORMTESTER_SUCCESS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1717*/ meltfptr[1716])
- /*_.VALDATA___V1717*/
- meltfptr[1716] = (void *) &cdat->dsym_1565__CLASS_NORMTESTER_SUCCESS;
+/*iniobj dsym_1569__CLASS_NORMTESTER_SUCCESS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1724*/ meltfptr[1723])
+ /*_.VALDATA___V1724*/
+ meltfptr[1723] = (void *) &cdat->dsym_1569__CLASS_NORMTESTER_SUCCESS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1565__CLASS_NORMTESTER_SUCCESS",
+ ("iniobj check.discr isobj dsym_1569__CLASS_NORMTESTER_SUCCESS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1565__CLASS_NORMTESTER_SUCCESS",
+ ("iniobj check.discr objmagic dsym_1569__CLASS_NORMTESTER_SUCCESS",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1565__CLASS_NORMTESTER_SUCCESS.meltobj_class =
+ cdat->dsym_1569__CLASS_NORMTESTER_SUCCESS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1565__CLASS_NORMTESTER_SUCCESS.obj_hash = 1047093940;
- cdat->dsym_1565__CLASS_NORMTESTER_SUCCESS.obj_len = 3;
+ cdat->dsym_1569__CLASS_NORMTESTER_SUCCESS.obj_hash = 1047093940;
+ cdat->dsym_1569__CLASS_NORMTESTER_SUCCESS.obj_len = 3;
-/*inistring dstr_1566__CLASS_NORMTESTER*/
- /*_.VALSTR___V1718*/ meltfptr[1717] =
- (void *) &cdat->dstr_1566__CLASS_NORMTESTER;
- cdat->dstr_1566__CLASS_NORMTESTER.discr =
+/*inistring dstr_1570__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1725*/ meltfptr[1724] =
+ (void *) &cdat->dstr_1570__CLASS_NORMTESTER;
+ cdat->dstr_1570__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1566__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1570__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_SUCCESS",
- sizeof (cdat->dstr_1566__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1570__CLASS_NORMTESTER.
val) - 1);
-/*iniobj dsym_1567__MAPOBJECT_EVERY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1719*/ meltfptr[1718])
- /*_.VALDATA___V1719*/
- meltfptr[1718] = (void *) &cdat->dsym_1567__MAPOBJECT_EVERY;
+/*iniobj dsym_1571__MAPOBJECT_EVERY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1726*/ meltfptr[1725])
+ /*_.VALDATA___V1726*/
+ meltfptr[1725] = (void *) &cdat->dsym_1571__MAPOBJECT_EVERY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1567__MAPOBJECT_EVERY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1571__MAPOBJECT_EVERY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1567__MAPOBJECT_EVERY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1571__MAPOBJECT_EVERY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1567__MAPOBJECT_EVERY.meltobj_class =
+ cdat->dsym_1571__MAPOBJECT_EVERY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1567__MAPOBJECT_EVERY.obj_hash = 726732435;
- cdat->dsym_1567__MAPOBJECT_EVERY.obj_len = 3;
+ cdat->dsym_1571__MAPOBJECT_EVERY.obj_hash = 726732435;
+ cdat->dsym_1571__MAPOBJECT_EVERY.obj_len = 3;
-/*inistring dstr_1568__MAPOBJECT_EVERY*/
- /*_.VALSTR___V1720*/ meltfptr[1719] =
- (void *) &cdat->dstr_1568__MAPOBJECT_EVERY;
- cdat->dstr_1568__MAPOBJECT_EVERY.discr =
+/*inistring dstr_1572__MAPOBJECT_EVERY*/
+ /*_.VALSTR___V1727*/ meltfptr[1726] =
+ (void *) &cdat->dstr_1572__MAPOBJECT_EVERY;
+ cdat->dstr_1572__MAPOBJECT_EVERY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1568__MAPOBJECT_EVERY.val,
+ /*small inistring */ strncpy (cdat->dstr_1572__MAPOBJECT_EVERY.val,
"MAPOBJECT_EVERY",
- sizeof (cdat->dstr_1568__MAPOBJECT_EVERY.
+ sizeof (cdat->dstr_1572__MAPOBJECT_EVERY.
val) - 1);
- /*inirout drout_1569__LAMBDA_ */
- /*_.VALROUT___V1711*/ meltfptr[1710] = (void *) &cdat->drout_1569__LAMBDA_;
- cdat->drout_1569__LAMBDA_.discr =
+ /*inirout drout_1573__LAMBDA_ */
+ /*_.VALROUT___V1718*/ meltfptr[1717] = (void *) &cdat->drout_1573__LAMBDA_;
+ cdat->drout_1573__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1569__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:5173", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1569__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1569__LAMBDA_,
- meltrout_154_warmelt_genobj_LAMBDA___50__);
+ strncpy (cdat->drout_1573__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:5197", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1573__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1573__LAMBDA_,
+ meltrout_155_warmelt_genobj_LAMBDA___50__);
-/*iniobj dsym_1570__LIST_FIND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1721*/ meltfptr[1720])
- /*_.VALDATA___V1721*/
- meltfptr[1720] = (void *) &cdat->dsym_1570__LIST_FIND;
+/*iniobj dsym_1574__LIST_FIND*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1728*/ meltfptr[1727])
+ /*_.VALDATA___V1728*/
+ meltfptr[1727] = (void *) &cdat->dsym_1574__LIST_FIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1570__LIST_FIND",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1574__LIST_FIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1570__LIST_FIND",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1574__LIST_FIND",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1570__LIST_FIND.meltobj_class =
+ cdat->dsym_1574__LIST_FIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1570__LIST_FIND.obj_hash = 430964501;
- cdat->dsym_1570__LIST_FIND.obj_len = 3;
+ cdat->dsym_1574__LIST_FIND.obj_hash = 430964501;
+ cdat->dsym_1574__LIST_FIND.obj_len = 3;
-/*inistring dstr_1571__LIST_FIND*/
- /*_.VALSTR___V1722*/ meltfptr[1721] = (void *) &cdat->dstr_1571__LIST_FIND;
- cdat->dstr_1571__LIST_FIND.discr =
+/*inistring dstr_1575__LIST_FIND*/
+ /*_.VALSTR___V1729*/ meltfptr[1728] = (void *) &cdat->dstr_1575__LIST_FIND;
+ cdat->dstr_1575__LIST_FIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1571__LIST_FIND.val, "LIST_FIND",
- sizeof (cdat->dstr_1571__LIST_FIND.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1575__LIST_FIND.val, "LIST_FIND",
+ sizeof (cdat->dstr_1575__LIST_FIND.val) - 1);
-/*iniobj dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1723*/ meltfptr[1722])
- /*_.VALDATA___V1723*/
- meltfptr[1722] =
- (void *) &cdat->dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA;
+/*iniobj dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1730*/ meltfptr[1729])
+ /*_.VALDATA___V1730*/
+ meltfptr[1729] =
+ (void *) &cdat->dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA",
+ ("iniobj check.discr isobj dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA",
+ ("iniobj check.discr objmagic dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class =
+ cdat->dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 686824503;
- cdat->dsym_1572__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 3;
+ cdat->dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 686824503;
+ cdat->dsym_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 3;
-/*inistring dstr_1573__CLASS_ALTERNATE_*/
- /*_.VALSTR___V1724*/ meltfptr[1723] =
- (void *) &cdat->dstr_1573__CLASS_ALTERNATE_;
- cdat->dstr_1573__CLASS_ALTERNATE_.discr =
+/*inistring dstr_1577__CLASS_ALTERNATE_*/
+ /*_.VALSTR___V1731*/ meltfptr[1730] =
+ (void *) &cdat->dstr_1577__CLASS_ALTERNATE_;
+ cdat->dstr_1577__CLASS_ALTERNATE_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1573__CLASS_ALTERNATE_.val,
+ /*small inistring */ strncpy (cdat->dstr_1577__CLASS_ALTERNATE_.val,
"CLASS_ALTERNATE_MATCH_NREP_DATA",
- sizeof (cdat->dstr_1573__CLASS_ALTERNATE_.
+ sizeof (cdat->dstr_1577__CLASS_ALTERNATE_.
val) - 1);
-/*iniobj dsym_1574__CLASS_ROOT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1725*/ meltfptr[1724])
- /*_.VALDATA___V1725*/
- meltfptr[1724] = (void *) &cdat->dsym_1574__CLASS_ROOT;
+/*iniobj dsym_1578__CLASS_ROOT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1732*/ meltfptr[1731])
+ /*_.VALDATA___V1732*/
+ meltfptr[1731] = (void *) &cdat->dsym_1578__CLASS_ROOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1574__CLASS_ROOT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1578__CLASS_ROOT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1574__CLASS_ROOT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1578__CLASS_ROOT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1574__CLASS_ROOT.meltobj_class =
+ cdat->dsym_1578__CLASS_ROOT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1574__CLASS_ROOT.obj_hash = 60568825;
- cdat->dsym_1574__CLASS_ROOT.obj_len = 3;
+ cdat->dsym_1578__CLASS_ROOT.obj_hash = 60568825;
+ cdat->dsym_1578__CLASS_ROOT.obj_len = 3;
-/*inistring dstr_1575__CLASS_ROOT*/
- /*_.VALSTR___V1726*/ meltfptr[1725] = (void *) &cdat->dstr_1575__CLASS_ROOT;
- cdat->dstr_1575__CLASS_ROOT.discr =
+/*inistring dstr_1579__CLASS_ROOT*/
+ /*_.VALSTR___V1733*/ meltfptr[1732] = (void *) &cdat->dstr_1579__CLASS_ROOT;
+ cdat->dstr_1579__CLASS_ROOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1575__CLASS_ROOT.val, "CLASS_ROOT",
- sizeof (cdat->dstr_1575__CLASS_ROOT.val) - 1);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ iniobj");
+ /*small inistring */ strncpy (cdat->dstr_1579__CLASS_ROOT.val, "CLASS_ROOT",
+ sizeof (cdat->dstr_1579__CLASS_ROOT.val) - 1);
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ iniobj");
-/*iniobj dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA*/
-/*_.VALDATA___V1727*/ meltfptr[1726] =
- (void *) &cdat->dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA;
+/*iniobj dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA*/
+/*_.VALDATA___V1734*/ meltfptr[1733] =
+ (void *) &cdat->dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA",
+ ("iniobj check.discr isobj dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA",
+ ("iniobj check.discr objmagic dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class =
+ cdat->dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 268566549;
- cdat->dobj_1576__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 8;
+ cdat->dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 775483501;
+ cdat->dobj_1580__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 8;
-/*inistring dstr_1577__CLASS_ALTERNATE_*/
- /*_.VALSTR___V1728*/ meltfptr[1727] =
- (void *) &cdat->dstr_1577__CLASS_ALTERNATE_;
- cdat->dstr_1577__CLASS_ALTERNATE_.discr =
+/*inistring dstr_1581__CLASS_ALTERNATE_*/
+ /*_.VALSTR___V1735*/ meltfptr[1734] =
+ (void *) &cdat->dstr_1581__CLASS_ALTERNATE_;
+ cdat->dstr_1581__CLASS_ALTERNATE_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1577__CLASS_ALTERNATE_.val,
+ /*small inistring */ strncpy (cdat->dstr_1581__CLASS_ALTERNATE_.val,
"CLASS_ALTERNATE_MATCH_NREP_DATA",
- sizeof (cdat->dstr_1577__CLASS_ALTERNATE_.
+ sizeof (cdat->dstr_1581__CLASS_ALTERNATE_.
val) - 1);
- /*inimult dtup_1578__CLASS_ALTERNATE_MATCH_NREP_DATA */
- /*_.VALTUP___V1729*/ meltfptr[1728] =
- (void *) &cdat->dtup_1578__CLASS_ALTERNATE_MATCH_NREP_DATA;
- cdat->dtup_1578__CLASS_ALTERNATE_MATCH_NREP_DATA.discr =
+ /*inimult dtup_1582__CLASS_ALTERNATE_MATCH_NREP_DATA */
+ /*_.VALTUP___V1736*/ meltfptr[1735] =
+ (void *) &cdat->dtup_1582__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ cdat->dtup_1582__CLASS_ALTERNATE_MATCH_NREP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1578__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 1;
- /*inimult dtup_1579__CLASS_ALTERNATE_MATCH_NREP_DATA */
- /*_.VALTUP___V1734*/ meltfptr[1733] =
- (void *) &cdat->dtup_1579__CLASS_ALTERNATE_MATCH_NREP_DATA;
- cdat->dtup_1579__CLASS_ALTERNATE_MATCH_NREP_DATA.discr =
+ cdat->dtup_1582__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 1;
+ /*inimult dtup_1583__CLASS_ALTERNATE_MATCH_NREP_DATA */
+ /*_.VALTUP___V1741*/ meltfptr[1740] =
+ (void *) &cdat->dtup_1583__CLASS_ALTERNATE_MATCH_NREP_DATA;
+ cdat->dtup_1583__CLASS_ALTERNATE_MATCH_NREP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1579__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 2;
+ cdat->dtup_1583__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 2;
-/*iniobj dsym_1580__ALTMATCHN_PREV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1735*/ meltfptr[1734])
- /*_.VALDATA___V1735*/
- meltfptr[1734] = (void *) &cdat->dsym_1580__ALTMATCHN_PREV;
+/*iniobj dsym_1584__ALTMATCHN_PREV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1742*/ meltfptr[1741])
+ /*_.VALDATA___V1742*/
+ meltfptr[1741] = (void *) &cdat->dsym_1584__ALTMATCHN_PREV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1580__ALTMATCHN_PREV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1584__ALTMATCHN_PREV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1580__ALTMATCHN_PREV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1584__ALTMATCHN_PREV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1580__ALTMATCHN_PREV.meltobj_class =
+ cdat->dsym_1584__ALTMATCHN_PREV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1580__ALTMATCHN_PREV.obj_hash = 447972878;
- cdat->dsym_1580__ALTMATCHN_PREV.obj_len = 3;
+ cdat->dsym_1584__ALTMATCHN_PREV.obj_hash = 447972878;
+ cdat->dsym_1584__ALTMATCHN_PREV.obj_len = 3;
-/*inistring dstr_1581__ALTMATCHN_PREV*/
- /*_.VALSTR___V1736*/ meltfptr[1735] =
- (void *) &cdat->dstr_1581__ALTMATCHN_PREV;
- cdat->dstr_1581__ALTMATCHN_PREV.discr =
+/*inistring dstr_1585__ALTMATCHN_PREV*/
+ /*_.VALSTR___V1743*/ meltfptr[1742] =
+ (void *) &cdat->dstr_1585__ALTMATCHN_PREV;
+ cdat->dstr_1585__ALTMATCHN_PREV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1581__ALTMATCHN_PREV.val,
+ /*small inistring */ strncpy (cdat->dstr_1585__ALTMATCHN_PREV.val,
"ALTMATCHN_PREV",
- sizeof (cdat->dstr_1581__ALTMATCHN_PREV.val) -
+ sizeof (cdat->dstr_1585__ALTMATCHN_PREV.val) -
1);
/*^iniobj */
-/*iniobj dobj_1582__ALTMATCHN_PREV*/
-/*_.VALDATA___V1730*/ meltfptr[1729] =
- (void *) &cdat->dobj_1582__ALTMATCHN_PREV;
+/*iniobj dobj_1586__ALTMATCHN_PREV*/
+/*_.VALDATA___V1737*/ meltfptr[1736] =
+ (void *) &cdat->dobj_1586__ALTMATCHN_PREV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1582__ALTMATCHN_PREV",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1586__ALTMATCHN_PREV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1582__ALTMATCHN_PREV",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1586__ALTMATCHN_PREV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1582__ALTMATCHN_PREV.meltobj_class =
+ cdat->dobj_1586__ALTMATCHN_PREV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1582__ALTMATCHN_PREV.obj_num = 0;
- cdat->dobj_1582__ALTMATCHN_PREV.obj_hash = 831942076;
- cdat->dobj_1582__ALTMATCHN_PREV.obj_len = 4;
+ cdat->dobj_1586__ALTMATCHN_PREV.obj_num = 0;
+ cdat->dobj_1586__ALTMATCHN_PREV.obj_hash = 943540294;
+ cdat->dobj_1586__ALTMATCHN_PREV.obj_len = 4;
-/*inistring dstr_1583__ALTMATCHN_PREV*/
- /*_.VALSTR___V1731*/ meltfptr[1730] =
- (void *) &cdat->dstr_1583__ALTMATCHN_PREV;
- cdat->dstr_1583__ALTMATCHN_PREV.discr =
+/*inistring dstr_1587__ALTMATCHN_PREV*/
+ /*_.VALSTR___V1738*/ meltfptr[1737] =
+ (void *) &cdat->dstr_1587__ALTMATCHN_PREV;
+ cdat->dstr_1587__ALTMATCHN_PREV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1583__ALTMATCHN_PREV.val,
+ /*small inistring */ strncpy (cdat->dstr_1587__ALTMATCHN_PREV.val,
"ALTMATCHN_PREV",
- sizeof (cdat->dstr_1583__ALTMATCHN_PREV.val) -
+ sizeof (cdat->dstr_1587__ALTMATCHN_PREV.val) -
1);
-/*iniobj dsym_1584__ALTMATCHN_NREP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1737*/ meltfptr[1736])
- /*_.VALDATA___V1737*/
- meltfptr[1736] = (void *) &cdat->dsym_1584__ALTMATCHN_NREP;
+/*iniobj dsym_1588__ALTMATCHN_NREP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1744*/ meltfptr[1743])
+ /*_.VALDATA___V1744*/
+ meltfptr[1743] = (void *) &cdat->dsym_1588__ALTMATCHN_NREP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1584__ALTMATCHN_NREP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1588__ALTMATCHN_NREP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1584__ALTMATCHN_NREP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1588__ALTMATCHN_NREP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1584__ALTMATCHN_NREP.meltobj_class =
+ cdat->dsym_1588__ALTMATCHN_NREP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1584__ALTMATCHN_NREP.obj_hash = 56498279;
- cdat->dsym_1584__ALTMATCHN_NREP.obj_len = 3;
+ cdat->dsym_1588__ALTMATCHN_NREP.obj_hash = 56498279;
+ cdat->dsym_1588__ALTMATCHN_NREP.obj_len = 3;
-/*inistring dstr_1585__ALTMATCHN_NREP*/
- /*_.VALSTR___V1738*/ meltfptr[1737] =
- (void *) &cdat->dstr_1585__ALTMATCHN_NREP;
- cdat->dstr_1585__ALTMATCHN_NREP.discr =
+/*inistring dstr_1589__ALTMATCHN_NREP*/
+ /*_.VALSTR___V1745*/ meltfptr[1744] =
+ (void *) &cdat->dstr_1589__ALTMATCHN_NREP;
+ cdat->dstr_1589__ALTMATCHN_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1585__ALTMATCHN_NREP.val,
+ /*small inistring */ strncpy (cdat->dstr_1589__ALTMATCHN_NREP.val,
"ALTMATCHN_NREP",
- sizeof (cdat->dstr_1585__ALTMATCHN_NREP.val) -
+ sizeof (cdat->dstr_1589__ALTMATCHN_NREP.val) -
1);
/*^iniobj */
-/*iniobj dobj_1586__ALTMATCHN_NREP*/
-/*_.VALDATA___V1732*/ meltfptr[1731] =
- (void *) &cdat->dobj_1586__ALTMATCHN_NREP;
+/*iniobj dobj_1590__ALTMATCHN_NREP*/
+/*_.VALDATA___V1739*/ meltfptr[1738] =
+ (void *) &cdat->dobj_1590__ALTMATCHN_NREP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1586__ALTMATCHN_NREP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1590__ALTMATCHN_NREP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1586__ALTMATCHN_NREP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1590__ALTMATCHN_NREP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1586__ALTMATCHN_NREP.meltobj_class =
+ cdat->dobj_1590__ALTMATCHN_NREP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1586__ALTMATCHN_NREP.obj_num = 1;
- cdat->dobj_1586__ALTMATCHN_NREP.obj_hash = 656274394;
- cdat->dobj_1586__ALTMATCHN_NREP.obj_len = 4;
+ cdat->dobj_1590__ALTMATCHN_NREP.obj_num = 1;
+ cdat->dobj_1590__ALTMATCHN_NREP.obj_hash = 688415717;
+ cdat->dobj_1590__ALTMATCHN_NREP.obj_len = 4;
-/*inistring dstr_1587__ALTMATCHN_NREP*/
- /*_.VALSTR___V1733*/ meltfptr[1732] =
- (void *) &cdat->dstr_1587__ALTMATCHN_NREP;
- cdat->dstr_1587__ALTMATCHN_NREP.discr =
+/*inistring dstr_1591__ALTMATCHN_NREP*/
+ /*_.VALSTR___V1740*/ meltfptr[1739] =
+ (void *) &cdat->dstr_1591__ALTMATCHN_NREP;
+ cdat->dstr_1591__ALTMATCHN_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1587__ALTMATCHN_NREP.val,
+ /*small inistring */ strncpy (cdat->dstr_1591__ALTMATCHN_NREP.val,
"ALTMATCHN_NREP",
- sizeof (cdat->dstr_1587__ALTMATCHN_NREP.val) -
+ sizeof (cdat->dstr_1591__ALTMATCHN_NREP.val) -
1);
- /*inirout drout_1588__COMPILOBJ_NREP_ALTMATCH */
- /*_.VALROUT___V1739*/ meltfptr[1738] =
- (void *) &cdat->drout_1588__COMPILOBJ_NREP_ALTMATCH;
- cdat->drout_1588__COMPILOBJ_NREP_ALTMATCH.discr =
+ /*inirout drout_1592__COMPILOBJ_NREP_ALTMATCH */
+ /*_.VALROUT___V1746*/ meltfptr[1745] =
+ (void *) &cdat->drout_1592__COMPILOBJ_NREP_ALTMATCH;
+ cdat->drout_1592__COMPILOBJ_NREP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1588__COMPILOBJ_NREP_ALTMATCH.routdescr,
- "COMPILOBJ_NREP_ALTMATCH @warmelt-genobj.melt:5242",
+ strncpy (cdat->drout_1592__COMPILOBJ_NREP_ALTMATCH.routdescr,
+ "COMPILOBJ_NREP_ALTMATCH @warmelt-genobj.melt:5266",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1588__COMPILOBJ_NREP_ALTMATCH.nbval = 13;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1588__COMPILOBJ_NREP_ALTMATCH,
- meltrout_155_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH);
-
- /*iniclos dclo_1589__COMPILOBJ_NREP_ALTMATCH */
- /*_.VALCLO___V1741*/ meltfptr[1740] =
- (void *) &cdat->dclo_1589__COMPILOBJ_NREP_ALTMATCH;
- cdat->dclo_1589__COMPILOBJ_NREP_ALTMATCH.discr =
+ cdat->drout_1592__COMPILOBJ_NREP_ALTMATCH.nbval = 13;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1592__COMPILOBJ_NREP_ALTMATCH,
+ meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH);
+
+ /*iniclos dclo_1593__COMPILOBJ_NREP_ALTMATCH */
+ /*_.VALCLO___V1748*/ meltfptr[1747] =
+ (void *) &cdat->dclo_1593__COMPILOBJ_NREP_ALTMATCH;
+ cdat->dclo_1593__COMPILOBJ_NREP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1589__COMPILOBJ_NREP_ALTMATCH.nbval = 0;
+ cdat->dclo_1593__COMPILOBJ_NREP_ALTMATCH.nbval = 0;
-/*iniobj dsym_1590__CLASS_NREP_ALTMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1742*/ meltfptr[1741])
- /*_.VALDATA___V1742*/
- meltfptr[1741] = (void *) &cdat->dsym_1590__CLASS_NREP_ALTMATCH;
+/*iniobj dsym_1594__CLASS_NREP_ALTMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1749*/ meltfptr[1748])
+ /*_.VALDATA___V1749*/
+ meltfptr[1748] = (void *) &cdat->dsym_1594__CLASS_NREP_ALTMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1590__CLASS_NREP_ALTMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1594__CLASS_NREP_ALTMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1590__CLASS_NREP_ALTMATCH",
+ ("iniobj check.discr objmagic dsym_1594__CLASS_NREP_ALTMATCH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1590__CLASS_NREP_ALTMATCH.meltobj_class =
+ cdat->dsym_1594__CLASS_NREP_ALTMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1590__CLASS_NREP_ALTMATCH.obj_hash = 373164524;
- cdat->dsym_1590__CLASS_NREP_ALTMATCH.obj_len = 3;
+ cdat->dsym_1594__CLASS_NREP_ALTMATCH.obj_hash = 373164524;
+ cdat->dsym_1594__CLASS_NREP_ALTMATCH.obj_len = 3;
-/*inistring dstr_1591__CLASS_NREP_ALTMA*/
- /*_.VALSTR___V1743*/ meltfptr[1742] =
- (void *) &cdat->dstr_1591__CLASS_NREP_ALTMA;
- cdat->dstr_1591__CLASS_NREP_ALTMA.discr =
+/*inistring dstr_1595__CLASS_NREP_ALTMA*/
+ /*_.VALSTR___V1750*/ meltfptr[1749] =
+ (void *) &cdat->dstr_1595__CLASS_NREP_ALTMA;
+ cdat->dstr_1595__CLASS_NREP_ALTMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1591__CLASS_NREP_ALTMA.val,
+ /*small inistring */ strncpy (cdat->dstr_1595__CLASS_NREP_ALTMA.val,
"CLASS_NREP_ALTMATCH",
- sizeof (cdat->dstr_1591__CLASS_NREP_ALTMA.
+ sizeof (cdat->dstr_1595__CLASS_NREP_ALTMA.
val) - 1);
- /*inirout drout_1592__LAMBDA_ */
- /*_.VALROUT___V1740*/ meltfptr[1739] = (void *) &cdat->drout_1592__LAMBDA_;
- cdat->drout_1592__LAMBDA_.discr =
+ /*inirout drout_1596__LAMBDA_ */
+ /*_.VALROUT___V1747*/ meltfptr[1746] = (void *) &cdat->drout_1596__LAMBDA_;
+ cdat->drout_1596__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1592__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:5286", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1592__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1592__LAMBDA_,
- meltrout_156_warmelt_genobj_LAMBDA___51__);
-
- /*inirout drout_1593__COMPILOBJ_NREP_MATCHLABEL */
- /*_.VALROUT___V1744*/ meltfptr[1743] =
- (void *) &cdat->drout_1593__COMPILOBJ_NREP_MATCHLABEL;
- cdat->drout_1593__COMPILOBJ_NREP_MATCHLABEL.discr =
+ strncpy (cdat->drout_1596__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:5310", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1596__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1596__LAMBDA_,
+ meltrout_157_warmelt_genobj_LAMBDA___51__);
+
+ /*inirout drout_1597__COMPILOBJ_NREP_MATCHLABEL */
+ /*_.VALROUT___V1751*/ meltfptr[1750] =
+ (void *) &cdat->drout_1597__COMPILOBJ_NREP_MATCHLABEL;
+ cdat->drout_1597__COMPILOBJ_NREP_MATCHLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1593__COMPILOBJ_NREP_MATCHLABEL.routdescr,
- "COMPILOBJ_NREP_MATCHLABEL @warmelt-genobj.melt:5302",
+ strncpy (cdat->drout_1597__COMPILOBJ_NREP_MATCHLABEL.routdescr,
+ "COMPILOBJ_NREP_MATCHLABEL @warmelt-genobj.melt:5326",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1593__COMPILOBJ_NREP_MATCHLABEL.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1593__COMPILOBJ_NREP_MATCHLABEL,
- meltrout_157_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL);
-
- /*iniclos dclo_1594__COMPILOBJ_NREP_MATCHLABEL */
- /*_.VALCLO___V1745*/ meltfptr[1744] =
- (void *) &cdat->dclo_1594__COMPILOBJ_NREP_MATCHLABEL;
- cdat->dclo_1594__COMPILOBJ_NREP_MATCHLABEL.discr =
+ cdat->drout_1597__COMPILOBJ_NREP_MATCHLABEL.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1597__COMPILOBJ_NREP_MATCHLABEL,
+ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL);
+
+ /*iniclos dclo_1598__COMPILOBJ_NREP_MATCHLABEL */
+ /*_.VALCLO___V1752*/ meltfptr[1751] =
+ (void *) &cdat->dclo_1598__COMPILOBJ_NREP_MATCHLABEL;
+ cdat->dclo_1598__COMPILOBJ_NREP_MATCHLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1594__COMPILOBJ_NREP_MATCHLABEL.nbval = 0;
+ cdat->dclo_1598__COMPILOBJ_NREP_MATCHLABEL.nbval = 0;
-/*iniobj dsym_1595__CLASS_NREP_MATCH_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1746*/ meltfptr[1745])
- /*_.VALDATA___V1746*/
- meltfptr[1745] = (void *) &cdat->dsym_1595__CLASS_NREP_MATCH_LABEL;
+/*iniobj dsym_1599__CLASS_NREP_MATCH_LABEL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1753*/ meltfptr[1752])
+ /*_.VALDATA___V1753*/
+ meltfptr[1752] = (void *) &cdat->dsym_1599__CLASS_NREP_MATCH_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1595__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr isobj dsym_1599__CLASS_NREP_MATCH_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1595__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr objmagic dsym_1599__CLASS_NREP_MATCH_LABEL",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1595__CLASS_NREP_MATCH_LABEL.meltobj_class =
+ cdat->dsym_1599__CLASS_NREP_MATCH_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1595__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698;
- cdat->dsym_1595__CLASS_NREP_MATCH_LABEL.obj_len = 3;
+ cdat->dsym_1599__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698;
+ cdat->dsym_1599__CLASS_NREP_MATCH_LABEL.obj_len = 3;
-/*inistring dstr_1596__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1747*/ meltfptr[1746] =
- (void *) &cdat->dstr_1596__CLASS_NREP_MATCH;
- cdat->dstr_1596__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1600__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1754*/ meltfptr[1753] =
+ (void *) &cdat->dstr_1600__CLASS_NREP_MATCH;
+ cdat->dstr_1600__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1596__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1600__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_LABEL",
- sizeof (cdat->dstr_1596__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1600__CLASS_NREP_MATCH.
val) - 1);
-/*iniobj dsym_1597__CLASS_MATCH_STEP_WITH_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1748*/ meltfptr[1747])
- /*_.VALDATA___V1748*/
- meltfptr[1747] = (void *) &cdat->dsym_1597__CLASS_MATCH_STEP_WITH_DATA;
+/*iniobj dsym_1601__CLASS_MATCH_STEP_WITH_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1755*/ meltfptr[1754])
+ /*_.VALDATA___V1755*/
+ meltfptr[1754] = (void *) &cdat->dsym_1601__CLASS_MATCH_STEP_WITH_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1597__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr isobj dsym_1601__CLASS_MATCH_STEP_WITH_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1597__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr objmagic dsym_1601__CLASS_MATCH_STEP_WITH_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1597__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
+ cdat->dsym_1601__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1597__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757;
- cdat->dsym_1597__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3;
+ cdat->dsym_1601__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757;
+ cdat->dsym_1601__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3;
-/*inistring dstr_1598__CLASS_MATCH_STEP*/
- /*_.VALSTR___V1749*/ meltfptr[1748] =
- (void *) &cdat->dstr_1598__CLASS_MATCH_STEP;
- cdat->dstr_1598__CLASS_MATCH_STEP.discr =
+/*inistring dstr_1602__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V1756*/ meltfptr[1755] =
+ (void *) &cdat->dstr_1602__CLASS_MATCH_STEP;
+ cdat->dstr_1602__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1598__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_1602__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_WITH_DATA",
- sizeof (cdat->dstr_1598__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_1602__CLASS_MATCH_STEP.
+ val) - 1);
+ /*inirout drout_1603__COMPILOBJ_NREP_MATCHFLAG */
+ /*_.VALROUT___V1757*/ meltfptr[1756] =
+ (void *) &cdat->drout_1603__COMPILOBJ_NREP_MATCHFLAG;
+ cdat->drout_1603__COMPILOBJ_NREP_MATCHFLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_1603__COMPILOBJ_NREP_MATCHFLAG.routdescr,
+ "COMPILOBJ_NREP_MATCHFLAG @warmelt-genobj.melt:5352",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1603__COMPILOBJ_NREP_MATCHFLAG.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1603__COMPILOBJ_NREP_MATCHFLAG,
+ meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG);
+
+ /*iniclos dclo_1604__COMPILOBJ_NREP_MATCHFLAG */
+ /*_.VALCLO___V1758*/ meltfptr[1757] =
+ (void *) &cdat->dclo_1604__COMPILOBJ_NREP_MATCHFLAG;
+ cdat->dclo_1604__COMPILOBJ_NREP_MATCHFLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_1604__COMPILOBJ_NREP_MATCHFLAG.nbval = 0;
+
+
+/*iniobj dsym_1605__CLASS_NREP_MATCH_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1759*/ meltfptr[1758])
+ /*_.VALDATA___V1759*/
+ meltfptr[1758] = (void *) &cdat->dsym_1605__CLASS_NREP_MATCH_FLAG;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr isobj dsym_1605__CLASS_NREP_MATCH_FLAG",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
+ MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr objmagic dsym_1605__CLASS_NREP_MATCH_FLAG",
+ ((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_1605__CLASS_NREP_MATCH_FLAG.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_1605__CLASS_NREP_MATCH_FLAG.obj_hash = 479563009;
+ cdat->dsym_1605__CLASS_NREP_MATCH_FLAG.obj_len = 3;
+
+
+/*inistring dstr_1606__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1760*/ meltfptr[1759] =
+ (void *) &cdat->dstr_1606__CLASS_NREP_MATCH;
+ cdat->dstr_1606__CLASS_NREP_MATCH.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_1606__CLASS_NREP_MATCH.val,
+ "CLASS_NREP_MATCH_FLAG",
+ sizeof (cdat->dstr_1606__CLASS_NREP_MATCH.
val) - 1);
- /*inirout drout_1599__COMPILOBJ_NREP_MATCHDATAINIT */
- /*_.VALROUT___V1750*/ meltfptr[1749] =
- (void *) &cdat->drout_1599__COMPILOBJ_NREP_MATCHDATAINIT;
- cdat->drout_1599__COMPILOBJ_NREP_MATCHDATAINIT.discr =
+ /*inirout drout_1607__COMPILOBJ_NREP_MATCHDATAINIT */
+ /*_.VALROUT___V1761*/ meltfptr[1760] =
+ (void *) &cdat->drout_1607__COMPILOBJ_NREP_MATCHDATAINIT;
+ cdat->drout_1607__COMPILOBJ_NREP_MATCHDATAINIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1599__COMPILOBJ_NREP_MATCHDATAINIT.routdescr,
- "COMPILOBJ_NREP_MATCHDATAINIT @warmelt-genobj.melt:5319",
+ strncpy (cdat->drout_1607__COMPILOBJ_NREP_MATCHDATAINIT.routdescr,
+ "COMPILOBJ_NREP_MATCHDATAINIT @warmelt-genobj.melt:5377",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1599__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1599__COMPILOBJ_NREP_MATCHDATAINIT,
- meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT);
-
- /*iniclos dclo_1600__COMPILOBJ_NREP_MATCHDATAINIT */
- /*_.VALCLO___V1751*/ meltfptr[1750] =
- (void *) &cdat->dclo_1600__COMPILOBJ_NREP_MATCHDATAINIT;
- cdat->dclo_1600__COMPILOBJ_NREP_MATCHDATAINIT.discr =
+ cdat->drout_1607__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1607__COMPILOBJ_NREP_MATCHDATAINIT,
+ meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT);
+
+ /*iniclos dclo_1608__COMPILOBJ_NREP_MATCHDATAINIT */
+ /*_.VALCLO___V1762*/ meltfptr[1761] =
+ (void *) &cdat->dclo_1608__COMPILOBJ_NREP_MATCHDATAINIT;
+ cdat->dclo_1608__COMPILOBJ_NREP_MATCHDATAINIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1600__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 0;
+ cdat->dclo_1608__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 0;
-/*iniobj dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1752*/ meltfptr[1751])
- /*_.VALDATA___V1752*/
- meltfptr[1751] =
- (void *) &cdat->dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER;
+/*iniobj dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1763*/ meltfptr[1762])
+ /*_.VALDATA___V1763*/
+ meltfptr[1762] =
+ (void *) &cdat->dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr isobj dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr objmagic dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
+ cdat->dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553;
- cdat->dsym_1601__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3;
+ cdat->dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553;
+ cdat->dsym_1609__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3;
-/*inistring dstr_1602__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1753*/ meltfptr[1752] =
- (void *) &cdat->dstr_1602__CLASS_NREP_MATCH;
- cdat->dstr_1602__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1610__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1764*/ meltfptr[1763] =
+ (void *) &cdat->dstr_1610__CLASS_NREP_MATCH;
+ cdat->dstr_1610__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1602__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1610__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_INITIALIZER",
- sizeof (cdat->dstr_1602__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1610__CLASS_NREP_MATCH.
val) - 1);
-/*iniobj dsym_1603__CLASS_NREP_MATCH_DATA_ACTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1754*/ meltfptr[1753])
- /*_.VALDATA___V1754*/
- meltfptr[1753] = (void *) &cdat->dsym_1603__CLASS_NREP_MATCH_DATA_ACTION;
+/*iniobj dsym_1611__CLASS_NREP_MATCH_DATA_ACTION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1765*/ meltfptr[1764])
+ /*_.VALDATA___V1765*/
+ meltfptr[1764] = (void *) &cdat->dsym_1611__CLASS_NREP_MATCH_DATA_ACTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1603__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr isobj dsym_1611__CLASS_NREP_MATCH_DATA_ACTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1603__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr objmagic dsym_1611__CLASS_NREP_MATCH_DATA_ACTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1603__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
+ cdat->dsym_1611__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1603__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196;
- cdat->dsym_1603__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3;
+ cdat->dsym_1611__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196;
+ cdat->dsym_1611__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3;
-/*inistring dstr_1604__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1755*/ meltfptr[1754] =
- (void *) &cdat->dstr_1604__CLASS_NREP_MATCH;
- cdat->dstr_1604__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1612__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1766*/ meltfptr[1765] =
+ (void *) &cdat->dstr_1612__CLASS_NREP_MATCH;
+ cdat->dstr_1612__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1604__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1612__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_ACTION",
- sizeof (cdat->dstr_1604__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1612__CLASS_NREP_MATCH.
val) - 1);
-/*iniobj dsym_1605__CLASS_NREP_MATCHED_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1756*/ meltfptr[1755])
- /*_.VALDATA___V1756*/
- meltfptr[1755] = (void *) &cdat->dsym_1605__CLASS_NREP_MATCHED_DATA;
+/*iniobj dsym_1613__CLASS_NREP_MATCHED_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1767*/ meltfptr[1766])
+ /*_.VALDATA___V1767*/
+ meltfptr[1766] = (void *) &cdat->dsym_1613__CLASS_NREP_MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1605__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr isobj dsym_1613__CLASS_NREP_MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1605__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr objmagic dsym_1613__CLASS_NREP_MATCHED_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1605__CLASS_NREP_MATCHED_DATA.meltobj_class =
+ cdat->dsym_1613__CLASS_NREP_MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1605__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645;
- cdat->dsym_1605__CLASS_NREP_MATCHED_DATA.obj_len = 3;
+ cdat->dsym_1613__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645;
+ cdat->dsym_1613__CLASS_NREP_MATCHED_DATA.obj_len = 3;
-/*inistring dstr_1606__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1757*/ meltfptr[1756] =
- (void *) &cdat->dstr_1606__CLASS_NREP_MATCH;
- cdat->dstr_1606__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1614__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1768*/ meltfptr[1767] =
+ (void *) &cdat->dstr_1614__CLASS_NREP_MATCH;
+ cdat->dstr_1614__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1606__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1614__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCHED_DATA",
- sizeof (cdat->dstr_1606__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1614__CLASS_NREP_MATCH.
val) - 1);
- /*inirout drout_1607__NORMTESTER_LABELINSTR */
- /*_.VALROUT___V1710*/ meltfptr[1709] =
- (void *) &cdat->drout_1607__NORMTESTER_LABELINSTR;
- cdat->drout_1607__NORMTESTER_LABELINSTR.discr =
+ /*inirout drout_1615__COMPILOBJ_NREP_MATCHEDATA */
+ /*_.VALROUT___V1769*/ meltfptr[1768] =
+ (void *) &cdat->drout_1615__COMPILOBJ_NREP_MATCHEDATA;
+ cdat->drout_1615__COMPILOBJ_NREP_MATCHEDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1607__NORMTESTER_LABELINSTR.routdescr,
- "NORMTESTER_LABELINSTR @warmelt-genobj.melt:5344",
+ strncpy (cdat->drout_1615__COMPILOBJ_NREP_MATCHEDATA.routdescr,
+ "COMPILOBJ_NREP_MATCHEDATA @warmelt-genobj.melt:5410",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1607__NORMTESTER_LABELINSTR.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1607__NORMTESTER_LABELINSTR,
- meltrout_159_warmelt_genobj_NORMTESTER_LABELINSTR);
-
- /*iniclos dclo_1608__NORMTESTER_LABELINSTR */
- /*_.VALCLO___V1709*/ meltfptr[1708] =
- (void *) &cdat->dclo_1608__NORMTESTER_LABELINSTR;
- cdat->dclo_1608__NORMTESTER_LABELINSTR.discr =
+ cdat->drout_1615__COMPILOBJ_NREP_MATCHEDATA.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1615__COMPILOBJ_NREP_MATCHEDATA,
+ meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA);
+
+ /*iniclos dclo_1616__COMPILOBJ_NREP_MATCHEDATA */
+ /*_.VALCLO___V1770*/ meltfptr[1769] =
+ (void *) &cdat->dclo_1616__COMPILOBJ_NREP_MATCHEDATA;
+ cdat->dclo_1616__COMPILOBJ_NREP_MATCHEDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1608__NORMTESTER_LABELINSTR.nbval = 0;
+ cdat->dclo_1616__COMPILOBJ_NREP_MATCHEDATA.nbval = 0;
- /*inirout drout_1609__NORMTESTER_GOTOINSTR */
- /*_.VALROUT___V1758*/ meltfptr[1757] =
- (void *) &cdat->drout_1609__NORMTESTER_GOTOINSTR;
- cdat->drout_1609__NORMTESTER_GOTOINSTR.discr =
+ /*inirout drout_1617__COMPILOBJ_NREP_MATCHJUMP */
+ /*_.VALROUT___V1771*/ meltfptr[1770] =
+ (void *) &cdat->drout_1617__COMPILOBJ_NREP_MATCHJUMP;
+ cdat->drout_1617__COMPILOBJ_NREP_MATCHJUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1609__NORMTESTER_GOTOINSTR.routdescr,
- "NORMTESTER_GOTOINSTR @warmelt-genobj.melt:5376",
+ strncpy (cdat->drout_1617__COMPILOBJ_NREP_MATCHJUMP.routdescr,
+ "COMPILOBJ_NREP_MATCHJUMP @warmelt-genobj.melt:5439",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1609__NORMTESTER_GOTOINSTR.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1609__NORMTESTER_GOTOINSTR,
- meltrout_160_warmelt_genobj_NORMTESTER_GOTOINSTR);
-
- /*iniclos dclo_1610__NORMTESTER_GOTOINSTR */
- /*_.VALCLO___V1759*/ meltfptr[1758] =
- (void *) &cdat->dclo_1610__NORMTESTER_GOTOINSTR;
- cdat->dclo_1610__NORMTESTER_GOTOINSTR.discr =
+ cdat->drout_1617__COMPILOBJ_NREP_MATCHJUMP.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1617__COMPILOBJ_NREP_MATCHJUMP,
+ meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP);
+
+ /*iniclos dclo_1618__COMPILOBJ_NREP_MATCHJUMP */
+ /*_.VALCLO___V1772*/ meltfptr[1771] =
+ (void *) &cdat->dclo_1618__COMPILOBJ_NREP_MATCHJUMP;
+ cdat->dclo_1618__COMPILOBJ_NREP_MATCHJUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1610__NORMTESTER_GOTOINSTR.nbval = 0;
+ cdat->dclo_1618__COMPILOBJ_NREP_MATCHJUMP.nbval = 0;
+
+
+/*iniobj dsym_1619__CLASS_NREP_MATCH_JUMP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1773*/ meltfptr[1772])
+ /*_.VALDATA___V1773*/
+ meltfptr[1772] = (void *) &cdat->dsym_1619__CLASS_NREP_MATCH_JUMP;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr isobj dsym_1619__CLASS_NREP_MATCH_JUMP",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
+ MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr objmagic dsym_1619__CLASS_NREP_MATCH_JUMP",
+ ((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_1619__CLASS_NREP_MATCH_JUMP.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_1619__CLASS_NREP_MATCH_JUMP.obj_hash = 677633544;
+ cdat->dsym_1619__CLASS_NREP_MATCH_JUMP.obj_len = 3;
+
- /*inirout drout_1611__ENDMATCH_GOTOINSTR */
- /*_.VALROUT___V1760*/ meltfptr[1759] =
- (void *) &cdat->drout_1611__ENDMATCH_GOTOINSTR;
- cdat->drout_1611__ENDMATCH_GOTOINSTR.discr =
+/*inistring dstr_1620__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1774*/ meltfptr[1773] =
+ (void *) &cdat->dstr_1620__CLASS_NREP_MATCH;
+ cdat->dstr_1620__CLASS_NREP_MATCH.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_1620__CLASS_NREP_MATCH.val,
+ "CLASS_NREP_MATCH_JUMP",
+ sizeof (cdat->dstr_1620__CLASS_NREP_MATCH.
+ val) - 1);
+ /*inirout drout_1621__NORMTESTER_LABELINSTR */
+ /*_.VALROUT___V1717*/ meltfptr[1716] =
+ (void *) &cdat->drout_1621__NORMTESTER_LABELINSTR;
+ cdat->drout_1621__NORMTESTER_LABELINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1611__ENDMATCH_GOTOINSTR.routdescr,
- "ENDMATCH_GOTOINSTR @warmelt-genobj.melt:5409",
+ strncpy (cdat->drout_1621__NORMTESTER_LABELINSTR.routdescr,
+ "NORMTESTER_LABELINSTR @warmelt-genobj.melt:5468",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1611__ENDMATCH_GOTOINSTR.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1611__ENDMATCH_GOTOINSTR,
- meltrout_161_warmelt_genobj_ENDMATCH_GOTOINSTR);
-
- /*iniclos dclo_1612__ENDMATCH_GOTOINSTR */
- /*_.VALCLO___V1761*/ meltfptr[1760] =
- (void *) &cdat->dclo_1612__ENDMATCH_GOTOINSTR;
- cdat->dclo_1612__ENDMATCH_GOTOINSTR.discr =
+ cdat->drout_1621__NORMTESTER_LABELINSTR.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1621__NORMTESTER_LABELINSTR,
+ meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR);
+
+ /*iniclos dclo_1622__NORMTESTER_LABELINSTR */
+ /*_.VALCLO___V1716*/ meltfptr[1715] =
+ (void *) &cdat->dclo_1622__NORMTESTER_LABELINSTR;
+ cdat->dclo_1622__NORMTESTER_LABELINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1612__ENDMATCH_GOTOINSTR.nbval = 0;
+ cdat->dclo_1622__NORMTESTER_LABELINSTR.nbval = 0;
- /*inirout drout_1613__TESTMATCH_GOTOINSTR */
- /*_.VALROUT___V1762*/ meltfptr[1761] =
- (void *) &cdat->drout_1613__TESTMATCH_GOTOINSTR;
- cdat->drout_1613__TESTMATCH_GOTOINSTR.discr =
+ /*inirout drout_1623__NORMTESTER_GOTOINSTR */
+ /*_.VALROUT___V1775*/ meltfptr[1774] =
+ (void *) &cdat->drout_1623__NORMTESTER_GOTOINSTR;
+ cdat->drout_1623__NORMTESTER_GOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1613__TESTMATCH_GOTOINSTR.routdescr,
- "TESTMATCH_GOTOINSTR @warmelt-genobj.melt:5433",
+ strncpy (cdat->drout_1623__NORMTESTER_GOTOINSTR.routdescr,
+ "NORMTESTER_GOTOINSTR @warmelt-genobj.melt:5500",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1613__TESTMATCH_GOTOINSTR.nbval = 7;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1613__TESTMATCH_GOTOINSTR,
- meltrout_162_warmelt_genobj_TESTMATCH_GOTOINSTR);
-
- /*iniclos dclo_1614__TESTMATCH_GOTOINSTR */
- /*_.VALCLO___V1763*/ meltfptr[1762] =
- (void *) &cdat->dclo_1614__TESTMATCH_GOTOINSTR;
- cdat->dclo_1614__TESTMATCH_GOTOINSTR.discr =
+ cdat->drout_1623__NORMTESTER_GOTOINSTR.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1623__NORMTESTER_GOTOINSTR,
+ meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR);
+
+ /*iniclos dclo_1624__NORMTESTER_GOTOINSTR */
+ /*_.VALCLO___V1776*/ meltfptr[1775] =
+ (void *) &cdat->dclo_1624__NORMTESTER_GOTOINSTR;
+ cdat->dclo_1624__NORMTESTER_GOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1614__TESTMATCH_GOTOINSTR.nbval = 0;
+ cdat->dclo_1624__NORMTESTER_GOTOINSTR.nbval = 0;
- /*inirout drout_1615__NORMTESTER_FREE_OBJLOC_LIST */
- /*_.VALROUT___V1764*/ meltfptr[1763] =
- (void *) &cdat->drout_1615__NORMTESTER_FREE_OBJLOC_LIST;
- cdat->drout_1615__NORMTESTER_FREE_OBJLOC_LIST.discr =
+ /*inirout drout_1625__ENDMATCH_GOTOINSTR */
+ /*_.VALROUT___V1777*/ meltfptr[1776] =
+ (void *) &cdat->drout_1625__ENDMATCH_GOTOINSTR;
+ cdat->drout_1625__ENDMATCH_GOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1615__NORMTESTER_FREE_OBJLOC_LIST.routdescr,
- "NORMTESTER_FREE_OBJLOC_LIST @warmelt-genobj.melt:5459",
+ strncpy (cdat->drout_1625__ENDMATCH_GOTOINSTR.routdescr,
+ "ENDMATCH_GOTOINSTR @warmelt-genobj.melt:5533",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1615__NORMTESTER_FREE_OBJLOC_LIST.nbval = 10;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1615__NORMTESTER_FREE_OBJLOC_LIST,
- meltrout_163_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST);
-
- /*iniclos dclo_1616__NORMTESTER_FREE_OBJLOC_LIST */
- /*_.VALCLO___V1766*/ meltfptr[1765] =
- (void *) &cdat->dclo_1616__NORMTESTER_FREE_OBJLOC_LIST;
- cdat->dclo_1616__NORMTESTER_FREE_OBJLOC_LIST.discr =
+ cdat->drout_1625__ENDMATCH_GOTOINSTR.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1625__ENDMATCH_GOTOINSTR,
+ meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR);
+
+ /*iniclos dclo_1626__ENDMATCH_GOTOINSTR */
+ /*_.VALCLO___V1778*/ meltfptr[1777] =
+ (void *) &cdat->dclo_1626__ENDMATCH_GOTOINSTR;
+ cdat->dclo_1626__ENDMATCH_GOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1616__NORMTESTER_FREE_OBJLOC_LIST.nbval = 0;
+ cdat->dclo_1626__ENDMATCH_GOTOINSTR.nbval = 0;
- /*inirout drout_1617__LAMBDA_ */
- /*_.VALROUT___V1765*/ meltfptr[1764] = (void *) &cdat->drout_1617__LAMBDA_;
- cdat->drout_1617__LAMBDA_.discr =
+ /*inirout drout_1627__TESTMATCH_GOTOINSTR */
+ /*_.VALROUT___V1779*/ meltfptr[1778] =
+ (void *) &cdat->drout_1627__TESTMATCH_GOTOINSTR;
+ cdat->drout_1627__TESTMATCH_GOTOINSTR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1617__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:5473", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1617__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1617__LAMBDA_,
- meltrout_164_warmelt_genobj_LAMBDA___52__);
-
- /*inirout drout_1618__COMPILTST_NORMTESTER_ANY */
- /*_.VALROUT___V1767*/ meltfptr[1766] =
- (void *) &cdat->drout_1618__COMPILTST_NORMTESTER_ANY;
- cdat->drout_1618__COMPILTST_NORMTESTER_ANY.discr =
+ strncpy (cdat->drout_1627__TESTMATCH_GOTOINSTR.routdescr,
+ "TESTMATCH_GOTOINSTR @warmelt-genobj.melt:5557",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1627__TESTMATCH_GOTOINSTR.nbval = 7;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1627__TESTMATCH_GOTOINSTR,
+ meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR);
+
+ /*iniclos dclo_1628__TESTMATCH_GOTOINSTR */
+ /*_.VALCLO___V1780*/ meltfptr[1779] =
+ (void *) &cdat->dclo_1628__TESTMATCH_GOTOINSTR;
+ cdat->dclo_1628__TESTMATCH_GOTOINSTR.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_1628__TESTMATCH_GOTOINSTR.nbval = 0;
+
+ /*inirout drout_1629__NORMTESTER_FREE_OBJLOC_LIST */
+ /*_.VALROUT___V1781*/ meltfptr[1780] =
+ (void *) &cdat->drout_1629__NORMTESTER_FREE_OBJLOC_LIST;
+ cdat->drout_1629__NORMTESTER_FREE_OBJLOC_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1618__COMPILTST_NORMTESTER_ANY.routdescr,
- "COMPILTST_NORMTESTER_ANY @warmelt-genobj.melt:5491",
+ strncpy (cdat->drout_1629__NORMTESTER_FREE_OBJLOC_LIST.routdescr,
+ "NORMTESTER_FREE_OBJLOC_LIST @warmelt-genobj.melt:5583",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1618__COMPILTST_NORMTESTER_ANY.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1618__COMPILTST_NORMTESTER_ANY,
- meltrout_165_warmelt_genobj_COMPILTST_NORMTESTER_ANY);
-
- /*iniclos dclo_1619__COMPILTST_NORMTESTER_ANY */
- /*_.VALCLO___V1768*/ meltfptr[1767] =
- (void *) &cdat->dclo_1619__COMPILTST_NORMTESTER_ANY;
- cdat->dclo_1619__COMPILTST_NORMTESTER_ANY.discr =
+ cdat->drout_1629__NORMTESTER_FREE_OBJLOC_LIST.nbval = 10;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1629__NORMTESTER_FREE_OBJLOC_LIST,
+ meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST);
+
+ /*iniclos dclo_1630__NORMTESTER_FREE_OBJLOC_LIST */
+ /*_.VALCLO___V1783*/ meltfptr[1782] =
+ (void *) &cdat->dclo_1630__NORMTESTER_FREE_OBJLOC_LIST;
+ cdat->dclo_1630__NORMTESTER_FREE_OBJLOC_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1619__COMPILTST_NORMTESTER_ANY.nbval = 0;
+ cdat->dclo_1630__NORMTESTER_FREE_OBJLOC_LIST.nbval = 0;
- /*inirout drout_1620__COMPILTST_NORMTESTER_MATCHER */
- /*_.VALROUT___V1769*/ meltfptr[1768] =
- (void *) &cdat->drout_1620__COMPILTST_NORMTESTER_MATCHER;
- cdat->drout_1620__COMPILTST_NORMTESTER_MATCHER.discr =
+ /*inirout drout_1631__LAMBDA_ */
+ /*_.VALROUT___V1782*/ meltfptr[1781] = (void *) &cdat->drout_1631__LAMBDA_;
+ cdat->drout_1631__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1620__COMPILTST_NORMTESTER_MATCHER.routdescr,
- "COMPILTST_NORMTESTER_MATCHER @warmelt-genobj.melt:5503",
+ strncpy (cdat->drout_1631__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:5597", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1631__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1631__LAMBDA_,
+ meltrout_168_warmelt_genobj_LAMBDA___52__);
+
+ /*inirout drout_1632__COMPILTST_NORMTESTER_ANY */
+ /*_.VALROUT___V1784*/ meltfptr[1783] =
+ (void *) &cdat->drout_1632__COMPILTST_NORMTESTER_ANY;
+ cdat->drout_1632__COMPILTST_NORMTESTER_ANY.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_1632__COMPILTST_NORMTESTER_ANY.routdescr,
+ "COMPILTST_NORMTESTER_ANY @warmelt-genobj.melt:5615",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1620__COMPILTST_NORMTESTER_MATCHER.nbval = 14;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1620__COMPILTST_NORMTESTER_MATCHER,
- meltrout_166_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER);
+ cdat->drout_1632__COMPILTST_NORMTESTER_ANY.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1632__COMPILTST_NORMTESTER_ANY,
+ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY);
+
+ /*iniclos dclo_1633__COMPILTST_NORMTESTER_ANY */
+ /*_.VALCLO___V1785*/ meltfptr[1784] =
+ (void *) &cdat->dclo_1633__COMPILTST_NORMTESTER_ANY;
+ cdat->dclo_1633__COMPILTST_NORMTESTER_ANY.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_1633__COMPILTST_NORMTESTER_ANY.nbval = 0;
- /*iniclos dclo_1621__COMPILTST_NORMTESTER_MATCHER */
- /*_.VALCLO___V1770*/ meltfptr[1769] =
- (void *) &cdat->dclo_1621__COMPILTST_NORMTESTER_MATCHER;
- cdat->dclo_1621__COMPILTST_NORMTESTER_MATCHER.discr =
+ /*inirout drout_1634__COMPILTST_NORMTESTER_MATCHER */
+ /*_.VALROUT___V1786*/ meltfptr[1785] =
+ (void *) &cdat->drout_1634__COMPILTST_NORMTESTER_MATCHER;
+ cdat->drout_1634__COMPILTST_NORMTESTER_MATCHER.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_1634__COMPILTST_NORMTESTER_MATCHER.routdescr,
+ "COMPILTST_NORMTESTER_MATCHER @warmelt-genobj.melt:5627",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1634__COMPILTST_NORMTESTER_MATCHER.nbval = 14;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1634__COMPILTST_NORMTESTER_MATCHER,
+ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER);
+
+ /*iniclos dclo_1635__COMPILTST_NORMTESTER_MATCHER */
+ /*_.VALCLO___V1787*/ meltfptr[1786] =
+ (void *) &cdat->dclo_1635__COMPILTST_NORMTESTER_MATCHER;
+ cdat->dclo_1635__COMPILTST_NORMTESTER_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1621__COMPILTST_NORMTESTER_MATCHER.nbval = 0;
+ cdat->dclo_1635__COMPILTST_NORMTESTER_MATCHER.nbval = 0;
-/*iniobj dsym_1622__CLASS_NORMTESTER_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1771*/ meltfptr[1770])
- /*_.VALDATA___V1771*/
- meltfptr[1770] = (void *) &cdat->dsym_1622__CLASS_NORMTESTER_MATCHER;
+/*iniobj dsym_1636__CLASS_NORMTESTER_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1788*/ meltfptr[1787])
+ /*_.VALDATA___V1788*/
+ meltfptr[1787] = (void *) &cdat->dsym_1636__CLASS_NORMTESTER_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1622__CLASS_NORMTESTER_MATCHER",
+ ("iniobj check.discr isobj dsym_1636__CLASS_NORMTESTER_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1622__CLASS_NORMTESTER_MATCHER",
+ ("iniobj check.discr objmagic dsym_1636__CLASS_NORMTESTER_MATCHER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1622__CLASS_NORMTESTER_MATCHER.meltobj_class =
+ cdat->dsym_1636__CLASS_NORMTESTER_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1622__CLASS_NORMTESTER_MATCHER.obj_hash = 274164991;
- cdat->dsym_1622__CLASS_NORMTESTER_MATCHER.obj_len = 3;
+ cdat->dsym_1636__CLASS_NORMTESTER_MATCHER.obj_hash = 274164991;
+ cdat->dsym_1636__CLASS_NORMTESTER_MATCHER.obj_len = 3;
-/*inistring dstr_1623__CLASS_NORMTESTER*/
- /*_.VALSTR___V1772*/ meltfptr[1771] =
- (void *) &cdat->dstr_1623__CLASS_NORMTESTER;
- cdat->dstr_1623__CLASS_NORMTESTER.discr =
+/*inistring dstr_1637__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1789*/ meltfptr[1788] =
+ (void *) &cdat->dstr_1637__CLASS_NORMTESTER;
+ cdat->dstr_1637__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1623__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1637__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_MATCHER",
- sizeof (cdat->dstr_1623__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1637__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1624__COMPILTST_NORMTESTER_INSTANCE */
- /*_.VALROUT___V1773*/ meltfptr[1772] =
- (void *) &cdat->drout_1624__COMPILTST_NORMTESTER_INSTANCE;
- cdat->drout_1624__COMPILTST_NORMTESTER_INSTANCE.discr =
+ /*inirout drout_1638__COMPILTST_NORMTESTER_INSTANCE */
+ /*_.VALROUT___V1790*/ meltfptr[1789] =
+ (void *) &cdat->drout_1638__COMPILTST_NORMTESTER_INSTANCE;
+ cdat->drout_1638__COMPILTST_NORMTESTER_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1624__COMPILTST_NORMTESTER_INSTANCE.routdescr,
- "COMPILTST_NORMTESTER_INSTANCE @warmelt-genobj.melt:5576",
+ strncpy (cdat->drout_1638__COMPILTST_NORMTESTER_INSTANCE.routdescr,
+ "COMPILTST_NORMTESTER_INSTANCE @warmelt-genobj.melt:5700",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1624__COMPILTST_NORMTESTER_INSTANCE.nbval = 19;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1624__COMPILTST_NORMTESTER_INSTANCE,
- meltrout_167_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE);
-
- /*iniclos dclo_1625__COMPILTST_NORMTESTER_INSTANCE */
- /*_.VALCLO___V1774*/ meltfptr[1773] =
- (void *) &cdat->dclo_1625__COMPILTST_NORMTESTER_INSTANCE;
- cdat->dclo_1625__COMPILTST_NORMTESTER_INSTANCE.discr =
+ cdat->drout_1638__COMPILTST_NORMTESTER_INSTANCE.nbval = 19;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1638__COMPILTST_NORMTESTER_INSTANCE,
+ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE);
+
+ /*iniclos dclo_1639__COMPILTST_NORMTESTER_INSTANCE */
+ /*_.VALCLO___V1791*/ meltfptr[1790] =
+ (void *) &cdat->dclo_1639__COMPILTST_NORMTESTER_INSTANCE;
+ cdat->dclo_1639__COMPILTST_NORMTESTER_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1625__COMPILTST_NORMTESTER_INSTANCE.nbval = 0;
+ cdat->dclo_1639__COMPILTST_NORMTESTER_INSTANCE.nbval = 0;
-/*iniobj dsym_1626__CLASS_NORMTESTER_INSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1775*/ meltfptr[1774])
- /*_.VALDATA___V1775*/
- meltfptr[1774] = (void *) &cdat->dsym_1626__CLASS_NORMTESTER_INSTANCE;
+/*iniobj dsym_1640__CLASS_NORMTESTER_INSTANCE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1792*/ meltfptr[1791])
+ /*_.VALDATA___V1792*/
+ meltfptr[1791] = (void *) &cdat->dsym_1640__CLASS_NORMTESTER_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1626__CLASS_NORMTESTER_INSTANCE",
+ ("iniobj check.discr isobj dsym_1640__CLASS_NORMTESTER_INSTANCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1626__CLASS_NORMTESTER_INSTANCE",
+ ("iniobj check.discr objmagic dsym_1640__CLASS_NORMTESTER_INSTANCE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1626__CLASS_NORMTESTER_INSTANCE.meltobj_class =
+ cdat->dsym_1640__CLASS_NORMTESTER_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1626__CLASS_NORMTESTER_INSTANCE.obj_hash = 927841366;
- cdat->dsym_1626__CLASS_NORMTESTER_INSTANCE.obj_len = 3;
+ cdat->dsym_1640__CLASS_NORMTESTER_INSTANCE.obj_hash = 927841366;
+ cdat->dsym_1640__CLASS_NORMTESTER_INSTANCE.obj_len = 3;
-/*inistring dstr_1627__CLASS_NORMTESTER*/
- /*_.VALSTR___V1776*/ meltfptr[1775] =
- (void *) &cdat->dstr_1627__CLASS_NORMTESTER;
- cdat->dstr_1627__CLASS_NORMTESTER.discr =
+/*inistring dstr_1641__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1793*/ meltfptr[1792] =
+ (void *) &cdat->dstr_1641__CLASS_NORMTESTER;
+ cdat->dstr_1641__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1627__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1641__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_INSTANCE",
- sizeof (cdat->dstr_1627__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1641__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1628__COMPILTST_NORMTESTER_TUPLE */
- /*_.VALROUT___V1777*/ meltfptr[1776] =
- (void *) &cdat->drout_1628__COMPILTST_NORMTESTER_TUPLE;
- cdat->drout_1628__COMPILTST_NORMTESTER_TUPLE.discr =
+ /*inirout drout_1642__COMPILTST_NORMTESTER_TUPLE */
+ /*_.VALROUT___V1794*/ meltfptr[1793] =
+ (void *) &cdat->drout_1642__COMPILTST_NORMTESTER_TUPLE;
+ cdat->drout_1642__COMPILTST_NORMTESTER_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1628__COMPILTST_NORMTESTER_TUPLE.routdescr,
- "COMPILTST_NORMTESTER_TUPLE @warmelt-genobj.melt:5676",
+ strncpy (cdat->drout_1642__COMPILTST_NORMTESTER_TUPLE.routdescr,
+ "COMPILTST_NORMTESTER_TUPLE @warmelt-genobj.melt:5800",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1628__COMPILTST_NORMTESTER_TUPLE.nbval = 20;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1628__COMPILTST_NORMTESTER_TUPLE,
- meltrout_168_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE);
-
- /*iniclos dclo_1629__COMPILTST_NORMTESTER_TUPLE */
- /*_.VALCLO___V1778*/ meltfptr[1777] =
- (void *) &cdat->dclo_1629__COMPILTST_NORMTESTER_TUPLE;
- cdat->dclo_1629__COMPILTST_NORMTESTER_TUPLE.discr =
+ cdat->drout_1642__COMPILTST_NORMTESTER_TUPLE.nbval = 20;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1642__COMPILTST_NORMTESTER_TUPLE,
+ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE);
+
+ /*iniclos dclo_1643__COMPILTST_NORMTESTER_TUPLE */
+ /*_.VALCLO___V1795*/ meltfptr[1794] =
+ (void *) &cdat->dclo_1643__COMPILTST_NORMTESTER_TUPLE;
+ cdat->dclo_1643__COMPILTST_NORMTESTER_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1629__COMPILTST_NORMTESTER_TUPLE.nbval = 0;
+ cdat->dclo_1643__COMPILTST_NORMTESTER_TUPLE.nbval = 0;
-/*iniobj dsym_1630__CLASS_NORMTESTER_TUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1779*/ meltfptr[1778])
- /*_.VALDATA___V1779*/
- meltfptr[1778] = (void *) &cdat->dsym_1630__CLASS_NORMTESTER_TUPLE;
+/*iniobj dsym_1644__CLASS_NORMTESTER_TUPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1796*/ meltfptr[1795])
+ /*_.VALDATA___V1796*/
+ meltfptr[1795] = (void *) &cdat->dsym_1644__CLASS_NORMTESTER_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1630__CLASS_NORMTESTER_TUPLE",
+ ("iniobj check.discr isobj dsym_1644__CLASS_NORMTESTER_TUPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1630__CLASS_NORMTESTER_TUPLE",
+ ("iniobj check.discr objmagic dsym_1644__CLASS_NORMTESTER_TUPLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1630__CLASS_NORMTESTER_TUPLE.meltobj_class =
+ cdat->dsym_1644__CLASS_NORMTESTER_TUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1630__CLASS_NORMTESTER_TUPLE.obj_hash = 138981626;
- cdat->dsym_1630__CLASS_NORMTESTER_TUPLE.obj_len = 3;
+ cdat->dsym_1644__CLASS_NORMTESTER_TUPLE.obj_hash = 138981626;
+ cdat->dsym_1644__CLASS_NORMTESTER_TUPLE.obj_len = 3;
-/*inistring dstr_1631__CLASS_NORMTESTER*/
- /*_.VALSTR___V1780*/ meltfptr[1779] =
- (void *) &cdat->dstr_1631__CLASS_NORMTESTER;
- cdat->dstr_1631__CLASS_NORMTESTER.discr =
+/*inistring dstr_1645__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1797*/ meltfptr[1796] =
+ (void *) &cdat->dstr_1645__CLASS_NORMTESTER;
+ cdat->dstr_1645__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1631__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1645__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_TUPLE",
- sizeof (cdat->dstr_1631__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1645__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1632__COMPILTST_NORMTESTER_SAME */
- /*_.VALROUT___V1781*/ meltfptr[1780] =
- (void *) &cdat->drout_1632__COMPILTST_NORMTESTER_SAME;
- cdat->drout_1632__COMPILTST_NORMTESTER_SAME.discr =
+ /*inirout drout_1646__COMPILTST_NORMTESTER_SAME */
+ /*_.VALROUT___V1798*/ meltfptr[1797] =
+ (void *) &cdat->drout_1646__COMPILTST_NORMTESTER_SAME;
+ cdat->drout_1646__COMPILTST_NORMTESTER_SAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1632__COMPILTST_NORMTESTER_SAME.routdescr,
- "COMPILTST_NORMTESTER_SAME @warmelt-genobj.melt:5775",
+ strncpy (cdat->drout_1646__COMPILTST_NORMTESTER_SAME.routdescr,
+ "COMPILTST_NORMTESTER_SAME @warmelt-genobj.melt:5899",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1632__COMPILTST_NORMTESTER_SAME.nbval = 15;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1632__COMPILTST_NORMTESTER_SAME,
- meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_SAME);
-
- /*iniclos dclo_1633__COMPILTST_NORMTESTER_SAME */
- /*_.VALCLO___V1782*/ meltfptr[1781] =
- (void *) &cdat->dclo_1633__COMPILTST_NORMTESTER_SAME;
- cdat->dclo_1633__COMPILTST_NORMTESTER_SAME.discr =
+ cdat->drout_1646__COMPILTST_NORMTESTER_SAME.nbval = 15;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1646__COMPILTST_NORMTESTER_SAME,
+ meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME);
+
+ /*iniclos dclo_1647__COMPILTST_NORMTESTER_SAME */
+ /*_.VALCLO___V1799*/ meltfptr[1798] =
+ (void *) &cdat->dclo_1647__COMPILTST_NORMTESTER_SAME;
+ cdat->dclo_1647__COMPILTST_NORMTESTER_SAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1633__COMPILTST_NORMTESTER_SAME.nbval = 0;
+ cdat->dclo_1647__COMPILTST_NORMTESTER_SAME.nbval = 0;
-/*iniobj dsym_1634__CLASS_NORMTESTER_SAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1783*/ meltfptr[1782])
- /*_.VALDATA___V1783*/
- meltfptr[1782] = (void *) &cdat->dsym_1634__CLASS_NORMTESTER_SAME;
+/*iniobj dsym_1648__CLASS_NORMTESTER_SAME*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1800*/ meltfptr[1799])
+ /*_.VALDATA___V1800*/
+ meltfptr[1799] = (void *) &cdat->dsym_1648__CLASS_NORMTESTER_SAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1634__CLASS_NORMTESTER_SAME",
+ ("iniobj check.discr isobj dsym_1648__CLASS_NORMTESTER_SAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1634__CLASS_NORMTESTER_SAME",
+ ("iniobj check.discr objmagic dsym_1648__CLASS_NORMTESTER_SAME",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1634__CLASS_NORMTESTER_SAME.meltobj_class =
+ cdat->dsym_1648__CLASS_NORMTESTER_SAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1634__CLASS_NORMTESTER_SAME.obj_hash = 327155773;
- cdat->dsym_1634__CLASS_NORMTESTER_SAME.obj_len = 3;
+ cdat->dsym_1648__CLASS_NORMTESTER_SAME.obj_hash = 327155773;
+ cdat->dsym_1648__CLASS_NORMTESTER_SAME.obj_len = 3;
-/*inistring dstr_1635__CLASS_NORMTESTER*/
- /*_.VALSTR___V1784*/ meltfptr[1783] =
- (void *) &cdat->dstr_1635__CLASS_NORMTESTER;
- cdat->dstr_1635__CLASS_NORMTESTER.discr =
+/*inistring dstr_1649__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1801*/ meltfptr[1800] =
+ (void *) &cdat->dstr_1649__CLASS_NORMTESTER;
+ cdat->dstr_1649__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1635__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1649__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_SAME",
- sizeof (cdat->dstr_1635__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1649__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1636__COMPILTST_NORMTESTER_SUCCESS */
- /*_.VALROUT___V1785*/ meltfptr[1784] =
- (void *) &cdat->drout_1636__COMPILTST_NORMTESTER_SUCCESS;
- cdat->drout_1636__COMPILTST_NORMTESTER_SUCCESS.discr =
+ /*inirout drout_1650__COMPILTST_NORMTESTER_SUCCESS */
+ /*_.VALROUT___V1802*/ meltfptr[1801] =
+ (void *) &cdat->drout_1650__COMPILTST_NORMTESTER_SUCCESS;
+ cdat->drout_1650__COMPILTST_NORMTESTER_SUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1636__COMPILTST_NORMTESTER_SUCCESS.routdescr,
- "COMPILTST_NORMTESTER_SUCCESS @warmelt-genobj.melt:5843",
+ strncpy (cdat->drout_1650__COMPILTST_NORMTESTER_SUCCESS.routdescr,
+ "COMPILTST_NORMTESTER_SUCCESS @warmelt-genobj.melt:5967",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1636__COMPILTST_NORMTESTER_SUCCESS.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1636__COMPILTST_NORMTESTER_SUCCESS,
- meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS);
-
- /*iniclos dclo_1637__COMPILTST_NORMTESTER_SUCCESS */
- /*_.VALCLO___V1786*/ meltfptr[1785] =
- (void *) &cdat->dclo_1637__COMPILTST_NORMTESTER_SUCCESS;
- cdat->dclo_1637__COMPILTST_NORMTESTER_SUCCESS.discr =
+ cdat->drout_1650__COMPILTST_NORMTESTER_SUCCESS.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1650__COMPILTST_NORMTESTER_SUCCESS,
+ meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS);
+
+ /*iniclos dclo_1651__COMPILTST_NORMTESTER_SUCCESS */
+ /*_.VALCLO___V1803*/ meltfptr[1802] =
+ (void *) &cdat->dclo_1651__COMPILTST_NORMTESTER_SUCCESS;
+ cdat->dclo_1651__COMPILTST_NORMTESTER_SUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1637__COMPILTST_NORMTESTER_SUCCESS.nbval = 0;
+ cdat->dclo_1651__COMPILTST_NORMTESTER_SUCCESS.nbval = 0;
- /*inirout drout_1638__COMPILTST_NORMTESTER_ORCLEAR */
- /*_.VALROUT___V1787*/ meltfptr[1786] =
- (void *) &cdat->drout_1638__COMPILTST_NORMTESTER_ORCLEAR;
- cdat->drout_1638__COMPILTST_NORMTESTER_ORCLEAR.discr =
+ /*inirout drout_1652__COMPILTST_NORMTESTER_ORCLEAR */
+ /*_.VALROUT___V1804*/ meltfptr[1803] =
+ (void *) &cdat->drout_1652__COMPILTST_NORMTESTER_ORCLEAR;
+ cdat->drout_1652__COMPILTST_NORMTESTER_ORCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1638__COMPILTST_NORMTESTER_ORCLEAR.routdescr,
- "COMPILTST_NORMTESTER_ORCLEAR @warmelt-genobj.melt:5874",
+ strncpy (cdat->drout_1652__COMPILTST_NORMTESTER_ORCLEAR.routdescr,
+ "COMPILTST_NORMTESTER_ORCLEAR @warmelt-genobj.melt:5998",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1638__COMPILTST_NORMTESTER_ORCLEAR.nbval = 9;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1638__COMPILTST_NORMTESTER_ORCLEAR,
- meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR);
-
- /*iniclos dclo_1639__COMPILTST_NORMTESTER_ORCLEAR */
- /*_.VALCLO___V1788*/ meltfptr[1787] =
- (void *) &cdat->dclo_1639__COMPILTST_NORMTESTER_ORCLEAR;
- cdat->dclo_1639__COMPILTST_NORMTESTER_ORCLEAR.discr =
+ cdat->drout_1652__COMPILTST_NORMTESTER_ORCLEAR.nbval = 9;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1652__COMPILTST_NORMTESTER_ORCLEAR,
+ meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR);
+
+ /*iniclos dclo_1653__COMPILTST_NORMTESTER_ORCLEAR */
+ /*_.VALCLO___V1805*/ meltfptr[1804] =
+ (void *) &cdat->dclo_1653__COMPILTST_NORMTESTER_ORCLEAR;
+ cdat->dclo_1653__COMPILTST_NORMTESTER_ORCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1639__COMPILTST_NORMTESTER_ORCLEAR.nbval = 0;
+ cdat->dclo_1653__COMPILTST_NORMTESTER_ORCLEAR.nbval = 0;
-/*iniobj dsym_1640__CLASS_NORMTESTER_OR_CLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1789*/ meltfptr[1788])
- /*_.VALDATA___V1789*/
- meltfptr[1788] = (void *) &cdat->dsym_1640__CLASS_NORMTESTER_OR_CLEAR;
+/*iniobj dsym_1654__CLASS_NORMTESTER_OR_CLEAR*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1806*/ meltfptr[1805])
+ /*_.VALDATA___V1806*/
+ meltfptr[1805] = (void *) &cdat->dsym_1654__CLASS_NORMTESTER_OR_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1640__CLASS_NORMTESTER_OR_CLEAR",
+ ("iniobj check.discr isobj dsym_1654__CLASS_NORMTESTER_OR_CLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1640__CLASS_NORMTESTER_OR_CLEAR",
+ ("iniobj check.discr objmagic dsym_1654__CLASS_NORMTESTER_OR_CLEAR",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1640__CLASS_NORMTESTER_OR_CLEAR.meltobj_class =
+ cdat->dsym_1654__CLASS_NORMTESTER_OR_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1640__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 938184631;
- cdat->dsym_1640__CLASS_NORMTESTER_OR_CLEAR.obj_len = 3;
+ cdat->dsym_1654__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 938184631;
+ cdat->dsym_1654__CLASS_NORMTESTER_OR_CLEAR.obj_len = 3;
-/*inistring dstr_1641__CLASS_NORMTESTER*/
- /*_.VALSTR___V1790*/ meltfptr[1789] =
- (void *) &cdat->dstr_1641__CLASS_NORMTESTER;
- cdat->dstr_1641__CLASS_NORMTESTER.discr =
+/*inistring dstr_1655__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1807*/ meltfptr[1806] =
+ (void *) &cdat->dstr_1655__CLASS_NORMTESTER;
+ cdat->dstr_1655__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1641__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1655__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_OR_CLEAR",
- sizeof (cdat->dstr_1641__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1655__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT */
- /*_.VALROUT___V1791*/ meltfptr[1790] =
- (void *) &cdat->drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT;
- cdat->drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT.discr =
+ /*inirout drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT */
+ /*_.VALROUT___V1808*/ meltfptr[1807] =
+ (void *) &cdat->drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT;
+ cdat->drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT.routdescr,
- "COMPILTST_NORMTESTER_ORTRANSMIT @warmelt-genobj.melt:5924",
+ strncpy (cdat->drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT.routdescr,
+ "COMPILTST_NORMTESTER_ORTRANSMIT @warmelt-genobj.melt:6048",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 9;
+ cdat->drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 9;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT,
- meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT);
+ drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT,
+ meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT);
- /*iniclos dclo_1643__COMPILTST_NORMTESTER_ORTRANSMIT */
- /*_.VALCLO___V1792*/ meltfptr[1791] =
- (void *) &cdat->dclo_1643__COMPILTST_NORMTESTER_ORTRANSMIT;
- cdat->dclo_1643__COMPILTST_NORMTESTER_ORTRANSMIT.discr =
+ /*iniclos dclo_1657__COMPILTST_NORMTESTER_ORTRANSMIT */
+ /*_.VALCLO___V1809*/ meltfptr[1808] =
+ (void *) &cdat->dclo_1657__COMPILTST_NORMTESTER_ORTRANSMIT;
+ cdat->dclo_1657__COMPILTST_NORMTESTER_ORTRANSMIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1643__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 0;
+ cdat->dclo_1657__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 0;
-/*iniobj dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1793*/ meltfptr[1792])
- /*_.VALDATA___V1793*/
- meltfptr[1792] = (void *) &cdat->dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT;
+/*iniobj dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1810*/ meltfptr[1809])
+ /*_.VALDATA___V1810*/
+ meltfptr[1809] = (void *) &cdat->dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT",
+ ("iniobj check.discr isobj dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT",
+ ("iniobj check.discr objmagic dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class =
+ cdat->dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 832170664;
- cdat->dsym_1644__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 3;
+ cdat->dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 832170664;
+ cdat->dsym_1658__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 3;
-/*inistring dstr_1645__CLASS_NORMTESTER*/
- /*_.VALSTR___V1794*/ meltfptr[1793] =
- (void *) &cdat->dstr_1645__CLASS_NORMTESTER;
- cdat->dstr_1645__CLASS_NORMTESTER.discr =
+/*inistring dstr_1659__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1811*/ meltfptr[1810] =
+ (void *) &cdat->dstr_1659__CLASS_NORMTESTER;
+ cdat->dstr_1659__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1645__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1659__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_OR_TRANSMIT",
- sizeof (cdat->dstr_1645__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1659__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1646__COMPILTST_NORMTESTER_DISJUNCTION */
- /*_.VALROUT___V1795*/ meltfptr[1794] =
- (void *) &cdat->drout_1646__COMPILTST_NORMTESTER_DISJUNCTION;
- cdat->drout_1646__COMPILTST_NORMTESTER_DISJUNCTION.discr =
+ /*inirout drout_1660__COMPILTST_NORMTESTER_DISJUNCTION */
+ /*_.VALROUT___V1812*/ meltfptr[1811] =
+ (void *) &cdat->drout_1660__COMPILTST_NORMTESTER_DISJUNCTION;
+ cdat->drout_1660__COMPILTST_NORMTESTER_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1646__COMPILTST_NORMTESTER_DISJUNCTION.routdescr,
- "COMPILTST_NORMTESTER_DISJUNCTION @warmelt-genobj.melt:5973",
+ strncpy (cdat->drout_1660__COMPILTST_NORMTESTER_DISJUNCTION.routdescr,
+ "COMPILTST_NORMTESTER_DISJUNCTION @warmelt-genobj.melt:6097",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1646__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 9;
+ cdat->drout_1660__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 9;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1646__COMPILTST_NORMTESTER_DISJUNCTION,
- meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION);
+ drout_1660__COMPILTST_NORMTESTER_DISJUNCTION,
+ meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION);
- /*iniclos dclo_1647__COMPILTST_NORMTESTER_DISJUNCTION */
- /*_.VALCLO___V1796*/ meltfptr[1795] =
- (void *) &cdat->dclo_1647__COMPILTST_NORMTESTER_DISJUNCTION;
- cdat->dclo_1647__COMPILTST_NORMTESTER_DISJUNCTION.discr =
+ /*iniclos dclo_1661__COMPILTST_NORMTESTER_DISJUNCTION */
+ /*_.VALCLO___V1813*/ meltfptr[1812] =
+ (void *) &cdat->dclo_1661__COMPILTST_NORMTESTER_DISJUNCTION;
+ cdat->dclo_1661__COMPILTST_NORMTESTER_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1647__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 0;
+ cdat->dclo_1661__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 0;
-/*iniobj dsym_1648__CLASS_NORMTESTER_DISJUNCTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1797*/ meltfptr[1796])
- /*_.VALDATA___V1797*/
- meltfptr[1796] = (void *) &cdat->dsym_1648__CLASS_NORMTESTER_DISJUNCTION;
+/*iniobj dsym_1662__CLASS_NORMTESTER_DISJUNCTION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1814*/ meltfptr[1813])
+ /*_.VALDATA___V1814*/
+ meltfptr[1813] = (void *) &cdat->dsym_1662__CLASS_NORMTESTER_DISJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1648__CLASS_NORMTESTER_DISJUNCTION",
+ ("iniobj check.discr isobj dsym_1662__CLASS_NORMTESTER_DISJUNCTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1648__CLASS_NORMTESTER_DISJUNCTION",
+ ("iniobj check.discr objmagic dsym_1662__CLASS_NORMTESTER_DISJUNCTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1648__CLASS_NORMTESTER_DISJUNCTION.meltobj_class =
+ cdat->dsym_1662__CLASS_NORMTESTER_DISJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1648__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 310373634;
- cdat->dsym_1648__CLASS_NORMTESTER_DISJUNCTION.obj_len = 3;
+ cdat->dsym_1662__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 310373634;
+ cdat->dsym_1662__CLASS_NORMTESTER_DISJUNCTION.obj_len = 3;
-/*inistring dstr_1649__CLASS_NORMTESTER*/
- /*_.VALSTR___V1798*/ meltfptr[1797] =
- (void *) &cdat->dstr_1649__CLASS_NORMTESTER;
- cdat->dstr_1649__CLASS_NORMTESTER.discr =
+/*inistring dstr_1663__CLASS_NORMTESTER*/
+ /*_.VALSTR___V1815*/ meltfptr[1814] =
+ (void *) &cdat->dstr_1663__CLASS_NORMTESTER;
+ cdat->dstr_1663__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1649__CLASS_NORMTESTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1663__CLASS_NORMTESTER.val,
"CLASS_NORMTESTER_DISJUNCTION",
- sizeof (cdat->dstr_1649__CLASS_NORMTESTER.
+ sizeof (cdat->dstr_1663__CLASS_NORMTESTER.
val) - 1);
- /*inirout drout_1650__COMPILMATCHER_CMATCHER */
- /*_.VALROUT___V1799*/ meltfptr[1798] =
- (void *) &cdat->drout_1650__COMPILMATCHER_CMATCHER;
- cdat->drout_1650__COMPILMATCHER_CMATCHER.discr =
+ /*inirout drout_1664__COMPILMATCHER_CMATCHER */
+ /*_.VALROUT___V1816*/ meltfptr[1815] =
+ (void *) &cdat->drout_1664__COMPILMATCHER_CMATCHER;
+ cdat->drout_1664__COMPILMATCHER_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1650__COMPILMATCHER_CMATCHER.routdescr,
- "COMPILMATCHER_CMATCHER @warmelt-genobj.melt:6013",
+ strncpy (cdat->drout_1664__COMPILMATCHER_CMATCHER.routdescr,
+ "COMPILMATCHER_CMATCHER @warmelt-genobj.melt:6137",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1650__COMPILMATCHER_CMATCHER.nbval = 37;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1650__COMPILMATCHER_CMATCHER,
- meltrout_174_warmelt_genobj_COMPILMATCHER_CMATCHER);
-
- /*iniclos dclo_1651__COMPILMATCHER_CMATCHER */
- /*_.VALCLO___V1804*/ meltfptr[1803] =
- (void *) &cdat->dclo_1651__COMPILMATCHER_CMATCHER;
- cdat->dclo_1651__COMPILMATCHER_CMATCHER.discr =
+ cdat->drout_1664__COMPILMATCHER_CMATCHER.nbval = 37;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1664__COMPILMATCHER_CMATCHER,
+ meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER);
+
+ /*iniclos dclo_1665__COMPILMATCHER_CMATCHER */
+ /*_.VALCLO___V1821*/ meltfptr[1820] =
+ (void *) &cdat->dclo_1665__COMPILMATCHER_CMATCHER;
+ cdat->dclo_1665__COMPILMATCHER_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1651__COMPILMATCHER_CMATCHER.nbval = 0;
+ cdat->dclo_1665__COMPILMATCHER_CMATCHER.nbval = 0;
-/*iniobj dsym_1652__CLASS_CMATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1805*/ meltfptr[1804])
- /*_.VALDATA___V1805*/
- meltfptr[1804] = (void *) &cdat->dsym_1652__CLASS_CMATCHER;
+/*iniobj dsym_1666__CLASS_CMATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1822*/ meltfptr[1821])
+ /*_.VALDATA___V1822*/
+ meltfptr[1821] = (void *) &cdat->dsym_1666__CLASS_CMATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1652__CLASS_CMATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1666__CLASS_CMATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1652__CLASS_CMATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1666__CLASS_CMATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1652__CLASS_CMATCHER.meltobj_class =
+ cdat->dsym_1666__CLASS_CMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1652__CLASS_CMATCHER.obj_hash = 544975672;
- cdat->dsym_1652__CLASS_CMATCHER.obj_len = 3;
+ cdat->dsym_1666__CLASS_CMATCHER.obj_hash = 544975672;
+ cdat->dsym_1666__CLASS_CMATCHER.obj_len = 3;
-/*inistring dstr_1653__CLASS_CMATCHER*/
- /*_.VALSTR___V1806*/ meltfptr[1805] =
- (void *) &cdat->dstr_1653__CLASS_CMATCHER;
- cdat->dstr_1653__CLASS_CMATCHER.discr =
+/*inistring dstr_1667__CLASS_CMATCHER*/
+ /*_.VALSTR___V1823*/ meltfptr[1822] =
+ (void *) &cdat->dstr_1667__CLASS_CMATCHER;
+ cdat->dstr_1667__CLASS_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1653__CLASS_CMATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_1667__CLASS_CMATCHER.val,
"CLASS_CMATCHER",
- sizeof (cdat->dstr_1653__CLASS_CMATCHER.val) -
+ sizeof (cdat->dstr_1667__CLASS_CMATCHER.val) -
1);
-/*iniobj dsym_1654__MULTIPLE_EVERY_BOTH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1807*/ meltfptr[1806])
- /*_.VALDATA___V1807*/
- meltfptr[1806] = (void *) &cdat->dsym_1654__MULTIPLE_EVERY_BOTH;
+/*iniobj dsym_1668__MULTIPLE_EVERY_BOTH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1824*/ meltfptr[1823])
+ /*_.VALDATA___V1824*/
+ meltfptr[1823] = (void *) &cdat->dsym_1668__MULTIPLE_EVERY_BOTH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1654__MULTIPLE_EVERY_BOTH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1668__MULTIPLE_EVERY_BOTH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1654__MULTIPLE_EVERY_BOTH",
+ ("iniobj check.discr objmagic dsym_1668__MULTIPLE_EVERY_BOTH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1654__MULTIPLE_EVERY_BOTH.meltobj_class =
+ cdat->dsym_1668__MULTIPLE_EVERY_BOTH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1654__MULTIPLE_EVERY_BOTH.obj_hash = 528900272;
- cdat->dsym_1654__MULTIPLE_EVERY_BOTH.obj_len = 3;
+ cdat->dsym_1668__MULTIPLE_EVERY_BOTH.obj_hash = 528900272;
+ cdat->dsym_1668__MULTIPLE_EVERY_BOTH.obj_len = 3;
-/*inistring dstr_1655__MULTIPLE_EVERY_B*/
- /*_.VALSTR___V1808*/ meltfptr[1807] =
- (void *) &cdat->dstr_1655__MULTIPLE_EVERY_B;
- cdat->dstr_1655__MULTIPLE_EVERY_B.discr =
+/*inistring dstr_1669__MULTIPLE_EVERY_B*/
+ /*_.VALSTR___V1825*/ meltfptr[1824] =
+ (void *) &cdat->dstr_1669__MULTIPLE_EVERY_B;
+ cdat->dstr_1669__MULTIPLE_EVERY_B.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1655__MULTIPLE_EVERY_B.val,
+ /*small inistring */ strncpy (cdat->dstr_1669__MULTIPLE_EVERY_B.val,
"MULTIPLE_EVERY_BOTH",
- sizeof (cdat->dstr_1655__MULTIPLE_EVERY_B.
+ sizeof (cdat->dstr_1669__MULTIPLE_EVERY_B.
val) - 1);
- /*inirout drout_1656__LAMBDA_ */
- /*_.VALROUT___V1800*/ meltfptr[1799] = (void *) &cdat->drout_1656__LAMBDA_;
- cdat->drout_1656__LAMBDA_.discr =
+ /*inirout drout_1670__LAMBDA_ */
+ /*_.VALROUT___V1817*/ meltfptr[1816] = (void *) &cdat->drout_1670__LAMBDA_;
+ cdat->drout_1670__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1656__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6065", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1656__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1656__LAMBDA_,
- meltrout_175_warmelt_genobj_LAMBDA___53__);
-
- /*inirout drout_1657__LAMBDA_ */
- /*_.VALROUT___V1801*/ meltfptr[1800] = (void *) &cdat->drout_1657__LAMBDA_;
- cdat->drout_1657__LAMBDA_.discr =
+ strncpy (cdat->drout_1670__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6189", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1670__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1670__LAMBDA_,
+ meltrout_179_warmelt_genobj_LAMBDA___53__);
+
+ /*inirout drout_1671__LAMBDA_ */
+ /*_.VALROUT___V1818*/ meltfptr[1817] = (void *) &cdat->drout_1671__LAMBDA_;
+ cdat->drout_1671__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1657__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6078", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1657__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1657__LAMBDA_,
- meltrout_176_warmelt_genobj_LAMBDA___54__);
-
- /*inirout drout_1658__LAMBDA_ */
- /*_.VALROUT___V1802*/ meltfptr[1801] = (void *) &cdat->drout_1658__LAMBDA_;
- cdat->drout_1658__LAMBDA_.discr =
+ strncpy (cdat->drout_1671__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6202", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1671__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1671__LAMBDA_,
+ meltrout_180_warmelt_genobj_LAMBDA___54__);
+
+ /*inirout drout_1672__LAMBDA_ */
+ /*_.VALROUT___V1819*/ meltfptr[1818] = (void *) &cdat->drout_1672__LAMBDA_;
+ cdat->drout_1672__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1658__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6091", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1658__LAMBDA_.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1658__LAMBDA_,
- meltrout_177_warmelt_genobj_LAMBDA___55__);
-
- /*inirout drout_1659__LAMBDA_ */
- /*_.VALROUT___V1803*/ meltfptr[1802] = (void *) &cdat->drout_1659__LAMBDA_;
- cdat->drout_1659__LAMBDA_.discr =
+ strncpy (cdat->drout_1672__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6215", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1672__LAMBDA_.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1672__LAMBDA_,
+ meltrout_181_warmelt_genobj_LAMBDA___55__);
+
+ /*inirout drout_1673__LAMBDA_ */
+ /*_.VALROUT___V1820*/ meltfptr[1819] = (void *) &cdat->drout_1673__LAMBDA_;
+ cdat->drout_1673__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1659__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6094", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1659__LAMBDA_.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1659__LAMBDA_,
- meltrout_178_warmelt_genobj_LAMBDA___56__);
-
- /*inirout drout_1660__COMPILMATCHER_FUNMATCHER */
- /*_.VALROUT___V1809*/ meltfptr[1808] =
- (void *) &cdat->drout_1660__COMPILMATCHER_FUNMATCHER;
- cdat->drout_1660__COMPILMATCHER_FUNMATCHER.discr =
+ strncpy (cdat->drout_1673__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6218", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1673__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1673__LAMBDA_,
+ meltrout_182_warmelt_genobj_LAMBDA___56__);
+
+ /*inirout drout_1674__COMPILMATCHER_FUNMATCHER */
+ /*_.VALROUT___V1826*/ meltfptr[1825] =
+ (void *) &cdat->drout_1674__COMPILMATCHER_FUNMATCHER;
+ cdat->drout_1674__COMPILMATCHER_FUNMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1660__COMPILMATCHER_FUNMATCHER.routdescr,
- "COMPILMATCHER_FUNMATCHER @warmelt-genobj.melt:6175",
+ strncpy (cdat->drout_1674__COMPILMATCHER_FUNMATCHER.routdescr,
+ "COMPILMATCHER_FUNMATCHER @warmelt-genobj.melt:6299",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1660__COMPILMATCHER_FUNMATCHER.nbval = 23;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1660__COMPILMATCHER_FUNMATCHER,
- meltrout_179_warmelt_genobj_COMPILMATCHER_FUNMATCHER);
-
- /*iniclos dclo_1661__COMPILMATCHER_FUNMATCHER */
- /*_.VALCLO___V1814*/ meltfptr[1813] =
- (void *) &cdat->dclo_1661__COMPILMATCHER_FUNMATCHER;
- cdat->dclo_1661__COMPILMATCHER_FUNMATCHER.discr =
+ cdat->drout_1674__COMPILMATCHER_FUNMATCHER.nbval = 23;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1674__COMPILMATCHER_FUNMATCHER,
+ meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER);
+
+ /*iniclos dclo_1675__COMPILMATCHER_FUNMATCHER */
+ /*_.VALCLO___V1831*/ meltfptr[1830] =
+ (void *) &cdat->dclo_1675__COMPILMATCHER_FUNMATCHER;
+ cdat->dclo_1675__COMPILMATCHER_FUNMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1661__COMPILMATCHER_FUNMATCHER.nbval = 0;
+ cdat->dclo_1675__COMPILMATCHER_FUNMATCHER.nbval = 0;
-/*iniobj dsym_1662__CLASS_FUNMATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1815*/ meltfptr[1814])
- /*_.VALDATA___V1815*/
- meltfptr[1814] = (void *) &cdat->dsym_1662__CLASS_FUNMATCHER;
+/*iniobj dsym_1676__CLASS_FUNMATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1832*/ meltfptr[1831])
+ /*_.VALDATA___V1832*/
+ meltfptr[1831] = (void *) &cdat->dsym_1676__CLASS_FUNMATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1662__CLASS_FUNMATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1676__CLASS_FUNMATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1662__CLASS_FUNMATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1676__CLASS_FUNMATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1662__CLASS_FUNMATCHER.meltobj_class =
+ cdat->dsym_1676__CLASS_FUNMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1662__CLASS_FUNMATCHER.obj_hash = 197743893;
- cdat->dsym_1662__CLASS_FUNMATCHER.obj_len = 3;
+ cdat->dsym_1676__CLASS_FUNMATCHER.obj_hash = 197743893;
+ cdat->dsym_1676__CLASS_FUNMATCHER.obj_len = 3;
-/*inistring dstr_1663__CLASS_FUNMATCHER*/
- /*_.VALSTR___V1816*/ meltfptr[1815] =
- (void *) &cdat->dstr_1663__CLASS_FUNMATCHER;
- cdat->dstr_1663__CLASS_FUNMATCHER.discr =
+/*inistring dstr_1677__CLASS_FUNMATCHER*/
+ /*_.VALSTR___V1833*/ meltfptr[1832] =
+ (void *) &cdat->dstr_1677__CLASS_FUNMATCHER;
+ cdat->dstr_1677__CLASS_FUNMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1663__CLASS_FUNMATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_1677__CLASS_FUNMATCHER.val,
"CLASS_FUNMATCHER",
- sizeof (cdat->dstr_1663__CLASS_FUNMATCHER.
+ sizeof (cdat->dstr_1677__CLASS_FUNMATCHER.
val) - 1);
- /*inirout drout_1664__LAMBDA_ */
- /*_.VALROUT___V1810*/ meltfptr[1809] = (void *) &cdat->drout_1664__LAMBDA_;
- cdat->drout_1664__LAMBDA_.discr =
+ /*inirout drout_1678__LAMBDA_ */
+ /*_.VALROUT___V1827*/ meltfptr[1826] = (void *) &cdat->drout_1678__LAMBDA_;
+ cdat->drout_1678__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1664__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6199", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1664__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1664__LAMBDA_,
- meltrout_180_warmelt_genobj_LAMBDA___57__);
-
- /*inirout drout_1665__LAMBDA_ */
- /*_.VALROUT___V1811*/ meltfptr[1810] = (void *) &cdat->drout_1665__LAMBDA_;
- cdat->drout_1665__LAMBDA_.discr =
+ strncpy (cdat->drout_1678__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6323", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1678__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1678__LAMBDA_,
+ meltrout_184_warmelt_genobj_LAMBDA___57__);
+
+ /*inirout drout_1679__LAMBDA_ */
+ /*_.VALROUT___V1828*/ meltfptr[1827] = (void *) &cdat->drout_1679__LAMBDA_;
+ cdat->drout_1679__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1665__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-genobj.melt:6204", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1665__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1665__LAMBDA_,
- meltrout_181_warmelt_genobj_LAMBDA___58__);
+ strncpy (cdat->drout_1679__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-genobj.melt:6328", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1679__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1679__LAMBDA_,
+ meltrout_185_warmelt_genobj_LAMBDA___58__);
-/*iniobj dsym_1666__CLOSFUNMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1812*/ meltfptr[1811])
- /*_.VALDATA___V1812*/
- meltfptr[1811] = (void *) &cdat->dsym_1666__CLOSFUNMATCH;
+/*iniobj dsym_1680__CLOSFUNMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1829*/ meltfptr[1828])
+ /*_.VALDATA___V1829*/
+ meltfptr[1828] = (void *) &cdat->dsym_1680__CLOSFUNMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1666__CLOSFUNMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1680__CLOSFUNMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1666__CLOSFUNMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1680__CLOSFUNMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1666__CLOSFUNMATCH.meltobj_class =
+ cdat->dsym_1680__CLOSFUNMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1666__CLOSFUNMATCH.obj_hash = 417962854;
- cdat->dsym_1666__CLOSFUNMATCH.obj_len = 3;
+ cdat->dsym_1680__CLOSFUNMATCH.obj_hash = 417962854;
+ cdat->dsym_1680__CLOSFUNMATCH.obj_len = 3;
-/*inistring dstr_1667__CLOSFUNMATCH*/
- /*_.VALSTR___V1813*/ meltfptr[1812] =
- (void *) &cdat->dstr_1667__CLOSFUNMATCH;
- cdat->dstr_1667__CLOSFUNMATCH.discr =
+/*inistring dstr_1681__CLOSFUNMATCH*/
+ /*_.VALSTR___V1830*/ meltfptr[1829] =
+ (void *) &cdat->dstr_1681__CLOSFUNMATCH;
+ cdat->dstr_1681__CLOSFUNMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1667__CLOSFUNMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1681__CLOSFUNMATCH.val,
"_CLOSFUNMATCH",
- sizeof (cdat->dstr_1667__CLOSFUNMATCH.val) -
+ sizeof (cdat->dstr_1681__CLOSFUNMATCH.val) -
1);
-/*iniobj dsym_1668__FMATCH_MATCHF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1817*/ meltfptr[1816])
- /*_.VALDATA___V1817*/
- meltfptr[1816] = (void *) &cdat->dsym_1668__FMATCH_MATCHF;
+/*iniobj dsym_1682__FMATCH_MATCHF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1834*/ meltfptr[1833])
+ /*_.VALDATA___V1834*/
+ meltfptr[1833] = (void *) &cdat->dsym_1682__FMATCH_MATCHF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1668__FMATCH_MATCHF",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1682__FMATCH_MATCHF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1668__FMATCH_MATCHF",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1682__FMATCH_MATCHF",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1668__FMATCH_MATCHF.meltobj_class =
+ cdat->dsym_1682__FMATCH_MATCHF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1668__FMATCH_MATCHF.obj_hash = 945393090;
- cdat->dsym_1668__FMATCH_MATCHF.obj_len = 3;
+ cdat->dsym_1682__FMATCH_MATCHF.obj_hash = 945393090;
+ cdat->dsym_1682__FMATCH_MATCHF.obj_len = 3;
-/*inistring dstr_1669__FMATCH_MATCHF*/
- /*_.VALSTR___V1818*/ meltfptr[1817] =
- (void *) &cdat->dstr_1669__FMATCH_MATCHF;
- cdat->dstr_1669__FMATCH_MATCHF.discr =
+/*inistring dstr_1683__FMATCH_MATCHF*/
+ /*_.VALSTR___V1835*/ meltfptr[1834] =
+ (void *) &cdat->dstr_1683__FMATCH_MATCHF;
+ cdat->dstr_1683__FMATCH_MATCHF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1669__FMATCH_MATCHF.val,
+ /*small inistring */ strncpy (cdat->dstr_1683__FMATCH_MATCHF.val,
"FMATCH_MATCHF",
- sizeof (cdat->dstr_1669__FMATCH_MATCHF.val) -
+ sizeof (cdat->dstr_1683__FMATCH_MATCHF.val) -
1);
cdat = NULL;
melt_prohibit_garbcoll = FALSE;
@@ -28938,13 +29194,12 @@ start_module_melt (void *modargp_)
initial_frame_st meltfram__;
#define meltframe meltfram__
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 1936;
+ meltfram__.mcfr_nbvar = 1957;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -3223;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -675;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_genobj;
/**COMMENT: get previous environment **/ ;
@@ -29020,8 +29275,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJVALUE =
meltgc_named_symbol ("CLASS_OBJVALUE", MELT_GET);
- if (sy_CLASS_OBJVALUE && NULL == /*_.VALDATA___V150*/ meltfptr[149])
- /*_.VALDATA___V150*/ meltfptr[149] = (void *) sy_CLASS_OBJVALUE;
+ if (sy_CLASS_OBJVALUE && NULL == /*_.VALDATA___V153*/ meltfptr[152])
+ /*_.VALDATA___V153*/ meltfptr[152] = (void *) sy_CLASS_OBJVALUE;
}
/*^getnamedsymbol */
@@ -29031,8 +29286,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_GENERATED_C_CODE =
meltgc_named_symbol ("CLASS_GENERATED_C_CODE", MELT_GET);
if (sy_CLASS_GENERATED_C_CODE
- && NULL == /*_.VALDATA___V152*/ meltfptr[151])
- /*_.VALDATA___V152*/ meltfptr[151] = (void *) sy_CLASS_GENERATED_C_CODE;
+ && NULL == /*_.VALDATA___V155*/ meltfptr[154])
+ /*_.VALDATA___V155*/ meltfptr[154] = (void *) sy_CLASS_GENERATED_C_CODE;
}
/*^getnamedsymbol */
@@ -29040,8 +29295,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBV_TYPE */
{
melt_ptr_t sy_OBV_TYPE = meltgc_named_symbol ("OBV_TYPE", MELT_GET);
- if (sy_OBV_TYPE && NULL == /*_.VALDATA___V160*/ meltfptr[159])
- /*_.VALDATA___V160*/ meltfptr[159] = (void *) sy_OBV_TYPE;
+ if (sy_OBV_TYPE && NULL == /*_.VALDATA___V163*/ meltfptr[162])
+ /*_.VALDATA___V163*/ meltfptr[162] = (void *) sy_OBV_TYPE;
}
/*^getnamedsymbol */
@@ -29050,8 +29305,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUREVALUE =
meltgc_named_symbol ("CLASS_OBJPUREVALUE", MELT_GET);
- if (sy_CLASS_OBJPUREVALUE && NULL == /*_.VALDATA___V162*/ meltfptr[161])
- /*_.VALDATA___V162*/ meltfptr[161] = (void *) sy_CLASS_OBJPUREVALUE;
+ if (sy_CLASS_OBJPUREVALUE && NULL == /*_.VALDATA___V165*/ meltfptr[164])
+ /*_.VALDATA___V165*/ meltfptr[164] = (void *) sy_CLASS_OBJPUREVALUE;
}
/*^getnamedsymbol */
@@ -29060,8 +29315,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJLOCV =
meltgc_named_symbol ("CLASS_OBJLOCV", MELT_GET);
- if (sy_CLASS_OBJLOCV && NULL == /*_.VALDATA___V168*/ meltfptr[167])
- /*_.VALDATA___V168*/ meltfptr[167] = (void *) sy_CLASS_OBJLOCV;
+ if (sy_CLASS_OBJLOCV && NULL == /*_.VALDATA___V171*/ meltfptr[170])
+ /*_.VALDATA___V171*/ meltfptr[170] = (void *) sy_CLASS_OBJLOCV;
}
/*^getnamedsymbol */
@@ -29069,8 +29324,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBL_OFF */
{
melt_ptr_t sy_OBL_OFF = meltgc_named_symbol ("OBL_OFF", MELT_GET);
- if (sy_OBL_OFF && NULL == /*_.VALDATA___V180*/ meltfptr[179])
- /*_.VALDATA___V180*/ meltfptr[179] = (void *) sy_OBL_OFF;
+ if (sy_OBL_OFF && NULL == /*_.VALDATA___V183*/ meltfptr[182])
+ /*_.VALDATA___V183*/ meltfptr[182] = (void *) sy_OBL_OFF;
}
/*^getnamedsymbol */
@@ -29078,8 +29333,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBL_PROC */
{
melt_ptr_t sy_OBL_PROC = meltgc_named_symbol ("OBL_PROC", MELT_GET);
- if (sy_OBL_PROC && NULL == /*_.VALDATA___V182*/ meltfptr[181])
- /*_.VALDATA___V182*/ meltfptr[181] = (void *) sy_OBL_PROC;
+ if (sy_OBL_PROC && NULL == /*_.VALDATA___V185*/ meltfptr[184])
+ /*_.VALDATA___V185*/ meltfptr[184] = (void *) sy_OBL_PROC;
}
/*^getnamedsymbol */
@@ -29087,8 +29342,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBL_CNAME */
{
melt_ptr_t sy_OBL_CNAME = meltgc_named_symbol ("OBL_CNAME", MELT_GET);
- if (sy_OBL_CNAME && NULL == /*_.VALDATA___V184*/ meltfptr[183])
- /*_.VALDATA___V184*/ meltfptr[183] = (void *) sy_OBL_CNAME;
+ if (sy_OBL_CNAME && NULL == /*_.VALDATA___V187*/ meltfptr[186])
+ /*_.VALDATA___V187*/ meltfptr[186] = (void *) sy_OBL_CNAME;
}
/*^getnamedsymbol */
@@ -29097,8 +29352,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCLOCCV =
meltgc_named_symbol ("CLASS_OBJCLOCCV", MELT_GET);
- if (sy_CLASS_OBJCLOCCV && NULL == /*_.VALDATA___V186*/ meltfptr[185])
- /*_.VALDATA___V186*/ meltfptr[185] = (void *) sy_CLASS_OBJCLOCCV;
+ if (sy_CLASS_OBJCLOCCV && NULL == /*_.VALDATA___V189*/ meltfptr[188])
+ /*_.VALDATA___V189*/ meltfptr[188] = (void *) sy_CLASS_OBJCLOCCV;
}
/*^getnamedsymbol */
@@ -29106,8 +29361,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBC_OFF */
{
melt_ptr_t sy_OBC_OFF = meltgc_named_symbol ("OBC_OFF", MELT_GET);
- if (sy_OBC_OFF && NULL == /*_.VALDATA___V198*/ meltfptr[197])
- /*_.VALDATA___V198*/ meltfptr[197] = (void *) sy_OBC_OFF;
+ if (sy_OBC_OFF && NULL == /*_.VALDATA___V201*/ meltfptr[200])
+ /*_.VALDATA___V201*/ meltfptr[200] = (void *) sy_OBC_OFF;
}
/*^getnamedsymbol */
@@ -29115,8 +29370,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBC_PROC */
{
melt_ptr_t sy_OBC_PROC = meltgc_named_symbol ("OBC_PROC", MELT_GET);
- if (sy_OBC_PROC && NULL == /*_.VALDATA___V200*/ meltfptr[199])
- /*_.VALDATA___V200*/ meltfptr[199] = (void *) sy_OBC_PROC;
+ if (sy_OBC_PROC && NULL == /*_.VALDATA___V203*/ meltfptr[202])
+ /*_.VALDATA___V203*/ meltfptr[202] = (void *) sy_OBC_PROC;
}
/*^getnamedsymbol */
@@ -29124,8 +29379,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBC_NAME */
{
melt_ptr_t sy_OBC_NAME = meltgc_named_symbol ("OBC_NAME", MELT_GET);
- if (sy_OBC_NAME && NULL == /*_.VALDATA___V202*/ meltfptr[201])
- /*_.VALDATA___V202*/ meltfptr[201] = (void *) sy_OBC_NAME;
+ if (sy_OBC_NAME && NULL == /*_.VALDATA___V205*/ meltfptr[204])
+ /*_.VALDATA___V205*/ meltfptr[204] = (void *) sy_OBC_NAME;
}
/*^getnamedsymbol */
@@ -29134,8 +29389,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCONSTV =
meltgc_named_symbol ("CLASS_OBJCONSTV", MELT_GET);
- if (sy_CLASS_OBJCONSTV && NULL == /*_.VALDATA___V204*/ meltfptr[203])
- /*_.VALDATA___V204*/ meltfptr[203] = (void *) sy_CLASS_OBJCONSTV;
+ if (sy_CLASS_OBJCONSTV && NULL == /*_.VALDATA___V207*/ meltfptr[206])
+ /*_.VALDATA___V207*/ meltfptr[206] = (void *) sy_CLASS_OBJCONSTV;
}
/*^getnamedsymbol */
@@ -29144,8 +29399,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPREDEF =
meltgc_named_symbol ("CLASS_OBJPREDEF", MELT_GET);
- if (sy_CLASS_OBJPREDEF && NULL == /*_.VALDATA___V210*/ meltfptr[209])
- /*_.VALDATA___V210*/ meltfptr[209] = (void *) sy_CLASS_OBJPREDEF;
+ if (sy_CLASS_OBJPREDEF && NULL == /*_.VALDATA___V213*/ meltfptr[212])
+ /*_.VALDATA___V213*/ meltfptr[212] = (void *) sy_CLASS_OBJPREDEF;
}
/*^getnamedsymbol */
@@ -29153,8 +29408,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBPREDEF */
{
melt_ptr_t sy_OBPREDEF = meltgc_named_symbol ("OBPREDEF", MELT_GET);
- if (sy_OBPREDEF && NULL == /*_.VALDATA___V218*/ meltfptr[217])
- /*_.VALDATA___V218*/ meltfptr[217] = (void *) sy_OBPREDEF;
+ if (sy_OBPREDEF && NULL == /*_.VALDATA___V221*/ meltfptr[220])
+ /*_.VALDATA___V221*/ meltfptr[220] = (void *) sy_OBPREDEF;
}
/*^getnamedsymbol */
@@ -29163,8 +29418,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJNIL =
meltgc_named_symbol ("CLASS_OBJNIL", MELT_GET);
- if (sy_CLASS_OBJNIL && NULL == /*_.VALDATA___V220*/ meltfptr[219])
- /*_.VALDATA___V220*/ meltfptr[219] = (void *) sy_CLASS_OBJNIL;
+ if (sy_CLASS_OBJNIL && NULL == /*_.VALDATA___V223*/ meltfptr[222])
+ /*_.VALDATA___V223*/ meltfptr[222] = (void *) sy_CLASS_OBJNIL;
}
/*^getnamedsymbol */
@@ -29173,8 +29428,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITELEM =
meltgc_named_symbol ("CLASS_OBJINITELEM", MELT_GET);
- if (sy_CLASS_OBJINITELEM && NULL == /*_.VALDATA___V226*/ meltfptr[225])
- /*_.VALDATA___V226*/ meltfptr[225] = (void *) sy_CLASS_OBJINITELEM;
+ if (sy_CLASS_OBJINITELEM && NULL == /*_.VALDATA___V229*/ meltfptr[228])
+ /*_.VALDATA___V229*/ meltfptr[228] = (void *) sy_CLASS_OBJINITELEM;
}
/*^getnamedsymbol */
@@ -29182,8 +29437,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIE_CNAME */
{
melt_ptr_t sy_OIE_CNAME = meltgc_named_symbol ("OIE_CNAME", MELT_GET);
- if (sy_OIE_CNAME && NULL == /*_.VALDATA___V240*/ meltfptr[239])
- /*_.VALDATA___V240*/ meltfptr[239] = (void *) sy_OIE_CNAME;
+ if (sy_OIE_CNAME && NULL == /*_.VALDATA___V243*/ meltfptr[242])
+ /*_.VALDATA___V243*/ meltfptr[242] = (void *) sy_OIE_CNAME;
}
/*^getnamedsymbol */
@@ -29191,8 +29446,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIE_DATA */
{
melt_ptr_t sy_OIE_DATA = meltgc_named_symbol ("OIE_DATA", MELT_GET);
- if (sy_OIE_DATA && NULL == /*_.VALDATA___V242*/ meltfptr[241])
- /*_.VALDATA___V242*/ meltfptr[241] = (void *) sy_OIE_DATA;
+ if (sy_OIE_DATA && NULL == /*_.VALDATA___V245*/ meltfptr[244])
+ /*_.VALDATA___V245*/ meltfptr[244] = (void *) sy_OIE_DATA;
}
/*^getnamedsymbol */
@@ -29200,8 +29455,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIE_DISCR */
{
melt_ptr_t sy_OIE_DISCR = meltgc_named_symbol ("OIE_DISCR", MELT_GET);
- if (sy_OIE_DISCR && NULL == /*_.VALDATA___V244*/ meltfptr[243])
- /*_.VALDATA___V244*/ meltfptr[243] = (void *) sy_OIE_DISCR;
+ if (sy_OIE_DISCR && NULL == /*_.VALDATA___V247*/ meltfptr[246])
+ /*_.VALDATA___V247*/ meltfptr[246] = (void *) sy_OIE_DISCR;
}
/*^getnamedsymbol */
@@ -29209,8 +29464,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIE_LOCVAR */
{
melt_ptr_t sy_OIE_LOCVAR = meltgc_named_symbol ("OIE_LOCVAR", MELT_GET);
- if (sy_OIE_LOCVAR && NULL == /*_.VALDATA___V246*/ meltfptr[245])
- /*_.VALDATA___V246*/ meltfptr[245] = (void *) sy_OIE_LOCVAR;
+ if (sy_OIE_LOCVAR && NULL == /*_.VALDATA___V249*/ meltfptr[248])
+ /*_.VALDATA___V249*/ meltfptr[248] = (void *) sy_OIE_LOCVAR;
}
/*^getnamedsymbol */
@@ -29219,8 +29474,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITOBJECT =
meltgc_named_symbol ("CLASS_OBJINITOBJECT", MELT_GET);
- if (sy_CLASS_OBJINITOBJECT && NULL == /*_.VALDATA___V248*/ meltfptr[247])
- /*_.VALDATA___V248*/ meltfptr[247] = (void *) sy_CLASS_OBJINITOBJECT;
+ if (sy_CLASS_OBJINITOBJECT && NULL == /*_.VALDATA___V251*/ meltfptr[250])
+ /*_.VALDATA___V251*/ meltfptr[250] = (void *) sy_CLASS_OBJINITOBJECT;
}
/*^getnamedsymbol */
@@ -29228,8 +29483,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIO_PREDEF */
{
melt_ptr_t sy_OIO_PREDEF = meltgc_named_symbol ("OIO_PREDEF", MELT_GET);
- if (sy_OIO_PREDEF && NULL == /*_.VALDATA___V258*/ meltfptr[257])
- /*_.VALDATA___V258*/ meltfptr[257] = (void *) sy_OIO_PREDEF;
+ if (sy_OIO_PREDEF && NULL == /*_.VALDATA___V261*/ meltfptr[260])
+ /*_.VALDATA___V261*/ meltfptr[260] = (void *) sy_OIO_PREDEF;
}
/*^getnamedsymbol */
@@ -29237,8 +29492,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIO_CLASS */
{
melt_ptr_t sy_OIO_CLASS = meltgc_named_symbol ("OIO_CLASS", MELT_GET);
- if (sy_OIO_CLASS && NULL == /*_.VALDATA___V260*/ meltfptr[259])
- /*_.VALDATA___V260*/ meltfptr[259] = (void *) sy_OIO_CLASS;
+ if (sy_OIO_CLASS && NULL == /*_.VALDATA___V263*/ meltfptr[262])
+ /*_.VALDATA___V263*/ meltfptr[262] = (void *) sy_OIO_CLASS;
}
/*^getnamedsymbol */
@@ -29248,8 +29503,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINITUNIQUEOBJECT =
meltgc_named_symbol ("CLASS_OBJINITUNIQUEOBJECT", MELT_GET);
if (sy_CLASS_OBJINITUNIQUEOBJECT
- && NULL == /*_.VALDATA___V262*/ meltfptr[261])
- /*_.VALDATA___V262*/ meltfptr[261] =
+ && NULL == /*_.VALDATA___V265*/ meltfptr[264])
+ /*_.VALDATA___V265*/ meltfptr[264] =
(void *) sy_CLASS_OBJINITUNIQUEOBJECT;
}
@@ -29260,8 +29515,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINITMULTIPLE =
meltgc_named_symbol ("CLASS_OBJINITMULTIPLE", MELT_GET);
if (sy_CLASS_OBJINITMULTIPLE
- && NULL == /*_.VALDATA___V268*/ meltfptr[267])
- /*_.VALDATA___V268*/ meltfptr[267] = (void *) sy_CLASS_OBJINITMULTIPLE;
+ && NULL == /*_.VALDATA___V271*/ meltfptr[270])
+ /*_.VALDATA___V271*/ meltfptr[270] = (void *) sy_CLASS_OBJINITMULTIPLE;
}
/*^getnamedsymbol */
@@ -29269,8 +29524,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIM_TUPVAL */
{
melt_ptr_t sy_OIM_TUPVAL = meltgc_named_symbol ("OIM_TUPVAL", MELT_GET);
- if (sy_OIM_TUPVAL && NULL == /*_.VALDATA___V276*/ meltfptr[275])
- /*_.VALDATA___V276*/ meltfptr[275] = (void *) sy_OIM_TUPVAL;
+ if (sy_OIM_TUPVAL && NULL == /*_.VALDATA___V279*/ meltfptr[278])
+ /*_.VALDATA___V279*/ meltfptr[278] = (void *) sy_OIM_TUPVAL;
}
/*^getnamedsymbol */
@@ -29279,8 +29534,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITCLOSURE =
meltgc_named_symbol ("CLASS_OBJINITCLOSURE", MELT_GET);
- if (sy_CLASS_OBJINITCLOSURE && NULL == /*_.VALDATA___V278*/ meltfptr[277])
- /*_.VALDATA___V278*/ meltfptr[277] = (void *) sy_CLASS_OBJINITCLOSURE;
+ if (sy_CLASS_OBJINITCLOSURE && NULL == /*_.VALDATA___V281*/ meltfptr[280])
+ /*_.VALDATA___V281*/ meltfptr[280] = (void *) sy_CLASS_OBJINITCLOSURE;
}
/*^getnamedsymbol */
@@ -29288,8 +29543,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OICLO_ROUT */
{
melt_ptr_t sy_OICLO_ROUT = meltgc_named_symbol ("OICLO_ROUT", MELT_GET);
- if (sy_OICLO_ROUT && NULL == /*_.VALDATA___V286*/ meltfptr[285])
- /*_.VALDATA___V286*/ meltfptr[285] = (void *) sy_OICLO_ROUT;
+ if (sy_OICLO_ROUT && NULL == /*_.VALDATA___V289*/ meltfptr[288])
+ /*_.VALDATA___V289*/ meltfptr[288] = (void *) sy_OICLO_ROUT;
}
/*^getnamedsymbol */
@@ -29298,8 +29553,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITROUTINE =
meltgc_named_symbol ("CLASS_OBJINITROUTINE", MELT_GET);
- if (sy_CLASS_OBJINITROUTINE && NULL == /*_.VALDATA___V288*/ meltfptr[287])
- /*_.VALDATA___V288*/ meltfptr[287] = (void *) sy_CLASS_OBJINITROUTINE;
+ if (sy_CLASS_OBJINITROUTINE && NULL == /*_.VALDATA___V291*/ meltfptr[290])
+ /*_.VALDATA___V291*/ meltfptr[290] = (void *) sy_CLASS_OBJINITROUTINE;
}
/*^getnamedsymbol */
@@ -29308,8 +29563,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OIR_PROCROUTINE =
meltgc_named_symbol ("OIR_PROCROUTINE", MELT_GET);
- if (sy_OIR_PROCROUTINE && NULL == /*_.VALDATA___V296*/ meltfptr[295])
- /*_.VALDATA___V296*/ meltfptr[295] = (void *) sy_OIR_PROCROUTINE;
+ if (sy_OIR_PROCROUTINE && NULL == /*_.VALDATA___V299*/ meltfptr[298])
+ /*_.VALDATA___V299*/ meltfptr[298] = (void *) sy_OIR_PROCROUTINE;
}
/*^getnamedsymbol */
@@ -29318,8 +29573,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITSTRING =
meltgc_named_symbol ("CLASS_OBJINITSTRING", MELT_GET);
- if (sy_CLASS_OBJINITSTRING && NULL == /*_.VALDATA___V298*/ meltfptr[297])
- /*_.VALDATA___V298*/ meltfptr[297] = (void *) sy_CLASS_OBJINITSTRING;
+ if (sy_CLASS_OBJINITSTRING && NULL == /*_.VALDATA___V301*/ meltfptr[300])
+ /*_.VALDATA___V301*/ meltfptr[300] = (void *) sy_CLASS_OBJINITSTRING;
}
/*^getnamedsymbol */
@@ -29328,8 +29583,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITPAIR =
meltgc_named_symbol ("CLASS_OBJINITPAIR", MELT_GET);
- if (sy_CLASS_OBJINITPAIR && NULL == /*_.VALDATA___V304*/ meltfptr[303])
- /*_.VALDATA___V304*/ meltfptr[303] = (void *) sy_CLASS_OBJINITPAIR;
+ if (sy_CLASS_OBJINITPAIR && NULL == /*_.VALDATA___V307*/ meltfptr[306])
+ /*_.VALDATA___V307*/ meltfptr[306] = (void *) sy_CLASS_OBJINITPAIR;
}
/*^getnamedsymbol */
@@ -29338,8 +29593,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINITLIST =
meltgc_named_symbol ("CLASS_OBJINITLIST", MELT_GET);
- if (sy_CLASS_OBJINITLIST && NULL == /*_.VALDATA___V310*/ meltfptr[309])
- /*_.VALDATA___V310*/ meltfptr[309] = (void *) sy_CLASS_OBJINITLIST;
+ if (sy_CLASS_OBJINITLIST && NULL == /*_.VALDATA___V313*/ meltfptr[312])
+ /*_.VALDATA___V313*/ meltfptr[312] = (void *) sy_CLASS_OBJINITLIST;
}
/*^getnamedsymbol */
@@ -29349,8 +29604,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINITBOXINTEGER =
meltgc_named_symbol ("CLASS_OBJINITBOXINTEGER", MELT_GET);
if (sy_CLASS_OBJINITBOXINTEGER
- && NULL == /*_.VALDATA___V316*/ meltfptr[315])
- /*_.VALDATA___V316*/ meltfptr[315] =
+ && NULL == /*_.VALDATA___V319*/ meltfptr[318])
+ /*_.VALDATA___V319*/ meltfptr[318] =
(void *) sy_CLASS_OBJINITBOXINTEGER;
}
@@ -29360,8 +29615,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJEXPV =
meltgc_named_symbol ("CLASS_OBJEXPV", MELT_GET);
- if (sy_CLASS_OBJEXPV && NULL == /*_.VALDATA___V322*/ meltfptr[321])
- /*_.VALDATA___V322*/ meltfptr[321] = (void *) sy_CLASS_OBJEXPV;
+ if (sy_CLASS_OBJEXPV && NULL == /*_.VALDATA___V325*/ meltfptr[324])
+ /*_.VALDATA___V325*/ meltfptr[324] = (void *) sy_CLASS_OBJEXPV;
}
/*^getnamedsymbol */
@@ -29369,8 +29624,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBX_CONT */
{
melt_ptr_t sy_OBX_CONT = meltgc_named_symbol ("OBX_CONT", MELT_GET);
- if (sy_OBX_CONT && NULL == /*_.VALDATA___V330*/ meltfptr[329])
- /*_.VALDATA___V330*/ meltfptr[329] = (void *) sy_OBX_CONT;
+ if (sy_OBX_CONT && NULL == /*_.VALDATA___V333*/ meltfptr[332])
+ /*_.VALDATA___V333*/ meltfptr[332] = (void *) sy_OBX_CONT;
}
/*^getnamedsymbol */
@@ -29379,8 +29634,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJLOCATEDEXPV =
meltgc_named_symbol ("CLASS_OBJLOCATEDEXPV", MELT_GET);
- if (sy_CLASS_OBJLOCATEDEXPV && NULL == /*_.VALDATA___V332*/ meltfptr[331])
- /*_.VALDATA___V332*/ meltfptr[331] = (void *) sy_CLASS_OBJLOCATEDEXPV;
+ if (sy_CLASS_OBJLOCATEDEXPV && NULL == /*_.VALDATA___V335*/ meltfptr[334])
+ /*_.VALDATA___V335*/ meltfptr[334] = (void *) sy_CLASS_OBJLOCATEDEXPV;
}
/*^getnamedsymbol */
@@ -29388,8 +29643,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBCX_LOC */
{
melt_ptr_t sy_OBCX_LOC = meltgc_named_symbol ("OBCX_LOC", MELT_GET);
- if (sy_OBCX_LOC && NULL == /*_.VALDATA___V340*/ meltfptr[339])
- /*_.VALDATA___V340*/ meltfptr[339] = (void *) sy_OBCX_LOC;
+ if (sy_OBCX_LOC && NULL == /*_.VALDATA___V343*/ meltfptr[342])
+ /*_.VALDATA___V343*/ meltfptr[342] = (void *) sy_OBCX_LOC;
}
/*^getnamedsymbol */
@@ -29398,8 +29653,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJINSTR =
meltgc_named_symbol ("CLASS_OBJINSTR", MELT_GET);
- if (sy_CLASS_OBJINSTR && NULL == /*_.VALDATA___V342*/ meltfptr[341])
- /*_.VALDATA___V342*/ meltfptr[341] = (void *) sy_CLASS_OBJINSTR;
+ if (sy_CLASS_OBJINSTR && NULL == /*_.VALDATA___V345*/ meltfptr[344])
+ /*_.VALDATA___V345*/ meltfptr[344] = (void *) sy_CLASS_OBJINSTR;
}
/*^getnamedsymbol */
@@ -29407,8 +29662,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBI_LOC */
{
melt_ptr_t sy_OBI_LOC = meltgc_named_symbol ("OBI_LOC", MELT_GET);
- if (sy_OBI_LOC && NULL == /*_.VALDATA___V350*/ meltfptr[349])
- /*_.VALDATA___V350*/ meltfptr[349] = (void *) sy_OBI_LOC;
+ if (sy_OBI_LOC && NULL == /*_.VALDATA___V353*/ meltfptr[352])
+ /*_.VALDATA___V353*/ meltfptr[352] = (void *) sy_OBI_LOC;
}
/*^getnamedsymbol */
@@ -29418,8 +29673,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJCOMMENTINSTR =
meltgc_named_symbol ("CLASS_OBJCOMMENTINSTR", MELT_GET);
if (sy_CLASS_OBJCOMMENTINSTR
- && NULL == /*_.VALDATA___V352*/ meltfptr[351])
- /*_.VALDATA___V352*/ meltfptr[351] = (void *) sy_CLASS_OBJCOMMENTINSTR;
+ && NULL == /*_.VALDATA___V355*/ meltfptr[354])
+ /*_.VALDATA___V355*/ meltfptr[354] = (void *) sy_CLASS_OBJCOMMENTINSTR;
}
/*^getnamedsymbol */
@@ -29428,8 +29683,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBCI_COMMENT =
meltgc_named_symbol ("OBCI_COMMENT", MELT_GET);
- if (sy_OBCI_COMMENT && NULL == /*_.VALDATA___V360*/ meltfptr[359])
- /*_.VALDATA___V360*/ meltfptr[359] = (void *) sy_OBCI_COMMENT;
+ if (sy_OBCI_COMMENT && NULL == /*_.VALDATA___V363*/ meltfptr[362])
+ /*_.VALDATA___V363*/ meltfptr[362] = (void *) sy_OBCI_COMMENT;
}
/*^getnamedsymbol */
@@ -29438,8 +29693,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJDESTINSTR =
meltgc_named_symbol ("CLASS_OBJDESTINSTR", MELT_GET);
- if (sy_CLASS_OBJDESTINSTR && NULL == /*_.VALDATA___V362*/ meltfptr[361])
- /*_.VALDATA___V362*/ meltfptr[361] = (void *) sy_CLASS_OBJDESTINSTR;
+ if (sy_CLASS_OBJDESTINSTR && NULL == /*_.VALDATA___V365*/ meltfptr[364])
+ /*_.VALDATA___V365*/ meltfptr[364] = (void *) sy_CLASS_OBJDESTINSTR;
}
/*^getnamedsymbol */
@@ -29448,8 +29703,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBDI_DESTLIST =
meltgc_named_symbol ("OBDI_DESTLIST", MELT_GET);
- if (sy_OBDI_DESTLIST && NULL == /*_.VALDATA___V370*/ meltfptr[369])
- /*_.VALDATA___V370*/ meltfptr[369] = (void *) sy_OBDI_DESTLIST;
+ if (sy_OBDI_DESTLIST && NULL == /*_.VALDATA___V373*/ meltfptr[372])
+ /*_.VALDATA___V373*/ meltfptr[372] = (void *) sy_OBDI_DESTLIST;
}
/*^getnamedsymbol */
@@ -29458,8 +29713,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCOMPUTE =
meltgc_named_symbol ("CLASS_OBJCOMPUTE", MELT_GET);
- if (sy_CLASS_OBJCOMPUTE && NULL == /*_.VALDATA___V372*/ meltfptr[371])
- /*_.VALDATA___V372*/ meltfptr[371] = (void *) sy_CLASS_OBJCOMPUTE;
+ if (sy_CLASS_OBJCOMPUTE && NULL == /*_.VALDATA___V375*/ meltfptr[374])
+ /*_.VALDATA___V375*/ meltfptr[374] = (void *) sy_CLASS_OBJCOMPUTE;
}
/*^getnamedsymbol */
@@ -29467,8 +29722,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBCPT_EXPR */
{
melt_ptr_t sy_OBCPT_EXPR = meltgc_named_symbol ("OBCPT_EXPR", MELT_GET);
- if (sy_OBCPT_EXPR && NULL == /*_.VALDATA___V380*/ meltfptr[379])
- /*_.VALDATA___V380*/ meltfptr[379] = (void *) sy_OBCPT_EXPR;
+ if (sy_OBCPT_EXPR && NULL == /*_.VALDATA___V383*/ meltfptr[382])
+ /*_.VALDATA___V383*/ meltfptr[382] = (void *) sy_OBCPT_EXPR;
}
/*^getnamedsymbol */
@@ -29477,8 +29732,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJGETARG =
meltgc_named_symbol ("CLASS_OBJGETARG", MELT_GET);
- if (sy_CLASS_OBJGETARG && NULL == /*_.VALDATA___V382*/ meltfptr[381])
- /*_.VALDATA___V382*/ meltfptr[381] = (void *) sy_CLASS_OBJGETARG;
+ if (sy_CLASS_OBJGETARG && NULL == /*_.VALDATA___V385*/ meltfptr[384])
+ /*_.VALDATA___V385*/ meltfptr[384] = (void *) sy_CLASS_OBJGETARG;
}
/*^getnamedsymbol */
@@ -29486,8 +29741,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBARG_OBLOC */
{
melt_ptr_t sy_OBARG_OBLOC = meltgc_named_symbol ("OBARG_OBLOC", MELT_GET);
- if (sy_OBARG_OBLOC && NULL == /*_.VALDATA___V392*/ meltfptr[391])
- /*_.VALDATA___V392*/ meltfptr[391] = (void *) sy_OBARG_OBLOC;
+ if (sy_OBARG_OBLOC && NULL == /*_.VALDATA___V395*/ meltfptr[394])
+ /*_.VALDATA___V395*/ meltfptr[394] = (void *) sy_OBARG_OBLOC;
}
/*^getnamedsymbol */
@@ -29495,8 +29750,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBARG_BIND */
{
melt_ptr_t sy_OBARG_BIND = meltgc_named_symbol ("OBARG_BIND", MELT_GET);
- if (sy_OBARG_BIND && NULL == /*_.VALDATA___V394*/ meltfptr[393])
- /*_.VALDATA___V394*/ meltfptr[393] = (void *) sy_OBARG_BIND;
+ if (sy_OBARG_BIND && NULL == /*_.VALDATA___V397*/ meltfptr[396])
+ /*_.VALDATA___V397*/ meltfptr[396] = (void *) sy_OBARG_BIND;
}
/*^getnamedsymbol */
@@ -29505,8 +29760,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJGETARGREST =
meltgc_named_symbol ("CLASS_OBJGETARGREST", MELT_GET);
- if (sy_CLASS_OBJGETARGREST && NULL == /*_.VALDATA___V396*/ meltfptr[395])
- /*_.VALDATA___V396*/ meltfptr[395] = (void *) sy_CLASS_OBJGETARGREST;
+ if (sy_CLASS_OBJGETARGREST && NULL == /*_.VALDATA___V399*/ meltfptr[398])
+ /*_.VALDATA___V399*/ meltfptr[398] = (void *) sy_CLASS_OBJGETARGREST;
}
/*^getnamedsymbol */
@@ -29514,8 +29769,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBARG_REST */
{
melt_ptr_t sy_OBARG_REST = meltgc_named_symbol ("OBARG_REST", MELT_GET);
- if (sy_OBARG_REST && NULL == /*_.VALDATA___V404*/ meltfptr[403])
- /*_.VALDATA___V404*/ meltfptr[403] = (void *) sy_OBARG_REST;
+ if (sy_OBARG_REST && NULL == /*_.VALDATA___V407*/ meltfptr[406])
+ /*_.VALDATA___V407*/ meltfptr[406] = (void *) sy_OBARG_REST;
}
/*^getnamedsymbol */
@@ -29525,8 +29780,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJPUTXTRARESULT =
meltgc_named_symbol ("CLASS_OBJPUTXTRARESULT", MELT_GET);
if (sy_CLASS_OBJPUTXTRARESULT
- && NULL == /*_.VALDATA___V406*/ meltfptr[405])
- /*_.VALDATA___V406*/ meltfptr[405] = (void *) sy_CLASS_OBJPUTXTRARESULT;
+ && NULL == /*_.VALDATA___V409*/ meltfptr[408])
+ /*_.VALDATA___V409*/ meltfptr[408] = (void *) sy_CLASS_OBJPUTXTRARESULT;
}
/*^getnamedsymbol */
@@ -29534,8 +29789,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBXRES_RANK */
{
melt_ptr_t sy_OBXRES_RANK = meltgc_named_symbol ("OBXRES_RANK", MELT_GET);
- if (sy_OBXRES_RANK && NULL == /*_.VALDATA___V416*/ meltfptr[415])
- /*_.VALDATA___V416*/ meltfptr[415] = (void *) sy_OBXRES_RANK;
+ if (sy_OBXRES_RANK && NULL == /*_.VALDATA___V419*/ meltfptr[418])
+ /*_.VALDATA___V419*/ meltfptr[418] = (void *) sy_OBXRES_RANK;
}
/*^getnamedsymbol */
@@ -29544,8 +29799,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBXRES_OBLOC =
meltgc_named_symbol ("OBXRES_OBLOC", MELT_GET);
- if (sy_OBXRES_OBLOC && NULL == /*_.VALDATA___V418*/ meltfptr[417])
- /*_.VALDATA___V418*/ meltfptr[417] = (void *) sy_OBXRES_OBLOC;
+ if (sy_OBXRES_OBLOC && NULL == /*_.VALDATA___V421*/ meltfptr[420])
+ /*_.VALDATA___V421*/ meltfptr[420] = (void *) sy_OBXRES_OBLOC;
}
/*^getnamedsymbol */
@@ -29554,8 +29809,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJFINALRETURN =
meltgc_named_symbol ("CLASS_OBJFINALRETURN", MELT_GET);
- if (sy_CLASS_OBJFINALRETURN && NULL == /*_.VALDATA___V420*/ meltfptr[419])
- /*_.VALDATA___V420*/ meltfptr[419] = (void *) sy_CLASS_OBJFINALRETURN;
+ if (sy_CLASS_OBJFINALRETURN && NULL == /*_.VALDATA___V423*/ meltfptr[422])
+ /*_.VALDATA___V423*/ meltfptr[422] = (void *) sy_CLASS_OBJFINALRETURN;
}
/*^getnamedsymbol */
@@ -29564,8 +29819,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCLEAR =
meltgc_named_symbol ("CLASS_OBJCLEAR", MELT_GET);
- if (sy_CLASS_OBJCLEAR && NULL == /*_.VALDATA___V426*/ meltfptr[425])
- /*_.VALDATA___V426*/ meltfptr[425] = (void *) sy_CLASS_OBJCLEAR;
+ if (sy_CLASS_OBJCLEAR && NULL == /*_.VALDATA___V429*/ meltfptr[428])
+ /*_.VALDATA___V429*/ meltfptr[428] = (void *) sy_CLASS_OBJCLEAR;
}
/*^getnamedsymbol */
@@ -29573,8 +29828,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OCLR_VLOC */
{
melt_ptr_t sy_OCLR_VLOC = meltgc_named_symbol ("OCLR_VLOC", MELT_GET);
- if (sy_OCLR_VLOC && NULL == /*_.VALDATA___V434*/ meltfptr[433])
- /*_.VALDATA___V434*/ meltfptr[433] = (void *) sy_OCLR_VLOC;
+ if (sy_OCLR_VLOC && NULL == /*_.VALDATA___V437*/ meltfptr[436])
+ /*_.VALDATA___V437*/ meltfptr[436] = (void *) sy_OCLR_VLOC;
}
/*^getnamedsymbol */
@@ -29583,8 +29838,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJANYBLOCK =
meltgc_named_symbol ("CLASS_OBJANYBLOCK", MELT_GET);
- if (sy_CLASS_OBJANYBLOCK && NULL == /*_.VALDATA___V436*/ meltfptr[435])
- /*_.VALDATA___V436*/ meltfptr[435] = (void *) sy_CLASS_OBJANYBLOCK;
+ if (sy_CLASS_OBJANYBLOCK && NULL == /*_.VALDATA___V439*/ meltfptr[438])
+ /*_.VALDATA___V439*/ meltfptr[438] = (void *) sy_CLASS_OBJANYBLOCK;
}
/*^getnamedsymbol */
@@ -29592,8 +29847,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBLO_BODYL */
{
melt_ptr_t sy_OBLO_BODYL = meltgc_named_symbol ("OBLO_BODYL", MELT_GET);
- if (sy_OBLO_BODYL && NULL == /*_.VALDATA___V446*/ meltfptr[445])
- /*_.VALDATA___V446*/ meltfptr[445] = (void *) sy_OBLO_BODYL;
+ if (sy_OBLO_BODYL && NULL == /*_.VALDATA___V449*/ meltfptr[448])
+ /*_.VALDATA___V449*/ meltfptr[448] = (void *) sy_OBLO_BODYL;
}
/*^getnamedsymbol */
@@ -29601,8 +29856,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBLO_EPIL */
{
melt_ptr_t sy_OBLO_EPIL = meltgc_named_symbol ("OBLO_EPIL", MELT_GET);
- if (sy_OBLO_EPIL && NULL == /*_.VALDATA___V448*/ meltfptr[447])
- /*_.VALDATA___V448*/ meltfptr[447] = (void *) sy_OBLO_EPIL;
+ if (sy_OBLO_EPIL && NULL == /*_.VALDATA___V451*/ meltfptr[450])
+ /*_.VALDATA___V451*/ meltfptr[450] = (void *) sy_OBLO_EPIL;
}
/*^getnamedsymbol */
@@ -29611,8 +29866,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPLAINBLOCK =
meltgc_named_symbol ("CLASS_OBJPLAINBLOCK", MELT_GET);
- if (sy_CLASS_OBJPLAINBLOCK && NULL == /*_.VALDATA___V450*/ meltfptr[449])
- /*_.VALDATA___V450*/ meltfptr[449] = (void *) sy_CLASS_OBJPLAINBLOCK;
+ if (sy_CLASS_OBJPLAINBLOCK && NULL == /*_.VALDATA___V453*/ meltfptr[452])
+ /*_.VALDATA___V453*/ meltfptr[452] = (void *) sy_CLASS_OBJPLAINBLOCK;
}
/*^getnamedsymbol */
@@ -29622,8 +29877,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJMULTIALLOCBLOCK =
meltgc_named_symbol ("CLASS_OBJMULTIALLOCBLOCK", MELT_GET);
if (sy_CLASS_OBJMULTIALLOCBLOCK
- && NULL == /*_.VALDATA___V456*/ meltfptr[455])
- /*_.VALDATA___V456*/ meltfptr[455] =
+ && NULL == /*_.VALDATA___V459*/ meltfptr[458])
+ /*_.VALDATA___V459*/ meltfptr[458] =
(void *) sy_CLASS_OBJMULTIALLOCBLOCK;
}
@@ -29633,8 +29888,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OMALBLO_ALLSTRUCT =
meltgc_named_symbol ("OMALBLO_ALLSTRUCT", MELT_GET);
- if (sy_OMALBLO_ALLSTRUCT && NULL == /*_.VALDATA___V466*/ meltfptr[465])
- /*_.VALDATA___V466*/ meltfptr[465] = (void *) sy_OMALBLO_ALLSTRUCT;
+ if (sy_OMALBLO_ALLSTRUCT && NULL == /*_.VALDATA___V469*/ meltfptr[468])
+ /*_.VALDATA___V469*/ meltfptr[468] = (void *) sy_OMALBLO_ALLSTRUCT;
}
/*^getnamedsymbol */
@@ -29643,8 +29898,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OMALBLO_NAME =
meltgc_named_symbol ("OMALBLO_NAME", MELT_GET);
- if (sy_OMALBLO_NAME && NULL == /*_.VALDATA___V468*/ meltfptr[467])
- /*_.VALDATA___V468*/ meltfptr[467] = (void *) sy_OMALBLO_NAME;
+ if (sy_OMALBLO_NAME && NULL == /*_.VALDATA___V471*/ meltfptr[470])
+ /*_.VALDATA___V471*/ meltfptr[470] = (void *) sy_OMALBLO_NAME;
}
/*^getnamedsymbol */
@@ -29654,8 +29909,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJCOMMENTEDBLOCK =
meltgc_named_symbol ("CLASS_OBJCOMMENTEDBLOCK", MELT_GET);
if (sy_CLASS_OBJCOMMENTEDBLOCK
- && NULL == /*_.VALDATA___V470*/ meltfptr[469])
- /*_.VALDATA___V470*/ meltfptr[469] =
+ && NULL == /*_.VALDATA___V473*/ meltfptr[472])
+ /*_.VALDATA___V473*/ meltfptr[472] =
(void *) sy_CLASS_OBJCOMMENTEDBLOCK;
}
@@ -29665,8 +29920,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OCOMBLO_COMMENT =
meltgc_named_symbol ("OCOMBLO_COMMENT", MELT_GET);
- if (sy_OCOMBLO_COMMENT && NULL == /*_.VALDATA___V478*/ meltfptr[477])
- /*_.VALDATA___V478*/ meltfptr[477] = (void *) sy_OCOMBLO_COMMENT;
+ if (sy_OCOMBLO_COMMENT && NULL == /*_.VALDATA___V481*/ meltfptr[480])
+ /*_.VALDATA___V481*/ meltfptr[480] = (void *) sy_OCOMBLO_COMMENT;
}
/*^getnamedsymbol */
@@ -29675,8 +29930,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJMULTIBLOCK =
meltgc_named_symbol ("CLASS_OBJMULTIBLOCK", MELT_GET);
- if (sy_CLASS_OBJMULTIBLOCK && NULL == /*_.VALDATA___V480*/ meltfptr[479])
- /*_.VALDATA___V480*/ meltfptr[479] = (void *) sy_CLASS_OBJMULTIBLOCK;
+ if (sy_CLASS_OBJMULTIBLOCK && NULL == /*_.VALDATA___V483*/ meltfptr[482])
+ /*_.VALDATA___V483*/ meltfptr[482] = (void *) sy_CLASS_OBJMULTIBLOCK;
}
/*^getnamedsymbol */
@@ -29685,8 +29940,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OMULBLO_SUBCOMP =
meltgc_named_symbol ("OMULBLO_SUBCOMP", MELT_GET);
- if (sy_OMULBLO_SUBCOMP && NULL == /*_.VALDATA___V488*/ meltfptr[487])
- /*_.VALDATA___V488*/ meltfptr[487] = (void *) sy_OMULBLO_SUBCOMP;
+ if (sy_OMULBLO_SUBCOMP && NULL == /*_.VALDATA___V491*/ meltfptr[490])
+ /*_.VALDATA___V491*/ meltfptr[490] = (void *) sy_OMULBLO_SUBCOMP;
}
/*^getnamedsymbol */
@@ -29695,8 +29950,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJFLAGBLOCK =
meltgc_named_symbol ("CLASS_OBJFLAGBLOCK", MELT_GET);
- if (sy_CLASS_OBJFLAGBLOCK && NULL == /*_.VALDATA___V490*/ meltfptr[489])
- /*_.VALDATA___V490*/ meltfptr[489] = (void *) sy_CLASS_OBJFLAGBLOCK;
+ if (sy_CLASS_OBJFLAGBLOCK && NULL == /*_.VALDATA___V493*/ meltfptr[492])
+ /*_.VALDATA___V493*/ meltfptr[492] = (void *) sy_CLASS_OBJFLAGBLOCK;
}
/*^getnamedsymbol */
@@ -29705,8 +29960,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OFLABLO_FLAGS =
meltgc_named_symbol ("OFLABLO_FLAGS", MELT_GET);
- if (sy_OFLABLO_FLAGS && NULL == /*_.VALDATA___V498*/ meltfptr[497])
- /*_.VALDATA___V498*/ meltfptr[497] = (void *) sy_OFLABLO_FLAGS;
+ if (sy_OFLABLO_FLAGS && NULL == /*_.VALDATA___V501*/ meltfptr[500])
+ /*_.VALDATA___V501*/ meltfptr[500] = (void *) sy_OFLABLO_FLAGS;
}
/*^getnamedsymbol */
@@ -29715,8 +29970,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJLABELINSTR =
meltgc_named_symbol ("CLASS_OBJLABELINSTR", MELT_GET);
- if (sy_CLASS_OBJLABELINSTR && NULL == /*_.VALDATA___V500*/ meltfptr[499])
- /*_.VALDATA___V500*/ meltfptr[499] = (void *) sy_CLASS_OBJLABELINSTR;
+ if (sy_CLASS_OBJLABELINSTR && NULL == /*_.VALDATA___V503*/ meltfptr[502])
+ /*_.VALDATA___V503*/ meltfptr[502] = (void *) sy_CLASS_OBJLABELINSTR;
}
/*^getnamedsymbol */
@@ -29725,8 +29980,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBLAB_PREFIX =
meltgc_named_symbol ("OBLAB_PREFIX", MELT_GET);
- if (sy_OBLAB_PREFIX && NULL == /*_.VALDATA___V510*/ meltfptr[509])
- /*_.VALDATA___V510*/ meltfptr[509] = (void *) sy_OBLAB_PREFIX;
+ if (sy_OBLAB_PREFIX && NULL == /*_.VALDATA___V513*/ meltfptr[512])
+ /*_.VALDATA___V513*/ meltfptr[512] = (void *) sy_OBLAB_PREFIX;
}
/*^getnamedsymbol */
@@ -29734,8 +29989,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBLAB_RANK */
{
melt_ptr_t sy_OBLAB_RANK = meltgc_named_symbol ("OBLAB_RANK", MELT_GET);
- if (sy_OBLAB_RANK && NULL == /*_.VALDATA___V512*/ meltfptr[511])
- /*_.VALDATA___V512*/ meltfptr[511] = (void *) sy_OBLAB_RANK;
+ if (sy_OBLAB_RANK && NULL == /*_.VALDATA___V515*/ meltfptr[514])
+ /*_.VALDATA___V515*/ meltfptr[514] = (void *) sy_OBLAB_RANK;
}
/*^getnamedsymbol */
@@ -29744,8 +29999,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJGOTOINSTR =
meltgc_named_symbol ("CLASS_OBJGOTOINSTR", MELT_GET);
- if (sy_CLASS_OBJGOTOINSTR && NULL == /*_.VALDATA___V514*/ meltfptr[513])
- /*_.VALDATA___V514*/ meltfptr[513] = (void *) sy_CLASS_OBJGOTOINSTR;
+ if (sy_CLASS_OBJGOTOINSTR && NULL == /*_.VALDATA___V517*/ meltfptr[516])
+ /*_.VALDATA___V517*/ meltfptr[516] = (void *) sy_CLASS_OBJGOTOINSTR;
}
/*^getnamedsymbol */
@@ -29754,8 +30009,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBGOTO_PREFIX =
meltgc_named_symbol ("OBGOTO_PREFIX", MELT_GET);
- if (sy_OBGOTO_PREFIX && NULL == /*_.VALDATA___V524*/ meltfptr[523])
- /*_.VALDATA___V524*/ meltfptr[523] = (void *) sy_OBGOTO_PREFIX;
+ if (sy_OBGOTO_PREFIX && NULL == /*_.VALDATA___V527*/ meltfptr[526])
+ /*_.VALDATA___V527*/ meltfptr[526] = (void *) sy_OBGOTO_PREFIX;
}
/*^getnamedsymbol */
@@ -29763,8 +30018,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBGOTO_RANK */
{
melt_ptr_t sy_OBGOTO_RANK = meltgc_named_symbol ("OBGOTO_RANK", MELT_GET);
- if (sy_OBGOTO_RANK && NULL == /*_.VALDATA___V526*/ meltfptr[525])
- /*_.VALDATA___V526*/ meltfptr[525] = (void *) sy_OBGOTO_RANK;
+ if (sy_OBGOTO_RANK && NULL == /*_.VALDATA___V529*/ meltfptr[528])
+ /*_.VALDATA___V529*/ meltfptr[528] = (void *) sy_OBGOTO_RANK;
}
/*^getnamedsymbol */
@@ -29773,8 +30028,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJLOOP =
meltgc_named_symbol ("CLASS_OBJLOOP", MELT_GET);
- if (sy_CLASS_OBJLOOP && NULL == /*_.VALDATA___V528*/ meltfptr[527])
- /*_.VALDATA___V528*/ meltfptr[527] = (void *) sy_CLASS_OBJLOOP;
+ if (sy_CLASS_OBJLOOP && NULL == /*_.VALDATA___V531*/ meltfptr[530])
+ /*_.VALDATA___V531*/ meltfptr[530] = (void *) sy_CLASS_OBJLOOP;
}
/*^getnamedsymbol */
@@ -29783,8 +30038,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBLOOP_LABEL =
meltgc_named_symbol ("OBLOOP_LABEL", MELT_GET);
- if (sy_OBLOOP_LABEL && NULL == /*_.VALDATA___V538*/ meltfptr[537])
- /*_.VALDATA___V538*/ meltfptr[537] = (void *) sy_OBLOOP_LABEL;
+ if (sy_OBLOOP_LABEL && NULL == /*_.VALDATA___V541*/ meltfptr[540])
+ /*_.VALDATA___V541*/ meltfptr[540] = (void *) sy_OBLOOP_LABEL;
}
/*^getnamedsymbol */
@@ -29792,8 +30047,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBLOOP_RESV */
{
melt_ptr_t sy_OBLOOP_RESV = meltgc_named_symbol ("OBLOOP_RESV", MELT_GET);
- if (sy_OBLOOP_RESV && NULL == /*_.VALDATA___V540*/ meltfptr[539])
- /*_.VALDATA___V540*/ meltfptr[539] = (void *) sy_OBLOOP_RESV;
+ if (sy_OBLOOP_RESV && NULL == /*_.VALDATA___V543*/ meltfptr[542])
+ /*_.VALDATA___V543*/ meltfptr[542] = (void *) sy_OBLOOP_RESV;
}
/*^getnamedsymbol */
@@ -29802,8 +30057,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJEXIT =
meltgc_named_symbol ("CLASS_OBJEXIT", MELT_GET);
- if (sy_CLASS_OBJEXIT && NULL == /*_.VALDATA___V542*/ meltfptr[541])
- /*_.VALDATA___V542*/ meltfptr[541] = (void *) sy_CLASS_OBJEXIT;
+ if (sy_CLASS_OBJEXIT && NULL == /*_.VALDATA___V545*/ meltfptr[544])
+ /*_.VALDATA___V545*/ meltfptr[544] = (void *) sy_CLASS_OBJEXIT;
}
/*^getnamedsymbol */
@@ -29812,8 +30067,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBEXIT_LABEL =
meltgc_named_symbol ("OBEXIT_LABEL", MELT_GET);
- if (sy_OBEXIT_LABEL && NULL == /*_.VALDATA___V550*/ meltfptr[549])
- /*_.VALDATA___V550*/ meltfptr[549] = (void *) sy_OBEXIT_LABEL;
+ if (sy_OBEXIT_LABEL && NULL == /*_.VALDATA___V553*/ meltfptr[552])
+ /*_.VALDATA___V553*/ meltfptr[552] = (void *) sy_OBEXIT_LABEL;
}
/*^getnamedsymbol */
@@ -29822,8 +30077,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJAGAIN =
meltgc_named_symbol ("CLASS_OBJAGAIN", MELT_GET);
- if (sy_CLASS_OBJAGAIN && NULL == /*_.VALDATA___V552*/ meltfptr[551])
- /*_.VALDATA___V552*/ meltfptr[551] = (void *) sy_CLASS_OBJAGAIN;
+ if (sy_CLASS_OBJAGAIN && NULL == /*_.VALDATA___V555*/ meltfptr[554])
+ /*_.VALDATA___V555*/ meltfptr[554] = (void *) sy_CLASS_OBJAGAIN;
}
/*^getnamedsymbol */
@@ -29832,8 +30087,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBAGAIN_LABEL =
meltgc_named_symbol ("OBAGAIN_LABEL", MELT_GET);
- if (sy_OBAGAIN_LABEL && NULL == /*_.VALDATA___V560*/ meltfptr[559])
- /*_.VALDATA___V560*/ meltfptr[559] = (void *) sy_OBAGAIN_LABEL;
+ if (sy_OBAGAIN_LABEL && NULL == /*_.VALDATA___V563*/ meltfptr[562])
+ /*_.VALDATA___V563*/ meltfptr[562] = (void *) sy_OBAGAIN_LABEL;
}
/*^getnamedsymbol */
@@ -29842,8 +30097,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCITERBLOCK =
meltgc_named_symbol ("CLASS_OBJCITERBLOCK", MELT_GET);
- if (sy_CLASS_OBJCITERBLOCK && NULL == /*_.VALDATA___V562*/ meltfptr[561])
- /*_.VALDATA___V562*/ meltfptr[561] = (void *) sy_CLASS_OBJCITERBLOCK;
+ if (sy_CLASS_OBJCITERBLOCK && NULL == /*_.VALDATA___V565*/ meltfptr[564])
+ /*_.VALDATA___V565*/ meltfptr[564] = (void *) sy_CLASS_OBJCITERBLOCK;
}
/*^getnamedsymbol */
@@ -29852,8 +30107,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBCITER_CITER =
meltgc_named_symbol ("OBCITER_CITER", MELT_GET);
- if (sy_OBCITER_CITER && NULL == /*_.VALDATA___V574*/ meltfptr[573])
- /*_.VALDATA___V574*/ meltfptr[573] = (void *) sy_OBCITER_CITER;
+ if (sy_OBCITER_CITER && NULL == /*_.VALDATA___V577*/ meltfptr[576])
+ /*_.VALDATA___V577*/ meltfptr[576] = (void *) sy_OBCITER_CITER;
}
/*^getnamedsymbol */
@@ -29862,8 +30117,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBCITER_BEFORE =
meltgc_named_symbol ("OBCITER_BEFORE", MELT_GET);
- if (sy_OBCITER_BEFORE && NULL == /*_.VALDATA___V576*/ meltfptr[575])
- /*_.VALDATA___V576*/ meltfptr[575] = (void *) sy_OBCITER_BEFORE;
+ if (sy_OBCITER_BEFORE && NULL == /*_.VALDATA___V579*/ meltfptr[578])
+ /*_.VALDATA___V579*/ meltfptr[578] = (void *) sy_OBCITER_BEFORE;
}
/*^getnamedsymbol */
@@ -29872,8 +30127,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBCITER_AFTER =
meltgc_named_symbol ("OBCITER_AFTER", MELT_GET);
- if (sy_OBCITER_AFTER && NULL == /*_.VALDATA___V578*/ meltfptr[577])
- /*_.VALDATA___V578*/ meltfptr[577] = (void *) sy_OBCITER_AFTER;
+ if (sy_OBCITER_AFTER && NULL == /*_.VALDATA___V581*/ meltfptr[580])
+ /*_.VALDATA___V581*/ meltfptr[580] = (void *) sy_OBCITER_AFTER;
}
/*^getnamedsymbol */
@@ -29882,8 +30137,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCOND =
meltgc_named_symbol ("CLASS_OBJCOND", MELT_GET);
- if (sy_CLASS_OBJCOND && NULL == /*_.VALDATA___V580*/ meltfptr[579])
- /*_.VALDATA___V580*/ meltfptr[579] = (void *) sy_CLASS_OBJCOND;
+ if (sy_CLASS_OBJCOND && NULL == /*_.VALDATA___V583*/ meltfptr[582])
+ /*_.VALDATA___V583*/ meltfptr[582] = (void *) sy_CLASS_OBJCOND;
}
/*^getnamedsymbol */
@@ -29891,8 +30146,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBCOND_TEST */
{
melt_ptr_t sy_OBCOND_TEST = meltgc_named_symbol ("OBCOND_TEST", MELT_GET);
- if (sy_OBCOND_TEST && NULL == /*_.VALDATA___V592*/ meltfptr[591])
- /*_.VALDATA___V592*/ meltfptr[591] = (void *) sy_OBCOND_TEST;
+ if (sy_OBCOND_TEST && NULL == /*_.VALDATA___V595*/ meltfptr[594])
+ /*_.VALDATA___V595*/ meltfptr[594] = (void *) sy_OBCOND_TEST;
}
/*^getnamedsymbol */
@@ -29900,8 +30155,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBCOND_THEN */
{
melt_ptr_t sy_OBCOND_THEN = meltgc_named_symbol ("OBCOND_THEN", MELT_GET);
- if (sy_OBCOND_THEN && NULL == /*_.VALDATA___V594*/ meltfptr[593])
- /*_.VALDATA___V594*/ meltfptr[593] = (void *) sy_OBCOND_THEN;
+ if (sy_OBCOND_THEN && NULL == /*_.VALDATA___V597*/ meltfptr[596])
+ /*_.VALDATA___V597*/ meltfptr[596] = (void *) sy_OBCOND_THEN;
}
/*^getnamedsymbol */
@@ -29909,8 +30164,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBCOND_ELSE */
{
melt_ptr_t sy_OBCOND_ELSE = meltgc_named_symbol ("OBCOND_ELSE", MELT_GET);
- if (sy_OBCOND_ELSE && NULL == /*_.VALDATA___V596*/ meltfptr[595])
- /*_.VALDATA___V596*/ meltfptr[595] = (void *) sy_OBCOND_ELSE;
+ if (sy_OBCOND_ELSE && NULL == /*_.VALDATA___V599*/ meltfptr[598])
+ /*_.VALDATA___V599*/ meltfptr[598] = (void *) sy_OBCOND_ELSE;
}
/*^getnamedsymbol */
@@ -29919,8 +30174,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJCPPIF =
meltgc_named_symbol ("CLASS_OBJCPPIF", MELT_GET);
- if (sy_CLASS_OBJCPPIF && NULL == /*_.VALDATA___V598*/ meltfptr[597])
- /*_.VALDATA___V598*/ meltfptr[597] = (void *) sy_CLASS_OBJCPPIF;
+ if (sy_CLASS_OBJCPPIF && NULL == /*_.VALDATA___V601*/ meltfptr[600])
+ /*_.VALDATA___V601*/ meltfptr[600] = (void *) sy_CLASS_OBJCPPIF;
}
/*^getnamedsymbol */
@@ -29928,8 +30183,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBIFP_COND */
{
melt_ptr_t sy_OBIFP_COND = meltgc_named_symbol ("OBIFP_COND", MELT_GET);
- if (sy_OBIFP_COND && NULL == /*_.VALDATA___V610*/ meltfptr[609])
- /*_.VALDATA___V610*/ meltfptr[609] = (void *) sy_OBIFP_COND;
+ if (sy_OBIFP_COND && NULL == /*_.VALDATA___V613*/ meltfptr[612])
+ /*_.VALDATA___V613*/ meltfptr[612] = (void *) sy_OBIFP_COND;
}
/*^getnamedsymbol */
@@ -29937,8 +30192,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBIFP_THEN */
{
melt_ptr_t sy_OBIFP_THEN = meltgc_named_symbol ("OBIFP_THEN", MELT_GET);
- if (sy_OBIFP_THEN && NULL == /*_.VALDATA___V612*/ meltfptr[611])
- /*_.VALDATA___V612*/ meltfptr[611] = (void *) sy_OBIFP_THEN;
+ if (sy_OBIFP_THEN && NULL == /*_.VALDATA___V615*/ meltfptr[614])
+ /*_.VALDATA___V615*/ meltfptr[614] = (void *) sy_OBIFP_THEN;
}
/*^getnamedsymbol */
@@ -29946,8 +30201,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBIFP_ELSE */
{
melt_ptr_t sy_OBIFP_ELSE = meltgc_named_symbol ("OBIFP_ELSE", MELT_GET);
- if (sy_OBIFP_ELSE && NULL == /*_.VALDATA___V614*/ meltfptr[613])
- /*_.VALDATA___V614*/ meltfptr[613] = (void *) sy_OBIFP_ELSE;
+ if (sy_OBIFP_ELSE && NULL == /*_.VALDATA___V617*/ meltfptr[616])
+ /*_.VALDATA___V617*/ meltfptr[616] = (void *) sy_OBIFP_ELSE;
}
/*^getnamedsymbol */
@@ -29957,8 +30212,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINTERNCOMMON =
meltgc_named_symbol ("CLASS_OBJINTERNCOMMON", MELT_GET);
if (sy_CLASS_OBJINTERNCOMMON
- && NULL == /*_.VALDATA___V616*/ meltfptr[615])
- /*_.VALDATA___V616*/ meltfptr[615] = (void *) sy_CLASS_OBJINTERNCOMMON;
+ && NULL == /*_.VALDATA___V619*/ meltfptr[618])
+ /*_.VALDATA___V619*/ meltfptr[618] = (void *) sy_CLASS_OBJINTERNCOMMON;
}
/*^getnamedsymbol */
@@ -29967,8 +30222,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBINTERN_IOBJ =
meltgc_named_symbol ("OBINTERN_IOBJ", MELT_GET);
- if (sy_OBINTERN_IOBJ && NULL == /*_.VALDATA___V624*/ meltfptr[623])
- /*_.VALDATA___V624*/ meltfptr[623] = (void *) sy_OBINTERN_IOBJ;
+ if (sy_OBINTERN_IOBJ && NULL == /*_.VALDATA___V627*/ meltfptr[626])
+ /*_.VALDATA___V627*/ meltfptr[626] = (void *) sy_OBINTERN_IOBJ;
}
/*^getnamedsymbol */
@@ -29978,8 +30233,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINTERNSYMBOL =
meltgc_named_symbol ("CLASS_OBJINTERNSYMBOL", MELT_GET);
if (sy_CLASS_OBJINTERNSYMBOL
- && NULL == /*_.VALDATA___V626*/ meltfptr[625])
- /*_.VALDATA___V626*/ meltfptr[625] = (void *) sy_CLASS_OBJINTERNSYMBOL;
+ && NULL == /*_.VALDATA___V629*/ meltfptr[628])
+ /*_.VALDATA___V629*/ meltfptr[628] = (void *) sy_CLASS_OBJINTERNSYMBOL;
}
/*^getnamedsymbol */
@@ -29989,8 +30244,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJINTERNKEYWORD =
meltgc_named_symbol ("CLASS_OBJINTERNKEYWORD", MELT_GET);
if (sy_CLASS_OBJINTERNKEYWORD
- && NULL == /*_.VALDATA___V632*/ meltfptr[631])
- /*_.VALDATA___V632*/ meltfptr[631] = (void *) sy_CLASS_OBJINTERNKEYWORD;
+ && NULL == /*_.VALDATA___V635*/ meltfptr[634])
+ /*_.VALDATA___V635*/ meltfptr[634] = (void *) sy_CLASS_OBJINTERNKEYWORD;
}
/*^getnamedsymbol */
@@ -30000,8 +30255,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJGETNAMEDCOMMON =
meltgc_named_symbol ("CLASS_OBJGETNAMEDCOMMON", MELT_GET);
if (sy_CLASS_OBJGETNAMEDCOMMON
- && NULL == /*_.VALDATA___V638*/ meltfptr[637])
- /*_.VALDATA___V638*/ meltfptr[637] =
+ && NULL == /*_.VALDATA___V641*/ meltfptr[640])
+ /*_.VALDATA___V641*/ meltfptr[640] =
(void *) sy_CLASS_OBJGETNAMEDCOMMON;
}
@@ -30011,8 +30266,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBGNAMED_IOBJ =
meltgc_named_symbol ("OBGNAMED_IOBJ", MELT_GET);
- if (sy_OBGNAMED_IOBJ && NULL == /*_.VALDATA___V646*/ meltfptr[645])
- /*_.VALDATA___V646*/ meltfptr[645] = (void *) sy_OBGNAMED_IOBJ;
+ if (sy_OBGNAMED_IOBJ && NULL == /*_.VALDATA___V649*/ meltfptr[648])
+ /*_.VALDATA___V649*/ meltfptr[648] = (void *) sy_OBGNAMED_IOBJ;
}
/*^getnamedsymbol */
@@ -30022,8 +30277,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJGETNAMEDSYMBOL =
meltgc_named_symbol ("CLASS_OBJGETNAMEDSYMBOL", MELT_GET);
if (sy_CLASS_OBJGETNAMEDSYMBOL
- && NULL == /*_.VALDATA___V648*/ meltfptr[647])
- /*_.VALDATA___V648*/ meltfptr[647] =
+ && NULL == /*_.VALDATA___V651*/ meltfptr[650])
+ /*_.VALDATA___V651*/ meltfptr[650] =
(void *) sy_CLASS_OBJGETNAMEDSYMBOL;
}
@@ -30034,8 +30289,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJGETNAMEDKEYWORD =
meltgc_named_symbol ("CLASS_OBJGETNAMEDKEYWORD", MELT_GET);
if (sy_CLASS_OBJGETNAMEDKEYWORD
- && NULL == /*_.VALDATA___V654*/ meltfptr[653])
- /*_.VALDATA___V654*/ meltfptr[653] =
+ && NULL == /*_.VALDATA___V657*/ meltfptr[656])
+ /*_.VALDATA___V657*/ meltfptr[656] =
(void *) sy_CLASS_OBJGETNAMEDKEYWORD;
}
@@ -30045,8 +30300,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJAPPLY =
meltgc_named_symbol ("CLASS_OBJAPPLY", MELT_GET);
- if (sy_CLASS_OBJAPPLY && NULL == /*_.VALDATA___V660*/ meltfptr[659])
- /*_.VALDATA___V660*/ meltfptr[659] = (void *) sy_CLASS_OBJAPPLY;
+ if (sy_CLASS_OBJAPPLY && NULL == /*_.VALDATA___V663*/ meltfptr[662])
+ /*_.VALDATA___V663*/ meltfptr[662] = (void *) sy_CLASS_OBJAPPLY;
}
/*^getnamedsymbol */
@@ -30054,8 +30309,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBAPP_CLOS */
{
melt_ptr_t sy_OBAPP_CLOS = meltgc_named_symbol ("OBAPP_CLOS", MELT_GET);
- if (sy_OBAPP_CLOS && NULL == /*_.VALDATA___V670*/ meltfptr[669])
- /*_.VALDATA___V670*/ meltfptr[669] = (void *) sy_OBAPP_CLOS;
+ if (sy_OBAPP_CLOS && NULL == /*_.VALDATA___V673*/ meltfptr[672])
+ /*_.VALDATA___V673*/ meltfptr[672] = (void *) sy_OBAPP_CLOS;
}
/*^getnamedsymbol */
@@ -30063,8 +30318,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBAPP_ARGS */
{
melt_ptr_t sy_OBAPP_ARGS = meltgc_named_symbol ("OBAPP_ARGS", MELT_GET);
- if (sy_OBAPP_ARGS && NULL == /*_.VALDATA___V672*/ meltfptr[671])
- /*_.VALDATA___V672*/ meltfptr[671] = (void *) sy_OBAPP_ARGS;
+ if (sy_OBAPP_ARGS && NULL == /*_.VALDATA___V675*/ meltfptr[674])
+ /*_.VALDATA___V675*/ meltfptr[674] = (void *) sy_OBAPP_ARGS;
}
/*^getnamedsymbol */
@@ -30073,8 +30328,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJMULTIAPPLY =
meltgc_named_symbol ("CLASS_OBJMULTIAPPLY", MELT_GET);
- if (sy_CLASS_OBJMULTIAPPLY && NULL == /*_.VALDATA___V674*/ meltfptr[673])
- /*_.VALDATA___V674*/ meltfptr[673] = (void *) sy_CLASS_OBJMULTIAPPLY;
+ if (sy_CLASS_OBJMULTIAPPLY && NULL == /*_.VALDATA___V677*/ meltfptr[676])
+ /*_.VALDATA___V677*/ meltfptr[676] = (void *) sy_CLASS_OBJMULTIAPPLY;
}
/*^getnamedsymbol */
@@ -30083,8 +30338,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBMULTAPP_XRES =
meltgc_named_symbol ("OBMULTAPP_XRES", MELT_GET);
- if (sy_OBMULTAPP_XRES && NULL == /*_.VALDATA___V682*/ meltfptr[681])
- /*_.VALDATA___V682*/ meltfptr[681] = (void *) sy_OBMULTAPP_XRES;
+ if (sy_OBMULTAPP_XRES && NULL == /*_.VALDATA___V685*/ meltfptr[684])
+ /*_.VALDATA___V685*/ meltfptr[684] = (void *) sy_OBMULTAPP_XRES;
}
/*^getnamedsymbol */
@@ -30093,8 +30348,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJMSEND =
meltgc_named_symbol ("CLASS_OBJMSEND", MELT_GET);
- if (sy_CLASS_OBJMSEND && NULL == /*_.VALDATA___V684*/ meltfptr[683])
- /*_.VALDATA___V684*/ meltfptr[683] = (void *) sy_CLASS_OBJMSEND;
+ if (sy_CLASS_OBJMSEND && NULL == /*_.VALDATA___V687*/ meltfptr[686])
+ /*_.VALDATA___V687*/ meltfptr[686] = (void *) sy_CLASS_OBJMSEND;
}
/*^getnamedsymbol */
@@ -30102,8 +30357,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBMSND_SEL */
{
melt_ptr_t sy_OBMSND_SEL = meltgc_named_symbol ("OBMSND_SEL", MELT_GET);
- if (sy_OBMSND_SEL && NULL == /*_.VALDATA___V696*/ meltfptr[695])
- /*_.VALDATA___V696*/ meltfptr[695] = (void *) sy_OBMSND_SEL;
+ if (sy_OBMSND_SEL && NULL == /*_.VALDATA___V699*/ meltfptr[698])
+ /*_.VALDATA___V699*/ meltfptr[698] = (void *) sy_OBMSND_SEL;
}
/*^getnamedsymbol */
@@ -30111,8 +30366,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBMSND_RECV */
{
melt_ptr_t sy_OBMSND_RECV = meltgc_named_symbol ("OBMSND_RECV", MELT_GET);
- if (sy_OBMSND_RECV && NULL == /*_.VALDATA___V698*/ meltfptr[697])
- /*_.VALDATA___V698*/ meltfptr[697] = (void *) sy_OBMSND_RECV;
+ if (sy_OBMSND_RECV && NULL == /*_.VALDATA___V701*/ meltfptr[700])
+ /*_.VALDATA___V701*/ meltfptr[700] = (void *) sy_OBMSND_RECV;
}
/*^getnamedsymbol */
@@ -30120,8 +30375,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBMSND_ARGS */
{
melt_ptr_t sy_OBMSND_ARGS = meltgc_named_symbol ("OBMSND_ARGS", MELT_GET);
- if (sy_OBMSND_ARGS && NULL == /*_.VALDATA___V700*/ meltfptr[699])
- /*_.VALDATA___V700*/ meltfptr[699] = (void *) sy_OBMSND_ARGS;
+ if (sy_OBMSND_ARGS && NULL == /*_.VALDATA___V703*/ meltfptr[702])
+ /*_.VALDATA___V703*/ meltfptr[702] = (void *) sy_OBMSND_ARGS;
}
/*^getnamedsymbol */
@@ -30130,8 +30385,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJMULTIMSEND =
meltgc_named_symbol ("CLASS_OBJMULTIMSEND", MELT_GET);
- if (sy_CLASS_OBJMULTIMSEND && NULL == /*_.VALDATA___V702*/ meltfptr[701])
- /*_.VALDATA___V702*/ meltfptr[701] = (void *) sy_CLASS_OBJMULTIMSEND;
+ if (sy_CLASS_OBJMULTIMSEND && NULL == /*_.VALDATA___V705*/ meltfptr[704])
+ /*_.VALDATA___V705*/ meltfptr[704] = (void *) sy_CLASS_OBJMULTIMSEND;
}
/*^getnamedsymbol */
@@ -30140,8 +30395,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBMULTSND_XRES =
meltgc_named_symbol ("OBMULTSND_XRES", MELT_GET);
- if (sy_OBMULTSND_XRES && NULL == /*_.VALDATA___V710*/ meltfptr[709])
- /*_.VALDATA___V710*/ meltfptr[709] = (void *) sy_OBMULTSND_XRES;
+ if (sy_OBMULTSND_XRES && NULL == /*_.VALDATA___V713*/ meltfptr[712])
+ /*_.VALDATA___V713*/ meltfptr[712] = (void *) sy_OBMULTSND_XRES;
}
/*^getnamedsymbol */
@@ -30150,8 +30405,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJRAWALLOCOBJ =
meltgc_named_symbol ("CLASS_OBJRAWALLOCOBJ", MELT_GET);
- if (sy_CLASS_OBJRAWALLOCOBJ && NULL == /*_.VALDATA___V712*/ meltfptr[711])
- /*_.VALDATA___V712*/ meltfptr[711] = (void *) sy_CLASS_OBJRAWALLOCOBJ;
+ if (sy_CLASS_OBJRAWALLOCOBJ && NULL == /*_.VALDATA___V715*/ meltfptr[714])
+ /*_.VALDATA___V715*/ meltfptr[714] = (void *) sy_CLASS_OBJRAWALLOCOBJ;
}
/*^getnamedsymbol */
@@ -30160,8 +30415,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBRALLOBJ_CLASS =
meltgc_named_symbol ("OBRALLOBJ_CLASS", MELT_GET);
- if (sy_OBRALLOBJ_CLASS && NULL == /*_.VALDATA___V724*/ meltfptr[723])
- /*_.VALDATA___V724*/ meltfptr[723] = (void *) sy_OBRALLOBJ_CLASS;
+ if (sy_OBRALLOBJ_CLASS && NULL == /*_.VALDATA___V727*/ meltfptr[726])
+ /*_.VALDATA___V727*/ meltfptr[726] = (void *) sy_OBRALLOBJ_CLASS;
}
/*^getnamedsymbol */
@@ -30170,8 +30425,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBRALLOBJ_LEN =
meltgc_named_symbol ("OBRALLOBJ_LEN", MELT_GET);
- if (sy_OBRALLOBJ_LEN && NULL == /*_.VALDATA___V726*/ meltfptr[725])
- /*_.VALDATA___V726*/ meltfptr[725] = (void *) sy_OBRALLOBJ_LEN;
+ if (sy_OBRALLOBJ_LEN && NULL == /*_.VALDATA___V729*/ meltfptr[728])
+ /*_.VALDATA___V729*/ meltfptr[728] = (void *) sy_OBRALLOBJ_LEN;
}
/*^getnamedsymbol */
@@ -30180,8 +30435,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBRALLOBJ_CLASSNAME =
meltgc_named_symbol ("OBRALLOBJ_CLASSNAME", MELT_GET);
- if (sy_OBRALLOBJ_CLASSNAME && NULL == /*_.VALDATA___V728*/ meltfptr[727])
- /*_.VALDATA___V728*/ meltfptr[727] = (void *) sy_OBRALLOBJ_CLASSNAME;
+ if (sy_OBRALLOBJ_CLASSNAME && NULL == /*_.VALDATA___V731*/ meltfptr[730])
+ /*_.VALDATA___V731*/ meltfptr[730] = (void *) sy_OBRALLOBJ_CLASSNAME;
}
/*^getnamedsymbol */
@@ -30190,8 +30445,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJNEWCLOSURE =
meltgc_named_symbol ("CLASS_OBJNEWCLOSURE", MELT_GET);
- if (sy_CLASS_OBJNEWCLOSURE && NULL == /*_.VALDATA___V730*/ meltfptr[729])
- /*_.VALDATA___V730*/ meltfptr[729] = (void *) sy_CLASS_OBJNEWCLOSURE;
+ if (sy_CLASS_OBJNEWCLOSURE && NULL == /*_.VALDATA___V733*/ meltfptr[732])
+ /*_.VALDATA___V733*/ meltfptr[732] = (void *) sy_CLASS_OBJNEWCLOSURE;
}
/*^getnamedsymbol */
@@ -30200,8 +30455,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBNCLO_DISCR =
meltgc_named_symbol ("OBNCLO_DISCR", MELT_GET);
- if (sy_OBNCLO_DISCR && NULL == /*_.VALDATA___V742*/ meltfptr[741])
- /*_.VALDATA___V742*/ meltfptr[741] = (void *) sy_OBNCLO_DISCR;
+ if (sy_OBNCLO_DISCR && NULL == /*_.VALDATA___V745*/ meltfptr[744])
+ /*_.VALDATA___V745*/ meltfptr[744] = (void *) sy_OBNCLO_DISCR;
}
/*^getnamedsymbol */
@@ -30209,8 +30464,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBNCLO_ROUT */
{
melt_ptr_t sy_OBNCLO_ROUT = meltgc_named_symbol ("OBNCLO_ROUT", MELT_GET);
- if (sy_OBNCLO_ROUT && NULL == /*_.VALDATA___V744*/ meltfptr[743])
- /*_.VALDATA___V744*/ meltfptr[743] = (void *) sy_OBNCLO_ROUT;
+ if (sy_OBNCLO_ROUT && NULL == /*_.VALDATA___V747*/ meltfptr[746])
+ /*_.VALDATA___V747*/ meltfptr[746] = (void *) sy_OBNCLO_ROUT;
}
/*^getnamedsymbol */
@@ -30218,8 +30473,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBNCLO_LEN */
{
melt_ptr_t sy_OBNCLO_LEN = meltgc_named_symbol ("OBNCLO_LEN", MELT_GET);
- if (sy_OBNCLO_LEN && NULL == /*_.VALDATA___V746*/ meltfptr[745])
- /*_.VALDATA___V746*/ meltfptr[745] = (void *) sy_OBNCLO_LEN;
+ if (sy_OBNCLO_LEN && NULL == /*_.VALDATA___V749*/ meltfptr[748])
+ /*_.VALDATA___V749*/ meltfptr[748] = (void *) sy_OBNCLO_LEN;
}
/*^getnamedsymbol */
@@ -30228,8 +30483,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTUPLE =
meltgc_named_symbol ("CLASS_OBJPUTUPLE", MELT_GET);
- if (sy_CLASS_OBJPUTUPLE && NULL == /*_.VALDATA___V748*/ meltfptr[747])
- /*_.VALDATA___V748*/ meltfptr[747] = (void *) sy_CLASS_OBJPUTUPLE;
+ if (sy_CLASS_OBJPUTUPLE && NULL == /*_.VALDATA___V751*/ meltfptr[750])
+ /*_.VALDATA___V751*/ meltfptr[750] = (void *) sy_CLASS_OBJPUTUPLE;
}
/*^getnamedsymbol */
@@ -30238,8 +30493,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPUTU_TUPLED =
meltgc_named_symbol ("OPUTU_TUPLED", MELT_GET);
- if (sy_OPUTU_TUPLED && NULL == /*_.VALDATA___V760*/ meltfptr[759])
- /*_.VALDATA___V760*/ meltfptr[759] = (void *) sy_OPUTU_TUPLED;
+ if (sy_OPUTU_TUPLED && NULL == /*_.VALDATA___V763*/ meltfptr[762])
+ /*_.VALDATA___V763*/ meltfptr[762] = (void *) sy_OPUTU_TUPLED;
}
/*^getnamedsymbol */
@@ -30248,8 +30503,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPUTU_OFFSET =
meltgc_named_symbol ("OPUTU_OFFSET", MELT_GET);
- if (sy_OPUTU_OFFSET && NULL == /*_.VALDATA___V762*/ meltfptr[761])
- /*_.VALDATA___V762*/ meltfptr[761] = (void *) sy_OPUTU_OFFSET;
+ if (sy_OPUTU_OFFSET && NULL == /*_.VALDATA___V765*/ meltfptr[764])
+ /*_.VALDATA___V765*/ meltfptr[764] = (void *) sy_OPUTU_OFFSET;
}
/*^getnamedsymbol */
@@ -30257,8 +30512,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTU_VALUE */
{
melt_ptr_t sy_OPUTU_VALUE = meltgc_named_symbol ("OPUTU_VALUE", MELT_GET);
- if (sy_OPUTU_VALUE && NULL == /*_.VALDATA___V764*/ meltfptr[763])
- /*_.VALDATA___V764*/ meltfptr[763] = (void *) sy_OPUTU_VALUE;
+ if (sy_OPUTU_VALUE && NULL == /*_.VALDATA___V767*/ meltfptr[766])
+ /*_.VALDATA___V767*/ meltfptr[766] = (void *) sy_OPUTU_VALUE;
}
/*^getnamedsymbol */
@@ -30267,8 +30522,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTPAIR =
meltgc_named_symbol ("CLASS_OBJPUTPAIR", MELT_GET);
- if (sy_CLASS_OBJPUTPAIR && NULL == /*_.VALDATA___V766*/ meltfptr[765])
- /*_.VALDATA___V766*/ meltfptr[765] = (void *) sy_CLASS_OBJPUTPAIR;
+ if (sy_CLASS_OBJPUTPAIR && NULL == /*_.VALDATA___V769*/ meltfptr[768])
+ /*_.VALDATA___V769*/ meltfptr[768] = (void *) sy_CLASS_OBJPUTPAIR;
}
/*^getnamedsymbol */
@@ -30276,8 +30531,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTP_PAIR */
{
melt_ptr_t sy_OPUTP_PAIR = meltgc_named_symbol ("OPUTP_PAIR", MELT_GET);
- if (sy_OPUTP_PAIR && NULL == /*_.VALDATA___V774*/ meltfptr[773])
- /*_.VALDATA___V774*/ meltfptr[773] = (void *) sy_OPUTP_PAIR;
+ if (sy_OPUTP_PAIR && NULL == /*_.VALDATA___V777*/ meltfptr[776])
+ /*_.VALDATA___V777*/ meltfptr[776] = (void *) sy_OPUTP_PAIR;
}
/*^getnamedsymbol */
@@ -30286,8 +30541,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTPAIRHEAD =
meltgc_named_symbol ("CLASS_OBJPUTPAIRHEAD", MELT_GET);
- if (sy_CLASS_OBJPUTPAIRHEAD && NULL == /*_.VALDATA___V776*/ meltfptr[775])
- /*_.VALDATA___V776*/ meltfptr[775] = (void *) sy_CLASS_OBJPUTPAIRHEAD;
+ if (sy_CLASS_OBJPUTPAIRHEAD && NULL == /*_.VALDATA___V779*/ meltfptr[778])
+ /*_.VALDATA___V779*/ meltfptr[778] = (void *) sy_CLASS_OBJPUTPAIRHEAD;
}
/*^getnamedsymbol */
@@ -30295,8 +30550,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTP_HEAD */
{
melt_ptr_t sy_OPUTP_HEAD = meltgc_named_symbol ("OPUTP_HEAD", MELT_GET);
- if (sy_OPUTP_HEAD && NULL == /*_.VALDATA___V784*/ meltfptr[783])
- /*_.VALDATA___V784*/ meltfptr[783] = (void *) sy_OPUTP_HEAD;
+ if (sy_OPUTP_HEAD && NULL == /*_.VALDATA___V787*/ meltfptr[786])
+ /*_.VALDATA___V787*/ meltfptr[786] = (void *) sy_OPUTP_HEAD;
}
/*^getnamedsymbol */
@@ -30305,8 +30560,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTPAIRTAIL =
meltgc_named_symbol ("CLASS_OBJPUTPAIRTAIL", MELT_GET);
- if (sy_CLASS_OBJPUTPAIRTAIL && NULL == /*_.VALDATA___V786*/ meltfptr[785])
- /*_.VALDATA___V786*/ meltfptr[785] = (void *) sy_CLASS_OBJPUTPAIRTAIL;
+ if (sy_CLASS_OBJPUTPAIRTAIL && NULL == /*_.VALDATA___V789*/ meltfptr[788])
+ /*_.VALDATA___V789*/ meltfptr[788] = (void *) sy_CLASS_OBJPUTPAIRTAIL;
}
/*^getnamedsymbol */
@@ -30314,8 +30569,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTP_TAIL */
{
melt_ptr_t sy_OPUTP_TAIL = meltgc_named_symbol ("OPUTP_TAIL", MELT_GET);
- if (sy_OPUTP_TAIL && NULL == /*_.VALDATA___V794*/ meltfptr[793])
- /*_.VALDATA___V794*/ meltfptr[793] = (void *) sy_OPUTP_TAIL;
+ if (sy_OPUTP_TAIL && NULL == /*_.VALDATA___V797*/ meltfptr[796])
+ /*_.VALDATA___V797*/ meltfptr[796] = (void *) sy_OPUTP_TAIL;
}
/*^getnamedsymbol */
@@ -30324,8 +30579,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTLIST =
meltgc_named_symbol ("CLASS_OBJPUTLIST", MELT_GET);
- if (sy_CLASS_OBJPUTLIST && NULL == /*_.VALDATA___V796*/ meltfptr[795])
- /*_.VALDATA___V796*/ meltfptr[795] = (void *) sy_CLASS_OBJPUTLIST;
+ if (sy_CLASS_OBJPUTLIST && NULL == /*_.VALDATA___V799*/ meltfptr[798])
+ /*_.VALDATA___V799*/ meltfptr[798] = (void *) sy_CLASS_OBJPUTLIST;
}
/*^getnamedsymbol */
@@ -30333,8 +30588,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTL_LIST */
{
melt_ptr_t sy_OPUTL_LIST = meltgc_named_symbol ("OPUTL_LIST", MELT_GET);
- if (sy_OPUTL_LIST && NULL == /*_.VALDATA___V808*/ meltfptr[807])
- /*_.VALDATA___V808*/ meltfptr[807] = (void *) sy_OPUTL_LIST;
+ if (sy_OPUTL_LIST && NULL == /*_.VALDATA___V811*/ meltfptr[810])
+ /*_.VALDATA___V811*/ meltfptr[810] = (void *) sy_OPUTL_LIST;
}
/*^getnamedsymbol */
@@ -30342,8 +30597,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTL_FIRST */
{
melt_ptr_t sy_OPUTL_FIRST = meltgc_named_symbol ("OPUTL_FIRST", MELT_GET);
- if (sy_OPUTL_FIRST && NULL == /*_.VALDATA___V810*/ meltfptr[809])
- /*_.VALDATA___V810*/ meltfptr[809] = (void *) sy_OPUTL_FIRST;
+ if (sy_OPUTL_FIRST && NULL == /*_.VALDATA___V813*/ meltfptr[812])
+ /*_.VALDATA___V813*/ meltfptr[812] = (void *) sy_OPUTL_FIRST;
}
/*^getnamedsymbol */
@@ -30351,8 +30606,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPUTL_LAST */
{
melt_ptr_t sy_OPUTL_LAST = meltgc_named_symbol ("OPUTL_LAST", MELT_GET);
- if (sy_OPUTL_LAST && NULL == /*_.VALDATA___V812*/ meltfptr[811])
- /*_.VALDATA___V812*/ meltfptr[811] = (void *) sy_OPUTL_LAST;
+ if (sy_OPUTL_LAST && NULL == /*_.VALDATA___V815*/ meltfptr[814])
+ /*_.VALDATA___V815*/ meltfptr[814] = (void *) sy_OPUTL_LAST;
}
/*^getnamedsymbol */
@@ -30361,8 +30616,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTSLOT =
meltgc_named_symbol ("CLASS_OBJPUTSLOT", MELT_GET);
- if (sy_CLASS_OBJPUTSLOT && NULL == /*_.VALDATA___V814*/ meltfptr[813])
- /*_.VALDATA___V814*/ meltfptr[813] = (void *) sy_CLASS_OBJPUTSLOT;
+ if (sy_CLASS_OBJPUTSLOT && NULL == /*_.VALDATA___V817*/ meltfptr[816])
+ /*_.VALDATA___V817*/ meltfptr[816] = (void *) sy_CLASS_OBJPUTSLOT;
}
/*^getnamedsymbol */
@@ -30370,8 +30625,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OSLOT_ODATA */
{
melt_ptr_t sy_OSLOT_ODATA = meltgc_named_symbol ("OSLOT_ODATA", MELT_GET);
- if (sy_OSLOT_ODATA && NULL == /*_.VALDATA___V828*/ meltfptr[827])
- /*_.VALDATA___V828*/ meltfptr[827] = (void *) sy_OSLOT_ODATA;
+ if (sy_OSLOT_ODATA && NULL == /*_.VALDATA___V831*/ meltfptr[830])
+ /*_.VALDATA___V831*/ meltfptr[830] = (void *) sy_OSLOT_ODATA;
}
/*^getnamedsymbol */
@@ -30380,8 +30635,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OSLOT_OFFSET =
meltgc_named_symbol ("OSLOT_OFFSET", MELT_GET);
- if (sy_OSLOT_OFFSET && NULL == /*_.VALDATA___V830*/ meltfptr[829])
- /*_.VALDATA___V830*/ meltfptr[829] = (void *) sy_OSLOT_OFFSET;
+ if (sy_OSLOT_OFFSET && NULL == /*_.VALDATA___V833*/ meltfptr[832])
+ /*_.VALDATA___V833*/ meltfptr[832] = (void *) sy_OSLOT_OFFSET;
}
/*^getnamedsymbol */
@@ -30389,8 +30644,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OSLOT_FIELD */
{
melt_ptr_t sy_OSLOT_FIELD = meltgc_named_symbol ("OSLOT_FIELD", MELT_GET);
- if (sy_OSLOT_FIELD && NULL == /*_.VALDATA___V832*/ meltfptr[831])
- /*_.VALDATA___V832*/ meltfptr[831] = (void *) sy_OSLOT_FIELD;
+ if (sy_OSLOT_FIELD && NULL == /*_.VALDATA___V835*/ meltfptr[834])
+ /*_.VALDATA___V835*/ meltfptr[834] = (void *) sy_OSLOT_FIELD;
}
/*^getnamedsymbol */
@@ -30398,8 +30653,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OSLOT_VALUE */
{
melt_ptr_t sy_OSLOT_VALUE = meltgc_named_symbol ("OSLOT_VALUE", MELT_GET);
- if (sy_OSLOT_VALUE && NULL == /*_.VALDATA___V834*/ meltfptr[833])
- /*_.VALDATA___V834*/ meltfptr[833] = (void *) sy_OSLOT_VALUE;
+ if (sy_OSLOT_VALUE && NULL == /*_.VALDATA___V837*/ meltfptr[836])
+ /*_.VALDATA___V837*/ meltfptr[836] = (void *) sy_OSLOT_VALUE;
}
/*^getnamedsymbol */
@@ -30408,8 +30663,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJGETSLOT =
meltgc_named_symbol ("CLASS_OBJGETSLOT", MELT_GET);
- if (sy_CLASS_OBJGETSLOT && NULL == /*_.VALDATA___V836*/ meltfptr[835])
- /*_.VALDATA___V836*/ meltfptr[835] = (void *) sy_CLASS_OBJGETSLOT;
+ if (sy_CLASS_OBJGETSLOT && NULL == /*_.VALDATA___V839*/ meltfptr[838])
+ /*_.VALDATA___V839*/ meltfptr[838] = (void *) sy_CLASS_OBJGETSLOT;
}
/*^getnamedsymbol */
@@ -30417,8 +30672,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OGETSL_OBJ */
{
melt_ptr_t sy_OGETSL_OBJ = meltgc_named_symbol ("OGETSL_OBJ", MELT_GET);
- if (sy_OGETSL_OBJ && NULL == /*_.VALDATA___V846*/ meltfptr[845])
- /*_.VALDATA___V846*/ meltfptr[845] = (void *) sy_OGETSL_OBJ;
+ if (sy_OGETSL_OBJ && NULL == /*_.VALDATA___V849*/ meltfptr[848])
+ /*_.VALDATA___V849*/ meltfptr[848] = (void *) sy_OGETSL_OBJ;
}
/*^getnamedsymbol */
@@ -30427,8 +30682,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OGETSL_FIELD =
meltgc_named_symbol ("OGETSL_FIELD", MELT_GET);
- if (sy_OGETSL_FIELD && NULL == /*_.VALDATA___V848*/ meltfptr[847])
- /*_.VALDATA___V848*/ meltfptr[847] = (void *) sy_OGETSL_FIELD;
+ if (sy_OGETSL_FIELD && NULL == /*_.VALDATA___V851*/ meltfptr[850])
+ /*_.VALDATA___V851*/ meltfptr[850] = (void *) sy_OGETSL_FIELD;
}
/*^getnamedsymbol */
@@ -30438,8 +30693,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJPUTCLOSUROUT =
meltgc_named_symbol ("CLASS_OBJPUTCLOSUROUT", MELT_GET);
if (sy_CLASS_OBJPUTCLOSUROUT
- && NULL == /*_.VALDATA___V850*/ meltfptr[849])
- /*_.VALDATA___V850*/ meltfptr[849] = (void *) sy_CLASS_OBJPUTCLOSUROUT;
+ && NULL == /*_.VALDATA___V853*/ meltfptr[852])
+ /*_.VALDATA___V853*/ meltfptr[852] = (void *) sy_CLASS_OBJPUTCLOSUROUT;
}
/*^getnamedsymbol */
@@ -30447,8 +30702,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPCLOR_CLOS */
{
melt_ptr_t sy_OPCLOR_CLOS = meltgc_named_symbol ("OPCLOR_CLOS", MELT_GET);
- if (sy_OPCLOR_CLOS && NULL == /*_.VALDATA___V860*/ meltfptr[859])
- /*_.VALDATA___V860*/ meltfptr[859] = (void *) sy_OPCLOR_CLOS;
+ if (sy_OPCLOR_CLOS && NULL == /*_.VALDATA___V863*/ meltfptr[862])
+ /*_.VALDATA___V863*/ meltfptr[862] = (void *) sy_OPCLOR_CLOS;
}
/*^getnamedsymbol */
@@ -30456,8 +30711,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPCLOR_ROUT */
{
melt_ptr_t sy_OPCLOR_ROUT = meltgc_named_symbol ("OPCLOR_ROUT", MELT_GET);
- if (sy_OPCLOR_ROUT && NULL == /*_.VALDATA___V862*/ meltfptr[861])
- /*_.VALDATA___V862*/ meltfptr[861] = (void *) sy_OPCLOR_ROUT;
+ if (sy_OPCLOR_ROUT && NULL == /*_.VALDATA___V865*/ meltfptr[864])
+ /*_.VALDATA___V865*/ meltfptr[864] = (void *) sy_OPCLOR_ROUT;
}
/*^getnamedsymbol */
@@ -30466,8 +30721,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJPUTCLOSEDV =
meltgc_named_symbol ("CLASS_OBJPUTCLOSEDV", MELT_GET);
- if (sy_CLASS_OBJPUTCLOSEDV && NULL == /*_.VALDATA___V864*/ meltfptr[863])
- /*_.VALDATA___V864*/ meltfptr[863] = (void *) sy_CLASS_OBJPUTCLOSEDV;
+ if (sy_CLASS_OBJPUTCLOSEDV && NULL == /*_.VALDATA___V867*/ meltfptr[866])
+ /*_.VALDATA___V867*/ meltfptr[866] = (void *) sy_CLASS_OBJPUTCLOSEDV;
}
/*^getnamedsymbol */
@@ -30475,8 +30730,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPCLOV_CLOS */
{
melt_ptr_t sy_OPCLOV_CLOS = meltgc_named_symbol ("OPCLOV_CLOS", MELT_GET);
- if (sy_OPCLOV_CLOS && NULL == /*_.VALDATA___V876*/ meltfptr[875])
- /*_.VALDATA___V876*/ meltfptr[875] = (void *) sy_OPCLOV_CLOS;
+ if (sy_OPCLOV_CLOS && NULL == /*_.VALDATA___V879*/ meltfptr[878])
+ /*_.VALDATA___V879*/ meltfptr[878] = (void *) sy_OPCLOV_CLOS;
}
/*^getnamedsymbol */
@@ -30484,8 +30739,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPCLOV_OFF */
{
melt_ptr_t sy_OPCLOV_OFF = meltgc_named_symbol ("OPCLOV_OFF", MELT_GET);
- if (sy_OPCLOV_OFF && NULL == /*_.VALDATA___V878*/ meltfptr[877])
- /*_.VALDATA___V878*/ meltfptr[877] = (void *) sy_OPCLOV_OFF;
+ if (sy_OPCLOV_OFF && NULL == /*_.VALDATA___V881*/ meltfptr[880])
+ /*_.VALDATA___V881*/ meltfptr[880] = (void *) sy_OPCLOV_OFF;
}
/*^getnamedsymbol */
@@ -30493,8 +30748,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPCLOV_CVAL */
{
melt_ptr_t sy_OPCLOV_CVAL = meltgc_named_symbol ("OPCLOV_CVAL", MELT_GET);
- if (sy_OPCLOV_CVAL && NULL == /*_.VALDATA___V880*/ meltfptr[879])
- /*_.VALDATA___V880*/ meltfptr[879] = (void *) sy_OPCLOV_CVAL;
+ if (sy_OPCLOV_CVAL && NULL == /*_.VALDATA___V883*/ meltfptr[882])
+ /*_.VALDATA___V883*/ meltfptr[882] = (void *) sy_OPCLOV_CVAL;
}
/*^getnamedsymbol */
@@ -30504,8 +30759,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJPUTCLOSEDNOTNULLV =
meltgc_named_symbol ("CLASS_OBJPUTCLOSEDNOTNULLV", MELT_GET);
if (sy_CLASS_OBJPUTCLOSEDNOTNULLV
- && NULL == /*_.VALDATA___V882*/ meltfptr[881])
- /*_.VALDATA___V882*/ meltfptr[881] =
+ && NULL == /*_.VALDATA___V885*/ meltfptr[884])
+ /*_.VALDATA___V885*/ meltfptr[884] =
(void *) sy_CLASS_OBJPUTCLOSEDNOTNULLV;
}
@@ -30516,8 +30771,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJPUTROUTCONST =
meltgc_named_symbol ("CLASS_OBJPUTROUTCONST", MELT_GET);
if (sy_CLASS_OBJPUTROUTCONST
- && NULL == /*_.VALDATA___V888*/ meltfptr[887])
- /*_.VALDATA___V888*/ meltfptr[887] = (void *) sy_CLASS_OBJPUTROUTCONST;
+ && NULL == /*_.VALDATA___V891*/ meltfptr[890])
+ /*_.VALDATA___V891*/ meltfptr[890] = (void *) sy_CLASS_OBJPUTROUTCONST;
}
/*^getnamedsymbol */
@@ -30526,8 +30781,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPRCONST_ROUT =
meltgc_named_symbol ("OPRCONST_ROUT", MELT_GET);
- if (sy_OPRCONST_ROUT && NULL == /*_.VALDATA___V900*/ meltfptr[899])
- /*_.VALDATA___V900*/ meltfptr[899] = (void *) sy_OPRCONST_ROUT;
+ if (sy_OPRCONST_ROUT && NULL == /*_.VALDATA___V903*/ meltfptr[902])
+ /*_.VALDATA___V903*/ meltfptr[902] = (void *) sy_OPRCONST_ROUT;
}
/*^getnamedsymbol */
@@ -30536,8 +30791,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPRCONST_OFF =
meltgc_named_symbol ("OPRCONST_OFF", MELT_GET);
- if (sy_OPRCONST_OFF && NULL == /*_.VALDATA___V902*/ meltfptr[901])
- /*_.VALDATA___V902*/ meltfptr[901] = (void *) sy_OPRCONST_OFF;
+ if (sy_OPRCONST_OFF && NULL == /*_.VALDATA___V905*/ meltfptr[904])
+ /*_.VALDATA___V905*/ meltfptr[904] = (void *) sy_OPRCONST_OFF;
}
/*^getnamedsymbol */
@@ -30546,8 +30801,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPRCONST_CVAL =
meltgc_named_symbol ("OPRCONST_CVAL", MELT_GET);
- if (sy_OPRCONST_CVAL && NULL == /*_.VALDATA___V904*/ meltfptr[903])
- /*_.VALDATA___V904*/ meltfptr[903] = (void *) sy_OPRCONST_CVAL;
+ if (sy_OPRCONST_CVAL && NULL == /*_.VALDATA___V907*/ meltfptr[906])
+ /*_.VALDATA___V907*/ meltfptr[906] = (void *) sy_OPRCONST_CVAL;
}
/*^getnamedsymbol */
@@ -30557,8 +30812,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_OBJPUTROUTCONSTNOTNULL =
meltgc_named_symbol ("CLASS_OBJPUTROUTCONSTNOTNULL", MELT_GET);
if (sy_CLASS_OBJPUTROUTCONSTNOTNULL
- && NULL == /*_.VALDATA___V906*/ meltfptr[905])
- /*_.VALDATA___V906*/ meltfptr[905] =
+ && NULL == /*_.VALDATA___V909*/ meltfptr[908])
+ /*_.VALDATA___V909*/ meltfptr[908] =
(void *) sy_CLASS_OBJPUTROUTCONSTNOTNULL;
}
@@ -30568,8 +30823,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJTOUCH =
meltgc_named_symbol ("CLASS_OBJTOUCH", MELT_GET);
- if (sy_CLASS_OBJTOUCH && NULL == /*_.VALDATA___V912*/ meltfptr[911])
- /*_.VALDATA___V912*/ meltfptr[911] = (void *) sy_CLASS_OBJTOUCH;
+ if (sy_CLASS_OBJTOUCH && NULL == /*_.VALDATA___V915*/ meltfptr[914])
+ /*_.VALDATA___V915*/ meltfptr[914] = (void *) sy_CLASS_OBJTOUCH;
}
/*^getnamedsymbol */
@@ -30577,8 +30832,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OTOUCH_VAL */
{
melt_ptr_t sy_OTOUCH_VAL = meltgc_named_symbol ("OTOUCH_VAL", MELT_GET);
- if (sy_OTOUCH_VAL && NULL == /*_.VALDATA___V922*/ meltfptr[921])
- /*_.VALDATA___V922*/ meltfptr[921] = (void *) sy_OTOUCH_VAL;
+ if (sy_OTOUCH_VAL && NULL == /*_.VALDATA___V925*/ meltfptr[924])
+ /*_.VALDATA___V925*/ meltfptr[924] = (void *) sy_OTOUCH_VAL;
}
/*^getnamedsymbol */
@@ -30587,8 +30842,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OTOUCH_COMMENT =
meltgc_named_symbol ("OTOUCH_COMMENT", MELT_GET);
- if (sy_OTOUCH_COMMENT && NULL == /*_.VALDATA___V924*/ meltfptr[923])
- /*_.VALDATA___V924*/ meltfptr[923] = (void *) sy_OTOUCH_COMMENT;
+ if (sy_OTOUCH_COMMENT && NULL == /*_.VALDATA___V927*/ meltfptr[926])
+ /*_.VALDATA___V927*/ meltfptr[926] = (void *) sy_OTOUCH_COMMENT;
}
/*^getnamedsymbol */
@@ -30597,8 +30852,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJSETPREDEF =
meltgc_named_symbol ("CLASS_OBJSETPREDEF", MELT_GET);
- if (sy_CLASS_OBJSETPREDEF && NULL == /*_.VALDATA___V926*/ meltfptr[925])
- /*_.VALDATA___V926*/ meltfptr[925] = (void *) sy_CLASS_OBJSETPREDEF;
+ if (sy_CLASS_OBJSETPREDEF && NULL == /*_.VALDATA___V929*/ meltfptr[928])
+ /*_.VALDATA___V929*/ meltfptr[928] = (void *) sy_CLASS_OBJSETPREDEF;
}
/*^getnamedsymbol */
@@ -30606,8 +30861,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OSPR_OBJECT */
{
melt_ptr_t sy_OSPR_OBJECT = meltgc_named_symbol ("OSPR_OBJECT", MELT_GET);
- if (sy_OSPR_OBJECT && NULL == /*_.VALDATA___V936*/ meltfptr[935])
- /*_.VALDATA___V936*/ meltfptr[935] = (void *) sy_OSPR_OBJECT;
+ if (sy_OSPR_OBJECT && NULL == /*_.VALDATA___V939*/ meltfptr[938])
+ /*_.VALDATA___V939*/ meltfptr[938] = (void *) sy_OSPR_OBJECT;
}
/*^getnamedsymbol */
@@ -30615,8 +30870,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OSPR_PREDEF */
{
melt_ptr_t sy_OSPR_PREDEF = meltgc_named_symbol ("OSPR_PREDEF", MELT_GET);
- if (sy_OSPR_PREDEF && NULL == /*_.VALDATA___V938*/ meltfptr[937])
- /*_.VALDATA___V938*/ meltfptr[937] = (void *) sy_OSPR_PREDEF;
+ if (sy_OSPR_PREDEF && NULL == /*_.VALDATA___V941*/ meltfptr[940])
+ /*_.VALDATA___V941*/ meltfptr[940] = (void *) sy_OSPR_PREDEF;
}
/*^getnamedsymbol */
@@ -30625,8 +30880,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ROUTINEOBJ =
meltgc_named_symbol ("CLASS_ROUTINEOBJ", MELT_GET);
- if (sy_CLASS_ROUTINEOBJ && NULL == /*_.VALDATA___V940*/ meltfptr[939])
- /*_.VALDATA___V940*/ meltfptr[939] = (void *) sy_CLASS_ROUTINEOBJ;
+ if (sy_CLASS_ROUTINEOBJ && NULL == /*_.VALDATA___V943*/ meltfptr[942])
+ /*_.VALDATA___V943*/ meltfptr[942] = (void *) sy_CLASS_ROUTINEOBJ;
}
/*^getnamedsymbol */
@@ -30634,8 +30889,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_NAMED */
{
melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol ("CLASS_NAMED", MELT_GET);
- if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V942*/ meltfptr[941])
- /*_.VALDATA___V942*/ meltfptr[941] = (void *) sy_CLASS_NAMED;
+ if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V945*/ meltfptr[944])
+ /*_.VALDATA___V945*/ meltfptr[944] = (void *) sy_CLASS_NAMED;
}
/*^getnamedsymbol */
@@ -30643,8 +30898,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBROUT_PROC */
{
melt_ptr_t sy_OBROUT_PROC = meltgc_named_symbol ("OBROUT_PROC", MELT_GET);
- if (sy_OBROUT_PROC && NULL == /*_.VALDATA___V964*/ meltfptr[963])
- /*_.VALDATA___V964*/ meltfptr[963] = (void *) sy_OBROUT_PROC;
+ if (sy_OBROUT_PROC && NULL == /*_.VALDATA___V967*/ meltfptr[966])
+ /*_.VALDATA___V967*/ meltfptr[966] = (void *) sy_OBROUT_PROC;
}
/*^getnamedsymbol */
@@ -30652,8 +30907,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBROUT_BODY */
{
melt_ptr_t sy_OBROUT_BODY = meltgc_named_symbol ("OBROUT_BODY", MELT_GET);
- if (sy_OBROUT_BODY && NULL == /*_.VALDATA___V966*/ meltfptr[965])
- /*_.VALDATA___V966*/ meltfptr[965] = (void *) sy_OBROUT_BODY;
+ if (sy_OBROUT_BODY && NULL == /*_.VALDATA___V969*/ meltfptr[968])
+ /*_.VALDATA___V969*/ meltfptr[968] = (void *) sy_OBROUT_BODY;
}
/*^getnamedsymbol */
@@ -30662,8 +30917,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_NBVAL =
meltgc_named_symbol ("OBROUT_NBVAL", MELT_GET);
- if (sy_OBROUT_NBVAL && NULL == /*_.VALDATA___V968*/ meltfptr[967])
- /*_.VALDATA___V968*/ meltfptr[967] = (void *) sy_OBROUT_NBVAL;
+ if (sy_OBROUT_NBVAL && NULL == /*_.VALDATA___V971*/ meltfptr[970])
+ /*_.VALDATA___V971*/ meltfptr[970] = (void *) sy_OBROUT_NBVAL;
}
/*^getnamedsymbol */
@@ -30672,8 +30927,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_NBLONG =
meltgc_named_symbol ("OBROUT_NBLONG", MELT_GET);
- if (sy_OBROUT_NBLONG && NULL == /*_.VALDATA___V970*/ meltfptr[969])
- /*_.VALDATA___V970*/ meltfptr[969] = (void *) sy_OBROUT_NBLONG;
+ if (sy_OBROUT_NBLONG && NULL == /*_.VALDATA___V973*/ meltfptr[972])
+ /*_.VALDATA___V973*/ meltfptr[972] = (void *) sy_OBROUT_NBLONG;
}
/*^getnamedsymbol */
@@ -30682,8 +30937,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_OTHERS =
meltgc_named_symbol ("OBROUT_OTHERS", MELT_GET);
- if (sy_OBROUT_OTHERS && NULL == /*_.VALDATA___V972*/ meltfptr[971])
- /*_.VALDATA___V972*/ meltfptr[971] = (void *) sy_OBROUT_OTHERS;
+ if (sy_OBROUT_OTHERS && NULL == /*_.VALDATA___V975*/ meltfptr[974])
+ /*_.VALDATA___V975*/ meltfptr[974] = (void *) sy_OBROUT_OTHERS;
}
/*^getnamedsymbol */
@@ -30692,8 +30947,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_RETVAL =
meltgc_named_symbol ("OBROUT_RETVAL", MELT_GET);
- if (sy_OBROUT_RETVAL && NULL == /*_.VALDATA___V974*/ meltfptr[973])
- /*_.VALDATA___V974*/ meltfptr[973] = (void *) sy_OBROUT_RETVAL;
+ if (sy_OBROUT_RETVAL && NULL == /*_.VALDATA___V977*/ meltfptr[976])
+ /*_.VALDATA___V977*/ meltfptr[976] = (void *) sy_OBROUT_RETVAL;
}
/*^getnamedsymbol */
@@ -30702,8 +30957,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_CNTCITER =
meltgc_named_symbol ("OBROUT_CNTCITER", MELT_GET);
- if (sy_OBROUT_CNTCITER && NULL == /*_.VALDATA___V976*/ meltfptr[975])
- /*_.VALDATA___V976*/ meltfptr[975] = (void *) sy_OBROUT_CNTCITER;
+ if (sy_OBROUT_CNTCITER && NULL == /*_.VALDATA___V979*/ meltfptr[978])
+ /*_.VALDATA___V979*/ meltfptr[978] = (void *) sy_OBROUT_CNTCITER;
}
/*^getnamedsymbol */
@@ -30712,8 +30967,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OBROUT_CNTLETREC =
meltgc_named_symbol ("OBROUT_CNTLETREC", MELT_GET);
- if (sy_OBROUT_CNTLETREC && NULL == /*_.VALDATA___V978*/ meltfptr[977])
- /*_.VALDATA___V978*/ meltfptr[977] = (void *) sy_OBROUT_CNTLETREC;
+ if (sy_OBROUT_CNTLETREC && NULL == /*_.VALDATA___V981*/ meltfptr[980])
+ /*_.VALDATA___V981*/ meltfptr[980] = (void *) sy_OBROUT_CNTLETREC;
}
/*^getnamedsymbol */
@@ -30722,8 +30977,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_PROCROUTINEOBJ =
meltgc_named_symbol ("CLASS_PROCROUTINEOBJ", MELT_GET);
- if (sy_CLASS_PROCROUTINEOBJ && NULL == /*_.VALDATA___V980*/ meltfptr[979])
- /*_.VALDATA___V980*/ meltfptr[979] = (void *) sy_CLASS_PROCROUTINEOBJ;
+ if (sy_CLASS_PROCROUTINEOBJ && NULL == /*_.VALDATA___V983*/ meltfptr[982])
+ /*_.VALDATA___V983*/ meltfptr[982] = (void *) sy_CLASS_PROCROUTINEOBJ;
}
/*^getnamedsymbol */
@@ -30732,8 +30987,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPROUT_GETARGS =
meltgc_named_symbol ("OPROUT_GETARGS", MELT_GET);
- if (sy_OPROUT_GETARGS && NULL == /*_.VALDATA___V996*/ meltfptr[995])
- /*_.VALDATA___V996*/ meltfptr[995] = (void *) sy_OPROUT_GETARGS;
+ if (sy_OPROUT_GETARGS && NULL == /*_.VALDATA___V999*/ meltfptr[998])
+ /*_.VALDATA___V999*/ meltfptr[998] = (void *) sy_OPROUT_GETARGS;
}
/*^getnamedsymbol */
@@ -30741,8 +30996,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OPROUT_LOC */
{
melt_ptr_t sy_OPROUT_LOC = meltgc_named_symbol ("OPROUT_LOC", MELT_GET);
- if (sy_OPROUT_LOC && NULL == /*_.VALDATA___V998*/ meltfptr[997])
- /*_.VALDATA___V998*/ meltfptr[997] = (void *) sy_OPROUT_LOC;
+ if (sy_OPROUT_LOC && NULL == /*_.VALDATA___V1001*/ meltfptr[1000])
+ /*_.VALDATA___V1001*/ meltfptr[1000] = (void *) sy_OPROUT_LOC;
}
/*^getnamedsymbol */
@@ -30751,8 +31006,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPROUT_FUNAM =
meltgc_named_symbol ("OPROUT_FUNAM", MELT_GET);
- if (sy_OPROUT_FUNAM && NULL == /*_.VALDATA___V1000*/ meltfptr[999])
- /*_.VALDATA___V1000*/ meltfptr[999] = (void *) sy_OPROUT_FUNAM;
+ if (sy_OPROUT_FUNAM && NULL == /*_.VALDATA___V1003*/ meltfptr[1002])
+ /*_.VALDATA___V1003*/ meltfptr[1002] = (void *) sy_OPROUT_FUNAM;
}
/*^getnamedsymbol */
@@ -30761,8 +31016,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPROUT_RESTNAM =
meltgc_named_symbol ("OPROUT_RESTNAM", MELT_GET);
- if (sy_OPROUT_RESTNAM && NULL == /*_.VALDATA___V1002*/ meltfptr[1001])
- /*_.VALDATA___V1002*/ meltfptr[1001] = (void *) sy_OPROUT_RESTNAM;
+ if (sy_OPROUT_RESTNAM && NULL == /*_.VALDATA___V1005*/ meltfptr[1004])
+ /*_.VALDATA___V1005*/ meltfptr[1004] = (void *) sy_OPROUT_RESTNAM;
}
/*^getnamedsymbol */
@@ -30771,8 +31026,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OPROUT_FILENUM =
meltgc_named_symbol ("OPROUT_FILENUM", MELT_GET);
- if (sy_OPROUT_FILENUM && NULL == /*_.VALDATA___V1004*/ meltfptr[1003])
- /*_.VALDATA___V1004*/ meltfptr[1003] = (void *) sy_OPROUT_FILENUM;
+ if (sy_OPROUT_FILENUM && NULL == /*_.VALDATA___V1007*/ meltfptr[1006])
+ /*_.VALDATA___V1007*/ meltfptr[1006] = (void *) sy_OPROUT_FILENUM;
}
/*^getnamedsymbol */
@@ -30782,8 +31037,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_INITIALROUTINEOBJ =
meltgc_named_symbol ("CLASS_INITIALROUTINEOBJ", MELT_GET);
if (sy_CLASS_INITIALROUTINEOBJ
- && NULL == /*_.VALDATA___V1006*/ meltfptr[1005])
- /*_.VALDATA___V1006*/ meltfptr[1005] =
+ && NULL == /*_.VALDATA___V1009*/ meltfptr[1008])
+ /*_.VALDATA___V1009*/ meltfptr[1008] =
(void *) sy_CLASS_INITIALROUTINEOBJ;
}
@@ -30792,8 +31047,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIROUT_DATA */
{
melt_ptr_t sy_OIROUT_DATA = meltgc_named_symbol ("OIROUT_DATA", MELT_GET);
- if (sy_OIROUT_DATA && NULL == /*_.VALDATA___V1020*/ meltfptr[1019])
- /*_.VALDATA___V1020*/ meltfptr[1019] = (void *) sy_OIROUT_DATA;
+ if (sy_OIROUT_DATA && NULL == /*_.VALDATA___V1023*/ meltfptr[1022])
+ /*_.VALDATA___V1023*/ meltfptr[1022] = (void *) sy_OIROUT_DATA;
}
/*^getnamedsymbol */
@@ -30802,8 +31057,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OIROUT_PROLOG =
meltgc_named_symbol ("OIROUT_PROLOG", MELT_GET);
- if (sy_OIROUT_PROLOG && NULL == /*_.VALDATA___V1022*/ meltfptr[1021])
- /*_.VALDATA___V1022*/ meltfptr[1021] = (void *) sy_OIROUT_PROLOG;
+ if (sy_OIROUT_PROLOG && NULL == /*_.VALDATA___V1025*/ meltfptr[1024])
+ /*_.VALDATA___V1025*/ meltfptr[1024] = (void *) sy_OIROUT_PROLOG;
}
/*^getnamedsymbol */
@@ -30811,8 +31066,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OIROUT_FILL */
{
melt_ptr_t sy_OIROUT_FILL = meltgc_named_symbol ("OIROUT_FILL", MELT_GET);
- if (sy_OIROUT_FILL && NULL == /*_.VALDATA___V1024*/ meltfptr[1023])
- /*_.VALDATA___V1024*/ meltfptr[1023] = (void *) sy_OIROUT_FILL;
+ if (sy_OIROUT_FILL && NULL == /*_.VALDATA___V1027*/ meltfptr[1026])
+ /*_.VALDATA___V1027*/ meltfptr[1026] = (void *) sy_OIROUT_FILL;
}
/*^getnamedsymbol */
@@ -30821,8 +31076,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OIROUT_MODULENAME =
meltgc_named_symbol ("OIROUT_MODULENAME", MELT_GET);
- if (sy_OIROUT_MODULENAME && NULL == /*_.VALDATA___V1026*/ meltfptr[1025])
- /*_.VALDATA___V1026*/ meltfptr[1025] = (void *) sy_OIROUT_MODULENAME;
+ if (sy_OIROUT_MODULENAME && NULL == /*_.VALDATA___V1029*/ meltfptr[1028])
+ /*_.VALDATA___V1029*/ meltfptr[1028] = (void *) sy_OIROUT_MODULENAME;
}
/*^getnamedsymbol */
@@ -30831,8 +31086,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_OBJBLOCK =
meltgc_named_symbol ("CLASS_OBJBLOCK", MELT_GET);
- if (sy_CLASS_OBJBLOCK && NULL == /*_.VALDATA___V1028*/ meltfptr[1027])
- /*_.VALDATA___V1028*/ meltfptr[1027] = (void *) sy_CLASS_OBJBLOCK;
+ if (sy_CLASS_OBJBLOCK && NULL == /*_.VALDATA___V1031*/ meltfptr[1030])
+ /*_.VALDATA___V1031*/ meltfptr[1030] = (void *) sy_CLASS_OBJBLOCK;
}
/*^getnamedsymbol */
@@ -30841,8 +31096,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MELT_DEBUG_FUN =
meltgc_named_symbol ("MELT_DEBUG_FUN", MELT_GET);
- if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V1032*/ meltfptr[1031])
- /*_.VALDATA___V1032*/ meltfptr[1031] = (void *) sy_MELT_DEBUG_FUN;
+ if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V1035*/ meltfptr[1034])
+ /*_.VALDATA___V1035*/ meltfptr[1034] = (void *) sy_MELT_DEBUG_FUN;
}
/*^getnamedsymbol */
@@ -30852,8 +31107,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_MIXED_LOCATION =
meltgc_named_symbol ("DISCR_MIXED_LOCATION", MELT_GET);
if (sy_DISCR_MIXED_LOCATION
- && NULL == /*_.VALDATA___V1034*/ meltfptr[1033])
- /*_.VALDATA___V1034*/ meltfptr[1033] = (void *) sy_DISCR_MIXED_LOCATION;
+ && NULL == /*_.VALDATA___V1037*/ meltfptr[1036])
+ /*_.VALDATA___V1037*/ meltfptr[1036] = (void *) sy_DISCR_MIXED_LOCATION;
}
/*^getnamedsymbol */
@@ -30861,8 +31116,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_CTYPE */
{
melt_ptr_t sy_CLASS_CTYPE = meltgc_named_symbol ("CLASS_CTYPE", MELT_GET);
- if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V1036*/ meltfptr[1035])
- /*_.VALDATA___V1036*/ meltfptr[1035] = (void *) sy_CLASS_CTYPE;
+ if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V1039*/ meltfptr[1038])
+ /*_.VALDATA___V1039*/ meltfptr[1038] = (void *) sy_CLASS_CTYPE;
}
/*^getnamedsymbol */
@@ -30870,8 +31125,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DISCR_LIST */
{
melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET);
- if (sy_DISCR_LIST && NULL == /*_.VALDATA___V1038*/ meltfptr[1037])
- /*_.VALDATA___V1038*/ meltfptr[1037] = (void *) sy_DISCR_LIST;
+ if (sy_DISCR_LIST && NULL == /*_.VALDATA___V1041*/ meltfptr[1040])
+ /*_.VALDATA___V1041*/ meltfptr[1040] = (void *) sy_DISCR_LIST;
}
/*^getnamedsymbol */
@@ -30881,8 +31136,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_CONSTANT_INTEGER =
meltgc_named_symbol ("DISCR_CONSTANT_INTEGER", MELT_GET);
if (sy_DISCR_CONSTANT_INTEGER
- && NULL == /*_.VALDATA___V1040*/ meltfptr[1039])
- /*_.VALDATA___V1040*/ meltfptr[1039] =
+ && NULL == /*_.VALDATA___V1043*/ meltfptr[1042])
+ /*_.VALDATA___V1043*/ meltfptr[1042] =
(void *) sy_DISCR_CONSTANT_INTEGER;
}
@@ -30893,8 +31148,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_VERBATIM_STRING =
meltgc_named_symbol ("DISCR_VERBATIM_STRING", MELT_GET);
if (sy_DISCR_VERBATIM_STRING
- && NULL == /*_.VALDATA___V1042*/ meltfptr[1041])
- /*_.VALDATA___V1042*/ meltfptr[1041] =
+ && NULL == /*_.VALDATA___V1045*/ meltfptr[1044])
+ /*_.VALDATA___V1045*/ meltfptr[1044] =
(void *) sy_DISCR_VERBATIM_STRING;
}
@@ -30904,8 +31159,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_LIST_APPEND2LIST =
meltgc_named_symbol ("LIST_APPEND2LIST", MELT_GET);
- if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V1044*/ meltfptr[1043])
- /*_.VALDATA___V1044*/ meltfptr[1043] = (void *) sy_LIST_APPEND2LIST;
+ if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V1047*/ meltfptr[1046])
+ /*_.VALDATA___V1047*/ meltfptr[1046] = (void *) sy_LIST_APPEND2LIST;
}
/*^getnamedsymbol */
@@ -30914,8 +31169,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_LIST_TO_MULTIPLE =
meltgc_named_symbol ("LIST_TO_MULTIPLE", MELT_GET);
- if (sy_LIST_TO_MULTIPLE && NULL == /*_.VALDATA___V1046*/ meltfptr[1045])
- /*_.VALDATA___V1046*/ meltfptr[1045] = (void *) sy_LIST_TO_MULTIPLE;
+ if (sy_LIST_TO_MULTIPLE && NULL == /*_.VALDATA___V1049*/ meltfptr[1048])
+ /*_.VALDATA___V1049*/ meltfptr[1048] = (void *) sy_LIST_TO_MULTIPLE;
}
/*^getnamedsymbol */
@@ -30924,8 +31179,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MULTIPLE =
meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET);
- if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V1048*/ meltfptr[1047])
- /*_.VALDATA___V1048*/ meltfptr[1047] = (void *) sy_DISCR_MULTIPLE;
+ if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V1051*/ meltfptr[1050])
+ /*_.VALDATA___V1051*/ meltfptr[1050] = (void *) sy_DISCR_MULTIPLE;
}
/*^getnamedsymbol */
@@ -30934,8 +31189,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OUTPUT_C_DECLINIT =
meltgc_named_symbol ("OUTPUT_C_DECLINIT", MELT_GET);
- if (sy_OUTPUT_C_DECLINIT && NULL == /*_.VALDATA___V1052*/ meltfptr[1051])
- /*_.VALDATA___V1052*/ meltfptr[1051] = (void *) sy_OUTPUT_C_DECLINIT;
+ if (sy_OUTPUT_C_DECLINIT && NULL == /*_.VALDATA___V1055*/ meltfptr[1054])
+ /*_.VALDATA___V1055*/ meltfptr[1054] = (void *) sy_OUTPUT_C_DECLINIT;
}
/*^getnamedsymbol */
@@ -30944,8 +31199,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SELECTOR =
meltgc_named_symbol ("CLASS_SELECTOR", MELT_GET);
- if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V1054*/ meltfptr[1053])
- /*_.VALDATA___V1054*/ meltfptr[1053] = (void *) sy_CLASS_SELECTOR;
+ if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V1057*/ meltfptr[1056])
+ /*_.VALDATA___V1057*/ meltfptr[1056] = (void *) sy_CLASS_SELECTOR;
}
/*^getnamedsymbol */
@@ -30953,8 +31208,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:RECV */
{
melt_ptr_t sy_RECV = meltgc_named_symbol ("RECV", MELT_GET);
- if (sy_RECV && NULL == /*_.VALDATA___V1056*/ meltfptr[1055])
- /*_.VALDATA___V1056*/ meltfptr[1055] = (void *) sy_RECV;
+ if (sy_RECV && NULL == /*_.VALDATA___V1059*/ meltfptr[1058])
+ /*_.VALDATA___V1059*/ meltfptr[1058] = (void *) sy_RECV;
}
/*^getnamedsymbol */
@@ -30962,8 +31217,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:SBUF */
{
melt_ptr_t sy_SBUF = meltgc_named_symbol ("SBUF", MELT_GET);
- if (sy_SBUF && NULL == /*_.VALDATA___V1059*/ meltfptr[1058])
- /*_.VALDATA___V1059*/ meltfptr[1058] = (void *) sy_SBUF;
+ if (sy_SBUF && NULL == /*_.VALDATA___V1062*/ meltfptr[1061])
+ /*_.VALDATA___V1062*/ meltfptr[1061] = (void *) sy_SBUF;
}
/*^getnamedsymbol */
@@ -30971,8 +31226,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PUT_OBJDEST */
{
melt_ptr_t sy_PUT_OBJDEST = meltgc_named_symbol ("PUT_OBJDEST", MELT_GET);
- if (sy_PUT_OBJDEST && NULL == /*_.VALDATA___V1065*/ meltfptr[1064])
- /*_.VALDATA___V1065*/ meltfptr[1064] = (void *) sy_PUT_OBJDEST;
+ if (sy_PUT_OBJDEST && NULL == /*_.VALDATA___V1068*/ meltfptr[1067])
+ /*_.VALDATA___V1068*/ meltfptr[1067] = (void *) sy_PUT_OBJDEST;
}
/*^getnamedsymbol */
@@ -30981,8 +31236,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_OUTPUT_C_CODE =
meltgc_named_symbol ("OUTPUT_C_CODE", MELT_GET);
- if (sy_OUTPUT_C_CODE && NULL == /*_.VALDATA___V1069*/ meltfptr[1068])
- /*_.VALDATA___V1069*/ meltfptr[1068] = (void *) sy_OUTPUT_C_CODE;
+ if (sy_OUTPUT_C_CODE && NULL == /*_.VALDATA___V1072*/ meltfptr[1071])
+ /*_.VALDATA___V1072*/ meltfptr[1071] = (void *) sy_OUTPUT_C_CODE;
}
/*^getnamedsymbol */
@@ -30990,8 +31245,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DECLBUF */
{
melt_ptr_t sy_DECLBUF = meltgc_named_symbol ("DECLBUF", MELT_GET);
- if (sy_DECLBUF && NULL == /*_.VALDATA___V1072*/ meltfptr[1071])
- /*_.VALDATA___V1072*/ meltfptr[1071] = (void *) sy_DECLBUF;
+ if (sy_DECLBUF && NULL == /*_.VALDATA___V1075*/ meltfptr[1074])
+ /*_.VALDATA___V1075*/ meltfptr[1074] = (void *) sy_DECLBUF;
}
/*^getnamedsymbol */
@@ -30999,8 +31254,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:IMPLBUF */
{
melt_ptr_t sy_IMPLBUF = meltgc_named_symbol ("IMPLBUF", MELT_GET);
- if (sy_IMPLBUF && NULL == /*_.VALDATA___V1075*/ meltfptr[1074])
- /*_.VALDATA___V1075*/ meltfptr[1074] = (void *) sy_IMPLBUF;
+ if (sy_IMPLBUF && NULL == /*_.VALDATA___V1078*/ meltfptr[1077])
+ /*_.VALDATA___V1078*/ meltfptr[1077] = (void *) sy_IMPLBUF;
}
/*^getnamedsymbol */
@@ -31008,8 +31263,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DEPTH */
{
melt_ptr_t sy_DEPTH = meltgc_named_symbol ("DEPTH", MELT_GET);
- if (sy_DEPTH && NULL == /*_.VALDATA___V1078*/ meltfptr[1077])
- /*_.VALDATA___V1078*/ meltfptr[1077] = (void *) sy_DEPTH;
+ if (sy_DEPTH && NULL == /*_.VALDATA___V1081*/ meltfptr[1080])
+ /*_.VALDATA___V1081*/ meltfptr[1080] = (void *) sy_DEPTH;
}
/*^getnamedsymbol */
@@ -31019,8 +31274,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_OUTPUT_C_INITIAL_FILL =
meltgc_named_symbol ("OUTPUT_C_INITIAL_FILL", MELT_GET);
if (sy_OUTPUT_C_INITIAL_FILL
- && NULL == /*_.VALDATA___V1084*/ meltfptr[1083])
- /*_.VALDATA___V1084*/ meltfptr[1083] =
+ && NULL == /*_.VALDATA___V1087*/ meltfptr[1086])
+ /*_.VALDATA___V1087*/ meltfptr[1086] =
(void *) sy_OUTPUT_C_INITIAL_FILL;
}
@@ -31029,8 +31284,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PTRSTR */
{
melt_ptr_t sy_PTRSTR = meltgc_named_symbol ("PTRSTR", MELT_GET);
- if (sy_PTRSTR && NULL == /*_.VALDATA___V1088*/ meltfptr[1087])
- /*_.VALDATA___V1088*/ meltfptr[1087] = (void *) sy_PTRSTR;
+ if (sy_PTRSTR && NULL == /*_.VALDATA___V1091*/ meltfptr[1090])
+ /*_.VALDATA___V1091*/ meltfptr[1090] = (void *) sy_PTRSTR;
}
/*^getnamedsymbol */
@@ -31040,8 +31295,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_OUTPUT_C_INITIAL_PREDEF =
meltgc_named_symbol ("OUTPUT_C_INITIAL_PREDEF", MELT_GET);
if (sy_OUTPUT_C_INITIAL_PREDEF
- && NULL == /*_.VALDATA___V1095*/ meltfptr[1094])
- /*_.VALDATA___V1095*/ meltfptr[1094] =
+ && NULL == /*_.VALDATA___V1098*/ meltfptr[1097])
+ /*_.VALDATA___V1098*/ meltfptr[1097] =
(void *) sy_OUTPUT_C_INITIAL_PREDEF;
}
@@ -31050,8 +31305,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PRTRSTR */
{
melt_ptr_t sy_PRTRSTR = meltgc_named_symbol ("PRTRSTR", MELT_GET);
- if (sy_PRTRSTR && NULL == /*_.VALDATA___V1099*/ meltfptr[1098])
- /*_.VALDATA___V1099*/ meltfptr[1098] = (void *) sy_PRTRSTR;
+ if (sy_PRTRSTR && NULL == /*_.VALDATA___V1102*/ meltfptr[1101])
+ /*_.VALDATA___V1102*/ meltfptr[1101] = (void *) sy_PRTRSTR;
}
/*^getnamedsymbol */
@@ -31060,8 +31315,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_INSTALL_METHOD =
meltgc_named_symbol ("INSTALL_METHOD", MELT_GET);
- if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V1108*/ meltfptr[1107])
- /*_.VALDATA___V1108*/ meltfptr[1107] = (void *) sy_INSTALL_METHOD;
+ if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V1111*/ meltfptr[1110])
+ /*_.VALDATA___V1111*/ meltfptr[1110] = (void *) sy_INSTALL_METHOD;
}
/*^getnamedsymbol */
@@ -31069,8 +31324,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_NREP */
{
melt_ptr_t sy_CLASS_NREP = meltgc_named_symbol ("CLASS_NREP", MELT_GET);
- if (sy_CLASS_NREP && NULL == /*_.VALDATA___V1110*/ meltfptr[1109])
- /*_.VALDATA___V1110*/ meltfptr[1109] = (void *) sy_CLASS_NREP;
+ if (sy_CLASS_NREP && NULL == /*_.VALDATA___V1113*/ meltfptr[1112])
+ /*_.VALDATA___V1113*/ meltfptr[1112] = (void *) sy_CLASS_NREP;
}
/*^getnamedsymbol */
@@ -31078,8 +31333,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:COMPILE_OBJ */
{
melt_ptr_t sy_COMPILE_OBJ = meltgc_named_symbol ("COMPILE_OBJ", MELT_GET);
- if (sy_COMPILE_OBJ && NULL == /*_.VALDATA___V1112*/ meltfptr[1111])
- /*_.VALDATA___V1112*/ meltfptr[1111] = (void *) sy_COMPILE_OBJ;
+ if (sy_COMPILE_OBJ && NULL == /*_.VALDATA___V1115*/ meltfptr[1114])
+ /*_.VALDATA___V1115*/ meltfptr[1114] = (void *) sy_COMPILE_OBJ;
}
/*^getnamedsymbol */
@@ -31088,8 +31343,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_ANY_RECEIVER =
meltgc_named_symbol ("DISCR_ANY_RECEIVER", MELT_GET);
- if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V1118*/ meltfptr[1117])
- /*_.VALDATA___V1118*/ meltfptr[1117] = (void *) sy_DISCR_ANY_RECEIVER;
+ if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V1121*/ meltfptr[1120])
+ /*_.VALDATA___V1121*/ meltfptr[1120] = (void *) sy_DISCR_ANY_RECEIVER;
}
/*^getnamedsymbol */
@@ -31097,8 +31352,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:GET_CTYPE */
{
melt_ptr_t sy_GET_CTYPE = meltgc_named_symbol ("GET_CTYPE", MELT_GET);
- if (sy_GET_CTYPE && NULL == /*_.VALDATA___V1122*/ meltfptr[1121])
- /*_.VALDATA___V1122*/ meltfptr[1121] = (void *) sy_GET_CTYPE;
+ if (sy_GET_CTYPE && NULL == /*_.VALDATA___V1125*/ meltfptr[1124])
+ /*_.VALDATA___V1125*/ meltfptr[1124] = (void *) sy_GET_CTYPE;
}
/*^getnamedsymbol */
@@ -31106,8 +31361,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_VALUE */
{
melt_ptr_t sy_CTYPE_VALUE = meltgc_named_symbol ("CTYPE_VALUE", MELT_GET);
- if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V1126*/ meltfptr[1125])
- /*_.VALDATA___V1126*/ meltfptr[1125] = (void *) sy_CTYPE_VALUE;
+ if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V1129*/ meltfptr[1128])
+ /*_.VALDATA___V1129*/ meltfptr[1128] = (void *) sy_CTYPE_VALUE;
}
/*^getnamedsymbol */
@@ -31117,8 +31372,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DBGOUT_NAMEDOBJECT_METHOD =
meltgc_named_symbol ("DBGOUT_NAMEDOBJECT_METHOD", MELT_GET);
if (sy_DBGOUT_NAMEDOBJECT_METHOD
- && NULL == /*_.VALDATA___V1132*/ meltfptr[1131])
- /*_.VALDATA___V1132*/ meltfptr[1131] =
+ && NULL == /*_.VALDATA___V1135*/ meltfptr[1134])
+ /*_.VALDATA___V1135*/ meltfptr[1134] =
(void *) sy_DBGOUT_NAMEDOBJECT_METHOD;
}
@@ -31127,8 +31382,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DBG_OUTPUT */
{
melt_ptr_t sy_DBG_OUTPUT = meltgc_named_symbol ("DBG_OUTPUT", MELT_GET);
- if (sy_DBG_OUTPUT && NULL == /*_.VALDATA___V1134*/ meltfptr[1133])
- /*_.VALDATA___V1134*/ meltfptr[1133] = (void *) sy_DBG_OUTPUT;
+ if (sy_DBG_OUTPUT && NULL == /*_.VALDATA___V1137*/ meltfptr[1136])
+ /*_.VALDATA___V1137*/ meltfptr[1136] = (void *) sy_DBG_OUTPUT;
}
/*^getnamedsymbol */
@@ -31136,8 +31391,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:AS_NULL */
{
melt_ptr_t sy_AS_NULL = meltgc_named_symbol ("AS_NULL", MELT_GET);
- if (sy_AS_NULL && NULL == /*_.VALDATA___V1142*/ meltfptr[1141])
- /*_.VALDATA___V1142*/ meltfptr[1141] = (void *) sy_AS_NULL;
+ if (sy_AS_NULL && NULL == /*_.VALDATA___V1145*/ meltfptr[1144])
+ /*_.VALDATA___V1145*/ meltfptr[1144] = (void *) sy_AS_NULL;
}
/*^getnamedsymbol */
@@ -31147,8 +31402,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_CLONED_SYMBOL =
meltgc_named_symbol ("CLASS_CLONED_SYMBOL", MELT_GET);
if (sy_CLASS_CLONED_SYMBOL
- && NULL == /*_.VALDATA___V1144*/ meltfptr[1143])
- /*_.VALDATA___V1144*/ meltfptr[1143] = (void *) sy_CLASS_CLONED_SYMBOL;
+ && NULL == /*_.VALDATA___V1147*/ meltfptr[1146])
+ /*_.VALDATA___V1147*/ meltfptr[1146] = (void *) sy_CLASS_CLONED_SYMBOL;
}
/*^getnamedsymbol */
@@ -31157,8 +31412,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_INTEGERBOX_OF =
meltgc_named_symbol ("INTEGERBOX_OF", MELT_GET);
- if (sy_INTEGERBOX_OF && NULL == /*_.VALDATA___V1146*/ meltfptr[1145])
- /*_.VALDATA___V1146*/ meltfptr[1145] = (void *) sy_INTEGERBOX_OF;
+ if (sy_INTEGERBOX_OF && NULL == /*_.VALDATA___V1149*/ meltfptr[1148])
+ /*_.VALDATA___V1149*/ meltfptr[1148] = (void *) sy_INTEGERBOX_OF;
}
/*^getnamedsymbol */
@@ -31167,8 +31422,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_STRBUF =
meltgc_named_symbol ("DISCR_STRBUF", MELT_GET);
- if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V1148*/ meltfptr[1147])
- /*_.VALDATA___V1148*/ meltfptr[1147] = (void *) sy_DISCR_STRBUF;
+ if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V1151*/ meltfptr[1150])
+ /*_.VALDATA___V1151*/ meltfptr[1150] = (void *) sy_DISCR_STRBUF;
}
/*^getnamedsymbol */
@@ -31177,8 +31432,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SYMBOL =
meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET);
- if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V1150*/ meltfptr[1149])
- /*_.VALDATA___V1150*/ meltfptr[1149] = (void *) sy_CLASS_SYMBOL;
+ if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V1153*/ meltfptr[1152])
+ /*_.VALDATA___V1153*/ meltfptr[1152] = (void *) sy_CLASS_SYMBOL;
}
/*^getnamedsymbol */
@@ -31188,8 +31443,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_ROUTPROC =
meltgc_named_symbol ("CLASS_NREP_ROUTPROC", MELT_GET);
if (sy_CLASS_NREP_ROUTPROC
- && NULL == /*_.VALDATA___V1168*/ meltfptr[1167])
- /*_.VALDATA___V1168*/ meltfptr[1167] = (void *) sy_CLASS_NREP_ROUTPROC;
+ && NULL == /*_.VALDATA___V1171*/ meltfptr[1170])
+ /*_.VALDATA___V1171*/ meltfptr[1170] = (void *) sy_CLASS_NREP_ROUTPROC;
}
/*^getnamedsymbol */
@@ -31199,8 +31454,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MODULE_CONTEXT =
meltgc_named_symbol ("CLASS_MODULE_CONTEXT", MELT_GET);
if (sy_CLASS_MODULE_CONTEXT
- && NULL == /*_.VALDATA___V1170*/ meltfptr[1169])
- /*_.VALDATA___V1170*/ meltfptr[1169] = (void *) sy_CLASS_MODULE_CONTEXT;
+ && NULL == /*_.VALDATA___V1173*/ meltfptr[1172])
+ /*_.VALDATA___V1173*/ meltfptr[1172] = (void *) sy_CLASS_MODULE_CONTEXT;
}
/*^getnamedsymbol */
@@ -31210,8 +31465,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DEFUNROUTPROC =
meltgc_named_symbol ("CLASS_NREP_DEFUNROUTPROC", MELT_GET);
if (sy_CLASS_NREP_DEFUNROUTPROC
- && NULL == /*_.VALDATA___V1172*/ meltfptr[1171])
- /*_.VALDATA___V1172*/ meltfptr[1171] =
+ && NULL == /*_.VALDATA___V1175*/ meltfptr[1174])
+ /*_.VALDATA___V1175*/ meltfptr[1174] =
(void *) sy_CLASS_NREP_DEFUNROUTPROC;
}
@@ -31221,8 +31476,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_STRING =
meltgc_named_symbol ("DISCR_STRING", MELT_GET);
- if (sy_DISCR_STRING && NULL == /*_.VALDATA___V1174*/ meltfptr[1173])
- /*_.VALDATA___V1174*/ meltfptr[1173] = (void *) sy_DISCR_STRING;
+ if (sy_DISCR_STRING && NULL == /*_.VALDATA___V1177*/ meltfptr[1176])
+ /*_.VALDATA___V1177*/ meltfptr[1176] = (void *) sy_DISCR_STRING;
}
/*^getnamedsymbol */
@@ -31231,8 +31486,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_INTEGER =
meltgc_named_symbol ("DISCR_INTEGER", MELT_GET);
- if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1176*/ meltfptr[1175])
- /*_.VALDATA___V1176*/ meltfptr[1175] = (void *) sy_DISCR_INTEGER;
+ if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1179*/ meltfptr[1178])
+ /*_.VALDATA___V1179*/ meltfptr[1178] = (void *) sy_DISCR_INTEGER;
}
/*^getnamedsymbol */
@@ -31241,8 +31496,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MAP_OBJECTS =
meltgc_named_symbol ("DISCR_MAP_OBJECTS", MELT_GET);
- if (sy_DISCR_MAP_OBJECTS && NULL == /*_.VALDATA___V1178*/ meltfptr[1177])
- /*_.VALDATA___V1178*/ meltfptr[1177] = (void *) sy_DISCR_MAP_OBJECTS;
+ if (sy_DISCR_MAP_OBJECTS && NULL == /*_.VALDATA___V1181*/ meltfptr[1180])
+ /*_.VALDATA___V1181*/ meltfptr[1180] = (void *) sy_DISCR_MAP_OBJECTS;
}
/*^getnamedsymbol */
@@ -31252,8 +31507,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_C_GENERATION_CONTEXT =
meltgc_named_symbol ("CLASS_C_GENERATION_CONTEXT", MELT_GET);
if (sy_CLASS_C_GENERATION_CONTEXT
- && NULL == /*_.VALDATA___V1180*/ meltfptr[1179])
- /*_.VALDATA___V1180*/ meltfptr[1179] =
+ && NULL == /*_.VALDATA___V1183*/ meltfptr[1182])
+ /*_.VALDATA___V1183*/ meltfptr[1182] =
(void *) sy_CLASS_C_GENERATION_CONTEXT;
}
@@ -31262,8 +31517,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_RETVAL_ */
{
melt_ptr_t sy_RETVAL_ = meltgc_named_symbol ("_RETVAL_", MELT_GET);
- if (sy_RETVAL_ && NULL == /*_.VALDATA___V1159*/ meltfptr[1158])
- /*_.VALDATA___V1159*/ meltfptr[1158] = (void *) sy_RETVAL_;
+ if (sy_RETVAL_ && NULL == /*_.VALDATA___V1162*/ meltfptr[1161])
+ /*_.VALDATA___V1162*/ meltfptr[1161] = (void *) sy_RETVAL_;
}
/*^getnamedsymbol */
@@ -31272,8 +31527,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_MAP =
meltgc_named_symbol ("MULTIPLE_MAP", MELT_GET);
- if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V1182*/ meltfptr[1181])
- /*_.VALDATA___V1182*/ meltfptr[1181] = (void *) sy_MULTIPLE_MAP;
+ if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V1185*/ meltfptr[1184])
+ /*_.VALDATA___V1185*/ meltfptr[1184] = (void *) sy_MULTIPLE_MAP;
}
/*^getnamedsymbol */
@@ -31283,8 +31538,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_FORMAL_BINDING =
meltgc_named_symbol ("CLASS_FORMAL_BINDING", MELT_GET);
if (sy_CLASS_FORMAL_BINDING
- && NULL == /*_.VALDATA___V1184*/ meltfptr[1183])
- /*_.VALDATA___V1184*/ meltfptr[1183] = (void *) sy_CLASS_FORMAL_BINDING;
+ && NULL == /*_.VALDATA___V1187*/ meltfptr[1186])
+ /*_.VALDATA___V1187*/ meltfptr[1186] = (void *) sy_CLASS_FORMAL_BINDING;
}
/*^getnamedsymbol */
@@ -31292,8 +31547,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_LONG */
{
melt_ptr_t sy_CTYPE_LONG = meltgc_named_symbol ("CTYPE_LONG", MELT_GET);
- if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1186*/ meltfptr[1185])
- /*_.VALDATA___V1186*/ meltfptr[1185] = (void *) sy_CTYPE_LONG;
+ if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1189*/ meltfptr[1188])
+ /*_.VALDATA___V1189*/ meltfptr[1188] = (void *) sy_CTYPE_LONG;
}
/*^getnamedsymbol */
@@ -31301,8 +31556,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:LIST_EVERY */
{
melt_ptr_t sy_LIST_EVERY = meltgc_named_symbol ("LIST_EVERY", MELT_GET);
- if (sy_LIST_EVERY && NULL == /*_.VALDATA___V1188*/ meltfptr[1187])
- /*_.VALDATA___V1188*/ meltfptr[1187] = (void *) sy_LIST_EVERY;
+ if (sy_LIST_EVERY && NULL == /*_.VALDATA___V1191*/ meltfptr[1190])
+ /*_.VALDATA___V1191*/ meltfptr[1190] = (void *) sy_LIST_EVERY;
}
/*^getnamedsymbol */
@@ -31312,8 +31567,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_INITIALSYSTEMDATA_OBJPREDEF =
meltgc_named_symbol ("INITIALSYSTEMDATA_OBJPREDEF", MELT_GET);
if (sy_INITIALSYSTEMDATA_OBJPREDEF
- && NULL == /*_.VALDATA___V1190*/ meltfptr[1189])
- /*_.VALDATA___V1190*/ meltfptr[1189] =
+ && NULL == /*_.VALDATA___V1193*/ meltfptr[1192])
+ /*_.VALDATA___V1193*/ meltfptr[1192] =
(void *) sy_INITIALSYSTEMDATA_OBJPREDEF;
}
@@ -31324,8 +31579,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_INITIAL_SYSTEM_DATA =
meltgc_named_symbol ("INITIAL_SYSTEM_DATA", MELT_GET);
if (sy_INITIAL_SYSTEM_DATA
- && NULL == /*_.VALDATA___V1193*/ meltfptr[1192])
- /*_.VALDATA___V1193*/ meltfptr[1192] = (void *) sy_INITIAL_SYSTEM_DATA;
+ && NULL == /*_.VALDATA___V1196*/ meltfptr[1195])
+ /*_.VALDATA___V1196*/ meltfptr[1195] = (void *) sy_INITIAL_SYSTEM_DATA;
}
/*^getnamedsymbol */
@@ -31335,8 +31590,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_INITPROC =
meltgc_named_symbol ("CLASS_NREP_INITPROC", MELT_GET);
if (sy_CLASS_NREP_INITPROC
- && NULL == /*_.VALDATA___V1222*/ meltfptr[1221])
- /*_.VALDATA___V1222*/ meltfptr[1221] = (void *) sy_CLASS_NREP_INITPROC;
+ && NULL == /*_.VALDATA___V1225*/ meltfptr[1224])
+ /*_.VALDATA___V1225*/ meltfptr[1224] = (void *) sy_CLASS_NREP_INITPROC;
}
/*^getnamedsymbol */
@@ -31346,8 +31601,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_INITIAL_GENERATION_CONTEXT =
meltgc_named_symbol ("CLASS_INITIAL_GENERATION_CONTEXT", MELT_GET);
if (sy_CLASS_INITIAL_GENERATION_CONTEXT
- && NULL == /*_.VALDATA___V1224*/ meltfptr[1223])
- /*_.VALDATA___V1224*/ meltfptr[1223] =
+ && NULL == /*_.VALDATA___V1227*/ meltfptr[1226])
+ /*_.VALDATA___V1227*/ meltfptr[1226] =
(void *) sy_CLASS_INITIAL_GENERATION_CONTEXT;
}
@@ -31356,8 +31611,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:LIST_MAP */
{
melt_ptr_t sy_LIST_MAP = meltgc_named_symbol ("LIST_MAP", MELT_GET);
- if (sy_LIST_MAP && NULL == /*_.VALDATA___V1226*/ meltfptr[1225])
- /*_.VALDATA___V1226*/ meltfptr[1225] = (void *) sy_LIST_MAP;
+ if (sy_LIST_MAP && NULL == /*_.VALDATA___V1229*/ meltfptr[1228])
+ /*_.VALDATA___V1229*/ meltfptr[1228] = (void *) sy_LIST_MAP;
}
/*^getnamedsymbol */
@@ -31365,8 +31620,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_RETINIT_ */
{
melt_ptr_t sy_RETINIT_ = meltgc_named_symbol ("_RETINIT_", MELT_GET);
- if (sy_RETINIT_ && NULL == /*_.VALDATA___V1202*/ meltfptr[1201])
- /*_.VALDATA___V1202*/ meltfptr[1201] = (void *) sy_RETINIT_;
+ if (sy_RETINIT_ && NULL == /*_.VALDATA___V1205*/ meltfptr[1204])
+ /*_.VALDATA___V1205*/ meltfptr[1204] = (void *) sy_RETINIT_;
}
/*^getnamedsymbol */
@@ -31374,8 +31629,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_CONTENV_ */
{
melt_ptr_t sy_CONTENV_ = meltgc_named_symbol ("_CONTENV_", MELT_GET);
- if (sy_CONTENV_ && NULL == /*_.VALDATA___V1204*/ meltfptr[1203])
- /*_.VALDATA___V1204*/ meltfptr[1203] = (void *) sy_CONTENV_;
+ if (sy_CONTENV_ && NULL == /*_.VALDATA___V1207*/ meltfptr[1206])
+ /*_.VALDATA___V1207*/ meltfptr[1206] = (void *) sy_CONTENV_;
}
/*^getnamedsymbol */
@@ -31383,8 +31638,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_FRESHENV_ */
{
melt_ptr_t sy_FRESHENV_ = meltgc_named_symbol ("_FRESHENV_", MELT_GET);
- if (sy_FRESHENV_ && NULL == /*_.VALDATA___V1206*/ meltfptr[1205])
- /*_.VALDATA___V1206*/ meltfptr[1205] = (void *) sy_FRESHENV_;
+ if (sy_FRESHENV_ && NULL == /*_.VALDATA___V1209*/ meltfptr[1208])
+ /*_.VALDATA___V1209*/ meltfptr[1208] = (void *) sy_FRESHENV_;
}
/*^getnamedsymbol */
@@ -31392,8 +31647,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_PREVENV_ */
{
melt_ptr_t sy_PREVENV_ = meltgc_named_symbol ("_PREVENV_", MELT_GET);
- if (sy_PREVENV_ && NULL == /*_.VALDATA___V1208*/ meltfptr[1207])
- /*_.VALDATA___V1208*/ meltfptr[1207] = (void *) sy_PREVENV_;
+ if (sy_PREVENV_ && NULL == /*_.VALDATA___V1211*/ meltfptr[1210])
+ /*_.VALDATA___V1211*/ meltfptr[1210] = (void *) sy_PREVENV_;
}
/*^getnamedsymbol */
@@ -31401,8 +31656,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALEXPORT_ */
{
melt_ptr_t sy_VALEXPORT_ = meltgc_named_symbol ("_VALEXPORT_", MELT_GET);
- if (sy_VALEXPORT_ && NULL == /*_.VALDATA___V1210*/ meltfptr[1209])
- /*_.VALDATA___V1210*/ meltfptr[1209] = (void *) sy_VALEXPORT_;
+ if (sy_VALEXPORT_ && NULL == /*_.VALDATA___V1213*/ meltfptr[1212])
+ /*_.VALDATA___V1213*/ meltfptr[1212] = (void *) sy_VALEXPORT_;
}
/*^getnamedsymbol */
@@ -31410,8 +31665,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALIMPORT_ */
{
melt_ptr_t sy_VALIMPORT_ = meltgc_named_symbol ("_VALIMPORT_", MELT_GET);
- if (sy_VALIMPORT_ && NULL == /*_.VALDATA___V1212*/ meltfptr[1211])
- /*_.VALDATA___V1212*/ meltfptr[1211] = (void *) sy_VALIMPORT_;
+ if (sy_VALIMPORT_ && NULL == /*_.VALDATA___V1215*/ meltfptr[1214])
+ /*_.VALDATA___V1215*/ meltfptr[1214] = (void *) sy_VALIMPORT_;
}
/*^getnamedsymbol */
@@ -31420,8 +31675,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ANY_BINDING =
meltgc_named_symbol ("CLASS_ANY_BINDING", MELT_GET);
- if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V1228*/ meltfptr[1227])
- /*_.VALDATA___V1228*/ meltfptr[1227] = (void *) sy_CLASS_ANY_BINDING;
+ if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V1231*/ meltfptr[1230])
+ /*_.VALDATA___V1231*/ meltfptr[1230] = (void *) sy_CLASS_ANY_BINDING;
}
/*^getnamedsymbol */
@@ -31431,8 +31686,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_FIXED_BINDING =
meltgc_named_symbol ("CLASS_FIXED_BINDING", MELT_GET);
if (sy_CLASS_FIXED_BINDING
- && NULL == /*_.VALDATA___V1230*/ meltfptr[1229])
- /*_.VALDATA___V1230*/ meltfptr[1229] = (void *) sy_CLASS_FIXED_BINDING;
+ && NULL == /*_.VALDATA___V1233*/ meltfptr[1232])
+ /*_.VALDATA___V1233*/ meltfptr[1232] = (void *) sy_CLASS_FIXED_BINDING;
}
/*^getnamedsymbol */
@@ -31441,8 +31696,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SIMPLE =
meltgc_named_symbol ("CLASS_NREP_SIMPLE", MELT_GET);
- if (sy_CLASS_NREP_SIMPLE && NULL == /*_.VALDATA___V1232*/ meltfptr[1231])
- /*_.VALDATA___V1232*/ meltfptr[1231] = (void *) sy_CLASS_NREP_SIMPLE;
+ if (sy_CLASS_NREP_SIMPLE && NULL == /*_.VALDATA___V1235*/ meltfptr[1234])
+ /*_.VALDATA___V1235*/ meltfptr[1234] = (void *) sy_CLASS_NREP_SIMPLE;
}
/*^getnamedsymbol */
@@ -31452,8 +31707,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SYSDATA_CONT_FRESH_ENV =
meltgc_named_symbol ("SYSDATA_CONT_FRESH_ENV", MELT_GET);
if (sy_SYSDATA_CONT_FRESH_ENV
- && NULL == /*_.VALDATA___V1234*/ meltfptr[1233])
- /*_.VALDATA___V1234*/ meltfptr[1233] =
+ && NULL == /*_.VALDATA___V1237*/ meltfptr[1236])
+ /*_.VALDATA___V1237*/ meltfptr[1236] =
(void *) sy_SYSDATA_CONT_FRESH_ENV;
}
@@ -31464,8 +31719,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_IMPORTEDVAL =
meltgc_named_symbol ("CLASS_NREP_IMPORTEDVAL", MELT_GET);
if (sy_CLASS_NREP_IMPORTEDVAL
- && NULL == /*_.VALDATA___V1236*/ meltfptr[1235])
- /*_.VALDATA___V1236*/ meltfptr[1235] =
+ && NULL == /*_.VALDATA___V1239*/ meltfptr[1238])
+ /*_.VALDATA___V1239*/ meltfptr[1238] =
(void *) sy_CLASS_NREP_IMPORTEDVAL;
}
@@ -31476,8 +31731,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_BOUND_DATA =
meltgc_named_symbol ("CLASS_NREP_BOUND_DATA", MELT_GET);
if (sy_CLASS_NREP_BOUND_DATA
- && NULL == /*_.VALDATA___V1238*/ meltfptr[1237])
- /*_.VALDATA___V1238*/ meltfptr[1237] =
+ && NULL == /*_.VALDATA___V1241*/ meltfptr[1240])
+ /*_.VALDATA___V1241*/ meltfptr[1240] =
(void *) sy_CLASS_NREP_BOUND_DATA;
}
@@ -31487,8 +31742,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_EVERY =
meltgc_named_symbol ("MULTIPLE_EVERY", MELT_GET);
- if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V1240*/ meltfptr[1239])
- /*_.VALDATA___V1240*/ meltfptr[1239] = (void *) sy_MULTIPLE_EVERY;
+ if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V1243*/ meltfptr[1242])
+ /*_.VALDATA___V1243*/ meltfptr[1242] = (void *) sy_MULTIPLE_EVERY;
}
/*^getnamedsymbol */
@@ -31498,8 +31753,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATAKEYWORD =
meltgc_named_symbol ("CLASS_NREP_DATAKEYWORD", MELT_GET);
if (sy_CLASS_NREP_DATAKEYWORD
- && NULL == /*_.VALDATA___V1242*/ meltfptr[1241])
- /*_.VALDATA___V1242*/ meltfptr[1241] =
+ && NULL == /*_.VALDATA___V1245*/ meltfptr[1244])
+ /*_.VALDATA___V1245*/ meltfptr[1244] =
(void *) sy_CLASS_NREP_DATAKEYWORD;
}
@@ -31510,8 +31765,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATASYMBOL =
meltgc_named_symbol ("CLASS_NREP_DATASYMBOL", MELT_GET);
if (sy_CLASS_NREP_DATASYMBOL
- && NULL == /*_.VALDATA___V1244*/ meltfptr[1243])
- /*_.VALDATA___V1244*/ meltfptr[1243] =
+ && NULL == /*_.VALDATA___V1247*/ meltfptr[1246])
+ /*_.VALDATA___V1247*/ meltfptr[1246] =
(void *) sy_CLASS_NREP_DATASYMBOL;
}
@@ -31522,8 +31777,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_SYSDATA_VALUE_IMPORTER =
meltgc_named_symbol ("SYSDATA_VALUE_IMPORTER", MELT_GET);
if (sy_SYSDATA_VALUE_IMPORTER
- && NULL == /*_.VALDATA___V1246*/ meltfptr[1245])
- /*_.VALDATA___V1246*/ meltfptr[1245] =
+ && NULL == /*_.VALDATA___V1249*/ meltfptr[1248])
+ /*_.VALDATA___V1249*/ meltfptr[1248] =
(void *) sy_SYSDATA_VALUE_IMPORTER;
}
@@ -31534,8 +31789,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_COMPILE2OBJ_INITPROC =
meltgc_named_symbol ("COMPILE2OBJ_INITPROC", MELT_GET);
if (sy_COMPILE2OBJ_INITPROC
- && NULL == /*_.VALDATA___V1248*/ meltfptr[1247])
- /*_.VALDATA___V1248*/ meltfptr[1247] = (void *) sy_COMPILE2OBJ_INITPROC;
+ && NULL == /*_.VALDATA___V1251*/ meltfptr[1250])
+ /*_.VALDATA___V1251*/ meltfptr[1250] = (void *) sy_COMPILE2OBJ_INITPROC;
}
/*^getnamedsymbol */
@@ -31545,8 +31800,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_COMPILE2OBJ_PROCEDURE =
meltgc_named_symbol ("COMPILE2OBJ_PROCEDURE", MELT_GET);
if (sy_COMPILE2OBJ_PROCEDURE
- && NULL == /*_.VALDATA___V1250*/ meltfptr[1249])
- /*_.VALDATA___V1250*/ meltfptr[1249] =
+ && NULL == /*_.VALDATA___V1253*/ meltfptr[1252])
+ /*_.VALDATA___V1253*/ meltfptr[1252] =
(void *) sy_COMPILE2OBJ_PROCEDURE;
}
@@ -31557,8 +31812,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_VARIADIC_INDEX_IDSTR =
meltgc_named_symbol ("VARIADIC_INDEX_IDSTR", MELT_GET);
if (sy_VARIADIC_INDEX_IDSTR
- && NULL == /*_.VALDATA___V1252*/ meltfptr[1251])
- /*_.VALDATA___V1252*/ meltfptr[1251] = (void *) sy_VARIADIC_INDEX_IDSTR;
+ && NULL == /*_.VALDATA___V1255*/ meltfptr[1254])
+ /*_.VALDATA___V1255*/ meltfptr[1254] = (void *) sy_VARIADIC_INDEX_IDSTR;
}
/*^getnamedsymbol */
@@ -31568,8 +31823,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_VARIADIC_LENGTH_IDSTR =
meltgc_named_symbol ("VARIADIC_LENGTH_IDSTR", MELT_GET);
if (sy_VARIADIC_LENGTH_IDSTR
- && NULL == /*_.VALDATA___V1254*/ meltfptr[1253])
- /*_.VALDATA___V1254*/ meltfptr[1253] =
+ && NULL == /*_.VALDATA___V1257*/ meltfptr[1256])
+ /*_.VALDATA___V1257*/ meltfptr[1256] =
(void *) sy_VARIADIC_LENGTH_IDSTR;
}
@@ -31578,8 +31833,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_VOID */
{
melt_ptr_t sy_CTYPE_VOID = meltgc_named_symbol ("CTYPE_VOID", MELT_GET);
- if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V1256*/ meltfptr[1255])
- /*_.VALDATA___V1256*/ meltfptr[1255] = (void *) sy_CTYPE_VOID;
+ if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V1259*/ meltfptr[1258])
+ /*_.VALDATA___V1259*/ meltfptr[1258] = (void *) sy_CTYPE_VOID;
}
/*^getnamedsymbol */
@@ -31588,8 +31843,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_LET_BINDING =
meltgc_named_symbol ("CLASS_LET_BINDING", MELT_GET);
- if (sy_CLASS_LET_BINDING && NULL == /*_.VALDATA___V1262*/ meltfptr[1261])
- /*_.VALDATA___V1262*/ meltfptr[1261] = (void *) sy_CLASS_LET_BINDING;
+ if (sy_CLASS_LET_BINDING && NULL == /*_.VALDATA___V1265*/ meltfptr[1264])
+ /*_.VALDATA___V1265*/ meltfptr[1264] = (void *) sy_CLASS_LET_BINDING;
}
/*^getnamedsymbol */
@@ -31598,8 +31853,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_CHUNK =
meltgc_named_symbol ("CLASS_NREP_CHUNK", MELT_GET);
- if (sy_CLASS_NREP_CHUNK && NULL == /*_.VALDATA___V1267*/ meltfptr[1266])
- /*_.VALDATA___V1267*/ meltfptr[1266] = (void *) sy_CLASS_NREP_CHUNK;
+ if (sy_CLASS_NREP_CHUNK && NULL == /*_.VALDATA___V1270*/ meltfptr[1269])
+ /*_.VALDATA___V1270*/ meltfptr[1269] = (void *) sy_CLASS_NREP_CHUNK;
}
/*^getnamedsymbol */
@@ -31609,8 +31864,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_TYPED_EXPRESSION =
meltgc_named_symbol ("CLASS_NREP_TYPED_EXPRESSION", MELT_GET);
if (sy_CLASS_NREP_TYPED_EXPRESSION
- && NULL == /*_.VALDATA___V1271*/ meltfptr[1270])
- /*_.VALDATA___V1271*/ meltfptr[1270] =
+ && NULL == /*_.VALDATA___V1274*/ meltfptr[1273])
+ /*_.VALDATA___V1274*/ meltfptr[1273] =
(void *) sy_CLASS_NREP_TYPED_EXPRESSION;
}
@@ -31620,8 +31875,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_NIL =
meltgc_named_symbol ("CLASS_NREP_NIL", MELT_GET);
- if (sy_CLASS_NREP_NIL && NULL == /*_.VALDATA___V1275*/ meltfptr[1274])
- /*_.VALDATA___V1275*/ meltfptr[1274] = (void *) sy_CLASS_NREP_NIL;
+ if (sy_CLASS_NREP_NIL && NULL == /*_.VALDATA___V1278*/ meltfptr[1277])
+ /*_.VALDATA___V1278*/ meltfptr[1277] = (void *) sy_CLASS_NREP_NIL;
}
/*^getnamedsymbol */
@@ -31630,8 +31885,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_COMMENT =
meltgc_named_symbol ("CLASS_NREP_COMMENT", MELT_GET);
- if (sy_CLASS_NREP_COMMENT && NULL == /*_.VALDATA___V1279*/ meltfptr[1278])
- /*_.VALDATA___V1279*/ meltfptr[1278] = (void *) sy_CLASS_NREP_COMMENT;
+ if (sy_CLASS_NREP_COMMENT && NULL == /*_.VALDATA___V1282*/ meltfptr[1281])
+ /*_.VALDATA___V1282*/ meltfptr[1281] = (void *) sy_CLASS_NREP_COMMENT;
}
/*^getnamedsymbol */
@@ -31641,8 +31896,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_LOCSYMOCC =
meltgc_named_symbol ("CLASS_NREP_LOCSYMOCC", MELT_GET);
if (sy_CLASS_NREP_LOCSYMOCC
- && NULL == /*_.VALDATA___V1283*/ meltfptr[1282])
- /*_.VALDATA___V1283*/ meltfptr[1282] = (void *) sy_CLASS_NREP_LOCSYMOCC;
+ && NULL == /*_.VALDATA___V1286*/ meltfptr[1285])
+ /*_.VALDATA___V1286*/ meltfptr[1285] = (void *) sy_CLASS_NREP_LOCSYMOCC;
}
/*^getnamedsymbol */
@@ -31652,8 +31907,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_CLOSEDOCC =
meltgc_named_symbol ("CLASS_NREP_CLOSEDOCC", MELT_GET);
if (sy_CLASS_NREP_CLOSEDOCC
- && NULL == /*_.VALDATA___V1287*/ meltfptr[1286])
- /*_.VALDATA___V1287*/ meltfptr[1286] = (void *) sy_CLASS_NREP_CLOSEDOCC;
+ && NULL == /*_.VALDATA___V1290*/ meltfptr[1289])
+ /*_.VALDATA___V1290*/ meltfptr[1289] = (void *) sy_CLASS_NREP_CLOSEDOCC;
}
/*^getnamedsymbol */
@@ -31663,8 +31918,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_CONSTOCC =
meltgc_named_symbol ("CLASS_NREP_CONSTOCC", MELT_GET);
if (sy_CLASS_NREP_CONSTOCC
- && NULL == /*_.VALDATA___V1291*/ meltfptr[1290])
- /*_.VALDATA___V1291*/ meltfptr[1290] = (void *) sy_CLASS_NREP_CONSTOCC;
+ && NULL == /*_.VALDATA___V1294*/ meltfptr[1293])
+ /*_.VALDATA___V1294*/ meltfptr[1293] = (void *) sy_CLASS_NREP_CONSTOCC;
}
/*^getnamedsymbol */
@@ -31674,8 +31929,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DEFINED_CONSTANT =
meltgc_named_symbol ("CLASS_NREP_DEFINED_CONSTANT", MELT_GET);
if (sy_CLASS_NREP_DEFINED_CONSTANT
- && NULL == /*_.VALDATA___V1297*/ meltfptr[1296])
- /*_.VALDATA___V1297*/ meltfptr[1296] =
+ && NULL == /*_.VALDATA___V1300*/ meltfptr[1299])
+ /*_.VALDATA___V1300*/ meltfptr[1299] =
(void *) sy_CLASS_NREP_DEFINED_CONSTANT;
}
@@ -31686,8 +31941,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_QUASICONSTANT =
meltgc_named_symbol ("CLASS_NREP_QUASICONSTANT", MELT_GET);
if (sy_CLASS_NREP_QUASICONSTANT
- && NULL == /*_.VALDATA___V1301*/ meltfptr[1300])
- /*_.VALDATA___V1301*/ meltfptr[1300] =
+ && NULL == /*_.VALDATA___V1304*/ meltfptr[1303])
+ /*_.VALDATA___V1304*/ meltfptr[1303] =
(void *) sy_CLASS_NREP_QUASICONSTANT;
}
@@ -31700,8 +31955,8 @@ start_module_melt (void *modargp_)
("CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER",
MELT_GET);
if (sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER
- && NULL == /*_.VALDATA___V1305*/ meltfptr[1304])
- /*_.VALDATA___V1305*/ meltfptr[1304] =
+ && NULL == /*_.VALDATA___V1308*/ meltfptr[1307])
+ /*_.VALDATA___V1308*/ meltfptr[1307] =
(void *)
sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
}
@@ -31712,8 +31967,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_FOREVER =
meltgc_named_symbol ("CLASS_NREP_FOREVER", MELT_GET);
- if (sy_CLASS_NREP_FOREVER && NULL == /*_.VALDATA___V1310*/ meltfptr[1309])
- /*_.VALDATA___V1310*/ meltfptr[1309] = (void *) sy_CLASS_NREP_FOREVER;
+ if (sy_CLASS_NREP_FOREVER && NULL == /*_.VALDATA___V1313*/ meltfptr[1312])
+ /*_.VALDATA___V1313*/ meltfptr[1312] = (void *) sy_CLASS_NREP_FOREVER;
}
/*^getnamedsymbol */
@@ -31723,8 +31978,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_LABEL_BINDING =
meltgc_named_symbol ("CLASS_LABEL_BINDING", MELT_GET);
if (sy_CLASS_LABEL_BINDING
- && NULL == /*_.VALDATA___V1312*/ meltfptr[1311])
- /*_.VALDATA___V1312*/ meltfptr[1311] = (void *) sy_CLASS_LABEL_BINDING;
+ && NULL == /*_.VALDATA___V1315*/ meltfptr[1314])
+ /*_.VALDATA___V1315*/ meltfptr[1314] = (void *) sy_CLASS_LABEL_BINDING;
}
/*^getnamedsymbol */
@@ -31733,8 +31988,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_EXIT =
meltgc_named_symbol ("CLASS_NREP_EXIT", MELT_GET);
- if (sy_CLASS_NREP_EXIT && NULL == /*_.VALDATA___V1316*/ meltfptr[1315])
- /*_.VALDATA___V1316*/ meltfptr[1315] = (void *) sy_CLASS_NREP_EXIT;
+ if (sy_CLASS_NREP_EXIT && NULL == /*_.VALDATA___V1319*/ meltfptr[1318])
+ /*_.VALDATA___V1319*/ meltfptr[1318] = (void *) sy_CLASS_NREP_EXIT;
}
/*^getnamedsymbol */
@@ -31743,8 +31998,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_AGAIN =
meltgc_named_symbol ("CLASS_NREP_AGAIN", MELT_GET);
- if (sy_CLASS_NREP_AGAIN && NULL == /*_.VALDATA___V1320*/ meltfptr[1319])
- /*_.VALDATA___V1320*/ meltfptr[1319] = (void *) sy_CLASS_NREP_AGAIN;
+ if (sy_CLASS_NREP_AGAIN && NULL == /*_.VALDATA___V1323*/ meltfptr[1322])
+ /*_.VALDATA___V1323*/ meltfptr[1322] = (void *) sy_CLASS_NREP_AGAIN;
}
/*^getnamedsymbol */
@@ -31753,8 +32008,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_LET =
meltgc_named_symbol ("CLASS_NREP_LET", MELT_GET);
- if (sy_CLASS_NREP_LET && NULL == /*_.VALDATA___V1329*/ meltfptr[1328])
- /*_.VALDATA___V1329*/ meltfptr[1328] = (void *) sy_CLASS_NREP_LET;
+ if (sy_CLASS_NREP_LET && NULL == /*_.VALDATA___V1332*/ meltfptr[1331])
+ /*_.VALDATA___V1332*/ meltfptr[1331] = (void *) sy_CLASS_NREP_LET;
}
/*^getnamedsymbol */
@@ -31764,8 +32019,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_LET_BINDING =
meltgc_named_symbol ("CLASS_NORMAL_LET_BINDING", MELT_GET);
if (sy_CLASS_NORMAL_LET_BINDING
- && NULL == /*_.VALDATA___V1331*/ meltfptr[1330])
- /*_.VALDATA___V1331*/ meltfptr[1330] =
+ && NULL == /*_.VALDATA___V1334*/ meltfptr[1333])
+ /*_.VALDATA___V1334*/ meltfptr[1333] =
(void *) sy_CLASS_NORMAL_LET_BINDING;
}
@@ -31774,8 +32029,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_SEXPR */
{
melt_ptr_t sy_CLASS_SEXPR = meltgc_named_symbol ("CLASS_SEXPR", MELT_GET);
- if (sy_CLASS_SEXPR && NULL == /*_.VALDATA___V1333*/ meltfptr[1332])
- /*_.VALDATA___V1333*/ meltfptr[1332] = (void *) sy_CLASS_SEXPR;
+ if (sy_CLASS_SEXPR && NULL == /*_.VALDATA___V1336*/ meltfptr[1335])
+ /*_.VALDATA___V1336*/ meltfptr[1335] = (void *) sy_CLASS_SEXPR;
}
/*^getnamedsymbol */
@@ -31785,8 +32040,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_COMPILE_LETREC_FILL =
meltgc_named_symbol ("COMPILE_LETREC_FILL", MELT_GET);
if (sy_COMPILE_LETREC_FILL
- && NULL == /*_.VALDATA___V1335*/ meltfptr[1334])
- /*_.VALDATA___V1335*/ meltfptr[1334] = (void *) sy_COMPILE_LETREC_FILL;
+ && NULL == /*_.VALDATA___V1338*/ meltfptr[1337])
+ /*_.VALDATA___V1338*/ meltfptr[1337] = (void *) sy_COMPILE_LETREC_FILL;
}
/*^getnamedsymbol */
@@ -31794,8 +32049,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBVA */
{
melt_ptr_t sy_OBVA = meltgc_named_symbol ("OBVA", MELT_GET);
- if (sy_OBVA && NULL == /*_.VALDATA___V1338*/ meltfptr[1337])
- /*_.VALDATA___V1338*/ meltfptr[1337] = (void *) sy_OBVA;
+ if (sy_OBVA && NULL == /*_.VALDATA___V1341*/ meltfptr[1340])
+ /*_.VALDATA___V1341*/ meltfptr[1340] = (void *) sy_OBVA;
}
/*^getnamedsymbol */
@@ -31803,8 +32058,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:OBODL */
{
melt_ptr_t sy_OBODL = meltgc_named_symbol ("OBODL", MELT_GET);
- if (sy_OBODL && NULL == /*_.VALDATA___V1341*/ meltfptr[1340])
- /*_.VALDATA___V1341*/ meltfptr[1340] = (void *) sy_OBODL;
+ if (sy_OBODL && NULL == /*_.VALDATA___V1344*/ meltfptr[1343])
+ /*_.VALDATA___V1344*/ meltfptr[1343] = (void *) sy_OBODL;
}
/*^getnamedsymbol */
@@ -31812,8 +32067,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:GCX */
{
melt_ptr_t sy_GCX = meltgc_named_symbol ("GCX", MELT_GET);
- if (sy_GCX && NULL == /*_.VALDATA___V1344*/ meltfptr[1343])
- /*_.VALDATA___V1344*/ meltfptr[1343] = (void *) sy_GCX;
+ if (sy_GCX && NULL == /*_.VALDATA___V1347*/ meltfptr[1346])
+ /*_.VALDATA___V1347*/ meltfptr[1346] = (void *) sy_GCX;
}
/*^getnamedsymbol */
@@ -31821,8 +32076,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:SLOC */
{
melt_ptr_t sy_SLOC = meltgc_named_symbol ("SLOC", MELT_GET);
- if (sy_SLOC && NULL == /*_.VALDATA___V1347*/ meltfptr[1346])
- /*_.VALDATA___V1347*/ meltfptr[1346] = (void *) sy_SLOC;
+ if (sy_SLOC && NULL == /*_.VALDATA___V1350*/ meltfptr[1349])
+ /*_.VALDATA___V1350*/ meltfptr[1349] = (void *) sy_SLOC;
}
/*^getnamedsymbol */
@@ -31833,8 +32088,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING",
MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING
- && NULL == /*_.VALDATA___V1357*/ meltfptr[1356])
- /*_.VALDATA___V1357*/ meltfptr[1356] =
+ && NULL == /*_.VALDATA___V1360*/ meltfptr[1359])
+ /*_.VALDATA___V1360*/ meltfptr[1359] =
(void *) sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING;
}
@@ -31845,8 +32100,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTOR_BINDING =
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTOR_BINDING", MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTOR_BINDING
- && NULL == /*_.VALDATA___V1359*/ meltfptr[1358])
- /*_.VALDATA___V1359*/ meltfptr[1358] =
+ && NULL == /*_.VALDATA___V1362*/ meltfptr[1361])
+ /*_.VALDATA___V1362*/ meltfptr[1361] =
(void *) sy_CLASS_NORMAL_CONSTRUCTOR_BINDING;
}
@@ -31858,8 +32113,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING",
MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING
- && NULL == /*_.VALDATA___V1363*/ meltfptr[1362])
- /*_.VALDATA___V1363*/ meltfptr[1362] =
+ && NULL == /*_.VALDATA___V1366*/ meltfptr[1365])
+ /*_.VALDATA___V1366*/ meltfptr[1365] =
(void *) sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING;
}
@@ -31870,8 +32125,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING =
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING
- && NULL == /*_.VALDATA___V1367*/ meltfptr[1366])
- /*_.VALDATA___V1367*/ meltfptr[1366] =
+ && NULL == /*_.VALDATA___V1370*/ meltfptr[1369])
+ /*_.VALDATA___V1370*/ meltfptr[1369] =
(void *) sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING;
}
@@ -31882,8 +32137,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING =
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING
- && NULL == /*_.VALDATA___V1371*/ meltfptr[1370])
- /*_.VALDATA___V1371*/ meltfptr[1370] =
+ && NULL == /*_.VALDATA___V1374*/ meltfptr[1373])
+ /*_.VALDATA___V1374*/ meltfptr[1373] =
(void *) sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING;
}
@@ -31895,8 +32150,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING",
MELT_GET);
if (sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING
- && NULL == /*_.VALDATA___V1375*/ meltfptr[1374])
- /*_.VALDATA___V1375*/ meltfptr[1374] =
+ && NULL == /*_.VALDATA___V1378*/ meltfptr[1377])
+ /*_.VALDATA___V1378*/ meltfptr[1377] =
(void *) sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING;
}
@@ -31907,8 +32162,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_VALUE_BINDING =
meltgc_named_symbol ("CLASS_VALUE_BINDING", MELT_GET);
if (sy_CLASS_VALUE_BINDING
- && NULL == /*_.VALDATA___V1377*/ meltfptr[1376])
- /*_.VALDATA___V1377*/ meltfptr[1376] = (void *) sy_CLASS_VALUE_BINDING;
+ && NULL == /*_.VALDATA___V1380*/ meltfptr[1379])
+ /*_.VALDATA___V1380*/ meltfptr[1379] = (void *) sy_CLASS_VALUE_BINDING;
}
/*^getnamedsymbol */
@@ -31918,8 +32173,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_CLASS_BINDING =
meltgc_named_symbol ("CLASS_CLASS_BINDING", MELT_GET);
if (sy_CLASS_CLASS_BINDING
- && NULL == /*_.VALDATA___V1379*/ meltfptr[1378])
- /*_.VALDATA___V1379*/ meltfptr[1378] = (void *) sy_CLASS_CLASS_BINDING;
+ && NULL == /*_.VALDATA___V1382*/ meltfptr[1381])
+ /*_.VALDATA___V1382*/ meltfptr[1381] = (void *) sy_CLASS_CLASS_BINDING;
}
/*^getnamedsymbol */
@@ -31927,8 +32182,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_CLASS */
{
melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET);
- if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V1381*/ meltfptr[1380])
- /*_.VALDATA___V1381*/ meltfptr[1380] = (void *) sy_CLASS_CLASS;
+ if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V1384*/ meltfptr[1383])
+ /*_.VALDATA___V1384*/ meltfptr[1383] = (void *) sy_CLASS_CLASS;
}
/*^getnamedsymbol */
@@ -31937,8 +32192,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_LETREC =
meltgc_named_symbol ("CLASS_NREP_LETREC", MELT_GET);
- if (sy_CLASS_NREP_LETREC && NULL == /*_.VALDATA___V1385*/ meltfptr[1384])
- /*_.VALDATA___V1385*/ meltfptr[1384] = (void *) sy_CLASS_NREP_LETREC;
+ if (sy_CLASS_NREP_LETREC && NULL == /*_.VALDATA___V1388*/ meltfptr[1387])
+ /*_.VALDATA___V1388*/ meltfptr[1387] = (void *) sy_CLASS_NREP_LETREC;
}
/*^getnamedsymbol */
@@ -31947,8 +32202,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SYMOCC =
meltgc_named_symbol ("CLASS_NREP_SYMOCC", MELT_GET);
- if (sy_CLASS_NREP_SYMOCC && NULL == /*_.VALDATA___V1387*/ meltfptr[1386])
- /*_.VALDATA___V1387*/ meltfptr[1386] = (void *) sy_CLASS_NREP_SYMOCC;
+ if (sy_CLASS_NREP_SYMOCC && NULL == /*_.VALDATA___V1390*/ meltfptr[1389])
+ /*_.VALDATA___V1390*/ meltfptr[1389] = (void *) sy_CLASS_NREP_SYMOCC;
}
/*^getnamedsymbol */
@@ -31958,8 +32213,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_CITERATION =
meltgc_named_symbol ("CLASS_NREP_CITERATION", MELT_GET);
if (sy_CLASS_NREP_CITERATION
- && NULL == /*_.VALDATA___V1396*/ meltfptr[1395])
- /*_.VALDATA___V1396*/ meltfptr[1395] =
+ && NULL == /*_.VALDATA___V1399*/ meltfptr[1398])
+ /*_.VALDATA___V1399*/ meltfptr[1398] =
(void *) sy_CLASS_NREP_CITERATION;
}
@@ -31969,8 +32224,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CITERATOR =
meltgc_named_symbol ("CLASS_CITERATOR", MELT_GET);
- if (sy_CLASS_CITERATOR && NULL == /*_.VALDATA___V1398*/ meltfptr[1397])
- /*_.VALDATA___V1398*/ meltfptr[1397] = (void *) sy_CLASS_CITERATOR;
+ if (sy_CLASS_CITERATOR && NULL == /*_.VALDATA___V1401*/ meltfptr[1400])
+ /*_.VALDATA___V1401*/ meltfptr[1400] = (void *) sy_CLASS_CITERATOR;
}
/*^getnamedsymbol */
@@ -31979,8 +32234,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SETQ =
meltgc_named_symbol ("CLASS_NREP_SETQ", MELT_GET);
- if (sy_CLASS_NREP_SETQ && NULL == /*_.VALDATA___V1402*/ meltfptr[1401])
- /*_.VALDATA___V1402*/ meltfptr[1401] = (void *) sy_CLASS_NREP_SETQ;
+ if (sy_CLASS_NREP_SETQ && NULL == /*_.VALDATA___V1405*/ meltfptr[1404])
+ /*_.VALDATA___V1405*/ meltfptr[1404] = (void *) sy_CLASS_NREP_SETQ;
}
/*^getnamedsymbol */
@@ -31989,8 +32244,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_PROGN =
meltgc_named_symbol ("CLASS_NREP_PROGN", MELT_GET);
- if (sy_CLASS_NREP_PROGN && NULL == /*_.VALDATA___V1407*/ meltfptr[1406])
- /*_.VALDATA___V1407*/ meltfptr[1406] = (void *) sy_CLASS_NREP_PROGN;
+ if (sy_CLASS_NREP_PROGN && NULL == /*_.VALDATA___V1410*/ meltfptr[1409])
+ /*_.VALDATA___V1410*/ meltfptr[1409] = (void *) sy_CLASS_NREP_PROGN;
}
/*^getnamedsymbol */
@@ -31999,8 +32254,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_MULTACC =
meltgc_named_symbol ("CLASS_NREP_MULTACC", MELT_GET);
- if (sy_CLASS_NREP_MULTACC && NULL == /*_.VALDATA___V1412*/ meltfptr[1411])
- /*_.VALDATA___V1412*/ meltfptr[1411] = (void *) sy_CLASS_NREP_MULTACC;
+ if (sy_CLASS_NREP_MULTACC && NULL == /*_.VALDATA___V1415*/ meltfptr[1414])
+ /*_.VALDATA___V1415*/ meltfptr[1414] = (void *) sy_CLASS_NREP_MULTACC;
}
/*^getnamedsymbol */
@@ -32010,8 +32265,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_FIELDACC =
meltgc_named_symbol ("CLASS_NREP_FIELDACC", MELT_GET);
if (sy_CLASS_NREP_FIELDACC
- && NULL == /*_.VALDATA___V1417*/ meltfptr[1416])
- /*_.VALDATA___V1417*/ meltfptr[1416] = (void *) sy_CLASS_NREP_FIELDACC;
+ && NULL == /*_.VALDATA___V1420*/ meltfptr[1419])
+ /*_.VALDATA___V1420*/ meltfptr[1419] = (void *) sy_CLASS_NREP_FIELDACC;
}
/*^getnamedsymbol */
@@ -32019,8 +32274,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_FIELD */
{
melt_ptr_t sy_CLASS_FIELD = meltgc_named_symbol ("CLASS_FIELD", MELT_GET);
- if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V1419*/ meltfptr[1418])
- /*_.VALDATA___V1419*/ meltfptr[1418] = (void *) sy_CLASS_FIELD;
+ if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V1422*/ meltfptr[1421])
+ /*_.VALDATA___V1422*/ meltfptr[1421] = (void *) sy_CLASS_FIELD;
}
/*^getnamedsymbol */
@@ -32030,8 +32285,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATAINSTANCE =
meltgc_named_symbol ("CLASS_NREP_DATAINSTANCE", MELT_GET);
if (sy_CLASS_NREP_DATAINSTANCE
- && NULL == /*_.VALDATA___V1421*/ meltfptr[1420])
- /*_.VALDATA___V1421*/ meltfptr[1420] =
+ && NULL == /*_.VALDATA___V1424*/ meltfptr[1423])
+ /*_.VALDATA___V1424*/ meltfptr[1423] =
(void *) sy_CLASS_NREP_DATAINSTANCE;
}
@@ -32042,8 +32297,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_UNSAFE_GET_FIELD =
meltgc_named_symbol ("CLASS_NREP_UNSAFE_GET_FIELD", MELT_GET);
if (sy_CLASS_NREP_UNSAFE_GET_FIELD
- && NULL == /*_.VALDATA___V1425*/ meltfptr[1424])
- /*_.VALDATA___V1425*/ meltfptr[1424] =
+ && NULL == /*_.VALDATA___V1428*/ meltfptr[1427])
+ /*_.VALDATA___V1428*/ meltfptr[1427] =
(void *) sy_CLASS_NREP_UNSAFE_GET_FIELD;
}
@@ -32054,8 +32309,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_UNSAFE_PUT_FIELDS =
meltgc_named_symbol ("CLASS_NREP_UNSAFE_PUT_FIELDS", MELT_GET);
if (sy_CLASS_NREP_UNSAFE_PUT_FIELDS
- && NULL == /*_.VALDATA___V1430*/ meltfptr[1429])
- /*_.VALDATA___V1430*/ meltfptr[1429] =
+ && NULL == /*_.VALDATA___V1433*/ meltfptr[1432])
+ /*_.VALDATA___V1433*/ meltfptr[1432] =
(void *) sy_CLASS_NREP_UNSAFE_PUT_FIELDS;
}
@@ -32066,8 +32321,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_FIELDASSIGN =
meltgc_named_symbol ("CLASS_NREP_FIELDASSIGN", MELT_GET);
if (sy_CLASS_NREP_FIELDASSIGN
- && NULL == /*_.VALDATA___V1432*/ meltfptr[1431])
- /*_.VALDATA___V1432*/ meltfptr[1431] =
+ && NULL == /*_.VALDATA___V1435*/ meltfptr[1434])
+ /*_.VALDATA___V1435*/ meltfptr[1434] =
(void *) sy_CLASS_NREP_FIELDASSIGN;
}
@@ -32078,8 +32333,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_UNSAFE_NTH_COMPONENT =
meltgc_named_symbol ("CLASS_NREP_UNSAFE_NTH_COMPONENT", MELT_GET);
if (sy_CLASS_NREP_UNSAFE_NTH_COMPONENT
- && NULL == /*_.VALDATA___V1436*/ meltfptr[1435])
- /*_.VALDATA___V1436*/ meltfptr[1435] =
+ && NULL == /*_.VALDATA___V1439*/ meltfptr[1438])
+ /*_.VALDATA___V1439*/ meltfptr[1438] =
(void *) sy_CLASS_NREP_UNSAFE_NTH_COMPONENT;
}
@@ -32089,8 +32344,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_APPLY =
meltgc_named_symbol ("CLASS_NREP_APPLY", MELT_GET);
- if (sy_CLASS_NREP_APPLY && NULL == /*_.VALDATA___V1441*/ meltfptr[1440])
- /*_.VALDATA___V1441*/ meltfptr[1440] = (void *) sy_CLASS_NREP_APPLY;
+ if (sy_CLASS_NREP_APPLY && NULL == /*_.VALDATA___V1444*/ meltfptr[1443])
+ /*_.VALDATA___V1444*/ meltfptr[1443] = (void *) sy_CLASS_NREP_APPLY;
}
/*^getnamedsymbol */
@@ -32100,8 +32355,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MULTIAPPLY =
meltgc_named_symbol ("CLASS_NREP_MULTIAPPLY", MELT_GET);
if (sy_CLASS_NREP_MULTIAPPLY
- && NULL == /*_.VALDATA___V1450*/ meltfptr[1449])
- /*_.VALDATA___V1450*/ meltfptr[1449] =
+ && NULL == /*_.VALDATA___V1453*/ meltfptr[1452])
+ /*_.VALDATA___V1453*/ meltfptr[1452] =
(void *) sy_CLASS_NREP_MULTIAPPLY;
}
@@ -32111,8 +32366,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_MSEND =
meltgc_named_symbol ("CLASS_NREP_MSEND", MELT_GET);
- if (sy_CLASS_NREP_MSEND && NULL == /*_.VALDATA___V1455*/ meltfptr[1454])
- /*_.VALDATA___V1455*/ meltfptr[1454] = (void *) sy_CLASS_NREP_MSEND;
+ if (sy_CLASS_NREP_MSEND && NULL == /*_.VALDATA___V1458*/ meltfptr[1457])
+ /*_.VALDATA___V1458*/ meltfptr[1457] = (void *) sy_CLASS_NREP_MSEND;
}
/*^getnamedsymbol */
@@ -32122,8 +32377,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MULTIMSEND =
meltgc_named_symbol ("CLASS_NREP_MULTIMSEND", MELT_GET);
if (sy_CLASS_NREP_MULTIMSEND
- && NULL == /*_.VALDATA___V1463*/ meltfptr[1462])
- /*_.VALDATA___V1463*/ meltfptr[1462] =
+ && NULL == /*_.VALDATA___V1466*/ meltfptr[1465])
+ /*_.VALDATA___V1466*/ meltfptr[1465] =
(void *) sy_CLASS_NREP_MULTIMSEND;
}
@@ -32133,8 +32388,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CTYPE_CSTRING =
meltgc_named_symbol ("CTYPE_CSTRING", MELT_GET);
- if (sy_CTYPE_CSTRING && NULL == /*_.VALDATA___V1489*/ meltfptr[1488])
- /*_.VALDATA___V1489*/ meltfptr[1488] = (void *) sy_CTYPE_CSTRING;
+ if (sy_CTYPE_CSTRING && NULL == /*_.VALDATA___V1492*/ meltfptr[1491])
+ /*_.VALDATA___V1492*/ meltfptr[1491] = (void *) sy_CTYPE_CSTRING;
}
/*^getnamedsymbol */
@@ -32144,8 +32399,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_NULL_RECEIVER =
meltgc_named_symbol ("DISCR_NULL_RECEIVER", MELT_GET);
if (sy_DISCR_NULL_RECEIVER
- && NULL == /*_.VALDATA___V1493*/ meltfptr[1492])
- /*_.VALDATA___V1493*/ meltfptr[1492] = (void *) sy_DISCR_NULL_RECEIVER;
+ && NULL == /*_.VALDATA___V1496*/ meltfptr[1495])
+ /*_.VALDATA___V1496*/ meltfptr[1495] = (void *) sy_DISCR_NULL_RECEIVER;
}
/*^getnamedsymbol */
@@ -32154,8 +32409,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_IF =
meltgc_named_symbol ("CLASS_NREP_IF", MELT_GET);
- if (sy_CLASS_NREP_IF && NULL == /*_.VALDATA___V1505*/ meltfptr[1504])
- /*_.VALDATA___V1505*/ meltfptr[1504] = (void *) sy_CLASS_NREP_IF;
+ if (sy_CLASS_NREP_IF && NULL == /*_.VALDATA___V1508*/ meltfptr[1507])
+ /*_.VALDATA___V1508*/ meltfptr[1507] = (void *) sy_CLASS_NREP_IF;
}
/*^getnamedsymbol */
@@ -32164,8 +32419,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_IFISA =
meltgc_named_symbol ("CLASS_NREP_IFISA", MELT_GET);
- if (sy_CLASS_NREP_IFISA && NULL == /*_.VALDATA___V1509*/ meltfptr[1508])
- /*_.VALDATA___V1509*/ meltfptr[1508] = (void *) sy_CLASS_NREP_IFISA;
+ if (sy_CLASS_NREP_IFISA && NULL == /*_.VALDATA___V1512*/ meltfptr[1511])
+ /*_.VALDATA___V1512*/ meltfptr[1511] = (void *) sy_CLASS_NREP_IFISA;
}
/*^getnamedsymbol */
@@ -32175,20 +32430,32 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_IFTESTVALUE =
meltgc_named_symbol ("CLASS_NREP_IFTESTVALUE", MELT_GET);
if (sy_CLASS_NREP_IFTESTVALUE
- && NULL == /*_.VALDATA___V1511*/ meltfptr[1510])
- /*_.VALDATA___V1511*/ meltfptr[1510] =
+ && NULL == /*_.VALDATA___V1514*/ meltfptr[1513])
+ /*_.VALDATA___V1514*/ meltfptr[1513] =
(void *) sy_CLASS_NREP_IFTESTVALUE;
}
/*^getnamedsymbol */
+ /*getnamedsym:CLASS_NREP_IFTUPLESIZED */
+ {
+ melt_ptr_t sy_CLASS_NREP_IFTUPLESIZED =
+ meltgc_named_symbol ("CLASS_NREP_IFTUPLESIZED", MELT_GET);
+ if (sy_CLASS_NREP_IFTUPLESIZED
+ && NULL == /*_.VALDATA___V1518*/ meltfptr[1517])
+ /*_.VALDATA___V1518*/ meltfptr[1517] =
+ (void *) sy_CLASS_NREP_IFTUPLESIZED;
+ }
+
+ /*^getnamedsymbol */
+
/*getnamedsym:CLASS_NREP_IFVARIADIC */
{
melt_ptr_t sy_CLASS_NREP_IFVARIADIC =
meltgc_named_symbol ("CLASS_NREP_IFVARIADIC", MELT_GET);
if (sy_CLASS_NREP_IFVARIADIC
- && NULL == /*_.VALDATA___V1515*/ meltfptr[1514])
- /*_.VALDATA___V1515*/ meltfptr[1514] =
+ && NULL == /*_.VALDATA___V1522*/ meltfptr[1521])
+ /*_.VALDATA___V1522*/ meltfptr[1521] =
(void *) sy_CLASS_NREP_IFVARIADIC;
}
@@ -32199,8 +32466,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_VARIADIC_ARGUMENT =
meltgc_named_symbol ("CLASS_NREP_VARIADIC_ARGUMENT", MELT_GET);
if (sy_CLASS_NREP_VARIADIC_ARGUMENT
- && NULL == /*_.VALDATA___V1521*/ meltfptr[1520])
- /*_.VALDATA___V1521*/ meltfptr[1520] =
+ && NULL == /*_.VALDATA___V1528*/ meltfptr[1527])
+ /*_.VALDATA___V1528*/ meltfptr[1527] =
(void *) sy_CLASS_NREP_VARIADIC_ARGUMENT;
}
@@ -32211,8 +32478,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_CONSUME_VARIADIC =
meltgc_named_symbol ("CLASS_NREP_CONSUME_VARIADIC", MELT_GET);
if (sy_CLASS_NREP_CONSUME_VARIADIC
- && NULL == /*_.VALDATA___V1525*/ meltfptr[1524])
- /*_.VALDATA___V1525*/ meltfptr[1524] =
+ && NULL == /*_.VALDATA___V1532*/ meltfptr[1531])
+ /*_.VALDATA___V1532*/ meltfptr[1531] =
(void *) sy_CLASS_NREP_CONSUME_VARIADIC;
}
@@ -32222,8 +32489,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_CPPIF =
meltgc_named_symbol ("CLASS_NREP_CPPIF", MELT_GET);
- if (sy_CLASS_NREP_CPPIF && NULL == /*_.VALDATA___V1531*/ meltfptr[1530])
- /*_.VALDATA___V1531*/ meltfptr[1530] = (void *) sy_CLASS_NREP_CPPIF;
+ if (sy_CLASS_NREP_CPPIF && NULL == /*_.VALDATA___V1538*/ meltfptr[1537])
+ /*_.VALDATA___V1538*/ meltfptr[1537] = (void *) sy_CLASS_NREP_CPPIF;
}
/*^getnamedsymbol */
@@ -32232,8 +32499,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_RETURN =
meltgc_named_symbol ("CLASS_NREP_RETURN", MELT_GET);
- if (sy_CLASS_NREP_RETURN && NULL == /*_.VALDATA___V1538*/ meltfptr[1537])
- /*_.VALDATA___V1538*/ meltfptr[1537] = (void *) sy_CLASS_NREP_RETURN;
+ if (sy_CLASS_NREP_RETURN && NULL == /*_.VALDATA___V1545*/ meltfptr[1544])
+ /*_.VALDATA___V1545*/ meltfptr[1544] = (void *) sy_CLASS_NREP_RETURN;
}
/*^getnamedsymbol */
@@ -32243,8 +32510,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCRCLOSURE_OBJPREDEF =
meltgc_named_symbol ("DISCRCLOSURE_OBJPREDEF", MELT_GET);
if (sy_DISCRCLOSURE_OBJPREDEF
- && NULL == /*_.VALDATA___V1541*/ meltfptr[1540])
- /*_.VALDATA___V1541*/ meltfptr[1540] =
+ && NULL == /*_.VALDATA___V1548*/ meltfptr[1547])
+ /*_.VALDATA___V1548*/ meltfptr[1547] =
(void *) sy_DISCRCLOSURE_OBJPREDEF;
}
@@ -32254,8 +32521,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_CLOSURE =
meltgc_named_symbol ("DISCR_CLOSURE", MELT_GET);
- if (sy_DISCR_CLOSURE && NULL == /*_.VALDATA___V1544*/ meltfptr[1543])
- /*_.VALDATA___V1544*/ meltfptr[1543] = (void *) sy_DISCR_CLOSURE;
+ if (sy_DISCR_CLOSURE && NULL == /*_.VALDATA___V1551*/ meltfptr[1550])
+ /*_.VALDATA___V1551*/ meltfptr[1550] = (void *) sy_DISCR_CLOSURE;
}
/*^getnamedsymbol */
@@ -32264,8 +32531,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_LAMBDA =
meltgc_named_symbol ("CLASS_NREP_LAMBDA", MELT_GET);
- if (sy_CLASS_NREP_LAMBDA && NULL == /*_.VALDATA___V1549*/ meltfptr[1548])
- /*_.VALDATA___V1549*/ meltfptr[1548] = (void *) sy_CLASS_NREP_LAMBDA;
+ if (sy_CLASS_NREP_LAMBDA && NULL == /*_.VALDATA___V1556*/ meltfptr[1555])
+ /*_.VALDATA___V1556*/ meltfptr[1555] = (void *) sy_CLASS_NREP_LAMBDA;
}
/*^getnamedsymbol */
@@ -32275,8 +32542,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_INSTANCE =
meltgc_named_symbol ("CLASS_NREP_INSTANCE", MELT_GET);
if (sy_CLASS_NREP_INSTANCE
- && NULL == /*_.VALDATA___V1556*/ meltfptr[1555])
- /*_.VALDATA___V1556*/ meltfptr[1555] = (void *) sy_CLASS_NREP_INSTANCE;
+ && NULL == /*_.VALDATA___V1563*/ meltfptr[1562])
+ /*_.VALDATA___V1563*/ meltfptr[1562] = (void *) sy_CLASS_NREP_INSTANCE;
}
/*^getnamedsymbol */
@@ -32284,8 +32551,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:INST */
{
melt_ptr_t sy_INST = meltgc_named_symbol ("INST", MELT_GET);
- if (sy_INST && NULL == /*_.VALDATA___V1552*/ meltfptr[1551])
- /*_.VALDATA___V1552*/ meltfptr[1551] = (void *) sy_INST;
+ if (sy_INST && NULL == /*_.VALDATA___V1559*/ meltfptr[1558])
+ /*_.VALDATA___V1559*/ meltfptr[1558] = (void *) sy_INST;
}
/*^getnamedsymbol */
@@ -32294,8 +32561,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_PREDEF =
meltgc_named_symbol ("CLASS_NREP_PREDEF", MELT_GET);
- if (sy_CLASS_NREP_PREDEF && NULL == /*_.VALDATA___V1562*/ meltfptr[1561])
- /*_.VALDATA___V1562*/ meltfptr[1561] = (void *) sy_CLASS_NREP_PREDEF;
+ if (sy_CLASS_NREP_PREDEF && NULL == /*_.VALDATA___V1569*/ meltfptr[1568])
+ /*_.VALDATA___V1569*/ meltfptr[1568] = (void *) sy_CLASS_NREP_PREDEF;
}
/*^getnamedsymbol */
@@ -32303,8 +32570,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALDATA_ */
{
melt_ptr_t sy_VALDATA_ = meltgc_named_symbol ("_VALDATA_", MELT_GET);
- if (sy_VALDATA_ && NULL == /*_.VALDATA___V1565*/ meltfptr[1564])
- /*_.VALDATA___V1565*/ meltfptr[1564] = (void *) sy_VALDATA_;
+ if (sy_VALDATA_ && NULL == /*_.VALDATA___V1572*/ meltfptr[1571])
+ /*_.VALDATA___V1572*/ meltfptr[1571] = (void *) sy_VALDATA_;
}
/*^getnamedsymbol */
@@ -32312,8 +32579,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALUEDATA_ */
{
melt_ptr_t sy_VALUEDATA_ = meltgc_named_symbol ("_VALUEDATA_", MELT_GET);
- if (sy_VALUEDATA_ && NULL == /*_.VALDATA___V1567*/ meltfptr[1566])
- /*_.VALDATA___V1567*/ meltfptr[1566] = (void *) sy_VALUEDATA_;
+ if (sy_VALUEDATA_ && NULL == /*_.VALDATA___V1574*/ meltfptr[1573])
+ /*_.VALDATA___V1574*/ meltfptr[1573] = (void *) sy_VALUEDATA_;
}
/*^getnamedsymbol */
@@ -32323,8 +32590,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATATUPLE =
meltgc_named_symbol ("CLASS_NREP_DATATUPLE", MELT_GET);
if (sy_CLASS_NREP_DATATUPLE
- && NULL == /*_.VALDATA___V1589*/ meltfptr[1588])
- /*_.VALDATA___V1589*/ meltfptr[1588] = (void *) sy_CLASS_NREP_DATATUPLE;
+ && NULL == /*_.VALDATA___V1596*/ meltfptr[1595])
+ /*_.VALDATA___V1596*/ meltfptr[1595] = (void *) sy_CLASS_NREP_DATATUPLE;
}
/*^getnamedsymbol */
@@ -32332,8 +32599,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALTUP_ */
{
melt_ptr_t sy_VALTUP_ = meltgc_named_symbol ("_VALTUP_", MELT_GET);
- if (sy_VALTUP_ && NULL == /*_.VALDATA___V1583*/ meltfptr[1582])
- /*_.VALDATA___V1583*/ meltfptr[1582] = (void *) sy_VALTUP_;
+ if (sy_VALTUP_ && NULL == /*_.VALDATA___V1590*/ meltfptr[1589])
+ /*_.VALDATA___V1590*/ meltfptr[1589] = (void *) sy_VALTUP_;
}
/*^getnamedsymbol */
@@ -32341,8 +32608,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_INITUP_ */
{
melt_ptr_t sy_INITUP_ = meltgc_named_symbol ("_INITUP_", MELT_GET);
- if (sy_INITUP_ && NULL == /*_.VALDATA___V1585*/ meltfptr[1584])
- /*_.VALDATA___V1585*/ meltfptr[1584] = (void *) sy_INITUP_;
+ if (sy_INITUP_ && NULL == /*_.VALDATA___V1592*/ meltfptr[1591])
+ /*_.VALDATA___V1592*/ meltfptr[1591] = (void *) sy_INITUP_;
}
/*^getnamedsymbol */
@@ -32352,8 +32619,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATASTRING =
meltgc_named_symbol ("CLASS_NREP_DATASTRING", MELT_GET);
if (sy_CLASS_NREP_DATASTRING
- && NULL == /*_.VALDATA___V1595*/ meltfptr[1594])
- /*_.VALDATA___V1595*/ meltfptr[1594] =
+ && NULL == /*_.VALDATA___V1602*/ meltfptr[1601])
+ /*_.VALDATA___V1602*/ meltfptr[1601] =
(void *) sy_CLASS_NREP_DATASTRING;
}
@@ -32362,8 +32629,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALSTR_ */
{
melt_ptr_t sy_VALSTR_ = meltgc_named_symbol ("_VALSTR_", MELT_GET);
- if (sy_VALSTR_ && NULL == /*_.VALDATA___V1592*/ meltfptr[1591])
- /*_.VALDATA___V1592*/ meltfptr[1591] = (void *) sy_VALSTR_;
+ if (sy_VALSTR_ && NULL == /*_.VALDATA___V1599*/ meltfptr[1598])
+ /*_.VALDATA___V1599*/ meltfptr[1598] = (void *) sy_VALSTR_;
}
/*^getnamedsymbol */
@@ -32373,8 +32640,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATABOXEDINTEGER =
meltgc_named_symbol ("CLASS_NREP_DATABOXEDINTEGER", MELT_GET);
if (sy_CLASS_NREP_DATABOXEDINTEGER
- && NULL == /*_.VALDATA___V1601*/ meltfptr[1600])
- /*_.VALDATA___V1601*/ meltfptr[1600] =
+ && NULL == /*_.VALDATA___V1608*/ meltfptr[1607])
+ /*_.VALDATA___V1608*/ meltfptr[1607] =
(void *) sy_CLASS_NREP_DATABOXEDINTEGER;
}
@@ -32383,8 +32650,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALBXINT_ */
{
melt_ptr_t sy_VALBXINT_ = meltgc_named_symbol ("_VALBXINT_", MELT_GET);
- if (sy_VALBXINT_ && NULL == /*_.VALDATA___V1598*/ meltfptr[1597])
- /*_.VALDATA___V1598*/ meltfptr[1597] = (void *) sy_VALBXINT_;
+ if (sy_VALBXINT_ && NULL == /*_.VALDATA___V1605*/ meltfptr[1604])
+ /*_.VALDATA___V1605*/ meltfptr[1604] = (void *) sy_VALBXINT_;
}
/*^getnamedsymbol */
@@ -32394,8 +32661,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATACLOSURE =
meltgc_named_symbol ("CLASS_NREP_DATACLOSURE", MELT_GET);
if (sy_CLASS_NREP_DATACLOSURE
- && NULL == /*_.VALDATA___V1610*/ meltfptr[1609])
- /*_.VALDATA___V1610*/ meltfptr[1609] =
+ && NULL == /*_.VALDATA___V1617*/ meltfptr[1616])
+ /*_.VALDATA___V1617*/ meltfptr[1616] =
(void *) sy_CLASS_NREP_DATACLOSURE;
}
@@ -32404,8 +32671,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALCLO_ */
{
melt_ptr_t sy_VALCLO_ = meltgc_named_symbol ("_VALCLO_", MELT_GET);
- if (sy_VALCLO_ && NULL == /*_.VALDATA___V1604*/ meltfptr[1603])
- /*_.VALDATA___V1604*/ meltfptr[1603] = (void *) sy_VALCLO_;
+ if (sy_VALCLO_ && NULL == /*_.VALDATA___V1611*/ meltfptr[1610])
+ /*_.VALDATA___V1611*/ meltfptr[1610] = (void *) sy_VALCLO_;
}
/*^getnamedsymbol */
@@ -32414,8 +32681,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DATACLOSURE_ =
meltgc_named_symbol ("_DATACLOSURE_", MELT_GET);
- if (sy_DATACLOSURE_ && NULL == /*_.VALDATA___V1606*/ meltfptr[1605])
- /*_.VALDATA___V1606*/ meltfptr[1605] = (void *) sy_DATACLOSURE_;
+ if (sy_DATACLOSURE_ && NULL == /*_.VALDATA___V1613*/ meltfptr[1612])
+ /*_.VALDATA___V1613*/ meltfptr[1612] = (void *) sy_DATACLOSURE_;
}
/*^getnamedsymbol */
@@ -32425,8 +32692,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_DATAROUTINE =
meltgc_named_symbol ("CLASS_NREP_DATAROUTINE", MELT_GET);
if (sy_CLASS_NREP_DATAROUTINE
- && NULL == /*_.VALDATA___V1612*/ meltfptr[1611])
- /*_.VALDATA___V1612*/ meltfptr[1611] =
+ && NULL == /*_.VALDATA___V1619*/ meltfptr[1618])
+ /*_.VALDATA___V1619*/ meltfptr[1618] =
(void *) sy_CLASS_NREP_DATAROUTINE;
}
@@ -32435,8 +32702,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_VALROUT_ */
{
melt_ptr_t sy_VALROUT_ = meltgc_named_symbol ("_VALROUT_", MELT_GET);
- if (sy_VALROUT_ && NULL == /*_.VALDATA___V1615*/ meltfptr[1614])
- /*_.VALDATA___V1615*/ meltfptr[1614] = (void *) sy_VALROUT_;
+ if (sy_VALROUT_ && NULL == /*_.VALDATA___V1622*/ meltfptr[1621])
+ /*_.VALDATA___V1622*/ meltfptr[1621] = (void *) sy_VALROUT_;
}
/*^getnamedsymbol */
@@ -32444,8 +32711,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_IROUTVAL_ */
{
melt_ptr_t sy_IROUTVAL_ = meltgc_named_symbol ("_IROUTVAL_", MELT_GET);
- if (sy_IROUTVAL_ && NULL == /*_.VALDATA___V1617*/ meltfptr[1616])
- /*_.VALDATA___V1617*/ meltfptr[1616] = (void *) sy_IROUTVAL_;
+ if (sy_IROUTVAL_ && NULL == /*_.VALDATA___V1624*/ meltfptr[1623])
+ /*_.VALDATA___V1624*/ meltfptr[1623] = (void *) sy_IROUTVAL_;
}
/*^getnamedsymbol */
@@ -32455,8 +32722,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_QUASIDATA =
meltgc_named_symbol ("CLASS_NREP_QUASIDATA", MELT_GET);
if (sy_CLASS_NREP_QUASIDATA
- && NULL == /*_.VALDATA___V1621*/ meltfptr[1620])
- /*_.VALDATA___V1621*/ meltfptr[1620] = (void *) sy_CLASS_NREP_QUASIDATA;
+ && NULL == /*_.VALDATA___V1628*/ meltfptr[1627])
+ /*_.VALDATA___V1628*/ meltfptr[1627] = (void *) sy_CLASS_NREP_QUASIDATA;
}
/*^getnamedsymbol */
@@ -32467,8 +32734,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol
("CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET);
if (sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER
- && NULL == /*_.VALDATA___V1625*/ meltfptr[1624])
- /*_.VALDATA___V1625*/ meltfptr[1624] =
+ && NULL == /*_.VALDATA___V1632*/ meltfptr[1631])
+ /*_.VALDATA___V1632*/ meltfptr[1631] =
(void *) sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
}
@@ -32480,8 +32747,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol ("CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT",
MELT_GET);
if (sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT
- && NULL == /*_.VALDATA___V1629*/ meltfptr[1628])
- /*_.VALDATA___V1629*/ meltfptr[1628] =
+ && NULL == /*_.VALDATA___V1636*/ meltfptr[1635])
+ /*_.VALDATA___V1636*/ meltfptr[1635] =
(void *) sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT;
}
@@ -32492,8 +32759,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_STORE_PREDEFINED =
meltgc_named_symbol ("CLASS_NREP_STORE_PREDEFINED", MELT_GET);
if (sy_CLASS_NREP_STORE_PREDEFINED
- && NULL == /*_.VALDATA___V1633*/ meltfptr[1632])
- /*_.VALDATA___V1633*/ meltfptr[1632] =
+ && NULL == /*_.VALDATA___V1640*/ meltfptr[1639])
+ /*_.VALDATA___V1640*/ meltfptr[1639] =
(void *) sy_CLASS_NREP_STORE_PREDEFINED;
}
@@ -32505,8 +32772,8 @@ start_module_melt (void *modargp_)
meltgc_named_symbol
("CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET);
if (sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER
- && NULL == /*_.VALDATA___V1640*/ meltfptr[1639])
- /*_.VALDATA___V1640*/ meltfptr[1639] =
+ && NULL == /*_.VALDATA___V1647*/ meltfptr[1646])
+ /*_.VALDATA___V1647*/ meltfptr[1646] =
(void *) sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER;
}
@@ -32516,8 +32783,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_COMPILE_MATCHER =
meltgc_named_symbol ("COMPILE_MATCHER", MELT_GET);
- if (sy_COMPILE_MATCHER && NULL == /*_.VALDATA___V1642*/ meltfptr[1641])
- /*_.VALDATA___V1642*/ meltfptr[1641] = (void *) sy_COMPILE_MATCHER;
+ if (sy_COMPILE_MATCHER && NULL == /*_.VALDATA___V1649*/ meltfptr[1648])
+ /*_.VALDATA___V1649*/ meltfptr[1648] = (void *) sy_COMPILE_MATCHER;
}
/*^getnamedsymbol */
@@ -32527,8 +32794,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCHCOMPILCONTEXT =
meltgc_named_symbol ("CLASS_MATCHCOMPILCONTEXT", MELT_GET);
if (sy_CLASS_MATCHCOMPILCONTEXT
- && NULL == /*_.VALDATA___V1646*/ meltfptr[1645])
- /*_.VALDATA___V1646*/ meltfptr[1645] =
+ && NULL == /*_.VALDATA___V1653*/ meltfptr[1652])
+ /*_.VALDATA___V1653*/ meltfptr[1652] =
(void *) sy_CLASS_MATCHCOMPILCONTEXT;
}
@@ -32538,8 +32805,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_PROPED =
meltgc_named_symbol ("CLASS_PROPED", MELT_GET);
- if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V1648*/ meltfptr[1647])
- /*_.VALDATA___V1648*/ meltfptr[1647] = (void *) sy_CLASS_PROPED;
+ if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V1655*/ meltfptr[1654])
+ /*_.VALDATA___V1655*/ meltfptr[1654] = (void *) sy_CLASS_PROPED;
}
/*^getnamedsymbol */
@@ -32547,8 +32814,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCX_LOC */
{
melt_ptr_t sy_MCX_LOC = meltgc_named_symbol ("MCX_LOC", MELT_GET);
- if (sy_MCX_LOC && NULL == /*_.VALDATA___V1668*/ meltfptr[1667])
- /*_.VALDATA___V1668*/ meltfptr[1667] = (void *) sy_MCX_LOC;
+ if (sy_MCX_LOC && NULL == /*_.VALDATA___V1675*/ meltfptr[1674])
+ /*_.VALDATA___V1675*/ meltfptr[1674] = (void *) sy_MCX_LOC;
}
/*^getnamedsymbol */
@@ -32557,8 +32824,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCX_NORMTESTER =
meltgc_named_symbol ("MCX_NORMTESTER", MELT_GET);
- if (sy_MCX_NORMTESTER && NULL == /*_.VALDATA___V1670*/ meltfptr[1669])
- /*_.VALDATA___V1670*/ meltfptr[1669] = (void *) sy_MCX_NORMTESTER;
+ if (sy_MCX_NORMTESTER && NULL == /*_.VALDATA___V1677*/ meltfptr[1676])
+ /*_.VALDATA___V1677*/ meltfptr[1676] = (void *) sy_MCX_NORMTESTER;
}
/*^getnamedsymbol */
@@ -32567,8 +32834,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCX_GOTOTHEN =
meltgc_named_symbol ("MCX_GOTOTHEN", MELT_GET);
- if (sy_MCX_GOTOTHEN && NULL == /*_.VALDATA___V1672*/ meltfptr[1671])
- /*_.VALDATA___V1672*/ meltfptr[1671] = (void *) sy_MCX_GOTOTHEN;
+ if (sy_MCX_GOTOTHEN && NULL == /*_.VALDATA___V1679*/ meltfptr[1678])
+ /*_.VALDATA___V1679*/ meltfptr[1678] = (void *) sy_MCX_GOTOTHEN;
}
/*^getnamedsymbol */
@@ -32577,8 +32844,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCX_GOTOELSE =
meltgc_named_symbol ("MCX_GOTOELSE", MELT_GET);
- if (sy_MCX_GOTOELSE && NULL == /*_.VALDATA___V1674*/ meltfptr[1673])
- /*_.VALDATA___V1674*/ meltfptr[1673] = (void *) sy_MCX_GOTOELSE;
+ if (sy_MCX_GOTOELSE && NULL == /*_.VALDATA___V1681*/ meltfptr[1680])
+ /*_.VALDATA___V1681*/ meltfptr[1680] = (void *) sy_MCX_GOTOELSE;
}
/*^getnamedsymbol */
@@ -32586,8 +32853,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCX_OLIST */
{
melt_ptr_t sy_MCX_OLIST = meltgc_named_symbol ("MCX_OLIST", MELT_GET);
- if (sy_MCX_OLIST && NULL == /*_.VALDATA___V1676*/ meltfptr[1675])
- /*_.VALDATA___V1676*/ meltfptr[1675] = (void *) sy_MCX_OLIST;
+ if (sy_MCX_OLIST && NULL == /*_.VALDATA___V1683*/ meltfptr[1682])
+ /*_.VALDATA___V1683*/ meltfptr[1682] = (void *) sy_MCX_OLIST;
}
/*^getnamedsymbol */
@@ -32595,8 +32862,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCX_SUFFIX */
{
melt_ptr_t sy_MCX_SUFFIX = meltgc_named_symbol ("MCX_SUFFIX", MELT_GET);
- if (sy_MCX_SUFFIX && NULL == /*_.VALDATA___V1678*/ meltfptr[1677])
- /*_.VALDATA___V1678*/ meltfptr[1677] = (void *) sy_MCX_SUFFIX;
+ if (sy_MCX_SUFFIX && NULL == /*_.VALDATA___V1685*/ meltfptr[1684])
+ /*_.VALDATA___V1685*/ meltfptr[1684] = (void *) sy_MCX_SUFFIX;
}
/*^getnamedsymbol */
@@ -32605,8 +32872,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCX_STATECOUNTER =
meltgc_named_symbol ("MCX_STATECOUNTER", MELT_GET);
- if (sy_MCX_STATECOUNTER && NULL == /*_.VALDATA___V1680*/ meltfptr[1679])
- /*_.VALDATA___V1680*/ meltfptr[1679] = (void *) sy_MCX_STATECOUNTER;
+ if (sy_MCX_STATECOUNTER && NULL == /*_.VALDATA___V1687*/ meltfptr[1686])
+ /*_.VALDATA___V1687*/ meltfptr[1686] = (void *) sy_MCX_STATECOUNTER;
}
/*^getnamedsymbol */
@@ -32615,8 +32882,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_COMPILE_TESTER =
meltgc_named_symbol ("COMPILE_TESTER", MELT_GET);
- if (sy_COMPILE_TESTER && NULL == /*_.VALDATA___V1682*/ meltfptr[1681])
- /*_.VALDATA___V1682*/ meltfptr[1681] = (void *) sy_COMPILE_TESTER;
+ if (sy_COMPILE_TESTER && NULL == /*_.VALDATA___V1689*/ meltfptr[1688])
+ /*_.VALDATA___V1689*/ meltfptr[1688] = (void *) sy_COMPILE_TESTER;
}
/*^getnamedsymbol */
@@ -32626,8 +32893,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_TESTERCOMPILCONTEXT =
meltgc_named_symbol ("CLASS_TESTERCOMPILCONTEXT", MELT_GET);
if (sy_CLASS_TESTERCOMPILCONTEXT
- && NULL == /*_.VALDATA___V1686*/ meltfptr[1685])
- /*_.VALDATA___V1686*/ meltfptr[1685] =
+ && NULL == /*_.VALDATA___V1693*/ meltfptr[1692])
+ /*_.VALDATA___V1693*/ meltfptr[1692] =
(void *) sy_CLASS_TESTERCOMPILCONTEXT;
}
@@ -32636,8 +32903,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TCX_NRMATCH */
{
melt_ptr_t sy_TCX_NRMATCH = meltgc_named_symbol ("TCX_NRMATCH", MELT_GET);
- if (sy_TCX_NRMATCH && NULL == /*_.VALDATA___V1698*/ meltfptr[1697])
- /*_.VALDATA___V1698*/ meltfptr[1697] = (void *) sy_TCX_NRMATCH;
+ if (sy_TCX_NRMATCH && NULL == /*_.VALDATA___V1705*/ meltfptr[1704])
+ /*_.VALDATA___V1705*/ meltfptr[1704] = (void *) sy_TCX_NRMATCH;
}
/*^getnamedsymbol */
@@ -32646,8 +32913,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_TCX_FREELIST =
meltgc_named_symbol ("TCX_FREELIST", MELT_GET);
- if (sy_TCX_FREELIST && NULL == /*_.VALDATA___V1700*/ meltfptr[1699])
- /*_.VALDATA___V1700*/ meltfptr[1699] = (void *) sy_TCX_FREELIST;
+ if (sy_TCX_FREELIST && NULL == /*_.VALDATA___V1707*/ meltfptr[1706])
+ /*_.VALDATA___V1707*/ meltfptr[1706] = (void *) sy_TCX_FREELIST;
}
/*^getnamedsymbol */
@@ -32655,8 +32922,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TCX_NEXTEST */
{
melt_ptr_t sy_TCX_NEXTEST = meltgc_named_symbol ("TCX_NEXTEST", MELT_GET);
- if (sy_TCX_NEXTEST && NULL == /*_.VALDATA___V1702*/ meltfptr[1701])
- /*_.VALDATA___V1702*/ meltfptr[1701] = (void *) sy_TCX_NEXTEST;
+ if (sy_TCX_NEXTEST && NULL == /*_.VALDATA___V1709*/ meltfptr[1708])
+ /*_.VALDATA___V1709*/ meltfptr[1708] = (void *) sy_TCX_NEXTEST;
}
/*^getnamedsymbol */
@@ -32666,8 +32933,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_ANY =
meltgc_named_symbol ("CLASS_NORMTESTER_ANY", MELT_GET);
if (sy_CLASS_NORMTESTER_ANY
- && NULL == /*_.VALDATA___V1706*/ meltfptr[1705])
- /*_.VALDATA___V1706*/ meltfptr[1705] = (void *) sy_CLASS_NORMTESTER_ANY;
+ && NULL == /*_.VALDATA___V1713*/ meltfptr[1712])
+ /*_.VALDATA___V1713*/ meltfptr[1712] = (void *) sy_CLASS_NORMTESTER_ANY;
}
/*^getnamedsymbol */
@@ -32676,8 +32943,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_MATCH =
meltgc_named_symbol ("CLASS_NREP_MATCH", MELT_GET);
- if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V1713*/ meltfptr[1712])
- /*_.VALDATA___V1713*/ meltfptr[1712] = (void *) sy_CLASS_NREP_MATCH;
+ if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V1720*/ meltfptr[1719])
+ /*_.VALDATA___V1720*/ meltfptr[1719] = (void *) sy_CLASS_NREP_MATCH;
}
/*^getnamedsymbol */
@@ -32687,8 +32954,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_ANYTESTER =
meltgc_named_symbol ("CLASS_NORMTESTER_ANYTESTER", MELT_GET);
if (sy_CLASS_NORMTESTER_ANYTESTER
- && NULL == /*_.VALDATA___V1715*/ meltfptr[1714])
- /*_.VALDATA___V1715*/ meltfptr[1714] =
+ && NULL == /*_.VALDATA___V1722*/ meltfptr[1721])
+ /*_.VALDATA___V1722*/ meltfptr[1721] =
(void *) sy_CLASS_NORMTESTER_ANYTESTER;
}
@@ -32699,8 +32966,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_SUCCESS =
meltgc_named_symbol ("CLASS_NORMTESTER_SUCCESS", MELT_GET);
if (sy_CLASS_NORMTESTER_SUCCESS
- && NULL == /*_.VALDATA___V1717*/ meltfptr[1716])
- /*_.VALDATA___V1717*/ meltfptr[1716] =
+ && NULL == /*_.VALDATA___V1724*/ meltfptr[1723])
+ /*_.VALDATA___V1724*/ meltfptr[1723] =
(void *) sy_CLASS_NORMTESTER_SUCCESS;
}
@@ -32710,8 +32977,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MAPOBJECT_EVERY =
meltgc_named_symbol ("MAPOBJECT_EVERY", MELT_GET);
- if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V1719*/ meltfptr[1718])
- /*_.VALDATA___V1719*/ meltfptr[1718] = (void *) sy_MAPOBJECT_EVERY;
+ if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V1726*/ meltfptr[1725])
+ /*_.VALDATA___V1726*/ meltfptr[1725] = (void *) sy_MAPOBJECT_EVERY;
}
/*^getnamedsymbol */
@@ -32719,8 +32986,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:LIST_FIND */
{
melt_ptr_t sy_LIST_FIND = meltgc_named_symbol ("LIST_FIND", MELT_GET);
- if (sy_LIST_FIND && NULL == /*_.VALDATA___V1721*/ meltfptr[1720])
- /*_.VALDATA___V1721*/ meltfptr[1720] = (void *) sy_LIST_FIND;
+ if (sy_LIST_FIND && NULL == /*_.VALDATA___V1728*/ meltfptr[1727])
+ /*_.VALDATA___V1728*/ meltfptr[1727] = (void *) sy_LIST_FIND;
}
/*^getnamedsymbol */
@@ -32730,8 +32997,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_ALTERNATE_MATCH_NREP_DATA =
meltgc_named_symbol ("CLASS_ALTERNATE_MATCH_NREP_DATA", MELT_GET);
if (sy_CLASS_ALTERNATE_MATCH_NREP_DATA
- && NULL == /*_.VALDATA___V1723*/ meltfptr[1722])
- /*_.VALDATA___V1723*/ meltfptr[1722] =
+ && NULL == /*_.VALDATA___V1730*/ meltfptr[1729])
+ /*_.VALDATA___V1730*/ meltfptr[1729] =
(void *) sy_CLASS_ALTERNATE_MATCH_NREP_DATA;
}
@@ -32740,8 +33007,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_ROOT */
{
melt_ptr_t sy_CLASS_ROOT = meltgc_named_symbol ("CLASS_ROOT", MELT_GET);
- if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V1725*/ meltfptr[1724])
- /*_.VALDATA___V1725*/ meltfptr[1724] = (void *) sy_CLASS_ROOT;
+ if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V1732*/ meltfptr[1731])
+ /*_.VALDATA___V1732*/ meltfptr[1731] = (void *) sy_CLASS_ROOT;
}
/*^getnamedsymbol */
@@ -32750,8 +33017,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_ALTMATCHN_PREV =
meltgc_named_symbol ("ALTMATCHN_PREV", MELT_GET);
- if (sy_ALTMATCHN_PREV && NULL == /*_.VALDATA___V1735*/ meltfptr[1734])
- /*_.VALDATA___V1735*/ meltfptr[1734] = (void *) sy_ALTMATCHN_PREV;
+ if (sy_ALTMATCHN_PREV && NULL == /*_.VALDATA___V1742*/ meltfptr[1741])
+ /*_.VALDATA___V1742*/ meltfptr[1741] = (void *) sy_ALTMATCHN_PREV;
}
/*^getnamedsymbol */
@@ -32760,8 +33027,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_ALTMATCHN_NREP =
meltgc_named_symbol ("ALTMATCHN_NREP", MELT_GET);
- if (sy_ALTMATCHN_NREP && NULL == /*_.VALDATA___V1737*/ meltfptr[1736])
- /*_.VALDATA___V1737*/ meltfptr[1736] = (void *) sy_ALTMATCHN_NREP;
+ if (sy_ALTMATCHN_NREP && NULL == /*_.VALDATA___V1744*/ meltfptr[1743])
+ /*_.VALDATA___V1744*/ meltfptr[1743] = (void *) sy_ALTMATCHN_NREP;
}
/*^getnamedsymbol */
@@ -32771,8 +33038,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_ALTMATCH =
meltgc_named_symbol ("CLASS_NREP_ALTMATCH", MELT_GET);
if (sy_CLASS_NREP_ALTMATCH
- && NULL == /*_.VALDATA___V1742*/ meltfptr[1741])
- /*_.VALDATA___V1742*/ meltfptr[1741] = (void *) sy_CLASS_NREP_ALTMATCH;
+ && NULL == /*_.VALDATA___V1749*/ meltfptr[1748])
+ /*_.VALDATA___V1749*/ meltfptr[1748] = (void *) sy_CLASS_NREP_ALTMATCH;
}
/*^getnamedsymbol */
@@ -32782,8 +33049,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_LABEL =
meltgc_named_symbol ("CLASS_NREP_MATCH_LABEL", MELT_GET);
if (sy_CLASS_NREP_MATCH_LABEL
- && NULL == /*_.VALDATA___V1746*/ meltfptr[1745])
- /*_.VALDATA___V1746*/ meltfptr[1745] =
+ && NULL == /*_.VALDATA___V1753*/ meltfptr[1752])
+ /*_.VALDATA___V1753*/ meltfptr[1752] =
(void *) sy_CLASS_NREP_MATCH_LABEL;
}
@@ -32794,20 +33061,32 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_WITH_DATA =
meltgc_named_symbol ("CLASS_MATCH_STEP_WITH_DATA", MELT_GET);
if (sy_CLASS_MATCH_STEP_WITH_DATA
- && NULL == /*_.VALDATA___V1748*/ meltfptr[1747])
- /*_.VALDATA___V1748*/ meltfptr[1747] =
+ && NULL == /*_.VALDATA___V1755*/ meltfptr[1754])
+ /*_.VALDATA___V1755*/ meltfptr[1754] =
(void *) sy_CLASS_MATCH_STEP_WITH_DATA;
}
/*^getnamedsymbol */
+ /*getnamedsym:CLASS_NREP_MATCH_FLAG */
+ {
+ melt_ptr_t sy_CLASS_NREP_MATCH_FLAG =
+ meltgc_named_symbol ("CLASS_NREP_MATCH_FLAG", MELT_GET);
+ if (sy_CLASS_NREP_MATCH_FLAG
+ && NULL == /*_.VALDATA___V1759*/ meltfptr[1758])
+ /*_.VALDATA___V1759*/ meltfptr[1758] =
+ (void *) sy_CLASS_NREP_MATCH_FLAG;
+ }
+
+ /*^getnamedsymbol */
+
/*getnamedsym:CLASS_NREP_MATCH_DATA_INITIALIZER */
{
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_INITIALIZER =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_INITIALIZER", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_INITIALIZER
- && NULL == /*_.VALDATA___V1752*/ meltfptr[1751])
- /*_.VALDATA___V1752*/ meltfptr[1751] =
+ && NULL == /*_.VALDATA___V1763*/ meltfptr[1762])
+ /*_.VALDATA___V1763*/ meltfptr[1762] =
(void *) sy_CLASS_NREP_MATCH_DATA_INITIALIZER;
}
@@ -32818,8 +33097,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_ACTION =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_ACTION", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_ACTION
- && NULL == /*_.VALDATA___V1754*/ meltfptr[1753])
- /*_.VALDATA___V1754*/ meltfptr[1753] =
+ && NULL == /*_.VALDATA___V1765*/ meltfptr[1764])
+ /*_.VALDATA___V1765*/ meltfptr[1764] =
(void *) sy_CLASS_NREP_MATCH_DATA_ACTION;
}
@@ -32830,20 +33109,32 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCHED_DATA =
meltgc_named_symbol ("CLASS_NREP_MATCHED_DATA", MELT_GET);
if (sy_CLASS_NREP_MATCHED_DATA
- && NULL == /*_.VALDATA___V1756*/ meltfptr[1755])
- /*_.VALDATA___V1756*/ meltfptr[1755] =
+ && NULL == /*_.VALDATA___V1767*/ meltfptr[1766])
+ /*_.VALDATA___V1767*/ meltfptr[1766] =
(void *) sy_CLASS_NREP_MATCHED_DATA;
}
/*^getnamedsymbol */
+ /*getnamedsym:CLASS_NREP_MATCH_JUMP */
+ {
+ melt_ptr_t sy_CLASS_NREP_MATCH_JUMP =
+ meltgc_named_symbol ("CLASS_NREP_MATCH_JUMP", MELT_GET);
+ if (sy_CLASS_NREP_MATCH_JUMP
+ && NULL == /*_.VALDATA___V1773*/ meltfptr[1772])
+ /*_.VALDATA___V1773*/ meltfptr[1772] =
+ (void *) sy_CLASS_NREP_MATCH_JUMP;
+ }
+
+ /*^getnamedsymbol */
+
/*getnamedsym:CLASS_NORMTESTER_MATCHER */
{
melt_ptr_t sy_CLASS_NORMTESTER_MATCHER =
meltgc_named_symbol ("CLASS_NORMTESTER_MATCHER", MELT_GET);
if (sy_CLASS_NORMTESTER_MATCHER
- && NULL == /*_.VALDATA___V1771*/ meltfptr[1770])
- /*_.VALDATA___V1771*/ meltfptr[1770] =
+ && NULL == /*_.VALDATA___V1788*/ meltfptr[1787])
+ /*_.VALDATA___V1788*/ meltfptr[1787] =
(void *) sy_CLASS_NORMTESTER_MATCHER;
}
@@ -32854,8 +33145,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_INSTANCE =
meltgc_named_symbol ("CLASS_NORMTESTER_INSTANCE", MELT_GET);
if (sy_CLASS_NORMTESTER_INSTANCE
- && NULL == /*_.VALDATA___V1775*/ meltfptr[1774])
- /*_.VALDATA___V1775*/ meltfptr[1774] =
+ && NULL == /*_.VALDATA___V1792*/ meltfptr[1791])
+ /*_.VALDATA___V1792*/ meltfptr[1791] =
(void *) sy_CLASS_NORMTESTER_INSTANCE;
}
@@ -32866,8 +33157,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_TUPLE =
meltgc_named_symbol ("CLASS_NORMTESTER_TUPLE", MELT_GET);
if (sy_CLASS_NORMTESTER_TUPLE
- && NULL == /*_.VALDATA___V1779*/ meltfptr[1778])
- /*_.VALDATA___V1779*/ meltfptr[1778] =
+ && NULL == /*_.VALDATA___V1796*/ meltfptr[1795])
+ /*_.VALDATA___V1796*/ meltfptr[1795] =
(void *) sy_CLASS_NORMTESTER_TUPLE;
}
@@ -32878,8 +33169,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_SAME =
meltgc_named_symbol ("CLASS_NORMTESTER_SAME", MELT_GET);
if (sy_CLASS_NORMTESTER_SAME
- && NULL == /*_.VALDATA___V1783*/ meltfptr[1782])
- /*_.VALDATA___V1783*/ meltfptr[1782] =
+ && NULL == /*_.VALDATA___V1800*/ meltfptr[1799])
+ /*_.VALDATA___V1800*/ meltfptr[1799] =
(void *) sy_CLASS_NORMTESTER_SAME;
}
@@ -32890,8 +33181,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_OR_CLEAR =
meltgc_named_symbol ("CLASS_NORMTESTER_OR_CLEAR", MELT_GET);
if (sy_CLASS_NORMTESTER_OR_CLEAR
- && NULL == /*_.VALDATA___V1789*/ meltfptr[1788])
- /*_.VALDATA___V1789*/ meltfptr[1788] =
+ && NULL == /*_.VALDATA___V1806*/ meltfptr[1805])
+ /*_.VALDATA___V1806*/ meltfptr[1805] =
(void *) sy_CLASS_NORMTESTER_OR_CLEAR;
}
@@ -32902,8 +33193,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_OR_TRANSMIT =
meltgc_named_symbol ("CLASS_NORMTESTER_OR_TRANSMIT", MELT_GET);
if (sy_CLASS_NORMTESTER_OR_TRANSMIT
- && NULL == /*_.VALDATA___V1793*/ meltfptr[1792])
- /*_.VALDATA___V1793*/ meltfptr[1792] =
+ && NULL == /*_.VALDATA___V1810*/ meltfptr[1809])
+ /*_.VALDATA___V1810*/ meltfptr[1809] =
(void *) sy_CLASS_NORMTESTER_OR_TRANSMIT;
}
@@ -32914,8 +33205,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_DISJUNCTION =
meltgc_named_symbol ("CLASS_NORMTESTER_DISJUNCTION", MELT_GET);
if (sy_CLASS_NORMTESTER_DISJUNCTION
- && NULL == /*_.VALDATA___V1797*/ meltfptr[1796])
- /*_.VALDATA___V1797*/ meltfptr[1796] =
+ && NULL == /*_.VALDATA___V1814*/ meltfptr[1813])
+ /*_.VALDATA___V1814*/ meltfptr[1813] =
(void *) sy_CLASS_NORMTESTER_DISJUNCTION;
}
@@ -32925,8 +33216,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CMATCHER =
meltgc_named_symbol ("CLASS_CMATCHER", MELT_GET);
- if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1805*/ meltfptr[1804])
- /*_.VALDATA___V1805*/ meltfptr[1804] = (void *) sy_CLASS_CMATCHER;
+ if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1822*/ meltfptr[1821])
+ /*_.VALDATA___V1822*/ meltfptr[1821] = (void *) sy_CLASS_CMATCHER;
}
/*^getnamedsymbol */
@@ -32936,8 +33227,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MULTIPLE_EVERY_BOTH =
meltgc_named_symbol ("MULTIPLE_EVERY_BOTH", MELT_GET);
if (sy_MULTIPLE_EVERY_BOTH
- && NULL == /*_.VALDATA___V1807*/ meltfptr[1806])
- /*_.VALDATA___V1807*/ meltfptr[1806] = (void *) sy_MULTIPLE_EVERY_BOTH;
+ && NULL == /*_.VALDATA___V1824*/ meltfptr[1823])
+ /*_.VALDATA___V1824*/ meltfptr[1823] = (void *) sy_MULTIPLE_EVERY_BOTH;
}
/*^getnamedsymbol */
@@ -32946,8 +33237,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_FUNMATCHER =
meltgc_named_symbol ("CLASS_FUNMATCHER", MELT_GET);
- if (sy_CLASS_FUNMATCHER && NULL == /*_.VALDATA___V1815*/ meltfptr[1814])
- /*_.VALDATA___V1815*/ meltfptr[1814] = (void *) sy_CLASS_FUNMATCHER;
+ if (sy_CLASS_FUNMATCHER && NULL == /*_.VALDATA___V1832*/ meltfptr[1831])
+ /*_.VALDATA___V1832*/ meltfptr[1831] = (void *) sy_CLASS_FUNMATCHER;
}
/*^getnamedsymbol */
@@ -32956,8 +33247,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLOSFUNMATCH =
meltgc_named_symbol ("_CLOSFUNMATCH", MELT_GET);
- if (sy_CLOSFUNMATCH && NULL == /*_.VALDATA___V1812*/ meltfptr[1811])
- /*_.VALDATA___V1812*/ meltfptr[1811] = (void *) sy_CLOSFUNMATCH;
+ if (sy_CLOSFUNMATCH && NULL == /*_.VALDATA___V1829*/ meltfptr[1828])
+ /*_.VALDATA___V1829*/ meltfptr[1828] = (void *) sy_CLOSFUNMATCH;
}
/*^getnamedsymbol */
@@ -32966,8 +33257,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_FMATCH_MATCHF =
meltgc_named_symbol ("FMATCH_MATCHF", MELT_GET);
- if (sy_FMATCH_MATCHF && NULL == /*_.VALDATA___V1817*/ meltfptr[1816])
- /*_.VALDATA___V1817*/ meltfptr[1816] = (void *) sy_FMATCH_MATCHF;
+ if (sy_FMATCH_MATCHF && NULL == /*_.VALDATA___V1834*/ meltfptr[1833])
+ /*_.VALDATA___V1834*/ meltfptr[1833] = (void *) sy_FMATCH_MATCHF;
}
/*^comment */
@@ -33004,7 +33295,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]),
+ (melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33026,7 +33317,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NAMED__V8*/ meltfptr[7] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]),
+ (melt_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33048,7 +33339,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]),
+ (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33070,7 +33361,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_MIXED_LOCATION__V10*/ meltfptr[9] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1034*/ meltfptr[1033]),
+ (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33092,7 +33383,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_CTYPE__V11*/ meltfptr[10] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]),
+ (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33114,7 +33405,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_LIST__V12*/ meltfptr[11] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]),
+ (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33136,7 +33427,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039]),
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33158,7 +33449,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]),
+ (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33180,7 +33471,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.LIST_APPEND2LIST__V15*/ meltfptr[14] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]),
+ (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33202,7 +33493,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045]),
+ (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33224,7 +33515,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_MULTIPLE__V17*/ meltfptr[16] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]),
+ (melt_ptr_t) ( /*_.VALDATA___V1051*/ meltfptr[1050]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33246,7 +33537,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_SELECTOR__V18*/ meltfptr[17] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053]),
+ (melt_ptr_t) ( /*_.VALDATA___V1057*/ meltfptr[1056]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33268,7 +33559,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.INSTALL_METHOD__V19*/ meltfptr[18] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1108*/ meltfptr[1107]),
+ (melt_ptr_t) ( /*_.VALDATA___V1111*/ meltfptr[1110]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33290,7 +33581,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP__V20*/ meltfptr[19] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1110*/ meltfptr[1109]),
+ (melt_ptr_t) ( /*_.VALDATA___V1113*/ meltfptr[1112]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33312,7 +33603,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.COMPILE_OBJ__V21*/ meltfptr[20] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111]),
+ (melt_ptr_t) ( /*_.VALDATA___V1115*/ meltfptr[1114]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33334,7 +33625,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_ANY_RECEIVER__V22*/ meltfptr[21] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1118*/ meltfptr[1117]),
+ (melt_ptr_t) ( /*_.VALDATA___V1121*/ meltfptr[1120]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33356,7 +33647,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.GET_CTYPE__V23*/ meltfptr[22] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121]),
+ (melt_ptr_t) ( /*_.VALDATA___V1125*/ meltfptr[1124]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33378,7 +33669,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CTYPE_VALUE__V24*/ meltfptr[23] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]),
+ (melt_ptr_t) ( /*_.VALDATA___V1129*/ meltfptr[1128]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33400,7 +33691,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DBGOUT_NAMEDOBJECT_METHOD__V25*/ meltfptr[24] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]),
+ (melt_ptr_t) ( /*_.VALDATA___V1135*/ meltfptr[1134]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33422,7 +33713,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DBG_OUTPUT__V26*/ meltfptr[25] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133]),
+ (melt_ptr_t) ( /*_.VALDATA___V1137*/ meltfptr[1136]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33444,7 +33735,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.AS_NULL__V27*/ meltfptr[26] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141]),
+ (melt_ptr_t) ( /*_.VALDATA___V1145*/ meltfptr[1144]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33466,7 +33757,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]),
+ (melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33488,7 +33779,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.INTEGERBOX_OF__V29*/ meltfptr[28] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]),
+ (melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33510,7 +33801,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_STRBUF__V30*/ meltfptr[29] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]),
+ (melt_ptr_t) ( /*_.VALDATA___V1151*/ meltfptr[1150]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33532,7 +33823,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_SYMBOL__V31*/ meltfptr[30] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1150*/ meltfptr[1149]),
+ (melt_ptr_t) ( /*_.VALDATA___V1153*/ meltfptr[1152]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33554,7 +33845,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]),
+ (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33576,7 +33867,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]),
+ (melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33598,7 +33889,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_DEFUNROUTPROC__V34*/ meltfptr[33] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]),
+ (melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33620,7 +33911,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_STRING__V35*/ meltfptr[34] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]),
+ (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33642,7 +33933,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_INTEGER__V36*/ meltfptr[35] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]),
+ (melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33664,7 +33955,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]),
+ (melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33686,7 +33977,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]),
+ (melt_ptr_t) ( /*_.VALDATA___V1183*/ meltfptr[1182]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33708,7 +33999,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.MULTIPLE_MAP__V39*/ meltfptr[38] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]),
+ (melt_ptr_t) ( /*_.VALDATA___V1185*/ meltfptr[1184]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33730,7 +34021,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]),
+ (melt_ptr_t) ( /*_.VALDATA___V1187*/ meltfptr[1186]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33752,7 +34043,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CTYPE_LONG__V41*/ meltfptr[40] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]),
+ (melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33774,7 +34065,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.LIST_EVERY__V42*/ meltfptr[41] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]),
+ (melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33796,7 +34087,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_INITPROC__V43*/ meltfptr[42] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]),
+ (melt_ptr_t) ( /*_.VALDATA___V1225*/ meltfptr[1224]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33818,7 +34109,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]),
+ (melt_ptr_t) ( /*_.VALDATA___V1227*/ meltfptr[1226]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33840,7 +34131,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.LIST_MAP__V45*/ meltfptr[44] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]),
+ (melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33862,7 +34153,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_ANY_BINDING__V46*/ meltfptr[45] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]),
+ (melt_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33884,7 +34175,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]),
+ (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33906,7 +34197,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_SIMPLE__V48*/ meltfptr[47] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231]),
+ (melt_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33928,7 +34219,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.SYSDATA_CONT_FRESH_ENV__V49*/ meltfptr[48] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233]),
+ (melt_ptr_t) ( /*_.VALDATA___V1237*/ meltfptr[1236]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33950,7 +34241,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]),
+ (melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33972,7 +34263,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]),
+ (melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -33994,7 +34285,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.MULTIPLE_EVERY__V52*/ meltfptr[51] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]),
+ (melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34016,7 +34307,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]),
+ (melt_ptr_t) ( /*_.VALDATA___V1245*/ meltfptr[1244]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34038,7 +34329,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]),
+ (melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34060,7 +34351,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.SYSDATA_VALUE_IMPORTER__V55*/ meltfptr[54] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]),
+ (melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34082,7 +34373,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CTYPE_VOID__V56*/ meltfptr[55] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255]),
+ (melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34104,7 +34395,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_LET_BINDING__V57*/ meltfptr[56] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261]),
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34126,7 +34417,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_CHUNK__V58*/ meltfptr[57] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1267*/ meltfptr[1266]),
+ (melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34148,7 +34439,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_TYPED_EXPRESSION__V59*/ meltfptr[58] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1271*/ meltfptr[1270]),
+ (melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34170,7 +34461,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_NIL__V60*/ meltfptr[59] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1275*/ meltfptr[1274]),
+ (melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34192,7 +34483,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_COMMENT__V61*/ meltfptr[60] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]),
+ (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34214,7 +34505,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1283*/ meltfptr[1282]),
+ (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34236,7 +34527,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_CLOSEDOCC__V63*/ meltfptr[62] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1287*/ meltfptr[1286]),
+ (melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34258,7 +34549,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1291*/ meltfptr[1290]),
+ (melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34280,7 +34571,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_DEFINED_CONSTANT__V65*/ meltfptr[64] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1297*/ meltfptr[1296]),
+ (melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34302,7 +34593,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_QUASICONSTANT__V66*/ meltfptr[65] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1301*/ meltfptr[1300]),
+ (melt_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34326,7 +34617,7 @@ start_module_melt (void *modargp_)
/*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V67*/
meltfptr[66] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304]),
+ (melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34348,7 +34639,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_FOREVER__V68*/ meltfptr[67] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309]),
+ (melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34370,7 +34661,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311]),
+ (melt_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34392,7 +34683,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_EXIT__V70*/ meltfptr[69] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]),
+ (melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34414,7 +34705,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_AGAIN__V71*/ meltfptr[70] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319]),
+ (melt_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34436,7 +34727,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_LET__V72*/ meltfptr[71] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1329*/ meltfptr[1328]),
+ (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34458,7 +34749,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330]),
+ (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34480,7 +34771,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_SEXPR__V74*/ meltfptr[73] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1333*/ meltfptr[1332]),
+ (melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34502,7 +34793,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/ meltfptr[74] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]),
+ (melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34524,7 +34815,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]),
+ (melt_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34546,7 +34837,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/ meltfptr[76] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]),
+ (melt_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34568,7 +34859,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/ meltfptr[77] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1367*/ meltfptr[1366]),
+ (melt_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34590,7 +34881,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/ meltfptr[78] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]),
+ (melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34612,7 +34903,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/ meltfptr[79] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]),
+ (melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34634,7 +34925,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]),
+ (melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34656,7 +34947,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_CLASS_BINDING__V82*/ meltfptr[81] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]),
+ (melt_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34678,7 +34969,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_CLASS__V83*/ meltfptr[82] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]),
+ (melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34700,7 +34991,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_LETREC__V84*/ meltfptr[83] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384]),
+ (melt_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34722,7 +35013,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]),
+ (melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34744,7 +35035,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_CITERATION__V86*/ meltfptr[85] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]),
+ (melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34766,7 +35057,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_CITERATOR__V87*/ meltfptr[86] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]),
+ (melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34788,7 +35079,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_SETQ__V88*/ meltfptr[87] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]),
+ (melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34810,7 +35101,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_PROGN__V89*/ meltfptr[88] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1407*/ meltfptr[1406]),
+ (melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34832,7 +35123,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_MULTACC__V90*/ meltfptr[89] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]),
+ (melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34854,7 +35145,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_FIELDACC__V91*/ meltfptr[90] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416]),
+ (melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34876,7 +35167,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_FIELD__V92*/ meltfptr[91] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]),
+ (melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34898,7 +35189,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420]),
+ (melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34920,7 +35211,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1425*/ meltfptr[1424]),
+ (melt_ptr_t) ( /*_.VALDATA___V1428*/ meltfptr[1427]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34942,7 +35233,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V95*/ meltfptr[94] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429]),
+ (melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34964,7 +35255,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1432*/ meltfptr[1431]),
+ (melt_ptr_t) ( /*_.VALDATA___V1435*/ meltfptr[1434]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -34986,7 +35277,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/ meltfptr[96] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435]),
+ (melt_ptr_t) ( /*_.VALDATA___V1439*/ meltfptr[1438]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35008,7 +35299,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_APPLY__V98*/ meltfptr[97] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1441*/ meltfptr[1440]),
+ (melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35030,7 +35321,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_MULTIAPPLY__V99*/ meltfptr[98] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449]),
+ (melt_ptr_t) ( /*_.VALDATA___V1453*/ meltfptr[1452]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35052,7 +35343,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_MSEND__V100*/ meltfptr[99] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1455*/ meltfptr[1454]),
+ (melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35074,7 +35365,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_MULTIMSEND__V101*/ meltfptr[100] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462]),
+ (melt_ptr_t) ( /*_.VALDATA___V1466*/ meltfptr[1465]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35096,7 +35387,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CTYPE_CSTRING__V102*/ meltfptr[101] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488]),
+ (melt_ptr_t) ( /*_.VALDATA___V1492*/ meltfptr[1491]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35118,7 +35409,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.DISCR_NULL_RECEIVER__V103*/ meltfptr[102] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]),
+ (melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35140,7 +35431,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_IF__V104*/ meltfptr[103] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1505*/ meltfptr[1504]),
+ (melt_ptr_t) ( /*_.VALDATA___V1508*/ meltfptr[1507]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35162,7 +35453,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_IFISA__V105*/ meltfptr[104] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508]),
+ (melt_ptr_t) ( /*_.VALDATA___V1512*/ meltfptr[1511]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35184,7 +35475,29 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-genobj";
/*_.CLASS_NREP_IFTESTVALUE__V106*/ meltfptr[105] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510]),
+ (melt_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+
+ /*^apply */
+
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3];
+ /*^apply.arg */
+
+ argtab[1].meltbp_cstring = "CLASS_NREP_IFTUPLESIZED";
+ /*^apply.arg */
+
+ argtab[2].meltbp_cstring = "warmelt-genobj";
+ /*_.CLASS_NREP_IFTUPLESIZED__V107*/ meltfptr[106] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35204,9 +35517,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_IFVARIADIC__V107*/ meltfptr[106] =
+ /*_.CLASS_NREP_IFVARIADIC__V108*/ meltfptr[107] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1515*/ meltfptr[1514]),
+ (melt_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35226,9 +35539,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_VARIADIC_ARGUMENT__V108*/ meltfptr[107] =
+ /*_.CLASS_NREP_VARIADIC_ARGUMENT__V109*/ meltfptr[108] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1521*/ meltfptr[1520]),
+ (melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35248,9 +35561,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_CONSUME_VARIADIC__V109*/ meltfptr[108] =
+ /*_.CLASS_NREP_CONSUME_VARIADIC__V110*/ meltfptr[109] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1525*/ meltfptr[1524]),
+ (melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35270,9 +35583,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_CPPIF__V110*/ meltfptr[109] =
+ /*_.CLASS_NREP_CPPIF__V111*/ meltfptr[110] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530]),
+ (melt_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35292,9 +35605,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_RETURN__V111*/ meltfptr[110] =
+ /*_.CLASS_NREP_RETURN__V112*/ meltfptr[111] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]),
+ (melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35314,9 +35627,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_LAMBDA__V112*/ meltfptr[111] =
+ /*_.CLASS_NREP_LAMBDA__V113*/ meltfptr[112] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548]),
+ (melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35336,9 +35649,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_INSTANCE__V113*/ meltfptr[112] =
+ /*_.CLASS_NREP_INSTANCE__V114*/ meltfptr[113] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]),
+ (melt_ptr_t) ( /*_.VALDATA___V1563*/ meltfptr[1562]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35358,9 +35671,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_PREDEF__V114*/ meltfptr[113] =
+ /*_.CLASS_NREP_PREDEF__V115*/ meltfptr[114] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1562*/ meltfptr[1561]),
+ (melt_ptr_t) ( /*_.VALDATA___V1569*/ meltfptr[1568]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35380,9 +35693,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_DATATUPLE__V115*/ meltfptr[114] =
+ /*_.CLASS_NREP_DATATUPLE__V116*/ meltfptr[115] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1589*/ meltfptr[1588]),
+ (melt_ptr_t) ( /*_.VALDATA___V1596*/ meltfptr[1595]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35402,9 +35715,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_DATASTRING__V116*/ meltfptr[115] =
+ /*_.CLASS_NREP_DATASTRING__V117*/ meltfptr[116] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594]),
+ (melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35424,9 +35737,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_DATABOXEDINTEGER__V117*/ meltfptr[116] =
+ /*_.CLASS_NREP_DATABOXEDINTEGER__V118*/ meltfptr[117] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1601*/ meltfptr[1600]),
+ (melt_ptr_t) ( /*_.VALDATA___V1608*/ meltfptr[1607]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35446,9 +35759,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_DATACLOSURE__V118*/ meltfptr[117] =
+ /*_.CLASS_NREP_DATACLOSURE__V119*/ meltfptr[118] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1610*/ meltfptr[1609]),
+ (melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35468,9 +35781,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_DATAROUTINE__V119*/ meltfptr[118] =
+ /*_.CLASS_NREP_DATAROUTINE__V120*/ meltfptr[119] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1612*/ meltfptr[1611]),
+ (melt_ptr_t) ( /*_.VALDATA___V1619*/ meltfptr[1618]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35490,9 +35803,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_QUASIDATA__V120*/ meltfptr[119] =
+ /*_.CLASS_NREP_QUASIDATA__V121*/ meltfptr[120] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620]),
+ (melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35513,10 +35826,10 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/
- meltfptr[120] =
+ /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/
+ meltfptr[121] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624]),
+ (melt_ptr_t) ( /*_.VALDATA___V1632*/ meltfptr[1631]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35537,9 +35850,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V122*/ meltfptr[121] =
+ /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V123*/ meltfptr[122] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1629*/ meltfptr[1628]),
+ (melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35559,9 +35872,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_STORE_PREDEFINED__V123*/ meltfptr[122] =
+ /*_.CLASS_NREP_STORE_PREDEFINED__V124*/ meltfptr[123] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632]),
+ (melt_ptr_t) ( /*_.VALDATA___V1640*/ meltfptr[1639]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35582,10 +35895,10 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V124*/
- meltfptr[123] =
+ /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V125*/
+ meltfptr[124] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1640*/ meltfptr[1639]),
+ (melt_ptr_t) ( /*_.VALDATA___V1647*/ meltfptr[1646]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35605,9 +35918,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_PROPED__V125*/ meltfptr[124] =
+ /*_.CLASS_PROPED__V126*/ meltfptr[125] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1648*/ meltfptr[1647]),
+ (melt_ptr_t) ( /*_.VALDATA___V1655*/ meltfptr[1654]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35627,9 +35940,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125] =
+ /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1706*/ meltfptr[1705]),
+ (melt_ptr_t) ( /*_.VALDATA___V1713*/ meltfptr[1712]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35649,9 +35962,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126] =
+ /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1713*/ meltfptr[1712]),
+ (melt_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35671,9 +35984,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_ANYTESTER__V128*/ meltfptr[127] =
+ /*_.CLASS_NORMTESTER_ANYTESTER__V129*/ meltfptr[128] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714]),
+ (melt_ptr_t) ( /*_.VALDATA___V1722*/ meltfptr[1721]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35693,9 +36006,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_SUCCESS__V129*/ meltfptr[128] =
+ /*_.CLASS_NORMTESTER_SUCCESS__V130*/ meltfptr[129] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716]),
+ (melt_ptr_t) ( /*_.VALDATA___V1724*/ meltfptr[1723]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35715,9 +36028,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] =
+ /*_.MAPOBJECT_EVERY__V131*/ meltfptr[130] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1719*/ meltfptr[1718]),
+ (melt_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35737,9 +36050,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.LIST_FIND__V131*/ meltfptr[130] =
+ /*_.LIST_FIND__V132*/ meltfptr[131] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720]),
+ (melt_ptr_t) ( /*_.VALDATA___V1728*/ meltfptr[1727]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35759,9 +36072,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_ROOT__V132*/ meltfptr[131] =
+ /*_.CLASS_ROOT__V133*/ meltfptr[132] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1725*/ meltfptr[1724]),
+ (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35781,9 +36094,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_ALTMATCH__V133*/ meltfptr[132] =
+ /*_.CLASS_NREP_ALTMATCH__V134*/ meltfptr[133] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]),
+ (melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35803,9 +36116,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_MATCH_LABEL__V134*/ meltfptr[133] =
+ /*_.CLASS_NREP_MATCH_LABEL__V135*/ meltfptr[134] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745]),
+ (melt_ptr_t) ( /*_.VALDATA___V1753*/ meltfptr[1752]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35825,9 +36138,31 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_MATCH_STEP_WITH_DATA__V135*/ meltfptr[134] =
+ /*_.CLASS_MATCH_STEP_WITH_DATA__V136*/ meltfptr[135] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+
+ /*^apply */
+
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3];
+ /*^apply.arg */
+
+ argtab[1].meltbp_cstring = "CLASS_NREP_MATCH_FLAG";
+ /*^apply.arg */
+
+ argtab[2].meltbp_cstring = "warmelt-genobj";
+ /*_.CLASS_NREP_MATCH_FLAG__V137*/ meltfptr[136] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1748*/ meltfptr[1747]),
+ (melt_ptr_t) ( /*_.VALDATA___V1759*/ meltfptr[1758]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35847,9 +36182,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V136*/ meltfptr[135] =
+ /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V138*/ meltfptr[137] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751]),
+ (melt_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35869,9 +36204,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_MATCH_DATA_ACTION__V137*/ meltfptr[136] =
+ /*_.CLASS_NREP_MATCH_DATA_ACTION__V139*/ meltfptr[138] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1754*/ meltfptr[1753]),
+ (melt_ptr_t) ( /*_.VALDATA___V1765*/ meltfptr[1764]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35891,9 +36226,31 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NREP_MATCHED_DATA__V138*/ meltfptr[137] =
+ /*_.CLASS_NREP_MATCHED_DATA__V140*/ meltfptr[139] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1756*/ meltfptr[1755]),
+ (melt_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+
+ /*^apply */
+
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3];
+ /*^apply.arg */
+
+ argtab[1].meltbp_cstring = "CLASS_NREP_MATCH_JUMP";
+ /*^apply.arg */
+
+ argtab[2].meltbp_cstring = "warmelt-genobj";
+ /*_.CLASS_NREP_MATCH_JUMP__V141*/ meltfptr[140] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.VALDATA___V1773*/ meltfptr[1772]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35913,9 +36270,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138] =
+ /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]),
+ (melt_ptr_t) ( /*_.VALDATA___V1788*/ meltfptr[1787]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35935,9 +36292,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_INSTANCE__V140*/ meltfptr[139] =
+ /*_.CLASS_NORMTESTER_INSTANCE__V143*/ meltfptr[142] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774]),
+ (melt_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35957,9 +36314,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_TUPLE__V141*/ meltfptr[140] =
+ /*_.CLASS_NORMTESTER_TUPLE__V144*/ meltfptr[143] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1779*/ meltfptr[1778]),
+ (melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -35979,9 +36336,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_SAME__V142*/ meltfptr[141] =
+ /*_.CLASS_NORMTESTER_SAME__V145*/ meltfptr[144] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1783*/ meltfptr[1782]),
+ (melt_ptr_t) ( /*_.VALDATA___V1800*/ meltfptr[1799]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36001,9 +36358,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_OR_CLEAR__V143*/ meltfptr[142] =
+ /*_.CLASS_NORMTESTER_OR_CLEAR__V146*/ meltfptr[145] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788]),
+ (melt_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36023,9 +36380,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_OR_TRANSMIT__V144*/ meltfptr[143] =
+ /*_.CLASS_NORMTESTER_OR_TRANSMIT__V147*/ meltfptr[146] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1793*/ meltfptr[1792]),
+ (melt_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36045,9 +36402,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_NORMTESTER_DISJUNCTION__V145*/ meltfptr[144] =
+ /*_.CLASS_NORMTESTER_DISJUNCTION__V148*/ meltfptr[147] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1797*/ meltfptr[1796]),
+ (melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36067,9 +36424,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_CMATCHER__V146*/ meltfptr[145] =
+ /*_.CLASS_CMATCHER__V149*/ meltfptr[148] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1805*/ meltfptr[1804]),
+ (melt_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36089,9 +36446,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.MULTIPLE_EVERY_BOTH__V147*/ meltfptr[146] =
+ /*_.MULTIPLE_EVERY_BOTH__V150*/ meltfptr[149] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806]),
+ (melt_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36111,9 +36468,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.CLASS_FUNMATCHER__V148*/ meltfptr[147] =
+ /*_.CLASS_FUNMATCHER__V151*/ meltfptr[150] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1815*/ meltfptr[1814]),
+ (melt_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36133,9 +36490,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-genobj";
- /*_.FMATCH_MATCHF__V149*/ meltfptr[148] =
+ /*_.FMATCH_MATCHF__V152*/ meltfptr[151] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816]),
+ (melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -36215,89 +36572,89 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V150*/ meltfptr[149])) ==
+ ( /*_.VALDATA___V153*/ meltfptr[152])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V150*/
- meltfptr[149]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[1] =
+ ( /*_.VALDATA___V153*/
+ meltfptr[152]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V151*/ meltfptr[150]);
+ /*_.VALSTR___V154*/ meltfptr[153]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V150*/ meltfptr[149]);
+ meltgc_touch ( /*_.VALDATA___V153*/ meltfptr[152]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V152*/ meltfptr[151])) ==
+ ( /*_.VALDATA___V155*/ meltfptr[154])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V152*/
- meltfptr[151]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]))->obj_vartab[1] =
+ ( /*_.VALDATA___V155*/
+ meltfptr[154]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V153*/ meltfptr[152]);
+ /*_.VALSTR___V156*/ meltfptr[155]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V152*/ meltfptr[151]);
+ meltgc_touch ( /*_.VALDATA___V155*/ meltfptr[154]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V154*/ meltfptr[153])) ==
+ ( /*_.VALDATA___V157*/ meltfptr[156])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V154*/
- meltfptr[153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]))->obj_vartab[1] =
+ ( /*_.VALDATA___V157*/
+ meltfptr[156]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V155*/ meltfptr[154]);
+ /*_.VALSTR___V158*/ meltfptr[157]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V154*/ meltfptr[153])) ==
+ ( /*_.VALDATA___V157*/ meltfptr[156])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V154*/
- meltfptr[153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]))->obj_vartab[4] =
+ ( /*_.VALDATA___V157*/
+ meltfptr[156]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#46 */
- melt_assertmsg ("putupl #46 checktup",
+ /*putupl#41 */
+ melt_assertmsg ("putupl #41 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V156*/ meltfptr[155])) ==
+ ( /*_.VALTUP___V159*/ meltfptr[158])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #46 checkoff",
+ melt_assertmsg ("putupl #41 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V156*/
- meltfptr[155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V156*/ meltfptr[155]))->tabval[0] =
+ ( /*_.VALTUP___V159*/
+ meltfptr[158]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V159*/ meltfptr[158]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -36305,208 +36662,208 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#47 */
- melt_assertmsg ("putupl #47 checktup",
+ /*putupl#42 */
+ melt_assertmsg ("putupl #42 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V156*/ meltfptr[155])) ==
+ ( /*_.VALTUP___V159*/ meltfptr[158])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #47 checkoff",
+ melt_assertmsg ("putupl #42 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V156*/
- meltfptr[155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V156*/ meltfptr[155]))->tabval[1] =
+ ( /*_.VALTUP___V159*/
+ meltfptr[158]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V159*/ meltfptr[158]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V156*/ meltfptr[155]);
+ meltgc_touch ( /*_.VALTUP___V159*/ meltfptr[158]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V154*/ meltfptr[153])) ==
+ ( /*_.VALDATA___V157*/ meltfptr[156])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V154*/
- meltfptr[153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]))->obj_vartab[5] =
+ ( /*_.VALDATA___V157*/
+ meltfptr[156]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V156*/ meltfptr[155]);
+ /*_.VALTUP___V159*/ meltfptr[158]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V157*/ meltfptr[156])) ==
+ ( /*_.VALDATA___V160*/ meltfptr[159])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V157*/
- meltfptr[156]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[1] =
+ ( /*_.VALDATA___V160*/
+ meltfptr[159]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V158*/ meltfptr[157]);
+ /*_.VALSTR___V161*/ meltfptr[160]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V157*/ meltfptr[156])) ==
+ ( /*_.VALDATA___V160*/ meltfptr[159])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V157*/
- meltfptr[156]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[2] =
+ ( /*_.VALDATA___V160*/
+ meltfptr[159]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V154*/ meltfptr[153]);
+ /*_.VALDATA___V157*/ meltfptr[156]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V157*/ meltfptr[156]);
+ meltgc_touch ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#48 */
- melt_assertmsg ("putupl #48 checktup",
+ /*putupl#43 */
+ melt_assertmsg ("putupl #43 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V159*/ meltfptr[158])) ==
+ ( /*_.VALTUP___V162*/ meltfptr[161])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #48 checkoff",
+ melt_assertmsg ("putupl #43 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V159*/
- meltfptr[158]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V159*/ meltfptr[158]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V162*/
+ meltfptr[161]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V162*/ meltfptr[161]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V159*/ meltfptr[158]);
+ meltgc_touch ( /*_.VALTUP___V162*/ meltfptr[161]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V154*/ meltfptr[153])) ==
+ ( /*_.VALDATA___V157*/ meltfptr[156])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V154*/
- meltfptr[153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]))->obj_vartab[6] =
+ ( /*_.VALDATA___V157*/
+ meltfptr[156]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V159*/ meltfptr[158]);
+ /*_.VALTUP___V162*/ meltfptr[161]);
MELT_LOCATION ("warmelt-genobj.melt:36:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V154*/ meltfptr[153]);
+ meltgc_touch ( /*_.VALDATA___V157*/ meltfptr[156]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V160*/ meltfptr[159])) ==
+ ( /*_.VALDATA___V163*/ meltfptr[162])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V160*/
- meltfptr[159]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]))->obj_vartab[1] =
+ ( /*_.VALDATA___V163*/
+ meltfptr[162]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V161*/ meltfptr[160]);
+ /*_.VALSTR___V164*/ meltfptr[163]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V160*/ meltfptr[159]);
+ meltgc_touch ( /*_.VALDATA___V163*/ meltfptr[162]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V162*/ meltfptr[161])) ==
+ ( /*_.VALDATA___V165*/ meltfptr[164])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V162*/
- meltfptr[161]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V162*/ meltfptr[161]))->obj_vartab[1] =
+ ( /*_.VALDATA___V165*/
+ meltfptr[164]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V163*/ meltfptr[162]);
+ /*_.VALSTR___V166*/ meltfptr[165]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V162*/ meltfptr[161]);
+ meltgc_touch ( /*_.VALDATA___V165*/ meltfptr[164]);
MELT_LOCATION ("warmelt-genobj.melt:43:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V164*/ meltfptr[163])) ==
+ ( /*_.VALDATA___V167*/ meltfptr[166])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V164*/
- meltfptr[163]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[1] =
+ ( /*_.VALDATA___V167*/
+ meltfptr[166]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V165*/ meltfptr[164]);
+ /*_.VALSTR___V168*/ meltfptr[167]);
MELT_LOCATION ("warmelt-genobj.melt:43:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V164*/ meltfptr[163])) ==
+ ( /*_.VALDATA___V167*/ meltfptr[166])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V164*/
- meltfptr[163]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[4] =
+ ( /*_.VALDATA___V167*/
+ meltfptr[166]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V154*/ meltfptr[153]);
+ /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#49 */
- melt_assertmsg ("putupl #49 checktup",
+ /*putupl#44 */
+ melt_assertmsg ("putupl #44 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V166*/ meltfptr[165])) ==
+ ( /*_.VALTUP___V169*/ meltfptr[168])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #49 checkoff",
+ melt_assertmsg ("putupl #44 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V166*/
- meltfptr[165]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V166*/ meltfptr[165]))->tabval[0] =
+ ( /*_.VALTUP___V169*/
+ meltfptr[168]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V169*/ meltfptr[168]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -36514,162 +36871,162 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#50 */
- melt_assertmsg ("putupl #50 checktup",
+ /*putupl#45 */
+ melt_assertmsg ("putupl #45 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V166*/ meltfptr[165])) ==
+ ( /*_.VALTUP___V169*/ meltfptr[168])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #50 checkoff",
+ melt_assertmsg ("putupl #45 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V166*/
- meltfptr[165]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V166*/ meltfptr[165]))->tabval[1] =
+ ( /*_.VALTUP___V169*/
+ meltfptr[168]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V169*/ meltfptr[168]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#51 */
- melt_assertmsg ("putupl #51 checktup",
+ /*putupl#46 */
+ melt_assertmsg ("putupl #46 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V166*/ meltfptr[165])) ==
+ ( /*_.VALTUP___V169*/ meltfptr[168])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #51 checkoff",
+ melt_assertmsg ("putupl #46 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V166*/
- meltfptr[165]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V166*/ meltfptr[165]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V169*/
+ meltfptr[168]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V169*/ meltfptr[168]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V166*/ meltfptr[165]);
+ meltgc_touch ( /*_.VALTUP___V169*/ meltfptr[168]);
MELT_LOCATION ("warmelt-genobj.melt:43:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V164*/ meltfptr[163])) ==
+ ( /*_.VALDATA___V167*/ meltfptr[166])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V164*/
- meltfptr[163]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[5] =
+ ( /*_.VALDATA___V167*/
+ meltfptr[166]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V166*/ meltfptr[165]);
+ /*_.VALTUP___V169*/ meltfptr[168]);
- /*putupl#52 */
- melt_assertmsg ("putupl #52 checktup",
+ /*putupl#47 */
+ melt_assertmsg ("putupl #47 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V167*/ meltfptr[166])) ==
+ ( /*_.VALTUP___V170*/ meltfptr[169])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #52 checkoff",
+ melt_assertmsg ("putupl #47 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V167*/
- meltfptr[166]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V167*/ meltfptr[166]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V170*/
+ meltfptr[169]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V170*/ meltfptr[169]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V167*/ meltfptr[166]);
+ meltgc_touch ( /*_.VALTUP___V170*/ meltfptr[169]);
MELT_LOCATION ("warmelt-genobj.melt:43:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V164*/ meltfptr[163])) ==
+ ( /*_.VALDATA___V167*/ meltfptr[166])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V164*/
- meltfptr[163]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[6] =
+ ( /*_.VALDATA___V167*/
+ meltfptr[166]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V167*/ meltfptr[166]);
+ /*_.VALTUP___V170*/ meltfptr[169]);
MELT_LOCATION ("warmelt-genobj.melt:43:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V164*/ meltfptr[163]);
+ meltgc_touch ( /*_.VALDATA___V167*/ meltfptr[166]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V168*/ meltfptr[167])) ==
+ ( /*_.VALDATA___V171*/ meltfptr[170])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V168*/
- meltfptr[167]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]))->obj_vartab[1] =
+ ( /*_.VALDATA___V171*/
+ meltfptr[170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V169*/ meltfptr[168]);
+ /*_.VALSTR___V172*/ meltfptr[171]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V168*/ meltfptr[167]);
+ meltgc_touch ( /*_.VALDATA___V171*/ meltfptr[170]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V170*/ meltfptr[169])) ==
+ ( /*_.VALDATA___V173*/ meltfptr[172])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V170*/
- meltfptr[169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[1] =
+ ( /*_.VALDATA___V173*/
+ meltfptr[172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V171*/ meltfptr[170]);
+ /*_.VALSTR___V174*/ meltfptr[173]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V170*/ meltfptr[169])) ==
+ ( /*_.VALDATA___V173*/ meltfptr[172])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V170*/
- meltfptr[169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[4] =
+ ( /*_.VALDATA___V173*/
+ meltfptr[172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V164*/ meltfptr[163]);
+ /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#53 */
- melt_assertmsg ("putupl #53 checktup",
+ /*putupl#48 */
+ melt_assertmsg ("putupl #48 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V172*/ meltfptr[171])) ==
+ ( /*_.VALTUP___V175*/ meltfptr[174])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #53 checkoff",
+ melt_assertmsg ("putupl #48 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V172*/
- meltfptr[171]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V172*/ meltfptr[171]))->tabval[0] =
+ ( /*_.VALTUP___V175*/
+ meltfptr[174]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V175*/ meltfptr[174]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -36677,398 +37034,398 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#54 */
- melt_assertmsg ("putupl #54 checktup",
+ /*putupl#49 */
+ melt_assertmsg ("putupl #49 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V172*/ meltfptr[171])) ==
+ ( /*_.VALTUP___V175*/ meltfptr[174])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #54 checkoff",
+ melt_assertmsg ("putupl #49 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V172*/
- meltfptr[171]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V172*/ meltfptr[171]))->tabval[1] =
+ ( /*_.VALTUP___V175*/
+ meltfptr[174]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V175*/ meltfptr[174]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#55 */
- melt_assertmsg ("putupl #55 checktup",
+ /*putupl#50 */
+ melt_assertmsg ("putupl #50 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V172*/ meltfptr[171])) ==
+ ( /*_.VALTUP___V175*/ meltfptr[174])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #55 checkoff",
+ melt_assertmsg ("putupl #50 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V172*/
- meltfptr[171]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V172*/ meltfptr[171]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V175*/
+ meltfptr[174]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V175*/ meltfptr[174]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#56 */
- melt_assertmsg ("putupl #56 checktup",
+ /*putupl#51 */
+ melt_assertmsg ("putupl #51 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V172*/ meltfptr[171])) ==
+ ( /*_.VALTUP___V175*/ meltfptr[174])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #56 checkoff",
+ melt_assertmsg ("putupl #51 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V172*/
- meltfptr[171]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V172*/ meltfptr[171]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V175*/
+ meltfptr[174]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V175*/ meltfptr[174]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V172*/ meltfptr[171]);
+ meltgc_touch ( /*_.VALTUP___V175*/ meltfptr[174]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V170*/ meltfptr[169])) ==
+ ( /*_.VALDATA___V173*/ meltfptr[172])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V170*/
- meltfptr[169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[5] =
+ ( /*_.VALDATA___V173*/
+ meltfptr[172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V172*/ meltfptr[171]);
+ /*_.VALTUP___V175*/ meltfptr[174]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V173*/ meltfptr[172])) ==
+ ( /*_.VALDATA___V176*/ meltfptr[175])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V173*/
- meltfptr[172]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[1] =
+ ( /*_.VALDATA___V176*/
+ meltfptr[175]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V174*/ meltfptr[173]);
+ /*_.VALSTR___V177*/ meltfptr[176]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V173*/ meltfptr[172])) ==
+ ( /*_.VALDATA___V176*/ meltfptr[175])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V173*/
- meltfptr[172]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[2] =
+ ( /*_.VALDATA___V176*/
+ meltfptr[175]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V170*/ meltfptr[169]);
+ /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V173*/ meltfptr[172]);
+ meltgc_touch ( /*_.VALDATA___V176*/ meltfptr[175]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V175*/ meltfptr[174])) ==
+ ( /*_.VALDATA___V178*/ meltfptr[177])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V175*/
- meltfptr[174]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]))->obj_vartab[1] =
+ ( /*_.VALDATA___V178*/
+ meltfptr[177]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V176*/ meltfptr[175]);
+ /*_.VALSTR___V179*/ meltfptr[178]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V175*/ meltfptr[174])) ==
+ ( /*_.VALDATA___V178*/ meltfptr[177])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V175*/
- meltfptr[174]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]))->obj_vartab[2] =
+ ( /*_.VALDATA___V178*/
+ meltfptr[177]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V170*/ meltfptr[169]);
+ /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V175*/ meltfptr[174]);
+ meltgc_touch ( /*_.VALDATA___V178*/ meltfptr[177]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V177*/ meltfptr[176])) ==
+ ( /*_.VALDATA___V180*/ meltfptr[179])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V177*/
- meltfptr[176]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]))->obj_vartab[1] =
+ ( /*_.VALDATA___V180*/
+ meltfptr[179]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V178*/ meltfptr[177]);
+ /*_.VALSTR___V181*/ meltfptr[180]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V177*/ meltfptr[176])) ==
+ ( /*_.VALDATA___V180*/ meltfptr[179])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V177*/
- meltfptr[176]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]))->obj_vartab[2] =
+ ( /*_.VALDATA___V180*/
+ meltfptr[179]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V170*/ meltfptr[169]);
+ /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V177*/ meltfptr[176]);
+ meltgc_touch ( /*_.VALDATA___V180*/ meltfptr[179]);
- /*putupl#57 */
- melt_assertmsg ("putupl #57 checktup",
+ /*putupl#52 */
+ melt_assertmsg ("putupl #52 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V179*/ meltfptr[178])) ==
+ ( /*_.VALTUP___V182*/ meltfptr[181])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #57 checkoff",
+ melt_assertmsg ("putupl #52 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V179*/
- meltfptr[178]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V182*/
+ meltfptr[181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V182*/ meltfptr[181]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#58 */
- melt_assertmsg ("putupl #58 checktup",
+ /*putupl#53 */
+ melt_assertmsg ("putupl #53 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V179*/ meltfptr[178])) ==
+ ( /*_.VALTUP___V182*/ meltfptr[181])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #58 checkoff",
+ melt_assertmsg ("putupl #53 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V179*/
- meltfptr[178]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
+ ( /*_.VALTUP___V182*/
+ meltfptr[181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V182*/ meltfptr[181]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]);
- /*putupl#59 */
- melt_assertmsg ("putupl #59 checktup",
+ /*putupl#54 */
+ melt_assertmsg ("putupl #54 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V179*/ meltfptr[178])) ==
+ ( /*_.VALTUP___V182*/ meltfptr[181])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #59 checkoff",
+ melt_assertmsg ("putupl #54 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V179*/
- meltfptr[178]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]);
+ ( /*_.VALTUP___V182*/
+ meltfptr[181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V182*/ meltfptr[181]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]);
- /*putupl#60 */
- melt_assertmsg ("putupl #60 checktup",
+ /*putupl#55 */
+ melt_assertmsg ("putupl #55 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V179*/ meltfptr[178])) ==
+ ( /*_.VALTUP___V182*/ meltfptr[181])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #60 checkoff",
+ melt_assertmsg ("putupl #55 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V179*/
- meltfptr[178]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]);
+ ( /*_.VALTUP___V182*/
+ meltfptr[181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V182*/ meltfptr[181]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V179*/ meltfptr[178]);
+ meltgc_touch ( /*_.VALTUP___V182*/ meltfptr[181]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V170*/ meltfptr[169])) ==
+ ( /*_.VALDATA___V173*/ meltfptr[172])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V170*/
- meltfptr[169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[6] =
+ ( /*_.VALDATA___V173*/
+ meltfptr[172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V179*/ meltfptr[178]);
+ /*_.VALTUP___V182*/ meltfptr[181]);
MELT_LOCATION ("warmelt-genobj.melt:49:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V170*/ meltfptr[169]);
+ meltgc_touch ( /*_.VALDATA___V173*/ meltfptr[172]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V180*/ meltfptr[179])) ==
+ ( /*_.VALDATA___V183*/ meltfptr[182])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V180*/
- meltfptr[179]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]))->obj_vartab[1] =
+ ( /*_.VALDATA___V183*/
+ meltfptr[182]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V181*/ meltfptr[180]);
+ /*_.VALSTR___V184*/ meltfptr[183]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V180*/ meltfptr[179]);
+ meltgc_touch ( /*_.VALDATA___V183*/ meltfptr[182]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V182*/ meltfptr[181])) ==
+ ( /*_.VALDATA___V185*/ meltfptr[184])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V182*/
- meltfptr[181]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]))->obj_vartab[1] =
+ ( /*_.VALDATA___V185*/
+ meltfptr[184]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V183*/ meltfptr[182]);
+ /*_.VALSTR___V186*/ meltfptr[185]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V182*/ meltfptr[181]);
+ meltgc_touch ( /*_.VALDATA___V185*/ meltfptr[184]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V184*/ meltfptr[183])) ==
+ ( /*_.VALDATA___V187*/ meltfptr[186])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V184*/
- meltfptr[183]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]))->obj_vartab[1] =
+ ( /*_.VALDATA___V187*/
+ meltfptr[186]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V185*/ meltfptr[184]);
+ /*_.VALSTR___V188*/ meltfptr[187]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V184*/ meltfptr[183]);
+ meltgc_touch ( /*_.VALDATA___V187*/ meltfptr[186]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V186*/ meltfptr[185])) ==
+ ( /*_.VALDATA___V189*/ meltfptr[188])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V186*/
- meltfptr[185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[1] =
+ ( /*_.VALDATA___V189*/
+ meltfptr[188]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V187*/ meltfptr[186]);
+ /*_.VALSTR___V190*/ meltfptr[189]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V186*/ meltfptr[185]);
+ meltgc_touch ( /*_.VALDATA___V189*/ meltfptr[188]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V188*/ meltfptr[187])) ==
+ ( /*_.VALDATA___V191*/ meltfptr[190])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V188*/
- meltfptr[187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[1] =
+ ( /*_.VALDATA___V191*/
+ meltfptr[190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V189*/ meltfptr[188]);
+ /*_.VALSTR___V192*/ meltfptr[191]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V188*/ meltfptr[187])) ==
+ ( /*_.VALDATA___V191*/ meltfptr[190])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V188*/
- meltfptr[187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[4] =
+ ( /*_.VALDATA___V191*/
+ meltfptr[190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V164*/ meltfptr[163]);
+ /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#61 */
- melt_assertmsg ("putupl #61 checktup",
+ /*putupl#56 */
+ melt_assertmsg ("putupl #56 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V190*/ meltfptr[189])) ==
+ ( /*_.VALTUP___V193*/ meltfptr[192])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #61 checkoff",
+ melt_assertmsg ("putupl #56 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V190*/
- meltfptr[189]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V190*/ meltfptr[189]))->tabval[0] =
+ ( /*_.VALTUP___V193*/
+ meltfptr[192]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V193*/ meltfptr[192]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -37076,398 +37433,398 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#62 */
- melt_assertmsg ("putupl #62 checktup",
+ /*putupl#57 */
+ melt_assertmsg ("putupl #57 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V190*/ meltfptr[189])) ==
+ ( /*_.VALTUP___V193*/ meltfptr[192])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #62 checkoff",
+ melt_assertmsg ("putupl #57 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V190*/
- meltfptr[189]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V190*/ meltfptr[189]))->tabval[1] =
+ ( /*_.VALTUP___V193*/
+ meltfptr[192]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V193*/ meltfptr[192]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#63 */
- melt_assertmsg ("putupl #63 checktup",
+ /*putupl#58 */
+ melt_assertmsg ("putupl #58 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V190*/ meltfptr[189])) ==
+ ( /*_.VALTUP___V193*/ meltfptr[192])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #63 checkoff",
+ melt_assertmsg ("putupl #58 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V190*/
- meltfptr[189]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V190*/ meltfptr[189]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V193*/
+ meltfptr[192]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V193*/ meltfptr[192]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#64 */
- melt_assertmsg ("putupl #64 checktup",
+ /*putupl#59 */
+ melt_assertmsg ("putupl #59 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V190*/ meltfptr[189])) ==
+ ( /*_.VALTUP___V193*/ meltfptr[192])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #64 checkoff",
+ melt_assertmsg ("putupl #59 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V190*/
- meltfptr[189]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V190*/ meltfptr[189]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V193*/
+ meltfptr[192]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V193*/ meltfptr[192]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V190*/ meltfptr[189]);
+ meltgc_touch ( /*_.VALTUP___V193*/ meltfptr[192]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V188*/ meltfptr[187])) ==
+ ( /*_.VALDATA___V191*/ meltfptr[190])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V188*/
- meltfptr[187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[5] =
+ ( /*_.VALDATA___V191*/
+ meltfptr[190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V190*/ meltfptr[189]);
+ /*_.VALTUP___V193*/ meltfptr[192]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V191*/ meltfptr[190])) ==
+ ( /*_.VALDATA___V194*/ meltfptr[193])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V191*/
- meltfptr[190]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[1] =
+ ( /*_.VALDATA___V194*/
+ meltfptr[193]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V192*/ meltfptr[191]);
+ /*_.VALSTR___V195*/ meltfptr[194]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V191*/ meltfptr[190])) ==
+ ( /*_.VALDATA___V194*/ meltfptr[193])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V191*/
- meltfptr[190]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[2] =
+ ( /*_.VALDATA___V194*/
+ meltfptr[193]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V188*/ meltfptr[187]);
+ /*_.VALDATA___V191*/ meltfptr[190]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V191*/ meltfptr[190]);
+ meltgc_touch ( /*_.VALDATA___V194*/ meltfptr[193]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V193*/ meltfptr[192])) ==
+ ( /*_.VALDATA___V196*/ meltfptr[195])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V193*/
- meltfptr[192]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]))->obj_vartab[1] =
+ ( /*_.VALDATA___V196*/
+ meltfptr[195]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V194*/ meltfptr[193]);
+ /*_.VALSTR___V197*/ meltfptr[196]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V193*/ meltfptr[192])) ==
+ ( /*_.VALDATA___V196*/ meltfptr[195])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V193*/
- meltfptr[192]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]))->obj_vartab[2] =
+ ( /*_.VALDATA___V196*/
+ meltfptr[195]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V188*/ meltfptr[187]);
+ /*_.VALDATA___V191*/ meltfptr[190]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V193*/ meltfptr[192]);
+ meltgc_touch ( /*_.VALDATA___V196*/ meltfptr[195]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V195*/ meltfptr[194])) ==
+ ( /*_.VALDATA___V198*/ meltfptr[197])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V195*/
- meltfptr[194]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]))->obj_vartab[1] =
+ ( /*_.VALDATA___V198*/
+ meltfptr[197]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V196*/ meltfptr[195]);
+ /*_.VALSTR___V199*/ meltfptr[198]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V195*/ meltfptr[194])) ==
+ ( /*_.VALDATA___V198*/ meltfptr[197])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V195*/
- meltfptr[194]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]))->obj_vartab[2] =
+ ( /*_.VALDATA___V198*/
+ meltfptr[197]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V188*/ meltfptr[187]);
+ /*_.VALDATA___V191*/ meltfptr[190]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V195*/ meltfptr[194]);
+ meltgc_touch ( /*_.VALDATA___V198*/ meltfptr[197]);
- /*putupl#65 */
- melt_assertmsg ("putupl #65 checktup",
+ /*putupl#60 */
+ melt_assertmsg ("putupl #60 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V197*/ meltfptr[196])) ==
+ ( /*_.VALTUP___V200*/ meltfptr[199])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #65 checkoff",
+ melt_assertmsg ("putupl #60 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V197*/
- meltfptr[196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V197*/ meltfptr[196]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V200*/
+ meltfptr[199]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#66 */
- melt_assertmsg ("putupl #66 checktup",
+ /*putupl#61 */
+ melt_assertmsg ("putupl #61 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V197*/ meltfptr[196])) ==
+ ( /*_.VALTUP___V200*/ meltfptr[199])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #66 checkoff",
+ melt_assertmsg ("putupl #61 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V197*/
- meltfptr[196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V197*/ meltfptr[196]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]);
+ ( /*_.VALTUP___V200*/
+ meltfptr[199]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]);
- /*putupl#67 */
- melt_assertmsg ("putupl #67 checktup",
+ /*putupl#62 */
+ melt_assertmsg ("putupl #62 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V197*/ meltfptr[196])) ==
+ ( /*_.VALTUP___V200*/ meltfptr[199])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #67 checkoff",
+ melt_assertmsg ("putupl #62 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V197*/
- meltfptr[196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V197*/ meltfptr[196]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]);
+ ( /*_.VALTUP___V200*/
+ meltfptr[199]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]);
- /*putupl#68 */
- melt_assertmsg ("putupl #68 checktup",
+ /*putupl#63 */
+ melt_assertmsg ("putupl #63 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V197*/ meltfptr[196])) ==
+ ( /*_.VALTUP___V200*/ meltfptr[199])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #68 checkoff",
+ melt_assertmsg ("putupl #63 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V197*/
- meltfptr[196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V197*/ meltfptr[196]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]);
+ ( /*_.VALTUP___V200*/
+ meltfptr[199]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V197*/ meltfptr[196]);
+ meltgc_touch ( /*_.VALTUP___V200*/ meltfptr[199]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V188*/ meltfptr[187])) ==
+ ( /*_.VALDATA___V191*/ meltfptr[190])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V188*/
- meltfptr[187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[6] =
+ ( /*_.VALDATA___V191*/
+ meltfptr[190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V197*/ meltfptr[196]);
+ /*_.VALTUP___V200*/ meltfptr[199]);
MELT_LOCATION ("warmelt-genobj.melt:58:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V188*/ meltfptr[187]);
+ meltgc_touch ( /*_.VALDATA___V191*/ meltfptr[190]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V198*/ meltfptr[197])) ==
+ ( /*_.VALDATA___V201*/ meltfptr[200])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V198*/
- meltfptr[197]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] =
+ ( /*_.VALDATA___V201*/
+ meltfptr[200]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V199*/ meltfptr[198]);
+ /*_.VALSTR___V202*/ meltfptr[201]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V198*/ meltfptr[197]);
+ meltgc_touch ( /*_.VALDATA___V201*/ meltfptr[200]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V200*/ meltfptr[199])) ==
+ ( /*_.VALDATA___V203*/ meltfptr[202])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V200*/
- meltfptr[199]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]))->obj_vartab[1] =
+ ( /*_.VALDATA___V203*/
+ meltfptr[202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V201*/ meltfptr[200]);
+ /*_.VALSTR___V204*/ meltfptr[203]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V200*/ meltfptr[199]);
+ meltgc_touch ( /*_.VALDATA___V203*/ meltfptr[202]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V202*/ meltfptr[201])) ==
+ ( /*_.VALDATA___V205*/ meltfptr[204])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V202*/
- meltfptr[201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]))->obj_vartab[1] =
+ ( /*_.VALDATA___V205*/
+ meltfptr[204]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V203*/ meltfptr[202]);
+ /*_.VALSTR___V206*/ meltfptr[205]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V202*/ meltfptr[201]);
+ meltgc_touch ( /*_.VALDATA___V205*/ meltfptr[204]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V204*/ meltfptr[203])) ==
+ ( /*_.VALDATA___V207*/ meltfptr[206])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V204*/
- meltfptr[203]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] =
+ ( /*_.VALDATA___V207*/
+ meltfptr[206]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V205*/ meltfptr[204]);
+ /*_.VALSTR___V208*/ meltfptr[207]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V204*/ meltfptr[203]);
+ meltgc_touch ( /*_.VALDATA___V207*/ meltfptr[206]);
MELT_LOCATION ("warmelt-genobj.melt:67:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V206*/ meltfptr[205])) ==
+ ( /*_.VALDATA___V209*/ meltfptr[208])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V206*/
- meltfptr[205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] =
+ ( /*_.VALDATA___V209*/
+ meltfptr[208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V207*/ meltfptr[206]);
+ /*_.VALSTR___V210*/ meltfptr[209]);
MELT_LOCATION ("warmelt-genobj.melt:67:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V206*/ meltfptr[205])) ==
+ ( /*_.VALDATA___V209*/ meltfptr[208])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V206*/
- meltfptr[205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[4] =
+ ( /*_.VALDATA___V209*/
+ meltfptr[208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V188*/ meltfptr[187]);
+ /*_.VALDATA___V191*/ meltfptr[190]);
- /*putupl#69 */
- melt_assertmsg ("putupl #69 checktup",
+ /*putupl#64 */
+ melt_assertmsg ("putupl #64 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V208*/ meltfptr[207])) ==
+ ( /*_.VALTUP___V211*/ meltfptr[210])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #69 checkoff",
+ melt_assertmsg ("putupl #64 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V208*/
- meltfptr[207]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V208*/ meltfptr[207]))->tabval[0] =
+ ( /*_.VALTUP___V211*/
+ meltfptr[210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V211*/ meltfptr[210]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -37475,232 +37832,232 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#70 */
- melt_assertmsg ("putupl #70 checktup",
+ /*putupl#65 */
+ melt_assertmsg ("putupl #65 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V208*/ meltfptr[207])) ==
+ ( /*_.VALTUP___V211*/ meltfptr[210])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #70 checkoff",
+ melt_assertmsg ("putupl #65 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V208*/
- meltfptr[207]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V208*/ meltfptr[207]))->tabval[1] =
+ ( /*_.VALTUP___V211*/
+ meltfptr[210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V211*/ meltfptr[210]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#71 */
- melt_assertmsg ("putupl #71 checktup",
+ /*putupl#66 */
+ melt_assertmsg ("putupl #66 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V208*/ meltfptr[207])) ==
+ ( /*_.VALTUP___V211*/ meltfptr[210])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #71 checkoff",
+ melt_assertmsg ("putupl #66 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V208*/
- meltfptr[207]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V208*/ meltfptr[207]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V211*/
+ meltfptr[210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V211*/ meltfptr[210]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#72 */
- melt_assertmsg ("putupl #72 checktup",
+ /*putupl#67 */
+ melt_assertmsg ("putupl #67 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V208*/ meltfptr[207])) ==
+ ( /*_.VALTUP___V211*/ meltfptr[210])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #72 checkoff",
+ melt_assertmsg ("putupl #67 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V208*/
- meltfptr[207]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V208*/ meltfptr[207]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V211*/
+ meltfptr[210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V211*/ meltfptr[210]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#73 */
- melt_assertmsg ("putupl #73 checktup",
+ /*putupl#68 */
+ melt_assertmsg ("putupl #68 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V208*/ meltfptr[207])) ==
+ ( /*_.VALTUP___V211*/ meltfptr[210])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #73 checkoff",
+ melt_assertmsg ("putupl #68 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V208*/
- meltfptr[207]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V208*/ meltfptr[207]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]);
+ ( /*_.VALTUP___V211*/
+ meltfptr[210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V211*/ meltfptr[210]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V208*/ meltfptr[207]);
+ meltgc_touch ( /*_.VALTUP___V211*/ meltfptr[210]);
MELT_LOCATION ("warmelt-genobj.melt:67:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V206*/ meltfptr[205])) ==
+ ( /*_.VALDATA___V209*/ meltfptr[208])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V206*/
- meltfptr[205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[5] =
+ ( /*_.VALDATA___V209*/
+ meltfptr[208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V208*/ meltfptr[207]);
+ /*_.VALTUP___V211*/ meltfptr[210]);
- /*putupl#74 */
- melt_assertmsg ("putupl #74 checktup",
+ /*putupl#69 */
+ melt_assertmsg ("putupl #69 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V209*/ meltfptr[208])) ==
+ ( /*_.VALTUP___V212*/ meltfptr[211])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #74 checkoff",
+ melt_assertmsg ("putupl #69 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V209*/
- meltfptr[208]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V209*/ meltfptr[208]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V212*/
+ meltfptr[211]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V212*/ meltfptr[211]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#75 */
- melt_assertmsg ("putupl #75 checktup",
+ /*putupl#70 */
+ melt_assertmsg ("putupl #70 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V209*/ meltfptr[208])) ==
+ ( /*_.VALTUP___V212*/ meltfptr[211])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #75 checkoff",
+ melt_assertmsg ("putupl #70 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V209*/
- meltfptr[208]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V209*/ meltfptr[208]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]);
+ ( /*_.VALTUP___V212*/
+ meltfptr[211]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V212*/ meltfptr[211]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]);
- /*putupl#76 */
- melt_assertmsg ("putupl #76 checktup",
+ /*putupl#71 */
+ melt_assertmsg ("putupl #71 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V209*/ meltfptr[208])) ==
+ ( /*_.VALTUP___V212*/ meltfptr[211])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #76 checkoff",
+ melt_assertmsg ("putupl #71 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V209*/
- meltfptr[208]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V209*/ meltfptr[208]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]);
+ ( /*_.VALTUP___V212*/
+ meltfptr[211]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V212*/ meltfptr[211]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]);
- /*putupl#77 */
- melt_assertmsg ("putupl #77 checktup",
+ /*putupl#72 */
+ melt_assertmsg ("putupl #72 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V209*/ meltfptr[208])) ==
+ ( /*_.VALTUP___V212*/ meltfptr[211])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #77 checkoff",
+ melt_assertmsg ("putupl #72 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V209*/
- meltfptr[208]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V209*/ meltfptr[208]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]);
+ ( /*_.VALTUP___V212*/
+ meltfptr[211]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V212*/ meltfptr[211]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V209*/ meltfptr[208]);
+ meltgc_touch ( /*_.VALTUP___V212*/ meltfptr[211]);
MELT_LOCATION ("warmelt-genobj.melt:67:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V206*/ meltfptr[205])) ==
+ ( /*_.VALDATA___V209*/ meltfptr[208])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V206*/
- meltfptr[205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[6] =
+ ( /*_.VALDATA___V209*/
+ meltfptr[208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V209*/ meltfptr[208]);
+ /*_.VALTUP___V212*/ meltfptr[211]);
MELT_LOCATION ("warmelt-genobj.melt:67:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V206*/ meltfptr[205]);
+ meltgc_touch ( /*_.VALDATA___V209*/ meltfptr[208]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V210*/ meltfptr[209])) ==
+ ( /*_.VALDATA___V213*/ meltfptr[212])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V210*/
- meltfptr[209]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V210*/ meltfptr[209]))->obj_vartab[1] =
+ ( /*_.VALDATA___V213*/
+ meltfptr[212]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V211*/ meltfptr[210]);
+ /*_.VALSTR___V214*/ meltfptr[213]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V210*/ meltfptr[209]);
+ meltgc_touch ( /*_.VALDATA___V213*/ meltfptr[212]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V212*/ meltfptr[211])) ==
+ ( /*_.VALDATA___V215*/ meltfptr[214])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V212*/
- meltfptr[211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[1] =
+ ( /*_.VALDATA___V215*/
+ meltfptr[214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V213*/ meltfptr[212]);
+ /*_.VALSTR___V216*/ meltfptr[215]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V212*/ meltfptr[211])) ==
+ ( /*_.VALDATA___V215*/ meltfptr[214])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V212*/
- meltfptr[211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[4] =
+ ( /*_.VALDATA___V215*/
+ meltfptr[214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V164*/ meltfptr[163]);
+ /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#78 */
- melt_assertmsg ("putupl #78 checktup",
+ /*putupl#73 */
+ melt_assertmsg ("putupl #73 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V214*/ meltfptr[213])) ==
+ ( /*_.VALTUP___V217*/ meltfptr[216])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #78 checkoff",
+ melt_assertmsg ("putupl #73 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V214*/
- meltfptr[213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V214*/ meltfptr[213]))->tabval[0] =
+ ( /*_.VALTUP___V217*/
+ meltfptr[216]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -37708,109 +38065,109 @@ warmelt_genobj_initialmeltchunk_0 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#79 */
- melt_assertmsg ("putupl #79 checktup",
+ /*putupl#74 */
+ melt_assertmsg ("putupl #74 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V214*/ meltfptr[213])) ==
+ ( /*_.VALTUP___V217*/ meltfptr[216])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #79 checkoff",
+ melt_assertmsg ("putupl #74 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V214*/
- meltfptr[213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V214*/ meltfptr[213]))->tabval[1] =
+ ( /*_.VALTUP___V217*/
+ meltfptr[216]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#80 */
- melt_assertmsg ("putupl #80 checktup",
+ /*putupl#75 */
+ melt_assertmsg ("putupl #75 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V214*/ meltfptr[213])) ==
+ ( /*_.VALTUP___V217*/ meltfptr[216])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #80 checkoff",
+ melt_assertmsg ("putupl #75 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V214*/
- meltfptr[213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V214*/ meltfptr[213]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V217*/
+ meltfptr[216]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#81 */
- melt_assertmsg ("putupl #81 checktup",
+ /*putupl#76 */
+ melt_assertmsg ("putupl #76 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V214*/ meltfptr[213])) ==
+ ( /*_.VALTUP___V217*/ meltfptr[216])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #81 checkoff",
+ melt_assertmsg ("putupl #76 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V214*/
- meltfptr[213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V214*/ meltfptr[213]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V217*/
+ meltfptr[216]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V214*/ meltfptr[213]);
+ meltgc_touch ( /*_.VALTUP___V217*/ meltfptr[216]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V212*/ meltfptr[211])) ==
+ ( /*_.VALDATA___V215*/ meltfptr[214])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V212*/
- meltfptr[211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[5] =
+ ( /*_.VALDATA___V215*/
+ meltfptr[214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V214*/ meltfptr[213]);
+ /*_.VALTUP___V217*/ meltfptr[216]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V215*/ meltfptr[214])) ==
+ ( /*_.VALDATA___V218*/ meltfptr[217])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V215*/
- meltfptr[214]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[1] =
+ ( /*_.VALDATA___V218*/
+ meltfptr[217]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V216*/ meltfptr[215]);
+ /*_.VALSTR___V219*/ meltfptr[218]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V215*/ meltfptr[214])) ==
+ ( /*_.VALDATA___V218*/ meltfptr[217])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V215*/
- meltfptr[214]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[2] =
+ ( /*_.VALDATA___V218*/
+ meltfptr[217]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V212*/ meltfptr[211]);
+ /*_.VALDATA___V215*/ meltfptr[214]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V215*/ meltfptr[214]);
+ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]);
#undef meltfram__
@@ -37823,146 +38180,146 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#82*/
- melt_assertmsg ("putupl #82 checktup",
+/*putupl#77*/
+ melt_assertmsg ("putupl #77 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V217*/ meltfptr[216])) ==
+ ( /*_.VALTUP___V220*/ meltfptr[219])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #82 checkoff",
+ melt_assertmsg ("putupl #77 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V217*/
- meltfptr[216]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V220*/
+ meltfptr[219]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#83 */
- melt_assertmsg ("putupl #83 checktup",
+ /*putupl#78 */
+ melt_assertmsg ("putupl #78 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V217*/ meltfptr[216])) ==
+ ( /*_.VALTUP___V220*/ meltfptr[219])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #83 checkoff",
+ melt_assertmsg ("putupl #78 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V217*/
- meltfptr[216]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]);
+ ( /*_.VALTUP___V220*/
+ meltfptr[219]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V217*/ meltfptr[216]);
+ meltgc_touch ( /*_.VALTUP___V220*/ meltfptr[219]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V212*/ meltfptr[211])) ==
+ ( /*_.VALDATA___V215*/ meltfptr[214])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V212*/
- meltfptr[211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[6] =
+ ( /*_.VALDATA___V215*/
+ meltfptr[214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V217*/ meltfptr[216]);
+ /*_.VALTUP___V220*/ meltfptr[219]);
MELT_LOCATION ("warmelt-genobj.melt:73:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V212*/ meltfptr[211]);
+ meltgc_touch ( /*_.VALDATA___V215*/ meltfptr[214]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V218*/ meltfptr[217])) ==
+ ( /*_.VALDATA___V221*/ meltfptr[220])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V218*/
- meltfptr[217]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] =
+ ( /*_.VALDATA___V221*/
+ meltfptr[220]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V219*/ meltfptr[218]);
+ /*_.VALSTR___V222*/ meltfptr[221]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]);
+ meltgc_touch ( /*_.VALDATA___V221*/ meltfptr[220]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V220*/ meltfptr[219])) ==
+ ( /*_.VALDATA___V223*/ meltfptr[222])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V220*/
- meltfptr[219]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] =
+ ( /*_.VALDATA___V223*/
+ meltfptr[222]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V221*/ meltfptr[220]);
+ /*_.VALSTR___V224*/ meltfptr[223]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V220*/ meltfptr[219]);
+ meltgc_touch ( /*_.VALDATA___V223*/ meltfptr[222]);
MELT_LOCATION ("warmelt-genobj.melt:79:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V222*/ meltfptr[221])) ==
+ ( /*_.VALDATA___V225*/ meltfptr[224])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V222*/
- meltfptr[221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] =
+ ( /*_.VALDATA___V225*/
+ meltfptr[224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V223*/ meltfptr[222]);
+ /*_.VALSTR___V226*/ meltfptr[225]);
MELT_LOCATION ("warmelt-genobj.melt:79:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V222*/ meltfptr[221])) ==
+ ( /*_.VALDATA___V225*/ meltfptr[224])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V222*/
- meltfptr[221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[4] =
+ ( /*_.VALDATA___V225*/
+ meltfptr[224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V164*/ meltfptr[163]);
+ /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#84 */
- melt_assertmsg ("putupl #84 checktup",
+ /*putupl#79 */
+ melt_assertmsg ("putupl #79 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V224*/ meltfptr[223])) ==
+ ( /*_.VALTUP___V227*/ meltfptr[226])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #84 checkoff",
+ melt_assertmsg ("putupl #79 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V224*/
- meltfptr[223]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V224*/ meltfptr[223]))->tabval[0] =
+ ( /*_.VALTUP___V227*/
+ meltfptr[226]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V227*/ meltfptr[226]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -37970,176 +38327,176 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#85 */
- melt_assertmsg ("putupl #85 checktup",
+ /*putupl#80 */
+ melt_assertmsg ("putupl #80 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V224*/ meltfptr[223])) ==
+ ( /*_.VALTUP___V227*/ meltfptr[226])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #85 checkoff",
+ melt_assertmsg ("putupl #80 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V224*/
- meltfptr[223]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V224*/ meltfptr[223]))->tabval[1] =
+ ( /*_.VALTUP___V227*/
+ meltfptr[226]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V227*/ meltfptr[226]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#86 */
- melt_assertmsg ("putupl #86 checktup",
+ /*putupl#81 */
+ melt_assertmsg ("putupl #81 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V224*/ meltfptr[223])) ==
+ ( /*_.VALTUP___V227*/ meltfptr[226])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #86 checkoff",
+ melt_assertmsg ("putupl #81 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V224*/
- meltfptr[223]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V224*/ meltfptr[223]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V227*/
+ meltfptr[226]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V227*/ meltfptr[226]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#87 */
- melt_assertmsg ("putupl #87 checktup",
+ /*putupl#82 */
+ melt_assertmsg ("putupl #82 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V224*/ meltfptr[223])) ==
+ ( /*_.VALTUP___V227*/ meltfptr[226])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #87 checkoff",
+ melt_assertmsg ("putupl #82 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V224*/
- meltfptr[223]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V224*/ meltfptr[223]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V227*/
+ meltfptr[226]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V227*/ meltfptr[226]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V224*/ meltfptr[223]);
+ meltgc_touch ( /*_.VALTUP___V227*/ meltfptr[226]);
MELT_LOCATION ("warmelt-genobj.melt:79:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V222*/ meltfptr[221])) ==
+ ( /*_.VALDATA___V225*/ meltfptr[224])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V222*/
- meltfptr[221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[5] =
+ ( /*_.VALDATA___V225*/
+ meltfptr[224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V224*/ meltfptr[223]);
+ /*_.VALTUP___V227*/ meltfptr[226]);
- /*putupl#88 */
- melt_assertmsg ("putupl #88 checktup",
+ /*putupl#83 */
+ melt_assertmsg ("putupl #83 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V225*/ meltfptr[224])) ==
+ ( /*_.VALTUP___V228*/ meltfptr[227])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #88 checkoff",
+ melt_assertmsg ("putupl #83 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V225*/
- meltfptr[224]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V225*/ meltfptr[224]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V228*/
+ meltfptr[227]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V225*/ meltfptr[224]);
+ meltgc_touch ( /*_.VALTUP___V228*/ meltfptr[227]);
MELT_LOCATION ("warmelt-genobj.melt:79:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V222*/ meltfptr[221])) ==
+ ( /*_.VALDATA___V225*/ meltfptr[224])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V222*/
- meltfptr[221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[6] =
+ ( /*_.VALDATA___V225*/
+ meltfptr[224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V225*/ meltfptr[224]);
+ /*_.VALTUP___V228*/ meltfptr[227]);
MELT_LOCATION ("warmelt-genobj.melt:79:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V222*/ meltfptr[221]);
+ meltgc_touch ( /*_.VALDATA___V225*/ meltfptr[224]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V226*/ meltfptr[225])) ==
+ ( /*_.VALDATA___V229*/ meltfptr[228])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V226*/
- meltfptr[225]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] =
+ ( /*_.VALDATA___V229*/
+ meltfptr[228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V227*/ meltfptr[226]);
+ /*_.VALSTR___V230*/ meltfptr[229]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]);
+ meltgc_touch ( /*_.VALDATA___V229*/ meltfptr[228]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V228*/ meltfptr[227])) ==
+ ( /*_.VALDATA___V231*/ meltfptr[230])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V228*/
- meltfptr[227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[1] =
+ ( /*_.VALDATA___V231*/
+ meltfptr[230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V229*/ meltfptr[228]);
+ /*_.VALSTR___V232*/ meltfptr[231]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V228*/ meltfptr[227])) ==
+ ( /*_.VALDATA___V231*/ meltfptr[230])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V228*/
- meltfptr[227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[4] =
+ ( /*_.VALDATA___V231*/
+ meltfptr[230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V164*/ meltfptr[163]);
+ /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#89 */
- melt_assertmsg ("putupl #89 checktup",
+ /*putupl#84 */
+ melt_assertmsg ("putupl #84 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V230*/ meltfptr[229])) ==
+ ( /*_.VALTUP___V233*/ meltfptr[232])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #89 checkoff",
+ melt_assertmsg ("putupl #84 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V230*/
- meltfptr[229]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[0] =
+ ( /*_.VALTUP___V233*/
+ meltfptr[232]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V233*/ meltfptr[232]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -38147,472 +38504,472 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#90 */
- melt_assertmsg ("putupl #90 checktup",
+ /*putupl#85 */
+ melt_assertmsg ("putupl #85 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V230*/ meltfptr[229])) ==
+ ( /*_.VALTUP___V233*/ meltfptr[232])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #90 checkoff",
+ melt_assertmsg ("putupl #85 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V230*/
- meltfptr[229]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[1] =
+ ( /*_.VALTUP___V233*/
+ meltfptr[232]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V233*/ meltfptr[232]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#91 */
- melt_assertmsg ("putupl #91 checktup",
+ /*putupl#86 */
+ melt_assertmsg ("putupl #86 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V230*/ meltfptr[229])) ==
+ ( /*_.VALTUP___V233*/ meltfptr[232])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #91 checkoff",
+ melt_assertmsg ("putupl #86 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V230*/
- meltfptr[229]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V233*/
+ meltfptr[232]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V233*/ meltfptr[232]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#92 */
- melt_assertmsg ("putupl #92 checktup",
+ /*putupl#87 */
+ melt_assertmsg ("putupl #87 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V230*/ meltfptr[229])) ==
+ ( /*_.VALTUP___V233*/ meltfptr[232])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #92 checkoff",
+ melt_assertmsg ("putupl #87 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V230*/
- meltfptr[229]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V233*/
+ meltfptr[232]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V233*/ meltfptr[232]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V230*/ meltfptr[229]);
+ meltgc_touch ( /*_.VALTUP___V233*/ meltfptr[232]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V228*/ meltfptr[227])) ==
+ ( /*_.VALDATA___V231*/ meltfptr[230])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V228*/
- meltfptr[227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[5] =
+ ( /*_.VALDATA___V231*/
+ meltfptr[230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V230*/ meltfptr[229]);
+ /*_.VALTUP___V233*/ meltfptr[232]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V231*/ meltfptr[230])) ==
+ ( /*_.VALDATA___V234*/ meltfptr[233])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V231*/
- meltfptr[230]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] =
+ ( /*_.VALDATA___V234*/
+ meltfptr[233]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V232*/ meltfptr[231]);
+ /*_.VALSTR___V235*/ meltfptr[234]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V231*/ meltfptr[230])) ==
+ ( /*_.VALDATA___V234*/ meltfptr[233])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V231*/
- meltfptr[230]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[2] =
+ ( /*_.VALDATA___V234*/
+ meltfptr[233]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V231*/ meltfptr[230]);
+ meltgc_touch ( /*_.VALDATA___V234*/ meltfptr[233]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V233*/ meltfptr[232])) ==
+ ( /*_.VALDATA___V236*/ meltfptr[235])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V233*/
- meltfptr[232]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[1] =
+ ( /*_.VALDATA___V236*/
+ meltfptr[235]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V234*/ meltfptr[233]);
+ /*_.VALSTR___V237*/ meltfptr[236]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V233*/ meltfptr[232])) ==
+ ( /*_.VALDATA___V236*/ meltfptr[235])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V233*/
- meltfptr[232]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[2] =
+ ( /*_.VALDATA___V236*/
+ meltfptr[235]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V233*/ meltfptr[232]);
+ meltgc_touch ( /*_.VALDATA___V236*/ meltfptr[235]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V235*/ meltfptr[234])) ==
+ ( /*_.VALDATA___V238*/ meltfptr[237])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V235*/
- meltfptr[234]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[1] =
+ ( /*_.VALDATA___V238*/
+ meltfptr[237]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V236*/ meltfptr[235]);
+ /*_.VALSTR___V239*/ meltfptr[238]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V235*/ meltfptr[234])) ==
+ ( /*_.VALDATA___V238*/ meltfptr[237])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V235*/
- meltfptr[234]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[2] =
+ ( /*_.VALDATA___V238*/
+ meltfptr[237]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V235*/ meltfptr[234]);
+ meltgc_touch ( /*_.VALDATA___V238*/ meltfptr[237]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V237*/ meltfptr[236])) ==
+ ( /*_.VALDATA___V240*/ meltfptr[239])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V237*/
- meltfptr[236]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]))->obj_vartab[1] =
+ ( /*_.VALDATA___V240*/
+ meltfptr[239]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V238*/ meltfptr[237]);
+ /*_.VALSTR___V241*/ meltfptr[240]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V237*/ meltfptr[236])) ==
+ ( /*_.VALDATA___V240*/ meltfptr[239])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V237*/
- meltfptr[236]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]))->obj_vartab[2] =
+ ( /*_.VALDATA___V240*/
+ meltfptr[239]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V237*/ meltfptr[236]);
+ meltgc_touch ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#93 */
- melt_assertmsg ("putupl #93 checktup",
+ /*putupl#88 */
+ melt_assertmsg ("putupl #88 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V239*/ meltfptr[238])) ==
+ ( /*_.VALTUP___V242*/ meltfptr[241])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #93 checkoff",
+ melt_assertmsg ("putupl #88 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V239*/
- meltfptr[238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V239*/ meltfptr[238]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V242*/
+ meltfptr[241]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V242*/ meltfptr[241]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#94 */
- melt_assertmsg ("putupl #94 checktup",
+ /*putupl#89 */
+ melt_assertmsg ("putupl #89 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V239*/ meltfptr[238])) ==
+ ( /*_.VALTUP___V242*/ meltfptr[241])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #94 checkoff",
+ melt_assertmsg ("putupl #89 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V239*/
- meltfptr[238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V239*/ meltfptr[238]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V242*/
+ meltfptr[241]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V242*/ meltfptr[241]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#95 */
- melt_assertmsg ("putupl #95 checktup",
+ /*putupl#90 */
+ melt_assertmsg ("putupl #90 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V239*/ meltfptr[238])) ==
+ ( /*_.VALTUP___V242*/ meltfptr[241])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #95 checkoff",
+ melt_assertmsg ("putupl #90 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V239*/
- meltfptr[238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V239*/ meltfptr[238]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V242*/
+ meltfptr[241]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V242*/ meltfptr[241]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#96 */
- melt_assertmsg ("putupl #96 checktup",
+ /*putupl#91 */
+ melt_assertmsg ("putupl #91 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V239*/ meltfptr[238])) ==
+ ( /*_.VALTUP___V242*/ meltfptr[241])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #96 checkoff",
+ melt_assertmsg ("putupl #91 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V239*/
- meltfptr[238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V239*/ meltfptr[238]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V242*/
+ meltfptr[241]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V242*/ meltfptr[241]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#97 */
- melt_assertmsg ("putupl #97 checktup",
+ /*putupl#92 */
+ melt_assertmsg ("putupl #92 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V239*/ meltfptr[238])) ==
+ ( /*_.VALTUP___V242*/ meltfptr[241])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #97 checkoff",
+ melt_assertmsg ("putupl #92 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V239*/
- meltfptr[238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V239*/ meltfptr[238]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V242*/
+ meltfptr[241]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V242*/ meltfptr[241]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V239*/ meltfptr[238]);
+ meltgc_touch ( /*_.VALTUP___V242*/ meltfptr[241]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V228*/ meltfptr[227])) ==
+ ( /*_.VALDATA___V231*/ meltfptr[230])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V228*/
- meltfptr[227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[6] =
+ ( /*_.VALDATA___V231*/
+ meltfptr[230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V239*/ meltfptr[238]);
+ /*_.VALTUP___V242*/ meltfptr[241]);
MELT_LOCATION ("warmelt-genobj.melt:84:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V228*/ meltfptr[227]);
+ meltgc_touch ( /*_.VALDATA___V231*/ meltfptr[230]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V240*/ meltfptr[239])) ==
+ ( /*_.VALDATA___V243*/ meltfptr[242])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V240*/
- meltfptr[239]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] =
+ ( /*_.VALDATA___V243*/
+ meltfptr[242]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V241*/ meltfptr[240]);
+ /*_.VALSTR___V244*/ meltfptr[243]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V240*/ meltfptr[239]);
+ meltgc_touch ( /*_.VALDATA___V243*/ meltfptr[242]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V242*/ meltfptr[241])) ==
+ ( /*_.VALDATA___V245*/ meltfptr[244])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V242*/
- meltfptr[241]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[1] =
+ ( /*_.VALDATA___V245*/
+ meltfptr[244]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V243*/ meltfptr[242]);
+ /*_.VALSTR___V246*/ meltfptr[245]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V242*/ meltfptr[241]);
+ meltgc_touch ( /*_.VALDATA___V245*/ meltfptr[244]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V244*/ meltfptr[243])) ==
+ ( /*_.VALDATA___V247*/ meltfptr[246])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V244*/
- meltfptr[243]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]))->obj_vartab[1] =
+ ( /*_.VALDATA___V247*/
+ meltfptr[246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V245*/ meltfptr[244]);
+ /*_.VALSTR___V248*/ meltfptr[247]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V244*/ meltfptr[243]);
+ meltgc_touch ( /*_.VALDATA___V247*/ meltfptr[246]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V246*/ meltfptr[245])) ==
+ ( /*_.VALDATA___V249*/ meltfptr[248])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V246*/
- meltfptr[245]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]))->obj_vartab[1] =
+ ( /*_.VALDATA___V249*/
+ meltfptr[248]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V247*/ meltfptr[246]);
+ /*_.VALSTR___V250*/ meltfptr[249]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V246*/ meltfptr[245]);
+ meltgc_touch ( /*_.VALDATA___V249*/ meltfptr[248]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V248*/ meltfptr[247])) ==
+ ( /*_.VALDATA___V251*/ meltfptr[250])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V248*/
- meltfptr[247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[1] =
+ ( /*_.VALDATA___V251*/
+ meltfptr[250]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V249*/ meltfptr[248]);
+ /*_.VALSTR___V252*/ meltfptr[251]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V248*/ meltfptr[247]);
+ meltgc_touch ( /*_.VALDATA___V251*/ meltfptr[250]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V250*/ meltfptr[249])) ==
+ ( /*_.VALDATA___V253*/ meltfptr[252])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V250*/
- meltfptr[249]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]))->obj_vartab[1] =
+ ( /*_.VALDATA___V253*/
+ meltfptr[252]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V251*/ meltfptr[250]);
+ /*_.VALSTR___V254*/ meltfptr[253]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V250*/ meltfptr[249])) ==
+ ( /*_.VALDATA___V253*/ meltfptr[252])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V250*/
- meltfptr[249]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]))->obj_vartab[4] =
+ ( /*_.VALDATA___V253*/
+ meltfptr[252]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#98 */
- melt_assertmsg ("putupl #98 checktup",
+ /*putupl#93 */
+ melt_assertmsg ("putupl #93 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V252*/ meltfptr[251])) ==
+ ( /*_.VALTUP___V255*/ meltfptr[254])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #98 checkoff",
+ melt_assertmsg ("putupl #93 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V252*/
- meltfptr[251]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V252*/ meltfptr[251]))->tabval[0] =
+ ( /*_.VALTUP___V255*/
+ meltfptr[254]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -38620,394 +38977,394 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#99 */
- melt_assertmsg ("putupl #99 checktup",
+ /*putupl#94 */
+ melt_assertmsg ("putupl #94 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V252*/ meltfptr[251])) ==
+ ( /*_.VALTUP___V255*/ meltfptr[254])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #99 checkoff",
+ melt_assertmsg ("putupl #94 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V252*/
- meltfptr[251]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V252*/ meltfptr[251]))->tabval[1] =
+ ( /*_.VALTUP___V255*/
+ meltfptr[254]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#100 */
- melt_assertmsg ("putupl #100 checktup",
+ /*putupl#95 */
+ melt_assertmsg ("putupl #95 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V252*/ meltfptr[251])) ==
+ ( /*_.VALTUP___V255*/ meltfptr[254])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #100 checkoff",
+ melt_assertmsg ("putupl #95 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V252*/
- meltfptr[251]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V252*/ meltfptr[251]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V255*/
+ meltfptr[254]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#101 */
- melt_assertmsg ("putupl #101 checktup",
+ /*putupl#96 */
+ melt_assertmsg ("putupl #96 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V252*/ meltfptr[251])) ==
+ ( /*_.VALTUP___V255*/ meltfptr[254])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #101 checkoff",
+ melt_assertmsg ("putupl #96 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V252*/
- meltfptr[251]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V252*/ meltfptr[251]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V255*/
+ meltfptr[254]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#102 */
- melt_assertmsg ("putupl #102 checktup",
+ /*putupl#97 */
+ melt_assertmsg ("putupl #97 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V252*/ meltfptr[251])) ==
+ ( /*_.VALTUP___V255*/ meltfptr[254])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #102 checkoff",
+ melt_assertmsg ("putupl #97 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V252*/
- meltfptr[251]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V252*/ meltfptr[251]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V255*/
+ meltfptr[254]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V252*/ meltfptr[251]);
+ meltgc_touch ( /*_.VALTUP___V255*/ meltfptr[254]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V250*/ meltfptr[249])) ==
+ ( /*_.VALDATA___V253*/ meltfptr[252])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V250*/
- meltfptr[249]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]))->obj_vartab[5] =
+ ( /*_.VALDATA___V253*/
+ meltfptr[252]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V252*/ meltfptr[251]);
+ /*_.VALTUP___V255*/ meltfptr[254]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V256*/ meltfptr[255])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[1] =
+ ( /*_.VALDATA___V256*/
+ meltfptr[255]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V254*/ meltfptr[253]);
+ /*_.VALSTR___V257*/ meltfptr[256]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V256*/ meltfptr[255])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[2] =
+ ( /*_.VALDATA___V256*/
+ meltfptr[255]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V250*/ meltfptr[249]);
+ /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V253*/ meltfptr[252]);
+ meltgc_touch ( /*_.VALDATA___V256*/ meltfptr[255]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V255*/ meltfptr[254])) ==
+ ( /*_.VALDATA___V258*/ meltfptr[257])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V255*/
- meltfptr[254]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]))->obj_vartab[1] =
+ ( /*_.VALDATA___V258*/
+ meltfptr[257]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V256*/ meltfptr[255]);
+ /*_.VALSTR___V259*/ meltfptr[258]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V255*/ meltfptr[254])) ==
+ ( /*_.VALDATA___V258*/ meltfptr[257])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V255*/
- meltfptr[254]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]))->obj_vartab[2] =
+ ( /*_.VALDATA___V258*/
+ meltfptr[257]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V250*/ meltfptr[249]);
+ /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V255*/ meltfptr[254]);
+ meltgc_touch ( /*_.VALDATA___V258*/ meltfptr[257]);
- /*putupl#103 */
- melt_assertmsg ("putupl #103 checktup",
+ /*putupl#98 */
+ melt_assertmsg ("putupl #98 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #103 checkoff",
+ melt_assertmsg ("putupl #98 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#104 */
- melt_assertmsg ("putupl #104 checktup",
+ /*putupl#99 */
+ melt_assertmsg ("putupl #99 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #104 checkoff",
+ melt_assertmsg ("putupl #99 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#105 */
- melt_assertmsg ("putupl #105 checktup",
+ /*putupl#100 */
+ melt_assertmsg ("putupl #100 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #105 checkoff",
+ melt_assertmsg ("putupl #100 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#106 */
- melt_assertmsg ("putupl #106 checktup",
+ /*putupl#101 */
+ melt_assertmsg ("putupl #101 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #106 checkoff",
+ melt_assertmsg ("putupl #101 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#107 */
- melt_assertmsg ("putupl #107 checktup",
+ /*putupl#102 */
+ melt_assertmsg ("putupl #102 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #107 checkoff",
+ melt_assertmsg ("putupl #102 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#108 */
- melt_assertmsg ("putupl #108 checktup",
+ /*putupl#103 */
+ melt_assertmsg ("putupl #103 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #108 checkoff",
+ melt_assertmsg ("putupl #103 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
- /*putupl#109 */
- melt_assertmsg ("putupl #109 checktup",
+ /*putupl#104 */
+ melt_assertmsg ("putupl #104 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V257*/ meltfptr[256])) ==
+ ( /*_.VALTUP___V260*/ meltfptr[259])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #109 checkoff",
+ melt_assertmsg ("putupl #104 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V257*/
- meltfptr[256]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]);
+ ( /*_.VALTUP___V260*/
+ meltfptr[259]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V260*/ meltfptr[259]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V257*/ meltfptr[256]);
+ meltgc_touch ( /*_.VALTUP___V260*/ meltfptr[259]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V250*/ meltfptr[249])) ==
+ ( /*_.VALDATA___V253*/ meltfptr[252])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V250*/
- meltfptr[249]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]))->obj_vartab[6] =
+ ( /*_.VALDATA___V253*/
+ meltfptr[252]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V257*/ meltfptr[256]);
+ /*_.VALTUP___V260*/ meltfptr[259]);
MELT_LOCATION ("warmelt-genobj.melt:94:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V250*/ meltfptr[249]);
+ meltgc_touch ( /*_.VALDATA___V253*/ meltfptr[252]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V258*/ meltfptr[257])) ==
+ ( /*_.VALDATA___V261*/ meltfptr[260])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V258*/
- meltfptr[257]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[1] =
+ ( /*_.VALDATA___V261*/
+ meltfptr[260]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V259*/ meltfptr[258]);
+ /*_.VALSTR___V262*/ meltfptr[261]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V258*/ meltfptr[257]);
+ meltgc_touch ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V260*/ meltfptr[259])) ==
+ ( /*_.VALDATA___V263*/ meltfptr[262])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V260*/
- meltfptr[259]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]))->obj_vartab[1] =
+ ( /*_.VALDATA___V263*/
+ meltfptr[262]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V261*/ meltfptr[260]);
+ /*_.VALSTR___V264*/ meltfptr[263]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V260*/ meltfptr[259]);
+ meltgc_touch ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V262*/ meltfptr[261])) ==
+ ( /*_.VALDATA___V265*/ meltfptr[264])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V262*/
- meltfptr[261]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]))->obj_vartab[1] =
+ ( /*_.VALDATA___V265*/
+ meltfptr[264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V263*/ meltfptr[262]);
+ /*_.VALSTR___V266*/ meltfptr[265]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V262*/ meltfptr[261]);
+ meltgc_touch ( /*_.VALDATA___V265*/ meltfptr[264]);
MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[1] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V265*/ meltfptr[264]);
+ /*_.VALSTR___V268*/ meltfptr[267]);
MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[4] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V250*/ meltfptr[249]);
+ /*_.VALDATA___V253*/ meltfptr[252]);
- /*putupl#110 */
- melt_assertmsg ("putupl #110 checktup",
+ /*putupl#105 */
+ melt_assertmsg ("putupl #105 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #110 checkoff",
+ melt_assertmsg ("putupl #105 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[0] =
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -39015,288 +39372,288 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#111 */
- melt_assertmsg ("putupl #111 checktup",
+ /*putupl#106 */
+ melt_assertmsg ("putupl #106 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #111 checkoff",
+ melt_assertmsg ("putupl #106 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[1] =
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#112 */
- melt_assertmsg ("putupl #112 checktup",
+ /*putupl#107 */
+ melt_assertmsg ("putupl #107 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #112 checkoff",
+ melt_assertmsg ("putupl #107 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#113 */
- melt_assertmsg ("putupl #113 checktup",
+ /*putupl#108 */
+ melt_assertmsg ("putupl #108 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #113 checkoff",
+ melt_assertmsg ("putupl #108 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#114 */
- melt_assertmsg ("putupl #114 checktup",
+ /*putupl#109 */
+ melt_assertmsg ("putupl #109 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #114 checkoff",
+ melt_assertmsg ("putupl #109 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#115 */
- melt_assertmsg ("putupl #115 checktup",
+ /*putupl#110 */
+ melt_assertmsg ("putupl #110 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V266*/ meltfptr[265])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #115 checkoff",
+ melt_assertmsg ("putupl #110 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V266*/
- meltfptr[265]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V266*/ meltfptr[265]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V266*/ meltfptr[265]);
+ meltgc_touch ( /*_.VALTUP___V269*/ meltfptr[268]);
MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[5] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V266*/ meltfptr[265]);
+ /*_.VALTUP___V269*/ meltfptr[268]);
- /*putupl#116 */
- melt_assertmsg ("putupl #116 checktup",
+ /*putupl#111 */
+ melt_assertmsg ("putupl #111 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #116 checkoff",
+ melt_assertmsg ("putupl #111 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#117 */
- melt_assertmsg ("putupl #117 checktup",
+ /*putupl#112 */
+ melt_assertmsg ("putupl #112 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #117 checkoff",
+ melt_assertmsg ("putupl #112 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#118 */
- melt_assertmsg ("putupl #118 checktup",
+ /*putupl#113 */
+ melt_assertmsg ("putupl #113 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #118 checkoff",
+ melt_assertmsg ("putupl #113 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#119 */
- melt_assertmsg ("putupl #119 checktup",
+ /*putupl#114 */
+ melt_assertmsg ("putupl #114 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #119 checkoff",
+ melt_assertmsg ("putupl #114 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#120 */
- melt_assertmsg ("putupl #120 checktup",
+ /*putupl#115 */
+ melt_assertmsg ("putupl #115 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #120 checkoff",
+ melt_assertmsg ("putupl #115 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#121 */
- melt_assertmsg ("putupl #121 checktup",
+ /*putupl#116 */
+ melt_assertmsg ("putupl #116 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #121 checkoff",
+ melt_assertmsg ("putupl #116 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
- /*putupl#122 */
- melt_assertmsg ("putupl #122 checktup",
+ /*putupl#117 */
+ melt_assertmsg ("putupl #117 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V267*/ meltfptr[266])) ==
+ ( /*_.VALTUP___V270*/ meltfptr[269])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #122 checkoff",
+ melt_assertmsg ("putupl #117 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V267*/
- meltfptr[266]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V267*/ meltfptr[266]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]);
+ ( /*_.VALTUP___V270*/
+ meltfptr[269]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V270*/ meltfptr[269]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V267*/ meltfptr[266]);
+ meltgc_touch ( /*_.VALTUP___V270*/ meltfptr[269]);
MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[6] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V267*/ meltfptr[266]);
+ /*_.VALTUP___V270*/ meltfptr[269]);
MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V264*/ meltfptr[263]);
+ meltgc_touch ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V268*/ meltfptr[267])) ==
+ ( /*_.VALDATA___V271*/ meltfptr[270])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V268*/
- meltfptr[267]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]))->obj_vartab[1] =
+ ( /*_.VALDATA___V271*/
+ meltfptr[270]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V269*/ meltfptr[268]);
+ /*_.VALSTR___V272*/ meltfptr[271]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V268*/ meltfptr[267]);
+ meltgc_touch ( /*_.VALDATA___V271*/ meltfptr[270]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V270*/ meltfptr[269])) ==
+ ( /*_.VALDATA___V273*/ meltfptr[272])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V270*/
- meltfptr[269]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] =
+ ( /*_.VALDATA___V273*/
+ meltfptr[272]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V271*/ meltfptr[270]);
+ /*_.VALSTR___V274*/ meltfptr[273]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V270*/ meltfptr[269])) ==
+ ( /*_.VALDATA___V273*/ meltfptr[272])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V270*/
- meltfptr[269]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[4] =
+ ( /*_.VALDATA___V273*/
+ meltfptr[272]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#123 */
- melt_assertmsg ("putupl #123 checktup",
+ /*putupl#118 */
+ melt_assertmsg ("putupl #118 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V272*/ meltfptr[271])) ==
+ ( /*_.VALTUP___V275*/ meltfptr[274])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #123 checkoff",
+ melt_assertmsg ("putupl #118 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V272*/
- meltfptr[271]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[0] =
+ ( /*_.VALTUP___V275*/
+ meltfptr[274]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -39304,151 +39661,151 @@ warmelt_genobj_initialmeltchunk_1 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#124 */
- melt_assertmsg ("putupl #124 checktup",
+ /*putupl#119 */
+ melt_assertmsg ("putupl #119 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V272*/ meltfptr[271])) ==
+ ( /*_.VALTUP___V275*/ meltfptr[274])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #124 checkoff",
+ melt_assertmsg ("putupl #119 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V272*/
- meltfptr[271]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[1] =
+ ( /*_.VALTUP___V275*/
+ meltfptr[274]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#125 */
- melt_assertmsg ("putupl #125 checktup",
+ /*putupl#120 */
+ melt_assertmsg ("putupl #120 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V272*/ meltfptr[271])) ==
+ ( /*_.VALTUP___V275*/ meltfptr[274])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #125 checkoff",
+ melt_assertmsg ("putupl #120 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V272*/
- meltfptr[271]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V275*/
+ meltfptr[274]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#126 */
- melt_assertmsg ("putupl #126 checktup",
+ /*putupl#121 */
+ melt_assertmsg ("putupl #121 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V272*/ meltfptr[271])) ==
+ ( /*_.VALTUP___V275*/ meltfptr[274])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #126 checkoff",
+ melt_assertmsg ("putupl #121 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V272*/
- meltfptr[271]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V275*/
+ meltfptr[274]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#127 */
- melt_assertmsg ("putupl #127 checktup",
+ /*putupl#122 */
+ melt_assertmsg ("putupl #122 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V272*/ meltfptr[271])) ==
+ ( /*_.VALTUP___V275*/ meltfptr[274])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #127 checkoff",
+ melt_assertmsg ("putupl #122 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V272*/
- meltfptr[271]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V275*/
+ meltfptr[274]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V272*/ meltfptr[271]);
+ meltgc_touch ( /*_.VALTUP___V275*/ meltfptr[274]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V270*/ meltfptr[269])) ==
+ ( /*_.VALDATA___V273*/ meltfptr[272])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V270*/
- meltfptr[269]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[5] =
+ ( /*_.VALDATA___V273*/
+ meltfptr[272]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V272*/ meltfptr[271]);
+ /*_.VALTUP___V275*/ meltfptr[274]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V273*/ meltfptr[272])) ==
+ ( /*_.VALDATA___V276*/ meltfptr[275])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V273*/
- meltfptr[272]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] =
+ ( /*_.VALDATA___V276*/
+ meltfptr[275]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V274*/ meltfptr[273]);
+ /*_.VALSTR___V277*/ meltfptr[276]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V273*/ meltfptr[272])) ==
+ ( /*_.VALDATA___V276*/ meltfptr[275])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V273*/
- meltfptr[272]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[2] =
+ ( /*_.VALDATA___V276*/
+ meltfptr[275]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V270*/ meltfptr[269]);
+ /*_.VALDATA___V273*/ meltfptr[272]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]);
+ meltgc_touch ( /*_.VALDATA___V276*/ meltfptr[275]);
- /*putupl#128 */
- melt_assertmsg ("putupl #128 checktup",
+ /*putupl#123 */
+ melt_assertmsg ("putupl #123 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #128 checkoff",
+ melt_assertmsg ("putupl #123 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#129 */
- melt_assertmsg ("putupl #129 checktup",
+ /*putupl#124 */
+ melt_assertmsg ("putupl #124 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #129 checkoff",
+ melt_assertmsg ("putupl #124 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
#undef meltfram__
@@ -39461,174 +39818,174 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#130*/
- melt_assertmsg ("putupl #130 checktup",
+/*putupl#125*/
+ melt_assertmsg ("putupl #125 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #130 checkoff",
+ melt_assertmsg ("putupl #125 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#131 */
- melt_assertmsg ("putupl #131 checktup",
+ /*putupl#126 */
+ melt_assertmsg ("putupl #126 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #131 checkoff",
+ melt_assertmsg ("putupl #126 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#132 */
- melt_assertmsg ("putupl #132 checktup",
+ /*putupl#127 */
+ melt_assertmsg ("putupl #127 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #132 checkoff",
+ melt_assertmsg ("putupl #127 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#133 */
- melt_assertmsg ("putupl #133 checktup",
+ /*putupl#128 */
+ melt_assertmsg ("putupl #128 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V275*/ meltfptr[274])) ==
+ ( /*_.VALTUP___V278*/ meltfptr[277])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #133 checkoff",
+ melt_assertmsg ("putupl #128 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V275*/
- meltfptr[274]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V275*/ meltfptr[274]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]);
+ ( /*_.VALTUP___V278*/
+ meltfptr[277]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V278*/ meltfptr[277]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V275*/ meltfptr[274]);
+ meltgc_touch ( /*_.VALTUP___V278*/ meltfptr[277]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V270*/ meltfptr[269])) ==
+ ( /*_.VALDATA___V273*/ meltfptr[272])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V270*/
- meltfptr[269]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[6] =
+ ( /*_.VALDATA___V273*/
+ meltfptr[272]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V275*/ meltfptr[274]);
+ /*_.VALTUP___V278*/ meltfptr[277]);
MELT_LOCATION ("warmelt-genobj.melt:110:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V270*/ meltfptr[269]);
+ meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V276*/ meltfptr[275])) ==
+ ( /*_.VALDATA___V279*/ meltfptr[278])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V276*/
- meltfptr[275]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] =
+ ( /*_.VALDATA___V279*/
+ meltfptr[278]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V277*/ meltfptr[276]);
+ /*_.VALSTR___V280*/ meltfptr[279]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V276*/ meltfptr[275]);
+ meltgc_touch ( /*_.VALDATA___V279*/ meltfptr[278]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V278*/ meltfptr[277])) ==
+ ( /*_.VALDATA___V281*/ meltfptr[280])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V278*/
- meltfptr[277]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] =
+ ( /*_.VALDATA___V281*/
+ meltfptr[280]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V279*/ meltfptr[278]);
+ /*_.VALSTR___V282*/ meltfptr[281]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V278*/ meltfptr[277]);
+ meltgc_touch ( /*_.VALDATA___V281*/ meltfptr[280]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V280*/ meltfptr[279])) ==
+ ( /*_.VALDATA___V283*/ meltfptr[282])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V280*/
- meltfptr[279]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[1] =
+ ( /*_.VALDATA___V283*/
+ meltfptr[282]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V281*/ meltfptr[280]);
+ /*_.VALSTR___V284*/ meltfptr[283]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V280*/ meltfptr[279])) ==
+ ( /*_.VALDATA___V283*/ meltfptr[282])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V280*/
- meltfptr[279]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[4] =
+ ( /*_.VALDATA___V283*/
+ meltfptr[282]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#134 */
- melt_assertmsg ("putupl #134 checktup",
+ /*putupl#129 */
+ melt_assertmsg ("putupl #129 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V282*/ meltfptr[281])) ==
+ ( /*_.VALTUP___V285*/ meltfptr[284])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #134 checkoff",
+ melt_assertmsg ("putupl #129 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V282*/
- meltfptr[281]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V282*/ meltfptr[281]))->tabval[0] =
+ ( /*_.VALTUP___V285*/
+ meltfptr[284]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -39636,320 +39993,320 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#135 */
- melt_assertmsg ("putupl #135 checktup",
+ /*putupl#130 */
+ melt_assertmsg ("putupl #130 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V282*/ meltfptr[281])) ==
+ ( /*_.VALTUP___V285*/ meltfptr[284])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #135 checkoff",
+ melt_assertmsg ("putupl #130 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V282*/
- meltfptr[281]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V282*/ meltfptr[281]))->tabval[1] =
+ ( /*_.VALTUP___V285*/
+ meltfptr[284]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#136 */
- melt_assertmsg ("putupl #136 checktup",
+ /*putupl#131 */
+ melt_assertmsg ("putupl #131 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V282*/ meltfptr[281])) ==
+ ( /*_.VALTUP___V285*/ meltfptr[284])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #136 checkoff",
+ melt_assertmsg ("putupl #131 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V282*/
- meltfptr[281]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V282*/ meltfptr[281]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V285*/
+ meltfptr[284]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#137 */
- melt_assertmsg ("putupl #137 checktup",
+ /*putupl#132 */
+ melt_assertmsg ("putupl #132 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V282*/ meltfptr[281])) ==
+ ( /*_.VALTUP___V285*/ meltfptr[284])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #137 checkoff",
+ melt_assertmsg ("putupl #132 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V282*/
- meltfptr[281]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V282*/ meltfptr[281]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V285*/
+ meltfptr[284]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#138 */
- melt_assertmsg ("putupl #138 checktup",
+ /*putupl#133 */
+ melt_assertmsg ("putupl #133 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V282*/ meltfptr[281])) ==
+ ( /*_.VALTUP___V285*/ meltfptr[284])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #138 checkoff",
+ melt_assertmsg ("putupl #133 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V282*/
- meltfptr[281]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V282*/ meltfptr[281]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V285*/
+ meltfptr[284]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V282*/ meltfptr[281]);
+ meltgc_touch ( /*_.VALTUP___V285*/ meltfptr[284]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V280*/ meltfptr[279])) ==
+ ( /*_.VALDATA___V283*/ meltfptr[282])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V280*/
- meltfptr[279]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[5] =
+ ( /*_.VALDATA___V283*/
+ meltfptr[282]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V282*/ meltfptr[281]);
+ /*_.VALTUP___V285*/ meltfptr[284]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V286*/ meltfptr[285])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[1] =
+ ( /*_.VALDATA___V286*/
+ meltfptr[285]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V284*/ meltfptr[283]);
+ /*_.VALSTR___V287*/ meltfptr[286]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V286*/ meltfptr[285])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[2] =
+ ( /*_.VALDATA___V286*/
+ meltfptr[285]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V280*/ meltfptr[279]);
+ /*_.VALDATA___V283*/ meltfptr[282]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V283*/ meltfptr[282]);
+ meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]);
- /*putupl#139 */
- melt_assertmsg ("putupl #139 checktup",
+ /*putupl#134 */
+ melt_assertmsg ("putupl #134 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #139 checkoff",
+ melt_assertmsg ("putupl #134 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#140 */
- melt_assertmsg ("putupl #140 checktup",
+ /*putupl#135 */
+ melt_assertmsg ("putupl #135 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #140 checkoff",
+ melt_assertmsg ("putupl #135 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#141 */
- melt_assertmsg ("putupl #141 checktup",
+ /*putupl#136 */
+ melt_assertmsg ("putupl #136 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #141 checkoff",
+ melt_assertmsg ("putupl #136 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#142 */
- melt_assertmsg ("putupl #142 checktup",
+ /*putupl#137 */
+ melt_assertmsg ("putupl #137 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #142 checkoff",
+ melt_assertmsg ("putupl #137 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#143 */
- melt_assertmsg ("putupl #143 checktup",
+ /*putupl#138 */
+ melt_assertmsg ("putupl #138 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #143 checkoff",
+ melt_assertmsg ("putupl #138 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#144 */
- melt_assertmsg ("putupl #144 checktup",
+ /*putupl#139 */
+ melt_assertmsg ("putupl #139 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V288*/ meltfptr[287])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #144 checkoff",
+ melt_assertmsg ("putupl #139 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
+ ( /*_.VALTUP___V288*/
+ meltfptr[287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V285*/ meltfptr[284]);
+ meltgc_touch ( /*_.VALTUP___V288*/ meltfptr[287]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V280*/ meltfptr[279])) ==
+ ( /*_.VALDATA___V283*/ meltfptr[282])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V280*/
- meltfptr[279]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[6] =
+ ( /*_.VALDATA___V283*/
+ meltfptr[282]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V285*/ meltfptr[284]);
+ /*_.VALTUP___V288*/ meltfptr[287]);
MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V280*/ meltfptr[279]);
+ meltgc_touch ( /*_.VALDATA___V283*/ meltfptr[282]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V286*/ meltfptr[285])) ==
+ ( /*_.VALDATA___V289*/ meltfptr[288])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V286*/
- meltfptr[285]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] =
+ ( /*_.VALDATA___V289*/
+ meltfptr[288]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V287*/ meltfptr[286]);
+ /*_.VALSTR___V290*/ meltfptr[289]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]);
+ meltgc_touch ( /*_.VALDATA___V289*/ meltfptr[288]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V288*/ meltfptr[287])) ==
+ ( /*_.VALDATA___V291*/ meltfptr[290])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V288*/
- meltfptr[287]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[1] =
+ ( /*_.VALDATA___V291*/
+ meltfptr[290]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V289*/ meltfptr[288]);
+ /*_.VALSTR___V292*/ meltfptr[291]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V288*/ meltfptr[287]);
+ meltgc_touch ( /*_.VALDATA___V291*/ meltfptr[290]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V290*/ meltfptr[289])) ==
+ ( /*_.VALDATA___V293*/ meltfptr[292])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V290*/
- meltfptr[289]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[1] =
+ ( /*_.VALDATA___V293*/
+ meltfptr[292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V291*/ meltfptr[290]);
+ /*_.VALSTR___V294*/ meltfptr[293]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V290*/ meltfptr[289])) ==
+ ( /*_.VALDATA___V293*/ meltfptr[292])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V290*/
- meltfptr[289]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[4] =
+ ( /*_.VALDATA___V293*/
+ meltfptr[292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#145 */
- melt_assertmsg ("putupl #145 checktup",
+ /*putupl#140 */
+ melt_assertmsg ("putupl #140 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V292*/ meltfptr[291])) ==
+ ( /*_.VALTUP___V295*/ meltfptr[294])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #145 checkoff",
+ melt_assertmsg ("putupl #140 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V292*/
- meltfptr[291]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V292*/ meltfptr[291]))->tabval[0] =
+ ( /*_.VALTUP___V295*/
+ meltfptr[294]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -39957,320 +40314,320 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#146 */
- melt_assertmsg ("putupl #146 checktup",
+ /*putupl#141 */
+ melt_assertmsg ("putupl #141 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V292*/ meltfptr[291])) ==
+ ( /*_.VALTUP___V295*/ meltfptr[294])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #146 checkoff",
+ melt_assertmsg ("putupl #141 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V292*/
- meltfptr[291]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V292*/ meltfptr[291]))->tabval[1] =
+ ( /*_.VALTUP___V295*/
+ meltfptr[294]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#147 */
- melt_assertmsg ("putupl #147 checktup",
+ /*putupl#142 */
+ melt_assertmsg ("putupl #142 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V292*/ meltfptr[291])) ==
+ ( /*_.VALTUP___V295*/ meltfptr[294])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #147 checkoff",
+ melt_assertmsg ("putupl #142 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V292*/
- meltfptr[291]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V292*/ meltfptr[291]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V295*/
+ meltfptr[294]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#148 */
- melt_assertmsg ("putupl #148 checktup",
+ /*putupl#143 */
+ melt_assertmsg ("putupl #143 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V292*/ meltfptr[291])) ==
+ ( /*_.VALTUP___V295*/ meltfptr[294])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #148 checkoff",
+ melt_assertmsg ("putupl #143 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V292*/
- meltfptr[291]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V292*/ meltfptr[291]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V295*/
+ meltfptr[294]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#149 */
- melt_assertmsg ("putupl #149 checktup",
+ /*putupl#144 */
+ melt_assertmsg ("putupl #144 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V292*/ meltfptr[291])) ==
+ ( /*_.VALTUP___V295*/ meltfptr[294])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #149 checkoff",
+ melt_assertmsg ("putupl #144 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V292*/
- meltfptr[291]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V292*/ meltfptr[291]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V295*/
+ meltfptr[294]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V292*/ meltfptr[291]);
+ meltgc_touch ( /*_.VALTUP___V295*/ meltfptr[294]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V290*/ meltfptr[289])) ==
+ ( /*_.VALDATA___V293*/ meltfptr[292])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V290*/
- meltfptr[289]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[5] =
+ ( /*_.VALDATA___V293*/
+ meltfptr[292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V292*/ meltfptr[291]);
+ /*_.VALTUP___V295*/ meltfptr[294]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V296*/ meltfptr[295])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] =
+ ( /*_.VALDATA___V296*/
+ meltfptr[295]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V294*/ meltfptr[293]);
+ /*_.VALSTR___V297*/ meltfptr[296]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V296*/ meltfptr[295])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[2] =
+ ( /*_.VALDATA___V296*/
+ meltfptr[295]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V290*/ meltfptr[289]);
+ /*_.VALDATA___V293*/ meltfptr[292]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V293*/ meltfptr[292]);
+ meltgc_touch ( /*_.VALDATA___V296*/ meltfptr[295]);
- /*putupl#150 */
- melt_assertmsg ("putupl #150 checktup",
+ /*putupl#145 */
+ melt_assertmsg ("putupl #145 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #150 checkoff",
+ melt_assertmsg ("putupl #145 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#151 */
- melt_assertmsg ("putupl #151 checktup",
+ /*putupl#146 */
+ melt_assertmsg ("putupl #146 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #151 checkoff",
+ melt_assertmsg ("putupl #146 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#152 */
- melt_assertmsg ("putupl #152 checktup",
+ /*putupl#147 */
+ melt_assertmsg ("putupl #147 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #152 checkoff",
+ melt_assertmsg ("putupl #147 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#153 */
- melt_assertmsg ("putupl #153 checktup",
+ /*putupl#148 */
+ melt_assertmsg ("putupl #148 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #153 checkoff",
+ melt_assertmsg ("putupl #148 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#154 */
- melt_assertmsg ("putupl #154 checktup",
+ /*putupl#149 */
+ melt_assertmsg ("putupl #149 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #154 checkoff",
+ melt_assertmsg ("putupl #149 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
- /*putupl#155 */
- melt_assertmsg ("putupl #155 checktup",
+ /*putupl#150 */
+ melt_assertmsg ("putupl #150 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V298*/ meltfptr[297])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #155 checkoff",
+ melt_assertmsg ("putupl #150 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
+ ( /*_.VALTUP___V298*/
+ meltfptr[297]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V295*/ meltfptr[294]);
+ meltgc_touch ( /*_.VALTUP___V298*/ meltfptr[297]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V290*/ meltfptr[289])) ==
+ ( /*_.VALDATA___V293*/ meltfptr[292])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V290*/
- meltfptr[289]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[6] =
+ ( /*_.VALDATA___V293*/
+ meltfptr[292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V295*/ meltfptr[294]);
+ /*_.VALTUP___V298*/ meltfptr[297]);
MELT_LOCATION ("warmelt-genobj.melt:127:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V290*/ meltfptr[289]);
+ meltgc_touch ( /*_.VALDATA___V293*/ meltfptr[292]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V296*/ meltfptr[295])) ==
+ ( /*_.VALDATA___V299*/ meltfptr[298])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V296*/
- meltfptr[295]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[1] =
+ ( /*_.VALDATA___V299*/
+ meltfptr[298]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V297*/ meltfptr[296]);
+ /*_.VALSTR___V300*/ meltfptr[299]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V296*/ meltfptr[295]);
+ meltgc_touch ( /*_.VALDATA___V299*/ meltfptr[298]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V298*/ meltfptr[297])) ==
+ ( /*_.VALDATA___V301*/ meltfptr[300])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V298*/
- meltfptr[297]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]))->obj_vartab[1] =
+ ( /*_.VALDATA___V301*/
+ meltfptr[300]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V299*/ meltfptr[298]);
+ /*_.VALSTR___V302*/ meltfptr[301]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V298*/ meltfptr[297]);
+ meltgc_touch ( /*_.VALDATA___V301*/ meltfptr[300]);
MELT_LOCATION ("warmelt-genobj.melt:134:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V300*/ meltfptr[299])) ==
+ ( /*_.VALDATA___V303*/ meltfptr[302])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V300*/
- meltfptr[299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] =
+ ( /*_.VALDATA___V303*/
+ meltfptr[302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V301*/ meltfptr[300]);
+ /*_.VALSTR___V304*/ meltfptr[303]);
MELT_LOCATION ("warmelt-genobj.melt:134:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V300*/ meltfptr[299])) ==
+ ( /*_.VALDATA___V303*/ meltfptr[302])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V300*/
- meltfptr[299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[4] =
+ ( /*_.VALDATA___V303*/
+ meltfptr[302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#156 */
- melt_assertmsg ("putupl #156 checktup",
+ /*putupl#151 */
+ melt_assertmsg ("putupl #151 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V302*/ meltfptr[301])) ==
+ ( /*_.VALTUP___V305*/ meltfptr[304])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #156 checkoff",
+ melt_assertmsg ("putupl #151 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V302*/
- meltfptr[301]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V302*/ meltfptr[301]))->tabval[0] =
+ ( /*_.VALTUP___V305*/
+ meltfptr[304]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -40278,246 +40635,246 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#157 */
- melt_assertmsg ("putupl #157 checktup",
+ /*putupl#152 */
+ melt_assertmsg ("putupl #152 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V302*/ meltfptr[301])) ==
+ ( /*_.VALTUP___V305*/ meltfptr[304])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #157 checkoff",
+ melt_assertmsg ("putupl #152 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V302*/
- meltfptr[301]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V302*/ meltfptr[301]))->tabval[1] =
+ ( /*_.VALTUP___V305*/
+ meltfptr[304]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#158 */
- melt_assertmsg ("putupl #158 checktup",
+ /*putupl#153 */
+ melt_assertmsg ("putupl #153 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V302*/ meltfptr[301])) ==
+ ( /*_.VALTUP___V305*/ meltfptr[304])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #158 checkoff",
+ melt_assertmsg ("putupl #153 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V302*/
- meltfptr[301]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V302*/ meltfptr[301]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V305*/
+ meltfptr[304]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#159 */
- melt_assertmsg ("putupl #159 checktup",
+ /*putupl#154 */
+ melt_assertmsg ("putupl #154 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V302*/ meltfptr[301])) ==
+ ( /*_.VALTUP___V305*/ meltfptr[304])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #159 checkoff",
+ melt_assertmsg ("putupl #154 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V302*/
- meltfptr[301]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V302*/ meltfptr[301]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V305*/
+ meltfptr[304]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#160 */
- melt_assertmsg ("putupl #160 checktup",
+ /*putupl#155 */
+ melt_assertmsg ("putupl #155 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V302*/ meltfptr[301])) ==
+ ( /*_.VALTUP___V305*/ meltfptr[304])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #160 checkoff",
+ melt_assertmsg ("putupl #155 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V302*/
- meltfptr[301]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V302*/ meltfptr[301]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V305*/
+ meltfptr[304]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V302*/ meltfptr[301]);
+ meltgc_touch ( /*_.VALTUP___V305*/ meltfptr[304]);
MELT_LOCATION ("warmelt-genobj.melt:134:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V300*/ meltfptr[299])) ==
+ ( /*_.VALDATA___V303*/ meltfptr[302])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V300*/
- meltfptr[299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[5] =
+ ( /*_.VALDATA___V303*/
+ meltfptr[302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V302*/ meltfptr[301]);
+ /*_.VALTUP___V305*/ meltfptr[304]);
- /*putupl#161 */
- melt_assertmsg ("putupl #161 checktup",
+ /*putupl#156 */
+ melt_assertmsg ("putupl #156 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V303*/ meltfptr[302])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #161 checkoff",
+ melt_assertmsg ("putupl #156 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V303*/
- meltfptr[302]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V303*/ meltfptr[302]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#162 */
- melt_assertmsg ("putupl #162 checktup",
+ /*putupl#157 */
+ melt_assertmsg ("putupl #157 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V303*/ meltfptr[302])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #162 checkoff",
+ melt_assertmsg ("putupl #157 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V303*/
- meltfptr[302]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V303*/ meltfptr[302]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#163 */
- melt_assertmsg ("putupl #163 checktup",
+ /*putupl#158 */
+ melt_assertmsg ("putupl #158 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V303*/ meltfptr[302])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #163 checkoff",
+ melt_assertmsg ("putupl #158 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V303*/
- meltfptr[302]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V303*/ meltfptr[302]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#164 */
- melt_assertmsg ("putupl #164 checktup",
+ /*putupl#159 */
+ melt_assertmsg ("putupl #159 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V303*/ meltfptr[302])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #164 checkoff",
+ melt_assertmsg ("putupl #159 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V303*/
- meltfptr[302]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V303*/ meltfptr[302]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#165 */
- melt_assertmsg ("putupl #165 checktup",
+ /*putupl#160 */
+ melt_assertmsg ("putupl #160 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V303*/ meltfptr[302])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #165 checkoff",
+ melt_assertmsg ("putupl #160 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V303*/
- meltfptr[302]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V303*/ meltfptr[302]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V303*/ meltfptr[302]);
+ meltgc_touch ( /*_.VALTUP___V306*/ meltfptr[305]);
MELT_LOCATION ("warmelt-genobj.melt:134:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V300*/ meltfptr[299])) ==
+ ( /*_.VALDATA___V303*/ meltfptr[302])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V300*/
- meltfptr[299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[6] =
+ ( /*_.VALDATA___V303*/
+ meltfptr[302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V303*/ meltfptr[302]);
+ /*_.VALTUP___V306*/ meltfptr[305]);
MELT_LOCATION ("warmelt-genobj.melt:134:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V300*/ meltfptr[299]);
+ meltgc_touch ( /*_.VALDATA___V303*/ meltfptr[302]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V304*/ meltfptr[303])) ==
+ ( /*_.VALDATA___V307*/ meltfptr[306])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V304*/
- meltfptr[303]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] =
+ ( /*_.VALDATA___V307*/
+ meltfptr[306]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V305*/ meltfptr[304]);
+ /*_.VALSTR___V308*/ meltfptr[307]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V304*/ meltfptr[303]);
+ meltgc_touch ( /*_.VALDATA___V307*/ meltfptr[306]);
MELT_LOCATION ("warmelt-genobj.melt:140:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V306*/ meltfptr[305])) ==
+ ( /*_.VALDATA___V309*/ meltfptr[308])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V306*/
- meltfptr[305]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[1] =
+ ( /*_.VALDATA___V309*/
+ meltfptr[308]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V307*/ meltfptr[306]);
+ /*_.VALSTR___V310*/ meltfptr[309]);
MELT_LOCATION ("warmelt-genobj.melt:140:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V306*/ meltfptr[305])) ==
+ ( /*_.VALDATA___V309*/ meltfptr[308])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V306*/
- meltfptr[305]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[4] =
+ ( /*_.VALDATA___V309*/
+ meltfptr[308]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#166 */
- melt_assertmsg ("putupl #166 checktup",
+ /*putupl#161 */
+ melt_assertmsg ("putupl #161 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V308*/ meltfptr[307])) ==
+ ( /*_.VALTUP___V311*/ meltfptr[310])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #166 checkoff",
+ melt_assertmsg ("putupl #161 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V308*/
- meltfptr[307]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[0] =
+ ( /*_.VALTUP___V311*/
+ meltfptr[310]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -40525,246 +40882,246 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#167 */
- melt_assertmsg ("putupl #167 checktup",
+ /*putupl#162 */
+ melt_assertmsg ("putupl #162 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V308*/ meltfptr[307])) ==
+ ( /*_.VALTUP___V311*/ meltfptr[310])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #167 checkoff",
+ melt_assertmsg ("putupl #162 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V308*/
- meltfptr[307]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[1] =
+ ( /*_.VALTUP___V311*/
+ meltfptr[310]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#168 */
- melt_assertmsg ("putupl #168 checktup",
+ /*putupl#163 */
+ melt_assertmsg ("putupl #163 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V308*/ meltfptr[307])) ==
+ ( /*_.VALTUP___V311*/ meltfptr[310])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #168 checkoff",
+ melt_assertmsg ("putupl #163 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V308*/
- meltfptr[307]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V311*/
+ meltfptr[310]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#169 */
- melt_assertmsg ("putupl #169 checktup",
+ /*putupl#164 */
+ melt_assertmsg ("putupl #164 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V308*/ meltfptr[307])) ==
+ ( /*_.VALTUP___V311*/ meltfptr[310])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #169 checkoff",
+ melt_assertmsg ("putupl #164 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V308*/
- meltfptr[307]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V311*/
+ meltfptr[310]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#170 */
- melt_assertmsg ("putupl #170 checktup",
+ /*putupl#165 */
+ melt_assertmsg ("putupl #165 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V308*/ meltfptr[307])) ==
+ ( /*_.VALTUP___V311*/ meltfptr[310])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #170 checkoff",
+ melt_assertmsg ("putupl #165 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V308*/
- meltfptr[307]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V311*/
+ meltfptr[310]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V308*/ meltfptr[307]);
+ meltgc_touch ( /*_.VALTUP___V311*/ meltfptr[310]);
MELT_LOCATION ("warmelt-genobj.melt:140:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V306*/ meltfptr[305])) ==
+ ( /*_.VALDATA___V309*/ meltfptr[308])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V306*/
- meltfptr[305]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[5] =
+ ( /*_.VALDATA___V309*/
+ meltfptr[308]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V308*/ meltfptr[307]);
+ /*_.VALTUP___V311*/ meltfptr[310]);
- /*putupl#171 */
- melt_assertmsg ("putupl #171 checktup",
+ /*putupl#166 */
+ melt_assertmsg ("putupl #166 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V309*/ meltfptr[308])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #171 checkoff",
+ melt_assertmsg ("putupl #166 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V309*/
- meltfptr[308]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#172 */
- melt_assertmsg ("putupl #172 checktup",
+ /*putupl#167 */
+ melt_assertmsg ("putupl #167 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V309*/ meltfptr[308])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #172 checkoff",
+ melt_assertmsg ("putupl #167 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V309*/
- meltfptr[308]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#173 */
- melt_assertmsg ("putupl #173 checktup",
+ /*putupl#168 */
+ melt_assertmsg ("putupl #168 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V309*/ meltfptr[308])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #173 checkoff",
+ melt_assertmsg ("putupl #168 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V309*/
- meltfptr[308]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#174 */
- melt_assertmsg ("putupl #174 checktup",
+ /*putupl#169 */
+ melt_assertmsg ("putupl #169 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V309*/ meltfptr[308])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #174 checkoff",
+ melt_assertmsg ("putupl #169 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V309*/
- meltfptr[308]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#175 */
- melt_assertmsg ("putupl #175 checktup",
+ /*putupl#170 */
+ melt_assertmsg ("putupl #170 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V309*/ meltfptr[308])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #175 checkoff",
+ melt_assertmsg ("putupl #170 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V309*/
- meltfptr[308]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V309*/ meltfptr[308]);
+ meltgc_touch ( /*_.VALTUP___V312*/ meltfptr[311]);
MELT_LOCATION ("warmelt-genobj.melt:140:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V306*/ meltfptr[305])) ==
+ ( /*_.VALDATA___V309*/ meltfptr[308])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V306*/
- meltfptr[305]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[6] =
+ ( /*_.VALDATA___V309*/
+ meltfptr[308]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V309*/ meltfptr[308]);
+ /*_.VALTUP___V312*/ meltfptr[311]);
MELT_LOCATION ("warmelt-genobj.melt:140:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V306*/ meltfptr[305]);
+ meltgc_touch ( /*_.VALDATA___V309*/ meltfptr[308]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V310*/ meltfptr[309])) ==
+ ( /*_.VALDATA___V313*/ meltfptr[312])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V310*/
- meltfptr[309]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[1] =
+ ( /*_.VALDATA___V313*/
+ meltfptr[312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V311*/ meltfptr[310]);
+ /*_.VALSTR___V314*/ meltfptr[313]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V310*/ meltfptr[309]);
+ meltgc_touch ( /*_.VALDATA___V313*/ meltfptr[312]);
MELT_LOCATION ("warmelt-genobj.melt:145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[1] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V313*/ meltfptr[312]);
+ /*_.VALSTR___V316*/ meltfptr[315]);
MELT_LOCATION ("warmelt-genobj.melt:145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[4] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#176 */
- melt_assertmsg ("putupl #176 checktup",
+ /*putupl#171 */
+ melt_assertmsg ("putupl #171 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V314*/ meltfptr[313])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #176 checkoff",
+ melt_assertmsg ("putupl #171 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V314*/
- meltfptr[313]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[0] =
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -40772,246 +41129,246 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#177 */
- melt_assertmsg ("putupl #177 checktup",
+ /*putupl#172 */
+ melt_assertmsg ("putupl #172 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V314*/ meltfptr[313])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #177 checkoff",
+ melt_assertmsg ("putupl #172 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V314*/
- meltfptr[313]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[1] =
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#178 */
- melt_assertmsg ("putupl #178 checktup",
+ /*putupl#173 */
+ melt_assertmsg ("putupl #173 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V314*/ meltfptr[313])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #178 checkoff",
+ melt_assertmsg ("putupl #173 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V314*/
- meltfptr[313]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#179 */
- melt_assertmsg ("putupl #179 checktup",
+ /*putupl#174 */
+ melt_assertmsg ("putupl #174 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V314*/ meltfptr[313])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #179 checkoff",
+ melt_assertmsg ("putupl #174 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V314*/
- meltfptr[313]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#180 */
- melt_assertmsg ("putupl #180 checktup",
+ /*putupl#175 */
+ melt_assertmsg ("putupl #175 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V314*/ meltfptr[313])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #180 checkoff",
+ melt_assertmsg ("putupl #175 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V314*/
- meltfptr[313]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V314*/ meltfptr[313]);
+ meltgc_touch ( /*_.VALTUP___V317*/ meltfptr[316]);
MELT_LOCATION ("warmelt-genobj.melt:145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[5] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V314*/ meltfptr[313]);
+ /*_.VALTUP___V317*/ meltfptr[316]);
- /*putupl#181 */
- melt_assertmsg ("putupl #181 checktup",
+ /*putupl#176 */
+ melt_assertmsg ("putupl #176 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V315*/ meltfptr[314])) ==
+ ( /*_.VALTUP___V318*/ meltfptr[317])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #181 checkoff",
+ melt_assertmsg ("putupl #176 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V315*/
- meltfptr[314]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V315*/ meltfptr[314]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V318*/
+ meltfptr[317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V318*/ meltfptr[317]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#182 */
- melt_assertmsg ("putupl #182 checktup",
+ /*putupl#177 */
+ melt_assertmsg ("putupl #177 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V315*/ meltfptr[314])) ==
+ ( /*_.VALTUP___V318*/ meltfptr[317])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #182 checkoff",
+ melt_assertmsg ("putupl #177 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V315*/
- meltfptr[314]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V315*/ meltfptr[314]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V318*/
+ meltfptr[317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V318*/ meltfptr[317]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#183 */
- melt_assertmsg ("putupl #183 checktup",
+ /*putupl#178 */
+ melt_assertmsg ("putupl #178 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V315*/ meltfptr[314])) ==
+ ( /*_.VALTUP___V318*/ meltfptr[317])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #183 checkoff",
+ melt_assertmsg ("putupl #178 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V315*/
- meltfptr[314]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V315*/ meltfptr[314]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V318*/
+ meltfptr[317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V318*/ meltfptr[317]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#184 */
- melt_assertmsg ("putupl #184 checktup",
+ /*putupl#179 */
+ melt_assertmsg ("putupl #179 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V315*/ meltfptr[314])) ==
+ ( /*_.VALTUP___V318*/ meltfptr[317])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #184 checkoff",
+ melt_assertmsg ("putupl #179 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V315*/
- meltfptr[314]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V315*/ meltfptr[314]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V318*/
+ meltfptr[317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V318*/ meltfptr[317]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#185 */
- melt_assertmsg ("putupl #185 checktup",
+ /*putupl#180 */
+ melt_assertmsg ("putupl #180 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V315*/ meltfptr[314])) ==
+ ( /*_.VALTUP___V318*/ meltfptr[317])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #185 checkoff",
+ melt_assertmsg ("putupl #180 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V315*/
- meltfptr[314]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V315*/ meltfptr[314]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V318*/
+ meltfptr[317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V318*/ meltfptr[317]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V315*/ meltfptr[314]);
+ meltgc_touch ( /*_.VALTUP___V318*/ meltfptr[317]);
MELT_LOCATION ("warmelt-genobj.melt:145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[6] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V315*/ meltfptr[314]);
+ /*_.VALTUP___V318*/ meltfptr[317]);
MELT_LOCATION ("warmelt-genobj.melt:145:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V312*/ meltfptr[311]);
+ meltgc_touch ( /*_.VALDATA___V315*/ meltfptr[314]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V316*/ meltfptr[315])) ==
+ ( /*_.VALDATA___V319*/ meltfptr[318])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V316*/
- meltfptr[315]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] =
+ ( /*_.VALDATA___V319*/
+ meltfptr[318]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V317*/ meltfptr[316]);
+ /*_.VALSTR___V320*/ meltfptr[319]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V316*/ meltfptr[315]);
+ meltgc_touch ( /*_.VALDATA___V319*/ meltfptr[318]);
MELT_LOCATION ("warmelt-genobj.melt:151:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V318*/ meltfptr[317])) ==
+ ( /*_.VALDATA___V321*/ meltfptr[320])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V318*/
- meltfptr[317]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[1] =
+ ( /*_.VALDATA___V321*/
+ meltfptr[320]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V319*/ meltfptr[318]);
+ /*_.VALSTR___V322*/ meltfptr[321]);
MELT_LOCATION ("warmelt-genobj.melt:151:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V318*/ meltfptr[317])) ==
+ ( /*_.VALDATA___V321*/ meltfptr[320])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V318*/
- meltfptr[317]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[4] =
+ ( /*_.VALDATA___V321*/
+ meltfptr[320]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V228*/ meltfptr[227]);
+ /*_.VALDATA___V231*/ meltfptr[230]);
- /*putupl#186 */
- melt_assertmsg ("putupl #186 checktup",
+ /*putupl#181 */
+ melt_assertmsg ("putupl #181 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V320*/ meltfptr[319])) ==
+ ( /*_.VALTUP___V323*/ meltfptr[322])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #186 checkoff",
+ melt_assertmsg ("putupl #181 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V320*/
- meltfptr[319]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[0] =
+ ( /*_.VALTUP___V323*/
+ meltfptr[322]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41019,96 +41376,96 @@ warmelt_genobj_initialmeltchunk_2 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#187 */
- melt_assertmsg ("putupl #187 checktup",
+ /*putupl#182 */
+ melt_assertmsg ("putupl #182 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V320*/ meltfptr[319])) ==
+ ( /*_.VALTUP___V323*/ meltfptr[322])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #187 checkoff",
+ melt_assertmsg ("putupl #182 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V320*/
- meltfptr[319]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[1] =
+ ( /*_.VALTUP___V323*/
+ meltfptr[322]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#188 */
- melt_assertmsg ("putupl #188 checktup",
+ /*putupl#183 */
+ melt_assertmsg ("putupl #183 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V320*/ meltfptr[319])) ==
+ ( /*_.VALTUP___V323*/ meltfptr[322])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #188 checkoff",
+ melt_assertmsg ("putupl #183 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V320*/
- meltfptr[319]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V323*/
+ meltfptr[322]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#189 */
- melt_assertmsg ("putupl #189 checktup",
+ /*putupl#184 */
+ melt_assertmsg ("putupl #184 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V320*/ meltfptr[319])) ==
+ ( /*_.VALTUP___V323*/ meltfptr[322])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #189 checkoff",
+ melt_assertmsg ("putupl #184 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V320*/
- meltfptr[319]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ ( /*_.VALTUP___V323*/
+ meltfptr[322]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
- /*putupl#190 */
- melt_assertmsg ("putupl #190 checktup",
+ /*putupl#185 */
+ melt_assertmsg ("putupl #185 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V320*/ meltfptr[319])) ==
+ ( /*_.VALTUP___V323*/ meltfptr[322])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #190 checkoff",
+ melt_assertmsg ("putupl #185 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V320*/
- meltfptr[319]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]);
+ ( /*_.VALTUP___V323*/
+ meltfptr[322]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V320*/ meltfptr[319]);
+ meltgc_touch ( /*_.VALTUP___V323*/ meltfptr[322]);
MELT_LOCATION ("warmelt-genobj.melt:151:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V318*/ meltfptr[317])) ==
+ ( /*_.VALDATA___V321*/ meltfptr[320])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V318*/
- meltfptr[317]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[5] =
+ ( /*_.VALDATA___V321*/
+ meltfptr[320]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V320*/ meltfptr[319]);
+ /*_.VALTUP___V323*/ meltfptr[322]);
- /*putupl#191 */
- melt_assertmsg ("putupl #191 checktup",
+ /*putupl#186 */
+ melt_assertmsg ("putupl #186 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V321*/ meltfptr[320])) ==
+ ( /*_.VALTUP___V324*/ meltfptr[323])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #191 checkoff",
+ melt_assertmsg ("putupl #186 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V321*/
- meltfptr[320]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V321*/ meltfptr[320]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V324*/
+ meltfptr[323]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V324*/ meltfptr[323]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
#undef meltfram__
@@ -41121,155 +41478,155 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#192*/
- melt_assertmsg ("putupl #192 checktup",
+/*putupl#187*/
+ melt_assertmsg ("putupl #187 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V321*/ meltfptr[320])) ==
+ ( /*_.VALTUP___V324*/ meltfptr[323])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #192 checkoff",
+ melt_assertmsg ("putupl #187 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V321*/
- meltfptr[320]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V321*/ meltfptr[320]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]);
+ ( /*_.VALTUP___V324*/
+ meltfptr[323]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V324*/ meltfptr[323]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
- /*putupl#193 */
- melt_assertmsg ("putupl #193 checktup",
+ /*putupl#188 */
+ melt_assertmsg ("putupl #188 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V321*/ meltfptr[320])) ==
+ ( /*_.VALTUP___V324*/ meltfptr[323])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #193 checkoff",
+ melt_assertmsg ("putupl #188 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V321*/
- meltfptr[320]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V321*/ meltfptr[320]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
+ ( /*_.VALTUP___V324*/
+ meltfptr[323]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V324*/ meltfptr[323]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
- /*putupl#194 */
- melt_assertmsg ("putupl #194 checktup",
+ /*putupl#189 */
+ melt_assertmsg ("putupl #189 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V321*/ meltfptr[320])) ==
+ ( /*_.VALTUP___V324*/ meltfptr[323])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #194 checkoff",
+ melt_assertmsg ("putupl #189 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V321*/
- meltfptr[320]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V321*/ meltfptr[320]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
+ ( /*_.VALTUP___V324*/
+ meltfptr[323]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V324*/ meltfptr[323]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
- /*putupl#195 */
- melt_assertmsg ("putupl #195 checktup",
+ /*putupl#190 */
+ melt_assertmsg ("putupl #190 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V321*/ meltfptr[320])) ==
+ ( /*_.VALTUP___V324*/ meltfptr[323])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #195 checkoff",
+ melt_assertmsg ("putupl #190 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V321*/
- meltfptr[320]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V321*/ meltfptr[320]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
+ ( /*_.VALTUP___V324*/
+ meltfptr[323]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V324*/ meltfptr[323]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V321*/ meltfptr[320]);
+ meltgc_touch ( /*_.VALTUP___V324*/ meltfptr[323]);
MELT_LOCATION ("warmelt-genobj.melt:151:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V318*/ meltfptr[317])) ==
+ ( /*_.VALDATA___V321*/ meltfptr[320])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V318*/
- meltfptr[317]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[6] =
+ ( /*_.VALDATA___V321*/
+ meltfptr[320]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V321*/ meltfptr[320]);
+ /*_.VALTUP___V324*/ meltfptr[323]);
MELT_LOCATION ("warmelt-genobj.melt:151:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V318*/ meltfptr[317]);
+ meltgc_touch ( /*_.VALDATA___V321*/ meltfptr[320]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V322*/ meltfptr[321])) ==
+ ( /*_.VALDATA___V325*/ meltfptr[324])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V322*/
- meltfptr[321]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]))->obj_vartab[1] =
+ ( /*_.VALDATA___V325*/
+ meltfptr[324]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V323*/ meltfptr[322]);
+ /*_.VALSTR___V326*/ meltfptr[325]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V322*/ meltfptr[321]);
+ meltgc_touch ( /*_.VALDATA___V325*/ meltfptr[324]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V324*/ meltfptr[323])) ==
+ ( /*_.VALDATA___V327*/ meltfptr[326])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V324*/
- meltfptr[323]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[1] =
+ ( /*_.VALDATA___V327*/
+ meltfptr[326]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V325*/ meltfptr[324]);
+ /*_.VALSTR___V328*/ meltfptr[327]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V324*/ meltfptr[323])) ==
+ ( /*_.VALDATA___V327*/ meltfptr[326])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V324*/
- meltfptr[323]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[4] =
+ ( /*_.VALDATA___V327*/
+ meltfptr[326]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V154*/ meltfptr[153]);
+ /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#196 */
- melt_assertmsg ("putupl #196 checktup",
+ /*putupl#191 */
+ melt_assertmsg ("putupl #191 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V329*/ meltfptr[328])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #196 checkoff",
+ melt_assertmsg ("putupl #191 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[0] =
+ ( /*_.VALTUP___V329*/
+ meltfptr[328]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41277,236 +41634,236 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#197 */
- melt_assertmsg ("putupl #197 checktup",
+ /*putupl#192 */
+ melt_assertmsg ("putupl #192 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V329*/ meltfptr[328])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #197 checkoff",
+ melt_assertmsg ("putupl #192 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[1] =
+ ( /*_.VALTUP___V329*/
+ meltfptr[328]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#198 */
- melt_assertmsg ("putupl #198 checktup",
+ /*putupl#193 */
+ melt_assertmsg ("putupl #193 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V329*/ meltfptr[328])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #198 checkoff",
+ melt_assertmsg ("putupl #193 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V329*/
+ meltfptr[328]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V326*/ meltfptr[325]);
+ meltgc_touch ( /*_.VALTUP___V329*/ meltfptr[328]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V324*/ meltfptr[323])) ==
+ ( /*_.VALDATA___V327*/ meltfptr[326])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V324*/
- meltfptr[323]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[5] =
+ ( /*_.VALDATA___V327*/
+ meltfptr[326]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V326*/ meltfptr[325]);
+ /*_.VALTUP___V329*/ meltfptr[328]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V327*/ meltfptr[326])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V327*/
- meltfptr[326]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[1] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V328*/ meltfptr[327]);
+ /*_.VALSTR___V331*/ meltfptr[330]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V327*/ meltfptr[326])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V327*/
- meltfptr[326]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[2] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V324*/ meltfptr[323]);
+ /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V327*/ meltfptr[326]);
+ meltgc_touch ( /*_.VALDATA___V330*/ meltfptr[329]);
- /*putupl#199 */
- melt_assertmsg ("putupl #199 checktup",
+ /*putupl#194 */
+ melt_assertmsg ("putupl #194 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V329*/ meltfptr[328])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #199 checkoff",
+ melt_assertmsg ("putupl #194 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V329*/
- meltfptr[328]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#200 */
- melt_assertmsg ("putupl #200 checktup",
+ /*putupl#195 */
+ melt_assertmsg ("putupl #195 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V329*/ meltfptr[328])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #200 checkoff",
+ melt_assertmsg ("putupl #195 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V329*/
- meltfptr[328]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V329*/ meltfptr[328]);
+ meltgc_touch ( /*_.VALTUP___V332*/ meltfptr[331]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V324*/ meltfptr[323])) ==
+ ( /*_.VALDATA___V327*/ meltfptr[326])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V324*/
- meltfptr[323]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[6] =
+ ( /*_.VALDATA___V327*/
+ meltfptr[326]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V329*/ meltfptr[328]);
+ /*_.VALTUP___V332*/ meltfptr[331]);
MELT_LOCATION ("warmelt-genobj.melt:158:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V324*/ meltfptr[323]);
+ meltgc_touch ( /*_.VALDATA___V327*/ meltfptr[326]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V330*/ meltfptr[329])) ==
+ ( /*_.VALDATA___V333*/ meltfptr[332])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V330*/
- meltfptr[329]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[1] =
+ ( /*_.VALDATA___V333*/
+ meltfptr[332]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V331*/ meltfptr[330]);
+ /*_.VALSTR___V334*/ meltfptr[333]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V330*/ meltfptr[329]);
+ meltgc_touch ( /*_.VALDATA___V333*/ meltfptr[332]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V332*/ meltfptr[331])) ==
+ ( /*_.VALDATA___V335*/ meltfptr[334])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V332*/
- meltfptr[331]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[1] =
+ ( /*_.VALDATA___V335*/
+ meltfptr[334]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V333*/ meltfptr[332]);
+ /*_.VALSTR___V336*/ meltfptr[335]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V332*/ meltfptr[331]);
+ meltgc_touch ( /*_.VALDATA___V335*/ meltfptr[334]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[1] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V335*/ meltfptr[334]);
+ /*_.VALSTR___V338*/ meltfptr[337]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[4] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V324*/ meltfptr[323]);
+ /*_.VALDATA___V327*/ meltfptr[326]);
- /*putupl#201 */
- melt_assertmsg ("putupl #201 checktup",
+ /*putupl#196 */
+ melt_assertmsg ("putupl #196 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V336*/ meltfptr[335])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #201 checkoff",
+ melt_assertmsg ("putupl #196 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V336*/
- meltfptr[335]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V336*/ meltfptr[335]))->tabval[0] =
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41514,264 +41871,264 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#202 */
- melt_assertmsg ("putupl #202 checktup",
+ /*putupl#197 */
+ melt_assertmsg ("putupl #197 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V336*/ meltfptr[335])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #202 checkoff",
+ melt_assertmsg ("putupl #197 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V336*/
- meltfptr[335]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V336*/ meltfptr[335]))->tabval[1] =
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#203 */
- melt_assertmsg ("putupl #203 checktup",
+ /*putupl#198 */
+ melt_assertmsg ("putupl #198 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V336*/ meltfptr[335])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #203 checkoff",
+ melt_assertmsg ("putupl #198 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V336*/
- meltfptr[335]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V336*/ meltfptr[335]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
- /*putupl#204 */
- melt_assertmsg ("putupl #204 checktup",
+ /*putupl#199 */
+ melt_assertmsg ("putupl #199 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V336*/ meltfptr[335])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #204 checkoff",
+ melt_assertmsg ("putupl #199 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V336*/
- meltfptr[335]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V336*/ meltfptr[335]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V336*/ meltfptr[335]);
+ meltgc_touch ( /*_.VALTUP___V339*/ meltfptr[338]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[5] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V336*/ meltfptr[335]);
+ /*_.VALTUP___V339*/ meltfptr[338]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V337*/ meltfptr[336])) ==
+ ( /*_.VALDATA___V340*/ meltfptr[339])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V337*/
- meltfptr[336]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[1] =
+ ( /*_.VALDATA___V340*/
+ meltfptr[339]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V338*/ meltfptr[337]);
+ /*_.VALSTR___V341*/ meltfptr[340]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V337*/ meltfptr[336])) ==
+ ( /*_.VALDATA___V340*/ meltfptr[339])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V337*/
- meltfptr[336]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[2] =
+ ( /*_.VALDATA___V340*/
+ meltfptr[339]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V334*/ meltfptr[333]);
+ /*_.VALDATA___V337*/ meltfptr[336]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V337*/ meltfptr[336]);
+ meltgc_touch ( /*_.VALDATA___V340*/ meltfptr[339]);
- /*putupl#205 */
- melt_assertmsg ("putupl #205 checktup",
+ /*putupl#200 */
+ melt_assertmsg ("putupl #200 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V339*/ meltfptr[338])) ==
+ ( /*_.VALTUP___V342*/ meltfptr[341])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #205 checkoff",
+ melt_assertmsg ("putupl #200 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V339*/
- meltfptr[338]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
+ ( /*_.VALTUP___V342*/
+ meltfptr[341]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]);
- /*putupl#206 */
- melt_assertmsg ("putupl #206 checktup",
+ /*putupl#201 */
+ melt_assertmsg ("putupl #201 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V339*/ meltfptr[338])) ==
+ ( /*_.VALTUP___V342*/ meltfptr[341])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #206 checkoff",
+ melt_assertmsg ("putupl #201 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V339*/
- meltfptr[338]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
+ ( /*_.VALTUP___V342*/
+ meltfptr[341]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]);
- /*putupl#207 */
- melt_assertmsg ("putupl #207 checktup",
+ /*putupl#202 */
+ melt_assertmsg ("putupl #202 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V339*/ meltfptr[338])) ==
+ ( /*_.VALTUP___V342*/ meltfptr[341])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #207 checkoff",
+ melt_assertmsg ("putupl #202 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V339*/
- meltfptr[338]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
+ ( /*_.VALTUP___V342*/
+ meltfptr[341]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V339*/ meltfptr[338]);
+ meltgc_touch ( /*_.VALTUP___V342*/ meltfptr[341]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[6] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V339*/ meltfptr[338]);
+ /*_.VALTUP___V342*/ meltfptr[341]);
MELT_LOCATION ("warmelt-genobj.melt:164:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V334*/ meltfptr[333]);
+ meltgc_touch ( /*_.VALDATA___V337*/ meltfptr[336]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V340*/ meltfptr[339])) ==
+ ( /*_.VALDATA___V343*/ meltfptr[342])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V340*/
- meltfptr[339]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[1] =
+ ( /*_.VALDATA___V343*/
+ meltfptr[342]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V341*/ meltfptr[340]);
+ /*_.VALSTR___V344*/ meltfptr[343]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V340*/ meltfptr[339]);
+ meltgc_touch ( /*_.VALDATA___V343*/ meltfptr[342]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V342*/ meltfptr[341])) ==
+ ( /*_.VALDATA___V345*/ meltfptr[344])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V342*/
- meltfptr[341]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]))->obj_vartab[1] =
+ ( /*_.VALDATA___V345*/
+ meltfptr[344]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V343*/ meltfptr[342]);
+ /*_.VALSTR___V346*/ meltfptr[345]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V342*/ meltfptr[341]);
+ meltgc_touch ( /*_.VALDATA___V345*/ meltfptr[344]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V344*/ meltfptr[343])) ==
+ ( /*_.VALDATA___V347*/ meltfptr[346])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V344*/
- meltfptr[343]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] =
+ ( /*_.VALDATA___V347*/
+ meltfptr[346]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V345*/ meltfptr[344]);
+ /*_.VALSTR___V348*/ meltfptr[347]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V344*/ meltfptr[343])) ==
+ ( /*_.VALDATA___V347*/ meltfptr[346])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V344*/
- meltfptr[343]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[4] =
+ ( /*_.VALDATA___V347*/
+ meltfptr[346]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#208 */
- melt_assertmsg ("putupl #208 checktup",
+ /*putupl#203 */
+ melt_assertmsg ("putupl #203 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V346*/ meltfptr[345])) ==
+ ( /*_.VALTUP___V349*/ meltfptr[348])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #208 checkoff",
+ melt_assertmsg ("putupl #203 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V346*/
- meltfptr[345]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[0] =
+ ( /*_.VALTUP___V349*/
+ meltfptr[348]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41779,208 +42136,208 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#209 */
- melt_assertmsg ("putupl #209 checktup",
+ /*putupl#204 */
+ melt_assertmsg ("putupl #204 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V346*/ meltfptr[345])) ==
+ ( /*_.VALTUP___V349*/ meltfptr[348])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #209 checkoff",
+ melt_assertmsg ("putupl #204 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V346*/
- meltfptr[345]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[1] =
+ ( /*_.VALTUP___V349*/
+ meltfptr[348]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V346*/ meltfptr[345]);
+ meltgc_touch ( /*_.VALTUP___V349*/ meltfptr[348]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V344*/ meltfptr[343])) ==
+ ( /*_.VALDATA___V347*/ meltfptr[346])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V344*/
- meltfptr[343]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[5] =
+ ( /*_.VALDATA___V347*/
+ meltfptr[346]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V346*/ meltfptr[345]);
+ /*_.VALTUP___V349*/ meltfptr[348]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V350*/ meltfptr[349])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[1] =
+ ( /*_.VALDATA___V350*/
+ meltfptr[349]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V348*/ meltfptr[347]);
+ /*_.VALSTR___V351*/ meltfptr[350]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V350*/ meltfptr[349])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[2] =
+ ( /*_.VALDATA___V350*/
+ meltfptr[349]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V347*/ meltfptr[346]);
+ meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#210 */
- melt_assertmsg ("putupl #210 checktup",
+ /*putupl#205 */
+ melt_assertmsg ("putupl #205 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V352*/ meltfptr[351])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #210 checkoff",
+ melt_assertmsg ("putupl #205 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V352*/
+ meltfptr[351]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V349*/ meltfptr[348]);
+ meltgc_touch ( /*_.VALTUP___V352*/ meltfptr[351]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V344*/ meltfptr[343])) ==
+ ( /*_.VALDATA___V347*/ meltfptr[346])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V344*/
- meltfptr[343]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[6] =
+ ( /*_.VALDATA___V347*/
+ meltfptr[346]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V349*/ meltfptr[348]);
+ /*_.VALTUP___V352*/ meltfptr[351]);
MELT_LOCATION ("warmelt-genobj.melt:170:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V344*/ meltfptr[343]);
+ meltgc_touch ( /*_.VALDATA___V347*/ meltfptr[346]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V350*/ meltfptr[349])) ==
+ ( /*_.VALDATA___V353*/ meltfptr[352])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V350*/
- meltfptr[349]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] =
+ ( /*_.VALDATA___V353*/
+ meltfptr[352]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V351*/ meltfptr[350]);
+ /*_.VALSTR___V354*/ meltfptr[353]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]);
+ meltgc_touch ( /*_.VALDATA___V353*/ meltfptr[352]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V352*/ meltfptr[351])) ==
+ ( /*_.VALDATA___V355*/ meltfptr[354])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V352*/
- meltfptr[351]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351]))->obj_vartab[1] =
+ ( /*_.VALDATA___V355*/
+ meltfptr[354]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V353*/ meltfptr[352]);
+ /*_.VALSTR___V356*/ meltfptr[355]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V352*/ meltfptr[351]);
+ meltgc_touch ( /*_.VALDATA___V355*/ meltfptr[354]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V354*/ meltfptr[353])) ==
+ ( /*_.VALDATA___V357*/ meltfptr[356])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V354*/
- meltfptr[353]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[1] =
+ ( /*_.VALDATA___V357*/
+ meltfptr[356]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V355*/ meltfptr[354]);
+ /*_.VALSTR___V358*/ meltfptr[357]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V354*/ meltfptr[353])) ==
+ ( /*_.VALDATA___V357*/ meltfptr[356])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V354*/
- meltfptr[353]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[4] =
+ ( /*_.VALDATA___V357*/
+ meltfptr[356]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#211 */
- melt_assertmsg ("putupl #211 checktup",
+ /*putupl#206 */
+ melt_assertmsg ("putupl #206 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V356*/ meltfptr[355])) ==
+ ( /*_.VALTUP___V359*/ meltfptr[358])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #211 checkoff",
+ melt_assertmsg ("putupl #206 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V356*/
- meltfptr[355]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[0] =
+ ( /*_.VALTUP___V359*/
+ meltfptr[358]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41988,236 +42345,236 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#212 */
- melt_assertmsg ("putupl #212 checktup",
+ /*putupl#207 */
+ melt_assertmsg ("putupl #207 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V356*/ meltfptr[355])) ==
+ ( /*_.VALTUP___V359*/ meltfptr[358])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #212 checkoff",
+ melt_assertmsg ("putupl #207 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V356*/
- meltfptr[355]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[1] =
+ ( /*_.VALTUP___V359*/
+ meltfptr[358]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#213 */
- melt_assertmsg ("putupl #213 checktup",
+ /*putupl#208 */
+ melt_assertmsg ("putupl #208 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V356*/ meltfptr[355])) ==
+ ( /*_.VALTUP___V359*/ meltfptr[358])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #213 checkoff",
+ melt_assertmsg ("putupl #208 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V356*/
- meltfptr[355]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V359*/
+ meltfptr[358]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V356*/ meltfptr[355]);
+ meltgc_touch ( /*_.VALTUP___V359*/ meltfptr[358]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V354*/ meltfptr[353])) ==
+ ( /*_.VALDATA___V357*/ meltfptr[356])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V354*/
- meltfptr[353]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[5] =
+ ( /*_.VALDATA___V357*/
+ meltfptr[356]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V356*/ meltfptr[355]);
+ /*_.VALTUP___V359*/ meltfptr[358]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V360*/ meltfptr[359])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[1] =
+ ( /*_.VALDATA___V360*/
+ meltfptr[359]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V358*/ meltfptr[357]);
+ /*_.VALSTR___V361*/ meltfptr[360]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V360*/ meltfptr[359])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[2] =
+ ( /*_.VALDATA___V360*/
+ meltfptr[359]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V354*/ meltfptr[353]);
+ /*_.VALDATA___V357*/ meltfptr[356]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V357*/ meltfptr[356]);
+ meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]);
- /*putupl#214 */
- melt_assertmsg ("putupl #214 checktup",
+ /*putupl#209 */
+ melt_assertmsg ("putupl #209 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V362*/ meltfptr[361])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #214 checkoff",
+ melt_assertmsg ("putupl #209 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V362*/
+ meltfptr[361]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#215 */
- melt_assertmsg ("putupl #215 checktup",
+ /*putupl#210 */
+ melt_assertmsg ("putupl #210 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V362*/ meltfptr[361])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #215 checkoff",
+ melt_assertmsg ("putupl #210 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]);
+ ( /*_.VALTUP___V362*/
+ meltfptr[361]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V359*/ meltfptr[358]);
+ meltgc_touch ( /*_.VALTUP___V362*/ meltfptr[361]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V354*/ meltfptr[353])) ==
+ ( /*_.VALDATA___V357*/ meltfptr[356])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V354*/
- meltfptr[353]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[6] =
+ ( /*_.VALDATA___V357*/
+ meltfptr[356]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V359*/ meltfptr[358]);
+ /*_.VALTUP___V362*/ meltfptr[361]);
MELT_LOCATION ("warmelt-genobj.melt:175:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V354*/ meltfptr[353]);
+ meltgc_touch ( /*_.VALDATA___V357*/ meltfptr[356]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V360*/ meltfptr[359])) ==
+ ( /*_.VALDATA___V363*/ meltfptr[362])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V360*/
- meltfptr[359]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[1] =
+ ( /*_.VALDATA___V363*/
+ meltfptr[362]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V361*/ meltfptr[360]);
+ /*_.VALSTR___V364*/ meltfptr[363]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]);
+ meltgc_touch ( /*_.VALDATA___V363*/ meltfptr[362]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V362*/ meltfptr[361])) ==
+ ( /*_.VALDATA___V365*/ meltfptr[364])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V362*/
- meltfptr[361]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[1] =
+ ( /*_.VALDATA___V365*/
+ meltfptr[364]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V363*/ meltfptr[362]);
+ /*_.VALSTR___V366*/ meltfptr[365]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V362*/ meltfptr[361]);
+ meltgc_touch ( /*_.VALDATA___V365*/ meltfptr[364]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[1] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V365*/ meltfptr[364]);
+ /*_.VALSTR___V368*/ meltfptr[367]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[4] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#216 */
- melt_assertmsg ("putupl #216 checktup",
+ /*putupl#211 */
+ melt_assertmsg ("putupl #211 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V366*/ meltfptr[365])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #216 checkoff",
+ melt_assertmsg ("putupl #211 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V366*/
- meltfptr[365]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[0] =
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -42225,236 +42582,236 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#217 */
- melt_assertmsg ("putupl #217 checktup",
+ /*putupl#212 */
+ melt_assertmsg ("putupl #212 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V366*/ meltfptr[365])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #217 checkoff",
+ melt_assertmsg ("putupl #212 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V366*/
- meltfptr[365]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[1] =
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#218 */
- melt_assertmsg ("putupl #218 checktup",
+ /*putupl#213 */
+ melt_assertmsg ("putupl #213 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V366*/ meltfptr[365])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #218 checkoff",
+ melt_assertmsg ("putupl #213 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V366*/
- meltfptr[365]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V366*/ meltfptr[365]);
+ meltgc_touch ( /*_.VALTUP___V369*/ meltfptr[368]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[5] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V366*/ meltfptr[365]);
+ /*_.VALTUP___V369*/ meltfptr[368]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V367*/ meltfptr[366])) ==
+ ( /*_.VALDATA___V370*/ meltfptr[369])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V367*/
- meltfptr[366]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[1] =
+ ( /*_.VALDATA___V370*/
+ meltfptr[369]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V368*/ meltfptr[367]);
+ /*_.VALSTR___V371*/ meltfptr[370]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V367*/ meltfptr[366])) ==
+ ( /*_.VALDATA___V370*/ meltfptr[369])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V367*/
- meltfptr[366]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[2] =
+ ( /*_.VALDATA___V370*/
+ meltfptr[369]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]);
+ meltgc_touch ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#219 */
- melt_assertmsg ("putupl #219 checktup",
+ /*putupl#214 */
+ melt_assertmsg ("putupl #214 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V369*/ meltfptr[368])) ==
+ ( /*_.VALTUP___V372*/ meltfptr[371])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #219 checkoff",
+ melt_assertmsg ("putupl #214 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V369*/
- meltfptr[368]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V372*/
+ meltfptr[371]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V372*/ meltfptr[371]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#220 */
- melt_assertmsg ("putupl #220 checktup",
+ /*putupl#215 */
+ melt_assertmsg ("putupl #215 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V369*/ meltfptr[368])) ==
+ ( /*_.VALTUP___V372*/ meltfptr[371])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #220 checkoff",
+ melt_assertmsg ("putupl #215 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V369*/
- meltfptr[368]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V372*/
+ meltfptr[371]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V372*/ meltfptr[371]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V369*/ meltfptr[368]);
+ meltgc_touch ( /*_.VALTUP___V372*/ meltfptr[371]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[6] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V369*/ meltfptr[368]);
+ /*_.VALTUP___V372*/ meltfptr[371]);
MELT_LOCATION ("warmelt-genobj.melt:182:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V364*/ meltfptr[363]);
+ meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V370*/ meltfptr[369])) ==
+ ( /*_.VALDATA___V373*/ meltfptr[372])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V370*/
- meltfptr[369]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] =
+ ( /*_.VALDATA___V373*/
+ meltfptr[372]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V371*/ meltfptr[370]);
+ /*_.VALSTR___V374*/ meltfptr[373]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V370*/ meltfptr[369]);
+ meltgc_touch ( /*_.VALDATA___V373*/ meltfptr[372]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V372*/ meltfptr[371])) ==
+ ( /*_.VALDATA___V375*/ meltfptr[374])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V372*/
- meltfptr[371]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[1] =
+ ( /*_.VALDATA___V375*/
+ meltfptr[374]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V373*/ meltfptr[372]);
+ /*_.VALSTR___V376*/ meltfptr[375]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V372*/ meltfptr[371]);
+ meltgc_touch ( /*_.VALDATA___V375*/ meltfptr[374]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V374*/ meltfptr[373])) ==
+ ( /*_.VALDATA___V377*/ meltfptr[376])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V374*/
- meltfptr[373]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] =
+ ( /*_.VALDATA___V377*/
+ meltfptr[376]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V375*/ meltfptr[374]);
+ /*_.VALSTR___V378*/ meltfptr[377]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V374*/ meltfptr[373])) ==
+ ( /*_.VALDATA___V377*/ meltfptr[376])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V374*/
- meltfptr[373]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[4] =
+ ( /*_.VALDATA___V377*/
+ meltfptr[376]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#221 */
- melt_assertmsg ("putupl #221 checktup",
+ /*putupl#216 */
+ melt_assertmsg ("putupl #216 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V376*/ meltfptr[375])) ==
+ ( /*_.VALTUP___V379*/ meltfptr[378])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #221 checkoff",
+ melt_assertmsg ("putupl #216 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V376*/
- meltfptr[375]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[0] =
+ ( /*_.VALTUP___V379*/
+ meltfptr[378]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -42462,264 +42819,264 @@ warmelt_genobj_initialmeltchunk_3 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#222 */
- melt_assertmsg ("putupl #222 checktup",
+ /*putupl#217 */
+ melt_assertmsg ("putupl #217 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V376*/ meltfptr[375])) ==
+ ( /*_.VALTUP___V379*/ meltfptr[378])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #222 checkoff",
+ melt_assertmsg ("putupl #217 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V376*/
- meltfptr[375]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[1] =
+ ( /*_.VALTUP___V379*/
+ meltfptr[378]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#223 */
- melt_assertmsg ("putupl #223 checktup",
+ /*putupl#218 */
+ melt_assertmsg ("putupl #218 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V376*/ meltfptr[375])) ==
+ ( /*_.VALTUP___V379*/ meltfptr[378])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #223 checkoff",
+ melt_assertmsg ("putupl #218 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V376*/
- meltfptr[375]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V379*/
+ meltfptr[378]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#224 */
- melt_assertmsg ("putupl #224 checktup",
+ /*putupl#219 */
+ melt_assertmsg ("putupl #219 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V376*/ meltfptr[375])) ==
+ ( /*_.VALTUP___V379*/ meltfptr[378])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #224 checkoff",
+ melt_assertmsg ("putupl #219 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V376*/
- meltfptr[375]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V379*/
+ meltfptr[378]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V376*/ meltfptr[375]);
+ meltgc_touch ( /*_.VALTUP___V379*/ meltfptr[378]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V374*/ meltfptr[373])) ==
+ ( /*_.VALDATA___V377*/ meltfptr[376])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V374*/
- meltfptr[373]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[5] =
+ ( /*_.VALDATA___V377*/
+ meltfptr[376]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V376*/ meltfptr[375]);
+ /*_.VALTUP___V379*/ meltfptr[378]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V377*/ meltfptr[376])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V377*/
- meltfptr[376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[1] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V378*/ meltfptr[377]);
+ /*_.VALSTR___V381*/ meltfptr[380]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V377*/ meltfptr[376])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V377*/
- meltfptr[376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[2] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V374*/ meltfptr[373]);
+ /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V377*/ meltfptr[376]);
+ meltgc_touch ( /*_.VALDATA___V380*/ meltfptr[379]);
- /*putupl#225 */
- melt_assertmsg ("putupl #225 checktup",
+ /*putupl#220 */
+ melt_assertmsg ("putupl #220 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V379*/ meltfptr[378])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #225 checkoff",
+ melt_assertmsg ("putupl #220 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V379*/
- meltfptr[378]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#226 */
- melt_assertmsg ("putupl #226 checktup",
+ /*putupl#221 */
+ melt_assertmsg ("putupl #221 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V379*/ meltfptr[378])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #226 checkoff",
+ melt_assertmsg ("putupl #221 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V379*/
- meltfptr[378]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#227 */
- melt_assertmsg ("putupl #227 checktup",
+ /*putupl#222 */
+ melt_assertmsg ("putupl #222 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V379*/ meltfptr[378])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #227 checkoff",
+ melt_assertmsg ("putupl #222 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V379*/
- meltfptr[378]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V379*/ meltfptr[378]);
+ meltgc_touch ( /*_.VALTUP___V382*/ meltfptr[381]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V374*/ meltfptr[373])) ==
+ ( /*_.VALDATA___V377*/ meltfptr[376])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V374*/
- meltfptr[373]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[6] =
+ ( /*_.VALDATA___V377*/
+ meltfptr[376]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V379*/ meltfptr[378]);
+ /*_.VALTUP___V382*/ meltfptr[381]);
MELT_LOCATION ("warmelt-genobj.melt:188:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V374*/ meltfptr[373]);
+ meltgc_touch ( /*_.VALDATA___V377*/ meltfptr[376]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V380*/ meltfptr[379])) ==
+ ( /*_.VALDATA___V383*/ meltfptr[382])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V380*/
- meltfptr[379]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[1] =
+ ( /*_.VALDATA___V383*/
+ meltfptr[382]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V381*/ meltfptr[380]);
+ /*_.VALSTR___V384*/ meltfptr[383]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V380*/ meltfptr[379]);
+ meltgc_touch ( /*_.VALDATA___V383*/ meltfptr[382]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V382*/ meltfptr[381])) ==
+ ( /*_.VALDATA___V385*/ meltfptr[384])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V382*/
- meltfptr[381]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[1] =
+ ( /*_.VALDATA___V385*/
+ meltfptr[384]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V383*/ meltfptr[382]);
+ /*_.VALSTR___V386*/ meltfptr[385]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V382*/ meltfptr[381]);
+ meltgc_touch ( /*_.VALDATA___V385*/ meltfptr[384]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V387*/ meltfptr[386])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[1] =
+ ( /*_.VALDATA___V387*/
+ meltfptr[386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V385*/ meltfptr[384]);
+ /*_.VALSTR___V388*/ meltfptr[387]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V387*/ meltfptr[386])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[4] =
+ ( /*_.VALDATA___V387*/
+ meltfptr[386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#228 */
- melt_assertmsg ("putupl #228 checktup",
+ /*putupl#223 */
+ melt_assertmsg ("putupl #223 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V389*/ meltfptr[388])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #228 checkoff",
+ melt_assertmsg ("putupl #223 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[0] =
+ ( /*_.VALTUP___V389*/
+ meltfptr[388]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -42738,310 +43095,310 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#229*/
- melt_assertmsg ("putupl #229 checktup",
+/*putupl#224*/
+ melt_assertmsg ("putupl #224 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V389*/ meltfptr[388])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #229 checkoff",
+ melt_assertmsg ("putupl #224 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[1] =
+ ( /*_.VALTUP___V389*/
+ meltfptr[388]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#230 */
- melt_assertmsg ("putupl #230 checktup",
+ /*putupl#225 */
+ melt_assertmsg ("putupl #225 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V389*/ meltfptr[388])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #230 checkoff",
+ melt_assertmsg ("putupl #225 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V389*/
+ meltfptr[388]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V386*/ meltfptr[385]);
+ meltgc_touch ( /*_.VALTUP___V389*/ meltfptr[388]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V387*/ meltfptr[386])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[5] =
+ ( /*_.VALDATA___V387*/
+ meltfptr[386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V386*/ meltfptr[385]);
+ /*_.VALTUP___V389*/ meltfptr[388]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V387*/ meltfptr[386])) ==
+ ( /*_.VALDATA___V390*/ meltfptr[389])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V387*/
- meltfptr[386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[1] =
+ ( /*_.VALDATA___V390*/
+ meltfptr[389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V388*/ meltfptr[387]);
+ /*_.VALSTR___V391*/ meltfptr[390]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V387*/ meltfptr[386])) ==
+ ( /*_.VALDATA___V390*/ meltfptr[389])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V387*/
- meltfptr[386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[2] =
+ ( /*_.VALDATA___V390*/
+ meltfptr[389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V384*/ meltfptr[383]);
+ /*_.VALDATA___V387*/ meltfptr[386]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]);
+ meltgc_touch ( /*_.VALDATA___V390*/ meltfptr[389]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V389*/ meltfptr[388])) ==
+ ( /*_.VALDATA___V392*/ meltfptr[391])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V389*/
- meltfptr[388]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]))->obj_vartab[1] =
+ ( /*_.VALDATA___V392*/
+ meltfptr[391]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V390*/ meltfptr[389]);
+ /*_.VALSTR___V393*/ meltfptr[392]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V389*/ meltfptr[388])) ==
+ ( /*_.VALDATA___V392*/ meltfptr[391])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V389*/
- meltfptr[388]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]))->obj_vartab[2] =
+ ( /*_.VALDATA___V392*/
+ meltfptr[391]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V384*/ meltfptr[383]);
+ /*_.VALDATA___V387*/ meltfptr[386]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V389*/ meltfptr[388]);
+ meltgc_touch ( /*_.VALDATA___V392*/ meltfptr[391]);
- /*putupl#231 */
- melt_assertmsg ("putupl #231 checktup",
+ /*putupl#226 */
+ melt_assertmsg ("putupl #226 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V391*/ meltfptr[390])) ==
+ ( /*_.VALTUP___V394*/ meltfptr[393])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #231 checkoff",
+ melt_assertmsg ("putupl #226 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V391*/
- meltfptr[390]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V394*/
+ meltfptr[393]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V394*/ meltfptr[393]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#232 */
- melt_assertmsg ("putupl #232 checktup",
+ /*putupl#227 */
+ melt_assertmsg ("putupl #227 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V391*/ meltfptr[390])) ==
+ ( /*_.VALTUP___V394*/ meltfptr[393])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #232 checkoff",
+ melt_assertmsg ("putupl #227 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V391*/
- meltfptr[390]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]);
+ ( /*_.VALTUP___V394*/
+ meltfptr[393]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V394*/ meltfptr[393]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]);
- /*putupl#233 */
- melt_assertmsg ("putupl #233 checktup",
+ /*putupl#228 */
+ melt_assertmsg ("putupl #228 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V391*/ meltfptr[390])) ==
+ ( /*_.VALTUP___V394*/ meltfptr[393])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #233 checkoff",
+ melt_assertmsg ("putupl #228 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V391*/
- meltfptr[390]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]);
+ ( /*_.VALTUP___V394*/
+ meltfptr[393]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V394*/ meltfptr[393]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V391*/ meltfptr[390]);
+ meltgc_touch ( /*_.VALTUP___V394*/ meltfptr[393]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V387*/ meltfptr[386])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[6] =
+ ( /*_.VALDATA___V387*/
+ meltfptr[386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V391*/ meltfptr[390]);
+ /*_.VALTUP___V394*/ meltfptr[393]);
MELT_LOCATION ("warmelt-genobj.melt:194:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V384*/ meltfptr[383]);
+ meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V392*/ meltfptr[391])) ==
+ ( /*_.VALDATA___V395*/ meltfptr[394])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V392*/
- meltfptr[391]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]))->obj_vartab[1] =
+ ( /*_.VALDATA___V395*/
+ meltfptr[394]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V395*/ meltfptr[394]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V393*/ meltfptr[392]);
+ /*_.VALSTR___V396*/ meltfptr[395]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V392*/ meltfptr[391]);
+ meltgc_touch ( /*_.VALDATA___V395*/ meltfptr[394]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V394*/ meltfptr[393])) ==
+ ( /*_.VALDATA___V397*/ meltfptr[396])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V394*/
- meltfptr[393]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[1] =
+ ( /*_.VALDATA___V397*/
+ meltfptr[396]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V395*/ meltfptr[394]);
+ /*_.VALSTR___V398*/ meltfptr[397]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V394*/ meltfptr[393]);
+ meltgc_touch ( /*_.VALDATA___V397*/ meltfptr[396]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V396*/ meltfptr[395])) ==
+ ( /*_.VALDATA___V399*/ meltfptr[398])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V396*/
- meltfptr[395]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] =
+ ( /*_.VALDATA___V399*/
+ meltfptr[398]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V397*/ meltfptr[396]);
+ /*_.VALSTR___V400*/ meltfptr[399]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V396*/ meltfptr[395]);
+ meltgc_touch ( /*_.VALDATA___V399*/ meltfptr[398]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V398*/ meltfptr[397])) ==
+ ( /*_.VALDATA___V401*/ meltfptr[400])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V398*/
- meltfptr[397]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[1] =
+ ( /*_.VALDATA___V401*/
+ meltfptr[400]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V399*/ meltfptr[398]);
+ /*_.VALSTR___V402*/ meltfptr[401]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V398*/ meltfptr[397])) ==
+ ( /*_.VALDATA___V401*/ meltfptr[400])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V398*/
- meltfptr[397]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[4] =
+ ( /*_.VALDATA___V401*/
+ meltfptr[400]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V384*/ meltfptr[383]);
+ /*_.VALDATA___V387*/ meltfptr[386]);
- /*putupl#234 */
- melt_assertmsg ("putupl #234 checktup",
+ /*putupl#229 */
+ melt_assertmsg ("putupl #229 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V400*/ meltfptr[399])) ==
+ ( /*_.VALTUP___V403*/ meltfptr[402])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #234 checkoff",
+ melt_assertmsg ("putupl #229 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V400*/
- meltfptr[399]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[0] =
+ ( /*_.VALTUP___V403*/
+ meltfptr[402]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -43049,278 +43406,278 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#235 */
- melt_assertmsg ("putupl #235 checktup",
+ /*putupl#230 */
+ melt_assertmsg ("putupl #230 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V400*/ meltfptr[399])) ==
+ ( /*_.VALTUP___V403*/ meltfptr[402])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #235 checkoff",
+ melt_assertmsg ("putupl #230 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V400*/
- meltfptr[399]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[1] =
+ ( /*_.VALTUP___V403*/
+ meltfptr[402]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#236 */
- melt_assertmsg ("putupl #236 checktup",
+ /*putupl#231 */
+ melt_assertmsg ("putupl #231 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V400*/ meltfptr[399])) ==
+ ( /*_.VALTUP___V403*/ meltfptr[402])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #236 checkoff",
+ melt_assertmsg ("putupl #231 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V400*/
- meltfptr[399]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V403*/
+ meltfptr[402]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#237 */
- melt_assertmsg ("putupl #237 checktup",
+ /*putupl#232 */
+ melt_assertmsg ("putupl #232 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V400*/ meltfptr[399])) ==
+ ( /*_.VALTUP___V403*/ meltfptr[402])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #237 checkoff",
+ melt_assertmsg ("putupl #232 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V400*/
- meltfptr[399]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]);
+ ( /*_.VALTUP___V403*/
+ meltfptr[402]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V400*/ meltfptr[399]);
+ meltgc_touch ( /*_.VALTUP___V403*/ meltfptr[402]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V398*/ meltfptr[397])) ==
+ ( /*_.VALDATA___V401*/ meltfptr[400])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V398*/
- meltfptr[397]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[5] =
+ ( /*_.VALDATA___V401*/
+ meltfptr[400]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V400*/ meltfptr[399]);
+ /*_.VALTUP___V403*/ meltfptr[402]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V401*/ meltfptr[400])) ==
+ ( /*_.VALDATA___V404*/ meltfptr[403])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V401*/
- meltfptr[400]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[1] =
+ ( /*_.VALDATA___V404*/
+ meltfptr[403]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V402*/ meltfptr[401]);
+ /*_.VALSTR___V405*/ meltfptr[404]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V401*/ meltfptr[400])) ==
+ ( /*_.VALDATA___V404*/ meltfptr[403])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V401*/
- meltfptr[400]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[2] =
+ ( /*_.VALDATA___V404*/
+ meltfptr[403]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V398*/ meltfptr[397]);
+ /*_.VALDATA___V401*/ meltfptr[400]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V401*/ meltfptr[400]);
+ meltgc_touch ( /*_.VALDATA___V404*/ meltfptr[403]);
- /*putupl#238 */
- melt_assertmsg ("putupl #238 checktup",
+ /*putupl#233 */
+ melt_assertmsg ("putupl #233 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V403*/ meltfptr[402])) ==
+ ( /*_.VALTUP___V406*/ meltfptr[405])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #238 checkoff",
+ melt_assertmsg ("putupl #233 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V403*/
- meltfptr[402]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V406*/
+ meltfptr[405]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V406*/ meltfptr[405]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#239 */
- melt_assertmsg ("putupl #239 checktup",
+ /*putupl#234 */
+ melt_assertmsg ("putupl #234 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V403*/ meltfptr[402])) ==
+ ( /*_.VALTUP___V406*/ meltfptr[405])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #239 checkoff",
+ melt_assertmsg ("putupl #234 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V403*/
- meltfptr[402]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]);
+ ( /*_.VALTUP___V406*/
+ meltfptr[405]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V406*/ meltfptr[405]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]);
- /*putupl#240 */
- melt_assertmsg ("putupl #240 checktup",
+ /*putupl#235 */
+ melt_assertmsg ("putupl #235 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V403*/ meltfptr[402])) ==
+ ( /*_.VALTUP___V406*/ meltfptr[405])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #240 checkoff",
+ melt_assertmsg ("putupl #235 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V403*/
- meltfptr[402]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]);
+ ( /*_.VALTUP___V406*/
+ meltfptr[405]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V406*/ meltfptr[405]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]);
- /*putupl#241 */
- melt_assertmsg ("putupl #241 checktup",
+ /*putupl#236 */
+ melt_assertmsg ("putupl #236 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V403*/ meltfptr[402])) ==
+ ( /*_.VALTUP___V406*/ meltfptr[405])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #241 checkoff",
+ melt_assertmsg ("putupl #236 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V403*/
- meltfptr[402]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V403*/ meltfptr[402]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]);
+ ( /*_.VALTUP___V406*/
+ meltfptr[405]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V406*/ meltfptr[405]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V403*/ meltfptr[402]);
+ meltgc_touch ( /*_.VALTUP___V406*/ meltfptr[405]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V398*/ meltfptr[397])) ==
+ ( /*_.VALDATA___V401*/ meltfptr[400])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V398*/
- meltfptr[397]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[6] =
+ ( /*_.VALDATA___V401*/
+ meltfptr[400]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V403*/ meltfptr[402]);
+ /*_.VALTUP___V406*/ meltfptr[405]);
MELT_LOCATION ("warmelt-genobj.melt:201:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V398*/ meltfptr[397]);
+ meltgc_touch ( /*_.VALDATA___V401*/ meltfptr[400]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V404*/ meltfptr[403])) ==
+ ( /*_.VALDATA___V407*/ meltfptr[406])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V404*/
- meltfptr[403]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]))->obj_vartab[1] =
+ ( /*_.VALDATA___V407*/
+ meltfptr[406]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V407*/ meltfptr[406]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V405*/ meltfptr[404]);
+ /*_.VALSTR___V408*/ meltfptr[407]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V404*/ meltfptr[403]);
+ meltgc_touch ( /*_.VALDATA___V407*/ meltfptr[406]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V406*/ meltfptr[405])) ==
+ ( /*_.VALDATA___V409*/ meltfptr[408])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V406*/
- meltfptr[405]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[1] =
+ ( /*_.VALDATA___V409*/
+ meltfptr[408]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V407*/ meltfptr[406]);
+ /*_.VALSTR___V410*/ meltfptr[409]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V406*/ meltfptr[405]);
+ meltgc_touch ( /*_.VALDATA___V409*/ meltfptr[408]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[1] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V409*/ meltfptr[408]);
+ /*_.VALSTR___V412*/ meltfptr[411]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[4] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#242 */
- melt_assertmsg ("putupl #242 checktup",
+ /*putupl#237 */
+ melt_assertmsg ("putupl #237 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V410*/ meltfptr[409])) ==
+ ( /*_.VALTUP___V413*/ meltfptr[412])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #242 checkoff",
+ melt_assertmsg ("putupl #237 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V410*/
- meltfptr[409]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[0] =
+ ( /*_.VALTUP___V413*/
+ meltfptr[412]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V413*/ meltfptr[412]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -43328,310 +43685,310 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#243 */
- melt_assertmsg ("putupl #243 checktup",
+ /*putupl#238 */
+ melt_assertmsg ("putupl #238 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V410*/ meltfptr[409])) ==
+ ( /*_.VALTUP___V413*/ meltfptr[412])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #243 checkoff",
+ melt_assertmsg ("putupl #238 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V410*/
- meltfptr[409]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[1] =
+ ( /*_.VALTUP___V413*/
+ meltfptr[412]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V413*/ meltfptr[412]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#244 */
- melt_assertmsg ("putupl #244 checktup",
+ /*putupl#239 */
+ melt_assertmsg ("putupl #239 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V410*/ meltfptr[409])) ==
+ ( /*_.VALTUP___V413*/ meltfptr[412])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #244 checkoff",
+ melt_assertmsg ("putupl #239 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V410*/
- meltfptr[409]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V413*/
+ meltfptr[412]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V413*/ meltfptr[412]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V410*/ meltfptr[409]);
+ meltgc_touch ( /*_.VALTUP___V413*/ meltfptr[412]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[5] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V410*/ meltfptr[409]);
+ /*_.VALTUP___V413*/ meltfptr[412]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V411*/ meltfptr[410])) ==
+ ( /*_.VALDATA___V414*/ meltfptr[413])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V411*/
- meltfptr[410]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[1] =
+ ( /*_.VALDATA___V414*/
+ meltfptr[413]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V414*/ meltfptr[413]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V412*/ meltfptr[411]);
+ /*_.VALSTR___V415*/ meltfptr[414]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V411*/ meltfptr[410])) ==
+ ( /*_.VALDATA___V414*/ meltfptr[413])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V411*/
- meltfptr[410]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[2] =
+ ( /*_.VALDATA___V414*/
+ meltfptr[413]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V414*/ meltfptr[413]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V408*/ meltfptr[407]);
+ /*_.VALDATA___V411*/ meltfptr[410]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V411*/ meltfptr[410]);
+ meltgc_touch ( /*_.VALDATA___V414*/ meltfptr[413]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V413*/ meltfptr[412])) ==
+ ( /*_.VALDATA___V416*/ meltfptr[415])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V413*/
- meltfptr[412]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[1] =
+ ( /*_.VALDATA___V416*/
+ meltfptr[415]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V414*/ meltfptr[413]);
+ /*_.VALSTR___V417*/ meltfptr[416]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V413*/ meltfptr[412])) ==
+ ( /*_.VALDATA___V416*/ meltfptr[415])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V413*/
- meltfptr[412]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[2] =
+ ( /*_.VALDATA___V416*/
+ meltfptr[415]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V408*/ meltfptr[407]);
+ /*_.VALDATA___V411*/ meltfptr[410]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V413*/ meltfptr[412]);
+ meltgc_touch ( /*_.VALDATA___V416*/ meltfptr[415]);
- /*putupl#245 */
- melt_assertmsg ("putupl #245 checktup",
+ /*putupl#240 */
+ melt_assertmsg ("putupl #240 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V415*/ meltfptr[414])) ==
+ ( /*_.VALTUP___V418*/ meltfptr[417])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #245 checkoff",
+ melt_assertmsg ("putupl #240 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V415*/
- meltfptr[414]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V418*/
+ meltfptr[417]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V418*/ meltfptr[417]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#246 */
- melt_assertmsg ("putupl #246 checktup",
+ /*putupl#241 */
+ melt_assertmsg ("putupl #241 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V415*/ meltfptr[414])) ==
+ ( /*_.VALTUP___V418*/ meltfptr[417])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #246 checkoff",
+ melt_assertmsg ("putupl #241 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V415*/
- meltfptr[414]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]);
+ ( /*_.VALTUP___V418*/
+ meltfptr[417]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V418*/ meltfptr[417]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V414*/ meltfptr[413]);
- /*putupl#247 */
- melt_assertmsg ("putupl #247 checktup",
+ /*putupl#242 */
+ melt_assertmsg ("putupl #242 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V415*/ meltfptr[414])) ==
+ ( /*_.VALTUP___V418*/ meltfptr[417])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #247 checkoff",
+ melt_assertmsg ("putupl #242 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V415*/
- meltfptr[414]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]);
+ ( /*_.VALTUP___V418*/
+ meltfptr[417]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V418*/ meltfptr[417]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V415*/ meltfptr[414]);
+ meltgc_touch ( /*_.VALTUP___V418*/ meltfptr[417]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[6] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V415*/ meltfptr[414]);
+ /*_.VALTUP___V418*/ meltfptr[417]);
MELT_LOCATION ("warmelt-genobj.melt:208:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V408*/ meltfptr[407]);
+ meltgc_touch ( /*_.VALDATA___V411*/ meltfptr[410]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V416*/ meltfptr[415])) ==
+ ( /*_.VALDATA___V419*/ meltfptr[418])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V416*/
- meltfptr[415]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]))->obj_vartab[1] =
+ ( /*_.VALDATA___V419*/
+ meltfptr[418]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V417*/ meltfptr[416]);
+ /*_.VALSTR___V420*/ meltfptr[419]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V416*/ meltfptr[415]);
+ meltgc_touch ( /*_.VALDATA___V419*/ meltfptr[418]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V418*/ meltfptr[417])) ==
+ ( /*_.VALDATA___V421*/ meltfptr[420])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V418*/
- meltfptr[417]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]))->obj_vartab[1] =
+ ( /*_.VALDATA___V421*/
+ meltfptr[420]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V421*/ meltfptr[420]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V419*/ meltfptr[418]);
+ /*_.VALSTR___V422*/ meltfptr[421]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V418*/ meltfptr[417]);
+ meltgc_touch ( /*_.VALDATA___V421*/ meltfptr[420]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V420*/ meltfptr[419])) ==
+ ( /*_.VALDATA___V423*/ meltfptr[422])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V420*/
- meltfptr[419]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]))->obj_vartab[1] =
+ ( /*_.VALDATA___V423*/
+ meltfptr[422]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V421*/ meltfptr[420]);
+ /*_.VALSTR___V424*/ meltfptr[423]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V420*/ meltfptr[419]);
+ meltgc_touch ( /*_.VALDATA___V423*/ meltfptr[422]);
MELT_LOCATION ("warmelt-genobj.melt:215:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V422*/ meltfptr[421])) ==
+ ( /*_.VALDATA___V425*/ meltfptr[424])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V422*/
- meltfptr[421]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]))->obj_vartab[1] =
+ ( /*_.VALDATA___V425*/
+ meltfptr[424]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V423*/ meltfptr[422]);
+ /*_.VALSTR___V426*/ meltfptr[425]);
MELT_LOCATION ("warmelt-genobj.melt:215:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V422*/ meltfptr[421])) ==
+ ( /*_.VALDATA___V425*/ meltfptr[424])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V422*/
- meltfptr[421]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]))->obj_vartab[4] =
+ ( /*_.VALDATA___V425*/
+ meltfptr[424]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#248 */
- melt_assertmsg ("putupl #248 checktup",
+ /*putupl#243 */
+ melt_assertmsg ("putupl #243 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V424*/ meltfptr[423])) ==
+ ( /*_.VALTUP___V427*/ meltfptr[426])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #248 checkoff",
+ melt_assertmsg ("putupl #243 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V424*/
- meltfptr[423]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V424*/ meltfptr[423]))->tabval[0] =
+ ( /*_.VALTUP___V427*/
+ meltfptr[426]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V427*/ meltfptr[426]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -43639,162 +43996,162 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#249 */
- melt_assertmsg ("putupl #249 checktup",
+ /*putupl#244 */
+ melt_assertmsg ("putupl #244 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V424*/ meltfptr[423])) ==
+ ( /*_.VALTUP___V427*/ meltfptr[426])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #249 checkoff",
+ melt_assertmsg ("putupl #244 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V424*/
- meltfptr[423]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V424*/ meltfptr[423]))->tabval[1] =
+ ( /*_.VALTUP___V427*/
+ meltfptr[426]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V427*/ meltfptr[426]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#250 */
- melt_assertmsg ("putupl #250 checktup",
+ /*putupl#245 */
+ melt_assertmsg ("putupl #245 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V424*/ meltfptr[423])) ==
+ ( /*_.VALTUP___V427*/ meltfptr[426])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #250 checkoff",
+ melt_assertmsg ("putupl #245 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V424*/
- meltfptr[423]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V424*/ meltfptr[423]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V427*/
+ meltfptr[426]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V427*/ meltfptr[426]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V424*/ meltfptr[423]);
+ meltgc_touch ( /*_.VALTUP___V427*/ meltfptr[426]);
MELT_LOCATION ("warmelt-genobj.melt:215:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V422*/ meltfptr[421])) ==
+ ( /*_.VALDATA___V425*/ meltfptr[424])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V422*/
- meltfptr[421]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]))->obj_vartab[5] =
+ ( /*_.VALDATA___V425*/
+ meltfptr[424]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V424*/ meltfptr[423]);
+ /*_.VALTUP___V427*/ meltfptr[426]);
- /*putupl#251 */
- melt_assertmsg ("putupl #251 checktup",
+ /*putupl#246 */
+ melt_assertmsg ("putupl #246 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V425*/ meltfptr[424])) ==
+ ( /*_.VALTUP___V428*/ meltfptr[427])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #251 checkoff",
+ melt_assertmsg ("putupl #246 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V425*/
- meltfptr[424]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V425*/ meltfptr[424]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V428*/
+ meltfptr[427]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V425*/ meltfptr[424]);
+ meltgc_touch ( /*_.VALTUP___V428*/ meltfptr[427]);
MELT_LOCATION ("warmelt-genobj.melt:215:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V422*/ meltfptr[421])) ==
+ ( /*_.VALDATA___V425*/ meltfptr[424])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V422*/
- meltfptr[421]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]))->obj_vartab[6] =
+ ( /*_.VALDATA___V425*/
+ meltfptr[424]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V425*/ meltfptr[424]);
+ /*_.VALTUP___V428*/ meltfptr[427]);
MELT_LOCATION ("warmelt-genobj.melt:215:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V422*/ meltfptr[421]);
+ meltgc_touch ( /*_.VALDATA___V425*/ meltfptr[424]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V426*/ meltfptr[425])) ==
+ ( /*_.VALDATA___V429*/ meltfptr[428])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V426*/
- meltfptr[425]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[1] =
+ ( /*_.VALDATA___V429*/
+ meltfptr[428]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V427*/ meltfptr[426]);
+ /*_.VALSTR___V430*/ meltfptr[429]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V426*/ meltfptr[425]);
+ meltgc_touch ( /*_.VALDATA___V429*/ meltfptr[428]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V428*/ meltfptr[427])) ==
+ ( /*_.VALDATA___V431*/ meltfptr[430])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V428*/
- meltfptr[427]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]))->obj_vartab[1] =
+ ( /*_.VALDATA___V431*/
+ meltfptr[430]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V429*/ meltfptr[428]);
+ /*_.VALSTR___V432*/ meltfptr[431]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V428*/ meltfptr[427])) ==
+ ( /*_.VALDATA___V431*/ meltfptr[430])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V428*/
- meltfptr[427]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]))->obj_vartab[4] =
+ ( /*_.VALDATA___V431*/
+ meltfptr[430]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#252 */
- melt_assertmsg ("putupl #252 checktup",
+ /*putupl#247 */
+ melt_assertmsg ("putupl #247 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V430*/ meltfptr[429])) ==
+ ( /*_.VALTUP___V433*/ meltfptr[432])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #252 checkoff",
+ melt_assertmsg ("putupl #247 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V430*/
- meltfptr[429]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V430*/ meltfptr[429]))->tabval[0] =
+ ( /*_.VALTUP___V433*/
+ meltfptr[432]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V433*/ meltfptr[432]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -43802,236 +44159,236 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#253 */
- melt_assertmsg ("putupl #253 checktup",
+ /*putupl#248 */
+ melt_assertmsg ("putupl #248 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V430*/ meltfptr[429])) ==
+ ( /*_.VALTUP___V433*/ meltfptr[432])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #253 checkoff",
+ melt_assertmsg ("putupl #248 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V430*/
- meltfptr[429]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V430*/ meltfptr[429]))->tabval[1] =
+ ( /*_.VALTUP___V433*/
+ meltfptr[432]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V433*/ meltfptr[432]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#254 */
- melt_assertmsg ("putupl #254 checktup",
+ /*putupl#249 */
+ melt_assertmsg ("putupl #249 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V430*/ meltfptr[429])) ==
+ ( /*_.VALTUP___V433*/ meltfptr[432])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #254 checkoff",
+ melt_assertmsg ("putupl #249 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V430*/
- meltfptr[429]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V430*/ meltfptr[429]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V433*/
+ meltfptr[432]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V433*/ meltfptr[432]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V430*/ meltfptr[429]);
+ meltgc_touch ( /*_.VALTUP___V433*/ meltfptr[432]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V428*/ meltfptr[427])) ==
+ ( /*_.VALDATA___V431*/ meltfptr[430])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V428*/
- meltfptr[427]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]))->obj_vartab[5] =
+ ( /*_.VALDATA___V431*/
+ meltfptr[430]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V430*/ meltfptr[429]);
+ /*_.VALTUP___V433*/ meltfptr[432]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V431*/ meltfptr[430])) ==
+ ( /*_.VALDATA___V434*/ meltfptr[433])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V431*/
- meltfptr[430]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] =
+ ( /*_.VALDATA___V434*/
+ meltfptr[433]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V432*/ meltfptr[431]);
+ /*_.VALSTR___V435*/ meltfptr[434]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V431*/ meltfptr[430])) ==
+ ( /*_.VALDATA___V434*/ meltfptr[433])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V431*/
- meltfptr[430]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[2] =
+ ( /*_.VALDATA___V434*/
+ meltfptr[433]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V428*/ meltfptr[427]);
+ /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V431*/ meltfptr[430]);
+ meltgc_touch ( /*_.VALDATA___V434*/ meltfptr[433]);
- /*putupl#255 */
- melt_assertmsg ("putupl #255 checktup",
+ /*putupl#250 */
+ melt_assertmsg ("putupl #250 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V433*/ meltfptr[432])) ==
+ ( /*_.VALTUP___V436*/ meltfptr[435])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #255 checkoff",
+ melt_assertmsg ("putupl #250 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V433*/
- meltfptr[432]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V433*/ meltfptr[432]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V436*/
+ meltfptr[435]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V436*/ meltfptr[435]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#256 */
- melt_assertmsg ("putupl #256 checktup",
+ /*putupl#251 */
+ melt_assertmsg ("putupl #251 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V433*/ meltfptr[432])) ==
+ ( /*_.VALTUP___V436*/ meltfptr[435])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #256 checkoff",
+ melt_assertmsg ("putupl #251 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V433*/
- meltfptr[432]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V433*/ meltfptr[432]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
+ ( /*_.VALTUP___V436*/
+ meltfptr[435]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V436*/ meltfptr[435]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V433*/ meltfptr[432]);
+ meltgc_touch ( /*_.VALTUP___V436*/ meltfptr[435]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V428*/ meltfptr[427])) ==
+ ( /*_.VALDATA___V431*/ meltfptr[430])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V428*/
- meltfptr[427]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]))->obj_vartab[6] =
+ ( /*_.VALDATA___V431*/
+ meltfptr[430]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V433*/ meltfptr[432]);
+ /*_.VALTUP___V436*/ meltfptr[435]);
MELT_LOCATION ("warmelt-genobj.melt:221:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V428*/ meltfptr[427]);
+ meltgc_touch ( /*_.VALDATA___V431*/ meltfptr[430]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V434*/ meltfptr[433])) ==
+ ( /*_.VALDATA___V437*/ meltfptr[436])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V434*/
- meltfptr[433]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]))->obj_vartab[1] =
+ ( /*_.VALDATA___V437*/
+ meltfptr[436]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V437*/ meltfptr[436]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V435*/ meltfptr[434]);
+ /*_.VALSTR___V438*/ meltfptr[437]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V434*/ meltfptr[433]);
+ meltgc_touch ( /*_.VALDATA___V437*/ meltfptr[436]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V436*/ meltfptr[435])) ==
+ ( /*_.VALDATA___V439*/ meltfptr[438])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V436*/
- meltfptr[435]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]))->obj_vartab[1] =
+ ( /*_.VALDATA___V439*/
+ meltfptr[438]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V437*/ meltfptr[436]);
+ /*_.VALSTR___V440*/ meltfptr[439]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V436*/ meltfptr[435]);
+ meltgc_touch ( /*_.VALDATA___V439*/ meltfptr[438]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V438*/ meltfptr[437])) ==
+ ( /*_.VALDATA___V441*/ meltfptr[440])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V438*/
- meltfptr[437]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]))->obj_vartab[1] =
+ ( /*_.VALDATA___V441*/
+ meltfptr[440]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V439*/ meltfptr[438]);
+ /*_.VALSTR___V442*/ meltfptr[441]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V438*/ meltfptr[437])) ==
+ ( /*_.VALDATA___V441*/ meltfptr[440])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V438*/
- meltfptr[437]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]))->obj_vartab[4] =
+ ( /*_.VALDATA___V441*/
+ meltfptr[440]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#257 */
- melt_assertmsg ("putupl #257 checktup",
+ /*putupl#252 */
+ melt_assertmsg ("putupl #252 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V440*/ meltfptr[439])) ==
+ ( /*_.VALTUP___V443*/ meltfptr[442])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #257 checkoff",
+ melt_assertmsg ("putupl #252 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V440*/
- meltfptr[439]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V440*/ meltfptr[439]))->tabval[0] =
+ ( /*_.VALTUP___V443*/
+ meltfptr[442]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44039,297 +44396,297 @@ warmelt_genobj_initialmeltchunk_4 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#258 */
- melt_assertmsg ("putupl #258 checktup",
+ /*putupl#253 */
+ melt_assertmsg ("putupl #253 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V440*/ meltfptr[439])) ==
+ ( /*_.VALTUP___V443*/ meltfptr[442])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #258 checkoff",
+ melt_assertmsg ("putupl #253 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V440*/
- meltfptr[439]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V440*/ meltfptr[439]))->tabval[1] =
+ ( /*_.VALTUP___V443*/
+ meltfptr[442]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#259 */
- melt_assertmsg ("putupl #259 checktup",
+ /*putupl#254 */
+ melt_assertmsg ("putupl #254 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V440*/ meltfptr[439])) ==
+ ( /*_.VALTUP___V443*/ meltfptr[442])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #259 checkoff",
+ melt_assertmsg ("putupl #254 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V440*/
- meltfptr[439]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V440*/ meltfptr[439]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V443*/
+ meltfptr[442]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V440*/ meltfptr[439]);
+ meltgc_touch ( /*_.VALTUP___V443*/ meltfptr[442]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V438*/ meltfptr[437])) ==
+ ( /*_.VALDATA___V441*/ meltfptr[440])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V438*/
- meltfptr[437]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]))->obj_vartab[5] =
+ ( /*_.VALDATA___V441*/
+ meltfptr[440]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V440*/ meltfptr[439]);
+ /*_.VALTUP___V443*/ meltfptr[442]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V441*/ meltfptr[440])) ==
+ ( /*_.VALDATA___V444*/ meltfptr[443])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V441*/
- meltfptr[440]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[1] =
+ ( /*_.VALDATA___V444*/
+ meltfptr[443]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V442*/ meltfptr[441]);
+ /*_.VALSTR___V445*/ meltfptr[444]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V441*/ meltfptr[440])) ==
+ ( /*_.VALDATA___V444*/ meltfptr[443])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V441*/
- meltfptr[440]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[2] =
+ ( /*_.VALDATA___V444*/
+ meltfptr[443]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V441*/ meltfptr[440]);
+ meltgc_touch ( /*_.VALDATA___V444*/ meltfptr[443]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V443*/ meltfptr[442])) ==
+ ( /*_.VALDATA___V446*/ meltfptr[445])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V443*/
- meltfptr[442]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]))->obj_vartab[1] =
+ ( /*_.VALDATA___V446*/
+ meltfptr[445]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V444*/ meltfptr[443]);
+ /*_.VALSTR___V447*/ meltfptr[446]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V443*/ meltfptr[442])) ==
+ ( /*_.VALDATA___V446*/ meltfptr[445])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V443*/
- meltfptr[442]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]))->obj_vartab[2] =
+ ( /*_.VALDATA___V446*/
+ meltfptr[445]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V443*/ meltfptr[442]);
+ meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#260 */
- melt_assertmsg ("putupl #260 checktup",
+ /*putupl#255 */
+ melt_assertmsg ("putupl #255 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V445*/ meltfptr[444])) ==
+ ( /*_.VALTUP___V448*/ meltfptr[447])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #260 checkoff",
+ melt_assertmsg ("putupl #255 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V445*/
- meltfptr[444]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V445*/ meltfptr[444]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V448*/
+ meltfptr[447]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V448*/ meltfptr[447]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#261 */
- melt_assertmsg ("putupl #261 checktup",
+ /*putupl#256 */
+ melt_assertmsg ("putupl #256 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V445*/ meltfptr[444])) ==
+ ( /*_.VALTUP___V448*/ meltfptr[447])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #261 checkoff",
+ melt_assertmsg ("putupl #256 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V445*/
- meltfptr[444]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V445*/ meltfptr[444]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V448*/
+ meltfptr[447]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V448*/ meltfptr[447]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#262 */
- melt_assertmsg ("putupl #262 checktup",
+ /*putupl#257 */
+ melt_assertmsg ("putupl #257 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V445*/ meltfptr[444])) ==
+ ( /*_.VALTUP___V448*/ meltfptr[447])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #262 checkoff",
+ melt_assertmsg ("putupl #257 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V445*/
- meltfptr[444]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V445*/ meltfptr[444]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V448*/
+ meltfptr[447]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V448*/ meltfptr[447]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V445*/ meltfptr[444]);
+ meltgc_touch ( /*_.VALTUP___V448*/ meltfptr[447]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V438*/ meltfptr[437])) ==
+ ( /*_.VALDATA___V441*/ meltfptr[440])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V438*/
- meltfptr[437]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]))->obj_vartab[6] =
+ ( /*_.VALDATA___V441*/
+ meltfptr[440]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V445*/ meltfptr[444]);
+ /*_.VALTUP___V448*/ meltfptr[447]);
MELT_LOCATION ("warmelt-genobj.melt:229:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V438*/ meltfptr[437]);
+ meltgc_touch ( /*_.VALDATA___V441*/ meltfptr[440]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V446*/ meltfptr[445])) ==
+ ( /*_.VALDATA___V449*/ meltfptr[448])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V446*/
- meltfptr[445]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] =
+ ( /*_.VALDATA___V449*/
+ meltfptr[448]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V447*/ meltfptr[446]);
+ /*_.VALSTR___V450*/ meltfptr[449]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]);
+ meltgc_touch ( /*_.VALDATA___V449*/ meltfptr[448]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V448*/ meltfptr[447])) ==
+ ( /*_.VALDATA___V451*/ meltfptr[450])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V448*/
- meltfptr[447]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447]))->obj_vartab[1] =
+ ( /*_.VALDATA___V451*/
+ meltfptr[450]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V449*/ meltfptr[448]);
+ /*_.VALSTR___V452*/ meltfptr[451]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V448*/ meltfptr[447]);
+ meltgc_touch ( /*_.VALDATA___V451*/ meltfptr[450]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V450*/ meltfptr[449])) ==
+ ( /*_.VALDATA___V453*/ meltfptr[452])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V450*/
- meltfptr[449]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]))->obj_vartab[1] =
+ ( /*_.VALDATA___V453*/
+ meltfptr[452]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V451*/ meltfptr[450]);
+ /*_.VALSTR___V454*/ meltfptr[453]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V450*/ meltfptr[449]);
+ meltgc_touch ( /*_.VALDATA___V453*/ meltfptr[452]);
MELT_LOCATION ("warmelt-genobj.melt:235:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V452*/ meltfptr[451])) ==
+ ( /*_.VALDATA___V455*/ meltfptr[454])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V452*/
- meltfptr[451]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[1] =
+ ( /*_.VALDATA___V455*/
+ meltfptr[454]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V453*/ meltfptr[452]);
+ /*_.VALSTR___V456*/ meltfptr[455]);
MELT_LOCATION ("warmelt-genobj.melt:235:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V452*/ meltfptr[451])) ==
+ ( /*_.VALDATA___V455*/ meltfptr[454])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V452*/
- meltfptr[451]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[4] =
+ ( /*_.VALDATA___V455*/
+ meltfptr[454]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
#undef meltfram__
@@ -44342,18 +44699,18 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#263*/
- melt_assertmsg ("putupl #263 checktup",
+/*putupl#258*/
+ melt_assertmsg ("putupl #258 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V454*/ meltfptr[453])) ==
+ ( /*_.VALTUP___V457*/ meltfptr[456])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #263 checkoff",
+ melt_assertmsg ("putupl #258 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V454*/
- meltfptr[453]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V454*/ meltfptr[453]))->tabval[0] =
+ ( /*_.VALTUP___V457*/
+ meltfptr[456]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44361,204 +44718,204 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#264 */
- melt_assertmsg ("putupl #264 checktup",
+ /*putupl#259 */
+ melt_assertmsg ("putupl #259 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V454*/ meltfptr[453])) ==
+ ( /*_.VALTUP___V457*/ meltfptr[456])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #264 checkoff",
+ melt_assertmsg ("putupl #259 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V454*/
- meltfptr[453]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V454*/ meltfptr[453]))->tabval[1] =
+ ( /*_.VALTUP___V457*/
+ meltfptr[456]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#265 */
- melt_assertmsg ("putupl #265 checktup",
+ /*putupl#260 */
+ melt_assertmsg ("putupl #260 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V454*/ meltfptr[453])) ==
+ ( /*_.VALTUP___V457*/ meltfptr[456])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #265 checkoff",
+ melt_assertmsg ("putupl #260 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V454*/
- meltfptr[453]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V454*/ meltfptr[453]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V457*/
+ meltfptr[456]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#266 */
- melt_assertmsg ("putupl #266 checktup",
+ /*putupl#261 */
+ melt_assertmsg ("putupl #261 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V454*/ meltfptr[453])) ==
+ ( /*_.VALTUP___V457*/ meltfptr[456])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #266 checkoff",
+ melt_assertmsg ("putupl #261 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V454*/
- meltfptr[453]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V454*/ meltfptr[453]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V457*/
+ meltfptr[456]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V454*/ meltfptr[453]);
+ meltgc_touch ( /*_.VALTUP___V457*/ meltfptr[456]);
MELT_LOCATION ("warmelt-genobj.melt:235:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V452*/ meltfptr[451])) ==
+ ( /*_.VALDATA___V455*/ meltfptr[454])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V452*/
- meltfptr[451]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[5] =
+ ( /*_.VALDATA___V455*/
+ meltfptr[454]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V454*/ meltfptr[453]);
+ /*_.VALTUP___V457*/ meltfptr[456]);
- /*putupl#267 */
- melt_assertmsg ("putupl #267 checktup",
+ /*putupl#262 */
+ melt_assertmsg ("putupl #262 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V455*/ meltfptr[454])) ==
+ ( /*_.VALTUP___V458*/ meltfptr[457])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #267 checkoff",
+ melt_assertmsg ("putupl #262 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V455*/
- meltfptr[454]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V455*/ meltfptr[454]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V458*/
+ meltfptr[457]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V458*/ meltfptr[457]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#268 */
- melt_assertmsg ("putupl #268 checktup",
+ /*putupl#263 */
+ melt_assertmsg ("putupl #263 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V455*/ meltfptr[454])) ==
+ ( /*_.VALTUP___V458*/ meltfptr[457])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #268 checkoff",
+ melt_assertmsg ("putupl #263 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V455*/
- meltfptr[454]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V455*/ meltfptr[454]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V458*/
+ meltfptr[457]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V458*/ meltfptr[457]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#269 */
- melt_assertmsg ("putupl #269 checktup",
+ /*putupl#264 */
+ melt_assertmsg ("putupl #264 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V455*/ meltfptr[454])) ==
+ ( /*_.VALTUP___V458*/ meltfptr[457])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #269 checkoff",
+ melt_assertmsg ("putupl #264 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V455*/
- meltfptr[454]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V455*/ meltfptr[454]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V458*/
+ meltfptr[457]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V458*/ meltfptr[457]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V455*/ meltfptr[454]);
+ meltgc_touch ( /*_.VALTUP___V458*/ meltfptr[457]);
MELT_LOCATION ("warmelt-genobj.melt:235:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V452*/ meltfptr[451])) ==
+ ( /*_.VALDATA___V455*/ meltfptr[454])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V452*/
- meltfptr[451]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[6] =
+ ( /*_.VALDATA___V455*/
+ meltfptr[454]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V455*/ meltfptr[454]);
+ /*_.VALTUP___V458*/ meltfptr[457]);
MELT_LOCATION ("warmelt-genobj.melt:235:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V452*/ meltfptr[451]);
+ meltgc_touch ( /*_.VALDATA___V455*/ meltfptr[454]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V456*/ meltfptr[455])) ==
+ ( /*_.VALDATA___V459*/ meltfptr[458])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V456*/
- meltfptr[455]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]))->obj_vartab[1] =
+ ( /*_.VALDATA___V459*/
+ meltfptr[458]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V457*/ meltfptr[456]);
+ /*_.VALSTR___V460*/ meltfptr[459]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V456*/ meltfptr[455]);
+ meltgc_touch ( /*_.VALDATA___V459*/ meltfptr[458]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V458*/ meltfptr[457])) ==
+ ( /*_.VALDATA___V461*/ meltfptr[460])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V458*/
- meltfptr[457]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[1] =
+ ( /*_.VALDATA___V461*/
+ meltfptr[460]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V459*/ meltfptr[458]);
+ /*_.VALSTR___V462*/ meltfptr[461]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V458*/ meltfptr[457])) ==
+ ( /*_.VALDATA___V461*/ meltfptr[460])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V458*/
- meltfptr[457]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[4] =
+ ( /*_.VALDATA___V461*/
+ meltfptr[460]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#270 */
- melt_assertmsg ("putupl #270 checktup",
+ /*putupl#265 */
+ melt_assertmsg ("putupl #265 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V460*/ meltfptr[459])) ==
+ ( /*_.VALTUP___V463*/ meltfptr[462])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #270 checkoff",
+ melt_assertmsg ("putupl #265 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V460*/
- meltfptr[459]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[0] =
+ ( /*_.VALTUP___V463*/
+ meltfptr[462]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V463*/ meltfptr[462]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44566,352 +44923,352 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#271 */
- melt_assertmsg ("putupl #271 checktup",
+ /*putupl#266 */
+ melt_assertmsg ("putupl #266 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V460*/ meltfptr[459])) ==
+ ( /*_.VALTUP___V463*/ meltfptr[462])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #271 checkoff",
+ melt_assertmsg ("putupl #266 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V460*/
- meltfptr[459]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[1] =
+ ( /*_.VALTUP___V463*/
+ meltfptr[462]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V463*/ meltfptr[462]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#272 */
- melt_assertmsg ("putupl #272 checktup",
+ /*putupl#267 */
+ melt_assertmsg ("putupl #267 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V460*/ meltfptr[459])) ==
+ ( /*_.VALTUP___V463*/ meltfptr[462])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #272 checkoff",
+ melt_assertmsg ("putupl #267 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V460*/
- meltfptr[459]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V463*/
+ meltfptr[462]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V463*/ meltfptr[462]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#273 */
- melt_assertmsg ("putupl #273 checktup",
+ /*putupl#268 */
+ melt_assertmsg ("putupl #268 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V460*/ meltfptr[459])) ==
+ ( /*_.VALTUP___V463*/ meltfptr[462])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #273 checkoff",
+ melt_assertmsg ("putupl #268 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V460*/
- meltfptr[459]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V463*/
+ meltfptr[462]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V463*/ meltfptr[462]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V460*/ meltfptr[459]);
+ meltgc_touch ( /*_.VALTUP___V463*/ meltfptr[462]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V458*/ meltfptr[457])) ==
+ ( /*_.VALDATA___V461*/ meltfptr[460])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V458*/
- meltfptr[457]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[5] =
+ ( /*_.VALDATA___V461*/
+ meltfptr[460]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V460*/ meltfptr[459]);
+ /*_.VALTUP___V463*/ meltfptr[462]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V461*/ meltfptr[460])) ==
+ ( /*_.VALDATA___V464*/ meltfptr[463])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V461*/
- meltfptr[460]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[1] =
+ ( /*_.VALDATA___V464*/
+ meltfptr[463]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V462*/ meltfptr[461]);
+ /*_.VALSTR___V465*/ meltfptr[464]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V461*/ meltfptr[460])) ==
+ ( /*_.VALDATA___V464*/ meltfptr[463])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V461*/
- meltfptr[460]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[2] =
+ ( /*_.VALDATA___V464*/
+ meltfptr[463]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V458*/ meltfptr[457]);
+ /*_.VALDATA___V461*/ meltfptr[460]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V461*/ meltfptr[460]);
+ meltgc_touch ( /*_.VALDATA___V464*/ meltfptr[463]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V463*/ meltfptr[462])) ==
+ ( /*_.VALDATA___V466*/ meltfptr[465])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V463*/
- meltfptr[462]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]))->obj_vartab[1] =
+ ( /*_.VALDATA___V466*/
+ meltfptr[465]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V464*/ meltfptr[463]);
+ /*_.VALSTR___V467*/ meltfptr[466]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V463*/ meltfptr[462])) ==
+ ( /*_.VALDATA___V466*/ meltfptr[465])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V463*/
- meltfptr[462]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]))->obj_vartab[2] =
+ ( /*_.VALDATA___V466*/
+ meltfptr[465]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V458*/ meltfptr[457]);
+ /*_.VALDATA___V461*/ meltfptr[460]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V463*/ meltfptr[462]);
+ meltgc_touch ( /*_.VALDATA___V466*/ meltfptr[465]);
- /*putupl#274 */
- melt_assertmsg ("putupl #274 checktup",
+ /*putupl#269 */
+ melt_assertmsg ("putupl #269 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V465*/ meltfptr[464])) ==
+ ( /*_.VALTUP___V468*/ meltfptr[467])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #274 checkoff",
+ melt_assertmsg ("putupl #269 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V465*/
- meltfptr[464]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V468*/
+ meltfptr[467]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V468*/ meltfptr[467]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#275 */
- melt_assertmsg ("putupl #275 checktup",
+ /*putupl#270 */
+ melt_assertmsg ("putupl #270 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V465*/ meltfptr[464])) ==
+ ( /*_.VALTUP___V468*/ meltfptr[467])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #275 checkoff",
+ melt_assertmsg ("putupl #270 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V465*/
- meltfptr[464]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V468*/
+ meltfptr[467]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V468*/ meltfptr[467]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#276 */
- melt_assertmsg ("putupl #276 checktup",
+ /*putupl#271 */
+ melt_assertmsg ("putupl #271 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V465*/ meltfptr[464])) ==
+ ( /*_.VALTUP___V468*/ meltfptr[467])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #276 checkoff",
+ melt_assertmsg ("putupl #271 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V465*/
- meltfptr[464]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V468*/
+ meltfptr[467]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V468*/ meltfptr[467]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#277 */
- melt_assertmsg ("putupl #277 checktup",
+ /*putupl#272 */
+ melt_assertmsg ("putupl #272 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V465*/ meltfptr[464])) ==
+ ( /*_.VALTUP___V468*/ meltfptr[467])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #277 checkoff",
+ melt_assertmsg ("putupl #272 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V465*/
- meltfptr[464]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]);
+ ( /*_.VALTUP___V468*/
+ meltfptr[467]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V468*/ meltfptr[467]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]);
- /*putupl#278 */
- melt_assertmsg ("putupl #278 checktup",
+ /*putupl#273 */
+ melt_assertmsg ("putupl #273 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V465*/ meltfptr[464])) ==
+ ( /*_.VALTUP___V468*/ meltfptr[467])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #278 checkoff",
+ melt_assertmsg ("putupl #273 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V465*/
- meltfptr[464]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]);
+ ( /*_.VALTUP___V468*/
+ meltfptr[467]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V468*/ meltfptr[467]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V465*/ meltfptr[464]);
+ meltgc_touch ( /*_.VALTUP___V468*/ meltfptr[467]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V458*/ meltfptr[457])) ==
+ ( /*_.VALDATA___V461*/ meltfptr[460])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V458*/
- meltfptr[457]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[6] =
+ ( /*_.VALDATA___V461*/
+ meltfptr[460]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V465*/ meltfptr[464]);
+ /*_.VALTUP___V468*/ meltfptr[467]);
MELT_LOCATION ("warmelt-genobj.melt:241:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V458*/ meltfptr[457]);
+ meltgc_touch ( /*_.VALDATA___V461*/ meltfptr[460]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V466*/ meltfptr[465])) ==
+ ( /*_.VALDATA___V469*/ meltfptr[468])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V466*/
- meltfptr[465]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]))->obj_vartab[1] =
+ ( /*_.VALDATA___V469*/
+ meltfptr[468]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V467*/ meltfptr[466]);
+ /*_.VALSTR___V470*/ meltfptr[469]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V466*/ meltfptr[465]);
+ meltgc_touch ( /*_.VALDATA___V469*/ meltfptr[468]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V468*/ meltfptr[467])) ==
+ ( /*_.VALDATA___V471*/ meltfptr[470])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V468*/
- meltfptr[467]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] =
+ ( /*_.VALDATA___V471*/
+ meltfptr[470]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V469*/ meltfptr[468]);
+ /*_.VALSTR___V472*/ meltfptr[471]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V468*/ meltfptr[467]);
+ meltgc_touch ( /*_.VALDATA___V471*/ meltfptr[470]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V470*/ meltfptr[469])) ==
+ ( /*_.VALDATA___V473*/ meltfptr[472])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V470*/
- meltfptr[469]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]))->obj_vartab[1] =
+ ( /*_.VALDATA___V473*/
+ meltfptr[472]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V471*/ meltfptr[470]);
+ /*_.VALSTR___V474*/ meltfptr[473]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V470*/ meltfptr[469]);
+ meltgc_touch ( /*_.VALDATA___V473*/ meltfptr[472]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V475*/ meltfptr[474])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] =
+ ( /*_.VALDATA___V475*/
+ meltfptr[474]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V473*/ meltfptr[472]);
+ /*_.VALSTR___V476*/ meltfptr[475]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V475*/ meltfptr[474])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[4] =
+ ( /*_.VALDATA___V475*/
+ meltfptr[474]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#279 */
- melt_assertmsg ("putupl #279 checktup",
+ /*putupl#274 */
+ melt_assertmsg ("putupl #274 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V474*/ meltfptr[473])) ==
+ ( /*_.VALTUP___V477*/ meltfptr[476])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #279 checkoff",
+ melt_assertmsg ("putupl #274 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V474*/
- meltfptr[473]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[0] =
+ ( /*_.VALTUP___V477*/
+ meltfptr[476]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44919,278 +45276,278 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#280 */
- melt_assertmsg ("putupl #280 checktup",
+ /*putupl#275 */
+ melt_assertmsg ("putupl #275 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V474*/ meltfptr[473])) ==
+ ( /*_.VALTUP___V477*/ meltfptr[476])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #280 checkoff",
+ melt_assertmsg ("putupl #275 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V474*/
- meltfptr[473]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[1] =
+ ( /*_.VALTUP___V477*/
+ meltfptr[476]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#281 */
- melt_assertmsg ("putupl #281 checktup",
+ /*putupl#276 */
+ melt_assertmsg ("putupl #276 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V474*/ meltfptr[473])) ==
+ ( /*_.VALTUP___V477*/ meltfptr[476])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #281 checkoff",
+ melt_assertmsg ("putupl #276 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V474*/
- meltfptr[473]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V477*/
+ meltfptr[476]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#282 */
- melt_assertmsg ("putupl #282 checktup",
+ /*putupl#277 */
+ melt_assertmsg ("putupl #277 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V474*/ meltfptr[473])) ==
+ ( /*_.VALTUP___V477*/ meltfptr[476])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #282 checkoff",
+ melt_assertmsg ("putupl #277 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V474*/
- meltfptr[473]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V477*/
+ meltfptr[476]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V474*/ meltfptr[473]);
+ meltgc_touch ( /*_.VALTUP___V477*/ meltfptr[476]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V475*/ meltfptr[474])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[5] =
+ ( /*_.VALDATA___V475*/
+ meltfptr[474]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V474*/ meltfptr[473]);
+ /*_.VALTUP___V477*/ meltfptr[476]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V475*/ meltfptr[474])) ==
+ ( /*_.VALDATA___V478*/ meltfptr[477])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V475*/
- meltfptr[474]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[1] =
+ ( /*_.VALDATA___V478*/
+ meltfptr[477]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V476*/ meltfptr[475]);
+ /*_.VALSTR___V479*/ meltfptr[478]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V475*/ meltfptr[474])) ==
+ ( /*_.VALDATA___V478*/ meltfptr[477])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V475*/
- meltfptr[474]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[2] =
+ ( /*_.VALDATA___V478*/
+ meltfptr[477]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V472*/ meltfptr[471]);
+ /*_.VALDATA___V475*/ meltfptr[474]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V475*/ meltfptr[474]);
+ meltgc_touch ( /*_.VALDATA___V478*/ meltfptr[477]);
- /*putupl#283 */
- melt_assertmsg ("putupl #283 checktup",
+ /*putupl#278 */
+ melt_assertmsg ("putupl #278 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V477*/ meltfptr[476])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #283 checkoff",
+ melt_assertmsg ("putupl #278 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V477*/
- meltfptr[476]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#284 */
- melt_assertmsg ("putupl #284 checktup",
+ /*putupl#279 */
+ melt_assertmsg ("putupl #279 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V477*/ meltfptr[476])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #284 checkoff",
+ melt_assertmsg ("putupl #279 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V477*/
- meltfptr[476]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#285 */
- melt_assertmsg ("putupl #285 checktup",
+ /*putupl#280 */
+ melt_assertmsg ("putupl #280 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V477*/ meltfptr[476])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #285 checkoff",
+ melt_assertmsg ("putupl #280 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V477*/
- meltfptr[476]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#286 */
- melt_assertmsg ("putupl #286 checktup",
+ /*putupl#281 */
+ melt_assertmsg ("putupl #281 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V477*/ meltfptr[476])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #286 checkoff",
+ melt_assertmsg ("putupl #281 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V477*/
- meltfptr[476]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V477*/ meltfptr[476]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V477*/ meltfptr[476]);
+ meltgc_touch ( /*_.VALTUP___V480*/ meltfptr[479]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V475*/ meltfptr[474])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[6] =
+ ( /*_.VALDATA___V475*/
+ meltfptr[474]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V477*/ meltfptr[476]);
+ /*_.VALTUP___V480*/ meltfptr[479]);
MELT_LOCATION ("warmelt-genobj.melt:249:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V472*/ meltfptr[471]);
+ meltgc_touch ( /*_.VALDATA___V475*/ meltfptr[474]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V478*/ meltfptr[477])) ==
+ ( /*_.VALDATA___V481*/ meltfptr[480])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V478*/
- meltfptr[477]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[1] =
+ ( /*_.VALDATA___V481*/
+ meltfptr[480]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V479*/ meltfptr[478]);
+ /*_.VALSTR___V482*/ meltfptr[481]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V478*/ meltfptr[477]);
+ meltgc_touch ( /*_.VALDATA___V481*/ meltfptr[480]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V480*/ meltfptr[479])) ==
+ ( /*_.VALDATA___V483*/ meltfptr[482])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V480*/
- meltfptr[479]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]))->obj_vartab[1] =
+ ( /*_.VALDATA___V483*/
+ meltfptr[482]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V481*/ meltfptr[480]);
+ /*_.VALSTR___V484*/ meltfptr[483]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V480*/ meltfptr[479]);
+ meltgc_touch ( /*_.VALDATA___V483*/ meltfptr[482]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V482*/ meltfptr[481])) ==
+ ( /*_.VALDATA___V485*/ meltfptr[484])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V482*/
- meltfptr[481]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[1] =
+ ( /*_.VALDATA___V485*/
+ meltfptr[484]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V483*/ meltfptr[482]);
+ /*_.VALSTR___V486*/ meltfptr[485]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V482*/ meltfptr[481])) ==
+ ( /*_.VALDATA___V485*/ meltfptr[484])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V482*/
- meltfptr[481]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[4] =
+ ( /*_.VALDATA___V485*/
+ meltfptr[484]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#287 */
- melt_assertmsg ("putupl #287 checktup",
+ /*putupl#282 */
+ melt_assertmsg ("putupl #282 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V484*/ meltfptr[483])) ==
+ ( /*_.VALTUP___V487*/ meltfptr[486])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #287 checkoff",
+ melt_assertmsg ("putupl #282 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V484*/
- meltfptr[483]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[0] =
+ ( /*_.VALTUP___V487*/
+ meltfptr[486]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45198,278 +45555,278 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#288 */
- melt_assertmsg ("putupl #288 checktup",
+ /*putupl#283 */
+ melt_assertmsg ("putupl #283 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V484*/ meltfptr[483])) ==
+ ( /*_.VALTUP___V487*/ meltfptr[486])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #288 checkoff",
+ melt_assertmsg ("putupl #283 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V484*/
- meltfptr[483]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[1] =
+ ( /*_.VALTUP___V487*/
+ meltfptr[486]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#289 */
- melt_assertmsg ("putupl #289 checktup",
+ /*putupl#284 */
+ melt_assertmsg ("putupl #284 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V484*/ meltfptr[483])) ==
+ ( /*_.VALTUP___V487*/ meltfptr[486])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #289 checkoff",
+ melt_assertmsg ("putupl #284 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V484*/
- meltfptr[483]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V487*/
+ meltfptr[486]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#290 */
- melt_assertmsg ("putupl #290 checktup",
+ /*putupl#285 */
+ melt_assertmsg ("putupl #285 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V484*/ meltfptr[483])) ==
+ ( /*_.VALTUP___V487*/ meltfptr[486])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #290 checkoff",
+ melt_assertmsg ("putupl #285 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V484*/
- meltfptr[483]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V487*/
+ meltfptr[486]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V484*/ meltfptr[483]);
+ meltgc_touch ( /*_.VALTUP___V487*/ meltfptr[486]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V482*/ meltfptr[481])) ==
+ ( /*_.VALDATA___V485*/ meltfptr[484])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V482*/
- meltfptr[481]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[5] =
+ ( /*_.VALDATA___V485*/
+ meltfptr[484]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V484*/ meltfptr[483]);
+ /*_.VALTUP___V487*/ meltfptr[486]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V485*/ meltfptr[484])) ==
+ ( /*_.VALDATA___V488*/ meltfptr[487])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V485*/
- meltfptr[484]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[1] =
+ ( /*_.VALDATA___V488*/
+ meltfptr[487]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V486*/ meltfptr[485]);
+ /*_.VALSTR___V489*/ meltfptr[488]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V485*/ meltfptr[484])) ==
+ ( /*_.VALDATA___V488*/ meltfptr[487])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V485*/
- meltfptr[484]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[2] =
+ ( /*_.VALDATA___V488*/
+ meltfptr[487]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V482*/ meltfptr[481]);
+ /*_.VALDATA___V485*/ meltfptr[484]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V485*/ meltfptr[484]);
+ meltgc_touch ( /*_.VALDATA___V488*/ meltfptr[487]);
- /*putupl#291 */
- melt_assertmsg ("putupl #291 checktup",
+ /*putupl#286 */
+ melt_assertmsg ("putupl #286 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V487*/ meltfptr[486])) ==
+ ( /*_.VALTUP___V490*/ meltfptr[489])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #291 checkoff",
+ melt_assertmsg ("putupl #286 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V487*/
- meltfptr[486]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V490*/
+ meltfptr[489]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#292 */
- melt_assertmsg ("putupl #292 checktup",
+ /*putupl#287 */
+ melt_assertmsg ("putupl #287 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V487*/ meltfptr[486])) ==
+ ( /*_.VALTUP___V490*/ meltfptr[489])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #292 checkoff",
+ melt_assertmsg ("putupl #287 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V487*/
- meltfptr[486]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V490*/
+ meltfptr[489]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#293 */
- melt_assertmsg ("putupl #293 checktup",
+ /*putupl#288 */
+ melt_assertmsg ("putupl #288 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V487*/ meltfptr[486])) ==
+ ( /*_.VALTUP___V490*/ meltfptr[489])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #293 checkoff",
+ melt_assertmsg ("putupl #288 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V487*/
- meltfptr[486]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V490*/
+ meltfptr[489]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#294 */
- melt_assertmsg ("putupl #294 checktup",
+ /*putupl#289 */
+ melt_assertmsg ("putupl #289 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V487*/ meltfptr[486])) ==
+ ( /*_.VALTUP___V490*/ meltfptr[489])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #294 checkoff",
+ melt_assertmsg ("putupl #289 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V487*/
- meltfptr[486]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V487*/ meltfptr[486]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]);
+ ( /*_.VALTUP___V490*/
+ meltfptr[489]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V487*/ meltfptr[486]);
+ meltgc_touch ( /*_.VALTUP___V490*/ meltfptr[489]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V482*/ meltfptr[481])) ==
+ ( /*_.VALDATA___V485*/ meltfptr[484])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V482*/
- meltfptr[481]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[6] =
+ ( /*_.VALDATA___V485*/
+ meltfptr[484]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V487*/ meltfptr[486]);
+ /*_.VALTUP___V490*/ meltfptr[489]);
MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V482*/ meltfptr[481]);
+ meltgc_touch ( /*_.VALDATA___V485*/ meltfptr[484]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V488*/ meltfptr[487])) ==
+ ( /*_.VALDATA___V491*/ meltfptr[490])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V488*/
- meltfptr[487]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] =
+ ( /*_.VALDATA___V491*/
+ meltfptr[490]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V489*/ meltfptr[488]);
+ /*_.VALSTR___V492*/ meltfptr[491]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V488*/ meltfptr[487]);
+ meltgc_touch ( /*_.VALDATA___V491*/ meltfptr[490]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V490*/ meltfptr[489])) ==
+ ( /*_.VALDATA___V493*/ meltfptr[492])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V490*/
- meltfptr[489]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489]))->obj_vartab[1] =
+ ( /*_.VALDATA___V493*/
+ meltfptr[492]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V493*/ meltfptr[492]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V491*/ meltfptr[490]);
+ /*_.VALSTR___V494*/ meltfptr[493]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V490*/ meltfptr[489]);
+ meltgc_touch ( /*_.VALDATA___V493*/ meltfptr[492]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V492*/ meltfptr[491])) ==
+ ( /*_.VALDATA___V495*/ meltfptr[494])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V492*/
- meltfptr[491]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] =
+ ( /*_.VALDATA___V495*/
+ meltfptr[494]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V493*/ meltfptr[492]);
+ /*_.VALSTR___V496*/ meltfptr[495]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V492*/ meltfptr[491])) ==
+ ( /*_.VALDATA___V495*/ meltfptr[494])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V492*/
- meltfptr[491]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[4] =
+ ( /*_.VALDATA___V495*/
+ meltfptr[494]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#295 */
- melt_assertmsg ("putupl #295 checktup",
+ /*putupl#290 */
+ melt_assertmsg ("putupl #290 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V494*/ meltfptr[493])) ==
+ ( /*_.VALTUP___V497*/ meltfptr[496])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #295 checkoff",
+ melt_assertmsg ("putupl #290 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V494*/
- meltfptr[493]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[0] =
+ ( /*_.VALTUP___V497*/
+ meltfptr[496]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45477,278 +45834,278 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#296 */
- melt_assertmsg ("putupl #296 checktup",
+ /*putupl#291 */
+ melt_assertmsg ("putupl #291 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V494*/ meltfptr[493])) ==
+ ( /*_.VALTUP___V497*/ meltfptr[496])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #296 checkoff",
+ melt_assertmsg ("putupl #291 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V494*/
- meltfptr[493]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[1] =
+ ( /*_.VALTUP___V497*/
+ meltfptr[496]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#297 */
- melt_assertmsg ("putupl #297 checktup",
+ /*putupl#292 */
+ melt_assertmsg ("putupl #292 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V494*/ meltfptr[493])) ==
+ ( /*_.VALTUP___V497*/ meltfptr[496])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #297 checkoff",
+ melt_assertmsg ("putupl #292 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V494*/
- meltfptr[493]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V497*/
+ meltfptr[496]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#298 */
- melt_assertmsg ("putupl #298 checktup",
+ /*putupl#293 */
+ melt_assertmsg ("putupl #293 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V494*/ meltfptr[493])) ==
+ ( /*_.VALTUP___V497*/ meltfptr[496])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #298 checkoff",
+ melt_assertmsg ("putupl #293 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V494*/
- meltfptr[493]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V497*/
+ meltfptr[496]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V494*/ meltfptr[493]);
+ meltgc_touch ( /*_.VALTUP___V497*/ meltfptr[496]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V492*/ meltfptr[491])) ==
+ ( /*_.VALDATA___V495*/ meltfptr[494])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V492*/
- meltfptr[491]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[5] =
+ ( /*_.VALDATA___V495*/
+ meltfptr[494]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V494*/ meltfptr[493]);
+ /*_.VALTUP___V497*/ meltfptr[496]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V495*/ meltfptr[494])) ==
+ ( /*_.VALDATA___V498*/ meltfptr[497])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V495*/
- meltfptr[494]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[1] =
+ ( /*_.VALDATA___V498*/
+ meltfptr[497]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V496*/ meltfptr[495]);
+ /*_.VALSTR___V499*/ meltfptr[498]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V495*/ meltfptr[494])) ==
+ ( /*_.VALDATA___V498*/ meltfptr[497])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V495*/
- meltfptr[494]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[2] =
+ ( /*_.VALDATA___V498*/
+ meltfptr[497]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V492*/ meltfptr[491]);
+ /*_.VALDATA___V495*/ meltfptr[494]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V495*/ meltfptr[494]);
+ meltgc_touch ( /*_.VALDATA___V498*/ meltfptr[497]);
- /*putupl#299 */
- melt_assertmsg ("putupl #299 checktup",
+ /*putupl#294 */
+ melt_assertmsg ("putupl #294 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V497*/ meltfptr[496])) ==
+ ( /*_.VALTUP___V500*/ meltfptr[499])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #299 checkoff",
+ melt_assertmsg ("putupl #294 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V497*/
- meltfptr[496]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V500*/
+ meltfptr[499]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V500*/ meltfptr[499]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#300 */
- melt_assertmsg ("putupl #300 checktup",
+ /*putupl#295 */
+ melt_assertmsg ("putupl #295 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V497*/ meltfptr[496])) ==
+ ( /*_.VALTUP___V500*/ meltfptr[499])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #300 checkoff",
+ melt_assertmsg ("putupl #295 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V497*/
- meltfptr[496]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V500*/
+ meltfptr[499]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V500*/ meltfptr[499]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#301 */
- melt_assertmsg ("putupl #301 checktup",
+ /*putupl#296 */
+ melt_assertmsg ("putupl #296 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V497*/ meltfptr[496])) ==
+ ( /*_.VALTUP___V500*/ meltfptr[499])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #301 checkoff",
+ melt_assertmsg ("putupl #296 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V497*/
- meltfptr[496]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V500*/
+ meltfptr[499]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V500*/ meltfptr[499]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#302 */
- melt_assertmsg ("putupl #302 checktup",
+ /*putupl#297 */
+ melt_assertmsg ("putupl #297 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V497*/ meltfptr[496])) ==
+ ( /*_.VALTUP___V500*/ meltfptr[499])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #302 checkoff",
+ melt_assertmsg ("putupl #297 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V497*/
- meltfptr[496]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V497*/ meltfptr[496]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]);
+ ( /*_.VALTUP___V500*/
+ meltfptr[499]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V500*/ meltfptr[499]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V497*/ meltfptr[496]);
+ meltgc_touch ( /*_.VALTUP___V500*/ meltfptr[499]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V492*/ meltfptr[491])) ==
+ ( /*_.VALDATA___V495*/ meltfptr[494])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V492*/
- meltfptr[491]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[6] =
+ ( /*_.VALDATA___V495*/
+ meltfptr[494]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V497*/ meltfptr[496]);
+ /*_.VALTUP___V500*/ meltfptr[499]);
MELT_LOCATION ("warmelt-genobj.melt:265:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]);
+ meltgc_touch ( /*_.VALDATA___V495*/ meltfptr[494]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V498*/ meltfptr[497])) ==
+ ( /*_.VALDATA___V501*/ meltfptr[500])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V498*/
- meltfptr[497]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]))->obj_vartab[1] =
+ ( /*_.VALDATA___V501*/
+ meltfptr[500]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V499*/ meltfptr[498]);
+ /*_.VALSTR___V502*/ meltfptr[501]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V498*/ meltfptr[497]);
+ meltgc_touch ( /*_.VALDATA___V501*/ meltfptr[500]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V500*/ meltfptr[499])) ==
+ ( /*_.VALDATA___V503*/ meltfptr[502])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V500*/
- meltfptr[499]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] =
+ ( /*_.VALDATA___V503*/
+ meltfptr[502]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V501*/ meltfptr[500]);
+ /*_.VALSTR___V504*/ meltfptr[503]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V500*/ meltfptr[499]);
+ meltgc_touch ( /*_.VALDATA___V503*/ meltfptr[502]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V502*/ meltfptr[501])) ==
+ ( /*_.VALDATA___V505*/ meltfptr[504])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V502*/
- meltfptr[501]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[1] =
+ ( /*_.VALDATA___V505*/
+ meltfptr[504]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V503*/ meltfptr[502]);
+ /*_.VALSTR___V506*/ meltfptr[505]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V502*/ meltfptr[501])) ==
+ ( /*_.VALDATA___V505*/ meltfptr[504])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V502*/
- meltfptr[501]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[4] =
+ ( /*_.VALDATA___V505*/
+ meltfptr[504]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#303 */
- melt_assertmsg ("putupl #303 checktup",
+ /*putupl#298 */
+ melt_assertmsg ("putupl #298 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V504*/ meltfptr[503])) ==
+ ( /*_.VALTUP___V507*/ meltfptr[506])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #303 checkoff",
+ melt_assertmsg ("putupl #298 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V504*/
- meltfptr[503]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V504*/ meltfptr[503]))->tabval[0] =
+ ( /*_.VALTUP___V507*/
+ meltfptr[506]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V507*/ meltfptr[506]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45756,220 +46113,220 @@ warmelt_genobj_initialmeltchunk_5 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#304 */
- melt_assertmsg ("putupl #304 checktup",
+ /*putupl#299 */
+ melt_assertmsg ("putupl #299 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V504*/ meltfptr[503])) ==
+ ( /*_.VALTUP___V507*/ meltfptr[506])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #304 checkoff",
+ melt_assertmsg ("putupl #299 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V504*/
- meltfptr[503]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V504*/ meltfptr[503]))->tabval[1] =
+ ( /*_.VALTUP___V507*/
+ meltfptr[506]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V507*/ meltfptr[506]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#305 */
- melt_assertmsg ("putupl #305 checktup",
+ /*putupl#300 */
+ melt_assertmsg ("putupl #300 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V504*/ meltfptr[503])) ==
+ ( /*_.VALTUP___V507*/ meltfptr[506])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #305 checkoff",
+ melt_assertmsg ("putupl #300 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V504*/
- meltfptr[503]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V504*/ meltfptr[503]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V507*/
+ meltfptr[506]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V507*/ meltfptr[506]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V504*/ meltfptr[503]);
+ meltgc_touch ( /*_.VALTUP___V507*/ meltfptr[506]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V502*/ meltfptr[501])) ==
+ ( /*_.VALDATA___V505*/ meltfptr[504])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V502*/
- meltfptr[501]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[5] =
+ ( /*_.VALDATA___V505*/
+ meltfptr[504]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V504*/ meltfptr[503]);
+ /*_.VALTUP___V507*/ meltfptr[506]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V505*/ meltfptr[504])) ==
+ ( /*_.VALDATA___V508*/ meltfptr[507])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V505*/
- meltfptr[504]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[1] =
+ ( /*_.VALDATA___V508*/
+ meltfptr[507]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V508*/ meltfptr[507]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V506*/ meltfptr[505]);
+ /*_.VALSTR___V509*/ meltfptr[508]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V505*/ meltfptr[504])) ==
+ ( /*_.VALDATA___V508*/ meltfptr[507])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V505*/
- meltfptr[504]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[2] =
+ ( /*_.VALDATA___V508*/
+ meltfptr[507]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V508*/ meltfptr[507]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V502*/ meltfptr[501]);
+ /*_.VALDATA___V505*/ meltfptr[504]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V505*/ meltfptr[504]);
+ meltgc_touch ( /*_.VALDATA___V508*/ meltfptr[507]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V507*/ meltfptr[506])) ==
+ ( /*_.VALDATA___V510*/ meltfptr[509])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V507*/
- meltfptr[506]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]))->obj_vartab[1] =
+ ( /*_.VALDATA___V510*/
+ meltfptr[509]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V508*/ meltfptr[507]);
+ /*_.VALSTR___V511*/ meltfptr[510]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V507*/ meltfptr[506])) ==
+ ( /*_.VALDATA___V510*/ meltfptr[509])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V507*/
- meltfptr[506]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]))->obj_vartab[2] =
+ ( /*_.VALDATA___V510*/
+ meltfptr[509]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V502*/ meltfptr[501]);
+ /*_.VALDATA___V505*/ meltfptr[504]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V507*/ meltfptr[506]);
+ meltgc_touch ( /*_.VALDATA___V510*/ meltfptr[509]);
- /*putupl#306 */
- melt_assertmsg ("putupl #306 checktup",
+ /*putupl#301 */
+ melt_assertmsg ("putupl #301 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V509*/ meltfptr[508])) ==
+ ( /*_.VALTUP___V512*/ meltfptr[511])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #306 checkoff",
+ melt_assertmsg ("putupl #301 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V509*/
- meltfptr[508]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V509*/ meltfptr[508]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V512*/
+ meltfptr[511]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V512*/ meltfptr[511]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#307 */
- melt_assertmsg ("putupl #307 checktup",
+ /*putupl#302 */
+ melt_assertmsg ("putupl #302 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V509*/ meltfptr[508])) ==
+ ( /*_.VALTUP___V512*/ meltfptr[511])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #307 checkoff",
+ melt_assertmsg ("putupl #302 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V509*/
- meltfptr[508]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V509*/ meltfptr[508]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]);
+ ( /*_.VALTUP___V512*/
+ meltfptr[511]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V512*/ meltfptr[511]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V508*/ meltfptr[507]);
- /*putupl#308 */
- melt_assertmsg ("putupl #308 checktup",
+ /*putupl#303 */
+ melt_assertmsg ("putupl #303 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V509*/ meltfptr[508])) ==
+ ( /*_.VALTUP___V512*/ meltfptr[511])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #308 checkoff",
+ melt_assertmsg ("putupl #303 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V509*/
- meltfptr[508]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V509*/ meltfptr[508]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]);
+ ( /*_.VALTUP___V512*/
+ meltfptr[511]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V512*/ meltfptr[511]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V509*/ meltfptr[508]);
+ meltgc_touch ( /*_.VALTUP___V512*/ meltfptr[511]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V502*/ meltfptr[501])) ==
+ ( /*_.VALDATA___V505*/ meltfptr[504])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V502*/
- meltfptr[501]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[6] =
+ ( /*_.VALDATA___V505*/
+ meltfptr[504]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V509*/ meltfptr[508]);
+ /*_.VALTUP___V512*/ meltfptr[511]);
MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V502*/ meltfptr[501]);
+ meltgc_touch ( /*_.VALDATA___V505*/ meltfptr[504]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V510*/ meltfptr[509])) ==
+ ( /*_.VALDATA___V513*/ meltfptr[512])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V510*/
- meltfptr[509]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]))->obj_vartab[1] =
+ ( /*_.VALDATA___V513*/
+ meltfptr[512]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V511*/ meltfptr[510]);
+ /*_.VALSTR___V514*/ meltfptr[513]);
#undef meltfram__
@@ -45983,94 +46340,94 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
#undef meltcallcount
#define meltcallcount 0L
/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V510*/ meltfptr[509]);
+ meltgc_touch ( /*_.VALDATA___V513*/ meltfptr[512]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V512*/ meltfptr[511])) ==
+ ( /*_.VALDATA___V515*/ meltfptr[514])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V512*/
- meltfptr[511]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] =
+ ( /*_.VALDATA___V515*/
+ meltfptr[514]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V513*/ meltfptr[512]);
+ /*_.VALSTR___V516*/ meltfptr[515]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V512*/ meltfptr[511]);
+ meltgc_touch ( /*_.VALDATA___V515*/ meltfptr[514]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V514*/ meltfptr[513])) ==
+ ( /*_.VALDATA___V517*/ meltfptr[516])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V514*/
- meltfptr[513]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]))->obj_vartab[1] =
+ ( /*_.VALDATA___V517*/
+ meltfptr[516]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V515*/ meltfptr[514]);
+ /*_.VALSTR___V518*/ meltfptr[517]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V514*/ meltfptr[513]);
+ meltgc_touch ( /*_.VALDATA___V517*/ meltfptr[516]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V516*/ meltfptr[515])) ==
+ ( /*_.VALDATA___V519*/ meltfptr[518])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V516*/
- meltfptr[515]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] =
+ ( /*_.VALDATA___V519*/
+ meltfptr[518]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V517*/ meltfptr[516]);
+ /*_.VALSTR___V520*/ meltfptr[519]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V516*/ meltfptr[515])) ==
+ ( /*_.VALDATA___V519*/ meltfptr[518])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V516*/
- meltfptr[515]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[4] =
+ ( /*_.VALDATA___V519*/
+ meltfptr[518]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#309 */
- melt_assertmsg ("putupl #309 checktup",
+ /*putupl#304 */
+ melt_assertmsg ("putupl #304 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V518*/ meltfptr[517])) ==
+ ( /*_.VALTUP___V521*/ meltfptr[520])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #309 checkoff",
+ melt_assertmsg ("putupl #304 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V518*/
- meltfptr[517]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V518*/ meltfptr[517]))->tabval[0] =
+ ( /*_.VALTUP___V521*/
+ meltfptr[520]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46078,310 +46435,310 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#310 */
- melt_assertmsg ("putupl #310 checktup",
+ /*putupl#305 */
+ melt_assertmsg ("putupl #305 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V518*/ meltfptr[517])) ==
+ ( /*_.VALTUP___V521*/ meltfptr[520])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #310 checkoff",
+ melt_assertmsg ("putupl #305 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V518*/
- meltfptr[517]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V518*/ meltfptr[517]))->tabval[1] =
+ ( /*_.VALTUP___V521*/
+ meltfptr[520]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#311 */
- melt_assertmsg ("putupl #311 checktup",
+ /*putupl#306 */
+ melt_assertmsg ("putupl #306 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V518*/ meltfptr[517])) ==
+ ( /*_.VALTUP___V521*/ meltfptr[520])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #311 checkoff",
+ melt_assertmsg ("putupl #306 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V518*/
- meltfptr[517]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V518*/ meltfptr[517]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V521*/
+ meltfptr[520]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V518*/ meltfptr[517]);
+ meltgc_touch ( /*_.VALTUP___V521*/ meltfptr[520]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V516*/ meltfptr[515])) ==
+ ( /*_.VALDATA___V519*/ meltfptr[518])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V516*/
- meltfptr[515]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[5] =
+ ( /*_.VALDATA___V519*/
+ meltfptr[518]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V518*/ meltfptr[517]);
+ /*_.VALTUP___V521*/ meltfptr[520]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V519*/ meltfptr[518])) ==
+ ( /*_.VALDATA___V522*/ meltfptr[521])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V519*/
- meltfptr[518]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[1] =
+ ( /*_.VALDATA___V522*/
+ meltfptr[521]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V520*/ meltfptr[519]);
+ /*_.VALSTR___V523*/ meltfptr[522]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V519*/ meltfptr[518])) ==
+ ( /*_.VALDATA___V522*/ meltfptr[521])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V519*/
- meltfptr[518]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[2] =
+ ( /*_.VALDATA___V522*/
+ meltfptr[521]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V516*/ meltfptr[515]);
+ /*_.VALDATA___V519*/ meltfptr[518]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V519*/ meltfptr[518]);
+ meltgc_touch ( /*_.VALDATA___V522*/ meltfptr[521]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V521*/ meltfptr[520])) ==
+ ( /*_.VALDATA___V524*/ meltfptr[523])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V521*/
- meltfptr[520]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[1] =
+ ( /*_.VALDATA___V524*/
+ meltfptr[523]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V522*/ meltfptr[521]);
+ /*_.VALSTR___V525*/ meltfptr[524]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V521*/ meltfptr[520])) ==
+ ( /*_.VALDATA___V524*/ meltfptr[523])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V521*/
- meltfptr[520]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[2] =
+ ( /*_.VALDATA___V524*/
+ meltfptr[523]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V516*/ meltfptr[515]);
+ /*_.VALDATA___V519*/ meltfptr[518]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V521*/ meltfptr[520]);
+ meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]);
- /*putupl#312 */
- melt_assertmsg ("putupl #312 checktup",
+ /*putupl#307 */
+ melt_assertmsg ("putupl #307 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V523*/ meltfptr[522])) ==
+ ( /*_.VALTUP___V526*/ meltfptr[525])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #312 checkoff",
+ melt_assertmsg ("putupl #307 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V523*/
- meltfptr[522]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V523*/ meltfptr[522]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V526*/
+ meltfptr[525]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#313 */
- melt_assertmsg ("putupl #313 checktup",
+ /*putupl#308 */
+ melt_assertmsg ("putupl #308 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V523*/ meltfptr[522])) ==
+ ( /*_.VALTUP___V526*/ meltfptr[525])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #313 checkoff",
+ melt_assertmsg ("putupl #308 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V523*/
- meltfptr[522]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V523*/ meltfptr[522]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]);
+ ( /*_.VALTUP___V526*/
+ meltfptr[525]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521]);
- /*putupl#314 */
- melt_assertmsg ("putupl #314 checktup",
+ /*putupl#309 */
+ melt_assertmsg ("putupl #309 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V523*/ meltfptr[522])) ==
+ ( /*_.VALTUP___V526*/ meltfptr[525])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #314 checkoff",
+ melt_assertmsg ("putupl #309 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V523*/
- meltfptr[522]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V523*/ meltfptr[522]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V521*/ meltfptr[520]);
+ ( /*_.VALTUP___V526*/
+ meltfptr[525]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V523*/ meltfptr[522]);
+ meltgc_touch ( /*_.VALTUP___V526*/ meltfptr[525]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V516*/ meltfptr[515])) ==
+ ( /*_.VALDATA___V519*/ meltfptr[518])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V516*/
- meltfptr[515]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[6] =
+ ( /*_.VALDATA___V519*/
+ meltfptr[518]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V523*/ meltfptr[522]);
+ /*_.VALTUP___V526*/ meltfptr[525]);
MELT_LOCATION ("warmelt-genobj.melt:278:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V516*/ meltfptr[515]);
+ meltgc_touch ( /*_.VALDATA___V519*/ meltfptr[518]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V524*/ meltfptr[523])) ==
+ ( /*_.VALDATA___V527*/ meltfptr[526])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V524*/
- meltfptr[523]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] =
+ ( /*_.VALDATA___V527*/
+ meltfptr[526]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V525*/ meltfptr[524]);
+ /*_.VALSTR___V528*/ meltfptr[527]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]);
+ meltgc_touch ( /*_.VALDATA___V527*/ meltfptr[526]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V526*/ meltfptr[525])) ==
+ ( /*_.VALDATA___V529*/ meltfptr[528])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V526*/
- meltfptr[525]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]))->obj_vartab[1] =
+ ( /*_.VALDATA___V529*/
+ meltfptr[528]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V527*/ meltfptr[526]);
+ /*_.VALSTR___V530*/ meltfptr[529]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V526*/ meltfptr[525]);
+ meltgc_touch ( /*_.VALDATA___V529*/ meltfptr[528]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V528*/ meltfptr[527])) ==
+ ( /*_.VALDATA___V531*/ meltfptr[530])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V528*/
- meltfptr[527]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]))->obj_vartab[1] =
+ ( /*_.VALDATA___V531*/
+ meltfptr[530]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V529*/ meltfptr[528]);
+ /*_.VALSTR___V532*/ meltfptr[531]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V528*/ meltfptr[527]);
+ meltgc_touch ( /*_.VALDATA___V531*/ meltfptr[530]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V530*/ meltfptr[529])) ==
+ ( /*_.VALDATA___V533*/ meltfptr[532])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V530*/
- meltfptr[529]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[1] =
+ ( /*_.VALDATA___V533*/
+ meltfptr[532]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V531*/ meltfptr[530]);
+ /*_.VALSTR___V534*/ meltfptr[533]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V530*/ meltfptr[529])) ==
+ ( /*_.VALDATA___V533*/ meltfptr[532])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V530*/
- meltfptr[529]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[4] =
+ ( /*_.VALDATA___V533*/
+ meltfptr[532]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#315 */
- melt_assertmsg ("putupl #315 checktup",
+ /*putupl#310 */
+ melt_assertmsg ("putupl #310 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V532*/ meltfptr[531])) ==
+ ( /*_.VALTUP___V535*/ meltfptr[534])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #315 checkoff",
+ melt_assertmsg ("putupl #310 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V532*/
- meltfptr[531]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V532*/ meltfptr[531]))->tabval[0] =
+ ( /*_.VALTUP___V535*/
+ meltfptr[534]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V535*/ meltfptr[534]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46389,352 +46746,352 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#316 */
- melt_assertmsg ("putupl #316 checktup",
+ /*putupl#311 */
+ melt_assertmsg ("putupl #311 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V532*/ meltfptr[531])) ==
+ ( /*_.VALTUP___V535*/ meltfptr[534])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #316 checkoff",
+ melt_assertmsg ("putupl #311 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V532*/
- meltfptr[531]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V532*/ meltfptr[531]))->tabval[1] =
+ ( /*_.VALTUP___V535*/
+ meltfptr[534]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V535*/ meltfptr[534]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#317 */
- melt_assertmsg ("putupl #317 checktup",
+ /*putupl#312 */
+ melt_assertmsg ("putupl #312 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V532*/ meltfptr[531])) ==
+ ( /*_.VALTUP___V535*/ meltfptr[534])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #317 checkoff",
+ melt_assertmsg ("putupl #312 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V532*/
- meltfptr[531]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V532*/ meltfptr[531]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V535*/
+ meltfptr[534]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V535*/ meltfptr[534]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#318 */
- melt_assertmsg ("putupl #318 checktup",
+ /*putupl#313 */
+ melt_assertmsg ("putupl #313 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V532*/ meltfptr[531])) ==
+ ( /*_.VALTUP___V535*/ meltfptr[534])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #318 checkoff",
+ melt_assertmsg ("putupl #313 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V532*/
- meltfptr[531]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V532*/ meltfptr[531]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V535*/
+ meltfptr[534]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V535*/ meltfptr[534]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V532*/ meltfptr[531]);
+ meltgc_touch ( /*_.VALTUP___V535*/ meltfptr[534]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V530*/ meltfptr[529])) ==
+ ( /*_.VALDATA___V533*/ meltfptr[532])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V530*/
- meltfptr[529]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[5] =
+ ( /*_.VALDATA___V533*/
+ meltfptr[532]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V532*/ meltfptr[531]);
+ /*_.VALTUP___V535*/ meltfptr[534]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V533*/ meltfptr[532])) ==
+ ( /*_.VALDATA___V536*/ meltfptr[535])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V533*/
- meltfptr[532]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[1] =
+ ( /*_.VALDATA___V536*/
+ meltfptr[535]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V534*/ meltfptr[533]);
+ /*_.VALSTR___V537*/ meltfptr[536]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V533*/ meltfptr[532])) ==
+ ( /*_.VALDATA___V536*/ meltfptr[535])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V533*/
- meltfptr[532]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[2] =
+ ( /*_.VALDATA___V536*/
+ meltfptr[535]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V530*/ meltfptr[529]);
+ /*_.VALDATA___V533*/ meltfptr[532]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V533*/ meltfptr[532]);
+ meltgc_touch ( /*_.VALDATA___V536*/ meltfptr[535]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V535*/ meltfptr[534])) ==
+ ( /*_.VALDATA___V538*/ meltfptr[537])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V535*/
- meltfptr[534]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]))->obj_vartab[1] =
+ ( /*_.VALDATA___V538*/
+ meltfptr[537]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V536*/ meltfptr[535]);
+ /*_.VALSTR___V539*/ meltfptr[538]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V535*/ meltfptr[534])) ==
+ ( /*_.VALDATA___V538*/ meltfptr[537])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V535*/
- meltfptr[534]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]))->obj_vartab[2] =
+ ( /*_.VALDATA___V538*/
+ meltfptr[537]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V530*/ meltfptr[529]);
+ /*_.VALDATA___V533*/ meltfptr[532]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V535*/ meltfptr[534]);
+ meltgc_touch ( /*_.VALDATA___V538*/ meltfptr[537]);
- /*putupl#319 */
- melt_assertmsg ("putupl #319 checktup",
+ /*putupl#314 */
+ melt_assertmsg ("putupl #314 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V537*/ meltfptr[536])) ==
+ ( /*_.VALTUP___V540*/ meltfptr[539])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #319 checkoff",
+ melt_assertmsg ("putupl #314 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V537*/
- meltfptr[536]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V537*/ meltfptr[536]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V540*/
+ meltfptr[539]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#320 */
- melt_assertmsg ("putupl #320 checktup",
+ /*putupl#315 */
+ melt_assertmsg ("putupl #315 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V537*/ meltfptr[536])) ==
+ ( /*_.VALTUP___V540*/ meltfptr[539])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #320 checkoff",
+ melt_assertmsg ("putupl #315 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V537*/
- meltfptr[536]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V537*/ meltfptr[536]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V540*/
+ meltfptr[539]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#321 */
- melt_assertmsg ("putupl #321 checktup",
+ /*putupl#316 */
+ melt_assertmsg ("putupl #316 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V537*/ meltfptr[536])) ==
+ ( /*_.VALTUP___V540*/ meltfptr[539])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #321 checkoff",
+ melt_assertmsg ("putupl #316 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V537*/
- meltfptr[536]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V537*/ meltfptr[536]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V540*/
+ meltfptr[539]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#322 */
- melt_assertmsg ("putupl #322 checktup",
+ /*putupl#317 */
+ melt_assertmsg ("putupl #317 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V537*/ meltfptr[536])) ==
+ ( /*_.VALTUP___V540*/ meltfptr[539])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #322 checkoff",
+ melt_assertmsg ("putupl #317 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V537*/
- meltfptr[536]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V537*/ meltfptr[536]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]);
+ ( /*_.VALTUP___V540*/
+ meltfptr[539]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]);
- /*putupl#323 */
- melt_assertmsg ("putupl #323 checktup",
+ /*putupl#318 */
+ melt_assertmsg ("putupl #318 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V537*/ meltfptr[536])) ==
+ ( /*_.VALTUP___V540*/ meltfptr[539])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #323 checkoff",
+ melt_assertmsg ("putupl #318 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V537*/
- meltfptr[536]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V537*/ meltfptr[536]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]);
+ ( /*_.VALTUP___V540*/
+ meltfptr[539]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V537*/ meltfptr[536]);
+ meltgc_touch ( /*_.VALTUP___V540*/ meltfptr[539]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V530*/ meltfptr[529])) ==
+ ( /*_.VALDATA___V533*/ meltfptr[532])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V530*/
- meltfptr[529]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[6] =
+ ( /*_.VALDATA___V533*/
+ meltfptr[532]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V537*/ meltfptr[536]);
+ /*_.VALTUP___V540*/ meltfptr[539]);
MELT_LOCATION ("warmelt-genobj.melt:285:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V530*/ meltfptr[529]);
+ meltgc_touch ( /*_.VALDATA___V533*/ meltfptr[532]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V538*/ meltfptr[537])) ==
+ ( /*_.VALDATA___V541*/ meltfptr[540])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V538*/
- meltfptr[537]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[1] =
+ ( /*_.VALDATA___V541*/
+ meltfptr[540]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V539*/ meltfptr[538]);
+ /*_.VALSTR___V542*/ meltfptr[541]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V538*/ meltfptr[537]);
+ meltgc_touch ( /*_.VALDATA___V541*/ meltfptr[540]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V540*/ meltfptr[539])) ==
+ ( /*_.VALDATA___V543*/ meltfptr[542])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V540*/
- meltfptr[539]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]))->obj_vartab[1] =
+ ( /*_.VALDATA___V543*/
+ meltfptr[542]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V543*/ meltfptr[542]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V541*/ meltfptr[540]);
+ /*_.VALSTR___V544*/ meltfptr[543]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V540*/ meltfptr[539]);
+ meltgc_touch ( /*_.VALDATA___V543*/ meltfptr[542]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V542*/ meltfptr[541])) ==
+ ( /*_.VALDATA___V545*/ meltfptr[544])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V542*/
- meltfptr[541]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]))->obj_vartab[1] =
+ ( /*_.VALDATA___V545*/
+ meltfptr[544]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V543*/ meltfptr[542]);
+ /*_.VALSTR___V546*/ meltfptr[545]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V542*/ meltfptr[541]);
+ meltgc_touch ( /*_.VALDATA___V545*/ meltfptr[544]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V544*/ meltfptr[543])) ==
+ ( /*_.VALDATA___V547*/ meltfptr[546])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V544*/
- meltfptr[543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[1] =
+ ( /*_.VALDATA___V547*/
+ meltfptr[546]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V545*/ meltfptr[544]);
+ /*_.VALSTR___V548*/ meltfptr[547]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V544*/ meltfptr[543])) ==
+ ( /*_.VALDATA___V547*/ meltfptr[546])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V544*/
- meltfptr[543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[4] =
+ ( /*_.VALDATA___V547*/
+ meltfptr[546]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#324 */
- melt_assertmsg ("putupl #324 checktup",
+ /*putupl#319 */
+ melt_assertmsg ("putupl #319 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V546*/ meltfptr[545])) ==
+ ( /*_.VALTUP___V549*/ meltfptr[548])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #324 checkoff",
+ melt_assertmsg ("putupl #319 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V546*/
- meltfptr[545]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V546*/ meltfptr[545]))->tabval[0] =
+ ( /*_.VALTUP___V549*/
+ meltfptr[548]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V549*/ meltfptr[548]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46742,236 +47099,236 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#325 */
- melt_assertmsg ("putupl #325 checktup",
+ /*putupl#320 */
+ melt_assertmsg ("putupl #320 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V546*/ meltfptr[545])) ==
+ ( /*_.VALTUP___V549*/ meltfptr[548])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #325 checkoff",
+ melt_assertmsg ("putupl #320 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V546*/
- meltfptr[545]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V546*/ meltfptr[545]))->tabval[1] =
+ ( /*_.VALTUP___V549*/
+ meltfptr[548]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V549*/ meltfptr[548]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#326 */
- melt_assertmsg ("putupl #326 checktup",
+ /*putupl#321 */
+ melt_assertmsg ("putupl #321 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V546*/ meltfptr[545])) ==
+ ( /*_.VALTUP___V549*/ meltfptr[548])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #326 checkoff",
+ melt_assertmsg ("putupl #321 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V546*/
- meltfptr[545]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V546*/ meltfptr[545]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V549*/
+ meltfptr[548]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V549*/ meltfptr[548]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V546*/ meltfptr[545]);
+ meltgc_touch ( /*_.VALTUP___V549*/ meltfptr[548]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V544*/ meltfptr[543])) ==
+ ( /*_.VALDATA___V547*/ meltfptr[546])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V544*/
- meltfptr[543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[5] =
+ ( /*_.VALDATA___V547*/
+ meltfptr[546]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V546*/ meltfptr[545]);
+ /*_.VALTUP___V549*/ meltfptr[548]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V547*/ meltfptr[546])) ==
+ ( /*_.VALDATA___V550*/ meltfptr[549])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V547*/
- meltfptr[546]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[1] =
+ ( /*_.VALDATA___V550*/
+ meltfptr[549]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V548*/ meltfptr[547]);
+ /*_.VALSTR___V551*/ meltfptr[550]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V547*/ meltfptr[546])) ==
+ ( /*_.VALDATA___V550*/ meltfptr[549])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V547*/
- meltfptr[546]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[2] =
+ ( /*_.VALDATA___V550*/
+ meltfptr[549]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V544*/ meltfptr[543]);
+ /*_.VALDATA___V547*/ meltfptr[546]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V547*/ meltfptr[546]);
+ meltgc_touch ( /*_.VALDATA___V550*/ meltfptr[549]);
- /*putupl#327 */
- melt_assertmsg ("putupl #327 checktup",
+ /*putupl#322 */
+ melt_assertmsg ("putupl #322 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V549*/ meltfptr[548])) ==
+ ( /*_.VALTUP___V552*/ meltfptr[551])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #327 checkoff",
+ melt_assertmsg ("putupl #322 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V549*/
- meltfptr[548]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V549*/ meltfptr[548]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V552*/
+ meltfptr[551]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V552*/ meltfptr[551]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#328 */
- melt_assertmsg ("putupl #328 checktup",
+ /*putupl#323 */
+ melt_assertmsg ("putupl #323 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V549*/ meltfptr[548])) ==
+ ( /*_.VALTUP___V552*/ meltfptr[551])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #328 checkoff",
+ melt_assertmsg ("putupl #323 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V549*/
- meltfptr[548]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V549*/ meltfptr[548]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]);
+ ( /*_.VALTUP___V552*/
+ meltfptr[551]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V552*/ meltfptr[551]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V549*/ meltfptr[548]);
+ meltgc_touch ( /*_.VALTUP___V552*/ meltfptr[551]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V544*/ meltfptr[543])) ==
+ ( /*_.VALDATA___V547*/ meltfptr[546])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V544*/
- meltfptr[543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[6] =
+ ( /*_.VALDATA___V547*/
+ meltfptr[546]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V549*/ meltfptr[548]);
+ /*_.VALTUP___V552*/ meltfptr[551]);
MELT_LOCATION ("warmelt-genobj.melt:292:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V544*/ meltfptr[543]);
+ meltgc_touch ( /*_.VALDATA___V547*/ meltfptr[546]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V550*/ meltfptr[549])) ==
+ ( /*_.VALDATA___V553*/ meltfptr[552])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V550*/
- meltfptr[549]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]))->obj_vartab[1] =
+ ( /*_.VALDATA___V553*/
+ meltfptr[552]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V551*/ meltfptr[550]);
+ /*_.VALSTR___V554*/ meltfptr[553]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V550*/ meltfptr[549]);
+ meltgc_touch ( /*_.VALDATA___V553*/ meltfptr[552]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V552*/ meltfptr[551])) ==
+ ( /*_.VALDATA___V555*/ meltfptr[554])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V552*/
- meltfptr[551]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[1] =
+ ( /*_.VALDATA___V555*/
+ meltfptr[554]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V553*/ meltfptr[552]);
+ /*_.VALSTR___V556*/ meltfptr[555]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V552*/ meltfptr[551]);
+ meltgc_touch ( /*_.VALDATA___V555*/ meltfptr[554]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V554*/ meltfptr[553])) ==
+ ( /*_.VALDATA___V557*/ meltfptr[556])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V554*/
- meltfptr[553]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[1] =
+ ( /*_.VALDATA___V557*/
+ meltfptr[556]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V555*/ meltfptr[554]);
+ /*_.VALSTR___V558*/ meltfptr[557]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V554*/ meltfptr[553])) ==
+ ( /*_.VALDATA___V557*/ meltfptr[556])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V554*/
- meltfptr[553]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[4] =
+ ( /*_.VALDATA___V557*/
+ meltfptr[556]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#329 */
- melt_assertmsg ("putupl #329 checktup",
+ /*putupl#324 */
+ melt_assertmsg ("putupl #324 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V556*/ meltfptr[555])) ==
+ ( /*_.VALTUP___V559*/ meltfptr[558])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #329 checkoff",
+ melt_assertmsg ("putupl #324 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V556*/
- meltfptr[555]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V556*/ meltfptr[555]))->tabval[0] =
+ ( /*_.VALTUP___V559*/
+ meltfptr[558]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46979,236 +47336,236 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#330 */
- melt_assertmsg ("putupl #330 checktup",
+ /*putupl#325 */
+ melt_assertmsg ("putupl #325 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V556*/ meltfptr[555])) ==
+ ( /*_.VALTUP___V559*/ meltfptr[558])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #330 checkoff",
+ melt_assertmsg ("putupl #325 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V556*/
- meltfptr[555]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V556*/ meltfptr[555]))->tabval[1] =
+ ( /*_.VALTUP___V559*/
+ meltfptr[558]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#331 */
- melt_assertmsg ("putupl #331 checktup",
+ /*putupl#326 */
+ melt_assertmsg ("putupl #326 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V556*/ meltfptr[555])) ==
+ ( /*_.VALTUP___V559*/ meltfptr[558])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #331 checkoff",
+ melt_assertmsg ("putupl #326 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V556*/
- meltfptr[555]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V556*/ meltfptr[555]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V559*/
+ meltfptr[558]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V556*/ meltfptr[555]);
+ meltgc_touch ( /*_.VALTUP___V559*/ meltfptr[558]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V554*/ meltfptr[553])) ==
+ ( /*_.VALDATA___V557*/ meltfptr[556])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V554*/
- meltfptr[553]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[5] =
+ ( /*_.VALDATA___V557*/
+ meltfptr[556]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V556*/ meltfptr[555]);
+ /*_.VALTUP___V559*/ meltfptr[558]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V557*/ meltfptr[556])) ==
+ ( /*_.VALDATA___V560*/ meltfptr[559])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V557*/
- meltfptr[556]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[1] =
+ ( /*_.VALDATA___V560*/
+ meltfptr[559]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V558*/ meltfptr[557]);
+ /*_.VALSTR___V561*/ meltfptr[560]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V557*/ meltfptr[556])) ==
+ ( /*_.VALDATA___V560*/ meltfptr[559])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V557*/
- meltfptr[556]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[2] =
+ ( /*_.VALDATA___V560*/
+ meltfptr[559]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V554*/ meltfptr[553]);
+ /*_.VALDATA___V557*/ meltfptr[556]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V557*/ meltfptr[556]);
+ meltgc_touch ( /*_.VALDATA___V560*/ meltfptr[559]);
- /*putupl#332 */
- melt_assertmsg ("putupl #332 checktup",
+ /*putupl#327 */
+ melt_assertmsg ("putupl #327 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V559*/ meltfptr[558])) ==
+ ( /*_.VALTUP___V562*/ meltfptr[561])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #332 checkoff",
+ melt_assertmsg ("putupl #327 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V559*/
- meltfptr[558]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V562*/
+ meltfptr[561]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V562*/ meltfptr[561]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#333 */
- melt_assertmsg ("putupl #333 checktup",
+ /*putupl#328 */
+ melt_assertmsg ("putupl #328 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V559*/ meltfptr[558])) ==
+ ( /*_.VALTUP___V562*/ meltfptr[561])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #333 checkoff",
+ melt_assertmsg ("putupl #328 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V559*/
- meltfptr[558]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]);
+ ( /*_.VALTUP___V562*/
+ meltfptr[561]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V562*/ meltfptr[561]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V559*/ meltfptr[558]);
+ meltgc_touch ( /*_.VALTUP___V562*/ meltfptr[561]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V554*/ meltfptr[553])) ==
+ ( /*_.VALDATA___V557*/ meltfptr[556])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V554*/
- meltfptr[553]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[6] =
+ ( /*_.VALDATA___V557*/
+ meltfptr[556]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V559*/ meltfptr[558]);
+ /*_.VALTUP___V562*/ meltfptr[561]);
MELT_LOCATION ("warmelt-genobj.melt:298:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V554*/ meltfptr[553]);
+ meltgc_touch ( /*_.VALDATA___V557*/ meltfptr[556]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V560*/ meltfptr[559])) ==
+ ( /*_.VALDATA___V563*/ meltfptr[562])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V560*/
- meltfptr[559]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] =
+ ( /*_.VALDATA___V563*/
+ meltfptr[562]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V561*/ meltfptr[560]);
+ /*_.VALSTR___V564*/ meltfptr[563]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V560*/ meltfptr[559]);
+ meltgc_touch ( /*_.VALDATA___V563*/ meltfptr[562]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V562*/ meltfptr[561])) ==
+ ( /*_.VALDATA___V565*/ meltfptr[564])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V562*/
- meltfptr[561]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[1] =
+ ( /*_.VALDATA___V565*/
+ meltfptr[564]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V563*/ meltfptr[562]);
+ /*_.VALSTR___V566*/ meltfptr[565]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V562*/ meltfptr[561]);
+ meltgc_touch ( /*_.VALDATA___V565*/ meltfptr[564]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[1] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V565*/ meltfptr[564]);
+ /*_.VALSTR___V568*/ meltfptr[567]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[4] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V438*/ meltfptr[437]);
+ /*_.VALDATA___V441*/ meltfptr[440]);
- /*putupl#334 */
- melt_assertmsg ("putupl #334 checktup",
+ /*putupl#329 */
+ melt_assertmsg ("putupl #329 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V566*/ meltfptr[565])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #334 checkoff",
+ melt_assertmsg ("putupl #329 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V566*/
- meltfptr[565]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V566*/ meltfptr[565]))->tabval[0] =
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47216,358 +47573,358 @@ warmelt_genobj_initialmeltchunk_6 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#335 */
- melt_assertmsg ("putupl #335 checktup",
+ /*putupl#330 */
+ melt_assertmsg ("putupl #330 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V566*/ meltfptr[565])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #335 checkoff",
+ melt_assertmsg ("putupl #330 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V566*/
- meltfptr[565]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V566*/ meltfptr[565]))->tabval[1] =
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#336 */
- melt_assertmsg ("putupl #336 checktup",
+ /*putupl#331 */
+ melt_assertmsg ("putupl #331 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V566*/ meltfptr[565])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #336 checkoff",
+ melt_assertmsg ("putupl #331 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V566*/
- meltfptr[565]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V566*/ meltfptr[565]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#337 */
- melt_assertmsg ("putupl #337 checktup",
+ /*putupl#332 */
+ melt_assertmsg ("putupl #332 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V566*/ meltfptr[565])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #337 checkoff",
+ melt_assertmsg ("putupl #332 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V566*/
- meltfptr[565]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V566*/ meltfptr[565]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V566*/ meltfptr[565]);
+ meltgc_touch ( /*_.VALTUP___V569*/ meltfptr[568]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[5] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V566*/ meltfptr[565]);
+ /*_.VALTUP___V569*/ meltfptr[568]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V567*/ meltfptr[566])) ==
+ ( /*_.VALDATA___V570*/ meltfptr[569])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V567*/
- meltfptr[566]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[1] =
+ ( /*_.VALDATA___V570*/
+ meltfptr[569]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V570*/ meltfptr[569]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V568*/ meltfptr[567]);
+ /*_.VALSTR___V571*/ meltfptr[570]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V567*/ meltfptr[566])) ==
+ ( /*_.VALDATA___V570*/ meltfptr[569])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V567*/
- meltfptr[566]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[2] =
+ ( /*_.VALDATA___V570*/
+ meltfptr[569]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V570*/ meltfptr[569]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V564*/ meltfptr[563]);
+ /*_.VALDATA___V567*/ meltfptr[566]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V567*/ meltfptr[566]);
+ meltgc_touch ( /*_.VALDATA___V570*/ meltfptr[569]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V569*/ meltfptr[568])) ==
+ ( /*_.VALDATA___V572*/ meltfptr[571])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V569*/
- meltfptr[568]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]))->obj_vartab[1] =
+ ( /*_.VALDATA___V572*/
+ meltfptr[571]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V570*/ meltfptr[569]);
+ /*_.VALSTR___V573*/ meltfptr[572]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V569*/ meltfptr[568])) ==
+ ( /*_.VALDATA___V572*/ meltfptr[571])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V569*/
- meltfptr[568]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]))->obj_vartab[2] =
+ ( /*_.VALDATA___V572*/
+ meltfptr[571]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V564*/ meltfptr[563]);
+ /*_.VALDATA___V567*/ meltfptr[566]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]);
+ meltgc_touch ( /*_.VALDATA___V572*/ meltfptr[571]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V571*/ meltfptr[570])) ==
+ ( /*_.VALDATA___V574*/ meltfptr[573])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V571*/
- meltfptr[570]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] =
+ ( /*_.VALDATA___V574*/
+ meltfptr[573]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V572*/ meltfptr[571]);
+ /*_.VALSTR___V575*/ meltfptr[574]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V571*/ meltfptr[570])) ==
+ ( /*_.VALDATA___V574*/ meltfptr[573])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V571*/
- meltfptr[570]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[2] =
+ ( /*_.VALDATA___V574*/
+ meltfptr[573]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V564*/ meltfptr[563]);
+ /*_.VALDATA___V567*/ meltfptr[566]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V571*/ meltfptr[570]);
+ meltgc_touch ( /*_.VALDATA___V574*/ meltfptr[573]);
- /*putupl#338 */
- melt_assertmsg ("putupl #338 checktup",
+ /*putupl#333 */
+ melt_assertmsg ("putupl #333 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #338 checkoff",
+ melt_assertmsg ("putupl #333 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#339 */
- melt_assertmsg ("putupl #339 checktup",
+ /*putupl#334 */
+ melt_assertmsg ("putupl #334 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #339 checkoff",
+ melt_assertmsg ("putupl #334 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]);
- /*putupl#340 */
- melt_assertmsg ("putupl #340 checktup",
+ /*putupl#335 */
+ melt_assertmsg ("putupl #335 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #340 checkoff",
+ melt_assertmsg ("putupl #335 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]);
- /*putupl#341 */
- melt_assertmsg ("putupl #341 checktup",
+ /*putupl#336 */
+ melt_assertmsg ("putupl #336 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #341 checkoff",
+ melt_assertmsg ("putupl #336 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V570*/ meltfptr[569]);
- /*putupl#342 */
- melt_assertmsg ("putupl #342 checktup",
+ /*putupl#337 */
+ melt_assertmsg ("putupl #337 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #342 checkoff",
+ melt_assertmsg ("putupl #337 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]);
- /*putupl#343 */
- melt_assertmsg ("putupl #343 checktup",
+ /*putupl#338 */
+ melt_assertmsg ("putupl #338 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V573*/ meltfptr[572])) ==
+ ( /*_.VALTUP___V576*/ meltfptr[575])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #343 checkoff",
+ melt_assertmsg ("putupl #338 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V573*/
- meltfptr[572]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V573*/ meltfptr[572]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]);
+ ( /*_.VALTUP___V576*/
+ meltfptr[575]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V576*/ meltfptr[575]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V573*/ meltfptr[572]);
+ meltgc_touch ( /*_.VALTUP___V576*/ meltfptr[575]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[6] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V573*/ meltfptr[572]);
+ /*_.VALTUP___V576*/ meltfptr[575]);
MELT_LOCATION ("warmelt-genobj.melt:305:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V564*/ meltfptr[563]);
+ meltgc_touch ( /*_.VALDATA___V567*/ meltfptr[566]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V574*/ meltfptr[573])) ==
+ ( /*_.VALDATA___V577*/ meltfptr[576])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V574*/
- meltfptr[573]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]))->obj_vartab[1] =
+ ( /*_.VALDATA___V577*/
+ meltfptr[576]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V575*/ meltfptr[574]);
+ /*_.VALSTR___V578*/ meltfptr[577]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V574*/ meltfptr[573]);
+ meltgc_touch ( /*_.VALDATA___V577*/ meltfptr[576]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V576*/ meltfptr[575])) ==
+ ( /*_.VALDATA___V579*/ meltfptr[578])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V576*/
- meltfptr[575]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[1] =
+ ( /*_.VALDATA___V579*/
+ meltfptr[578]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V577*/ meltfptr[576]);
+ /*_.VALSTR___V580*/ meltfptr[579]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V576*/ meltfptr[575]);
+ meltgc_touch ( /*_.VALDATA___V579*/ meltfptr[578]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V578*/ meltfptr[577])) ==
+ ( /*_.VALDATA___V581*/ meltfptr[580])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V578*/
- meltfptr[577]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]))->obj_vartab[1] =
+ ( /*_.VALDATA___V581*/
+ meltfptr[580]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V579*/ meltfptr[578]);
+ /*_.VALSTR___V582*/ meltfptr[581]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V578*/ meltfptr[577]);
+ meltgc_touch ( /*_.VALDATA___V581*/ meltfptr[580]);
#undef meltfram__
@@ -47583,70 +47940,70 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
/*putslot*/
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V580*/ meltfptr[579])) ==
+ ( /*_.VALDATA___V583*/ meltfptr[582])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V580*/
- meltfptr[579]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579]))->obj_vartab[1] =
+ ( /*_.VALDATA___V583*/
+ meltfptr[582]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V583*/ meltfptr[582]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V581*/ meltfptr[580]);
+ /*_.VALSTR___V584*/ meltfptr[583]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V580*/ meltfptr[579]);
+ meltgc_touch ( /*_.VALDATA___V583*/ meltfptr[582]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V582*/ meltfptr[581])) ==
+ ( /*_.VALDATA___V585*/ meltfptr[584])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V582*/
- meltfptr[581]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[1] =
+ ( /*_.VALDATA___V585*/
+ meltfptr[584]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V583*/ meltfptr[582]);
+ /*_.VALSTR___V586*/ meltfptr[585]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V582*/ meltfptr[581])) ==
+ ( /*_.VALDATA___V585*/ meltfptr[584])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V582*/
- meltfptr[581]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[4] =
+ ( /*_.VALDATA___V585*/
+ meltfptr[584]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#344 */
- melt_assertmsg ("putupl #344 checktup",
+ /*putupl#339 */
+ melt_assertmsg ("putupl #339 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V584*/ meltfptr[583])) ==
+ ( /*_.VALTUP___V587*/ meltfptr[586])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #344 checkoff",
+ melt_assertmsg ("putupl #339 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V584*/
- meltfptr[583]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[0] =
+ ( /*_.VALTUP___V587*/
+ meltfptr[586]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V587*/ meltfptr[586]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47654,384 +48011,384 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#345 */
- melt_assertmsg ("putupl #345 checktup",
+ /*putupl#340 */
+ melt_assertmsg ("putupl #340 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V584*/ meltfptr[583])) ==
+ ( /*_.VALTUP___V587*/ meltfptr[586])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #345 checkoff",
+ melt_assertmsg ("putupl #340 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V584*/
- meltfptr[583]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[1] =
+ ( /*_.VALTUP___V587*/
+ meltfptr[586]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V587*/ meltfptr[586]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#346 */
- melt_assertmsg ("putupl #346 checktup",
+ /*putupl#341 */
+ melt_assertmsg ("putupl #341 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V584*/ meltfptr[583])) ==
+ ( /*_.VALTUP___V587*/ meltfptr[586])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #346 checkoff",
+ melt_assertmsg ("putupl #341 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V584*/
- meltfptr[583]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V587*/
+ meltfptr[586]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V587*/ meltfptr[586]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V584*/ meltfptr[583]);
+ meltgc_touch ( /*_.VALTUP___V587*/ meltfptr[586]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V582*/ meltfptr[581])) ==
+ ( /*_.VALDATA___V585*/ meltfptr[584])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V582*/
- meltfptr[581]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[5] =
+ ( /*_.VALDATA___V585*/
+ meltfptr[584]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V584*/ meltfptr[583]);
+ /*_.VALTUP___V587*/ meltfptr[586]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V585*/ meltfptr[584])) ==
+ ( /*_.VALDATA___V588*/ meltfptr[587])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V585*/
- meltfptr[584]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] =
+ ( /*_.VALDATA___V588*/
+ meltfptr[587]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V586*/ meltfptr[585]);
+ /*_.VALSTR___V589*/ meltfptr[588]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V585*/ meltfptr[584])) ==
+ ( /*_.VALDATA___V588*/ meltfptr[587])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V585*/
- meltfptr[584]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[2] =
+ ( /*_.VALDATA___V588*/
+ meltfptr[587]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V582*/ meltfptr[581]);
+ /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V585*/ meltfptr[584]);
+ meltgc_touch ( /*_.VALDATA___V588*/ meltfptr[587]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V587*/ meltfptr[586])) ==
+ ( /*_.VALDATA___V590*/ meltfptr[589])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V587*/
- meltfptr[586]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]))->obj_vartab[1] =
+ ( /*_.VALDATA___V590*/
+ meltfptr[589]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V588*/ meltfptr[587]);
+ /*_.VALSTR___V591*/ meltfptr[590]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V587*/ meltfptr[586])) ==
+ ( /*_.VALDATA___V590*/ meltfptr[589])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V587*/
- meltfptr[586]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]))->obj_vartab[2] =
+ ( /*_.VALDATA___V590*/
+ meltfptr[589]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V582*/ meltfptr[581]);
+ /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V587*/ meltfptr[586]);
+ meltgc_touch ( /*_.VALDATA___V590*/ meltfptr[589]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V589*/ meltfptr[588])) ==
+ ( /*_.VALDATA___V592*/ meltfptr[591])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V589*/
- meltfptr[588]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V589*/ meltfptr[588]))->obj_vartab[1] =
+ ( /*_.VALDATA___V592*/
+ meltfptr[591]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V590*/ meltfptr[589]);
+ /*_.VALSTR___V593*/ meltfptr[592]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V589*/ meltfptr[588])) ==
+ ( /*_.VALDATA___V592*/ meltfptr[591])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V589*/
- meltfptr[588]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V589*/ meltfptr[588]))->obj_vartab[2] =
+ ( /*_.VALDATA___V592*/
+ meltfptr[591]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V582*/ meltfptr[581]);
+ /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V589*/ meltfptr[588]);
+ meltgc_touch ( /*_.VALDATA___V592*/ meltfptr[591]);
- /*putupl#347 */
- melt_assertmsg ("putupl #347 checktup",
+ /*putupl#342 */
+ melt_assertmsg ("putupl #342 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V591*/ meltfptr[590])) ==
+ ( /*_.VALTUP___V594*/ meltfptr[593])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #347 checkoff",
+ melt_assertmsg ("putupl #342 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V591*/
- meltfptr[590]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V591*/ meltfptr[590]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V594*/
+ meltfptr[593]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V594*/ meltfptr[593]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#348 */
- melt_assertmsg ("putupl #348 checktup",
+ /*putupl#343 */
+ melt_assertmsg ("putupl #343 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V591*/ meltfptr[590])) ==
+ ( /*_.VALTUP___V594*/ meltfptr[593])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #348 checkoff",
+ melt_assertmsg ("putupl #343 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V591*/
- meltfptr[590]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V591*/ meltfptr[590]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
+ ( /*_.VALTUP___V594*/
+ meltfptr[593]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V594*/ meltfptr[593]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587]);
- /*putupl#349 */
- melt_assertmsg ("putupl #349 checktup",
+ /*putupl#344 */
+ melt_assertmsg ("putupl #344 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V591*/ meltfptr[590])) ==
+ ( /*_.VALTUP___V594*/ meltfptr[593])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #349 checkoff",
+ melt_assertmsg ("putupl #344 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V591*/
- meltfptr[590]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V591*/ meltfptr[590]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]);
+ ( /*_.VALTUP___V594*/
+ meltfptr[593]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V594*/ meltfptr[593]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]);
- /*putupl#350 */
- melt_assertmsg ("putupl #350 checktup",
+ /*putupl#345 */
+ melt_assertmsg ("putupl #345 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V591*/ meltfptr[590])) ==
+ ( /*_.VALTUP___V594*/ meltfptr[593])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #350 checkoff",
+ melt_assertmsg ("putupl #345 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V591*/
- meltfptr[590]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V591*/ meltfptr[590]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V589*/ meltfptr[588]);
+ ( /*_.VALTUP___V594*/
+ meltfptr[593]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V594*/ meltfptr[593]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V591*/ meltfptr[590]);
+ meltgc_touch ( /*_.VALTUP___V594*/ meltfptr[593]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V582*/ meltfptr[581])) ==
+ ( /*_.VALDATA___V585*/ meltfptr[584])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V582*/
- meltfptr[581]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[6] =
+ ( /*_.VALDATA___V585*/
+ meltfptr[584]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V591*/ meltfptr[590]);
+ /*_.VALTUP___V594*/ meltfptr[593]);
MELT_LOCATION ("warmelt-genobj.melt:313:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V582*/ meltfptr[581]);
+ meltgc_touch ( /*_.VALDATA___V585*/ meltfptr[584]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V592*/ meltfptr[591])) ==
+ ( /*_.VALDATA___V595*/ meltfptr[594])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V592*/
- meltfptr[591]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]))->obj_vartab[1] =
+ ( /*_.VALDATA___V595*/
+ meltfptr[594]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V593*/ meltfptr[592]);
+ /*_.VALSTR___V596*/ meltfptr[595]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V592*/ meltfptr[591]);
+ meltgc_touch ( /*_.VALDATA___V595*/ meltfptr[594]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V594*/ meltfptr[593])) ==
+ ( /*_.VALDATA___V597*/ meltfptr[596])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V594*/
- meltfptr[593]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593]))->obj_vartab[1] =
+ ( /*_.VALDATA___V597*/
+ meltfptr[596]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V595*/ meltfptr[594]);
+ /*_.VALSTR___V598*/ meltfptr[597]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V594*/ meltfptr[593]);
+ meltgc_touch ( /*_.VALDATA___V597*/ meltfptr[596]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V596*/ meltfptr[595])) ==
+ ( /*_.VALDATA___V599*/ meltfptr[598])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V596*/
- meltfptr[595]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]))->obj_vartab[1] =
+ ( /*_.VALDATA___V599*/
+ meltfptr[598]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V597*/ meltfptr[596]);
+ /*_.VALSTR___V600*/ meltfptr[599]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V596*/ meltfptr[595]);
+ meltgc_touch ( /*_.VALDATA___V599*/ meltfptr[598]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V598*/ meltfptr[597])) ==
+ ( /*_.VALDATA___V601*/ meltfptr[600])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V598*/
- meltfptr[597]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V598*/ meltfptr[597]))->obj_vartab[1] =
+ ( /*_.VALDATA___V601*/
+ meltfptr[600]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V599*/ meltfptr[598]);
+ /*_.VALSTR___V602*/ meltfptr[601]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V598*/ meltfptr[597]);
+ meltgc_touch ( /*_.VALDATA___V601*/ meltfptr[600]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V600*/ meltfptr[599])) ==
+ ( /*_.VALDATA___V603*/ meltfptr[602])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V600*/
- meltfptr[599]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[1] =
+ ( /*_.VALDATA___V603*/
+ meltfptr[602]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V601*/ meltfptr[600]);
+ /*_.VALSTR___V604*/ meltfptr[603]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V600*/ meltfptr[599])) ==
+ ( /*_.VALDATA___V603*/ meltfptr[602])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V600*/
- meltfptr[599]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[4] =
+ ( /*_.VALDATA___V603*/
+ meltfptr[602]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#351 */
- melt_assertmsg ("putupl #351 checktup",
+ /*putupl#346 */
+ melt_assertmsg ("putupl #346 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V602*/ meltfptr[601])) ==
+ ( /*_.VALTUP___V605*/ meltfptr[604])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #351 checkoff",
+ melt_assertmsg ("putupl #346 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V602*/
- meltfptr[601]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V602*/ meltfptr[601]))->tabval[0] =
+ ( /*_.VALTUP___V605*/
+ meltfptr[604]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V605*/ meltfptr[604]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48039,384 +48396,384 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#352 */
- melt_assertmsg ("putupl #352 checktup",
+ /*putupl#347 */
+ melt_assertmsg ("putupl #347 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V602*/ meltfptr[601])) ==
+ ( /*_.VALTUP___V605*/ meltfptr[604])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #352 checkoff",
+ melt_assertmsg ("putupl #347 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V602*/
- meltfptr[601]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V602*/ meltfptr[601]))->tabval[1] =
+ ( /*_.VALTUP___V605*/
+ meltfptr[604]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V605*/ meltfptr[604]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#353 */
- melt_assertmsg ("putupl #353 checktup",
+ /*putupl#348 */
+ melt_assertmsg ("putupl #348 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V602*/ meltfptr[601])) ==
+ ( /*_.VALTUP___V605*/ meltfptr[604])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #353 checkoff",
+ melt_assertmsg ("putupl #348 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V602*/
- meltfptr[601]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V602*/ meltfptr[601]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V605*/
+ meltfptr[604]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V605*/ meltfptr[604]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V602*/ meltfptr[601]);
+ meltgc_touch ( /*_.VALTUP___V605*/ meltfptr[604]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V600*/ meltfptr[599])) ==
+ ( /*_.VALDATA___V603*/ meltfptr[602])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V600*/
- meltfptr[599]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[5] =
+ ( /*_.VALDATA___V603*/
+ meltfptr[602]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V602*/ meltfptr[601]);
+ /*_.VALTUP___V605*/ meltfptr[604]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V603*/ meltfptr[602])) ==
+ ( /*_.VALDATA___V606*/ meltfptr[605])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V603*/
- meltfptr[602]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[1] =
+ ( /*_.VALDATA___V606*/
+ meltfptr[605]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V604*/ meltfptr[603]);
+ /*_.VALSTR___V607*/ meltfptr[606]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V603*/ meltfptr[602])) ==
+ ( /*_.VALDATA___V606*/ meltfptr[605])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V603*/
- meltfptr[602]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[2] =
+ ( /*_.VALDATA___V606*/
+ meltfptr[605]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V600*/ meltfptr[599]);
+ /*_.VALDATA___V603*/ meltfptr[602]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V603*/ meltfptr[602]);
+ meltgc_touch ( /*_.VALDATA___V606*/ meltfptr[605]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V605*/ meltfptr[604])) ==
+ ( /*_.VALDATA___V608*/ meltfptr[607])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V605*/
- meltfptr[604]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604]))->obj_vartab[1] =
+ ( /*_.VALDATA___V608*/
+ meltfptr[607]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V606*/ meltfptr[605]);
+ /*_.VALSTR___V609*/ meltfptr[608]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V605*/ meltfptr[604])) ==
+ ( /*_.VALDATA___V608*/ meltfptr[607])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V605*/
- meltfptr[604]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604]))->obj_vartab[2] =
+ ( /*_.VALDATA___V608*/
+ meltfptr[607]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V600*/ meltfptr[599]);
+ /*_.VALDATA___V603*/ meltfptr[602]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V605*/ meltfptr[604]);
+ meltgc_touch ( /*_.VALDATA___V608*/ meltfptr[607]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V607*/ meltfptr[606])) ==
+ ( /*_.VALDATA___V610*/ meltfptr[609])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V607*/
- meltfptr[606]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]))->obj_vartab[1] =
+ ( /*_.VALDATA___V610*/
+ meltfptr[609]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V608*/ meltfptr[607]);
+ /*_.VALSTR___V611*/ meltfptr[610]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V607*/ meltfptr[606])) ==
+ ( /*_.VALDATA___V610*/ meltfptr[609])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V607*/
- meltfptr[606]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]))->obj_vartab[2] =
+ ( /*_.VALDATA___V610*/
+ meltfptr[609]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V600*/ meltfptr[599]);
+ /*_.VALDATA___V603*/ meltfptr[602]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V607*/ meltfptr[606]);
+ meltgc_touch ( /*_.VALDATA___V610*/ meltfptr[609]);
- /*putupl#354 */
- melt_assertmsg ("putupl #354 checktup",
+ /*putupl#349 */
+ melt_assertmsg ("putupl #349 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V609*/ meltfptr[608])) ==
+ ( /*_.VALTUP___V612*/ meltfptr[611])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #354 checkoff",
+ melt_assertmsg ("putupl #349 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V609*/
- meltfptr[608]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V609*/ meltfptr[608]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V612*/
+ meltfptr[611]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#355 */
- melt_assertmsg ("putupl #355 checktup",
+ /*putupl#350 */
+ melt_assertmsg ("putupl #350 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V609*/ meltfptr[608])) ==
+ ( /*_.VALTUP___V612*/ meltfptr[611])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #355 checkoff",
+ melt_assertmsg ("putupl #350 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V609*/
- meltfptr[608]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V609*/ meltfptr[608]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]);
+ ( /*_.VALTUP___V612*/
+ meltfptr[611]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]);
- /*putupl#356 */
- melt_assertmsg ("putupl #356 checktup",
+ /*putupl#351 */
+ melt_assertmsg ("putupl #351 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V609*/ meltfptr[608])) ==
+ ( /*_.VALTUP___V612*/ meltfptr[611])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #356 checkoff",
+ melt_assertmsg ("putupl #351 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V609*/
- meltfptr[608]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V609*/ meltfptr[608]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604]);
+ ( /*_.VALTUP___V612*/
+ meltfptr[611]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]);
- /*putupl#357 */
- melt_assertmsg ("putupl #357 checktup",
+ /*putupl#352 */
+ melt_assertmsg ("putupl #352 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V609*/ meltfptr[608])) ==
+ ( /*_.VALTUP___V612*/ meltfptr[611])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #357 checkoff",
+ melt_assertmsg ("putupl #352 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V609*/
- meltfptr[608]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V609*/ meltfptr[608]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]);
+ ( /*_.VALTUP___V612*/
+ meltfptr[611]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V609*/ meltfptr[608]);
+ meltgc_touch ( /*_.VALTUP___V612*/ meltfptr[611]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V600*/ meltfptr[599])) ==
+ ( /*_.VALDATA___V603*/ meltfptr[602])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V600*/
- meltfptr[599]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[6] =
+ ( /*_.VALDATA___V603*/
+ meltfptr[602]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V609*/ meltfptr[608]);
+ /*_.VALTUP___V612*/ meltfptr[611]);
MELT_LOCATION ("warmelt-genobj.melt:321:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V600*/ meltfptr[599]);
+ meltgc_touch ( /*_.VALDATA___V603*/ meltfptr[602]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V610*/ meltfptr[609])) ==
+ ( /*_.VALDATA___V613*/ meltfptr[612])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V610*/
- meltfptr[609]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[1] =
+ ( /*_.VALDATA___V613*/
+ meltfptr[612]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V611*/ meltfptr[610]);
+ /*_.VALSTR___V614*/ meltfptr[613]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V610*/ meltfptr[609]);
+ meltgc_touch ( /*_.VALDATA___V613*/ meltfptr[612]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V612*/ meltfptr[611])) ==
+ ( /*_.VALDATA___V615*/ meltfptr[614])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V612*/
- meltfptr[611]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]))->obj_vartab[1] =
+ ( /*_.VALDATA___V615*/
+ meltfptr[614]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V613*/ meltfptr[612]);
+ /*_.VALSTR___V616*/ meltfptr[615]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V612*/ meltfptr[611]);
+ meltgc_touch ( /*_.VALDATA___V615*/ meltfptr[614]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V614*/ meltfptr[613])) ==
+ ( /*_.VALDATA___V617*/ meltfptr[616])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V614*/
- meltfptr[613]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]))->obj_vartab[1] =
+ ( /*_.VALDATA___V617*/
+ meltfptr[616]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V615*/ meltfptr[614]);
+ /*_.VALSTR___V618*/ meltfptr[617]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V614*/ meltfptr[613]);
+ meltgc_touch ( /*_.VALDATA___V617*/ meltfptr[616]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V616*/ meltfptr[615])) ==
+ ( /*_.VALDATA___V619*/ meltfptr[618])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V616*/
- meltfptr[615]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] =
+ ( /*_.VALDATA___V619*/
+ meltfptr[618]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V617*/ meltfptr[616]);
+ /*_.VALSTR___V620*/ meltfptr[619]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V616*/ meltfptr[615]);
+ meltgc_touch ( /*_.VALDATA___V619*/ meltfptr[618]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[1] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V619*/ meltfptr[618]);
+ /*_.VALSTR___V622*/ meltfptr[621]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[4] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#358 */
- melt_assertmsg ("putupl #358 checktup",
+ /*putupl#353 */
+ melt_assertmsg ("putupl #353 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V620*/ meltfptr[619])) ==
+ ( /*_.VALTUP___V623*/ meltfptr[622])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #358 checkoff",
+ melt_assertmsg ("putupl #353 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V620*/
- meltfptr[619]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V620*/ meltfptr[619]))->tabval[0] =
+ ( /*_.VALTUP___V623*/
+ meltfptr[622]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48424,236 +48781,236 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#359 */
- melt_assertmsg ("putupl #359 checktup",
+ /*putupl#354 */
+ melt_assertmsg ("putupl #354 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V620*/ meltfptr[619])) ==
+ ( /*_.VALTUP___V623*/ meltfptr[622])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #359 checkoff",
+ melt_assertmsg ("putupl #354 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V620*/
- meltfptr[619]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V620*/ meltfptr[619]))->tabval[1] =
+ ( /*_.VALTUP___V623*/
+ meltfptr[622]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#360 */
- melt_assertmsg ("putupl #360 checktup",
+ /*putupl#355 */
+ melt_assertmsg ("putupl #355 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V620*/ meltfptr[619])) ==
+ ( /*_.VALTUP___V623*/ meltfptr[622])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #360 checkoff",
+ melt_assertmsg ("putupl #355 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V620*/
- meltfptr[619]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V620*/ meltfptr[619]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V623*/
+ meltfptr[622]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V620*/ meltfptr[619]);
+ meltgc_touch ( /*_.VALTUP___V623*/ meltfptr[622]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[5] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V620*/ meltfptr[619]);
+ /*_.VALTUP___V623*/ meltfptr[622]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V621*/ meltfptr[620])) ==
+ ( /*_.VALDATA___V624*/ meltfptr[623])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V621*/
- meltfptr[620]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[1] =
+ ( /*_.VALDATA___V624*/
+ meltfptr[623]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V622*/ meltfptr[621]);
+ /*_.VALSTR___V625*/ meltfptr[624]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V621*/ meltfptr[620])) ==
+ ( /*_.VALDATA___V624*/ meltfptr[623])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V621*/
- meltfptr[620]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[2] =
+ ( /*_.VALDATA___V624*/
+ meltfptr[623]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V621*/ meltfptr[620]);
+ meltgc_touch ( /*_.VALDATA___V624*/ meltfptr[623]);
- /*putupl#361 */
- melt_assertmsg ("putupl #361 checktup",
+ /*putupl#356 */
+ melt_assertmsg ("putupl #356 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V623*/ meltfptr[622])) ==
+ ( /*_.VALTUP___V626*/ meltfptr[625])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #361 checkoff",
+ melt_assertmsg ("putupl #356 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V623*/
- meltfptr[622]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V626*/
+ meltfptr[625]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V626*/ meltfptr[625]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#362 */
- melt_assertmsg ("putupl #362 checktup",
+ /*putupl#357 */
+ melt_assertmsg ("putupl #357 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V623*/ meltfptr[622])) ==
+ ( /*_.VALTUP___V626*/ meltfptr[625])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #362 checkoff",
+ melt_assertmsg ("putupl #357 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V623*/
- meltfptr[622]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
+ ( /*_.VALTUP___V626*/
+ meltfptr[625]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V626*/ meltfptr[625]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V623*/ meltfptr[622]);
+ meltgc_touch ( /*_.VALTUP___V626*/ meltfptr[625]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[6] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V623*/ meltfptr[622]);
+ /*_.VALTUP___V626*/ meltfptr[625]);
MELT_LOCATION ("warmelt-genobj.melt:330:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V618*/ meltfptr[617]);
+ meltgc_touch ( /*_.VALDATA___V621*/ meltfptr[620]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V624*/ meltfptr[623])) ==
+ ( /*_.VALDATA___V627*/ meltfptr[626])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V624*/
- meltfptr[623]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] =
+ ( /*_.VALDATA___V627*/
+ meltfptr[626]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V625*/ meltfptr[624]);
+ /*_.VALSTR___V628*/ meltfptr[627]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V624*/ meltfptr[623]);
+ meltgc_touch ( /*_.VALDATA___V627*/ meltfptr[626]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V626*/ meltfptr[625])) ==
+ ( /*_.VALDATA___V629*/ meltfptr[628])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V626*/
- meltfptr[625]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[1] =
+ ( /*_.VALDATA___V629*/
+ meltfptr[628]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V627*/ meltfptr[626]);
+ /*_.VALSTR___V630*/ meltfptr[629]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V626*/ meltfptr[625]);
+ meltgc_touch ( /*_.VALDATA___V629*/ meltfptr[628]);
MELT_LOCATION ("warmelt-genobj.melt:336:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V628*/ meltfptr[627])) ==
+ ( /*_.VALDATA___V631*/ meltfptr[630])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V628*/
- meltfptr[627]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[1] =
+ ( /*_.VALDATA___V631*/
+ meltfptr[630]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V629*/ meltfptr[628]);
+ /*_.VALSTR___V632*/ meltfptr[631]);
MELT_LOCATION ("warmelt-genobj.melt:336:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V628*/ meltfptr[627])) ==
+ ( /*_.VALDATA___V631*/ meltfptr[630])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V628*/
- meltfptr[627]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[4] =
+ ( /*_.VALDATA___V631*/
+ meltfptr[630]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- /*putupl#363 */
- melt_assertmsg ("putupl #363 checktup",
+ /*putupl#358 */
+ melt_assertmsg ("putupl #358 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V630*/ meltfptr[629])) ==
+ ( /*_.VALTUP___V633*/ meltfptr[632])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #363 checkoff",
+ melt_assertmsg ("putupl #358 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V630*/
- meltfptr[629]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V630*/ meltfptr[629]))->tabval[0] =
+ ( /*_.VALTUP___V633*/
+ meltfptr[632]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V633*/ meltfptr[632]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48661,190 +49018,190 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#364 */
- melt_assertmsg ("putupl #364 checktup",
+ /*putupl#359 */
+ melt_assertmsg ("putupl #359 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V630*/ meltfptr[629])) ==
+ ( /*_.VALTUP___V633*/ meltfptr[632])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #364 checkoff",
+ melt_assertmsg ("putupl #359 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V630*/
- meltfptr[629]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V630*/ meltfptr[629]))->tabval[1] =
+ ( /*_.VALTUP___V633*/
+ meltfptr[632]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V633*/ meltfptr[632]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#365 */
- melt_assertmsg ("putupl #365 checktup",
+ /*putupl#360 */
+ melt_assertmsg ("putupl #360 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V630*/ meltfptr[629])) ==
+ ( /*_.VALTUP___V633*/ meltfptr[632])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #365 checkoff",
+ melt_assertmsg ("putupl #360 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V630*/
- meltfptr[629]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V630*/ meltfptr[629]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V633*/
+ meltfptr[632]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V633*/ meltfptr[632]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#366 */
- melt_assertmsg ("putupl #366 checktup",
+ /*putupl#361 */
+ melt_assertmsg ("putupl #361 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V630*/ meltfptr[629])) ==
+ ( /*_.VALTUP___V633*/ meltfptr[632])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #366 checkoff",
+ melt_assertmsg ("putupl #361 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V630*/
- meltfptr[629]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V630*/ meltfptr[629]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ ( /*_.VALTUP___V633*/
+ meltfptr[632]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V633*/ meltfptr[632]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V630*/ meltfptr[629]);
+ meltgc_touch ( /*_.VALTUP___V633*/ meltfptr[632]);
MELT_LOCATION ("warmelt-genobj.melt:336:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V628*/ meltfptr[627])) ==
+ ( /*_.VALDATA___V631*/ meltfptr[630])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V628*/
- meltfptr[627]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[5] =
+ ( /*_.VALDATA___V631*/
+ meltfptr[630]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V630*/ meltfptr[629]);
+ /*_.VALTUP___V633*/ meltfptr[632]);
- /*putupl#367 */
- melt_assertmsg ("putupl #367 checktup",
+ /*putupl#362 */
+ melt_assertmsg ("putupl #362 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V631*/ meltfptr[630])) ==
+ ( /*_.VALTUP___V634*/ meltfptr[633])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #367 checkoff",
+ melt_assertmsg ("putupl #362 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V631*/
- meltfptr[630]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V631*/ meltfptr[630]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V634*/
+ meltfptr[633]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V634*/ meltfptr[633]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#368 */
- melt_assertmsg ("putupl #368 checktup",
+ /*putupl#363 */
+ melt_assertmsg ("putupl #363 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V631*/ meltfptr[630])) ==
+ ( /*_.VALTUP___V634*/ meltfptr[633])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #368 checkoff",
+ melt_assertmsg ("putupl #363 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V631*/
- meltfptr[630]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V631*/ meltfptr[630]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
+ ( /*_.VALTUP___V634*/
+ meltfptr[633]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V634*/ meltfptr[633]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V631*/ meltfptr[630]);
+ meltgc_touch ( /*_.VALTUP___V634*/ meltfptr[633]);
MELT_LOCATION ("warmelt-genobj.melt:336:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V628*/ meltfptr[627])) ==
+ ( /*_.VALDATA___V631*/ meltfptr[630])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V628*/
- meltfptr[627]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[6] =
+ ( /*_.VALDATA___V631*/
+ meltfptr[630]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V631*/ meltfptr[630]);
+ /*_.VALTUP___V634*/ meltfptr[633]);
MELT_LOCATION ("warmelt-genobj.melt:336:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V628*/ meltfptr[627]);
+ meltgc_touch ( /*_.VALDATA___V631*/ meltfptr[630]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V632*/ meltfptr[631])) ==
+ ( /*_.VALDATA___V635*/ meltfptr[634])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V632*/
- meltfptr[631]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]))->obj_vartab[1] =
+ ( /*_.VALDATA___V635*/
+ meltfptr[634]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V633*/ meltfptr[632]);
+ /*_.VALSTR___V636*/ meltfptr[635]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V632*/ meltfptr[631]);
+ meltgc_touch ( /*_.VALDATA___V635*/ meltfptr[634]);
MELT_LOCATION ("warmelt-genobj.melt:341:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V634*/ meltfptr[633])) ==
+ ( /*_.VALDATA___V637*/ meltfptr[636])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V634*/
- meltfptr[633]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[1] =
+ ( /*_.VALDATA___V637*/
+ meltfptr[636]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V635*/ meltfptr[634]);
+ /*_.VALSTR___V638*/ meltfptr[637]);
MELT_LOCATION ("warmelt-genobj.melt:341:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V634*/ meltfptr[633])) ==
+ ( /*_.VALDATA___V637*/ meltfptr[636])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V634*/
- meltfptr[633]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[4] =
+ ( /*_.VALDATA___V637*/
+ meltfptr[636]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- /*putupl#369 */
- melt_assertmsg ("putupl #369 checktup",
+ /*putupl#364 */
+ melt_assertmsg ("putupl #364 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V636*/ meltfptr[635])) ==
+ ( /*_.VALTUP___V639*/ meltfptr[638])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #369 checkoff",
+ melt_assertmsg ("putupl #364 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V636*/
- meltfptr[635]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V636*/ meltfptr[635]))->tabval[0] =
+ ( /*_.VALTUP___V639*/
+ meltfptr[638]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48852,190 +49209,190 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#370 */
- melt_assertmsg ("putupl #370 checktup",
+ /*putupl#365 */
+ melt_assertmsg ("putupl #365 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V636*/ meltfptr[635])) ==
+ ( /*_.VALTUP___V639*/ meltfptr[638])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #370 checkoff",
+ melt_assertmsg ("putupl #365 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V636*/
- meltfptr[635]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V636*/ meltfptr[635]))->tabval[1] =
+ ( /*_.VALTUP___V639*/
+ meltfptr[638]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#371 */
- melt_assertmsg ("putupl #371 checktup",
+ /*putupl#366 */
+ melt_assertmsg ("putupl #366 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V636*/ meltfptr[635])) ==
+ ( /*_.VALTUP___V639*/ meltfptr[638])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #371 checkoff",
+ melt_assertmsg ("putupl #366 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V636*/
- meltfptr[635]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V636*/ meltfptr[635]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V639*/
+ meltfptr[638]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#372 */
- melt_assertmsg ("putupl #372 checktup",
+ /*putupl#367 */
+ melt_assertmsg ("putupl #367 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V636*/ meltfptr[635])) ==
+ ( /*_.VALTUP___V639*/ meltfptr[638])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #372 checkoff",
+ melt_assertmsg ("putupl #367 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V636*/
- meltfptr[635]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V636*/ meltfptr[635]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ ( /*_.VALTUP___V639*/
+ meltfptr[638]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V636*/ meltfptr[635]);
+ meltgc_touch ( /*_.VALTUP___V639*/ meltfptr[638]);
MELT_LOCATION ("warmelt-genobj.melt:341:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V634*/ meltfptr[633])) ==
+ ( /*_.VALDATA___V637*/ meltfptr[636])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V634*/
- meltfptr[633]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[5] =
+ ( /*_.VALDATA___V637*/
+ meltfptr[636]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V636*/ meltfptr[635]);
+ /*_.VALTUP___V639*/ meltfptr[638]);
- /*putupl#373 */
- melt_assertmsg ("putupl #373 checktup",
+ /*putupl#368 */
+ melt_assertmsg ("putupl #368 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V637*/ meltfptr[636])) ==
+ ( /*_.VALTUP___V640*/ meltfptr[639])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #373 checkoff",
+ melt_assertmsg ("putupl #368 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V637*/
- meltfptr[636]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V637*/ meltfptr[636]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V640*/
+ meltfptr[639]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V640*/ meltfptr[639]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#374 */
- melt_assertmsg ("putupl #374 checktup",
+ /*putupl#369 */
+ melt_assertmsg ("putupl #369 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V637*/ meltfptr[636])) ==
+ ( /*_.VALTUP___V640*/ meltfptr[639])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #374 checkoff",
+ melt_assertmsg ("putupl #369 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V637*/
- meltfptr[636]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V637*/ meltfptr[636]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
+ ( /*_.VALTUP___V640*/
+ meltfptr[639]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V640*/ meltfptr[639]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V637*/ meltfptr[636]);
+ meltgc_touch ( /*_.VALTUP___V640*/ meltfptr[639]);
MELT_LOCATION ("warmelt-genobj.melt:341:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V634*/ meltfptr[633])) ==
+ ( /*_.VALDATA___V637*/ meltfptr[636])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V634*/
- meltfptr[633]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[6] =
+ ( /*_.VALDATA___V637*/
+ meltfptr[636]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V637*/ meltfptr[636]);
+ /*_.VALTUP___V640*/ meltfptr[639]);
MELT_LOCATION ("warmelt-genobj.melt:341:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V634*/ meltfptr[633]);
+ meltgc_touch ( /*_.VALDATA___V637*/ meltfptr[636]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V638*/ meltfptr[637])) ==
+ ( /*_.VALDATA___V641*/ meltfptr[640])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V638*/
- meltfptr[637]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]))->obj_vartab[1] =
+ ( /*_.VALDATA___V641*/
+ meltfptr[640]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V641*/ meltfptr[640]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V639*/ meltfptr[638]);
+ /*_.VALSTR___V642*/ meltfptr[641]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V638*/ meltfptr[637]);
+ meltgc_touch ( /*_.VALDATA___V641*/ meltfptr[640]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V640*/ meltfptr[639])) ==
+ ( /*_.VALDATA___V643*/ meltfptr[642])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V640*/
- meltfptr[639]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[1] =
+ ( /*_.VALDATA___V643*/
+ meltfptr[642]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V641*/ meltfptr[640]);
+ /*_.VALSTR___V644*/ meltfptr[643]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V640*/ meltfptr[639])) ==
+ ( /*_.VALDATA___V643*/ meltfptr[642])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V640*/
- meltfptr[639]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[4] =
+ ( /*_.VALDATA___V643*/
+ meltfptr[642]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#375 */
- melt_assertmsg ("putupl #375 checktup",
+ /*putupl#370 */
+ melt_assertmsg ("putupl #370 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V642*/ meltfptr[641])) ==
+ ( /*_.VALTUP___V645*/ meltfptr[644])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #375 checkoff",
+ melt_assertmsg ("putupl #370 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V642*/
- meltfptr[641]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V642*/ meltfptr[641]))->tabval[0] =
+ ( /*_.VALTUP___V645*/
+ meltfptr[644]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49043,149 +49400,149 @@ warmelt_genobj_initialmeltchunk_7 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#376 */
- melt_assertmsg ("putupl #376 checktup",
+ /*putupl#371 */
+ melt_assertmsg ("putupl #371 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V642*/ meltfptr[641])) ==
+ ( /*_.VALTUP___V645*/ meltfptr[644])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #376 checkoff",
+ melt_assertmsg ("putupl #371 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V642*/
- meltfptr[641]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V642*/ meltfptr[641]))->tabval[1] =
+ ( /*_.VALTUP___V645*/
+ meltfptr[644]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#377 */
- melt_assertmsg ("putupl #377 checktup",
+ /*putupl#372 */
+ melt_assertmsg ("putupl #372 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V642*/ meltfptr[641])) ==
+ ( /*_.VALTUP___V645*/ meltfptr[644])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #377 checkoff",
+ melt_assertmsg ("putupl #372 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V642*/
- meltfptr[641]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V642*/ meltfptr[641]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V645*/
+ meltfptr[644]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V642*/ meltfptr[641]);
+ meltgc_touch ( /*_.VALTUP___V645*/ meltfptr[644]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V640*/ meltfptr[639])) ==
+ ( /*_.VALDATA___V643*/ meltfptr[642])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V640*/
- meltfptr[639]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[5] =
+ ( /*_.VALDATA___V643*/
+ meltfptr[642]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V642*/ meltfptr[641]);
+ /*_.VALTUP___V645*/ meltfptr[644]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V643*/ meltfptr[642])) ==
+ ( /*_.VALDATA___V646*/ meltfptr[645])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V643*/
- meltfptr[642]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[1] =
+ ( /*_.VALDATA___V646*/
+ meltfptr[645]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V644*/ meltfptr[643]);
+ /*_.VALSTR___V647*/ meltfptr[646]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V643*/ meltfptr[642])) ==
+ ( /*_.VALDATA___V646*/ meltfptr[645])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V643*/
- meltfptr[642]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[2] =
+ ( /*_.VALDATA___V646*/
+ meltfptr[645]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V640*/ meltfptr[639]);
+ /*_.VALDATA___V643*/ meltfptr[642]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V643*/ meltfptr[642]);
+ meltgc_touch ( /*_.VALDATA___V646*/ meltfptr[645]);
- /*putupl#378 */
- melt_assertmsg ("putupl #378 checktup",
+ /*putupl#373 */
+ melt_assertmsg ("putupl #373 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V645*/ meltfptr[644])) ==
+ ( /*_.VALTUP___V648*/ meltfptr[647])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #378 checkoff",
+ melt_assertmsg ("putupl #373 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V645*/
- meltfptr[644]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V648*/
+ meltfptr[647]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V648*/ meltfptr[647]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#379 */
- melt_assertmsg ("putupl #379 checktup",
+ /*putupl#374 */
+ melt_assertmsg ("putupl #374 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V645*/ meltfptr[644])) ==
+ ( /*_.VALTUP___V648*/ meltfptr[647])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #379 checkoff",
+ melt_assertmsg ("putupl #374 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V645*/
- meltfptr[644]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]);
+ ( /*_.VALTUP___V648*/
+ meltfptr[647]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V648*/ meltfptr[647]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V645*/ meltfptr[644]);
+ meltgc_touch ( /*_.VALTUP___V648*/ meltfptr[647]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V640*/ meltfptr[639])) ==
+ ( /*_.VALDATA___V643*/ meltfptr[642])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V640*/
- meltfptr[639]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[6] =
+ ( /*_.VALDATA___V643*/
+ meltfptr[642]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V645*/ meltfptr[644]);
+ /*_.VALTUP___V648*/ meltfptr[647]);
MELT_LOCATION ("warmelt-genobj.melt:347:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V640*/ meltfptr[639]);
+ meltgc_touch ( /*_.VALDATA___V643*/ meltfptr[642]);
#undef meltfram__
@@ -49201,89 +49558,89 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
/*putslot*/
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V646*/ meltfptr[645])) ==
+ ( /*_.VALDATA___V649*/ meltfptr[648])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V646*/
- meltfptr[645]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] =
+ ( /*_.VALDATA___V649*/
+ meltfptr[648]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V647*/ meltfptr[646]);
+ /*_.VALSTR___V650*/ meltfptr[649]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V646*/ meltfptr[645]);
+ meltgc_touch ( /*_.VALDATA___V649*/ meltfptr[648]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V648*/ meltfptr[647])) ==
+ ( /*_.VALDATA___V651*/ meltfptr[650])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V648*/
- meltfptr[647]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[1] =
+ ( /*_.VALDATA___V651*/
+ meltfptr[650]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V649*/ meltfptr[648]);
+ /*_.VALSTR___V652*/ meltfptr[651]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V648*/ meltfptr[647]);
+ meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]);
MELT_LOCATION ("warmelt-genobj.melt:353:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V650*/ meltfptr[649])) ==
+ ( /*_.VALDATA___V653*/ meltfptr[652])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V650*/
- meltfptr[649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[1] =
+ ( /*_.VALDATA___V653*/
+ meltfptr[652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V651*/ meltfptr[650]);
+ /*_.VALSTR___V654*/ meltfptr[653]);
MELT_LOCATION ("warmelt-genobj.melt:353:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V650*/ meltfptr[649])) ==
+ ( /*_.VALDATA___V653*/ meltfptr[652])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V650*/
- meltfptr[649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[4] =
+ ( /*_.VALDATA___V653*/
+ meltfptr[652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V640*/ meltfptr[639]);
+ /*_.VALDATA___V643*/ meltfptr[642]);
- /*putupl#380 */
- melt_assertmsg ("putupl #380 checktup",
+ /*putupl#375 */
+ melt_assertmsg ("putupl #375 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V652*/ meltfptr[651])) ==
+ ( /*_.VALTUP___V655*/ meltfptr[654])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #380 checkoff",
+ melt_assertmsg ("putupl #375 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V652*/
- meltfptr[651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V652*/ meltfptr[651]))->tabval[0] =
+ ( /*_.VALTUP___V655*/
+ meltfptr[654]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V655*/ meltfptr[654]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49291,190 +49648,190 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#381 */
- melt_assertmsg ("putupl #381 checktup",
+ /*putupl#376 */
+ melt_assertmsg ("putupl #376 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V652*/ meltfptr[651])) ==
+ ( /*_.VALTUP___V655*/ meltfptr[654])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #381 checkoff",
+ melt_assertmsg ("putupl #376 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V652*/
- meltfptr[651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V652*/ meltfptr[651]))->tabval[1] =
+ ( /*_.VALTUP___V655*/
+ meltfptr[654]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V655*/ meltfptr[654]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#382 */
- melt_assertmsg ("putupl #382 checktup",
+ /*putupl#377 */
+ melt_assertmsg ("putupl #377 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V652*/ meltfptr[651])) ==
+ ( /*_.VALTUP___V655*/ meltfptr[654])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #382 checkoff",
+ melt_assertmsg ("putupl #377 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V652*/
- meltfptr[651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V652*/ meltfptr[651]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V655*/
+ meltfptr[654]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V655*/ meltfptr[654]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#383 */
- melt_assertmsg ("putupl #383 checktup",
+ /*putupl#378 */
+ melt_assertmsg ("putupl #378 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V652*/ meltfptr[651])) ==
+ ( /*_.VALTUP___V655*/ meltfptr[654])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #383 checkoff",
+ melt_assertmsg ("putupl #378 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V652*/
- meltfptr[651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V652*/ meltfptr[651]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]);
+ ( /*_.VALTUP___V655*/
+ meltfptr[654]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V655*/ meltfptr[654]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V652*/ meltfptr[651]);
+ meltgc_touch ( /*_.VALTUP___V655*/ meltfptr[654]);
MELT_LOCATION ("warmelt-genobj.melt:353:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V650*/ meltfptr[649])) ==
+ ( /*_.VALDATA___V653*/ meltfptr[652])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V650*/
- meltfptr[649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[5] =
+ ( /*_.VALDATA___V653*/
+ meltfptr[652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V652*/ meltfptr[651]);
+ /*_.VALTUP___V655*/ meltfptr[654]);
- /*putupl#384 */
- melt_assertmsg ("putupl #384 checktup",
+ /*putupl#379 */
+ melt_assertmsg ("putupl #379 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V653*/ meltfptr[652])) ==
+ ( /*_.VALTUP___V656*/ meltfptr[655])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #384 checkoff",
+ melt_assertmsg ("putupl #379 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V653*/
- meltfptr[652]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V653*/ meltfptr[652]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V656*/
+ meltfptr[655]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V656*/ meltfptr[655]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#385 */
- melt_assertmsg ("putupl #385 checktup",
+ /*putupl#380 */
+ melt_assertmsg ("putupl #380 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V653*/ meltfptr[652])) ==
+ ( /*_.VALTUP___V656*/ meltfptr[655])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #385 checkoff",
+ melt_assertmsg ("putupl #380 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V653*/
- meltfptr[652]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V653*/ meltfptr[652]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]);
+ ( /*_.VALTUP___V656*/
+ meltfptr[655]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V656*/ meltfptr[655]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V653*/ meltfptr[652]);
+ meltgc_touch ( /*_.VALTUP___V656*/ meltfptr[655]);
MELT_LOCATION ("warmelt-genobj.melt:353:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V650*/ meltfptr[649])) ==
+ ( /*_.VALDATA___V653*/ meltfptr[652])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V650*/
- meltfptr[649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[6] =
+ ( /*_.VALDATA___V653*/
+ meltfptr[652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V653*/ meltfptr[652]);
+ /*_.VALTUP___V656*/ meltfptr[655]);
MELT_LOCATION ("warmelt-genobj.melt:353:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V650*/ meltfptr[649]);
+ meltgc_touch ( /*_.VALDATA___V653*/ meltfptr[652]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V654*/ meltfptr[653])) ==
+ ( /*_.VALDATA___V657*/ meltfptr[656])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V654*/
- meltfptr[653]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]))->obj_vartab[1] =
+ ( /*_.VALDATA___V657*/
+ meltfptr[656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V655*/ meltfptr[654]);
+ /*_.VALSTR___V658*/ meltfptr[657]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V654*/ meltfptr[653]);
+ meltgc_touch ( /*_.VALDATA___V657*/ meltfptr[656]);
MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V656*/ meltfptr[655])) ==
+ ( /*_.VALDATA___V659*/ meltfptr[658])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V656*/
- meltfptr[655]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]))->obj_vartab[1] =
+ ( /*_.VALDATA___V659*/
+ meltfptr[658]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V657*/ meltfptr[656]);
+ /*_.VALSTR___V660*/ meltfptr[659]);
MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V656*/ meltfptr[655])) ==
+ ( /*_.VALDATA___V659*/ meltfptr[658])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V656*/
- meltfptr[655]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]))->obj_vartab[4] =
+ ( /*_.VALDATA___V659*/
+ meltfptr[658]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V640*/ meltfptr[639]);
+ /*_.VALDATA___V643*/ meltfptr[642]);
- /*putupl#386 */
- melt_assertmsg ("putupl #386 checktup",
+ /*putupl#381 */
+ melt_assertmsg ("putupl #381 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V658*/ meltfptr[657])) ==
+ ( /*_.VALTUP___V661*/ meltfptr[660])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #386 checkoff",
+ melt_assertmsg ("putupl #381 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V658*/
- meltfptr[657]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V658*/ meltfptr[657]))->tabval[0] =
+ ( /*_.VALTUP___V661*/
+ meltfptr[660]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49482,190 +49839,190 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#387 */
- melt_assertmsg ("putupl #387 checktup",
+ /*putupl#382 */
+ melt_assertmsg ("putupl #382 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V658*/ meltfptr[657])) ==
+ ( /*_.VALTUP___V661*/ meltfptr[660])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #387 checkoff",
+ melt_assertmsg ("putupl #382 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V658*/
- meltfptr[657]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V658*/ meltfptr[657]))->tabval[1] =
+ ( /*_.VALTUP___V661*/
+ meltfptr[660]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#388 */
- melt_assertmsg ("putupl #388 checktup",
+ /*putupl#383 */
+ melt_assertmsg ("putupl #383 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V658*/ meltfptr[657])) ==
+ ( /*_.VALTUP___V661*/ meltfptr[660])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #388 checkoff",
+ melt_assertmsg ("putupl #383 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V658*/
- meltfptr[657]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V658*/ meltfptr[657]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V661*/
+ meltfptr[660]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#389 */
- melt_assertmsg ("putupl #389 checktup",
+ /*putupl#384 */
+ melt_assertmsg ("putupl #384 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V658*/ meltfptr[657])) ==
+ ( /*_.VALTUP___V661*/ meltfptr[660])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #389 checkoff",
+ melt_assertmsg ("putupl #384 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V658*/
- meltfptr[657]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V658*/ meltfptr[657]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]);
+ ( /*_.VALTUP___V661*/
+ meltfptr[660]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V658*/ meltfptr[657]);
+ meltgc_touch ( /*_.VALTUP___V661*/ meltfptr[660]);
MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V656*/ meltfptr[655])) ==
+ ( /*_.VALDATA___V659*/ meltfptr[658])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V656*/
- meltfptr[655]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]))->obj_vartab[5] =
+ ( /*_.VALDATA___V659*/
+ meltfptr[658]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V658*/ meltfptr[657]);
+ /*_.VALTUP___V661*/ meltfptr[660]);
- /*putupl#390 */
- melt_assertmsg ("putupl #390 checktup",
+ /*putupl#385 */
+ melt_assertmsg ("putupl #385 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V659*/ meltfptr[658])) ==
+ ( /*_.VALTUP___V662*/ meltfptr[661])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #390 checkoff",
+ melt_assertmsg ("putupl #385 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V659*/
- meltfptr[658]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V659*/ meltfptr[658]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V662*/
+ meltfptr[661]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V662*/ meltfptr[661]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#391 */
- melt_assertmsg ("putupl #391 checktup",
+ /*putupl#386 */
+ melt_assertmsg ("putupl #386 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V659*/ meltfptr[658])) ==
+ ( /*_.VALTUP___V662*/ meltfptr[661])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #391 checkoff",
+ melt_assertmsg ("putupl #386 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V659*/
- meltfptr[658]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V659*/ meltfptr[658]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]);
+ ( /*_.VALTUP___V662*/
+ meltfptr[661]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V662*/ meltfptr[661]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V659*/ meltfptr[658]);
+ meltgc_touch ( /*_.VALTUP___V662*/ meltfptr[661]);
MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V656*/ meltfptr[655])) ==
+ ( /*_.VALDATA___V659*/ meltfptr[658])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V656*/
- meltfptr[655]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]))->obj_vartab[6] =
+ ( /*_.VALDATA___V659*/
+ meltfptr[658]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V659*/ meltfptr[658]);
+ /*_.VALTUP___V662*/ meltfptr[661]);
MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V656*/ meltfptr[655]);
+ meltgc_touch ( /*_.VALDATA___V659*/ meltfptr[658]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V660*/ meltfptr[659])) ==
+ ( /*_.VALDATA___V663*/ meltfptr[662])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V660*/
- meltfptr[659]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]))->obj_vartab[1] =
+ ( /*_.VALDATA___V663*/
+ meltfptr[662]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V661*/ meltfptr[660]);
+ /*_.VALSTR___V664*/ meltfptr[663]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V660*/ meltfptr[659]);
+ meltgc_touch ( /*_.VALDATA___V663*/ meltfptr[662]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V662*/ meltfptr[661])) ==
+ ( /*_.VALDATA___V665*/ meltfptr[664])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V662*/
- meltfptr[661]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[1] =
+ ( /*_.VALDATA___V665*/
+ meltfptr[664]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V663*/ meltfptr[662]);
+ /*_.VALSTR___V666*/ meltfptr[665]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V662*/ meltfptr[661])) ==
+ ( /*_.VALDATA___V665*/ meltfptr[664])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V662*/
- meltfptr[661]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[4] =
+ ( /*_.VALDATA___V665*/
+ meltfptr[664]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#392 */
- melt_assertmsg ("putupl #392 checktup",
+ /*putupl#387 */
+ melt_assertmsg ("putupl #387 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V664*/ meltfptr[663])) ==
+ ( /*_.VALTUP___V667*/ meltfptr[666])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #392 checkoff",
+ melt_assertmsg ("putupl #387 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V664*/
- meltfptr[663]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V664*/ meltfptr[663]))->tabval[0] =
+ ( /*_.VALTUP___V667*/
+ meltfptr[666]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V667*/ meltfptr[666]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49673,338 +50030,338 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#393 */
- melt_assertmsg ("putupl #393 checktup",
+ /*putupl#388 */
+ melt_assertmsg ("putupl #388 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V664*/ meltfptr[663])) ==
+ ( /*_.VALTUP___V667*/ meltfptr[666])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #393 checkoff",
+ melt_assertmsg ("putupl #388 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V664*/
- meltfptr[663]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V664*/ meltfptr[663]))->tabval[1] =
+ ( /*_.VALTUP___V667*/
+ meltfptr[666]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V667*/ meltfptr[666]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#394 */
- melt_assertmsg ("putupl #394 checktup",
+ /*putupl#389 */
+ melt_assertmsg ("putupl #389 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V664*/ meltfptr[663])) ==
+ ( /*_.VALTUP___V667*/ meltfptr[666])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #394 checkoff",
+ melt_assertmsg ("putupl #389 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V664*/
- meltfptr[663]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V664*/ meltfptr[663]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V667*/
+ meltfptr[666]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V667*/ meltfptr[666]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#395 */
- melt_assertmsg ("putupl #395 checktup",
+ /*putupl#390 */
+ melt_assertmsg ("putupl #390 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V664*/ meltfptr[663])) ==
+ ( /*_.VALTUP___V667*/ meltfptr[666])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #395 checkoff",
+ melt_assertmsg ("putupl #390 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V664*/
- meltfptr[663]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V664*/ meltfptr[663]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V667*/
+ meltfptr[666]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V667*/ meltfptr[666]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V664*/ meltfptr[663]);
+ meltgc_touch ( /*_.VALTUP___V667*/ meltfptr[666]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V662*/ meltfptr[661])) ==
+ ( /*_.VALDATA___V665*/ meltfptr[664])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V662*/
- meltfptr[661]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[5] =
+ ( /*_.VALDATA___V665*/
+ meltfptr[664]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V664*/ meltfptr[663]);
+ /*_.VALTUP___V667*/ meltfptr[666]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V665*/ meltfptr[664])) ==
+ ( /*_.VALDATA___V668*/ meltfptr[667])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V665*/
- meltfptr[664]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[1] =
+ ( /*_.VALDATA___V668*/
+ meltfptr[667]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V666*/ meltfptr[665]);
+ /*_.VALSTR___V669*/ meltfptr[668]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V665*/ meltfptr[664])) ==
+ ( /*_.VALDATA___V668*/ meltfptr[667])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V665*/
- meltfptr[664]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[2] =
+ ( /*_.VALDATA___V668*/
+ meltfptr[667]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V662*/ meltfptr[661]);
+ /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V665*/ meltfptr[664]);
+ meltgc_touch ( /*_.VALDATA___V668*/ meltfptr[667]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V667*/ meltfptr[666])) ==
+ ( /*_.VALDATA___V670*/ meltfptr[669])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V667*/
- meltfptr[666]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[1] =
+ ( /*_.VALDATA___V670*/
+ meltfptr[669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V668*/ meltfptr[667]);
+ /*_.VALSTR___V671*/ meltfptr[670]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V667*/ meltfptr[666])) ==
+ ( /*_.VALDATA___V670*/ meltfptr[669])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V667*/
- meltfptr[666]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[2] =
+ ( /*_.VALDATA___V670*/
+ meltfptr[669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V662*/ meltfptr[661]);
+ /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V667*/ meltfptr[666]);
+ meltgc_touch ( /*_.VALDATA___V670*/ meltfptr[669]);
- /*putupl#396 */
- melt_assertmsg ("putupl #396 checktup",
+ /*putupl#391 */
+ melt_assertmsg ("putupl #391 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V669*/ meltfptr[668])) ==
+ ( /*_.VALTUP___V672*/ meltfptr[671])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #396 checkoff",
+ melt_assertmsg ("putupl #391 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V669*/
- meltfptr[668]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V672*/
+ meltfptr[671]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V672*/ meltfptr[671]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#397 */
- melt_assertmsg ("putupl #397 checktup",
+ /*putupl#392 */
+ melt_assertmsg ("putupl #392 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V669*/ meltfptr[668])) ==
+ ( /*_.VALTUP___V672*/ meltfptr[671])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #397 checkoff",
+ melt_assertmsg ("putupl #392 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V669*/
- meltfptr[668]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V672*/
+ meltfptr[671]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V672*/ meltfptr[671]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#398 */
- melt_assertmsg ("putupl #398 checktup",
+ /*putupl#393 */
+ melt_assertmsg ("putupl #393 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V669*/ meltfptr[668])) ==
+ ( /*_.VALTUP___V672*/ meltfptr[671])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #398 checkoff",
+ melt_assertmsg ("putupl #393 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V669*/
- meltfptr[668]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
+ ( /*_.VALTUP___V672*/
+ meltfptr[671]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V672*/ meltfptr[671]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]);
- /*putupl#399 */
- melt_assertmsg ("putupl #399 checktup",
+ /*putupl#394 */
+ melt_assertmsg ("putupl #394 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V669*/ meltfptr[668])) ==
+ ( /*_.VALTUP___V672*/ meltfptr[671])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #399 checkoff",
+ melt_assertmsg ("putupl #394 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V669*/
- meltfptr[668]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
+ ( /*_.VALTUP___V672*/
+ meltfptr[671]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V672*/ meltfptr[671]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V669*/ meltfptr[668]);
+ meltgc_touch ( /*_.VALTUP___V672*/ meltfptr[671]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V662*/ meltfptr[661])) ==
+ ( /*_.VALDATA___V665*/ meltfptr[664])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V662*/
- meltfptr[661]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[6] =
+ ( /*_.VALDATA___V665*/
+ meltfptr[664]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V669*/ meltfptr[668]);
+ /*_.VALTUP___V672*/ meltfptr[671]);
MELT_LOCATION ("warmelt-genobj.melt:364:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V662*/ meltfptr[661]);
+ meltgc_touch ( /*_.VALDATA___V665*/ meltfptr[664]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V670*/ meltfptr[669])) ==
+ ( /*_.VALDATA___V673*/ meltfptr[672])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V670*/
- meltfptr[669]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] =
+ ( /*_.VALDATA___V673*/
+ meltfptr[672]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V671*/ meltfptr[670]);
+ /*_.VALSTR___V674*/ meltfptr[673]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V670*/ meltfptr[669]);
+ meltgc_touch ( /*_.VALDATA___V673*/ meltfptr[672]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V672*/ meltfptr[671])) ==
+ ( /*_.VALDATA___V675*/ meltfptr[674])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V672*/
- meltfptr[671]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]))->obj_vartab[1] =
+ ( /*_.VALDATA___V675*/
+ meltfptr[674]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V675*/ meltfptr[674]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V673*/ meltfptr[672]);
+ /*_.VALSTR___V676*/ meltfptr[675]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V672*/ meltfptr[671]);
+ meltgc_touch ( /*_.VALDATA___V675*/ meltfptr[674]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V674*/ meltfptr[673])) ==
+ ( /*_.VALDATA___V677*/ meltfptr[676])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V674*/
- meltfptr[673]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] =
+ ( /*_.VALDATA___V677*/
+ meltfptr[676]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V677*/ meltfptr[676]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V675*/ meltfptr[674]);
+ /*_.VALSTR___V678*/ meltfptr[677]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V674*/ meltfptr[673]);
+ meltgc_touch ( /*_.VALDATA___V677*/ meltfptr[676]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V676*/ meltfptr[675])) ==
+ ( /*_.VALDATA___V679*/ meltfptr[678])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V676*/
- meltfptr[675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[1] =
+ ( /*_.VALDATA___V679*/
+ meltfptr[678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V677*/ meltfptr[676]);
+ /*_.VALSTR___V680*/ meltfptr[679]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V676*/ meltfptr[675])) ==
+ ( /*_.VALDATA___V679*/ meltfptr[678])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V676*/
- meltfptr[675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[4] =
+ ( /*_.VALDATA___V679*/
+ meltfptr[678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V662*/ meltfptr[661]);
+ /*_.VALDATA___V665*/ meltfptr[664]);
- /*putupl#400 */
- melt_assertmsg ("putupl #400 checktup",
+ /*putupl#395 */
+ melt_assertmsg ("putupl #395 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V678*/ meltfptr[677])) ==
+ ( /*_.VALTUP___V681*/ meltfptr[680])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #400 checkoff",
+ melt_assertmsg ("putupl #395 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V678*/
- meltfptr[677]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[0] =
+ ( /*_.VALTUP___V681*/
+ meltfptr[680]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50012,306 +50369,306 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#401 */
- melt_assertmsg ("putupl #401 checktup",
+ /*putupl#396 */
+ melt_assertmsg ("putupl #396 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V678*/ meltfptr[677])) ==
+ ( /*_.VALTUP___V681*/ meltfptr[680])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #401 checkoff",
+ melt_assertmsg ("putupl #396 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V678*/
- meltfptr[677]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[1] =
+ ( /*_.VALTUP___V681*/
+ meltfptr[680]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#402 */
- melt_assertmsg ("putupl #402 checktup",
+ /*putupl#397 */
+ melt_assertmsg ("putupl #397 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V678*/ meltfptr[677])) ==
+ ( /*_.VALTUP___V681*/ meltfptr[680])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #402 checkoff",
+ melt_assertmsg ("putupl #397 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V678*/
- meltfptr[677]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V681*/
+ meltfptr[680]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#403 */
- melt_assertmsg ("putupl #403 checktup",
+ /*putupl#398 */
+ melt_assertmsg ("putupl #398 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V678*/ meltfptr[677])) ==
+ ( /*_.VALTUP___V681*/ meltfptr[680])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #403 checkoff",
+ melt_assertmsg ("putupl #398 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V678*/
- meltfptr[677]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V681*/
+ meltfptr[680]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#404 */
- melt_assertmsg ("putupl #404 checktup",
+ /*putupl#399 */
+ melt_assertmsg ("putupl #399 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V678*/ meltfptr[677])) ==
+ ( /*_.VALTUP___V681*/ meltfptr[680])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #404 checkoff",
+ melt_assertmsg ("putupl #399 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V678*/
- meltfptr[677]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]);
+ ( /*_.VALTUP___V681*/
+ meltfptr[680]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V678*/ meltfptr[677]);
+ meltgc_touch ( /*_.VALTUP___V681*/ meltfptr[680]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V676*/ meltfptr[675])) ==
+ ( /*_.VALDATA___V679*/ meltfptr[678])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V676*/
- meltfptr[675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[5] =
+ ( /*_.VALDATA___V679*/
+ meltfptr[678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V678*/ meltfptr[677]);
+ /*_.VALTUP___V681*/ meltfptr[680]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V679*/ meltfptr[678])) ==
+ ( /*_.VALDATA___V682*/ meltfptr[681])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V679*/
- meltfptr[678]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[1] =
+ ( /*_.VALDATA___V682*/
+ meltfptr[681]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V680*/ meltfptr[679]);
+ /*_.VALSTR___V683*/ meltfptr[682]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V679*/ meltfptr[678])) ==
+ ( /*_.VALDATA___V682*/ meltfptr[681])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V679*/
- meltfptr[678]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[2] =
+ ( /*_.VALDATA___V682*/
+ meltfptr[681]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V676*/ meltfptr[675]);
+ /*_.VALDATA___V679*/ meltfptr[678]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V679*/ meltfptr[678]);
+ meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]);
- /*putupl#405 */
- melt_assertmsg ("putupl #405 checktup",
+ /*putupl#400 */
+ melt_assertmsg ("putupl #400 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V681*/ meltfptr[680])) ==
+ ( /*_.VALTUP___V684*/ meltfptr[683])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #405 checkoff",
+ melt_assertmsg ("putupl #400 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V681*/
- meltfptr[680]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V684*/
+ meltfptr[683]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#406 */
- melt_assertmsg ("putupl #406 checktup",
+ /*putupl#401 */
+ melt_assertmsg ("putupl #401 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V681*/ meltfptr[680])) ==
+ ( /*_.VALTUP___V684*/ meltfptr[683])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #406 checkoff",
+ melt_assertmsg ("putupl #401 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V681*/
- meltfptr[680]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V684*/
+ meltfptr[683]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#407 */
- melt_assertmsg ("putupl #407 checktup",
+ /*putupl#402 */
+ melt_assertmsg ("putupl #402 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V681*/ meltfptr[680])) ==
+ ( /*_.VALTUP___V684*/ meltfptr[683])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #407 checkoff",
+ melt_assertmsg ("putupl #402 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V681*/
- meltfptr[680]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
+ ( /*_.VALTUP___V684*/
+ meltfptr[683]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]);
- /*putupl#408 */
- melt_assertmsg ("putupl #408 checktup",
+ /*putupl#403 */
+ melt_assertmsg ("putupl #403 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V681*/ meltfptr[680])) ==
+ ( /*_.VALTUP___V684*/ meltfptr[683])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #408 checkoff",
+ melt_assertmsg ("putupl #403 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V681*/
- meltfptr[680]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
+ ( /*_.VALTUP___V684*/
+ meltfptr[683]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]);
- /*putupl#409 */
- melt_assertmsg ("putupl #409 checktup",
+ /*putupl#404 */
+ melt_assertmsg ("putupl #404 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V681*/ meltfptr[680])) ==
+ ( /*_.VALTUP___V684*/ meltfptr[683])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #409 checkoff",
+ melt_assertmsg ("putupl #404 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V681*/
- meltfptr[680]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V681*/ meltfptr[680]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]);
+ ( /*_.VALTUP___V684*/
+ meltfptr[683]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V681*/ meltfptr[680]);
+ meltgc_touch ( /*_.VALTUP___V684*/ meltfptr[683]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V676*/ meltfptr[675])) ==
+ ( /*_.VALDATA___V679*/ meltfptr[678])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V676*/
- meltfptr[675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[6] =
+ ( /*_.VALDATA___V679*/
+ meltfptr[678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V681*/ meltfptr[680]);
+ /*_.VALTUP___V684*/ meltfptr[683]);
MELT_LOCATION ("warmelt-genobj.melt:371:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V676*/ meltfptr[675]);
+ meltgc_touch ( /*_.VALDATA___V679*/ meltfptr[678]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V682*/ meltfptr[681])) ==
+ ( /*_.VALDATA___V685*/ meltfptr[684])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V682*/
- meltfptr[681]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] =
+ ( /*_.VALDATA___V685*/
+ meltfptr[684]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V683*/ meltfptr[682]);
+ /*_.VALSTR___V686*/ meltfptr[685]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]);
+ meltgc_touch ( /*_.VALDATA___V685*/ meltfptr[684]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V684*/ meltfptr[683])) ==
+ ( /*_.VALDATA___V687*/ meltfptr[686])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V684*/
- meltfptr[683]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[1] =
+ ( /*_.VALDATA___V687*/
+ meltfptr[686]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V685*/ meltfptr[684]);
+ /*_.VALSTR___V688*/ meltfptr[687]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V684*/ meltfptr[683]);
+ meltgc_touch ( /*_.VALDATA___V687*/ meltfptr[686]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V687*/ meltfptr[686]);
+ /*_.VALSTR___V690*/ meltfptr[689]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[4] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#410 */
- melt_assertmsg ("putupl #410 checktup",
+ /*putupl#405 */
+ melt_assertmsg ("putupl #405 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #410 checkoff",
+ melt_assertmsg ("putupl #405 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[0] =
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50319,412 +50676,412 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#411 */
- melt_assertmsg ("putupl #411 checktup",
+ /*putupl#406 */
+ melt_assertmsg ("putupl #406 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #411 checkoff",
+ melt_assertmsg ("putupl #406 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[1] =
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#412 */
- melt_assertmsg ("putupl #412 checktup",
+ /*putupl#407 */
+ melt_assertmsg ("putupl #407 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #412 checkoff",
+ melt_assertmsg ("putupl #407 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#413 */
- melt_assertmsg ("putupl #413 checktup",
+ /*putupl#408 */
+ melt_assertmsg ("putupl #408 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #413 checkoff",
+ melt_assertmsg ("putupl #408 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V688*/ meltfptr[687]);
+ meltgc_touch ( /*_.VALTUP___V691*/ meltfptr[690]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[5] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V688*/ meltfptr[687]);
+ /*_.VALTUP___V691*/ meltfptr[690]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V689*/ meltfptr[688])) ==
+ ( /*_.VALDATA___V692*/ meltfptr[691])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V689*/
- meltfptr[688]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[1] =
+ ( /*_.VALDATA___V692*/
+ meltfptr[691]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V690*/ meltfptr[689]);
+ /*_.VALSTR___V693*/ meltfptr[692]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V689*/ meltfptr[688])) ==
+ ( /*_.VALDATA___V692*/ meltfptr[691])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V689*/
- meltfptr[688]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[2] =
+ ( /*_.VALDATA___V692*/
+ meltfptr[691]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V689*/ meltfptr[688]);
+ meltgc_touch ( /*_.VALDATA___V692*/ meltfptr[691]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V691*/ meltfptr[690])) ==
+ ( /*_.VALDATA___V694*/ meltfptr[693])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V691*/
- meltfptr[690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]))->obj_vartab[1] =
+ ( /*_.VALDATA___V694*/
+ meltfptr[693]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V692*/ meltfptr[691]);
+ /*_.VALSTR___V695*/ meltfptr[694]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V691*/ meltfptr[690])) ==
+ ( /*_.VALDATA___V694*/ meltfptr[693])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V691*/
- meltfptr[690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]))->obj_vartab[2] =
+ ( /*_.VALDATA___V694*/
+ meltfptr[693]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V691*/ meltfptr[690]);
+ meltgc_touch ( /*_.VALDATA___V694*/ meltfptr[693]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V693*/ meltfptr[692])) ==
+ ( /*_.VALDATA___V696*/ meltfptr[695])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V693*/
- meltfptr[692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]))->obj_vartab[1] =
+ ( /*_.VALDATA___V696*/
+ meltfptr[695]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V694*/ meltfptr[693]);
+ /*_.VALSTR___V697*/ meltfptr[696]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V693*/ meltfptr[692])) ==
+ ( /*_.VALDATA___V696*/ meltfptr[695])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V693*/
- meltfptr[692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]))->obj_vartab[2] =
+ ( /*_.VALDATA___V696*/
+ meltfptr[695]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V693*/ meltfptr[692]);
+ meltgc_touch ( /*_.VALDATA___V696*/ meltfptr[695]);
- /*putupl#414 */
- melt_assertmsg ("putupl #414 checktup",
+ /*putupl#409 */
+ melt_assertmsg ("putupl #409 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V695*/ meltfptr[694])) ==
+ ( /*_.VALTUP___V698*/ meltfptr[697])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #414 checkoff",
+ melt_assertmsg ("putupl #409 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V695*/
- meltfptr[694]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V695*/ meltfptr[694]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V698*/
+ meltfptr[697]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V698*/ meltfptr[697]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#415 */
- melt_assertmsg ("putupl #415 checktup",
+ /*putupl#410 */
+ melt_assertmsg ("putupl #410 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V695*/ meltfptr[694])) ==
+ ( /*_.VALTUP___V698*/ meltfptr[697])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #415 checkoff",
+ melt_assertmsg ("putupl #410 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V695*/
- meltfptr[694]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V695*/ meltfptr[694]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V698*/
+ meltfptr[697]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V698*/ meltfptr[697]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#416 */
- melt_assertmsg ("putupl #416 checktup",
+ /*putupl#411 */
+ melt_assertmsg ("putupl #411 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V695*/ meltfptr[694])) ==
+ ( /*_.VALTUP___V698*/ meltfptr[697])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #416 checkoff",
+ melt_assertmsg ("putupl #411 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V695*/
- meltfptr[694]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V695*/ meltfptr[694]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
+ ( /*_.VALTUP___V698*/
+ meltfptr[697]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V698*/ meltfptr[697]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]);
- /*putupl#417 */
- melt_assertmsg ("putupl #417 checktup",
+ /*putupl#412 */
+ melt_assertmsg ("putupl #412 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V695*/ meltfptr[694])) ==
+ ( /*_.VALTUP___V698*/ meltfptr[697])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #417 checkoff",
+ melt_assertmsg ("putupl #412 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V695*/
- meltfptr[694]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V695*/ meltfptr[694]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]);
+ ( /*_.VALTUP___V698*/
+ meltfptr[697]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V698*/ meltfptr[697]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]);
- /*putupl#418 */
- melt_assertmsg ("putupl #418 checktup",
+ /*putupl#413 */
+ melt_assertmsg ("putupl #413 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V695*/ meltfptr[694])) ==
+ ( /*_.VALTUP___V698*/ meltfptr[697])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #418 checkoff",
+ melt_assertmsg ("putupl #413 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V695*/
- meltfptr[694]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V695*/ meltfptr[694]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]);
+ ( /*_.VALTUP___V698*/
+ meltfptr[697]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V698*/ meltfptr[697]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V695*/ meltfptr[694]);
+ meltgc_touch ( /*_.VALTUP___V698*/ meltfptr[697]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[6] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V695*/ meltfptr[694]);
+ /*_.VALTUP___V698*/ meltfptr[697]);
MELT_LOCATION ("warmelt-genobj.melt:377:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V686*/ meltfptr[685]);
+ meltgc_touch ( /*_.VALDATA___V689*/ meltfptr[688]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V696*/ meltfptr[695])) ==
+ ( /*_.VALDATA___V699*/ meltfptr[698])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V696*/
- meltfptr[695]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[1] =
+ ( /*_.VALDATA___V699*/
+ meltfptr[698]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V697*/ meltfptr[696]);
+ /*_.VALSTR___V700*/ meltfptr[699]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V696*/ meltfptr[695]);
+ meltgc_touch ( /*_.VALDATA___V699*/ meltfptr[698]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V698*/ meltfptr[697])) ==
+ ( /*_.VALDATA___V701*/ meltfptr[700])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V698*/
- meltfptr[697]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[1] =
+ ( /*_.VALDATA___V701*/
+ meltfptr[700]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V699*/ meltfptr[698]);
+ /*_.VALSTR___V702*/ meltfptr[701]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V698*/ meltfptr[697]);
+ meltgc_touch ( /*_.VALDATA___V701*/ meltfptr[700]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V700*/ meltfptr[699])) ==
+ ( /*_.VALDATA___V703*/ meltfptr[702])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V700*/
- meltfptr[699]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[1] =
+ ( /*_.VALDATA___V703*/
+ meltfptr[702]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V701*/ meltfptr[700]);
+ /*_.VALSTR___V704*/ meltfptr[703]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]);
+ meltgc_touch ( /*_.VALDATA___V703*/ meltfptr[702]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V702*/ meltfptr[701])) ==
+ ( /*_.VALDATA___V705*/ meltfptr[704])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V702*/
- meltfptr[701]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]))->obj_vartab[1] =
+ ( /*_.VALDATA___V705*/
+ meltfptr[704]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V703*/ meltfptr[702]);
+ /*_.VALSTR___V706*/ meltfptr[705]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V702*/ meltfptr[701]);
+ meltgc_touch ( /*_.VALDATA___V705*/ meltfptr[704]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V704*/ meltfptr[703])) ==
+ ( /*_.VALDATA___V707*/ meltfptr[706])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V704*/
- meltfptr[703]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[1] =
+ ( /*_.VALDATA___V707*/
+ meltfptr[706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V705*/ meltfptr[704]);
+ /*_.VALSTR___V708*/ meltfptr[707]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V704*/ meltfptr[703])) ==
+ ( /*_.VALDATA___V707*/ meltfptr[706])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V704*/
- meltfptr[703]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[4] =
+ ( /*_.VALDATA___V707*/
+ meltfptr[706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
- /*putupl#419 */
- melt_assertmsg ("putupl #419 checktup",
+ /*putupl#414 */
+ melt_assertmsg ("putupl #414 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V706*/ meltfptr[705])) ==
+ ( /*_.VALTUP___V709*/ meltfptr[708])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #419 checkoff",
+ melt_assertmsg ("putupl #414 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V706*/
- meltfptr[705]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[0] =
+ ( /*_.VALTUP___V709*/
+ meltfptr[708]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50732,100 +51089,100 @@ warmelt_genobj_initialmeltchunk_8 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#420 */
- melt_assertmsg ("putupl #420 checktup",
+ /*putupl#415 */
+ melt_assertmsg ("putupl #415 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V706*/ meltfptr[705])) ==
+ ( /*_.VALTUP___V709*/ meltfptr[708])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #420 checkoff",
+ melt_assertmsg ("putupl #415 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V706*/
- meltfptr[705]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[1] =
+ ( /*_.VALTUP___V709*/
+ meltfptr[708]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#421 */
- melt_assertmsg ("putupl #421 checktup",
+ /*putupl#416 */
+ melt_assertmsg ("putupl #416 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V706*/ meltfptr[705])) ==
+ ( /*_.VALTUP___V709*/ meltfptr[708])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #421 checkoff",
+ melt_assertmsg ("putupl #416 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V706*/
- meltfptr[705]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V709*/
+ meltfptr[708]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#422 */
- melt_assertmsg ("putupl #422 checktup",
+ /*putupl#417 */
+ melt_assertmsg ("putupl #417 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V706*/ meltfptr[705])) ==
+ ( /*_.VALTUP___V709*/ meltfptr[708])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #422 checkoff",
+ melt_assertmsg ("putupl #417 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V706*/
- meltfptr[705]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V709*/
+ meltfptr[708]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#423 */
- melt_assertmsg ("putupl #423 checktup",
+ /*putupl#418 */
+ melt_assertmsg ("putupl #418 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V706*/ meltfptr[705])) ==
+ ( /*_.VALTUP___V709*/ meltfptr[708])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #423 checkoff",
+ melt_assertmsg ("putupl #418 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V706*/
- meltfptr[705]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ ( /*_.VALTUP___V709*/
+ meltfptr[708]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V706*/ meltfptr[705]);
+ meltgc_touch ( /*_.VALTUP___V709*/ meltfptr[708]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V704*/ meltfptr[703])) ==
+ ( /*_.VALDATA___V707*/ meltfptr[706])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V704*/
- meltfptr[703]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[5] =
+ ( /*_.VALDATA___V707*/
+ meltfptr[706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V706*/ meltfptr[705]);
+ /*_.VALTUP___V709*/ meltfptr[708]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V707*/ meltfptr[706])) ==
+ ( /*_.VALDATA___V710*/ meltfptr[709])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V707*/
- meltfptr[706]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[1] =
+ ( /*_.VALDATA___V710*/
+ meltfptr[709]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V708*/ meltfptr[707]);
+ /*_.VALSTR___V711*/ meltfptr[710]);
#undef meltfram__
@@ -50843,220 +51200,220 @@ warmelt_genobj_initialmeltchunk_9 (struct frame_start_module_melt_st
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V707*/ meltfptr[706])) ==
+ ( /*_.VALDATA___V710*/ meltfptr[709])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V707*/
- meltfptr[706]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[2] =
+ ( /*_.VALDATA___V710*/
+ meltfptr[709]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V704*/ meltfptr[703]);
+ /*_.VALDATA___V707*/ meltfptr[706]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V707*/ meltfptr[706]);
+ meltgc_touch ( /*_.VALDATA___V710*/ meltfptr[709]);
- /*putupl#424 */
- melt_assertmsg ("putupl #424 checktup",
+ /*putupl#419 */
+ melt_assertmsg ("putupl #419 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #424 checkoff",
+ melt_assertmsg ("putupl #419 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#425 */
- melt_assertmsg ("putupl #425 checktup",
+ /*putupl#420 */
+ melt_assertmsg ("putupl #420 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #425 checkoff",
+ melt_assertmsg ("putupl #420 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#426 */
- melt_assertmsg ("putupl #426 checktup",
+ /*putupl#421 */
+ melt_assertmsg ("putupl #421 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #426 checkoff",
+ melt_assertmsg ("putupl #421 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]);
- /*putupl#427 */
- melt_assertmsg ("putupl #427 checktup",
+ /*putupl#422 */
+ melt_assertmsg ("putupl #422 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #427 checkoff",
+ melt_assertmsg ("putupl #422 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]);
- /*putupl#428 */
- melt_assertmsg ("putupl #428 checktup",
+ /*putupl#423 */
+ melt_assertmsg ("putupl #423 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #428 checkoff",
+ melt_assertmsg ("putupl #423 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]);
- /*putupl#429 */
- melt_assertmsg ("putupl #429 checktup",
+ /*putupl#424 */
+ melt_assertmsg ("putupl #424 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V709*/ meltfptr[708])) ==
+ ( /*_.VALTUP___V712*/ meltfptr[711])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #429 checkoff",
+ melt_assertmsg ("putupl #424 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V709*/
- meltfptr[708]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V709*/ meltfptr[708]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]);
+ ( /*_.VALTUP___V712*/
+ meltfptr[711]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V712*/ meltfptr[711]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V709*/ meltfptr[708]);
+ meltgc_touch ( /*_.VALTUP___V712*/ meltfptr[711]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V704*/ meltfptr[703])) ==
+ ( /*_.VALDATA___V707*/ meltfptr[706])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V704*/
- meltfptr[703]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[6] =
+ ( /*_.VALDATA___V707*/
+ meltfptr[706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V709*/ meltfptr[708]);
+ /*_.VALTUP___V712*/ meltfptr[711]);
MELT_LOCATION ("warmelt-genobj.melt:385:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V704*/ meltfptr[703]);
+ meltgc_touch ( /*_.VALDATA___V707*/ meltfptr[706]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V710*/ meltfptr[709])) ==
+ ( /*_.VALDATA___V713*/ meltfptr[712])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V710*/
- meltfptr[709]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]))->obj_vartab[1] =
+ ( /*_.VALDATA___V713*/
+ meltfptr[712]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V711*/ meltfptr[710]);
+ /*_.VALSTR___V714*/ meltfptr[713]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V710*/ meltfptr[709]);
+ meltgc_touch ( /*_.VALDATA___V713*/ meltfptr[712]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V712*/ meltfptr[711])) ==
+ ( /*_.VALDATA___V715*/ meltfptr[714])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V712*/
- meltfptr[711]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] =
+ ( /*_.VALDATA___V715*/
+ meltfptr[714]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V713*/ meltfptr[712]);
+ /*_.VALSTR___V716*/ meltfptr[715]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V712*/ meltfptr[711]);
+ meltgc_touch ( /*_.VALDATA___V715*/ meltfptr[714]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[1] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V715*/ meltfptr[714]);
+ /*_.VALSTR___V718*/ meltfptr[717]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[4] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#430 */
- melt_assertmsg ("putupl #430 checktup",
+ /*putupl#425 */
+ melt_assertmsg ("putupl #425 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #430 checkoff",
+ melt_assertmsg ("putupl #425 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[0] =
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51064,412 +51421,412 @@ warmelt_genobj_initialmeltchunk_9 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#431 */
- melt_assertmsg ("putupl #431 checktup",
+ /*putupl#426 */
+ melt_assertmsg ("putupl #426 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #431 checkoff",
+ melt_assertmsg ("putupl #426 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[1] =
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#432 */
- melt_assertmsg ("putupl #432 checktup",
+ /*putupl#427 */
+ melt_assertmsg ("putupl #427 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #432 checkoff",
+ melt_assertmsg ("putupl #427 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#433 */
- melt_assertmsg ("putupl #433 checktup",
+ /*putupl#428 */
+ melt_assertmsg ("putupl #428 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #433 checkoff",
+ melt_assertmsg ("putupl #428 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V716*/ meltfptr[715]);
+ meltgc_touch ( /*_.VALTUP___V719*/ meltfptr[718]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[5] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V716*/ meltfptr[715]);
+ /*_.VALTUP___V719*/ meltfptr[718]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V717*/ meltfptr[716])) ==
+ ( /*_.VALDATA___V720*/ meltfptr[719])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V717*/
- meltfptr[716]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[1] =
+ ( /*_.VALDATA___V720*/
+ meltfptr[719]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V718*/ meltfptr[717]);
+ /*_.VALSTR___V721*/ meltfptr[720]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V717*/ meltfptr[716])) ==
+ ( /*_.VALDATA___V720*/ meltfptr[719])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V717*/
- meltfptr[716]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[2] =
+ ( /*_.VALDATA___V720*/
+ meltfptr[719]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V714*/ meltfptr[713]);
+ /*_.VALDATA___V717*/ meltfptr[716]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V717*/ meltfptr[716]);
+ meltgc_touch ( /*_.VALDATA___V720*/ meltfptr[719]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V719*/ meltfptr[718])) ==
+ ( /*_.VALDATA___V722*/ meltfptr[721])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V719*/
- meltfptr[718]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]))->obj_vartab[1] =
+ ( /*_.VALDATA___V722*/
+ meltfptr[721]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V720*/ meltfptr[719]);
+ /*_.VALSTR___V723*/ meltfptr[722]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V719*/ meltfptr[718])) ==
+ ( /*_.VALDATA___V722*/ meltfptr[721])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V719*/
- meltfptr[718]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]))->obj_vartab[2] =
+ ( /*_.VALDATA___V722*/
+ meltfptr[721]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V714*/ meltfptr[713]);
+ /*_.VALDATA___V717*/ meltfptr[716]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V719*/ meltfptr[718]);
+ meltgc_touch ( /*_.VALDATA___V722*/ meltfptr[721]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V721*/ meltfptr[720])) ==
+ ( /*_.VALDATA___V724*/ meltfptr[723])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V721*/
- meltfptr[720]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[1] =
+ ( /*_.VALDATA___V724*/
+ meltfptr[723]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V722*/ meltfptr[721]);
+ /*_.VALSTR___V725*/ meltfptr[724]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V721*/ meltfptr[720])) ==
+ ( /*_.VALDATA___V724*/ meltfptr[723])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V721*/
- meltfptr[720]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[2] =
+ ( /*_.VALDATA___V724*/
+ meltfptr[723]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V714*/ meltfptr[713]);
+ /*_.VALDATA___V717*/ meltfptr[716]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V721*/ meltfptr[720]);
+ meltgc_touch ( /*_.VALDATA___V724*/ meltfptr[723]);
- /*putupl#434 */
- melt_assertmsg ("putupl #434 checktup",
+ /*putupl#429 */
+ melt_assertmsg ("putupl #429 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V723*/ meltfptr[722])) ==
+ ( /*_.VALTUP___V726*/ meltfptr[725])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #434 checkoff",
+ melt_assertmsg ("putupl #429 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V723*/
- meltfptr[722]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V723*/ meltfptr[722]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V726*/
+ meltfptr[725]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V726*/ meltfptr[725]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#435 */
- melt_assertmsg ("putupl #435 checktup",
+ /*putupl#430 */
+ melt_assertmsg ("putupl #430 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V723*/ meltfptr[722])) ==
+ ( /*_.VALTUP___V726*/ meltfptr[725])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #435 checkoff",
+ melt_assertmsg ("putupl #430 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V723*/
- meltfptr[722]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V723*/ meltfptr[722]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V726*/
+ meltfptr[725]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V726*/ meltfptr[725]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#436 */
- melt_assertmsg ("putupl #436 checktup",
+ /*putupl#431 */
+ melt_assertmsg ("putupl #431 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V723*/ meltfptr[722])) ==
+ ( /*_.VALTUP___V726*/ meltfptr[725])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #436 checkoff",
+ melt_assertmsg ("putupl #431 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V723*/
- meltfptr[722]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V723*/ meltfptr[722]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]);
+ ( /*_.VALTUP___V726*/
+ meltfptr[725]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V726*/ meltfptr[725]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]);
- /*putupl#437 */
- melt_assertmsg ("putupl #437 checktup",
+ /*putupl#432 */
+ melt_assertmsg ("putupl #432 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V723*/ meltfptr[722])) ==
+ ( /*_.VALTUP___V726*/ meltfptr[725])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #437 checkoff",
+ melt_assertmsg ("putupl #432 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V723*/
- meltfptr[722]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V723*/ meltfptr[722]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]);
+ ( /*_.VALTUP___V726*/
+ meltfptr[725]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V726*/ meltfptr[725]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]);
- /*putupl#438 */
- melt_assertmsg ("putupl #438 checktup",
+ /*putupl#433 */
+ melt_assertmsg ("putupl #433 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V723*/ meltfptr[722])) ==
+ ( /*_.VALTUP___V726*/ meltfptr[725])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #438 checkoff",
+ melt_assertmsg ("putupl #433 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V723*/
- meltfptr[722]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V723*/ meltfptr[722]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]);
+ ( /*_.VALTUP___V726*/
+ meltfptr[725]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V726*/ meltfptr[725]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V723*/ meltfptr[722]);
+ meltgc_touch ( /*_.VALTUP___V726*/ meltfptr[725]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[6] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V723*/ meltfptr[722]);
+ /*_.VALTUP___V726*/ meltfptr[725]);
MELT_LOCATION ("warmelt-genobj.melt:391:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V714*/ meltfptr[713]);
+ meltgc_touch ( /*_.VALDATA___V717*/ meltfptr[716]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V724*/ meltfptr[723])) ==
+ ( /*_.VALDATA___V727*/ meltfptr[726])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V724*/
- meltfptr[723]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]))->obj_vartab[1] =
+ ( /*_.VALDATA___V727*/
+ meltfptr[726]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V725*/ meltfptr[724]);
+ /*_.VALSTR___V728*/ meltfptr[727]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V724*/ meltfptr[723]);
+ meltgc_touch ( /*_.VALDATA___V727*/ meltfptr[726]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V726*/ meltfptr[725])) ==
+ ( /*_.VALDATA___V729*/ meltfptr[728])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V726*/
- meltfptr[725]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]))->obj_vartab[1] =
+ ( /*_.VALDATA___V729*/
+ meltfptr[728]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V729*/ meltfptr[728]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V727*/ meltfptr[726]);
+ /*_.VALSTR___V730*/ meltfptr[729]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V726*/ meltfptr[725]);
+ meltgc_touch ( /*_.VALDATA___V729*/ meltfptr[728]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V728*/ meltfptr[727])) ==
+ ( /*_.VALDATA___V731*/ meltfptr[730])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V728*/
- meltfptr[727]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[1] =
+ ( /*_.VALDATA___V731*/
+ meltfptr[730]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V729*/ meltfptr[728]);
+ /*_.VALSTR___V732*/ meltfptr[731]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V728*/ meltfptr[727]);
+ meltgc_touch ( /*_.VALDATA___V731*/ meltfptr[730]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V730*/ meltfptr[729])) ==
+ ( /*_.VALDATA___V733*/ meltfptr[732])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V730*/
- meltfptr[729]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] =
+ ( /*_.VALDATA___V733*/
+ meltfptr[732]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V731*/ meltfptr[730]);
+ /*_.VALSTR___V734*/ meltfptr[733]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V730*/ meltfptr[729]);
+ meltgc_touch ( /*_.VALDATA___V733*/ meltfptr[732]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V733*/ meltfptr[732]);
+ /*_.VALSTR___V736*/ meltfptr[735]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[4] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#439 */
- melt_assertmsg ("putupl #439 checktup",
+ /*putupl#434 */
+ melt_assertmsg ("putupl #434 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #439 checkoff",
+ melt_assertmsg ("putupl #434 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[0] =
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51477,412 +51834,412 @@ warmelt_genobj_initialmeltchunk_9 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#440 */
- melt_assertmsg ("putupl #440 checktup",
+ /*putupl#435 */
+ melt_assertmsg ("putupl #435 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #440 checkoff",
+ melt_assertmsg ("putupl #435 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[1] =
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#441 */
- melt_assertmsg ("putupl #441 checktup",
+ /*putupl#436 */
+ melt_assertmsg ("putupl #436 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #441 checkoff",
+ melt_assertmsg ("putupl #436 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#442 */
- melt_assertmsg ("putupl #442 checktup",
+ /*putupl#437 */
+ melt_assertmsg ("putupl #437 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #442 checkoff",
+ melt_assertmsg ("putupl #437 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V734*/ meltfptr[733]);
+ meltgc_touch ( /*_.VALTUP___V737*/ meltfptr[736]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[5] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V734*/ meltfptr[733]);
+ /*_.VALTUP___V737*/ meltfptr[736]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V735*/ meltfptr[734])) ==
+ ( /*_.VALDATA___V738*/ meltfptr[737])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V735*/
- meltfptr[734]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] =
+ ( /*_.VALDATA___V738*/
+ meltfptr[737]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V736*/ meltfptr[735]);
+ /*_.VALSTR___V739*/ meltfptr[738]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V735*/ meltfptr[734])) ==
+ ( /*_.VALDATA___V738*/ meltfptr[737])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V735*/
- meltfptr[734]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[2] =
+ ( /*_.VALDATA___V738*/
+ meltfptr[737]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V735*/ meltfptr[734]);
+ meltgc_touch ( /*_.VALDATA___V738*/ meltfptr[737]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V737*/ meltfptr[736])) ==
+ ( /*_.VALDATA___V740*/ meltfptr[739])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V737*/
- meltfptr[736]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] =
+ ( /*_.VALDATA___V740*/
+ meltfptr[739]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V738*/ meltfptr[737]);
+ /*_.VALSTR___V741*/ meltfptr[740]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V737*/ meltfptr[736])) ==
+ ( /*_.VALDATA___V740*/ meltfptr[739])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V737*/
- meltfptr[736]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[2] =
+ ( /*_.VALDATA___V740*/
+ meltfptr[739]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V737*/ meltfptr[736]);
+ meltgc_touch ( /*_.VALDATA___V740*/ meltfptr[739]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V739*/ meltfptr[738])) ==
+ ( /*_.VALDATA___V742*/ meltfptr[741])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V739*/
- meltfptr[738]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] =
+ ( /*_.VALDATA___V742*/
+ meltfptr[741]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V740*/ meltfptr[739]);
+ /*_.VALSTR___V743*/ meltfptr[742]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V739*/ meltfptr[738])) ==
+ ( /*_.VALDATA___V742*/ meltfptr[741])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V739*/
- meltfptr[738]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] =
+ ( /*_.VALDATA___V742*/
+ meltfptr[741]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V739*/ meltfptr[738]);
+ meltgc_touch ( /*_.VALDATA___V742*/ meltfptr[741]);
- /*putupl#443 */
- melt_assertmsg ("putupl #443 checktup",
+ /*putupl#438 */
+ melt_assertmsg ("putupl #438 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V741*/ meltfptr[740])) ==
+ ( /*_.VALTUP___V744*/ meltfptr[743])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #443 checkoff",
+ melt_assertmsg ("putupl #438 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V741*/
- meltfptr[740]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V744*/
+ meltfptr[743]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#444 */
- melt_assertmsg ("putupl #444 checktup",
+ /*putupl#439 */
+ melt_assertmsg ("putupl #439 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V741*/ meltfptr[740])) ==
+ ( /*_.VALTUP___V744*/ meltfptr[743])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #444 checkoff",
+ melt_assertmsg ("putupl #439 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V741*/
- meltfptr[740]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V744*/
+ meltfptr[743]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#445 */
- melt_assertmsg ("putupl #445 checktup",
+ /*putupl#440 */
+ melt_assertmsg ("putupl #440 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V741*/ meltfptr[740])) ==
+ ( /*_.VALTUP___V744*/ meltfptr[743])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #445 checkoff",
+ melt_assertmsg ("putupl #440 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V741*/
- meltfptr[740]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
+ ( /*_.VALTUP___V744*/
+ meltfptr[743]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]);
- /*putupl#446 */
- melt_assertmsg ("putupl #446 checktup",
+ /*putupl#441 */
+ melt_assertmsg ("putupl #441 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V741*/ meltfptr[740])) ==
+ ( /*_.VALTUP___V744*/ meltfptr[743])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #446 checkoff",
+ melt_assertmsg ("putupl #441 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V741*/
- meltfptr[740]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]);
+ ( /*_.VALTUP___V744*/
+ meltfptr[743]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]);
- /*putupl#447 */
- melt_assertmsg ("putupl #447 checktup",
+ /*putupl#442 */
+ melt_assertmsg ("putupl #442 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V741*/ meltfptr[740])) ==
+ ( /*_.VALTUP___V744*/ meltfptr[743])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #447 checkoff",
+ melt_assertmsg ("putupl #442 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V741*/
- meltfptr[740]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]);
+ ( /*_.VALTUP___V744*/
+ meltfptr[743]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V741*/ meltfptr[740]);
+ meltgc_touch ( /*_.VALTUP___V744*/ meltfptr[743]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[6] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V741*/ meltfptr[740]);
+ /*_.VALTUP___V744*/ meltfptr[743]);
MELT_LOCATION ("warmelt-genobj.melt:401:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V732*/ meltfptr[731]);
+ meltgc_touch ( /*_.VALDATA___V735*/ meltfptr[734]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V742*/ meltfptr[741])) ==
+ ( /*_.VALDATA___V745*/ meltfptr[744])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V742*/
- meltfptr[741]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] =
+ ( /*_.VALDATA___V745*/
+ meltfptr[744]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V743*/ meltfptr[742]);
+ /*_.VALSTR___V746*/ meltfptr[745]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V742*/ meltfptr[741]);
+ meltgc_touch ( /*_.VALDATA___V745*/ meltfptr[744]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V744*/ meltfptr[743])) ==
+ ( /*_.VALDATA___V747*/ meltfptr[746])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V744*/
- meltfptr[743]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]))->obj_vartab[1] =
+ ( /*_.VALDATA___V747*/
+ meltfptr[746]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V745*/ meltfptr[744]);
+ /*_.VALSTR___V748*/ meltfptr[747]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V744*/ meltfptr[743]);
+ meltgc_touch ( /*_.VALDATA___V747*/ meltfptr[746]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V746*/ meltfptr[745])) ==
+ ( /*_.VALDATA___V749*/ meltfptr[748])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V746*/
- meltfptr[745]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]))->obj_vartab[1] =
+ ( /*_.VALDATA___V749*/
+ meltfptr[748]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V747*/ meltfptr[746]);
+ /*_.VALSTR___V750*/ meltfptr[749]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V746*/ meltfptr[745]);
+ meltgc_touch ( /*_.VALDATA___V749*/ meltfptr[748]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V748*/ meltfptr[747])) ==
+ ( /*_.VALDATA___V751*/ meltfptr[750])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V748*/
- meltfptr[747]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] =
+ ( /*_.VALDATA___V751*/
+ meltfptr[750]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V749*/ meltfptr[748]);
+ /*_.VALSTR___V752*/ meltfptr[751]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V748*/ meltfptr[747]);
+ meltgc_touch ( /*_.VALDATA___V751*/ meltfptr[750]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V750*/ meltfptr[749])) ==
+ ( /*_.VALDATA___V753*/ meltfptr[752])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V750*/
- meltfptr[749]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[1] =
+ ( /*_.VALDATA___V753*/
+ meltfptr[752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V751*/ meltfptr[750]);
+ /*_.VALSTR___V754*/ meltfptr[753]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V750*/ meltfptr[749])) ==
+ ( /*_.VALDATA___V753*/ meltfptr[752])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V750*/
- meltfptr[749]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[4] =
+ ( /*_.VALDATA___V753*/
+ meltfptr[752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#448 */
- melt_assertmsg ("putupl #448 checktup",
+ /*putupl#443 */
+ melt_assertmsg ("putupl #443 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V752*/ meltfptr[751])) ==
+ ( /*_.VALTUP___V755*/ meltfptr[754])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #448 checkoff",
+ melt_assertmsg ("putupl #443 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V752*/
- meltfptr[751]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[0] =
+ ( /*_.VALTUP___V755*/
+ meltfptr[754]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V755*/ meltfptr[754]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51890,384 +52247,384 @@ warmelt_genobj_initialmeltchunk_9 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#449 */
- melt_assertmsg ("putupl #449 checktup",
+ /*putupl#444 */
+ melt_assertmsg ("putupl #444 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V752*/ meltfptr[751])) ==
+ ( /*_.VALTUP___V755*/ meltfptr[754])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #449 checkoff",
+ melt_assertmsg ("putupl #444 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V752*/
- meltfptr[751]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[1] =
+ ( /*_.VALTUP___V755*/
+ meltfptr[754]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V755*/ meltfptr[754]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#450 */
- melt_assertmsg ("putupl #450 checktup",
+ /*putupl#445 */
+ melt_assertmsg ("putupl #445 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V752*/ meltfptr[751])) ==
+ ( /*_.VALTUP___V755*/ meltfptr[754])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #450 checkoff",
+ melt_assertmsg ("putupl #445 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V752*/
- meltfptr[751]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V755*/
+ meltfptr[754]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V755*/ meltfptr[754]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V752*/ meltfptr[751]);
+ meltgc_touch ( /*_.VALTUP___V755*/ meltfptr[754]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V750*/ meltfptr[749])) ==
+ ( /*_.VALDATA___V753*/ meltfptr[752])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V750*/
- meltfptr[749]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[5] =
+ ( /*_.VALDATA___V753*/
+ meltfptr[752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V752*/ meltfptr[751]);
+ /*_.VALTUP___V755*/ meltfptr[754]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V753*/ meltfptr[752])) ==
+ ( /*_.VALDATA___V756*/ meltfptr[755])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V753*/
- meltfptr[752]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[1] =
+ ( /*_.VALDATA___V756*/
+ meltfptr[755]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V754*/ meltfptr[753]);
+ /*_.VALSTR___V757*/ meltfptr[756]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V753*/ meltfptr[752])) ==
+ ( /*_.VALDATA___V756*/ meltfptr[755])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V753*/
- meltfptr[752]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[2] =
+ ( /*_.VALDATA___V756*/
+ meltfptr[755]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V750*/ meltfptr[749]);
+ /*_.VALDATA___V753*/ meltfptr[752]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V753*/ meltfptr[752]);
+ meltgc_touch ( /*_.VALDATA___V756*/ meltfptr[755]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V755*/ meltfptr[754])) ==
+ ( /*_.VALDATA___V758*/ meltfptr[757])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V755*/
- meltfptr[754]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]))->obj_vartab[1] =
+ ( /*_.VALDATA___V758*/
+ meltfptr[757]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V756*/ meltfptr[755]);
+ /*_.VALSTR___V759*/ meltfptr[758]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V755*/ meltfptr[754])) ==
+ ( /*_.VALDATA___V758*/ meltfptr[757])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V755*/
- meltfptr[754]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]))->obj_vartab[2] =
+ ( /*_.VALDATA___V758*/
+ meltfptr[757]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V750*/ meltfptr[749]);
+ /*_.VALDATA___V753*/ meltfptr[752]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V755*/ meltfptr[754]);
+ meltgc_touch ( /*_.VALDATA___V758*/ meltfptr[757]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V757*/ meltfptr[756])) ==
+ ( /*_.VALDATA___V760*/ meltfptr[759])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V757*/
- meltfptr[756]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[1] =
+ ( /*_.VALDATA___V760*/
+ meltfptr[759]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V758*/ meltfptr[757]);
+ /*_.VALSTR___V761*/ meltfptr[760]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V757*/ meltfptr[756])) ==
+ ( /*_.VALDATA___V760*/ meltfptr[759])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V757*/
- meltfptr[756]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[2] =
+ ( /*_.VALDATA___V760*/
+ meltfptr[759]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V750*/ meltfptr[749]);
+ /*_.VALDATA___V753*/ meltfptr[752]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V757*/ meltfptr[756]);
+ meltgc_touch ( /*_.VALDATA___V760*/ meltfptr[759]);
- /*putupl#451 */
- melt_assertmsg ("putupl #451 checktup",
+ /*putupl#446 */
+ melt_assertmsg ("putupl #446 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V759*/ meltfptr[758])) ==
+ ( /*_.VALTUP___V762*/ meltfptr[761])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #451 checkoff",
+ melt_assertmsg ("putupl #446 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V759*/
- meltfptr[758]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V762*/
+ meltfptr[761]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#452 */
- melt_assertmsg ("putupl #452 checktup",
+ /*putupl#447 */
+ melt_assertmsg ("putupl #447 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V759*/ meltfptr[758])) ==
+ ( /*_.VALTUP___V762*/ meltfptr[761])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #452 checkoff",
+ melt_assertmsg ("putupl #447 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V759*/
- meltfptr[758]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]);
+ ( /*_.VALTUP___V762*/
+ meltfptr[761]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]);
- /*putupl#453 */
- melt_assertmsg ("putupl #453 checktup",
+ /*putupl#448 */
+ melt_assertmsg ("putupl #448 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V759*/ meltfptr[758])) ==
+ ( /*_.VALTUP___V762*/ meltfptr[761])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #453 checkoff",
+ melt_assertmsg ("putupl #448 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V759*/
- meltfptr[758]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]);
+ ( /*_.VALTUP___V762*/
+ meltfptr[761]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]);
- /*putupl#454 */
- melt_assertmsg ("putupl #454 checktup",
+ /*putupl#449 */
+ melt_assertmsg ("putupl #449 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V759*/ meltfptr[758])) ==
+ ( /*_.VALTUP___V762*/ meltfptr[761])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #454 checkoff",
+ melt_assertmsg ("putupl #449 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V759*/
- meltfptr[758]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
+ ( /*_.VALTUP___V762*/
+ meltfptr[761]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V759*/ meltfptr[758]);
+ meltgc_touch ( /*_.VALTUP___V762*/ meltfptr[761]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V750*/ meltfptr[749])) ==
+ ( /*_.VALDATA___V753*/ meltfptr[752])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V750*/
- meltfptr[749]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[6] =
+ ( /*_.VALDATA___V753*/
+ meltfptr[752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V759*/ meltfptr[758]);
+ /*_.VALTUP___V762*/ meltfptr[761]);
MELT_LOCATION ("warmelt-genobj.melt:409:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]);
+ meltgc_touch ( /*_.VALDATA___V753*/ meltfptr[752]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V760*/ meltfptr[759])) ==
+ ( /*_.VALDATA___V763*/ meltfptr[762])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V760*/
- meltfptr[759]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[1] =
+ ( /*_.VALDATA___V763*/
+ meltfptr[762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V761*/ meltfptr[760]);
+ /*_.VALSTR___V764*/ meltfptr[763]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V760*/ meltfptr[759]);
+ meltgc_touch ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V762*/ meltfptr[761])) ==
+ ( /*_.VALDATA___V765*/ meltfptr[764])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V762*/
- meltfptr[761]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]))->obj_vartab[1] =
+ ( /*_.VALDATA___V765*/
+ meltfptr[764]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V763*/ meltfptr[762]);
+ /*_.VALSTR___V766*/ meltfptr[765]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V762*/ meltfptr[761]);
+ meltgc_touch ( /*_.VALDATA___V765*/ meltfptr[764]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V764*/ meltfptr[763])) ==
+ ( /*_.VALDATA___V767*/ meltfptr[766])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V764*/
- meltfptr[763]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[1] =
+ ( /*_.VALDATA___V767*/
+ meltfptr[766]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V765*/ meltfptr[764]);
+ /*_.VALSTR___V768*/ meltfptr[767]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V764*/ meltfptr[763]);
+ meltgc_touch ( /*_.VALDATA___V767*/ meltfptr[766]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V766*/ meltfptr[765])) ==
+ ( /*_.VALDATA___V769*/ meltfptr[768])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V766*/
- meltfptr[765]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]))->obj_vartab[1] =
+ ( /*_.VALDATA___V769*/
+ meltfptr[768]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V767*/ meltfptr[766]);
+ /*_.VALSTR___V770*/ meltfptr[769]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V766*/ meltfptr[765]);
+ meltgc_touch ( /*_.VALDATA___V769*/ meltfptr[768]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V768*/ meltfptr[767])) ==
+ ( /*_.VALDATA___V771*/ meltfptr[770])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V768*/
- meltfptr[767]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[1] =
+ ( /*_.VALDATA___V771*/
+ meltfptr[770]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V769*/ meltfptr[768]);
+ /*_.VALSTR___V772*/ meltfptr[771]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V768*/ meltfptr[767])) ==
+ ( /*_.VALDATA___V771*/ meltfptr[770])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V768*/
- meltfptr[767]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[4] =
+ ( /*_.VALDATA___V771*/
+ meltfptr[770]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#455 */
- melt_assertmsg ("putupl #455 checktup",
+ /*putupl#450 */
+ melt_assertmsg ("putupl #450 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V770*/ meltfptr[769])) ==
+ ( /*_.VALTUP___V773*/ meltfptr[772])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #455 checkoff",
+ melt_assertmsg ("putupl #450 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V770*/
- meltfptr[769]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[0] =
+ ( /*_.VALTUP___V773*/
+ meltfptr[772]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V773*/ meltfptr[772]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52275,165 +52632,165 @@ warmelt_genobj_initialmeltchunk_9 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#456 */
- melt_assertmsg ("putupl #456 checktup",
+ /*putupl#451 */
+ melt_assertmsg ("putupl #451 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V770*/ meltfptr[769])) ==
+ ( /*_.VALTUP___V773*/ meltfptr[772])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #456 checkoff",
+ melt_assertmsg ("putupl #451 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V770*/
- meltfptr[769]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[1] =
+ ( /*_.VALTUP___V773*/
+ meltfptr[772]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V773*/ meltfptr[772]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#457 */
- melt_assertmsg ("putupl #457 checktup",
+ /*putupl#452 */
+ melt_assertmsg ("putupl #452 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V770*/ meltfptr[769])) ==
+ ( /*_.VALTUP___V773*/ meltfptr[772])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #457 checkoff",
+ melt_assertmsg ("putupl #452 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V770*/
- meltfptr[769]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V773*/
+ meltfptr[772]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V773*/ meltfptr[772]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V770*/ meltfptr[769]);
+ meltgc_touch ( /*_.VALTUP___V773*/ meltfptr[772]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V768*/ meltfptr[767])) ==
+ ( /*_.VALDATA___V771*/ meltfptr[770])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V768*/
- meltfptr[767]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[5] =
+ ( /*_.VALDATA___V771*/
+ meltfptr[770]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V770*/ meltfptr[769]);
+ /*_.VALTUP___V773*/ meltfptr[772]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V771*/ meltfptr[770])) ==
+ ( /*_.VALDATA___V774*/ meltfptr[773])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V771*/
- meltfptr[770]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[1] =
+ ( /*_.VALDATA___V774*/
+ meltfptr[773]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V772*/ meltfptr[771]);
+ /*_.VALSTR___V775*/ meltfptr[774]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V771*/ meltfptr[770])) ==
+ ( /*_.VALDATA___V774*/ meltfptr[773])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V771*/
- meltfptr[770]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[2] =
+ ( /*_.VALDATA___V774*/
+ meltfptr[773]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V768*/ meltfptr[767]);
+ /*_.VALDATA___V771*/ meltfptr[770]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V771*/ meltfptr[770]);
+ meltgc_touch ( /*_.VALDATA___V774*/ meltfptr[773]);
- /*putupl#458 */
- melt_assertmsg ("putupl #458 checktup",
+ /*putupl#453 */
+ melt_assertmsg ("putupl #453 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V773*/ meltfptr[772])) ==
+ ( /*_.VALTUP___V776*/ meltfptr[775])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #458 checkoff",
+ melt_assertmsg ("putupl #453 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V773*/
- meltfptr[772]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V773*/ meltfptr[772]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V776*/
+ meltfptr[775]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#459 */
- melt_assertmsg ("putupl #459 checktup",
+ /*putupl#454 */
+ melt_assertmsg ("putupl #454 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V773*/ meltfptr[772])) ==
+ ( /*_.VALTUP___V776*/ meltfptr[775])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #459 checkoff",
+ melt_assertmsg ("putupl #454 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V773*/
- meltfptr[772]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V773*/ meltfptr[772]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]);
+ ( /*_.VALTUP___V776*/
+ meltfptr[775]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V773*/ meltfptr[772]);
+ meltgc_touch ( /*_.VALTUP___V776*/ meltfptr[775]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V768*/ meltfptr[767])) ==
+ ( /*_.VALDATA___V771*/ meltfptr[770])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V768*/
- meltfptr[767]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[6] =
+ ( /*_.VALDATA___V771*/
+ meltfptr[770]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V773*/ meltfptr[772]);
+ /*_.VALTUP___V776*/ meltfptr[775]);
MELT_LOCATION ("warmelt-genobj.melt:418:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V768*/ meltfptr[767]);
+ meltgc_touch ( /*_.VALDATA___V771*/ meltfptr[770]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V774*/ meltfptr[773])) ==
+ ( /*_.VALDATA___V777*/ meltfptr[776])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V774*/
- meltfptr[773]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]))->obj_vartab[1] =
+ ( /*_.VALDATA___V777*/
+ meltfptr[776]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V775*/ meltfptr[774]);
+ /*_.VALSTR___V778*/ meltfptr[777]);
#undef meltfram__
@@ -52447,75 +52804,75 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
#undef meltcallcount
#define meltcallcount 0L
/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V774*/ meltfptr[773]);
+ meltgc_touch ( /*_.VALDATA___V777*/ meltfptr[776]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V776*/ meltfptr[775])) ==
+ ( /*_.VALDATA___V779*/ meltfptr[778])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V776*/
- meltfptr[775]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] =
+ ( /*_.VALDATA___V779*/
+ meltfptr[778]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V777*/ meltfptr[776]);
+ /*_.VALSTR___V780*/ meltfptr[779]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V776*/ meltfptr[775]);
+ meltgc_touch ( /*_.VALDATA___V779*/ meltfptr[778]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V778*/ meltfptr[777])) ==
+ ( /*_.VALDATA___V781*/ meltfptr[780])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V778*/
- meltfptr[777]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[1] =
+ ( /*_.VALDATA___V781*/
+ meltfptr[780]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V779*/ meltfptr[778]);
+ /*_.VALSTR___V782*/ meltfptr[781]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V778*/ meltfptr[777])) ==
+ ( /*_.VALDATA___V781*/ meltfptr[780])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V778*/
- meltfptr[777]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[4] =
+ ( /*_.VALDATA___V781*/
+ meltfptr[780]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V768*/ meltfptr[767]);
+ /*_.VALDATA___V771*/ meltfptr[770]);
- /*putupl#460 */
- melt_assertmsg ("putupl #460 checktup",
+ /*putupl#455 */
+ melt_assertmsg ("putupl #455 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V780*/ meltfptr[779])) ==
+ ( /*_.VALTUP___V783*/ meltfptr[782])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #460 checkoff",
+ melt_assertmsg ("putupl #455 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V780*/
- meltfptr[779]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V780*/ meltfptr[779]))->tabval[0] =
+ ( /*_.VALTUP___V783*/
+ meltfptr[782]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52523,264 +52880,264 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#461 */
- melt_assertmsg ("putupl #461 checktup",
+ /*putupl#456 */
+ melt_assertmsg ("putupl #456 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V780*/ meltfptr[779])) ==
+ ( /*_.VALTUP___V783*/ meltfptr[782])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #461 checkoff",
+ melt_assertmsg ("putupl #456 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V780*/
- meltfptr[779]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V780*/ meltfptr[779]))->tabval[1] =
+ ( /*_.VALTUP___V783*/
+ meltfptr[782]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#462 */
- melt_assertmsg ("putupl #462 checktup",
+ /*putupl#457 */
+ melt_assertmsg ("putupl #457 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V780*/ meltfptr[779])) ==
+ ( /*_.VALTUP___V783*/ meltfptr[782])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #462 checkoff",
+ melt_assertmsg ("putupl #457 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V780*/
- meltfptr[779]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V780*/ meltfptr[779]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V783*/
+ meltfptr[782]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#463 */
- melt_assertmsg ("putupl #463 checktup",
+ /*putupl#458 */
+ melt_assertmsg ("putupl #458 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V780*/ meltfptr[779])) ==
+ ( /*_.VALTUP___V783*/ meltfptr[782])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #463 checkoff",
+ melt_assertmsg ("putupl #458 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V780*/
- meltfptr[779]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V780*/ meltfptr[779]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]);
+ ( /*_.VALTUP___V783*/
+ meltfptr[782]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V780*/ meltfptr[779]);
+ meltgc_touch ( /*_.VALTUP___V783*/ meltfptr[782]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V778*/ meltfptr[777])) ==
+ ( /*_.VALDATA___V781*/ meltfptr[780])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V778*/
- meltfptr[777]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[5] =
+ ( /*_.VALDATA___V781*/
+ meltfptr[780]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V780*/ meltfptr[779]);
+ /*_.VALTUP___V783*/ meltfptr[782]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V781*/ meltfptr[780])) ==
+ ( /*_.VALDATA___V784*/ meltfptr[783])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V781*/
- meltfptr[780]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[1] =
+ ( /*_.VALDATA___V784*/
+ meltfptr[783]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V782*/ meltfptr[781]);
+ /*_.VALSTR___V785*/ meltfptr[784]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V781*/ meltfptr[780])) ==
+ ( /*_.VALDATA___V784*/ meltfptr[783])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V781*/
- meltfptr[780]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[2] =
+ ( /*_.VALDATA___V784*/
+ meltfptr[783]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V778*/ meltfptr[777]);
+ /*_.VALDATA___V781*/ meltfptr[780]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V781*/ meltfptr[780]);
+ meltgc_touch ( /*_.VALDATA___V784*/ meltfptr[783]);
- /*putupl#464 */
- melt_assertmsg ("putupl #464 checktup",
+ /*putupl#459 */
+ melt_assertmsg ("putupl #459 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V783*/ meltfptr[782])) ==
+ ( /*_.VALTUP___V786*/ meltfptr[785])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #464 checkoff",
+ melt_assertmsg ("putupl #459 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V783*/
- meltfptr[782]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V786*/
+ meltfptr[785]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V786*/ meltfptr[785]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#465 */
- melt_assertmsg ("putupl #465 checktup",
+ /*putupl#460 */
+ melt_assertmsg ("putupl #460 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V783*/ meltfptr[782])) ==
+ ( /*_.VALTUP___V786*/ meltfptr[785])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #465 checkoff",
+ melt_assertmsg ("putupl #460 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V783*/
- meltfptr[782]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]);
+ ( /*_.VALTUP___V786*/
+ meltfptr[785]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V786*/ meltfptr[785]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]);
- /*putupl#466 */
- melt_assertmsg ("putupl #466 checktup",
+ /*putupl#461 */
+ melt_assertmsg ("putupl #461 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V783*/ meltfptr[782])) ==
+ ( /*_.VALTUP___V786*/ meltfptr[785])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #466 checkoff",
+ melt_assertmsg ("putupl #461 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V783*/
- meltfptr[782]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V783*/ meltfptr[782]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]);
+ ( /*_.VALTUP___V786*/
+ meltfptr[785]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V786*/ meltfptr[785]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V783*/ meltfptr[782]);
+ meltgc_touch ( /*_.VALTUP___V786*/ meltfptr[785]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V778*/ meltfptr[777])) ==
+ ( /*_.VALDATA___V781*/ meltfptr[780])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V778*/
- meltfptr[777]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[6] =
+ ( /*_.VALDATA___V781*/
+ meltfptr[780]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V783*/ meltfptr[782]);
+ /*_.VALTUP___V786*/ meltfptr[785]);
MELT_LOCATION ("warmelt-genobj.melt:423:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V778*/ meltfptr[777]);
+ meltgc_touch ( /*_.VALDATA___V781*/ meltfptr[780]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V784*/ meltfptr[783])) ==
+ ( /*_.VALDATA___V787*/ meltfptr[786])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V784*/
- meltfptr[783]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[1] =
+ ( /*_.VALDATA___V787*/
+ meltfptr[786]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V785*/ meltfptr[784]);
+ /*_.VALSTR___V788*/ meltfptr[787]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V784*/ meltfptr[783]);
+ meltgc_touch ( /*_.VALDATA___V787*/ meltfptr[786]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V786*/ meltfptr[785])) ==
+ ( /*_.VALDATA___V789*/ meltfptr[788])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V786*/
- meltfptr[785]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[1] =
+ ( /*_.VALDATA___V789*/
+ meltfptr[788]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V787*/ meltfptr[786]);
+ /*_.VALSTR___V790*/ meltfptr[789]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V786*/ meltfptr[785]);
+ meltgc_touch ( /*_.VALDATA___V789*/ meltfptr[788]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V788*/ meltfptr[787])) ==
+ ( /*_.VALDATA___V791*/ meltfptr[790])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V788*/
- meltfptr[787]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[1] =
+ ( /*_.VALDATA___V791*/
+ meltfptr[790]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V789*/ meltfptr[788]);
+ /*_.VALSTR___V792*/ meltfptr[791]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V788*/ meltfptr[787])) ==
+ ( /*_.VALDATA___V791*/ meltfptr[790])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V788*/
- meltfptr[787]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[4] =
+ ( /*_.VALDATA___V791*/
+ meltfptr[790]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V768*/ meltfptr[767]);
+ /*_.VALDATA___V771*/ meltfptr[770]);
- /*putupl#467 */
- melt_assertmsg ("putupl #467 checktup",
+ /*putupl#462 */
+ melt_assertmsg ("putupl #462 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V790*/ meltfptr[789])) ==
+ ( /*_.VALTUP___V793*/ meltfptr[792])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #467 checkoff",
+ melt_assertmsg ("putupl #462 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V790*/
- meltfptr[789]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V790*/ meltfptr[789]))->tabval[0] =
+ ( /*_.VALTUP___V793*/
+ meltfptr[792]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52788,264 +53145,264 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#468 */
- melt_assertmsg ("putupl #468 checktup",
+ /*putupl#463 */
+ melt_assertmsg ("putupl #463 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V790*/ meltfptr[789])) ==
+ ( /*_.VALTUP___V793*/ meltfptr[792])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #468 checkoff",
+ melt_assertmsg ("putupl #463 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V790*/
- meltfptr[789]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V790*/ meltfptr[789]))->tabval[1] =
+ ( /*_.VALTUP___V793*/
+ meltfptr[792]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#469 */
- melt_assertmsg ("putupl #469 checktup",
+ /*putupl#464 */
+ melt_assertmsg ("putupl #464 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V790*/ meltfptr[789])) ==
+ ( /*_.VALTUP___V793*/ meltfptr[792])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #469 checkoff",
+ melt_assertmsg ("putupl #464 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V790*/
- meltfptr[789]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V790*/ meltfptr[789]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V793*/
+ meltfptr[792]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#470 */
- melt_assertmsg ("putupl #470 checktup",
+ /*putupl#465 */
+ melt_assertmsg ("putupl #465 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V790*/ meltfptr[789])) ==
+ ( /*_.VALTUP___V793*/ meltfptr[792])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #470 checkoff",
+ melt_assertmsg ("putupl #465 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V790*/
- meltfptr[789]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V790*/ meltfptr[789]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]);
+ ( /*_.VALTUP___V793*/
+ meltfptr[792]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V790*/ meltfptr[789]);
+ meltgc_touch ( /*_.VALTUP___V793*/ meltfptr[792]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V788*/ meltfptr[787])) ==
+ ( /*_.VALDATA___V791*/ meltfptr[790])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V788*/
- meltfptr[787]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[5] =
+ ( /*_.VALDATA___V791*/
+ meltfptr[790]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V790*/ meltfptr[789]);
+ /*_.VALTUP___V793*/ meltfptr[792]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V791*/ meltfptr[790])) ==
+ ( /*_.VALDATA___V794*/ meltfptr[793])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V791*/
- meltfptr[790]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[1] =
+ ( /*_.VALDATA___V794*/
+ meltfptr[793]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V792*/ meltfptr[791]);
+ /*_.VALSTR___V795*/ meltfptr[794]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V791*/ meltfptr[790])) ==
+ ( /*_.VALDATA___V794*/ meltfptr[793])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V791*/
- meltfptr[790]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[2] =
+ ( /*_.VALDATA___V794*/
+ meltfptr[793]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V788*/ meltfptr[787]);
+ /*_.VALDATA___V791*/ meltfptr[790]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V791*/ meltfptr[790]);
+ meltgc_touch ( /*_.VALDATA___V794*/ meltfptr[793]);
- /*putupl#471 */
- melt_assertmsg ("putupl #471 checktup",
+ /*putupl#466 */
+ melt_assertmsg ("putupl #466 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V793*/ meltfptr[792])) ==
+ ( /*_.VALTUP___V796*/ meltfptr[795])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #471 checkoff",
+ melt_assertmsg ("putupl #466 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V793*/
- meltfptr[792]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V796*/
+ meltfptr[795]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V796*/ meltfptr[795]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#472 */
- melt_assertmsg ("putupl #472 checktup",
+ /*putupl#467 */
+ melt_assertmsg ("putupl #467 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V793*/ meltfptr[792])) ==
+ ( /*_.VALTUP___V796*/ meltfptr[795])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #472 checkoff",
+ melt_assertmsg ("putupl #467 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V793*/
- meltfptr[792]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]);
+ ( /*_.VALTUP___V796*/
+ meltfptr[795]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V796*/ meltfptr[795]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]);
- /*putupl#473 */
- melt_assertmsg ("putupl #473 checktup",
+ /*putupl#468 */
+ melt_assertmsg ("putupl #468 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V793*/ meltfptr[792])) ==
+ ( /*_.VALTUP___V796*/ meltfptr[795])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #473 checkoff",
+ melt_assertmsg ("putupl #468 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V793*/
- meltfptr[792]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V793*/ meltfptr[792]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]);
+ ( /*_.VALTUP___V796*/
+ meltfptr[795]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V796*/ meltfptr[795]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V793*/ meltfptr[792]);
+ meltgc_touch ( /*_.VALTUP___V796*/ meltfptr[795]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V788*/ meltfptr[787])) ==
+ ( /*_.VALDATA___V791*/ meltfptr[790])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V788*/
- meltfptr[787]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[6] =
+ ( /*_.VALDATA___V791*/
+ meltfptr[790]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V793*/ meltfptr[792]);
+ /*_.VALTUP___V796*/ meltfptr[795]);
MELT_LOCATION ("warmelt-genobj.melt:428:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V788*/ meltfptr[787]);
+ meltgc_touch ( /*_.VALDATA___V791*/ meltfptr[790]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V794*/ meltfptr[793])) ==
+ ( /*_.VALDATA___V797*/ meltfptr[796])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V794*/
- meltfptr[793]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]))->obj_vartab[1] =
+ ( /*_.VALDATA___V797*/
+ meltfptr[796]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V795*/ meltfptr[794]);
+ /*_.VALSTR___V798*/ meltfptr[797]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V794*/ meltfptr[793]);
+ meltgc_touch ( /*_.VALDATA___V797*/ meltfptr[796]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V796*/ meltfptr[795])) ==
+ ( /*_.VALDATA___V799*/ meltfptr[798])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V796*/
- meltfptr[795]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] =
+ ( /*_.VALDATA___V799*/
+ meltfptr[798]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V797*/ meltfptr[796]);
+ /*_.VALSTR___V800*/ meltfptr[799]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V796*/ meltfptr[795]);
+ meltgc_touch ( /*_.VALDATA___V799*/ meltfptr[798]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V798*/ meltfptr[797])) ==
+ ( /*_.VALDATA___V801*/ meltfptr[800])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V798*/
- meltfptr[797]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] =
+ ( /*_.VALDATA___V801*/
+ meltfptr[800]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V799*/ meltfptr[798]);
+ /*_.VALSTR___V802*/ meltfptr[801]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V798*/ meltfptr[797])) ==
+ ( /*_.VALDATA___V801*/ meltfptr[800])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V798*/
- meltfptr[797]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[4] =
+ ( /*_.VALDATA___V801*/
+ meltfptr[800]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#474 */
- melt_assertmsg ("putupl #474 checktup",
+ /*putupl#469 */
+ melt_assertmsg ("putupl #469 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V800*/ meltfptr[799])) ==
+ ( /*_.VALTUP___V803*/ meltfptr[802])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #474 checkoff",
+ melt_assertmsg ("putupl #469 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V800*/
- meltfptr[799]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[0] =
+ ( /*_.VALTUP___V803*/
+ meltfptr[802]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V803*/ meltfptr[802]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -53053,384 +53410,384 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#475 */
- melt_assertmsg ("putupl #475 checktup",
+ /*putupl#470 */
+ melt_assertmsg ("putupl #470 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V800*/ meltfptr[799])) ==
+ ( /*_.VALTUP___V803*/ meltfptr[802])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #475 checkoff",
+ melt_assertmsg ("putupl #470 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V800*/
- meltfptr[799]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[1] =
+ ( /*_.VALTUP___V803*/
+ meltfptr[802]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V803*/ meltfptr[802]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#476 */
- melt_assertmsg ("putupl #476 checktup",
+ /*putupl#471 */
+ melt_assertmsg ("putupl #471 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V800*/ meltfptr[799])) ==
+ ( /*_.VALTUP___V803*/ meltfptr[802])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #476 checkoff",
+ melt_assertmsg ("putupl #471 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V800*/
- meltfptr[799]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V803*/
+ meltfptr[802]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V803*/ meltfptr[802]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V800*/ meltfptr[799]);
+ meltgc_touch ( /*_.VALTUP___V803*/ meltfptr[802]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V798*/ meltfptr[797])) ==
+ ( /*_.VALDATA___V801*/ meltfptr[800])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V798*/
- meltfptr[797]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[5] =
+ ( /*_.VALDATA___V801*/
+ meltfptr[800]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V800*/ meltfptr[799]);
+ /*_.VALTUP___V803*/ meltfptr[802]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V801*/ meltfptr[800])) ==
+ ( /*_.VALDATA___V804*/ meltfptr[803])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V801*/
- meltfptr[800]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] =
+ ( /*_.VALDATA___V804*/
+ meltfptr[803]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V802*/ meltfptr[801]);
+ /*_.VALSTR___V805*/ meltfptr[804]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V801*/ meltfptr[800])) ==
+ ( /*_.VALDATA___V804*/ meltfptr[803])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V801*/
- meltfptr[800]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[2] =
+ ( /*_.VALDATA___V804*/
+ meltfptr[803]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V798*/ meltfptr[797]);
+ /*_.VALDATA___V801*/ meltfptr[800]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V801*/ meltfptr[800]);
+ meltgc_touch ( /*_.VALDATA___V804*/ meltfptr[803]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V803*/ meltfptr[802])) ==
+ ( /*_.VALDATA___V806*/ meltfptr[805])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V803*/
- meltfptr[802]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]))->obj_vartab[1] =
+ ( /*_.VALDATA___V806*/
+ meltfptr[805]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V804*/ meltfptr[803]);
+ /*_.VALSTR___V807*/ meltfptr[806]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V803*/ meltfptr[802])) ==
+ ( /*_.VALDATA___V806*/ meltfptr[805])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V803*/
- meltfptr[802]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]))->obj_vartab[2] =
+ ( /*_.VALDATA___V806*/
+ meltfptr[805]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V798*/ meltfptr[797]);
+ /*_.VALDATA___V801*/ meltfptr[800]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V803*/ meltfptr[802]);
+ meltgc_touch ( /*_.VALDATA___V806*/ meltfptr[805]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V805*/ meltfptr[804])) ==
+ ( /*_.VALDATA___V808*/ meltfptr[807])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V805*/
- meltfptr[804]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]))->obj_vartab[1] =
+ ( /*_.VALDATA___V808*/
+ meltfptr[807]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V806*/ meltfptr[805]);
+ /*_.VALSTR___V809*/ meltfptr[808]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V805*/ meltfptr[804])) ==
+ ( /*_.VALDATA___V808*/ meltfptr[807])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V805*/
- meltfptr[804]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]))->obj_vartab[2] =
+ ( /*_.VALDATA___V808*/
+ meltfptr[807]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V798*/ meltfptr[797]);
+ /*_.VALDATA___V801*/ meltfptr[800]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V805*/ meltfptr[804]);
+ meltgc_touch ( /*_.VALDATA___V808*/ meltfptr[807]);
- /*putupl#477 */
- melt_assertmsg ("putupl #477 checktup",
+ /*putupl#472 */
+ melt_assertmsg ("putupl #472 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #477 checkoff",
+ melt_assertmsg ("putupl #472 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#478 */
- melt_assertmsg ("putupl #478 checktup",
+ /*putupl#473 */
+ melt_assertmsg ("putupl #473 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #478 checkoff",
+ melt_assertmsg ("putupl #473 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
- /*putupl#479 */
- melt_assertmsg ("putupl #479 checktup",
+ /*putupl#474 */
+ melt_assertmsg ("putupl #474 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #479 checkoff",
+ melt_assertmsg ("putupl #474 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]);
- /*putupl#480 */
- melt_assertmsg ("putupl #480 checktup",
+ /*putupl#475 */
+ melt_assertmsg ("putupl #475 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #480 checkoff",
+ melt_assertmsg ("putupl #475 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V807*/ meltfptr[806]);
+ meltgc_touch ( /*_.VALTUP___V810*/ meltfptr[809]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V798*/ meltfptr[797])) ==
+ ( /*_.VALDATA___V801*/ meltfptr[800])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V798*/
- meltfptr[797]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[6] =
+ ( /*_.VALDATA___V801*/
+ meltfptr[800]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V807*/ meltfptr[806]);
+ /*_.VALTUP___V810*/ meltfptr[809]);
MELT_LOCATION ("warmelt-genobj.melt:434:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V798*/ meltfptr[797]);
+ meltgc_touch ( /*_.VALDATA___V801*/ meltfptr[800]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V808*/ meltfptr[807])) ==
+ ( /*_.VALDATA___V811*/ meltfptr[810])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V808*/
- meltfptr[807]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]))->obj_vartab[1] =
+ ( /*_.VALDATA___V811*/
+ meltfptr[810]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V809*/ meltfptr[808]);
+ /*_.VALSTR___V812*/ meltfptr[811]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V808*/ meltfptr[807]);
+ meltgc_touch ( /*_.VALDATA___V811*/ meltfptr[810]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V810*/ meltfptr[809])) ==
+ ( /*_.VALDATA___V813*/ meltfptr[812])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V810*/
- meltfptr[809]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[1] =
+ ( /*_.VALDATA___V813*/
+ meltfptr[812]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V811*/ meltfptr[810]);
+ /*_.VALSTR___V814*/ meltfptr[813]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V810*/ meltfptr[809]);
+ meltgc_touch ( /*_.VALDATA___V813*/ meltfptr[812]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V812*/ meltfptr[811])) ==
+ ( /*_.VALDATA___V815*/ meltfptr[814])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V812*/
- meltfptr[811]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]))->obj_vartab[1] =
+ ( /*_.VALDATA___V815*/
+ meltfptr[814]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V813*/ meltfptr[812]);
+ /*_.VALSTR___V816*/ meltfptr[815]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V812*/ meltfptr[811]);
+ meltgc_touch ( /*_.VALDATA___V815*/ meltfptr[814]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V814*/ meltfptr[813])) ==
+ ( /*_.VALDATA___V817*/ meltfptr[816])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V814*/
- meltfptr[813]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813]))->obj_vartab[1] =
+ ( /*_.VALDATA___V817*/
+ meltfptr[816]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V815*/ meltfptr[814]);
+ /*_.VALSTR___V818*/ meltfptr[817]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V814*/ meltfptr[813]);
+ meltgc_touch ( /*_.VALDATA___V817*/ meltfptr[816]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V816*/ meltfptr[815])) ==
+ ( /*_.VALDATA___V819*/ meltfptr[818])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V816*/
- meltfptr[815]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[1] =
+ ( /*_.VALDATA___V819*/
+ meltfptr[818]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V817*/ meltfptr[816]);
+ /*_.VALSTR___V820*/ meltfptr[819]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V816*/ meltfptr[815])) ==
+ ( /*_.VALDATA___V819*/ meltfptr[818])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V816*/
- meltfptr[815]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[4] =
+ ( /*_.VALDATA___V819*/
+ meltfptr[818]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#481 */
- melt_assertmsg ("putupl #481 checktup",
+ /*putupl#476 */
+ melt_assertmsg ("putupl #476 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V818*/ meltfptr[817])) ==
+ ( /*_.VALTUP___V821*/ meltfptr[820])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #481 checkoff",
+ melt_assertmsg ("putupl #476 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V818*/
- meltfptr[817]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[0] =
+ ( /*_.VALTUP___V821*/
+ meltfptr[820]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -53438,458 +53795,458 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#482 */
- melt_assertmsg ("putupl #482 checktup",
+ /*putupl#477 */
+ melt_assertmsg ("putupl #477 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V818*/ meltfptr[817])) ==
+ ( /*_.VALTUP___V821*/ meltfptr[820])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #482 checkoff",
+ melt_assertmsg ("putupl #477 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V818*/
- meltfptr[817]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[1] =
+ ( /*_.VALTUP___V821*/
+ meltfptr[820]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#483 */
- melt_assertmsg ("putupl #483 checktup",
+ /*putupl#478 */
+ melt_assertmsg ("putupl #478 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V818*/ meltfptr[817])) ==
+ ( /*_.VALTUP___V821*/ meltfptr[820])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #483 checkoff",
+ melt_assertmsg ("putupl #478 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V818*/
- meltfptr[817]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V821*/
+ meltfptr[820]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V818*/ meltfptr[817]);
+ meltgc_touch ( /*_.VALTUP___V821*/ meltfptr[820]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V816*/ meltfptr[815])) ==
+ ( /*_.VALDATA___V819*/ meltfptr[818])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V816*/
- meltfptr[815]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[5] =
+ ( /*_.VALDATA___V819*/
+ meltfptr[818]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V818*/ meltfptr[817]);
+ /*_.VALTUP___V821*/ meltfptr[820]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V819*/ meltfptr[818])) ==
+ ( /*_.VALDATA___V822*/ meltfptr[821])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V819*/
- meltfptr[818]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[1] =
+ ( /*_.VALDATA___V822*/
+ meltfptr[821]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V820*/ meltfptr[819]);
+ /*_.VALSTR___V823*/ meltfptr[822]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V819*/ meltfptr[818])) ==
+ ( /*_.VALDATA___V822*/ meltfptr[821])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V819*/
- meltfptr[818]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[2] =
+ ( /*_.VALDATA___V822*/
+ meltfptr[821]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V816*/ meltfptr[815]);
+ /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]);
+ meltgc_touch ( /*_.VALDATA___V822*/ meltfptr[821]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V821*/ meltfptr[820])) ==
+ ( /*_.VALDATA___V824*/ meltfptr[823])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V821*/
- meltfptr[820]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]))->obj_vartab[1] =
+ ( /*_.VALDATA___V824*/
+ meltfptr[823]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V822*/ meltfptr[821]);
+ /*_.VALSTR___V825*/ meltfptr[824]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V821*/ meltfptr[820])) ==
+ ( /*_.VALDATA___V824*/ meltfptr[823])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V821*/
- meltfptr[820]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]))->obj_vartab[2] =
+ ( /*_.VALDATA___V824*/
+ meltfptr[823]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V816*/ meltfptr[815]);
+ /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V821*/ meltfptr[820]);
+ meltgc_touch ( /*_.VALDATA___V824*/ meltfptr[823]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V823*/ meltfptr[822])) ==
+ ( /*_.VALDATA___V826*/ meltfptr[825])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V823*/
- meltfptr[822]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] =
+ ( /*_.VALDATA___V826*/
+ meltfptr[825]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V824*/ meltfptr[823]);
+ /*_.VALSTR___V827*/ meltfptr[826]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V823*/ meltfptr[822])) ==
+ ( /*_.VALDATA___V826*/ meltfptr[825])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V823*/
- meltfptr[822]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[2] =
+ ( /*_.VALDATA___V826*/
+ meltfptr[825]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V816*/ meltfptr[815]);
+ /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V823*/ meltfptr[822]);
+ meltgc_touch ( /*_.VALDATA___V826*/ meltfptr[825]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V825*/ meltfptr[824])) ==
+ ( /*_.VALDATA___V828*/ meltfptr[827])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V825*/
- meltfptr[824]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[1] =
+ ( /*_.VALDATA___V828*/
+ meltfptr[827]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V826*/ meltfptr[825]);
+ /*_.VALSTR___V829*/ meltfptr[828]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V825*/ meltfptr[824])) ==
+ ( /*_.VALDATA___V828*/ meltfptr[827])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V825*/
- meltfptr[824]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[2] =
+ ( /*_.VALDATA___V828*/
+ meltfptr[827]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V816*/ meltfptr[815]);
+ /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V825*/ meltfptr[824]);
+ meltgc_touch ( /*_.VALDATA___V828*/ meltfptr[827]);
- /*putupl#484 */
- melt_assertmsg ("putupl #484 checktup",
+ /*putupl#479 */
+ melt_assertmsg ("putupl #479 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V827*/ meltfptr[826])) ==
+ ( /*_.VALTUP___V830*/ meltfptr[829])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #484 checkoff",
+ melt_assertmsg ("putupl #479 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V827*/
- meltfptr[826]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V827*/ meltfptr[826]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V830*/
+ meltfptr[829]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V830*/ meltfptr[829]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#485 */
- melt_assertmsg ("putupl #485 checktup",
+ /*putupl#480 */
+ melt_assertmsg ("putupl #480 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V827*/ meltfptr[826])) ==
+ ( /*_.VALTUP___V830*/ meltfptr[829])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #485 checkoff",
+ melt_assertmsg ("putupl #480 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V827*/
- meltfptr[826]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V827*/ meltfptr[826]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
+ ( /*_.VALTUP___V830*/
+ meltfptr[829]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V830*/ meltfptr[829]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]);
- /*putupl#486 */
- melt_assertmsg ("putupl #486 checktup",
+ /*putupl#481 */
+ melt_assertmsg ("putupl #481 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V827*/ meltfptr[826])) ==
+ ( /*_.VALTUP___V830*/ meltfptr[829])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #486 checkoff",
+ melt_assertmsg ("putupl #481 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V827*/
- meltfptr[826]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V827*/ meltfptr[826]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]);
+ ( /*_.VALTUP___V830*/
+ meltfptr[829]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V830*/ meltfptr[829]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]);
- /*putupl#487 */
- melt_assertmsg ("putupl #487 checktup",
+ /*putupl#482 */
+ melt_assertmsg ("putupl #482 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V827*/ meltfptr[826])) ==
+ ( /*_.VALTUP___V830*/ meltfptr[829])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #487 checkoff",
+ melt_assertmsg ("putupl #482 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V827*/
- meltfptr[826]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V827*/ meltfptr[826]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
+ ( /*_.VALTUP___V830*/
+ meltfptr[829]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V830*/ meltfptr[829]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]);
- /*putupl#488 */
- melt_assertmsg ("putupl #488 checktup",
+ /*putupl#483 */
+ melt_assertmsg ("putupl #483 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V827*/ meltfptr[826])) ==
+ ( /*_.VALTUP___V830*/ meltfptr[829])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #488 checkoff",
+ melt_assertmsg ("putupl #483 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V827*/
- meltfptr[826]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V827*/ meltfptr[826]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]);
+ ( /*_.VALTUP___V830*/
+ meltfptr[829]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V830*/ meltfptr[829]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V827*/ meltfptr[826]);
+ meltgc_touch ( /*_.VALTUP___V830*/ meltfptr[829]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V816*/ meltfptr[815])) ==
+ ( /*_.VALDATA___V819*/ meltfptr[818])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V816*/
- meltfptr[815]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[6] =
+ ( /*_.VALDATA___V819*/
+ meltfptr[818]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V827*/ meltfptr[826]);
+ /*_.VALTUP___V830*/ meltfptr[829]);
MELT_LOCATION ("warmelt-genobj.melt:442:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V816*/ meltfptr[815]);
+ meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V828*/ meltfptr[827])) ==
+ ( /*_.VALDATA___V831*/ meltfptr[830])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V828*/
- meltfptr[827]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]))->obj_vartab[1] =
+ ( /*_.VALDATA___V831*/
+ meltfptr[830]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V829*/ meltfptr[828]);
+ /*_.VALSTR___V832*/ meltfptr[831]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V828*/ meltfptr[827]);
+ meltgc_touch ( /*_.VALDATA___V831*/ meltfptr[830]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V830*/ meltfptr[829])) ==
+ ( /*_.VALDATA___V833*/ meltfptr[832])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V830*/
- meltfptr[829]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[1] =
+ ( /*_.VALDATA___V833*/
+ meltfptr[832]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V831*/ meltfptr[830]);
+ /*_.VALSTR___V834*/ meltfptr[833]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V830*/ meltfptr[829]);
+ meltgc_touch ( /*_.VALDATA___V833*/ meltfptr[832]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V832*/ meltfptr[831])) ==
+ ( /*_.VALDATA___V835*/ meltfptr[834])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V832*/
- meltfptr[831]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]))->obj_vartab[1] =
+ ( /*_.VALDATA___V835*/
+ meltfptr[834]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V833*/ meltfptr[832]);
+ /*_.VALSTR___V836*/ meltfptr[835]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V832*/ meltfptr[831]);
+ meltgc_touch ( /*_.VALDATA___V835*/ meltfptr[834]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V834*/ meltfptr[833])) ==
+ ( /*_.VALDATA___V837*/ meltfptr[836])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V834*/
- meltfptr[833]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V834*/ meltfptr[833]))->obj_vartab[1] =
+ ( /*_.VALDATA___V837*/
+ meltfptr[836]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V835*/ meltfptr[834]);
+ /*_.VALSTR___V838*/ meltfptr[837]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V834*/ meltfptr[833]);
+ meltgc_touch ( /*_.VALDATA___V837*/ meltfptr[836]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V836*/ meltfptr[835])) ==
+ ( /*_.VALDATA___V839*/ meltfptr[838])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V836*/
- meltfptr[835]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835]))->obj_vartab[1] =
+ ( /*_.VALDATA___V839*/
+ meltfptr[838]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V837*/ meltfptr[836]);
+ /*_.VALSTR___V840*/ meltfptr[839]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V836*/ meltfptr[835]);
+ meltgc_touch ( /*_.VALDATA___V839*/ meltfptr[838]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V838*/ meltfptr[837])) ==
+ ( /*_.VALDATA___V841*/ meltfptr[840])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V838*/
- meltfptr[837]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[1] =
+ ( /*_.VALDATA___V841*/
+ meltfptr[840]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V839*/ meltfptr[838]);
+ /*_.VALSTR___V842*/ meltfptr[841]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V838*/ meltfptr[837])) ==
+ ( /*_.VALDATA___V841*/ meltfptr[840])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V838*/
- meltfptr[837]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[4] =
+ ( /*_.VALDATA___V841*/
+ meltfptr[840]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V364*/ meltfptr[363]);
+ /*_.VALDATA___V367*/ meltfptr[366]);
- /*putupl#489 */
- melt_assertmsg ("putupl #489 checktup",
+ /*putupl#484 */
+ melt_assertmsg ("putupl #484 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V840*/ meltfptr[839])) ==
+ ( /*_.VALTUP___V843*/ meltfptr[842])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #489 checkoff",
+ melt_assertmsg ("putupl #484 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V840*/
- meltfptr[839]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V840*/ meltfptr[839]))->tabval[0] =
+ ( /*_.VALTUP___V843*/
+ meltfptr[842]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -53897,164 +54254,164 @@ warmelt_genobj_initialmeltchunk_10 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#490 */
- melt_assertmsg ("putupl #490 checktup",
+ /*putupl#485 */
+ melt_assertmsg ("putupl #485 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V840*/ meltfptr[839])) ==
+ ( /*_.VALTUP___V843*/ meltfptr[842])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #490 checkoff",
+ melt_assertmsg ("putupl #485 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V840*/
- meltfptr[839]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V840*/ meltfptr[839]))->tabval[1] =
+ ( /*_.VALTUP___V843*/
+ meltfptr[842]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#491 */
- melt_assertmsg ("putupl #491 checktup",
+ /*putupl#486 */
+ melt_assertmsg ("putupl #486 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V840*/ meltfptr[839])) ==
+ ( /*_.VALTUP___V843*/ meltfptr[842])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #491 checkoff",
+ melt_assertmsg ("putupl #486 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V840*/
- meltfptr[839]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V840*/ meltfptr[839]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V843*/
+ meltfptr[842]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#492 */
- melt_assertmsg ("putupl #492 checktup",
+ /*putupl#487 */
+ melt_assertmsg ("putupl #487 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V840*/ meltfptr[839])) ==
+ ( /*_.VALTUP___V843*/ meltfptr[842])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #492 checkoff",
+ melt_assertmsg ("putupl #487 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V840*/
- meltfptr[839]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V840*/ meltfptr[839]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V843*/
+ meltfptr[842]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V840*/ meltfptr[839]);
+ meltgc_touch ( /*_.VALTUP___V843*/ meltfptr[842]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V838*/ meltfptr[837])) ==
+ ( /*_.VALDATA___V841*/ meltfptr[840])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V838*/
- meltfptr[837]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[5] =
+ ( /*_.VALDATA___V841*/
+ meltfptr[840]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V840*/ meltfptr[839]);
+ /*_.VALTUP___V843*/ meltfptr[842]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V841*/ meltfptr[840])) ==
+ ( /*_.VALDATA___V844*/ meltfptr[843])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V841*/
- meltfptr[840]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[1] =
+ ( /*_.VALDATA___V844*/
+ meltfptr[843]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V842*/ meltfptr[841]);
+ /*_.VALSTR___V845*/ meltfptr[844]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V841*/ meltfptr[840])) ==
+ ( /*_.VALDATA___V844*/ meltfptr[843])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V841*/
- meltfptr[840]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[2] =
+ ( /*_.VALDATA___V844*/
+ meltfptr[843]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V838*/ meltfptr[837]);
+ /*_.VALDATA___V841*/ meltfptr[840]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V841*/ meltfptr[840]);
+ meltgc_touch ( /*_.VALDATA___V844*/ meltfptr[843]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V843*/ meltfptr[842])) ==
+ ( /*_.VALDATA___V846*/ meltfptr[845])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V843*/
- meltfptr[842]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V843*/ meltfptr[842]))->obj_vartab[1] =
+ ( /*_.VALDATA___V846*/
+ meltfptr[845]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V844*/ meltfptr[843]);
+ /*_.VALSTR___V847*/ meltfptr[846]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V843*/ meltfptr[842])) ==
+ ( /*_.VALDATA___V846*/ meltfptr[845])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V843*/
- meltfptr[842]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V843*/ meltfptr[842]))->obj_vartab[2] =
+ ( /*_.VALDATA___V846*/
+ meltfptr[845]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V838*/ meltfptr[837]);
+ /*_.VALDATA___V841*/ meltfptr[840]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V843*/ meltfptr[842]);
+ meltgc_touch ( /*_.VALDATA___V846*/ meltfptr[845]);
- /*putupl#493 */
- melt_assertmsg ("putupl #493 checktup",
+ /*putupl#488 */
+ melt_assertmsg ("putupl #488 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V845*/ meltfptr[844])) ==
+ ( /*_.VALTUP___V848*/ meltfptr[847])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #493 checkoff",
+ melt_assertmsg ("putupl #488 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V845*/
- meltfptr[844]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V845*/ meltfptr[844]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V848*/
+ meltfptr[847]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V848*/ meltfptr[847]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
#undef meltfram__
@@ -54067,179 +54424,179 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
-/*putupl#494*/
- melt_assertmsg ("putupl #494 checktup",
+/*putupl#489*/
+ melt_assertmsg ("putupl #489 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V845*/ meltfptr[844])) ==
+ ( /*_.VALTUP___V848*/ meltfptr[847])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #494 checkoff",
+ melt_assertmsg ("putupl #489 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V845*/
- meltfptr[844]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V845*/ meltfptr[844]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
+ ( /*_.VALTUP___V848*/
+ meltfptr[847]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V848*/ meltfptr[847]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]);
- /*putupl#495 */
- melt_assertmsg ("putupl #495 checktup",
+ /*putupl#490 */
+ melt_assertmsg ("putupl #490 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V845*/ meltfptr[844])) ==
+ ( /*_.VALTUP___V848*/ meltfptr[847])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #495 checkoff",
+ melt_assertmsg ("putupl #490 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V845*/
- meltfptr[844]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V845*/ meltfptr[844]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]);
+ ( /*_.VALTUP___V848*/
+ meltfptr[847]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V848*/ meltfptr[847]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]);
- /*putupl#496 */
- melt_assertmsg ("putupl #496 checktup",
+ /*putupl#491 */
+ melt_assertmsg ("putupl #491 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V845*/ meltfptr[844])) ==
+ ( /*_.VALTUP___V848*/ meltfptr[847])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #496 checkoff",
+ melt_assertmsg ("putupl #491 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V845*/
- meltfptr[844]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V845*/ meltfptr[844]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V843*/ meltfptr[842]);
+ ( /*_.VALTUP___V848*/
+ meltfptr[847]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V848*/ meltfptr[847]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V845*/ meltfptr[844]);
+ meltgc_touch ( /*_.VALTUP___V848*/ meltfptr[847]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V838*/ meltfptr[837])) ==
+ ( /*_.VALDATA___V841*/ meltfptr[840])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V838*/
- meltfptr[837]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[6] =
+ ( /*_.VALDATA___V841*/
+ meltfptr[840]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V845*/ meltfptr[844]);
+ /*_.VALTUP___V848*/ meltfptr[847]);
MELT_LOCATION ("warmelt-genobj.melt:452:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V838*/ meltfptr[837]);
+ meltgc_touch ( /*_.VALDATA___V841*/ meltfptr[840]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V846*/ meltfptr[845])) ==
+ ( /*_.VALDATA___V849*/ meltfptr[848])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V846*/
- meltfptr[845]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[1] =
+ ( /*_.VALDATA___V849*/
+ meltfptr[848]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V847*/ meltfptr[846]);
+ /*_.VALSTR___V850*/ meltfptr[849]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V846*/ meltfptr[845]);
+ meltgc_touch ( /*_.VALDATA___V849*/ meltfptr[848]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V848*/ meltfptr[847])) ==
+ ( /*_.VALDATA___V851*/ meltfptr[850])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V848*/
- meltfptr[847]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] =
+ ( /*_.VALDATA___V851*/
+ meltfptr[850]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V849*/ meltfptr[848]);
+ /*_.VALSTR___V852*/ meltfptr[851]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]);
+ meltgc_touch ( /*_.VALDATA___V851*/ meltfptr[850]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V850*/ meltfptr[849])) ==
+ ( /*_.VALDATA___V853*/ meltfptr[852])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V850*/
- meltfptr[849]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[1] =
+ ( /*_.VALDATA___V853*/
+ meltfptr[852]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V851*/ meltfptr[850]);
+ /*_.VALSTR___V854*/ meltfptr[853]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V850*/ meltfptr[849]);
+ meltgc_touch ( /*_.VALDATA___V853*/ meltfptr[852]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V852*/ meltfptr[851])) ==
+ ( /*_.VALDATA___V855*/ meltfptr[854])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V852*/
- meltfptr[851]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[1] =
+ ( /*_.VALDATA___V855*/
+ meltfptr[854]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V853*/ meltfptr[852]);
+ /*_.VALSTR___V856*/ meltfptr[855]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V852*/ meltfptr[851])) ==
+ ( /*_.VALDATA___V855*/ meltfptr[854])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V852*/
- meltfptr[851]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[4] =
+ ( /*_.VALDATA___V855*/
+ meltfptr[854]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#497 */
- melt_assertmsg ("putupl #497 checktup",
+ /*putupl#492 */
+ melt_assertmsg ("putupl #492 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V854*/ meltfptr[853])) ==
+ ( /*_.VALTUP___V857*/ meltfptr[856])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #497 checkoff",
+ melt_assertmsg ("putupl #492 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V854*/
- meltfptr[853]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V854*/ meltfptr[853]))->tabval[0] =
+ ( /*_.VALTUP___V857*/
+ meltfptr[856]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -54247,310 +54604,310 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#498 */
- melt_assertmsg ("putupl #498 checktup",
+ /*putupl#493 */
+ melt_assertmsg ("putupl #493 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V854*/ meltfptr[853])) ==
+ ( /*_.VALTUP___V857*/ meltfptr[856])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #498 checkoff",
+ melt_assertmsg ("putupl #493 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V854*/
- meltfptr[853]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V854*/ meltfptr[853]))->tabval[1] =
+ ( /*_.VALTUP___V857*/
+ meltfptr[856]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#499 */
- melt_assertmsg ("putupl #499 checktup",
+ /*putupl#494 */
+ melt_assertmsg ("putupl #494 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V854*/ meltfptr[853])) ==
+ ( /*_.VALTUP___V857*/ meltfptr[856])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #499 checkoff",
+ melt_assertmsg ("putupl #494 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V854*/
- meltfptr[853]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V854*/ meltfptr[853]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V857*/
+ meltfptr[856]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V854*/ meltfptr[853]);
+ meltgc_touch ( /*_.VALTUP___V857*/ meltfptr[856]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V852*/ meltfptr[851])) ==
+ ( /*_.VALDATA___V855*/ meltfptr[854])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V852*/
- meltfptr[851]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[5] =
+ ( /*_.VALDATA___V855*/
+ meltfptr[854]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V854*/ meltfptr[853]);
+ /*_.VALTUP___V857*/ meltfptr[856]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V855*/ meltfptr[854])) ==
+ ( /*_.VALDATA___V858*/ meltfptr[857])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V855*/
- meltfptr[854]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[1] =
+ ( /*_.VALDATA___V858*/
+ meltfptr[857]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V856*/ meltfptr[855]);
+ /*_.VALSTR___V859*/ meltfptr[858]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V855*/ meltfptr[854])) ==
+ ( /*_.VALDATA___V858*/ meltfptr[857])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V855*/
- meltfptr[854]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[2] =
+ ( /*_.VALDATA___V858*/
+ meltfptr[857]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V852*/ meltfptr[851]);
+ /*_.VALDATA___V855*/ meltfptr[854]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V855*/ meltfptr[854]);
+ meltgc_touch ( /*_.VALDATA___V858*/ meltfptr[857]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V857*/ meltfptr[856])) ==
+ ( /*_.VALDATA___V860*/ meltfptr[859])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V857*/
- meltfptr[856]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856]))->obj_vartab[1] =
+ ( /*_.VALDATA___V860*/
+ meltfptr[859]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V858*/ meltfptr[857]);
+ /*_.VALSTR___V861*/ meltfptr[860]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V857*/ meltfptr[856])) ==
+ ( /*_.VALDATA___V860*/ meltfptr[859])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V857*/
- meltfptr[856]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856]))->obj_vartab[2] =
+ ( /*_.VALDATA___V860*/
+ meltfptr[859]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V852*/ meltfptr[851]);
+ /*_.VALDATA___V855*/ meltfptr[854]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V857*/ meltfptr[856]);
+ meltgc_touch ( /*_.VALDATA___V860*/ meltfptr[859]);
- /*putupl#500 */
- melt_assertmsg ("putupl #500 checktup",
+ /*putupl#495 */
+ melt_assertmsg ("putupl #495 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V859*/ meltfptr[858])) ==
+ ( /*_.VALTUP___V862*/ meltfptr[861])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #500 checkoff",
+ melt_assertmsg ("putupl #495 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V859*/
- meltfptr[858]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V859*/ meltfptr[858]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V862*/
+ meltfptr[861]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#501 */
- melt_assertmsg ("putupl #501 checktup",
+ /*putupl#496 */
+ melt_assertmsg ("putupl #496 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V859*/ meltfptr[858])) ==
+ ( /*_.VALTUP___V862*/ meltfptr[861])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #501 checkoff",
+ melt_assertmsg ("putupl #496 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V859*/
- meltfptr[858]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V859*/ meltfptr[858]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]);
+ ( /*_.VALTUP___V862*/
+ meltfptr[861]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]);
- /*putupl#502 */
- melt_assertmsg ("putupl #502 checktup",
+ /*putupl#497 */
+ melt_assertmsg ("putupl #497 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V859*/ meltfptr[858])) ==
+ ( /*_.VALTUP___V862*/ meltfptr[861])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #502 checkoff",
+ melt_assertmsg ("putupl #497 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V859*/
- meltfptr[858]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V859*/ meltfptr[858]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856]);
+ ( /*_.VALTUP___V862*/
+ meltfptr[861]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V859*/ meltfptr[858]);
+ meltgc_touch ( /*_.VALTUP___V862*/ meltfptr[861]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V852*/ meltfptr[851])) ==
+ ( /*_.VALDATA___V855*/ meltfptr[854])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V852*/
- meltfptr[851]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[6] =
+ ( /*_.VALDATA___V855*/
+ meltfptr[854]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V859*/ meltfptr[858]);
+ /*_.VALTUP___V862*/ meltfptr[861]);
MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V852*/ meltfptr[851]);
+ meltgc_touch ( /*_.VALDATA___V855*/ meltfptr[854]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V860*/ meltfptr[859])) ==
+ ( /*_.VALDATA___V863*/ meltfptr[862])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V860*/
- meltfptr[859]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] =
+ ( /*_.VALDATA___V863*/
+ meltfptr[862]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V861*/ meltfptr[860]);
+ /*_.VALSTR___V864*/ meltfptr[863]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V860*/ meltfptr[859]);
+ meltgc_touch ( /*_.VALDATA___V863*/ meltfptr[862]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V862*/ meltfptr[861])) ==
+ ( /*_.VALDATA___V865*/ meltfptr[864])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V862*/
- meltfptr[861]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]))->obj_vartab[1] =
+ ( /*_.VALDATA___V865*/
+ meltfptr[864]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V863*/ meltfptr[862]);
+ /*_.VALSTR___V866*/ meltfptr[865]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V862*/ meltfptr[861]);
+ meltgc_touch ( /*_.VALDATA___V865*/ meltfptr[864]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V864*/ meltfptr[863])) ==
+ ( /*_.VALDATA___V867*/ meltfptr[866])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V864*/
- meltfptr[863]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]))->obj_vartab[1] =
+ ( /*_.VALDATA___V867*/
+ meltfptr[866]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V865*/ meltfptr[864]);
+ /*_.VALSTR___V868*/ meltfptr[867]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V864*/ meltfptr[863]);
+ meltgc_touch ( /*_.VALDATA___V867*/ meltfptr[866]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V866*/ meltfptr[865])) ==
+ ( /*_.VALDATA___V869*/ meltfptr[868])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V866*/
- meltfptr[865]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[1] =
+ ( /*_.VALDATA___V869*/
+ meltfptr[868]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V867*/ meltfptr[866]);
+ /*_.VALSTR___V870*/ meltfptr[869]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V866*/ meltfptr[865])) ==
+ ( /*_.VALDATA___V869*/ meltfptr[868])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V866*/
- meltfptr[865]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[4] =
+ ( /*_.VALDATA___V869*/
+ meltfptr[868]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#503 */
- melt_assertmsg ("putupl #503 checktup",
+ /*putupl#498 */
+ melt_assertmsg ("putupl #498 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V868*/ meltfptr[867])) ==
+ ( /*_.VALTUP___V871*/ meltfptr[870])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #503 checkoff",
+ melt_assertmsg ("putupl #498 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V868*/
- meltfptr[867]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[0] =
+ ( /*_.VALTUP___V871*/
+ meltfptr[870]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -54558,384 +54915,384 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#504 */
- melt_assertmsg ("putupl #504 checktup",
+ /*putupl#499 */
+ melt_assertmsg ("putupl #499 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V868*/ meltfptr[867])) ==
+ ( /*_.VALTUP___V871*/ meltfptr[870])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #504 checkoff",
+ melt_assertmsg ("putupl #499 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V868*/
- meltfptr[867]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[1] =
+ ( /*_.VALTUP___V871*/
+ meltfptr[870]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#505 */
- melt_assertmsg ("putupl #505 checktup",
+ /*putupl#500 */
+ melt_assertmsg ("putupl #500 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V868*/ meltfptr[867])) ==
+ ( /*_.VALTUP___V871*/ meltfptr[870])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #505 checkoff",
+ melt_assertmsg ("putupl #500 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V868*/
- meltfptr[867]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V871*/
+ meltfptr[870]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V868*/ meltfptr[867]);
+ meltgc_touch ( /*_.VALTUP___V871*/ meltfptr[870]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V866*/ meltfptr[865])) ==
+ ( /*_.VALDATA___V869*/ meltfptr[868])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V866*/
- meltfptr[865]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[5] =
+ ( /*_.VALDATA___V869*/
+ meltfptr[868]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V868*/ meltfptr[867]);
+ /*_.VALTUP___V871*/ meltfptr[870]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V869*/ meltfptr[868])) ==
+ ( /*_.VALDATA___V872*/ meltfptr[871])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V869*/
- meltfptr[868]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[1] =
+ ( /*_.VALDATA___V872*/
+ meltfptr[871]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V870*/ meltfptr[869]);
+ /*_.VALSTR___V873*/ meltfptr[872]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V869*/ meltfptr[868])) ==
+ ( /*_.VALDATA___V872*/ meltfptr[871])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V869*/
- meltfptr[868]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[2] =
+ ( /*_.VALDATA___V872*/
+ meltfptr[871]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V866*/ meltfptr[865]);
+ /*_.VALDATA___V869*/ meltfptr[868]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V869*/ meltfptr[868]);
+ meltgc_touch ( /*_.VALDATA___V872*/ meltfptr[871]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V871*/ meltfptr[870])) ==
+ ( /*_.VALDATA___V874*/ meltfptr[873])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V871*/
- meltfptr[870]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]))->obj_vartab[1] =
+ ( /*_.VALDATA___V874*/
+ meltfptr[873]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V872*/ meltfptr[871]);
+ /*_.VALSTR___V875*/ meltfptr[874]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V871*/ meltfptr[870])) ==
+ ( /*_.VALDATA___V874*/ meltfptr[873])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V871*/
- meltfptr[870]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]))->obj_vartab[2] =
+ ( /*_.VALDATA___V874*/
+ meltfptr[873]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V866*/ meltfptr[865]);
+ /*_.VALDATA___V869*/ meltfptr[868]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V871*/ meltfptr[870]);
+ meltgc_touch ( /*_.VALDATA___V874*/ meltfptr[873]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V873*/ meltfptr[872])) ==
+ ( /*_.VALDATA___V876*/ meltfptr[875])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V873*/
- meltfptr[872]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[1] =
+ ( /*_.VALDATA___V876*/
+ meltfptr[875]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V874*/ meltfptr[873]);
+ /*_.VALSTR___V877*/ meltfptr[876]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V873*/ meltfptr[872])) ==
+ ( /*_.VALDATA___V876*/ meltfptr[875])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V873*/
- meltfptr[872]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[2] =
+ ( /*_.VALDATA___V876*/
+ meltfptr[875]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V866*/ meltfptr[865]);
+ /*_.VALDATA___V869*/ meltfptr[868]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V873*/ meltfptr[872]);
+ meltgc_touch ( /*_.VALDATA___V876*/ meltfptr[875]);
- /*putupl#506 */
- melt_assertmsg ("putupl #506 checktup",
+ /*putupl#501 */
+ melt_assertmsg ("putupl #501 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V875*/ meltfptr[874])) ==
+ ( /*_.VALTUP___V878*/ meltfptr[877])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #506 checkoff",
+ melt_assertmsg ("putupl #501 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V875*/
- meltfptr[874]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V878*/
+ meltfptr[877]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#507 */
- melt_assertmsg ("putupl #507 checktup",
+ /*putupl#502 */
+ melt_assertmsg ("putupl #502 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V875*/ meltfptr[874])) ==
+ ( /*_.VALTUP___V878*/ meltfptr[877])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #507 checkoff",
+ melt_assertmsg ("putupl #502 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V875*/
- meltfptr[874]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
+ ( /*_.VALTUP___V878*/
+ meltfptr[877]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]);
- /*putupl#508 */
- melt_assertmsg ("putupl #508 checktup",
+ /*putupl#503 */
+ melt_assertmsg ("putupl #503 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V875*/ meltfptr[874])) ==
+ ( /*_.VALTUP___V878*/ meltfptr[877])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #508 checkoff",
+ melt_assertmsg ("putupl #503 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V875*/
- meltfptr[874]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]);
+ ( /*_.VALTUP___V878*/
+ meltfptr[877]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]);
- /*putupl#509 */
- melt_assertmsg ("putupl #509 checktup",
+ /*putupl#504 */
+ melt_assertmsg ("putupl #504 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V875*/ meltfptr[874])) ==
+ ( /*_.VALTUP___V878*/ meltfptr[877])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #509 checkoff",
+ melt_assertmsg ("putupl #504 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V875*/
- meltfptr[874]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]);
+ ( /*_.VALTUP___V878*/
+ meltfptr[877]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V875*/ meltfptr[874]);
+ meltgc_touch ( /*_.VALTUP___V878*/ meltfptr[877]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V866*/ meltfptr[865])) ==
+ ( /*_.VALDATA___V869*/ meltfptr[868])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V866*/
- meltfptr[865]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[6] =
+ ( /*_.VALDATA___V869*/
+ meltfptr[868]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V875*/ meltfptr[874]);
+ /*_.VALTUP___V878*/ meltfptr[877]);
MELT_LOCATION ("warmelt-genobj.melt:466:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V866*/ meltfptr[865]);
+ meltgc_touch ( /*_.VALDATA___V869*/ meltfptr[868]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V876*/ meltfptr[875])) ==
+ ( /*_.VALDATA___V879*/ meltfptr[878])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V876*/
- meltfptr[875]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[1] =
+ ( /*_.VALDATA___V879*/
+ meltfptr[878]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V877*/ meltfptr[876]);
+ /*_.VALSTR___V880*/ meltfptr[879]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V876*/ meltfptr[875]);
+ meltgc_touch ( /*_.VALDATA___V879*/ meltfptr[878]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V878*/ meltfptr[877])) ==
+ ( /*_.VALDATA___V881*/ meltfptr[880])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V878*/
- meltfptr[877]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[1] =
+ ( /*_.VALDATA___V881*/
+ meltfptr[880]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V879*/ meltfptr[878]);
+ /*_.VALSTR___V882*/ meltfptr[881]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V878*/ meltfptr[877]);
+ meltgc_touch ( /*_.VALDATA___V881*/ meltfptr[880]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V880*/ meltfptr[879])) ==
+ ( /*_.VALDATA___V883*/ meltfptr[882])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V880*/
- meltfptr[879]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]))->obj_vartab[1] =
+ ( /*_.VALDATA___V883*/
+ meltfptr[882]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V881*/ meltfptr[880]);
+ /*_.VALSTR___V884*/ meltfptr[883]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V880*/ meltfptr[879]);
+ meltgc_touch ( /*_.VALDATA___V883*/ meltfptr[882]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V882*/ meltfptr[881])) ==
+ ( /*_.VALDATA___V885*/ meltfptr[884])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V882*/
- meltfptr[881]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[1] =
+ ( /*_.VALDATA___V885*/
+ meltfptr[884]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V883*/ meltfptr[882]);
+ /*_.VALSTR___V886*/ meltfptr[885]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V882*/ meltfptr[881]);
+ meltgc_touch ( /*_.VALDATA___V885*/ meltfptr[884]);
MELT_LOCATION ("warmelt-genobj.melt:474:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[1] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V885*/ meltfptr[884]);
+ /*_.VALSTR___V888*/ meltfptr[887]);
MELT_LOCATION ("warmelt-genobj.melt:474:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[4] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V866*/ meltfptr[865]);
+ /*_.VALDATA___V869*/ meltfptr[868]);
- /*putupl#510 */
- melt_assertmsg ("putupl #510 checktup",
+ /*putupl#505 */
+ melt_assertmsg ("putupl #505 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #510 checkoff",
+ melt_assertmsg ("putupl #505 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[0] =
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -54943,218 +55300,218 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#511 */
- melt_assertmsg ("putupl #511 checktup",
+ /*putupl#506 */
+ melt_assertmsg ("putupl #506 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #511 checkoff",
+ melt_assertmsg ("putupl #506 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[1] =
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#512 */
- melt_assertmsg ("putupl #512 checktup",
+ /*putupl#507 */
+ melt_assertmsg ("putupl #507 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #512 checkoff",
+ melt_assertmsg ("putupl #507 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#513 */
- melt_assertmsg ("putupl #513 checktup",
+ /*putupl#508 */
+ melt_assertmsg ("putupl #508 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #513 checkoff",
+ melt_assertmsg ("putupl #508 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V886*/ meltfptr[885]);
+ meltgc_touch ( /*_.VALTUP___V889*/ meltfptr[888]);
MELT_LOCATION ("warmelt-genobj.melt:474:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[5] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V886*/ meltfptr[885]);
+ /*_.VALTUP___V889*/ meltfptr[888]);
- /*putupl#514 */
- melt_assertmsg ("putupl #514 checktup",
+ /*putupl#509 */
+ melt_assertmsg ("putupl #509 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V887*/ meltfptr[886])) ==
+ ( /*_.VALTUP___V890*/ meltfptr[889])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #514 checkoff",
+ melt_assertmsg ("putupl #509 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V887*/
- meltfptr[886]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V890*/
+ meltfptr[889]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#515 */
- melt_assertmsg ("putupl #515 checktup",
+ /*putupl#510 */
+ melt_assertmsg ("putupl #510 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V887*/ meltfptr[886])) ==
+ ( /*_.VALTUP___V890*/ meltfptr[889])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #515 checkoff",
+ melt_assertmsg ("putupl #510 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V887*/
- meltfptr[886]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
+ ( /*_.VALTUP___V890*/
+ meltfptr[889]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]);
- /*putupl#516 */
- melt_assertmsg ("putupl #516 checktup",
+ /*putupl#511 */
+ melt_assertmsg ("putupl #511 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V887*/ meltfptr[886])) ==
+ ( /*_.VALTUP___V890*/ meltfptr[889])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #516 checkoff",
+ melt_assertmsg ("putupl #511 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V887*/
- meltfptr[886]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]);
+ ( /*_.VALTUP___V890*/
+ meltfptr[889]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]);
- /*putupl#517 */
- melt_assertmsg ("putupl #517 checktup",
+ /*putupl#512 */
+ melt_assertmsg ("putupl #512 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V887*/ meltfptr[886])) ==
+ ( /*_.VALTUP___V890*/ meltfptr[889])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #517 checkoff",
+ melt_assertmsg ("putupl #512 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V887*/
- meltfptr[886]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]);
+ ( /*_.VALTUP___V890*/
+ meltfptr[889]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V887*/ meltfptr[886]);
+ meltgc_touch ( /*_.VALTUP___V890*/ meltfptr[889]);
MELT_LOCATION ("warmelt-genobj.melt:474:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[6] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V887*/ meltfptr[886]);
+ /*_.VALTUP___V890*/ meltfptr[889]);
MELT_LOCATION ("warmelt-genobj.melt:474:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V884*/ meltfptr[883]);
+ meltgc_touch ( /*_.VALDATA___V887*/ meltfptr[886]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V888*/ meltfptr[887])) ==
+ ( /*_.VALDATA___V891*/ meltfptr[890])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V888*/
- meltfptr[887]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]))->obj_vartab[1] =
+ ( /*_.VALDATA___V891*/
+ meltfptr[890]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V889*/ meltfptr[888]);
+ /*_.VALSTR___V892*/ meltfptr[891]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V888*/ meltfptr[887]);
+ meltgc_touch ( /*_.VALDATA___V891*/ meltfptr[890]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V890*/ meltfptr[889])) ==
+ ( /*_.VALDATA___V893*/ meltfptr[892])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V890*/
- meltfptr[889]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] =
+ ( /*_.VALDATA___V893*/
+ meltfptr[892]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V891*/ meltfptr[890]);
+ /*_.VALSTR___V894*/ meltfptr[893]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V890*/ meltfptr[889])) ==
+ ( /*_.VALDATA___V893*/ meltfptr[892])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V890*/
- meltfptr[889]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[4] =
+ ( /*_.VALDATA___V893*/
+ meltfptr[892]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#518 */
- melt_assertmsg ("putupl #518 checktup",
+ /*putupl#513 */
+ melt_assertmsg ("putupl #513 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V892*/ meltfptr[891])) ==
+ ( /*_.VALTUP___V895*/ meltfptr[894])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #518 checkoff",
+ melt_assertmsg ("putupl #513 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V892*/
- meltfptr[891]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V892*/ meltfptr[891]))->tabval[0] =
+ ( /*_.VALTUP___V895*/
+ meltfptr[894]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -55162,384 +55519,384 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#519 */
- melt_assertmsg ("putupl #519 checktup",
+ /*putupl#514 */
+ melt_assertmsg ("putupl #514 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V892*/ meltfptr[891])) ==
+ ( /*_.VALTUP___V895*/ meltfptr[894])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #519 checkoff",
+ melt_assertmsg ("putupl #514 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V892*/
- meltfptr[891]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V892*/ meltfptr[891]))->tabval[1] =
+ ( /*_.VALTUP___V895*/
+ meltfptr[894]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#520 */
- melt_assertmsg ("putupl #520 checktup",
+ /*putupl#515 */
+ melt_assertmsg ("putupl #515 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V892*/ meltfptr[891])) ==
+ ( /*_.VALTUP___V895*/ meltfptr[894])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #520 checkoff",
+ melt_assertmsg ("putupl #515 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V892*/
- meltfptr[891]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V892*/ meltfptr[891]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V895*/
+ meltfptr[894]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V892*/ meltfptr[891]);
+ meltgc_touch ( /*_.VALTUP___V895*/ meltfptr[894]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V890*/ meltfptr[889])) ==
+ ( /*_.VALDATA___V893*/ meltfptr[892])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V890*/
- meltfptr[889]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[5] =
+ ( /*_.VALDATA___V893*/
+ meltfptr[892]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V892*/ meltfptr[891]);
+ /*_.VALTUP___V895*/ meltfptr[894]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V893*/ meltfptr[892])) ==
+ ( /*_.VALDATA___V896*/ meltfptr[895])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V893*/
- meltfptr[892]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[1] =
+ ( /*_.VALDATA___V896*/
+ meltfptr[895]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V894*/ meltfptr[893]);
+ /*_.VALSTR___V897*/ meltfptr[896]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V893*/ meltfptr[892])) ==
+ ( /*_.VALDATA___V896*/ meltfptr[895])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V893*/
- meltfptr[892]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[2] =
+ ( /*_.VALDATA___V896*/
+ meltfptr[895]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V890*/ meltfptr[889]);
+ /*_.VALDATA___V893*/ meltfptr[892]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V893*/ meltfptr[892]);
+ meltgc_touch ( /*_.VALDATA___V896*/ meltfptr[895]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V895*/ meltfptr[894])) ==
+ ( /*_.VALDATA___V898*/ meltfptr[897])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V895*/
- meltfptr[894]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[1] =
+ ( /*_.VALDATA___V898*/
+ meltfptr[897]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V896*/ meltfptr[895]);
+ /*_.VALSTR___V899*/ meltfptr[898]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V895*/ meltfptr[894])) ==
+ ( /*_.VALDATA___V898*/ meltfptr[897])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V895*/
- meltfptr[894]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[2] =
+ ( /*_.VALDATA___V898*/
+ meltfptr[897]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V890*/ meltfptr[889]);
+ /*_.VALDATA___V893*/ meltfptr[892]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V895*/ meltfptr[894]);
+ meltgc_touch ( /*_.VALDATA___V898*/ meltfptr[897]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V897*/ meltfptr[896])) ==
+ ( /*_.VALDATA___V900*/ meltfptr[899])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V897*/
- meltfptr[896]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]))->obj_vartab[1] =
+ ( /*_.VALDATA___V900*/
+ meltfptr[899]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V898*/ meltfptr[897]);
+ /*_.VALSTR___V901*/ meltfptr[900]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V897*/ meltfptr[896])) ==
+ ( /*_.VALDATA___V900*/ meltfptr[899])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V897*/
- meltfptr[896]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]))->obj_vartab[2] =
+ ( /*_.VALDATA___V900*/
+ meltfptr[899]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V890*/ meltfptr[889]);
+ /*_.VALDATA___V893*/ meltfptr[892]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V897*/ meltfptr[896]);
+ meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]);
- /*putupl#521 */
- melt_assertmsg ("putupl #521 checktup",
+ /*putupl#516 */
+ melt_assertmsg ("putupl #516 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V899*/ meltfptr[898])) ==
+ ( /*_.VALTUP___V902*/ meltfptr[901])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #521 checkoff",
+ melt_assertmsg ("putupl #516 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V899*/
- meltfptr[898]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V899*/ meltfptr[898]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V902*/
+ meltfptr[901]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#522 */
- melt_assertmsg ("putupl #522 checktup",
+ /*putupl#517 */
+ melt_assertmsg ("putupl #517 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V899*/ meltfptr[898])) ==
+ ( /*_.VALTUP___V902*/ meltfptr[901])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #522 checkoff",
+ melt_assertmsg ("putupl #517 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V899*/
- meltfptr[898]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V899*/ meltfptr[898]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
+ ( /*_.VALTUP___V902*/
+ meltfptr[901]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]);
- /*putupl#523 */
- melt_assertmsg ("putupl #523 checktup",
+ /*putupl#518 */
+ melt_assertmsg ("putupl #518 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V899*/ meltfptr[898])) ==
+ ( /*_.VALTUP___V902*/ meltfptr[901])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #523 checkoff",
+ melt_assertmsg ("putupl #518 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V899*/
- meltfptr[898]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V899*/ meltfptr[898]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]);
+ ( /*_.VALTUP___V902*/
+ meltfptr[901]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]);
- /*putupl#524 */
- melt_assertmsg ("putupl #524 checktup",
+ /*putupl#519 */
+ melt_assertmsg ("putupl #519 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V899*/ meltfptr[898])) ==
+ ( /*_.VALTUP___V902*/ meltfptr[901])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #524 checkoff",
+ melt_assertmsg ("putupl #519 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V899*/
- meltfptr[898]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V899*/ meltfptr[898]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]);
+ ( /*_.VALTUP___V902*/
+ meltfptr[901]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V899*/ meltfptr[898]);
+ meltgc_touch ( /*_.VALTUP___V902*/ meltfptr[901]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V890*/ meltfptr[889])) ==
+ ( /*_.VALDATA___V893*/ meltfptr[892])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V890*/
- meltfptr[889]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[6] =
+ ( /*_.VALDATA___V893*/
+ meltfptr[892]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V899*/ meltfptr[898]);
+ /*_.VALTUP___V902*/ meltfptr[901]);
MELT_LOCATION ("warmelt-genobj.melt:480:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V890*/ meltfptr[889]);
+ meltgc_touch ( /*_.VALDATA___V893*/ meltfptr[892]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V900*/ meltfptr[899])) ==
+ ( /*_.VALDATA___V903*/ meltfptr[902])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V900*/
- meltfptr[899]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[1] =
+ ( /*_.VALDATA___V903*/
+ meltfptr[902]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V901*/ meltfptr[900]);
+ /*_.VALSTR___V904*/ meltfptr[903]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]);
+ meltgc_touch ( /*_.VALDATA___V903*/ meltfptr[902]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V902*/ meltfptr[901])) ==
+ ( /*_.VALDATA___V905*/ meltfptr[904])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V902*/
- meltfptr[901]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] =
+ ( /*_.VALDATA___V905*/
+ meltfptr[904]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V903*/ meltfptr[902]);
+ /*_.VALSTR___V906*/ meltfptr[905]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V902*/ meltfptr[901]);
+ meltgc_touch ( /*_.VALDATA___V905*/ meltfptr[904]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V904*/ meltfptr[903])) ==
+ ( /*_.VALDATA___V907*/ meltfptr[906])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V904*/
- meltfptr[903]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]))->obj_vartab[1] =
+ ( /*_.VALDATA___V907*/
+ meltfptr[906]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V905*/ meltfptr[904]);
+ /*_.VALSTR___V908*/ meltfptr[907]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V904*/ meltfptr[903]);
+ meltgc_touch ( /*_.VALDATA___V907*/ meltfptr[906]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V906*/ meltfptr[905])) ==
+ ( /*_.VALDATA___V909*/ meltfptr[908])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V906*/
- meltfptr[905]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] =
+ ( /*_.VALDATA___V909*/
+ meltfptr[908]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V907*/ meltfptr[906]);
+ /*_.VALSTR___V910*/ meltfptr[909]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V906*/ meltfptr[905]);
+ meltgc_touch ( /*_.VALDATA___V909*/ meltfptr[908]);
MELT_LOCATION ("warmelt-genobj.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V908*/ meltfptr[907])) ==
+ ( /*_.VALDATA___V911*/ meltfptr[910])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V908*/
- meltfptr[907]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] =
+ ( /*_.VALDATA___V911*/
+ meltfptr[910]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V909*/ meltfptr[908]);
+ /*_.VALSTR___V912*/ meltfptr[911]);
MELT_LOCATION ("warmelt-genobj.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V908*/ meltfptr[907])) ==
+ ( /*_.VALDATA___V911*/ meltfptr[910])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V908*/
- meltfptr[907]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[4] =
+ ( /*_.VALDATA___V911*/
+ meltfptr[910]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V890*/ meltfptr[889]);
+ /*_.VALDATA___V893*/ meltfptr[892]);
- /*putupl#525 */
- melt_assertmsg ("putupl #525 checktup",
+ /*putupl#520 */
+ melt_assertmsg ("putupl #520 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V910*/ meltfptr[909])) ==
+ ( /*_.VALTUP___V913*/ meltfptr[912])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #525 checkoff",
+ melt_assertmsg ("putupl #520 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V910*/
- meltfptr[909]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V910*/ meltfptr[909]))->tabval[0] =
+ ( /*_.VALTUP___V913*/
+ meltfptr[912]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -55547,124 +55904,124 @@ warmelt_genobj_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#526 */
- melt_assertmsg ("putupl #526 checktup",
+ /*putupl#521 */
+ melt_assertmsg ("putupl #521 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V910*/ meltfptr[909])) ==
+ ( /*_.VALTUP___V913*/ meltfptr[912])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #526 checkoff",
+ melt_assertmsg ("putupl #521 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V910*/
- meltfptr[909]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V910*/ meltfptr[909]))->tabval[1] =
+ ( /*_.VALTUP___V913*/
+ meltfptr[912]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#527 */
- melt_assertmsg ("putupl #527 checktup",
+ /*putupl#522 */
+ melt_assertmsg ("putupl #522 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V910*/ meltfptr[909])) ==
+ ( /*_.VALTUP___V913*/ meltfptr[912])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #527 checkoff",
+ melt_assertmsg ("putupl #522 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V910*/
- meltfptr[909]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V910*/ meltfptr[909]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V913*/
+ meltfptr[912]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#528 */
- melt_assertmsg ("putupl #528 checktup",
+ /*putupl#523 */
+ melt_assertmsg ("putupl #523 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V910*/ meltfptr[909])) ==
+ ( /*_.VALTUP___V913*/ meltfptr[912])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #528 checkoff",
+ melt_assertmsg ("putupl #523 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V910*/
- meltfptr[909]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V910*/ meltfptr[909]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ ( /*_.VALTUP___V913*/
+ meltfptr[912]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V910*/ meltfptr[909]);
+ meltgc_touch ( /*_.VALTUP___V913*/ meltfptr[912]);
MELT_LOCATION ("warmelt-genobj.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V908*/ meltfptr[907])) ==
+ ( /*_.VALDATA___V911*/ meltfptr[910])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V908*/
- meltfptr[907]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[5] =
+ ( /*_.VALDATA___V911*/
+ meltfptr[910]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V910*/ meltfptr[909]);
+ /*_.VALTUP___V913*/ meltfptr[912]);
- /*putupl#529 */
- melt_assertmsg ("putupl #529 checktup",
+ /*putupl#524 */
+ melt_assertmsg ("putupl #524 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V911*/ meltfptr[910])) ==
+ ( /*_.VALTUP___V914*/ meltfptr[913])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #529 checkoff",
+ melt_assertmsg ("putupl #524 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V911*/
- meltfptr[910]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V914*/
+ meltfptr[913]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V914*/ meltfptr[913]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#530 */
- melt_assertmsg ("putupl #530 checktup",
+ /*putupl#525 */
+ melt_assertmsg ("putupl #525 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V911*/ meltfptr[910])) ==
+ ( /*_.VALTUP___V914*/ meltfptr[913])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #530 checkoff",
+ melt_assertmsg ("putupl #525 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V911*/
- meltfptr[910]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
+ ( /*_.VALTUP___V914*/
+ meltfptr[913]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V914*/ meltfptr[913]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]);
- /*putupl#531 */
- melt_assertmsg ("putupl #531 checktup",
+ /*putupl#526 */
+ melt_assertmsg ("putupl #526 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V911*/ meltfptr[910])) ==
+ ( /*_.VALTUP___V914*/ meltfptr[913])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #531 checkoff",
+ melt_assertmsg ("putupl #526 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V911*/
- meltfptr[910]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]);
+ ( /*_.VALTUP___V914*/
+ meltfptr[913]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V914*/ meltfptr[913]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]);
- /*putupl#532 */
- melt_assertmsg ("putupl #532 checktup",
+ /*putupl#527 */
+ melt_assertmsg ("putupl #527 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V911*/ meltfptr[910])) ==
+ ( /*_.VALTUP___V914*/ meltfptr[913])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #532 checkoff",
+ melt_assertmsg ("putupl #527 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V911*/
- meltfptr[910]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]);
+ ( /*_.VALTUP___V914*/
+ meltfptr[913]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V914*/ meltfptr[913]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]);
#undef meltfram__
@@ -55678,98 +56035,98 @@ warmelt_genobj_initialmeltchunk_12 (struct frame_start_module_melt_st
#undef meltcallcount
#define meltcallcount 0L
/*touch:INITUP_*/
- meltgc_touch ( /*_.VALTUP___V911*/ meltfptr[910]);
+ meltgc_touch ( /*_.VALTUP___V914*/ meltfptr[913]);
MELT_LOCATION ("warmelt-genobj.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V908*/ meltfptr[907])) ==
+ ( /*_.VALDATA___V911*/ meltfptr[910])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V908*/
- meltfptr[907]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[6] =
+ ( /*_.VALDATA___V911*/
+ meltfptr[910]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V911*/ meltfptr[910]);
+ /*_.VALTUP___V914*/ meltfptr[913]);
MELT_LOCATION ("warmelt-genobj.melt:488:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V908*/ meltfptr[907]);
+ meltgc_touch ( /*_.VALDATA___V911*/ meltfptr[910]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V912*/ meltfptr[911])) ==
+ ( /*_.VALDATA___V915*/ meltfptr[914])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V912*/
- meltfptr[911]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] =
+ ( /*_.VALDATA___V915*/
+ meltfptr[914]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V913*/ meltfptr[912]);
+ /*_.VALSTR___V916*/ meltfptr[915]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V912*/ meltfptr[911]);
+ meltgc_touch ( /*_.VALDATA___V915*/ meltfptr[914]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V914*/ meltfptr[913])) ==
+ ( /*_.VALDATA___V917*/ meltfptr[916])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V914*/
- meltfptr[913]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] =
+ ( /*_.VALDATA___V917*/
+ meltfptr[916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V915*/ meltfptr[914]);
+ /*_.VALSTR___V918*/ meltfptr[917]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V914*/ meltfptr[913])) ==
+ ( /*_.VALDATA___V917*/ meltfptr[916])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V914*/
- meltfptr[913]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[4] =
+ ( /*_.VALDATA___V917*/
+ meltfptr[916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#533 */
- melt_assertmsg ("putupl #533 checktup",
+ /*putupl#528 */
+ melt_assertmsg ("putupl #528 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V916*/ meltfptr[915])) ==
+ ( /*_.VALTUP___V919*/ meltfptr[918])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #533 checkoff",
+ melt_assertmsg ("putupl #528 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V916*/
- meltfptr[915]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V916*/ meltfptr[915]))->tabval[0] =
+ ( /*_.VALTUP___V919*/
+ meltfptr[918]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V919*/ meltfptr[918]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -55777,310 +56134,310 @@ warmelt_genobj_initialmeltchunk_12 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#534 */
- melt_assertmsg ("putupl #534 checktup",
+ /*putupl#529 */
+ melt_assertmsg ("putupl #529 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V916*/ meltfptr[915])) ==
+ ( /*_.VALTUP___V919*/ meltfptr[918])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #534 checkoff",
+ melt_assertmsg ("putupl #529 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V916*/
- meltfptr[915]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V916*/ meltfptr[915]))->tabval[1] =
+ ( /*_.VALTUP___V919*/
+ meltfptr[918]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V919*/ meltfptr[918]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#535 */
- melt_assertmsg ("putupl #535 checktup",
+ /*putupl#530 */
+ melt_assertmsg ("putupl #530 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V916*/ meltfptr[915])) ==
+ ( /*_.VALTUP___V919*/ meltfptr[918])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #535 checkoff",
+ melt_assertmsg ("putupl #530 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V916*/
- meltfptr[915]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V916*/ meltfptr[915]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V919*/
+ meltfptr[918]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V919*/ meltfptr[918]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V916*/ meltfptr[915]);
+ meltgc_touch ( /*_.VALTUP___V919*/ meltfptr[918]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V914*/ meltfptr[913])) ==
+ ( /*_.VALDATA___V917*/ meltfptr[916])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V914*/
- meltfptr[913]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[5] =
+ ( /*_.VALDATA___V917*/
+ meltfptr[916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V916*/ meltfptr[915]);
+ /*_.VALTUP___V919*/ meltfptr[918]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V917*/ meltfptr[916])) ==
+ ( /*_.VALDATA___V920*/ meltfptr[919])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V917*/
- meltfptr[916]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[1] =
+ ( /*_.VALDATA___V920*/
+ meltfptr[919]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V920*/ meltfptr[919]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V918*/ meltfptr[917]);
+ /*_.VALSTR___V921*/ meltfptr[920]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V917*/ meltfptr[916])) ==
+ ( /*_.VALDATA___V920*/ meltfptr[919])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V917*/
- meltfptr[916]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[2] =
+ ( /*_.VALDATA___V920*/
+ meltfptr[919]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V920*/ meltfptr[919]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V914*/ meltfptr[913]);
+ /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V917*/ meltfptr[916]);
+ meltgc_touch ( /*_.VALDATA___V920*/ meltfptr[919]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V919*/ meltfptr[918])) ==
+ ( /*_.VALDATA___V922*/ meltfptr[921])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V919*/
- meltfptr[918]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[1] =
+ ( /*_.VALDATA___V922*/
+ meltfptr[921]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V920*/ meltfptr[919]);
+ /*_.VALSTR___V923*/ meltfptr[922]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V919*/ meltfptr[918])) ==
+ ( /*_.VALDATA___V922*/ meltfptr[921])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V919*/
- meltfptr[918]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[2] =
+ ( /*_.VALDATA___V922*/
+ meltfptr[921]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V914*/ meltfptr[913]);
+ /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V919*/ meltfptr[918]);
+ meltgc_touch ( /*_.VALDATA___V922*/ meltfptr[921]);
- /*putupl#536 */
- melt_assertmsg ("putupl #536 checktup",
+ /*putupl#531 */
+ melt_assertmsg ("putupl #531 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #536 checkoff",
+ melt_assertmsg ("putupl #531 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#537 */
- melt_assertmsg ("putupl #537 checktup",
+ /*putupl#532 */
+ melt_assertmsg ("putupl #532 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #537 checkoff",
+ melt_assertmsg ("putupl #532 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V920*/ meltfptr[919]);
- /*putupl#538 */
- melt_assertmsg ("putupl #538 checktup",
+ /*putupl#533 */
+ melt_assertmsg ("putupl #533 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #538 checkoff",
+ melt_assertmsg ("putupl #533 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V921*/ meltfptr[920]);
+ meltgc_touch ( /*_.VALTUP___V924*/ meltfptr[923]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V914*/ meltfptr[913])) ==
+ ( /*_.VALDATA___V917*/ meltfptr[916])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V914*/
- meltfptr[913]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[6] =
+ ( /*_.VALDATA___V917*/
+ meltfptr[916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V921*/ meltfptr[920]);
+ /*_.VALTUP___V924*/ meltfptr[923]);
MELT_LOCATION ("warmelt-genobj.melt:494:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V914*/ meltfptr[913]);
+ meltgc_touch ( /*_.VALDATA___V917*/ meltfptr[916]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V922*/ meltfptr[921])) ==
+ ( /*_.VALDATA___V925*/ meltfptr[924])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V922*/
- meltfptr[921]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[1] =
+ ( /*_.VALDATA___V925*/
+ meltfptr[924]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V923*/ meltfptr[922]);
+ /*_.VALSTR___V926*/ meltfptr[925]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V922*/ meltfptr[921]);
+ meltgc_touch ( /*_.VALDATA___V925*/ meltfptr[924]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V924*/ meltfptr[923])) ==
+ ( /*_.VALDATA___V927*/ meltfptr[926])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V924*/
- meltfptr[923]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] =
+ ( /*_.VALDATA___V927*/
+ meltfptr[926]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V925*/ meltfptr[924]);
+ /*_.VALSTR___V928*/ meltfptr[927]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V924*/ meltfptr[923]);
+ meltgc_touch ( /*_.VALDATA___V927*/ meltfptr[926]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V926*/ meltfptr[925])) ==
+ ( /*_.VALDATA___V929*/ meltfptr[928])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V926*/
- meltfptr[925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] =
+ ( /*_.VALDATA___V929*/
+ meltfptr[928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V927*/ meltfptr[926]);
+ /*_.VALSTR___V930*/ meltfptr[929]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V926*/ meltfptr[925]);
+ meltgc_touch ( /*_.VALDATA___V929*/ meltfptr[928]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V928*/ meltfptr[927])) ==
+ ( /*_.VALDATA___V931*/ meltfptr[930])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V928*/
- meltfptr[927]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[1] =
+ ( /*_.VALDATA___V931*/
+ meltfptr[930]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V929*/ meltfptr[928]);
+ /*_.VALSTR___V932*/ meltfptr[931]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V928*/ meltfptr[927])) ==
+ ( /*_.VALDATA___V931*/ meltfptr[930])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V928*/
- meltfptr[927]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[4] =
+ ( /*_.VALDATA___V931*/
+ meltfptr[930]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V344*/ meltfptr[343]);
+ /*_.VALDATA___V347*/ meltfptr[346]);
- /*putupl#539 */
- melt_assertmsg ("putupl #539 checktup",
+ /*putupl#534 */
+ melt_assertmsg ("putupl #534 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V930*/ meltfptr[929])) ==
+ ( /*_.VALTUP___V933*/ meltfptr[932])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #539 checkoff",
+ melt_assertmsg ("putupl #534 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V930*/
- meltfptr[929]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[0] =
+ ( /*_.VALTUP___V933*/
+ meltfptr[932]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V933*/ meltfptr[932]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -56088,1199 +56445,1199 @@ warmelt_genobj_initialmeltchunk_12 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))),
(0))));
- /*putupl#540 */
- melt_assertmsg ("putupl #540 checktup",
+ /*putupl#535 */
+ melt_assertmsg ("putupl #535 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V930*/ meltfptr[929])) ==
+ ( /*_.VALTUP___V933*/ meltfptr[932])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #540 checkoff",
+ melt_assertmsg ("putupl #535 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V930*/
- meltfptr[929]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[1] =
+ ( /*_.VALTUP___V933*/
+ meltfptr[932]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V933*/ meltfptr[932]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]);
- /*putupl#541 */
- melt_assertmsg ("putupl #541 checktup",
+ /*putupl#536 */
+ melt_assertmsg ("putupl #536 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V930*/ meltfptr[929])) ==
+ ( /*_.VALTUP___V933*/ meltfptr[932])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #541 checkoff",
+ melt_assertmsg ("putupl #536 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V930*/
- meltfptr[929]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ ( /*_.VALTUP___V933*/
+ meltfptr[932]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V933*/ meltfptr[932]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V930*/ meltfptr[929]);
+ meltgc_touch ( /*_.VALTUP___V933*/ meltfptr[932]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V928*/ meltfptr[927])) ==
+ ( /*_.VALDATA___V931*/ meltfptr[930])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V928*/
- meltfptr[927]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[5] =
+ ( /*_.VALDATA___V931*/
+ meltfptr[930]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V930*/ meltfptr[929]);
+ /*_.VALTUP___V933*/ meltfptr[932]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V931*/ meltfptr[930])) ==
+ ( /*_.VALDATA___V934*/ meltfptr[933])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V931*/
- meltfptr[930]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[1] =
+ ( /*_.VALDATA___V934*/
+ meltfptr[933]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V932*/ meltfptr[931]);
+ /*_.VALSTR___V935*/ meltfptr[934]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V931*/ meltfptr[930])) ==
+ ( /*_.VALDATA___V934*/ meltfptr[933])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V931*/
- meltfptr[930]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[2] =
+ ( /*_.VALDATA___V934*/
+ meltfptr[933]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V928*/ meltfptr[927]);
+ /*_.VALDATA___V931*/ meltfptr[930]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V931*/ meltfptr[930]);
+ meltgc_touch ( /*_.VALDATA___V934*/ meltfptr[933]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V933*/ meltfptr[932])) ==
+ ( /*_.VALDATA___V936*/ meltfptr[935])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V933*/
- meltfptr[932]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]))->obj_vartab[1] =
+ ( /*_.VALDATA___V936*/
+ meltfptr[935]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V934*/ meltfptr[933]);
+ /*_.VALSTR___V937*/ meltfptr[936]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V933*/ meltfptr[932])) ==
+ ( /*_.VALDATA___V936*/ meltfptr[935])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V933*/
- meltfptr[932]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]))->obj_vartab[2] =
+ ( /*_.VALDATA___V936*/
+ meltfptr[935]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V928*/ meltfptr[927]);
+ /*_.VALDATA___V931*/ meltfptr[930]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V933*/ meltfptr[932]);
+ meltgc_touch ( /*_.VALDATA___V936*/ meltfptr[935]);
- /*putupl#542 */
- melt_assertmsg ("putupl #542 checktup",
+ /*putupl#537 */
+ melt_assertmsg ("putupl #537 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V935*/ meltfptr[934])) ==
+ ( /*_.VALTUP___V938*/ meltfptr[937])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #542 checkoff",
+ melt_assertmsg ("putupl #537 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V935*/
- meltfptr[934]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V935*/ meltfptr[934]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ ( /*_.VALTUP___V938*/
+ meltfptr[937]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V938*/ meltfptr[937]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
- /*putupl#543 */
- melt_assertmsg ("putupl #543 checktup",
+ /*putupl#538 */
+ melt_assertmsg ("putupl #538 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V935*/ meltfptr[934])) ==
+ ( /*_.VALTUP___V938*/ meltfptr[937])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #543 checkoff",
+ melt_assertmsg ("putupl #538 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V935*/
- meltfptr[934]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V935*/ meltfptr[934]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]);
+ ( /*_.VALTUP___V938*/
+ meltfptr[937]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V938*/ meltfptr[937]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]);
- /*putupl#544 */
- melt_assertmsg ("putupl #544 checktup",
+ /*putupl#539 */
+ melt_assertmsg ("putupl #539 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V935*/ meltfptr[934])) ==
+ ( /*_.VALTUP___V938*/ meltfptr[937])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #544 checkoff",
+ melt_assertmsg ("putupl #539 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V935*/
- meltfptr[934]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V935*/ meltfptr[934]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]);
+ ( /*_.VALTUP___V938*/
+ meltfptr[937]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V938*/ meltfptr[937]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V935*/ meltfptr[934]);
+ meltgc_touch ( /*_.VALTUP___V938*/ meltfptr[937]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V928*/ meltfptr[927])) ==
+ ( /*_.VALDATA___V931*/ meltfptr[930])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V928*/
- meltfptr[927]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[6] =
+ ( /*_.VALDATA___V931*/
+ meltfptr[930]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V935*/ meltfptr[934]);
+ /*_.VALTUP___V938*/ meltfptr[937]);
MELT_LOCATION ("warmelt-genobj.melt:501:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V928*/ meltfptr[927]);
+ meltgc_touch ( /*_.VALDATA___V931*/ meltfptr[930]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V936*/ meltfptr[935])) ==
+ ( /*_.VALDATA___V939*/ meltfptr[938])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V936*/
- meltfptr[935]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[1] =
+ ( /*_.VALDATA___V939*/
+ meltfptr[938]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V939*/ meltfptr[938]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V937*/ meltfptr[936]);
+ /*_.VALSTR___V940*/ meltfptr[939]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V936*/ meltfptr[935]);
+ meltgc_touch ( /*_.VALDATA___V939*/ meltfptr[938]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V938*/ meltfptr[937])) ==
+ ( /*_.VALDATA___V941*/ meltfptr[940])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V938*/
- meltfptr[937]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[1] =
+ ( /*_.VALDATA___V941*/
+ meltfptr[940]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V939*/ meltfptr[938]);
+ /*_.VALSTR___V942*/ meltfptr[941]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V938*/ meltfptr[937]);
+ meltgc_touch ( /*_.VALDATA___V941*/ meltfptr[940]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V940*/ meltfptr[939])) ==
+ ( /*_.VALDATA___V943*/ meltfptr[942])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V940*/
- meltfptr[939]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[1] =
+ ( /*_.VALDATA___V943*/
+ meltfptr[942]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V941*/ meltfptr[940]);
+ /*_.VALSTR___V944*/ meltfptr[943]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V940*/ meltfptr[939]);
+ meltgc_touch ( /*_.VALDATA___V943*/ meltfptr[942]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V942*/ meltfptr[941])) ==
+ ( /*_.VALDATA___V945*/ meltfptr[944])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V942*/
- meltfptr[941]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[1] =
+ ( /*_.VALDATA___V945*/
+ meltfptr[944]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V943*/ meltfptr[942]);
+ /*_.VALSTR___V946*/ meltfptr[945]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V942*/ meltfptr[941]);
+ meltgc_touch ( /*_.VALDATA___V945*/ meltfptr[944]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V944*/ meltfptr[943])) ==
+ ( /*_.VALDATA___V947*/ meltfptr[946])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V944*/
- meltfptr[943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[1] =
+ ( /*_.VALDATA___V947*/
+ meltfptr[946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V945*/ meltfptr[944]);
+ /*_.VALSTR___V948*/ meltfptr[947]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V944*/ meltfptr[943])) ==
+ ( /*_.VALDATA___V947*/ meltfptr[946])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V944*/
- meltfptr[943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[4] =
+ ( /*_.VALDATA___V947*/
+ meltfptr[946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_NAMED__V8*/ meltfptr[7]);
- /*putupl#545 */
- melt_assertmsg ("putupl #545 checktup",
+ /*putupl#540 */
+ melt_assertmsg ("putupl #540 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V946*/ meltfptr[945])) ==
+ ( /*_.VALTUP___V949*/ meltfptr[948])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #545 checkoff",
+ melt_assertmsg ("putupl #540 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V946*/
- meltfptr[945]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[0] =
+ ( /*_.VALTUP___V949*/
+ meltfptr[948]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V949*/ meltfptr[948]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0))));
- /*putupl#546 */
- melt_assertmsg ("putupl #546 checktup",
+ /*putupl#541 */
+ melt_assertmsg ("putupl #541 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V946*/ meltfptr[945])) ==
+ ( /*_.VALTUP___V949*/ meltfptr[948])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #546 checkoff",
+ melt_assertmsg ("putupl #541 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V946*/
- meltfptr[945]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[1] =
+ ( /*_.VALTUP___V949*/
+ meltfptr[948]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V949*/ meltfptr[948]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1))));
- /*putupl#547 */
- melt_assertmsg ("putupl #547 checktup",
+ /*putupl#542 */
+ melt_assertmsg ("putupl #542 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V946*/ meltfptr[945])) ==
+ ( /*_.VALTUP___V949*/ meltfptr[948])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #547 checkoff",
+ melt_assertmsg ("putupl #542 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V946*/
- meltfptr[945]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[2] =
+ ( /*_.VALTUP___V949*/
+ meltfptr[948]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V949*/ meltfptr[948]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V946*/ meltfptr[945]);
+ meltgc_touch ( /*_.VALTUP___V949*/ meltfptr[948]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V944*/ meltfptr[943])) ==
+ ( /*_.VALDATA___V947*/ meltfptr[946])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V944*/
- meltfptr[943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[5] =
+ ( /*_.VALDATA___V947*/
+ meltfptr[946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V946*/ meltfptr[945]);
+ /*_.VALTUP___V949*/ meltfptr[948]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V947*/ meltfptr[946])) ==
+ ( /*_.VALDATA___V950*/ meltfptr[949])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V947*/
- meltfptr[946]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] =
+ ( /*_.VALDATA___V950*/
+ meltfptr[949]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V948*/ meltfptr[947]);
+ /*_.VALSTR___V951*/ meltfptr[950]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V947*/ meltfptr[946])) ==
+ ( /*_.VALDATA___V950*/ meltfptr[949])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V947*/
- meltfptr[946]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[2] =
+ ( /*_.VALDATA___V950*/
+ meltfptr[949]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V947*/ meltfptr[946]);
+ meltgc_touch ( /*_.VALDATA___V950*/ meltfptr[949]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V949*/ meltfptr[948])) ==
+ ( /*_.VALDATA___V952*/ meltfptr[951])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V949*/
- meltfptr[948]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]))->obj_vartab[1] =
+ ( /*_.VALDATA___V952*/
+ meltfptr[951]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V952*/ meltfptr[951]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V950*/ meltfptr[949]);
+ /*_.VALSTR___V953*/ meltfptr[952]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V949*/ meltfptr[948])) ==
+ ( /*_.VALDATA___V952*/ meltfptr[951])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V949*/
- meltfptr[948]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]))->obj_vartab[2] =
+ ( /*_.VALDATA___V952*/
+ meltfptr[951]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V952*/ meltfptr[951]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V949*/ meltfptr[948]);
+ meltgc_touch ( /*_.VALDATA___V952*/ meltfptr[951]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V951*/ meltfptr[950])) ==
+ ( /*_.VALDATA___V954*/ meltfptr[953])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V951*/
- meltfptr[950]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] =
+ ( /*_.VALDATA___V954*/
+ meltfptr[953]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V952*/ meltfptr[951]);
+ /*_.VALSTR___V955*/ meltfptr[954]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V951*/ meltfptr[950])) ==
+ ( /*_.VALDATA___V954*/ meltfptr[953])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V951*/
- meltfptr[950]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[2] =
+ ( /*_.VALDATA___V954*/
+ meltfptr[953]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]);
+ meltgc_touch ( /*_.VALDATA___V954*/ meltfptr[953]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V953*/ meltfptr[952])) ==
+ ( /*_.VALDATA___V956*/ meltfptr[955])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V953*/
- meltfptr[952]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] =
+ ( /*_.VALDATA___V956*/
+ meltfptr[955]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V954*/ meltfptr[953]);
+ /*_.VALSTR___V957*/ meltfptr[956]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V953*/ meltfptr[952])) ==
+ ( /*_.VALDATA___V956*/ meltfptr[955])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V953*/
- meltfptr[952]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[2] =
+ ( /*_.VALDATA___V956*/
+ meltfptr[955]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V953*/ meltfptr[952]);
+ meltgc_touch ( /*_.VALDATA___V956*/ meltfptr[955]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V955*/ meltfptr[954])) ==
+ ( /*_.VALDATA___V958*/ meltfptr[957])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V955*/
- meltfptr[954]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[1] =
+ ( /*_.VALDATA___V958*/
+ meltfptr[957]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V956*/ meltfptr[955]);
+ /*_.VALSTR___V959*/ meltfptr[958]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V955*/ meltfptr[954])) ==
+ ( /*_.VALDATA___V958*/ meltfptr[957])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V955*/
- meltfptr[954]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[2] =
+ ( /*_.VALDATA___V958*/
+ meltfptr[957]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V955*/ meltfptr[954]);
+ meltgc_touch ( /*_.VALDATA___V958*/ meltfptr[957]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V957*/ meltfptr[956])) ==
+ ( /*_.VALDATA___V960*/ meltfptr[959])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V957*/
- meltfptr[956]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]))->obj_vartab[1] =
+ ( /*_.VALDATA___V960*/
+ meltfptr[959]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V958*/ meltfptr[957]);
+ /*_.VALSTR___V961*/ meltfptr[960]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V957*/ meltfptr[956])) ==
+ ( /*_.VALDATA___V960*/ meltfptr[959])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V957*/
- meltfptr[956]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]))->obj_vartab[2] =
+ ( /*_.VALDATA___V960*/
+ meltfptr[959]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V957*/ meltfptr[956]);
+ meltgc_touch ( /*_.VALDATA___V960*/ meltfptr[959]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V959*/ meltfptr[958])) ==
+ ( /*_.VALDATA___V962*/ meltfptr[961])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V959*/
- meltfptr[958]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[1] =
+ ( /*_.VALDATA___V962*/
+ meltfptr[961]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V960*/ meltfptr[959]);
+ /*_.VALSTR___V963*/ meltfptr[962]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V959*/ meltfptr[958])) ==
+ ( /*_.VALDATA___V962*/ meltfptr[961])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V959*/
- meltfptr[958]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[2] =
+ ( /*_.VALDATA___V962*/
+ meltfptr[961]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V959*/ meltfptr[958]);
+ meltgc_touch ( /*_.VALDATA___V962*/ meltfptr[961]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V961*/ meltfptr[960])) ==
+ ( /*_.VALDATA___V964*/ meltfptr[963])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V961*/
- meltfptr[960]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]))->obj_vartab[1] =
+ ( /*_.VALDATA___V964*/
+ meltfptr[963]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V962*/ meltfptr[961]);
+ /*_.VALSTR___V965*/ meltfptr[964]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V961*/ meltfptr[960])) ==
+ ( /*_.VALDATA___V964*/ meltfptr[963])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V961*/
- meltfptr[960]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]))->obj_vartab[2] =
+ ( /*_.VALDATA___V964*/
+ meltfptr[963]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V961*/ meltfptr[960]);
+ meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]);
- /*putupl#548 */
- melt_assertmsg ("putupl #548 checktup",
+ /*putupl#543 */
+ melt_assertmsg ("putupl #543 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #548 checkoff",
+ melt_assertmsg ("putupl #543 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[0] =
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0))));
- /*putupl#549 */
- melt_assertmsg ("putupl #549 checktup",
+ /*putupl#544 */
+ melt_assertmsg ("putupl #544 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #549 checkoff",
+ melt_assertmsg ("putupl #544 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[1] =
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1))));
- /*putupl#550 */
- melt_assertmsg ("putupl #550 checktup",
+ /*putupl#545 */
+ melt_assertmsg ("putupl #545 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #550 checkoff",
+ melt_assertmsg ("putupl #545 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
- /*putupl#551 */
- melt_assertmsg ("putupl #551 checktup",
+ /*putupl#546 */
+ melt_assertmsg ("putupl #546 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #551 checkoff",
+ melt_assertmsg ("putupl #546 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V952*/ meltfptr[951]);
- /*putupl#552 */
- melt_assertmsg ("putupl #552 checktup",
+ /*putupl#547 */
+ melt_assertmsg ("putupl #547 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #552 checkoff",
+ melt_assertmsg ("putupl #547 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]);
- /*putupl#553 */
- melt_assertmsg ("putupl #553 checktup",
+ /*putupl#548 */
+ melt_assertmsg ("putupl #548 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #553 checkoff",
+ melt_assertmsg ("putupl #548 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]);
- /*putupl#554 */
- melt_assertmsg ("putupl #554 checktup",
+ /*putupl#549 */
+ melt_assertmsg ("putupl #549 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #554 checkoff",
+ melt_assertmsg ("putupl #549 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]);
- /*putupl#555 */
- melt_assertmsg ("putupl #555 checktup",
+ /*putupl#550 */
+ melt_assertmsg ("putupl #550 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #555 checkoff",
+ melt_assertmsg ("putupl #550 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]);
- /*putupl#556 */
- melt_assertmsg ("putupl #556 checktup",
+ /*putupl#551 */
+ melt_assertmsg ("putupl #551 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #556 checkoff",
+ melt_assertmsg ("putupl #551 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]);
- /*putupl#557 */
- melt_assertmsg ("putupl #557 checktup",
+ /*putupl#552 */
+ melt_assertmsg ("putupl #552 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V963*/ meltfptr[962])) ==
+ ( /*_.VALTUP___V966*/ meltfptr[965])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #557 checkoff",
+ melt_assertmsg ("putupl #552 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V963*/
- meltfptr[962]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]);
+ ( /*_.VALTUP___V966*/
+ meltfptr[965]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V963*/ meltfptr[962]);
+ meltgc_touch ( /*_.VALTUP___V966*/ meltfptr[965]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V944*/ meltfptr[943])) ==
+ ( /*_.VALDATA___V947*/ meltfptr[946])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V944*/
- meltfptr[943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[6] =
+ ( /*_.VALDATA___V947*/
+ meltfptr[946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V963*/ meltfptr[962]);
+ /*_.VALTUP___V966*/ meltfptr[965]);
MELT_LOCATION ("warmelt-genobj.melt:509:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V944*/ meltfptr[943]);
+ meltgc_touch ( /*_.VALDATA___V947*/ meltfptr[946]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V964*/ meltfptr[963])) ==
+ ( /*_.VALDATA___V967*/ meltfptr[966])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V964*/
- meltfptr[963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] =
+ ( /*_.VALDATA___V967*/
+ meltfptr[966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V965*/ meltfptr[964]);
+ /*_.VALSTR___V968*/ meltfptr[967]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]);
+ meltgc_touch ( /*_.VALDATA___V967*/ meltfptr[966]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V966*/ meltfptr[965])) ==
+ ( /*_.VALDATA___V969*/ meltfptr[968])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V966*/
- meltfptr[965]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] =
+ ( /*_.VALDATA___V969*/
+ meltfptr[968]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V967*/ meltfptr[966]);
+ /*_.VALSTR___V970*/ meltfptr[969]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V966*/ meltfptr[965]);
+ meltgc_touch ( /*_.VALDATA___V969*/ meltfptr[968]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V968*/ meltfptr[967])) ==
+ ( /*_.VALDATA___V971*/ meltfptr[970])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V968*/
- meltfptr[967]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[1] =
+ ( /*_.VALDATA___V971*/
+ meltfptr[970]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V969*/ meltfptr[968]);
+ /*_.VALSTR___V972*/ meltfptr[971]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V968*/ meltfptr[967]);
+ meltgc_touch ( /*_.VALDATA___V971*/ meltfptr[970]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V970*/ meltfptr[969])) ==
+ ( /*_.VALDATA___V973*/ meltfptr[972])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V970*/
- meltfptr[969]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[1] =
+ ( /*_.VALDATA___V973*/
+ meltfptr[972]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V971*/ meltfptr[970]);
+ /*_.VALSTR___V974*/ meltfptr[973]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V970*/ meltfptr[969]);
+ meltgc_touch ( /*_.VALDATA___V973*/ meltfptr[972]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V972*/ meltfptr[971])) ==
+ ( /*_.VALDATA___V975*/ meltfptr[974])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V972*/
- meltfptr[971]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]))->obj_vartab[1] =
+ ( /*_.VALDATA___V975*/
+ meltfptr[974]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V973*/ meltfptr[972]);
+ /*_.VALSTR___V976*/ meltfptr[975]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V972*/ meltfptr[971]);
+ meltgc_touch ( /*_.VALDATA___V975*/ meltfptr[974]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V974*/ meltfptr[973])) ==
+ ( /*_.VALDATA___V977*/ meltfptr[976])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V974*/
- meltfptr[973]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]))->obj_vartab[1] =
+ ( /*_.VALDATA___V977*/
+ meltfptr[976]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V975*/ meltfptr[974]);
+ /*_.VALSTR___V978*/ meltfptr[977]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V974*/ meltfptr[973]);
+ meltgc_touch ( /*_.VALDATA___V977*/ meltfptr[976]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V976*/ meltfptr[975])) ==
+ ( /*_.VALDATA___V979*/ meltfptr[978])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V976*/
- meltfptr[975]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]))->obj_vartab[1] =
+ ( /*_.VALDATA___V979*/
+ meltfptr[978]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V977*/ meltfptr[976]);
+ /*_.VALSTR___V980*/ meltfptr[979]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V976*/ meltfptr[975]);
+ meltgc_touch ( /*_.VALDATA___V979*/ meltfptr[978]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V978*/ meltfptr[977])) ==
+ ( /*_.VALDATA___V981*/ meltfptr[980])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V978*/
- meltfptr[977]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[1] =
+ ( /*_.VALDATA___V981*/
+ meltfptr[980]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V979*/ meltfptr[978]);
+ /*_.VALSTR___V982*/ meltfptr[981]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V978*/ meltfptr[977]);
+ meltgc_touch ( /*_.VALDATA___V981*/ meltfptr[980]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V980*/ meltfptr[979])) ==
+ ( /*_.VALDATA___V983*/ meltfptr[982])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V980*/
- meltfptr[979]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]))->obj_vartab[1] =
+ ( /*_.VALDATA___V983*/
+ meltfptr[982]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V981*/ meltfptr[980]);
+ /*_.VALSTR___V984*/ meltfptr[983]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V980*/ meltfptr[979]);
+ meltgc_touch ( /*_.VALDATA___V983*/ meltfptr[982]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V982*/ meltfptr[981])) ==
+ ( /*_.VALDATA___V985*/ meltfptr[984])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V982*/
- meltfptr[981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] =
+ ( /*_.VALDATA___V985*/
+ meltfptr[984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V983*/ meltfptr[982]);
+ /*_.VALSTR___V986*/ meltfptr[985]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V982*/ meltfptr[981])) ==
+ ( /*_.VALDATA___V985*/ meltfptr[984])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V982*/
- meltfptr[981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[4] =
+ ( /*_.VALDATA___V985*/
+ meltfptr[984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
- /*putupl#558 */
- melt_assertmsg ("putupl #558 checktup",
+ /*putupl#553 */
+ melt_assertmsg ("putupl #553 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V984*/ meltfptr[983])) ==
+ ( /*_.VALTUP___V987*/ meltfptr[986])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #558 checkoff",
+ melt_assertmsg ("putupl #553 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V984*/
- meltfptr[983]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V984*/ meltfptr[983]))->tabval[0] =
+ ( /*_.VALTUP___V987*/
+ meltfptr[986]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V987*/ meltfptr[986]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0))));
- /*putupl#559 */
- melt_assertmsg ("putupl #559 checktup",
+ /*putupl#554 */
+ melt_assertmsg ("putupl #554 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V984*/ meltfptr[983])) ==
+ ( /*_.VALTUP___V987*/ meltfptr[986])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #559 checkoff",
+ melt_assertmsg ("putupl #554 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V984*/
- meltfptr[983]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V984*/ meltfptr[983]))->tabval[1] =
+ ( /*_.VALTUP___V987*/
+ meltfptr[986]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V987*/ meltfptr[986]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1))));
- /*putupl#560 */
- melt_assertmsg ("putupl #560 checktup",
+ /*putupl#555 */
+ melt_assertmsg ("putupl #555 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V984*/ meltfptr[983])) ==
+ ( /*_.VALTUP___V987*/ meltfptr[986])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #560 checkoff",
+ melt_assertmsg ("putupl #555 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V984*/
- meltfptr[983]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V984*/ meltfptr[983]))->tabval[2] =
+ ( /*_.VALTUP___V987*/
+ meltfptr[986]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V987*/ meltfptr[986]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- /*putupl#561 */
- melt_assertmsg ("putupl #561 checktup",
+ /*putupl#556 */
+ melt_assertmsg ("putupl #556 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V984*/ meltfptr[983])) ==
+ ( /*_.VALTUP___V987*/ meltfptr[986])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #561 checkoff",
+ melt_assertmsg ("putupl #556 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V984*/
- meltfptr[983]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V984*/ meltfptr[983]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ ( /*_.VALTUP___V987*/
+ meltfptr[986]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V987*/ meltfptr[986]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V984*/ meltfptr[983]);
+ meltgc_touch ( /*_.VALTUP___V987*/ meltfptr[986]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V982*/ meltfptr[981])) ==
+ ( /*_.VALDATA___V985*/ meltfptr[984])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V982*/
- meltfptr[981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[5] =
+ ( /*_.VALDATA___V985*/
+ meltfptr[984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V984*/ meltfptr[983]);
+ /*_.VALTUP___V987*/ meltfptr[986]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V985*/ meltfptr[984])) ==
+ ( /*_.VALDATA___V988*/ meltfptr[987])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V985*/
- meltfptr[984]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[1] =
+ ( /*_.VALDATA___V988*/
+ meltfptr[987]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V986*/ meltfptr[985]);
+ /*_.VALSTR___V989*/ meltfptr[988]);
#undef meltfram__
@@ -57298,1167 +57655,1167 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V985*/ meltfptr[984])) ==
+ ( /*_.VALDATA___V988*/ meltfptr[987])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V985*/
- meltfptr[984]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[2] =
+ ( /*_.VALDATA___V988*/
+ meltfptr[987]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V982*/ meltfptr[981]);
+ /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V985*/ meltfptr[984]);
+ meltgc_touch ( /*_.VALDATA___V988*/ meltfptr[987]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V987*/ meltfptr[986])) ==
+ ( /*_.VALDATA___V990*/ meltfptr[989])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V987*/
- meltfptr[986]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]))->obj_vartab[1] =
+ ( /*_.VALDATA___V990*/
+ meltfptr[989]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V988*/ meltfptr[987]);
+ /*_.VALSTR___V991*/ meltfptr[990]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V987*/ meltfptr[986])) ==
+ ( /*_.VALDATA___V990*/ meltfptr[989])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V987*/
- meltfptr[986]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]))->obj_vartab[2] =
+ ( /*_.VALDATA___V990*/
+ meltfptr[989]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V982*/ meltfptr[981]);
+ /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V987*/ meltfptr[986]);
+ meltgc_touch ( /*_.VALDATA___V990*/ meltfptr[989]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V989*/ meltfptr[988])) ==
+ ( /*_.VALDATA___V992*/ meltfptr[991])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V989*/
- meltfptr[988]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[1] =
+ ( /*_.VALDATA___V992*/
+ meltfptr[991]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V990*/ meltfptr[989]);
+ /*_.VALSTR___V993*/ meltfptr[992]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V989*/ meltfptr[988])) ==
+ ( /*_.VALDATA___V992*/ meltfptr[991])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V989*/
- meltfptr[988]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[2] =
+ ( /*_.VALDATA___V992*/
+ meltfptr[991]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V982*/ meltfptr[981]);
+ /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V989*/ meltfptr[988]);
+ meltgc_touch ( /*_.VALDATA___V992*/ meltfptr[991]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V991*/ meltfptr[990])) ==
+ ( /*_.VALDATA___V994*/ meltfptr[993])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V991*/
- meltfptr[990]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V991*/ meltfptr[990]))->obj_vartab[1] =
+ ( /*_.VALDATA___V994*/
+ meltfptr[993]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V992*/ meltfptr[991]);
+ /*_.VALSTR___V995*/ meltfptr[994]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V991*/ meltfptr[990])) ==
+ ( /*_.VALDATA___V994*/ meltfptr[993])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V991*/
- meltfptr[990]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V991*/ meltfptr[990]))->obj_vartab[2] =
+ ( /*_.VALDATA___V994*/
+ meltfptr[993]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V982*/ meltfptr[981]);
+ /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V991*/ meltfptr[990]);
+ meltgc_touch ( /*_.VALDATA___V994*/ meltfptr[993]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V993*/ meltfptr[992])) ==
+ ( /*_.VALDATA___V996*/ meltfptr[995])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V993*/
- meltfptr[992]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]))->obj_vartab[1] =
+ ( /*_.VALDATA___V996*/
+ meltfptr[995]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V994*/ meltfptr[993]);
+ /*_.VALSTR___V997*/ meltfptr[996]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V993*/ meltfptr[992])) ==
+ ( /*_.VALDATA___V996*/ meltfptr[995])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V993*/
- meltfptr[992]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]))->obj_vartab[2] =
+ ( /*_.VALDATA___V996*/
+ meltfptr[995]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V982*/ meltfptr[981]);
+ /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V993*/ meltfptr[992]);
+ meltgc_touch ( /*_.VALDATA___V996*/ meltfptr[995]);
- /*putupl#562 */
- melt_assertmsg ("putupl #562 checktup",
+ /*putupl#557 */
+ melt_assertmsg ("putupl #557 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #562 checkoff",
+ melt_assertmsg ("putupl #557 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[0] =
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0))));
- /*putupl#563 */
- melt_assertmsg ("putupl #563 checktup",
+ /*putupl#558 */
+ melt_assertmsg ("putupl #558 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #563 checkoff",
+ melt_assertmsg ("putupl #558 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[1] =
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1))));
- /*putupl#564 */
- melt_assertmsg ("putupl #564 checktup",
+ /*putupl#559 */
+ melt_assertmsg ("putupl #559 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #564 checkoff",
+ melt_assertmsg ("putupl #559 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
- /*putupl#565 */
- melt_assertmsg ("putupl #565 checktup",
+ /*putupl#560 */
+ melt_assertmsg ("putupl #560 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #565 checkoff",
+ melt_assertmsg ("putupl #560 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V952*/ meltfptr[951]);
- /*putupl#566 */
- melt_assertmsg ("putupl #566 checktup",
+ /*putupl#561 */
+ melt_assertmsg ("putupl #561 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #566 checkoff",
+ melt_assertmsg ("putupl #561 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]);
- /*putupl#567 */
- melt_assertmsg ("putupl #567 checktup",
+ /*putupl#562 */
+ melt_assertmsg ("putupl #562 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #567 checkoff",
+ melt_assertmsg ("putupl #562 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]);
- /*putupl#568 */
- melt_assertmsg ("putupl #568 checktup",
+ /*putupl#563 */
+ melt_assertmsg ("putupl #563 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #568 checkoff",
+ melt_assertmsg ("putupl #563 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]);
- /*putupl#569 */
- melt_assertmsg ("putupl #569 checktup",
+ /*putupl#564 */
+ melt_assertmsg ("putupl #564 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #569 checkoff",
+ melt_assertmsg ("putupl #564 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]);
- /*putupl#570 */
- melt_assertmsg ("putupl #570 checktup",
+ /*putupl#565 */
+ melt_assertmsg ("putupl #565 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #570 checkoff",
+ melt_assertmsg ("putupl #565 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]);
- /*putupl#571 */
- melt_assertmsg ("putupl #571 checktup",
+ /*putupl#566 */
+ melt_assertmsg ("putupl #566 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #571 checkoff",
+ melt_assertmsg ("putupl #566 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
- /*putupl#572 */
- melt_assertmsg ("putupl #572 checktup",
+ /*putupl#567 */
+ melt_assertmsg ("putupl #567 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #572 checkoff",
+ melt_assertmsg ("putupl #567 checkoff",
(10 >= 0
&& 10 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]);
- /*putupl#573 */
- melt_assertmsg ("putupl #573 checktup",
+ /*putupl#568 */
+ melt_assertmsg ("putupl #568 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #573 checkoff",
+ melt_assertmsg ("putupl #568 checkoff",
(11 >= 0
&& 11 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]);
- /*putupl#574 */
- melt_assertmsg ("putupl #574 checktup",
+ /*putupl#569 */
+ melt_assertmsg ("putupl #569 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #574 checkoff",
+ melt_assertmsg ("putupl #569 checkoff",
(12 >= 0
&& 12 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]);
- /*putupl#575 */
- melt_assertmsg ("putupl #575 checktup",
+ /*putupl#570 */
+ melt_assertmsg ("putupl #570 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #575 checkoff",
+ melt_assertmsg ("putupl #570 checkoff",
(13 >= 0
&& 13 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V991*/ meltfptr[990]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]);
- /*putupl#576 */
- melt_assertmsg ("putupl #576 checktup",
+ /*putupl#571 */
+ melt_assertmsg ("putupl #571 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V995*/ meltfptr[994])) ==
+ ( /*_.VALTUP___V998*/ meltfptr[997])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #576 checkoff",
+ melt_assertmsg ("putupl #571 checkoff",
(14 >= 0
&& 14 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V995*/
- meltfptr[994]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V995*/ meltfptr[994]))->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]);
+ ( /*_.VALTUP___V998*/
+ meltfptr[997]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V998*/ meltfptr[997]))->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V995*/ meltfptr[994]);
+ meltgc_touch ( /*_.VALTUP___V998*/ meltfptr[997]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V982*/ meltfptr[981])) ==
+ ( /*_.VALDATA___V985*/ meltfptr[984])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V982*/
- meltfptr[981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[6] =
+ ( /*_.VALDATA___V985*/
+ meltfptr[984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V995*/ meltfptr[994]);
+ /*_.VALTUP___V998*/ meltfptr[997]);
MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V982*/ meltfptr[981]);
+ meltgc_touch ( /*_.VALDATA___V985*/ meltfptr[984]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V996*/ meltfptr[995])) ==
+ ( /*_.VALDATA___V999*/ meltfptr[998])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V996*/
- meltfptr[995]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]))->obj_vartab[1] =
+ ( /*_.VALDATA___V999*/
+ meltfptr[998]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V997*/ meltfptr[996]);
+ /*_.VALSTR___V1000*/ meltfptr[999]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V996*/ meltfptr[995]);
+ meltgc_touch ( /*_.VALDATA___V999*/ meltfptr[998]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V998*/ meltfptr[997])) ==
- MELTOBMAG_OBJECT);
+ ( /*_.VALDATA___V1001*/ meltfptr[1000]))
+ == MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V998*/
- meltfptr[997]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]))->obj_vartab[1] =
- (melt_ptr_t) (
- /*_.VALSTR___V999*/ meltfptr[998]);
+ ( /*_.VALDATA___V1001*/
+ meltfptr[1000]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1002*/ meltfptr[1001]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V998*/ meltfptr[997]);
+ meltgc_touch ( /*_.VALDATA___V1001*/ meltfptr[1000]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/ meltfptr[999])) ==
- MELTOBMAG_OBJECT);
+ ( /*_.VALDATA___V1003*/ meltfptr[1002]))
+ == MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/
- meltfptr[999]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1000*/ meltfptr[999]))->obj_vartab[1] =
- (melt_ptr_t) (
- /*_.VALSTR___V1001*/ meltfptr[1000]);
+ ( /*_.VALDATA___V1003*/
+ meltfptr[1002]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1004*/ meltfptr[1003]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1000*/ meltfptr[999]);
+ meltgc_touch ( /*_.VALDATA___V1003*/ meltfptr[1002]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/ meltfptr[1001]))
+ ( /*_.VALDATA___V1005*/ meltfptr[1004]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/
- meltfptr[1001]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]))->
+ ( /*_.VALDATA___V1005*/
+ meltfptr[1004]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1003*/ meltfptr[1002]);
+ /*_.VALSTR___V1006*/ meltfptr[1005]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1002*/ meltfptr[1001]);
+ meltgc_touch ( /*_.VALDATA___V1005*/ meltfptr[1004]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1004*/ meltfptr[1003]))
+ ( /*_.VALDATA___V1007*/ meltfptr[1006]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1004*/
- meltfptr[1003]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]))->
+ ( /*_.VALDATA___V1007*/
+ meltfptr[1006]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1005*/ meltfptr[1004]);
+ /*_.VALSTR___V1008*/ meltfptr[1007]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1004*/ meltfptr[1003]);
+ meltgc_touch ( /*_.VALDATA___V1007*/ meltfptr[1006]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/ meltfptr[1005]))
+ ( /*_.VALDATA___V1009*/ meltfptr[1008]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/
- meltfptr[1005]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005]))->
+ ( /*_.VALDATA___V1009*/
+ meltfptr[1008]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1007*/ meltfptr[1006]);
+ /*_.VALSTR___V1010*/ meltfptr[1009]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1006*/ meltfptr[1005]);
+ meltgc_touch ( /*_.VALDATA___V1009*/ meltfptr[1008]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1009*/ meltfptr[1008]);
+ /*_.VALSTR___V1012*/ meltfptr[1011]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.VALDATA___V944*/ meltfptr[943]);
+ /*_.VALDATA___V947*/ meltfptr[946]);
- /*putupl#577 */
- melt_assertmsg ("putupl #577 checktup",
+ /*putupl#572 */
+ melt_assertmsg ("putupl #572 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/ meltfptr[1009])) ==
+ ( /*_.VALTUP___V1013*/ meltfptr[1012])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #577 checkoff",
+ melt_assertmsg ("putupl #572 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/
- meltfptr[1009]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[0] =
+ ( /*_.VALTUP___V1013*/
+ meltfptr[1012]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1013*/ meltfptr[1012]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0))));
- /*putupl#578 */
- melt_assertmsg ("putupl #578 checktup",
+ /*putupl#573 */
+ melt_assertmsg ("putupl #573 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/ meltfptr[1009])) ==
+ ( /*_.VALTUP___V1013*/ meltfptr[1012])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #578 checkoff",
+ melt_assertmsg ("putupl #573 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/
- meltfptr[1009]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[1] =
+ ( /*_.VALTUP___V1013*/
+ meltfptr[1012]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1013*/ meltfptr[1012]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1))));
- /*putupl#579 */
- melt_assertmsg ("putupl #579 checktup",
+ /*putupl#574 */
+ melt_assertmsg ("putupl #574 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/ meltfptr[1009])) ==
+ ( /*_.VALTUP___V1013*/ meltfptr[1012])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #579 checkoff",
+ melt_assertmsg ("putupl #574 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/
- meltfptr[1009]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[2] =
+ ( /*_.VALTUP___V1013*/
+ meltfptr[1012]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1013*/ meltfptr[1012]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- /*putupl#580 */
- melt_assertmsg ("putupl #580 checktup",
+ /*putupl#575 */
+ melt_assertmsg ("putupl #575 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/ meltfptr[1009])) ==
+ ( /*_.VALTUP___V1013*/ meltfptr[1012])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #580 checkoff",
+ melt_assertmsg ("putupl #575 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1010*/
- meltfptr[1009]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ ( /*_.VALTUP___V1013*/
+ meltfptr[1012]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1013*/ meltfptr[1012]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1010*/ meltfptr[1009]);
+ meltgc_touch ( /*_.VALTUP___V1013*/ meltfptr[1012]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1010*/ meltfptr[1009]);
+ /*_.VALTUP___V1013*/ meltfptr[1012]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1011*/ meltfptr[1010]))
+ ( /*_.VALDATA___V1014*/ meltfptr[1013]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1011*/
- meltfptr[1010]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
+ ( /*_.VALDATA___V1014*/
+ meltfptr[1013]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1014*/ meltfptr[1013]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1012*/ meltfptr[1011]);
+ /*_.VALSTR___V1015*/ meltfptr[1014]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1011*/ meltfptr[1010]))
+ ( /*_.VALDATA___V1014*/ meltfptr[1013]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1011*/
- meltfptr[1010]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
+ ( /*_.VALDATA___V1014*/
+ meltfptr[1013]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1014*/ meltfptr[1013]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1008*/ meltfptr[1007]);
+ /*_.VALDATA___V1011*/ meltfptr[1010]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]);
+ meltgc_touch ( /*_.VALDATA___V1014*/ meltfptr[1013]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1013*/ meltfptr[1012]))
+ ( /*_.VALDATA___V1016*/ meltfptr[1015]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1013*/
- meltfptr[1012]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]))->
+ ( /*_.VALDATA___V1016*/
+ meltfptr[1015]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1014*/ meltfptr[1013]);
+ /*_.VALSTR___V1017*/ meltfptr[1016]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1013*/ meltfptr[1012]))
+ ( /*_.VALDATA___V1016*/ meltfptr[1015]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1013*/
- meltfptr[1012]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]))->
+ ( /*_.VALDATA___V1016*/
+ meltfptr[1015]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1008*/ meltfptr[1007]);
+ /*_.VALDATA___V1011*/ meltfptr[1010]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1013*/ meltfptr[1012]);
+ meltgc_touch ( /*_.VALDATA___V1016*/ meltfptr[1015]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1015*/ meltfptr[1014]))
+ ( /*_.VALDATA___V1018*/ meltfptr[1017]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1015*/
- meltfptr[1014]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]))->
+ ( /*_.VALDATA___V1018*/
+ meltfptr[1017]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1016*/ meltfptr[1015]);
+ /*_.VALSTR___V1019*/ meltfptr[1018]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1015*/ meltfptr[1014]))
+ ( /*_.VALDATA___V1018*/ meltfptr[1017]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1015*/
- meltfptr[1014]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]))->
+ ( /*_.VALDATA___V1018*/
+ meltfptr[1017]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1008*/ meltfptr[1007]);
+ /*_.VALDATA___V1011*/ meltfptr[1010]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1015*/ meltfptr[1014]);
+ meltgc_touch ( /*_.VALDATA___V1018*/ meltfptr[1017]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1017*/ meltfptr[1016]))
+ ( /*_.VALDATA___V1020*/ meltfptr[1019]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1017*/
- meltfptr[1016]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]))->
+ ( /*_.VALDATA___V1020*/
+ meltfptr[1019]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1018*/ meltfptr[1017]);
+ /*_.VALSTR___V1021*/ meltfptr[1020]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1017*/ meltfptr[1016]))
+ ( /*_.VALDATA___V1020*/ meltfptr[1019]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1017*/
- meltfptr[1016]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]))->
+ ( /*_.VALDATA___V1020*/
+ meltfptr[1019]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1008*/ meltfptr[1007]);
+ /*_.VALDATA___V1011*/ meltfptr[1010]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1017*/ meltfptr[1016]);
+ meltgc_touch ( /*_.VALDATA___V1020*/ meltfptr[1019]);
- /*putupl#581 */
- melt_assertmsg ("putupl #581 checktup",
+ /*putupl#576 */
+ melt_assertmsg ("putupl #576 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #581 checkoff",
+ melt_assertmsg ("putupl #576 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[0] =
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0))));
- /*putupl#582 */
- melt_assertmsg ("putupl #582 checktup",
+ /*putupl#577 */
+ melt_assertmsg ("putupl #577 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #582 checkoff",
+ melt_assertmsg ("putupl #577 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[1] =
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1))));
- /*putupl#583 */
- melt_assertmsg ("putupl #583 checktup",
+ /*putupl#578 */
+ melt_assertmsg ("putupl #578 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #583 checkoff",
+ melt_assertmsg ("putupl #578 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
- /*putupl#584 */
- melt_assertmsg ("putupl #584 checktup",
+ /*putupl#579 */
+ melt_assertmsg ("putupl #579 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #584 checkoff",
+ melt_assertmsg ("putupl #579 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V952*/ meltfptr[951]);
- /*putupl#585 */
- melt_assertmsg ("putupl #585 checktup",
+ /*putupl#580 */
+ melt_assertmsg ("putupl #580 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #585 checkoff",
+ melt_assertmsg ("putupl #580 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]);
- /*putupl#586 */
- melt_assertmsg ("putupl #586 checktup",
+ /*putupl#581 */
+ melt_assertmsg ("putupl #581 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #586 checkoff",
+ melt_assertmsg ("putupl #581 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]);
- /*putupl#587 */
- melt_assertmsg ("putupl #587 checktup",
+ /*putupl#582 */
+ melt_assertmsg ("putupl #582 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #587 checkoff",
+ melt_assertmsg ("putupl #582 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]);
- /*putupl#588 */
- melt_assertmsg ("putupl #588 checktup",
+ /*putupl#583 */
+ melt_assertmsg ("putupl #583 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #588 checkoff",
+ melt_assertmsg ("putupl #583 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]);
- /*putupl#589 */
- melt_assertmsg ("putupl #589 checktup",
+ /*putupl#584 */
+ melt_assertmsg ("putupl #584 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #589 checkoff",
+ melt_assertmsg ("putupl #584 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]);
- /*putupl#590 */
- melt_assertmsg ("putupl #590 checktup",
+ /*putupl#585 */
+ melt_assertmsg ("putupl #585 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #590 checkoff",
+ melt_assertmsg ("putupl #585 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
- /*putupl#591 */
- melt_assertmsg ("putupl #591 checktup",
+ /*putupl#586 */
+ melt_assertmsg ("putupl #586 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #591 checkoff",
+ melt_assertmsg ("putupl #586 checkoff",
(10 >= 0
&& 10 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1014*/ meltfptr[1013]);
- /*putupl#592 */
- melt_assertmsg ("putupl #592 checktup",
+ /*putupl#587 */
+ melt_assertmsg ("putupl #587 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #592 checkoff",
+ melt_assertmsg ("putupl #587 checkoff",
(11 >= 0
&& 11 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015]);
- /*putupl#593 */
- melt_assertmsg ("putupl #593 checktup",
+ /*putupl#588 */
+ melt_assertmsg ("putupl #588 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #593 checkoff",
+ melt_assertmsg ("putupl #588 checkoff",
(12 >= 0
&& 12 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]);
- /*putupl#594 */
- melt_assertmsg ("putupl #594 checktup",
+ /*putupl#589 */
+ melt_assertmsg ("putupl #589 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALTUP___V1022*/ meltfptr[1021])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #594 checkoff",
+ melt_assertmsg ("putupl #589 checkoff",
(13 >= 0
&& 13 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1019*/
- meltfptr[1018]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1019*/ meltfptr[1018]))->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]);
+ ( /*_.VALTUP___V1022*/
+ meltfptr[1021]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1022*/ meltfptr[1021]))->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1019*/ meltfptr[1018]);
+ meltgc_touch ( /*_.VALTUP___V1022*/ meltfptr[1021]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1019*/ meltfptr[1018]);
+ /*_.VALTUP___V1022*/ meltfptr[1021]);
MELT_LOCATION ("warmelt-genobj.melt:535:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1020*/ meltfptr[1019]))
+ ( /*_.VALDATA___V1023*/ meltfptr[1022]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1020*/
- meltfptr[1019]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]))->
+ ( /*_.VALDATA___V1023*/
+ meltfptr[1022]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1023*/ meltfptr[1022]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1021*/ meltfptr[1020]);
+ /*_.VALSTR___V1024*/ meltfptr[1023]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1020*/ meltfptr[1019]);
+ meltgc_touch ( /*_.VALDATA___V1023*/ meltfptr[1022]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1022*/ meltfptr[1021]))
+ ( /*_.VALDATA___V1025*/ meltfptr[1024]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1022*/
- meltfptr[1021]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]))->
+ ( /*_.VALDATA___V1025*/
+ meltfptr[1024]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1023*/ meltfptr[1022]);
+ /*_.VALSTR___V1026*/ meltfptr[1025]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1022*/ meltfptr[1021]);
+ meltgc_touch ( /*_.VALDATA___V1025*/ meltfptr[1024]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1024*/ meltfptr[1023]))
+ ( /*_.VALDATA___V1027*/ meltfptr[1026]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1024*/
- meltfptr[1023]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]))->
+ ( /*_.VALDATA___V1027*/
+ meltfptr[1026]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1025*/ meltfptr[1024]);
+ /*_.VALSTR___V1028*/ meltfptr[1027]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1024*/ meltfptr[1023]);
+ meltgc_touch ( /*_.VALDATA___V1027*/ meltfptr[1026]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1026*/ meltfptr[1025]))
+ ( /*_.VALDATA___V1029*/ meltfptr[1028]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1026*/
- meltfptr[1025]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1026*/ meltfptr[1025]))->
+ ( /*_.VALDATA___V1029*/
+ meltfptr[1028]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1027*/ meltfptr[1026]);
+ /*_.VALSTR___V1030*/ meltfptr[1029]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1026*/ meltfptr[1025]);
+ meltgc_touch ( /*_.VALDATA___V1029*/ meltfptr[1028]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1028*/ meltfptr[1027]))
+ ( /*_.VALDATA___V1031*/ meltfptr[1030]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1028*/
- meltfptr[1027]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027]))->
+ ( /*_.VALDATA___V1031*/
+ meltfptr[1030]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1029*/ meltfptr[1028]);
+ /*_.VALSTR___V1032*/ meltfptr[1031]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1028*/ meltfptr[1027]);
+ meltgc_touch ( /*_.VALDATA___V1031*/ meltfptr[1030]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58466,12 +58823,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#1",
NULL != ( /*_.DISCR_MIXED_LOCATION__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V10*/ meltfptr[9]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58479,12 +58836,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#2",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58492,12 +58849,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58505,12 +58862,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#4",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58518,12 +58875,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#5",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58531,12 +58888,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#6",
NULL != ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[6] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58544,24 +58901,24 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V334*/ meltfptr[333]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]);
+ NULL != /*_.VALDATA___V337*/ meltfptr[336]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#8",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[8] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
@@ -58569,216 +58926,216 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_881__MAKE_OBJLOCATEDEXP#9",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1030*/ meltfptr[1029])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:623:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1030*/ meltfptr[1029]);
+ meltgc_touch ( /*_.VALROUT___V1033*/ meltfptr[1032]);
/*putclosurout#1 */
melt_assertmsg ("putclosrout#1 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1031*/ meltfptr[1030])) ==
+ ( /*_.VALCLO___V1034*/ meltfptr[1033])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#1 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1030*/ meltfptr[1029]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1031*/ meltfptr[1030])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1030*/ meltfptr[1029]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1034*/ meltfptr[1033])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1033*/ meltfptr[1032]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1031*/ meltfptr[1030]);
+ meltgc_touch ( /*_.VALCLO___V1034*/ meltfptr[1033]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1032*/ meltfptr[1031]))
+ ( /*_.VALDATA___V1035*/ meltfptr[1034]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1032*/
- meltfptr[1031]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]))->
+ ( /*_.VALDATA___V1035*/
+ meltfptr[1034]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1033*/ meltfptr[1032]);
+ /*_.VALSTR___V1036*/ meltfptr[1035]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1032*/ meltfptr[1031]);
+ meltgc_touch ( /*_.VALDATA___V1035*/ meltfptr[1034]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/ meltfptr[1033]))
+ ( /*_.VALDATA___V1037*/ meltfptr[1036]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/
- meltfptr[1033]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1034*/ meltfptr[1033]))->
+ ( /*_.VALDATA___V1037*/
+ meltfptr[1036]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1035*/ meltfptr[1034]);
+ /*_.VALSTR___V1038*/ meltfptr[1037]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1034*/ meltfptr[1033]);
+ meltgc_touch ( /*_.VALDATA___V1037*/ meltfptr[1036]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/ meltfptr[1035]))
+ ( /*_.VALDATA___V1039*/ meltfptr[1038]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/
- meltfptr[1035]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]))->
+ ( /*_.VALDATA___V1039*/
+ meltfptr[1038]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1037*/ meltfptr[1036]);
+ /*_.VALSTR___V1040*/ meltfptr[1039]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1036*/ meltfptr[1035]);
+ meltgc_touch ( /*_.VALDATA___V1039*/ meltfptr[1038]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1038*/ meltfptr[1037]))
+ ( /*_.VALDATA___V1041*/ meltfptr[1040]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1038*/
- meltfptr[1037]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]))->
+ ( /*_.VALDATA___V1041*/
+ meltfptr[1040]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1039*/ meltfptr[1038]);
+ /*_.VALSTR___V1042*/ meltfptr[1041]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ meltgc_touch ( /*_.VALDATA___V1041*/ meltfptr[1040]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1040*/ meltfptr[1039]))
+ ( /*_.VALDATA___V1043*/ meltfptr[1042]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1040*/
- meltfptr[1039]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039]))->
+ ( /*_.VALDATA___V1043*/
+ meltfptr[1042]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1041*/ meltfptr[1040]);
+ /*_.VALSTR___V1044*/ meltfptr[1043]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1040*/ meltfptr[1039]);
+ meltgc_touch ( /*_.VALDATA___V1043*/ meltfptr[1042]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1042*/ meltfptr[1041]))
+ ( /*_.VALDATA___V1045*/ meltfptr[1044]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1042*/
- meltfptr[1041]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]))->
+ ( /*_.VALDATA___V1045*/
+ meltfptr[1044]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1043*/ meltfptr[1042]);
+ /*_.VALSTR___V1046*/ meltfptr[1045]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1042*/ meltfptr[1041]);
+ meltgc_touch ( /*_.VALDATA___V1045*/ meltfptr[1044]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1044*/ meltfptr[1043]))
+ ( /*_.VALDATA___V1047*/ meltfptr[1046]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1044*/
- meltfptr[1043]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]))->
+ ( /*_.VALDATA___V1047*/
+ meltfptr[1046]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1045*/ meltfptr[1044]);
+ /*_.VALSTR___V1048*/ meltfptr[1047]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1044*/ meltfptr[1043]);
+ meltgc_touch ( /*_.VALDATA___V1047*/ meltfptr[1046]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/ meltfptr[1045]))
+ ( /*_.VALDATA___V1049*/ meltfptr[1048]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/
- meltfptr[1045]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045]))->
+ ( /*_.VALDATA___V1049*/
+ meltfptr[1048]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1047*/ meltfptr[1046]);
+ /*_.VALSTR___V1050*/ meltfptr[1049]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1046*/ meltfptr[1045]);
+ meltgc_touch ( /*_.VALDATA___V1049*/ meltfptr[1048]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/ meltfptr[1047]))
+ ( /*_.VALDATA___V1051*/ meltfptr[1050]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/
- meltfptr[1047]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]))->
+ ( /*_.VALDATA___V1051*/
+ meltfptr[1050]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1051*/ meltfptr[1050]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1049*/ meltfptr[1048]);
+ /*_.VALSTR___V1052*/ meltfptr[1051]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1048*/ meltfptr[1047]);
+ meltgc_touch ( /*_.VALDATA___V1051*/ meltfptr[1050]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58786,12 +59143,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#1",
NULL != ( /*_.DISCR_MIXED_LOCATION__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V10*/ meltfptr[9]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58799,12 +59156,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58812,12 +59169,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#3",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58825,12 +59182,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58838,12 +59195,12 @@ warmelt_genobj_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#5",
NULL != ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[5] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]);
@@ -58862,24 +59219,24 @@ warmelt_genobj_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#7",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[7] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
@@ -58887,347 +59244,287 @@ warmelt_genobj_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_901__MAKE_OBJCOMPUTE#8",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1050*/ meltfptr[1049])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:667:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1050*/ meltfptr[1049]);
+ meltgc_touch ( /*_.VALROUT___V1053*/ meltfptr[1052]);
/*putclosurout#2 */
melt_assertmsg ("putclosrout#2 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1051*/ meltfptr[1050])) ==
+ ( /*_.VALCLO___V1054*/ meltfptr[1053])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#2 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1050*/ meltfptr[1049]))
+ ( /*_.VALROUT___V1053*/ meltfptr[1052]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1051*/ meltfptr[1050])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1050*/ meltfptr[1049]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1054*/ meltfptr[1053])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1051*/ meltfptr[1050]);
+ meltgc_touch ( /*_.VALCLO___V1054*/ meltfptr[1053]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1052*/ meltfptr[1051]))
+ ( /*_.VALDATA___V1055*/ meltfptr[1054]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1052*/
- meltfptr[1051]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051]))->
+ ( /*_.VALDATA___V1055*/
+ meltfptr[1054]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1055*/ meltfptr[1054]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1053*/ meltfptr[1052]);
+ /*_.VALSTR___V1056*/ meltfptr[1055]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1052*/ meltfptr[1051]);
+ meltgc_touch ( /*_.VALDATA___V1055*/ meltfptr[1054]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1054*/ meltfptr[1053]))
+ ( /*_.VALDATA___V1057*/ meltfptr[1056]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1054*/
- meltfptr[1053]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053]))->
+ ( /*_.VALDATA___V1057*/
+ meltfptr[1056]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1057*/ meltfptr[1056]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1055*/ meltfptr[1054]);
+ /*_.VALSTR___V1058*/ meltfptr[1057]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1054*/ meltfptr[1053]);
+ meltgc_touch ( /*_.VALDATA___V1057*/ meltfptr[1056]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1056*/ meltfptr[1055]))
+ ( /*_.VALDATA___V1059*/ meltfptr[1058]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1056*/
- meltfptr[1055]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055]))->
+ ( /*_.VALDATA___V1059*/
+ meltfptr[1058]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1059*/ meltfptr[1058]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1057*/ meltfptr[1056]);
+ /*_.VALSTR___V1060*/ meltfptr[1059]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1056*/ meltfptr[1055]);
+ meltgc_touch ( /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1058*/ meltfptr[1057]))
+ ( /*_.VALDATA___V1061*/ meltfptr[1060]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1058*/
- meltfptr[1057]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]))->
+ ( /*_.VALDATA___V1061*/
+ meltfptr[1060]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1056*/ meltfptr[1055]);
+ /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1058*/ meltfptr[1057]))
+ ( /*_.VALDATA___V1061*/ meltfptr[1060]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1058*/
- meltfptr[1057]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]))->
+ ( /*_.VALDATA___V1061*/
+ meltfptr[1060]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1058*/ meltfptr[1057]);
+ meltgc_touch ( /*_.VALDATA___V1061*/ meltfptr[1060]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1059*/ meltfptr[1058]))
+ ( /*_.VALDATA___V1062*/ meltfptr[1061]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1059*/
- meltfptr[1058]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1059*/ meltfptr[1058]))->
+ ( /*_.VALDATA___V1062*/
+ meltfptr[1061]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1060*/ meltfptr[1059]);
+ /*_.VALSTR___V1063*/ meltfptr[1062]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1059*/ meltfptr[1058]);
+ meltgc_touch ( /*_.VALDATA___V1062*/ meltfptr[1061]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1061*/ meltfptr[1060]))
+ ( /*_.VALDATA___V1064*/ meltfptr[1063]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1061*/
- meltfptr[1060]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]))->
+ ( /*_.VALDATA___V1064*/
+ meltfptr[1063]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1059*/ meltfptr[1058]);
+ /*_.VALDATA___V1062*/ meltfptr[1061]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1061*/ meltfptr[1060]))
+ ( /*_.VALDATA___V1064*/ meltfptr[1063]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1061*/
- meltfptr[1060]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]))->
+ ( /*_.VALDATA___V1064*/
+ meltfptr[1063]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1061*/ meltfptr[1060]);
+ meltgc_touch ( /*_.VALDATA___V1064*/ meltfptr[1063]);
- /*putupl#595 */
- melt_assertmsg ("putupl #595 checktup",
+ /*putupl#590 */
+ melt_assertmsg ("putupl #590 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1062*/ meltfptr[1061])) ==
+ ( /*_.VALTUP___V1065*/ meltfptr[1064])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #595 checkoff",
+ melt_assertmsg ("putupl #590 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1062*/
- meltfptr[1061]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]);
+ ( /*_.VALTUP___V1065*/
+ meltfptr[1064]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]);
- /*putupl#596 */
- melt_assertmsg ("putupl #596 checktup",
+ /*putupl#591 */
+ melt_assertmsg ("putupl #591 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1062*/ meltfptr[1061])) ==
+ ( /*_.VALTUP___V1065*/ meltfptr[1064])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #596 checkoff",
+ melt_assertmsg ("putupl #591 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1062*/
- meltfptr[1061]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]);
+ ( /*_.VALTUP___V1065*/
+ meltfptr[1064]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1062*/ meltfptr[1061]);
+ meltgc_touch ( /*_.VALTUP___V1065*/ meltfptr[1064]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1063*/ meltfptr[1062]))
+ ( /*_.VALDATA___V1066*/ meltfptr[1065]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1063*/
- meltfptr[1062]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1063*/ meltfptr[1062]))->
+ ( /*_.VALDATA___V1066*/
+ meltfptr[1065]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1064*/ meltfptr[1063]);
+ /*_.VALSTR___V1067*/ meltfptr[1066]);
MELT_LOCATION ("warmelt-genobj.melt:713:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1063*/ meltfptr[1062]);
+ meltgc_touch ( /*_.VALDATA___V1066*/ meltfptr[1065]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1065*/ meltfptr[1064]))
+ ( /*_.VALDATA___V1068*/ meltfptr[1067]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1065*/
- meltfptr[1064]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064]))->
+ ( /*_.VALDATA___V1068*/
+ meltfptr[1067]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1068*/ meltfptr[1067]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1066*/ meltfptr[1065]);
+ /*_.VALSTR___V1069*/ meltfptr[1068]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1065*/ meltfptr[1064]);
+ meltgc_touch ( /*_.VALDATA___V1068*/ meltfptr[1067]);
MELT_LOCATION ("warmelt-genobj.melt:724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1067*/ meltfptr[1066]))
+ ( /*_.VALDATA___V1070*/ meltfptr[1069]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1067*/
- meltfptr[1066]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]))->
+ ( /*_.VALDATA___V1070*/
+ meltfptr[1069]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1068*/ meltfptr[1067]);
+ /*_.VALSTR___V1071*/ meltfptr[1070]);
MELT_LOCATION ("warmelt-genobj.melt:724:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1067*/ meltfptr[1066]);
-
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/ meltfptr[1068]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/
- meltfptr[1068]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]))->
- obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1070*/ meltfptr[1069]);
-
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1069*/ meltfptr[1068]);
-
- MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/ meltfptr[1070]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (0 >= 0
- && 0 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/
- meltfptr[1070]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))->
- obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1056*/ meltfptr[1055]);
-
- MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/ meltfptr[1070]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/
- meltfptr[1070]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))->
- obj_vartab[1] = (melt_ptr_t) (
- ((void *) (MELT_PREDEF (CTYPE_VALUE))));
-
- MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
- /*^touch */
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1071*/ meltfptr[1070]);
+ meltgc_touch ( /*_.VALDATA___V1070*/ meltfptr[1069]);
/*putslot */
melt_assertmsg ("putslot checkobj",
@@ -59264,7 +59561,7 @@ warmelt_genobj_initialmeltchunk_14 (struct frame_start_module_melt_st
meltfptr[1073]))));
((meltobject_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1072*/ meltfptr[1071]);
+ /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
/*^putslot */
@@ -59402,891 +59699,951 @@ warmelt_genobj_initialmeltchunk_14 (struct frame_start_module_melt_st
meltfptr[1079]))));
((meltobject_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]))->
obj_vartab[1] = (melt_ptr_t) (
- ((void *) (MELT_PREDEF (CTYPE_LONG))));
+ ((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V1080*/ meltfptr[1079]);
- /*putupl#597 */
- melt_assertmsg ("putupl #597 checktup",
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1081*/ meltfptr[1080]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1081*/
+ meltfptr[1080]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1081*/ meltfptr[1080]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1082*/ meltfptr[1081]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1081*/ meltfptr[1080]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1083*/ meltfptr[1082]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (0 >= 0
+ && 0 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1083*/
+ meltfptr[1082]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]))->
+ obj_vartab[0] = (melt_ptr_t) (
+ /*_.VALDATA___V1081*/ meltfptr[1080]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/ meltfptr[1080])) ==
+ ( /*_.VALDATA___V1083*/ meltfptr[1082]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1083*/
+ meltfptr[1082]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ ((void *) (MELT_PREDEF (CTYPE_LONG))));
+
+ MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
+ /*^touch */
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1083*/ meltfptr[1082]);
+
+ /*putupl#592 */
+ melt_assertmsg ("putupl #592 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #597 checkoff",
+ melt_assertmsg ("putupl #592 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/
- meltfptr[1080]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1081*/ meltfptr[1080]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]);
+ ( /*_.VALTUP___V1084*/
+ meltfptr[1083]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]);
- /*putupl#598 */
- melt_assertmsg ("putupl #598 checktup",
+ /*putupl#593 */
+ melt_assertmsg ("putupl #593 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/ meltfptr[1080])) ==
+ ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #598 checkoff",
+ melt_assertmsg ("putupl #593 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/
- meltfptr[1080]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1081*/ meltfptr[1080]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]);
+ ( /*_.VALTUP___V1084*/
+ meltfptr[1083]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1077*/ meltfptr[1076]);
- /*putupl#599 */
- melt_assertmsg ("putupl #599 checktup",
+ /*putupl#594 */
+ melt_assertmsg ("putupl #594 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/ meltfptr[1080])) ==
+ ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #599 checkoff",
+ melt_assertmsg ("putupl #594 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/
- meltfptr[1080]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1081*/ meltfptr[1080]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1077*/ meltfptr[1076]);
+ ( /*_.VALTUP___V1084*/
+ meltfptr[1083]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]);
- /*putupl#600 */
- melt_assertmsg ("putupl #600 checktup",
+ /*putupl#595 */
+ melt_assertmsg ("putupl #595 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/ meltfptr[1080])) ==
+ ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #600 checkoff",
+ melt_assertmsg ("putupl #595 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1081*/
- meltfptr[1080]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1081*/ meltfptr[1080]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]);
+ ( /*_.VALTUP___V1084*/
+ meltfptr[1083]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1081*/ meltfptr[1080]);
+ meltgc_touch ( /*_.VALTUP___V1084*/ meltfptr[1083]);
MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1082*/ meltfptr[1081]))
+ ( /*_.VALDATA___V1085*/ meltfptr[1084]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1082*/
- meltfptr[1081]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]))->
+ ( /*_.VALDATA___V1085*/
+ meltfptr[1084]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1083*/ meltfptr[1082]);
+ /*_.VALSTR___V1086*/ meltfptr[1085]);
MELT_LOCATION ("warmelt-genobj.melt:735:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1082*/ meltfptr[1081]);
+ meltgc_touch ( /*_.VALDATA___V1085*/ meltfptr[1084]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1084*/ meltfptr[1083]))
+ ( /*_.VALDATA___V1087*/ meltfptr[1086]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1084*/
- meltfptr[1083]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083]))->
+ ( /*_.VALDATA___V1087*/
+ meltfptr[1086]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1085*/ meltfptr[1084]);
+ /*_.VALSTR___V1088*/ meltfptr[1087]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1084*/ meltfptr[1083]);
+ meltgc_touch ( /*_.VALDATA___V1087*/ meltfptr[1086]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1086*/ meltfptr[1085]))
+ ( /*_.VALDATA___V1089*/ meltfptr[1088]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1086*/
- meltfptr[1085]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]))->
+ ( /*_.VALDATA___V1089*/
+ meltfptr[1088]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1056*/ meltfptr[1055]);
+ /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1086*/ meltfptr[1085]))
+ ( /*_.VALDATA___V1089*/ meltfptr[1088]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1086*/
- meltfptr[1085]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]))->
+ ( /*_.VALDATA___V1089*/
+ meltfptr[1088]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1086*/ meltfptr[1085]);
+ meltgc_touch ( /*_.VALDATA___V1089*/ meltfptr[1088]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1087*/ meltfptr[1086]))
+ ( /*_.VALDATA___V1090*/ meltfptr[1089]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1087*/
- meltfptr[1086]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))->
+ ( /*_.VALDATA___V1090*/
+ meltfptr[1089]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1075*/ meltfptr[1074]);
+ /*_.VALDATA___V1078*/ meltfptr[1077]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1087*/ meltfptr[1086]))
+ ( /*_.VALDATA___V1090*/ meltfptr[1089]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1087*/
- meltfptr[1086]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))->
+ ( /*_.VALDATA___V1090*/
+ meltfptr[1089]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1087*/ meltfptr[1086]);
+ meltgc_touch ( /*_.VALDATA___V1090*/ meltfptr[1089]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1088*/ meltfptr[1087]))
+ ( /*_.VALDATA___V1091*/ meltfptr[1090]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1088*/
- meltfptr[1087]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]))->
+ ( /*_.VALDATA___V1091*/
+ meltfptr[1090]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1089*/ meltfptr[1088]);
+ /*_.VALSTR___V1092*/ meltfptr[1091]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1088*/ meltfptr[1087]);
+ meltgc_touch ( /*_.VALDATA___V1091*/ meltfptr[1090]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1090*/ meltfptr[1089]))
+ ( /*_.VALDATA___V1093*/ meltfptr[1092]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1090*/
- meltfptr[1089]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]))->
+ ( /*_.VALDATA___V1093*/
+ meltfptr[1092]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1088*/ meltfptr[1087]);
+ /*_.VALDATA___V1091*/ meltfptr[1090]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1090*/ meltfptr[1089]))
+ ( /*_.VALDATA___V1093*/ meltfptr[1092]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1090*/
- meltfptr[1089]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]))->
+ ( /*_.VALDATA___V1093*/
+ meltfptr[1092]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1090*/ meltfptr[1089]);
+ meltgc_touch ( /*_.VALDATA___V1093*/ meltfptr[1092]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1091*/ meltfptr[1090]))
+ ( /*_.VALDATA___V1094*/ meltfptr[1093]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1091*/
- meltfptr[1090]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]))->
+ ( /*_.VALDATA___V1094*/
+ meltfptr[1093]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1078*/ meltfptr[1077]);
+ /*_.VALDATA___V1081*/ meltfptr[1080]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1091*/ meltfptr[1090]))
+ ( /*_.VALDATA___V1094*/ meltfptr[1093]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1091*/
- meltfptr[1090]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]))->
+ ( /*_.VALDATA___V1094*/
+ meltfptr[1093]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_LONG))));
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1091*/ meltfptr[1090]);
+ meltgc_touch ( /*_.VALDATA___V1094*/ meltfptr[1093]);
- /*putupl#601 */
- melt_assertmsg ("putupl #601 checktup",
+ /*putupl#596 */
+ melt_assertmsg ("putupl #596 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/ meltfptr[1091])) ==
+ ( /*_.VALTUP___V1095*/ meltfptr[1094])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #601 checkoff",
+ melt_assertmsg ("putupl #596 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/
- meltfptr[1091]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1092*/ meltfptr[1091]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]);
+ ( /*_.VALTUP___V1095*/
+ meltfptr[1094]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1095*/ meltfptr[1094]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]);
- /*putupl#602 */
- melt_assertmsg ("putupl #602 checktup",
+ /*putupl#597 */
+ melt_assertmsg ("putupl #597 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/ meltfptr[1091])) ==
+ ( /*_.VALTUP___V1095*/ meltfptr[1094])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #602 checkoff",
+ melt_assertmsg ("putupl #597 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/
- meltfptr[1091]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1092*/ meltfptr[1091]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]);
+ ( /*_.VALTUP___V1095*/
+ meltfptr[1094]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1095*/ meltfptr[1094]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]);
- /*putupl#603 */
- melt_assertmsg ("putupl #603 checktup",
+ /*putupl#598 */
+ melt_assertmsg ("putupl #598 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/ meltfptr[1091])) ==
+ ( /*_.VALTUP___V1095*/ meltfptr[1094])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #603 checkoff",
+ melt_assertmsg ("putupl #598 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/
- meltfptr[1091]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1092*/ meltfptr[1091]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]);
+ ( /*_.VALTUP___V1095*/
+ meltfptr[1094]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1095*/ meltfptr[1094]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]);
- /*putupl#604 */
- melt_assertmsg ("putupl #604 checktup",
+ /*putupl#599 */
+ melt_assertmsg ("putupl #599 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/ meltfptr[1091])) ==
+ ( /*_.VALTUP___V1095*/ meltfptr[1094])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #604 checkoff",
+ melt_assertmsg ("putupl #599 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1092*/
- meltfptr[1091]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1092*/ meltfptr[1091]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]);
+ ( /*_.VALTUP___V1095*/
+ meltfptr[1094]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1095*/ meltfptr[1094]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1092*/ meltfptr[1091]);
+ meltgc_touch ( /*_.VALTUP___V1095*/ meltfptr[1094]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1093*/ meltfptr[1092]))
+ ( /*_.VALDATA___V1096*/ meltfptr[1095]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1093*/
- meltfptr[1092]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))->
+ ( /*_.VALDATA___V1096*/
+ meltfptr[1095]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1094*/ meltfptr[1093]);
+ /*_.VALSTR___V1097*/ meltfptr[1096]);
MELT_LOCATION ("warmelt-genobj.melt:746:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1093*/ meltfptr[1092]);
+ meltgc_touch ( /*_.VALDATA___V1096*/ meltfptr[1095]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1095*/ meltfptr[1094]))
+ ( /*_.VALDATA___V1098*/ meltfptr[1097]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1095*/
- meltfptr[1094]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))->
+ ( /*_.VALDATA___V1098*/
+ meltfptr[1097]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1096*/ meltfptr[1095]);
+ /*_.VALSTR___V1099*/ meltfptr[1098]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1095*/ meltfptr[1094]);
+ meltgc_touch ( /*_.VALDATA___V1098*/ meltfptr[1097]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1097*/ meltfptr[1096]))
+ ( /*_.VALDATA___V1100*/ meltfptr[1099]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1097*/
- meltfptr[1096]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1097*/ meltfptr[1096]))->
+ ( /*_.VALDATA___V1100*/
+ meltfptr[1099]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1056*/ meltfptr[1055]);
+ /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1097*/ meltfptr[1096]))
+ ( /*_.VALDATA___V1100*/ meltfptr[1099]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1097*/
- meltfptr[1096]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1097*/ meltfptr[1096]))->
+ ( /*_.VALDATA___V1100*/
+ meltfptr[1099]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1097*/ meltfptr[1096]);
+ meltgc_touch ( /*_.VALDATA___V1100*/ meltfptr[1099]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1098*/ meltfptr[1097]))
+ ( /*_.VALDATA___V1101*/ meltfptr[1100]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1098*/
- meltfptr[1097]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]))->
+ ( /*_.VALDATA___V1101*/
+ meltfptr[1100]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1059*/ meltfptr[1058]);
+ /*_.VALDATA___V1062*/ meltfptr[1061]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1098*/ meltfptr[1097]))
+ ( /*_.VALDATA___V1101*/ meltfptr[1100]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1098*/
- meltfptr[1097]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]))->
+ ( /*_.VALDATA___V1101*/
+ meltfptr[1100]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1098*/ meltfptr[1097]);
+ meltgc_touch ( /*_.VALDATA___V1101*/ meltfptr[1100]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1099*/ meltfptr[1098]))
+ ( /*_.VALDATA___V1102*/ meltfptr[1101]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1099*/
- meltfptr[1098]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1099*/ meltfptr[1098]))->
+ ( /*_.VALDATA___V1102*/
+ meltfptr[1101]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1100*/ meltfptr[1099]);
+ /*_.VALSTR___V1103*/ meltfptr[1102]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1099*/ meltfptr[1098]);
+ meltgc_touch ( /*_.VALDATA___V1102*/ meltfptr[1101]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1101*/ meltfptr[1100]))
+ ( /*_.VALDATA___V1104*/ meltfptr[1103]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1101*/
- meltfptr[1100]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]))->
+ ( /*_.VALDATA___V1104*/
+ meltfptr[1103]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1099*/ meltfptr[1098]);
+ /*_.VALDATA___V1102*/ meltfptr[1101]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1101*/ meltfptr[1100]))
+ ( /*_.VALDATA___V1104*/ meltfptr[1103]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1101*/
- meltfptr[1100]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]))->
+ ( /*_.VALDATA___V1104*/
+ meltfptr[1103]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1101*/ meltfptr[1100]);
+ meltgc_touch ( /*_.VALDATA___V1104*/ meltfptr[1103]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1102*/ meltfptr[1101]))
+ ( /*_.VALDATA___V1105*/ meltfptr[1104]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1102*/
- meltfptr[1101]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]))->
+ ( /*_.VALDATA___V1105*/
+ meltfptr[1104]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1105*/ meltfptr[1104]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1078*/ meltfptr[1077]);
+ /*_.VALDATA___V1081*/ meltfptr[1080]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1102*/ meltfptr[1101]))
+ ( /*_.VALDATA___V1105*/ meltfptr[1104]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1102*/
- meltfptr[1101]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]))->
+ ( /*_.VALDATA___V1105*/
+ meltfptr[1104]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1105*/ meltfptr[1104]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_LONG))));
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1102*/ meltfptr[1101]);
+ meltgc_touch ( /*_.VALDATA___V1105*/ meltfptr[1104]);
- /*putupl#605 */
- melt_assertmsg ("putupl #605 checktup",
+ /*putupl#600 */
+ melt_assertmsg ("putupl #600 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/ meltfptr[1102])) ==
+ ( /*_.VALTUP___V1106*/ meltfptr[1105])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #605 checkoff",
+ melt_assertmsg ("putupl #600 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/
- meltfptr[1102]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1097*/ meltfptr[1096]);
+ ( /*_.VALTUP___V1106*/
+ meltfptr[1105]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1106*/ meltfptr[1105]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- /*putupl#606 */
- melt_assertmsg ("putupl #606 checktup",
+ /*putupl#601 */
+ melt_assertmsg ("putupl #601 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/ meltfptr[1102])) ==
+ ( /*_.VALTUP___V1106*/ meltfptr[1105])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #606 checkoff",
+ melt_assertmsg ("putupl #601 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/
- meltfptr[1102]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]);
+ ( /*_.VALTUP___V1106*/
+ meltfptr[1105]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1106*/ meltfptr[1105]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]);
- /*putupl#607 */
- melt_assertmsg ("putupl #607 checktup",
+ /*putupl#602 */
+ melt_assertmsg ("putupl #602 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/ meltfptr[1102])) ==
+ ( /*_.VALTUP___V1106*/ meltfptr[1105])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #607 checkoff",
+ melt_assertmsg ("putupl #602 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/
- meltfptr[1102]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]);
+ ( /*_.VALTUP___V1106*/
+ meltfptr[1105]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1106*/ meltfptr[1105]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]);
- /*putupl#608 */
- melt_assertmsg ("putupl #608 checktup",
+ /*putupl#603 */
+ melt_assertmsg ("putupl #603 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/ meltfptr[1102])) ==
+ ( /*_.VALTUP___V1106*/ meltfptr[1105])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #608 checkoff",
+ melt_assertmsg ("putupl #603 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1103*/
- meltfptr[1102]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]);
+ ( /*_.VALTUP___V1106*/
+ meltfptr[1105]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1106*/ meltfptr[1105]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1105*/ meltfptr[1104]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1103*/ meltfptr[1102]);
+ meltgc_touch ( /*_.VALTUP___V1106*/ meltfptr[1105]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1104*/ meltfptr[1103]))
+ ( /*_.VALDATA___V1107*/ meltfptr[1106]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1104*/
- meltfptr[1103]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]))->
+ ( /*_.VALDATA___V1107*/
+ meltfptr[1106]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1107*/ meltfptr[1106]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1105*/ meltfptr[1104]);
+ /*_.VALSTR___V1108*/ meltfptr[1107]);
MELT_LOCATION ("warmelt-genobj.melt:757:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1104*/ meltfptr[1103]);
+ meltgc_touch ( /*_.VALDATA___V1107*/ meltfptr[1106]);
MELT_LOCATION ("warmelt-genobj.melt:772:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1106*/ meltfptr[1105]))
+ ( /*_.VALROUT___V1109*/ meltfptr[1108]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_957__COMPILOBJ_CATCHALL_NREP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:772:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1106*/ meltfptr[1105]);
+ meltgc_touch ( /*_.VALROUT___V1109*/ meltfptr[1108]);
/*putclosurout#3 */
melt_assertmsg ("putclosrout#3 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1107*/ meltfptr[1106])) ==
+ ( /*_.VALCLO___V1110*/ meltfptr[1109])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#3 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1106*/ meltfptr[1105]))
+ ( /*_.VALROUT___V1109*/ meltfptr[1108]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1107*/ meltfptr[1106])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1106*/ meltfptr[1105]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1110*/ meltfptr[1109])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1109*/ meltfptr[1108]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1107*/ meltfptr[1106]);
+ meltgc_touch ( /*_.VALCLO___V1110*/ meltfptr[1109]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1108*/ meltfptr[1107]))
+ ( /*_.VALDATA___V1111*/ meltfptr[1110]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1108*/
- meltfptr[1107]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1108*/ meltfptr[1107]))->
+ ( /*_.VALDATA___V1111*/
+ meltfptr[1110]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1111*/ meltfptr[1110]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1109*/ meltfptr[1108]);
+ /*_.VALSTR___V1112*/ meltfptr[1111]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1108*/ meltfptr[1107]);
+ meltgc_touch ( /*_.VALDATA___V1111*/ meltfptr[1110]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1110*/ meltfptr[1109]))
+ ( /*_.VALDATA___V1113*/ meltfptr[1112]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1110*/
- meltfptr[1109]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1110*/ meltfptr[1109]))->
+ ( /*_.VALDATA___V1113*/
+ meltfptr[1112]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1113*/ meltfptr[1112]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1111*/ meltfptr[1110]);
+ /*_.VALSTR___V1114*/ meltfptr[1113]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1110*/ meltfptr[1109]);
+ meltgc_touch ( /*_.VALDATA___V1113*/ meltfptr[1112]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1112*/ meltfptr[1111]))
+ ( /*_.VALDATA___V1115*/ meltfptr[1114]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1112*/
- meltfptr[1111]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111]))->
+ ( /*_.VALDATA___V1115*/
+ meltfptr[1114]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1115*/ meltfptr[1114]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1113*/ meltfptr[1112]);
+ /*_.VALSTR___V1116*/ meltfptr[1115]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1112*/ meltfptr[1111]);
+ meltgc_touch ( /*_.VALDATA___V1115*/ meltfptr[1114]);
MELT_LOCATION ("warmelt-genobj.melt:782:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1117*/ meltfptr[1116]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_965__PUTOBJDEST_CATCHALL_OBJCODE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1117*/ meltfptr[1116])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:782:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1114*/ meltfptr[1113]);
+ meltgc_touch ( /*_.VALROUT___V1117*/ meltfptr[1116]);
/*putclosurout#4 */
melt_assertmsg ("putclosrout#4 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1115*/ meltfptr[1114])) ==
+ ( /*_.VALCLO___V1118*/ meltfptr[1117])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#4 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1117*/ meltfptr[1116]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1115*/ meltfptr[1114])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1114*/ meltfptr[1113]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1118*/ meltfptr[1117])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1117*/ meltfptr[1116]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1115*/ meltfptr[1114]);
+ meltgc_touch ( /*_.VALCLO___V1118*/ meltfptr[1117]);
MELT_LOCATION ("warmelt-genobj.melt:793:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1116*/ meltfptr[1115]))
+ ( /*_.VALROUT___V1119*/ meltfptr[1118]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_967__PUTOBJDEST_CATCHALL_ANYDISCR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1116*/ meltfptr[1115])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:793:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1116*/ meltfptr[1115]);
+ meltgc_touch ( /*_.VALROUT___V1119*/ meltfptr[1118]);
/*putclosurout#5 */
melt_assertmsg ("putclosrout#5 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1117*/ meltfptr[1116])) ==
+ ( /*_.VALCLO___V1120*/ meltfptr[1119])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#5 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1116*/ meltfptr[1115]))
+ ( /*_.VALROUT___V1119*/ meltfptr[1118]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1117*/ meltfptr[1116])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1116*/ meltfptr[1115]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1120*/ meltfptr[1119])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1117*/ meltfptr[1116]);
+ meltgc_touch ( /*_.VALCLO___V1120*/ meltfptr[1119]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1118*/ meltfptr[1117]))
+ ( /*_.VALDATA___V1121*/ meltfptr[1120]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1118*/
- meltfptr[1117]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1118*/ meltfptr[1117]))->
+ ( /*_.VALDATA___V1121*/
+ meltfptr[1120]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1121*/ meltfptr[1120]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1119*/ meltfptr[1118]);
+ /*_.VALSTR___V1122*/ meltfptr[1121]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1118*/ meltfptr[1117]);
+ meltgc_touch ( /*_.VALDATA___V1121*/ meltfptr[1120]);
MELT_LOCATION ("warmelt-genobj.melt:804:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1120*/ meltfptr[1119]))
+ ( /*_.VALROUT___V1123*/ meltfptr[1122]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V154*/ meltfptr[153]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ NULL != /*_.VALDATA___V157*/ meltfptr[156]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1123*/ meltfptr[1122])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
MELT_LOCATION ("warmelt-genobj.melt:804:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1120*/ meltfptr[1119]);
+ meltgc_touch ( /*_.VALROUT___V1123*/ meltfptr[1122]);
/*putclosurout#6 */
melt_assertmsg ("putclosrout#6 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1121*/ meltfptr[1120])) ==
+ ( /*_.VALCLO___V1124*/ meltfptr[1123])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#6 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1120*/ meltfptr[1119]))
+ ( /*_.VALROUT___V1123*/ meltfptr[1122]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1121*/ meltfptr[1120])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1124*/ meltfptr[1123])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1123*/ meltfptr[1122]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1121*/ meltfptr[1120]);
+ meltgc_touch ( /*_.VALCLO___V1124*/ meltfptr[1123]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1122*/ meltfptr[1121]))
+ ( /*_.VALDATA___V1125*/ meltfptr[1124]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1122*/
- meltfptr[1121]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121]))->
+ ( /*_.VALDATA___V1125*/
+ meltfptr[1124]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1125*/ meltfptr[1124]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1123*/ meltfptr[1122]);
+ /*_.VALSTR___V1126*/ meltfptr[1125]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1122*/ meltfptr[1121]);
+ meltgc_touch ( /*_.VALDATA___V1125*/ meltfptr[1124]);
#undef meltfram__
@@ -60304,182 +60661,182 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1124*/ meltfptr[1123]))
+ ( /*_.VALROUT___V1127*/ meltfptr[1126]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_975__GECTYP_OBJNIL#0",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[0] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:814:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1124*/ meltfptr[1123]);
+ meltgc_touch ( /*_.VALROUT___V1127*/ meltfptr[1126]);
/*putclosurout#7 */
melt_assertmsg ("putclosrout#7 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1125*/ meltfptr[1124])) ==
+ ( /*_.VALCLO___V1128*/ meltfptr[1127])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#7 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1124*/ meltfptr[1123]))
+ ( /*_.VALROUT___V1127*/ meltfptr[1126]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1125*/ meltfptr[1124])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1124*/ meltfptr[1123]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1128*/ meltfptr[1127])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1127*/ meltfptr[1126]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1125*/ meltfptr[1124]);
+ meltgc_touch ( /*_.VALCLO___V1128*/ meltfptr[1127]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1126*/ meltfptr[1125]))
+ ( /*_.VALDATA___V1129*/ meltfptr[1128]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1126*/
- meltfptr[1125]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]))->
+ ( /*_.VALDATA___V1129*/
+ meltfptr[1128]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1129*/ meltfptr[1128]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1127*/ meltfptr[1126]);
+ /*_.VALSTR___V1130*/ meltfptr[1129]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1126*/ meltfptr[1125]);
+ meltgc_touch ( /*_.VALDATA___V1129*/ meltfptr[1128]);
MELT_LOCATION ("warmelt-genobj.melt:820:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1128*/ meltfptr[1127]))
+ ( /*_.VALROUT___V1131*/ meltfptr[1130]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_979__GECTYP_OBJINITSTRING#0",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[0] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:820:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1128*/ meltfptr[1127]);
+ meltgc_touch ( /*_.VALROUT___V1131*/ meltfptr[1130]);
/*putclosurout#8 */
melt_assertmsg ("putclosrout#8 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1129*/ meltfptr[1128])) ==
+ ( /*_.VALCLO___V1132*/ meltfptr[1131])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#8 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1128*/ meltfptr[1127]))
+ ( /*_.VALROUT___V1131*/ meltfptr[1130]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1129*/ meltfptr[1128])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1132*/ meltfptr[1131])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1131*/ meltfptr[1130]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1129*/ meltfptr[1128]);
+ meltgc_touch ( /*_.VALCLO___V1132*/ meltfptr[1131]);
MELT_LOCATION ("warmelt-genobj.melt:826:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1130*/ meltfptr[1129]))
+ ( /*_.VALROUT___V1133*/ meltfptr[1132]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_981__DBGOUT_ROUTINEOBJ#0",
NULL !=
( /*_.DBGOUT_NAMEDOBJECT_METHOD__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[0] =
(melt_ptr_t) ( /*_.DBGOUT_NAMEDOBJECT_METHOD__V25*/ meltfptr[24]);
MELT_LOCATION ("warmelt-genobj.melt:826:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1130*/ meltfptr[1129]);
+ meltgc_touch ( /*_.VALROUT___V1133*/ meltfptr[1132]);
/*putclosurout#9 */
melt_assertmsg ("putclosrout#9 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1131*/ meltfptr[1130])) ==
+ ( /*_.VALCLO___V1134*/ meltfptr[1133])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#9 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1130*/ meltfptr[1129]))
+ ( /*_.VALROUT___V1133*/ meltfptr[1132]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1131*/ meltfptr[1130])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1134*/ meltfptr[1133])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1133*/ meltfptr[1132]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1131*/ meltfptr[1130]);
+ meltgc_touch ( /*_.VALCLO___V1134*/ meltfptr[1133]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1132*/ meltfptr[1131]))
+ ( /*_.VALDATA___V1135*/ meltfptr[1134]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1132*/
- meltfptr[1131]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]))->
+ ( /*_.VALDATA___V1135*/
+ meltfptr[1134]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1135*/ meltfptr[1134]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1133*/ meltfptr[1132]);
+ /*_.VALSTR___V1136*/ meltfptr[1135]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1132*/ meltfptr[1131]);
+ meltgc_touch ( /*_.VALDATA___V1135*/ meltfptr[1134]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1134*/ meltfptr[1133]))
+ ( /*_.VALDATA___V1137*/ meltfptr[1136]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1134*/
- meltfptr[1133]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133]))->
+ ( /*_.VALDATA___V1137*/
+ meltfptr[1136]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1137*/ meltfptr[1136]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1135*/ meltfptr[1134]);
+ /*_.VALSTR___V1138*/ meltfptr[1137]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1134*/ meltfptr[1133]);
+ meltgc_touch ( /*_.VALDATA___V1137*/ meltfptr[1136]);
MELT_LOCATION ("warmelt-genobj.melt:834:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1136*/ meltfptr[1135]))
+ ( /*_.VALROUT___V1139*/ meltfptr[1138]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V364*/ meltfptr[363]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1136*/ meltfptr[1135])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ NULL != /*_.VALDATA___V367*/ meltfptr[366]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
MELT_LOCATION ("warmelt-genobj.melt:834:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1136*/ meltfptr[1135]))
+ ( /*_.VALROUT___V1139*/ meltfptr[1138]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_987__PUTOBJDEST_OBJDESTINSTR#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1136*/ meltfptr[1135])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:834:/ initchunk");
@@ -60487,78 +60844,78 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1136*/ meltfptr[1135]))
+ ( /*_.VALROUT___V1139*/ meltfptr[1138]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_987__PUTOBJDEST_OBJDESTINSTR#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1136*/ meltfptr[1135])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:834:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1136*/ meltfptr[1135]);
+ meltgc_touch ( /*_.VALROUT___V1139*/ meltfptr[1138]);
/*putclosurout#10 */
melt_assertmsg ("putclosrout#10 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1137*/ meltfptr[1136])) ==
+ ( /*_.VALCLO___V1140*/ meltfptr[1139])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#10 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1136*/ meltfptr[1135]))
+ ( /*_.VALROUT___V1139*/ meltfptr[1138]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1137*/ meltfptr[1136])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1136*/ meltfptr[1135]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1140*/ meltfptr[1139])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1139*/ meltfptr[1138]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1137*/ meltfptr[1136]);
+ meltgc_touch ( /*_.VALCLO___V1140*/ meltfptr[1139]);
MELT_LOCATION ("warmelt-genobj.melt:870:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1138*/ meltfptr[1137]))
+ ( /*_.VALROUT___V1141*/ meltfptr[1140]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1138*/ meltfptr[1137])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]);
+ NULL != /*_.VALDATA___V425*/ meltfptr[424]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]);
MELT_LOCATION ("warmelt-genobj.melt:870:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1138*/ meltfptr[1137]);
+ meltgc_touch ( /*_.VALROUT___V1141*/ meltfptr[1140]);
/*putclosurout#11 */
melt_assertmsg ("putclosrout#11 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1139*/ meltfptr[1138])) ==
+ ( /*_.VALCLO___V1142*/ meltfptr[1141])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#11 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1138*/ meltfptr[1137]))
+ ( /*_.VALROUT___V1141*/ meltfptr[1140]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1139*/ meltfptr[1138])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1138*/ meltfptr[1137]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1142*/ meltfptr[1141])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1141*/ meltfptr[1140]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1139*/ meltfptr[1138]);
+ meltgc_touch ( /*_.VALCLO___V1142*/ meltfptr[1141]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#0",
NULL != ( /*_.AS_NULL__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[0] =
(melt_ptr_t) ( /*_.AS_NULL__V27*/ meltfptr[26]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60566,12 +60923,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#1",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60579,12 +60936,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#2",
NULL != ( /*_.INTEGERBOX_OF__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[2] =
(melt_ptr_t) ( /*_.INTEGERBOX_OF__V29*/ meltfptr[28]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60592,12 +60949,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60605,12 +60962,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60618,12 +60975,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#5",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
@@ -60631,205 +60988,205 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_991__VARIADIC_IDSTR#6",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[6] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:878:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1140*/ meltfptr[1139]);
+ meltgc_touch ( /*_.VALROUT___V1143*/ meltfptr[1142]);
/*putclosurout#12 */
melt_assertmsg ("putclosrout#12 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1141*/ meltfptr[1140])) ==
+ ( /*_.VALCLO___V1144*/ meltfptr[1143])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#12 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ ( /*_.VALROUT___V1143*/ meltfptr[1142]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1141*/ meltfptr[1140])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1144*/ meltfptr[1143])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1143*/ meltfptr[1142]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1141*/ meltfptr[1140]);
+ meltgc_touch ( /*_.VALCLO___V1144*/ meltfptr[1143]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1142*/ meltfptr[1141]))
+ ( /*_.VALDATA___V1145*/ meltfptr[1144]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1142*/
- meltfptr[1141]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141]))->
+ ( /*_.VALDATA___V1145*/
+ meltfptr[1144]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1145*/ meltfptr[1144]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1143*/ meltfptr[1142]);
+ /*_.VALSTR___V1146*/ meltfptr[1145]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1142*/ meltfptr[1141]);
+ meltgc_touch ( /*_.VALDATA___V1145*/ meltfptr[1144]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1144*/ meltfptr[1143]))
+ ( /*_.VALDATA___V1147*/ meltfptr[1146]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1144*/
- meltfptr[1143]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]))->
+ ( /*_.VALDATA___V1147*/
+ meltfptr[1146]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1145*/ meltfptr[1144]);
+ /*_.VALSTR___V1148*/ meltfptr[1147]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1144*/ meltfptr[1143]);
+ meltgc_touch ( /*_.VALDATA___V1147*/ meltfptr[1146]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1146*/ meltfptr[1145]))
+ ( /*_.VALDATA___V1149*/ meltfptr[1148]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1146*/
- meltfptr[1145]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]))->
+ ( /*_.VALDATA___V1149*/
+ meltfptr[1148]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1147*/ meltfptr[1146]);
+ /*_.VALSTR___V1150*/ meltfptr[1149]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1146*/ meltfptr[1145]);
+ meltgc_touch ( /*_.VALDATA___V1149*/ meltfptr[1148]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/ meltfptr[1147]))
+ ( /*_.VALDATA___V1151*/ meltfptr[1150]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/
- meltfptr[1147]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]))->
+ ( /*_.VALDATA___V1151*/
+ meltfptr[1150]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1151*/ meltfptr[1150]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1149*/ meltfptr[1148]);
+ /*_.VALSTR___V1152*/ meltfptr[1151]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1148*/ meltfptr[1147]);
+ meltgc_touch ( /*_.VALDATA___V1151*/ meltfptr[1150]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/ meltfptr[1149]))
+ ( /*_.VALDATA___V1153*/ meltfptr[1152]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/
- meltfptr[1149]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1150*/ meltfptr[1149]))->
+ ( /*_.VALDATA___V1153*/
+ meltfptr[1152]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1153*/ meltfptr[1152]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1151*/ meltfptr[1150]);
+ /*_.VALSTR___V1154*/ meltfptr[1153]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1150*/ meltfptr[1149]);
+ meltgc_touch ( /*_.VALDATA___V1153*/ meltfptr[1152]);
MELT_LOCATION ("warmelt-genobj.melt:910:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1152*/ meltfptr[1151]))
+ ( /*_.VALROUT___V1155*/ meltfptr[1154]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1141*/ meltfptr[1140]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1141*/ meltfptr[1140]);
+ NULL != /*_.VALCLO___V1144*/ meltfptr[1143]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1155*/ meltfptr[1154])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1144*/ meltfptr[1143]);
MELT_LOCATION ("warmelt-genobj.melt:910:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1152*/ meltfptr[1151]);
+ meltgc_touch ( /*_.VALROUT___V1155*/ meltfptr[1154]);
/*putclosurout#13 */
melt_assertmsg ("putclosrout#13 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1153*/ meltfptr[1152])) ==
+ ( /*_.VALCLO___V1156*/ meltfptr[1155])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#13 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1152*/ meltfptr[1151]))
+ ( /*_.VALROUT___V1155*/ meltfptr[1154]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1153*/ meltfptr[1152])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1156*/ meltfptr[1155])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1155*/ meltfptr[1154]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1153*/ meltfptr[1152]);
+ meltgc_touch ( /*_.VALCLO___V1156*/ meltfptr[1155]);
MELT_LOCATION ("warmelt-genobj.melt:914:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1154*/ meltfptr[1153]))
+ ( /*_.VALROUT___V1157*/ meltfptr[1156]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1141*/ meltfptr[1140]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1141*/ meltfptr[1140]);
+ NULL != /*_.VALCLO___V1144*/ meltfptr[1143]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1157*/ meltfptr[1156])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1144*/ meltfptr[1143]);
MELT_LOCATION ("warmelt-genobj.melt:914:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1154*/ meltfptr[1153]);
+ meltgc_touch ( /*_.VALROUT___V1157*/ meltfptr[1156]);
/*putclosurout#14 */
melt_assertmsg ("putclosrout#14 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1155*/ meltfptr[1154])) ==
+ ( /*_.VALCLO___V1158*/ meltfptr[1157])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#14 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1154*/ meltfptr[1153]))
+ ( /*_.VALROUT___V1157*/ meltfptr[1156]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1155*/ meltfptr[1154])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1158*/ meltfptr[1157])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1157*/ meltfptr[1156]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1155*/ meltfptr[1154]);
+ meltgc_touch ( /*_.VALCLO___V1158*/ meltfptr[1157]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60837,13 +61194,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#1",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60851,13 +61208,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#2",
NULL != ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60865,13 +61222,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60879,13 +61236,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#4",
NULL != ( /*_.CLASS_NREP_DEFUNROUTPROC__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_DEFUNROUTPROC__V34*/ meltfptr[33]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60893,13 +61250,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#5",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60907,13 +61264,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#6",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60921,13 +61278,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#7",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60935,25 +61292,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V982*/ meltfptr[981]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]);
+ NULL != /*_.VALDATA___V985*/ meltfptr[984]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60961,13 +61318,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60975,13 +61332,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#11",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -60989,13 +61346,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#12",
NULL != ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61003,13 +61360,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#13",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61017,13 +61374,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#0",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61031,12 +61388,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61044,36 +61401,36 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61081,12 +61438,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#5",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61094,12 +61451,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#6",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61107,12 +61464,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#7",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
@@ -61120,91 +61477,91 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1101__GET_FREE_OBJLOCPTR#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1161*/ meltfptr[1160])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1400:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1158*/ meltfptr[1157]);
+ meltgc_touch ( /*_.VALROUT___V1161*/ meltfptr[1160]);
/*putclosurout#15 */
melt_assertmsg ("putclosrout#15 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1157*/ meltfptr[1156])) ==
+ ( /*_.VALCLO___V1160*/ meltfptr[1159])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#15 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1158*/ meltfptr[1157]))
+ ( /*_.VALROUT___V1161*/ meltfptr[1160]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1157*/ meltfptr[1156])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1160*/ meltfptr[1159])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1161*/ meltfptr[1160]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ meltgc_touch ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[14] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/ meltfptr[1158]))
+ ( /*_.VALDATA___V1162*/ meltfptr[1161]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/
- meltfptr[1158]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1159*/ meltfptr[1158]))->
+ ( /*_.VALDATA___V1162*/
+ meltfptr[1161]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1160*/ meltfptr[1159]);
+ /*_.VALSTR___V1163*/ meltfptr[1162]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1159*/ meltfptr[1158]);
+ meltgc_touch ( /*_.VALDATA___V1162*/ meltfptr[1161]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#15",
- NULL != ( /*_.VALDATA___V1159*/ meltfptr[1158]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V1159*/ meltfptr[1158]);
+ NULL != ( /*_.VALDATA___V1162*/ meltfptr[1161]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#16",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[16] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61212,13 +61569,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#17",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61226,13 +61583,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#18",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[18] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61240,25 +61597,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[19] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#20",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[20] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61266,13 +61623,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#0",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61280,12 +61637,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61293,36 +61650,36 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61330,12 +61687,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#5",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61343,12 +61700,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#6",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61356,12 +61713,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#7",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
@@ -61369,58 +61726,58 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1103__GET_FREE_OBJLOCLONG#8",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1449:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1162*/ meltfptr[1161]);
+ meltgc_touch ( /*_.VALROUT___V1165*/ meltfptr[1164]);
/*putclosurout#16 */
melt_assertmsg ("putclosrout#16 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1161*/ meltfptr[1160])) ==
+ ( /*_.VALCLO___V1164*/ meltfptr[1163])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#16 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1162*/ meltfptr[1161]))
+ ( /*_.VALROUT___V1165*/ meltfptr[1164]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1161*/ meltfptr[1160])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1164*/ meltfptr[1163])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1165*/ meltfptr[1164]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1161*/ meltfptr[1160]);
+ meltgc_touch ( /*_.VALCLO___V1164*/ meltfptr[1163]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1161*/ meltfptr[1160]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[21] =
- (melt_ptr_t) ( /*_.VALCLO___V1161*/ meltfptr[1160]);
+ NULL != /*_.VALCLO___V1164*/ meltfptr[1163]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALCLO___V1164*/ meltfptr[1163]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61428,13 +61785,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61442,13 +61799,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#2",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61456,13 +61813,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#3",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61470,25 +61827,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1161*/ meltfptr[1160]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1161*/ meltfptr[1160]);
+ NULL != /*_.VALCLO___V1164*/ meltfptr[1163]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1164*/ meltfptr[1163]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#5",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[5] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61496,25 +61853,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#7",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[7] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61522,25 +61879,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#9",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61548,25 +61905,25 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#11",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61574,13 +61931,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#12",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61588,13 +61945,13 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#13",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
@@ -61602,83 +61959,83 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1105__GET_FREE_OBJLOCTYPED#14",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1167*/ meltfptr[1166])->tabval[14] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1492:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1164*/ meltfptr[1163]);
+ meltgc_touch ( /*_.VALROUT___V1167*/ meltfptr[1166]);
/*putclosurout#17 */
melt_assertmsg ("putclosrout#17 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1163*/ meltfptr[1162])) ==
+ ( /*_.VALCLO___V1166*/ meltfptr[1165])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#17 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1164*/ meltfptr[1163]))
+ ( /*_.VALROUT___V1167*/ meltfptr[1166]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1163*/ meltfptr[1162])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1166*/ meltfptr[1165])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1167*/ meltfptr[1166]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ meltgc_touch ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[22] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V398*/ meltfptr[397]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]);
+ NULL != /*_.VALDATA___V401*/ meltfptr[400]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V384*/ meltfptr[383]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]);
+ NULL != /*_.VALDATA___V387*/ meltfptr[386]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#25",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[25] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
@@ -61686,12 +62043,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1027__LAMBDA_#0",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
@@ -61699,12 +62056,12 @@ warmelt_genobj_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1027__LAMBDA_#1",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[1] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
@@ -61723,24 +62080,24 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1027__LAMBDA_#3",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
@@ -61748,93 +62105,93 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1161*/ meltfptr[1160]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1161*/ meltfptr[1160]);
+ NULL != /*_.VALCLO___V1164*/ meltfptr[1163]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1164*/ meltfptr[1163]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V398*/ meltfptr[397]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]);
+ NULL != /*_.VALDATA___V401*/ meltfptr[400]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V384*/ meltfptr[383]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]);
+ NULL != /*_.VALDATA___V387*/ meltfptr[386]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1165*/ meltfptr[1164]))
+ ( /*_.VALROUT___V1168*/ meltfptr[1167]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1027__LAMBDA_#8",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1165*/ meltfptr[1164])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[8] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1003:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1165*/ meltfptr[1164]);
+ meltgc_touch ( /*_.VALROUT___V1168*/ meltfptr[1167]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#26",
- NULL != ( /*_.VALROUT___V1165*/ meltfptr[1164]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[26] =
- (melt_ptr_t) ( /*_.VALROUT___V1165*/ meltfptr[1164]);
+ NULL != ( /*_.VALROUT___V1168*/ meltfptr[1167]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[26] =
+ (melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#27",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[27] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61842,13 +62199,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#28",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[28] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61856,13 +62213,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#29",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[29] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
@@ -61870,13 +62227,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#30",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[30] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1056:/ initchunk");
@@ -61884,444 +62241,444 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1166*/ meltfptr[1165]))
+ ( /*_.VALROUT___V1169*/ meltfptr[1168]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1034__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1169*/ meltfptr[1168])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1056:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1166*/ meltfptr[1165]);
+ meltgc_touch ( /*_.VALROUT___V1169*/ meltfptr[1168]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#31",
- NULL != ( /*_.VALROUT___V1166*/ meltfptr[1165]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[31] =
- (melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165]);
+ NULL != ( /*_.VALROUT___V1169*/ meltfptr[1168]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[31] =
+ (melt_ptr_t) ( /*_.VALROUT___V1169*/ meltfptr[1168]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1007__COMPILE2OBJ_PROCEDURE#32",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1159*/ meltfptr[1158])->tabval[32] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:923:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1156*/ meltfptr[1155]);
+ meltgc_touch ( /*_.VALROUT___V1159*/ meltfptr[1158]);
/*putclosurout#18 */
melt_assertmsg ("putclosrout#18 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1167*/ meltfptr[1166])) ==
+ ( /*_.VALCLO___V1170*/ meltfptr[1169])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#18 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1156*/ meltfptr[1155]))
+ ( /*_.VALROUT___V1159*/ meltfptr[1158]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1167*/ meltfptr[1166])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1170*/ meltfptr[1169])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1159*/ meltfptr[1158]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1167*/ meltfptr[1166]);
+ meltgc_touch ( /*_.VALCLO___V1170*/ meltfptr[1169]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/ meltfptr[1167]))
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/
- meltfptr[1167]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]))->
+ ( /*_.VALDATA___V1171*/
+ meltfptr[1170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1169*/ meltfptr[1168]);
+ /*_.VALSTR___V1172*/ meltfptr[1171]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1168*/ meltfptr[1167]);
+ meltgc_touch ( /*_.VALDATA___V1171*/ meltfptr[1170]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/ meltfptr[1169]))
+ ( /*_.VALDATA___V1173*/ meltfptr[1172]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/
- meltfptr[1169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]))->
+ ( /*_.VALDATA___V1173*/
+ meltfptr[1172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1171*/ meltfptr[1170]);
+ /*_.VALSTR___V1174*/ meltfptr[1173]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1170*/ meltfptr[1169]);
+ meltgc_touch ( /*_.VALDATA___V1173*/ meltfptr[1172]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/ meltfptr[1171]))
+ ( /*_.VALDATA___V1175*/ meltfptr[1174]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/
- meltfptr[1171]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))->
+ ( /*_.VALDATA___V1175*/
+ meltfptr[1174]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1173*/ meltfptr[1172]);
+ /*_.VALSTR___V1176*/ meltfptr[1175]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1172*/ meltfptr[1171]);
+ meltgc_touch ( /*_.VALDATA___V1175*/ meltfptr[1174]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/ meltfptr[1173]))
+ ( /*_.VALDATA___V1177*/ meltfptr[1176]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/
- meltfptr[1173]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]))->
+ ( /*_.VALDATA___V1177*/
+ meltfptr[1176]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1175*/ meltfptr[1174]);
+ /*_.VALSTR___V1178*/ meltfptr[1177]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1174*/ meltfptr[1173]);
+ meltgc_touch ( /*_.VALDATA___V1177*/ meltfptr[1176]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]))
+ ( /*_.VALDATA___V1179*/ meltfptr[1178]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/
- meltfptr[1175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
+ ( /*_.VALDATA___V1179*/
+ meltfptr[1178]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1177*/ meltfptr[1176]);
+ /*_.VALSTR___V1180*/ meltfptr[1179]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ meltgc_touch ( /*_.VALDATA___V1179*/ meltfptr[1178]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1178*/ meltfptr[1177]))
+ ( /*_.VALDATA___V1181*/ meltfptr[1180]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1178*/
- meltfptr[1177]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]))->
+ ( /*_.VALDATA___V1181*/
+ meltfptr[1180]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1179*/ meltfptr[1178]);
+ /*_.VALSTR___V1182*/ meltfptr[1181]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1178*/ meltfptr[1177]);
+ meltgc_touch ( /*_.VALDATA___V1181*/ meltfptr[1180]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1180*/ meltfptr[1179]))
+ ( /*_.VALDATA___V1183*/ meltfptr[1182]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1180*/
- meltfptr[1179]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]))->
+ ( /*_.VALDATA___V1183*/
+ meltfptr[1182]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1183*/ meltfptr[1182]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1181*/ meltfptr[1180]);
+ /*_.VALSTR___V1184*/ meltfptr[1183]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1180*/ meltfptr[1179]);
+ meltgc_touch ( /*_.VALDATA___V1183*/ meltfptr[1182]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/ meltfptr[1181]))
+ ( /*_.VALDATA___V1185*/ meltfptr[1184]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/
- meltfptr[1181]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]))->
+ ( /*_.VALDATA___V1185*/
+ meltfptr[1184]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1185*/ meltfptr[1184]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1183*/ meltfptr[1182]);
+ /*_.VALSTR___V1186*/ meltfptr[1185]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1182*/ meltfptr[1181]);
+ meltgc_touch ( /*_.VALDATA___V1185*/ meltfptr[1184]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/ meltfptr[1183]))
+ ( /*_.VALDATA___V1187*/ meltfptr[1186]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/
- meltfptr[1183]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]))->
+ ( /*_.VALDATA___V1187*/
+ meltfptr[1186]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1187*/ meltfptr[1186]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1185*/ meltfptr[1184]);
+ /*_.VALSTR___V1188*/ meltfptr[1187]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1184*/ meltfptr[1183]);
+ meltgc_touch ( /*_.VALDATA___V1187*/ meltfptr[1186]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]))
+ ( /*_.VALDATA___V1189*/ meltfptr[1188]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/
- meltfptr[1185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))->
+ ( /*_.VALDATA___V1189*/
+ meltfptr[1188]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1187*/ meltfptr[1186]);
+ /*_.VALSTR___V1190*/ meltfptr[1189]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1186*/ meltfptr[1185]);
+ meltgc_touch ( /*_.VALDATA___V1189*/ meltfptr[1188]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1188*/ meltfptr[1187]))
+ ( /*_.VALDATA___V1191*/ meltfptr[1190]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1188*/
- meltfptr[1187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]))->
+ ( /*_.VALDATA___V1191*/
+ meltfptr[1190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1189*/ meltfptr[1188]);
+ /*_.VALSTR___V1192*/ meltfptr[1191]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1188*/ meltfptr[1187]);
+ meltgc_touch ( /*_.VALDATA___V1191*/ meltfptr[1190]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/ meltfptr[1189]))
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/
- meltfptr[1189]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]))->
+ ( /*_.VALDATA___V1193*/
+ meltfptr[1192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1191*/ meltfptr[1190]);
+ /*_.VALSTR___V1194*/ meltfptr[1193]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1190*/ meltfptr[1189]);
+ meltgc_touch ( /*_.VALDATA___V1193*/ meltfptr[1192]);
MELT_LOCATION ("warmelt-genobj.melt:1075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1195*/ meltfptr[1194]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1195*/
+ meltfptr[1194]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))->
obj_vartab[0] = (melt_ptr_t) (
/*_.CTYPE_VALUE__V24*/ meltfptr[23]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1193*/ meltfptr[1192]))
+ ( /*_.VALDATA___V1196*/ meltfptr[1195]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1193*/
- meltfptr[1192]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
+ ( /*_.VALDATA___V1196*/
+ meltfptr[1195]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1194*/ meltfptr[1193]);
+ /*_.VALSTR___V1197*/ meltfptr[1196]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1193*/ meltfptr[1192]);
+ meltgc_touch ( /*_.VALDATA___V1196*/ meltfptr[1195]);
MELT_LOCATION ("warmelt-genobj.melt:1075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1195*/ meltfptr[1194]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1195*/
+ meltfptr[1194]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALDATA___V1193*/ meltfptr[1192]);
+ /*_.VALDATA___V1196*/ meltfptr[1195]);
MELT_LOCATION ("warmelt-genobj.melt:1075:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ meltgc_touch ( /*_.VALDATA___V1195*/ meltfptr[1194]);
MELT_LOCATION ("warmelt-genobj.melt:1080:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1195*/ meltfptr[1194]))
+ ( /*_.VALROUT___V1198*/ meltfptr[1197]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V354*/ meltfptr[353]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1195*/ meltfptr[1194])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]);
+ NULL != /*_.VALDATA___V357*/ meltfptr[356]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1198*/ meltfptr[1197])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]);
MELT_LOCATION ("warmelt-genobj.melt:1080:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1195*/ meltfptr[1194]);
+ meltgc_touch ( /*_.VALROUT___V1198*/ meltfptr[1197]);
/*putclosurout#19 */
melt_assertmsg ("putclosrout#19 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1196*/ meltfptr[1195])) ==
+ ( /*_.VALCLO___V1199*/ meltfptr[1198])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#19 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1195*/ meltfptr[1194]))
+ ( /*_.VALROUT___V1198*/ meltfptr[1197]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1196*/ meltfptr[1195])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1195*/ meltfptr[1194]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1199*/ meltfptr[1198])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1198*/ meltfptr[1197]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1196*/ meltfptr[1195]);
+ meltgc_touch ( /*_.VALCLO___V1199*/ meltfptr[1198]);
MELT_LOCATION ("warmelt-genobj.melt:1082:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1197*/ meltfptr[1196]))
+ ( /*_.VALROUT___V1200*/ meltfptr[1199]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V354*/ meltfptr[353]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1197*/ meltfptr[1196])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]);
+ NULL != /*_.VALDATA___V357*/ meltfptr[356]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1200*/ meltfptr[1199])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]);
MELT_LOCATION ("warmelt-genobj.melt:1082:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1197*/ meltfptr[1196]))
+ ( /*_.VALROUT___V1200*/ meltfptr[1199]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1042__APPEND_COMMENTCONST#1",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1197*/ meltfptr[1196])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1200*/ meltfptr[1199])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1082:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1197*/ meltfptr[1196]);
+ meltgc_touch ( /*_.VALROUT___V1200*/ meltfptr[1199]);
/*putclosurout#20 */
melt_assertmsg ("putclosrout#20 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1198*/ meltfptr[1197])) ==
+ ( /*_.VALCLO___V1201*/ meltfptr[1200])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#20 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1197*/ meltfptr[1196]))
+ ( /*_.VALROUT___V1200*/ meltfptr[1199]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1198*/ meltfptr[1197])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1197*/ meltfptr[1196]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1201*/ meltfptr[1200])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1200*/ meltfptr[1199]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1198*/ meltfptr[1197]);
+ meltgc_touch ( /*_.VALCLO___V1201*/ meltfptr[1200]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62329,13 +62686,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#1",
NULL != ( /*_.CLASS_NREP_INITPROC__V43*/ meltfptr[42]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V43*/ meltfptr[42]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62343,13 +62700,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#2",
NULL != ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62357,13 +62714,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#3",
NULL != ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62371,13 +62728,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62385,39 +62742,39 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#6",
- NULL != ( /*_.VALSTR___V1200*/ meltfptr[1199]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[6] =
- (melt_ptr_t) ( /*_.VALSTR___V1200*/ meltfptr[1199]);
+ NULL != ( /*_.VALSTR___V1203*/ meltfptr[1202]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALSTR___V1203*/ meltfptr[1202]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#7",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62425,13 +62782,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#8",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62439,13 +62796,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#9",
NULL != ( /*_.LIST_MAP__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[9] =
(melt_ptr_t) ( /*_.LIST_MAP__V45*/ meltfptr[44]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62453,13 +62810,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#10",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[10] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1125:/ initchunk");
@@ -62467,267 +62824,267 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1201*/ meltfptr[1200]))
+ ( /*_.VALROUT___V1204*/ meltfptr[1203]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1053__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1201*/ meltfptr[1200])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1204*/ meltfptr[1203])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1125:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1201*/ meltfptr[1200]);
+ meltgc_touch ( /*_.VALROUT___V1204*/ meltfptr[1203]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#11",
- NULL != ( /*_.VALROUT___V1201*/ meltfptr[1200]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V1201*/ meltfptr[1200]);
+ NULL != ( /*_.VALROUT___V1204*/ meltfptr[1203]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V1204*/ meltfptr[1203]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[12] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]))
+ ( /*_.VALDATA___V1205*/ meltfptr[1204]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/
- meltfptr[1201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))->
+ ( /*_.VALDATA___V1205*/
+ meltfptr[1204]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1203*/ meltfptr[1202]);
+ /*_.VALSTR___V1206*/ meltfptr[1205]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ meltgc_touch ( /*_.VALDATA___V1205*/ meltfptr[1204]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#13",
- NULL != ( /*_.VALDATA___V1202*/ meltfptr[1201]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ NULL != ( /*_.VALDATA___V1205*/ meltfptr[1204]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1204*/ meltfptr[1203]))
+ ( /*_.VALDATA___V1207*/ meltfptr[1206]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1204*/
- meltfptr[1203]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1204*/ meltfptr[1203]))->
+ ( /*_.VALDATA___V1207*/
+ meltfptr[1206]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1205*/ meltfptr[1204]);
+ /*_.VALSTR___V1208*/ meltfptr[1207]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1204*/ meltfptr[1203]);
+ meltgc_touch ( /*_.VALDATA___V1207*/ meltfptr[1206]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#14",
- NULL != ( /*_.VALDATA___V1204*/ meltfptr[1203]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V1204*/ meltfptr[1203]);
+ NULL != ( /*_.VALDATA___V1207*/ meltfptr[1206]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1206*/ meltfptr[1205]))
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1206*/
- meltfptr[1205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]))->
+ ( /*_.VALDATA___V1209*/
+ meltfptr[1208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1207*/ meltfptr[1206]);
+ /*_.VALSTR___V1210*/ meltfptr[1209]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1206*/ meltfptr[1205]);
+ meltgc_touch ( /*_.VALDATA___V1209*/ meltfptr[1208]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#15",
- NULL != ( /*_.VALDATA___V1206*/ meltfptr[1205]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]);
+ NULL != ( /*_.VALDATA___V1209*/ meltfptr[1208]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/ meltfptr[1207]))
+ ( /*_.VALDATA___V1211*/ meltfptr[1210]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/
- meltfptr[1207]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207]))->
+ ( /*_.VALDATA___V1211*/
+ meltfptr[1210]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1211*/ meltfptr[1210]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1209*/ meltfptr[1208]);
+ /*_.VALSTR___V1212*/ meltfptr[1211]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1208*/ meltfptr[1207]);
+ meltgc_touch ( /*_.VALDATA___V1211*/ meltfptr[1210]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#16",
- NULL != ( /*_.VALDATA___V1208*/ meltfptr[1207]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207]);
+ NULL != ( /*_.VALDATA___V1211*/ meltfptr[1210]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V1211*/ meltfptr[1210]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/ meltfptr[1209]))
+ ( /*_.VALDATA___V1213*/ meltfptr[1212]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/
- meltfptr[1209]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]))->
+ ( /*_.VALDATA___V1213*/
+ meltfptr[1212]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1211*/ meltfptr[1210]);
+ /*_.VALSTR___V1214*/ meltfptr[1213]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1210*/ meltfptr[1209]);
+ meltgc_touch ( /*_.VALDATA___V1213*/ meltfptr[1212]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#17",
- NULL != ( /*_.VALDATA___V1210*/ meltfptr[1209]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]);
+ NULL != ( /*_.VALDATA___V1213*/ meltfptr[1212]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]))
+ ( /*_.VALDATA___V1215*/ meltfptr[1214]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/
- meltfptr[1211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
+ ( /*_.VALDATA___V1215*/
+ meltfptr[1214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1213*/ meltfptr[1212]);
+ /*_.VALSTR___V1216*/ meltfptr[1215]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1212*/ meltfptr[1211]);
+ meltgc_touch ( /*_.VALDATA___V1215*/ meltfptr[1214]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#18",
- NULL != ( /*_.VALDATA___V1212*/ meltfptr[1211]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]);
+ NULL != ( /*_.VALDATA___V1215*/ meltfptr[1214]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1198*/ meltfptr[1197]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[19] =
- (melt_ptr_t) ( /*_.VALCLO___V1198*/ meltfptr[1197]);
+ NULL != /*_.VALCLO___V1201*/ meltfptr[1200]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALCLO___V1201*/ meltfptr[1200]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#20",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[20] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62735,13 +63092,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#21",
NULL != ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[21] =
(melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62749,13 +63106,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#22",
NULL != ( /*_.CLASS_NREP_SIMPLE__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V48*/ meltfptr[47]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62763,37 +63120,37 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V838*/ meltfptr[837]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]);
+ NULL != /*_.VALDATA___V841*/ meltfptr[840]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1195*/ meltfptr[1194]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#25",
NULL != ( /*_.SYSDATA_CONT_FRESH_ENV__V49*/ meltfptr[48]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[25] =
(melt_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V49*/ meltfptr[48]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62801,49 +63158,49 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1051*/ meltfptr[1050]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[26] =
- (melt_ptr_t) ( /*_.VALCLO___V1051*/ meltfptr[1050]);
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[26] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V662*/ meltfptr[661]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]);
+ NULL != /*_.VALDATA___V665*/ meltfptr[664]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[28] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V475*/ meltfptr[474]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#29",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[29] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62851,37 +63208,37 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[30] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[30] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[31] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[31] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#32",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[32] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62889,13 +63246,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#33",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[33] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[33] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62903,13 +63260,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#34",
NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[34] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[34] =
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -62917,24 +63274,24 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[35] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[35] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:1227:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1214*/ meltfptr[1213]))
+ ( /*_.VALROUT___V1217*/ meltfptr[1216]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1074__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1214*/ meltfptr[1213])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1227:/ initchunk");
@@ -62942,12 +63299,12 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1214*/ meltfptr[1213]))
+ ( /*_.VALROUT___V1217*/ meltfptr[1216]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1074__LAMBDA_#1",
NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1214*/ meltfptr[1213])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]);
MELT_LOCATION ("warmelt-genobj.melt:1227:/ initchunk");
@@ -62955,56 +63312,56 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1214*/ meltfptr[1213]))
+ ( /*_.VALROUT___V1217*/ meltfptr[1216]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1214*/ meltfptr[1213])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:1227:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1214*/ meltfptr[1213]);
+ meltgc_touch ( /*_.VALROUT___V1217*/ meltfptr[1216]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#36",
- NULL != ( /*_.VALROUT___V1214*/ meltfptr[1213]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[36] =
- (melt_ptr_t) ( /*_.VALROUT___V1214*/ meltfptr[1213]);
+ NULL != ( /*_.VALROUT___V1217*/ meltfptr[1216]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[36] =
+ (melt_ptr_t) ( /*_.VALROUT___V1217*/ meltfptr[1216]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[37] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[37] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#38",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[38] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[38] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63012,13 +63369,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#39",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[39] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[39] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63026,13 +63383,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#40",
NULL != ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[40] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[40] =
(melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63040,13 +63397,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#41",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[41] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[41] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1258:/ initchunk");
@@ -63054,12 +63411,12 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1215*/ meltfptr[1214]))
+ ( /*_.VALROUT___V1218*/ meltfptr[1217]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1077__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1215*/ meltfptr[1214])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]);
MELT_LOCATION ("warmelt-genobj.melt:1258:/ initchunk");
@@ -63067,45 +63424,45 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1215*/ meltfptr[1214]))
+ ( /*_.VALROUT___V1218*/ meltfptr[1217]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1077__LAMBDA_#1",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1215*/ meltfptr[1214])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[1] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1258:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1215*/ meltfptr[1214]);
+ meltgc_touch ( /*_.VALROUT___V1218*/ meltfptr[1217]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#42",
- NULL != ( /*_.VALROUT___V1215*/ meltfptr[1214]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[42] =
- (melt_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214]);
+ NULL != ( /*_.VALROUT___V1218*/ meltfptr[1217]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[42] =
+ (melt_ptr_t) ( /*_.VALROUT___V1218*/ meltfptr[1217]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#43",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[43] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[43] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63113,13 +63470,13 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#44",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[44] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[44] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1271:/ initchunk");
@@ -63127,12 +63484,12 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1216*/ meltfptr[1215]))
+ ( /*_.VALROUT___V1219*/ meltfptr[1218]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1080__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1216*/ meltfptr[1215])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1219*/ meltfptr[1218])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1271:/ initchunk");
@@ -63140,32 +63497,32 @@ warmelt_genobj_initialmeltchunk_16 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1216*/ meltfptr[1215]))
+ ( /*_.VALROUT___V1219*/ meltfptr[1218]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1080__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1216*/ meltfptr[1215])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1219*/ meltfptr[1218])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1271:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1216*/ meltfptr[1215]);
+ meltgc_touch ( /*_.VALROUT___V1219*/ meltfptr[1218]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#45",
- NULL != ( /*_.VALROUT___V1216*/ meltfptr[1215]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[45] =
- (melt_ptr_t) ( /*_.VALROUT___V1216*/ meltfptr[1215]);
+ NULL != ( /*_.VALROUT___V1219*/ meltfptr[1218]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[45] =
+ (melt_ptr_t) ( /*_.VALROUT___V1219*/ meltfptr[1218]);
#undef meltfram__
@@ -63183,13 +63540,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#46",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[46] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[46] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63197,25 +63554,25 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[47] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[47] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#48",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[48] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[48] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63223,13 +63580,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#49",
NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[49] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[49] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63237,25 +63594,25 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V656*/ meltfptr[655]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[50] =
- (melt_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]);
+ NULL != /*_.VALDATA___V659*/ meltfptr[658]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[50] =
+ (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#51",
NULL != ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[51] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[51] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63263,36 +63620,36 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V650*/ meltfptr[649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[52] =
- (melt_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]);
+ NULL != /*_.VALDATA___V653*/ meltfptr[652]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[52] =
+ (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1083__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
@@ -63300,12 +63657,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1083__LAMBDA_#2",
NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
@@ -63313,24 +63670,24 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V656*/ meltfptr[655]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]);
+ NULL != /*_.VALDATA___V659*/ meltfptr[658]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1083__LAMBDA_#4",
NULL != ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
@@ -63338,44 +63695,44 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1217*/ meltfptr[1216]))
+ ( /*_.VALROUT___V1220*/ meltfptr[1219]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V650*/ meltfptr[649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1217*/ meltfptr[1216])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]);
+ NULL != /*_.VALDATA___V653*/ meltfptr[652]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]);
MELT_LOCATION ("warmelt-genobj.melt:1280:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1217*/ meltfptr[1216]);
+ meltgc_touch ( /*_.VALROUT___V1220*/ meltfptr[1219]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#53",
- NULL != ( /*_.VALROUT___V1217*/ meltfptr[1216]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[53] =
- (melt_ptr_t) ( /*_.VALROUT___V1217*/ meltfptr[1216]);
+ NULL != ( /*_.VALROUT___V1220*/ meltfptr[1219]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[53] =
+ (melt_ptr_t) ( /*_.VALROUT___V1220*/ meltfptr[1219]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#54",
NULL != ( /*_.SYSDATA_VALUE_IMPORTER__V55*/ meltfptr[54]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[54] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[54] =
(melt_ptr_t) ( /*_.SYSDATA_VALUE_IMPORTER__V55*/ meltfptr[54]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63383,13 +63740,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#55",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[55] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[55] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63397,13 +63754,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#56",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[56] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[56] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63411,13 +63768,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#57",
NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[57] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[57] =
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63425,13 +63782,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#58",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[58] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[58] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63439,13 +63796,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#59",
NULL != ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[59] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[59] =
(melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63453,13 +63810,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#60",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[60] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[60] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63467,24 +63824,24 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V662*/ meltfptr[661]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[61] =
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]);
+ NULL != /*_.VALDATA___V665*/ meltfptr[664]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[61] =
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1090__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
@@ -63492,12 +63849,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1090__LAMBDA_#1",
NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
@@ -63505,12 +63862,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1090__LAMBDA_#2",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
@@ -63518,12 +63875,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1090__LAMBDA_#3",
NULL != ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V33*/ meltfptr[32]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
@@ -63531,12 +63888,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1090__LAMBDA_#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
@@ -63544,70 +63901,70 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1218*/ meltfptr[1217]))
+ ( /*_.VALROUT___V1221*/ meltfptr[1220]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V662*/ meltfptr[661]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1218*/ meltfptr[1217])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]);
+ NULL != /*_.VALDATA___V665*/ meltfptr[664]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:1318:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1218*/ meltfptr[1217]);
+ meltgc_touch ( /*_.VALROUT___V1221*/ meltfptr[1220]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#62",
- NULL != ( /*_.VALROUT___V1218*/ meltfptr[1217]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[62] =
- (melt_ptr_t) ( /*_.VALROUT___V1218*/ meltfptr[1217]);
+ NULL != ( /*_.VALROUT___V1221*/ meltfptr[1220]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[62] =
+ (melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#63",
- NULL != ( /*_.VALROUT___V1219*/ meltfptr[1218]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[63] =
- (melt_ptr_t) ( /*_.VALROUT___V1219*/ meltfptr[1218]);
+ NULL != ( /*_.VALROUT___V1222*/ meltfptr[1221]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[63] =
+ (melt_ptr_t) ( /*_.VALROUT___V1222*/ meltfptr[1221]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[64] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[64] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#65",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[65] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[65] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63615,13 +63972,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#66",
NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[66] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[66] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63629,25 +63986,25 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V634*/ meltfptr[633]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[67] =
- (melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]);
+ NULL != /*_.VALDATA___V637*/ meltfptr[636]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[67] =
+ (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#68",
NULL != ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[68] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[68] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
@@ -63655,36 +64012,36 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V628*/ meltfptr[627]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[69] =
- (melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]);
+ NULL != /*_.VALDATA___V631*/ meltfptr[630]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[69] =
+ (melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1092__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
@@ -63692,12 +64049,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1092__LAMBDA_#2",
NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V53*/ meltfptr[52]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
@@ -63705,24 +64062,24 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V634*/ meltfptr[633]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]);
+ NULL != /*_.VALDATA___V637*/ meltfptr[636]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1092__LAMBDA_#4",
NULL != ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
@@ -63730,417 +64087,417 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1220*/ meltfptr[1219]))
+ ( /*_.VALROUT___V1223*/ meltfptr[1222]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V628*/ meltfptr[627]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]);
+ NULL != /*_.VALDATA___V631*/ meltfptr[630]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1223*/ meltfptr[1222])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]);
MELT_LOCATION ("warmelt-genobj.melt:1351:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1220*/ meltfptr[1219]);
+ meltgc_touch ( /*_.VALROUT___V1223*/ meltfptr[1222]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1044__COMPILE2OBJ_INITPROC#70",
- NULL != ( /*_.VALROUT___V1220*/ meltfptr[1219]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[70] =
- (melt_ptr_t) ( /*_.VALROUT___V1220*/ meltfptr[1219]);
+ NULL != ( /*_.VALROUT___V1223*/ meltfptr[1222]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[70] =
+ (melt_ptr_t) ( /*_.VALROUT___V1223*/ meltfptr[1222]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1199*/ meltfptr[1198])->tabval[71] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1202*/ meltfptr[1201])->tabval[71] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:1086:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1199*/ meltfptr[1198]);
+ meltgc_touch ( /*_.VALROUT___V1202*/ meltfptr[1201]);
/*putclosurout#21 */
melt_assertmsg ("putclosrout#21 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1221*/ meltfptr[1220])) ==
+ ( /*_.VALCLO___V1224*/ meltfptr[1223])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#21 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1199*/ meltfptr[1198]))
+ ( /*_.VALROUT___V1202*/ meltfptr[1201]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1221*/ meltfptr[1220])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1199*/ meltfptr[1198]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1224*/ meltfptr[1223])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1202*/ meltfptr[1201]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1221*/ meltfptr[1220]);
+ meltgc_touch ( /*_.VALCLO___V1224*/ meltfptr[1223]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/ meltfptr[1221]))
+ ( /*_.VALDATA___V1225*/ meltfptr[1224]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/
- meltfptr[1221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]))->
+ ( /*_.VALDATA___V1225*/
+ meltfptr[1224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1225*/ meltfptr[1224]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1223*/ meltfptr[1222]);
+ /*_.VALSTR___V1226*/ meltfptr[1225]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1222*/ meltfptr[1221]);
+ meltgc_touch ( /*_.VALDATA___V1225*/ meltfptr[1224]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]))
+ ( /*_.VALDATA___V1227*/ meltfptr[1226]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/
- meltfptr[1223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))->
+ ( /*_.VALDATA___V1227*/
+ meltfptr[1226]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1227*/ meltfptr[1226]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1225*/ meltfptr[1224]);
+ /*_.VALSTR___V1228*/ meltfptr[1227]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1224*/ meltfptr[1223]);
+ meltgc_touch ( /*_.VALDATA___V1227*/ meltfptr[1226]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1226*/ meltfptr[1225]))
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1226*/
- meltfptr[1225]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]))->
+ ( /*_.VALDATA___V1229*/
+ meltfptr[1228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1227*/ meltfptr[1226]);
+ /*_.VALSTR___V1230*/ meltfptr[1229]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1226*/ meltfptr[1225]);
+ meltgc_touch ( /*_.VALDATA___V1229*/ meltfptr[1228]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/ meltfptr[1227]))
+ ( /*_.VALDATA___V1231*/ meltfptr[1230]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/
- meltfptr[1227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]))->
+ ( /*_.VALDATA___V1231*/
+ meltfptr[1230]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1229*/ meltfptr[1228]);
+ /*_.VALSTR___V1232*/ meltfptr[1231]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1228*/ meltfptr[1227]);
+ meltgc_touch ( /*_.VALDATA___V1231*/ meltfptr[1230]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]))
+ ( /*_.VALDATA___V1233*/ meltfptr[1232]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/
- meltfptr[1229]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))->
+ ( /*_.VALDATA___V1233*/
+ meltfptr[1232]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1231*/ meltfptr[1230]);
+ /*_.VALSTR___V1234*/ meltfptr[1233]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1230*/ meltfptr[1229]);
+ meltgc_touch ( /*_.VALDATA___V1233*/ meltfptr[1232]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1232*/ meltfptr[1231]))
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1232*/
- meltfptr[1231]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231]))->
+ ( /*_.VALDATA___V1235*/
+ meltfptr[1234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1233*/ meltfptr[1232]);
+ /*_.VALSTR___V1236*/ meltfptr[1235]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1232*/ meltfptr[1231]);
+ meltgc_touch ( /*_.VALDATA___V1235*/ meltfptr[1234]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1234*/ meltfptr[1233]))
+ ( /*_.VALDATA___V1237*/ meltfptr[1236]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1234*/
- meltfptr[1233]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233]))->
+ ( /*_.VALDATA___V1237*/
+ meltfptr[1236]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1237*/ meltfptr[1236]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1235*/ meltfptr[1234]);
+ /*_.VALSTR___V1238*/ meltfptr[1237]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1234*/ meltfptr[1233]);
+ meltgc_touch ( /*_.VALDATA___V1237*/ meltfptr[1236]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1236*/ meltfptr[1235]))
+ ( /*_.VALDATA___V1239*/ meltfptr[1238]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1236*/
- meltfptr[1235]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]))->
+ ( /*_.VALDATA___V1239*/
+ meltfptr[1238]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1237*/ meltfptr[1236]);
+ /*_.VALSTR___V1240*/ meltfptr[1239]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1236*/ meltfptr[1235]);
+ meltgc_touch ( /*_.VALDATA___V1239*/ meltfptr[1238]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1238*/ meltfptr[1237]))
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1238*/
- meltfptr[1237]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]))->
+ ( /*_.VALDATA___V1241*/
+ meltfptr[1240]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1239*/ meltfptr[1238]);
+ /*_.VALSTR___V1242*/ meltfptr[1241]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1238*/ meltfptr[1237]);
+ meltgc_touch ( /*_.VALDATA___V1241*/ meltfptr[1240]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/ meltfptr[1239]))
+ ( /*_.VALDATA___V1243*/ meltfptr[1242]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/
- meltfptr[1239]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]))->
+ ( /*_.VALDATA___V1243*/
+ meltfptr[1242]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1241*/ meltfptr[1240]);
+ /*_.VALSTR___V1244*/ meltfptr[1243]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1240*/ meltfptr[1239]);
+ meltgc_touch ( /*_.VALDATA___V1243*/ meltfptr[1242]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/ meltfptr[1241]))
+ ( /*_.VALDATA___V1245*/ meltfptr[1244]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/
- meltfptr[1241]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]))->
+ ( /*_.VALDATA___V1245*/
+ meltfptr[1244]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1245*/ meltfptr[1244]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1243*/ meltfptr[1242]);
+ /*_.VALSTR___V1246*/ meltfptr[1245]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1242*/ meltfptr[1241]);
+ meltgc_touch ( /*_.VALDATA___V1245*/ meltfptr[1244]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/ meltfptr[1243]))
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/
- meltfptr[1243]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]))->
+ ( /*_.VALDATA___V1247*/
+ meltfptr[1246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1245*/ meltfptr[1244]);
+ /*_.VALSTR___V1248*/ meltfptr[1247]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1244*/ meltfptr[1243]);
+ meltgc_touch ( /*_.VALDATA___V1247*/ meltfptr[1246]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/ meltfptr[1245]))
+ ( /*_.VALDATA___V1249*/ meltfptr[1248]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/
- meltfptr[1245]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]))->
+ ( /*_.VALDATA___V1249*/
+ meltfptr[1248]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1247*/ meltfptr[1246]);
+ /*_.VALSTR___V1250*/ meltfptr[1249]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1246*/ meltfptr[1245]);
+ meltgc_touch ( /*_.VALDATA___V1249*/ meltfptr[1248]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]))
+ ( /*_.VALDATA___V1251*/ meltfptr[1250]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/
- meltfptr[1247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))->
+ ( /*_.VALDATA___V1251*/
+ meltfptr[1250]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1251*/ meltfptr[1250]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1249*/ meltfptr[1248]);
+ /*_.VALSTR___V1252*/ meltfptr[1251]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ meltgc_touch ( /*_.VALDATA___V1251*/ meltfptr[1250]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1250*/ meltfptr[1249]))
+ ( /*_.VALDATA___V1253*/ meltfptr[1252]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1250*/
- meltfptr[1249]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]))->
+ ( /*_.VALDATA___V1253*/
+ meltfptr[1252]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1251*/ meltfptr[1250]);
+ /*_.VALSTR___V1254*/ meltfptr[1253]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1250*/ meltfptr[1249]);
+ meltgc_touch ( /*_.VALDATA___V1253*/ meltfptr[1252]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1252*/ meltfptr[1251]))
+ ( /*_.VALDATA___V1255*/ meltfptr[1254]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1252*/
- meltfptr[1251]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]))->
+ ( /*_.VALDATA___V1255*/
+ meltfptr[1254]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1253*/ meltfptr[1252]);
+ /*_.VALSTR___V1256*/ meltfptr[1255]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1252*/ meltfptr[1251]);
+ meltgc_touch ( /*_.VALDATA___V1255*/ meltfptr[1254]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1254*/ meltfptr[1253]))
+ ( /*_.VALDATA___V1257*/ meltfptr[1256]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1254*/
- meltfptr[1253]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]))->
+ ( /*_.VALDATA___V1257*/
+ meltfptr[1256]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1255*/ meltfptr[1254]);
+ /*_.VALSTR___V1258*/ meltfptr[1257]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1254*/ meltfptr[1253]);
+ meltgc_touch ( /*_.VALDATA___V1257*/ meltfptr[1256]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1256*/ meltfptr[1255]))
+ ( /*_.VALDATA___V1259*/ meltfptr[1258]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1256*/
- meltfptr[1255]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255]))->
+ ( /*_.VALDATA___V1259*/
+ meltfptr[1258]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1257*/ meltfptr[1256]);
+ /*_.VALSTR___V1260*/ meltfptr[1259]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1256*/ meltfptr[1255]);
+ meltgc_touch ( /*_.VALDATA___V1259*/ meltfptr[1258]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64148,25 +64505,25 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#2",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64174,12 +64531,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#3",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64187,12 +64544,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#4",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64200,12 +64557,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#5",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[5] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64213,12 +64570,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1109__DISPOSE_OBJLOC#6",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
@@ -64226,44 +64583,44 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1261*/ meltfptr[1260])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:1552:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1258*/ meltfptr[1257]);
+ meltgc_touch ( /*_.VALROUT___V1261*/ meltfptr[1260]);
/*putclosurout#22 */
melt_assertmsg ("putclosrout#22 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1259*/ meltfptr[1258])) ==
+ ( /*_.VALCLO___V1262*/ meltfptr[1261])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#22 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1258*/ meltfptr[1257]))
+ ( /*_.VALROUT___V1261*/ meltfptr[1260]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1259*/ meltfptr[1258])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1258*/ meltfptr[1257]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1262*/ meltfptr[1261])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1261*/ meltfptr[1260]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ meltgc_touch ( /*_.VALCLO___V1262*/ meltfptr[1261]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1111__DISPOSE_BND_OBJ#0",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
@@ -64271,13 +64628,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1111__DISPOSE_BND_OBJ#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
@@ -64285,12 +64642,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1111__DISPOSE_BND_OBJ#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
@@ -64298,12 +64655,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1111__DISPOSE_BND_OBJ#3",
NULL != ( /*_.CLASS_LET_BINDING__V57*/ meltfptr[56]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V57*/ meltfptr[56]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
@@ -64311,12 +64668,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1111__DISPOSE_BND_OBJ#4",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[4] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
@@ -64324,76 +64681,76 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1259*/ meltfptr[1258]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ NULL != /*_.VALCLO___V1262*/ meltfptr[1261]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1263*/ meltfptr[1262])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1262*/ meltfptr[1261]);
MELT_LOCATION ("warmelt-genobj.melt:1583:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1260*/ meltfptr[1259]);
+ meltgc_touch ( /*_.VALROUT___V1263*/ meltfptr[1262]);
/*putclosurout#23 */
melt_assertmsg ("putclosrout#23 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1261*/ meltfptr[1260])) ==
+ ( /*_.VALCLO___V1264*/ meltfptr[1263])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#23 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1260*/ meltfptr[1259]))
+ ( /*_.VALROUT___V1263*/ meltfptr[1262]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1261*/ meltfptr[1260])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1260*/ meltfptr[1259]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1264*/ meltfptr[1263])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1263*/ meltfptr[1262]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ meltgc_touch ( /*_.VALCLO___V1264*/ meltfptr[1263]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1262*/ meltfptr[1261]))
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1262*/
- meltfptr[1261]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261]))->
+ ( /*_.VALDATA___V1265*/
+ meltfptr[1264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1263*/ meltfptr[1262]);
+ /*_.VALSTR___V1266*/ meltfptr[1265]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1262*/ meltfptr[1261]);
+ meltgc_touch ( /*_.VALDATA___V1265*/ meltfptr[1264]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#0",
NULL != ( /*_.CLASS_NREP_CHUNK__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V58*/ meltfptr[57]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64401,13 +64758,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64415,13 +64772,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64429,13 +64786,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#3",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64443,13 +64800,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#4",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64457,13 +64814,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#5",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[5] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64471,13 +64828,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#6",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[6] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64485,13 +64842,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#7",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
@@ -64499,13 +64856,13 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#8",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[8] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1618:/ initchunk");
@@ -64513,12 +64870,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1265*/ meltfptr[1264]))
+ ( /*_.VALROUT___V1268*/ meltfptr[1267]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1119__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1265*/ meltfptr[1264])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1618:/ initchunk");
@@ -64526,12 +64883,12 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1265*/ meltfptr[1264]))
+ ( /*_.VALROUT___V1268*/ meltfptr[1267]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1119__LAMBDA_#1",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1265*/ meltfptr[1264])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:1618:/ initchunk");
@@ -64539,76 +64896,76 @@ warmelt_genobj_initialmeltchunk_17 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1265*/ meltfptr[1264]))
+ ( /*_.VALROUT___V1268*/ meltfptr[1267]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1119__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1265*/ meltfptr[1264])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1618:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1265*/ meltfptr[1264]);
+ meltgc_touch ( /*_.VALROUT___V1268*/ meltfptr[1267]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1115__COMPILOBJ_NREP_CHUNK#9",
- NULL != ( /*_.VALROUT___V1265*/ meltfptr[1264]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V1265*/ meltfptr[1264]);
+ NULL != ( /*_.VALROUT___V1268*/ meltfptr[1267]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V334*/ meltfptr[333]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]);
+ NULL != /*_.VALDATA___V337*/ meltfptr[336]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1267*/ meltfptr[1266])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:1604:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1264*/ meltfptr[1263]);
+ meltgc_touch ( /*_.VALROUT___V1267*/ meltfptr[1266]);
/*putclosurout#24 */
melt_assertmsg ("putclosrout#24 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1266*/ meltfptr[1265])) ==
+ ( /*_.VALCLO___V1269*/ meltfptr[1268])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#24 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1264*/ meltfptr[1263]))
+ ( /*_.VALROUT___V1267*/ meltfptr[1266]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1266*/ meltfptr[1265])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1269*/ meltfptr[1268])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1267*/ meltfptr[1266]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1266*/ meltfptr[1265]);
+ meltgc_touch ( /*_.VALCLO___V1269*/ meltfptr[1268]);
#undef meltfram__
@@ -64624,86 +64981,86 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putslot*/
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/ meltfptr[1266]))
+ ( /*_.VALDATA___V1270*/ meltfptr[1269]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/
- meltfptr[1266]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1267*/ meltfptr[1266]))->
+ ( /*_.VALDATA___V1270*/
+ meltfptr[1269]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1268*/ meltfptr[1267]);
+ /*_.VALSTR___V1271*/ meltfptr[1270]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1267*/ meltfptr[1266]);
+ meltgc_touch ( /*_.VALDATA___V1270*/ meltfptr[1269]);
MELT_LOCATION ("warmelt-genobj.melt:1643:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1269*/ meltfptr[1268]))
+ ( /*_.VALROUT___V1272*/ meltfptr[1271]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1120__GETCTYPE_TYPEXPR#0",
NULL !=
( /*_.CLASS_NREP_TYPED_EXPRESSION__V59*/ meltfptr[58]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1269*/ meltfptr[1268])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1272*/ meltfptr[1271])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V59*/ meltfptr[58]);
MELT_LOCATION ("warmelt-genobj.melt:1643:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1269*/ meltfptr[1268]);
+ meltgc_touch ( /*_.VALROUT___V1272*/ meltfptr[1271]);
/*putclosurout#25 */
melt_assertmsg ("putclosrout#25 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1270*/ meltfptr[1269])) ==
+ ( /*_.VALCLO___V1273*/ meltfptr[1272])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#25 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1269*/ meltfptr[1268]))
+ ( /*_.VALROUT___V1272*/ meltfptr[1271]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1270*/ meltfptr[1269])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1269*/ meltfptr[1268]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1273*/ meltfptr[1272])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1272*/ meltfptr[1271]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1270*/ meltfptr[1269]);
+ meltgc_touch ( /*_.VALCLO___V1273*/ meltfptr[1272]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1271*/ meltfptr[1270]))
+ ( /*_.VALDATA___V1274*/ meltfptr[1273]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1271*/
- meltfptr[1270]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1271*/ meltfptr[1270]))->
+ ( /*_.VALDATA___V1274*/
+ meltfptr[1273]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1272*/ meltfptr[1271]);
+ /*_.VALSTR___V1275*/ meltfptr[1274]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1271*/ meltfptr[1270]);
+ meltgc_touch ( /*_.VALDATA___V1274*/ meltfptr[1273]);
MELT_LOCATION ("warmelt-genobj.melt:1649:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1273*/ meltfptr[1272]))
+ ( /*_.VALROUT___V1276*/ meltfptr[1275]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1124__COMPILOBJ_NREP_NIL#0",
NULL != ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1273*/ meltfptr[1272])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1276*/ meltfptr[1275])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]);
MELT_LOCATION ("warmelt-genobj.melt:1649:/ initchunk");
@@ -64711,13 +65068,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1273*/ meltfptr[1272]))
+ ( /*_.VALROUT___V1276*/ meltfptr[1275]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1124__COMPILOBJ_NREP_NIL#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1273*/ meltfptr[1272])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1276*/ meltfptr[1275])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1649:/ initchunk");
@@ -64725,77 +65082,77 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1273*/ meltfptr[1272]))
+ ( /*_.VALROUT___V1276*/ meltfptr[1275]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V222*/ meltfptr[221]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1273*/ meltfptr[1272])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]);
+ NULL != /*_.VALDATA___V225*/ meltfptr[224]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1276*/ meltfptr[1275])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
MELT_LOCATION ("warmelt-genobj.melt:1649:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1273*/ meltfptr[1272]))
+ ( /*_.VALROUT___V1276*/ meltfptr[1275]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1124__COMPILOBJ_NREP_NIL#3",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1273*/ meltfptr[1272])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1276*/ meltfptr[1275])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1649:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1273*/ meltfptr[1272]);
+ meltgc_touch ( /*_.VALROUT___V1276*/ meltfptr[1275]);
/*putclosurout#26 */
melt_assertmsg ("putclosrout#26 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1274*/ meltfptr[1273])) ==
+ ( /*_.VALCLO___V1277*/ meltfptr[1276])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#26 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1273*/ meltfptr[1272]))
+ ( /*_.VALROUT___V1276*/ meltfptr[1275]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1274*/ meltfptr[1273])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1273*/ meltfptr[1272]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1277*/ meltfptr[1276])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1276*/ meltfptr[1275]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1274*/ meltfptr[1273]);
+ meltgc_touch ( /*_.VALCLO___V1277*/ meltfptr[1276]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1275*/ meltfptr[1274]))
+ ( /*_.VALDATA___V1278*/ meltfptr[1277]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1275*/
- meltfptr[1274]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1275*/ meltfptr[1274]))->
+ ( /*_.VALDATA___V1278*/
+ meltfptr[1277]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1276*/ meltfptr[1275]);
+ /*_.VALSTR___V1279*/ meltfptr[1278]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1275*/ meltfptr[1274]);
+ meltgc_touch ( /*_.VALDATA___V1278*/ meltfptr[1277]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1128__COMPILOBJ_NREP_COMMENT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
@@ -64803,13 +65160,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1128__COMPILOBJ_NREP_COMMENT#1",
NULL != ( /*_.CLASS_NREP_COMMENT__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_COMMENT__V61*/ meltfptr[60]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
@@ -64817,13 +65174,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1128__COMPILOBJ_NREP_COMMENT#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
@@ -64831,13 +65188,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1128__COMPILOBJ_NREP_COMMENT#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
@@ -64845,13 +65202,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1128__COMPILOBJ_NREP_COMMENT#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
@@ -64859,64 +65216,64 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1277*/ meltfptr[1276])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1280*/ meltfptr[1279])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:1660:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1277*/ meltfptr[1276]);
+ meltgc_touch ( /*_.VALROUT___V1280*/ meltfptr[1279]);
/*putclosurout#27 */
melt_assertmsg ("putclosrout#27 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1278*/ meltfptr[1277])) ==
+ ( /*_.VALCLO___V1281*/ meltfptr[1280])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#27 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1277*/ meltfptr[1276]))
+ ( /*_.VALROUT___V1280*/ meltfptr[1279]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1278*/ meltfptr[1277])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1277*/ meltfptr[1276]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1281*/ meltfptr[1280])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1280*/ meltfptr[1279]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1278*/ meltfptr[1277]);
+ meltgc_touch ( /*_.VALCLO___V1281*/ meltfptr[1280]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1279*/ meltfptr[1278]))
+ ( /*_.VALDATA___V1282*/ meltfptr[1281]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1279*/
- meltfptr[1278]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]))->
+ ( /*_.VALDATA___V1282*/
+ meltfptr[1281]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1280*/ meltfptr[1279]);
+ /*_.VALSTR___V1283*/ meltfptr[1282]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1279*/ meltfptr[1278]);
+ meltgc_touch ( /*_.VALDATA___V1282*/ meltfptr[1281]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1132__COMPILOBJ_NREP_LOCSYMOCC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1281*/ meltfptr[1280])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1284*/ meltfptr[1283])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
@@ -64924,13 +65281,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1132__COMPILOBJ_NREP_LOCSYMOCC#1",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1281*/ meltfptr[1280])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1284*/ meltfptr[1283])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
@@ -64938,13 +65295,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1132__COMPILOBJ_NREP_LOCSYMOCC#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1281*/ meltfptr[1280])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1284*/ meltfptr[1283])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
@@ -64952,13 +65309,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1132__COMPILOBJ_NREP_LOCSYMOCC#3",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1281*/ meltfptr[1280])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1284*/ meltfptr[1283])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
@@ -64966,64 +65323,64 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1281*/ meltfptr[1280])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1284*/ meltfptr[1283])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1683:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1281*/ meltfptr[1280]);
+ meltgc_touch ( /*_.VALROUT___V1284*/ meltfptr[1283]);
/*putclosurout#28 */
melt_assertmsg ("putclosrout#28 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1282*/ meltfptr[1281])) ==
+ ( /*_.VALCLO___V1285*/ meltfptr[1284])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#28 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1281*/ meltfptr[1280]))
+ ( /*_.VALROUT___V1284*/ meltfptr[1283]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1282*/ meltfptr[1281])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1281*/ meltfptr[1280]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1285*/ meltfptr[1284])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1284*/ meltfptr[1283]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1282*/ meltfptr[1281]);
+ meltgc_touch ( /*_.VALCLO___V1285*/ meltfptr[1284]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1283*/ meltfptr[1282]))
+ ( /*_.VALDATA___V1286*/ meltfptr[1285]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1283*/
- meltfptr[1282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1283*/ meltfptr[1282]))->
+ ( /*_.VALDATA___V1286*/
+ meltfptr[1285]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1284*/ meltfptr[1283]);
+ /*_.VALSTR___V1287*/ meltfptr[1286]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1283*/ meltfptr[1282]);
+ meltgc_touch ( /*_.VALDATA___V1286*/ meltfptr[1285]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
@@ -65031,13 +65388,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#1",
NULL != ( /*_.CLASS_NREP_CLOSEDOCC__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_CLOSEDOCC__V63*/ meltfptr[62]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
@@ -65045,13 +65402,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
@@ -65059,13 +65416,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#3",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
@@ -65073,25 +65430,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V188*/ meltfptr[187]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]);
+ NULL != /*_.VALDATA___V191*/ meltfptr[190]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#5",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
@@ -65099,66 +65456,66 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1136__COMPILOBJ_NREP_CLOSEDOCC#6",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1285*/ meltfptr[1284])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1288*/ meltfptr[1287])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:1711:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1285*/ meltfptr[1284]);
+ meltgc_touch ( /*_.VALROUT___V1288*/ meltfptr[1287]);
/*putclosurout#29 */
melt_assertmsg ("putclosrout#29 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1286*/ meltfptr[1285])) ==
+ ( /*_.VALCLO___V1289*/ meltfptr[1288])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#29 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1285*/ meltfptr[1284]))
+ ( /*_.VALROUT___V1288*/ meltfptr[1287]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1286*/ meltfptr[1285])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1285*/ meltfptr[1284]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1289*/ meltfptr[1288])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1288*/ meltfptr[1287]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1286*/ meltfptr[1285]);
+ meltgc_touch ( /*_.VALCLO___V1289*/ meltfptr[1288]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1287*/ meltfptr[1286]))
+ ( /*_.VALDATA___V1290*/ meltfptr[1289]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1287*/
- meltfptr[1286]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1287*/ meltfptr[1286]))->
+ ( /*_.VALDATA___V1290*/
+ meltfptr[1289]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1288*/ meltfptr[1287]);
+ /*_.VALSTR___V1291*/ meltfptr[1290]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1287*/ meltfptr[1286]);
+ meltgc_touch ( /*_.VALDATA___V1290*/ meltfptr[1289]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
@@ -65166,13 +65523,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#1",
NULL != ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
@@ -65180,13 +65537,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
@@ -65194,13 +65551,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#3",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
@@ -65208,25 +65565,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V206*/ meltfptr[205]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]);
+ NULL != /*_.VALDATA___V209*/ meltfptr[208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#5",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
@@ -65234,66 +65591,66 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1140__COMPILOBJ_NREP_CONSTOCC#6",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1289*/ meltfptr[1288])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:1761:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1289*/ meltfptr[1288]);
+ meltgc_touch ( /*_.VALROUT___V1292*/ meltfptr[1291]);
/*putclosurout#30 */
melt_assertmsg ("putclosrout#30 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1290*/ meltfptr[1289])) ==
+ ( /*_.VALCLO___V1293*/ meltfptr[1292])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#30 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1289*/ meltfptr[1288]))
+ ( /*_.VALROUT___V1292*/ meltfptr[1291]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1290*/ meltfptr[1289])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1289*/ meltfptr[1288]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1293*/ meltfptr[1292])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1292*/ meltfptr[1291]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1290*/ meltfptr[1289]);
+ meltgc_touch ( /*_.VALCLO___V1293*/ meltfptr[1292]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1291*/ meltfptr[1290]))
+ ( /*_.VALDATA___V1294*/ meltfptr[1293]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1291*/
- meltfptr[1290]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1291*/ meltfptr[1290]))->
+ ( /*_.VALDATA___V1294*/
+ meltfptr[1293]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1292*/ meltfptr[1291]);
+ /*_.VALSTR___V1295*/ meltfptr[1294]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1291*/ meltfptr[1290]);
+ meltgc_touch ( /*_.VALDATA___V1294*/ meltfptr[1293]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1144__COMPILOBJ_NREP_IMPORTEDVAL#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1293*/ meltfptr[1292])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1296*/ meltfptr[1295])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
@@ -65301,13 +65658,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1144__COMPILOBJ_NREP_IMPORTEDVAL#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1293*/ meltfptr[1292])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1296*/ meltfptr[1295])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
@@ -65315,13 +65672,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1144__COMPILOBJ_NREP_IMPORTEDVAL#2",
NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1293*/ meltfptr[1292])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1296*/ meltfptr[1295])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/ meltfptr[49]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
@@ -65329,13 +65686,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1144__COMPILOBJ_NREP_IMPORTEDVAL#3",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1293*/ meltfptr[1292])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1296*/ meltfptr[1295])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
@@ -65343,45 +65700,45 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1293*/ meltfptr[1292])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1296*/ meltfptr[1295])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1809:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1293*/ meltfptr[1292]);
+ meltgc_touch ( /*_.VALROUT___V1296*/ meltfptr[1295]);
/*putclosurout#31 */
melt_assertmsg ("putclosrout#31 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1294*/ meltfptr[1293])) ==
+ ( /*_.VALCLO___V1297*/ meltfptr[1296])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#31 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1293*/ meltfptr[1292]))
+ ( /*_.VALROUT___V1296*/ meltfptr[1295]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1294*/ meltfptr[1293])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1293*/ meltfptr[1292]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1297*/ meltfptr[1296])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1296*/ meltfptr[1295]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1294*/ meltfptr[1293]);
+ meltgc_touch ( /*_.VALCLO___V1297*/ meltfptr[1296]);
MELT_LOCATION ("warmelt-genobj.melt:1825:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1295*/ meltfptr[1294]))
+ ( /*_.VALROUT___V1298*/ meltfptr[1297]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1295*/ meltfptr[1294])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1298*/ meltfptr[1297])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1825:/ initchunk");
@@ -65389,13 +65746,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1295*/ meltfptr[1294]))
+ ( /*_.VALROUT___V1298*/ meltfptr[1297]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1295*/ meltfptr[1294])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1298*/ meltfptr[1297])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
MELT_LOCATION ("warmelt-genobj.melt:1825:/ initchunk");
@@ -65403,66 +65760,66 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1295*/ meltfptr[1294]))
+ ( /*_.VALROUT___V1298*/ meltfptr[1297]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1146__COMPILOBJ_NREP_DEFINEDCONSTANT#2",
NULL != ( /*_.CLASS_NREP_DEFINED_CONSTANT__V65*/ meltfptr[64]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1295*/ meltfptr[1294])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1298*/ meltfptr[1297])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_DEFINED_CONSTANT__V65*/ meltfptr[64]);
MELT_LOCATION ("warmelt-genobj.melt:1825:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1295*/ meltfptr[1294]);
+ meltgc_touch ( /*_.VALROUT___V1298*/ meltfptr[1297]);
/*putclosurout#32 */
melt_assertmsg ("putclosrout#32 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1296*/ meltfptr[1295])) ==
+ ( /*_.VALCLO___V1299*/ meltfptr[1298])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#32 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1295*/ meltfptr[1294]))
+ ( /*_.VALROUT___V1298*/ meltfptr[1297]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1296*/ meltfptr[1295])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1295*/ meltfptr[1294]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1299*/ meltfptr[1298])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1298*/ meltfptr[1297]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1296*/ meltfptr[1295]);
+ meltgc_touch ( /*_.VALCLO___V1299*/ meltfptr[1298]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/ meltfptr[1296]))
+ ( /*_.VALDATA___V1300*/ meltfptr[1299]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/
- meltfptr[1296]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1297*/ meltfptr[1296]))->
+ ( /*_.VALDATA___V1300*/
+ meltfptr[1299]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1298*/ meltfptr[1297]);
+ /*_.VALSTR___V1301*/ meltfptr[1300]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1297*/ meltfptr[1296]);
+ meltgc_touch ( /*_.VALDATA___V1300*/ meltfptr[1299]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65470,13 +65827,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65484,13 +65841,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#2",
NULL != ( /*_.CLASS_NREP_QUASICONSTANT__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_QUASICONSTANT__V66*/ meltfptr[65]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65498,13 +65855,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#3",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65512,13 +65869,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65526,13 +65883,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#5",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65540,25 +65897,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V206*/ meltfptr[205]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]);
+ NULL != /*_.VALDATA___V209*/ meltfptr[208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#7",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[7] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65566,13 +65923,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#8",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65580,13 +65937,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
@@ -65594,66 +65951,66 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1150__COMPILOBJ_NREP_QUASICONSTANT#10",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1299*/ meltfptr[1298])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1302*/ meltfptr[1301])->tabval[10] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1844:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1299*/ meltfptr[1298]);
+ meltgc_touch ( /*_.VALROUT___V1302*/ meltfptr[1301]);
/*putclosurout#33 */
melt_assertmsg ("putclosrout#33 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1300*/ meltfptr[1299])) ==
+ ( /*_.VALCLO___V1303*/ meltfptr[1302])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#33 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1299*/ meltfptr[1298]))
+ ( /*_.VALROUT___V1302*/ meltfptr[1301]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1300*/ meltfptr[1299])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1299*/ meltfptr[1298]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1303*/ meltfptr[1302])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1302*/ meltfptr[1301]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1300*/ meltfptr[1299]);
+ meltgc_touch ( /*_.VALCLO___V1303*/ meltfptr[1302]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1301*/ meltfptr[1300]))
+ ( /*_.VALDATA___V1304*/ meltfptr[1303]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1301*/
- meltfptr[1300]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1301*/ meltfptr[1300]))->
+ ( /*_.VALDATA___V1304*/
+ meltfptr[1303]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1302*/ meltfptr[1301]);
+ /*_.VALSTR___V1305*/ meltfptr[1304]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1301*/ meltfptr[1300]);
+ meltgc_touch ( /*_.VALDATA___V1304*/ meltfptr[1303]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
@@ -65661,7 +66018,7 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
@@ -65669,7 +66026,7 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
NULL !=
( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V67*/
meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V67*/ meltfptr[66]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
@@ -65677,25 +66034,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1300*/ meltfptr[1299]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1300*/ meltfptr[1299]);
+ NULL != /*_.VALCLO___V1303*/ meltfptr[1302]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1303*/ meltfptr[1302]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
@@ -65703,13 +66060,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
@@ -65717,78 +66074,78 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V334*/ meltfptr[333]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]);
+ NULL != /*_.VALDATA___V337*/ meltfptr[336]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1154__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#6",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:1903:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1303*/ meltfptr[1302]);
+ meltgc_touch ( /*_.VALROUT___V1306*/ meltfptr[1305]);
/*putclosurout#34 */
melt_assertmsg ("putclosrout#34 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1304*/ meltfptr[1303])) ==
+ ( /*_.VALCLO___V1307*/ meltfptr[1306])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#34 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1303*/ meltfptr[1302]))
+ ( /*_.VALROUT___V1306*/ meltfptr[1305]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1304*/ meltfptr[1303])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1303*/ meltfptr[1302]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1307*/ meltfptr[1306])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1306*/ meltfptr[1305]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1304*/ meltfptr[1303]);
+ meltgc_touch ( /*_.VALCLO___V1307*/ meltfptr[1306]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1305*/ meltfptr[1304]))
+ ( /*_.VALDATA___V1308*/ meltfptr[1307]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1305*/
- meltfptr[1304]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304]))->
+ ( /*_.VALDATA___V1308*/
+ meltfptr[1307]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1306*/ meltfptr[1305]);
+ /*_.VALSTR___V1309*/ meltfptr[1308]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1305*/ meltfptr[1304]);
+ meltgc_touch ( /*_.VALDATA___V1308*/ meltfptr[1307]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65796,13 +66153,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65810,13 +66167,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#2",
NULL != ( /*_.CLASS_NREP_FOREVER__V68*/ meltfptr[67]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_FOREVER__V68*/ meltfptr[67]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65824,25 +66181,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#4",
NULL != ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65850,25 +66207,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#6",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65876,25 +66233,25 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V530*/ meltfptr[529]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]);
+ NULL != /*_.VALDATA___V533*/ meltfptr[532]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#8",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65902,13 +66259,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#9",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[9] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
@@ -65916,13 +66273,13 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#10",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[10] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1960:/ initchunk");
@@ -65930,102 +66287,102 @@ warmelt_genobj_initialmeltchunk_18 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1311*/ meltfptr[1310]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1164__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1311*/ meltfptr[1310])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1960:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1308*/ meltfptr[1307]);
+ meltgc_touch ( /*_.VALROUT___V1311*/ meltfptr[1310]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1158__COMPILOBJ_NREP_FOREVER#11",
- NULL != ( /*_.VALROUT___V1308*/ meltfptr[1307]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V1308*/ meltfptr[1307]);
+ NULL != ( /*_.VALROUT___V1311*/ meltfptr[1310]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V1311*/ meltfptr[1310]);
MELT_LOCATION ("warmelt-genobj.melt:1931:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1307*/ meltfptr[1306]);
+ meltgc_touch ( /*_.VALROUT___V1310*/ meltfptr[1309]);
/*putclosurout#35 */
melt_assertmsg ("putclosrout#35 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1309*/ meltfptr[1308])) ==
+ ( /*_.VALCLO___V1312*/ meltfptr[1311])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#35 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1307*/ meltfptr[1306]))
+ ( /*_.VALROUT___V1310*/ meltfptr[1309]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1309*/ meltfptr[1308])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1307*/ meltfptr[1306]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1312*/ meltfptr[1311])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1310*/ meltfptr[1309]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ meltgc_touch ( /*_.VALCLO___V1312*/ meltfptr[1311]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1310*/ meltfptr[1309]))
+ ( /*_.VALDATA___V1313*/ meltfptr[1312]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1310*/
- meltfptr[1309]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309]))->
+ ( /*_.VALDATA___V1313*/
+ meltfptr[1312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1311*/ meltfptr[1310]);
+ /*_.VALSTR___V1314*/ meltfptr[1313]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1310*/ meltfptr[1309]);
+ meltgc_touch ( /*_.VALDATA___V1313*/ meltfptr[1312]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1312*/ meltfptr[1311]))
+ ( /*_.VALDATA___V1315*/ meltfptr[1314]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1312*/
- meltfptr[1311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311]))->
+ ( /*_.VALDATA___V1315*/
+ meltfptr[1314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1313*/ meltfptr[1312]);
+ /*_.VALSTR___V1316*/ meltfptr[1315]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1312*/ meltfptr[1311]);
+ meltgc_touch ( /*_.VALDATA___V1315*/ meltfptr[1314]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
@@ -66044,13 +66401,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
@@ -66058,12 +66415,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#2",
NULL != ( /*_.CLASS_NREP_EXIT__V70*/ meltfptr[69]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXIT__V70*/ meltfptr[69]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
@@ -66071,12 +66428,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#3",
NULL != ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
@@ -66084,12 +66441,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
@@ -66097,12 +66454,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1165__COMPILOBJ_NREP_EXIT#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
@@ -66110,88 +66467,88 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V544*/ meltfptr[543]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]);
+ NULL != /*_.VALDATA___V547*/ meltfptr[546]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1317*/ meltfptr[1316])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:1971:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1314*/ meltfptr[1313]);
+ meltgc_touch ( /*_.VALROUT___V1317*/ meltfptr[1316]);
/*putclosurout#36 */
melt_assertmsg ("putclosrout#36 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1315*/ meltfptr[1314])) ==
+ ( /*_.VALCLO___V1318*/ meltfptr[1317])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#36 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1317*/ meltfptr[1316]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1315*/ meltfptr[1314])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1314*/ meltfptr[1313]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1318*/ meltfptr[1317])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1317*/ meltfptr[1316]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1315*/ meltfptr[1314]);
+ meltgc_touch ( /*_.VALCLO___V1318*/ meltfptr[1317]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1316*/ meltfptr[1315]))
+ ( /*_.VALDATA___V1319*/ meltfptr[1318]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1316*/
- meltfptr[1315]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]))->
+ ( /*_.VALDATA___V1319*/
+ meltfptr[1318]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1317*/ meltfptr[1316]);
+ /*_.VALSTR___V1320*/ meltfptr[1319]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1316*/ meltfptr[1315]);
+ meltgc_touch ( /*_.VALDATA___V1319*/ meltfptr[1318]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1169__COMPILOBJ_NREP_AGAIN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1318*/ meltfptr[1317])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
@@ -66199,13 +66556,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1169__COMPILOBJ_NREP_AGAIN#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1318*/ meltfptr[1317])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
@@ -66213,13 +66570,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1169__COMPILOBJ_NREP_AGAIN#2",
NULL != ( /*_.CLASS_NREP_AGAIN__V71*/ meltfptr[70]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1318*/ meltfptr[1317])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_AGAIN__V71*/ meltfptr[70]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
@@ -66227,111 +66584,111 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V554*/ meltfptr[553]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1318*/ meltfptr[1317])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]);
+ NULL != /*_.VALDATA___V557*/ meltfptr[556]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1169__COMPILOBJ_NREP_AGAIN#4",
NULL != ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1318*/ meltfptr[1317])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V69*/ meltfptr[68]);
MELT_LOCATION ("warmelt-genobj.melt:2010:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1318*/ meltfptr[1317]);
+ meltgc_touch ( /*_.VALROUT___V1321*/ meltfptr[1320]);
/*putclosurout#37 */
melt_assertmsg ("putclosrout#37 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1319*/ meltfptr[1318])) ==
+ ( /*_.VALCLO___V1322*/ meltfptr[1321])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#37 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1318*/ meltfptr[1317]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1319*/ meltfptr[1318])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1318*/ meltfptr[1317]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1322*/ meltfptr[1321])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1321*/ meltfptr[1320]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1319*/ meltfptr[1318]);
+ meltgc_touch ( /*_.VALCLO___V1322*/ meltfptr[1321]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1320*/ meltfptr[1319]))
+ ( /*_.VALDATA___V1323*/ meltfptr[1322]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1320*/
- meltfptr[1319]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319]))->
+ ( /*_.VALDATA___V1323*/
+ meltfptr[1322]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1321*/ meltfptr[1320]);
+ /*_.VALSTR___V1324*/ meltfptr[1323]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1320*/ meltfptr[1319]);
+ meltgc_touch ( /*_.VALDATA___V1323*/ meltfptr[1322]);
MELT_LOCATION ("warmelt-genobj.melt:2031:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1322*/ meltfptr[1321]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1173__COMPILOBJ_DISCRANY#0",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1322*/ meltfptr[1321])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2031:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1322*/ meltfptr[1321]);
+ meltgc_touch ( /*_.VALROUT___V1325*/ meltfptr[1324]);
/*putclosurout#38 */
melt_assertmsg ("putclosrout#38 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1323*/ meltfptr[1322])) ==
+ ( /*_.VALCLO___V1326*/ meltfptr[1325])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#38 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1322*/ meltfptr[1321]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1323*/ meltfptr[1322])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1322*/ meltfptr[1321]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1326*/ meltfptr[1325])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1325*/ meltfptr[1324]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1323*/ meltfptr[1322]);
+ meltgc_touch ( /*_.VALCLO___V1326*/ meltfptr[1325]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#0",
NULL != ( /*_.CLASS_NREP_LET__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_LET__V72*/ meltfptr[71]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66339,13 +66696,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66353,12 +66710,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66366,24 +66723,24 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#4",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[4] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66391,12 +66748,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#5",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[5] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66404,12 +66761,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#6",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[6] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66417,13 +66774,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#7",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66431,24 +66788,24 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#9",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[9] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66456,12 +66813,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#10",
NULL != ( /*_.CLASS_SEXPR__V74*/ meltfptr[73]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_SEXPR__V74*/ meltfptr[73]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66469,36 +66826,36 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1179__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
@@ -66506,13 +66863,13 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1179__LAMBDA_#1",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
@@ -66520,24 +66877,24 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1179__LAMBDA_#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
@@ -66545,12 +66902,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1179__LAMBDA_#4",
NULL != ( /*_.CLASS_SEXPR__V74*/ meltfptr[73]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SEXPR__V74*/ meltfptr[73]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
@@ -66558,54 +66915,54 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1325*/ meltfptr[1324]))
+ ( /*_.VALROUT___V1328*/ meltfptr[1327]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1328*/ meltfptr[1327])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2059:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1325*/ meltfptr[1324]);
+ meltgc_touch ( /*_.VALROUT___V1328*/ meltfptr[1327]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#13",
- NULL != ( /*_.VALROUT___V1325*/ meltfptr[1324]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[13] =
- (melt_ptr_t) ( /*_.VALROUT___V1325*/ meltfptr[1324]);
+ NULL != ( /*_.VALROUT___V1328*/ meltfptr[1327]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALROUT___V1328*/ meltfptr[1327]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#14",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[14] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66613,12 +66970,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#15",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[15] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2102:/ initchunk");
@@ -66626,12 +66983,12 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1326*/ meltfptr[1325]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1184__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2102:/ initchunk");
@@ -66639,43 +66996,43 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1326*/ meltfptr[1325]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1184__LAMBDA_#1",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[1] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2102:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1326*/ meltfptr[1325]);
+ meltgc_touch ( /*_.VALROUT___V1329*/ meltfptr[1328]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#16",
- NULL != ( /*_.VALROUT___V1326*/ meltfptr[1325]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[16] =
- (melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325]);
+ NULL != ( /*_.VALROUT___V1329*/ meltfptr[1328]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALROUT___V1329*/ meltfptr[1328]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#17",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[17] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
@@ -66683,24 +67040,24 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[18] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:2115:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1327*/ meltfptr[1326]))
+ ( /*_.VALROUT___V1330*/ meltfptr[1329]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1185__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2115:/ initchunk");
@@ -66708,167 +67065,107 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1327*/ meltfptr[1326]))
+ ( /*_.VALROUT___V1330*/ meltfptr[1329]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:2115:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1327*/ meltfptr[1326]);
+ meltgc_touch ( /*_.VALROUT___V1330*/ meltfptr[1329]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1175__COMPILOBJ_NREP_LET#19",
- NULL != ( /*_.VALROUT___V1327*/ meltfptr[1326]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[19] =
- (melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326]);
+ NULL != ( /*_.VALROUT___V1330*/ meltfptr[1329]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALROUT___V1330*/ meltfptr[1329]);
MELT_LOCATION ("warmelt-genobj.melt:2038:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1324*/ meltfptr[1323]);
+ meltgc_touch ( /*_.VALROUT___V1327*/ meltfptr[1326]);
/*putclosurout#39 */
melt_assertmsg ("putclosrout#39 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1328*/ meltfptr[1327])) ==
+ ( /*_.VALCLO___V1331*/ meltfptr[1330])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#39 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1324*/ meltfptr[1323]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1328*/ meltfptr[1327])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1331*/ meltfptr[1330])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1328*/ meltfptr[1327]);
-
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1329*/ meltfptr[1328]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1329*/
- meltfptr[1328]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1329*/ meltfptr[1328]))->
- obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1330*/ meltfptr[1329]);
-
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1329*/ meltfptr[1328]);
+ meltgc_touch ( /*_.VALCLO___V1331*/ meltfptr[1330]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1331*/ meltfptr[1330]))
+ ( /*_.VALDATA___V1332*/ meltfptr[1331]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1331*/
- meltfptr[1330]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330]))->
+ ( /*_.VALDATA___V1332*/
+ meltfptr[1331]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1332*/ meltfptr[1331]);
+ /*_.VALSTR___V1333*/ meltfptr[1332]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1331*/ meltfptr[1330]);
+ meltgc_touch ( /*_.VALDATA___V1332*/ meltfptr[1331]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1333*/ meltfptr[1332]))
+ ( /*_.VALDATA___V1334*/ meltfptr[1333]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1333*/
- meltfptr[1332]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1333*/ meltfptr[1332]))->
+ ( /*_.VALDATA___V1334*/
+ meltfptr[1333]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1334*/ meltfptr[1333]);
+ /*_.VALSTR___V1335*/ meltfptr[1334]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1333*/ meltfptr[1332]);
+ meltgc_touch ( /*_.VALDATA___V1334*/ meltfptr[1333]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1335*/ meltfptr[1334]))
+ ( /*_.VALDATA___V1336*/ meltfptr[1335]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1335*/
- meltfptr[1334]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334]))->
+ ( /*_.VALDATA___V1336*/
+ meltfptr[1335]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1336*/ meltfptr[1335]);
+ /*_.VALSTR___V1337*/ meltfptr[1336]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1335*/ meltfptr[1334]);
-
- MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1337*/ meltfptr[1336]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (0 >= 0
- && 0 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1337*/
- meltfptr[1336]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1337*/ meltfptr[1336]))->
- obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1056*/ meltfptr[1055]);
-
- MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1337*/ meltfptr[1336]))
- == MELTOBMAG_OBJECT);
-
- melt_assertmsg ("putslot checkoff",
- (1 >= 0
- && 1 <
- melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1337*/
- meltfptr[1336]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1337*/ meltfptr[1336]))->
- obj_vartab[1] = (melt_ptr_t) (
- ((void *) (MELT_PREDEF (CTYPE_VALUE))));
-
- MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
- /*^touch */
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1337*/ meltfptr[1336]);
+ meltgc_touch ( /*_.VALDATA___V1336*/ meltfptr[1335]);
/*putslot */
melt_assertmsg ("putslot checkobj",
@@ -66905,7 +67202,7 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
meltfptr[1339]))));
((meltobject_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1338*/ meltfptr[1337]);
+ /*_.VALDATA___V1059*/ meltfptr[1058]);
MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
/*^putslot */
@@ -67110,114 +67407,174 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*touch:VALUEDATA_ */
meltgc_touch ( /*_.VALDATA___V1349*/ meltfptr[1348]);
- /*putupl#609 */
- melt_assertmsg ("putupl #609 checktup",
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1350*/ meltfptr[1349]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1350*/
+ meltfptr[1349]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1351*/ meltfptr[1350]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1350*/ meltfptr[1349]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/ meltfptr[1349])) ==
+ ( /*_.VALDATA___V1352*/ meltfptr[1351]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (0 >= 0
+ && 0 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1352*/
+ meltfptr[1351]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]))->
+ obj_vartab[0] = (melt_ptr_t) (
+ /*_.VALDATA___V1350*/ meltfptr[1349]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1352*/ meltfptr[1351]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1352*/
+ meltfptr[1351]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ ((void *) (MELT_PREDEF (CTYPE_VALUE))));
+
+ MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
+ /*^touch */
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1352*/ meltfptr[1351]);
+
+ /*putupl#604 */
+ melt_assertmsg ("putupl #604 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALTUP___V1353*/ meltfptr[1352])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #609 checkoff",
+ melt_assertmsg ("putupl #604 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/
- meltfptr[1349]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1350*/ meltfptr[1349]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1337*/ meltfptr[1336]);
+ ( /*_.VALTUP___V1353*/
+ meltfptr[1352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1353*/ meltfptr[1352]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]);
- /*putupl#610 */
- melt_assertmsg ("putupl #610 checktup",
+ /*putupl#605 */
+ melt_assertmsg ("putupl #605 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/ meltfptr[1349])) ==
+ ( /*_.VALTUP___V1353*/ meltfptr[1352])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #610 checkoff",
+ melt_assertmsg ("putupl #605 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/
- meltfptr[1349]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1350*/ meltfptr[1349]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]);
+ ( /*_.VALTUP___V1353*/
+ meltfptr[1352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1353*/ meltfptr[1352]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1343*/ meltfptr[1342]);
- /*putupl#611 */
- melt_assertmsg ("putupl #611 checktup",
+ /*putupl#606 */
+ melt_assertmsg ("putupl #606 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/ meltfptr[1349])) ==
+ ( /*_.VALTUP___V1353*/ meltfptr[1352])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #611 checkoff",
+ melt_assertmsg ("putupl #606 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/
- meltfptr[1349]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1350*/ meltfptr[1349]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1343*/ meltfptr[1342]);
+ ( /*_.VALTUP___V1353*/
+ meltfptr[1352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1353*/ meltfptr[1352]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345]);
- /*putupl#612 */
- melt_assertmsg ("putupl #612 checktup",
+ /*putupl#607 */
+ melt_assertmsg ("putupl #607 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/ meltfptr[1349])) ==
+ ( /*_.VALTUP___V1353*/ meltfptr[1352])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #612 checkoff",
+ melt_assertmsg ("putupl #607 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/
- meltfptr[1349]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1350*/ meltfptr[1349]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345]);
+ ( /*_.VALTUP___V1353*/
+ meltfptr[1352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1353*/ meltfptr[1352]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1349*/ meltfptr[1348]);
- /*putupl#613 */
- melt_assertmsg ("putupl #613 checktup",
+ /*putupl#608 */
+ melt_assertmsg ("putupl #608 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/ meltfptr[1349])) ==
+ ( /*_.VALTUP___V1353*/ meltfptr[1352])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #613 checkoff",
+ melt_assertmsg ("putupl #608 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1350*/
- meltfptr[1349]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1350*/ meltfptr[1349]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1349*/ meltfptr[1348]);
+ ( /*_.VALTUP___V1353*/
+ meltfptr[1352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1353*/ meltfptr[1352]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1350*/ meltfptr[1349]);
+ meltgc_touch ( /*_.VALTUP___V1353*/ meltfptr[1352]);
MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1351*/ meltfptr[1350]))
+ ( /*_.VALDATA___V1354*/ meltfptr[1353]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1351*/
- meltfptr[1350]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1351*/ meltfptr[1350]))->
+ ( /*_.VALDATA___V1354*/
+ meltfptr[1353]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1352*/ meltfptr[1351]);
+ /*_.VALSTR___V1355*/ meltfptr[1354]);
MELT_LOCATION ("warmelt-genobj.melt:2131:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1351*/ meltfptr[1350]);
+ meltgc_touch ( /*_.VALDATA___V1354*/ meltfptr[1353]);
MELT_LOCATION ("warmelt-genobj.melt:2140:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1353*/ meltfptr[1352]))
+ ( /*_.VALROUT___V1356*/ meltfptr[1355]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1204__FAIL_COMPILETRECFILL#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1353*/ meltfptr[1352])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1356*/ meltfptr[1355])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2140:/ initchunk");
@@ -67225,46 +67582,46 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1353*/ meltfptr[1352]))
+ ( /*_.VALROUT___V1356*/ meltfptr[1355]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1204__FAIL_COMPILETRECFILL#1",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1353*/ meltfptr[1352])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1356*/ meltfptr[1355])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
MELT_LOCATION ("warmelt-genobj.melt:2140:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1353*/ meltfptr[1352]);
+ meltgc_touch ( /*_.VALROUT___V1356*/ meltfptr[1355]);
/*putclosurout#40 */
melt_assertmsg ("putclosrout#40 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1354*/ meltfptr[1353])) ==
+ ( /*_.VALCLO___V1357*/ meltfptr[1356])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#40 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1353*/ meltfptr[1352]))
+ ( /*_.VALROUT___V1356*/ meltfptr[1355]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1354*/ meltfptr[1353])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1353*/ meltfptr[1352]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1357*/ meltfptr[1356])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1356*/ meltfptr[1355]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1354*/ meltfptr[1353]);
+ meltgc_touch ( /*_.VALCLO___V1357*/ meltfptr[1356]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1206__COMPILETREC_LAMBDA#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
@@ -67272,14 +67629,14 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1206__COMPILETREC_LAMBDA#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/
meltfptr[74]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/
meltfptr[74]);
@@ -67288,26 +67645,26 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1206__COMPILETREC_LAMBDA#3",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/
meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
@@ -67315,24 +67672,24 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1206__COMPILETREC_LAMBDA#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
@@ -67340,131 +67697,131 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V852*/ meltfptr[851]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]);
+ NULL != /*_.VALDATA___V855*/ meltfptr[854]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V866*/ meltfptr[865]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ NULL != /*_.VALDATA___V869*/ meltfptr[868]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1206__COMPILETREC_LAMBDA#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1358*/ meltfptr[1357])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2151:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1355*/ meltfptr[1354]);
+ meltgc_touch ( /*_.VALROUT___V1358*/ meltfptr[1357]);
/*putclosurout#41 */
melt_assertmsg ("putclosrout#41 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1356*/ meltfptr[1355])) ==
+ ( /*_.VALCLO___V1359*/ meltfptr[1358])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#41 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ ( /*_.VALROUT___V1358*/ meltfptr[1357]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1356*/ meltfptr[1355])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1355*/ meltfptr[1354]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1359*/ meltfptr[1358])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1358*/ meltfptr[1357]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1356*/ meltfptr[1355]);
+ meltgc_touch ( /*_.VALCLO___V1359*/ meltfptr[1358]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1357*/ meltfptr[1356]))
+ ( /*_.VALDATA___V1360*/ meltfptr[1359]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1357*/
- meltfptr[1356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]))->
+ ( /*_.VALDATA___V1360*/
+ meltfptr[1359]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1358*/ meltfptr[1357]);
+ /*_.VALSTR___V1361*/ meltfptr[1360]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1357*/ meltfptr[1356]);
+ meltgc_touch ( /*_.VALDATA___V1360*/ meltfptr[1359]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1359*/ meltfptr[1358]))
+ ( /*_.VALDATA___V1362*/ meltfptr[1361]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1359*/
- meltfptr[1358]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]))->
+ ( /*_.VALDATA___V1362*/
+ meltfptr[1361]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1360*/ meltfptr[1359]);
+ /*_.VALSTR___V1363*/ meltfptr[1362]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1359*/ meltfptr[1358]);
+ meltgc_touch ( /*_.VALDATA___V1362*/ meltfptr[1361]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1212__COMPILETREC_TUPLE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
@@ -67472,14 +67829,14 @@ warmelt_genobj_initialmeltchunk_19 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1212__COMPILETREC_TUPLE#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/
meltfptr[76]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/
meltfptr[76]);
@@ -67499,26 +67856,26 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1212__COMPILETREC_TUPLE#3",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/
meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
@@ -67526,24 +67883,24 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1212__COMPILETREC_TUPLE#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
@@ -67551,24 +67908,24 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V750*/ meltfptr[749]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]);
+ NULL != /*_.VALDATA___V753*/ meltfptr[752]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1212__COMPILETREC_TUPLE#7",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
@@ -67576,75 +67933,75 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1364*/ meltfptr[1363])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2210:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1361*/ meltfptr[1360]);
+ meltgc_touch ( /*_.VALROUT___V1364*/ meltfptr[1363]);
/*putclosurout#42 */
melt_assertmsg ("putclosrout#42 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1362*/ meltfptr[1361])) ==
+ ( /*_.VALCLO___V1365*/ meltfptr[1364])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#42 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1361*/ meltfptr[1360]))
+ ( /*_.VALROUT___V1364*/ meltfptr[1363]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1362*/ meltfptr[1361])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1361*/ meltfptr[1360]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1365*/ meltfptr[1364])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1364*/ meltfptr[1363]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1362*/ meltfptr[1361]);
+ meltgc_touch ( /*_.VALCLO___V1365*/ meltfptr[1364]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1363*/ meltfptr[1362]))
+ ( /*_.VALDATA___V1366*/ meltfptr[1365]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1363*/
- meltfptr[1362]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]))->
+ ( /*_.VALDATA___V1366*/
+ meltfptr[1365]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1364*/ meltfptr[1363]);
+ /*_.VALSTR___V1367*/ meltfptr[1366]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1363*/ meltfptr[1362]);
+ meltgc_touch ( /*_.VALDATA___V1366*/ meltfptr[1365]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1216__COMPILETREC_PAIR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
@@ -67652,14 +68009,14 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1216__COMPILETREC_PAIR#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/
meltfptr[77]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/
meltfptr[77]);
@@ -67668,26 +68025,26 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1216__COMPILETREC_PAIR#3",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/
meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
@@ -67695,12 +68052,12 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1216__COMPILETREC_PAIR#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
@@ -67708,111 +68065,111 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V778*/ meltfptr[777]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]);
+ NULL != /*_.VALDATA___V781*/ meltfptr[780]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V788*/ meltfptr[787]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]);
+ NULL != /*_.VALDATA___V791*/ meltfptr[790]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2253:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1365*/ meltfptr[1364]);
+ meltgc_touch ( /*_.VALROUT___V1368*/ meltfptr[1367]);
/*putclosurout#43 */
melt_assertmsg ("putclosrout#43 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1366*/ meltfptr[1365])) ==
+ ( /*_.VALCLO___V1369*/ meltfptr[1368])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#43 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1365*/ meltfptr[1364]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1366*/ meltfptr[1365])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1369*/ meltfptr[1368])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1368*/ meltfptr[1367]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1366*/ meltfptr[1365]);
+ meltgc_touch ( /*_.VALCLO___V1369*/ meltfptr[1368]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/ meltfptr[1366]))
+ ( /*_.VALDATA___V1370*/ meltfptr[1369]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/
- meltfptr[1366]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1367*/ meltfptr[1366]))->
+ ( /*_.VALDATA___V1370*/
+ meltfptr[1369]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1368*/ meltfptr[1367]);
+ /*_.VALSTR___V1371*/ meltfptr[1370]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1367*/ meltfptr[1366]);
+ meltgc_touch ( /*_.VALDATA___V1370*/ meltfptr[1369]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1220__COMPILETREC_LIST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
@@ -67820,14 +68177,14 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1220__COMPILETREC_LIST#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/
meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/
meltfptr[78]);
@@ -67836,26 +68193,26 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1220__COMPILETREC_LIST#3",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/
meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
@@ -67863,12 +68220,12 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1220__COMPILETREC_LIST#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
@@ -67876,100 +68233,100 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V798*/ meltfptr[797]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
+ NULL != /*_.VALDATA___V801*/ meltfptr[800]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1372*/ meltfptr[1371])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2293:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1369*/ meltfptr[1368]);
+ meltgc_touch ( /*_.VALROUT___V1372*/ meltfptr[1371]);
/*putclosurout#44 */
melt_assertmsg ("putclosrout#44 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1370*/ meltfptr[1369])) ==
+ ( /*_.VALCLO___V1373*/ meltfptr[1372])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#44 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1369*/ meltfptr[1368]))
+ ( /*_.VALROUT___V1372*/ meltfptr[1371]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1370*/ meltfptr[1369])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1369*/ meltfptr[1368]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1373*/ meltfptr[1372])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1372*/ meltfptr[1371]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1370*/ meltfptr[1369]);
+ meltgc_touch ( /*_.VALCLO___V1373*/ meltfptr[1372]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/ meltfptr[1370]))
+ ( /*_.VALDATA___V1374*/ meltfptr[1373]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/
- meltfptr[1370]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]))->
+ ( /*_.VALDATA___V1374*/
+ meltfptr[1373]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1372*/ meltfptr[1371]);
+ /*_.VALSTR___V1375*/ meltfptr[1374]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1371*/ meltfptr[1370]);
+ meltgc_touch ( /*_.VALDATA___V1374*/ meltfptr[1373]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -67977,14 +68334,14 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/ meltfptr[79]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/
meltfptr[79]);
@@ -67993,25 +68350,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#3",
NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V76*/ meltfptr[75]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -68019,25 +68376,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#5",
NULL != ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -68045,13 +68402,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#6",
NULL != ( /*_.CLASS_CLASS_BINDING__V82*/ meltfptr[81]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V82*/ meltfptr[81]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -68059,13 +68416,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#7",
NULL != ( /*_.CLASS_CLASS__V83*/ meltfptr[82]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V83*/ meltfptr[82]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -68073,13 +68430,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#8",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[8] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
@@ -68087,159 +68444,159 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1224__COMPILETREC_INSTANCE#12",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1376*/ meltfptr[1375])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2334:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1373*/ meltfptr[1372]);
+ meltgc_touch ( /*_.VALROUT___V1376*/ meltfptr[1375]);
/*putclosurout#45 */
melt_assertmsg ("putclosrout#45 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1374*/ meltfptr[1373])) ==
+ ( /*_.VALCLO___V1377*/ meltfptr[1376])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#45 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1373*/ meltfptr[1372]))
+ ( /*_.VALROUT___V1376*/ meltfptr[1375]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1374*/ meltfptr[1373])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1377*/ meltfptr[1376])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1376*/ meltfptr[1375]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1374*/ meltfptr[1373]);
+ meltgc_touch ( /*_.VALCLO___V1377*/ meltfptr[1376]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/ meltfptr[1374]))
+ ( /*_.VALDATA___V1378*/ meltfptr[1377]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/
- meltfptr[1374]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]))->
+ ( /*_.VALDATA___V1378*/
+ meltfptr[1377]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1376*/ meltfptr[1375]);
+ /*_.VALSTR___V1379*/ meltfptr[1378]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1375*/ meltfptr[1374]);
+ meltgc_touch ( /*_.VALDATA___V1378*/ meltfptr[1377]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/ meltfptr[1376]))
+ ( /*_.VALDATA___V1380*/ meltfptr[1379]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/
- meltfptr[1376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]))->
+ ( /*_.VALDATA___V1380*/
+ meltfptr[1379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1378*/ meltfptr[1377]);
+ /*_.VALSTR___V1381*/ meltfptr[1380]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1377*/ meltfptr[1376]);
+ meltgc_touch ( /*_.VALDATA___V1380*/ meltfptr[1379]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/ meltfptr[1378]))
+ ( /*_.VALDATA___V1382*/ meltfptr[1381]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/
- meltfptr[1378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))->
+ ( /*_.VALDATA___V1382*/
+ meltfptr[1381]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1380*/ meltfptr[1379]);
+ /*_.VALSTR___V1383*/ meltfptr[1382]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1379*/ meltfptr[1378]);
+ meltgc_touch ( /*_.VALDATA___V1382*/ meltfptr[1381]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/ meltfptr[1380]))
+ ( /*_.VALDATA___V1384*/ meltfptr[1383]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/
- meltfptr[1380]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]))->
+ ( /*_.VALDATA___V1384*/
+ meltfptr[1383]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1382*/ meltfptr[1381]);
+ /*_.VALSTR___V1385*/ meltfptr[1384]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1381*/ meltfptr[1380]);
+ meltgc_touch ( /*_.VALDATA___V1384*/ meltfptr[1383]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68247,13 +68604,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#1",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68261,13 +68618,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68275,13 +68632,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#3",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68289,13 +68646,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68303,25 +68660,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#6",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68329,13 +68686,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#7",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68343,25 +68700,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V458*/ meltfptr[457]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]);
+ NULL != /*_.VALDATA___V461*/ meltfptr[460]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#9",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68369,25 +68726,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[10] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#11",
NULL != ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68395,13 +68752,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#12",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[12] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68409,25 +68766,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#14",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[14] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68435,13 +68792,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#15",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68449,73 +68806,73 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1351*/ meltfptr[1350]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[20] =
- (melt_ptr_t) ( /*_.VALDATA___V1351*/ meltfptr[1350]);
+ NULL != /*_.VALDATA___V1354*/ meltfptr[1353]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1234__COMPILOBJ_NREP_LETREC#21",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[21] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
@@ -68523,83 +68880,83 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1259*/ meltfptr[1258]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[22] =
- (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ NULL != /*_.VALCLO___V1262*/ meltfptr[1261]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALCLO___V1262*/ meltfptr[1261]);
MELT_LOCATION ("warmelt-genobj.melt:2389:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1383*/ meltfptr[1382]);
+ meltgc_touch ( /*_.VALROUT___V1386*/ meltfptr[1385]);
/*putclosurout#46 */
melt_assertmsg ("putclosrout#46 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1384*/ meltfptr[1383])) ==
+ ( /*_.VALCLO___V1387*/ meltfptr[1386])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#46 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1383*/ meltfptr[1382]))
+ ( /*_.VALROUT___V1386*/ meltfptr[1385]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1384*/ meltfptr[1383])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1387*/ meltfptr[1386])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1386*/ meltfptr[1385]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1384*/ meltfptr[1383]);
+ meltgc_touch ( /*_.VALCLO___V1387*/ meltfptr[1386]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/ meltfptr[1384]))
+ ( /*_.VALDATA___V1388*/ meltfptr[1387]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/
- meltfptr[1384]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384]))->
+ ( /*_.VALDATA___V1388*/
+ meltfptr[1387]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1386*/ meltfptr[1385]);
+ /*_.VALSTR___V1389*/ meltfptr[1388]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1385*/ meltfptr[1384]);
+ meltgc_touch ( /*_.VALDATA___V1388*/ meltfptr[1387]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/ meltfptr[1386]))
+ ( /*_.VALDATA___V1390*/ meltfptr[1389]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/
- meltfptr[1386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))->
+ ( /*_.VALDATA___V1390*/
+ meltfptr[1389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1388*/ meltfptr[1387]);
+ /*_.VALSTR___V1391*/ meltfptr[1390]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1387*/ meltfptr[1386]);
+ meltgc_touch ( /*_.VALDATA___V1390*/ meltfptr[1389]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#0",
NULL != ( /*_.CLASS_NREP_CITERATION__V86*/ meltfptr[85]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_CITERATION__V86*/ meltfptr[85]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68607,13 +68964,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68621,13 +68978,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68635,13 +68992,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#3",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68649,13 +69006,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#4",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68663,25 +69020,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#6",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68689,25 +69046,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V564*/ meltfptr[563]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]);
+ NULL != /*_.VALDATA___V567*/ meltfptr[566]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#8",
NULL != ( /*_.CLASS_CITERATOR__V87*/ meltfptr[86]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_CITERATOR__V87*/ meltfptr[86]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68715,13 +69072,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#9",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[9] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68729,13 +69086,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#10",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[10] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68743,13 +69100,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#11",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68757,25 +69114,25 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[12] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#13",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[13] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68783,24 +69140,24 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1390*/ meltfptr[1389]))
+ ( /*_.VALROUT___V1393*/ meltfptr[1392]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1246__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1390*/ meltfptr[1389])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
@@ -68808,13 +69165,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1390*/ meltfptr[1389]))
+ ( /*_.VALROUT___V1393*/ meltfptr[1392]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1246__LAMBDA_#1",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1390*/ meltfptr[1389])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
@@ -68822,24 +69179,24 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1390*/ meltfptr[1389]))
+ ( /*_.VALROUT___V1393*/ meltfptr[1392]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1390*/ meltfptr[1389])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1390*/ meltfptr[1389]))
+ ( /*_.VALROUT___V1393*/ meltfptr[1392]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1246__LAMBDA_#3",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1390*/ meltfptr[1389])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
@@ -68847,44 +69204,44 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1390*/ meltfptr[1389]))
+ ( /*_.VALROUT___V1393*/ meltfptr[1392]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1390*/ meltfptr[1389])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2642:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1390*/ meltfptr[1389]);
+ meltgc_touch ( /*_.VALROUT___V1393*/ meltfptr[1392]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#15",
- NULL != ( /*_.VALROUT___V1390*/ meltfptr[1389]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[15] =
- (melt_ptr_t) ( /*_.VALROUT___V1390*/ meltfptr[1389]);
+ NULL != ( /*_.VALROUT___V1393*/ meltfptr[1392]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALROUT___V1393*/ meltfptr[1392]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#16",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[16] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68892,13 +69249,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#17",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[17] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68906,13 +69263,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#18",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[18] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -68920,13 +69277,13 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#19",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[19] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk");
@@ -68934,45 +69291,45 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1391*/ meltfptr[1390]))
+ ( /*_.VALROUT___V1394*/ meltfptr[1393]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1247__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1394*/ meltfptr[1393])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1391*/ meltfptr[1390]);
+ meltgc_touch ( /*_.VALROUT___V1394*/ meltfptr[1393]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#20",
- NULL != ( /*_.VALROUT___V1391*/ meltfptr[1390]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[20] =
- (melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390]);
+ NULL != ( /*_.VALROUT___V1394*/ meltfptr[1393]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALROUT___V1394*/ meltfptr[1393]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#21",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[21] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2687:/ initchunk");
@@ -68980,18 +69337,18 @@ warmelt_genobj_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1392*/ meltfptr[1391]))
+ ( /*_.VALROUT___V1395*/ meltfptr[1394]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1248__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2687:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1392*/ meltfptr[1391]);
+ meltgc_touch ( /*_.VALROUT___V1395*/ meltfptr[1394]);
#undef meltfram__
@@ -69009,27 +69366,27 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#22",
- NULL != ( /*_.VALROUT___V1392*/ meltfptr[1391]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[22] =
- (melt_ptr_t) ( /*_.VALROUT___V1392*/ meltfptr[1391]);
+ NULL != ( /*_.VALROUT___V1395*/ meltfptr[1394]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALROUT___V1395*/ meltfptr[1394]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#23",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[23] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[23] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -69037,13 +69394,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#24",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[24] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -69051,25 +69408,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[25] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#26",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[26] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -69077,25 +69434,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#28",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[28] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
@@ -69103,25 +69460,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[29] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1249__LAMBDA_#0",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
@@ -69129,24 +69486,24 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1249__LAMBDA_#2",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[2] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
@@ -69154,24 +69511,24 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1249__LAMBDA_#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
@@ -69179,44 +69536,44 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1396*/ meltfptr[1395]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1396*/ meltfptr[1395])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2701:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1393*/ meltfptr[1392]);
+ meltgc_touch ( /*_.VALROUT___V1396*/ meltfptr[1395]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#30",
- NULL != ( /*_.VALROUT___V1393*/ meltfptr[1392]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[30] =
- (melt_ptr_t) ( /*_.VALROUT___V1393*/ meltfptr[1392]);
+ NULL != ( /*_.VALROUT___V1396*/ meltfptr[1395]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[30] =
+ (melt_ptr_t) ( /*_.VALROUT___V1396*/ meltfptr[1395]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#31",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[31] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2732:/ initchunk");
@@ -69224,102 +69581,102 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1394*/ meltfptr[1393]))
+ ( /*_.VALROUT___V1397*/ meltfptr[1396]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1250__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1394*/ meltfptr[1393])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1397*/ meltfptr[1396])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2732:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1394*/ meltfptr[1393]);
+ meltgc_touch ( /*_.VALROUT___V1397*/ meltfptr[1396]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1240__COMPILOBJ_NREP_CITERATION#32",
- NULL != ( /*_.VALROUT___V1394*/ meltfptr[1393]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1389*/ meltfptr[1388])->tabval[32] =
- (melt_ptr_t) ( /*_.VALROUT___V1394*/ meltfptr[1393]);
+ NULL != ( /*_.VALROUT___V1397*/ meltfptr[1396]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1392*/ meltfptr[1391])->tabval[32] =
+ (melt_ptr_t) ( /*_.VALROUT___V1397*/ meltfptr[1396]);
MELT_LOCATION ("warmelt-genobj.melt:2603:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1389*/ meltfptr[1388]);
+ meltgc_touch ( /*_.VALROUT___V1392*/ meltfptr[1391]);
/*putclosurout#47 */
melt_assertmsg ("putclosrout#47 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1395*/ meltfptr[1394])) ==
+ ( /*_.VALCLO___V1398*/ meltfptr[1397])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#47 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1389*/ meltfptr[1388]))
+ ( /*_.VALROUT___V1392*/ meltfptr[1391]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1395*/ meltfptr[1394])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1389*/ meltfptr[1388]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1398*/ meltfptr[1397])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1392*/ meltfptr[1391]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1395*/ meltfptr[1394]);
+ meltgc_touch ( /*_.VALCLO___V1398*/ meltfptr[1397]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1396*/ meltfptr[1395]))
+ ( /*_.VALDATA___V1399*/ meltfptr[1398]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1396*/
- meltfptr[1395]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]))->
+ ( /*_.VALDATA___V1399*/
+ meltfptr[1398]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1397*/ meltfptr[1396]);
+ /*_.VALSTR___V1400*/ meltfptr[1399]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1396*/ meltfptr[1395]);
+ meltgc_touch ( /*_.VALDATA___V1399*/ meltfptr[1398]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1398*/ meltfptr[1397]))
+ ( /*_.VALDATA___V1401*/ meltfptr[1400]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1398*/
- meltfptr[1397]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]))->
+ ( /*_.VALDATA___V1401*/
+ meltfptr[1400]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1399*/ meltfptr[1398]);
+ /*_.VALSTR___V1402*/ meltfptr[1401]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1398*/ meltfptr[1397]);
+ meltgc_touch ( /*_.VALDATA___V1401*/ meltfptr[1400]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_SETQ#0",
NULL != ( /*_.CLASS_NREP_SETQ__V88*/ meltfptr[87]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V88*/ meltfptr[87]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
@@ -69327,13 +69684,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_SETQ#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
@@ -69341,12 +69698,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_SETQ#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
@@ -69354,12 +69711,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_SETQ#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
@@ -69367,76 +69724,76 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1400*/ meltfptr[1399])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:2745:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1400*/ meltfptr[1399]);
+ meltgc_touch ( /*_.VALROUT___V1403*/ meltfptr[1402]);
/*putclosurout#48 */
melt_assertmsg ("putclosrout#48 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1401*/ meltfptr[1400])) ==
+ ( /*_.VALCLO___V1404*/ meltfptr[1403])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#48 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1400*/ meltfptr[1399]))
+ ( /*_.VALROUT___V1403*/ meltfptr[1402]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1401*/ meltfptr[1400])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1400*/ meltfptr[1399]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1404*/ meltfptr[1403])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1401*/ meltfptr[1400]);
+ meltgc_touch ( /*_.VALCLO___V1404*/ meltfptr[1403]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1402*/ meltfptr[1401]))
+ ( /*_.VALDATA___V1405*/ meltfptr[1404]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1402*/
- meltfptr[1401]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]))->
+ ( /*_.VALDATA___V1405*/
+ meltfptr[1404]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1403*/ meltfptr[1402]);
+ /*_.VALSTR___V1406*/ meltfptr[1405]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1402*/ meltfptr[1401]);
+ meltgc_touch ( /*_.VALDATA___V1405*/ meltfptr[1404]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
@@ -69444,13 +69801,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#1",
NULL != ( /*_.CLASS_NREP_PROGN__V89*/ meltfptr[88]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V89*/ meltfptr[88]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
@@ -69458,13 +69815,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
@@ -69472,13 +69829,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
@@ -69486,25 +69843,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#5",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[5] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
@@ -69512,13 +69869,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#6",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[6] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2785:/ initchunk");
@@ -69526,98 +69883,98 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1408*/ meltfptr[1407]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1259__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1408*/ meltfptr[1407])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2785:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1405*/ meltfptr[1404]);
+ meltgc_touch ( /*_.VALROUT___V1408*/ meltfptr[1407]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#7",
- NULL != ( /*_.VALROUT___V1405*/ meltfptr[1404]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1405*/ meltfptr[1404]);
+ NULL != ( /*_.VALROUT___V1408*/ meltfptr[1407]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1408*/ meltfptr[1407]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1255__COMPILOBJ_NREP_PROGN#8",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1404*/ meltfptr[1403])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[8] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2769:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1404*/ meltfptr[1403]);
+ meltgc_touch ( /*_.VALROUT___V1407*/ meltfptr[1406]);
/*putclosurout#49 */
melt_assertmsg ("putclosrout#49 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1406*/ meltfptr[1405])) ==
+ ( /*_.VALCLO___V1409*/ meltfptr[1408])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#49 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1404*/ meltfptr[1403]))
+ ( /*_.VALROUT___V1407*/ meltfptr[1406]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1406*/ meltfptr[1405])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1404*/ meltfptr[1403]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1409*/ meltfptr[1408])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1406*/ meltfptr[1405]);
+ meltgc_touch ( /*_.VALCLO___V1409*/ meltfptr[1408]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1407*/ meltfptr[1406]))
+ ( /*_.VALDATA___V1410*/ meltfptr[1409]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1407*/
- meltfptr[1406]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1407*/ meltfptr[1406]))->
+ ( /*_.VALDATA___V1410*/
+ meltfptr[1409]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1408*/ meltfptr[1407]);
+ /*_.VALSTR___V1411*/ meltfptr[1410]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1407*/ meltfptr[1406]);
+ meltgc_touch ( /*_.VALDATA___V1410*/ meltfptr[1409]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#0",
NULL != ( /*_.CLASS_NREP_MULTACC__V90*/ meltfptr[89]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_MULTACC__V90*/ meltfptr[89]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69625,13 +69982,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69639,13 +69996,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69653,13 +70010,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69667,13 +70024,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69681,25 +70038,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#6",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
@@ -69707,13 +70064,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#7",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[7] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2808:/ initchunk");
@@ -69721,12 +70078,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1413*/ meltfptr[1412]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1264__LAMBDA_#0",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1413*/ meltfptr[1412])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2808:/ initchunk");
@@ -69734,24 +70091,24 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1413*/ meltfptr[1412]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1413*/ meltfptr[1412])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:2808:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1413*/ meltfptr[1412]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1264__LAMBDA_#2",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1413*/ meltfptr[1412])->tabval[2] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:2808:/ initchunk");
@@ -69759,96 +70116,96 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1413*/ meltfptr[1412]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1264__LAMBDA_#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1413*/ meltfptr[1412])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2808:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1410*/ meltfptr[1409]);
+ meltgc_touch ( /*_.VALROUT___V1413*/ meltfptr[1412]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1260__COMPILOBJ_NREP_MULTACC#8",
- NULL != ( /*_.VALROUT___V1410*/ meltfptr[1409]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[8] =
- (melt_ptr_t) ( /*_.VALROUT___V1410*/ meltfptr[1409]);
+ NULL != ( /*_.VALROUT___V1413*/ meltfptr[1412]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALROUT___V1413*/ meltfptr[1412]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V270*/ meltfptr[269]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]);
+ NULL != /*_.VALDATA___V273*/ meltfptr[272]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]);
MELT_LOCATION ("warmelt-genobj.melt:2797:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1409*/ meltfptr[1408]);
+ meltgc_touch ( /*_.VALROUT___V1412*/ meltfptr[1411]);
/*putclosurout#50 */
melt_assertmsg ("putclosrout#50 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1411*/ meltfptr[1410])) ==
+ ( /*_.VALCLO___V1414*/ meltfptr[1413])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#50 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1411*/ meltfptr[1410])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1409*/ meltfptr[1408]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1414*/ meltfptr[1413])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1411*/ meltfptr[1410]);
+ meltgc_touch ( /*_.VALCLO___V1414*/ meltfptr[1413]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1412*/ meltfptr[1411]))
+ ( /*_.VALDATA___V1415*/ meltfptr[1414]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1412*/
- meltfptr[1411]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]))->
+ ( /*_.VALDATA___V1415*/
+ meltfptr[1414]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1413*/ meltfptr[1412]);
+ /*_.VALSTR___V1416*/ meltfptr[1415]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1412*/ meltfptr[1411]);
+ meltgc_touch ( /*_.VALDATA___V1415*/ meltfptr[1414]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#0",
NULL != ( /*_.CLASS_NREP_FIELDACC__V91*/ meltfptr[90]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDACC__V91*/ meltfptr[90]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69856,13 +70213,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69870,13 +70227,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69884,13 +70241,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#3",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69898,13 +70255,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69912,13 +70269,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#5",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69926,25 +70283,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#7",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[7] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -69952,13 +70309,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#8",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[8] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2861:/ initchunk");
@@ -69966,12 +70323,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1415*/ meltfptr[1414]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1269__LAMBDA_#0",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1415*/ meltfptr[1414])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-genobj.melt:2861:/ initchunk");
@@ -69979,24 +70336,24 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1415*/ meltfptr[1414]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1415*/ meltfptr[1414])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
MELT_LOCATION ("warmelt-genobj.melt:2861:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1415*/ meltfptr[1414]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1269__LAMBDA_#2",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1415*/ meltfptr[1414])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[2] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:2861:/ initchunk");
@@ -70004,45 +70361,45 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1415*/ meltfptr[1414]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1269__LAMBDA_#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1415*/ meltfptr[1414])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2861:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1415*/ meltfptr[1414]);
+ meltgc_touch ( /*_.VALROUT___V1418*/ meltfptr[1417]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#9",
- NULL != ( /*_.VALROUT___V1415*/ meltfptr[1414]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V1415*/ meltfptr[1414]);
+ NULL != ( /*_.VALROUT___V1418*/ meltfptr[1417]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V1418*/ meltfptr[1417]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#10",
NULL != ( /*_.CLASS_FIELD__V92*/ meltfptr[91]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -70050,25 +70407,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#12",
NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
@@ -70076,104 +70433,104 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1265__COMPILOBJ_NREP_FIELDACC#13",
NULL != ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]);
MELT_LOCATION ("warmelt-genobj.melt:2848:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1414*/ meltfptr[1413]);
+ meltgc_touch ( /*_.VALROUT___V1417*/ meltfptr[1416]);
/*putclosurout#51 */
melt_assertmsg ("putclosrout#51 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1416*/ meltfptr[1415])) ==
+ ( /*_.VALCLO___V1419*/ meltfptr[1418])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#51 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1414*/ meltfptr[1413]))
+ ( /*_.VALROUT___V1417*/ meltfptr[1416]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1416*/ meltfptr[1415])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1414*/ meltfptr[1413]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1419*/ meltfptr[1418])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1417*/ meltfptr[1416]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1416*/ meltfptr[1415]);
+ meltgc_touch ( /*_.VALCLO___V1419*/ meltfptr[1418]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1417*/ meltfptr[1416]))
+ ( /*_.VALDATA___V1420*/ meltfptr[1419]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1417*/
- meltfptr[1416]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416]))->
+ ( /*_.VALDATA___V1420*/
+ meltfptr[1419]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1418*/ meltfptr[1417]);
+ /*_.VALSTR___V1421*/ meltfptr[1420]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1417*/ meltfptr[1416]);
+ meltgc_touch ( /*_.VALDATA___V1420*/ meltfptr[1419]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1419*/ meltfptr[1418]))
+ ( /*_.VALDATA___V1422*/ meltfptr[1421]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1419*/
- meltfptr[1418]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]))->
+ ( /*_.VALDATA___V1422*/
+ meltfptr[1421]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1420*/ meltfptr[1419]);
+ /*_.VALSTR___V1423*/ meltfptr[1422]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1419*/ meltfptr[1418]);
+ meltgc_touch ( /*_.VALDATA___V1422*/ meltfptr[1421]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1421*/ meltfptr[1420]))
+ ( /*_.VALDATA___V1424*/ meltfptr[1423]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1421*/
- meltfptr[1420]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420]))->
+ ( /*_.VALDATA___V1424*/
+ meltfptr[1423]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1422*/ meltfptr[1421]);
+ /*_.VALSTR___V1425*/ meltfptr[1424]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1421*/ meltfptr[1420]);
+ meltgc_touch ( /*_.VALDATA___V1424*/ meltfptr[1423]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD#0",
NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
@@ -70181,13 +70538,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
@@ -70195,13 +70552,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
@@ -70209,13 +70566,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
@@ -70223,13 +70580,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1274__COMPILOBJ_NREP_UNSAFE_GET_FIELD#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
@@ -70237,64 +70594,64 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V838*/ meltfptr[837]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1423*/ meltfptr[1422])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]);
+ NULL != /*_.VALDATA___V841*/ meltfptr[840]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1426*/ meltfptr[1425])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]);
MELT_LOCATION ("warmelt-genobj.melt:2902:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1423*/ meltfptr[1422]);
+ meltgc_touch ( /*_.VALROUT___V1426*/ meltfptr[1425]);
/*putclosurout#52 */
melt_assertmsg ("putclosrout#52 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1424*/ meltfptr[1423])) ==
+ ( /*_.VALCLO___V1427*/ meltfptr[1426])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#52 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1423*/ meltfptr[1422]))
+ ( /*_.VALROUT___V1426*/ meltfptr[1425]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1424*/ meltfptr[1423])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1423*/ meltfptr[1422]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1427*/ meltfptr[1426])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1426*/ meltfptr[1425]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1424*/ meltfptr[1423]);
+ meltgc_touch ( /*_.VALCLO___V1427*/ meltfptr[1426]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1425*/ meltfptr[1424]))
+ ( /*_.VALDATA___V1428*/ meltfptr[1427]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1425*/
- meltfptr[1424]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1425*/ meltfptr[1424]))->
+ ( /*_.VALDATA___V1428*/
+ meltfptr[1427]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1428*/ meltfptr[1427]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1426*/ meltfptr[1425]);
+ /*_.VALSTR___V1429*/ meltfptr[1428]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1425*/ meltfptr[1424]);
+ meltgc_touch ( /*_.VALDATA___V1428*/ meltfptr[1427]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#0",
NULL != ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V95*/ meltfptr[94]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70302,13 +70659,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70316,13 +70673,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70330,13 +70687,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70344,25 +70701,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70370,13 +70727,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#6",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[6] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70384,13 +70741,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#7",
NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70398,13 +70755,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#8",
NULL != ( /*_.CLASS_FIELD__V92*/ meltfptr[91]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70412,13 +70769,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#9",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[9] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70426,25 +70783,25 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#11",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
@@ -70452,13 +70809,13 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#12",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
@@ -70466,12 +70823,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1282__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
@@ -70479,12 +70836,12 @@ warmelt_genobj_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1282__LAMBDA_#1",
NULL != ( /*_.CLASS_FIELD__V92*/ meltfptr[91]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]);
@@ -70503,12 +70860,12 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1282__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
@@ -70516,24 +70873,24 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1282__LAMBDA_#4",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
@@ -70541,115 +70898,115 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1282__LAMBDA_#5",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
MELT_LOCATION ("warmelt-genobj.melt:2941:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1428*/ meltfptr[1427]);
+ meltgc_touch ( /*_.VALROUT___V1431*/ meltfptr[1430]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1278__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#13",
- NULL != ( /*_.VALROUT___V1428*/ meltfptr[1427]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[13] =
- (melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427]);
+ NULL != ( /*_.VALROUT___V1431*/ meltfptr[1430]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALROUT___V1431*/ meltfptr[1430]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1427*/ meltfptr[1426])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
MELT_LOCATION ("warmelt-genobj.melt:2924:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1427*/ meltfptr[1426]);
+ meltgc_touch ( /*_.VALROUT___V1430*/ meltfptr[1429]);
/*putclosurout#53 */
melt_assertmsg ("putclosrout#53 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1429*/ meltfptr[1428])) ==
+ ( /*_.VALCLO___V1432*/ meltfptr[1431])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#53 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1427*/ meltfptr[1426]))
+ ( /*_.VALROUT___V1430*/ meltfptr[1429]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1429*/ meltfptr[1428])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1427*/ meltfptr[1426]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1432*/ meltfptr[1431])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1430*/ meltfptr[1429]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1429*/ meltfptr[1428]);
+ meltgc_touch ( /*_.VALCLO___V1432*/ meltfptr[1431]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1430*/ meltfptr[1429]))
+ ( /*_.VALDATA___V1433*/ meltfptr[1432]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1430*/
- meltfptr[1429]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429]))->
+ ( /*_.VALDATA___V1433*/
+ meltfptr[1432]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1431*/ meltfptr[1430]);
+ /*_.VALSTR___V1434*/ meltfptr[1433]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1430*/ meltfptr[1429]);
+ meltgc_touch ( /*_.VALDATA___V1433*/ meltfptr[1432]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1432*/ meltfptr[1431]))
+ ( /*_.VALDATA___V1435*/ meltfptr[1434]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1432*/
- meltfptr[1431]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1432*/ meltfptr[1431]))->
+ ( /*_.VALDATA___V1435*/
+ meltfptr[1434]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1435*/ meltfptr[1434]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1433*/ meltfptr[1432]);
+ /*_.VALSTR___V1436*/ meltfptr[1435]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1432*/ meltfptr[1431]);
+ meltgc_touch ( /*_.VALDATA___V1435*/ meltfptr[1434]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#0",
NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/ meltfptr[96]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1434*/ meltfptr[1433])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/ meltfptr[96]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
@@ -70657,13 +71014,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1434*/ meltfptr[1433])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
@@ -70671,13 +71028,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1434*/ meltfptr[1433])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
@@ -70685,13 +71042,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1285__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1434*/ meltfptr[1433])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
@@ -70699,64 +71056,64 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1051*/ meltfptr[1050]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1434*/ meltfptr[1433])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1051*/ meltfptr[1050]);
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
MELT_LOCATION ("warmelt-genobj.melt:2972:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1434*/ meltfptr[1433]);
+ meltgc_touch ( /*_.VALROUT___V1437*/ meltfptr[1436]);
/*putclosurout#54 */
melt_assertmsg ("putclosrout#54 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1435*/ meltfptr[1434])) ==
+ ( /*_.VALCLO___V1438*/ meltfptr[1437])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#54 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1434*/ meltfptr[1433]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1435*/ meltfptr[1434])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1434*/ meltfptr[1433]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1438*/ meltfptr[1437])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1437*/ meltfptr[1436]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1435*/ meltfptr[1434]);
+ meltgc_touch ( /*_.VALCLO___V1438*/ meltfptr[1437]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1436*/ meltfptr[1435]))
+ ( /*_.VALDATA___V1439*/ meltfptr[1438]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1436*/
- meltfptr[1435]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435]))->
+ ( /*_.VALDATA___V1439*/
+ meltfptr[1438]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1439*/ meltfptr[1438]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1437*/ meltfptr[1436]);
+ /*_.VALSTR___V1440*/ meltfptr[1439]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1436*/ meltfptr[1435]);
+ meltgc_touch ( /*_.VALDATA___V1439*/ meltfptr[1438]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#0",
NULL != ( /*_.CLASS_NREP_APPLY__V98*/ meltfptr[97]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_APPLY__V98*/ meltfptr[97]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70764,13 +71121,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70778,13 +71135,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70792,13 +71149,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70806,13 +71163,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#4",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[4] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70820,13 +71177,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70834,24 +71191,24 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:3002:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1439*/ meltfptr[1438]))
+ ( /*_.VALROUT___V1442*/ meltfptr[1441]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1293__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1439*/ meltfptr[1438])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3002:/ initchunk");
@@ -70859,44 +71216,44 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1439*/ meltfptr[1438]))
+ ( /*_.VALROUT___V1442*/ meltfptr[1441]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1439*/ meltfptr[1438])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:3002:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1439*/ meltfptr[1438]);
+ meltgc_touch ( /*_.VALROUT___V1442*/ meltfptr[1441]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#7",
- NULL != ( /*_.VALROUT___V1439*/ meltfptr[1438]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1439*/ meltfptr[1438]);
+ NULL != ( /*_.VALROUT___V1442*/ meltfptr[1441]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1289__COMPILOBJ_NREP_APPLY#8",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
@@ -70904,64 +71261,64 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V662*/ meltfptr[661]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]);
+ NULL != /*_.VALDATA___V665*/ meltfptr[664]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1441*/ meltfptr[1440])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]);
MELT_LOCATION ("warmelt-genobj.melt:2991:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1438*/ meltfptr[1437]);
+ meltgc_touch ( /*_.VALROUT___V1441*/ meltfptr[1440]);
/*putclosurout#55 */
melt_assertmsg ("putclosrout#55 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1440*/ meltfptr[1439])) ==
+ ( /*_.VALCLO___V1443*/ meltfptr[1442])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#55 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1438*/ meltfptr[1437]))
+ ( /*_.VALROUT___V1441*/ meltfptr[1440]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1440*/ meltfptr[1439])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1443*/ meltfptr[1442])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1441*/ meltfptr[1440]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1440*/ meltfptr[1439]);
+ meltgc_touch ( /*_.VALCLO___V1443*/ meltfptr[1442]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1441*/ meltfptr[1440]))
+ ( /*_.VALDATA___V1444*/ meltfptr[1443]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1441*/
- meltfptr[1440]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1441*/ meltfptr[1440]))->
+ ( /*_.VALDATA___V1444*/
+ meltfptr[1443]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1442*/ meltfptr[1441]);
+ /*_.VALSTR___V1445*/ meltfptr[1444]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1441*/ meltfptr[1440]);
+ meltgc_touch ( /*_.VALDATA___V1444*/ meltfptr[1443]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#0",
NULL != ( /*_.CLASS_NREP_MULTIAPPLY__V99*/ meltfptr[98]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_MULTIAPPLY__V99*/ meltfptr[98]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -70969,13 +71326,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -70983,13 +71340,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -70997,13 +71354,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#3",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[3] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71011,13 +71368,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#4",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71025,25 +71382,25 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#6",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3036:/ initchunk");
@@ -71051,12 +71408,12 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1444*/ meltfptr[1443]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1298__LAMBDA_#0",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1444*/ meltfptr[1443])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:3036:/ initchunk");
@@ -71064,57 +71421,57 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1444*/ meltfptr[1443]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1444*/ meltfptr[1443])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:3036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1444*/ meltfptr[1443]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1298__LAMBDA_#2",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1444*/ meltfptr[1443])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3036:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1444*/ meltfptr[1443]);
+ meltgc_touch ( /*_.VALROUT___V1447*/ meltfptr[1446]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#7",
- NULL != ( /*_.VALROUT___V1444*/ meltfptr[1443]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1444*/ meltfptr[1443]);
+ NULL != ( /*_.VALROUT___V1447*/ meltfptr[1446]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#8",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71122,25 +71479,25 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#10",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71148,13 +71505,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#11",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[11] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71162,13 +71519,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#12",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[12] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3060:/ initchunk");
@@ -71176,57 +71533,57 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1445*/ meltfptr[1444]))
+ ( /*_.VALROUT___V1448*/ meltfptr[1447]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1299__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1445*/ meltfptr[1444])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3060:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1445*/ meltfptr[1444]);
+ meltgc_touch ( /*_.VALROUT___V1448*/ meltfptr[1447]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#13",
- NULL != ( /*_.VALROUT___V1445*/ meltfptr[1444]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[13] =
- (melt_ptr_t) ( /*_.VALROUT___V1445*/ meltfptr[1444]);
+ NULL != ( /*_.VALROUT___V1448*/ meltfptr[1447]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V676*/ meltfptr[675]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]);
+ NULL != /*_.VALDATA___V679*/ meltfptr[678]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#15",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[15] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
@@ -71234,205 +71591,205 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:3074:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1446*/ meltfptr[1445]))
+ ( /*_.VALROUT___V1449*/ meltfptr[1448]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:3074:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1446*/ meltfptr[1445]))
+ ( /*_.VALROUT___V1449*/ meltfptr[1448]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:3074:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1446*/ meltfptr[1445]);
+ meltgc_touch ( /*_.VALROUT___V1449*/ meltfptr[1448]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#18",
- NULL != ( /*_.VALROUT___V1446*/ meltfptr[1445]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[18] =
- (melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445]);
+ NULL != ( /*_.VALROUT___V1449*/ meltfptr[1448]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:3084:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1447*/ meltfptr[1446]))
+ ( /*_.VALROUT___V1450*/ meltfptr[1449]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:3084:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1447*/ meltfptr[1446]);
+ meltgc_touch ( /*_.VALROUT___V1450*/ meltfptr[1449]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#20",
- NULL != ( /*_.VALROUT___V1447*/ meltfptr[1446]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[20] =
- (melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446]);
+ NULL != ( /*_.VALROUT___V1450*/ meltfptr[1449]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[21] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:3095:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1448*/ meltfptr[1447]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:3095:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1448*/ meltfptr[1447]);
+ meltgc_touch ( /*_.VALROUT___V1451*/ meltfptr[1450]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1294__COMPILOBJ_NREP_MULTIAPPLY#22",
- NULL != ( /*_.VALROUT___V1448*/ meltfptr[1447]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[22] =
- (melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447]);
+ NULL != ( /*_.VALROUT___V1451*/ meltfptr[1450]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALROUT___V1451*/ meltfptr[1450]);
MELT_LOCATION ("warmelt-genobj.melt:3022:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1443*/ meltfptr[1442]);
+ meltgc_touch ( /*_.VALROUT___V1446*/ meltfptr[1445]);
/*putclosurout#56 */
melt_assertmsg ("putclosrout#56 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1449*/ meltfptr[1448])) ==
+ ( /*_.VALCLO___V1452*/ meltfptr[1451])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#56 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1443*/ meltfptr[1442]))
+ ( /*_.VALROUT___V1446*/ meltfptr[1445]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1449*/ meltfptr[1448])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1443*/ meltfptr[1442]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1452*/ meltfptr[1451])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1449*/ meltfptr[1448]);
+ meltgc_touch ( /*_.VALCLO___V1452*/ meltfptr[1451]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1450*/ meltfptr[1449]))
+ ( /*_.VALDATA___V1453*/ meltfptr[1452]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1450*/
- meltfptr[1449]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449]))->
+ ( /*_.VALDATA___V1453*/
+ meltfptr[1452]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1453*/ meltfptr[1452]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1451*/ meltfptr[1450]);
+ /*_.VALSTR___V1454*/ meltfptr[1453]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1450*/ meltfptr[1449]);
+ meltgc_touch ( /*_.VALDATA___V1453*/ meltfptr[1452]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#0",
NULL != ( /*_.CLASS_NREP_MSEND__V100*/ meltfptr[99]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_MSEND__V100*/ meltfptr[99]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71440,13 +71797,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71454,13 +71811,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71468,13 +71825,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71482,13 +71839,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#4",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[4] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71496,13 +71853,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#5",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[5] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
@@ -71510,13 +71867,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#6",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[6] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3118:/ initchunk");
@@ -71524,12 +71881,12 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1453*/ meltfptr[1452]))
+ ( /*_.VALROUT___V1456*/ meltfptr[1455]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1307__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1453*/ meltfptr[1452])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3118:/ initchunk");
@@ -71537,110 +71894,110 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1453*/ meltfptr[1452]))
+ ( /*_.VALROUT___V1456*/ meltfptr[1455]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1307__LAMBDA_#1",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1453*/ meltfptr[1452])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[1] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3118:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1453*/ meltfptr[1452]);
+ meltgc_touch ( /*_.VALROUT___V1456*/ meltfptr[1455]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#7",
- NULL != ( /*_.VALROUT___V1453*/ meltfptr[1452]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1453*/ meltfptr[1452]);
+ NULL != ( /*_.VALROUT___V1456*/ meltfptr[1455]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1303__COMPILOBJ_NREP_MSEND#9",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3104:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1452*/ meltfptr[1451]);
+ meltgc_touch ( /*_.VALROUT___V1455*/ meltfptr[1454]);
/*putclosurout#57 */
melt_assertmsg ("putclosrout#57 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1454*/ meltfptr[1453])) ==
+ ( /*_.VALCLO___V1457*/ meltfptr[1456])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#57 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1452*/ meltfptr[1451]))
+ ( /*_.VALROUT___V1455*/ meltfptr[1454]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1454*/ meltfptr[1453])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1457*/ meltfptr[1456])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1454*/ meltfptr[1453]);
+ meltgc_touch ( /*_.VALCLO___V1457*/ meltfptr[1456]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1455*/ meltfptr[1454]))
+ ( /*_.VALDATA___V1458*/ meltfptr[1457]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1455*/
- meltfptr[1454]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1455*/ meltfptr[1454]))->
+ ( /*_.VALDATA___V1458*/
+ meltfptr[1457]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1456*/ meltfptr[1455]);
+ /*_.VALSTR___V1459*/ meltfptr[1458]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1455*/ meltfptr[1454]);
+ meltgc_touch ( /*_.VALDATA___V1458*/ meltfptr[1457]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#0",
NULL != ( /*_.CLASS_NREP_MULTIMSEND__V101*/ meltfptr[100]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_MULTIMSEND__V101*/ meltfptr[100]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71648,13 +72005,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71662,13 +72019,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71676,13 +72033,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#3",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[3] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71690,13 +72047,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#4",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71704,25 +72061,25 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#6",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3159:/ initchunk");
@@ -71730,12 +72087,12 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1458*/ meltfptr[1457]))
+ ( /*_.VALROUT___V1461*/ meltfptr[1460]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1312__LAMBDA_#0",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
MELT_LOCATION ("warmelt-genobj.melt:3159:/ initchunk");
@@ -71743,57 +72100,57 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1458*/ meltfptr[1457]))
+ ( /*_.VALROUT___V1461*/ meltfptr[1460]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
MELT_LOCATION ("warmelt-genobj.melt:3159:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1458*/ meltfptr[1457]))
+ ( /*_.VALROUT___V1461*/ meltfptr[1460]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1312__LAMBDA_#2",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3159:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1458*/ meltfptr[1457]);
+ meltgc_touch ( /*_.VALROUT___V1461*/ meltfptr[1460]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#7",
- NULL != ( /*_.VALROUT___V1458*/ meltfptr[1457]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1458*/ meltfptr[1457]);
+ NULL != ( /*_.VALROUT___V1461*/ meltfptr[1460]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#8",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71801,13 +72158,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#9",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[9] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71815,13 +72172,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#10",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71829,13 +72186,13 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#11",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[11] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3179:/ initchunk");
@@ -71843,93 +72200,93 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1459*/ meltfptr[1458]))
+ ( /*_.VALROUT___V1462*/ meltfptr[1461]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1313__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1459*/ meltfptr[1458])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1462*/ meltfptr[1461])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3179:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1459*/ meltfptr[1458]);
+ meltgc_touch ( /*_.VALROUT___V1462*/ meltfptr[1461]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#12",
- NULL != ( /*_.VALROUT___V1459*/ meltfptr[1458]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[12] =
- (melt_ptr_t) ( /*_.VALROUT___V1459*/ meltfptr[1458]);
+ NULL != ( /*_.VALROUT___V1462*/ meltfptr[1461]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALROUT___V1462*/ meltfptr[1461]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V704*/ meltfptr[703]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]);
+ NULL != /*_.VALDATA___V707*/ meltfptr[706]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V344*/ meltfptr[343]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]);
+ NULL != /*_.VALDATA___V347*/ meltfptr[346]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V164*/ meltfptr[163]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]);
+ NULL != /*_.VALDATA___V167*/ meltfptr[166]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#17",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[17] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
@@ -71937,29 +72294,29 @@ warmelt_genobj_initialmeltchunk_22 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:3211:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1460*/ meltfptr[1459]))
+ ( /*_.VALROUT___V1463*/ meltfptr[1462]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1463*/ meltfptr[1462])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:3211:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1460*/ meltfptr[1459]);
+ meltgc_touch ( /*_.VALROUT___V1463*/ meltfptr[1462]);
#undef meltfram__
@@ -71977,109 +72334,109 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#19",
- NULL != ( /*_.VALROUT___V1460*/ meltfptr[1459]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[19] =
- (melt_ptr_t) ( /*_.VALROUT___V1460*/ meltfptr[1459]);
+ NULL != ( /*_.VALROUT___V1463*/ meltfptr[1462]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALROUT___V1463*/ meltfptr[1462]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[20] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:3221:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1461*/ meltfptr[1460]))
+ ( /*_.VALROUT___V1464*/ meltfptr[1463]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1464*/ meltfptr[1463])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
MELT_LOCATION ("warmelt-genobj.melt:3221:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1461*/ meltfptr[1460]);
+ meltgc_touch ( /*_.VALROUT___V1464*/ meltfptr[1463]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1308__COMPILOBJ_NREP_MULTIMSEND#21",
- NULL != ( /*_.VALROUT___V1461*/ meltfptr[1460]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[21] =
- (melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460]);
+ NULL != ( /*_.VALROUT___V1464*/ meltfptr[1463]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1460*/ meltfptr[1459])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALROUT___V1464*/ meltfptr[1463]);
MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1457*/ meltfptr[1456]);
+ meltgc_touch ( /*_.VALROUT___V1460*/ meltfptr[1459]);
/*putclosurout#58 */
melt_assertmsg ("putclosrout#58 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1462*/ meltfptr[1461])) ==
+ ( /*_.VALCLO___V1465*/ meltfptr[1464])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#58 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1457*/ meltfptr[1456]))
+ ( /*_.VALROUT___V1460*/ meltfptr[1459]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1462*/ meltfptr[1461])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1465*/ meltfptr[1464])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1460*/ meltfptr[1459]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1462*/ meltfptr[1461]);
+ meltgc_touch ( /*_.VALCLO___V1465*/ meltfptr[1464]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1463*/ meltfptr[1462]))
+ ( /*_.VALDATA___V1466*/ meltfptr[1465]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1463*/
- meltfptr[1462]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462]))->
+ ( /*_.VALDATA___V1466*/
+ meltfptr[1465]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1466*/ meltfptr[1465]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1464*/ meltfptr[1463]);
+ /*_.VALSTR___V1467*/ meltfptr[1466]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1463*/ meltfptr[1462]);
+ meltgc_touch ( /*_.VALDATA___V1466*/ meltfptr[1465]);
MELT_LOCATION ("warmelt-genobj.melt:3231:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1465*/ meltfptr[1464]))
+ ( /*_.VALROUT___V1468*/ meltfptr[1467]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1316__COMPILOBJ_ANY_BINDING#0",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1468*/ meltfptr[1467])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
MELT_LOCATION ("warmelt-genobj.melt:3231:/ initchunk");
@@ -72087,13 +72444,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1465*/ meltfptr[1464]))
+ ( /*_.VALROUT___V1468*/ meltfptr[1467]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1316__COMPILOBJ_ANY_BINDING#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1468*/ meltfptr[1467])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3231:/ initchunk");
@@ -72101,47 +72458,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1465*/ meltfptr[1464]))
+ ( /*_.VALROUT___V1468*/ meltfptr[1467]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1316__COMPILOBJ_ANY_BINDING#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1468*/ meltfptr[1467])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3231:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1465*/ meltfptr[1464]);
+ meltgc_touch ( /*_.VALROUT___V1468*/ meltfptr[1467]);
/*putclosurout#59 */
melt_assertmsg ("putclosrout#59 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1466*/ meltfptr[1465])) ==
+ ( /*_.VALCLO___V1469*/ meltfptr[1468])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#59 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1465*/ meltfptr[1464]))
+ ( /*_.VALROUT___V1468*/ meltfptr[1467]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1466*/ meltfptr[1465])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1469*/ meltfptr[1468])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1468*/ meltfptr[1467]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1466*/ meltfptr[1465]);
+ meltgc_touch ( /*_.VALCLO___V1469*/ meltfptr[1468]);
MELT_LOCATION ("warmelt-genobj.melt:3244:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1467*/ meltfptr[1466]))
+ ( /*_.VALROUT___V1470*/ meltfptr[1469]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1318__COMPILOBJ_VALUE_BINDING#0",
NULL != ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1470*/ meltfptr[1469])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]);
MELT_LOCATION ("warmelt-genobj.melt:3244:/ initchunk");
@@ -72149,13 +72506,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1467*/ meltfptr[1466]))
+ ( /*_.VALROUT___V1470*/ meltfptr[1469]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1318__COMPILOBJ_VALUE_BINDING#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1470*/ meltfptr[1469])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
MELT_LOCATION ("warmelt-genobj.melt:3244:/ initchunk");
@@ -72163,13 +72520,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1467*/ meltfptr[1466]))
+ ( /*_.VALROUT___V1470*/ meltfptr[1469]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1318__COMPILOBJ_VALUE_BINDING#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1470*/ meltfptr[1469])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3244:/ initchunk");
@@ -72177,45 +72534,45 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1467*/ meltfptr[1466]))
+ ( /*_.VALROUT___V1470*/ meltfptr[1469]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1470*/ meltfptr[1469])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3244:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1467*/ meltfptr[1466]);
+ meltgc_touch ( /*_.VALROUT___V1470*/ meltfptr[1469]);
/*putclosurout#60 */
melt_assertmsg ("putclosrout#60 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1468*/ meltfptr[1467])) ==
+ ( /*_.VALCLO___V1471*/ meltfptr[1470])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#60 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1467*/ meltfptr[1466]))
+ ( /*_.VALROUT___V1470*/ meltfptr[1469]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1468*/ meltfptr[1467])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1467*/ meltfptr[1466]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1471*/ meltfptr[1470])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1470*/ meltfptr[1469]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1468*/ meltfptr[1467]);
+ meltgc_touch ( /*_.VALCLO___V1471*/ meltfptr[1470]);
MELT_LOCATION ("warmelt-genobj.melt:3260:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1469*/ meltfptr[1468]))
+ ( /*_.VALROUT___V1472*/ meltfptr[1471]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1320__COMPILOBJ_FIXED_BINDING#0",
NULL != ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1469*/ meltfptr[1468])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]);
MELT_LOCATION ("warmelt-genobj.melt:3260:/ initchunk");
@@ -72223,13 +72580,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1469*/ meltfptr[1468]))
+ ( /*_.VALROUT___V1472*/ meltfptr[1471]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1320__COMPILOBJ_FIXED_BINDING#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1469*/ meltfptr[1468])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3260:/ initchunk");
@@ -72237,13 +72594,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1469*/ meltfptr[1468]))
+ ( /*_.VALROUT___V1472*/ meltfptr[1471]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1320__COMPILOBJ_FIXED_BINDING#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1469*/ meltfptr[1468])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3260:/ initchunk");
@@ -72251,47 +72608,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1469*/ meltfptr[1468]))
+ ( /*_.VALROUT___V1472*/ meltfptr[1471]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1320__COMPILOBJ_FIXED_BINDING#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1469*/ meltfptr[1468])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3260:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1469*/ meltfptr[1468]);
+ meltgc_touch ( /*_.VALROUT___V1472*/ meltfptr[1471]);
/*putclosurout#61 */
melt_assertmsg ("putclosrout#61 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1470*/ meltfptr[1469])) ==
+ ( /*_.VALCLO___V1473*/ meltfptr[1472])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#61 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1469*/ meltfptr[1468]))
+ ( /*_.VALROUT___V1472*/ meltfptr[1471]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1470*/ meltfptr[1469])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1469*/ meltfptr[1468]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1473*/ meltfptr[1472])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1470*/ meltfptr[1469]);
+ meltgc_touch ( /*_.VALCLO___V1473*/ meltfptr[1472]);
MELT_LOCATION ("warmelt-genobj.melt:3273:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1471*/ meltfptr[1470]))
+ ( /*_.VALROUT___V1474*/ meltfptr[1473]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1322__COMPILOBJ_NORMAL_LET_BINDING#0",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
MELT_LOCATION ("warmelt-genobj.melt:3273:/ initchunk");
@@ -72299,13 +72656,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1471*/ meltfptr[1470]))
+ ( /*_.VALROUT___V1474*/ meltfptr[1473]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1322__COMPILOBJ_NORMAL_LET_BINDING#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3273:/ initchunk");
@@ -72313,13 +72670,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1471*/ meltfptr[1470]))
+ ( /*_.VALROUT___V1474*/ meltfptr[1473]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1322__COMPILOBJ_NORMAL_LET_BINDING#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3273:/ initchunk");
@@ -72327,48 +72684,48 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1471*/ meltfptr[1470]))
+ ( /*_.VALROUT___V1474*/ meltfptr[1473]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1322__COMPILOBJ_NORMAL_LET_BINDING#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3273:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1471*/ meltfptr[1470]);
+ meltgc_touch ( /*_.VALROUT___V1474*/ meltfptr[1473]);
/*putclosurout#62 */
melt_assertmsg ("putclosrout#62 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1472*/ meltfptr[1471])) ==
+ ( /*_.VALCLO___V1475*/ meltfptr[1474])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#62 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1471*/ meltfptr[1470]))
+ ( /*_.VALROUT___V1474*/ meltfptr[1473]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1472*/ meltfptr[1471])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1475*/ meltfptr[1474])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1474*/ meltfptr[1473]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1472*/ meltfptr[1471]);
+ meltgc_touch ( /*_.VALCLO___V1475*/ meltfptr[1474]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#0",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/ meltfptr[74]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/
meltfptr[74]);
@@ -72377,13 +72734,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72391,13 +72748,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72405,13 +72762,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72419,13 +72776,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72433,13 +72790,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#5",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72447,13 +72804,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#6",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72461,25 +72818,25 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V280*/ meltfptr[279]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]);
+ NULL != /*_.VALDATA___V283*/ meltfptr[282]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
@@ -72487,47 +72844,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1324__COMPILOBJ_CONSLAMBDABIND#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1476*/ meltfptr[1475])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:3289:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1473*/ meltfptr[1472]);
+ meltgc_touch ( /*_.VALROUT___V1476*/ meltfptr[1475]);
/*putclosurout#63 */
melt_assertmsg ("putclosrout#63 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1474*/ meltfptr[1473])) ==
+ ( /*_.VALCLO___V1477*/ meltfptr[1476])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#63 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1473*/ meltfptr[1472]))
+ ( /*_.VALROUT___V1476*/ meltfptr[1475]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1474*/ meltfptr[1473])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1473*/ meltfptr[1472]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1477*/ meltfptr[1476])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1476*/ meltfptr[1475]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1474*/ meltfptr[1473]);
+ meltgc_touch ( /*_.VALCLO___V1477*/ meltfptr[1476]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72535,14 +72892,14 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/ meltfptr[76]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/
meltfptr[76]);
@@ -72551,13 +72908,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72565,13 +72922,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72579,13 +72936,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72593,13 +72950,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#5",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72607,13 +72964,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#6",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72621,13 +72978,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#7",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72635,25 +72992,25 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V270*/ meltfptr[269]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]);
+ NULL != /*_.VALDATA___V273*/ meltfptr[272]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#9",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[9] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
@@ -72661,47 +73018,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1326__COMPILOBJ_CONSTUPLEBIND#10",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1478*/ meltfptr[1477])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:3334:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1475*/ meltfptr[1474]);
+ meltgc_touch ( /*_.VALROUT___V1478*/ meltfptr[1477]);
/*putclosurout#64 */
melt_assertmsg ("putclosrout#64 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1476*/ meltfptr[1475])) ==
+ ( /*_.VALCLO___V1479*/ meltfptr[1478])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#64 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1475*/ meltfptr[1474]))
+ ( /*_.VALROUT___V1478*/ meltfptr[1477]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1476*/ meltfptr[1475])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1479*/ meltfptr[1478])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1478*/ meltfptr[1477]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1476*/ meltfptr[1475]);
+ meltgc_touch ( /*_.VALCLO___V1479*/ meltfptr[1478]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72709,14 +73066,14 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/ meltfptr[77]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/
meltfptr[77]);
@@ -72725,13 +73082,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72739,13 +73096,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#3",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72753,13 +73110,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72767,13 +73124,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#5",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72781,13 +73138,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#6",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V28*/ meltfptr[27]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72795,25 +73152,25 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V306*/ meltfptr[305]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]);
+ NULL != /*_.VALDATA___V309*/ meltfptr[308]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
@@ -72821,47 +73178,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1328__COMPILOBJ_CONSPAIRBIND#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1480*/ meltfptr[1479])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:3378:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1477*/ meltfptr[1476]);
+ meltgc_touch ( /*_.VALROUT___V1480*/ meltfptr[1479]);
/*putclosurout#65 */
melt_assertmsg ("putclosrout#65 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1478*/ meltfptr[1477])) ==
+ ( /*_.VALCLO___V1481*/ meltfptr[1480])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#65 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1477*/ meltfptr[1476]))
+ ( /*_.VALROUT___V1480*/ meltfptr[1479]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1478*/ meltfptr[1477])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1481*/ meltfptr[1480])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1480*/ meltfptr[1479]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1478*/ meltfptr[1477]);
+ meltgc_touch ( /*_.VALCLO___V1481*/ meltfptr[1480]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72869,14 +73226,14 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/
meltfptr[78]);
@@ -72885,13 +73242,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72899,13 +73256,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#3",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72913,13 +73270,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72927,13 +73284,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#5",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72941,25 +73298,25 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V312*/ meltfptr[311]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]);
+ NULL != /*_.VALDATA___V315*/ meltfptr[314]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#7",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[7] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
@@ -72967,47 +73324,47 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1330__COMPILOBJ_CONSLISTBIND#8",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1482*/ meltfptr[1481])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:3417:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1479*/ meltfptr[1478]);
+ meltgc_touch ( /*_.VALROUT___V1482*/ meltfptr[1481]);
/*putclosurout#66 */
melt_assertmsg ("putclosrout#66 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1480*/ meltfptr[1479])) ==
+ ( /*_.VALCLO___V1483*/ meltfptr[1482])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#66 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1479*/ meltfptr[1478]))
+ ( /*_.VALROUT___V1482*/ meltfptr[1481]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1480*/ meltfptr[1479])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1483*/ meltfptr[1482])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1482*/ meltfptr[1481]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1480*/ meltfptr[1479]);
+ meltgc_touch ( /*_.VALCLO___V1483*/ meltfptr[1482]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73015,14 +73372,14 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#1",
NULL !=
( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/ meltfptr[79]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/
meltfptr[79]);
@@ -73031,13 +73388,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73045,13 +73402,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73059,13 +73416,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73073,13 +73430,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#5",
NULL != ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73087,13 +73444,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#6",
NULL != ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V81*/ meltfptr[80]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73101,13 +73458,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#7",
NULL != ( /*_.CLASS_CLASS_BINDING__V82*/ meltfptr[81]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V82*/ meltfptr[81]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73115,25 +73472,25 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#9",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[9] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73141,13 +73498,13 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#10",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
@@ -73155,70 +73512,70 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1332__COMPILOBJ_CONSINSTANCEBIND#11",
NULL != ( /*_.CLASS_CLASS__V83*/ meltfptr[82]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1484*/ meltfptr[1483])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V83*/ meltfptr[82]);
MELT_LOCATION ("warmelt-genobj.melt:3453:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1481*/ meltfptr[1480]);
+ meltgc_touch ( /*_.VALROUT___V1484*/ meltfptr[1483]);
/*putclosurout#67 */
melt_assertmsg ("putclosrout#67 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1482*/ meltfptr[1481])) ==
+ ( /*_.VALCLO___V1485*/ meltfptr[1484])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#67 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1481*/ meltfptr[1480]))
+ ( /*_.VALROUT___V1484*/ meltfptr[1483]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1482*/ meltfptr[1481])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1485*/ meltfptr[1484])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1484*/ meltfptr[1483]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1482*/ meltfptr[1481]);
+ meltgc_touch ( /*_.VALCLO___V1485*/ meltfptr[1484]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V154*/ meltfptr[153]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
+ NULL != /*_.VALDATA___V157*/ meltfptr[156]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1334__PUTOBJDEST_OBJVALUE#2",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[2] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
@@ -73226,12 +73583,12 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1334__PUTOBJDEST_OBJVALUE#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
@@ -73239,36 +73596,36 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1334__PUTOBJDEST_OBJVALUE#6",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
@@ -73276,69 +73633,69 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1334__PUTOBJDEST_OBJVALUE#8",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1483*/ meltfptr[1482])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1486*/ meltfptr[1485])->tabval[8] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3498:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1483*/ meltfptr[1482]);
+ meltgc_touch ( /*_.VALROUT___V1486*/ meltfptr[1485]);
/*putclosurout#68 */
melt_assertmsg ("putclosrout#68 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1484*/ meltfptr[1483])) ==
+ ( /*_.VALCLO___V1487*/ meltfptr[1486])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#68 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1483*/ meltfptr[1482]))
+ ( /*_.VALROUT___V1486*/ meltfptr[1485]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1484*/ meltfptr[1483])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1483*/ meltfptr[1482]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1487*/ meltfptr[1486])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1486*/ meltfptr[1485]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1484*/ meltfptr[1483]);
+ meltgc_touch ( /*_.VALCLO___V1487*/ meltfptr[1486]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1488*/ meltfptr[1487])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1336__PUTOBJDEST_INTEGER#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1488*/ meltfptr[1487])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
@@ -73346,12 +73703,12 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1336__PUTOBJDEST_INTEGER#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1488*/ meltfptr[1487])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
@@ -73359,69 +73716,69 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1488*/ meltfptr[1487])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1336__PUTOBJDEST_INTEGER#4",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1488*/ meltfptr[1487])->tabval[4] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:3562:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1485*/ meltfptr[1484]);
+ meltgc_touch ( /*_.VALROUT___V1488*/ meltfptr[1487]);
/*putclosurout#69 */
melt_assertmsg ("putclosrout#69 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1486*/ meltfptr[1485])) ==
+ ( /*_.VALCLO___V1489*/ meltfptr[1488])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#69 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1485*/ meltfptr[1484]))
+ ( /*_.VALROUT___V1488*/ meltfptr[1487]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1486*/ meltfptr[1485])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1489*/ meltfptr[1488])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1488*/ meltfptr[1487]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1486*/ meltfptr[1485]);
+ meltgc_touch ( /*_.VALCLO___V1489*/ meltfptr[1488]);
MELT_LOCATION ("warmelt-genobj.melt:3587:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1487*/ meltfptr[1486])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1490*/ meltfptr[1489])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3587:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1338__PUTOBJDEST_STRING#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1487*/ meltfptr[1486])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1490*/ meltfptr[1489])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3587:/ initchunk");
@@ -73429,12 +73786,12 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1338__PUTOBJDEST_STRING#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1487*/ meltfptr[1486])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1490*/ meltfptr[1489])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3587:/ initchunk");
@@ -73442,12 +73799,12 @@ warmelt_genobj_initialmeltchunk_23 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1487*/ meltfptr[1486])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1490*/ meltfptr[1489])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
#undef meltfram__
@@ -73465,76 +73822,76 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1338__PUTOBJDEST_STRING#4",
NULL != ( /*_.CTYPE_CSTRING__V102*/ meltfptr[101]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1487*/ meltfptr[1486])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1490*/ meltfptr[1489])->tabval[4] =
(melt_ptr_t) ( /*_.CTYPE_CSTRING__V102*/ meltfptr[101]);
MELT_LOCATION ("warmelt-genobj.melt:3587:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1487*/ meltfptr[1486]);
+ meltgc_touch ( /*_.VALROUT___V1490*/ meltfptr[1489]);
/*putclosurout#70 */
melt_assertmsg ("putclosrout#70 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1488*/ meltfptr[1487])) ==
+ ( /*_.VALCLO___V1491*/ meltfptr[1490])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#70 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1487*/ meltfptr[1486]))
+ ( /*_.VALROUT___V1490*/ meltfptr[1489]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1488*/ meltfptr[1487])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1487*/ meltfptr[1486]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1491*/ meltfptr[1490])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1490*/ meltfptr[1489]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1488*/ meltfptr[1487]);
+ meltgc_touch ( /*_.VALCLO___V1491*/ meltfptr[1490]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1489*/ meltfptr[1488]))
+ ( /*_.VALDATA___V1492*/ meltfptr[1491]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1489*/
- meltfptr[1488]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488]))->
+ ( /*_.VALDATA___V1492*/
+ meltfptr[1491]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1492*/ meltfptr[1491]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1490*/ meltfptr[1489]);
+ /*_.VALSTR___V1493*/ meltfptr[1492]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1489*/ meltfptr[1488]);
+ meltgc_touch ( /*_.VALDATA___V1492*/ meltfptr[1491]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1342__PUTOBJDEST_NULL#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
@@ -73542,12 +73899,12 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1342__PUTOBJDEST_NULL#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
@@ -73555,24 +73912,24 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1342__PUTOBJDEST_NULL#4",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[4] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
@@ -73580,133 +73937,133 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1342__PUTOBJDEST_NULL#5",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1491*/ meltfptr[1490])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1494*/ meltfptr[1493])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
MELT_LOCATION ("warmelt-genobj.melt:3609:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1491*/ meltfptr[1490]);
+ meltgc_touch ( /*_.VALROUT___V1494*/ meltfptr[1493]);
/*putclosurout#71 */
melt_assertmsg ("putclosrout#71 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1492*/ meltfptr[1491])) ==
+ ( /*_.VALCLO___V1495*/ meltfptr[1494])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#71 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1491*/ meltfptr[1490]))
+ ( /*_.VALROUT___V1494*/ meltfptr[1493]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1492*/ meltfptr[1491])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1491*/ meltfptr[1490]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1495*/ meltfptr[1494])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1494*/ meltfptr[1493]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1492*/ meltfptr[1491]);
+ meltgc_touch ( /*_.VALCLO___V1495*/ meltfptr[1494]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1493*/ meltfptr[1492]))
+ ( /*_.VALDATA___V1496*/ meltfptr[1495]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1493*/
- meltfptr[1492]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]))->
+ ( /*_.VALDATA___V1496*/
+ meltfptr[1495]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1494*/ meltfptr[1493]);
+ /*_.VALSTR___V1497*/ meltfptr[1496]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1493*/ meltfptr[1492]);
+ meltgc_touch ( /*_.VALDATA___V1496*/ meltfptr[1495]);
MELT_LOCATION ("warmelt-genobj.melt:3633:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1495*/ meltfptr[1494]))
+ ( /*_.VALROUT___V1498*/ meltfptr[1497]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V438*/ meltfptr[437]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1495*/ meltfptr[1494])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]);
+ NULL != /*_.VALDATA___V441*/ meltfptr[440]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1498*/ meltfptr[1497])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]);
MELT_LOCATION ("warmelt-genobj.melt:3633:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1495*/ meltfptr[1494]))
+ ( /*_.VALROUT___V1498*/ meltfptr[1497]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1495*/ meltfptr[1494])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1498*/ meltfptr[1497])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3633:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1495*/ meltfptr[1494]))
+ ( /*_.VALROUT___V1498*/ meltfptr[1497]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1495*/ meltfptr[1494])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1498*/ meltfptr[1497])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:3633:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1495*/ meltfptr[1494]);
+ meltgc_touch ( /*_.VALROUT___V1498*/ meltfptr[1497]);
/*putclosurout#72 */
melt_assertmsg ("putclosrout#72 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1496*/ meltfptr[1495])) ==
+ ( /*_.VALCLO___V1499*/ meltfptr[1498])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#72 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1495*/ meltfptr[1494]))
+ ( /*_.VALROUT___V1498*/ meltfptr[1497]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1496*/ meltfptr[1495])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1495*/ meltfptr[1494]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1499*/ meltfptr[1498])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1498*/ meltfptr[1497]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1496*/ meltfptr[1495]);
+ meltgc_touch ( /*_.VALCLO___V1499*/ meltfptr[1498]);
MELT_LOCATION ("warmelt-genobj.melt:3658:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1497*/ meltfptr[1496]))
+ ( /*_.VALROUT___V1500*/ meltfptr[1499]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V482*/ meltfptr[481]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1497*/ meltfptr[1496])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]);
+ NULL != /*_.VALDATA___V485*/ meltfptr[484]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1500*/ meltfptr[1499])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]);
MELT_LOCATION ("warmelt-genobj.melt:3658:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1497*/ meltfptr[1496]))
+ ( /*_.VALROUT___V1500*/ meltfptr[1499]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1348__PUTOBJDEST_OBJMULTIBLOCK#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1497*/ meltfptr[1496])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1500*/ meltfptr[1499])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3658:/ initchunk");
@@ -73714,68 +74071,68 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1497*/ meltfptr[1496]))
+ ( /*_.VALROUT___V1500*/ meltfptr[1499]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1497*/ meltfptr[1496])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1500*/ meltfptr[1499])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
MELT_LOCATION ("warmelt-genobj.melt:3658:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1497*/ meltfptr[1496]);
+ meltgc_touch ( /*_.VALROUT___V1500*/ meltfptr[1499]);
/*putclosurout#73 */
melt_assertmsg ("putclosrout#73 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1498*/ meltfptr[1497])) ==
+ ( /*_.VALCLO___V1501*/ meltfptr[1500])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#73 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1497*/ meltfptr[1496]))
+ ( /*_.VALROUT___V1500*/ meltfptr[1499]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1498*/ meltfptr[1497])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1497*/ meltfptr[1496]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1501*/ meltfptr[1500])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1500*/ meltfptr[1499]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1498*/ meltfptr[1497]);
+ meltgc_touch ( /*_.VALCLO___V1501*/ meltfptr[1500]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V530*/ meltfptr[529]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]);
+ NULL != /*_.VALDATA___V533*/ meltfptr[532]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1350__PUTOBJDEST_OBJLOOP#2",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
@@ -73783,101 +74140,101 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1350__PUTOBJDEST_OBJLOOP#4",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[4] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3671:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1499*/ meltfptr[1498]);
+ meltgc_touch ( /*_.VALROUT___V1502*/ meltfptr[1501]);
/*putclosurout#74 */
melt_assertmsg ("putclosrout#74 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1500*/ meltfptr[1499])) ==
+ ( /*_.VALCLO___V1503*/ meltfptr[1502])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#74 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1499*/ meltfptr[1498]))
+ ( /*_.VALROUT___V1502*/ meltfptr[1501]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1500*/ meltfptr[1499])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1499*/ meltfptr[1498]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1503*/ meltfptr[1502])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1500*/ meltfptr[1499]);
+ meltgc_touch ( /*_.VALCLO___V1503*/ meltfptr[1502]);
MELT_LOCATION ("warmelt-genobj.melt:3695:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1501*/ meltfptr[1500]))
+ ( /*_.VALROUT___V1504*/ meltfptr[1503]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V544*/ meltfptr[543]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1501*/ meltfptr[1500])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]);
+ NULL != /*_.VALDATA___V547*/ meltfptr[546]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1504*/ meltfptr[1503])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]);
MELT_LOCATION ("warmelt-genobj.melt:3695:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1501*/ meltfptr[1500]))
+ ( /*_.VALROUT___V1504*/ meltfptr[1503]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1501*/ meltfptr[1500])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1504*/ meltfptr[1503])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
MELT_LOCATION ("warmelt-genobj.melt:3695:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1501*/ meltfptr[1500]);
+ meltgc_touch ( /*_.VALROUT___V1504*/ meltfptr[1503]);
/*putclosurout#75 */
melt_assertmsg ("putclosrout#75 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1502*/ meltfptr[1501])) ==
+ ( /*_.VALCLO___V1505*/ meltfptr[1504])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#75 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1501*/ meltfptr[1500]))
+ ( /*_.VALROUT___V1504*/ meltfptr[1503]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1502*/ meltfptr[1501])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1501*/ meltfptr[1500]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1505*/ meltfptr[1504])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1504*/ meltfptr[1503]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1502*/ meltfptr[1501]);
+ meltgc_touch ( /*_.VALCLO___V1505*/ meltfptr[1504]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#0",
NULL != ( /*_.CLASS_NREP_IF__V104*/ meltfptr[103]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_IF__V104*/ meltfptr[103]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73885,13 +74242,13 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73899,12 +74256,12 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73912,12 +74269,12 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#3",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73925,12 +74282,12 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73938,12 +74295,12 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_1354__COMPILOBJ_NREP_IF#5",
NULL != ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
@@ -73951,106 +74308,106 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:3705:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1503*/ meltfptr[1502]);
+ meltgc_touch ( /*_.VALROUT___V1506*/ meltfptr[1505]);
/*putclosurout#76 */
melt_assertmsg ("putclosrout#76 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1504*/ meltfptr[1503])) ==
+ ( /*_.VALCLO___V1507*/ meltfptr[1506])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#76 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1503*/ meltfptr[1502]))
+ ( /*_.VALROUT___V1506*/ meltfptr[1505]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1504*/ meltfptr[1503])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1503*/ meltfptr[1502]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1507*/ meltfptr[1506])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1504*/ meltfptr[1503]);
+ meltgc_touch ( /*_.VALCLO___V1507*/ meltfptr[1506]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1505*/ meltfptr[1504]))
+ ( /*_.VALDATA___V1508*/ meltfptr[1507]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1505*/
- meltfptr[1504]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1505*/ meltfptr[1504]))->
+ ( /*_.VALDATA___V1508*/
+ meltfptr[1507]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1508*/ meltfptr[1507]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1506*/ meltfptr[1505]);
+ /*_.VALSTR___V1509*/ meltfptr[1508]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1505*/ meltfptr[1504]);
+ meltgc_touch ( /*_.VALDATA___V1508*/ meltfptr[1507]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#0",
- NULL != ( /*_.CLASS_NREP_IFISA__V105*/ meltfptr[104]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V105*/ meltfptr[104]);
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#1",
- NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
+ NULL != ( /*_.CLASS_NREP_IFISA__V105*/ meltfptr[104]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V105*/ meltfptr[104]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#2",
- NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[2] =
- (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+ NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#3",
NULL != ( /*_.CLASS_NREP_IFTESTVALUE__V106*/ meltfptr[105]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_IFTESTVALUE__V106*/ meltfptr[105]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
@@ -74058,13 +74415,13 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#4",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
@@ -74072,13 +74429,13 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
@@ -74086,13 +74443,13 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#6",
NULL != ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
@@ -74100,11827 +74457,12272 @@ warmelt_genobj_initialmeltchunk_24 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALCLO___V1034*/ meltfptr[1033]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_1358__COMPILOBJ_NREP_IFISA#8",
- NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[8] =
- (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
+ NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[8] =
+ (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1510*/ meltfptr[1509])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
MELT_LOCATION ("warmelt-genobj.melt:3737:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1507*/ meltfptr[1506]);
+ meltgc_touch ( /*_.VALROUT___V1510*/ meltfptr[1509]);
/*putclosurout#77 */
melt_assertmsg ("putclosrout#77 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1508*/ meltfptr[1507])) ==
+ ( /*_.VALCLO___V1511*/ meltfptr[1510])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#77 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1507*/ meltfptr[1506]))
+ ( /*_.VALROUT___V1510*/ meltfptr[1509]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1508*/ meltfptr[1507])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1507*/ meltfptr[1506]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1511*/ meltfptr[1510])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1510*/ meltfptr[1509]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1508*/ meltfptr[1507]);
+ meltgc_touch ( /*_.VALCLO___V1511*/ meltfptr[1510]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1509*/ meltfptr[1508]))
+ ( /*_.VALDATA___V1512*/ meltfptr[1511]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1509*/
- meltfptr[1508]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508]))->
+ ( /*_.VALDATA___V1512*/
+ meltfptr[1511]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1512*/ meltfptr[1511]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1510*/ meltfptr[1509]);
+ /*_.VALSTR___V1513*/ meltfptr[1512]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1509*/ meltfptr[1508]);
+ meltgc_touch ( /*_.VALDATA___V1512*/ meltfptr[1511]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1511*/ meltfptr[1510]))
+ ( /*_.VALDATA___V1514*/ meltfptr[1513]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1511*/
- meltfptr[1510]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510]))->
+ ( /*_.VALDATA___V1514*/
+ meltfptr[1513]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1512*/ meltfptr[1511]);
+ /*_.VALSTR___V1515*/ meltfptr[1514]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1511*/ meltfptr[1510]);
+ meltgc_touch ( /*_.VALDATA___V1514*/ meltfptr[1513]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#0",
- NULL != ( /*_.CLASS_NREP_IFVARIADIC__V107*/ meltfptr[106]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V107*/ meltfptr[106]);
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#1",
+ NULL != ( /*_.CLASS_NREP_IFTUPLESIZED__V107*/ meltfptr[106]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V107*/ meltfptr[106]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#1",
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#3",
+ NULL != ( /*_.CLASS_NREP_IFTESTVALUE__V106*/ meltfptr[105]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[3] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFTESTVALUE__V106*/ meltfptr[105]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#2",
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#4",
+ NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[4] =
+ (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALCLO___V1034*/ meltfptr[1033]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFTUPLESIZED#6",
+ NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[6] =
+ (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3771:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1516*/ meltfptr[1515]);
+
+ /*putclosurout#78 */
+ melt_assertmsg ("putclosrout#78 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1517*/ meltfptr[1516])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#78 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1516*/ meltfptr[1515]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1517*/ meltfptr[1516])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1517*/ meltfptr[1516]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1518*/ meltfptr[1517]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1518*/
+ meltfptr[1517]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1519*/ meltfptr[1518]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1518*/ meltfptr[1517]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#0",
+ NULL != ( /*_.CLASS_NREP_IFVARIADIC__V108*/ meltfptr[107]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V108*/ meltfptr[107]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#1",
+ NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#3",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#3",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1153*/ meltfptr[1152]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1153*/ meltfptr[1152]);
+ NULL != /*_.VALCLO___V1156*/ meltfptr[1155]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1156*/ meltfptr[1155]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1155*/ meltfptr[1154]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1155*/ meltfptr[1154]);
+ NULL != /*_.VALCLO___V1158*/ meltfptr[1157]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1158*/ meltfptr[1157]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#6",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#6",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#7",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#7",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#8",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#8",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#10",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#10",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[10] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#11",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#11",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1364__COMPILOBJ_NREP_IFVARIADIC#12",
+ ("putroutconst constnull.drout_1368__COMPILOBJ_NREP_IFVARIADIC#12",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[12] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3803:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1513*/ meltfptr[1512]);
+ meltgc_touch ( /*_.VALROUT___V1520*/ meltfptr[1519]);
- /*putclosurout#78 */
- melt_assertmsg ("putclosrout#78 checkclo",
+ /*putclosurout#79 */
+ melt_assertmsg ("putclosrout#79 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1514*/ meltfptr[1513])) ==
+ ( /*_.VALCLO___V1521*/ meltfptr[1520])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#78 checkrout",
+ melt_assertmsg ("putclosrout#79 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1513*/ meltfptr[1512]))
+ ( /*_.VALROUT___V1520*/ meltfptr[1519]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1514*/ meltfptr[1513])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1521*/ meltfptr[1520])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1514*/ meltfptr[1513]);
+ meltgc_touch ( /*_.VALCLO___V1521*/ meltfptr[1520]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1515*/ meltfptr[1514]))
+ ( /*_.VALDATA___V1522*/ meltfptr[1521]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1515*/
- meltfptr[1514]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1515*/ meltfptr[1514]))->
+ ( /*_.VALDATA___V1522*/
+ meltfptr[1521]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1516*/ meltfptr[1515]);
+ /*_.VALSTR___V1523*/ meltfptr[1522]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1515*/ meltfptr[1514]);
+ meltgc_touch ( /*_.VALDATA___V1522*/ meltfptr[1521]);
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1517*/ meltfptr[1516]))
+ ( /*_.VALROUT___V1524*/ meltfptr[1523]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1368__GETCTYPE_IFVARIADIC#0",
+ melt_checkmsg ("putroutconst constnull.drout_1372__GETCTYPE_IFVARIADIC#0",
NULL !=
- ( /*_.CLASS_NREP_IFVARIADIC__V107*/ meltfptr[106]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1517*/ meltfptr[1516])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V107*/ meltfptr[106]);
+ ( /*_.CLASS_NREP_IFVARIADIC__V108*/ meltfptr[107]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1524*/ meltfptr[1523])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V108*/ meltfptr[107]);
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1517*/ meltfptr[1516]))
+ ( /*_.VALROUT___V1524*/ meltfptr[1523]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1368__GETCTYPE_IFVARIADIC#1",
+ melt_checkmsg ("putroutconst constnull.drout_1372__GETCTYPE_IFVARIADIC#1",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1517*/ meltfptr[1516])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1524*/ meltfptr[1523])->tabval[1] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
- MELT_LOCATION ("warmelt-genobj.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3889:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1517*/ meltfptr[1516]);
+ meltgc_touch ( /*_.VALROUT___V1524*/ meltfptr[1523]);
- /*putclosurout#79 */
- melt_assertmsg ("putclosrout#79 checkclo",
+ /*putclosurout#80 */
+ melt_assertmsg ("putclosrout#80 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1518*/ meltfptr[1517])) ==
+ ( /*_.VALCLO___V1525*/ meltfptr[1524])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#79 checkrout",
+ melt_assertmsg ("putclosrout#80 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1517*/ meltfptr[1516]))
+ ( /*_.VALROUT___V1524*/ meltfptr[1523]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1518*/ meltfptr[1517])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1517*/ meltfptr[1516]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1525*/ meltfptr[1524])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1524*/ meltfptr[1523]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1518*/ meltfptr[1517]);
+ meltgc_touch ( /*_.VALCLO___V1525*/ meltfptr[1524]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#0",
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#1",
- NULL != ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V108*/ meltfptr[107]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V108*/ meltfptr[107]);
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#1",
+ NULL != ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V109*/ meltfptr[108]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V109*/ meltfptr[108]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#2",
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1153*/ meltfptr[1152]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1153*/ meltfptr[1152]);
+ NULL != /*_.VALCLO___V1156*/ meltfptr[1155]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1156*/ meltfptr[1155]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1155*/ meltfptr[1154]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1155*/ meltfptr[1154]);
+ NULL != /*_.VALCLO___V1158*/ meltfptr[1157]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1158*/ meltfptr[1157]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#5",
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#5",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#6",
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#6",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1370__COMPILOBJ_NREP_VARIADIC_ARGUMENT#7",
+ ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_VARIADIC_ARGUMENT#7",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1519*/ meltfptr[1518])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1526*/ meltfptr[1525])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:3873:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3897:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1519*/ meltfptr[1518]);
+ meltgc_touch ( /*_.VALROUT___V1526*/ meltfptr[1525]);
- /*putclosurout#80 */
- melt_assertmsg ("putclosrout#80 checkclo",
+ /*putclosurout#81 */
+ melt_assertmsg ("putclosrout#81 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1520*/ meltfptr[1519])) ==
+ ( /*_.VALCLO___V1527*/ meltfptr[1526])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#80 checkrout",
+ melt_assertmsg ("putclosrout#81 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1519*/ meltfptr[1518]))
+ ( /*_.VALROUT___V1526*/ meltfptr[1525]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1520*/ meltfptr[1519])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1519*/ meltfptr[1518]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1527*/ meltfptr[1526])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1526*/ meltfptr[1525]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1520*/ meltfptr[1519]);
+ meltgc_touch ( /*_.VALCLO___V1527*/ meltfptr[1526]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1521*/ meltfptr[1520]))
+ ( /*_.VALDATA___V1528*/ meltfptr[1527]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1521*/
- meltfptr[1520]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1521*/ meltfptr[1520]))->
+ ( /*_.VALDATA___V1528*/
+ meltfptr[1527]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1522*/ meltfptr[1521]);
+ /*_.VALSTR___V1529*/ meltfptr[1528]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1521*/ meltfptr[1520]);
+ meltgc_touch ( /*_.VALDATA___V1528*/ meltfptr[1527]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#0",
- NULL != ( /*_.CLASS_NREP_CONSUME_VARIADIC__V109*/ meltfptr[108]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V109*/ meltfptr[108]);
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#0",
+ NULL != ( /*_.CLASS_NREP_CONSUME_VARIADIC__V110*/ meltfptr[109]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V110*/ meltfptr[109]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#1",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#2",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#3",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1153*/ meltfptr[1152]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1153*/ meltfptr[1152]);
+ NULL != /*_.VALCLO___V1156*/ meltfptr[1155]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1156*/ meltfptr[1155]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1155*/ meltfptr[1154]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1155*/ meltfptr[1154]);
+ NULL != /*_.VALCLO___V1158*/ meltfptr[1157]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1158*/ meltfptr[1157]);
+
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_24 */
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_25 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#6",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#6",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#7",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#7",
NULL != ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#8",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#9",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#9",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#10",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1374__COMPILOBJ_NREP_CONSUMEVARIADIC#11",
+ ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_CONSUMEVARIADIC#11",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[11] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:3920:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3944:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1523*/ meltfptr[1522]);
+ meltgc_touch ( /*_.VALROUT___V1530*/ meltfptr[1529]);
- /*putclosurout#81 */
- melt_assertmsg ("putclosrout#81 checkclo",
+ /*putclosurout#82 */
+ melt_assertmsg ("putclosrout#82 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1524*/ meltfptr[1523])) ==
+ ( /*_.VALCLO___V1531*/ meltfptr[1530])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#81 checkrout",
+ melt_assertmsg ("putclosrout#82 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1523*/ meltfptr[1522]))
+ ( /*_.VALROUT___V1530*/ meltfptr[1529]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1524*/ meltfptr[1523])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1531*/ meltfptr[1530])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1524*/ meltfptr[1523]);
+ meltgc_touch ( /*_.VALCLO___V1531*/ meltfptr[1530]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1525*/ meltfptr[1524]))
+ ( /*_.VALDATA___V1532*/ meltfptr[1531]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1525*/
- meltfptr[1524]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1525*/ meltfptr[1524]))->
+ ( /*_.VALDATA___V1532*/
+ meltfptr[1531]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1526*/ meltfptr[1525]);
+ /*_.VALSTR___V1533*/ meltfptr[1532]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1525*/ meltfptr[1524]);
+ meltgc_touch ( /*_.VALDATA___V1532*/ meltfptr[1531]);
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1527*/ meltfptr[1526]))
+ ( /*_.VALROUT___V1534*/ meltfptr[1533]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1527*/ meltfptr[1526])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_24 */
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1534*/ meltfptr[1533])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_25 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1527*/ meltfptr[1526]))
+ ( /*_.VALROUT___V1534*/ meltfptr[1533]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1527*/ meltfptr[1526])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1534*/ meltfptr[1533])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1527*/ meltfptr[1526]))
+ ( /*_.VALROUT___V1534*/ meltfptr[1533]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1527*/ meltfptr[1526])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1534*/ meltfptr[1533])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:3957:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3981:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1527*/ meltfptr[1526]);
+ meltgc_touch ( /*_.VALROUT___V1534*/ meltfptr[1533]);
- /*putclosurout#82 */
- melt_assertmsg ("putclosrout#82 checkclo",
+ /*putclosurout#83 */
+ melt_assertmsg ("putclosrout#83 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1528*/ meltfptr[1527])) ==
+ ( /*_.VALCLO___V1535*/ meltfptr[1534])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#82 checkrout",
+ melt_assertmsg ("putclosrout#83 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1527*/ meltfptr[1526]))
+ ( /*_.VALROUT___V1534*/ meltfptr[1533]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1528*/ meltfptr[1527])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1527*/ meltfptr[1526]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1535*/ meltfptr[1534])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1534*/ meltfptr[1533]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1528*/ meltfptr[1527]);
+ meltgc_touch ( /*_.VALCLO___V1535*/ meltfptr[1534]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1380__COMPILOBJ_NREP_CPPIF#0",
- NULL != ( /*_.CLASS_NREP_CPPIF__V110*/ meltfptr[109]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1529*/ meltfptr[1528])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V110*/ meltfptr[109]);
+ ("putroutconst constnull.drout_1384__COMPILOBJ_NREP_CPPIF#0",
+ NULL != ( /*_.CLASS_NREP_CPPIF__V111*/ meltfptr[110]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V111*/ meltfptr[110]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1380__COMPILOBJ_NREP_CPPIF#1",
+ ("putroutconst constnull.drout_1384__COMPILOBJ_NREP_CPPIF#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1529*/ meltfptr[1528])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1380__COMPILOBJ_NREP_CPPIF#2",
+ ("putroutconst constnull.drout_1384__COMPILOBJ_NREP_CPPIF#2",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1529*/ meltfptr[1528])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1380__COMPILOBJ_NREP_CPPIF#3",
+ ("putroutconst constnull.drout_1384__COMPILOBJ_NREP_CPPIF#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1529*/ meltfptr[1528])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V600*/ meltfptr[599]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1529*/ meltfptr[1528])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]);
+ NULL != /*_.VALDATA___V603*/ meltfptr[602]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]);
- MELT_LOCATION ("warmelt-genobj.melt:3974:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3998:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1529*/ meltfptr[1528]);
+ meltgc_touch ( /*_.VALROUT___V1536*/ meltfptr[1535]);
- /*putclosurout#83 */
- melt_assertmsg ("putclosrout#83 checkclo",
+ /*putclosurout#84 */
+ melt_assertmsg ("putclosrout#84 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1530*/ meltfptr[1529])) ==
+ ( /*_.VALCLO___V1537*/ meltfptr[1536])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#83 checkrout",
+ melt_assertmsg ("putclosrout#84 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1529*/ meltfptr[1528]))
+ ( /*_.VALROUT___V1536*/ meltfptr[1535]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1530*/ meltfptr[1529])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1529*/ meltfptr[1528]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1537*/ meltfptr[1536])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1530*/ meltfptr[1529]);
+ meltgc_touch ( /*_.VALCLO___V1537*/ meltfptr[1536]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1531*/ meltfptr[1530]))
+ ( /*_.VALDATA___V1538*/ meltfptr[1537]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1531*/
- meltfptr[1530]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530]))->
+ ( /*_.VALDATA___V1538*/
+ meltfptr[1537]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1532*/ meltfptr[1531]);
+ /*_.VALSTR___V1539*/ meltfptr[1538]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1531*/ meltfptr[1530]);
+ meltgc_touch ( /*_.VALDATA___V1538*/ meltfptr[1537]);
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1533*/ meltfptr[1532]))
+ ( /*_.VALROUT___V1540*/ meltfptr[1539]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V600*/ meltfptr[599]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1533*/ meltfptr[1532])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]);
+ NULL != /*_.VALDATA___V603*/ meltfptr[602]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]);
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1533*/ meltfptr[1532]))
+ ( /*_.VALROUT___V1540*/ meltfptr[1539]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1533*/ meltfptr[1532])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1533*/ meltfptr[1532]))
+ ( /*_.VALROUT___V1540*/ meltfptr[1539]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1533*/ meltfptr[1532])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:4000:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4024:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1533*/ meltfptr[1532]);
+ meltgc_touch ( /*_.VALROUT___V1540*/ meltfptr[1539]);
- /*putclosurout#84 */
- melt_assertmsg ("putclosrout#84 checkclo",
+ /*putclosurout#85 */
+ melt_assertmsg ("putclosrout#85 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1534*/ meltfptr[1533])) ==
+ ( /*_.VALCLO___V1541*/ meltfptr[1540])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#84 checkrout",
+ melt_assertmsg ("putclosrout#85 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1533*/ meltfptr[1532]))
+ ( /*_.VALROUT___V1540*/ meltfptr[1539]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1534*/ meltfptr[1533])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1533*/ meltfptr[1532]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1541*/ meltfptr[1540])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1534*/ meltfptr[1533]);
+ meltgc_touch ( /*_.VALCLO___V1541*/ meltfptr[1540]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#0",
- NULL != ( /*_.CLASS_NREP_RETURN__V111*/ meltfptr[110]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V111*/ meltfptr[110]);
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#0",
+ NULL != ( /*_.CLASS_NREP_RETURN__V112*/ meltfptr[111]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V112*/ meltfptr[111]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#1",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#2",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#3",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#5",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V944*/ meltfptr[943]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]);
+ NULL != /*_.VALDATA___V947*/ meltfptr[946]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#8",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#8",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[8] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V408*/ meltfptr[407]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]);
+ NULL != /*_.VALDATA___V411*/ meltfptr[410]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#10",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#11",
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#11",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[11] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1536*/ meltfptr[1535]))
+ ( /*_.VALROUT___V1543*/ meltfptr[1542]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V408*/ meltfptr[407]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]);
+ NULL != /*_.VALDATA___V411*/ meltfptr[410]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1543*/ meltfptr[1542])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]);
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1536*/ meltfptr[1535]))
+ ( /*_.VALROUT___V1543*/ meltfptr[1542]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1390__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1394__LAMBDA_#1",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1543*/ meltfptr[1542])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1536*/ meltfptr[1535]))
+ ( /*_.VALROUT___V1543*/ meltfptr[1542]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1390__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1394__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1543*/ meltfptr[1542])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4039:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4063:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1536*/ meltfptr[1535]);
+ meltgc_touch ( /*_.VALROUT___V1543*/ meltfptr[1542]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1386__COMPILOBJ_NREP_RETURN#12",
- NULL != ( /*_.VALROUT___V1536*/ meltfptr[1535]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[12] =
- (melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535]);
+ ("putroutconst constnull.drout_1390__COMPILOBJ_NREP_RETURN#12",
+ NULL != ( /*_.VALROUT___V1543*/ meltfptr[1542]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALROUT___V1543*/ meltfptr[1542]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1535*/ meltfptr[1534])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]);
+ NULL != /*_.VALDATA___V425*/ meltfptr[424]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]);
- MELT_LOCATION ("warmelt-genobj.melt:4017:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4041:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1535*/ meltfptr[1534]);
+ meltgc_touch ( /*_.VALROUT___V1542*/ meltfptr[1541]);
- /*putclosurout#85 */
- melt_assertmsg ("putclosrout#85 checkclo",
+ /*putclosurout#86 */
+ melt_assertmsg ("putclosrout#86 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1537*/ meltfptr[1536])) ==
+ ( /*_.VALCLO___V1544*/ meltfptr[1543])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#85 checkrout",
+ melt_assertmsg ("putclosrout#86 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1535*/ meltfptr[1534]))
+ ( /*_.VALROUT___V1542*/ meltfptr[1541]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1537*/ meltfptr[1536])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1535*/ meltfptr[1534]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1544*/ meltfptr[1543])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1537*/ meltfptr[1536]);
+ meltgc_touch ( /*_.VALCLO___V1544*/ meltfptr[1543]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1538*/ meltfptr[1537]))
+ ( /*_.VALDATA___V1545*/ meltfptr[1544]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1538*/
- meltfptr[1537]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]))->
+ ( /*_.VALDATA___V1545*/
+ meltfptr[1544]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1539*/ meltfptr[1538]);
+ /*_.VALSTR___V1546*/ meltfptr[1545]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1538*/ meltfptr[1537]);
+ meltgc_touch ( /*_.VALDATA___V1545*/ meltfptr[1544]);
- MELT_LOCATION ("warmelt-genobj.melt:4057:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4081:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1540*/ meltfptr[1539]))
+ ( /*_.VALROUT___V1547*/ meltfptr[1546]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1391__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1395__LAMBDA_#0",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[0] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4057:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4081:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1540*/ meltfptr[1539]);
+ meltgc_touch ( /*_.VALROUT___V1547*/ meltfptr[1546]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1541*/ meltfptr[1540]))
+ ( /*_.VALDATA___V1548*/ meltfptr[1547]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1541*/
- meltfptr[1540]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1541*/ meltfptr[1540]))->
+ ( /*_.VALDATA___V1548*/
+ meltfptr[1547]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1542*/ meltfptr[1541]);
+ /*_.VALSTR___V1549*/ meltfptr[1548]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1541*/ meltfptr[1540]);
+ meltgc_touch ( /*_.VALDATA___V1548*/ meltfptr[1547]);
- MELT_LOCATION ("warmelt-genobj.melt:4059:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4083:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1543*/ meltfptr[1542]))
+ ( /*_.VALDATA___V1550*/ meltfptr[1549]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1543*/
- meltfptr[1542]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542]))->
+ ( /*_.VALDATA___V1550*/
+ meltfptr[1549]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1550*/ meltfptr[1549]))->
obj_vartab[0] = (melt_ptr_t) (
/*_.CTYPE_VALUE__V24*/ meltfptr[23]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1544*/ meltfptr[1543]))
+ ( /*_.VALDATA___V1551*/ meltfptr[1550]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1544*/
- meltfptr[1543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1544*/ meltfptr[1543]))->
+ ( /*_.VALDATA___V1551*/
+ meltfptr[1550]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1551*/ meltfptr[1550]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1545*/ meltfptr[1544]);
+ /*_.VALSTR___V1552*/ meltfptr[1551]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1544*/ meltfptr[1543]);
+ meltgc_touch ( /*_.VALDATA___V1551*/ meltfptr[1550]);
- MELT_LOCATION ("warmelt-genobj.melt:4059:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4083:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1543*/ meltfptr[1542]))
+ ( /*_.VALDATA___V1550*/ meltfptr[1549]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1543*/
- meltfptr[1542]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542]))->
+ ( /*_.VALDATA___V1550*/
+ meltfptr[1549]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1550*/ meltfptr[1549]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALDATA___V1544*/ meltfptr[1543]);
+ /*_.VALDATA___V1551*/ meltfptr[1550]);
- MELT_LOCATION ("warmelt-genobj.melt:4059:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4083:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1543*/ meltfptr[1542]);
+ meltgc_touch ( /*_.VALDATA___V1550*/ meltfptr[1549]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#0",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#0",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#1",
- NULL != ( /*_.CLASS_NREP_LAMBDA__V112*/ meltfptr[111]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V112*/ meltfptr[111]);
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#1",
+ NULL != ( /*_.CLASS_NREP_LAMBDA__V113*/ meltfptr[112]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V113*/ meltfptr[112]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#2",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#3",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#3",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#5",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#5",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1543*/ meltfptr[1542]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542]);
+ NULL != /*_.VALDATA___V1550*/ meltfptr[1549]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1550*/ meltfptr[1549]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#9",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#9",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[9] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#10",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#11",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#11",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[11] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V866*/ meltfptr[865]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ NULL != /*_.VALDATA___V869*/ meltfptr[868]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#13",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#13",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#14",
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#14",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[14] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1547*/ meltfptr[1546]))
+ ( /*_.VALROUT___V1554*/ meltfptr[1553]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V866*/ meltfptr[865]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ NULL != /*_.VALDATA___V869*/ meltfptr[868]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1547*/ meltfptr[1546]))
+ ( /*_.VALROUT___V1554*/ meltfptr[1553]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1401__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1405__LAMBDA_#1",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1547*/ meltfptr[1546]))
+ ( /*_.VALROUT___V1554*/ meltfptr[1553]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1401__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1405__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4101:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4125:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1547*/ meltfptr[1546]);
+ meltgc_touch ( /*_.VALROUT___V1554*/ meltfptr[1553]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1397__COMPILOBJ_NREP_LAMBDA#15",
- NULL != ( /*_.VALROUT___V1547*/ meltfptr[1546]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[15] =
- (melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546]);
+ ("putroutconst constnull.drout_1401__COMPILOBJ_NREP_LAMBDA#15",
+ NULL != ( /*_.VALROUT___V1554*/ meltfptr[1553]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1553*/ meltfptr[1552])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553]);
- MELT_LOCATION ("warmelt-genobj.melt:4065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4089:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1546*/ meltfptr[1545]);
+ meltgc_touch ( /*_.VALROUT___V1553*/ meltfptr[1552]);
- /*putclosurout#86 */
- melt_assertmsg ("putclosrout#86 checkclo",
+ /*putclosurout#87 */
+ melt_assertmsg ("putclosrout#87 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1548*/ meltfptr[1547])) ==
+ ( /*_.VALCLO___V1555*/ meltfptr[1554])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#86 checkrout",
+ melt_assertmsg ("putclosrout#87 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1546*/ meltfptr[1545]))
+ ( /*_.VALROUT___V1553*/ meltfptr[1552]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1548*/ meltfptr[1547])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1555*/ meltfptr[1554])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1553*/ meltfptr[1552]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1548*/ meltfptr[1547]);
+ meltgc_touch ( /*_.VALCLO___V1555*/ meltfptr[1554]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1549*/ meltfptr[1548]))
+ ( /*_.VALDATA___V1556*/ meltfptr[1555]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1549*/
- meltfptr[1548]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548]))->
+ ( /*_.VALDATA___V1556*/
+ meltfptr[1555]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1550*/ meltfptr[1549]);
+ /*_.VALSTR___V1557*/ meltfptr[1556]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1549*/ meltfptr[1548]);
+ meltgc_touch ( /*_.VALDATA___V1556*/ meltfptr[1555]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#0",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#0",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#1",
- NULL != ( /*_.CLASS_NREP_INSTANCE__V113*/ meltfptr[112]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V113*/ meltfptr[112]);
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#1",
+ NULL != ( /*_.CLASS_NREP_INSTANCE__V114*/ meltfptr[113]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V114*/ meltfptr[113]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#2",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#3",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#3",
NULL != ( /*_.CLASS_CLASS__V83*/ meltfptr[82]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V83*/ meltfptr[82]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#4",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1552*/ meltfptr[1551]))
+ ( /*_.VALDATA___V1559*/ meltfptr[1558]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1552*/
- meltfptr[1551]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551]))->
+ ( /*_.VALDATA___V1559*/
+ meltfptr[1558]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1553*/ meltfptr[1552]);
+ /*_.VALSTR___V1560*/ meltfptr[1559]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1552*/ meltfptr[1551]);
+ meltgc_touch ( /*_.VALDATA___V1559*/ meltfptr[1558]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#6",
- NULL != ( /*_.VALDATA___V1552*/ meltfptr[1551]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551]);
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#6",
+ NULL != ( /*_.VALDATA___V1559*/ meltfptr[1558]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#7",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V714*/ meltfptr[713]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]);
+ NULL != /*_.VALDATA___V717*/ meltfptr[716]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#10",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#10",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#11",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#11",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[11] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#12",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#12",
NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#13",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#13",
NULL != ( /*_.CLASS_FIELD__V92*/ meltfptr[91]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#14",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#14",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[14] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#15",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#15",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#17",
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#17",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[17] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1408__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1412__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1408__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1412__LAMBDA_#1",
NULL != ( /*_.CLASS_FIELD__V92*/ meltfptr[91]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1408__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1412__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1408__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1412__LAMBDA_#3",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1554*/ meltfptr[1553]))
+ ( /*_.VALROUT___V1561*/ meltfptr[1560]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1408__LAMBDA_#5",
+ melt_checkmsg ("putroutconst constnull.drout_1412__LAMBDA_#5",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4147:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4171:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1554*/ meltfptr[1553]);
+ meltgc_touch ( /*_.VALROUT___V1561*/ meltfptr[1560]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1402__COMPILOBJ_NREP_MAKEINST#18",
- NULL != ( /*_.VALROUT___V1554*/ meltfptr[1553]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[18] =
- (melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553]);
+ ("putroutconst constnull.drout_1406__COMPILOBJ_NREP_MAKEINST#18",
+ NULL != ( /*_.VALROUT___V1561*/ meltfptr[1560]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560]);
- MELT_LOCATION ("warmelt-genobj.melt:4117:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4141:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1551*/ meltfptr[1550]);
+ meltgc_touch ( /*_.VALROUT___V1558*/ meltfptr[1557]);
- /*putclosurout#87 */
- melt_assertmsg ("putclosrout#87 checkclo",
+ /*putclosurout#88 */
+ melt_assertmsg ("putclosrout#88 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1555*/ meltfptr[1554])) ==
+ ( /*_.VALCLO___V1562*/ meltfptr[1561])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#87 checkrout",
+ melt_assertmsg ("putclosrout#88 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1551*/ meltfptr[1550]))
+ ( /*_.VALROUT___V1558*/ meltfptr[1557]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1555*/ meltfptr[1554])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1562*/ meltfptr[1561])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1555*/ meltfptr[1554]);
+ meltgc_touch ( /*_.VALCLO___V1562*/ meltfptr[1561]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1556*/ meltfptr[1555]))
+ ( /*_.VALDATA___V1563*/ meltfptr[1562]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1556*/
- meltfptr[1555]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]))->
+ ( /*_.VALDATA___V1563*/
+ meltfptr[1562]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1563*/ meltfptr[1562]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1557*/ meltfptr[1556]);
+ /*_.VALSTR___V1564*/ meltfptr[1563]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1556*/ meltfptr[1555]);
+ meltgc_touch ( /*_.VALDATA___V1563*/ meltfptr[1562]);
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1558*/ meltfptr[1557]))
+ ( /*_.VALROUT___V1565*/ meltfptr[1564]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1409__COMPILOBJ_ROUTPROC#0",
+ melt_checkmsg ("putroutconst constnull.drout_1413__COMPILOBJ_ROUTPROC#0",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1558*/ meltfptr[1557]))
+ ( /*_.VALROUT___V1565*/ meltfptr[1564]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1409__COMPILOBJ_ROUTPROC#1",
+ melt_checkmsg ("putroutconst constnull.drout_1413__COMPILOBJ_ROUTPROC#1",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1558*/ meltfptr[1557]))
+ ( /*_.VALROUT___V1565*/ meltfptr[1564]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1409__COMPILOBJ_ROUTPROC#2",
+ melt_checkmsg ("putroutconst constnull.drout_1413__COMPILOBJ_ROUTPROC#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4174:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4198:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1558*/ meltfptr[1557]);
+ meltgc_touch ( /*_.VALROUT___V1565*/ meltfptr[1564]);
- /*putclosurout#88 */
- melt_assertmsg ("putclosrout#88 checkclo",
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_25 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_26 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*putclosurout#89*/
+ melt_assertmsg ("putclosrout#89 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1559*/ meltfptr[1558])) ==
+ ( /*_.VALCLO___V1566*/ meltfptr[1565])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#88 checkrout",
+ melt_assertmsg ("putclosrout#89 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1558*/ meltfptr[1557]))
+ ( /*_.VALROUT___V1565*/ meltfptr[1564]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1559*/ meltfptr[1558])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1566*/ meltfptr[1565])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1559*/ meltfptr[1558]);
+ meltgc_touch ( /*_.VALCLO___V1566*/ meltfptr[1565]);
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1560*/ meltfptr[1559]))
+ ( /*_.VALROUT___V1567*/ meltfptr[1566]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1411__COMPILOBJ_PREDEF#0",
+ melt_checkmsg ("putroutconst constnull.drout_1415__COMPILOBJ_PREDEF#0",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1560*/ meltfptr[1559]))
+ ( /*_.VALROUT___V1567*/ meltfptr[1566]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V212*/ meltfptr[211]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]);
+ NULL != /*_.VALDATA___V215*/ meltfptr[214]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]);
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1560*/ meltfptr[1559]))
+ ( /*_.VALROUT___V1567*/ meltfptr[1566]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1411__COMPILOBJ_PREDEF#2",
+ melt_checkmsg ("putroutconst constnull.drout_1415__COMPILOBJ_PREDEF#2",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[2] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4183:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4207:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1560*/ meltfptr[1559]);
+ meltgc_touch ( /*_.VALROUT___V1567*/ meltfptr[1566]);
- /*putclosurout#89 */
- melt_assertmsg ("putclosrout#89 checkclo",
+ /*putclosurout#90 */
+ melt_assertmsg ("putclosrout#90 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1561*/ meltfptr[1560])) ==
+ ( /*_.VALCLO___V1568*/ meltfptr[1567])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#89 checkrout",
+ melt_assertmsg ("putclosrout#90 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1560*/ meltfptr[1559]))
+ ( /*_.VALROUT___V1567*/ meltfptr[1566]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1561*/ meltfptr[1560])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1568*/ meltfptr[1567])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1561*/ meltfptr[1560]);
+ meltgc_touch ( /*_.VALCLO___V1568*/ meltfptr[1567]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1562*/ meltfptr[1561]))
+ ( /*_.VALDATA___V1569*/ meltfptr[1568]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1562*/
- meltfptr[1561]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1562*/ meltfptr[1561]))->
+ ( /*_.VALDATA___V1569*/
+ meltfptr[1568]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1569*/ meltfptr[1568]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1563*/ meltfptr[1562]);
+ /*_.VALSTR___V1570*/ meltfptr[1569]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1562*/ meltfptr[1561]);
+ meltgc_touch ( /*_.VALDATA___V1569*/ meltfptr[1568]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#0",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#0",
NULL != ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V154*/ meltfptr[153]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]);
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_25 */
+ NULL != /*_.VALDATA___V157*/ meltfptr[156]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]);
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_26 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#4",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#4",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#5",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#5",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[5] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#6",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#6",
NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1565*/ meltfptr[1564]))
+ ( /*_.VALDATA___V1572*/ meltfptr[1571]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1565*/
- meltfptr[1564]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1565*/ meltfptr[1564]))->
+ ( /*_.VALDATA___V1572*/
+ meltfptr[1571]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1566*/ meltfptr[1565]);
+ /*_.VALSTR___V1573*/ meltfptr[1572]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1565*/ meltfptr[1564]);
+ meltgc_touch ( /*_.VALDATA___V1572*/ meltfptr[1571]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#8",
- NULL != ( /*_.VALDATA___V1565*/ meltfptr[1564]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1565*/ meltfptr[1564]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#8",
+ NULL != ( /*_.VALDATA___V1572*/ meltfptr[1571]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1567*/ meltfptr[1566]))
+ ( /*_.VALDATA___V1574*/ meltfptr[1573]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1567*/
- meltfptr[1566]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1567*/ meltfptr[1566]))->
+ ( /*_.VALDATA___V1574*/
+ meltfptr[1573]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1568*/ meltfptr[1567]);
+ /*_.VALSTR___V1575*/ meltfptr[1574]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1567*/ meltfptr[1566]);
+ meltgc_touch ( /*_.VALDATA___V1574*/ meltfptr[1573]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#9",
- NULL != ( /*_.VALDATA___V1567*/ meltfptr[1566]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V1567*/ meltfptr[1566]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#9",
+ NULL != ( /*_.VALDATA___V1574*/ meltfptr[1573]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#10",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#10",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#11",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#11",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V324*/ meltfptr[323]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
+ NULL != /*_.VALDATA___V327*/ meltfptr[326]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#13",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#13",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#14",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#14",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[14] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V475*/ meltfptr[474]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#16",
- NULL != ( /*_.VALSTR___V1569*/ meltfptr[1568]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[16] =
- (melt_ptr_t) ( /*_.VALSTR___V1569*/ meltfptr[1568]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#16",
+ NULL != ( /*_.VALSTR___V1576*/ meltfptr[1575]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALSTR___V1576*/ meltfptr[1575]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#18",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#18",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[18] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#19",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#19",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[20] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#21",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#21",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[21] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1570*/ meltfptr[1569]))
+ ( /*_.VALROUT___V1577*/ meltfptr[1576]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1422__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1426__LAMBDA_#0",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1570*/ meltfptr[1569]))
+ ( /*_.VALROUT___V1577*/ meltfptr[1576]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1570*/ meltfptr[1569]))
+ ( /*_.VALROUT___V1577*/ meltfptr[1576]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1422__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1426__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1570*/ meltfptr[1569]))
+ ( /*_.VALROUT___V1577*/ meltfptr[1576]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1570*/ meltfptr[1569]);
+ meltgc_touch ( /*_.VALROUT___V1577*/ meltfptr[1576]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#23",
- NULL != ( /*_.VALROUT___V1570*/ meltfptr[1569]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[23] =
- (melt_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#23",
+ NULL != ( /*_.VALROUT___V1577*/ meltfptr[1576]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALROUT___V1577*/ meltfptr[1576]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#24",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#24",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[24] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#25",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#25",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[25] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#26",
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#26",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[26] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1571*/ meltfptr[1570]))
+ ( /*_.VALROUT___V1578*/ meltfptr[1577]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1423__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1427__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1571*/ meltfptr[1570]))
+ ( /*_.VALROUT___V1578*/ meltfptr[1577]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1423__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1427__LAMBDA_#1",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1571*/ meltfptr[1570]))
+ ( /*_.VALROUT___V1578*/ meltfptr[1577]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1423__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1427__LAMBDA_#2",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1571*/ meltfptr[1570]))
+ ( /*_.VALROUT___V1578*/ meltfptr[1577]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V816*/ meltfptr[815]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
+ NULL != /*_.VALDATA___V819*/ meltfptr[818]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]);
- MELT_LOCATION ("warmelt-genobj.melt:4288:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4312:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1571*/ meltfptr[1570]);
+ meltgc_touch ( /*_.VALROUT___V1578*/ meltfptr[1577]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#28",
- NULL != ( /*_.VALROUT___V1571*/ meltfptr[1570]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[28] =
- (melt_ptr_t) ( /*_.VALROUT___V1571*/ meltfptr[1570]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#28",
+ NULL != ( /*_.VALROUT___V1578*/ meltfptr[1577]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[29] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[30] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[30] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:4315:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4339:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1572*/ meltfptr[1571]))
+ ( /*_.VALROUT___V1579*/ meltfptr[1578]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1572*/ meltfptr[1571])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:4315:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4339:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1572*/ meltfptr[1571]);
+ meltgc_touch ( /*_.VALROUT___V1579*/ meltfptr[1578]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1415__COMPIL_DATA_AND_SLOTS_FILL#31",
- NULL != ( /*_.VALROUT___V1572*/ meltfptr[1571]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[31] =
- (melt_ptr_t) ( /*_.VALROUT___V1572*/ meltfptr[1571]);
+ ("putroutconst constnull.drout_1419__COMPIL_DATA_AND_SLOTS_FILL#31",
+ NULL != ( /*_.VALROUT___V1579*/ meltfptr[1578]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1571*/ meltfptr[1570])->tabval[31] =
+ (melt_ptr_t) ( /*_.VALROUT___V1579*/ meltfptr[1578]);
- MELT_LOCATION ("warmelt-genobj.melt:4199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4223:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1564*/ meltfptr[1563]);
+ meltgc_touch ( /*_.VALROUT___V1571*/ meltfptr[1570]);
- /*putclosurout#90 */
- melt_assertmsg ("putclosrout#90 checkclo",
+ /*putclosurout#91 */
+ melt_assertmsg ("putclosrout#91 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1573*/ meltfptr[1572])) ==
+ ( /*_.VALCLO___V1580*/ meltfptr[1579])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#90 checkrout",
+ melt_assertmsg ("putclosrout#91 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1564*/ meltfptr[1563]))
+ ( /*_.VALROUT___V1571*/ meltfptr[1570]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1573*/ meltfptr[1572])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1580*/ meltfptr[1579])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1571*/ meltfptr[1570]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1573*/ meltfptr[1572]);
+ meltgc_touch ( /*_.VALCLO___V1580*/ meltfptr[1579]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#0",
+ ("putroutconst constnull.drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#0",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#1",
+ ("putroutconst constnull.drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#2",
+ ("putroutconst constnull.drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#2",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[2] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
- MELT_LOCATION ("warmelt-genobj.melt:4342:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4366:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1575*/ meltfptr[1574]))
+ ( /*_.VALROUT___V1582*/ meltfptr[1581]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1261*/ meltfptr[1260]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]);
+ NULL != /*_.VALCLO___V1264*/ meltfptr[1263]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1582*/ meltfptr[1581])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1264*/ meltfptr[1263]);
- MELT_LOCATION ("warmelt-genobj.melt:4342:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4366:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1575*/ meltfptr[1574]);
+ meltgc_touch ( /*_.VALROUT___V1582*/ meltfptr[1581]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1425__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#4",
- NULL != ( /*_.VALROUT___V1575*/ meltfptr[1574]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[4] =
- (melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574]);
+ ("putroutconst constnull.drout_1429__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#4",
+ NULL != ( /*_.VALROUT___V1582*/ meltfptr[1581]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581]);
- MELT_LOCATION ("warmelt-genobj.melt:4337:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4361:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1574*/ meltfptr[1573]);
+ meltgc_touch ( /*_.VALROUT___V1581*/ meltfptr[1580]);
- /*putclosurout#91 */
- melt_assertmsg ("putclosrout#91 checkclo",
+ /*putclosurout#92 */
+ melt_assertmsg ("putclosrout#92 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1576*/ meltfptr[1575])) ==
+ ( /*_.VALCLO___V1583*/ meltfptr[1582])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#91 checkrout",
+ melt_assertmsg ("putclosrout#92 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1574*/ meltfptr[1573]))
+ ( /*_.VALROUT___V1581*/ meltfptr[1580]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1576*/ meltfptr[1575])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1583*/ meltfptr[1582])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1581*/ meltfptr[1580]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1576*/ meltfptr[1575]);
+ meltgc_touch ( /*_.VALCLO___V1583*/ meltfptr[1582]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#0",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#0",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#1",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#1",
NULL != ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/ meltfptr[53]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#2",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#4",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V264*/ meltfptr[263]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ NULL != /*_.VALDATA___V267*/ meltfptr[266]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#6",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#6",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[6] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#7",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#7",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1428__COMPILOBJ_DATASYMBOL#8",
+ ("putroutconst constnull.drout_1432__COMPILOBJ_DATASYMBOL#8",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1573*/ meltfptr[1572]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1577*/ meltfptr[1576])->tabval[9] =
- (melt_ptr_t) ( /*_.VALCLO___V1573*/ meltfptr[1572]);
+ NULL != /*_.VALCLO___V1580*/ meltfptr[1579]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALCLO___V1580*/ meltfptr[1579]);
- MELT_LOCATION ("warmelt-genobj.melt:4345:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4369:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1577*/ meltfptr[1576]);
+ meltgc_touch ( /*_.VALROUT___V1584*/ meltfptr[1583]);
- /*putclosurout#92 */
- melt_assertmsg ("putclosrout#92 checkclo",
+ /*putclosurout#93 */
+ melt_assertmsg ("putclosrout#93 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1578*/ meltfptr[1577])) ==
+ ( /*_.VALCLO___V1585*/ meltfptr[1584])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#92 checkrout",
+ melt_assertmsg ("putclosrout#93 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1577*/ meltfptr[1576]))
+ ( /*_.VALROUT___V1584*/ meltfptr[1583]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1578*/ meltfptr[1577])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1577*/ meltfptr[1576]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1585*/ meltfptr[1584])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1578*/ meltfptr[1577]);
+ meltgc_touch ( /*_.VALCLO___V1585*/ meltfptr[1584]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#0",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#0",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#1",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#3",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V264*/ meltfptr[263]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ NULL != /*_.VALDATA___V267*/ meltfptr[266]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#5",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#5",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[5] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V250*/ meltfptr[249]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]);
+ NULL != /*_.VALDATA___V253*/ meltfptr[252]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#7",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#7",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1430__COMPILOBJ_DATAINSTANCE#8",
+ ("putroutconst constnull.drout_1434__COMPILOBJ_DATAINSTANCE#8",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1573*/ meltfptr[1572]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1579*/ meltfptr[1578])->tabval[9] =
- (melt_ptr_t) ( /*_.VALCLO___V1573*/ meltfptr[1572]);
+ NULL != /*_.VALCLO___V1580*/ meltfptr[1579]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALCLO___V1580*/ meltfptr[1579]);
- MELT_LOCATION ("warmelt-genobj.melt:4396:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4420:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1579*/ meltfptr[1578]);
+ meltgc_touch ( /*_.VALROUT___V1586*/ meltfptr[1585]);
- /*putclosurout#93 */
- melt_assertmsg ("putclosrout#93 checkclo",
+ /*putclosurout#94 */
+ melt_assertmsg ("putclosrout#94 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1580*/ meltfptr[1579])) ==
+ ( /*_.VALCLO___V1587*/ meltfptr[1586])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#93 checkrout",
+ melt_assertmsg ("putclosrout#94 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1579*/ meltfptr[1578]))
+ ( /*_.VALROUT___V1586*/ meltfptr[1585]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1580*/ meltfptr[1579])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1579*/ meltfptr[1578]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1587*/ meltfptr[1586])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1580*/ meltfptr[1579]);
+ meltgc_touch ( /*_.VALCLO___V1587*/ meltfptr[1586]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#0",
- NULL != ( /*_.CLASS_NREP_DATATUPLE__V115*/ meltfptr[114]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V115*/ meltfptr[114]);
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#0",
+ NULL != ( /*_.CLASS_NREP_DATATUPLE__V116*/ meltfptr[115]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V116*/ meltfptr[115]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#1",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#2",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#4",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#4",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[4] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#5",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1582*/ meltfptr[1581]))
+ ( /*_.VALROUT___V1589*/ meltfptr[1588]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1436__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1440__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1582*/ meltfptr[1581])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1589*/ meltfptr[1588])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4490:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4514:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1582*/ meltfptr[1581]);
+ meltgc_touch ( /*_.VALROUT___V1589*/ meltfptr[1588]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#6",
- NULL != ( /*_.VALROUT___V1582*/ meltfptr[1581]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[6] =
- (melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581]);
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#6",
+ NULL != ( /*_.VALROUT___V1589*/ meltfptr[1588]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALROUT___V1589*/ meltfptr[1588]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#7",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#8",
+ melt_checkmsg ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#8",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[9] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1583*/ meltfptr[1582]))
+ ( /*_.VALDATA___V1590*/ meltfptr[1589]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1583*/
- meltfptr[1582]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1583*/ meltfptr[1582]))->
+ ( /*_.VALDATA___V1590*/
+ meltfptr[1589]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1584*/ meltfptr[1583]);
+ /*_.VALSTR___V1591*/ meltfptr[1590]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1583*/ meltfptr[1582]);
+ meltgc_touch ( /*_.VALDATA___V1590*/ meltfptr[1589]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#10",
- NULL != ( /*_.VALDATA___V1583*/ meltfptr[1582]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1583*/ meltfptr[1582]);
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#10",
+ NULL != ( /*_.VALDATA___V1590*/ meltfptr[1589]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1585*/ meltfptr[1584]))
+ ( /*_.VALDATA___V1592*/ meltfptr[1591]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1585*/
- meltfptr[1584]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1585*/ meltfptr[1584]))->
+ ( /*_.VALDATA___V1592*/
+ meltfptr[1591]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1592*/ meltfptr[1591]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1586*/ meltfptr[1585]);
+ /*_.VALSTR___V1593*/ meltfptr[1592]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1585*/ meltfptr[1584]);
+ meltgc_touch ( /*_.VALDATA___V1592*/ meltfptr[1591]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#11",
- NULL != ( /*_.VALDATA___V1585*/ meltfptr[1584]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V1585*/ meltfptr[1584]);
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#11",
+ NULL != ( /*_.VALDATA___V1592*/ meltfptr[1591]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V1592*/ meltfptr[1591]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V270*/ meltfptr[269]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]);
+ NULL != /*_.VALDATA___V273*/ meltfptr[272]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#13",
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#13",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[13] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#14",
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#14",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[14] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#15",
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#15",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[15] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V750*/ meltfptr[749]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]);
+ NULL != /*_.VALDATA___V753*/ meltfptr[752]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#17",
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#17",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[17] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4518:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4542:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1587*/ meltfptr[1586]))
+ ( /*_.VALROUT___V1594*/ meltfptr[1593]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V750*/ meltfptr[749]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1587*/ meltfptr[1586])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]);
+ NULL != /*_.VALDATA___V753*/ meltfptr[752]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1594*/ meltfptr[1593])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]);
- MELT_LOCATION ("warmelt-genobj.melt:4518:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4542:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1587*/ meltfptr[1586]))
+ ( /*_.VALROUT___V1594*/ meltfptr[1593]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1441__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1445__LAMBDA_#1",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1587*/ meltfptr[1586])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1594*/ meltfptr[1593])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4518:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4542:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1587*/ meltfptr[1586]);
+ meltgc_touch ( /*_.VALROUT___V1594*/ meltfptr[1593]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1432__COMPILOBJ_DATATUPLE#18",
- NULL != ( /*_.VALROUT___V1587*/ meltfptr[1586]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[18] =
- (melt_ptr_t) ( /*_.VALROUT___V1587*/ meltfptr[1586]);
+ ("putroutconst constnull.drout_1436__COMPILOBJ_DATATUPLE#18",
+ NULL != ( /*_.VALROUT___V1594*/ meltfptr[1593]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALROUT___V1594*/ meltfptr[1593]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1581*/ meltfptr[1580])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1588*/ meltfptr[1587])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4497:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1581*/ meltfptr[1580]);
+ meltgc_touch ( /*_.VALROUT___V1588*/ meltfptr[1587]);
- /*putclosurout#94 */
- melt_assertmsg ("putclosrout#94 checkclo",
+ /*putclosurout#95 */
+ melt_assertmsg ("putclosrout#95 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1588*/ meltfptr[1587])) ==
+ ( /*_.VALCLO___V1595*/ meltfptr[1594])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#94 checkrout",
+ melt_assertmsg ("putclosrout#95 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1581*/ meltfptr[1580]))
+ ( /*_.VALROUT___V1588*/ meltfptr[1587]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1588*/ meltfptr[1587])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1581*/ meltfptr[1580]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1595*/ meltfptr[1594])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1588*/ meltfptr[1587]);
- /*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1588*/ meltfptr[1587]);
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_26 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_27 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*touch:DATACLOSURE_*/
+ meltgc_touch ( /*_.VALCLO___V1595*/ meltfptr[1594]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1589*/ meltfptr[1588]))
+ ( /*_.VALDATA___V1596*/ meltfptr[1595]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1589*/
- meltfptr[1588]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1589*/ meltfptr[1588]))->
+ ( /*_.VALDATA___V1596*/
+ meltfptr[1595]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1596*/ meltfptr[1595]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1590*/ meltfptr[1589]);
+ /*_.VALSTR___V1597*/ meltfptr[1596]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1589*/ meltfptr[1588]);
+ meltgc_touch ( /*_.VALDATA___V1596*/ meltfptr[1595]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#0",
- NULL != ( /*_.CLASS_NREP_DATASTRING__V116*/ meltfptr[115]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V116*/ meltfptr[115]);
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#0",
+ NULL != ( /*_.CLASS_NREP_DATASTRING__V117*/ meltfptr[116]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V117*/ meltfptr[116]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#1",
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#3",
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#4",
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1592*/ meltfptr[1591]))
+ ( /*_.VALDATA___V1599*/ meltfptr[1598]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1592*/
- meltfptr[1591]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1592*/ meltfptr[1591]))->
+ ( /*_.VALDATA___V1599*/
+ meltfptr[1598]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1599*/ meltfptr[1598]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1593*/ meltfptr[1592]);
+ /*_.VALSTR___V1600*/ meltfptr[1599]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1592*/ meltfptr[1591]);
+ meltgc_touch ( /*_.VALDATA___V1599*/ meltfptr[1598]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#6",
- NULL != ( /*_.VALDATA___V1592*/ meltfptr[1591]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1592*/ meltfptr[1591]);
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#6",
+ NULL != ( /*_.VALDATA___V1599*/ meltfptr[1598]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1599*/ meltfptr[1598]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V300*/ meltfptr[299]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]);
+ NULL != /*_.VALDATA___V303*/ meltfptr[302]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]);
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_26 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_27 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#8",
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1442__COMPILOBJ_DATASTRING#9",
+ ("putroutconst constnull.drout_1446__COMPILOBJ_DATASTRING#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4543:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4567:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1591*/ meltfptr[1590]);
+ meltgc_touch ( /*_.VALROUT___V1598*/ meltfptr[1597]);
- /*putclosurout#95 */
- melt_assertmsg ("putclosrout#95 checkclo",
+ /*putclosurout#96 */
+ melt_assertmsg ("putclosrout#96 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1594*/ meltfptr[1593])) ==
+ ( /*_.VALCLO___V1601*/ meltfptr[1600])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#95 checkrout",
+ melt_assertmsg ("putclosrout#96 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1591*/ meltfptr[1590]))
+ ( /*_.VALROUT___V1598*/ meltfptr[1597]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1594*/ meltfptr[1593])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1591*/ meltfptr[1590]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1601*/ meltfptr[1600])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1598*/ meltfptr[1597]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1594*/ meltfptr[1593]);
+ meltgc_touch ( /*_.VALCLO___V1601*/ meltfptr[1600]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1595*/ meltfptr[1594]))
+ ( /*_.VALDATA___V1602*/ meltfptr[1601]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1595*/
- meltfptr[1594]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594]))->
+ ( /*_.VALDATA___V1602*/
+ meltfptr[1601]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1596*/ meltfptr[1595]);
+ /*_.VALSTR___V1603*/ meltfptr[1602]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1595*/ meltfptr[1594]);
+ meltgc_touch ( /*_.VALDATA___V1602*/ meltfptr[1601]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#0",
- NULL != ( /*_.CLASS_NREP_DATABOXEDINTEGER__V117*/ meltfptr[116]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V117*/ meltfptr[116]);
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#0",
+ NULL != ( /*_.CLASS_NREP_DATABOXEDINTEGER__V118*/ meltfptr[117]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V118*/ meltfptr[117]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#1",
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#3",
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#4",
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1598*/ meltfptr[1597]))
+ ( /*_.VALDATA___V1605*/ meltfptr[1604]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1598*/
- meltfptr[1597]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1598*/ meltfptr[1597]))->
+ ( /*_.VALDATA___V1605*/
+ meltfptr[1604]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1605*/ meltfptr[1604]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1599*/ meltfptr[1598]);
+ /*_.VALSTR___V1606*/ meltfptr[1605]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1598*/ meltfptr[1597]);
+ meltgc_touch ( /*_.VALDATA___V1605*/ meltfptr[1604]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#6",
- NULL != ( /*_.VALDATA___V1598*/ meltfptr[1597]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1598*/ meltfptr[1597]);
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#6",
+ NULL != ( /*_.VALDATA___V1605*/ meltfptr[1604]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1605*/ meltfptr[1604]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V318*/ meltfptr[317]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]);
+ NULL != /*_.VALDATA___V321*/ meltfptr[320]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#8",
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#8",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1448__COMPILOBJ_DATABOXEDINTEGER#9",
+ ("putroutconst constnull.drout_1452__COMPILOBJ_DATABOXEDINTEGER#9",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4588:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4612:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1597*/ meltfptr[1596]);
+ meltgc_touch ( /*_.VALROUT___V1604*/ meltfptr[1603]);
- /*putclosurout#96 */
- melt_assertmsg ("putclosrout#96 checkclo",
+ /*putclosurout#97 */
+ melt_assertmsg ("putclosrout#97 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1600*/ meltfptr[1599])) ==
+ ( /*_.VALCLO___V1607*/ meltfptr[1606])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#96 checkrout",
+ melt_assertmsg ("putclosrout#97 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1597*/ meltfptr[1596]))
+ ( /*_.VALROUT___V1604*/ meltfptr[1603]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1600*/ meltfptr[1599])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1597*/ meltfptr[1596]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1607*/ meltfptr[1606])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1600*/ meltfptr[1599]);
+ meltgc_touch ( /*_.VALCLO___V1607*/ meltfptr[1606]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1601*/ meltfptr[1600]))
+ ( /*_.VALDATA___V1608*/ meltfptr[1607]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1601*/
- meltfptr[1600]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1601*/ meltfptr[1600]))->
+ ( /*_.VALDATA___V1608*/
+ meltfptr[1607]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1608*/ meltfptr[1607]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1602*/ meltfptr[1601]);
+ /*_.VALSTR___V1609*/ meltfptr[1608]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1601*/ meltfptr[1600]);
+ meltgc_touch ( /*_.VALDATA___V1608*/ meltfptr[1607]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#0",
- NULL != ( /*_.CLASS_NREP_DATACLOSURE__V118*/ meltfptr[117]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V118*/ meltfptr[117]);
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#0",
+ NULL != ( /*_.CLASS_NREP_DATACLOSURE__V119*/ meltfptr[118]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V119*/ meltfptr[118]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#1",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#2",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#4",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#5",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1604*/ meltfptr[1603]))
+ ( /*_.VALDATA___V1611*/ meltfptr[1610]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1604*/
- meltfptr[1603]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1604*/ meltfptr[1603]))->
+ ( /*_.VALDATA___V1611*/
+ meltfptr[1610]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1605*/ meltfptr[1604]);
+ /*_.VALSTR___V1612*/ meltfptr[1611]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1604*/ meltfptr[1603]);
+ meltgc_touch ( /*_.VALDATA___V1611*/ meltfptr[1610]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#7",
- NULL != ( /*_.VALDATA___V1604*/ meltfptr[1603]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1604*/ meltfptr[1603]);
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#7",
+ NULL != ( /*_.VALDATA___V1611*/ meltfptr[1610]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1606*/ meltfptr[1605]))
+ ( /*_.VALDATA___V1613*/ meltfptr[1612]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1606*/
- meltfptr[1605]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1606*/ meltfptr[1605]))->
+ ( /*_.VALDATA___V1613*/
+ meltfptr[1612]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1613*/ meltfptr[1612]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1607*/ meltfptr[1606]);
+ /*_.VALSTR___V1614*/ meltfptr[1613]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1606*/ meltfptr[1605]);
+ meltgc_touch ( /*_.VALDATA___V1613*/ meltfptr[1612]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#8",
- NULL != ( /*_.VALDATA___V1606*/ meltfptr[1605]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1606*/ meltfptr[1605]);
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#8",
+ NULL != ( /*_.VALDATA___V1613*/ meltfptr[1612]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1613*/ meltfptr[1612]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#9",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#9",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V280*/ meltfptr[279]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]);
+ NULL != /*_.VALDATA___V283*/ meltfptr[282]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#11",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#11",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#12",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#12",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#13",
- NULL != ( /*_.CLASS_NREP_DATAROUTINE__V119*/ meltfptr[118]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[13] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V119*/ meltfptr[118]);
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#13",
+ NULL != ( /*_.CLASS_NREP_DATAROUTINE__V120*/ meltfptr[119]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[13] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V120*/ meltfptr[119]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V852*/ meltfptr[851]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]);
+ NULL != /*_.VALDATA___V855*/ meltfptr[854]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#15",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#15",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[15] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V982*/ meltfptr[981]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]);
+ NULL != /*_.VALDATA___V985*/ meltfptr[984]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#17",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#17",
NULL != ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[17] =
(melt_ptr_t) ( /*_.MULTIPLE_EVERY__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#18",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#18",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[18] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V866*/ meltfptr[865]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ NULL != /*_.VALDATA___V869*/ meltfptr[868]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#20",
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#20",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[20] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1608*/ meltfptr[1607]))
+ ( /*_.VALROUT___V1615*/ meltfptr[1614]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1464__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1468__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1608*/ meltfptr[1607]))
+ ( /*_.VALROUT___V1615*/ meltfptr[1614]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V866*/ meltfptr[865]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
+ NULL != /*_.VALDATA___V869*/ meltfptr[868]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]);
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1608*/ meltfptr[1607]))
+ ( /*_.VALROUT___V1615*/ meltfptr[1614]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1464__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1468__LAMBDA_#2",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4696:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1608*/ meltfptr[1607]);
+ meltgc_touch ( /*_.VALROUT___V1615*/ meltfptr[1614]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1454__COMPILOBJ_DATACLOSURE#21",
- NULL != ( /*_.VALROUT___V1608*/ meltfptr[1607]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[21] =
- (melt_ptr_t) ( /*_.VALROUT___V1608*/ meltfptr[1607]);
+ ("putroutconst constnull.drout_1458__COMPILOBJ_DATACLOSURE#21",
+ NULL != ( /*_.VALROUT___V1615*/ meltfptr[1614]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALROUT___V1615*/ meltfptr[1614]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1603*/ meltfptr[1602])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4657:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1603*/ meltfptr[1602]);
+ meltgc_touch ( /*_.VALROUT___V1610*/ meltfptr[1609]);
- /*putclosurout#97 */
- melt_assertmsg ("putclosrout#97 checkclo",
+ /*putclosurout#98 */
+ melt_assertmsg ("putclosrout#98 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1609*/ meltfptr[1608])) ==
+ ( /*_.VALCLO___V1616*/ meltfptr[1615])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#97 checkrout",
+ melt_assertmsg ("putclosrout#98 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1603*/ meltfptr[1602]))
+ ( /*_.VALROUT___V1610*/ meltfptr[1609]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1609*/ meltfptr[1608])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1603*/ meltfptr[1602]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1616*/ meltfptr[1615])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1610*/ meltfptr[1609]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1609*/ meltfptr[1608]);
+ meltgc_touch ( /*_.VALCLO___V1616*/ meltfptr[1615]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1610*/ meltfptr[1609]))
+ ( /*_.VALDATA___V1617*/ meltfptr[1616]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1610*/
- meltfptr[1609]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1610*/ meltfptr[1609]))->
+ ( /*_.VALDATA___V1617*/
+ meltfptr[1616]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1611*/ meltfptr[1610]);
+ /*_.VALSTR___V1618*/ meltfptr[1617]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1610*/ meltfptr[1609]);
+ meltgc_touch ( /*_.VALDATA___V1617*/ meltfptr[1616]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1612*/ meltfptr[1611]))
+ ( /*_.VALDATA___V1619*/ meltfptr[1618]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1612*/
- meltfptr[1611]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1612*/ meltfptr[1611]))->
+ ( /*_.VALDATA___V1619*/
+ meltfptr[1618]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1619*/ meltfptr[1618]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1613*/ meltfptr[1612]);
+ /*_.VALSTR___V1620*/ meltfptr[1619]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1612*/ meltfptr[1611]);
+ meltgc_touch ( /*_.VALDATA___V1619*/ meltfptr[1618]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#0",
- NULL != ( /*_.CLASS_NREP_DATAROUTINE__V119*/ meltfptr[118]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V119*/ meltfptr[118]);
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#0",
+ NULL != ( /*_.CLASS_NREP_DATAROUTINE__V120*/ meltfptr[119]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V120*/ meltfptr[119]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#1",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1008*/ meltfptr[1007]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ NULL != /*_.VALDATA___V1011*/ meltfptr[1010]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1615*/ meltfptr[1614]))
+ ( /*_.VALDATA___V1622*/ meltfptr[1621]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1615*/
- meltfptr[1614]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614]))->
+ ( /*_.VALDATA___V1622*/
+ meltfptr[1621]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1622*/ meltfptr[1621]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1616*/ meltfptr[1615]);
+ /*_.VALSTR___V1623*/ meltfptr[1622]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1615*/ meltfptr[1614]);
+ meltgc_touch ( /*_.VALDATA___V1622*/ meltfptr[1621]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#4",
- NULL != ( /*_.VALDATA___V1615*/ meltfptr[1614]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614]);
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#4",
+ NULL != ( /*_.VALDATA___V1622*/ meltfptr[1621]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1622*/ meltfptr[1621]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#5",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#5",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#6",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#6",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#7",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V290*/ meltfptr[289]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]);
+ NULL != /*_.VALDATA___V293*/ meltfptr[292]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#9",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#9",
NULL != ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[9] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#10",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#10",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#11",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#11",
NULL != ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#12",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#12",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1617*/ meltfptr[1616]))
+ ( /*_.VALDATA___V1624*/ meltfptr[1623]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1617*/
- meltfptr[1616]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]))->
+ ( /*_.VALDATA___V1624*/
+ meltfptr[1623]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1624*/ meltfptr[1623]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1618*/ meltfptr[1617]);
+ /*_.VALSTR___V1625*/ meltfptr[1624]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1617*/ meltfptr[1616]);
+ meltgc_touch ( /*_.VALDATA___V1624*/ meltfptr[1623]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#13",
- NULL != ( /*_.VALDATA___V1617*/ meltfptr[1616]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]);
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#13",
+ NULL != ( /*_.VALDATA___V1624*/ meltfptr[1623]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1624*/ meltfptr[1623]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#14",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#14",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[14] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#15",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#15",
NULL != ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#16",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#16",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#17",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#17",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[17] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#18",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#18",
NULL != ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[18] =
(melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V908*/ meltfptr[907]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]);
+ NULL != /*_.VALDATA___V911*/ meltfptr[910]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#20",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#20",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[20] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V890*/ meltfptr[889]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ NULL != /*_.VALDATA___V893*/ meltfptr[892]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#22",
- NULL != ( /*_.CLASS_NREP_QUASIDATA__V120*/ meltfptr[119]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[22] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V120*/ meltfptr[119]);
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#22",
+ NULL != ( /*_.CLASS_NREP_QUASIDATA__V121*/ meltfptr[120]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[22] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V121*/ meltfptr[120]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#1",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#3",
NULL != ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V908*/ meltfptr[907]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]);
+ NULL != /*_.VALDATA___V911*/ meltfptr[910]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#5",
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#5",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V890*/ meltfptr[889]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ NULL != /*_.VALDATA___V893*/ meltfptr[892]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1619*/ meltfptr[1618]))
+ ( /*_.VALROUT___V1626*/ meltfptr[1625]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1471__LAMBDA_#7",
- NULL != ( /*_.CLASS_NREP_QUASIDATA__V120*/ meltfptr[119]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[7] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V120*/ meltfptr[119]);
+ melt_checkmsg ("putroutconst constnull.drout_1475__LAMBDA_#7",
+ NULL != ( /*_.CLASS_NREP_QUASIDATA__V121*/ meltfptr[120]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[7] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V121*/ meltfptr[120]);
- MELT_LOCATION ("warmelt-genobj.melt:4777:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4801:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1619*/ meltfptr[1618]);
+ meltgc_touch ( /*_.VALROUT___V1626*/ meltfptr[1625]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#23",
- NULL != ( /*_.VALROUT___V1619*/ meltfptr[1618]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[23] =
- (melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618]);
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#23",
+ NULL != ( /*_.VALROUT___V1626*/ meltfptr[1625]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALROUT___V1626*/ meltfptr[1625]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1465__COMPILOBJ_DATAROUTINE#25",
+ ("putroutconst constnull.drout_1469__COMPILOBJ_DATAROUTINE#25",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[25] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4720:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4744:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1614*/ meltfptr[1613]);
+ meltgc_touch ( /*_.VALROUT___V1621*/ meltfptr[1620]);
- /*putclosurout#98 */
- melt_assertmsg ("putclosrout#98 checkclo",
+ /*putclosurout#99 */
+ melt_assertmsg ("putclosrout#99 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1620*/ meltfptr[1619])) ==
+ ( /*_.VALCLO___V1627*/ meltfptr[1626])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#98 checkrout",
+ melt_assertmsg ("putclosrout#99 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1614*/ meltfptr[1613]))
+ ( /*_.VALROUT___V1621*/ meltfptr[1620]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1620*/ meltfptr[1619])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1614*/ meltfptr[1613]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1627*/ meltfptr[1626])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1620*/ meltfptr[1619]);
+ meltgc_touch ( /*_.VALCLO___V1627*/ meltfptr[1626]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1621*/ meltfptr[1620]))
+ ( /*_.VALDATA___V1628*/ meltfptr[1627]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1621*/
- meltfptr[1620]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620]))->
+ ( /*_.VALDATA___V1628*/
+ meltfptr[1627]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1622*/ meltfptr[1621]);
+ /*_.VALSTR___V1629*/ meltfptr[1628]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1621*/ meltfptr[1620]);
+ meltgc_touch ( /*_.VALDATA___V1628*/ meltfptr[1627]);
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1623*/ meltfptr[1622]))
+ ( /*_.VALROUT___V1630*/ meltfptr[1629]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0",
+ ("putroutconst constnull.drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0",
NULL !=
- ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/
- meltfptr[120]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]);
+ ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/
+ meltfptr[121]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1630*/ meltfptr[1629])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]);
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1623*/ meltfptr[1622]))
+ ( /*_.VALROUT___V1630*/ meltfptr[1629]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1474__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1",
+ ("putroutconst constnull.drout_1478__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1630*/ meltfptr[1629])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-genobj.melt:4838:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4862:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1623*/ meltfptr[1622]);
+ meltgc_touch ( /*_.VALROUT___V1630*/ meltfptr[1629]);
- /*putclosurout#99 */
- melt_assertmsg ("putclosrout#99 checkclo",
+ /*putclosurout#100 */
+ melt_assertmsg ("putclosrout#100 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1624*/ meltfptr[1623])) ==
+ ( /*_.VALCLO___V1631*/ meltfptr[1630])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#99 checkrout",
+ melt_assertmsg ("putclosrout#100 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1623*/ meltfptr[1622]))
+ ( /*_.VALROUT___V1630*/ meltfptr[1629]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1624*/ meltfptr[1623])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1631*/ meltfptr[1630])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1630*/ meltfptr[1629]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1624*/ meltfptr[1623]);
+ meltgc_touch ( /*_.VALCLO___V1631*/ meltfptr[1630]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1625*/ meltfptr[1624]))
+ ( /*_.VALDATA___V1632*/ meltfptr[1631]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1625*/
- meltfptr[1624]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624]))->
+ ( /*_.VALDATA___V1632*/
+ meltfptr[1631]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1632*/ meltfptr[1631]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1626*/ meltfptr[1625]);
+ /*_.VALSTR___V1633*/ meltfptr[1632]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1625*/ meltfptr[1624]);
+ meltgc_touch ( /*_.VALDATA___V1632*/ meltfptr[1631]);
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1627*/ meltfptr[1626]))
+ ( /*_.VALROUT___V1634*/ meltfptr[1633]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#0",
+ ("putroutconst constnull.drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#0",
NULL !=
- ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V122*/
- meltfptr[121]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V122*/
- meltfptr[121]);
+ ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V123*/
+ meltfptr[122]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1634*/ meltfptr[1633])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V123*/
+ meltfptr[122]);
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1627*/ meltfptr[1626]))
+ ( /*_.VALROUT___V1634*/ meltfptr[1633]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1478__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#1",
+ ("putroutconst constnull.drout_1482__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1634*/ meltfptr[1633])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-genobj.melt:4848:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_27 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_28 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1627*/ meltfptr[1626]);
+ meltgc_touch ( /*_.VALROUT___V1634*/ meltfptr[1633]);
- /*putclosurout#100 */
- melt_assertmsg ("putclosrout#100 checkclo",
+ /*putclosurout#101 */
+ melt_assertmsg ("putclosrout#101 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1628*/ meltfptr[1627])) ==
+ ( /*_.VALCLO___V1635*/ meltfptr[1634])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#100 checkrout",
+ melt_assertmsg ("putclosrout#101 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1627*/ meltfptr[1626]))
+ ( /*_.VALROUT___V1634*/ meltfptr[1633]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1628*/ meltfptr[1627])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1635*/ meltfptr[1634])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1634*/ meltfptr[1633]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1628*/ meltfptr[1627]);
+ meltgc_touch ( /*_.VALCLO___V1635*/ meltfptr[1634]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1629*/ meltfptr[1628]))
+ ( /*_.VALDATA___V1636*/ meltfptr[1635]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1629*/
- meltfptr[1628]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1629*/ meltfptr[1628]))->
+ ( /*_.VALDATA___V1636*/
+ meltfptr[1635]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1630*/ meltfptr[1629]);
+ /*_.VALSTR___V1637*/ meltfptr[1636]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1629*/ meltfptr[1628]);
+ meltgc_touch ( /*_.VALDATA___V1636*/ meltfptr[1635]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#0",
- NULL != ( /*_.CLASS_NREP_STORE_PREDEFINED__V123*/ meltfptr[122]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V123*/ meltfptr[122]);
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#0",
+ NULL != ( /*_.CLASS_NREP_STORE_PREDEFINED__V124*/ meltfptr[123]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V124*/ meltfptr[123]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#1",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#2",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#3",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#3",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[3] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#4",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#4",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#5",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#5",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1482__COMPILOBJ_NREP_STORE_PREDEFINED#6",
+ ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_STORE_PREDEFINED#6",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1051*/ meltfptr[1050]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1051*/ meltfptr[1050]);
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_27 */
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_28 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:4858:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4882:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1631*/ meltfptr[1630]);
+ meltgc_touch ( /*_.VALROUT___V1638*/ meltfptr[1637]);
- /*putclosurout#101 */
- melt_assertmsg ("putclosrout#101 checkclo",
+ /*putclosurout#102 */
+ melt_assertmsg ("putclosrout#102 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1632*/ meltfptr[1631])) ==
+ ( /*_.VALCLO___V1639*/ meltfptr[1638])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#101 checkrout",
+ melt_assertmsg ("putclosrout#102 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1631*/ meltfptr[1630]))
+ ( /*_.VALROUT___V1638*/ meltfptr[1637]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1632*/ meltfptr[1631])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1639*/ meltfptr[1638])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1638*/ meltfptr[1637]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1632*/ meltfptr[1631]);
+ meltgc_touch ( /*_.VALCLO___V1639*/ meltfptr[1638]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1633*/ meltfptr[1632]))
+ ( /*_.VALDATA___V1640*/ meltfptr[1639]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1633*/
- meltfptr[1632]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632]))->
+ ( /*_.VALDATA___V1640*/
+ meltfptr[1639]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1640*/ meltfptr[1639]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1634*/ meltfptr[1633]);
+ /*_.VALSTR___V1641*/ meltfptr[1640]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1633*/ meltfptr[1632]);
+ meltgc_touch ( /*_.VALDATA___V1640*/ meltfptr[1639]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0",
NULL !=
- ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V124*/
- meltfptr[123]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V124*/ meltfptr[123]);
+ ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V125*/
+ meltfptr[124]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V125*/ meltfptr[124]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1",
NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#2",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V475*/ meltfptr[474]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#6",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#6",
NULL != ( /*_.DISCR_STRING__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#7",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#8",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#8",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[8] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V982*/ meltfptr[981]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]);
+ NULL != /*_.VALDATA___V985*/ meltfptr[984]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#10",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#10",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[10] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#11",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#11",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V290*/ meltfptr[289]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]);
+ NULL != /*_.VALDATA___V293*/ meltfptr[292]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#13",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#13",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[13] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#14",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#14",
NULL !=
- ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/
- meltfptr[120]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[14] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]);
+ ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/
+ meltfptr[121]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[14] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V890*/ meltfptr[889]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ NULL != /*_.VALDATA___V893*/ meltfptr[892]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#16",
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#16",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[16] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V982*/ meltfptr[981]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]);
+ NULL != /*_.VALDATA___V985*/ meltfptr[984]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#1",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[1] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#2",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V290*/ meltfptr[289]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]);
+ NULL != /*_.VALDATA___V293*/ meltfptr[292]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#4",
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#4",
NULL != ( /*_.LIST_EVERY__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[4] =
(melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#5",
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#5",
NULL !=
- ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[5] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]);
+ ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[5] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V890*/ meltfptr[889]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ NULL != /*_.VALDATA___V893*/ meltfptr[892]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#7",
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#7",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1491__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1495__LAMBDA_#0",
NULL !=
- ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]);
+ ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V890*/ meltfptr[889]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
+ NULL != /*_.VALDATA___V893*/ meltfptr[892]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1491__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1495__LAMBDA_#2",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V914*/ meltfptr[913]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]);
+ NULL != /*_.VALDATA___V917*/ meltfptr[916]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1491__LAMBDA_#4",
- NULL != ( /*_.VALSTR___V1638*/ meltfptr[1637]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[4] =
- (melt_ptr_t) ( /*_.VALSTR___V1638*/ meltfptr[1637]);
+ melt_checkmsg ("putroutconst constnull.drout_1495__LAMBDA_#4",
+ NULL != ( /*_.VALSTR___V1645*/ meltfptr[1644]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALSTR___V1645*/ meltfptr[1644]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1637*/ meltfptr[1636]))
+ ( /*_.VALROUT___V1644*/ meltfptr[1643]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1644*/ meltfptr[1643])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4963:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1637*/ meltfptr[1636]);
+ meltgc_touch ( /*_.VALROUT___V1644*/ meltfptr[1643]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1636*/ meltfptr[1635]))
+ ( /*_.VALROUT___V1643*/ meltfptr[1642]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1490__LAMBDA_#10",
- NULL != ( /*_.VALROUT___V1637*/ meltfptr[1636]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1636*/ meltfptr[1635])->tabval[10] =
- (melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636]);
+ melt_checkmsg ("putroutconst constnull.drout_1494__LAMBDA_#10",
+ NULL != ( /*_.VALROUT___V1644*/ meltfptr[1643]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALROUT___V1644*/ meltfptr[1643]);
- MELT_LOCATION ("warmelt-genobj.melt:4926:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4950:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1636*/ meltfptr[1635]);
+ meltgc_touch ( /*_.VALROUT___V1643*/ meltfptr[1642]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#19",
- NULL != ( /*_.VALROUT___V1636*/ meltfptr[1635]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[19] =
- (melt_ptr_t) ( /*_.VALROUT___V1636*/ meltfptr[1635]);
+ ("putroutconst constnull.drout_1490__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#19",
+ NULL != ( /*_.VALROUT___V1643*/ meltfptr[1642]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1642*/ meltfptr[1641])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642]);
- MELT_LOCATION ("warmelt-genobj.melt:4895:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4919:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1635*/ meltfptr[1634]);
+ meltgc_touch ( /*_.VALROUT___V1642*/ meltfptr[1641]);
- /*putclosurout#102 */
- melt_assertmsg ("putclosrout#102 checkclo",
+ /*putclosurout#103 */
+ melt_assertmsg ("putclosrout#103 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1639*/ meltfptr[1638])) ==
+ ( /*_.VALCLO___V1646*/ meltfptr[1645])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#102 checkrout",
+ melt_assertmsg ("putclosrout#103 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1635*/ meltfptr[1634]))
+ ( /*_.VALROUT___V1642*/ meltfptr[1641]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1639*/ meltfptr[1638])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1646*/ meltfptr[1645])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1642*/ meltfptr[1641]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1639*/ meltfptr[1638]);
+ meltgc_touch ( /*_.VALCLO___V1646*/ meltfptr[1645]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1640*/ meltfptr[1639]))
+ ( /*_.VALDATA___V1647*/ meltfptr[1646]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1640*/
- meltfptr[1639]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1640*/ meltfptr[1639]))->
+ ( /*_.VALDATA___V1647*/
+ meltfptr[1646]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1647*/ meltfptr[1646]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1641*/ meltfptr[1640]);
+ /*_.VALSTR___V1648*/ meltfptr[1647]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1640*/ meltfptr[1639]);
+ meltgc_touch ( /*_.VALDATA___V1647*/ meltfptr[1646]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1642*/ meltfptr[1641]))
+ ( /*_.VALDATA___V1649*/ meltfptr[1648]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1642*/
- meltfptr[1641]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641]))->
+ ( /*_.VALDATA___V1649*/
+ meltfptr[1648]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1643*/ meltfptr[1642]);
+ /*_.VALSTR___V1650*/ meltfptr[1649]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1642*/ meltfptr[1641]);
+ meltgc_touch ( /*_.VALDATA___V1649*/ meltfptr[1648]);
- MELT_LOCATION ("warmelt-genobj.melt:4991:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5015:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1644*/ meltfptr[1643]))
+ ( /*_.VALDATA___V1651*/ meltfptr[1650]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1644*/
- meltfptr[1643]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643]))->
+ ( /*_.VALDATA___V1651*/
+ meltfptr[1650]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1651*/ meltfptr[1650]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1645*/ meltfptr[1644]);
+ /*_.VALSTR___V1652*/ meltfptr[1651]);
- MELT_LOCATION ("warmelt-genobj.melt:4991:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5015:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1644*/ meltfptr[1643]);
+ meltgc_touch ( /*_.VALDATA___V1651*/ meltfptr[1650]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1646*/ meltfptr[1645]))
+ ( /*_.VALDATA___V1653*/ meltfptr[1652]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1646*/
- meltfptr[1645]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645]))->
+ ( /*_.VALDATA___V1653*/
+ meltfptr[1652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1647*/ meltfptr[1646]);
+ /*_.VALSTR___V1654*/ meltfptr[1653]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1646*/ meltfptr[1645]);
+ meltgc_touch ( /*_.VALDATA___V1653*/ meltfptr[1652]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1648*/ meltfptr[1647]))
+ ( /*_.VALDATA___V1655*/ meltfptr[1654]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1648*/
- meltfptr[1647]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1648*/ meltfptr[1647]))->
+ ( /*_.VALDATA___V1655*/
+ meltfptr[1654]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1655*/ meltfptr[1654]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1649*/ meltfptr[1648]);
+ /*_.VALSTR___V1656*/ meltfptr[1655]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1648*/ meltfptr[1647]);
+ meltgc_touch ( /*_.VALDATA___V1655*/ meltfptr[1654]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/ meltfptr[1649]))
+ ( /*_.VALDATA___V1657*/ meltfptr[1656]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/
- meltfptr[1649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]))->
+ ( /*_.VALDATA___V1657*/
+ meltfptr[1656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1651*/ meltfptr[1650]);
+ /*_.VALSTR___V1658*/ meltfptr[1657]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/ meltfptr[1649]))
+ ( /*_.VALDATA___V1657*/ meltfptr[1656]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/
- meltfptr[1649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]))->
+ ( /*_.VALDATA___V1657*/
+ meltfptr[1656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.CLASS_PROPED__V125*/ meltfptr[124]);
+ /*_.CLASS_PROPED__V126*/ meltfptr[125]);
- /*putupl#614 */
- melt_assertmsg ("putupl #614 checktup",
+ /*putupl#609 */
+ melt_assertmsg ("putupl #609 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1652*/ meltfptr[1651])) ==
+ ( /*_.VALTUP___V1659*/ meltfptr[1658])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #614 checkoff",
+ melt_assertmsg ("putupl #609 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1652*/
- meltfptr[1651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1652*/ meltfptr[1651]))->tabval[0] =
+ ( /*_.VALTUP___V1659*/
+ meltfptr[1658]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1659*/ meltfptr[1658]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
- ((melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]), 5))), (0))));
+ ((melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]), 5))), (0))));
- /*putupl#615 */
- melt_assertmsg ("putupl #615 checktup",
+ /*putupl#610 */
+ melt_assertmsg ("putupl #610 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1652*/ meltfptr[1651])) ==
+ ( /*_.VALTUP___V1659*/ meltfptr[1658])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #615 checkoff",
+ melt_assertmsg ("putupl #610 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1652*/
- meltfptr[1651]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1652*/ meltfptr[1651]))->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]);
+ ( /*_.VALTUP___V1659*/
+ meltfptr[1658]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1659*/ meltfptr[1658]))->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1652*/ meltfptr[1651]);
+ meltgc_touch ( /*_.VALTUP___V1659*/ meltfptr[1658]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/ meltfptr[1649]))
+ ( /*_.VALDATA___V1657*/ meltfptr[1656]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/
- meltfptr[1649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]))->
+ ( /*_.VALDATA___V1657*/
+ meltfptr[1656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1652*/ meltfptr[1651]);
+ /*_.VALTUP___V1659*/ meltfptr[1658]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1653*/ meltfptr[1652]))
+ ( /*_.VALDATA___V1660*/ meltfptr[1659]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1653*/
- meltfptr[1652]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]))->
+ ( /*_.VALDATA___V1660*/
+ meltfptr[1659]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1660*/ meltfptr[1659]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1654*/ meltfptr[1653]);
+ /*_.VALSTR___V1661*/ meltfptr[1660]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1653*/ meltfptr[1652]))
+ ( /*_.VALDATA___V1660*/ meltfptr[1659]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1653*/
- meltfptr[1652]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]))->
+ ( /*_.VALDATA___V1660*/
+ meltfptr[1659]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1660*/ meltfptr[1659]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1653*/ meltfptr[1652]);
+ meltgc_touch ( /*_.VALDATA___V1660*/ meltfptr[1659]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1655*/ meltfptr[1654]))
+ ( /*_.VALDATA___V1662*/ meltfptr[1661]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1655*/
- meltfptr[1654]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1655*/ meltfptr[1654]))->
+ ( /*_.VALDATA___V1662*/
+ meltfptr[1661]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1662*/ meltfptr[1661]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1656*/ meltfptr[1655]);
+ /*_.VALSTR___V1663*/ meltfptr[1662]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1655*/ meltfptr[1654]))
+ ( /*_.VALDATA___V1662*/ meltfptr[1661]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1655*/
- meltfptr[1654]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1655*/ meltfptr[1654]))->
+ ( /*_.VALDATA___V1662*/
+ meltfptr[1661]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1662*/ meltfptr[1661]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1655*/ meltfptr[1654]);
+ meltgc_touch ( /*_.VALDATA___V1662*/ meltfptr[1661]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1657*/ meltfptr[1656]))
+ ( /*_.VALDATA___V1664*/ meltfptr[1663]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1657*/
- meltfptr[1656]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
+ ( /*_.VALDATA___V1664*/
+ meltfptr[1663]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1658*/ meltfptr[1657]);
+ /*_.VALSTR___V1665*/ meltfptr[1664]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1657*/ meltfptr[1656]))
+ ( /*_.VALDATA___V1664*/ meltfptr[1663]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1657*/
- meltfptr[1656]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
+ ( /*_.VALDATA___V1664*/
+ meltfptr[1663]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1657*/ meltfptr[1656]);
+ meltgc_touch ( /*_.VALDATA___V1664*/ meltfptr[1663]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1659*/ meltfptr[1658]))
+ ( /*_.VALDATA___V1666*/ meltfptr[1665]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1659*/
- meltfptr[1658]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1659*/ meltfptr[1658]))->
+ ( /*_.VALDATA___V1666*/
+ meltfptr[1665]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1666*/ meltfptr[1665]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1660*/ meltfptr[1659]);
+ /*_.VALSTR___V1667*/ meltfptr[1666]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1659*/ meltfptr[1658]))
+ ( /*_.VALDATA___V1666*/ meltfptr[1665]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1659*/
- meltfptr[1658]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1659*/ meltfptr[1658]))->
+ ( /*_.VALDATA___V1666*/
+ meltfptr[1665]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1666*/ meltfptr[1665]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1659*/ meltfptr[1658]);
+ meltgc_touch ( /*_.VALDATA___V1666*/ meltfptr[1665]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1661*/ meltfptr[1660]))
+ ( /*_.VALDATA___V1668*/ meltfptr[1667]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1661*/
- meltfptr[1660]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]))->
+ ( /*_.VALDATA___V1668*/
+ meltfptr[1667]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1668*/ meltfptr[1667]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1662*/ meltfptr[1661]);
+ /*_.VALSTR___V1669*/ meltfptr[1668]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1661*/ meltfptr[1660]))
+ ( /*_.VALDATA___V1668*/ meltfptr[1667]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1661*/
- meltfptr[1660]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]))->
+ ( /*_.VALDATA___V1668*/
+ meltfptr[1667]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1668*/ meltfptr[1667]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1661*/ meltfptr[1660]);
+ meltgc_touch ( /*_.VALDATA___V1668*/ meltfptr[1667]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1663*/ meltfptr[1662]))
+ ( /*_.VALDATA___V1670*/ meltfptr[1669]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1663*/
- meltfptr[1662]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662]))->
+ ( /*_.VALDATA___V1670*/
+ meltfptr[1669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1670*/ meltfptr[1669]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1664*/ meltfptr[1663]);
+ /*_.VALSTR___V1671*/ meltfptr[1670]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1663*/ meltfptr[1662]))
+ ( /*_.VALDATA___V1670*/ meltfptr[1669]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1663*/
- meltfptr[1662]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662]))->
+ ( /*_.VALDATA___V1670*/
+ meltfptr[1669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1670*/ meltfptr[1669]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1663*/ meltfptr[1662]);
+ meltgc_touch ( /*_.VALDATA___V1670*/ meltfptr[1669]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1665*/ meltfptr[1664]))
+ ( /*_.VALDATA___V1672*/ meltfptr[1671]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1665*/
- meltfptr[1664]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1665*/ meltfptr[1664]))->
+ ( /*_.VALDATA___V1672*/
+ meltfptr[1671]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1666*/ meltfptr[1665]);
+ /*_.VALSTR___V1673*/ meltfptr[1672]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1665*/ meltfptr[1664]))
+ ( /*_.VALDATA___V1672*/ meltfptr[1671]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1665*/
- meltfptr[1664]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1665*/ meltfptr[1664]))->
+ ( /*_.VALDATA___V1672*/
+ meltfptr[1671]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1650*/ meltfptr[1649]);
+ /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1665*/ meltfptr[1664]);
+ meltgc_touch ( /*_.VALDATA___V1672*/ meltfptr[1671]);
- /*putupl#616 */
- melt_assertmsg ("putupl #616 checktup",
+ /*putupl#611 */
+ melt_assertmsg ("putupl #611 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #616 checkoff",
+ melt_assertmsg ("putupl #611 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[0] =
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
- ((melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]), 6))), (0))));
+ ((melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]), 6))), (0))));
- /*putupl#617 */
- melt_assertmsg ("putupl #617 checktup",
+ /*putupl#612 */
+ melt_assertmsg ("putupl #612 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #617 checkoff",
+ melt_assertmsg ("putupl #612 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1660*/ meltfptr[1659]);
- /*putupl#618 */
- melt_assertmsg ("putupl #618 checktup",
+ /*putupl#613 */
+ melt_assertmsg ("putupl #613 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #618 checkoff",
+ melt_assertmsg ("putupl #613 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1655*/ meltfptr[1654]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1662*/ meltfptr[1661]);
- /*putupl#619 */
- melt_assertmsg ("putupl #619 checktup",
+ /*putupl#614 */
+ melt_assertmsg ("putupl #614 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #619 checkoff",
+ melt_assertmsg ("putupl #614 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663]);
- /*putupl#620 */
- melt_assertmsg ("putupl #620 checktup",
+ /*putupl#615 */
+ melt_assertmsg ("putupl #615 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #620 checkoff",
+ melt_assertmsg ("putupl #615 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1659*/ meltfptr[1658]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1666*/ meltfptr[1665]);
- /*putupl#621 */
- melt_assertmsg ("putupl #621 checktup",
+ /*putupl#616 */
+ melt_assertmsg ("putupl #616 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #621 checkoff",
+ melt_assertmsg ("putupl #616 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1668*/ meltfptr[1667]);
- /*putupl#622 */
- melt_assertmsg ("putupl #622 checktup",
+ /*putupl#617 */
+ melt_assertmsg ("putupl #617 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #622 checkoff",
+ melt_assertmsg ("putupl #617 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1670*/ meltfptr[1669]);
- /*putupl#623 */
- melt_assertmsg ("putupl #623 checktup",
+ /*putupl#618 */
+ melt_assertmsg ("putupl #618 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/ meltfptr[1666])) ==
+ ( /*_.VALTUP___V1674*/ meltfptr[1673])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #623 checkoff",
+ melt_assertmsg ("putupl #618 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1667*/
- meltfptr[1666]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1667*/ meltfptr[1666]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1665*/ meltfptr[1664]);
+ ( /*_.VALTUP___V1674*/
+ meltfptr[1673]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1674*/ meltfptr[1673]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1667*/ meltfptr[1666]);
+ meltgc_touch ( /*_.VALTUP___V1674*/ meltfptr[1673]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/ meltfptr[1649]))
+ ( /*_.VALDATA___V1657*/ meltfptr[1656]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1650*/
- meltfptr[1649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]))->
+ ( /*_.VALDATA___V1657*/
+ meltfptr[1656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1667*/ meltfptr[1666]);
+ /*_.VALTUP___V1674*/ meltfptr[1673]);
- MELT_LOCATION ("warmelt-genobj.melt:4995:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5019:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ meltgc_touch ( /*_.VALDATA___V1657*/ meltfptr[1656]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1668*/ meltfptr[1667]))
+ ( /*_.VALDATA___V1675*/ meltfptr[1674]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1668*/
- meltfptr[1667]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1668*/ meltfptr[1667]))->
+ ( /*_.VALDATA___V1675*/
+ meltfptr[1674]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1675*/ meltfptr[1674]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1669*/ meltfptr[1668]);
+ /*_.VALSTR___V1676*/ meltfptr[1675]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1668*/ meltfptr[1667]);
+ meltgc_touch ( /*_.VALDATA___V1675*/ meltfptr[1674]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1670*/ meltfptr[1669]))
+ ( /*_.VALDATA___V1677*/ meltfptr[1676]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1670*/
- meltfptr[1669]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1670*/ meltfptr[1669]))->
+ ( /*_.VALDATA___V1677*/
+ meltfptr[1676]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1671*/ meltfptr[1670]);
+ /*_.VALSTR___V1678*/ meltfptr[1677]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1670*/ meltfptr[1669]);
+ meltgc_touch ( /*_.VALDATA___V1677*/ meltfptr[1676]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1672*/ meltfptr[1671]))
+ ( /*_.VALDATA___V1679*/ meltfptr[1678]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1672*/
- meltfptr[1671]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]))->
+ ( /*_.VALDATA___V1679*/
+ meltfptr[1678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1679*/ meltfptr[1678]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1673*/ meltfptr[1672]);
+ /*_.VALSTR___V1680*/ meltfptr[1679]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1672*/ meltfptr[1671]);
+ meltgc_touch ( /*_.VALDATA___V1679*/ meltfptr[1678]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1674*/ meltfptr[1673]))
+ ( /*_.VALDATA___V1681*/ meltfptr[1680]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1674*/
- meltfptr[1673]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673]))->
+ ( /*_.VALDATA___V1681*/
+ meltfptr[1680]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1675*/ meltfptr[1674]);
+ /*_.VALSTR___V1682*/ meltfptr[1681]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1674*/ meltfptr[1673]);
+ meltgc_touch ( /*_.VALDATA___V1681*/ meltfptr[1680]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1676*/ meltfptr[1675]))
+ ( /*_.VALDATA___V1683*/ meltfptr[1682]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1676*/
- meltfptr[1675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1676*/ meltfptr[1675]))->
+ ( /*_.VALDATA___V1683*/
+ meltfptr[1682]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1683*/ meltfptr[1682]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1677*/ meltfptr[1676]);
+ /*_.VALSTR___V1684*/ meltfptr[1683]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1676*/ meltfptr[1675]);
+ meltgc_touch ( /*_.VALDATA___V1683*/ meltfptr[1682]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1678*/ meltfptr[1677]))
+ ( /*_.VALDATA___V1685*/ meltfptr[1684]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1678*/
- meltfptr[1677]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1678*/ meltfptr[1677]))->
+ ( /*_.VALDATA___V1685*/
+ meltfptr[1684]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1685*/ meltfptr[1684]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1679*/ meltfptr[1678]);
+ /*_.VALSTR___V1686*/ meltfptr[1685]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1678*/ meltfptr[1677]);
+ meltgc_touch ( /*_.VALDATA___V1685*/ meltfptr[1684]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1680*/ meltfptr[1679]))
+ ( /*_.VALDATA___V1687*/ meltfptr[1686]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1680*/
- meltfptr[1679]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679]))->
+ ( /*_.VALDATA___V1687*/
+ meltfptr[1686]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1681*/ meltfptr[1680]);
+ /*_.VALSTR___V1688*/ meltfptr[1687]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1680*/ meltfptr[1679]);
+ meltgc_touch ( /*_.VALDATA___V1687*/ meltfptr[1686]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1682*/ meltfptr[1681]))
+ ( /*_.VALDATA___V1689*/ meltfptr[1688]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1682*/
- meltfptr[1681]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1682*/ meltfptr[1681]))->
+ ( /*_.VALDATA___V1689*/
+ meltfptr[1688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1683*/ meltfptr[1682]);
+ /*_.VALSTR___V1690*/ meltfptr[1689]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1682*/ meltfptr[1681]);
+ meltgc_touch ( /*_.VALDATA___V1689*/ meltfptr[1688]);
- MELT_LOCATION ("warmelt-genobj.melt:5013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1684*/ meltfptr[1683]))
+ ( /*_.VALDATA___V1691*/ meltfptr[1690]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1684*/
- meltfptr[1683]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1684*/ meltfptr[1683]))->
+ ( /*_.VALDATA___V1691*/
+ meltfptr[1690]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1685*/ meltfptr[1684]);
+ /*_.VALSTR___V1692*/ meltfptr[1691]);
- MELT_LOCATION ("warmelt-genobj.melt:5013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1684*/ meltfptr[1683]);
+ meltgc_touch ( /*_.VALDATA___V1691*/ meltfptr[1690]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1686*/ meltfptr[1685]))
+ ( /*_.VALDATA___V1693*/ meltfptr[1692]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1686*/
- meltfptr[1685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685]))->
+ ( /*_.VALDATA___V1693*/
+ meltfptr[1692]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1687*/ meltfptr[1686]);
+ /*_.VALSTR___V1694*/ meltfptr[1693]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1686*/ meltfptr[1685]);
+ meltgc_touch ( /*_.VALDATA___V1693*/ meltfptr[1692]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_28 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_29 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/ meltfptr[1687]))
+ ( /*_.VALDATA___V1695*/ meltfptr[1694]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/
- meltfptr[1687]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]))->
+ ( /*_.VALDATA___V1695*/
+ meltfptr[1694]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1689*/ meltfptr[1688]);
+ /*_.VALSTR___V1696*/ meltfptr[1695]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/ meltfptr[1687]))
+ ( /*_.VALDATA___V1695*/ meltfptr[1694]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/
- meltfptr[1687]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]))->
+ ( /*_.VALDATA___V1695*/
+ meltfptr[1694]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.CLASS_PROPED__V125*/ meltfptr[124]);
+ /*_.CLASS_PROPED__V126*/ meltfptr[125]);
- /*putupl#624 */
- melt_assertmsg ("putupl #624 checktup",
+ /*putupl#619 */
+ melt_assertmsg ("putupl #619 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1690*/ meltfptr[1689])) ==
+ ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #624 checkoff",
+ melt_assertmsg ("putupl #619 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1690*/
- meltfptr[1689]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1690*/ meltfptr[1689]))->tabval[0] =
+ ( /*_.VALTUP___V1697*/
+ meltfptr[1696]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
- ((melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]), 5))), (0))));
+ ((melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]), 5))), (0))));
- /*putupl#625 */
- melt_assertmsg ("putupl #625 checktup",
+ /*putupl#620 */
+ melt_assertmsg ("putupl #620 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1690*/ meltfptr[1689])) ==
+ ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #625 checkoff",
+ melt_assertmsg ("putupl #620 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1690*/
- meltfptr[1689]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1690*/ meltfptr[1689]))->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]);
+ ( /*_.VALTUP___V1697*/
+ meltfptr[1696]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1690*/ meltfptr[1689]);
+ meltgc_touch ( /*_.VALTUP___V1697*/ meltfptr[1696]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/ meltfptr[1687]))
+ ( /*_.VALDATA___V1695*/ meltfptr[1694]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/
- meltfptr[1687]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]))->
+ ( /*_.VALDATA___V1695*/
+ meltfptr[1694]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1690*/ meltfptr[1689]);
+ /*_.VALTUP___V1697*/ meltfptr[1696]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1691*/ meltfptr[1690]))
+ ( /*_.VALDATA___V1698*/ meltfptr[1697]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1691*/
- meltfptr[1690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]))->
+ ( /*_.VALDATA___V1698*/
+ meltfptr[1697]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1692*/ meltfptr[1691]);
+ /*_.VALSTR___V1699*/ meltfptr[1698]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1691*/ meltfptr[1690]))
+ ( /*_.VALDATA___V1698*/ meltfptr[1697]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1691*/
- meltfptr[1690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]))->
+ ( /*_.VALDATA___V1698*/
+ meltfptr[1697]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1688*/ meltfptr[1687]);
+ /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1691*/ meltfptr[1690]);
+ meltgc_touch ( /*_.VALDATA___V1698*/ meltfptr[1697]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1693*/ meltfptr[1692]))
+ ( /*_.VALDATA___V1700*/ meltfptr[1699]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1693*/
- meltfptr[1692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]))->
+ ( /*_.VALDATA___V1700*/
+ meltfptr[1699]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1694*/ meltfptr[1693]);
+ /*_.VALSTR___V1701*/ meltfptr[1700]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1693*/ meltfptr[1692]))
+ ( /*_.VALDATA___V1700*/ meltfptr[1699]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1693*/
- meltfptr[1692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]))->
+ ( /*_.VALDATA___V1700*/
+ meltfptr[1699]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1688*/ meltfptr[1687]);
+ /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1693*/ meltfptr[1692]);
+ meltgc_touch ( /*_.VALDATA___V1700*/ meltfptr[1699]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1695*/ meltfptr[1694]))
+ ( /*_.VALDATA___V1702*/ meltfptr[1701]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1695*/
- meltfptr[1694]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
+ ( /*_.VALDATA___V1702*/
+ meltfptr[1701]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1702*/ meltfptr[1701]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1696*/ meltfptr[1695]);
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_28 */
+ /*_.VALSTR___V1703*/ meltfptr[1702]);
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_29 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1695*/ meltfptr[1694]))
+ ( /*_.VALDATA___V1702*/ meltfptr[1701]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1695*/
- meltfptr[1694]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
+ ( /*_.VALDATA___V1702*/
+ meltfptr[1701]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1702*/ meltfptr[1701]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1688*/ meltfptr[1687]);
+ /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1695*/ meltfptr[1694]);
+ meltgc_touch ( /*_.VALDATA___V1702*/ meltfptr[1701]);
- /*putupl#626 */
- melt_assertmsg ("putupl #626 checktup",
+ /*putupl#621 */
+ melt_assertmsg ("putupl #621 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
+ ( /*_.VALTUP___V1704*/ meltfptr[1703])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #626 checkoff",
+ melt_assertmsg ("putupl #621 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/
- meltfptr[1696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[0] =
+ ( /*_.VALTUP___V1704*/
+ meltfptr[1703]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1704*/ meltfptr[1703]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
- ((melt_ptr_t) ( /*_.CLASS_PROPED__V125*/ meltfptr[124]), 6))), (0))));
+ ((melt_ptr_t) ( /*_.CLASS_PROPED__V126*/ meltfptr[125]), 6))), (0))));
- /*putupl#627 */
- melt_assertmsg ("putupl #627 checktup",
+ /*putupl#622 */
+ melt_assertmsg ("putupl #622 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
+ ( /*_.VALTUP___V1704*/ meltfptr[1703])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #627 checkoff",
+ melt_assertmsg ("putupl #622 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/
- meltfptr[1696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]);
+ ( /*_.VALTUP___V1704*/
+ meltfptr[1703]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1704*/ meltfptr[1703]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]);
- /*putupl#628 */
- melt_assertmsg ("putupl #628 checktup",
+ /*putupl#623 */
+ melt_assertmsg ("putupl #623 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
+ ( /*_.VALTUP___V1704*/ meltfptr[1703])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #628 checkoff",
+ melt_assertmsg ("putupl #623 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/
- meltfptr[1696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]);
+ ( /*_.VALTUP___V1704*/
+ meltfptr[1703]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1704*/ meltfptr[1703]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]);
- /*putupl#629 */
- melt_assertmsg ("putupl #629 checktup",
+ /*putupl#624 */
+ melt_assertmsg ("putupl #624 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/ meltfptr[1696])) ==
+ ( /*_.VALTUP___V1704*/ meltfptr[1703])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #629 checkoff",
+ melt_assertmsg ("putupl #624 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1697*/
- meltfptr[1696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1697*/ meltfptr[1696]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ( /*_.VALTUP___V1704*/
+ meltfptr[1703]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1704*/ meltfptr[1703]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1702*/ meltfptr[1701]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1697*/ meltfptr[1696]);
+ meltgc_touch ( /*_.VALTUP___V1704*/ meltfptr[1703]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/ meltfptr[1687]))
+ ( /*_.VALDATA___V1695*/ meltfptr[1694]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1688*/
- meltfptr[1687]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]))->
+ ( /*_.VALDATA___V1695*/
+ meltfptr[1694]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1697*/ meltfptr[1696]);
+ /*_.VALTUP___V1704*/ meltfptr[1703]);
- MELT_LOCATION ("warmelt-genobj.melt:5016:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ meltgc_touch ( /*_.VALDATA___V1695*/ meltfptr[1694]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1698*/ meltfptr[1697]))
+ ( /*_.VALDATA___V1705*/ meltfptr[1704]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1698*/
- meltfptr[1697]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]))->
+ ( /*_.VALDATA___V1705*/
+ meltfptr[1704]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1699*/ meltfptr[1698]);
+ /*_.VALSTR___V1706*/ meltfptr[1705]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1698*/ meltfptr[1697]);
+ meltgc_touch ( /*_.VALDATA___V1705*/ meltfptr[1704]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1700*/ meltfptr[1699]))
+ ( /*_.VALDATA___V1707*/ meltfptr[1706]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1700*/
- meltfptr[1699]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]))->
+ ( /*_.VALDATA___V1707*/
+ meltfptr[1706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1701*/ meltfptr[1700]);
+ /*_.VALSTR___V1708*/ meltfptr[1707]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1700*/ meltfptr[1699]);
+ meltgc_touch ( /*_.VALDATA___V1707*/ meltfptr[1706]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1702*/ meltfptr[1701]))
+ ( /*_.VALDATA___V1709*/ meltfptr[1708]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1702*/
- meltfptr[1701]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1702*/ meltfptr[1701]))->
+ ( /*_.VALDATA___V1709*/
+ meltfptr[1708]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1703*/ meltfptr[1702]);
+ /*_.VALSTR___V1710*/ meltfptr[1709]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1702*/ meltfptr[1701]);
+ meltgc_touch ( /*_.VALDATA___V1709*/ meltfptr[1708]);
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1704*/ meltfptr[1703]))
+ ( /*_.VALROUT___V1711*/ meltfptr[1710]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1555__COMPILTST_ANYTESTER#0",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1704*/ meltfptr[1703])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ melt_checkmsg ("putroutconst constnull.drout_1559__COMPILTST_ANYTESTER#0",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1711*/ meltfptr[1710])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1704*/ meltfptr[1703]))
+ ( /*_.VALROUT___V1711*/ meltfptr[1710]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1555__COMPILTST_ANYTESTER#1",
+ melt_checkmsg ("putroutconst constnull.drout_1559__COMPILTST_ANYTESTER#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1704*/ meltfptr[1703])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1711*/ meltfptr[1710])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1704*/ meltfptr[1703]))
+ ( /*_.VALROUT___V1711*/ meltfptr[1710]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1704*/ meltfptr[1703])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1711*/ meltfptr[1710])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1704*/ meltfptr[1703]))
+ ( /*_.VALROUT___V1711*/ meltfptr[1710]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1555__COMPILTST_ANYTESTER#3",
+ melt_checkmsg ("putroutconst constnull.drout_1559__COMPILTST_ANYTESTER#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1704*/ meltfptr[1703])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1711*/ meltfptr[1710])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5026:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5050:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1704*/ meltfptr[1703]);
+ meltgc_touch ( /*_.VALROUT___V1711*/ meltfptr[1710]);
- /*putclosurout#103 */
- melt_assertmsg ("putclosrout#103 checkclo",
+ /*putclosurout#104 */
+ melt_assertmsg ("putclosrout#104 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1705*/ meltfptr[1704])) ==
+ ( /*_.VALCLO___V1712*/ meltfptr[1711])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#103 checkrout",
+ melt_assertmsg ("putclosrout#104 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1704*/ meltfptr[1703]))
+ ( /*_.VALROUT___V1711*/ meltfptr[1710]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1705*/ meltfptr[1704])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1704*/ meltfptr[1703]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1712*/ meltfptr[1711])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1711*/ meltfptr[1710]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1705*/ meltfptr[1704]);
+ meltgc_touch ( /*_.VALCLO___V1712*/ meltfptr[1711]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1706*/ meltfptr[1705]))
+ ( /*_.VALDATA___V1713*/ meltfptr[1712]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1706*/
- meltfptr[1705]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1706*/ meltfptr[1705]))->
+ ( /*_.VALDATA___V1713*/
+ meltfptr[1712]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1713*/ meltfptr[1712]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1707*/ meltfptr[1706]);
+ /*_.VALSTR___V1714*/ meltfptr[1713]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1706*/ meltfptr[1705]);
+ meltgc_touch ( /*_.VALDATA___V1713*/ meltfptr[1712]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#0",
- NULL != ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#0",
+ NULL != ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#1",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#2",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#3",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#4",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#5",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#5",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V482*/ meltfptr[481]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]);
+ NULL != /*_.VALDATA___V485*/ meltfptr[484]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V516*/ meltfptr[515]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]);
+ NULL != /*_.VALDATA___V519*/ meltfptr[518]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#8",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#8",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V502*/ meltfptr[501]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]);
+ NULL != /*_.VALDATA___V505*/ meltfptr[504]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#11",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#11",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[11] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#12",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[12] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#12",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[12] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#13",
- NULL != ( /*_.CLASS_NORMTESTER_ANYTESTER__V128*/ meltfptr[127]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[13] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANYTESTER__V128*/ meltfptr[127]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#13",
+ NULL != ( /*_.CLASS_NORMTESTER_ANYTESTER__V129*/ meltfptr[128]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[13] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANYTESTER__V129*/ meltfptr[128]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1607__NORMTESTER_LABELINSTR#0",
+ ("putroutconst constnull.drout_1621__NORMTESTER_LABELINSTR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1710*/ meltfptr[1709])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1717*/ meltfptr[1716])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1607__NORMTESTER_LABELINSTR#1",
+ ("putroutconst constnull.drout_1621__NORMTESTER_LABELINSTR#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1710*/ meltfptr[1709])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1717*/ meltfptr[1716])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1607__NORMTESTER_LABELINSTR#2",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1710*/ meltfptr[1709])->tabval[2] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1621__NORMTESTER_LABELINSTR#2",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1717*/ meltfptr[1716])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1607__NORMTESTER_LABELINSTR#3",
- NULL != ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1710*/ meltfptr[1709])->tabval[3] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]);
+ ("putroutconst constnull.drout_1621__NORMTESTER_LABELINSTR#3",
+ NULL != ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1717*/ meltfptr[1716])->tabval[3] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V502*/ meltfptr[501]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1710*/ meltfptr[1709])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]);
+ NULL != /*_.VALDATA___V505*/ meltfptr[504]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1717*/ meltfptr[1716])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]);
- MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5468:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1710*/ meltfptr[1709]);
+ meltgc_touch ( /*_.VALROUT___V1717*/ meltfptr[1716]);
- /*putclosurout#104 */
- melt_assertmsg ("putclosrout#104 checkclo",
+ /*putclosurout#105 */
+ melt_assertmsg ("putclosrout#105 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1709*/ meltfptr[1708])) ==
+ ( /*_.VALCLO___V1716*/ meltfptr[1715])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#104 checkrout",
+ melt_assertmsg ("putclosrout#105 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1710*/ meltfptr[1709]))
+ ( /*_.VALROUT___V1717*/ meltfptr[1716]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1709*/ meltfptr[1708])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1710*/ meltfptr[1709]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1716*/ meltfptr[1715])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1717*/ meltfptr[1716]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1709*/ meltfptr[1708]);
+ meltgc_touch ( /*_.VALCLO___V1716*/ meltfptr[1715]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1709*/ meltfptr[1708]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[14] =
- (melt_ptr_t) ( /*_.VALCLO___V1709*/ meltfptr[1708]);
+ NULL != /*_.VALCLO___V1716*/ meltfptr[1715]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALCLO___V1716*/ meltfptr[1715]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1684*/ meltfptr[1683]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V1684*/ meltfptr[1683]);
+ NULL != /*_.VALDATA___V1691*/ meltfptr[1690]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#16",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#16",
NULL != ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[16] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#17",
- NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V129*/ meltfptr[128]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[17] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V129*/ meltfptr[128]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#17",
+ NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V130*/ meltfptr[129]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[17] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V130*/ meltfptr[129]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#18",
- NULL != ( /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[18] =
- (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#18",
+ NULL != ( /*_.MAPOBJECT_EVERY__V131*/ meltfptr[130]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[18] =
+ (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V131*/ meltfptr[130]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#19",
- NULL != ( /*_.LIST_FIND__V131*/ meltfptr[130]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[19] =
- (melt_ptr_t) ( /*_.LIST_FIND__V131*/ meltfptr[130]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#19",
+ NULL != ( /*_.LIST_FIND__V132*/ meltfptr[131]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[19] =
+ (melt_ptr_t) ( /*_.LIST_FIND__V132*/ meltfptr[131]);
- MELT_LOCATION ("warmelt-genobj.melt:5173:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5197:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1711*/ meltfptr[1710]))
+ ( /*_.VALROUT___V1718*/ meltfptr[1717]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1569__LAMBDA_#0",
- NULL != ( /*_.LIST_FIND__V131*/ meltfptr[130]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1711*/ meltfptr[1710])->tabval[0] =
- (melt_ptr_t) ( /*_.LIST_FIND__V131*/ meltfptr[130]);
+ melt_checkmsg ("putroutconst constnull.drout_1573__LAMBDA_#0",
+ NULL != ( /*_.LIST_FIND__V132*/ meltfptr[131]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1718*/ meltfptr[1717])->tabval[0] =
+ (melt_ptr_t) ( /*_.LIST_FIND__V132*/ meltfptr[131]);
- MELT_LOCATION ("warmelt-genobj.melt:5173:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5197:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1711*/ meltfptr[1710]);
+ meltgc_touch ( /*_.VALROUT___V1718*/ meltfptr[1717]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#20",
- NULL != ( /*_.VALROUT___V1711*/ meltfptr[1710]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[20] =
- (melt_ptr_t) ( /*_.VALROUT___V1711*/ meltfptr[1710]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#20",
+ NULL != ( /*_.VALROUT___V1718*/ meltfptr[1717]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALROUT___V1718*/ meltfptr[1717]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#21",
- NULL != ( /*_.LIST_FIND__V131*/ meltfptr[130]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[21] =
- (melt_ptr_t) ( /*_.LIST_FIND__V131*/ meltfptr[130]);
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#21",
+ NULL != ( /*_.LIST_FIND__V132*/ meltfptr[131]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[21] =
+ (melt_ptr_t) ( /*_.LIST_FIND__V132*/ meltfptr[131]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1259*/ meltfptr[1258]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[23] =
- (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ NULL != /*_.VALCLO___V1262*/ meltfptr[1261]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALCLO___V1262*/ meltfptr[1261]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#24",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#24",
NULL != ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[24] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1559__COMPILOBJ_NREP_MATCH#25",
+ ("putroutconst constnull.drout_1563__COMPILOBJ_NREP_MATCH#25",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1708*/ meltfptr[1707])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1715*/ meltfptr[1714])->tabval[25] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-genobj.melt:5040:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5064:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1708*/ meltfptr[1707]);
+ meltgc_touch ( /*_.VALROUT___V1715*/ meltfptr[1714]);
- /*putclosurout#105 */
- melt_assertmsg ("putclosrout#105 checkclo",
+ /*putclosurout#106 */
+ melt_assertmsg ("putclosrout#106 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1712*/ meltfptr[1711])) ==
+ ( /*_.VALCLO___V1719*/ meltfptr[1718])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#105 checkrout",
+ melt_assertmsg ("putclosrout#106 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1708*/ meltfptr[1707]))
+ ( /*_.VALROUT___V1715*/ meltfptr[1714]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1712*/ meltfptr[1711])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1708*/ meltfptr[1707]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1719*/ meltfptr[1718])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1715*/ meltfptr[1714]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1712*/ meltfptr[1711]);
+ meltgc_touch ( /*_.VALCLO___V1719*/ meltfptr[1718]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1713*/ meltfptr[1712]))
+ ( /*_.VALDATA___V1720*/ meltfptr[1719]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1713*/
- meltfptr[1712]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1713*/ meltfptr[1712]))->
+ ( /*_.VALDATA___V1720*/
+ meltfptr[1719]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1714*/ meltfptr[1713]);
+ /*_.VALSTR___V1721*/ meltfptr[1720]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1713*/ meltfptr[1712]);
+ meltgc_touch ( /*_.VALDATA___V1720*/ meltfptr[1719]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1715*/ meltfptr[1714]))
+ ( /*_.VALDATA___V1722*/ meltfptr[1721]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1715*/
- meltfptr[1714]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714]))->
+ ( /*_.VALDATA___V1722*/
+ meltfptr[1721]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1722*/ meltfptr[1721]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1716*/ meltfptr[1715]);
+ /*_.VALSTR___V1723*/ meltfptr[1722]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1715*/ meltfptr[1714]);
+ meltgc_touch ( /*_.VALDATA___V1722*/ meltfptr[1721]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1717*/ meltfptr[1716]))
+ ( /*_.VALDATA___V1724*/ meltfptr[1723]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1717*/
- meltfptr[1716]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716]))->
+ ( /*_.VALDATA___V1724*/
+ meltfptr[1723]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1724*/ meltfptr[1723]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1718*/ meltfptr[1717]);
+ /*_.VALSTR___V1725*/ meltfptr[1724]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1717*/ meltfptr[1716]);
+ meltgc_touch ( /*_.VALDATA___V1724*/ meltfptr[1723]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1719*/ meltfptr[1718]))
+ ( /*_.VALDATA___V1726*/ meltfptr[1725]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1719*/
- meltfptr[1718]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1719*/ meltfptr[1718]))->
+ ( /*_.VALDATA___V1726*/
+ meltfptr[1725]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1720*/ meltfptr[1719]);
+ /*_.VALSTR___V1727*/ meltfptr[1726]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1719*/ meltfptr[1718]);
+ meltgc_touch ( /*_.VALDATA___V1726*/ meltfptr[1725]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1721*/ meltfptr[1720]))
+ ( /*_.VALDATA___V1728*/ meltfptr[1727]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1721*/
- meltfptr[1720]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720]))->
+ ( /*_.VALDATA___V1728*/
+ meltfptr[1727]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1728*/ meltfptr[1727]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1722*/ meltfptr[1721]);
+ /*_.VALSTR___V1729*/ meltfptr[1728]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1721*/ meltfptr[1720]);
+ meltgc_touch ( /*_.VALDATA___V1728*/ meltfptr[1727]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1723*/ meltfptr[1722]))
+ ( /*_.VALDATA___V1730*/ meltfptr[1729]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1723*/
- meltfptr[1722]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722]))->
+ ( /*_.VALDATA___V1730*/
+ meltfptr[1729]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1724*/ meltfptr[1723]);
+ /*_.VALSTR___V1731*/ meltfptr[1730]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1723*/ meltfptr[1722]);
+ meltgc_touch ( /*_.VALDATA___V1730*/ meltfptr[1729]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1725*/ meltfptr[1724]))
+ ( /*_.VALDATA___V1732*/ meltfptr[1731]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1725*/
- meltfptr[1724]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1725*/ meltfptr[1724]))->
+ ( /*_.VALDATA___V1732*/
+ meltfptr[1731]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1726*/ meltfptr[1725]);
+ /*_.VALSTR___V1733*/ meltfptr[1732]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1725*/ meltfptr[1724]);
+ meltgc_touch ( /*_.VALDATA___V1732*/ meltfptr[1731]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/ meltfptr[1726]))
+ ( /*_.VALDATA___V1734*/ meltfptr[1733]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/
- meltfptr[1726]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1727*/ meltfptr[1726]))->
+ ( /*_.VALDATA___V1734*/
+ meltfptr[1733]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1734*/ meltfptr[1733]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1728*/ meltfptr[1727]);
+ /*_.VALSTR___V1735*/ meltfptr[1734]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/ meltfptr[1726]))
+ ( /*_.VALDATA___V1734*/ meltfptr[1733]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/
- meltfptr[1726]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1727*/ meltfptr[1726]))->
+ ( /*_.VALDATA___V1734*/
+ meltfptr[1733]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1734*/ meltfptr[1733]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.CLASS_ROOT__V132*/ meltfptr[131]);
+ /*_.CLASS_ROOT__V133*/ meltfptr[132]);
- /*putupl#630 */
- melt_assertmsg ("putupl #630 checktup",
+ /*putupl#625 */
+ melt_assertmsg ("putupl #625 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1729*/ meltfptr[1728])) ==
+ ( /*_.VALTUP___V1736*/ meltfptr[1735])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #630 checkoff",
+ melt_assertmsg ("putupl #625 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1729*/
- meltfptr[1728]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1729*/ meltfptr[1728]))->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_ROOT__V132*/ meltfptr[131]);
+ ( /*_.VALTUP___V1736*/
+ meltfptr[1735]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1736*/ meltfptr[1735]))->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_ROOT__V133*/ meltfptr[132]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1729*/ meltfptr[1728]);
+ meltgc_touch ( /*_.VALTUP___V1736*/ meltfptr[1735]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/ meltfptr[1726]))
+ ( /*_.VALDATA___V1734*/ meltfptr[1733]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/
- meltfptr[1726]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1727*/ meltfptr[1726]))->
+ ( /*_.VALDATA___V1734*/
+ meltfptr[1733]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1734*/ meltfptr[1733]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1729*/ meltfptr[1728]);
+ /*_.VALTUP___V1736*/ meltfptr[1735]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1730*/ meltfptr[1729]))
+ ( /*_.VALDATA___V1737*/ meltfptr[1736]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1730*/
- meltfptr[1729]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]))->
+ ( /*_.VALDATA___V1737*/
+ meltfptr[1736]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1737*/ meltfptr[1736]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1731*/ meltfptr[1730]);
+ /*_.VALSTR___V1738*/ meltfptr[1737]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1730*/ meltfptr[1729]))
+ ( /*_.VALDATA___V1737*/ meltfptr[1736]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1730*/
- meltfptr[1729]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]))->
+ ( /*_.VALDATA___V1737*/
+ meltfptr[1736]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1737*/ meltfptr[1736]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1727*/ meltfptr[1726]);
+ /*_.VALDATA___V1734*/ meltfptr[1733]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1730*/ meltfptr[1729]);
+ meltgc_touch ( /*_.VALDATA___V1737*/ meltfptr[1736]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1732*/ meltfptr[1731]))
+ ( /*_.VALDATA___V1739*/ meltfptr[1738]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1732*/
- meltfptr[1731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]))->
+ ( /*_.VALDATA___V1739*/
+ meltfptr[1738]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1739*/ meltfptr[1738]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1733*/ meltfptr[1732]);
+ /*_.VALSTR___V1740*/ meltfptr[1739]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1732*/ meltfptr[1731]))
+ ( /*_.VALDATA___V1739*/ meltfptr[1738]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1732*/
- meltfptr[1731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]))->
+ ( /*_.VALDATA___V1739*/
+ meltfptr[1738]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1739*/ meltfptr[1738]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1727*/ meltfptr[1726]);
+ /*_.VALDATA___V1734*/ meltfptr[1733]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1732*/ meltfptr[1731]);
+ meltgc_touch ( /*_.VALDATA___V1739*/ meltfptr[1738]);
- /*putupl#631 */
- melt_assertmsg ("putupl #631 checktup",
+ /*putupl#626 */
+ melt_assertmsg ("putupl #626 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1734*/ meltfptr[1733])) ==
+ ( /*_.VALTUP___V1741*/ meltfptr[1740])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #631 checkoff",
+ melt_assertmsg ("putupl #626 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1734*/
- meltfptr[1733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1734*/ meltfptr[1733]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]);
+ ( /*_.VALTUP___V1741*/
+ meltfptr[1740]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1741*/ meltfptr[1740]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1737*/ meltfptr[1736]);
- /*putupl#632 */
- melt_assertmsg ("putupl #632 checktup",
+ /*putupl#627 */
+ melt_assertmsg ("putupl #627 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1734*/ meltfptr[1733])) ==
+ ( /*_.VALTUP___V1741*/ meltfptr[1740])) ==
MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl #632 checkoff",
+ melt_assertmsg ("putupl #627 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1734*/
- meltfptr[1733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1734*/ meltfptr[1733]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]);
+ ( /*_.VALTUP___V1741*/
+ meltfptr[1740]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1741*/ meltfptr[1740]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1739*/ meltfptr[1738]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1734*/ meltfptr[1733]);
+ meltgc_touch ( /*_.VALTUP___V1741*/ meltfptr[1740]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/ meltfptr[1726]))
+ ( /*_.VALDATA___V1734*/ meltfptr[1733]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1727*/
- meltfptr[1726]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1727*/ meltfptr[1726]))->
+ ( /*_.VALDATA___V1734*/
+ meltfptr[1733]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1734*/ meltfptr[1733]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1734*/ meltfptr[1733]);
+ /*_.VALTUP___V1741*/ meltfptr[1740]);
- MELT_LOCATION ("warmelt-genobj.melt:5233:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5257:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1727*/ meltfptr[1726]);
+ meltgc_touch ( /*_.VALDATA___V1734*/ meltfptr[1733]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1735*/ meltfptr[1734]))
+ ( /*_.VALDATA___V1742*/ meltfptr[1741]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1735*/
- meltfptr[1734]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1735*/ meltfptr[1734]))->
+ ( /*_.VALDATA___V1742*/
+ meltfptr[1741]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1736*/ meltfptr[1735]);
+ /*_.VALSTR___V1743*/ meltfptr[1742]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1735*/ meltfptr[1734]);
+ meltgc_touch ( /*_.VALDATA___V1742*/ meltfptr[1741]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1737*/ meltfptr[1736]))
+ ( /*_.VALDATA___V1744*/ meltfptr[1743]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1737*/
- meltfptr[1736]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1737*/ meltfptr[1736]))->
+ ( /*_.VALDATA___V1744*/
+ meltfptr[1743]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1744*/ meltfptr[1743]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1738*/ meltfptr[1737]);
+ /*_.VALSTR___V1745*/ meltfptr[1744]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1737*/ meltfptr[1736]);
+ meltgc_touch ( /*_.VALDATA___V1744*/ meltfptr[1743]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#0",
- NULL != ( /*_.CLASS_NREP_ALTMATCH__V133*/ meltfptr[132]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V133*/ meltfptr[132]);
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#0",
+ NULL != ( /*_.CLASS_NREP_ALTMATCH__V134*/ meltfptr[133]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V134*/ meltfptr[133]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#1",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#2",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#3",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#3",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1727*/ meltfptr[1726]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1727*/ meltfptr[1726]);
+ NULL != /*_.VALDATA___V1734*/ meltfptr[1733]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1734*/ meltfptr[1733]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#5",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#5",
NULL != ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#8",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#8",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[8] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#9",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#9",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[9] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#10",
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#10",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[10] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1740*/ meltfptr[1739]))
+ ( /*_.VALROUT___V1747*/ meltfptr[1746]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1592__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1596__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1740*/ meltfptr[1739])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1747*/ meltfptr[1746])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5286:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5310:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1740*/ meltfptr[1739]);
+ meltgc_touch ( /*_.VALROUT___V1747*/ meltfptr[1746]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1588__COMPILOBJ_NREP_ALTMATCH#11",
- NULL != ( /*_.VALROUT___V1740*/ meltfptr[1739]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V1740*/ meltfptr[1739]);
+ ("putroutconst constnull.drout_1592__COMPILOBJ_NREP_ALTMATCH#11",
+ NULL != ( /*_.VALROUT___V1747*/ meltfptr[1746]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V1747*/ meltfptr[1746]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1259*/ meltfptr[1258]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[12] =
- (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ NULL != /*_.VALCLO___V1262*/ meltfptr[1261]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1746*/ meltfptr[1745])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALCLO___V1262*/ meltfptr[1261]);
- MELT_LOCATION ("warmelt-genobj.melt:5242:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5266:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1739*/ meltfptr[1738]);
+ meltgc_touch ( /*_.VALROUT___V1746*/ meltfptr[1745]);
- /*putclosurout#106 */
- melt_assertmsg ("putclosrout#106 checkclo",
+ /*putclosurout#107 */
+ melt_assertmsg ("putclosrout#107 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1741*/ meltfptr[1740])) ==
+ ( /*_.VALCLO___V1748*/ meltfptr[1747])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#106 checkrout",
+ melt_assertmsg ("putclosrout#107 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1739*/ meltfptr[1738]))
+ ( /*_.VALROUT___V1746*/ meltfptr[1745]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1741*/ meltfptr[1740])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1748*/ meltfptr[1747])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1746*/ meltfptr[1745]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1741*/ meltfptr[1740]);
+ meltgc_touch ( /*_.VALCLO___V1748*/ meltfptr[1747]);
- /*putslot */
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_29 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_30 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*putslot*/
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1742*/ meltfptr[1741]))
+ ( /*_.VALDATA___V1749*/ meltfptr[1748]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1742*/
- meltfptr[1741]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]))->
+ ( /*_.VALDATA___V1749*/
+ meltfptr[1748]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1743*/ meltfptr[1742]);
+ /*_.VALSTR___V1750*/ meltfptr[1749]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1742*/ meltfptr[1741]);
+ meltgc_touch ( /*_.VALDATA___V1749*/ meltfptr[1748]);
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1744*/ meltfptr[1743]))
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1593__COMPILOBJ_NREP_MATCHLABEL#0",
- NULL != ( /*_.CLASS_NREP_MATCH_LABEL__V134*/ meltfptr[133]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V134*/ meltfptr[133]);
+ ("putroutconst constnull.drout_1597__COMPILOBJ_NREP_MATCHLABEL#0",
+ NULL != ( /*_.CLASS_NREP_MATCH_LABEL__V135*/ meltfptr[134]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V135*/ meltfptr[134]);
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1744*/ meltfptr[1743]))
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1593__COMPILOBJ_NREP_MATCHLABEL#1",
+ ("putroutconst constnull.drout_1597__COMPILOBJ_NREP_MATCHLABEL#1",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1744*/ meltfptr[1743]))
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1593__COMPILOBJ_NREP_MATCHLABEL#2",
+ ("putroutconst constnull.drout_1597__COMPILOBJ_NREP_MATCHLABEL#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1597__COMPILOBJ_NREP_MATCHLABEL#3",
+ NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[3] =
+ (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1744*/ meltfptr[1743]))
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1593__COMPILOBJ_NREP_MATCHLABEL#3",
- NULL != ( /*_.CLASS_MATCH_STEP_WITH_DATA__V135*/ meltfptr[134]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[3] =
- (melt_ptr_t) ( /*_.CLASS_MATCH_STEP_WITH_DATA__V135*/ meltfptr[134]);
+ ("putroutconst constnull.drout_1597__COMPILOBJ_NREP_MATCHLABEL#4",
+ NULL != ( /*_.CLASS_MATCH_STEP_WITH_DATA__V136*/ meltfptr[135]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[4] =
+ (melt_ptr_t) ( /*_.CLASS_MATCH_STEP_WITH_DATA__V136*/ meltfptr[135]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
- MELT_LOCATION ("warmelt-genobj.melt:5302:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5326:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1744*/ meltfptr[1743]);
+ meltgc_touch ( /*_.VALROUT___V1751*/ meltfptr[1750]);
- /*putclosurout#107 */
- melt_assertmsg ("putclosrout#107 checkclo",
+ /*putclosurout#108 */
+ melt_assertmsg ("putclosrout#108 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1745*/ meltfptr[1744])) ==
+ ( /*_.VALCLO___V1752*/ meltfptr[1751])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#107 checkrout",
+ melt_assertmsg ("putclosrout#108 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1744*/ meltfptr[1743]))
+ ( /*_.VALROUT___V1751*/ meltfptr[1750]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1745*/ meltfptr[1744])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1744*/ meltfptr[1743]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1752*/ meltfptr[1751])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1745*/ meltfptr[1744]);
+ meltgc_touch ( /*_.VALCLO___V1752*/ meltfptr[1751]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1746*/ meltfptr[1745]))
+ ( /*_.VALDATA___V1753*/ meltfptr[1752]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1746*/
- meltfptr[1745]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745]))->
+ ( /*_.VALDATA___V1753*/
+ meltfptr[1752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1753*/ meltfptr[1752]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1747*/ meltfptr[1746]);
+ /*_.VALSTR___V1754*/ meltfptr[1753]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1746*/ meltfptr[1745]);
+ meltgc_touch ( /*_.VALDATA___V1753*/ meltfptr[1752]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1748*/ meltfptr[1747]))
+ ( /*_.VALDATA___V1755*/ meltfptr[1754]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1748*/
- meltfptr[1747]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1748*/ meltfptr[1747]))->
+ ( /*_.VALDATA___V1755*/
+ meltfptr[1754]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1749*/ meltfptr[1748]);
+ /*_.VALSTR___V1756*/ meltfptr[1755]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1748*/ meltfptr[1747]);
-
+ meltgc_touch ( /*_.VALDATA___V1755*/ meltfptr[1754]);
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_29 */
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1757*/ meltfptr[1756]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1603__COMPILOBJ_NREP_MATCHFLAG#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_30 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1757*/ meltfptr[1756]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1599__COMPILOBJ_NREP_MATCHDATAINIT#0",
- NULL !=
- ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V136*/ meltfptr[135]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1750*/ meltfptr[1749])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V136*/
- meltfptr[135]);
+ ("putroutconst constnull.drout_1603__COMPILOBJ_NREP_MATCHFLAG#1",
+ NULL != ( /*_.CLASS_NREP_MATCH_FLAG__V137*/ meltfptr[136]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_FLAG__V137*/ meltfptr[136]);
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1757*/ meltfptr[1756]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1599__COMPILOBJ_NREP_MATCHDATAINIT#1",
+ ("putroutconst constnull.drout_1603__COMPILOBJ_NREP_MATCHFLAG#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1750*/ meltfptr[1749])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1757*/ meltfptr[1756]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5352:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1757*/ meltfptr[1756]);
+
+ /*putclosurout#109 */
+ melt_assertmsg ("putclosrout#109 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1758*/ meltfptr[1757])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#109 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1757*/ meltfptr[1756]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1758*/ meltfptr[1757])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1758*/ meltfptr[1757]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1759*/ meltfptr[1758]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1759*/
+ meltfptr[1758]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1759*/ meltfptr[1758]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1760*/ meltfptr[1759]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1759*/ meltfptr[1758]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1599__COMPILOBJ_NREP_MATCHDATAINIT#2",
+ ("putroutconst constnull.drout_1607__COMPILOBJ_NREP_MATCHDATAINIT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1750*/ meltfptr[1749])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1607__COMPILOBJ_NREP_MATCHDATAINIT#1",
+ NULL !=
+ ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V138*/ meltfptr[137]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V138*/
+ meltfptr[137]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1607__COMPILOBJ_NREP_MATCHDATAINIT#2",
+ NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1599__COMPILOBJ_NREP_MATCHDATAINIT#3",
- NULL != ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V137*/ meltfptr[136]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1750*/ meltfptr[1749])->tabval[3] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V137*/ meltfptr[136]);
+ ("putroutconst constnull.drout_1607__COMPILOBJ_NREP_MATCHDATAINIT#3",
+ NULL != ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V139*/ meltfptr[138]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[3] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V139*/ meltfptr[138]);
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1599__COMPILOBJ_NREP_MATCHDATAINIT#4",
- NULL != ( /*_.CLASS_NREP_MATCHED_DATA__V138*/ meltfptr[137]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1750*/ meltfptr[1749])->tabval[4] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V138*/ meltfptr[137]);
+ ("putroutconst constnull.drout_1607__COMPILOBJ_NREP_MATCHDATAINIT#4",
+ NULL != ( /*_.CLASS_NREP_MATCHED_DATA__V140*/ meltfptr[139]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[4] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V140*/ meltfptr[139]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1761*/ meltfptr[1760])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
- MELT_LOCATION ("warmelt-genobj.melt:5319:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5377:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1750*/ meltfptr[1749]);
+ meltgc_touch ( /*_.VALROUT___V1761*/ meltfptr[1760]);
- /*putclosurout#108 */
- melt_assertmsg ("putclosrout#108 checkclo",
+ /*putclosurout#110 */
+ melt_assertmsg ("putclosrout#110 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1751*/ meltfptr[1750])) ==
+ ( /*_.VALCLO___V1762*/ meltfptr[1761])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#108 checkrout",
+ melt_assertmsg ("putclosrout#110 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1750*/ meltfptr[1749]))
+ ( /*_.VALROUT___V1761*/ meltfptr[1760]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1751*/ meltfptr[1750])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1750*/ meltfptr[1749]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1762*/ meltfptr[1761])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1761*/ meltfptr[1760]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1751*/ meltfptr[1750]);
+ meltgc_touch ( /*_.VALCLO___V1762*/ meltfptr[1761]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1752*/ meltfptr[1751]))
+ ( /*_.VALDATA___V1763*/ meltfptr[1762]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1752*/
- meltfptr[1751]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751]))->
+ ( /*_.VALDATA___V1763*/
+ meltfptr[1762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1753*/ meltfptr[1752]);
+ /*_.VALSTR___V1764*/ meltfptr[1763]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1752*/ meltfptr[1751]);
+ meltgc_touch ( /*_.VALDATA___V1763*/ meltfptr[1762]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1754*/ meltfptr[1753]))
+ ( /*_.VALDATA___V1765*/ meltfptr[1764]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1754*/
- meltfptr[1753]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1754*/ meltfptr[1753]))->
+ ( /*_.VALDATA___V1765*/
+ meltfptr[1764]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1765*/ meltfptr[1764]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1755*/ meltfptr[1754]);
+ /*_.VALSTR___V1766*/ meltfptr[1765]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1754*/ meltfptr[1753]);
+ meltgc_touch ( /*_.VALDATA___V1765*/ meltfptr[1764]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1756*/ meltfptr[1755]))
+ ( /*_.VALDATA___V1767*/ meltfptr[1766]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1756*/
- meltfptr[1755]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1756*/ meltfptr[1755]))->
+ ( /*_.VALDATA___V1767*/
+ meltfptr[1766]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1757*/ meltfptr[1756]);
+ /*_.VALSTR___V1768*/ meltfptr[1767]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1756*/ meltfptr[1755]);
+ meltgc_touch ( /*_.VALDATA___V1767*/ meltfptr[1766]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1769*/ meltfptr[1768]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1609__NORMTESTER_GOTOINSTR#0",
+ ("putroutconst constnull.drout_1615__COMPILOBJ_NREP_MATCHEDATA#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1758*/ meltfptr[1757])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1615__COMPILOBJ_NREP_MATCHEDATA#1",
+ NULL != ( /*_.CLASS_NREP_MATCHED_DATA__V140*/ meltfptr[139]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V140*/ meltfptr[139]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1769*/ meltfptr[1768]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1609__NORMTESTER_GOTOINSTR#1",
+ ("putroutconst constnull.drout_1615__COMPILOBJ_NREP_MATCHEDATA#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1758*/ meltfptr[1757])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5410:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1769*/ meltfptr[1768]);
+
+ /*putclosurout#111 */
+ melt_assertmsg ("putclosrout#111 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1770*/ meltfptr[1769])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#111 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1770*/ meltfptr[1769])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1769*/ meltfptr[1768]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1770*/ meltfptr[1769]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1771*/ meltfptr[1770]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1617__COMPILOBJ_NREP_MATCHJUMP#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1771*/ meltfptr[1770]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1609__NORMTESTER_GOTOINSTR#2",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1758*/ meltfptr[1757])->tabval[2] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1617__COMPILOBJ_NREP_MATCHJUMP#1",
+ NULL != ( /*_.CLASS_NREP_MATCH_JUMP__V141*/ meltfptr[140]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_JUMP__V141*/ meltfptr[140]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1771*/ meltfptr[1770]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1609__NORMTESTER_GOTOINSTR#3",
- NULL != ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1758*/ meltfptr[1757])->tabval[3] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]);
+ ("putroutconst constnull.drout_1617__COMPILOBJ_NREP_MATCHJUMP#2",
+ NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1771*/ meltfptr[1770]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V516*/ meltfptr[515]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1758*/ meltfptr[1757])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]);
+ NULL != /*_.VALCLO___V1054*/ meltfptr[1053]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]);
- MELT_LOCATION ("warmelt-genobj.melt:5376:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5439:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1758*/ meltfptr[1757]);
+ meltgc_touch ( /*_.VALROUT___V1771*/ meltfptr[1770]);
- /*putclosurout#109 */
- melt_assertmsg ("putclosrout#109 checkclo",
+ /*putclosurout#112 */
+ melt_assertmsg ("putclosrout#112 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1759*/ meltfptr[1758])) ==
+ ( /*_.VALCLO___V1772*/ meltfptr[1771])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#109 checkrout",
+ melt_assertmsg ("putclosrout#112 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1758*/ meltfptr[1757]))
+ ( /*_.VALROUT___V1771*/ meltfptr[1770]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1759*/ meltfptr[1758])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1758*/ meltfptr[1757]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1772*/ meltfptr[1771])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ meltgc_touch ( /*_.VALCLO___V1772*/ meltfptr[1771]);
+
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1773*/ meltfptr[1772]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1773*/
+ meltfptr[1772]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1773*/ meltfptr[1772]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1774*/ meltfptr[1773]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1773*/ meltfptr[1772]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1623__NORMTESTER_GOTOINSTR#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1775*/ meltfptr[1774])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1623__NORMTESTER_GOTOINSTR#1",
+ NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1775*/ meltfptr[1774])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1623__NORMTESTER_GOTOINSTR#2",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1775*/ meltfptr[1774])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1623__NORMTESTER_GOTOINSTR#3",
+ NULL != ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1775*/ meltfptr[1774])->tabval[3] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V519*/ meltfptr[518]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1775*/ meltfptr[1774])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1775*/ meltfptr[1774]);
+
+ /*putclosurout#113 */
+ melt_assertmsg ("putclosrout#113 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1776*/ meltfptr[1775])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#113 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1775*/ meltfptr[1774]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1776*/ meltfptr[1775])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1775*/ meltfptr[1774]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1776*/ meltfptr[1775]);
+
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1611__ENDMATCH_GOTOINSTR#0",
- NULL != ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[0] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]);
+ melt_checkmsg ("putroutconst constnull.drout_1625__ENDMATCH_GOTOINSTR#0",
+ NULL != ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1611__ENDMATCH_GOTOINSTR#1",
+ melt_checkmsg ("putroutconst constnull.drout_1625__ENDMATCH_GOTOINSTR#1",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1611__ENDMATCH_GOTOINSTR#2",
+ melt_checkmsg ("putroutconst constnull.drout_1625__ENDMATCH_GOTOINSTR#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1611__ENDMATCH_GOTOINSTR#3",
+ melt_checkmsg ("putroutconst constnull.drout_1625__ENDMATCH_GOTOINSTR#3",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V516*/ meltfptr[515]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]);
+ NULL != /*_.VALDATA___V519*/ meltfptr[518]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1611__ENDMATCH_GOTOINSTR#5",
+ melt_checkmsg ("putroutconst constnull.drout_1625__ENDMATCH_GOTOINSTR#5",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:5409:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5533:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1760*/ meltfptr[1759]);
+ meltgc_touch ( /*_.VALROUT___V1777*/ meltfptr[1776]);
- /*putclosurout#110 */
- melt_assertmsg ("putclosrout#110 checkclo",
+ /*putclosurout#114 */
+ melt_assertmsg ("putclosrout#114 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1761*/ meltfptr[1760])) ==
+ ( /*_.VALCLO___V1778*/ meltfptr[1777])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#110 checkrout",
+ melt_assertmsg ("putclosrout#114 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1760*/ meltfptr[1759]))
+ ( /*_.VALROUT___V1777*/ meltfptr[1776]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1761*/ meltfptr[1760])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1778*/ meltfptr[1777])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1777*/ meltfptr[1776]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ meltgc_touch ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#0",
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#1",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#1",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#2",
- NULL != ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[2] =
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/ meltfptr[126]);
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#2",
+ NULL != ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[2] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/ meltfptr[127]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#3",
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#3",
NULL !=
( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#4",
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#4",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V516*/ meltfptr[515]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]);
+ NULL != /*_.VALDATA___V519*/ meltfptr[518]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1613__TESTMATCH_GOTOINSTR#6",
+ melt_checkmsg ("putroutconst constnull.drout_1627__TESTMATCH_GOTOINSTR#6",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1762*/ meltfptr[1761])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:5433:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5557:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1762*/ meltfptr[1761]);
+ meltgc_touch ( /*_.VALROUT___V1779*/ meltfptr[1778]);
- /*putclosurout#111 */
- melt_assertmsg ("putclosrout#111 checkclo",
+ /*putclosurout#115 */
+ melt_assertmsg ("putclosrout#115 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1763*/ meltfptr[1762])) ==
+ ( /*_.VALCLO___V1780*/ meltfptr[1779])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#111 checkrout",
+ melt_assertmsg ("putclosrout#115 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1762*/ meltfptr[1761]))
+ ( /*_.VALROUT___V1779*/ meltfptr[1778]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1763*/ meltfptr[1762])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1762*/ meltfptr[1761]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1780*/ meltfptr[1779])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1779*/ meltfptr[1778]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1763*/ meltfptr[1762]);
+ meltgc_touch ( /*_.VALCLO___V1780*/ meltfptr[1779]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#0",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#1",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#1",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#2",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#4",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#4",
NULL != ( /*_.LIST_MAP__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[4] =
(melt_ptr_t) ( /*_.LIST_MAP__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#5",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#5",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#7",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#7",
NULL != ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]);
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1765*/ meltfptr[1764]))
+ ( /*_.VALROUT___V1782*/ meltfptr[1781]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1617__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1631__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1782*/ meltfptr[1781])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1765*/ meltfptr[1764]))
+ ( /*_.VALROUT___V1782*/ meltfptr[1781]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1782*/ meltfptr[1781])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1765*/ meltfptr[1764]))
+ ( /*_.VALROUT___V1782*/ meltfptr[1781]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1617__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1631__LAMBDA_#2",
NULL != ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1782*/ meltfptr[1781])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]);
- MELT_LOCATION ("warmelt-genobj.melt:5473:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5597:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1765*/ meltfptr[1764]);
+ meltgc_touch ( /*_.VALROUT___V1782*/ meltfptr[1781]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#8",
- NULL != ( /*_.VALROUT___V1765*/ meltfptr[1764]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[8] =
- (melt_ptr_t) ( /*_.VALROUT___V1765*/ meltfptr[1764]);
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#8",
+ NULL != ( /*_.VALROUT___V1782*/ meltfptr[1781]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALROUT___V1782*/ meltfptr[1781]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1615__NORMTESTER_FREE_OBJLOC_LIST#9",
+ ("putroutconst constnull.drout_1629__NORMTESTER_FREE_OBJLOC_LIST#9",
NULL != ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1764*/ meltfptr[1763])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[9] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]);
- MELT_LOCATION ("warmelt-genobj.melt:5459:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5583:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1764*/ meltfptr[1763]);
+ meltgc_touch ( /*_.VALROUT___V1781*/ meltfptr[1780]);
- /*putclosurout#112 */
- melt_assertmsg ("putclosrout#112 checkclo",
+ /*putclosurout#116 */
+ melt_assertmsg ("putclosrout#116 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1766*/ meltfptr[1765])) ==
+ ( /*_.VALCLO___V1783*/ meltfptr[1782])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#112 checkrout",
+ melt_assertmsg ("putclosrout#116 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1764*/ meltfptr[1763]))
+ ( /*_.VALROUT___V1781*/ meltfptr[1780]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1766*/ meltfptr[1765])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1764*/ meltfptr[1763]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1783*/ meltfptr[1782])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1781*/ meltfptr[1780]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ meltgc_touch ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1767*/ meltfptr[1766]))
+ ( /*_.VALROUT___V1784*/ meltfptr[1783]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1618__COMPILTST_NORMTESTER_ANY#0",
+ ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_ANY#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1767*/ meltfptr[1766])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1767*/ meltfptr[1766]))
+ ( /*_.VALROUT___V1784*/ meltfptr[1783]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1618__COMPILTST_NORMTESTER_ANY#1",
+ ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_ANY#1",
NULL != ( /*_.CLASS_NREP__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1767*/ meltfptr[1766])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1767*/ meltfptr[1766]))
+ ( /*_.VALROUT___V1784*/ meltfptr[1783]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1618__COMPILTST_NORMTESTER_ANY#2",
+ ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_ANY#2",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1767*/ meltfptr[1766])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:5491:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5615:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1767*/ meltfptr[1766]);
+ meltgc_touch ( /*_.VALROUT___V1784*/ meltfptr[1783]);
- /*putclosurout#113 */
- melt_assertmsg ("putclosrout#113 checkclo",
+ /*putclosurout#117 */
+ melt_assertmsg ("putclosrout#117 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1768*/ meltfptr[1767])) ==
+ ( /*_.VALCLO___V1785*/ meltfptr[1784])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#113 checkrout",
+ melt_assertmsg ("putclosrout#117 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1767*/ meltfptr[1766]))
+ ( /*_.VALROUT___V1784*/ meltfptr[1783]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1768*/ meltfptr[1767])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1767*/ meltfptr[1766]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1785*/ meltfptr[1784])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1784*/ meltfptr[1783]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1768*/ meltfptr[1767]);
+ meltgc_touch ( /*_.VALCLO___V1785*/ meltfptr[1784]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1620__COMPILTST_NORMTESTER_MATCHER#0",
+ ("putroutconst constnull.drout_1634__COMPILTST_NORMTESTER_MATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1620__COMPILTST_NORMTESTER_MATCHER#1",
- NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]);
+ ("putroutconst constnull.drout_1634__COMPILTST_NORMTESTER_MATCHER#1",
+ NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1620__COMPILTST_NORMTESTER_MATCHER#2",
+ ("putroutconst constnull.drout_1634__COMPILTST_NORMTESTER_MATCHER#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1620__COMPILTST_NORMTESTER_MATCHER#5",
+ ("putroutconst constnull.drout_1634__COMPILTST_NORMTESTER_MATCHER#5",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1766*/ meltfptr[1765]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ NULL != /*_.VALCLO___V1783*/ meltfptr[1782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1763*/ meltfptr[1762]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1763*/ meltfptr[1762]);
+ NULL != /*_.VALCLO___V1780*/ meltfptr[1779]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1780*/ meltfptr[1779]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1620__COMPILTST_NORMTESTER_MATCHER#12",
+ ("putroutconst constnull.drout_1634__COMPILTST_NORMTESTER_MATCHER#12",
NULL != ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1644*/ meltfptr[1643]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1769*/ meltfptr[1768])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643]);
+ NULL != /*_.VALDATA___V1651*/ meltfptr[1650]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1786*/ meltfptr[1785])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1651*/ meltfptr[1650]);
- MELT_LOCATION ("warmelt-genobj.melt:5503:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5627:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1769*/ meltfptr[1768]);
+ meltgc_touch ( /*_.VALROUT___V1786*/ meltfptr[1785]);
- /*putclosurout#114 */
- melt_assertmsg ("putclosrout#114 checkclo",
+ /*putclosurout#118 */
+ melt_assertmsg ("putclosrout#118 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1770*/ meltfptr[1769])) ==
+ ( /*_.VALCLO___V1787*/ meltfptr[1786])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#114 checkrout",
+ melt_assertmsg ("putclosrout#118 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1769*/ meltfptr[1768]))
+ ( /*_.VALROUT___V1786*/ meltfptr[1785]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1770*/ meltfptr[1769])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1769*/ meltfptr[1768]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1787*/ meltfptr[1786])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1786*/ meltfptr[1785]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1770*/ meltfptr[1769]);
+ meltgc_touch ( /*_.VALCLO___V1787*/ meltfptr[1786]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1771*/ meltfptr[1770]))
+ ( /*_.VALDATA___V1788*/ meltfptr[1787]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1771*/
- meltfptr[1770]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]))->
+ ( /*_.VALDATA___V1788*/
+ meltfptr[1787]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1788*/ meltfptr[1787]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1772*/ meltfptr[1771]);
+ /*_.VALSTR___V1789*/ meltfptr[1788]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1771*/ meltfptr[1770]);
+ meltgc_touch ( /*_.VALDATA___V1788*/ meltfptr[1787]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#0",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#1",
- NULL != ( /*_.CLASS_NORMTESTER_INSTANCE__V140*/ meltfptr[139]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V140*/ meltfptr[139]);
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#1",
+ NULL != ( /*_.CLASS_NORMTESTER_INSTANCE__V143*/ meltfptr[142]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V143*/ meltfptr[142]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#2",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
+
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_30 */
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_31 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#4",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#7",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1766*/ meltfptr[1765]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ NULL != /*_.VALCLO___V1783*/ meltfptr[1782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1031*/ meltfptr[1030]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[10] =
- (melt_ptr_t) ( /*_.VALCLO___V1031*/ meltfptr[1030]);
+ NULL != /*_.VALCLO___V1034*/ meltfptr[1033]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#11",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#11",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#15",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#15",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#16",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#16",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1624__COMPILTST_NORMTESTER_INSTANCE#17",
+ ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_INSTANCE#17",
NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1790*/ meltfptr[1789])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5700:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1773*/ meltfptr[1772]);
+ meltgc_touch ( /*_.VALROUT___V1790*/ meltfptr[1789]);
- /*putclosurout#115 */
- melt_assertmsg ("putclosrout#115 checkclo",
+ /*putclosurout#119 */
+ melt_assertmsg ("putclosrout#119 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1774*/ meltfptr[1773])) ==
+ ( /*_.VALCLO___V1791*/ meltfptr[1790])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#115 checkrout",
+ melt_assertmsg ("putclosrout#119 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1773*/ meltfptr[1772]))
+ ( /*_.VALROUT___V1790*/ meltfptr[1789]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1774*/ meltfptr[1773])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1791*/ meltfptr[1790])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1790*/ meltfptr[1789]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1774*/ meltfptr[1773]);
+ meltgc_touch ( /*_.VALCLO___V1791*/ meltfptr[1790]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1775*/ meltfptr[1774]))
+ ( /*_.VALDATA___V1792*/ meltfptr[1791]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1775*/
- meltfptr[1774]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774]))->
+ ( /*_.VALDATA___V1792*/
+ meltfptr[1791]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1776*/ meltfptr[1775]);
+ /*_.VALSTR___V1793*/ meltfptr[1792]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1775*/ meltfptr[1774]);
+ meltgc_touch ( /*_.VALDATA___V1792*/ meltfptr[1791]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#0",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#1",
- NULL != ( /*_.CLASS_NORMTESTER_TUPLE__V141*/ meltfptr[140]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V141*/ meltfptr[140]);
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#1",
+ NULL != ( /*_.CLASS_NORMTESTER_TUPLE__V144*/ meltfptr[143]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V144*/ meltfptr[143]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#2",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#4",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#7",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1766*/ meltfptr[1765]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ NULL != /*_.VALCLO___V1783*/ meltfptr[1782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1031*/ meltfptr[1030]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[10] =
- (melt_ptr_t) ( /*_.VALCLO___V1031*/ meltfptr[1030]);
+ NULL != /*_.VALCLO___V1034*/ meltfptr[1033]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#11",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#11",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#15",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#15",
NULL != ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#16",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#16",
NULL != ( /*_.CLASS_LET_BINDING__V57*/ meltfptr[56]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V57*/ meltfptr[56]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#17",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#17",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1628__COMPILTST_NORMTESTER_TUPLE#18",
+ ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_TUPLE#18",
NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/ meltfptr[96]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[18] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/ meltfptr[96]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1067*/ meltfptr[1066]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]);
+ NULL != /*_.VALDATA___V1070*/ meltfptr[1069]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V1070*/ meltfptr[1069]);
- MELT_LOCATION ("warmelt-genobj.melt:5676:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5800:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1777*/ meltfptr[1776]);
-
+ meltgc_touch ( /*_.VALROUT___V1794*/ meltfptr[1793]);
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_30 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_31 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putclosurout#116*/
- melt_assertmsg ("putclosrout#116 checkclo",
+ /*putclosurout#120 */
+ melt_assertmsg ("putclosrout#120 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1778*/ meltfptr[1777])) ==
+ ( /*_.VALCLO___V1795*/ meltfptr[1794])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#116 checkrout",
+ melt_assertmsg ("putclosrout#120 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1777*/ meltfptr[1776]))
+ ( /*_.VALROUT___V1794*/ meltfptr[1793]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1778*/ meltfptr[1777])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1777*/ meltfptr[1776]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1795*/ meltfptr[1794])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1794*/ meltfptr[1793]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1778*/ meltfptr[1777]);
+ meltgc_touch ( /*_.VALCLO___V1795*/ meltfptr[1794]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1779*/ meltfptr[1778]))
+ ( /*_.VALDATA___V1796*/ meltfptr[1795]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1779*/
- meltfptr[1778]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1779*/ meltfptr[1778]))->
+ ( /*_.VALDATA___V1796*/
+ meltfptr[1795]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1780*/ meltfptr[1779]);
+ /*_.VALSTR___V1797*/ meltfptr[1796]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1779*/ meltfptr[1778]);
+ meltgc_touch ( /*_.VALDATA___V1796*/ meltfptr[1795]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#0",
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#1",
- NULL != ( /*_.CLASS_NORMTESTER_SAME__V142*/ meltfptr[141]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V142*/ meltfptr[141]);
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#1",
+ NULL != ( /*_.CLASS_NORMTESTER_SAME__V145*/ meltfptr[144]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V145*/ meltfptr[144]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#2",
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#4",
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#4",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[4] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1766*/ meltfptr[1765]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ NULL != /*_.VALCLO___V1783*/ meltfptr[1782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#8",
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#8",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1031*/ meltfptr[1030]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[10] =
- (melt_ptr_t) ( /*_.VALCLO___V1031*/ meltfptr[1030]);
+ NULL != /*_.VALCLO___V1034*/ meltfptr[1033]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1632__COMPILTST_NORMTESTER_SAME#11",
+ ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_SAME#11",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V170*/ meltfptr[169]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]);
+ NULL != /*_.VALDATA___V173*/ meltfptr[172]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1781*/ meltfptr[1780])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5899:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1781*/ meltfptr[1780]);
+ meltgc_touch ( /*_.VALROUT___V1798*/ meltfptr[1797]);
- /*putclosurout#117 */
- melt_assertmsg ("putclosrout#117 checkclo",
+ /*putclosurout#121 */
+ melt_assertmsg ("putclosrout#121 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1782*/ meltfptr[1781])) ==
+ ( /*_.VALCLO___V1799*/ meltfptr[1798])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#117 checkrout",
+ melt_assertmsg ("putclosrout#121 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1781*/ meltfptr[1780]))
+ ( /*_.VALROUT___V1798*/ meltfptr[1797]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1782*/ meltfptr[1781])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1781*/ meltfptr[1780]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1799*/ meltfptr[1798])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1782*/ meltfptr[1781]);
+ meltgc_touch ( /*_.VALCLO___V1799*/ meltfptr[1798]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1783*/ meltfptr[1782]))
+ ( /*_.VALDATA___V1800*/ meltfptr[1799]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1783*/
- meltfptr[1782]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1783*/ meltfptr[1782]))->
+ ( /*_.VALDATA___V1800*/
+ meltfptr[1799]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1800*/ meltfptr[1799]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1784*/ meltfptr[1783]);
+ /*_.VALSTR___V1801*/ meltfptr[1800]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1783*/ meltfptr[1782]);
+ meltgc_touch ( /*_.VALDATA___V1800*/ meltfptr[1799]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1636__COMPILTST_NORMTESTER_SUCCESS#0",
+ ("putroutconst constnull.drout_1650__COMPILTST_NORMTESTER_SUCCESS#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1636__COMPILTST_NORMTESTER_SUCCESS#1",
- NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V129*/ meltfptr[128]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V129*/ meltfptr[128]);
+ ("putroutconst constnull.drout_1650__COMPILTST_NORMTESTER_SUCCESS#1",
+ NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V130*/ meltfptr[129]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V130*/ meltfptr[129]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1636__COMPILTST_NORMTESTER_SUCCESS#2",
+ ("putroutconst constnull.drout_1650__COMPILTST_NORMTESTER_SUCCESS#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1636__COMPILTST_NORMTESTER_SUCCESS#5",
+ ("putroutconst constnull.drout_1650__COMPILTST_NORMTESTER_SUCCESS#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1785*/ meltfptr[1784]);
+ meltgc_touch ( /*_.VALROUT___V1802*/ meltfptr[1801]);
- /*putclosurout#118 */
- melt_assertmsg ("putclosrout#118 checkclo",
+ /*putclosurout#122 */
+ melt_assertmsg ("putclosrout#122 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1786*/ meltfptr[1785])) ==
+ ( /*_.VALCLO___V1803*/ meltfptr[1802])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#118 checkrout",
+ melt_assertmsg ("putclosrout#122 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1785*/ meltfptr[1784]))
+ ( /*_.VALROUT___V1802*/ meltfptr[1801]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1786*/ meltfptr[1785])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1785*/ meltfptr[1784]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1803*/ meltfptr[1802])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1802*/ meltfptr[1801]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1786*/ meltfptr[1785]);
+ meltgc_touch ( /*_.VALCLO___V1803*/ meltfptr[1802]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_ORCLEAR#0",
+ ("putroutconst constnull.drout_1652__COMPILTST_NORMTESTER_ORCLEAR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_ORCLEAR#1",
- NULL != ( /*_.CLASS_NORMTESTER_OR_CLEAR__V143*/ meltfptr[142]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V143*/ meltfptr[142]);
+ ("putroutconst constnull.drout_1652__COMPILTST_NORMTESTER_ORCLEAR#1",
+ NULL != ( /*_.CLASS_NORMTESTER_OR_CLEAR__V146*/ meltfptr[145]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V146*/ meltfptr[145]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_ORCLEAR#2",
+ ("putroutconst constnull.drout_1652__COMPILTST_NORMTESTER_ORCLEAR#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_ORCLEAR#4",
+ ("putroutconst constnull.drout_1652__COMPILTST_NORMTESTER_ORCLEAR#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1638__COMPILTST_NORMTESTER_ORCLEAR#7",
+ ("putroutconst constnull.drout_1652__COMPILTST_NORMTESTER_ORCLEAR#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1787*/ meltfptr[1786])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1804*/ meltfptr[1803])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:5874:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5998:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1787*/ meltfptr[1786]);
+ meltgc_touch ( /*_.VALROUT___V1804*/ meltfptr[1803]);
- /*putclosurout#119 */
- melt_assertmsg ("putclosrout#119 checkclo",
+ /*putclosurout#123 */
+ melt_assertmsg ("putclosrout#123 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1788*/ meltfptr[1787])) ==
+ ( /*_.VALCLO___V1805*/ meltfptr[1804])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#119 checkrout",
+ melt_assertmsg ("putclosrout#123 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1787*/ meltfptr[1786]))
+ ( /*_.VALROUT___V1804*/ meltfptr[1803]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1788*/ meltfptr[1787])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1787*/ meltfptr[1786]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1805*/ meltfptr[1804])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1804*/ meltfptr[1803]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1788*/ meltfptr[1787]);
+ meltgc_touch ( /*_.VALCLO___V1805*/ meltfptr[1804]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1789*/ meltfptr[1788]))
+ ( /*_.VALDATA___V1806*/ meltfptr[1805]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1789*/
- meltfptr[1788]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788]))->
+ ( /*_.VALDATA___V1806*/
+ meltfptr[1805]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1790*/ meltfptr[1789]);
+ /*_.VALSTR___V1807*/ meltfptr[1806]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1789*/ meltfptr[1788]);
+ meltgc_touch ( /*_.VALDATA___V1806*/ meltfptr[1805]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT#0",
+ ("putroutconst constnull.drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT#1",
- NULL != ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V144*/ meltfptr[143]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V144*/ meltfptr[143]);
+ ("putroutconst constnull.drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT#1",
+ NULL != ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V147*/ meltfptr[146]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT#2",
+ ("putroutconst constnull.drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT#4",
+ ("putroutconst constnull.drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT#4",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1642__COMPILTST_NORMTESTER_ORTRANSMIT#7",
+ ("putroutconst constnull.drout_1656__COMPILTST_NORMTESTER_ORTRANSMIT#7",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[7] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V374*/ meltfptr[373]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]);
+ NULL != /*_.VALDATA___V377*/ meltfptr[376]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]);
- MELT_LOCATION ("warmelt-genobj.melt:5924:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6048:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1791*/ meltfptr[1790]);
+ meltgc_touch ( /*_.VALROUT___V1808*/ meltfptr[1807]);
- /*putclosurout#120 */
- melt_assertmsg ("putclosrout#120 checkclo",
+ /*putclosurout#124 */
+ melt_assertmsg ("putclosrout#124 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1792*/ meltfptr[1791])) ==
+ ( /*_.VALCLO___V1809*/ meltfptr[1808])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#120 checkrout",
+ melt_assertmsg ("putclosrout#124 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1791*/ meltfptr[1790]))
+ ( /*_.VALROUT___V1808*/ meltfptr[1807]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1792*/ meltfptr[1791])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1809*/ meltfptr[1808])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1808*/ meltfptr[1807]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1792*/ meltfptr[1791]);
+ meltgc_touch ( /*_.VALCLO___V1809*/ meltfptr[1808]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1793*/ meltfptr[1792]))
+ ( /*_.VALDATA___V1810*/ meltfptr[1809]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1793*/
- meltfptr[1792]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1793*/ meltfptr[1792]))->
+ ( /*_.VALDATA___V1810*/
+ meltfptr[1809]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1794*/ meltfptr[1793]);
+ /*_.VALSTR___V1811*/ meltfptr[1810]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1793*/ meltfptr[1792]);
+ meltgc_touch ( /*_.VALDATA___V1810*/ meltfptr[1809]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_DISJUNCTION#0",
+ ("putroutconst constnull.drout_1660__COMPILTST_NORMTESTER_DISJUNCTION#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_DISJUNCTION#1",
- NULL != ( /*_.CLASS_NORMTESTER_DISJUNCTION__V145*/ meltfptr[144]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V145*/ meltfptr[144]);
+ ("putroutconst constnull.drout_1660__COMPILTST_NORMTESTER_DISJUNCTION#1",
+ NULL != ( /*_.CLASS_NORMTESTER_DISJUNCTION__V148*/ meltfptr[147]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V148*/ meltfptr[147]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_DISJUNCTION#2",
+ ("putroutconst constnull.drout_1660__COMPILTST_NORMTESTER_DISJUNCTION#2",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1688*/ meltfptr[1687]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]);
+ NULL != /*_.VALDATA___V1695*/ meltfptr[1694]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1695*/ meltfptr[1694]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1761*/ meltfptr[1760]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1761*/ meltfptr[1760]);
+ NULL != /*_.VALCLO___V1778*/ meltfptr[1777]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1778*/ meltfptr[1777]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1759*/ meltfptr[1758]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1759*/ meltfptr[1758]);
+ NULL != /*_.VALCLO___V1776*/ meltfptr[1775]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1776*/ meltfptr[1775]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1766*/ meltfptr[1765]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765]);
+ NULL != /*_.VALCLO___V1783*/ meltfptr[1782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1783*/ meltfptr[1782]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1646__COMPILTST_NORMTESTER_DISJUNCTION#7",
+ ("putroutconst constnull.drout_1660__COMPILTST_NORMTESTER_DISJUNCTION#7",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1163*/ meltfptr[1162]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1795*/ meltfptr[1794])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162]);
+ NULL != /*_.VALCLO___V1166*/ meltfptr[1165]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1812*/ meltfptr[1811])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1166*/ meltfptr[1165]);
- MELT_LOCATION ("warmelt-genobj.melt:5973:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6097:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1795*/ meltfptr[1794]);
+ meltgc_touch ( /*_.VALROUT___V1812*/ meltfptr[1811]);
- /*putclosurout#121 */
- melt_assertmsg ("putclosrout#121 checkclo",
+ /*putclosurout#125 */
+ melt_assertmsg ("putclosrout#125 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1796*/ meltfptr[1795])) ==
+ ( /*_.VALCLO___V1813*/ meltfptr[1812])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#121 checkrout",
+ melt_assertmsg ("putclosrout#125 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1795*/ meltfptr[1794]))
+ ( /*_.VALROUT___V1812*/ meltfptr[1811]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1796*/ meltfptr[1795])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1795*/ meltfptr[1794]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1813*/ meltfptr[1812])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1812*/ meltfptr[1811]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1796*/ meltfptr[1795]);
+ meltgc_touch ( /*_.VALCLO___V1813*/ meltfptr[1812]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1797*/ meltfptr[1796]))
+ ( /*_.VALDATA___V1814*/ meltfptr[1813]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1797*/
- meltfptr[1796]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1797*/ meltfptr[1796]))->
+ ( /*_.VALDATA___V1814*/
+ meltfptr[1813]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1798*/ meltfptr[1797]);
+ /*_.VALSTR___V1815*/ meltfptr[1814]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1797*/ meltfptr[1796]);
+ meltgc_touch ( /*_.VALDATA___V1814*/ meltfptr[1813]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#0",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#1",
- NULL != ( /*_.CLASS_CMATCHER__V146*/ meltfptr[145]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V146*/ meltfptr[145]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#1",
+ NULL != ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#3",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#3",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#4",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#4",
NULL != ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#5",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#5",
NULL != ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#6",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#6",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#7",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#7",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#8",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[8] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#8",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[8] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#9",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#9",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[9] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#10",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#10",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#11",
- NULL != ( /*_.MULTIPLE_EVERY_BOTH__V147*/ meltfptr[146]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[11] =
- (melt_ptr_t) ( /*_.MULTIPLE_EVERY_BOTH__V147*/ meltfptr[146]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#11",
+ NULL != ( /*_.MULTIPLE_EVERY_BOTH__V150*/ meltfptr[149]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[11] =
+ (melt_ptr_t) ( /*_.MULTIPLE_EVERY_BOTH__V150*/ meltfptr[149]);
+
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_31 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#12",
- NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[12] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#12",
+ NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[12] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#13",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#13",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[13] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#14",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#14",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[14] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#15",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#15",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[15] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#16",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#16",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1800*/ meltfptr[1799]))
+ ( /*_.VALROUT___V1817*/ meltfptr[1816]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1656__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1670__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1817*/ meltfptr[1816])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1800*/ meltfptr[1799]))
+ ( /*_.VALROUT___V1817*/ meltfptr[1816]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1656__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1670__LAMBDA_#1",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1817*/ meltfptr[1816])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1800*/ meltfptr[1799]))
+ ( /*_.VALROUT___V1817*/ meltfptr[1816]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1656__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1670__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1817*/ meltfptr[1816])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1800*/ meltfptr[1799]))
+ ( /*_.VALROUT___V1817*/ meltfptr[1816]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1656__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1670__LAMBDA_#3",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1817*/ meltfptr[1816])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:6065:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6189:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1800*/ meltfptr[1799]);
+ meltgc_touch ( /*_.VALROUT___V1817*/ meltfptr[1816]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#17",
- NULL != ( /*_.VALROUT___V1800*/ meltfptr[1799]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[17] =
- (melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#17",
+ NULL != ( /*_.VALROUT___V1817*/ meltfptr[1816]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALROUT___V1817*/ meltfptr[1816]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#18",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#18",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[18] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#19",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#19",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#20",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#20",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[20] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#21",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#21",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[21] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1801*/ meltfptr[1800]))
+ ( /*_.VALROUT___V1818*/ meltfptr[1817]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1657__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1671__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1818*/ meltfptr[1817])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1801*/ meltfptr[1800]))
+ ( /*_.VALROUT___V1818*/ meltfptr[1817]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1657__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1671__LAMBDA_#1",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1818*/ meltfptr[1817])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1801*/ meltfptr[1800]))
+ ( /*_.VALROUT___V1818*/ meltfptr[1817]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1657__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1671__LAMBDA_#2",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1818*/ meltfptr[1817])->tabval[2] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1801*/ meltfptr[1800]))
+ ( /*_.VALROUT___V1818*/ meltfptr[1817]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1657__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1671__LAMBDA_#3",
NULL != ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1818*/ meltfptr[1817])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-genobj.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6202:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1801*/ meltfptr[1800]);
+ meltgc_touch ( /*_.VALROUT___V1818*/ meltfptr[1817]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#22",
- NULL != ( /*_.VALROUT___V1801*/ meltfptr[1800]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[22] =
- (melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#22",
+ NULL != ( /*_.VALROUT___V1818*/ meltfptr[1817]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALROUT___V1818*/ meltfptr[1817]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#23",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#23",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[23] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[23] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#24",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#24",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[24] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[25] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#26",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#26",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[26] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#27",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#27",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[27] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1658__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1672__LAMBDA_#0",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[0] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1658__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1672__LAMBDA_#1",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1658__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1672__LAMBDA_#3",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1658__LAMBDA_#4",
+ melt_checkmsg ("putroutconst constnull.drout_1672__LAMBDA_#4",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1803*/ meltfptr[1802]))
+ ( /*_.VALROUT___V1820*/ meltfptr[1819]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1659__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1673__LAMBDA_#0",
NULL != ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1803*/ meltfptr[1802])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1820*/ meltfptr[1819])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1803*/ meltfptr[1802]))
+ ( /*_.VALROUT___V1820*/ meltfptr[1819]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1803*/ meltfptr[1802])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1820*/ meltfptr[1819])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1803*/ meltfptr[1802]))
+ ( /*_.VALROUT___V1820*/ meltfptr[1819]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1659__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1673__LAMBDA_#2",
NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1803*/ meltfptr[1802])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1820*/ meltfptr[1819])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]);
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1803*/ meltfptr[1802]))
+ ( /*_.VALROUT___V1820*/ meltfptr[1819]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1659__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1673__LAMBDA_#3",
NULL != ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1803*/ meltfptr[1802])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1820*/ meltfptr[1819])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-genobj.melt:6094:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6218:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1803*/ meltfptr[1802]);
+ meltgc_touch ( /*_.VALROUT___V1820*/ meltfptr[1819]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1802*/ meltfptr[1801]))
+ ( /*_.VALROUT___V1819*/ meltfptr[1818]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1658__LAMBDA_#5",
- NULL != ( /*_.VALROUT___V1803*/ meltfptr[1802]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[5] =
- (melt_ptr_t) ( /*_.VALROUT___V1803*/ meltfptr[1802]);
+ melt_checkmsg ("putroutconst constnull.drout_1672__LAMBDA_#5",
+ NULL != ( /*_.VALROUT___V1820*/ meltfptr[1819]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALROUT___V1820*/ meltfptr[1819]);
- MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6215:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1802*/ meltfptr[1801]);
+ meltgc_touch ( /*_.VALROUT___V1819*/ meltfptr[1818]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#28",
- NULL != ( /*_.VALROUT___V1802*/ meltfptr[1801]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[28] =
- (melt_ptr_t) ( /*_.VALROUT___V1802*/ meltfptr[1801]);
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#28",
+ NULL != ( /*_.VALROUT___V1819*/ meltfptr[1818]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V334*/ meltfptr[333]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[29] =
- (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]);
+ NULL != /*_.VALDATA___V337*/ meltfptr[336]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#30",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#30",
NULL != ( /*_.CTYPE_LONG__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[30] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]);
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_31 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#31",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#31",
NULL != ( /*_.CTYPE_VOID__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[31] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V56*/ meltfptr[55]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#32",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#32",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[32] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[33] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[33] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[34] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[34] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1650__COMPILMATCHER_CMATCHER#35",
+ ("putroutconst constnull.drout_1664__COMPILMATCHER_CMATCHER#35",
NULL != ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[35] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[35] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1799*/ meltfptr[1798])->tabval[36] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1816*/ meltfptr[1815])->tabval[36] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:6013:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1799*/ meltfptr[1798]);
+ meltgc_touch ( /*_.VALROUT___V1816*/ meltfptr[1815]);
- /*putclosurout#122 */
- melt_assertmsg ("putclosrout#122 checkclo",
+ /*putclosurout#126 */
+ melt_assertmsg ("putclosrout#126 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1804*/ meltfptr[1803])) ==
+ ( /*_.VALCLO___V1821*/ meltfptr[1820])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#122 checkrout",
+ melt_assertmsg ("putclosrout#126 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1799*/ meltfptr[1798]))
+ ( /*_.VALROUT___V1816*/ meltfptr[1815]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1804*/ meltfptr[1803])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1799*/ meltfptr[1798]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1821*/ meltfptr[1820])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1816*/ meltfptr[1815]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1804*/ meltfptr[1803]);
+ meltgc_touch ( /*_.VALCLO___V1821*/ meltfptr[1820]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1805*/ meltfptr[1804]))
+ ( /*_.VALDATA___V1822*/ meltfptr[1821]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1805*/
- meltfptr[1804]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1805*/ meltfptr[1804]))->
+ ( /*_.VALDATA___V1822*/
+ meltfptr[1821]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1806*/ meltfptr[1805]);
+ /*_.VALSTR___V1823*/ meltfptr[1822]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1805*/ meltfptr[1804]);
+ meltgc_touch ( /*_.VALDATA___V1822*/ meltfptr[1821]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1807*/ meltfptr[1806]))
+ ( /*_.VALDATA___V1824*/ meltfptr[1823]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1807*/
- meltfptr[1806]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806]))->
+ ( /*_.VALDATA___V1824*/
+ meltfptr[1823]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1808*/ meltfptr[1807]);
+ /*_.VALSTR___V1825*/ meltfptr[1824]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1807*/ meltfptr[1806]);
+ meltgc_touch ( /*_.VALDATA___V1824*/ meltfptr[1823]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#0",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#1",
- NULL != ( /*_.CLASS_FUNMATCHER__V148*/ meltfptr[147]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V148*/ meltfptr[147]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#1",
+ NULL != ( /*_.CLASS_FUNMATCHER__V151*/ meltfptr[150]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V151*/ meltfptr[150]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1650*/ meltfptr[1649]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]);
+ NULL != /*_.VALDATA___V1657*/ meltfptr[1656]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#3",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#3",
NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#4",
- NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[4] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V139*/ meltfptr[138]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#4",
+ NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[4] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V142*/ meltfptr[141]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#5",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#5",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[5] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#6",
- NULL != ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[6] =
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/ meltfptr[125]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#6",
+ NULL != ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[6] =
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/ meltfptr[126]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#7",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#7",
NULL != ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[7] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#8",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#8",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[8] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1810*/ meltfptr[1809]))
+ ( /*_.VALROUT___V1827*/ meltfptr[1826]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1664__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1678__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1810*/ meltfptr[1809])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1827*/ meltfptr[1826])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6199:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6323:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1810*/ meltfptr[1809]);
+ meltgc_touch ( /*_.VALROUT___V1827*/ meltfptr[1826]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#9",
- NULL != ( /*_.VALROUT___V1810*/ meltfptr[1809]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V1810*/ meltfptr[1809]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#9",
+ NULL != ( /*_.VALROUT___V1827*/ meltfptr[1826]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V1827*/ meltfptr[1826]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#10",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#10",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[10] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1811*/ meltfptr[1810]))
+ ( /*_.VALROUT___V1828*/ meltfptr[1827]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1665__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1679__LAMBDA_#0",
NULL != ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[0] =
(melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-genobj.melt:6204:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1811*/ meltfptr[1810]);
+ meltgc_touch ( /*_.VALROUT___V1828*/ meltfptr[1827]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#11",
- NULL != ( /*_.VALROUT___V1811*/ meltfptr[1810]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#11",
+ NULL != ( /*_.VALROUT___V1828*/ meltfptr[1827]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1157*/ meltfptr[1156]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[12] =
- (melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156]);
+ NULL != /*_.VALCLO___V1160*/ meltfptr[1159]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALCLO___V1160*/ meltfptr[1159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1812*/ meltfptr[1811]))
+ ( /*_.VALDATA___V1829*/ meltfptr[1828]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1812*/
- meltfptr[1811]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811]))->
+ ( /*_.VALDATA___V1829*/
+ meltfptr[1828]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1813*/ meltfptr[1812]);
+ /*_.VALSTR___V1830*/ meltfptr[1829]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1812*/ meltfptr[1811]);
+ meltgc_touch ( /*_.VALDATA___V1829*/ meltfptr[1828]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#13",
- NULL != ( /*_.VALDATA___V1812*/ meltfptr[1811]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#13",
+ NULL != ( /*_.VALDATA___V1829*/ meltfptr[1828]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#14",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#14",
NULL != ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[14] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V838*/ meltfptr[837]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]);
+ NULL != /*_.VALDATA___V841*/ meltfptr[840]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#16",
- NULL != ( /*_.FMATCH_MATCHF__V149*/ meltfptr[148]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[16] =
- (melt_ptr_t) ( /*_.FMATCH_MATCHF__V149*/ meltfptr[148]);
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#16",
+ NULL != ( /*_.FMATCH_MATCHF__V152*/ meltfptr[151]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[16] =
+ (melt_ptr_t) ( /*_.FMATCH_MATCHF__V152*/ meltfptr[151]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V676*/ meltfptr[675]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]);
+ NULL != /*_.VALDATA___V679*/ meltfptr[678]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1660__COMPILMATCHER_FUNMATCHER#18",
+ ("putroutconst constnull.drout_1674__COMPILMATCHER_FUNMATCHER#18",
NULL != ( /*_.DISCR_LIST__V12*/ meltfptr[11]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[18] =
(melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V452*/ meltfptr[451]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]);
+ NULL != /*_.VALDATA___V455*/ meltfptr[454]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V582*/ meltfptr[581]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[20] =
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]);
+ NULL != /*_.VALDATA___V585*/ meltfptr[584]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V428*/ meltfptr[427]);
+ NULL != /*_.VALDATA___V431*/ meltfptr[430]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1259*/ meltfptr[1258]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1809*/ meltfptr[1808])->tabval[22] =
- (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]);
+ NULL != /*_.VALCLO___V1262*/ meltfptr[1261]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALCLO___V1262*/ meltfptr[1261]);
- MELT_LOCATION ("warmelt-genobj.melt:6175:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1809*/ meltfptr[1808]);
+ meltgc_touch ( /*_.VALROUT___V1826*/ meltfptr[1825]);
- /*putclosurout#123 */
- melt_assertmsg ("putclosrout#123 checkclo",
+ /*putclosurout#127 */
+ melt_assertmsg ("putclosrout#127 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1814*/ meltfptr[1813])) ==
+ ( /*_.VALCLO___V1831*/ meltfptr[1830])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#123 checkrout",
+ melt_assertmsg ("putclosrout#127 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1809*/ meltfptr[1808]))
+ ( /*_.VALROUT___V1826*/ meltfptr[1825]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1814*/ meltfptr[1813])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1809*/ meltfptr[1808]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1831*/ meltfptr[1830])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1814*/ meltfptr[1813]);
+ meltgc_touch ( /*_.VALCLO___V1831*/ meltfptr[1830]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1815*/ meltfptr[1814]))
+ ( /*_.VALDATA___V1832*/ meltfptr[1831]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1815*/
- meltfptr[1814]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1815*/ meltfptr[1814]))->
+ ( /*_.VALDATA___V1832*/
+ meltfptr[1831]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1816*/ meltfptr[1815]);
+ /*_.VALSTR___V1833*/ meltfptr[1832]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1815*/ meltfptr[1814]);
+ meltgc_touch ( /*_.VALDATA___V1832*/ meltfptr[1831]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1817*/ meltfptr[1816]))
+ ( /*_.VALDATA___V1834*/ meltfptr[1833]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1817*/
- meltfptr[1816]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816]))->
+ ( /*_.VALDATA___V1834*/
+ meltfptr[1833]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1818*/ meltfptr[1817]);
+ /*_.VALSTR___V1835*/ meltfptr[1834]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1817*/ meltfptr[1816]);
+ meltgc_touch ( /*_.VALDATA___V1834*/ meltfptr[1833]);
/**COMMENT: before toplevel body **/ ;
@@ -85936,7 +86738,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*then */
{
/*^cond.then */
- /*_.OR___V1819*/ meltfptr[1818] =
+ /*_.OR___V1836*/ meltfptr[1835] =
/*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */
/*_.CONTENV___V2*/ meltfptr[1];;
}
@@ -85952,8 +86754,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 3, "SYSDATA_CONT_FRESH_ENV");
- /*_.SYSDATA_CONT_FRESH_ENV__V1820*/
- meltfptr[1819] = slot;
+ /*_.SYSDATA_CONT_FRESH_ENV__V1837*/
+ meltfptr[1836] = slot;
};
;
/*^apply */
@@ -85963,22 +86765,22 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_cstring = "warmelt-genobj";
- /*_.FUN___V1821*/ meltfptr[1820] =
+ /*_.FUN___V1838*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
- ( /*_.SYSDATA_CONT_FRESH_ENV__V1820*/
- meltfptr[1819]),
+ ( /*_.SYSDATA_CONT_FRESH_ENV__V1837*/
+ meltfptr[1836]),
(melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]),
(MELTBPARSTR_CSTRING ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.OR___V1819*/ meltfptr[1818] = /*_.FUN___V1821*/ meltfptr[1820];;
+ /*_.OR___V1836*/ meltfptr[1835] = /*_.FUN___V1838*/ meltfptr[1837];;
/*epilog */
MELT_LOCATION ("warmelt-genobj.melt:3:/ clear");
- /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V1820*/ meltfptr[1819] = 0;
+ /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V1837*/ meltfptr[1836] = 0;
/*^clear */
- /*clear *//*_.FUN___V1821*/ meltfptr[1820] = 0;
+ /*clear *//*_.FUN___V1838*/ meltfptr[1837] = 0;
}
;
}
@@ -85991,7 +86793,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.OR___V1819*/ meltfptr[1818] = 0;
+ /*clear *//*_.OR___V1836*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:546:/ initchunk");
@@ -86003,8 +86805,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1822*/
- meltfptr[1819] = slot;
+ /*_.VALUEXPORTER___V1839*/
+ meltfptr[1836] = slot;
};
;
/*^apply */
@@ -86014,14 +86816,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1008*/ meltfptr[1007];
+ (melt_ptr_t *) & /*_.VALDATA___V1011*/ meltfptr[1010];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_INITIALROUTINEOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86033,14 +86835,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1011*/ meltfptr[1010];
+ (melt_ptr_t *) & /*_.VALDATA___V1014*/ meltfptr[1013];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIROUT_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1023*/ meltfptr[1022]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86052,14 +86854,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012];
+ (melt_ptr_t *) & /*_.VALDATA___V1016*/ meltfptr[1015];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIROUT_PROLOG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86071,14 +86873,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1015*/ meltfptr[1014];
+ (melt_ptr_t *) & /*_.VALDATA___V1018*/ meltfptr[1017];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIROUT_FILL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86090,14 +86892,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1017*/ meltfptr[1016];
+ (melt_ptr_t *) & /*_.VALDATA___V1020*/ meltfptr[1019];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIROUT_MODULENAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1026*/ meltfptr[1025]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86109,14 +86911,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V554*/ meltfptr[553];
+ (melt_ptr_t *) & /*_.VALDATA___V557*/ meltfptr[556];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJAGAIN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86128,14 +86930,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V557*/ meltfptr[556];
+ (melt_ptr_t *) & /*_.VALDATA___V560*/ meltfptr[559];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBAGAIN_LABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86147,14 +86949,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V662*/ meltfptr[661];
+ (melt_ptr_t *) & /*_.VALDATA___V665*/ meltfptr[664];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJAPPLY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86166,14 +86968,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V665*/ meltfptr[664];
+ (melt_ptr_t *) & /*_.VALDATA___V668*/ meltfptr[667];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBAPP_CLOS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86185,14 +86987,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V667*/ meltfptr[666];
+ (melt_ptr_t *) & /*_.VALDATA___V670*/ meltfptr[669];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBAPP_ARGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V675*/ meltfptr[674]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86204,14 +87006,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V438*/ meltfptr[437];
+ (melt_ptr_t *) & /*_.VALDATA___V441*/ meltfptr[440];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJANYBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86223,14 +87025,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V441*/ meltfptr[440];
+ (melt_ptr_t *) & /*_.VALDATA___V444*/ meltfptr[443];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLO_BODYL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86242,14 +87044,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V443*/ meltfptr[442];
+ (melt_ptr_t *) & /*_.VALDATA___V446*/ meltfptr[445];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLO_EPIL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86261,14 +87063,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V452*/ meltfptr[451];
+ (melt_ptr_t *) & /*_.VALDATA___V455*/ meltfptr[454];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPLAINBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86280,14 +87082,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V564*/ meltfptr[563];
+ (melt_ptr_t *) & /*_.VALDATA___V567*/ meltfptr[566];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCITERBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86299,14 +87101,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V567*/ meltfptr[566];
+ (melt_ptr_t *) & /*_.VALDATA___V570*/ meltfptr[569];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCITER_CITER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86318,14 +87120,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V569*/ meltfptr[568];
+ (melt_ptr_t *) & /*_.VALDATA___V572*/ meltfptr[571];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCITER_BEFORE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86337,14 +87139,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V571*/ meltfptr[570];
+ (melt_ptr_t *) & /*_.VALDATA___V574*/ meltfptr[573];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCITER_AFTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86356,14 +87158,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V428*/ meltfptr[427];
+ (melt_ptr_t *) & /*_.VALDATA___V431*/ meltfptr[430];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCLEAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86375,14 +87177,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V431*/ meltfptr[430];
+ (melt_ptr_t *) & /*_.VALDATA___V434*/ meltfptr[433];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OCLR_VLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V437*/ meltfptr[436]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86394,14 +87196,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V188*/ meltfptr[187];
+ (melt_ptr_t *) & /*_.VALDATA___V191*/ meltfptr[190];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCLOCCV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86413,14 +87215,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V191*/ meltfptr[190];
+ (melt_ptr_t *) & /*_.VALDATA___V194*/ meltfptr[193];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBC_OFF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86432,14 +87234,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V193*/ meltfptr[192];
+ (melt_ptr_t *) & /*_.VALDATA___V196*/ meltfptr[195];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBC_PROC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86451,14 +87253,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V195*/ meltfptr[194];
+ (melt_ptr_t *) & /*_.VALDATA___V198*/ meltfptr[197];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBC_NAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86470,14 +87272,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V472*/ meltfptr[471];
+ (melt_ptr_t *) & /*_.VALDATA___V475*/ meltfptr[474];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOMMENTEDBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86489,14 +87291,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V475*/ meltfptr[474];
+ (melt_ptr_t *) & /*_.VALDATA___V478*/ meltfptr[477];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OCOMBLO_COMMENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86508,14 +87310,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V354*/ meltfptr[353];
+ (melt_ptr_t *) & /*_.VALDATA___V357*/ meltfptr[356];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOMMENTINSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86527,14 +87329,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V357*/ meltfptr[356];
+ (melt_ptr_t *) & /*_.VALDATA___V360*/ meltfptr[359];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCI_COMMENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86546,14 +87348,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V374*/ meltfptr[373];
+ (melt_ptr_t *) & /*_.VALDATA___V377*/ meltfptr[376];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOMPUTE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86565,14 +87367,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V377*/ meltfptr[376];
+ (melt_ptr_t *) & /*_.VALDATA___V380*/ meltfptr[379];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCPT_EXPR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86584,14 +87386,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V582*/ meltfptr[581];
+ (melt_ptr_t *) & /*_.VALDATA___V585*/ meltfptr[584];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V583*/ meltfptr[582]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86603,14 +87405,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V585*/ meltfptr[584];
+ (melt_ptr_t *) & /*_.VALDATA___V588*/ meltfptr[587];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCOND_TEST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86622,14 +87424,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V587*/ meltfptr[586];
+ (melt_ptr_t *) & /*_.VALDATA___V590*/ meltfptr[589];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCOND_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86641,14 +87443,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V589*/ meltfptr[588];
+ (melt_ptr_t *) & /*_.VALDATA___V592*/ meltfptr[591];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCOND_ELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86660,14 +87462,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V206*/ meltfptr[205];
+ (melt_ptr_t *) & /*_.VALDATA___V209*/ meltfptr[208];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCONSTV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86679,14 +87481,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V600*/ meltfptr[599];
+ (melt_ptr_t *) & /*_.VALDATA___V603*/ meltfptr[602];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCPPIF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V598*/ meltfptr[597]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86698,14 +87500,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V603*/ meltfptr[602];
+ (melt_ptr_t *) & /*_.VALDATA___V606*/ meltfptr[605];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBIFP_COND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86717,14 +87519,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V605*/ meltfptr[604];
+ (melt_ptr_t *) & /*_.VALDATA___V608*/ meltfptr[607];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBIFP_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86736,14 +87538,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V607*/ meltfptr[606];
+ (melt_ptr_t *) & /*_.VALDATA___V610*/ meltfptr[609];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBIFP_ELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86755,14 +87557,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V364*/ meltfptr[363];
+ (melt_ptr_t *) & /*_.VALDATA___V367*/ meltfptr[366];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJDESTINSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86774,14 +87576,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V367*/ meltfptr[366];
+ (melt_ptr_t *) & /*_.VALDATA___V370*/ meltfptr[369];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBDI_DESTLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86793,14 +87595,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V544*/ meltfptr[543];
+ (melt_ptr_t *) & /*_.VALDATA___V547*/ meltfptr[546];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJEXIT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86812,14 +87614,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V547*/ meltfptr[546];
+ (melt_ptr_t *) & /*_.VALDATA___V550*/ meltfptr[549];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBEXIT_LABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86831,14 +87633,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V324*/ meltfptr[323];
+ (melt_ptr_t *) & /*_.VALDATA___V327*/ meltfptr[326];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJEXPV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86850,14 +87652,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V327*/ meltfptr[326];
+ (melt_ptr_t *) & /*_.VALDATA___V330*/ meltfptr[329];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBX_CONT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86869,14 +87671,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V422*/ meltfptr[421];
+ (melt_ptr_t *) & /*_.VALDATA___V425*/ meltfptr[424];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJFINALRETURN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86888,14 +87690,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V384*/ meltfptr[383];
+ (melt_ptr_t *) & /*_.VALDATA___V387*/ meltfptr[386];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETARG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86907,14 +87709,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V387*/ meltfptr[386];
+ (melt_ptr_t *) & /*_.VALDATA___V390*/ meltfptr[389];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBARG_OBLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V395*/ meltfptr[394]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86926,14 +87728,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V389*/ meltfptr[388];
+ (melt_ptr_t *) & /*_.VALDATA___V392*/ meltfptr[391];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBARG_BIND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86945,14 +87747,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V398*/ meltfptr[397];
+ (melt_ptr_t *) & /*_.VALDATA___V401*/ meltfptr[400];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETARGREST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86964,14 +87766,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V401*/ meltfptr[400];
+ (melt_ptr_t *) & /*_.VALDATA___V404*/ meltfptr[403];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBARG_REST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V407*/ meltfptr[406]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -86983,14 +87785,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V640*/ meltfptr[639];
+ (melt_ptr_t *) & /*_.VALDATA___V643*/ meltfptr[642];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDCOMMON */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V641*/ meltfptr[640]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87002,14 +87804,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V643*/ meltfptr[642];
+ (melt_ptr_t *) & /*_.VALDATA___V646*/ meltfptr[645];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBGNAMED_IOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87021,14 +87823,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V656*/ meltfptr[655];
+ (melt_ptr_t *) & /*_.VALDATA___V659*/ meltfptr[658];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDKEYWORD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87040,14 +87842,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V650*/ meltfptr[649];
+ (melt_ptr_t *) & /*_.VALDATA___V653*/ meltfptr[652];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDSYMBOL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87059,14 +87861,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V838*/ meltfptr[837];
+ (melt_ptr_t *) & /*_.VALDATA___V841*/ meltfptr[840];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETSLOT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87078,14 +87880,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V841*/ meltfptr[840];
+ (melt_ptr_t *) & /*_.VALDATA___V844*/ meltfptr[843];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OGETSL_OBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87097,14 +87899,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V843*/ meltfptr[842];
+ (melt_ptr_t *) & /*_.VALDATA___V846*/ meltfptr[845];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OGETSL_FIELD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87116,14 +87918,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V516*/ meltfptr[515];
+ (melt_ptr_t *) & /*_.VALDATA___V519*/ meltfptr[518];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGOTOINSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87135,14 +87937,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V519*/ meltfptr[518];
+ (melt_ptr_t *) & /*_.VALDATA___V522*/ meltfptr[521];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBGOTO_PREFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87154,14 +87956,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V521*/ meltfptr[520];
+ (melt_ptr_t *) & /*_.VALDATA___V524*/ meltfptr[523];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBGOTO_RANK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87173,14 +87975,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V318*/ meltfptr[317];
+ (melt_ptr_t *) & /*_.VALDATA___V321*/ meltfptr[320];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITBOXINTEGER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87192,14 +87994,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V280*/ meltfptr[279];
+ (melt_ptr_t *) & /*_.VALDATA___V283*/ meltfptr[282];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITCLOSURE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87211,14 +88013,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V283*/ meltfptr[282];
+ (melt_ptr_t *) & /*_.VALDATA___V286*/ meltfptr[285];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OICLO_ROUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87230,14 +88032,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227];
+ (melt_ptr_t *) & /*_.VALDATA___V231*/ meltfptr[230];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITELEM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87249,14 +88051,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V231*/ meltfptr[230];
+ (melt_ptr_t *) & /*_.VALDATA___V234*/ meltfptr[233];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIE_CNAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87268,14 +88070,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V233*/ meltfptr[232];
+ (melt_ptr_t *) & /*_.VALDATA___V236*/ meltfptr[235];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIE_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87287,14 +88089,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V235*/ meltfptr[234];
+ (melt_ptr_t *) & /*_.VALDATA___V238*/ meltfptr[237];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIE_DISCR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87306,14 +88108,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V237*/ meltfptr[236];
+ (melt_ptr_t *) & /*_.VALDATA___V240*/ meltfptr[239];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIE_LOCVAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87325,14 +88127,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V312*/ meltfptr[311];
+ (melt_ptr_t *) & /*_.VALDATA___V315*/ meltfptr[314];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87344,14 +88146,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V270*/ meltfptr[269];
+ (melt_ptr_t *) & /*_.VALDATA___V273*/ meltfptr[272];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITMULTIPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87363,14 +88165,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V273*/ meltfptr[272];
+ (melt_ptr_t *) & /*_.VALDATA___V276*/ meltfptr[275];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIM_TUPVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87382,14 +88184,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V250*/ meltfptr[249];
+ (melt_ptr_t *) & /*_.VALDATA___V253*/ meltfptr[252];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITOBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87401,14 +88203,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V253*/ meltfptr[252];
+ (melt_ptr_t *) & /*_.VALDATA___V256*/ meltfptr[255];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIO_PREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87420,14 +88222,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V255*/ meltfptr[254];
+ (melt_ptr_t *) & /*_.VALDATA___V258*/ meltfptr[257];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIO_CLASS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87439,14 +88241,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V306*/ meltfptr[305];
+ (melt_ptr_t *) & /*_.VALDATA___V309*/ meltfptr[308];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITPAIR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87458,14 +88260,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V290*/ meltfptr[289];
+ (melt_ptr_t *) & /*_.VALDATA___V293*/ meltfptr[292];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITROUTINE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87477,14 +88279,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V293*/ meltfptr[292];
+ (melt_ptr_t *) & /*_.VALDATA___V296*/ meltfptr[295];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OIR_PROCROUTINE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87496,14 +88298,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V300*/ meltfptr[299];
+ (melt_ptr_t *) & /*_.VALDATA___V303*/ meltfptr[302];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITSTRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87515,14 +88317,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V264*/ meltfptr[263];
+ (melt_ptr_t *) & /*_.VALDATA___V267*/ meltfptr[266];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITUNIQUEOBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87534,14 +88336,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V344*/ meltfptr[343];
+ (melt_ptr_t *) & /*_.VALDATA___V347*/ meltfptr[346];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87553,14 +88355,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V347*/ meltfptr[346];
+ (melt_ptr_t *) & /*_.VALDATA___V350*/ meltfptr[349];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBI_LOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87572,14 +88374,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V618*/ meltfptr[617];
+ (melt_ptr_t *) & /*_.VALDATA___V621*/ meltfptr[620];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNCOMMON */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87591,14 +88393,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V621*/ meltfptr[620];
+ (melt_ptr_t *) & /*_.VALDATA___V624*/ meltfptr[623];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBINTERN_IOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87610,14 +88412,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V634*/ meltfptr[633];
+ (melt_ptr_t *) & /*_.VALDATA___V637*/ meltfptr[636];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNKEYWORD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87629,14 +88431,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V628*/ meltfptr[627];
+ (melt_ptr_t *) & /*_.VALDATA___V631*/ meltfptr[630];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNSYMBOL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87648,14 +88450,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V502*/ meltfptr[501];
+ (melt_ptr_t *) & /*_.VALDATA___V505*/ meltfptr[504];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLABELINSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87667,14 +88469,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V505*/ meltfptr[504];
+ (melt_ptr_t *) & /*_.VALDATA___V508*/ meltfptr[507];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLAB_PREFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87686,14 +88488,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V507*/ meltfptr[506];
+ (melt_ptr_t *) & /*_.VALDATA___V510*/ meltfptr[509];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLAB_RANK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87705,14 +88507,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V334*/ meltfptr[333];
+ (melt_ptr_t *) & /*_.VALDATA___V337*/ meltfptr[336];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOCATEDEXPV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87724,14 +88526,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V337*/ meltfptr[336];
+ (melt_ptr_t *) & /*_.VALDATA___V340*/ meltfptr[339];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBCX_LOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87743,14 +88545,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V170*/ meltfptr[169];
+ (melt_ptr_t *) & /*_.VALDATA___V173*/ meltfptr[172];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOCV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87762,14 +88564,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V173*/ meltfptr[172];
+ (melt_ptr_t *) & /*_.VALDATA___V176*/ meltfptr[175];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBL_OFF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87781,14 +88583,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V175*/ meltfptr[174];
+ (melt_ptr_t *) & /*_.VALDATA___V178*/ meltfptr[177];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBL_PROC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87800,14 +88602,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V177*/ meltfptr[176];
+ (melt_ptr_t *) & /*_.VALDATA___V180*/ meltfptr[179];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBL_CNAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87819,14 +88621,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V530*/ meltfptr[529];
+ (melt_ptr_t *) & /*_.VALDATA___V533*/ meltfptr[532];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOOP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87838,14 +88640,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V533*/ meltfptr[532];
+ (melt_ptr_t *) & /*_.VALDATA___V536*/ meltfptr[535];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLOOP_LABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87857,14 +88659,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V535*/ meltfptr[534];
+ (melt_ptr_t *) & /*_.VALDATA___V538*/ meltfptr[537];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBLOOP_RESV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V543*/ meltfptr[542]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87876,14 +88678,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V686*/ meltfptr[685];
+ (melt_ptr_t *) & /*_.VALDATA___V689*/ meltfptr[688];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMSEND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87895,14 +88697,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V689*/ meltfptr[688];
+ (melt_ptr_t *) & /*_.VALDATA___V692*/ meltfptr[691];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBMSND_SEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V699*/ meltfptr[698]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87914,14 +88716,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V691*/ meltfptr[690];
+ (melt_ptr_t *) & /*_.VALDATA___V694*/ meltfptr[693];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBMSND_RECV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87933,14 +88735,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V693*/ meltfptr[692];
+ (melt_ptr_t *) & /*_.VALDATA___V696*/ meltfptr[695];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBMSND_ARGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87952,14 +88754,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V458*/ meltfptr[457];
+ (melt_ptr_t *) & /*_.VALDATA___V461*/ meltfptr[460];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIALLOCBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87971,14 +88773,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V461*/ meltfptr[460];
+ (melt_ptr_t *) & /*_.VALDATA___V464*/ meltfptr[463];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OMALBLO_ALLSTRUCT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -87990,14 +88792,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V463*/ meltfptr[462];
+ (melt_ptr_t *) & /*_.VALDATA___V466*/ meltfptr[465];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OMALBLO_NAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88009,14 +88811,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V676*/ meltfptr[675];
+ (melt_ptr_t *) & /*_.VALDATA___V679*/ meltfptr[678];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIAPPLY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V677*/ meltfptr[676]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88028,14 +88830,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V679*/ meltfptr[678];
+ (melt_ptr_t *) & /*_.VALDATA___V682*/ meltfptr[681];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBMULTAPP_XRES */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88047,14 +88849,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V482*/ meltfptr[481];
+ (melt_ptr_t *) & /*_.VALDATA___V485*/ meltfptr[484];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88066,14 +88868,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V485*/ meltfptr[484];
+ (melt_ptr_t *) & /*_.VALDATA___V488*/ meltfptr[487];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OMULBLO_SUBCOMP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88085,14 +88887,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V704*/ meltfptr[703];
+ (melt_ptr_t *) & /*_.VALDATA___V707*/ meltfptr[706];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIMSEND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88104,14 +88906,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V707*/ meltfptr[706];
+ (melt_ptr_t *) & /*_.VALDATA___V710*/ meltfptr[709];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBMULTSND_XRES */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88123,14 +88925,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V732*/ meltfptr[731];
+ (melt_ptr_t *) & /*_.VALDATA___V735*/ meltfptr[734];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJNEWCLOSURE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88142,14 +88944,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V735*/ meltfptr[734];
+ (melt_ptr_t *) & /*_.VALDATA___V738*/ meltfptr[737];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBNCLO_DISCR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88161,14 +88963,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V737*/ meltfptr[736];
+ (melt_ptr_t *) & /*_.VALDATA___V740*/ meltfptr[739];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBNCLO_ROUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88180,14 +88982,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V739*/ meltfptr[738];
+ (melt_ptr_t *) & /*_.VALDATA___V742*/ meltfptr[741];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBNCLO_LEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88199,14 +89001,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V222*/ meltfptr[221];
+ (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJNIL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88218,14 +89020,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V212*/ meltfptr[211];
+ (melt_ptr_t *) & /*_.VALDATA___V215*/ meltfptr[214];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V210*/ meltfptr[209]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88237,14 +89039,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V215*/ meltfptr[214];
+ (melt_ptr_t *) & /*_.VALDATA___V218*/ meltfptr[217];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBPREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88256,14 +89058,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V164*/ meltfptr[163];
+ (melt_ptr_t *) & /*_.VALDATA___V167*/ meltfptr[166];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUREVALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V162*/ meltfptr[161]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88275,14 +89077,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V884*/ meltfptr[883];
+ (melt_ptr_t *) & /*_.VALDATA___V887*/ meltfptr[886];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSEDNOTNULLV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88294,14 +89096,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V866*/ meltfptr[865];
+ (melt_ptr_t *) & /*_.VALDATA___V869*/ meltfptr[868];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSEDV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88313,14 +89115,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V869*/ meltfptr[868];
+ (melt_ptr_t *) & /*_.VALDATA___V872*/ meltfptr[871];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_CLOS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88332,14 +89134,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V871*/ meltfptr[870];
+ (melt_ptr_t *) & /*_.VALDATA___V874*/ meltfptr[873];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_OFF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88351,14 +89153,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V873*/ meltfptr[872];
+ (melt_ptr_t *) & /*_.VALDATA___V876*/ meltfptr[875];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_CVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88370,14 +89172,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V852*/ meltfptr[851];
+ (melt_ptr_t *) & /*_.VALDATA___V855*/ meltfptr[854];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSUROUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88389,14 +89191,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V855*/ meltfptr[854];
+ (melt_ptr_t *) & /*_.VALDATA___V858*/ meltfptr[857];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPCLOR_CLOS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88408,14 +89210,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V857*/ meltfptr[856];
+ (melt_ptr_t *) & /*_.VALDATA___V860*/ meltfptr[859];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPCLOR_ROUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88427,14 +89229,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V798*/ meltfptr[797];
+ (melt_ptr_t *) & /*_.VALDATA___V801*/ meltfptr[800];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88446,14 +89248,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V801*/ meltfptr[800];
+ (melt_ptr_t *) & /*_.VALDATA___V804*/ meltfptr[803];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTL_LIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88465,14 +89267,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V803*/ meltfptr[802];
+ (melt_ptr_t *) & /*_.VALDATA___V806*/ meltfptr[805];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTL_FIRST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88484,14 +89286,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V805*/ meltfptr[804];
+ (melt_ptr_t *) & /*_.VALDATA___V808*/ meltfptr[807];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTL_LAST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88503,14 +89305,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V768*/ meltfptr[767];
+ (melt_ptr_t *) & /*_.VALDATA___V771*/ meltfptr[770];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88522,14 +89324,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V771*/ meltfptr[770];
+ (melt_ptr_t *) & /*_.VALDATA___V774*/ meltfptr[773];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTP_PAIR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88541,14 +89343,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V778*/ meltfptr[777];
+ (melt_ptr_t *) & /*_.VALDATA___V781*/ meltfptr[780];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIRHEAD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88560,14 +89362,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V781*/ meltfptr[780];
+ (melt_ptr_t *) & /*_.VALDATA___V784*/ meltfptr[783];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTP_HEAD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88579,14 +89381,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V788*/ meltfptr[787];
+ (melt_ptr_t *) & /*_.VALDATA___V791*/ meltfptr[790];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIRTAIL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88598,14 +89400,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V791*/ meltfptr[790];
+ (melt_ptr_t *) & /*_.VALDATA___V794*/ meltfptr[793];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTP_TAIL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88617,14 +89419,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V890*/ meltfptr[889];
+ (melt_ptr_t *) & /*_.VALDATA___V893*/ meltfptr[892];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTROUTCONST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88636,14 +89438,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V893*/ meltfptr[892];
+ (melt_ptr_t *) & /*_.VALDATA___V896*/ meltfptr[895];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_ROUT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88655,14 +89457,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V895*/ meltfptr[894];
+ (melt_ptr_t *) & /*_.VALDATA___V898*/ meltfptr[897];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_OFF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88674,14 +89476,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V897*/ meltfptr[896];
+ (melt_ptr_t *) & /*_.VALDATA___V900*/ meltfptr[899];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_CVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88693,14 +89495,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V908*/ meltfptr[907];
+ (melt_ptr_t *) & /*_.VALDATA___V911*/ meltfptr[910];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTROUTCONSTNOTNULL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88712,14 +89514,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V816*/ meltfptr[815];
+ (melt_ptr_t *) & /*_.VALDATA___V819*/ meltfptr[818];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTSLOT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88731,14 +89533,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V819*/ meltfptr[818];
+ (melt_ptr_t *) & /*_.VALDATA___V822*/ meltfptr[821];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSLOT_ODATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88750,14 +89552,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V821*/ meltfptr[820];
+ (melt_ptr_t *) & /*_.VALDATA___V824*/ meltfptr[823];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSLOT_OFFSET */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88769,14 +89571,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V823*/ meltfptr[822];
+ (melt_ptr_t *) & /*_.VALDATA___V826*/ meltfptr[825];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSLOT_FIELD */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88788,14 +89590,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V825*/ meltfptr[824];
+ (melt_ptr_t *) & /*_.VALDATA___V828*/ meltfptr[827];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSLOT_VALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V834*/ meltfptr[833]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88807,14 +89609,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V750*/ meltfptr[749];
+ (melt_ptr_t *) & /*_.VALDATA___V753*/ meltfptr[752];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTUPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88826,14 +89628,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V753*/ meltfptr[752];
+ (melt_ptr_t *) & /*_.VALDATA___V756*/ meltfptr[755];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTU_TUPLED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88845,14 +89647,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V755*/ meltfptr[754];
+ (melt_ptr_t *) & /*_.VALDATA___V758*/ meltfptr[757];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTU_OFFSET */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88864,14 +89666,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V757*/ meltfptr[756];
+ (melt_ptr_t *) & /*_.VALDATA___V760*/ meltfptr[759];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPUTU_VALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88883,14 +89685,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V408*/ meltfptr[407];
+ (melt_ptr_t *) & /*_.VALDATA___V411*/ meltfptr[410];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTXTRARESULT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88902,14 +89704,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V411*/ meltfptr[410];
+ (melt_ptr_t *) & /*_.VALDATA___V414*/ meltfptr[413];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBXRES_RANK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88921,14 +89723,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V413*/ meltfptr[412];
+ (melt_ptr_t *) & /*_.VALDATA___V416*/ meltfptr[415];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBXRES_OBLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V421*/ meltfptr[420]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88940,14 +89742,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V714*/ meltfptr[713];
+ (melt_ptr_t *) & /*_.VALDATA___V717*/ meltfptr[716];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJRAWALLOCOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88959,14 +89761,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V717*/ meltfptr[716];
+ (melt_ptr_t *) & /*_.VALDATA___V720*/ meltfptr[719];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_CLASS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88978,14 +89780,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V719*/ meltfptr[718];
+ (melt_ptr_t *) & /*_.VALDATA___V722*/ meltfptr[721];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_LEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V729*/ meltfptr[728]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -88997,14 +89799,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V721*/ meltfptr[720];
+ (melt_ptr_t *) & /*_.VALDATA___V724*/ meltfptr[723];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_CLASSNAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89016,14 +89818,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V928*/ meltfptr[927];
+ (melt_ptr_t *) & /*_.VALDATA___V931*/ meltfptr[930];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJSETPREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89035,14 +89837,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V931*/ meltfptr[930];
+ (melt_ptr_t *) & /*_.VALDATA___V934*/ meltfptr[933];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSPR_OBJECT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V939*/ meltfptr[938]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89054,14 +89856,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V933*/ meltfptr[932];
+ (melt_ptr_t *) & /*_.VALDATA___V936*/ meltfptr[935];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OSPR_PREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89073,14 +89875,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V914*/ meltfptr[913];
+ (melt_ptr_t *) & /*_.VALDATA___V917*/ meltfptr[916];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJTOUCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89092,14 +89894,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V917*/ meltfptr[916];
+ (melt_ptr_t *) & /*_.VALDATA___V920*/ meltfptr[919];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OTOUCH_VAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89111,14 +89913,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V919*/ meltfptr[918];
+ (melt_ptr_t *) & /*_.VALDATA___V922*/ meltfptr[921];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OTOUCH_COMMENT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89130,14 +89932,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V154*/ meltfptr[153];
+ (melt_ptr_t *) & /*_.VALDATA___V157*/ meltfptr[156];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJVALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89149,14 +89951,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V157*/ meltfptr[156];
+ (melt_ptr_t *) & /*_.VALDATA___V160*/ meltfptr[159];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBV_TYPE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89168,14 +89970,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V982*/ meltfptr[981];
+ (melt_ptr_t *) & /*_.VALDATA___V985*/ meltfptr[984];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_PROCROUTINEOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89187,14 +89989,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V985*/ meltfptr[984];
+ (melt_ptr_t *) & /*_.VALDATA___V988*/ meltfptr[987];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPROUT_GETARGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89206,14 +90008,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V987*/ meltfptr[986];
+ (melt_ptr_t *) & /*_.VALDATA___V990*/ meltfptr[989];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPROUT_LOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89225,14 +90027,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V989*/ meltfptr[988];
+ (melt_ptr_t *) & /*_.VALDATA___V992*/ meltfptr[991];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPROUT_FUNAM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1000*/ meltfptr[999]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89244,14 +90046,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V991*/ meltfptr[990];
+ (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPROUT_RESTNAM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89263,14 +90065,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V993*/ meltfptr[992];
+ (melt_ptr_t *) & /*_.VALDATA___V996*/ meltfptr[995];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OPROUT_FILENUM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89282,14 +90084,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V944*/ meltfptr[943];
+ (melt_ptr_t *) & /*_.VALDATA___V947*/ meltfptr[946];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_ROUTINEOBJ */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89301,14 +90103,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V947*/ meltfptr[946];
+ (melt_ptr_t *) & /*_.VALDATA___V950*/ meltfptr[949];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_PROC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89320,14 +90122,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V949*/ meltfptr[948];
+ (melt_ptr_t *) & /*_.VALDATA___V952*/ meltfptr[951];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_BODY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89339,14 +90141,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V951*/ meltfptr[950];
+ (melt_ptr_t *) & /*_.VALDATA___V954*/ meltfptr[953];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_NBVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89358,14 +90160,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V953*/ meltfptr[952];
+ (melt_ptr_t *) & /*_.VALDATA___V956*/ meltfptr[955];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_NBLONG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89377,14 +90179,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V955*/ meltfptr[954];
+ (melt_ptr_t *) & /*_.VALDATA___V958*/ meltfptr[957];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_OTHERS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89396,14 +90198,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V957*/ meltfptr[956];
+ (melt_ptr_t *) & /*_.VALDATA___V960*/ meltfptr[959];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_RETVAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89415,14 +90217,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V959*/ meltfptr[958];
+ (melt_ptr_t *) & /*_.VALDATA___V962*/ meltfptr[961];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_CNTCITER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89434,14 +90236,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V961*/ meltfptr[960];
+ (melt_ptr_t *) & /*_.VALDATA___V964*/ meltfptr[963];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OBROUT_CNTLETREC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1822*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]),
+ ( /*_.VALUEXPORTER___V1839*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89449,7 +90251,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1822*/ meltfptr[1819] = 0;
+ /*clear *//*_.VALUEXPORTER___V1839*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:619:/ initchunk");
@@ -89461,8 +90263,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1823*/
- meltfptr[1820] = slot;
+ /*_.VALUEXPORTER___V1840*/
+ meltfptr[1837] = slot;
};
;
/*^apply */
@@ -89472,14 +90274,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V452*/ meltfptr[451];
+ (melt_ptr_t *) & /*_.VALDATA___V455*/ meltfptr[454];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJBLOCK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1823*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027]),
+ ( /*_.VALUEXPORTER___V1840*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89487,7 +90289,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1823*/ meltfptr[1820] = 0;
+ /*clear *//*_.VALUEXPORTER___V1840*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:761:/ initchunk");
@@ -89499,8 +90301,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1824*/
- meltfptr[1818] = slot;
+ /*_.VALUEXPORTER___V1841*/
+ meltfptr[1835] = slot;
};
;
/*^apply */
@@ -89510,14 +90312,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1082*/ meltfptr[1081];
+ (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_CODE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1824*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]),
+ ( /*_.VALUEXPORTER___V1841*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89529,14 +90331,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1063*/ meltfptr[1062];
+ (melt_ptr_t *) & /*_.VALDATA___V1066*/ meltfptr[1065];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_DECLINIT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1824*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051]),
+ ( /*_.VALUEXPORTER___V1841*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1055*/ meltfptr[1054]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89548,14 +90350,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1093*/ meltfptr[1092];
+ (melt_ptr_t *) & /*_.VALDATA___V1096*/ meltfptr[1095];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_INITIAL_FILL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1824*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083]),
+ ( /*_.VALUEXPORTER___V1841*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89567,14 +90369,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1104*/ meltfptr[1103];
+ (melt_ptr_t *) & /*_.VALDATA___V1107*/ meltfptr[1106];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_INITIAL_PREDEF */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1824*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]),
+ ( /*_.VALUEXPORTER___V1841*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89586,14 +90388,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PUT_OBJDEST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1824*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064]),
+ ( /*_.VALUEXPORTER___V1841*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1068*/ meltfptr[1067]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89601,7 +90403,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1824*/ meltfptr[1818] = 0;
+ /*clear *//*_.VALUEXPORTER___V1841*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:780:/ initchunk");
@@ -89619,8 +90421,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1107*/ meltfptr[1106];
- /*_.INSTALL_METHOD__V1825*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1110*/ meltfptr[1109];
+ /*_.INSTALL_METHOD__V1842*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]),
@@ -89631,7 +90433,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1825*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1842*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:790:/ initchunk");
@@ -89646,11 +90448,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1115*/ meltfptr[1114];
- /*_.INSTALL_METHOD__V1826*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1118*/ meltfptr[1117];
+ /*_.INSTALL_METHOD__V1843*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/
@@ -89662,7 +90464,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1826*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1843*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:801:/ initchunk");
@@ -89677,11 +90479,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1117*/ meltfptr[1116];
- /*_.INSTALL_METHOD__V1827*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1120*/ meltfptr[1119];
+ /*_.INSTALL_METHOD__V1844*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V22*/
@@ -89693,7 +90495,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1827*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1844*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:807:/ initchunk");
@@ -89711,11 +90513,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1121*/ meltfptr[1120];
- /*_.INSTALL_METHOD__V1828*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1124*/ meltfptr[1123];
+ /*_.INSTALL_METHOD__V1845*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]),
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89723,7 +90525,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1828*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1845*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:816:/ initchunk");
@@ -89741,11 +90543,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1125*/ meltfptr[1124];
- /*_.INSTALL_METHOD__V1829*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1128*/ meltfptr[1127];
+ /*_.INSTALL_METHOD__V1846*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]),
+ (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89753,7 +90555,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1829*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1846*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:822:/ initchunk");
@@ -89771,11 +90573,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1129*/ meltfptr[1128];
- /*_.INSTALL_METHOD__V1830*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1132*/ meltfptr[1131];
+ /*_.INSTALL_METHOD__V1847*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]),
+ (melt_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89783,7 +90585,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1830*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1847*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:831:/ initchunk");
@@ -89801,11 +90603,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.DBG_OUTPUT__V26*/ meltfptr[25];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1131*/ meltfptr[1130];
- /*_.INSTALL_METHOD__V1831*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1134*/ meltfptr[1133];
+ /*_.INSTALL_METHOD__V1848*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]),
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89813,7 +90615,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1831*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1848*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:849:/ initchunk");
@@ -89828,14 +90630,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1137*/ meltfptr[1136];
- /*_.INSTALL_METHOD__V1832*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1140*/ meltfptr[1139];
+ /*_.INSTALL_METHOD__V1849*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]),
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89843,7 +90645,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1832*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1849*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:874:/ initchunk");
@@ -89858,14 +90660,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1139*/ meltfptr[1138];
- /*_.INSTALL_METHOD__V1833*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1142*/ meltfptr[1141];
+ /*_.INSTALL_METHOD__V1850*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]),
+ (melt_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89873,7 +90675,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1833*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1850*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1390:/ initchunk");
@@ -89885,8 +90687,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1834*/
- meltfptr[1819] = slot;
+ /*_.VALUEXPORTER___V1851*/
+ meltfptr[1836] = slot;
};
;
/*^apply */
@@ -89896,14 +90698,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1221*/ meltfptr[1220];
+ (melt_ptr_t *) & /*_.VALCLO___V1224*/ meltfptr[1223];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : COMPILE2OBJ_INITPROC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1834*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]),
+ ( /*_.VALUEXPORTER___V1851*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1251*/ meltfptr[1250]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89915,14 +90717,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1167*/ meltfptr[1166];
+ (melt_ptr_t *) & /*_.VALCLO___V1170*/ meltfptr[1169];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : COMPILE2OBJ_PROCEDURE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1834*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]),
+ ( /*_.VALUEXPORTER___V1851*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89934,14 +90736,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1153*/ meltfptr[1152];
+ (melt_ptr_t *) & /*_.VALCLO___V1156*/ meltfptr[1155];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_INDEX_IDSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1834*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]),
+ ( /*_.VALUEXPORTER___V1851*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89953,14 +90755,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1155*/ meltfptr[1154];
+ (melt_ptr_t *) & /*_.VALCLO___V1158*/ meltfptr[1157];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_LENGTH_IDSTR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1834*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]),
+ ( /*_.VALUEXPORTER___V1851*/ meltfptr[1836]),
+ (melt_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -89968,7 +90770,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1834*/ meltfptr[1819] = 0;
+ /*clear *//*_.VALUEXPORTER___V1851*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1639:/ initchunk");
@@ -89986,8 +90788,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1266*/ meltfptr[1265];
- /*_.INSTALL_METHOD__V1835*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1269*/ meltfptr[1268];
+ /*_.INSTALL_METHOD__V1852*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V58*/ meltfptr[57]),
@@ -89998,7 +90800,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1835*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1852*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1646:/ initchunk");
@@ -90016,8 +90818,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1270*/ meltfptr[1269];
- /*_.INSTALL_METHOD__V1836*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1273*/ meltfptr[1272];
+ /*_.INSTALL_METHOD__V1853*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V59*/
@@ -90029,7 +90831,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1836*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1853*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1657:/ initchunk");
@@ -90047,8 +90849,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1274*/ meltfptr[1273];
- /*_.INSTALL_METHOD__V1837*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1277*/ meltfptr[1276];
+ /*_.INSTALL_METHOD__V1854*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_NIL__V60*/ meltfptr[59]),
@@ -90059,7 +90861,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1837*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1854*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1679:/ initchunk");
@@ -90077,8 +90879,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1278*/ meltfptr[1277];
- /*_.INSTALL_METHOD__V1838*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1281*/ meltfptr[1280];
+ /*_.INSTALL_METHOD__V1855*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_COMMENT__V61*/
@@ -90090,7 +90892,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1838*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1855*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1708:/ initchunk");
@@ -90108,8 +90910,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1282*/ meltfptr[1281];
- /*_.INSTALL_METHOD__V1839*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1285*/ meltfptr[1284];
+ /*_.INSTALL_METHOD__V1856*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/
@@ -90121,7 +90923,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1839*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1856*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1758:/ initchunk");
@@ -90139,8 +90941,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1286*/ meltfptr[1285];
- /*_.INSTALL_METHOD__V1840*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1289*/ meltfptr[1288];
+ /*_.INSTALL_METHOD__V1857*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_CLOSEDOCC__V63*/
@@ -90152,7 +90954,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1840*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1857*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1806:/ initchunk");
@@ -90170,8 +90972,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1290*/ meltfptr[1289];
- /*_.INSTALL_METHOD__V1841*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1293*/ meltfptr[1292];
+ /*_.INSTALL_METHOD__V1858*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/
@@ -90183,7 +90985,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1841*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1858*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1821:/ initchunk");
@@ -90201,8 +91003,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1294*/ meltfptr[1293];
- /*_.INSTALL_METHOD__V1842*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1297*/ meltfptr[1296];
+ /*_.INSTALL_METHOD__V1859*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V50*/
@@ -90214,7 +91016,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1842*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1859*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1840:/ initchunk");
@@ -90232,8 +91034,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1296*/ meltfptr[1295];
- /*_.INSTALL_METHOD__V1843*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1299*/ meltfptr[1298];
+ /*_.INSTALL_METHOD__V1860*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_DEFINED_CONSTANT__V65*/
@@ -90245,7 +91047,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1843*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1860*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1901:/ initchunk");
@@ -90263,8 +91065,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1300*/ meltfptr[1299];
- /*_.INSTALL_METHOD__V1844*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1303*/ meltfptr[1302];
+ /*_.INSTALL_METHOD__V1861*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_QUASICONSTANT__V66*/
@@ -90276,7 +91078,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1844*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1861*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1927:/ initchunk");
@@ -90294,8 +91096,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1304*/ meltfptr[1303];
- /*_.INSTALL_METHOD__V1845*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1307*/ meltfptr[1306];
+ /*_.INSTALL_METHOD__V1862*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V67*/ meltfptr[66]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90304,7 +91106,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1845*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1862*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:1967:/ initchunk");
@@ -90322,8 +91124,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1309*/ meltfptr[1308];
- /*_.INSTALL_METHOD__V1846*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1312*/ meltfptr[1311];
+ /*_.INSTALL_METHOD__V1863*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_FOREVER__V68*/
@@ -90335,7 +91137,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1846*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1863*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2006:/ initchunk");
@@ -90353,8 +91155,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1315*/ meltfptr[1314];
- /*_.INSTALL_METHOD__V1847*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1318*/ meltfptr[1317];
+ /*_.INSTALL_METHOD__V1864*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_EXIT__V70*/ meltfptr[69]),
@@ -90365,7 +91167,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1847*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1864*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2026:/ initchunk");
@@ -90383,8 +91185,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1319*/ meltfptr[1318];
- /*_.INSTALL_METHOD__V1848*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1322*/ meltfptr[1321];
+ /*_.INSTALL_METHOD__V1865*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_AGAIN__V71*/ meltfptr[70]),
@@ -90395,7 +91197,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1848*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1865*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2035:/ initchunk");
@@ -90413,8 +91215,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1323*/ meltfptr[1322];
- /*_.INSTALL_METHOD__V1849*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1326*/ meltfptr[1325];
+ /*_.INSTALL_METHOD__V1866*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V22*/
@@ -90426,7 +91228,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1849*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1866*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2122:/ initchunk");
@@ -90444,8 +91246,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1328*/ meltfptr[1327];
- /*_.INSTALL_METHOD__V1850*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1331*/ meltfptr[1330];
+ /*_.INSTALL_METHOD__V1867*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_LET__V72*/ meltfptr[71]),
@@ -90456,7 +91258,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1850*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1867*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2138:/ initchunk");
@@ -90468,8 +91270,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1851*/
- meltfptr[1818] = slot;
+ /*_.VALUEXPORTER___V1868*/
+ meltfptr[1835] = slot;
};
;
/*^apply */
@@ -90479,14 +91281,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : COMPILE_LETREC_FILL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1851*/ meltfptr[1818]),
- (melt_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334]),
+ ( /*_.VALUEXPORTER___V1868*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -90494,7 +91296,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1851*/ meltfptr[1818] = 0;
+ /*clear *//*_.VALUEXPORTER___V1868*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2147:/ initchunk");
@@ -90509,11 +91311,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1354*/ meltfptr[1353];
- /*_.INSTALL_METHOD__V1852*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1357*/ meltfptr[1356];
+ /*_.INSTALL_METHOD__V1869*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V22*/
@@ -90525,7 +91327,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1852*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1869*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2205:/ initchunk");
@@ -90540,11 +91342,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1356*/ meltfptr[1355];
- /*_.INSTALL_METHOD__V1853*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1359*/ meltfptr[1358];
+ /*_.INSTALL_METHOD__V1870*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/ meltfptr[74]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90553,7 +91355,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1853*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1870*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2249:/ initchunk");
@@ -90568,11 +91370,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1362*/ meltfptr[1361];
- /*_.INSTALL_METHOD__V1854*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1365*/ meltfptr[1364];
+ /*_.INSTALL_METHOD__V1871*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/ meltfptr[76]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90581,7 +91383,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1854*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1871*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2290:/ initchunk");
@@ -90596,11 +91398,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1366*/ meltfptr[1365];
- /*_.INSTALL_METHOD__V1855*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1369*/ meltfptr[1368];
+ /*_.INSTALL_METHOD__V1872*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/ meltfptr[77]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90609,7 +91411,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1855*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1872*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2330:/ initchunk");
@@ -90624,11 +91426,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1370*/ meltfptr[1369];
- /*_.INSTALL_METHOD__V1856*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1373*/ meltfptr[1372];
+ /*_.INSTALL_METHOD__V1873*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/ meltfptr[78]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90637,7 +91439,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1856*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1873*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2385:/ initchunk");
@@ -90652,11 +91454,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1351*/ meltfptr[1350];
+ (melt_ptr_t *) & /*_.VALDATA___V1354*/ meltfptr[1353];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1374*/ meltfptr[1373];
- /*_.INSTALL_METHOD__V1857*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1377*/ meltfptr[1376];
+ /*_.INSTALL_METHOD__V1874*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/ meltfptr[79]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -90665,9 +91467,20 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1857*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1874*/ meltfptr[1835] = 0;
}
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_32 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
MELT_LOCATION ("warmelt-genobj.melt:2599:/ initchunk");
/*^block */
/*anyblock */
@@ -90683,8 +91496,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1384*/ meltfptr[1383];
- /*_.INSTALL_METHOD__V1858*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1387*/ meltfptr[1386];
+ /*_.INSTALL_METHOD__V1875*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V84*/ meltfptr[83]),
@@ -90695,7 +91508,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1858*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1875*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2741:/ initchunk");
@@ -90713,8 +91526,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1395*/ meltfptr[1394];
- /*_.INSTALL_METHOD__V1859*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1398*/ meltfptr[1397];
+ /*_.INSTALL_METHOD__V1876*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_CITERATION__V86*/
@@ -90726,7 +91539,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1859*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1876*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2764:/ initchunk");
@@ -90744,8 +91557,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1401*/ meltfptr[1400];
- /*_.INSTALL_METHOD__V1860*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1404*/ meltfptr[1403];
+ /*_.INSTALL_METHOD__V1877*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V88*/ meltfptr[87]),
@@ -90756,7 +91569,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1860*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1877*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2794:/ initchunk");
@@ -90774,8 +91587,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1406*/ meltfptr[1405];
- /*_.INSTALL_METHOD__V1861*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1409*/ meltfptr[1408];
+ /*_.INSTALL_METHOD__V1878*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V89*/ meltfptr[88]),
@@ -90786,7 +91599,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1861*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1878*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2844:/ initchunk");
@@ -90804,8 +91617,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1411*/ meltfptr[1410];
- /*_.INSTALL_METHOD__V1862*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1414*/ meltfptr[1413];
+ /*_.INSTALL_METHOD__V1879*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_MULTACC__V90*/
@@ -90817,7 +91630,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1862*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1879*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2898:/ initchunk");
@@ -90835,8 +91648,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1416*/ meltfptr[1415];
- /*_.INSTALL_METHOD__V1863*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1419*/ meltfptr[1418];
+ /*_.INSTALL_METHOD__V1880*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_FIELDACC__V91*/
@@ -90848,7 +91661,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1863*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1880*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2919:/ initchunk");
@@ -90866,8 +91679,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1424*/ meltfptr[1423];
- /*_.INSTALL_METHOD__V1864*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1427*/ meltfptr[1426];
+ /*_.INSTALL_METHOD__V1881*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/
@@ -90879,7 +91692,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1864*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1881*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2967:/ initchunk");
@@ -90897,8 +91710,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1429*/ meltfptr[1428];
- /*_.INSTALL_METHOD__V1865*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1432*/ meltfptr[1431];
+ /*_.INSTALL_METHOD__V1882*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V95*/
@@ -90910,7 +91723,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1865*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1882*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:2987:/ initchunk");
@@ -90928,8 +91741,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1435*/ meltfptr[1434];
- /*_.INSTALL_METHOD__V1866*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1438*/ meltfptr[1437];
+ /*_.INSTALL_METHOD__V1883*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V97*/
@@ -90941,7 +91754,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1866*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1883*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3019:/ initchunk");
@@ -90959,8 +91772,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1440*/ meltfptr[1439];
- /*_.INSTALL_METHOD__V1867*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1443*/ meltfptr[1442];
+ /*_.INSTALL_METHOD__V1884*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_APPLY__V98*/ meltfptr[97]),
@@ -90971,7 +91784,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1867*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1884*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3099:/ initchunk");
@@ -90989,8 +91802,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1449*/ meltfptr[1448];
- /*_.INSTALL_METHOD__V1868*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1452*/ meltfptr[1451];
+ /*_.INSTALL_METHOD__V1885*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_MULTIAPPLY__V99*/
@@ -91002,7 +91815,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1868*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1885*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3140:/ initchunk");
@@ -91020,8 +91833,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1454*/ meltfptr[1453];
- /*_.INSTALL_METHOD__V1869*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1457*/ meltfptr[1456];
+ /*_.INSTALL_METHOD__V1886*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_MSEND__V100*/ meltfptr[99]),
@@ -91032,7 +91845,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1869*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1886*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3226:/ initchunk");
@@ -91050,8 +91863,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1462*/ meltfptr[1461];
- /*_.INSTALL_METHOD__V1870*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1465*/ meltfptr[1464];
+ /*_.INSTALL_METHOD__V1887*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_MULTIMSEND__V101*/
@@ -91063,7 +91876,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1870*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1887*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3240:/ initchunk");
@@ -91081,8 +91894,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1466*/ meltfptr[1465];
- /*_.INSTALL_METHOD__V1871*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1469*/ meltfptr[1468];
+ /*_.INSTALL_METHOD__V1888*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]),
@@ -91093,7 +91906,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1871*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1888*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3257:/ initchunk");
@@ -91111,8 +91924,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1468*/ meltfptr[1467];
- /*_.INSTALL_METHOD__V1872*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1471*/ meltfptr[1470];
+ /*_.INSTALL_METHOD__V1889*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V81*/
@@ -91124,7 +91937,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1872*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1889*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3270:/ initchunk");
@@ -91142,8 +91955,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1470*/ meltfptr[1469];
- /*_.INSTALL_METHOD__V1873*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1473*/ meltfptr[1472];
+ /*_.INSTALL_METHOD__V1890*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/
@@ -91155,7 +91968,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1873*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1890*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3286:/ initchunk");
@@ -91173,8 +91986,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1472*/ meltfptr[1471];
- /*_.INSTALL_METHOD__V1874*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1475*/ meltfptr[1474];
+ /*_.INSTALL_METHOD__V1891*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/
@@ -91186,7 +91999,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1874*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1891*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3331:/ initchunk");
@@ -91204,8 +92017,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1474*/ meltfptr[1473];
- /*_.INSTALL_METHOD__V1875*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1477*/ meltfptr[1476];
+ /*_.INSTALL_METHOD__V1892*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V75*/ meltfptr[74]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -91214,7 +92027,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1875*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1892*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3375:/ initchunk");
@@ -91232,8 +92045,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1476*/ meltfptr[1475];
- /*_.INSTALL_METHOD__V1876*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1479*/ meltfptr[1478];
+ /*_.INSTALL_METHOD__V1893*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V77*/ meltfptr[76]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -91242,7 +92055,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1876*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1893*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3414:/ initchunk");
@@ -91260,8 +92073,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1478*/ meltfptr[1477];
- /*_.INSTALL_METHOD__V1877*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1481*/ meltfptr[1480];
+ /*_.INSTALL_METHOD__V1894*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V78*/ meltfptr[77]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -91270,7 +92083,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1877*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1894*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3449:/ initchunk");
@@ -91288,8 +92101,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1480*/ meltfptr[1479];
- /*_.INSTALL_METHOD__V1878*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1483*/ meltfptr[1482];
+ /*_.INSTALL_METHOD__V1895*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V79*/ meltfptr[78]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -91298,7 +92111,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1878*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1895*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3495:/ initchunk");
@@ -91316,8 +92129,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1482*/ meltfptr[1481];
- /*_.INSTALL_METHOD__V1879*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1485*/ meltfptr[1484];
+ /*_.INSTALL_METHOD__V1896*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V80*/ meltfptr[79]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -91326,7 +92139,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1879*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1896*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3558:/ initchunk");
@@ -91341,14 +92154,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1484*/ meltfptr[1483];
- /*_.INSTALL_METHOD__V1880*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1487*/ meltfptr[1486];
+ /*_.INSTALL_METHOD__V1897*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]),
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91356,7 +92169,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1880*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1897*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3581:/ initchunk");
@@ -91371,11 +92184,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1486*/ meltfptr[1485];
- /*_.INSTALL_METHOD__V1881*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1489*/ meltfptr[1488];
+ /*_.INSTALL_METHOD__V1898*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]),
@@ -91386,7 +92199,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1881*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1898*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3606:/ initchunk");
@@ -91401,11 +92214,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1488*/ meltfptr[1487];
- /*_.INSTALL_METHOD__V1882*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1491*/ meltfptr[1490];
+ /*_.INSTALL_METHOD__V1899*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]),
@@ -91416,7 +92229,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1882*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1899*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3630:/ initchunk");
@@ -91431,11 +92244,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1492*/ meltfptr[1491];
- /*_.INSTALL_METHOD__V1883*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1495*/ meltfptr[1494];
+ /*_.INSTALL_METHOD__V1900*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V103*/
@@ -91447,7 +92260,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1883*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1900*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3654:/ initchunk");
@@ -91462,14 +92275,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1496*/ meltfptr[1495];
- /*_.INSTALL_METHOD__V1884*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1499*/ meltfptr[1498];
+ /*_.INSTALL_METHOD__V1901*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V438*/ meltfptr[437]),
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91477,7 +92290,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1884*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1901*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3669:/ initchunk");
@@ -91492,14 +92305,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1498*/ meltfptr[1497];
- /*_.INSTALL_METHOD__V1885*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1501*/ meltfptr[1500];
+ /*_.INSTALL_METHOD__V1902*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]),
+ (melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91507,7 +92320,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1885*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1902*/ meltfptr[1836] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3691:/ initchunk");
@@ -91522,14 +92335,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1500*/ meltfptr[1499];
- /*_.INSTALL_METHOD__V1886*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1503*/ meltfptr[1502];
+ /*_.INSTALL_METHOD__V1903*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]),
+ (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91537,7 +92350,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1886*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1903*/ meltfptr[1837] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3700:/ initchunk");
@@ -91552,14 +92365,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1502*/ meltfptr[1501];
- /*_.INSTALL_METHOD__V1887*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1505*/ meltfptr[1504];
+ /*_.INSTALL_METHOD__V1904*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]),
+ (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91567,7 +92380,7 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1887*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1904*/ meltfptr[1835] = 0;
}
MELT_LOCATION ("warmelt-genobj.melt:3733:/ initchunk");
@@ -91585,8 +92398,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1504*/ meltfptr[1503];
- /*_.INSTALL_METHOD__V1888*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1507*/ meltfptr[1506];
+ /*_.INSTALL_METHOD__V1905*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_IF__V104*/ meltfptr[103]),
@@ -91597,10 +92410,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1888*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1905*/ meltfptr[1836] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3775:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3767:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91615,8 +92428,8 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1508*/ meltfptr[1507];
- /*_.INSTALL_METHOD__V1889*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1511*/ meltfptr[1510];
+ /*_.INSTALL_METHOD__V1906*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V105*/
@@ -91628,10 +92441,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1889*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1906*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3863:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3800:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91646,11 +92459,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1514*/ meltfptr[1513];
- /*_.INSTALL_METHOD__V1890*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1517*/ meltfptr[1516];
+ /*_.INSTALL_METHOD__V1907*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V107*/
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V107*/
meltfptr[106]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -91659,10 +92472,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1890*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1907*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3887:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91674,15 +92487,15 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
+ (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1518*/ meltfptr[1517];
- /*_.INSTALL_METHOD__V1891*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1521*/ meltfptr[1520];
+ /*_.INSTALL_METHOD__V1908*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V107*/
- meltfptr[106]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V108*/
+ meltfptr[107]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91690,10 +92503,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1891*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1908*/ meltfptr[1836] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3916:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3892:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91705,14 +92518,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
+ (melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1520*/ meltfptr[1519];
- /*_.INSTALL_METHOD__V1892*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1525*/ meltfptr[1524];
+ /*_.INSTALL_METHOD__V1909*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V108*/
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V108*/
meltfptr[107]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -91721,10 +92534,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1892*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1909*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3954:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3940:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91739,11 +92552,11 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1524*/ meltfptr[1523];
- /*_.INSTALL_METHOD__V1893*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1527*/ meltfptr[1526];
+ /*_.INSTALL_METHOD__V1910*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V109*/
+ (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V109*/
meltfptr[108]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -91752,10 +92565,41 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1893*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1910*/ meltfptr[1835] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-genobj.melt:3978:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1531*/ meltfptr[1530];
+ /*_.INSTALL_METHOD__V1911*/ meltfptr[1836] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V110*/
+ meltfptr[109]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1911*/ meltfptr[1836] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3971:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:3995:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91767,14 +92611,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1528*/ meltfptr[1527];
- /*_.INSTALL_METHOD__V1894*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1535*/ meltfptr[1534];
+ /*_.INSTALL_METHOD__V1912*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]),
+ (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91782,10 +92626,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1894*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1912*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:3996:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4020:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91800,12 +92644,12 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1530*/ meltfptr[1529];
- /*_.INSTALL_METHOD__V1895*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1537*/ meltfptr[1536];
+ /*_.INSTALL_METHOD__V1913*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V110*/
- meltfptr[109]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V111*/
+ meltfptr[110]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91813,10 +92657,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1895*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1913*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4014:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4038:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91828,14 +92672,14 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066];
+ (melt_ptr_t *) & /*_.VALDATA___V1070*/ meltfptr[1069];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1534*/ meltfptr[1533];
- /*_.INSTALL_METHOD__V1896*/ meltfptr[1818] =
+ (melt_ptr_t *) & /*_.VALCLO___V1541*/ meltfptr[1540];
+ /*_.INSTALL_METHOD__V1914*/ meltfptr[1836] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]),
+ (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91843,10 +92687,10 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1896*/ meltfptr[1818] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1914*/ meltfptr[1836] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4054:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4078:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91861,12 +92705,12 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1537*/ meltfptr[1536];
- /*_.INSTALL_METHOD__V1897*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1544*/ meltfptr[1543];
+ /*_.INSTALL_METHOD__V1915*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V111*/
- meltfptr[110]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V112*/
+ meltfptr[111]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91874,27 +92718,27 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1897*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1915*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4056:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-genobj.melt:4057:/ quasiblock");
+ MELT_LOCATION ("warmelt-genobj.melt:4081:/ quasiblock");
/*^newclosure */
- /*newclosure *//*_.LAMBDA___V1899*/ meltfptr[1818] =
+ /*newclosure *//*_.LAMBDA___V1917*/ meltfptr[1836] =
meltgc_new_closure ((meltobject_ptr_t)
(((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
- (meltroutine_ptr_t) ( /*_.VALROUT___V1540*/
- meltfptr[1539]), (0));
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1547*/
+ meltfptr[1546]), (0));
;
- /*_.LAMBDA___V1898*/ meltfptr[1820] =
- /*_.LAMBDA___V1899*/ meltfptr[1818];;
- MELT_LOCATION ("warmelt-genobj.melt:4056:/ apply");
+ /*_.LAMBDA___V1916*/ meltfptr[1835] =
+ /*_.LAMBDA___V1917*/ meltfptr[1836];;
+ MELT_LOCATION ("warmelt-genobj.melt:4080:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -91904,12 +92748,12 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.GET_CTYPE__V23*/ meltfptr[22];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.LAMBDA___V1898*/ meltfptr[1820];
- /*_.INSTALL_METHOD__V1900*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.LAMBDA___V1916*/ meltfptr[1835];
+ /*_.INSTALL_METHOD__V1918*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V111*/
- meltfptr[110]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V112*/
+ meltfptr[111]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91917,23 +92761,12 @@ warmelt_genobj_initialmeltchunk_32 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.LAMBDA___V1898*/ meltfptr[1820] = 0;
+ /*clear *//*_.LAMBDA___V1916*/ meltfptr[1835] = 0;
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1900*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1918*/ meltfptr[1837] = 0;
}
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_32 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-genobj.melt:4114:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4138:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91948,12 +92781,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1548*/ meltfptr[1547];
- /*_.INSTALL_METHOD__V1901*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1555*/ meltfptr[1554];
+ /*_.INSTALL_METHOD__V1919*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V112*/
- meltfptr[111]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V113*/
+ meltfptr[112]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91961,10 +92794,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1901*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1919*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4170:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4194:/ initchunk");
/*^block */
/*anyblock */
{
@@ -91979,12 +92812,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1555*/ meltfptr[1554];
- /*_.INSTALL_METHOD__V1902*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1562*/ meltfptr[1561];
+ /*_.INSTALL_METHOD__V1920*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V113*/
- meltfptr[112]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V114*/
+ meltfptr[113]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -91992,10 +92825,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1902*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1920*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4180:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4204:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92010,8 +92843,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1559*/ meltfptr[1558];
- /*_.INSTALL_METHOD__V1903*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1566*/ meltfptr[1565];
+ /*_.INSTALL_METHOD__V1921*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/
@@ -92023,10 +92856,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1903*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1921*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4191:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4215:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92041,12 +92874,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1561*/ meltfptr[1560];
- /*_.INSTALL_METHOD__V1904*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1568*/ meltfptr[1567];
+ /*_.INSTALL_METHOD__V1922*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_PREDEF__V114*/
- meltfptr[113]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_PREDEF__V115*/
+ meltfptr[114]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92054,10 +92887,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1904*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1922*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4391:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4415:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92072,8 +92905,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1578*/ meltfptr[1577];
- /*_.INSTALL_METHOD__V1905*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1585*/ meltfptr[1584];
+ /*_.INSTALL_METHOD__V1923*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V54*/
@@ -92085,10 +92918,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1905*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1923*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4468:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4492:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92103,8 +92936,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1580*/ meltfptr[1579];
- /*_.INSTALL_METHOD__V1906*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1587*/ meltfptr[1586];
+ /*_.INSTALL_METHOD__V1924*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
(melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V93*/
@@ -92116,10 +92949,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1906*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1924*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4538:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4562:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92134,12 +92967,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1588*/ meltfptr[1587];
- /*_.INSTALL_METHOD__V1907*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1595*/ meltfptr[1594];
+ /*_.INSTALL_METHOD__V1925*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V115*/
- meltfptr[114]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V116*/
+ meltfptr[115]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92147,10 +92980,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1907*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1925*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4585:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4609:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92165,12 +92998,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1594*/ meltfptr[1593];
- /*_.INSTALL_METHOD__V1908*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1601*/ meltfptr[1600];
+ /*_.INSTALL_METHOD__V1926*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V116*/
- meltfptr[115]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V117*/
+ meltfptr[116]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92178,10 +93011,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1908*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1926*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4629:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4653:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92196,12 +93029,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1600*/ meltfptr[1599];
- /*_.INSTALL_METHOD__V1909*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1607*/ meltfptr[1606];
+ /*_.INSTALL_METHOD__V1927*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V117*/
- meltfptr[116]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V118*/
+ meltfptr[117]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92209,10 +93042,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1909*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1927*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4715:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4739:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92227,12 +93060,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1609*/ meltfptr[1608];
- /*_.INSTALL_METHOD__V1910*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1616*/ meltfptr[1615];
+ /*_.INSTALL_METHOD__V1928*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V118*/
- meltfptr[117]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V119*/
+ meltfptr[118]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92240,10 +93073,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1910*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1928*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4835:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4859:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92258,12 +93091,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1620*/ meltfptr[1619];
- /*_.INSTALL_METHOD__V1911*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1627*/ meltfptr[1626];
+ /*_.INSTALL_METHOD__V1929*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V119*/
- meltfptr[118]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V120*/
+ meltfptr[119]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92271,10 +93104,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1911*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1929*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4844:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4868:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92289,20 +93122,20 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1624*/ meltfptr[1623];
- /*_.INSTALL_METHOD__V1912*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1631*/ meltfptr[1630];
+ /*_.INSTALL_METHOD__V1930*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V121*/ meltfptr[120]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V122*/ meltfptr[121]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
}
;
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1912*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1930*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4854:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4878:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92317,20 +93150,20 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1628*/ meltfptr[1627];
- /*_.INSTALL_METHOD__V1913*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1635*/ meltfptr[1634];
+ /*_.INSTALL_METHOD__V1931*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V122*/ meltfptr[121]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
+ (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V123*/ meltfptr[122]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
}
;
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1913*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1931*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4890:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:4914:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92345,12 +93178,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1632*/ meltfptr[1631];
- /*_.INSTALL_METHOD__V1914*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1639*/ meltfptr[1638];
+ /*_.INSTALL_METHOD__V1932*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V123*/
- meltfptr[122]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V124*/
+ meltfptr[123]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92358,10 +93191,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1914*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1932*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5000:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92376,20 +93209,20 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1639*/ meltfptr[1638];
- /*_.INSTALL_METHOD__V1915*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1646*/ meltfptr[1645];
+ /*_.INSTALL_METHOD__V1933*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V124*/ meltfptr[123]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
+ (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V125*/ meltfptr[124]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
}
;
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1915*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1933*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:4994:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5018:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92398,8 +93231,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1916*/
- meltfptr[1819] = slot;
+ /*_.VALUEXPORTER___V1934*/
+ meltfptr[1837] = slot;
};
;
/*^apply */
@@ -92409,14 +93242,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1644*/ meltfptr[1643];
+ (melt_ptr_t *) & /*_.VALDATA___V1651*/ meltfptr[1650];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : COMPILE_MATCHER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1916*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641]),
+ ( /*_.VALUEXPORTER___V1934*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92424,10 +93257,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1916*/ meltfptr[1819] = 0;
+ /*clear *//*_.VALUEXPORTER___V1934*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5005:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5029:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92436,8 +93269,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1917*/
- meltfptr[1820] = slot;
+ /*_.VALUEXPORTER___V1935*/
+ meltfptr[1835] = slot;
};
;
/*^apply */
@@ -92447,14 +93280,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1650*/ meltfptr[1649];
+ (melt_ptr_t *) & /*_.VALDATA___V1657*/ meltfptr[1656];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHCOMPILCONTEXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92466,14 +93299,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1653*/ meltfptr[1652];
+ (melt_ptr_t *) & /*_.VALDATA___V1660*/ meltfptr[1659];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_LOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1668*/ meltfptr[1667]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1675*/ meltfptr[1674]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92485,14 +93318,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1655*/ meltfptr[1654];
+ (melt_ptr_t *) & /*_.VALDATA___V1662*/ meltfptr[1661];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_NORMTESTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1670*/ meltfptr[1669]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92504,14 +93337,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1657*/ meltfptr[1656];
+ (melt_ptr_t *) & /*_.VALDATA___V1664*/ meltfptr[1663];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_GOTOTHEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1679*/ meltfptr[1678]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92523,14 +93356,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1659*/ meltfptr[1658];
+ (melt_ptr_t *) & /*_.VALDATA___V1666*/ meltfptr[1665];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_GOTOELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92542,14 +93375,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1661*/ meltfptr[1660];
+ (melt_ptr_t *) & /*_.VALDATA___V1668*/ meltfptr[1667];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_OLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1676*/ meltfptr[1675]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1683*/ meltfptr[1682]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92561,14 +93394,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1663*/ meltfptr[1662];
+ (melt_ptr_t *) & /*_.VALDATA___V1670*/ meltfptr[1669];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_SUFFIX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1678*/ meltfptr[1677]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1685*/ meltfptr[1684]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92580,14 +93413,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1665*/ meltfptr[1664];
+ (melt_ptr_t *) & /*_.VALDATA___V1672*/ meltfptr[1671];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCX_STATECOUNTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1917*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679]),
+ ( /*_.VALUEXPORTER___V1935*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92595,10 +93428,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1917*/ meltfptr[1820] = 0;
+ /*clear *//*_.VALUEXPORTER___V1935*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5015:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5039:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92607,8 +93440,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1918*/
- meltfptr[1819] = slot;
+ /*_.VALUEXPORTER___V1936*/
+ meltfptr[1837] = slot;
};
;
/*^apply */
@@ -92618,14 +93451,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : COMPILE_TESTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1918*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1682*/ meltfptr[1681]),
+ ( /*_.VALUEXPORTER___V1936*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92633,10 +93466,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1918*/ meltfptr[1819] = 0;
+ /*clear *//*_.VALUEXPORTER___V1936*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5022:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5046:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92645,8 +93478,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1919*/
- meltfptr[1820] = slot;
+ /*_.VALUEXPORTER___V1937*/
+ meltfptr[1835] = slot;
};
;
/*^apply */
@@ -92656,14 +93489,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1688*/ meltfptr[1687];
+ (melt_ptr_t *) & /*_.VALDATA___V1695*/ meltfptr[1694];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_TESTERCOMPILCONTEXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1919*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685]),
+ ( /*_.VALUEXPORTER___V1937*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92675,14 +93508,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
+ (melt_ptr_t *) & /*_.VALDATA___V1698*/ meltfptr[1697];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : TCX_NRMATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1919*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]),
+ ( /*_.VALUEXPORTER___V1937*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92694,14 +93527,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1693*/ meltfptr[1692];
+ (melt_ptr_t *) & /*_.VALDATA___V1700*/ meltfptr[1699];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : TCX_FREELIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1919*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]),
+ ( /*_.VALUEXPORTER___V1937*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92713,14 +93546,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1695*/ meltfptr[1694];
+ (melt_ptr_t *) & /*_.VALDATA___V1702*/ meltfptr[1701];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : TCX_NEXTEST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1919*/ meltfptr[1820]),
- (melt_ptr_t) ( /*_.VALDATA___V1702*/ meltfptr[1701]),
+ ( /*_.VALUEXPORTER___V1937*/ meltfptr[1835]),
+ (melt_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92728,10 +93561,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1919*/ meltfptr[1820] = 0;
+ /*clear *//*_.VALUEXPORTER___V1937*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5060:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92743,15 +93576,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1705*/ meltfptr[1704];
- /*_.INSTALL_METHOD__V1920*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1712*/ meltfptr[1711];
+ /*_.INSTALL_METHOD__V1938*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/
- meltfptr[125]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/
+ meltfptr[126]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92759,10 +93592,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1920*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1938*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5230:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5254:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92777,12 +93610,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1712*/ meltfptr[1711];
- /*_.INSTALL_METHOD__V1921*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1719*/ meltfptr[1718];
+ /*_.INSTALL_METHOD__V1939*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V127*/
- meltfptr[126]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V128*/
+ meltfptr[127]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92790,10 +93623,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1921*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1939*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5239:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5263:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92802,8 +93635,8 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1922*/
- meltfptr[1819] = slot;
+ /*_.VALUEXPORTER___V1940*/
+ meltfptr[1837] = slot;
};
;
/*^apply */
@@ -92813,14 +93646,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1727*/ meltfptr[1726];
+ (melt_ptr_t *) & /*_.VALDATA___V1734*/ meltfptr[1733];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_ALTERNATE_MATCH_NREP_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1922*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722]),
+ ( /*_.VALUEXPORTER___V1940*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92832,14 +93665,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1730*/ meltfptr[1729];
+ (melt_ptr_t *) & /*_.VALDATA___V1737*/ meltfptr[1736];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_PREV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1922*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1735*/ meltfptr[1734]),
+ ( /*_.VALUEXPORTER___V1940*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92851,14 +93684,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1732*/ meltfptr[1731];
+ (melt_ptr_t *) & /*_.VALDATA___V1739*/ meltfptr[1738];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_NREP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1922*/ meltfptr[1819]),
- (melt_ptr_t) ( /*_.VALDATA___V1737*/ meltfptr[1736]),
+ ( /*_.VALUEXPORTER___V1940*/ meltfptr[1837]),
+ (melt_ptr_t) ( /*_.VALDATA___V1744*/ meltfptr[1743]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92866,10 +93699,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1922*/ meltfptr[1819] = 0;
+ /*clear *//*_.VALUEXPORTER___V1940*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5298:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5322:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92884,12 +93717,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1741*/ meltfptr[1740];
- /*_.INSTALL_METHOD__V1923*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1748*/ meltfptr[1747];
+ /*_.INSTALL_METHOD__V1941*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V133*/
- meltfptr[132]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V134*/
+ meltfptr[133]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92897,10 +93730,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1923*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1941*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5315:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5348:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92915,12 +93748,12 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1745*/ meltfptr[1744];
- /*_.INSTALL_METHOD__V1924*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1752*/ meltfptr[1751];
+ /*_.INSTALL_METHOD__V1942*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V134*/
- meltfptr[133]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V135*/
+ meltfptr[134]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -92928,10 +93761,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1924*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1942*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5374:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92946,20 +93779,23 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1751*/ meltfptr[1750];
- /*_.INSTALL_METHOD__V1925*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1758*/ meltfptr[1757];
+ /*_.INSTALL_METHOD__V1943*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V136*/ meltfptr[135]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_FLAG__V137*/
+ meltfptr[136]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
}
;
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1925*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1943*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5405:/ initchunk");
/*^block */
/*anyblock */
{
@@ -92971,26 +93807,23 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1768*/ meltfptr[1767];
- /*_.INSTALL_METHOD__V1926*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1762*/ meltfptr[1761];
+ /*_.INSTALL_METHOD__V1944*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V126*/
- meltfptr[125]),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V138*/ meltfptr[137]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
}
;
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1926*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1944*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5573:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5434:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93002,15 +93835,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
(melt_ptr_t *) & /*_.VALCLO___V1770*/ meltfptr[1769];
- /*_.INSTALL_METHOD__V1927*/ meltfptr[1820] =
+ /*_.INSTALL_METHOD__V1945*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V139*/
- meltfptr[138]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V140*/
+ meltfptr[139]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93018,10 +93851,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1927*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1945*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5670:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5458:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93033,15 +93866,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.COMPILE_OBJ__V21*/ meltfptr[20];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1774*/ meltfptr[1773];
- /*_.INSTALL_METHOD__V1928*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1772*/ meltfptr[1771];
+ /*_.INSTALL_METHOD__V1946*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V140*/
- meltfptr[139]),
+ (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_JUMP__V141*/
+ meltfptr[140]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93049,10 +93882,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1928*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1946*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5769:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5624:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93064,15 +93897,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1778*/ meltfptr[1777];
- /*_.INSTALL_METHOD__V1929*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1785*/ meltfptr[1784];
+ /*_.INSTALL_METHOD__V1947*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V141*/
- meltfptr[140]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V127*/
+ meltfptr[126]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93080,10 +93913,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1929*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1947*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5839:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5697:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93095,14 +93928,14 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1782*/ meltfptr[1781];
- /*_.INSTALL_METHOD__V1930*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1787*/ meltfptr[1786];
+ /*_.INSTALL_METHOD__V1948*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V142*/
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V142*/
meltfptr[141]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -93111,10 +93944,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1930*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1948*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5871:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5794:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93126,15 +93959,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1786*/ meltfptr[1785];
- /*_.INSTALL_METHOD__V1931*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1791*/ meltfptr[1790];
+ /*_.INSTALL_METHOD__V1949*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V129*/
- meltfptr[128]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V143*/
+ meltfptr[142]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93142,10 +93975,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1931*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1949*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5921:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5893:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93157,15 +93990,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1788*/ meltfptr[1787];
- /*_.INSTALL_METHOD__V1932*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1795*/ meltfptr[1794];
+ /*_.INSTALL_METHOD__V1950*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V143*/
- meltfptr[142]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V144*/
+ meltfptr[143]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93173,10 +94006,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1932*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1950*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:5967:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5963:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93188,15 +94021,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1792*/ meltfptr[1791];
- /*_.INSTALL_METHOD__V1933*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1799*/ meltfptr[1798];
+ /*_.INSTALL_METHOD__V1951*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V144*/
- meltfptr[143]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V145*/
+ meltfptr[144]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93204,10 +94037,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1933*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1951*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:6010:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:5995:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93219,15 +94052,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1684*/ meltfptr[1683];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1796*/ meltfptr[1795];
- /*_.INSTALL_METHOD__V1934*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1803*/ meltfptr[1802];
+ /*_.INSTALL_METHOD__V1952*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V145*/
- meltfptr[144]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V130*/
+ meltfptr[129]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93235,10 +94068,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1934*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1952*/ meltfptr[1837] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:6167:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6045:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93250,14 +94083,15 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1644*/ meltfptr[1643];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1804*/ meltfptr[1803];
- /*_.INSTALL_METHOD__V1935*/ meltfptr[1820] =
+ (melt_ptr_t *) & /*_.VALCLO___V1805*/ meltfptr[1804];
+ /*_.INSTALL_METHOD__V1953*/ meltfptr[1835] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V146*/ meltfptr[145]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V146*/
+ meltfptr[145]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -93265,10 +94099,10 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1935*/ meltfptr[1820] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1953*/ meltfptr[1835] = 0;
}
- MELT_LOCATION ("warmelt-genobj.melt:6280:/ initchunk");
+ MELT_LOCATION ("warmelt-genobj.melt:6091:/ initchunk");
/*^block */
/*anyblock */
{
@@ -93280,14 +94114,45 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1644*/ meltfptr[1643];
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1814*/ meltfptr[1813];
- /*_.INSTALL_METHOD__V1936*/ meltfptr[1819] =
+ (melt_ptr_t *) & /*_.VALCLO___V1809*/ meltfptr[1808];
+ /*_.INSTALL_METHOD__V1954*/ meltfptr[1837] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
- (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V148*/
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V147*/
+ meltfptr[146]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1954*/ meltfptr[1837] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-genobj.melt:6134:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1691*/ meltfptr[1690];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1813*/ meltfptr[1812];
+ /*_.INSTALL_METHOD__V1955*/ meltfptr[1835] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
+ (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V148*/
meltfptr[147]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
@@ -93296,7 +94161,68 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1936*/ meltfptr[1819] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1955*/ meltfptr[1835] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-genobj.melt:6291:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1651*/ meltfptr[1650];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1821*/ meltfptr[1820];
+ /*_.INSTALL_METHOD__V1956*/ meltfptr[1837] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1956*/ meltfptr[1837] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-genobj.melt:6404:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1651*/ meltfptr[1650];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1831*/ meltfptr[1830];
+ /*_.INSTALL_METHOD__V1957*/ meltfptr[1835] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V19*/ meltfptr[18]),
+ (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V151*/
+ meltfptr[150]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1957*/ meltfptr[1835] = 0;
}
/**COMMENT: after toplevel body **/ ;
@@ -93359,1799 +94285,1815 @@ warmelt_genobj_initialmeltchunk_33 (struct frame_start_module_melt_st
/*internsym:CLASS_OBJVALUE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]));
/*internsym:CLASS_GENERATED_C_CODE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]));
/*internsym:OBV_TYPE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162]));
/*internsym:CLASS_OBJPUREVALUE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V162*/ meltfptr[161]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]));
/*internsym:CLASS_OBJLOCV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170]));
/*internsym:OBL_OFF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]));
/*internsym:OBL_PROC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184]));
/*internsym:OBL_CNAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]));
/*internsym:CLASS_OBJCLOCCV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]));
/*internsym:OBC_OFF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]));
/*internsym:OBC_PROC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]));
/*internsym:OBC_NAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]));
/*internsym:CLASS_OBJCONSTV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]));
/*internsym:CLASS_OBJPREDEF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V210*/ meltfptr[209]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]));
/*internsym:OBPREDEF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]));
/*internsym:CLASS_OBJNIL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]));
/*internsym:CLASS_OBJINITELEM */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]));
/*internsym:OIE_CNAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]));
/*internsym:OIE_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]));
/*internsym:OIE_DISCR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]));
/*internsym:OIE_LOCVAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]));
/*internsym:CLASS_OBJINITOBJECT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]));
/*internsym:OIO_PREDEF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]));
/*internsym:OIO_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]));
/*internsym:CLASS_OBJINITUNIQUEOBJECT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]));
/*internsym:CLASS_OBJINITMULTIPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]));
/*internsym:OIM_TUPVAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]));
/*internsym:CLASS_OBJINITCLOSURE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]));
/*internsym:OICLO_ROUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]));
/*internsym:CLASS_OBJINITROUTINE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]));
/*internsym:OIR_PROCROUTINE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]));
/*internsym:CLASS_OBJINITSTRING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]));
/*internsym:CLASS_OBJINITPAIR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]));
/*internsym:CLASS_OBJINITLIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]));
/*internsym:CLASS_OBJINITBOXINTEGER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]));
/*internsym:CLASS_OBJEXPV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]));
/*internsym:OBX_CONT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]));
/*internsym:CLASS_OBJLOCATEDEXPV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]));
/*internsym:OBCX_LOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]));
/*internsym:CLASS_OBJINSTR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]));
/*internsym:OBI_LOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]));
/*internsym:CLASS_OBJCOMMENTINSTR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]));
/*internsym:OBCI_COMMENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]));
+
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_33 */
- /*internsym:CLASS_OBJDESTINSTR */
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_34 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:CLASS_OBJDESTINSTR*/
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]));
/*internsym:OBDI_DESTLIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]));
/*internsym:CLASS_OBJCOMPUTE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]));
/*internsym:OBCPT_EXPR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]));
/*internsym:CLASS_OBJGETARG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]));
/*internsym:OBARG_OBLOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V395*/ meltfptr[394]));
/*internsym:OBARG_BIND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]));
/*internsym:CLASS_OBJGETARGREST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]));
/*internsym:OBARG_REST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V407*/ meltfptr[406]));
/*internsym:CLASS_OBJPUTXTRARESULT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]));
/*internsym:OBXRES_RANK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]));
/*internsym:OBXRES_OBLOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V421*/ meltfptr[420]));
/*internsym:CLASS_OBJFINALRETURN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]));
/*internsym:CLASS_OBJCLEAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]));
/*internsym:OCLR_VLOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V437*/ meltfptr[436]));
/*internsym:CLASS_OBJANYBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]));
/*internsym:OBLO_BODYL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448]));
/*internsym:OBLO_EPIL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]));
/*internsym:CLASS_OBJPLAINBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]));
/*internsym:CLASS_OBJMULTIALLOCBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]));
/*internsym:OMALBLO_ALLSTRUCT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]));
/*internsym:OMALBLO_NAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]));
/*internsym:CLASS_OBJCOMMENTEDBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]));
/*internsym:OCOMBLO_COMMENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]));
/*internsym:CLASS_OBJMULTIBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]));
/*internsym:OMULBLO_SUBCOMP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]));
/*internsym:CLASS_OBJFLAGBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V493*/ meltfptr[492]));
/*internsym:OFLABLO_FLAGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]));
/*internsym:CLASS_OBJLABELINSTR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502]));
/*internsym:OBLAB_PREFIX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]));
/*internsym:OBLAB_RANK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]));
/*internsym:CLASS_OBJGOTOINSTR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]));
/*internsym:OBGOTO_PREFIX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]));
/*internsym:OBGOTO_RANK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]));
/*internsym:CLASS_OBJLOOP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]));
/*internsym:OBLOOP_LABEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]));
/*internsym:OBLOOP_RESV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V543*/ meltfptr[542]));
/*internsym:CLASS_OBJEXIT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]));
/*internsym:OBEXIT_LABEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]));
/*internsym:CLASS_OBJAGAIN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]));
/*internsym:OBAGAIN_LABEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]));
/*internsym:CLASS_OBJCITERBLOCK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]));
/*internsym:OBCITER_CITER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]));
/*internsym:OBCITER_BEFORE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]));
/*internsym:OBCITER_AFTER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]));
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_33 */
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]));
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_34 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:CLASS_OBJCOND*/
+ /*internsym:CLASS_OBJCOND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V583*/ meltfptr[582]));
/*internsym:OBCOND_TEST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]));
/*internsym:OBCOND_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]));
/*internsym:OBCOND_ELSE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]));
/*internsym:CLASS_OBJCPPIF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V598*/ meltfptr[597]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]));
/*internsym:OBIFP_COND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]));
/*internsym:OBIFP_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]));
/*internsym:OBIFP_ELSE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]));
/*internsym:CLASS_OBJINTERNCOMMON */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]));
/*internsym:OBINTERN_IOBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]));
/*internsym:CLASS_OBJINTERNSYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]));
/*internsym:CLASS_OBJINTERNKEYWORD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]));
/*internsym:CLASS_OBJGETNAMEDCOMMON */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V641*/ meltfptr[640]));
/*internsym:OBGNAMED_IOBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]));
/*internsym:CLASS_OBJGETNAMEDSYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]));
/*internsym:CLASS_OBJGETNAMEDKEYWORD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]));
/*internsym:CLASS_OBJAPPLY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]));
/*internsym:OBAPP_CLOS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]));
/*internsym:OBAPP_ARGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V675*/ meltfptr[674]));
/*internsym:CLASS_OBJMULTIAPPLY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V677*/ meltfptr[676]));
/*internsym:OBMULTAPP_XRES */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]));
/*internsym:CLASS_OBJMSEND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]));
/*internsym:OBMSND_SEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V699*/ meltfptr[698]));
/*internsym:OBMSND_RECV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]));
/*internsym:OBMSND_ARGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]));
/*internsym:CLASS_OBJMULTIMSEND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]));
/*internsym:OBMULTSND_XRES */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V710*/ meltfptr[709]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712]));
/*internsym:CLASS_OBJRAWALLOCOBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]));
/*internsym:OBRALLOBJ_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]));
/*internsym:OBRALLOBJ_LEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V729*/ meltfptr[728]));
/*internsym:OBRALLOBJ_CLASSNAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]));
/*internsym:CLASS_OBJNEWCLOSURE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]));
/*internsym:OBNCLO_DISCR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]));
/*internsym:OBNCLO_ROUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]));
/*internsym:OBNCLO_LEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]));
/*internsym:CLASS_OBJPUTUPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]));
/*internsym:OPUTU_TUPLED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]));
/*internsym:OPUTU_OFFSET */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]));
/*internsym:OPUTU_VALUE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]));
/*internsym:CLASS_OBJPUTPAIR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]));
/*internsym:OPUTP_PAIR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V774*/ meltfptr[773]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776]));
/*internsym:CLASS_OBJPUTPAIRHEAD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]));
/*internsym:OPUTP_HEAD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V784*/ meltfptr[783]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]));
/*internsym:CLASS_OBJPUTPAIRTAIL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]));
/*internsym:OPUTP_TAIL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]));
/*internsym:CLASS_OBJPUTLIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]));
/*internsym:OPUTL_LIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]));
/*internsym:OPUTL_FIRST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]));
/*internsym:OPUTL_LAST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]));
/*internsym:CLASS_OBJPUTSLOT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]));
/*internsym:OSLOT_ODATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]));
/*internsym:OSLOT_OFFSET */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]));
/*internsym:OSLOT_FIELD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]));
/*internsym:OSLOT_VALUE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V834*/ meltfptr[833]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]));
/*internsym:CLASS_OBJGETSLOT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]));
/*internsym:OGETSL_OBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]));
/*internsym:OGETSL_FIELD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]));
/*internsym:CLASS_OBJPUTCLOSUROUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]));
/*internsym:OPCLOR_CLOS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]));
/*internsym:OPCLOR_ROUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864]));
/*internsym:CLASS_OBJPUTCLOSEDV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866]));
/*internsym:OPCLOV_CLOS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]));
/*internsym:OPCLOV_OFF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]));
/*internsym:OPCLOV_CVAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]));
/*internsym:CLASS_OBJPUTCLOSEDNOTNULLV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]));
/*internsym:CLASS_OBJPUTROUTCONST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]));
/*internsym:OPRCONST_ROUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]));
/*internsym:OPRCONST_OFF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]));
/*internsym:OPRCONST_CVAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]));
/*internsym:CLASS_OBJPUTROUTCONSTNOTNULL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]));
/*internsym:CLASS_OBJTOUCH */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]));
/*internsym:OTOUCH_VAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]));
/*internsym:OTOUCH_COMMENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]));
/*internsym:CLASS_OBJSETPREDEF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]));
/*internsym:OSPR_OBJECT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V939*/ meltfptr[938]));
/*internsym:OSPR_PREDEF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]));
/*internsym:CLASS_ROUTINEOBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]));
/*internsym:CLASS_NAMED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]));
/*internsym:OBROUT_PROC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]));
/*internsym:OBROUT_BODY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]));
/*internsym:OBROUT_NBVAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]));
/*internsym:OBROUT_NBLONG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]));
/*internsym:OBROUT_OTHERS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]));
+
+
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_34 */
- /*internsym:OBROUT_RETVAL */
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_35 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:OBROUT_RETVAL*/
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]));
/*internsym:OBROUT_CNTCITER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]));
/*internsym:OBROUT_CNTLETREC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]));
/*internsym:CLASS_PROCROUTINEOBJ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982]));
/*internsym:OPROUT_GETARGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]));
/*internsym:OPROUT_LOC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]));
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1001*/ meltfptr[1000]));
/*internsym:OPROUT_FUNAM */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/ meltfptr[999]));
+ ( /*_.VALDATA___V1003*/ meltfptr[1002]));
/*internsym:OPROUT_RESTNAM */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/ meltfptr[1001]));
+ ( /*_.VALDATA___V1005*/ meltfptr[1004]));
/*internsym:OPROUT_FILENUM */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1004*/ meltfptr[1003]));
+ ( /*_.VALDATA___V1007*/ meltfptr[1006]));
/*internsym:CLASS_INITIALROUTINEOBJ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/ meltfptr[1005]));
+ ( /*_.VALDATA___V1009*/ meltfptr[1008]));
/*internsym:OIROUT_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1020*/ meltfptr[1019]));
+ ( /*_.VALDATA___V1023*/ meltfptr[1022]));
/*internsym:OIROUT_PROLOG */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1022*/ meltfptr[1021]));
+ ( /*_.VALDATA___V1025*/ meltfptr[1024]));
/*internsym:OIROUT_FILL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1024*/ meltfptr[1023]));
+ ( /*_.VALDATA___V1027*/ meltfptr[1026]));
/*internsym:OIROUT_MODULENAME */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1026*/ meltfptr[1025]));
+ ( /*_.VALDATA___V1029*/ meltfptr[1028]));
/*internsym:CLASS_OBJBLOCK */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1028*/ meltfptr[1027]));
+ ( /*_.VALDATA___V1031*/ meltfptr[1030]));
/*internsym:MELT_DEBUG_FUN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1032*/ meltfptr[1031]));
+ ( /*_.VALDATA___V1035*/ meltfptr[1034]));
/*internsym:DISCR_MIXED_LOCATION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/ meltfptr[1033]));
+ ( /*_.VALDATA___V1037*/ meltfptr[1036]));
/*internsym:CLASS_CTYPE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/ meltfptr[1035]));
+ ( /*_.VALDATA___V1039*/ meltfptr[1038]));
/*internsym:DISCR_LIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1038*/ meltfptr[1037]));
+ ( /*_.VALDATA___V1041*/ meltfptr[1040]));
/*internsym:DISCR_CONSTANT_INTEGER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1040*/ meltfptr[1039]));
+ ( /*_.VALDATA___V1043*/ meltfptr[1042]));
/*internsym:DISCR_VERBATIM_STRING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1042*/ meltfptr[1041]));
+ ( /*_.VALDATA___V1045*/ meltfptr[1044]));
/*internsym:LIST_APPEND2LIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1044*/ meltfptr[1043]));
+ ( /*_.VALDATA___V1047*/ meltfptr[1046]));
/*internsym:LIST_TO_MULTIPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/ meltfptr[1045]));
+ ( /*_.VALDATA___V1049*/ meltfptr[1048]));
/*internsym:DISCR_MULTIPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/ meltfptr[1047]));
+ ( /*_.VALDATA___V1051*/ meltfptr[1050]));
/*internsym:OUTPUT_C_DECLINIT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1052*/ meltfptr[1051]));
+ ( /*_.VALDATA___V1055*/ meltfptr[1054]));
/*internsym:CLASS_SELECTOR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1054*/ meltfptr[1053]));
+ ( /*_.VALDATA___V1057*/ meltfptr[1056]));
/*internsym:RECV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1056*/ meltfptr[1055]));
+ ( /*_.VALDATA___V1059*/ meltfptr[1058]));
/*internsym:SBUF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1059*/ meltfptr[1058]));
+ ( /*_.VALDATA___V1062*/ meltfptr[1061]));
/*internsym:PUT_OBJDEST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1065*/ meltfptr[1064]));
+ ( /*_.VALDATA___V1068*/ meltfptr[1067]));
/*internsym:OUTPUT_C_CODE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/ meltfptr[1068]));
+ ( /*_.VALDATA___V1072*/ meltfptr[1071]));
/*internsym:DECLBUF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1072*/ meltfptr[1071]));
+ ( /*_.VALDATA___V1075*/ meltfptr[1074]));
/*internsym:IMPLBUF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1075*/ meltfptr[1074]));
+ ( /*_.VALDATA___V1078*/ meltfptr[1077]));
/*internsym:DEPTH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1078*/ meltfptr[1077]));
+ ( /*_.VALDATA___V1081*/ meltfptr[1080]));
/*internsym:OUTPUT_C_INITIAL_FILL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1084*/ meltfptr[1083]));
+ ( /*_.VALDATA___V1087*/ meltfptr[1086]));
/*internsym:PTRSTR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1088*/ meltfptr[1087]));
+ ( /*_.VALDATA___V1091*/ meltfptr[1090]));
/*internsym:OUTPUT_C_INITIAL_PREDEF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1095*/ meltfptr[1094]));
+ ( /*_.VALDATA___V1098*/ meltfptr[1097]));
/*internsym:PRTRSTR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1099*/ meltfptr[1098]));
+ ( /*_.VALDATA___V1102*/ meltfptr[1101]));
/*internsym:INSTALL_METHOD */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1108*/ meltfptr[1107]));
+ ( /*_.VALDATA___V1111*/ meltfptr[1110]));
/*internsym:CLASS_NREP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1110*/ meltfptr[1109]));
+ ( /*_.VALDATA___V1113*/ meltfptr[1112]));
/*internsym:COMPILE_OBJ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1112*/ meltfptr[1111]));
+ ( /*_.VALDATA___V1115*/ meltfptr[1114]));
/*internsym:DISCR_ANY_RECEIVER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1118*/ meltfptr[1117]));
+ ( /*_.VALDATA___V1121*/ meltfptr[1120]));
/*internsym:GET_CTYPE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1122*/ meltfptr[1121]));
+ ( /*_.VALDATA___V1125*/ meltfptr[1124]));
/*internsym:CTYPE_VALUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1126*/ meltfptr[1125]));
+ ( /*_.VALDATA___V1129*/ meltfptr[1128]));
/*internsym:DBGOUT_NAMEDOBJECT_METHOD */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1132*/ meltfptr[1131]));
+ ( /*_.VALDATA___V1135*/ meltfptr[1134]));
/*internsym:DBG_OUTPUT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1134*/ meltfptr[1133]));
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_34 */
+ ( /*_.VALDATA___V1137*/ meltfptr[1136]));
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_35 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:AS_NULL*/
+ /*internsym:AS_NULL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1142*/ meltfptr[1141]));
+ ( /*_.VALDATA___V1145*/ meltfptr[1144]));
/*internsym:CLASS_CLONED_SYMBOL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1144*/ meltfptr[1143]));
+ ( /*_.VALDATA___V1147*/ meltfptr[1146]));
/*internsym:INTEGERBOX_OF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1146*/ meltfptr[1145]));
+ ( /*_.VALDATA___V1149*/ meltfptr[1148]));
/*internsym:DISCR_STRBUF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/ meltfptr[1147]));
+ ( /*_.VALDATA___V1151*/ meltfptr[1150]));
/*internsym:CLASS_SYMBOL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/ meltfptr[1149]));
+ ( /*_.VALDATA___V1153*/ meltfptr[1152]));
/*internsym:CLASS_NREP_ROUTPROC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/ meltfptr[1167]));
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]));
/*internsym:CLASS_MODULE_CONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/ meltfptr[1169]));
+ ( /*_.VALDATA___V1173*/ meltfptr[1172]));
/*internsym:CLASS_NREP_DEFUNROUTPROC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/ meltfptr[1171]));
+ ( /*_.VALDATA___V1175*/ meltfptr[1174]));
/*internsym:DISCR_STRING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/ meltfptr[1173]));
+ ( /*_.VALDATA___V1177*/ meltfptr[1176]));
/*internsym:DISCR_INTEGER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]));
+ ( /*_.VALDATA___V1179*/ meltfptr[1178]));
/*internsym:DISCR_MAP_OBJECTS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1178*/ meltfptr[1177]));
+ ( /*_.VALDATA___V1181*/ meltfptr[1180]));
/*internsym:CLASS_C_GENERATION_CONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1180*/ meltfptr[1179]));
+ ( /*_.VALDATA___V1183*/ meltfptr[1182]));
/*internsym:_RETVAL_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/ meltfptr[1158]));
+ ( /*_.VALDATA___V1162*/ meltfptr[1161]));
/*internsym:MULTIPLE_MAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/ meltfptr[1181]));
+ ( /*_.VALDATA___V1185*/ meltfptr[1184]));
/*internsym:CLASS_FORMAL_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/ meltfptr[1183]));
+ ( /*_.VALDATA___V1187*/ meltfptr[1186]));
/*internsym:CTYPE_LONG */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]));
+ ( /*_.VALDATA___V1189*/ meltfptr[1188]));
/*internsym:LIST_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1188*/ meltfptr[1187]));
+ ( /*_.VALDATA___V1191*/ meltfptr[1190]));
/*internsym:INITIALSYSTEMDATA_OBJPREDEF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/ meltfptr[1189]));
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]));
/*internsym:INITIAL_SYSTEM_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1193*/ meltfptr[1192]));
+ ( /*_.VALDATA___V1196*/ meltfptr[1195]));
/*internsym:CLASS_NREP_INITPROC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/ meltfptr[1221]));
+ ( /*_.VALDATA___V1225*/ meltfptr[1224]));
/*internsym:CLASS_INITIAL_GENERATION_CONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]));
+ ( /*_.VALDATA___V1227*/ meltfptr[1226]));
/*internsym:LIST_MAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1226*/ meltfptr[1225]));
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]));
/*internsym:_RETINIT_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]));
+ ( /*_.VALDATA___V1205*/ meltfptr[1204]));
/*internsym:_CONTENV_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1204*/ meltfptr[1203]));
+ ( /*_.VALDATA___V1207*/ meltfptr[1206]));
/*internsym:_FRESHENV_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1206*/ meltfptr[1205]));
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]));
/*internsym:_PREVENV_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/ meltfptr[1207]));
+ ( /*_.VALDATA___V1211*/ meltfptr[1210]));
/*internsym:_VALEXPORT_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/ meltfptr[1209]));
+ ( /*_.VALDATA___V1213*/ meltfptr[1212]));
/*internsym:_VALIMPORT_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]));
+ ( /*_.VALDATA___V1215*/ meltfptr[1214]));
/*internsym:CLASS_ANY_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/ meltfptr[1227]));
+ ( /*_.VALDATA___V1231*/ meltfptr[1230]));
/*internsym:CLASS_FIXED_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]));
+ ( /*_.VALDATA___V1233*/ meltfptr[1232]));
/*internsym:CLASS_NREP_SIMPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1232*/ meltfptr[1231]));
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]));
/*internsym:SYSDATA_CONT_FRESH_ENV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1234*/ meltfptr[1233]));
+ ( /*_.VALDATA___V1237*/ meltfptr[1236]));
/*internsym:CLASS_NREP_IMPORTEDVAL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1236*/ meltfptr[1235]));
+ ( /*_.VALDATA___V1239*/ meltfptr[1238]));
/*internsym:CLASS_NREP_BOUND_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1238*/ meltfptr[1237]));
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]));
/*internsym:MULTIPLE_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/ meltfptr[1239]));
+ ( /*_.VALDATA___V1243*/ meltfptr[1242]));
/*internsym:CLASS_NREP_DATAKEYWORD */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/ meltfptr[1241]));
+ ( /*_.VALDATA___V1245*/ meltfptr[1244]));
/*internsym:CLASS_NREP_DATASYMBOL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/ meltfptr[1243]));
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]));
/*internsym:SYSDATA_VALUE_IMPORTER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/ meltfptr[1245]));
+ ( /*_.VALDATA___V1249*/ meltfptr[1248]));
/*internsym:COMPILE2OBJ_INITPROC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]));
+ ( /*_.VALDATA___V1251*/ meltfptr[1250]));
/*internsym:COMPILE2OBJ_PROCEDURE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1250*/ meltfptr[1249]));
+ ( /*_.VALDATA___V1253*/ meltfptr[1252]));
/*internsym:VARIADIC_INDEX_IDSTR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1252*/ meltfptr[1251]));
+ ( /*_.VALDATA___V1255*/ meltfptr[1254]));
/*internsym:VARIADIC_LENGTH_IDSTR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1254*/ meltfptr[1253]));
+ ( /*_.VALDATA___V1257*/ meltfptr[1256]));
/*internsym:CTYPE_VOID */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1256*/ meltfptr[1255]));
+ ( /*_.VALDATA___V1259*/ meltfptr[1258]));
/*internsym:CLASS_LET_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1262*/ meltfptr[1261]));
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]));
/*internsym:CLASS_NREP_CHUNK */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/ meltfptr[1266]));
+ ( /*_.VALDATA___V1270*/ meltfptr[1269]));
/*internsym:CLASS_NREP_TYPED_EXPRESSION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1271*/ meltfptr[1270]));
+ ( /*_.VALDATA___V1274*/ meltfptr[1273]));
/*internsym:CLASS_NREP_NIL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1275*/ meltfptr[1274]));
+ ( /*_.VALDATA___V1278*/ meltfptr[1277]));
/*internsym:CLASS_NREP_COMMENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1279*/ meltfptr[1278]));
+ ( /*_.VALDATA___V1282*/ meltfptr[1281]));
/*internsym:CLASS_NREP_LOCSYMOCC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1283*/ meltfptr[1282]));
+ ( /*_.VALDATA___V1286*/ meltfptr[1285]));
/*internsym:CLASS_NREP_CLOSEDOCC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1287*/ meltfptr[1286]));
+ ( /*_.VALDATA___V1290*/ meltfptr[1289]));
/*internsym:CLASS_NREP_CONSTOCC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1291*/ meltfptr[1290]));
+ ( /*_.VALDATA___V1294*/ meltfptr[1293]));
/*internsym:CLASS_NREP_DEFINED_CONSTANT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/ meltfptr[1296]));
+ ( /*_.VALDATA___V1300*/ meltfptr[1299]));
/*internsym:CLASS_NREP_QUASICONSTANT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1301*/ meltfptr[1300]));
+ ( /*_.VALDATA___V1304*/ meltfptr[1303]));
/*internsym:CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1305*/ meltfptr[1304]));
+ ( /*_.VALDATA___V1308*/ meltfptr[1307]));
/*internsym:CLASS_NREP_FOREVER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1310*/ meltfptr[1309]));
+ ( /*_.VALDATA___V1313*/ meltfptr[1312]));
/*internsym:CLASS_LABEL_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1312*/ meltfptr[1311]));
+ ( /*_.VALDATA___V1315*/ meltfptr[1314]));
/*internsym:CLASS_NREP_EXIT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1316*/ meltfptr[1315]));
+ ( /*_.VALDATA___V1319*/ meltfptr[1318]));
/*internsym:CLASS_NREP_AGAIN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1320*/ meltfptr[1319]));
+ ( /*_.VALDATA___V1323*/ meltfptr[1322]));
/*internsym:CLASS_NREP_LET */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1329*/ meltfptr[1328]));
+ ( /*_.VALDATA___V1332*/ meltfptr[1331]));
/*internsym:CLASS_NORMAL_LET_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1331*/ meltfptr[1330]));
+ ( /*_.VALDATA___V1334*/ meltfptr[1333]));
/*internsym:CLASS_SEXPR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1333*/ meltfptr[1332]));
+ ( /*_.VALDATA___V1336*/ meltfptr[1335]));
/*internsym:COMPILE_LETREC_FILL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1335*/ meltfptr[1334]));
+ ( /*_.VALDATA___V1338*/ meltfptr[1337]));
/*internsym:OBVA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1338*/ meltfptr[1337]));
+ ( /*_.VALDATA___V1341*/ meltfptr[1340]));
/*internsym:OBODL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1341*/ meltfptr[1340]));
+ ( /*_.VALDATA___V1344*/ meltfptr[1343]));
/*internsym:GCX */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1344*/ meltfptr[1343]));
+ ( /*_.VALDATA___V1347*/ meltfptr[1346]));
/*internsym:SLOC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1347*/ meltfptr[1346]));
+ ( /*_.VALDATA___V1350*/ meltfptr[1349]));
/*internsym:CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1357*/ meltfptr[1356]));
+ ( /*_.VALDATA___V1360*/ meltfptr[1359]));
/*internsym:CLASS_NORMAL_CONSTRUCTOR_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1359*/ meltfptr[1358]));
+ ( /*_.VALDATA___V1362*/ meltfptr[1361]));
/*internsym:CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1363*/ meltfptr[1362]));
+ ( /*_.VALDATA___V1366*/ meltfptr[1365]));
/*internsym:CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/ meltfptr[1366]));
+ ( /*_.VALDATA___V1370*/ meltfptr[1369]));
/*internsym:CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/ meltfptr[1370]));
+ ( /*_.VALDATA___V1374*/ meltfptr[1373]));
/*internsym:CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/ meltfptr[1374]));
+ ( /*_.VALDATA___V1378*/ meltfptr[1377]));
/*internsym:CLASS_VALUE_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/ meltfptr[1376]));
+ ( /*_.VALDATA___V1380*/ meltfptr[1379]));
/*internsym:CLASS_CLASS_BINDING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/ meltfptr[1378]));
+ ( /*_.VALDATA___V1382*/ meltfptr[1381]));
/*internsym:CLASS_CLASS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/ meltfptr[1380]));
+ ( /*_.VALDATA___V1384*/ meltfptr[1383]));
/*internsym:CLASS_NREP_LETREC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/ meltfptr[1384]));
+ ( /*_.VALDATA___V1388*/ meltfptr[1387]));
/*internsym:CLASS_NREP_SYMOCC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/ meltfptr[1386]));
+ ( /*_.VALDATA___V1390*/ meltfptr[1389]));
/*internsym:CLASS_NREP_CITERATION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1396*/ meltfptr[1395]));
+ ( /*_.VALDATA___V1399*/ meltfptr[1398]));
/*internsym:CLASS_CITERATOR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1398*/ meltfptr[1397]));
+ ( /*_.VALDATA___V1401*/ meltfptr[1400]));
/*internsym:CLASS_NREP_SETQ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1402*/ meltfptr[1401]));
+ ( /*_.VALDATA___V1405*/ meltfptr[1404]));
/*internsym:CLASS_NREP_PROGN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1407*/ meltfptr[1406]));
+ ( /*_.VALDATA___V1410*/ meltfptr[1409]));
/*internsym:CLASS_NREP_MULTACC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1412*/ meltfptr[1411]));
+ ( /*_.VALDATA___V1415*/ meltfptr[1414]));
/*internsym:CLASS_NREP_FIELDACC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1417*/ meltfptr[1416]));
+ ( /*_.VALDATA___V1420*/ meltfptr[1419]));
+
- /*internsym:CLASS_FIELD */
+#undef meltfram__
+} /*end of warmelt_genobj_initialmeltchunk_35 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_genobj_initialmeltchunk_36 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:CLASS_FIELD*/
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1419*/ meltfptr[1418]));
+ ( /*_.VALDATA___V1422*/ meltfptr[1421]));
/*internsym:CLASS_NREP_DATAINSTANCE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1421*/ meltfptr[1420]));
+ ( /*_.VALDATA___V1424*/ meltfptr[1423]));
/*internsym:CLASS_NREP_UNSAFE_GET_FIELD */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1425*/ meltfptr[1424]));
+ ( /*_.VALDATA___V1428*/ meltfptr[1427]));
/*internsym:CLASS_NREP_UNSAFE_PUT_FIELDS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1430*/ meltfptr[1429]));
+ ( /*_.VALDATA___V1433*/ meltfptr[1432]));
/*internsym:CLASS_NREP_FIELDASSIGN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1432*/ meltfptr[1431]));
+ ( /*_.VALDATA___V1435*/ meltfptr[1434]));
/*internsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1436*/ meltfptr[1435]));
+ ( /*_.VALDATA___V1439*/ meltfptr[1438]));
/*internsym:CLASS_NREP_APPLY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1441*/ meltfptr[1440]));
+ ( /*_.VALDATA___V1444*/ meltfptr[1443]));
/*internsym:CLASS_NREP_MULTIAPPLY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1450*/ meltfptr[1449]));
+ ( /*_.VALDATA___V1453*/ meltfptr[1452]));
/*internsym:CLASS_NREP_MSEND */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1455*/ meltfptr[1454]));
+ ( /*_.VALDATA___V1458*/ meltfptr[1457]));
/*internsym:CLASS_NREP_MULTIMSEND */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1463*/ meltfptr[1462]));
+ ( /*_.VALDATA___V1466*/ meltfptr[1465]));
/*internsym:CTYPE_CSTRING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1489*/ meltfptr[1488]));
+ ( /*_.VALDATA___V1492*/ meltfptr[1491]));
/*internsym:DISCR_NULL_RECEIVER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1493*/ meltfptr[1492]));
+ ( /*_.VALDATA___V1496*/ meltfptr[1495]));
/*internsym:CLASS_NREP_IF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1505*/ meltfptr[1504]));
+ ( /*_.VALDATA___V1508*/ meltfptr[1507]));
/*internsym:CLASS_NREP_IFISA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1509*/ meltfptr[1508]));
+ ( /*_.VALDATA___V1512*/ meltfptr[1511]));
/*internsym:CLASS_NREP_IFTESTVALUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1511*/ meltfptr[1510]));
+ ( /*_.VALDATA___V1514*/ meltfptr[1513]));
+
+ /*internsym:CLASS_NREP_IFTUPLESIZED */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1518*/ meltfptr[1517]));
/*internsym:CLASS_NREP_IFVARIADIC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1515*/ meltfptr[1514]));
+ ( /*_.VALDATA___V1522*/ meltfptr[1521]));
/*internsym:CLASS_NREP_VARIADIC_ARGUMENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1521*/ meltfptr[1520]));
+ ( /*_.VALDATA___V1528*/ meltfptr[1527]));
/*internsym:CLASS_NREP_CONSUME_VARIADIC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1525*/ meltfptr[1524]));
+ ( /*_.VALDATA___V1532*/ meltfptr[1531]));
/*internsym:CLASS_NREP_CPPIF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1531*/ meltfptr[1530]));
+ ( /*_.VALDATA___V1538*/ meltfptr[1537]));
/*internsym:CLASS_NREP_RETURN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1538*/ meltfptr[1537]));
+ ( /*_.VALDATA___V1545*/ meltfptr[1544]));
/*internsym:DISCRCLOSURE_OBJPREDEF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1541*/ meltfptr[1540]));
+ ( /*_.VALDATA___V1548*/ meltfptr[1547]));
/*internsym:DISCR_CLOSURE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1544*/ meltfptr[1543]));
+ ( /*_.VALDATA___V1551*/ meltfptr[1550]));
/*internsym:CLASS_NREP_LAMBDA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1549*/ meltfptr[1548]));
+ ( /*_.VALDATA___V1556*/ meltfptr[1555]));
/*internsym:CLASS_NREP_INSTANCE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1556*/ meltfptr[1555]));
+ ( /*_.VALDATA___V1563*/ meltfptr[1562]));
/*internsym:INST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1552*/ meltfptr[1551]));
+ ( /*_.VALDATA___V1559*/ meltfptr[1558]));
/*internsym:CLASS_NREP_PREDEF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1562*/ meltfptr[1561]));
+ ( /*_.VALDATA___V1569*/ meltfptr[1568]));
/*internsym:_VALDATA_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1565*/ meltfptr[1564]));
+ ( /*_.VALDATA___V1572*/ meltfptr[1571]));
/*internsym:_VALUEDATA_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1567*/ meltfptr[1566]));
+ ( /*_.VALDATA___V1574*/ meltfptr[1573]));
/*internsym:CLASS_NREP_DATATUPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1589*/ meltfptr[1588]));
+ ( /*_.VALDATA___V1596*/ meltfptr[1595]));
/*internsym:_VALTUP_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1583*/ meltfptr[1582]));
+ ( /*_.VALDATA___V1590*/ meltfptr[1589]));
/*internsym:_INITUP_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1585*/ meltfptr[1584]));
+ ( /*_.VALDATA___V1592*/ meltfptr[1591]));
/*internsym:CLASS_NREP_DATASTRING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1595*/ meltfptr[1594]));
+ ( /*_.VALDATA___V1602*/ meltfptr[1601]));
/*internsym:_VALSTR_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1592*/ meltfptr[1591]));
+ ( /*_.VALDATA___V1599*/ meltfptr[1598]));
/*internsym:CLASS_NREP_DATABOXEDINTEGER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1601*/ meltfptr[1600]));
+ ( /*_.VALDATA___V1608*/ meltfptr[1607]));
/*internsym:_VALBXINT_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1598*/ meltfptr[1597]));
+ ( /*_.VALDATA___V1605*/ meltfptr[1604]));
/*internsym:CLASS_NREP_DATACLOSURE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1610*/ meltfptr[1609]));
+ ( /*_.VALDATA___V1617*/ meltfptr[1616]));
/*internsym:_VALCLO_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1604*/ meltfptr[1603]));
+ ( /*_.VALDATA___V1611*/ meltfptr[1610]));
/*internsym:_DATACLOSURE_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1606*/ meltfptr[1605]));
+ ( /*_.VALDATA___V1613*/ meltfptr[1612]));
/*internsym:CLASS_NREP_DATAROUTINE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1612*/ meltfptr[1611]));
+ ( /*_.VALDATA___V1619*/ meltfptr[1618]));
/*internsym:_VALROUT_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1615*/ meltfptr[1614]));
+ ( /*_.VALDATA___V1622*/ meltfptr[1621]));
/*internsym:_IROUTVAL_ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1617*/ meltfptr[1616]));
+ ( /*_.VALDATA___V1624*/ meltfptr[1623]));
/*internsym:CLASS_NREP_QUASIDATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1621*/ meltfptr[1620]));
+ ( /*_.VALDATA___V1628*/ meltfptr[1627]));
/*internsym:CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1625*/ meltfptr[1624]));
+ ( /*_.VALDATA___V1632*/ meltfptr[1631]));
/*internsym:CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1629*/ meltfptr[1628]));
+ ( /*_.VALDATA___V1636*/ meltfptr[1635]));
/*internsym:CLASS_NREP_STORE_PREDEFINED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1633*/ meltfptr[1632]));
-
-
-#undef meltfram__
-} /*end of warmelt_genobj_initialmeltchunk_35 */
+ ( /*_.VALDATA___V1640*/ meltfptr[1639]));
-void MELT_MODULE_VISIBILITY
-warmelt_genobj_initialmeltchunk_36 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/
+ /*internsym:CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1640*/ meltfptr[1639]));
+ ( /*_.VALDATA___V1647*/ meltfptr[1646]));
/*internsym:COMPILE_MATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1642*/ meltfptr[1641]));
+ ( /*_.VALDATA___V1649*/ meltfptr[1648]));
/*internsym:CLASS_MATCHCOMPILCONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1646*/ meltfptr[1645]));
+ ( /*_.VALDATA___V1653*/ meltfptr[1652]));
/*internsym:CLASS_PROPED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1648*/ meltfptr[1647]));
+ ( /*_.VALDATA___V1655*/ meltfptr[1654]));
/*internsym:MCX_LOC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1668*/ meltfptr[1667]));
+ ( /*_.VALDATA___V1675*/ meltfptr[1674]));
/*internsym:MCX_NORMTESTER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1670*/ meltfptr[1669]));
+ ( /*_.VALDATA___V1677*/ meltfptr[1676]));
/*internsym:MCX_GOTOTHEN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1672*/ meltfptr[1671]));
+ ( /*_.VALDATA___V1679*/ meltfptr[1678]));
/*internsym:MCX_GOTOELSE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1674*/ meltfptr[1673]));
+ ( /*_.VALDATA___V1681*/ meltfptr[1680]));
/*internsym:MCX_OLIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1676*/ meltfptr[1675]));
+ ( /*_.VALDATA___V1683*/ meltfptr[1682]));
/*internsym:MCX_SUFFIX */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1678*/ meltfptr[1677]));
+ ( /*_.VALDATA___V1685*/ meltfptr[1684]));
/*internsym:MCX_STATECOUNTER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1680*/ meltfptr[1679]));
+ ( /*_.VALDATA___V1687*/ meltfptr[1686]));
/*internsym:COMPILE_TESTER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1682*/ meltfptr[1681]));
+ ( /*_.VALDATA___V1689*/ meltfptr[1688]));
/*internsym:CLASS_TESTERCOMPILCONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1686*/ meltfptr[1685]));
+ ( /*_.VALDATA___V1693*/ meltfptr[1692]));
/*internsym:TCX_NRMATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1698*/ meltfptr[1697]));
+ ( /*_.VALDATA___V1705*/ meltfptr[1704]));
/*internsym:TCX_FREELIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1700*/ meltfptr[1699]));
+ ( /*_.VALDATA___V1707*/ meltfptr[1706]));
/*internsym:TCX_NEXTEST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1702*/ meltfptr[1701]));
+ ( /*_.VALDATA___V1709*/ meltfptr[1708]));
/*internsym:CLASS_NORMTESTER_ANY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1706*/ meltfptr[1705]));
+ ( /*_.VALDATA___V1713*/ meltfptr[1712]));
/*internsym:CLASS_NREP_MATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1713*/ meltfptr[1712]));
+ ( /*_.VALDATA___V1720*/ meltfptr[1719]));
/*internsym:CLASS_NORMTESTER_ANYTESTER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1715*/ meltfptr[1714]));
+ ( /*_.VALDATA___V1722*/ meltfptr[1721]));
/*internsym:CLASS_NORMTESTER_SUCCESS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1717*/ meltfptr[1716]));
+ ( /*_.VALDATA___V1724*/ meltfptr[1723]));
/*internsym:MAPOBJECT_EVERY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1719*/ meltfptr[1718]));
+ ( /*_.VALDATA___V1726*/ meltfptr[1725]));
/*internsym:LIST_FIND */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1721*/ meltfptr[1720]));
+ ( /*_.VALDATA___V1728*/ meltfptr[1727]));
/*internsym:CLASS_ALTERNATE_MATCH_NREP_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1723*/ meltfptr[1722]));
+ ( /*_.VALDATA___V1730*/ meltfptr[1729]));
/*internsym:CLASS_ROOT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1725*/ meltfptr[1724]));
+ ( /*_.VALDATA___V1732*/ meltfptr[1731]));
/*internsym:ALTMATCHN_PREV */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1735*/ meltfptr[1734]));
+ ( /*_.VALDATA___V1742*/ meltfptr[1741]));
/*internsym:ALTMATCHN_NREP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1737*/ meltfptr[1736]));
+ ( /*_.VALDATA___V1744*/ meltfptr[1743]));
/*internsym:CLASS_NREP_ALTMATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1742*/ meltfptr[1741]));
+ ( /*_.VALDATA___V1749*/ meltfptr[1748]));
/*internsym:CLASS_NREP_MATCH_LABEL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1746*/ meltfptr[1745]));
+ ( /*_.VALDATA___V1753*/ meltfptr[1752]));
/*internsym:CLASS_MATCH_STEP_WITH_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1748*/ meltfptr[1747]));
+ ( /*_.VALDATA___V1755*/ meltfptr[1754]));
+
+ /*internsym:CLASS_NREP_MATCH_FLAG */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1759*/ meltfptr[1758]));
/*internsym:CLASS_NREP_MATCH_DATA_INITIALIZER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1752*/ meltfptr[1751]));
+ ( /*_.VALDATA___V1763*/ meltfptr[1762]));
/*internsym:CLASS_NREP_MATCH_DATA_ACTION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1754*/ meltfptr[1753]));
+ ( /*_.VALDATA___V1765*/ meltfptr[1764]));
/*internsym:CLASS_NREP_MATCHED_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1756*/ meltfptr[1755]));
+ ( /*_.VALDATA___V1767*/ meltfptr[1766]));
+
+ /*internsym:CLASS_NREP_MATCH_JUMP */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1773*/ meltfptr[1772]));
/*internsym:CLASS_NORMTESTER_MATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1771*/ meltfptr[1770]));
+ ( /*_.VALDATA___V1788*/ meltfptr[1787]));
/*internsym:CLASS_NORMTESTER_INSTANCE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1775*/ meltfptr[1774]));
+ ( /*_.VALDATA___V1792*/ meltfptr[1791]));
/*internsym:CLASS_NORMTESTER_TUPLE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1779*/ meltfptr[1778]));
+ ( /*_.VALDATA___V1796*/ meltfptr[1795]));
/*internsym:CLASS_NORMTESTER_SAME */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1783*/ meltfptr[1782]));
+ ( /*_.VALDATA___V1800*/ meltfptr[1799]));
/*internsym:CLASS_NORMTESTER_OR_CLEAR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1789*/ meltfptr[1788]));
+ ( /*_.VALDATA___V1806*/ meltfptr[1805]));
/*internsym:CLASS_NORMTESTER_OR_TRANSMIT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1793*/ meltfptr[1792]));
+ ( /*_.VALDATA___V1810*/ meltfptr[1809]));
/*internsym:CLASS_NORMTESTER_DISJUNCTION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1797*/ meltfptr[1796]));
+ ( /*_.VALDATA___V1814*/ meltfptr[1813]));
/*internsym:CLASS_CMATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1805*/ meltfptr[1804]));
+ ( /*_.VALDATA___V1822*/ meltfptr[1821]));
/*internsym:MULTIPLE_EVERY_BOTH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1807*/ meltfptr[1806]));
+ ( /*_.VALDATA___V1824*/ meltfptr[1823]));
/*internsym:CLASS_FUNMATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1815*/ meltfptr[1814]));
+ ( /*_.VALDATA___V1832*/ meltfptr[1831]));
/*internsym:_CLOSFUNMATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1812*/ meltfptr[1811]));
+ ( /*_.VALDATA___V1829*/ meltfptr[1828]));
/*internsym:FMATCH_MATCHF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1817*/ meltfptr[1816]));
+ ( /*_.VALDATA___V1834*/ meltfptr[1833]));
/**COMMENT: set retinit from boxloc **/ ;
@@ -95171,20 +96113,20 @@ forward_or_mark_module_start_frame_warmelt_genobj (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -3223);
+ meltframptr_->mcfr_nbvar == /*minihash */ -675);
if (!marking && melt_is_forwarding)
{
dbgprintf
("forward_or_mark_module_start_frame_warmelt_genobj forwarding %d pointers in frame %p",
- 1936, (void *) meltframptr_);
- for (ix = 0; ix < 1936; ix++)
+ 1957, (void *) meltframptr_);
+ for (ix = 0; ix < 1957; ix++)
MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]);
return;
} /*end forwarding */
dbgprintf
("forward_or_mark_module_start_frame_warmelt_genobj marking in frame %p",
(void *) meltframptr_);
- for (ix = 0; ix < 1936; ix++)
+ for (ix = 0; ix < 1957; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
diff --git a/gcc/melt/generated/warmelt-macro+01.c b/gcc/melt/generated/warmelt-macro+01.c
index 15cf542e379..e9cd4956b72 100644
--- a/gcc/melt/generated/warmelt-macro+01.c
+++ b/gcc/melt/generated/warmelt-macro+01.c
@@ -4020,7 +4020,14 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:1006:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4039,7 +4046,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:1006:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPEREXP__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPEREXP__V23*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13951,7 +13965,12 @@ lab_endgetargs:;
MELT_LOCATION
("warmelt-macro.melt:1313:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[34])))) /*then */
+ /*cond */ if (
+ /*ifisa*/
+ melt_is_instance_of
+ ((melt_ptr_t) ( /*_.SOPER__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[34])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16694,7 +16713,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PAIRCONT__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PAIRCONT__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16829,7 +16854,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:1416:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCHER__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[15])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCHER__V3*/
+ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17087,7 +17118,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~PAIRCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~PAIRCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17128,7 +17166,13 @@ lab_endgetargs:;
/*_.PAIR_TAIL__V10*/ meltfptr[9] =
(melt_pair_tail ((melt_ptr_t) ( /*_.CURPAIR__V6*/ meltfptr[5])));;
MELT_LOCATION ("warmelt-macro.melt:1394:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~PAIRCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~PAIRCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17198,7 +17242,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:1397:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MATCHER */ meltfclos->tabval[4])), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MATCHER */ meltfclos->
+ tabval[4])),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17355,7 +17405,14 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~PAIRCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~PAIRCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17396,7 +17453,13 @@ lab_endgetargs:;
/*_.PAIR_TAIL__V8*/ meltfptr[7] =
(melt_pair_tail ((melt_ptr_t) ( /*_.CURPAIR__V4*/ meltfptr[3])));;
MELT_LOCATION ("warmelt-macro.melt:1405:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~PAIRCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~PAIRCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17469,7 +17532,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:1408:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MATCHER */ meltfclos->tabval[4])), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MATCHER */ meltfclos->
+ tabval[4])),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17929,7 +17998,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SUBPAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SUBPAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21524,7 +21598,11 @@ lab_endgetargs:;
/*_.INST__V146*/ meltfptr[74];;
MELT_LOCATION
("warmelt-macro.melt:1560:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPVAL__V123*/ meltfptr[113]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.OPVAL__V123*/ meltfptr[113]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21823,7 +21901,13 @@ lab_endgetargs:;
MELT_LOCATION
("warmelt-macro.melt:1566:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPVAL__V123*/ meltfptr[113]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of
+ ((melt_ptr_t)
+ ( /*_.OPVAL__V123*/ meltfptr[113]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26729,7 +26813,11 @@ lab_endgetargs:;
;
MELT_LOCATION
("warmelt-macro.melt:1784:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTY__V34*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CTY__V34*/ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26750,7 +26838,11 @@ lab_endgetargs:;
;
MELT_LOCATION
("warmelt-macro.melt:1784:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V42*/ meltfptr[41]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V42*/ meltfptr[41]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29708,7 +29800,11 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.COMP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.COMP__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29728,7 +29824,11 @@ lab_endgetargs:;
;
MELT_LOCATION
("warmelt-macro.melt:1919:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.COMP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SEXPR */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.COMP__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_SEXPR */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29840,7 +29940,11 @@ lab_endgetargs:;
( /*_.COMP__V3*/ meltfptr[2])));;
MELT_LOCATION
("warmelt-macro.melt:1932:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V19*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V19*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31532,7 +31636,11 @@ lab_endgetargs:;
( /*_.ECOMP__V13*/ meltfptr[6])));;
MELT_LOCATION
("warmelt-macro.melt:1987:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V30*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V30*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32064,7 +32172,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:2016:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32389,7 +32502,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:2038:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTY__V34*/ meltfptr[33]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTY__V34*/
+ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32408,7 +32527,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:2038:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V47*/ meltfptr[46]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V47*/
+ meltfptr[46]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32994,7 +33119,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2085:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V76*/ meltfptr[75]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V76*/
+ meltfptr[75]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34945,7 +35076,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2223:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURSBIND__V108*/ meltfptr[101]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSBIND__V108*/
+ meltfptr[101]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35274,7 +35411,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2230:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURLBIND__V116*/ meltfptr[112]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURLBIND__V116*/
+ meltfptr[112]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38500,7 +38643,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:2408:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCHFORMAL__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCHFORMAL__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38609,7 +38758,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2413:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURIBIND__V169*/ meltfptr[168]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURIBIND__V169*/
+ meltfptr[168]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38735,7 +38890,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2418:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROBIND__V173*/ meltfptr[172]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROBIND__V173*/
+ meltfptr[172]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-macro+02.c b/gcc/melt/generated/warmelt-macro+02.c
index 4614b38b783..21c23a1f8d2 100644
--- a/gcc/melt/generated/warmelt-macro+02.c
+++ b/gcc/melt/generated/warmelt-macro+02.c
@@ -2811,7 +2811,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:2477:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3257,7 +3262,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:2499:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5798,7 +5808,12 @@ lab_endgetargs:;
;
/*_.SDEFUN__V59*/ meltfptr[51] = /*_.INST__V60*/ meltfptr[52];;
MELT_LOCATION ("warmelt-macro.melt:2644:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBIND__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_FUNCTION_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FBIND__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_FUNCTION_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -6614,7 +6629,13 @@ lab_endgetargs:;
;
/*_.SDEFINE__V40*/ meltfptr[32] = /*_.INST__V41*/ meltfptr[33];;
MELT_LOCATION ("warmelt-macro.melt:2707:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DEFVALBIND__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_DEFINED_VALUE_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DEFVALBIND__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_DEFINED_VALUE_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7181,7 +7202,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:2755:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMAL0BIND__V79*/ meltfptr[71]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMAL0BIND__V79*/ meltfptr[71]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7336,7 +7362,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:2759:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FUNAME__V54*/ meltfptr[36]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FUNAME__V54*/ meltfptr[36]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7496,7 +7527,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:2765:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SDEFUN__V77*/ meltfptr[69]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFUN */ meltfrout->tabval[15])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SDEFUN__V77*/
+ meltfptr[69]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFUN */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -14084,7 +14121,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLDPREVBIND__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLDPREVBIND__V6*/ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14126,7 +14168,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:3003:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVALUE__V20*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PREVALUE__V20*/ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14145,7 +14192,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:3003:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD_OWNCLASS__V21*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD_OWNCLASS__V21*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14164,7 +14216,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:3004:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~SYMB */ meltfclos->tabval[3])), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~SYMB */
+ meltfclos->
+ tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19093,7 +19152,12 @@ lab_endgetargs:;
;
/*_.SINST__V83*/ meltfptr[63] = /*_.INST__V84*/ meltfptr[64];;
MELT_LOCATION ("warmelt-macro.melt:3250:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.IBIND__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_INSTANCE_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.IBIND__V31*/ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_INSTANCE_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -20638,7 +20702,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:3334:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!MELT_MODE_CONTAINER */ meltfrout->tabval[13])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!MELT_MODE_CONTAINER */
+ meltfrout->tabval[13])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21292,7 +21362,11 @@ lab_endgetargs:;
MELT_LOCATION
("warmelt-macro.melt:3376:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FIRSTF__V114*/ meltfptr[113]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.FIRSTF__V114*/ meltfptr[113]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21681,7 +21755,12 @@ lab_endgetargs:;
;
/*_.RES__V124*/ meltfptr[112] = /*_.INST__V125*/ meltfptr[115];;
MELT_LOCATION ("warmelt-macro.melt:3399:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SELBIND__V35*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_SELECTOR_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SELBIND__V35*/ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_SELECTOR_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -24696,7 +24775,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLDCONT__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLDCONT__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25269,7 +25354,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:3541:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~FLDCONT */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~FLDCONT */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -26836,7 +26927,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:3624:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATFLD__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATFLD__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28359,7 +28455,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:3719:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATFLD__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATFLD__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29143,7 +29244,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCHK__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCHK__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29162,7 +29269,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:3782:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCHK__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_SEXPR */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCHK__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_SEXPR */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-macro+03.c b/gcc/melt/generated/warmelt-macro+03.c
index 91239c5f35e..c3b4cb601f5 100644
--- a/gcc/melt/generated/warmelt-macro+03.c
+++ b/gcc/melt/generated/warmelt-macro+03.c
@@ -3775,7 +3775,12 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-macro.melt:4361:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ARGSUB__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ARGSUB__V26*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7798,7 +7803,15 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:4523:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CLASS_CONTAINER */ meltfrout->
+ tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->
+ tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9431,7 +9444,15 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:4605:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CLASS_CONTAINER */ meltfrout->
+ tabval[3])),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->
+ tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13745,7 +13766,12 @@ lab_endgetargs:;
;
/*_.SMAT__V77*/ meltfptr[49] = /*_.INST__V78*/ meltfptr[50];;
MELT_LOCATION ("warmelt-macro.melt:4817:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LASTCASE__V76*/ meltfptr[48]), (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */ meltfrout->tabval[13])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LASTCASE__V76*/ meltfptr[48]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14601,7 +14627,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:4863:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYP__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14620,7 +14651,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:4863:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V33*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15039,7 +15075,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVBIND__V55*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PREVBIND__V55*/
+ meltfptr[29]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15058,7 +15100,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:4895:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VAR__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VAR__V17*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15096,7 +15144,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:4899:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VAR__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VAR__V17*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15171,7 +15225,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:4905:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VAR__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VAR__V17*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17512,7 +17572,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBINDEXPR__V43*/ meltfptr[42]), (melt_ptr_t) (( /*!CLASS_SEXPR */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBINDEXPR__V43*/ meltfptr[42]),
+ (melt_ptr_t) (( /*!CLASS_SEXPR */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17531,7 +17596,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:5040:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBINDEXPR__V43*/ meltfptr[42]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBINDEXPR__V43*/ meltfptr[42]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18071,7 +18141,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NEWENV__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NEWENV__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18237,7 +18313,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5080:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVAR__V74*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVAR__V74*/ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18508,7 +18589,12 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-macro.melt:5098:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURSEXPR__V88*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSEXPR__V88*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18633,7 +18719,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:5106:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V92*/ meltfptr[54]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V92*/
+ meltfptr[54]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -18674,7 +18766,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-macro.melt:5110:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUREXP__V91*/ meltfptr[50]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUREXP__V91*/
+ meltfptr[50]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21853,7 +21951,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBI__V69*/ meltfptr[46]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FBI__V69*/ meltfptr[46]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21909,7 +22012,11 @@ lab_endgetargs:;
MELT_LOCATION
("warmelt-macro.melt:5257:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBISYMB__V73*/ meltfptr[72]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[19])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.FBISYMB__V73*/ meltfptr[72]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22777,7 +22884,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RESCONT__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RESCONT__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23666,7 +23779,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-macro.melt:5276:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~SIFVARIADIC */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_SOURCE_IFVARIADIC */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~SIFVARIADIC */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_IFVARIADIC */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
diff --git a/gcc/melt/generated/warmelt-macro+04.c b/gcc/melt/generated/warmelt-macro+04.c
index 980aff510fe..7b2036b16e4 100644
--- a/gcc/melt/generated/warmelt-macro+04.c
+++ b/gcc/melt/generated/warmelt-macro+04.c
@@ -9755,7 +9755,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5872:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THECOUNTBIND__V21*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THECOUNTBIND__V21*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9805,7 +9811,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5874:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THECOUNTBIND__V21*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THECOUNTBIND__V21*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10133,7 +10145,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5893:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THENEEDDBGBIND__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THENEEDDBGBIND__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10183,7 +10201,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5895:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THENEEDDBGBIND__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THENEEDDBGBIND__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10433,7 +10456,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5911:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THEINCRDBGBIND__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THEINCRDBGBIND__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_PRIMITIVE_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10483,7 +10512,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-macro.melt:5913:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.THEINCRDBGBIND__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.THEINCRDBGBIND__V23*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-macro+meltdesc.c b/gcc/melt/generated/warmelt-macro+meltdesc.c
index f9c3df545ff..622bd6b6485 100644
--- a/gcc/melt/generated/warmelt-macro+meltdesc.c
+++ b/gcc/melt/generated/warmelt-macro+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-macro */
@@ -12,17 +12,17 @@ const char melt_modulename[]="warmelt-macro";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-macro";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="fa07de85ec0e0e91ea5ecd6e9bddddaf";
+const char melt_primaryhexmd5[]="86dc5f7c9e738c8aa422df054bd33a06";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+01.c #1 */ "6b3c0021daa7319dd957432c463346bc",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+02.c #2 */ "7a74706a65e215d6206fb7dc3982a1d3",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+03.c #3 */ "c3af6fcfa4b34cb4155e2ac5906c9bdd",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+04.c #4 */ "175517e25ad3456f8f02c80cacbbfdc6",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+01.c #1 */ "420fe4c175cfbcd2c6d3c324b2f3cd62",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+02.c #2 */ "7a95bddbea9bb5d05a19f9862ba3bef0",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+03.c #3 */ "d6091582fef4933860b3a1e008fa8520",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+04.c #4 */ "87162c2cb2f1e22307b1e5a09fd99b68",
/*nosecfile*/ (const char*)0,
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -31,9 +31,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=4;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="f4db16f0e05235336994cb66213cfb0a" ;
+const char melt_cumulated_hexmd5[]="a22f1eaf1daaa2b421f2ff474d01182a" ;
/* include the timestamp file */
-#define meltmod_warmelt_macro_mds__f4db16f0e05235336994cb66213cfb0a 1
+#define meltmod_warmelt_macro_mds__a22f1eaf1daaa2b421f2ff474d01182a 1
#include "warmelt-macro+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-macro+melttime.h b/gcc/melt/generated/warmelt-macro+melttime.h
index c041d3b3f74..e4f73581c88 100644
--- a/gcc/melt/generated/warmelt-macro+melttime.h
+++ b/gcc/melt/generated/warmelt-macro+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-macro+melttime.h is included from warmelt-macro+meltdesc.c only. */
-#if meltmod_warmelt_macro_mds__f4db16f0e05235336994cb66213cfb0a
+#if meltmod_warmelt_macro_mds__a22f1eaf1daaa2b421f2ff474d01182a
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-macro */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:22 2012 CET";
-const long long melt_gen_timenum=1328609122;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:21 2012 CET";
+const long long melt_gen_timenum=1329219201;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_macro_mds__f4db16f0e05235336994cb66213cfb0a */
+#else /* ! meltmod_warmelt_macro_mds__a22f1eaf1daaa2b421f2ff474d01182a */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-macro
-#endif /* meltmod_warmelt_macro_mds__f4db16f0e05235336994cb66213cfb0a */
+#endif /* meltmod_warmelt_macro_mds__a22f1eaf1daaa2b421f2ff474d01182a */
diff --git a/gcc/melt/generated/warmelt-macro.c b/gcc/melt/generated/warmelt-macro.c
index 71427d02186..8550db6910f 100644
--- a/gcc/melt/generated/warmelt-macro.c
+++ b/gcc/melt/generated/warmelt-macro.c
@@ -4008,7 +4008,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_macro iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -1316);
+ iniframp__->mcfr_nbvar == /*minihash */ -1365);
struct cdata_st
{
@@ -5659,7 +5659,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_7.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_7.obj_num = 0;
- cdat->dobj_7.obj_hash = 837998464;
+ cdat->dobj_7.obj_hash = 579734832;
cdat->dobj_7.obj_len = 2;
/*inimult dtup_8__IS_RECURSIVELY_CONSTRUCTIBLE */
@@ -5685,7 +5685,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_9__IS_RECURSIVELY_CONSTRUCTIBLE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V7*/ meltfptr[6]);
- cdat->dobj_9__IS_RECURSIVELY_CONSTRUCTIBLE.obj_hash = 868789314;
+ cdat->dobj_9__IS_RECURSIVELY_CONSTRUCTIBLE.obj_hash = 966702450;
cdat->dobj_9__IS_RECURSIVELY_CONSTRUCTIBLE.obj_len = 4;
@@ -5771,7 +5771,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_15__CLASS_SOURCE_LAZY_MACRO_EXPANSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_15__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_15__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_hash = 134947277;
+ cdat->dobj_15__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_hash = 454324238;
cdat->dobj_15__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_len = 8;
@@ -5839,7 +5839,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_21__SLAZYMACRO_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_21__SLAZYMACRO_FUN.obj_num = 2;
- cdat->dobj_21__SLAZYMACRO_FUN.obj_hash = 706534478;
+ cdat->dobj_21__SLAZYMACRO_FUN.obj_hash = 749008436;
cdat->dobj_21__SLAZYMACRO_FUN.obj_len = 4;
@@ -5895,7 +5895,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_25__SLAZYMACRO_OPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_25__SLAZYMACRO_OPER.obj_num = 3;
- cdat->dobj_25__SLAZYMACRO_OPER.obj_hash = 808694090;
+ cdat->dobj_25__SLAZYMACRO_OPER.obj_hash = 683050760;
cdat->dobj_25__SLAZYMACRO_OPER.obj_len = 4;
@@ -5954,7 +5954,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_29__CLASS_SOURCE_ARGUMENTED_OPERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_29__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_29__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_hash = 1041751260;
+ cdat->dobj_29__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_hash = 988108169;
cdat->dobj_29__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_len = 8;
@@ -6021,7 +6021,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_35__SARGOP_ARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_35__SARGOP_ARGS.obj_num = 2;
- cdat->dobj_35__SARGOP_ARGS.obj_hash = 998218727;
+ cdat->dobj_35__SARGOP_ARGS.obj_hash = 309369133;
cdat->dobj_35__SARGOP_ARGS.obj_len = 4;
@@ -6077,7 +6077,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_39__CLASS_SOURCE_APPLY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_39__CLASS_SOURCE_APPLY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_39__CLASS_SOURCE_APPLY.obj_hash = 848866868;
+ cdat->dobj_39__CLASS_SOURCE_APPLY.obj_hash = 99892582;
cdat->dobj_39__CLASS_SOURCE_APPLY.obj_len = 8;
@@ -6144,7 +6144,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_45__SAPP_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_45__SAPP_FUN.obj_num = 3;
- cdat->dobj_45__SAPP_FUN.obj_hash = 298816517;
+ cdat->dobj_45__SAPP_FUN.obj_hash = 889501395;
cdat->dobj_45__SAPP_FUN.obj_len = 4;
@@ -6200,7 +6200,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_49__CLASS_SOURCE_MSEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_49__CLASS_SOURCE_MSEND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_49__CLASS_SOURCE_MSEND.obj_hash = 322633736;
+ cdat->dobj_49__CLASS_SOURCE_MSEND.obj_hash = 324716745;
cdat->dobj_49__CLASS_SOURCE_MSEND.obj_len = 8;
@@ -6269,7 +6269,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_55__MSEND_SELSYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_55__MSEND_SELSYMB.obj_num = 3;
- cdat->dobj_55__MSEND_SELSYMB.obj_hash = 912655416;
+ cdat->dobj_55__MSEND_SELSYMB.obj_hash = 553751484;
cdat->dobj_55__MSEND_SELSYMB.obj_len = 4;
@@ -6323,7 +6323,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_59__MSEND_RECV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_59__MSEND_RECV.obj_num = 4;
- cdat->dobj_59__MSEND_RECV.obj_hash = 380083835;
+ cdat->dobj_59__MSEND_RECV.obj_hash = 416046623;
cdat->dobj_59__MSEND_RECV.obj_len = 4;
@@ -6381,7 +6381,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_63__CLASS_SOURCE_PRIMITIVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_63__CLASS_SOURCE_PRIMITIVE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_63__CLASS_SOURCE_PRIMITIVE.obj_hash = 214040281;
+ cdat->dobj_63__CLASS_SOURCE_PRIMITIVE.obj_hash = 869563926;
cdat->dobj_63__CLASS_SOURCE_PRIMITIVE.obj_len = 8;
@@ -6448,7 +6448,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_69__SPRIM_OPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_69__SPRIM_OPER.obj_num = 3;
- cdat->dobj_69__SPRIM_OPER.obj_hash = 700009145;
+ cdat->dobj_69__SPRIM_OPER.obj_hash = 457057750;
cdat->dobj_69__SPRIM_OPER.obj_len = 4;
@@ -6506,7 +6506,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_73__CLASS_SOURCE_CITERATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_73__CLASS_SOURCE_CITERATION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_73__CLASS_SOURCE_CITERATION.obj_hash = 886618497;
+ cdat->dobj_73__CLASS_SOURCE_CITERATION.obj_hash = 1064921166;
cdat->dobj_73__CLASS_SOURCE_CITERATION.obj_len = 8;
@@ -6573,7 +6573,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_79__SCITER_OPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_79__SCITER_OPER.obj_num = 3;
- cdat->dobj_79__SCITER_OPER.obj_hash = 81787782;
+ cdat->dobj_79__SCITER_OPER.obj_hash = 982890907;
cdat->dobj_79__SCITER_OPER.obj_len = 4;
@@ -6628,7 +6628,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_83__SCITER_VARBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_83__SCITER_VARBIND.obj_num = 4;
- cdat->dobj_83__SCITER_VARBIND.obj_hash = 329839476;
+ cdat->dobj_83__SCITER_VARBIND.obj_hash = 127106097;
cdat->dobj_83__SCITER_VARBIND.obj_len = 4;
@@ -6682,7 +6682,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_87__SCITER_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_87__SCITER_BODY.obj_num = 5;
- cdat->dobj_87__SCITER_BODY.obj_hash = 534121515;
+ cdat->dobj_87__SCITER_BODY.obj_hash = 192289167;
cdat->dobj_87__SCITER_BODY.obj_len = 4;
@@ -6740,7 +6740,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_91__CLASS_SOURCE_CMATCHEXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_91__CLASS_SOURCE_CMATCHEXPR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_91__CLASS_SOURCE_CMATCHEXPR.obj_hash = 882044811;
+ cdat->dobj_91__CLASS_SOURCE_CMATCHEXPR.obj_hash = 346552849;
cdat->dobj_91__CLASS_SOURCE_CMATCHEXPR.obj_len = 8;
@@ -6811,7 +6811,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_97__SCMATX_CMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_97__SCMATX_CMATCHER.obj_num = 3;
- cdat->dobj_97__SCMATX_CMATCHER.obj_hash = 887205302;
+ cdat->dobj_97__SCMATX_CMATCHER.obj_hash = 388706185;
cdat->dobj_97__SCMATX_CMATCHER.obj_len = 4;
@@ -6872,7 +6872,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_101__CLASS_SOURCE_FUNMATCHEXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_101__CLASS_SOURCE_FUNMATCHEXPR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_101__CLASS_SOURCE_FUNMATCHEXPR.obj_hash = 387238375;
+ cdat->dobj_101__CLASS_SOURCE_FUNMATCHEXPR.obj_hash = 858892790;
cdat->dobj_101__CLASS_SOURCE_FUNMATCHEXPR.obj_len = 8;
@@ -6943,7 +6943,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_107__SFMATX_FMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_107__SFMATX_FMATCHER.obj_num = 3;
- cdat->dobj_107__SFMATX_FMATCHER.obj_hash = 243204605;
+ cdat->dobj_107__SFMATX_FMATCHER.obj_hash = 864246596;
cdat->dobj_107__SFMATX_FMATCHER.obj_len = 4;
@@ -7002,7 +7002,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_111__SFMATX_FMATBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_111__SFMATX_FMATBIND.obj_num = 4;
- cdat->dobj_111__SFMATX_FMATBIND.obj_hash = 362582959;
+ cdat->dobj_111__SFMATX_FMATBIND.obj_hash = 78818137;
cdat->dobj_111__SFMATX_FMATBIND.obj_len = 4;
@@ -7061,7 +7061,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_115__CLASS_SOURCE_TUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_115__CLASS_SOURCE_TUPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_115__CLASS_SOURCE_TUPLE.obj_hash = 278648313;
+ cdat->dobj_115__CLASS_SOURCE_TUPLE.obj_hash = 568791246;
cdat->dobj_115__CLASS_SOURCE_TUPLE.obj_len = 8;
@@ -7132,7 +7132,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_121__CLASS_SOURCE_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_121__CLASS_SOURCE_LIST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_121__CLASS_SOURCE_LIST.obj_hash = 596134995;
+ cdat->dobj_121__CLASS_SOURCE_LIST.obj_hash = 808211109;
cdat->dobj_121__CLASS_SOURCE_LIST.obj_len = 8;
@@ -7203,7 +7203,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_127__CLASS_SOURCE_PROGN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_127__CLASS_SOURCE_PROGN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_127__CLASS_SOURCE_PROGN.obj_hash = 842787328;
+ cdat->dobj_127__CLASS_SOURCE_PROGN.obj_hash = 219705597;
cdat->dobj_127__CLASS_SOURCE_PROGN.obj_len = 8;
@@ -7271,7 +7271,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_133__SPROGN_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_133__SPROGN_BODY.obj_num = 2;
- cdat->dobj_133__SPROGN_BODY.obj_hash = 473290735;
+ cdat->dobj_133__SPROGN_BODY.obj_hash = 425279988;
cdat->dobj_133__SPROGN_BODY.obj_len = 4;
@@ -7328,7 +7328,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_137__CLASS_SOURCE_RETURN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_137__CLASS_SOURCE_RETURN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_137__CLASS_SOURCE_RETURN.obj_hash = 657708765;
+ cdat->dobj_137__CLASS_SOURCE_RETURN.obj_hash = 843397586;
cdat->dobj_137__CLASS_SOURCE_RETURN.obj_len = 8;
@@ -7399,7 +7399,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_143__CLASS_SOURCE_SETQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_143__CLASS_SOURCE_SETQ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_143__CLASS_SOURCE_SETQ.obj_hash = 662497199;
+ cdat->dobj_143__CLASS_SOURCE_SETQ.obj_hash = 210954099;
cdat->dobj_143__CLASS_SOURCE_SETQ.obj_len = 8;
@@ -7466,7 +7466,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_149__SSTQ_VAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_149__SSTQ_VAR.obj_num = 2;
- cdat->dobj_149__SSTQ_VAR.obj_hash = 119633717;
+ cdat->dobj_149__SSTQ_VAR.obj_hash = 88819202;
cdat->dobj_149__SSTQ_VAR.obj_len = 4;
@@ -7518,7 +7518,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_153__SSTQ_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_153__SSTQ_EXPR.obj_num = 3;
- cdat->dobj_153__SSTQ_EXPR.obj_hash = 263402956;
+ cdat->dobj_153__SSTQ_EXPR.obj_hash = 156538049;
cdat->dobj_153__SSTQ_EXPR.obj_len = 4;
@@ -7574,7 +7574,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_157__CLASS_SOURCE_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_157__CLASS_SOURCE_COMMENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_157__CLASS_SOURCE_COMMENT.obj_hash = 326952027;
+ cdat->dobj_157__CLASS_SOURCE_COMMENT.obj_hash = 831254581;
cdat->dobj_157__CLASS_SOURCE_COMMENT.obj_len = 8;
@@ -7641,7 +7641,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_163__SCOMM_STR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_163__SCOMM_STR.obj_num = 2;
- cdat->dobj_163__SCOMM_STR.obj_hash = 290237262;
+ cdat->dobj_163__SCOMM_STR.obj_hash = 642244541;
cdat->dobj_163__SCOMM_STR.obj_len = 4;
@@ -7697,7 +7697,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_167__CLASS_SOURCE_QUOTE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_167__CLASS_SOURCE_QUOTE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_167__CLASS_SOURCE_QUOTE.obj_hash = 362332558;
+ cdat->dobj_167__CLASS_SOURCE_QUOTE.obj_hash = 838730310;
cdat->dobj_167__CLASS_SOURCE_QUOTE.obj_len = 8;
@@ -7764,7 +7764,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_173__SQUOTED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_173__SQUOTED.obj_num = 2;
- cdat->dobj_173__SQUOTED.obj_hash = 266723457;
+ cdat->dobj_173__SQUOTED.obj_hash = 521724128;
cdat->dobj_173__SQUOTED.obj_len = 4;
@@ -7822,7 +7822,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_177__CLASS_SOURCE_EXPORTCOMMON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_177__CLASS_SOURCE_EXPORTCOMMON.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_177__CLASS_SOURCE_EXPORTCOMMON.obj_hash = 267144126;
+ cdat->dobj_177__CLASS_SOURCE_EXPORTCOMMON.obj_hash = 920545942;
cdat->dobj_177__CLASS_SOURCE_EXPORTCOMMON.obj_len = 8;
@@ -7892,7 +7892,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_183__SEXPORT_NAMES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_183__SEXPORT_NAMES.obj_num = 2;
- cdat->dobj_183__SEXPORT_NAMES.obj_hash = 358848710;
+ cdat->dobj_183__SEXPORT_NAMES.obj_hash = 311882244;
cdat->dobj_183__SEXPORT_NAMES.obj_len = 4;
@@ -7952,7 +7952,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_187__CLASS_SOURCE_EXPORT_VALUES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_187__CLASS_SOURCE_EXPORT_VALUES.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_187__CLASS_SOURCE_EXPORT_VALUES.obj_hash = 961228910;
+ cdat->dobj_187__CLASS_SOURCE_EXPORT_VALUES.obj_hash = 434923488;
cdat->dobj_187__CLASS_SOURCE_EXPORT_VALUES.obj_len = 8;
@@ -8025,7 +8025,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_193__CLASS_SOURCE_EXPORT_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_193__CLASS_SOURCE_EXPORT_CLASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_193__CLASS_SOURCE_EXPORT_CLASS.obj_hash = 541996919;
+ cdat->dobj_193__CLASS_SOURCE_EXPORT_CLASS.obj_hash = 582051622;
cdat->dobj_193__CLASS_SOURCE_EXPORT_CLASS.obj_len = 8;
@@ -8098,7 +8098,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_199__CLASS_SOURCE_EXPORT_MACRO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_199__CLASS_SOURCE_EXPORT_MACRO.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_199__CLASS_SOURCE_EXPORT_MACRO.obj_hash = 294805934;
+ cdat->dobj_199__CLASS_SOURCE_EXPORT_MACRO.obj_hash = 968171644;
cdat->dobj_199__CLASS_SOURCE_EXPORT_MACRO.obj_len = 8;
@@ -8168,7 +8168,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_205__SEXPMAC_MNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_205__SEXPMAC_MNAME.obj_num = 2;
- cdat->dobj_205__SEXPMAC_MNAME.obj_hash = 381576061;
+ cdat->dobj_205__SEXPMAC_MNAME.obj_hash = 594587897;
cdat->dobj_205__SEXPMAC_MNAME.obj_len = 4;
@@ -8224,7 +8224,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_209__SEXPMAC_MVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_209__SEXPMAC_MVAL.obj_num = 3;
- cdat->dobj_209__SEXPMAC_MVAL.obj_hash = 1037420541;
+ cdat->dobj_209__SEXPMAC_MVAL.obj_hash = 635202286;
cdat->dobj_209__SEXPMAC_MVAL.obj_len = 4;
@@ -8279,7 +8279,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_213__SEXPMAC_DOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_213__SEXPMAC_DOC.obj_num = 4;
- cdat->dobj_213__SEXPMAC_DOC.obj_hash = 386321519;
+ cdat->dobj_213__SEXPMAC_DOC.obj_hash = 199243580;
cdat->dobj_213__SEXPMAC_DOC.obj_len = 4;
@@ -8338,7 +8338,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_217__CLASS_SOURCE_EXPORT_PATMACRO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_217__CLASS_SOURCE_EXPORT_PATMACRO.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_217__CLASS_SOURCE_EXPORT_PATMACRO.obj_hash = 617411495;
+ cdat->dobj_217__CLASS_SOURCE_EXPORT_PATMACRO.obj_hash = 553131378;
cdat->dobj_217__CLASS_SOURCE_EXPORT_PATMACRO.obj_len = 8;
@@ -8407,7 +8407,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_223__SEXPPAT_PVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_223__SEXPPAT_PVAL.obj_num = 5;
- cdat->dobj_223__SEXPPAT_PVAL.obj_hash = 161047420;
+ cdat->dobj_223__SEXPPAT_PVAL.obj_hash = 893207419;
cdat->dobj_223__SEXPPAT_PVAL.obj_len = 4;
@@ -8467,7 +8467,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_227__CLASS_SOURCE_EXPORT_SYNONYM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_227__CLASS_SOURCE_EXPORT_SYNONYM.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_227__CLASS_SOURCE_EXPORT_SYNONYM.obj_hash = 573428300;
+ cdat->dobj_227__CLASS_SOURCE_EXPORT_SYNONYM.obj_hash = 401282570;
cdat->dobj_227__CLASS_SOURCE_EXPORT_SYNONYM.obj_len = 8;
@@ -8538,7 +8538,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_233__SEXPSYN_NEWNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_233__SEXPSYN_NEWNAME.obj_num = 2;
- cdat->dobj_233__SEXPSYN_NEWNAME.obj_hash = 15634094;
+ cdat->dobj_233__SEXPSYN_NEWNAME.obj_hash = 760899557;
cdat->dobj_233__SEXPSYN_NEWNAME.obj_len = 4;
@@ -8597,7 +8597,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_237__SEXPSYN_OLDNAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_237__SEXPSYN_OLDNAME.obj_num = 3;
- cdat->dobj_237__SEXPSYN_OLDNAME.obj_hash = 752301711;
+ cdat->dobj_237__SEXPSYN_OLDNAME.obj_hash = 373037738;
cdat->dobj_237__SEXPSYN_OLDNAME.obj_len = 4;
@@ -8653,7 +8653,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_241__SEXPSYN_DOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_241__SEXPSYN_DOC.obj_num = 4;
- cdat->dobj_241__SEXPSYN_DOC.obj_hash = 412402033;
+ cdat->dobj_241__SEXPSYN_DOC.obj_hash = 829238573;
cdat->dobj_241__SEXPSYN_DOC.obj_len = 4;
@@ -8712,7 +8712,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_245__CLASS_SOURCE_DEFINITION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_245__CLASS_SOURCE_DEFINITION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_245__CLASS_SOURCE_DEFINITION.obj_hash = 93526180;
+ cdat->dobj_245__CLASS_SOURCE_DEFINITION.obj_hash = 634577111;
cdat->dobj_245__CLASS_SOURCE_DEFINITION.obj_len = 8;
@@ -8779,7 +8779,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_251__SDEF_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_251__SDEF_NAME.obj_num = 2;
- cdat->dobj_251__SDEF_NAME.obj_hash = 598747368;
+ cdat->dobj_251__SDEF_NAME.obj_hash = 107024590;
cdat->dobj_251__SDEF_NAME.obj_len = 4;
@@ -8831,7 +8831,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_255__SDEF_DOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_255__SDEF_DOC.obj_num = 3;
- cdat->dobj_255__SDEF_DOC.obj_hash = 835465719;
+ cdat->dobj_255__SDEF_DOC.obj_hash = 167983273;
cdat->dobj_255__SDEF_DOC.obj_len = 4;
@@ -8887,7 +8887,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_259__CLASS_SOURCE_DEFINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_259__CLASS_SOURCE_DEFINE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_259__CLASS_SOURCE_DEFINE.obj_hash = 716952306;
+ cdat->dobj_259__CLASS_SOURCE_DEFINE.obj_hash = 785654701;
cdat->dobj_259__CLASS_SOURCE_DEFINE.obj_len = 8;
@@ -8956,7 +8956,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_265__SDEFINE_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_265__SDEFINE_BODY.obj_num = 4;
- cdat->dobj_265__SDEFINE_BODY.obj_hash = 923126358;
+ cdat->dobj_265__SDEFINE_BODY.obj_hash = 338915588;
cdat->dobj_265__SDEFINE_BODY.obj_len = 4;
@@ -9016,7 +9016,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_269__CLASS_SOURCE_DEFINITION_FORMAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_269__CLASS_SOURCE_DEFINITION_FORMAL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_269__CLASS_SOURCE_DEFINITION_FORMAL.obj_hash = 111925578;
+ cdat->dobj_269__CLASS_SOURCE_DEFINITION_FORMAL.obj_hash = 106332280;
cdat->dobj_269__CLASS_SOURCE_DEFINITION_FORMAL.obj_len = 8;
@@ -9085,7 +9085,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_275__SFORMAL_ARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_275__SFORMAL_ARGS.obj_num = 4;
- cdat->dobj_275__SFORMAL_ARGS.obj_hash = 270327497;
+ cdat->dobj_275__SFORMAL_ARGS.obj_hash = 854889715;
cdat->dobj_275__SFORMAL_ARGS.obj_len = 4;
@@ -9143,7 +9143,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_279__CLASS_SOURCE_DEFUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_279__CLASS_SOURCE_DEFUN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_279__CLASS_SOURCE_DEFUN.obj_hash = 6213887;
+ cdat->dobj_279__CLASS_SOURCE_DEFUN.obj_hash = 195984238;
cdat->dobj_279__CLASS_SOURCE_DEFUN.obj_len = 8;
@@ -9210,7 +9210,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_285__SFUN_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_285__SFUN_BODY.obj_num = 5;
- cdat->dobj_285__SFUN_BODY.obj_hash = 775952572;
+ cdat->dobj_285__SFUN_BODY.obj_hash = 393441594;
cdat->dobj_285__SFUN_BODY.obj_len = 4;
@@ -9268,7 +9268,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_289__CLASS_SOURCE_DEFPRIMITIVE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_289__CLASS_SOURCE_DEFPRIMITIVE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_289__CLASS_SOURCE_DEFPRIMITIVE.obj_hash = 1055603403;
+ cdat->dobj_289__CLASS_SOURCE_DEFPRIMITIVE.obj_hash = 999035002;
cdat->dobj_289__CLASS_SOURCE_DEFPRIMITIVE.obj_len = 8;
@@ -9335,7 +9335,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_295__SPRIM_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_295__SPRIM_TYPE.obj_num = 5;
- cdat->dobj_295__SPRIM_TYPE.obj_hash = 1031656895;
+ cdat->dobj_295__SPRIM_TYPE.obj_hash = 205952268;
cdat->dobj_295__SPRIM_TYPE.obj_len = 4;
@@ -9391,7 +9391,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_299__SPRIM_EXPANSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_299__SPRIM_EXPANSION.obj_num = 6;
- cdat->dobj_299__SPRIM_EXPANSION.obj_hash = 505871998;
+ cdat->dobj_299__SPRIM_EXPANSION.obj_hash = 939354690;
cdat->dobj_299__SPRIM_EXPANSION.obj_len = 4;
@@ -9452,7 +9452,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_303__CLASS_SOURCE_DEFCITERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_303__CLASS_SOURCE_DEFCITERATOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_303__CLASS_SOURCE_DEFCITERATOR.obj_hash = 523605343;
+ cdat->dobj_303__CLASS_SOURCE_DEFCITERATOR.obj_hash = 1044346926;
cdat->dobj_303__CLASS_SOURCE_DEFCITERATOR.obj_len = 8;
@@ -9523,7 +9523,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_309__SCITERDEF_CITERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_309__SCITERDEF_CITERATOR.obj_num = 5;
- cdat->dobj_309__SCITERDEF_CITERATOR.obj_hash = 529232995;
+ cdat->dobj_309__SCITERDEF_CITERATOR.obj_hash = 114925291;
cdat->dobj_309__SCITERDEF_CITERATOR.obj_len = 4;
@@ -9584,7 +9584,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_313__CLASS_SOURCE_DEFCMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_313__CLASS_SOURCE_DEFCMATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_313__CLASS_SOURCE_DEFCMATCHER.obj_hash = 699510253;
+ cdat->dobj_313__CLASS_SOURCE_DEFCMATCHER.obj_hash = 577849112;
cdat->dobj_313__CLASS_SOURCE_DEFCMATCHER.obj_len = 8;
@@ -9655,7 +9655,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_319__SCMATDEF_CMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_319__SCMATDEF_CMATCHER.obj_num = 5;
- cdat->dobj_319__SCMATDEF_CMATCHER.obj_hash = 364579405;
+ cdat->dobj_319__SCMATDEF_CMATCHER.obj_hash = 720289043;
cdat->dobj_319__SCMATDEF_CMATCHER.obj_len = 4;
@@ -9716,7 +9716,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_323__CLASS_SOURCE_DEFUNMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_323__CLASS_SOURCE_DEFUNMATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_323__CLASS_SOURCE_DEFUNMATCHER.obj_hash = 166318054;
+ cdat->dobj_323__CLASS_SOURCE_DEFUNMATCHER.obj_hash = 507694416;
cdat->dobj_323__CLASS_SOURCE_DEFUNMATCHER.obj_len = 8;
@@ -9786,7 +9786,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_329__SFUMATDEF_INS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_329__SFUMATDEF_INS.obj_num = 5;
- cdat->dobj_329__SFUMATDEF_INS.obj_hash = 808605142;
+ cdat->dobj_329__SFUMATDEF_INS.obj_hash = 618382615;
cdat->dobj_329__SFUMATDEF_INS.obj_len = 4;
@@ -9844,7 +9844,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_333__SFUMATDEF_OUTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_333__SFUMATDEF_OUTS.obj_num = 6;
- cdat->dobj_333__SFUMATDEF_OUTS.obj_hash = 979040408;
+ cdat->dobj_333__SFUMATDEF_OUTS.obj_hash = 258535002;
cdat->dobj_333__SFUMATDEF_OUTS.obj_len = 4;
@@ -9903,7 +9903,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_337__SFUMATDEF_MATCHF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_337__SFUMATDEF_MATCHF.obj_num = 7;
- cdat->dobj_337__SFUMATDEF_MATCHF.obj_hash = 178471189;
+ cdat->dobj_337__SFUMATDEF_MATCHF.obj_hash = 910288361;
cdat->dobj_337__SFUMATDEF_MATCHF.obj_len = 4;
@@ -9962,7 +9962,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_341__SFUMATDEF_APPLYF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_341__SFUMATDEF_APPLYF.obj_num = 8;
- cdat->dobj_341__SFUMATDEF_APPLYF.obj_hash = 77726677;
+ cdat->dobj_341__SFUMATDEF_APPLYF.obj_hash = 1037887468;
cdat->dobj_341__SFUMATDEF_APPLYF.obj_len = 4;
@@ -10021,7 +10021,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_345__SFUMATDEF_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_345__SFUMATDEF_DATA.obj_num = 9;
- cdat->dobj_345__SFUMATDEF_DATA.obj_hash = 109976669;
+ cdat->dobj_345__SFUMATDEF_DATA.obj_hash = 40081722;
cdat->dobj_345__SFUMATDEF_DATA.obj_len = 4;
@@ -10082,7 +10082,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_349__CLASS_SOURCE_DEFOBJCOMMON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_349__CLASS_SOURCE_DEFOBJCOMMON.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_349__CLASS_SOURCE_DEFOBJCOMMON.obj_hash = 846543192;
+ cdat->dobj_349__CLASS_SOURCE_DEFOBJCOMMON.obj_hash = 534784044;
cdat->dobj_349__CLASS_SOURCE_DEFOBJCOMMON.obj_len = 8;
@@ -10150,7 +10150,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_355__SOBJ_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_355__SOBJ_PREDEF.obj_num = 4;
- cdat->dobj_355__SOBJ_PREDEF.obj_hash = 533660491;
+ cdat->dobj_355__SOBJ_PREDEF.obj_hash = 698194906;
cdat->dobj_355__SOBJ_PREDEF.obj_len = 4;
@@ -10209,7 +10209,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_359__CLASS_SOURCE_DEFCLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_359__CLASS_SOURCE_DEFCLASS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_359__CLASS_SOURCE_DEFCLASS.obj_hash = 342114907;
+ cdat->dobj_359__CLASS_SOURCE_DEFCLASS.obj_hash = 303641525;
cdat->dobj_359__CLASS_SOURCE_DEFCLASS.obj_len = 8;
@@ -10280,7 +10280,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_365__SCLASS_CLABIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_365__SCLASS_CLABIND.obj_num = 5;
- cdat->dobj_365__SCLASS_CLABIND.obj_hash = 323584623;
+ cdat->dobj_365__SCLASS_CLABIND.obj_hash = 279412507;
cdat->dobj_365__SCLASS_CLABIND.obj_len = 4;
@@ -10339,7 +10339,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_369__SCLASS_SUPERBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_369__SCLASS_SUPERBIND.obj_num = 6;
- cdat->dobj_369__SCLASS_SUPERBIND.obj_hash = 183819560;
+ cdat->dobj_369__SCLASS_SUPERBIND.obj_hash = 122638502;
cdat->dobj_369__SCLASS_SUPERBIND.obj_len = 4;
@@ -10398,7 +10398,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_373__SCLASS_FLDBINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_373__SCLASS_FLDBINDS.obj_num = 7;
- cdat->dobj_373__SCLASS_FLDBINDS.obj_hash = 875139003;
+ cdat->dobj_373__SCLASS_FLDBINDS.obj_hash = 150522913;
cdat->dobj_373__SCLASS_FLDBINDS.obj_len = 4;
@@ -10459,7 +10459,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_377__CLASS_SOURCE_DEFINSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_377__CLASS_SOURCE_DEFINSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_377__CLASS_SOURCE_DEFINSTANCE.obj_hash = 148894793;
+ cdat->dobj_377__CLASS_SOURCE_DEFINSTANCE.obj_hash = 158294176;
cdat->dobj_377__CLASS_SOURCE_DEFINSTANCE.obj_len = 8;
@@ -10527,7 +10527,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_383__SINST_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_383__SINST_CLASS.obj_num = 5;
- cdat->dobj_383__SINST_CLASS.obj_hash = 1054184869;
+ cdat->dobj_383__SINST_CLASS.obj_hash = 718530085;
cdat->dobj_383__SINST_CLASS.obj_len = 4;
@@ -10583,7 +10583,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_387__SINST_CLABIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_387__SINST_CLABIND.obj_num = 6;
- cdat->dobj_387__SINST_CLABIND.obj_hash = 798604868;
+ cdat->dobj_387__SINST_CLABIND.obj_hash = 860482712;
cdat->dobj_387__SINST_CLABIND.obj_len = 4;
@@ -10639,7 +10639,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_391__SINST_OBJNUM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_391__SINST_OBJNUM.obj_num = 7;
- cdat->dobj_391__SINST_OBJNUM.obj_hash = 149066449;
+ cdat->dobj_391__SINST_OBJNUM.obj_hash = 119686881;
cdat->dobj_391__SINST_OBJNUM.obj_len = 4;
@@ -10695,7 +10695,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_395__SINST_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_395__SINST_FIELDS.obj_num = 8;
- cdat->dobj_395__SINST_FIELDS.obj_hash = 1072315227;
+ cdat->dobj_395__SINST_FIELDS.obj_hash = 86094257;
cdat->dobj_395__SINST_FIELDS.obj_len = 4;
@@ -10755,7 +10755,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_399__CLASS_SOURCE_DEFSELECTOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_399__CLASS_SOURCE_DEFSELECTOR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_399__CLASS_SOURCE_DEFSELECTOR.obj_hash = 656098247;
+ cdat->dobj_399__CLASS_SOURCE_DEFSELECTOR.obj_hash = 1071146290;
cdat->dobj_399__CLASS_SOURCE_DEFSELECTOR.obj_len = 8;
@@ -10826,7 +10826,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_405__SDEFSEL_FORMALS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_405__SDEFSEL_FORMALS.obj_num = 9;
- cdat->dobj_405__SDEFSEL_FORMALS.obj_hash = 853632553;
+ cdat->dobj_405__SDEFSEL_FORMALS.obj_hash = 299116650;
cdat->dobj_405__SDEFSEL_FORMALS.obj_len = 4;
@@ -10887,7 +10887,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_409__CLASS_SOURCE_FIELDASSIGN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_409__CLASS_SOURCE_FIELDASSIGN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_409__CLASS_SOURCE_FIELDASSIGN.obj_hash = 90709039;
+ cdat->dobj_409__CLASS_SOURCE_FIELDASSIGN.obj_hash = 690612641;
cdat->dobj_409__CLASS_SOURCE_FIELDASSIGN.obj_len = 8;
@@ -10954,7 +10954,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_415__SFLA_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_415__SFLA_FIELD.obj_num = 2;
- cdat->dobj_415__SFLA_FIELD.obj_hash = 1023285659;
+ cdat->dobj_415__SFLA_FIELD.obj_hash = 848394366;
cdat->dobj_415__SFLA_FIELD.obj_len = 4;
@@ -11006,7 +11006,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_419__SFLA_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_419__SFLA_EXPR.obj_num = 3;
- cdat->dobj_419__SFLA_EXPR.obj_hash = 373824894;
+ cdat->dobj_419__SFLA_EXPR.obj_hash = 457297921;
cdat->dobj_419__SFLA_EXPR.obj_len = 4;
@@ -11064,7 +11064,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_423__CLASS_SOURCE_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_423__CLASS_SOURCE_INSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_423__CLASS_SOURCE_INSTANCE.obj_hash = 871886415;
+ cdat->dobj_423__CLASS_SOURCE_INSTANCE.obj_hash = 117577518;
cdat->dobj_423__CLASS_SOURCE_INSTANCE.obj_len = 8;
@@ -11132,7 +11132,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_429__SMINS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_429__SMINS_CLASS.obj_num = 2;
- cdat->dobj_429__SMINS_CLASS.obj_hash = 133988329;
+ cdat->dobj_429__SMINS_CLASS.obj_hash = 704502857;
cdat->dobj_429__SMINS_CLASS.obj_len = 4;
@@ -11188,7 +11188,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_433__SMINS_CLABIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_433__SMINS_CLABIND.obj_num = 3;
- cdat->dobj_433__SMINS_CLABIND.obj_hash = 285489089;
+ cdat->dobj_433__SMINS_CLABIND.obj_hash = 679255160;
cdat->dobj_433__SMINS_CLABIND.obj_len = 4;
@@ -11244,7 +11244,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_437__SMINS_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_437__SMINS_FIELDS.obj_num = 4;
- cdat->dobj_437__SMINS_FIELDS.obj_hash = 73039567;
+ cdat->dobj_437__SMINS_FIELDS.obj_hash = 1061212872;
cdat->dobj_437__SMINS_FIELDS.obj_len = 4;
@@ -11304,7 +11304,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_441__CLASS_SOURCE_GET_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_441__CLASS_SOURCE_GET_FIELD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_441__CLASS_SOURCE_GET_FIELD.obj_hash = 815324192;
+ cdat->dobj_441__CLASS_SOURCE_GET_FIELD.obj_hash = 384050362;
cdat->dobj_441__CLASS_SOURCE_GET_FIELD.obj_len = 8;
@@ -11371,7 +11371,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_447__SUGET_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_447__SUGET_OBJ.obj_num = 2;
- cdat->dobj_447__SUGET_OBJ.obj_hash = 584985283;
+ cdat->dobj_447__SUGET_OBJ.obj_hash = 1008057684;
cdat->dobj_447__SUGET_OBJ.obj_len = 4;
@@ -11424,7 +11424,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_451__SUGET_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_451__SUGET_FIELD.obj_num = 3;
- cdat->dobj_451__SUGET_FIELD.obj_hash = 439491317;
+ cdat->dobj_451__SUGET_FIELD.obj_hash = 190419354;
cdat->dobj_451__SUGET_FIELD.obj_len = 4;
@@ -11483,7 +11483,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_455__CLASS_SOURCE_UNSAFE_GET_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_455__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_455__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_hash = 551242283;
+ cdat->dobj_455__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_hash = 266540146;
cdat->dobj_455__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_len = 8;
@@ -11556,7 +11556,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_461__CLASS_SOURCE_PUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_461__CLASS_SOURCE_PUT_FIELDS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_461__CLASS_SOURCE_PUT_FIELDS.obj_hash = 331265479;
+ cdat->dobj_461__CLASS_SOURCE_PUT_FIELDS.obj_hash = 119917699;
cdat->dobj_461__CLASS_SOURCE_PUT_FIELDS.obj_len = 8;
@@ -11623,7 +11623,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_467__SUPUT_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_467__SUPUT_OBJ.obj_num = 2;
- cdat->dobj_467__SUPUT_OBJ.obj_hash = 735413127;
+ cdat->dobj_467__SUPUT_OBJ.obj_hash = 523576066;
cdat->dobj_467__SUPUT_OBJ.obj_len = 4;
@@ -11677,7 +11677,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_471__SUPUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_471__SUPUT_FIELDS.obj_num = 3;
- cdat->dobj_471__SUPUT_FIELDS.obj_hash = 946610779;
+ cdat->dobj_471__SUPUT_FIELDS.obj_hash = 143829156;
cdat->dobj_471__SUPUT_FIELDS.obj_len = 4;
@@ -11737,7 +11737,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_475__CLASS_SOURCE_UNSAFE_PUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_475__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_475__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_hash = 572952037;
+ cdat->dobj_475__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_hash = 853778886;
cdat->dobj_475__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_len = 8;
@@ -11808,7 +11808,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_481__CLASS_SOURCE_IF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_481__CLASS_SOURCE_IF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_481__CLASS_SOURCE_IF.obj_hash = 1040984262;
+ cdat->dobj_481__CLASS_SOURCE_IF.obj_hash = 842097284;
cdat->dobj_481__CLASS_SOURCE_IF.obj_len = 8;
@@ -11875,7 +11875,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_487__SIF_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_487__SIF_TEST.obj_num = 2;
- cdat->dobj_487__SIF_TEST.obj_hash = 701112730;
+ cdat->dobj_487__SIF_TEST.obj_hash = 509336220;
cdat->dobj_487__SIF_TEST.obj_len = 4;
@@ -11927,7 +11927,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_491__SIF_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_491__SIF_THEN.obj_num = 3;
- cdat->dobj_491__SIF_THEN.obj_hash = 457661069;
+ cdat->dobj_491__SIF_THEN.obj_hash = 539778437;
cdat->dobj_491__SIF_THEN.obj_len = 4;
@@ -11983,7 +11983,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_495__CLASS_SOURCE_IFELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_495__CLASS_SOURCE_IFELSE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_495__CLASS_SOURCE_IFELSE.obj_hash = 263441949;
+ cdat->dobj_495__CLASS_SOURCE_IFELSE.obj_hash = 665060233;
cdat->dobj_495__CLASS_SOURCE_IFELSE.obj_len = 8;
@@ -12050,7 +12050,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_501__SIF_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_501__SIF_ELSE.obj_num = 4;
- cdat->dobj_501__SIF_ELSE.obj_hash = 202937780;
+ cdat->dobj_501__SIF_ELSE.obj_hash = 893482853;
cdat->dobj_501__SIF_ELSE.obj_len = 4;
@@ -12106,7 +12106,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_505__CLASS_SOURCE_OR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_505__CLASS_SOURCE_OR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_505__CLASS_SOURCE_OR.obj_hash = 1040263063;
+ cdat->dobj_505__CLASS_SOURCE_OR.obj_hash = 722638011;
cdat->dobj_505__CLASS_SOURCE_OR.obj_len = 8;
@@ -12173,7 +12173,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_511__SOR_DISJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_511__SOR_DISJ.obj_num = 2;
- cdat->dobj_511__SOR_DISJ.obj_hash = 50188907;
+ cdat->dobj_511__SOR_DISJ.obj_hash = 129832467;
cdat->dobj_511__SOR_DISJ.obj_len = 4;
@@ -12229,7 +12229,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_515__CLASS_SOURCE_CPPIF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_515__CLASS_SOURCE_CPPIF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_515__CLASS_SOURCE_CPPIF.obj_hash = 444203393;
+ cdat->dobj_515__CLASS_SOURCE_CPPIF.obj_hash = 482295681;
cdat->dobj_515__CLASS_SOURCE_CPPIF.obj_len = 8;
@@ -12296,7 +12296,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_521__SIFP_COND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_521__SIFP_COND.obj_num = 2;
- cdat->dobj_521__SIFP_COND.obj_hash = 22771304;
+ cdat->dobj_521__SIFP_COND.obj_hash = 374059778;
cdat->dobj_521__SIFP_COND.obj_len = 4;
@@ -12348,7 +12348,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_525__SIFP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_525__SIFP_THEN.obj_num = 3;
- cdat->dobj_525__SIFP_THEN.obj_hash = 994268701;
+ cdat->dobj_525__SIFP_THEN.obj_hash = 447492269;
cdat->dobj_525__SIFP_THEN.obj_len = 4;
@@ -12400,7 +12400,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_529__SIFP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_529__SIFP_ELSE.obj_num = 4;
- cdat->dobj_529__SIFP_ELSE.obj_hash = 201271613;
+ cdat->dobj_529__SIFP_ELSE.obj_hash = 64989644;
cdat->dobj_529__SIFP_ELSE.obj_len = 4;
@@ -12456,7 +12456,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_533__CLASS_SOURCE_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_533__CLASS_SOURCE_MATCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_533__CLASS_SOURCE_MATCH.obj_hash = 209634117;
+ cdat->dobj_533__CLASS_SOURCE_MATCH.obj_hash = 977908215;
cdat->dobj_533__CLASS_SOURCE_MATCH.obj_len = 8;
@@ -12526,7 +12526,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_539__SMAT_MATCHEDX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_539__SMAT_MATCHEDX.obj_num = 2;
- cdat->dobj_539__SMAT_MATCHEDX.obj_hash = 289110053;
+ cdat->dobj_539__SMAT_MATCHEDX.obj_hash = 520537209;
cdat->dobj_539__SMAT_MATCHEDX.obj_len = 4;
@@ -12580,7 +12580,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_543__SMAT_CASES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_543__SMAT_CASES.obj_num = 3;
- cdat->dobj_543__SMAT_CASES.obj_hash = 712151965;
+ cdat->dobj_543__SMAT_CASES.obj_hash = 654990682;
cdat->dobj_543__SMAT_CASES.obj_len = 4;
@@ -12638,7 +12638,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_547__CLASS_SOURCE_MATCH_CASE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_547__CLASS_SOURCE_MATCH_CASE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_547__CLASS_SOURCE_MATCH_CASE.obj_hash = 1018389237;
+ cdat->dobj_547__CLASS_SOURCE_MATCH_CASE.obj_hash = 926341594;
cdat->dobj_547__CLASS_SOURCE_MATCH_CASE.obj_len = 8;
@@ -12705,7 +12705,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_553__SCAM_PATT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_553__SCAM_PATT.obj_num = 2;
- cdat->dobj_553__SCAM_PATT.obj_hash = 483472119;
+ cdat->dobj_553__SCAM_PATT.obj_hash = 786190710;
cdat->dobj_553__SCAM_PATT.obj_len = 4;
@@ -12757,7 +12757,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_557__SCAM_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_557__SCAM_BODY.obj_num = 3;
- cdat->dobj_557__SCAM_BODY.obj_hash = 650711062;
+ cdat->dobj_557__SCAM_BODY.obj_hash = 734806501;
cdat->dobj_557__SCAM_BODY.obj_len = 4;
@@ -12815,7 +12815,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_561__CLASS_SOURCE_LET_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_561__CLASS_SOURCE_LET_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_561__CLASS_SOURCE_LET_BINDING.obj_hash = 203943869;
+ cdat->dobj_561__CLASS_SOURCE_LET_BINDING.obj_hash = 832422524;
cdat->dobj_561__CLASS_SOURCE_LET_BINDING.obj_len = 8;
@@ -12882,7 +12882,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_567__SLETB_TYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_567__SLETB_TYPE.obj_num = 2;
- cdat->dobj_567__SLETB_TYPE.obj_hash = 268111995;
+ cdat->dobj_567__SLETB_TYPE.obj_hash = 863693806;
cdat->dobj_567__SLETB_TYPE.obj_len = 4;
@@ -12936,7 +12936,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_571__SLETB_BINDER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_571__SLETB_BINDER.obj_num = 3;
- cdat->dobj_571__SLETB_BINDER.obj_hash = 589134544;
+ cdat->dobj_571__SLETB_BINDER.obj_hash = 110947319;
cdat->dobj_571__SLETB_BINDER.obj_len = 4;
@@ -12990,7 +12990,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_575__SLETB_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_575__SLETB_EXPR.obj_num = 4;
- cdat->dobj_575__SLETB_EXPR.obj_hash = 788875106;
+ cdat->dobj_575__SLETB_EXPR.obj_hash = 908430808;
cdat->dobj_575__SLETB_EXPR.obj_len = 4;
@@ -13048,7 +13048,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_579__CLASS_SOURCE_LETREC_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_579__CLASS_SOURCE_LETREC_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_579__CLASS_SOURCE_LETREC_BINDING.obj_hash = 501569761;
+ cdat->dobj_579__CLASS_SOURCE_LETREC_BINDING.obj_hash = 696359606;
cdat->dobj_579__CLASS_SOURCE_LETREC_BINDING.obj_len = 8;
@@ -13119,7 +13119,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_585__CLASS_SOURCE_LET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_585__CLASS_SOURCE_LET.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_585__CLASS_SOURCE_LET.obj_hash = 1021549486;
+ cdat->dobj_585__CLASS_SOURCE_LET.obj_hash = 555707160;
cdat->dobj_585__CLASS_SOURCE_LET.obj_len = 8;
@@ -13189,7 +13189,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_591__SLET_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_591__SLET_BINDINGS.obj_num = 2;
- cdat->dobj_591__SLET_BINDINGS.obj_hash = 772221282;
+ cdat->dobj_591__SLET_BINDINGS.obj_hash = 503689705;
cdat->dobj_591__SLET_BINDINGS.obj_len = 4;
@@ -13243,7 +13243,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_595__SLET_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_595__SLET_BODY.obj_num = 3;
- cdat->dobj_595__SLET_BODY.obj_hash = 672629479;
+ cdat->dobj_595__SLET_BODY.obj_hash = 345098903;
cdat->dobj_595__SLET_BODY.obj_len = 4;
@@ -13299,7 +13299,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_599__CLASS_SOURCE_LETREC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_599__CLASS_SOURCE_LETREC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_599__CLASS_SOURCE_LETREC.obj_hash = 703607725;
+ cdat->dobj_599__CLASS_SOURCE_LETREC.obj_hash = 519690605;
cdat->dobj_599__CLASS_SOURCE_LETREC.obj_len = 8;
@@ -13370,7 +13370,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_605__CLASS_SOURCE_LAMBDA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_605__CLASS_SOURCE_LAMBDA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_605__CLASS_SOURCE_LAMBDA.obj_hash = 703587044;
+ cdat->dobj_605__CLASS_SOURCE_LAMBDA.obj_hash = 626289868;
cdat->dobj_605__CLASS_SOURCE_LAMBDA.obj_len = 8;
@@ -13439,7 +13439,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_611__SLAM_ARGBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_611__SLAM_ARGBIND.obj_num = 2;
- cdat->dobj_611__SLAM_ARGBIND.obj_hash = 980032038;
+ cdat->dobj_611__SLAM_ARGBIND.obj_hash = 768752361;
cdat->dobj_611__SLAM_ARGBIND.obj_len = 4;
@@ -13493,7 +13493,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_615__SLAM_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_615__SLAM_BODY.obj_num = 3;
- cdat->dobj_615__SLAM_BODY.obj_hash = 417911111;
+ cdat->dobj_615__SLAM_BODY.obj_hash = 775752978;
cdat->dobj_615__SLAM_BODY.obj_len = 4;
@@ -13551,7 +13551,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_619__CLASS_SOURCE_IFVARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_619__CLASS_SOURCE_IFVARIADIC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_619__CLASS_SOURCE_IFVARIADIC.obj_hash = 237078128;
+ cdat->dobj_619__CLASS_SOURCE_IFVARIADIC.obj_hash = 930359515;
cdat->dobj_619__CLASS_SOURCE_IFVARIADIC.obj_len = 8;
@@ -13622,7 +13622,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_625__SIFVARIADIC_ARGBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_625__SIFVARIADIC_ARGBIND.obj_num = 2;
- cdat->dobj_625__SIFVARIADIC_ARGBIND.obj_hash = 10159089;
+ cdat->dobj_625__SIFVARIADIC_ARGBIND.obj_hash = 788106487;
cdat->dobj_625__SIFVARIADIC_ARGBIND.obj_len = 4;
@@ -13681,7 +13681,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_629__SIFVARIADIC_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_629__SIFVARIADIC_THEN.obj_num = 3;
- cdat->dobj_629__SIFVARIADIC_THEN.obj_hash = 792235324;
+ cdat->dobj_629__SIFVARIADIC_THEN.obj_hash = 999261840;
cdat->dobj_629__SIFVARIADIC_THEN.obj_len = 4;
@@ -13740,7 +13740,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_633__SIFVARIADIC_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_633__SIFVARIADIC_ELSE.obj_num = 4;
- cdat->dobj_633__SIFVARIADIC_ELSE.obj_hash = 485691946;
+ cdat->dobj_633__SIFVARIADIC_ELSE.obj_hash = 241916912;
cdat->dobj_633__SIFVARIADIC_ELSE.obj_len = 4;
@@ -13801,7 +13801,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_637__CLASS_SOURCE_MULTICALL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_637__CLASS_SOURCE_MULTICALL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_637__CLASS_SOURCE_MULTICALL.obj_hash = 1026422379;
+ cdat->dobj_637__CLASS_SOURCE_MULTICALL.obj_hash = 304778261;
cdat->dobj_637__CLASS_SOURCE_MULTICALL.obj_len = 8;
@@ -13871,7 +13871,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_643__SMULC_RESBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_643__SMULC_RESBIND.obj_num = 2;
- cdat->dobj_643__SMULC_RESBIND.obj_hash = 662914500;
+ cdat->dobj_643__SMULC_RESBIND.obj_hash = 925077070;
cdat->dobj_643__SMULC_RESBIND.obj_len = 4;
@@ -13925,7 +13925,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_647__SMULC_CALL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_647__SMULC_CALL.obj_num = 3;
- cdat->dobj_647__SMULC_CALL.obj_hash = 564263387;
+ cdat->dobj_647__SMULC_CALL.obj_hash = 720483980;
cdat->dobj_647__SMULC_CALL.obj_len = 4;
@@ -13977,7 +13977,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_651__SMULC_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_651__SMULC_BODY.obj_num = 4;
- cdat->dobj_651__SMULC_BODY.obj_hash = 928871705;
+ cdat->dobj_651__SMULC_BODY.obj_hash = 477292807;
cdat->dobj_651__SMULC_BODY.obj_len = 4;
@@ -14035,7 +14035,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_655__CLASS_SOURCE_LABELLED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_655__CLASS_SOURCE_LABELLED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_655__CLASS_SOURCE_LABELLED.obj_hash = 679921786;
+ cdat->dobj_655__CLASS_SOURCE_LABELLED.obj_hash = 861993913;
cdat->dobj_655__CLASS_SOURCE_LABELLED.obj_len = 8;
@@ -14103,7 +14103,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_661__SLABEL_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_661__SLABEL_BIND.obj_num = 2;
- cdat->dobj_661__SLABEL_BIND.obj_hash = 994903419;
+ cdat->dobj_661__SLABEL_BIND.obj_hash = 503974415;
cdat->dobj_661__SLABEL_BIND.obj_len = 4;
@@ -14160,7 +14160,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_665__CLASS_SOURCE_FOREVER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_665__CLASS_SOURCE_FOREVER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_665__CLASS_SOURCE_FOREVER.obj_hash = 572043374;
+ cdat->dobj_665__CLASS_SOURCE_FOREVER.obj_hash = 123175905;
cdat->dobj_665__CLASS_SOURCE_FOREVER.obj_len = 8;
@@ -14227,7 +14227,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_671__SFRV_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_671__SFRV_BODY.obj_num = 3;
- cdat->dobj_671__SFRV_BODY.obj_hash = 295286112;
+ cdat->dobj_671__SFRV_BODY.obj_hash = 789951024;
cdat->dobj_671__SFRV_BODY.obj_len = 4;
@@ -14283,7 +14283,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_675__CLASS_SOURCE_AGAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_675__CLASS_SOURCE_AGAIN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_675__CLASS_SOURCE_AGAIN.obj_hash = 336637428;
+ cdat->dobj_675__CLASS_SOURCE_AGAIN.obj_hash = 481576420;
cdat->dobj_675__CLASS_SOURCE_AGAIN.obj_len = 8;
@@ -14354,7 +14354,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_681__CLASS_SOURCE_EXIT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_681__CLASS_SOURCE_EXIT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_681__CLASS_SOURCE_EXIT.obj_hash = 886887030;
+ cdat->dobj_681__CLASS_SOURCE_EXIT.obj_hash = 1021880680;
cdat->dobj_681__CLASS_SOURCE_EXIT.obj_len = 8;
@@ -14421,7 +14421,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_687__SEXI_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_687__SEXI_BODY.obj_num = 3;
- cdat->dobj_687__SEXI_BODY.obj_hash = 94165574;
+ cdat->dobj_687__SEXI_BODY.obj_hash = 100706129;
cdat->dobj_687__SEXI_BODY.obj_len = 4;
@@ -14479,7 +14479,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_691__CLASS_SOURCE_COMPILEWARNING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_691__CLASS_SOURCE_COMPILEWARNING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_691__CLASS_SOURCE_COMPILEWARNING.obj_hash = 91444262;
+ cdat->dobj_691__CLASS_SOURCE_COMPILEWARNING.obj_hash = 367424600;
cdat->dobj_691__CLASS_SOURCE_COMPILEWARNING.obj_len = 8;
@@ -14546,7 +14546,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_697__SCWARN_MSG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_697__SCWARN_MSG.obj_num = 2;
- cdat->dobj_697__SCWARN_MSG.obj_hash = 318386971;
+ cdat->dobj_697__SCWARN_MSG.obj_hash = 461922157;
cdat->dobj_697__SCWARN_MSG.obj_len = 4;
@@ -14599,7 +14599,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_701__SCWARN_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_701__SCWARN_EXPR.obj_num = 3;
- cdat->dobj_701__SCWARN_EXPR.obj_hash = 911933002;
+ cdat->dobj_701__SCWARN_EXPR.obj_hash = 114573886;
cdat->dobj_701__SCWARN_EXPR.obj_len = 4;
@@ -14667,7 +14667,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_705__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_705__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.obj_hash =
- 973042268;
+ 173024242;
cdat->dobj_705__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.obj_len =
8;
@@ -14739,7 +14739,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_711__CMEC_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_711__CMEC_COMMENT.obj_num = 2;
- cdat->dobj_711__CMEC_COMMENT.obj_hash = 499321307;
+ cdat->dobj_711__CMEC_COMMENT.obj_hash = 899155945;
cdat->dobj_711__CMEC_COMMENT.obj_len = 4;
@@ -14801,7 +14801,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_715__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_715__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_hash = 311855945;
+ cdat->dobj_715__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_hash = 776421;
cdat->dobj_715__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_len = 8;
@@ -14883,7 +14883,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_721__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_num = MELTOBMAG_OBJECT;
cdat->dobj_721__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
- obj_hash = 472595252;
+ obj_hash = 119006455;
cdat->dobj_721__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 8;
@@ -14960,7 +14960,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_727__SUCME_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_727__SUCME_COMMENT.obj_num = 2;
- cdat->dobj_727__SUCME_COMMENT.obj_hash = 628260630;
+ cdat->dobj_727__SUCME_COMMENT.obj_hash = 10597965;
cdat->dobj_727__SUCME_COMMENT.obj_len = 4;
@@ -15020,7 +15020,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_731__CLASS_SOURCE_FETCH_PREDEFINED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_731__CLASS_SOURCE_FETCH_PREDEFINED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_731__CLASS_SOURCE_FETCH_PREDEFINED.obj_hash = 438854355;
+ cdat->dobj_731__CLASS_SOURCE_FETCH_PREDEFINED.obj_hash = 710255612;
cdat->dobj_731__CLASS_SOURCE_FETCH_PREDEFINED.obj_len = 8;
@@ -15089,7 +15089,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_737__SFEPD_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_737__SFEPD_PREDEF.obj_num = 2;
- cdat->dobj_737__SFEPD_PREDEF.obj_hash = 1028520588;
+ cdat->dobj_737__SFEPD_PREDEF.obj_hash = 245291434;
cdat->dobj_737__SFEPD_PREDEF.obj_len = 4;
@@ -15149,7 +15149,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_741__CLASS_SOURCE_STORE_PREDEFINED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_741__CLASS_SOURCE_STORE_PREDEFINED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_741__CLASS_SOURCE_STORE_PREDEFINED.obj_hash = 28192605;
+ cdat->dobj_741__CLASS_SOURCE_STORE_PREDEFINED.obj_hash = 1051995606;
cdat->dobj_741__CLASS_SOURCE_STORE_PREDEFINED.obj_len = 8;
@@ -15218,7 +15218,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_747__SSTPD_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_747__SSTPD_PREDEF.obj_num = 2;
- cdat->dobj_747__SSTPD_PREDEF.obj_hash = 28990417;
+ cdat->dobj_747__SSTPD_PREDEF.obj_hash = 266363499;
cdat->dobj_747__SSTPD_PREDEF.obj_len = 4;
@@ -15273,7 +15273,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_751__SSTPD_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_751__SSTPD_VALUE.obj_num = 3;
- cdat->dobj_751__SSTPD_VALUE.obj_hash = 117214788;
+ cdat->dobj_751__SSTPD_VALUE.obj_hash = 382358542;
cdat->dobj_751__SSTPD_VALUE.obj_len = 4;
@@ -15332,7 +15332,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_755__CLASS_SOURCE_CODECHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_755__CLASS_SOURCE_CODECHUNK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_755__CLASS_SOURCE_CODECHUNK.obj_hash = 589202882;
+ cdat->dobj_755__CLASS_SOURCE_CODECHUNK.obj_hash = 1063321260;
cdat->dobj_755__CLASS_SOURCE_CODECHUNK.obj_len = 8;
@@ -15399,7 +15399,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_761__SCH_GENSYM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_761__SCH_GENSYM.obj_num = 2;
- cdat->dobj_761__SCH_GENSYM.obj_hash = 285493878;
+ cdat->dobj_761__SCH_GENSYM.obj_hash = 735515728;
cdat->dobj_761__SCH_GENSYM.obj_len = 4;
@@ -15451,7 +15451,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_765__SCH_CHUNKS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_765__SCH_CHUNKS.obj_num = 3;
- cdat->dobj_765__SCH_CHUNKS.obj_hash = 920268740;
+ cdat->dobj_765__SCH_CHUNKS.obj_hash = 931441608;
cdat->dobj_765__SCH_CHUNKS.obj_len = 4;
@@ -15507,7 +15507,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_769__CLASS_SOURCE_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_769__CLASS_SOURCE_PATTERN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_769__CLASS_SOURCE_PATTERN.obj_hash = 419147679;
+ cdat->dobj_769__CLASS_SOURCE_PATTERN.obj_hash = 585085440;
cdat->dobj_769__CLASS_SOURCE_PATTERN.obj_len = 8;
@@ -15574,7 +15574,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_775__PAT_WEIGHT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_775__PAT_WEIGHT.obj_num = 2;
- cdat->dobj_775__PAT_WEIGHT.obj_hash = 72090861;
+ cdat->dobj_775__PAT_WEIGHT.obj_hash = 643251905;
cdat->dobj_775__PAT_WEIGHT.obj_len = 4;
@@ -15632,7 +15632,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_779__CLASS_SOURCE_PATTERN_OR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_779__CLASS_SOURCE_PATTERN_OR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_779__CLASS_SOURCE_PATTERN_OR.obj_hash = 713510148;
+ cdat->dobj_779__CLASS_SOURCE_PATTERN_OR.obj_hash = 858216733;
cdat->dobj_779__CLASS_SOURCE_PATTERN_OR.obj_len = 8;
@@ -15699,7 +15699,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_785__ORPAT_DISJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_785__ORPAT_DISJ.obj_num = 3;
- cdat->dobj_785__ORPAT_DISJ.obj_hash = 364825112;
+ cdat->dobj_785__ORPAT_DISJ.obj_hash = 895112407;
cdat->dobj_785__ORPAT_DISJ.obj_len = 4;
@@ -15757,7 +15757,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_789__CLASS_SOURCE_PATTERN_AND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_789__CLASS_SOURCE_PATTERN_AND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_789__CLASS_SOURCE_PATTERN_AND.obj_hash = 182280497;
+ cdat->dobj_789__CLASS_SOURCE_PATTERN_AND.obj_hash = 910558764;
cdat->dobj_789__CLASS_SOURCE_PATTERN_AND.obj_len = 8;
@@ -15825,7 +15825,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_795__ANDPAT_CONJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_795__ANDPAT_CONJ.obj_num = 3;
- cdat->dobj_795__ANDPAT_CONJ.obj_hash = 235446908;
+ cdat->dobj_795__ANDPAT_CONJ.obj_hash = 667907332;
cdat->dobj_795__ANDPAT_CONJ.obj_len = 4;
@@ -15884,7 +15884,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_799__CLASS_SOURCE_PATTERN_WHEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_799__CLASS_SOURCE_PATTERN_WHEN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_799__CLASS_SOURCE_PATTERN_WHEN.obj_hash = 33478684;
+ cdat->dobj_799__CLASS_SOURCE_PATTERN_WHEN.obj_hash = 17773983;
cdat->dobj_799__CLASS_SOURCE_PATTERN_WHEN.obj_len = 8;
@@ -15955,7 +15955,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_805__WHENPAT_SUBPAT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_805__WHENPAT_SUBPAT.obj_num = 3;
- cdat->dobj_805__WHENPAT_SUBPAT.obj_hash = 928135361;
+ cdat->dobj_805__WHENPAT_SUBPAT.obj_hash = 240530676;
cdat->dobj_805__WHENPAT_SUBPAT.obj_len = 4;
@@ -16012,7 +16012,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_809__WHENPAT_COND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_809__WHENPAT_COND.obj_num = 4;
- cdat->dobj_809__WHENPAT_COND.obj_hash = 203743055;
+ cdat->dobj_809__WHENPAT_COND.obj_hash = 757103232;
cdat->dobj_809__WHENPAT_COND.obj_len = 4;
@@ -16072,7 +16072,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_813__CLASS_SOURCE_PATTERN_VARIABLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_813__CLASS_SOURCE_PATTERN_VARIABLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_813__CLASS_SOURCE_PATTERN_VARIABLE.obj_hash = 238719935;
+ cdat->dobj_813__CLASS_SOURCE_PATTERN_VARIABLE.obj_hash = 214343604;
cdat->dobj_813__CLASS_SOURCE_PATTERN_VARIABLE.obj_len = 8;
@@ -16141,7 +16141,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_819__SPATVAR_SYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_819__SPATVAR_SYMB.obj_num = 3;
- cdat->dobj_819__SPATVAR_SYMB.obj_hash = 826931219;
+ cdat->dobj_819__SPATVAR_SYMB.obj_hash = 624802280;
cdat->dobj_819__SPATVAR_SYMB.obj_len = 4;
@@ -16198,7 +16198,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_823__SPATVAR_NBOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_823__SPATVAR_NBOCC.obj_num = 4;
- cdat->dobj_823__SPATVAR_NBOCC.obj_hash = 586991451;
+ cdat->dobj_823__SPATVAR_NBOCC.obj_hash = 520605219;
cdat->dobj_823__SPATVAR_NBOCC.obj_len = 4;
@@ -16286,7 +16286,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_829__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_829__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_hash = 849645095;
+ cdat->dobj_829__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_hash = 750305506;
cdat->dobj_829__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_len = 8;
@@ -16359,7 +16359,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_835__CLASS_SOURCE_PATTERN_CONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_835__CLASS_SOURCE_PATTERN_CONSTANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_835__CLASS_SOURCE_PATTERN_CONSTANT.obj_hash = 756616969;
+ cdat->dobj_835__CLASS_SOURCE_PATTERN_CONSTANT.obj_hash = 280481910;
cdat->dobj_835__CLASS_SOURCE_PATTERN_CONSTANT.obj_len = 8;
@@ -16427,7 +16427,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_841__SPAT_CONSTX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_841__SPAT_CONSTX.obj_num = 3;
- cdat->dobj_841__SPAT_CONSTX.obj_hash = 175973956;
+ cdat->dobj_841__SPAT_CONSTX.obj_hash = 505148623;
cdat->dobj_841__SPAT_CONSTX.obj_len = 4;
@@ -16486,7 +16486,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_845__CLASS_SOURCE_PATTERN_CONSTRUCT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_845__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_845__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_hash = 96586007;
+ cdat->dobj_845__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_hash = 637289325;
cdat->dobj_845__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_len = 8;
@@ -16554,7 +16554,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_851__CTPAT_SUBPA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_851__CTPAT_SUBPA.obj_num = 3;
- cdat->dobj_851__CTPAT_SUBPA.obj_hash = 28726648;
+ cdat->dobj_851__CTPAT_SUBPA.obj_hash = 673846628;
cdat->dobj_851__CTPAT_SUBPA.obj_len = 4;
@@ -16613,7 +16613,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_855__CLASS_SOURCE_PATTERN_TUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_855__CLASS_SOURCE_PATTERN_TUPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_855__CLASS_SOURCE_PATTERN_TUPLE.obj_hash = 901193008;
+ cdat->dobj_855__CLASS_SOURCE_PATTERN_TUPLE.obj_hash = 605030797;
cdat->dobj_855__CLASS_SOURCE_PATTERN_TUPLE.obj_len = 8;
@@ -16686,7 +16686,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_861__CLASS_SOURCE_PATTERN_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_861__CLASS_SOURCE_PATTERN_LIST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_861__CLASS_SOURCE_PATTERN_LIST.obj_hash = 960354454;
+ cdat->dobj_861__CLASS_SOURCE_PATTERN_LIST.obj_hash = 876940569;
cdat->dobj_861__CLASS_SOURCE_PATTERN_LIST.obj_len = 8;
@@ -16759,7 +16759,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_867__CLASS_SOURCE_PATTERN_OBJECT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_867__CLASS_SOURCE_PATTERN_OBJECT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_867__CLASS_SOURCE_PATTERN_OBJECT.obj_hash = 568970505;
+ cdat->dobj_867__CLASS_SOURCE_PATTERN_OBJECT.obj_hash = 875837212;
cdat->dobj_867__CLASS_SOURCE_PATTERN_OBJECT.obj_len = 8;
@@ -16826,7 +16826,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_873__SPAT_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_873__SPAT_CLASS.obj_num = 3;
- cdat->dobj_873__SPAT_CLASS.obj_hash = 352150662;
+ cdat->dobj_873__SPAT_CLASS.obj_hash = 303553608;
cdat->dobj_873__SPAT_CLASS.obj_len = 4;
@@ -16879,7 +16879,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_877__SPAT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_877__SPAT_FIELDS.obj_num = 4;
- cdat->dobj_877__SPAT_FIELDS.obj_hash = 846094832;
+ cdat->dobj_877__SPAT_FIELDS.obj_hash = 626203829;
cdat->dobj_877__SPAT_FIELDS.obj_len = 4;
@@ -16938,7 +16938,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_881__CLASS_SOURCE_PATTERN_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_881__CLASS_SOURCE_PATTERN_INSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_881__CLASS_SOURCE_PATTERN_INSTANCE.obj_hash = 201823098;
+ cdat->dobj_881__CLASS_SOURCE_PATTERN_INSTANCE.obj_hash = 392372508;
cdat->dobj_881__CLASS_SOURCE_PATTERN_INSTANCE.obj_len = 8;
@@ -17011,7 +17011,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_887__CLASS_SOURCE_FIELD_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_887__CLASS_SOURCE_FIELD_PATTERN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_887__CLASS_SOURCE_FIELD_PATTERN.obj_hash = 861916232;
+ cdat->dobj_887__CLASS_SOURCE_FIELD_PATTERN.obj_hash = 1059136776;
cdat->dobj_887__CLASS_SOURCE_FIELD_PATTERN.obj_len = 8;
@@ -17078,7 +17078,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_893__SPAF_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_893__SPAF_FIELD.obj_num = 2;
- cdat->dobj_893__SPAF_FIELD.obj_hash = 337759382;
+ cdat->dobj_893__SPAF_FIELD.obj_hash = 1053849806;
cdat->dobj_893__SPAF_FIELD.obj_len = 4;
@@ -17132,7 +17132,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_897__SPAF_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_897__SPAF_PATTERN.obj_num = 3;
- cdat->dobj_897__SPAF_PATTERN.obj_hash = 964026492;
+ cdat->dobj_897__SPAF_PATTERN.obj_hash = 792011284;
cdat->dobj_897__SPAF_PATTERN.obj_len = 4;
@@ -17192,7 +17192,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_901__CLASS_SOURCE_PATTERN_COMPOSITE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_901__CLASS_SOURCE_PATTERN_COMPOSITE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_901__CLASS_SOURCE_PATTERN_COMPOSITE.obj_hash = 546832170;
+ cdat->dobj_901__CLASS_SOURCE_PATTERN_COMPOSITE.obj_hash = 415427864;
cdat->dobj_901__CLASS_SOURCE_PATTERN_COMPOSITE.obj_len = 8;
@@ -17262,7 +17262,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_907__SPAC_OPERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_907__SPAC_OPERATOR.obj_num = 5;
- cdat->dobj_907__SPAC_OPERATOR.obj_hash = 105682131;
+ cdat->dobj_907__SPAC_OPERATOR.obj_hash = 2614875;
cdat->dobj_907__SPAC_OPERATOR.obj_len = 4;
@@ -17319,7 +17319,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_911__SPAC_OPERBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_911__SPAC_OPERBIND.obj_num = 6;
- cdat->dobj_911__SPAC_OPERBIND.obj_hash = 384217799;
+ cdat->dobj_911__SPAC_OPERBIND.obj_hash = 61842441;
cdat->dobj_911__SPAC_OPERBIND.obj_len = 4;
@@ -17374,7 +17374,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_915__SPAC_INARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_915__SPAC_INARGS.obj_num = 7;
- cdat->dobj_915__SPAC_INARGS.obj_hash = 1004427819;
+ cdat->dobj_915__SPAC_INARGS.obj_hash = 425659376;
cdat->dobj_915__SPAC_INARGS.obj_len = 4;
@@ -17429,7 +17429,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_919__SPAC_OUTARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_919__SPAC_OUTARGS.obj_num = 8;
- cdat->dobj_919__SPAC_OUTARGS.obj_hash = 1039128119;
+ cdat->dobj_919__SPAC_OUTARGS.obj_hash = 713022078;
cdat->dobj_919__SPAC_OUTARGS.obj_len = 4;
@@ -17489,7 +17489,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_923__CLASS_SOURCE_PATTERN_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_923__CLASS_SOURCE_PATTERN_MATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_923__CLASS_SOURCE_PATTERN_MATCHER.obj_hash = 1042475177;
+ cdat->dobj_923__CLASS_SOURCE_PATTERN_MATCHER.obj_hash = 654998094;
cdat->dobj_923__CLASS_SOURCE_PATTERN_MATCHER.obj_len = 8;
@@ -17562,7 +17562,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_929__CLASS_SOURCE_PATTERN_C_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_929__CLASS_SOURCE_PATTERN_C_MATCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_929__CLASS_SOURCE_PATTERN_C_MATCH.obj_hash = 495591061;
+ cdat->dobj_929__CLASS_SOURCE_PATTERN_C_MATCH.obj_hash = 801573522;
cdat->dobj_929__CLASS_SOURCE_PATTERN_C_MATCH.obj_len = 8;
@@ -17635,7 +17635,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_935__CLASS_SOURCE_PATTERN_FUN_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_935__CLASS_SOURCE_PATTERN_FUN_MATCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_935__CLASS_SOURCE_PATTERN_FUN_MATCH.obj_hash = 317709599;
+ cdat->dobj_935__CLASS_SOURCE_PATTERN_FUN_MATCH.obj_hash = 756371965;
cdat->dobj_935__CLASS_SOURCE_PATTERN_FUN_MATCH.obj_len = 8;
@@ -18773,7 +18773,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_1025__CLASS_PATTERN_EXPANSION_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_1025__CLASS_PATTERN_EXPANSION_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1025__CLASS_PATTERN_EXPANSION_CONTEXT.obj_hash = 956504673;
+ cdat->dobj_1025__CLASS_PATTERN_EXPANSION_CONTEXT.obj_hash = 551255805;
cdat->dobj_1025__CLASS_PATTERN_EXPANSION_CONTEXT.obj_len = 8;
@@ -18844,7 +18844,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_1031__PCTX_MEXPANDER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1031__PCTX_MEXPANDER.obj_num = 0;
- cdat->dobj_1031__PCTX_MEXPANDER.obj_hash = 309398295;
+ cdat->dobj_1031__PCTX_MEXPANDER.obj_hash = 286110706;
cdat->dobj_1031__PCTX_MEXPANDER.obj_len = 4;
@@ -18903,7 +18903,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_1035__PCTX_PEXPANDER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1035__PCTX_PEXPANDER.obj_num = 1;
- cdat->dobj_1035__PCTX_PEXPANDER.obj_hash = 279559901;
+ cdat->dobj_1035__PCTX_PEXPANDER.obj_hash = 332934152;
cdat->dobj_1035__PCTX_PEXPANDER.obj_len = 4;
@@ -18962,7 +18962,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
cdat->dobj_1039__PCTX_VARMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_1039__PCTX_VARMAP.obj_num = 2;
- cdat->dobj_1039__PCTX_VARMAP.obj_hash = 66872814;
+ cdat->dobj_1039__PCTX_VARMAP.obj_hash = 927869337;
cdat->dobj_1039__PCTX_VARMAP.obj_len = 4;
@@ -19803,7 +19803,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1107__WARN_SHADOW.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1107__WARN_SHADOW.obj_hash = 533214675;
+ cdat->dobj_1107__WARN_SHADOW.obj_hash = 471794098;
cdat->dobj_1107__WARN_SHADOW.obj_len = 5;
/*inimult dtup_1108__WARN_SHADOW */
@@ -24575,7 +24575,7 @@ start_module_melt (void *modargp_)
/**initial routine prologue**/
/* set initial frame marking */
((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -1316;
+ /*minihash */ -1365;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_macro;
/**COMMENT: get previous environment **/ ;
@@ -86083,7 +86083,7 @@ forward_or_mark_module_start_frame_warmelt_macro (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -1316);
+ meltframptr_->mcfr_nbvar == /*minihash */ -1365);
if (!marking && melt_is_forwarding)
{
dbgprintf
diff --git a/gcc/melt/generated/warmelt-modes+01.c b/gcc/melt/generated/warmelt-modes+01.c
index dc9192024fe..588eeaddacd 100644
--- a/gcc/melt/generated/warmelt-modes+01.c
+++ b/gcc/melt/generated/warmelt-modes+01.c
@@ -970,7 +970,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:214:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NAM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NAM__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1276,7 +1281,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:227:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NAM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NAM__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1612,7 +1622,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMBIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMBIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2262,7 +2277,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:274:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2316,7 +2337,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:276:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2343,7 +2370,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:279:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLAS__V14*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLAS__V14*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->
+ tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2380,7 +2414,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-modes.melt:281:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2412,7 +2452,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:283:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2448,7 +2494,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:284:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */
+ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2511,7 +2564,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2530,7 +2589,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:290:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLAS__V14*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLAS__V14*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->
+ tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2570,7 +2636,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2617,7 +2689,14 @@ lab_endgetargs:;
/*_.SETQ___V40*/ meltfptr[39] =
/*_.MAKE_LIST__V39*/ meltfptr[38];;
MELT_LOCATION ("warmelt-modes.melt:297:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */
+ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2871,7 +2950,13 @@ lab_endgetargs:;
/*_.PREDEF__V52*/ meltfptr[16] = /*_.SOBJ_PREDEF__V44*/ meltfptr[40];;
MELT_LOCATION ("warmelt-modes.melt:314:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2921,7 +3006,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:317:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3146,7 +3237,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:331:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3181,7 +3278,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:333:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3392,7 +3495,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:347:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3638,7 +3747,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:365:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3887,7 +4002,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:383:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4137,7 +4258,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:401:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4388,7 +4515,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:419:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4590,7 +4723,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:433:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MDINFO */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MDINFO */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4872,7 +5011,14 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-modes.melt:443:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DNAM__V148*/ meltfptr[141]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DNAM__V148*/ meltfptr[141]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4902,7 +5048,15 @@ lab_endgetargs:;
/*_.DISCRIM__V157*/ meltfptr[153] =
(melt_discr ((melt_ptr_t) ( /*_.CUREXP__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-modes.melt:444:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V157*/ meltfptr[153]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V157*/
+ meltfptr[153]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5297,7 +5451,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DEF__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5731,7 +5891,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:491:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFBIND__V6*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFBIND__V6*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5750,7 +5916,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:490:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBIND_TYPE__V9*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FBIND_TYPE__V9*/
+ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5769,7 +5941,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:489:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V10*/
+ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5801,7 +5979,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFBIND__V6*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFBIND__V6*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5820,7 +6004,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:492:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDER__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDER__V12*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6731,7 +6921,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLADEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCLASS */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLADEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCLASS */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6750,7 +6945,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:549:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SCLASS_CLABIND__V11*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_CLASS_BINDING */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SCLASS_CLABIND__V11*/
+ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_CLASS_BINDING */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6769,7 +6970,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:550:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6788,7 +6995,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:551:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6817,7 +7030,12 @@ lab_endgetargs:;
(melt_multiple_length
((melt_ptr_t) ( /*_.CLFLDS__V14*/ meltfptr[13])));;
MELT_LOCATION ("warmelt-modes.melt:554:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLADEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLADEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6836,7 +7054,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:555:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6935,7 +7158,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:560:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6983,7 +7212,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:564:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7274,7 +7509,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:580:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURANC__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURANC__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7644,7 +7885,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7684,7 +7931,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:610:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7720,7 +7973,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:612:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLDCLA__V38*/ meltfptr[33]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLDCLA__V38*/
+ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7772,7 +8031,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:616:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7837,7 +8102,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:621:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7889,7 +8160,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:625:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLDCLA__V38*/ meltfptr[33]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLDCLA__V38*/
+ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8217,7 +8494,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:655:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SUBCLA__V50*/ meltfptr[33]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SUBCLA__V50*/
+ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8614,7 +8897,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8882,7 +9170,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMAC__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMAC__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8901,7 +9195,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:694:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SEXPMAC_MNAME__V18*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SEXPMAC_MNAME__V18*/
+ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8920,7 +9220,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:695:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMAC__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMAC__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8939,7 +9245,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:696:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMAC__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMAC__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9458,7 +9770,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9942,7 +10259,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PATMAC__V21*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PATMAC__V21*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9961,7 +10284,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:760:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SEXPMAC_MNAME__V28*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SEXPMAC_MNAME__V28*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9980,7 +10309,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:761:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PATMAC__V21*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PATMAC__V21*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9999,7 +10334,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:762:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PATMAC__V21*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PATMAC__V21*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10367,7 +10708,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:744:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PMS1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PMS1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10386,7 +10732,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:745:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PMS2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PMS2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_EXPORT_MACRO */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10697,7 +11048,12 @@ lab_endgetargs:;
/*_.QUOTEDMINUSONE__V10*/ meltfptr[9] =
( /*!konst_3 */ meltfrout->tabval[3]);;
MELT_LOCATION ("warmelt-modes.melt:805:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10867,7 +11223,12 @@ lab_endgetargs:;
;
/*_.CMPCLASSDEF__V20*/ meltfptr[19] = /*_.LAMBDA___V21*/ meltfptr[20];;
MELT_LOCATION ("warmelt-modes.melt:872:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11025,7 +11386,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCLA__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCLA__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11145,7 +11512,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:900:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCLA__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCLA__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11524,7 +11897,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-modes.melt:809:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLDEF__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCLASS */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLDEF__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCLASS */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11543,7 +11921,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:809:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SCLASS_CLABIND__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CLASS_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SCLASS_CLABIND__V5*/
+ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_CLASS_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12710,7 +13094,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-modes.melt:868:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CDF0__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CDF0__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12729,7 +13118,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:868:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CDF1__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CDF1__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13079,7 +13473,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PRIMDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PRIMDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13098,7 +13497,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:923:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PRIMDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PRIMDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13117,7 +13521,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:924:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PRIMDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFPRIMITIVE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PRIMDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFPRIMITIVE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13136,7 +13545,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:925:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PRIMDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PRIMDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13169,7 +13583,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:929:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PNAM__V11*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PNAM__V11*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13217,7 +13637,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:933:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PNAM__V11*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PNAM__V11*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13283,7 +13709,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:938:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TYPE__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TYPE__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13302,7 +13734,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:938:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13669,7 +14108,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14192,7 +14636,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:969:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SDPRI1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SDPRI1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14211,7 +14660,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:970:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SDPRI2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SDPRI2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14557,7 +15011,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FUNDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FUNDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14576,7 +15035,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:997:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FUNDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FUNDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14595,7 +15059,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:998:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FUNDEF__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FUNDEF__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14628,7 +15097,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1002:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FNAM__V11*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FNAM__V11*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14676,7 +15151,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1006:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FNAM__V11*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FNAM__V11*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15055,7 +15536,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15520,7 +16006,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15890,7 +16381,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCITERDEF__V15*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCITERDEF__V15*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15909,7 +16406,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1070:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCITERDEF__V15*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCITERDEF__V15*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15928,7 +16431,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1071:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCITERDEF__V15*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCITERDEF__V15*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15947,7 +16456,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1072:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCITERDEF__V15*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCITERATOR */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCITERDEF__V15*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCITERATOR */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16041,7 +16556,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1077:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAM__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAM__V23*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16090,7 +16610,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1081:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAM__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAM__V23*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16150,7 +16675,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1085:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CITER__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CITER__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16194,7 +16725,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1087:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CITER__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CITER__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16584,7 +17121,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16846,7 +17388,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-modes.melt:1122:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCMATCHDEF__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCMATCHDEF__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16865,7 +17413,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1123:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCMATCHDEF__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCMATCHDEF__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16884,7 +17438,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1124:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCMATCHDEF__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCMATCHER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCMATCHDEF__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCMATCHER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16903,7 +17463,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1125:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMATCH__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMATCH__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16922,7 +17488,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1126:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMATCH__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMATCH__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16941,7 +17513,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1127:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMATCH__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMATCH__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16974,7 +17552,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1131:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAM__V18*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAM__V18*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17023,7 +17606,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1135:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAM__V18*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAM__V18*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17093,7 +17681,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMABIND__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMABIND__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17112,7 +17706,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1141:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MANAMB__V27*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MANAMB__V27*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17147,7 +17747,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1146:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMABIND__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMABIND__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17166,7 +17772,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1145:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBIND_TYPE__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FBIND_TYPE__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17185,7 +17797,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1144:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V30*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V30*/
+ meltfptr[29]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17234,7 +17852,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1150:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MANAMB__V27*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MANAMB__V27*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18318,9 +18942,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:1247:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (
+ /*cond */ if (
+ /*ifisa */ melt_is_instance_of ((melt_ptr_t) (
/*quasi.cur.mod.env.cont */
- ( /*!konst_2 */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ ( /*!konst_2 */ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18614,7 +19241,14 @@ lab_endgetargs:;
;
/*_.MDINFO__V30*/ meltfptr[29] = /*_.INST__V31*/ meltfptr[30];;
MELT_LOCATION ("warmelt-modes.melt:1269:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!MELT_MODE_CONTAINER */ meltfrout->tabval[8])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!MELT_MODE_CONTAINER */
+ meltfrout->tabval[8])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -19929,7 +20563,13 @@ lab_endgetargs:;
/*^cond */
- /*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 */
+ /*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 */
{
/*^cond.then */
/*^getslot */
@@ -21324,7 +21964,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1446:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21367,7 +22013,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1449:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21697,7 +22349,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1470:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21740,7 +22398,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1473:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21798,7 +22462,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1478:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22829,7 +23499,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1570:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22879,7 +23555,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1574:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22914,7 +23596,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1576:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22972,7 +23660,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1581:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23037,7 +23731,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1587:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23072,7 +23772,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1589:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23115,7 +23821,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1592:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23187,7 +23899,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1599:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23222,7 +23940,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1601:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23332,7 +24056,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1613:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23674,7 +24404,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1633:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23743,7 +24479,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:1640:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23859,7 +24601,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24026,7 +24773,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1652:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24061,7 +24814,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1654:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24119,7 +24878,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1659:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24162,7 +24927,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1662:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24208,7 +24979,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V33*/
+ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24649,7 +25426,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1705:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24699,7 +25482,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1709:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24734,7 +25523,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1711:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24769,7 +25564,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1713:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24818,7 +25619,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1717:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24853,7 +25660,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1719:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24888,7 +25701,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1721:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V55*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V55*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25127,7 +25946,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1735:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V69*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V69*/
+ meltfptr[68]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25177,7 +26002,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1739:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V69*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V69*/
+ meltfptr[68]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25212,7 +26043,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1741:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V69*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V69*/
+ meltfptr[68]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25247,7 +26084,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1743:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V69*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V69*/
+ meltfptr[68]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26144,7 +26987,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1810:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26194,7 +27043,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1814:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26244,7 +27099,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1818:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26279,7 +27140,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1820:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26329,7 +27196,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1824:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26372,7 +27245,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1827:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26701,7 +27580,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1847:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26751,7 +27636,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1852:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26801,7 +27692,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1856:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26851,7 +27748,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1860:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26894,7 +27797,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1863:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26929,7 +27838,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1865:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26964,7 +27879,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1867:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27029,7 +27950,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1873:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27064,7 +27991,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1875:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27114,7 +28047,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1879:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27149,7 +28088,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1881:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27244,7 +28189,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1892:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27294,7 +28245,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1897:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27344,7 +28301,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1901:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27387,7 +28350,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1904:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27422,7 +28391,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1906:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27457,7 +28432,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1908:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27522,7 +28503,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1915:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27572,7 +28559,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1919:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27615,7 +28608,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1922:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27650,7 +28649,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1924:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27685,7 +28690,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1926:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27750,7 +28761,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1933:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27785,7 +28802,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1935:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27850,7 +28873,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1941:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27885,7 +28914,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1943:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27995,7 +29030,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:1955:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28893,7 +29934,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28916,7 +29963,13 @@ lab_endgetargs:;
/*_#TIXSUCC__L11*/ meltfnum[7] =
((1) + ( /*_#TIX__L7*/ meltfnum[1]));;
MELT_LOCATION ("warmelt-modes.melt:2079:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28935,7 +29988,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2080:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28954,7 +30013,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2081:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28973,7 +30038,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2082:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28992,7 +30063,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2083:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29011,7 +30088,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2084:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29417,7 +30500,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29436,7 +30525,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2139:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29455,7 +30550,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2140:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29474,7 +30575,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2141:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30688,7 +31795,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2254:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30738,7 +31851,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2258:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30776,7 +31895,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30819,7 +31944,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2266:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30855,7 +31986,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2268:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31135,7 +32272,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2291:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31185,7 +32328,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2296:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31250,7 +32399,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2303:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31300,7 +32455,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2307:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31335,7 +32496,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2309:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31460,7 +32627,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2323:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31495,7 +32668,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2325:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31545,7 +32724,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2329:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31633,7 +32818,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2338:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31773,7 +32964,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2354:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V28*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V28*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32532,7 +33729,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2413:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32578,7 +33781,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32597,7 +33806,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2417:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33241,7 +34456,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2480:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33287,7 +34508,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33306,7 +34533,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2484:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33333,7 +34566,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-modes.melt:2488:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33444,7 +34683,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2501:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34220,7 +35465,13 @@ lab_endgetargs:;
/*_#TIXNEXT__L11*/ meltfnum[9] =
(( /*_#TIX__L8*/ meltfnum[7]) + (1));;
MELT_LOCATION ("warmelt-modes.melt:2548:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34239,7 +35490,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2549:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-modes+02.c b/gcc/melt/generated/warmelt-modes+02.c
index da8c3a721b0..74cf94642b9 100644
--- a/gcc/melt/generated/warmelt-modes+02.c
+++ b/gcc/melt/generated/warmelt-modes+02.c
@@ -1563,7 +1563,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2617:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V19*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V19*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1609,7 +1615,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V19*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V19*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -1722,7 +1734,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V19*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V19*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE_GTY */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2070,7 +2088,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2660:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V27*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V27*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2116,7 +2140,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURVALDESC__V27*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURVALDESC__V27*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3490,7 +3520,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2736:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3861,7 +3897,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2779:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4627,7 +4669,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-modes.melt:2876:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V16*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V16*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5493,7 +5541,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:2916:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V13*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V13*/
+ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9052,7 +9106,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPREDEF__V9*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPREDEF__V9*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9071,7 +9131,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:3251:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPREDEF__V9*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPREDEF__V9*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9221,7 +9287,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-modes.melt:3261:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIELD__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIELD__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9257,7 +9328,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIELD__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIELD__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-modes+meltdesc.c b/gcc/melt/generated/warmelt-modes+meltdesc.c
index 98aaf28637c..ea671d2a300 100644
--- a/gcc/melt/generated/warmelt-modes+meltdesc.c
+++ b/gcc/melt/generated/warmelt-modes+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-modes */
@@ -12,15 +12,15 @@ const char melt_modulename[]="warmelt-modes";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-modes";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="1a04ba88116d3f89f88d717658da5227";
+const char melt_primaryhexmd5[]="c81f7bab090bd2c76842d2ea08475c20";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+01.c #1 */ "73b52b56891169b5343db25b9a49b2bf",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+02.c #2 */ "2360f363c98fb7b16161d6d0d6e97e18",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+01.c #1 */ "e4de62a029ade42a9ac021ee9e75c51c",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+02.c #2 */ "36aee5e9832ff76196a1c87c1b426ba9",
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -28,9 +28,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=2;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="87d6992bf6b3afcffb1f734b81a671cd" ;
+const char melt_cumulated_hexmd5[]="199cff40a08c8fab31af05d21bb06707" ;
/* include the timestamp file */
-#define meltmod_warmelt_modes_mds__87d6992bf6b3afcffb1f734b81a671cd 1
+#define meltmod_warmelt_modes_mds__199cff40a08c8fab31af05d21bb06707 1
#include "warmelt-modes+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-modes+melttime.h b/gcc/melt/generated/warmelt-modes+melttime.h
index 2806bbf2354..c580de7deca 100644
--- a/gcc/melt/generated/warmelt-modes+melttime.h
+++ b/gcc/melt/generated/warmelt-modes+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-modes+melttime.h is included from warmelt-modes+meltdesc.c only. */
-#if meltmod_warmelt_modes_mds__87d6992bf6b3afcffb1f734b81a671cd
+#if meltmod_warmelt_modes_mds__199cff40a08c8fab31af05d21bb06707
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-modes */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:27 2012 CET";
-const long long melt_gen_timenum=1328609127;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:28 2012 CET";
+const long long melt_gen_timenum=1329219208;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_modes_mds__87d6992bf6b3afcffb1f734b81a671cd */
+#else /* ! meltmod_warmelt_modes_mds__199cff40a08c8fab31af05d21bb06707 */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-modes
-#endif /* meltmod_warmelt_modes_mds__87d6992bf6b3afcffb1f734b81a671cd */
+#endif /* meltmod_warmelt_modes_mds__199cff40a08c8fab31af05d21bb06707 */
diff --git a/gcc/melt/generated/warmelt-modes.c b/gcc/melt/generated/warmelt-modes.c
index 87dbb31f23f..50c981f05a2 100644
--- a/gcc/melt/generated/warmelt-modes.c
+++ b/gcc/melt/generated/warmelt-modes.c
@@ -979,7 +979,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!INITIAL_SYSTEM_DATA */ meltfrout->tabval[1])), (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!INITIAL_SYSTEM_DATA */
+ meltfrout->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_SYSTEM_DATA */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -998,7 +1004,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:39:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODE__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODE__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3861,7 +3873,12 @@ lab_endgetargs:;
/*_#XLISTLEN__L2*/ meltfnum[1] =
(melt_list_length ((melt_ptr_t) ( /*_.XLIST__V4*/ meltfptr[3])));;
MELT_LOCATION ("warmelt-modes.melt:207:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3880,7 +3897,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-modes.melt:208:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDINFO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDINFO__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MAKEDOC_INFO */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4121,7 +4143,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_modes iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -2816);
+ iniframp__->mcfr_nbvar == /*minihash */ -55);
struct cdata_st
{
@@ -4893,7 +4915,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_30__RUNFILE_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_30__RUNFILE_MODE.obj_hash = 6617917;
+ cdat->dobj_30__RUNFILE_MODE.obj_hash = 800523194;
cdat->dobj_30__RUNFILE_MODE.obj_len = 5;
@@ -5006,7 +5028,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_40__RUNDEBUG_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_40__RUNDEBUG_MODE.obj_hash = 712605566;
+ cdat->dobj_40__RUNDEBUG_MODE.obj_hash = 637719966;
cdat->dobj_40__RUNDEBUG_MODE.obj_len = 5;
@@ -5099,7 +5121,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_47__CLASS_MAKEDOC_INFO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_47__CLASS_MAKEDOC_INFO.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_47__CLASS_MAKEDOC_INFO.obj_hash = 268120701;
+ cdat->dobj_47__CLASS_MAKEDOC_INFO.obj_hash = 83083729;
cdat->dobj_47__CLASS_MAKEDOC_INFO.obj_len = 8;
@@ -5170,7 +5192,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_53__MKDOC_PRIMITIVES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_53__MKDOC_PRIMITIVES.obj_num = 1;
- cdat->dobj_53__MKDOC_PRIMITIVES.obj_hash = 531232648;
+ cdat->dobj_53__MKDOC_PRIMITIVES.obj_hash = 305231511;
cdat->dobj_53__MKDOC_PRIMITIVES.obj_len = 4;
@@ -5229,7 +5251,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_57__MKDOC_FUNCTIONS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_57__MKDOC_FUNCTIONS.obj_num = 2;
- cdat->dobj_57__MKDOC_FUNCTIONS.obj_hash = 279996657;
+ cdat->dobj_57__MKDOC_FUNCTIONS.obj_hash = 244281611;
cdat->dobj_57__MKDOC_FUNCTIONS.obj_len = 4;
@@ -5288,7 +5310,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_61__MKDOC_CITERATORS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_61__MKDOC_CITERATORS.obj_num = 3;
- cdat->dobj_61__MKDOC_CITERATORS.obj_hash = 109499961;
+ cdat->dobj_61__MKDOC_CITERATORS.obj_hash = 348556481;
cdat->dobj_61__MKDOC_CITERATORS.obj_len = 4;
@@ -5347,7 +5369,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_65__MKDOC_CMATCHERS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_65__MKDOC_CMATCHERS.obj_num = 4;
- cdat->dobj_65__MKDOC_CMATCHERS.obj_hash = 390563141;
+ cdat->dobj_65__MKDOC_CMATCHERS.obj_hash = 79381818;
cdat->dobj_65__MKDOC_CMATCHERS.obj_len = 4;
@@ -5406,7 +5428,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_69__MKDOC_SELECTORS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_69__MKDOC_SELECTORS.obj_num = 5;
- cdat->dobj_69__MKDOC_SELECTORS.obj_hash = 649617542;
+ cdat->dobj_69__MKDOC_SELECTORS.obj_hash = 539017680;
cdat->dobj_69__MKDOC_SELECTORS.obj_len = 4;
@@ -5462,7 +5484,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_73__MKDOC_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_73__MKDOC_FIELDS.obj_num = 6;
- cdat->dobj_73__MKDOC_FIELDS.obj_hash = 262609530;
+ cdat->dobj_73__MKDOC_FIELDS.obj_hash = 145618119;
cdat->dobj_73__MKDOC_FIELDS.obj_len = 4;
@@ -5517,7 +5539,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_77__MKDOC_CLASSES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_77__MKDOC_CLASSES.obj_num = 7;
- cdat->dobj_77__MKDOC_CLASSES.obj_hash = 647801088;
+ cdat->dobj_77__MKDOC_CLASSES.obj_hash = 1043060653;
cdat->dobj_77__MKDOC_CLASSES.obj_len = 4;
@@ -5575,7 +5597,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_81__MKDOC_INSTANCES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_81__MKDOC_INSTANCES.obj_num = 8;
- cdat->dobj_81__MKDOC_INSTANCES.obj_hash = 222439588;
+ cdat->dobj_81__MKDOC_INSTANCES.obj_hash = 828767329;
cdat->dobj_81__MKDOC_INSTANCES.obj_len = 4;
@@ -5631,7 +5653,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_85__MKDOC_MACROS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_85__MKDOC_MACROS.obj_num = 9;
- cdat->dobj_85__MKDOC_MACROS.obj_hash = 747187889;
+ cdat->dobj_85__MKDOC_MACROS.obj_hash = 946760764;
cdat->dobj_85__MKDOC_MACROS.obj_len = 4;
@@ -5688,7 +5710,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_89__MKDOC_PATMACROS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_89__MKDOC_PATMACROS.obj_num = 10;
- cdat->dobj_89__MKDOC_PATMACROS.obj_hash = 817887327;
+ cdat->dobj_89__MKDOC_PATMACROS.obj_hash = 63548902;
cdat->dobj_89__MKDOC_PATMACROS.obj_len = 4;
@@ -5747,7 +5769,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_93__MKDOC_FORMALOCCMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_93__MKDOC_FORMALOCCMAP.obj_num = 11;
- cdat->dobj_93__MKDOC_FORMALOCCMAP.obj_hash = 888579625;
+ cdat->dobj_93__MKDOC_FORMALOCCMAP.obj_hash = 545623700;
cdat->dobj_93__MKDOC_FORMALOCCMAP.obj_len = 4;
@@ -5806,7 +5828,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_97__MKDOC_PREDEFMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_97__MKDOC_PREDEFMAP.obj_num = 12;
- cdat->dobj_97__MKDOC_PREDEFMAP.obj_hash = 562820079;
+ cdat->dobj_97__MKDOC_PREDEFMAP.obj_hash = 569113722;
cdat->dobj_97__MKDOC_PREDEFMAP.obj_len = 4;
@@ -5865,7 +5887,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_101__MKDOC_DOCSYMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_101__MKDOC_DOCSYMAP.obj_num = 13;
- cdat->dobj_101__MKDOC_DOCSYMAP.obj_hash = 1052510502;
+ cdat->dobj_101__MKDOC_DOCSYMAP.obj_hash = 303375979;
cdat->dobj_101__MKDOC_DOCSYMAP.obj_len = 4;
@@ -5924,7 +5946,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
cdat->dobj_105__MKDOC_SUBCLASSMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_105__MKDOC_SUBCLASSMAP.obj_num = 14;
- cdat->dobj_105__MKDOC_SUBCLASSMAP.obj_hash = 678148088;
+ cdat->dobj_105__MKDOC_SUBCLASSMAP.obj_hash = 661698491;
cdat->dobj_105__MKDOC_SUBCLASSMAP.obj_len = 4;
@@ -7332,7 +7354,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_219__MAKEDOC_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_219__MAKEDOC_MODE.obj_hash = 113010167;
+ cdat->dobj_219__MAKEDOC_MODE.obj_hash = 758708843;
cdat->dobj_219__MAKEDOC_MODE.obj_len = 5;
@@ -7452,7 +7474,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_230__HELP_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_230__HELP_MODE.obj_hash = 716648232;
+ cdat->dobj_230__HELP_MODE.obj_hash = 501976918;
cdat->dobj_230__HELP_MODE.obj_len = 5;
@@ -7529,7 +7551,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_237__NOP_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_237__NOP_MODE.obj_hash = 782259343;
+ cdat->dobj_237__NOP_MODE.obj_hash = 253974781;
cdat->dobj_237__NOP_MODE.obj_len = 5;
@@ -8371,7 +8393,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_301__RUNTYPESUPPORT_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_301__RUNTYPESUPPORT_MODE.obj_hash = 98085220;
+ cdat->dobj_301__RUNTYPESUPPORT_MODE.obj_hash = 1014797144;
cdat->dobj_301__RUNTYPESUPPORT_MODE.obj_len = 5;
@@ -8503,7 +8525,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_313__TRANSLATETOMODULE_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_313__TRANSLATETOMODULE_MODE.obj_hash = 711865182;
+ cdat->dobj_313__TRANSLATETOMODULE_MODE.obj_hash = 6453640;
cdat->dobj_313__TRANSLATETOMODULE_MODE.obj_len = 5;
@@ -8598,7 +8620,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_321__TRANSLATEDEBUG_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_321__TRANSLATEDEBUG_MODE.obj_hash = 657620491;
+ cdat->dobj_321__TRANSLATEDEBUG_MODE.obj_hash = 559259341;
cdat->dobj_321__TRANSLATEDEBUG_MODE.obj_len = 5;
@@ -8706,7 +8728,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_329__TRANSLATEQUICKLY_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_329__TRANSLATEQUICKLY_MODE.obj_hash = 719300083;
+ cdat->dobj_329__TRANSLATEQUICKLY_MODE.obj_hash = 459813049;
cdat->dobj_329__TRANSLATEQUICKLY_MODE.obj_len = 5;
@@ -8802,7 +8824,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_337__TRANSLATEOPTIMIZED_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_337__TRANSLATEOPTIMIZED_MODE.obj_hash = 1014713795;
+ cdat->dobj_337__TRANSLATEOPTIMIZED_MODE.obj_hash = 714430632;
cdat->dobj_337__TRANSLATEOPTIMIZED_MODE.obj_len = 5;
@@ -8889,7 +8911,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_344__TRANSLATEFILE_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_344__TRANSLATEFILE_MODE.obj_hash = 654958266;
+ cdat->dobj_344__TRANSLATEFILE_MODE.obj_hash = 359903707;
cdat->dobj_344__TRANSLATEFILE_MODE.obj_len = 5;
@@ -9014,7 +9036,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_354__TRANSLATEINIT_MODE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_MELT_MODE__V7*/ meltfptr[6]);
- cdat->dobj_354__TRANSLATEINIT_MODE.obj_hash = 90585437;
+ cdat->dobj_354__TRANSLATEINIT_MODE.obj_hash = 887018146;
cdat->dobj_354__TRANSLATEINIT_MODE.obj_len = 5;
@@ -9076,8 +9098,7 @@ start_module_melt (void *modargp_)
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -2816;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -55;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_modes;
/**COMMENT: get previous environment **/ ;
@@ -21824,7 +21845,7 @@ forward_or_mark_module_start_frame_warmelt_modes (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -2816);
+ meltframptr_->mcfr_nbvar == /*minihash */ -55);
if (!marking && melt_is_forwarding)
{
dbgprintf
diff --git a/gcc/melt/generated/warmelt-normal+01.c b/gcc/melt/generated/warmelt-normal+01.c
index 188ae0fcb4a..7d0904e1d1c 100644
--- a/gcc/melt/generated/warmelt-normal+01.c
+++ b/gcc/melt/generated/warmelt-normal+01.c
@@ -3497,7 +3497,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:921:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3516,7 +3522,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:922:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_LAZY_MACRO_EXPANSION */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_LAZY_MACRO_EXPANSION */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3535,7 +3546,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:923:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_LAZY_MACRO_EXPANSION */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_LAZY_MACRO_EXPANSION */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3721,7 +3737,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:939:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LAZYMACOPER__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LAZYMACOPER__V13*/
+ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8188,7 +8210,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:1094:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V12*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V12*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8656,7 +8684,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:1108:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V12*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V12*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9189,7 +9223,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:1131:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLCONT__V40*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLCONT__V40*/
+ meltfptr[35]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -9256,7 +9296,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLCONT__V40*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLCONT__V40*/
+ meltfptr[35]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11782,7 +11828,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:1220:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11982,7 +12033,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:1239:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -12571,7 +12627,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:1254:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12752,7 +12813,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12891,7 +12957,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:1266:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURLOCSYM__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURLOCSYM__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16448,7 +16520,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLCONT__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLCONT__V5*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16602,7 +16680,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:1352:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~CLCONT */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~CLCONT */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -16900,7 +16984,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLCONT__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLCONT__V5*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17054,7 +17144,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:1409:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~CLCONT */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~CLCONT */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17352,7 +17448,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLCONT__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLCONT__V5*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17507,7 +17609,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:1436:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~CLCONT */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~CLCONT */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -22044,7 +22152,13 @@ lab_endgetargs:;
(( /*!DISCR_STRBUF */ meltfrout->tabval[5])),
(char *) 0);;
MELT_LOCATION ("warmelt-normal.melt:1647:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CSYM__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CSYM__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22079,7 +22193,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:1649:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CSYM__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CSYM__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-normal+02.c b/gcc/melt/generated/warmelt-normal+02.c
index 03749f87006..ab5ced91d43 100644
--- a/gcc/melt/generated/warmelt-normal+02.c
+++ b/gcc/melt/generated/warmelt-normal+02.c
@@ -4750,7 +4750,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:1990:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SELBIND__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_SELECTOR_BINDING */ meltfrout->tabval[13])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SELBIND__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_SELECTOR_BINDING */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4769,7 +4775,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:1990:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SBIND_SELECTORDEF__V47*/ meltfptr[46]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFSELECTOR */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SBIND_SELECTORDEF__V47*/
+ meltfptr[46]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFSELECTOR */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4824,7 +4836,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SELBIND__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[15])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SELBIND__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_VALUE_BINDING */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4907,7 +4925,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:1996:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VALSEL__V51*/ meltfptr[50]), (melt_ptr_t) (( /*!CLASS_SELECTOR */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VALSEL__V51*/
+ meltfptr[50]),
+ (melt_ptr_t) (( /*!CLASS_SELECTOR */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5509,7 +5533,13 @@ lab_endgetargs:;
{
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECVFORMAL__V71*/ meltfptr[66]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[21])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECVFORMAL__V71*/
+ meltfptr[66]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[21])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5606,7 +5636,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2030:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SELNAM__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SELNAM__V19*/
+ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5689,7 +5725,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2037:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFORMAL__V81*/ meltfptr[73]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[21])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFORMAL__V81*/
+ meltfptr[73]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[21])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5708,7 +5750,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2038:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFORMAL__V81*/ meltfptr[73]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[23])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFORMAL__V81*/
+ meltfptr[73]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[23])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5802,7 +5850,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2045:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SELNAM__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SELNAM__V19*/
+ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5832,7 +5886,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2047:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMBINDER__V84*/ meltfptr[83]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMBINDER__V84*/ meltfptr[83]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5861,7 +5920,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2049:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V82*/ meltfptr[81]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V82*/
+ meltfptr[81]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5890,7 +5955,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2051:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FORMCTYP__V83*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FORMCTYP__V83*/ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13783,7 +13853,13 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
MELT_LOCATION ("warmelt-normal.melt:2445:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORCONT__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORCONT__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13802,7 +13878,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2445:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NBINDORCONT__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NBINDORCONT__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13897,7 +13979,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:2446:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NORCONT__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NORCONT__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13916,7 +14004,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2446:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NBINDORCONT__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NBINDORCONT__V23*/
+ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14396,7 +14491,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2397:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NORCONT */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NORCONT */ meltfclos->
+ tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14598,7 +14700,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:2407:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~CTYPORCONT */ meltfclos->tabval[7])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~CTYPORCONT */ meltfclos->
+ tabval[7])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14647,7 +14755,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:2416:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NORCONT */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NORCONT */ meltfclos->
+ tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14666,7 +14780,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2416:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NBINDORCONT */ meltfclos->tabval[6])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NBINDORCONT */ meltfclos->
+ tabval[6])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14912,7 +15032,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2435:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NBINDORCONT */ meltfclos->tabval[6])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NBINDORCONT */ meltfclos->
+ tabval[6])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14947,7 +15073,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2436:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NBINDORCONT */ meltfclos->tabval[6])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NBINDORCONT */ meltfclos->
+ tabval[6])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18266,7 +18398,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2539:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SBINDER__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SBINDER__V8*/
+ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18427,7 +18565,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2555:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SBINDER__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SBINDER__V8*/
+ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18455,7 +18599,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2559:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SBTYP__V7*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SBTYP__V7*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18483,7 +18632,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:2563:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NBCTYPE__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NBCTYPE__V17*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22844,7 +22999,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2802:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V5*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23933,7 +24093,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:2859:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLACONT__V27*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLACONT__V27*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24253,7 +24419,11 @@ lab_endgetargs:;
;
MELT_LOCATION
("warmelt-normal.melt:2878:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FCLA__V47*/ meltfptr[46]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.FCLA__V47*/ meltfptr[46]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24471,7 +24641,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:2896:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V40*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V40*/
+ meltfptr[35]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24564,7 +24740,14 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:2902:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLACONT__V27*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLACONT__V27*/ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->
+ tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27089,7 +27272,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:3006:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SCLASS__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SCLASS__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28052,7 +28241,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:3027:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~SCLASS */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~SCLASS */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28254,7 +28449,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:3034:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIELD__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28291,7 +28492,13 @@ lab_endgetargs:;
};
;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD_OWNCLASS__V30*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD_OWNCLASS__V30*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28320,7 +28527,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:3040:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~SCLASS */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~SCLASS */
+ meltfclos->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28627,7 +28840,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:3054:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIELD__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32946,7 +33165,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:3238:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPRO__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPRO__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32965,7 +33189,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:3239:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPRO__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPRO__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35517,7 +35746,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:3350:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V117*/ meltfptr[116]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[25])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V117*/ meltfptr[116]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[25])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -38819,7 +39053,12 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:3521:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAM__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAM__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39026,7 +39265,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:3530:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NPROC__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[20])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NPROC__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[20])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -39649,7 +39894,12 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.CLOVTUP__V71*/ meltfptr[62] = 0;
MELT_LOCATION ("warmelt-normal.melt:3565:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFUBIND__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[32])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFUBIND__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[32])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -41142,7 +41392,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:3626:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NPROC__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NPROC__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -43757,7 +44013,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:3744:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCONTCALL__V37*/ meltfptr[36]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCONTCALL__V37*/ meltfptr[36]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44821,7 +45083,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NREALCALL__V39*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NREP_MSEND */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NREALCALL__V39*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MSEND */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-normal+03.c b/gcc/melt/generated/warmelt-normal+03.c
index 184806762db..03584efdc32 100644
--- a/gcc/melt/generated/warmelt-normal+03.c
+++ b/gcc/melt/generated/warmelt-normal+03.c
@@ -6706,7 +6706,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NEXTB__V71*/ meltfptr[70]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[31])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NEXTB__V71*/
+ meltfptr[70]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[31])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6772,7 +6778,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4010:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPAIRB__V70*/ meltfptr[69]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[29])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPAIRB__V70*/
+ meltfptr[69]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[29])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7139,7 +7151,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4035:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CONSLISTBIND__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[20])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CONSLISTBIND__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[20])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -7860,7 +7878,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:3937:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7892,7 +7915,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:3939:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8205,7 +8233,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4064:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8234,7 +8268,13 @@ lab_endgetargs:;
/*_.DISCRIM__V11*/ meltfptr[7] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-normal.melt:4066:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V11*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V11*/ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8579,7 +8619,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4083:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8608,7 +8654,13 @@ lab_endgetargs:;
/*_.DISCRIM__V13*/ meltfptr[9] =
(melt_discr ((melt_ptr_t) ( /*_.CEXPR__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-normal.melt:4085:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V13*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V13*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9886,7 +9938,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-normal.melt:4128:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -10362,7 +10419,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:4144:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10381,7 +10444,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4145:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11065,7 +11133,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:4167:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CEXPR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CEXPR__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11105,7 +11179,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:4169:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11124,7 +11203,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4170:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11143,7 +11227,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4171:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12263,7 +12352,13 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
MELT_LOCATION ("warmelt-normal.melt:4201:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12282,7 +12377,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4202:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12566,7 +12666,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4221:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURARG__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURARG__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13228,7 +13334,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13264,7 +13375,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:4248:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURLOCSYM__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURLOCSYM__V14*/
+ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13951,7 +14068,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CEXPR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CEXPR__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13983,7 +14106,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4264:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CEXPR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CEXPR__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_ARGUMENTED_OPERATOR */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14007,7 +14135,12 @@ lab_endgetargs:;
(melt_multiple_nth
((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (-1)));;
MELT_LOCATION ("warmelt-normal.melt:4266:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CONSLIBIND__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CONSLIBIND__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14026,7 +14159,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4267:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14045,7 +14183,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4268:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14881,7 +15024,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:4293:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NEXTCBIND__V58*/ meltfptr[57]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NEXTCBIND__V58*/
+ meltfptr[57]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15238,7 +15387,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4300:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCBIND__V57*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCBIND__V57*/
+ meltfptr[53]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -15628,7 +15783,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FIRSTPAIRBIND__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FIRSTPAIRBIND__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15647,7 +15808,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4312:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LASTPAIRBIND__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LASTPAIRBIND__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15816,7 +15983,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4317:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CONSLIBIND__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CONSLIBIND__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -16566,7 +16739,13 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:4335:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16585,7 +16764,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4336:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_INSTANCE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_INSTANCE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16604,7 +16788,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4337:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_INSTANCE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_INSTANCE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16659,7 +16848,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4339:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17244,7 +17439,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4361:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17263,7 +17463,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4362:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CBIND__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17282,7 +17487,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4363:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17887,7 +18097,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURNFIELDASS__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURNFIELDASS__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17906,7 +18122,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4404:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURNFIELDASS__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURNFIELDASS__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17925,7 +18147,15 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4405:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURNFIELDASS__V42*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NREP */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURNFIELDASS__V42*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NREP */
+ meltfrout->
+ tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18039,7 +18269,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:4415:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIELD__V47*/ meltfptr[43]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[20])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIELD__V47*/
+ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[20])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21218,7 +21454,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4519:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCBIND__V93*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCBIND__V93*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -21264,7 +21506,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:4523:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCBIND__V93*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCBIND__V93*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21403,7 +21651,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCBIND__V93*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCBIND__V93*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21422,7 +21676,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:4533:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLABIND__V107*/ meltfptr[106]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLABIND__V107*/
+ meltfptr[106]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21815,7 +22075,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4543:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCBIND__V93*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCBIND__V93*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_CONSTRUCTOR_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -22943,7 +23209,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:4580:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NLETREC__V86*/ meltfptr[33]), (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NLETREC__V86*/ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LETREC */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^block */
diff --git a/gcc/melt/generated/warmelt-normal+04.c b/gcc/melt/generated/warmelt-normal+04.c
index 2144ebf1b46..19811de060a 100644
--- a/gcc/melt/generated/warmelt-normal+04.c
+++ b/gcc/melt/generated/warmelt-normal+04.c
@@ -3770,7 +3770,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:4978:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SPRIMBIND__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[24])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SPRIMBIND__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[24])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -5348,7 +5354,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:5081:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CITBIND__V20*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[25])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CITBIND__V20*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[25])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -13172,7 +13183,12 @@ lab_endgetargs:;
} /*noelse */
;
MELT_LOCATION ("warmelt-normal.melt:5434:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CMBIND__V37*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[29])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CMBIND__V37*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[29])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -13834,7 +13850,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:5453:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_DEFINITION_FORMAL */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14100,7 +14121,12 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V35*/ meltfptr[31] = 0;
/*_.FMBIND__V37*/ meltfptr[32] = /*_.LET___V29*/ meltfptr[28];;
MELT_LOCATION ("warmelt-normal.melt:5466:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FMBIND__V37*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_FUNMATCHER_BINDING */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FMBIND__V37*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_FUNMATCHER_BINDING */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15504,7 +15530,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:5550:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FMBIND__V37*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[30])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FMBIND__V37*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[30])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17164,7 +17195,12 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-normal.melt:5656:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SCLABIND__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[23])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SCLABIND__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[23])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17905,7 +17941,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:5709:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OWNFLDBIND__V68*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[23])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OWNFLDBIND__V68*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[23])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -19609,7 +19651,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:5797:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDINS__V30*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[19])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDINS__V30*/ meltfptr[29]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -19744,7 +19791,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NBINDCONT__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NBINDCONT__V28*/ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20385,7 +20438,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:5814:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V10*/
+ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20702,7 +20761,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NBINDCONT */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NBINDCONT */ meltfclos->
+ tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22175,7 +22240,12 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-normal.melt:5887:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPROC__V28*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[10])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPROC__V28*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22230,7 +22300,14 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[15])),
( /*_#I__L21*/ meltfnum[20])));;
MELT_LOCATION ("warmelt-normal.melt:5892:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SNAME__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SNAME__V18*/ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25125,7 +25202,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:6003:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDSEL__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[26])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDSEL__V31*/ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[26])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -25260,7 +25342,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NBINDCONT__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NBINDCONT__V29*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25357,7 +25445,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-normal.melt:6034:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDSEL__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[26])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDSEL__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[26])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -25980,7 +26074,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NBINDCONT */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NBINDCONT */ meltfclos->
+ tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32189,7 +32289,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-normal.melt:6270:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MOCX */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MOCX */ meltfclos->tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32208,7 +32313,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:6271:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~MOCX */ meltfclos->tabval[5])), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~MOCX */ meltfclos->tabval[5])),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -42965,7 +43075,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:6701:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CONTK__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CONTK__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44109,7 +44225,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normal.melt:6748:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CONTK__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CONTK__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-normal+meltdesc.c b/gcc/melt/generated/warmelt-normal+meltdesc.c
index d678d79e412..bae059ffcbf 100644
--- a/gcc/melt/generated/warmelt-normal+meltdesc.c
+++ b/gcc/melt/generated/warmelt-normal+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-normal */
@@ -12,17 +12,17 @@ const char melt_modulename[]="warmelt-normal";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-normal";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="85a65aa984bf845935d7511bd3e7c38a";
+const char melt_primaryhexmd5[]="01ca453cc3aba25119df91f44e57fd76";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+01.c #1 */ "f31f13d24f97b1c490c0e9fee088dae9",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+02.c #2 */ "d1686e04be63a274b1b2d60f14e2add9",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+03.c #3 */ "b93dbd161c9834631d1a8c376160a583",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+04.c #4 */ "11b6bc1391cba43b8e77e5d4f38951c2",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+01.c #1 */ "7e935c58db173c371d4614bae81a6065",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+02.c #2 */ "7e3f2c00eeeca89d52dbd71647574fba",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+03.c #3 */ "c862b50f0a84d397541f8af9304ffc3d",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+04.c #4 */ "2aea9443aab1363a514f66da526b0535",
/*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+05.c #5 */ "41bb2f79aab7c6a03ac1b20198b32d23",
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -31,9 +31,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=5;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="3e7fbfd868b4536427f01a0bad51d319" ;
+const char melt_cumulated_hexmd5[]="965f49e7d0de346907d375c7b47155d6" ;
/* include the timestamp file */
-#define meltmod_warmelt_normal_mds__3e7fbfd868b4536427f01a0bad51d319 1
+#define meltmod_warmelt_normal_mds__965f49e7d0de346907d375c7b47155d6 1
#include "warmelt-normal+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-normal+melttime.h b/gcc/melt/generated/warmelt-normal+melttime.h
index 9a0b4b38b35..22add0ad2ab 100644
--- a/gcc/melt/generated/warmelt-normal+melttime.h
+++ b/gcc/melt/generated/warmelt-normal+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-normal+melttime.h is included from warmelt-normal+meltdesc.c only. */
-#if meltmod_warmelt_normal_mds__3e7fbfd868b4536427f01a0bad51d319
+#if meltmod_warmelt_normal_mds__965f49e7d0de346907d375c7b47155d6
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-normal */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:23 2012 CET";
-const long long melt_gen_timenum=1328609123;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:23 2012 CET";
+const long long melt_gen_timenum=1329219203;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_normal_mds__3e7fbfd868b4536427f01a0bad51d319 */
+#else /* ! meltmod_warmelt_normal_mds__965f49e7d0de346907d375c7b47155d6 */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-normal
-#endif /* meltmod_warmelt_normal_mds__3e7fbfd868b4536427f01a0bad51d319 */
+#endif /* meltmod_warmelt_normal_mds__965f49e7d0de346907d375c7b47155d6 */
diff --git a/gcc/melt/generated/warmelt-normal.c b/gcc/melt/generated/warmelt-normal.c
index c7a60674b72..fd675890e0c 100644
--- a/gcc/melt/generated/warmelt-normal.c
+++ b/gcc/melt/generated/warmelt-normal.c
@@ -5996,7 +5996,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_normal iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -139);
+ iniframp__->mcfr_nbvar == /*minihash */ -3724);
struct cdata_st
{
@@ -8003,7 +8003,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_5__CLASS_NREP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_5__CLASS_NREP.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_5__CLASS_NREP.obj_hash = 586991451;
+ cdat->dobj_5__CLASS_NREP.obj_hash = 520605219;
cdat->dobj_5__CLASS_NREP.obj_len = 8;
@@ -8065,7 +8065,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_11__NREP_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_11__NREP_LOC.obj_num = 0;
- cdat->dobj_11__NREP_LOC.obj_hash = 640082365;
+ cdat->dobj_11__NREP_LOC.obj_hash = 61148572;
cdat->dobj_11__NREP_LOC.obj_len = 4;
@@ -8121,7 +8121,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_15__CLASS_NREP_SIMPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_15__CLASS_NREP_SIMPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_15__CLASS_NREP_SIMPLE.obj_hash = 750305506;
+ cdat->dobj_15__CLASS_NREP_SIMPLE.obj_hash = 810011307;
cdat->dobj_15__CLASS_NREP_SIMPLE.obj_len = 8;
@@ -8192,7 +8192,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_21__CLASS_NREP_EXPRESSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_hash = 280481910;
+ cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_hash = 175973956;
cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_len = 8;
@@ -8265,7 +8265,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 278936990;
+ cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 96586007;
cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_len = 8;
@@ -8332,7 +8332,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_33__NEXPR_CTYP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_33__NEXPR_CTYP.obj_num = 1;
- cdat->dobj_33__NEXPR_CTYP.obj_hash = 637289325;
+ cdat->dobj_33__NEXPR_CTYP.obj_hash = 28726648;
cdat->dobj_33__NEXPR_CTYP.obj_len = 4;
@@ -8394,7 +8394,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_hash =
- 353365120;
+ 901193008;
cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_len = 8;
@@ -8461,7 +8461,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_43__NEXPR_ARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_43__NEXPR_ARGS.obj_num = 2;
- cdat->dobj_43__NEXPR_ARGS.obj_hash = 605030797;
+ cdat->dobj_43__NEXPR_ARGS.obj_hash = 834578356;
cdat->dobj_43__NEXPR_ARGS.obj_len = 4;
@@ -8517,7 +8517,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_47__CLASS_NREP_APPLY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_47__CLASS_NREP_APPLY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_47__CLASS_NREP_APPLY.obj_hash = 876940569;
+ cdat->dobj_47__CLASS_NREP_APPLY.obj_hash = 93033318;
cdat->dobj_47__CLASS_NREP_APPLY.obj_len = 8;
@@ -8584,7 +8584,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_53__NAPP_FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_53__NAPP_FUN.obj_num = 3;
- cdat->dobj_53__NAPP_FUN.obj_hash = 568970505;
+ cdat->dobj_53__NAPP_FUN.obj_hash = 875837212;
cdat->dobj_53__NAPP_FUN.obj_len = 4;
@@ -8640,7 +8640,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_57__CLASS_NREP_MULTIAPPLY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_hash = 303553608;
+ cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_hash = 846094832;
cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_len = 8;
@@ -8711,7 +8711,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_63__NMULAPP_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_63__NMULAPP_BINDINGS.obj_num = 4;
- cdat->dobj_63__NMULAPP_BINDINGS.obj_hash = 626203829;
+ cdat->dobj_63__NMULAPP_BINDINGS.obj_hash = 245161968;
cdat->dobj_63__NMULAPP_BINDINGS.obj_len = 4;
@@ -8767,7 +8767,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_67__NMULAPP_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_67__NMULAPP_BODY.obj_num = 5;
- cdat->dobj_67__NMULAPP_BODY.obj_hash = 201823098;
+ cdat->dobj_67__NMULAPP_BODY.obj_hash = 392372508;
cdat->dobj_67__NMULAPP_BODY.obj_len = 4;
@@ -8824,7 +8824,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_71__CLASS_NREP_MSEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_71__CLASS_NREP_MSEND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_71__CLASS_NREP_MSEND.obj_hash = 861916232;
+ cdat->dobj_71__CLASS_NREP_MSEND.obj_hash = 1059136776;
cdat->dobj_71__CLASS_NREP_MSEND.obj_len = 8;
@@ -8891,7 +8891,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_77__NSEND_SEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_77__NSEND_SEL.obj_num = 3;
- cdat->dobj_77__NSEND_SEL.obj_hash = 337759382;
+ cdat->dobj_77__NSEND_SEL.obj_hash = 1053849806;
cdat->dobj_77__NSEND_SEL.obj_len = 4;
@@ -8943,7 +8943,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_81__NSEND_RECV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_81__NSEND_RECV.obj_num = 4;
- cdat->dobj_81__NSEND_RECV.obj_hash = 964026492;
+ cdat->dobj_81__NSEND_RECV.obj_hash = 792011284;
cdat->dobj_81__NSEND_RECV.obj_len = 4;
@@ -8999,7 +8999,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_85__CLASS_NREP_MULTIMSEND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_hash = 546832170;
+ cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_hash = 415427864;
cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_len = 8;
@@ -9070,7 +9070,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_91__NMULSEND_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_91__NMULSEND_BINDINGS.obj_num = 5;
- cdat->dobj_91__NMULSEND_BINDINGS.obj_hash = 105682131;
+ cdat->dobj_91__NMULSEND_BINDINGS.obj_hash = 2614875;
cdat->dobj_91__NMULSEND_BINDINGS.obj_len = 4;
@@ -9127,7 +9127,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_95__NMULSEND_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_95__NMULSEND_BODY.obj_num = 6;
- cdat->dobj_95__NMULSEND_BODY.obj_hash = 384217799;
+ cdat->dobj_95__NMULSEND_BODY.obj_hash = 61842441;
cdat->dobj_95__NMULSEND_BODY.obj_len = 4;
@@ -9185,7 +9185,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_99__CLASS_NREP_CHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_99__CLASS_NREP_CHUNK.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_99__CLASS_NREP_CHUNK.obj_hash = 425659376;
+ cdat->dobj_99__CLASS_NREP_CHUNK.obj_hash = 1039128119;
cdat->dobj_99__CLASS_NREP_CHUNK.obj_len = 8;
@@ -9256,7 +9256,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_105__NCHUNK_EXPANSION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_105__NCHUNK_EXPANSION.obj_num = 2;
- cdat->dobj_105__NCHUNK_EXPANSION.obj_hash = 713022078;
+ cdat->dobj_105__NCHUNK_EXPANSION.obj_hash = 940718823;
cdat->dobj_105__NCHUNK_EXPANSION.obj_len = 4;
@@ -9312,7 +9312,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_109__NCHUNK_OPER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_109__NCHUNK_OPER.obj_num = 3;
- cdat->dobj_109__NCHUNK_OPER.obj_hash = 1042475177;
+ cdat->dobj_109__NCHUNK_OPER.obj_hash = 654998094;
cdat->dobj_109__NCHUNK_OPER.obj_len = 4;
@@ -9369,7 +9369,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_113__CLASS_NREP_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_113__CLASS_NREP_COMMENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_113__CLASS_NREP_COMMENT.obj_hash = 495591061;
+ cdat->dobj_113__CLASS_NREP_COMMENT.obj_hash = 801573522;
cdat->dobj_113__CLASS_NREP_COMMENT.obj_len = 8;
@@ -9438,7 +9438,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_119__NCOMM_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_119__NCOMM_STRING.obj_num = 1;
- cdat->dobj_119__NCOMM_STRING.obj_hash = 301194633;
+ cdat->dobj_119__NCOMM_STRING.obj_hash = 317709599;
cdat->dobj_119__NCOMM_STRING.obj_len = 4;
@@ -9496,7 +9496,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_123__CLASS_NREP_LET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_123__CLASS_NREP_LET.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_123__CLASS_NREP_LET.obj_hash = 966667224;
+ cdat->dobj_123__CLASS_NREP_LET.obj_hash = 131602459;
cdat->dobj_123__CLASS_NREP_LET.obj_len = 8;
@@ -9566,7 +9566,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_129__NLET_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_129__NLET_BINDINGS.obj_num = 1;
- cdat->dobj_129__NLET_BINDINGS.obj_hash = 923732646;
+ cdat->dobj_129__NLET_BINDINGS.obj_hash = 1052212030;
cdat->dobj_129__NLET_BINDINGS.obj_len = 4;
@@ -9620,7 +9620,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_133__NLET_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_133__NLET_BODY.obj_num = 2;
- cdat->dobj_133__NLET_BODY.obj_hash = 204963297;
+ cdat->dobj_133__NLET_BODY.obj_hash = 376782486;
cdat->dobj_133__NLET_BODY.obj_len = 4;
@@ -9676,7 +9676,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_137__CLASS_NREP_LETREC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_137__CLASS_NREP_LETREC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_137__CLASS_NREP_LETREC.obj_hash = 707556742;
+ cdat->dobj_137__CLASS_NREP_LETREC.obj_hash = 275010422;
cdat->dobj_137__CLASS_NREP_LETREC.obj_len = 8;
@@ -9749,7 +9749,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_143__NLETREC_FILL_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_num = 3;
- cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_hash = 42321203;
+ cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_hash = 354155609;
cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_len = 4;
@@ -9810,7 +9810,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_147__NLETREC_BODY_BINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_num = 4;
- cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_hash = 539749997;
+ cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_hash = 56163355;
cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_len = 4;
@@ -9869,7 +9869,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_151__NLETREC_LOCSYMS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_151__NLETREC_LOCSYMS.obj_num = 5;
- cdat->dobj_151__NLETREC_LOCSYMS.obj_hash = 308383166;
+ cdat->dobj_151__NLETREC_LOCSYMS.obj_hash = 837936096;
cdat->dobj_151__NLETREC_LOCSYMS.obj_len = 4;
@@ -9928,7 +9928,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_155__CLASS_NREP_RETURN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_155__CLASS_NREP_RETURN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_155__CLASS_NREP_RETURN.obj_hash = 374784640;
+ cdat->dobj_155__CLASS_NREP_RETURN.obj_hash = 823241248;
cdat->dobj_155__CLASS_NREP_RETURN.obj_len = 8;
@@ -9995,7 +9995,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_161__NRET_MAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_161__NRET_MAIN.obj_num = 1;
- cdat->dobj_161__NRET_MAIN.obj_hash = 693379795;
+ cdat->dobj_161__NRET_MAIN.obj_hash = 264870404;
cdat->dobj_161__NRET_MAIN.obj_len = 4;
@@ -10047,7 +10047,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_165__NRET_REST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_165__NRET_REST.obj_num = 2;
- cdat->dobj_165__NRET_REST.obj_hash = 402268176;
+ cdat->dobj_165__NRET_REST.obj_hash = 763985290;
cdat->dobj_165__NRET_REST.obj_len = 4;
@@ -10103,7 +10103,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_169__CLASS_NREP_IFCOMMON.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_hash = 911887070;
+ cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_hash = 849827750;
cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_len = 8;
@@ -10170,7 +10170,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_175__NIF_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_175__NIF_THEN.obj_num = 2;
- cdat->dobj_175__NIF_THEN.obj_hash = 435717692;
+ cdat->dobj_175__NIF_THEN.obj_hash = 119846124;
cdat->dobj_175__NIF_THEN.obj_len = 4;
@@ -10222,7 +10222,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_179__NIF_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_179__NIF_ELSE.obj_num = 3;
- cdat->dobj_179__NIF_ELSE.obj_hash = 553802943;
+ cdat->dobj_179__NIF_ELSE.obj_hash = 868272479;
cdat->dobj_179__NIF_ELSE.obj_len = 4;
@@ -10280,7 +10280,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_183__CLASS_NREP_IFTESTVALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_hash = 906693311;
+ cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_hash = 831170164;
cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_len = 8;
@@ -10348,7 +10348,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_189__NIF_TESTVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_189__NIF_TESTVAL.obj_num = 4;
- cdat->dobj_189__NIF_TESTVAL.obj_hash = 896889226;
+ cdat->dobj_189__NIF_TESTVAL.obj_hash = 551681765;
cdat->dobj_189__NIF_TESTVAL.obj_len = 4;
@@ -10405,7 +10405,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_193__CLASS_NREP_IFISA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_193__CLASS_NREP_IFISA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_193__CLASS_NREP_IFISA.obj_hash = 379376497;
+ cdat->dobj_193__CLASS_NREP_IFISA.obj_hash = 371926204;
cdat->dobj_193__CLASS_NREP_IFISA.obj_len = 8;
@@ -10472,7 +10472,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_199__NIFA_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_199__NIFA_CLASS.obj_num = 5;
- cdat->dobj_199__NIFA_CLASS.obj_hash = 672263051;
+ cdat->dobj_199__NIFA_CLASS.obj_hash = 618650245;
cdat->dobj_199__NIFA_CLASS.obj_len = 4;
@@ -10530,7 +10530,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_hash = 66009857;
+ cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_hash = 105879239;
cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_len = 8;
@@ -10597,7 +10597,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_209__NIF_TUPSIZ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_209__NIF_TUPSIZ.obj_num = 5;
- cdat->dobj_209__NIF_TUPSIZ.obj_hash = 733177053;
+ cdat->dobj_209__NIF_TUPSIZ.obj_hash = 253772364;
cdat->dobj_209__NIF_TUPSIZ.obj_len = 4;
@@ -10655,7 +10655,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_213__CLASS_NREP_IFVARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_hash = 493478628;
+ cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_hash = 631012672;
cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_len = 8;
@@ -10725,7 +10725,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_219__NIFV_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_219__NIFV_VARIADIC.obj_num = 4;
- cdat->dobj_219__NIFV_VARIADIC.obj_hash = 420092662;
+ cdat->dobj_219__NIFV_VARIADIC.obj_hash = 1010319184;
cdat->dobj_219__NIFV_VARIADIC.obj_len = 4;
@@ -10780,7 +10780,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_223__NIFV_CTYPES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_223__NIFV_CTYPES.obj_num = 5;
- cdat->dobj_223__NIFV_CTYPES.obj_hash = 83578136;
+ cdat->dobj_223__NIFV_CTYPES.obj_hash = 677263533;
cdat->dobj_223__NIFV_CTYPES.obj_len = 4;
@@ -10839,7 +10839,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 1056558919;
+ cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 883747758;
cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_len = 8;
@@ -10910,7 +10910,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_233__NCONSVA_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_233__NCONSVA_VARIADIC.obj_num = 1;
- cdat->dobj_233__NCONSVA_VARIADIC.obj_hash = 756592260;
+ cdat->dobj_233__NCONSVA_VARIADIC.obj_hash = 672663493;
cdat->dobj_233__NCONSVA_VARIADIC.obj_len = 4;
@@ -10969,7 +10969,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_237__NCONSVA_CTYPES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_237__NCONSVA_CTYPES.obj_num = 2;
- cdat->dobj_237__NCONSVA_CTYPES.obj_hash = 964052591;
+ cdat->dobj_237__NCONSVA_CTYPES.obj_hash = 607315156;
cdat->dobj_237__NCONSVA_CTYPES.obj_len = 4;
@@ -11028,7 +11028,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_241__CLASS_NREP_IFSAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_241__CLASS_NREP_IFSAME.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_241__CLASS_NREP_IFSAME.obj_hash = 740437367;
+ cdat->dobj_241__CLASS_NREP_IFSAME.obj_hash = 414069621;
cdat->dobj_241__CLASS_NREP_IFSAME.obj_len = 8;
@@ -11095,7 +11095,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_247__NIFS_LEFT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_247__NIFS_LEFT.obj_num = 4;
- cdat->dobj_247__NIFS_LEFT.obj_hash = 735922179;
+ cdat->dobj_247__NIFS_LEFT.obj_hash = 162746632;
cdat->dobj_247__NIFS_LEFT.obj_len = 4;
@@ -11147,7 +11147,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_251__NIFS_RIGHT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_251__NIFS_RIGHT.obj_num = 5;
- cdat->dobj_251__NIFS_RIGHT.obj_hash = 1038851712;
+ cdat->dobj_251__NIFS_RIGHT.obj_hash = 730167625;
cdat->dobj_251__NIFS_RIGHT.obj_len = 4;
@@ -11202,7 +11202,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_255__CLASS_NREP_IF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_255__CLASS_NREP_IF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_255__CLASS_NREP_IF.obj_hash = 665829651;
+ cdat->dobj_255__CLASS_NREP_IF.obj_hash = 803363369;
cdat->dobj_255__CLASS_NREP_IF.obj_len = 8;
@@ -11266,7 +11266,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_261__NIF_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_261__NIF_TEST.obj_num = 4;
- cdat->dobj_261__NIF_TEST.obj_hash = 749141041;
+ cdat->dobj_261__NIF_TEST.obj_hash = 1015665578;
cdat->dobj_261__NIF_TEST.obj_len = 4;
@@ -11322,7 +11322,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_265__CLASS_NREP_CPPIF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_265__CLASS_NREP_CPPIF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_265__CLASS_NREP_CPPIF.obj_hash = 186695017;
+ cdat->dobj_265__CLASS_NREP_CPPIF.obj_hash = 83152378;
cdat->dobj_265__CLASS_NREP_CPPIF.obj_len = 8;
@@ -11389,7 +11389,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_271__NIFP_COND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_271__NIFP_COND.obj_num = 1;
- cdat->dobj_271__NIFP_COND.obj_hash = 292805377;
+ cdat->dobj_271__NIFP_COND.obj_hash = 675834989;
cdat->dobj_271__NIFP_COND.obj_len = 4;
@@ -11441,7 +11441,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_275__NIFP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_275__NIFP_THEN.obj_num = 2;
- cdat->dobj_275__NIFP_THEN.obj_hash = 243731011;
+ cdat->dobj_275__NIFP_THEN.obj_hash = 737782601;
cdat->dobj_275__NIFP_THEN.obj_len = 4;
@@ -11493,7 +11493,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_279__NIFP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_279__NIFP_ELSE.obj_num = 3;
- cdat->dobj_279__NIFP_ELSE.obj_hash = 744738642;
+ cdat->dobj_279__NIFP_ELSE.obj_hash = 123162076;
cdat->dobj_279__NIFP_ELSE.obj_len = 4;
@@ -11545,7 +11545,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_283__NIFP_CTYP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_283__NIFP_CTYP.obj_num = 4;
- cdat->dobj_283__NIFP_CTYP.obj_hash = 840944316;
+ cdat->dobj_283__NIFP_CTYP.obj_hash = 353090575;
cdat->dobj_283__NIFP_CTYP.obj_len = 4;
@@ -11601,7 +11601,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_287__CLASS_NREP_PROGN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_287__CLASS_NREP_PROGN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_287__CLASS_NREP_PROGN.obj_hash = 956604539;
+ cdat->dobj_287__CLASS_NREP_PROGN.obj_hash = 444410232;
cdat->dobj_287__CLASS_NREP_PROGN.obj_len = 8;
@@ -11668,7 +11668,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_293__NPROGN_SEQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_293__NPROGN_SEQ.obj_num = 1;
- cdat->dobj_293__NPROGN_SEQ.obj_hash = 631089435;
+ cdat->dobj_293__NPROGN_SEQ.obj_hash = 436917205;
cdat->dobj_293__NPROGN_SEQ.obj_len = 4;
@@ -11721,7 +11721,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_297__NPROGN_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_297__NPROGN_LAST.obj_num = 2;
- cdat->dobj_297__NPROGN_LAST.obj_hash = 98463108;
+ cdat->dobj_297__NPROGN_LAST.obj_hash = 910490096;
cdat->dobj_297__NPROGN_LAST.obj_len = 4;
@@ -11780,7 +11780,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_301__CLASS_NREP_UNSAFE_GET_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_301__CLASS_NREP_UNSAFE_GET_FIELD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_301__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 757757220;
+ cdat->dobj_301__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 193120850;
cdat->dobj_301__CLASS_NREP_UNSAFE_GET_FIELD.obj_len = 8;
@@ -11847,7 +11847,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_307__NUGET_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_307__NUGET_OBJ.obj_num = 1;
- cdat->dobj_307__NUGET_OBJ.obj_hash = 301450456;
+ cdat->dobj_307__NUGET_OBJ.obj_hash = 934014328;
cdat->dobj_307__NUGET_OBJ.obj_len = 4;
@@ -11900,7 +11900,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_311__NUGET_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_311__NUGET_FIELD.obj_num = 2;
- cdat->dobj_311__NUGET_FIELD.obj_hash = 169588128;
+ cdat->dobj_311__NUGET_FIELD.obj_hash = 909310198;
cdat->dobj_311__NUGET_FIELD.obj_len = 4;
@@ -11959,7 +11959,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_315__CLASS_NREP_UNSAFE_PUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_315__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_315__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_hash = 190129267;
+ cdat->dobj_315__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_hash = 828244625;
cdat->dobj_315__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_len = 8;
@@ -12026,7 +12026,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_321__NUPUT_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_321__NUPUT_OBJ.obj_num = 1;
- cdat->dobj_321__NUPUT_OBJ.obj_hash = 326068088;
+ cdat->dobj_321__NUPUT_OBJ.obj_hash = 1035828420;
cdat->dobj_321__NUPUT_OBJ.obj_len = 4;
@@ -12080,7 +12080,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_325__NUPUT_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_325__NUPUT_FIELDS.obj_num = 2;
- cdat->dobj_325__NUPUT_FIELDS.obj_hash = 464576295;
+ cdat->dobj_325__NUPUT_FIELDS.obj_hash = 567578192;
cdat->dobj_325__NUPUT_FIELDS.obj_len = 4;
@@ -12140,7 +12140,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_329__CLASS_NREP_UNSAFE_NTH_COMPONENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_329__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_329__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 270010661;
+ cdat->dobj_329__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 555764051;
cdat->dobj_329__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_len = 8;
@@ -12208,7 +12208,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_335__NUNTH_TUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_335__NUNTH_TUPLE.obj_num = 1;
- cdat->dobj_335__NUNTH_TUPLE.obj_hash = 554985324;
+ cdat->dobj_335__NUNTH_TUPLE.obj_hash = 449514727;
cdat->dobj_335__NUNTH_TUPLE.obj_len = 4;
@@ -12262,7 +12262,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_339__NUNTH_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_339__NUNTH_INDEX.obj_num = 2;
- cdat->dobj_339__NUNTH_INDEX.obj_hash = 744558195;
+ cdat->dobj_339__NUNTH_INDEX.obj_hash = 979144123;
cdat->dobj_339__NUNTH_INDEX.obj_len = 4;
@@ -12319,7 +12319,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_343__CLASS_NREP_SETQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_343__CLASS_NREP_SETQ.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_343__CLASS_NREP_SETQ.obj_hash = 742156822;
+ cdat->dobj_343__CLASS_NREP_SETQ.obj_hash = 824543745;
cdat->dobj_343__CLASS_NREP_SETQ.obj_len = 8;
@@ -12386,7 +12386,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_349__NSTQ_VAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_349__NSTQ_VAR.obj_num = 1;
- cdat->dobj_349__NSTQ_VAR.obj_hash = 644628399;
+ cdat->dobj_349__NSTQ_VAR.obj_hash = 579426082;
cdat->dobj_349__NSTQ_VAR.obj_len = 4;
@@ -12438,7 +12438,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_353__NSTQ_EXP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_353__NSTQ_EXP.obj_num = 2;
- cdat->dobj_353__NSTQ_EXP.obj_hash = 690579771;
+ cdat->dobj_353__NSTQ_EXP.obj_hash = 1062686478;
cdat->dobj_353__NSTQ_EXP.obj_len = 4;
@@ -12494,7 +12494,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_357__CLASS_NREP_FOREVER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_357__CLASS_NREP_FOREVER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_357__CLASS_NREP_FOREVER.obj_hash = 286860126;
+ cdat->dobj_357__CLASS_NREP_FOREVER.obj_hash = 50946996;
cdat->dobj_357__CLASS_NREP_FOREVER.obj_len = 8;
@@ -12564,7 +12564,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_363__NFOREVER_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_363__NFOREVER_BIND.obj_num = 1;
- cdat->dobj_363__NFOREVER_BIND.obj_hash = 715056247;
+ cdat->dobj_363__NFOREVER_BIND.obj_hash = 984329685;
cdat->dobj_363__NFOREVER_BIND.obj_len = 4;
@@ -12621,7 +12621,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_367__NFOREVER_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_367__NFOREVER_BODY.obj_num = 2;
- cdat->dobj_367__NFOREVER_BODY.obj_hash = 335556641;
+ cdat->dobj_367__NFOREVER_BODY.obj_hash = 652068581;
cdat->dobj_367__NFOREVER_BODY.obj_len = 4;
@@ -12679,7 +12679,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_371__NFOREVER_RESULT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_371__NFOREVER_RESULT.obj_num = 3;
- cdat->dobj_371__NFOREVER_RESULT.obj_hash = 682118028;
+ cdat->dobj_371__NFOREVER_RESULT.obj_hash = 614464002;
cdat->dobj_371__NFOREVER_RESULT.obj_len = 4;
@@ -12738,7 +12738,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_375__CLASS_NREP_EXIT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_375__CLASS_NREP_EXIT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_375__CLASS_NREP_EXIT.obj_hash = 82276009;
+ cdat->dobj_375__CLASS_NREP_EXIT.obj_hash = 1025253887;
cdat->dobj_375__CLASS_NREP_EXIT.obj_len = 8;
@@ -12805,7 +12805,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_381__NEXIT_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_381__NEXIT_BIND.obj_num = 1;
- cdat->dobj_381__NEXIT_BIND.obj_hash = 495257376;
+ cdat->dobj_381__NEXIT_BIND.obj_hash = 87661082;
cdat->dobj_381__NEXIT_BIND.obj_len = 4;
@@ -12857,7 +12857,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_385__NEXIT_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_385__NEXIT_VAL.obj_num = 2;
- cdat->dobj_385__NEXIT_VAL.obj_hash = 591195507;
+ cdat->dobj_385__NEXIT_VAL.obj_hash = 744206584;
cdat->dobj_385__NEXIT_VAL.obj_len = 4;
@@ -12913,7 +12913,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_389__CLASS_NREP_AGAIN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_389__CLASS_NREP_AGAIN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_389__CLASS_NREP_AGAIN.obj_hash = 1060219619;
+ cdat->dobj_389__CLASS_NREP_AGAIN.obj_hash = 419363846;
cdat->dobj_389__CLASS_NREP_AGAIN.obj_len = 8;
@@ -12981,7 +12981,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_395__NAGAIN_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_395__NAGAIN_BIND.obj_num = 1;
- cdat->dobj_395__NAGAIN_BIND.obj_hash = 414030662;
+ cdat->dobj_395__NAGAIN_BIND.obj_hash = 974611250;
cdat->dobj_395__NAGAIN_BIND.obj_len = 4;
@@ -13040,7 +13040,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_399__CLASS_NREP_FIELDASSIGN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_399__CLASS_NREP_FIELDASSIGN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_399__CLASS_NREP_FIELDASSIGN.obj_hash = 474081997;
+ cdat->dobj_399__CLASS_NREP_FIELDASSIGN.obj_hash = 896662705;
cdat->dobj_399__CLASS_NREP_FIELDASSIGN.obj_len = 8;
@@ -13107,7 +13107,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_405__NFLA_FIELD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_405__NFLA_FIELD.obj_num = 1;
- cdat->dobj_405__NFLA_FIELD.obj_hash = 842580691;
+ cdat->dobj_405__NFLA_FIELD.obj_hash = 707826008;
cdat->dobj_405__NFLA_FIELD.obj_len = 4;
@@ -13159,7 +13159,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_409__NFLA_VAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_409__NFLA_VAL.obj_num = 2;
- cdat->dobj_409__NFLA_VAL.obj_hash = 555126487;
+ cdat->dobj_409__NFLA_VAL.obj_hash = 89123947;
cdat->dobj_409__NFLA_VAL.obj_len = 4;
@@ -13215,7 +13215,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_413__CLASS_NREP_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_413__CLASS_NREP_INSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_413__CLASS_NREP_INSTANCE.obj_hash = 1006803846;
+ cdat->dobj_413__CLASS_NREP_INSTANCE.obj_hash = 705348723;
cdat->dobj_413__CLASS_NREP_INSTANCE.obj_len = 8;
@@ -13283,7 +13283,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_419__NMINS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_419__NMINS_CLASS.obj_num = 1;
- cdat->dobj_419__NMINS_CLASS.obj_hash = 138114213;
+ cdat->dobj_419__NMINS_CLASS.obj_hash = 935997697;
cdat->dobj_419__NMINS_CLASS.obj_len = 4;
@@ -13339,7 +13339,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_423__NMINS_CLADATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_423__NMINS_CLADATA.obj_num = 2;
- cdat->dobj_423__NMINS_CLADATA.obj_hash = 600414516;
+ cdat->dobj_423__NMINS_CLADATA.obj_hash = 429998436;
cdat->dobj_423__NMINS_CLADATA.obj_len = 4;
@@ -13395,7 +13395,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_427__NMINS_FIELDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_427__NMINS_FIELDS.obj_num = 3;
- cdat->dobj_427__NMINS_FIELDS.obj_hash = 735195453;
+ cdat->dobj_427__NMINS_FIELDS.obj_hash = 779770662;
cdat->dobj_427__NMINS_FIELDS.obj_len = 4;
@@ -13455,7 +13455,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_431__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_431__CLASS_NREP_VARIADIC_ARGUMENT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_431__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 708972738;
+ cdat->dobj_431__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 620619668;
cdat->dobj_431__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 8;
@@ -13526,7 +13526,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_437__NVARG_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_437__NVARG_VARIADIC.obj_num = 1;
- cdat->dobj_437__NVARG_VARIADIC.obj_hash = 27305813;
+ cdat->dobj_437__NVARG_VARIADIC.obj_hash = 173546056;
cdat->dobj_437__NVARG_VARIADIC.obj_len = 4;
@@ -13581,7 +13581,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_441__NVARG_CTYP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_441__NVARG_CTYP.obj_num = 2;
- cdat->dobj_441__NVARG_CTYP.obj_hash = 44085869;
+ cdat->dobj_441__NVARG_CTYP.obj_hash = 808421758;
cdat->dobj_441__NVARG_CTYP.obj_len = 4;
@@ -13635,7 +13635,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_445__NVARG_OFFSET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_445__NVARG_OFFSET.obj_num = 3;
- cdat->dobj_445__NVARG_OFFSET.obj_hash = 744561921;
+ cdat->dobj_445__NVARG_OFFSET.obj_hash = 733366161;
cdat->dobj_445__NVARG_OFFSET.obj_len = 4;
@@ -13693,7 +13693,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_449__CLASS_NREP_LAMBDA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_449__CLASS_NREP_LAMBDA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_449__CLASS_NREP_LAMBDA.obj_hash = 989476179;
+ cdat->dobj_449__CLASS_NREP_LAMBDA.obj_hash = 635818764;
cdat->dobj_449__CLASS_NREP_LAMBDA.obj_len = 8;
@@ -13762,7 +13762,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_455__NLAMBDA_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_455__NLAMBDA_PROC.obj_num = 1;
- cdat->dobj_455__NLAMBDA_PROC.obj_hash = 513548486;
+ cdat->dobj_455__NLAMBDA_PROC.obj_hash = 23026283;
cdat->dobj_455__NLAMBDA_PROC.obj_len = 4;
@@ -13820,7 +13820,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_459__NLAMBDA_CONSTROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_459__NLAMBDA_CONSTROUT.obj_num = 2;
- cdat->dobj_459__NLAMBDA_CONSTROUT.obj_hash = 226288930;
+ cdat->dobj_459__NLAMBDA_CONSTROUT.obj_hash = 350057489;
cdat->dobj_459__NLAMBDA_CONSTROUT.obj_len = 4;
@@ -13879,7 +13879,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_463__NLAMBDA_CLOSEDV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_463__NLAMBDA_CLOSEDV.obj_num = 3;
- cdat->dobj_463__NLAMBDA_CLOSEDV.obj_hash = 1015911242;
+ cdat->dobj_463__NLAMBDA_CLOSEDV.obj_hash = 127999623;
cdat->dobj_463__NLAMBDA_CLOSEDV.obj_len = 4;
@@ -13940,7 +13940,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_467__CLASS_NREP_CITERATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_467__CLASS_NREP_CITERATION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_467__CLASS_NREP_CITERATION.obj_hash = 280067406;
+ cdat->dobj_467__CLASS_NREP_CITERATION.obj_hash = 209966976;
cdat->dobj_467__CLASS_NREP_CITERATION.obj_len = 8;
@@ -14011,7 +14011,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_473__NCITER_CITERATOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_473__NCITER_CITERATOR.obj_num = 1;
- cdat->dobj_473__NCITER_CITERATOR.obj_hash = 111691988;
+ cdat->dobj_473__NCITER_CITERATOR.obj_hash = 648812688;
cdat->dobj_473__NCITER_CITERATOR.obj_len = 4;
@@ -14070,7 +14070,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_477__NCITER_CHUNKBEFORE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_477__NCITER_CHUNKBEFORE.obj_num = 2;
- cdat->dobj_477__NCITER_CHUNKBEFORE.obj_hash = 766591532;
+ cdat->dobj_477__NCITER_CHUNKBEFORE.obj_hash = 94629514;
cdat->dobj_477__NCITER_CHUNKBEFORE.obj_len = 4;
@@ -14129,7 +14129,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_481__NCITER_CHUNKAFTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_481__NCITER_CHUNKAFTER.obj_num = 3;
- cdat->dobj_481__NCITER_CHUNKAFTER.obj_hash = 51115062;
+ cdat->dobj_481__NCITER_CHUNKAFTER.obj_hash = 1039327075;
cdat->dobj_481__NCITER_CHUNKAFTER.obj_len = 4;
@@ -14185,7 +14185,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_485__NCITER_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_485__NCITER_BODY.obj_num = 4;
- cdat->dobj_485__NCITER_BODY.obj_hash = 66412141;
+ cdat->dobj_485__NCITER_BODY.obj_hash = 23067180;
cdat->dobj_485__NCITER_BODY.obj_len = 4;
@@ -14242,7 +14242,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_489__NCITER_STATOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_489__NCITER_STATOCC.obj_num = 5;
- cdat->dobj_489__NCITER_STATOCC.obj_hash = 885082453;
+ cdat->dobj_489__NCITER_STATOCC.obj_hash = 109394143;
cdat->dobj_489__NCITER_STATOCC.obj_len = 4;
@@ -14301,7 +14301,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_493__NCITER_LOCBINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_493__NCITER_LOCBINDINGS.obj_num = 6;
- cdat->dobj_493__NCITER_LOCBINDINGS.obj_hash = 823124209;
+ cdat->dobj_493__NCITER_LOCBINDINGS.obj_hash = 404943055;
cdat->dobj_493__NCITER_LOCBINDINGS.obj_len = 4;
@@ -14360,7 +14360,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_497__NCITER_BODBINDINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_497__NCITER_BODBINDINGS.obj_num = 7;
- cdat->dobj_497__NCITER_BODBINDINGS.obj_hash = 768143230;
+ cdat->dobj_497__NCITER_BODBINDINGS.obj_hash = 343608053;
cdat->dobj_497__NCITER_BODBINDINGS.obj_len = 4;
@@ -14419,7 +14419,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_501__CLASS_NREP_TESTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_501__CLASS_NREP_TESTS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_501__CLASS_NREP_TESTS.obj_hash = 517754786;
+ cdat->dobj_501__CLASS_NREP_TESTS.obj_hash = 67924247;
cdat->dobj_501__CLASS_NREP_TESTS.obj_len = 8;
@@ -14490,7 +14490,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_507__NTESTS_TESTSEQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_507__NTESTS_TESTSEQ.obj_num = 1;
- cdat->dobj_507__NTESTS_TESTSEQ.obj_hash = 341262362;
+ cdat->dobj_507__NTESTS_TESTSEQ.obj_hash = 459641097;
cdat->dobj_507__NTESTS_TESTSEQ.obj_len = 4;
@@ -14581,7 +14581,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_513__CLASS_NORMAL_CONSTRUCTOR_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_513__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_513__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_hash = 1012084157;
+ cdat->dobj_513__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_hash = 583940183;
cdat->dobj_513__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_len = 8;
@@ -14648,7 +14648,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_519__NCONSB_LOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_519__NCONSB_LOC.obj_num = 1;
- cdat->dobj_519__NCONSB_LOC.obj_hash = 968646107;
+ cdat->dobj_519__NCONSB_LOC.obj_hash = 204811291;
cdat->dobj_519__NCONSB_LOC.obj_len = 4;
@@ -14702,7 +14702,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_523__NCONSB_DISCR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_523__NCONSB_DISCR.obj_num = 2;
- cdat->dobj_523__NCONSB_DISCR.obj_hash = 1020662780;
+ cdat->dobj_523__NCONSB_DISCR.obj_hash = 302053756;
cdat->dobj_523__NCONSB_DISCR.obj_len = 4;
@@ -14760,7 +14760,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_527__NCONSB_NLETREC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_527__NCONSB_NLETREC.obj_num = 3;
- cdat->dobj_527__NCONSB_NLETREC.obj_hash = 610636133;
+ cdat->dobj_527__NCONSB_NLETREC.obj_hash = 671053552;
cdat->dobj_527__NCONSB_NLETREC.obj_len = 4;
@@ -14823,8 +14823,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_531__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_531__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_hash =
- 1072033908;
+ cdat->dobj_531__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_hash = 147928544;
cdat->dobj_531__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_len = 8;
@@ -14891,7 +14890,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_537__NTUPB_COMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_537__NTUPB_COMP.obj_num = 4;
- cdat->dobj_537__NTUPB_COMP.obj_hash = 1027799924;
+ cdat->dobj_537__NTUPB_COMP.obj_hash = 141828576;
cdat->dobj_537__NTUPB_COMP.obj_len = 4;
@@ -14951,7 +14950,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_541__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_541__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_hash = 915136132;
+ cdat->dobj_541__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_hash = 445059858;
cdat->dobj_541__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_len = 8;
@@ -15019,7 +15018,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_547__NPAIRB_HEAD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_547__NPAIRB_HEAD.obj_num = 4;
- cdat->dobj_547__NPAIRB_HEAD.obj_hash = 91081622;
+ cdat->dobj_547__NPAIRB_HEAD.obj_hash = 623601358;
cdat->dobj_547__NPAIRB_HEAD.obj_len = 4;
@@ -15073,7 +15072,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_551__NPAIRB_TAIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_551__NPAIRB_TAIL.obj_num = 5;
- cdat->dobj_551__NPAIRB_TAIL.obj_hash = 833124013;
+ cdat->dobj_551__NPAIRB_TAIL.obj_hash = 18142056;
cdat->dobj_551__NPAIRB_TAIL.obj_len = 4;
@@ -15134,7 +15133,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_555__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_555__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_hash = 871188258;
+ cdat->dobj_555__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_hash = 283089323;
cdat->dobj_555__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_len = 8;
@@ -15203,7 +15202,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_561__NLISTB_FIRST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_561__NLISTB_FIRST.obj_num = 4;
- cdat->dobj_561__NLISTB_FIRST.obj_hash = 996600648;
+ cdat->dobj_561__NLISTB_FIRST.obj_hash = 466289837;
cdat->dobj_561__NLISTB_FIRST.obj_len = 4;
@@ -15258,7 +15257,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_565__NLISTB_LAST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_565__NLISTB_LAST.obj_num = 5;
- cdat->dobj_565__NLISTB_LAST.obj_hash = 746027443;
+ cdat->dobj_565__NLISTB_LAST.obj_hash = 468737318;
cdat->dobj_565__NLISTB_LAST.obj_len = 4;
@@ -15314,7 +15313,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_569__NLISTB_PAIRSB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_569__NLISTB_PAIRSB.obj_num = 6;
- cdat->dobj_569__NLISTB_PAIRSB.obj_hash = 133369305;
+ cdat->dobj_569__NLISTB_PAIRSB.obj_hash = 242438522;
cdat->dobj_569__NLISTB_PAIRSB.obj_len = 4;
@@ -15378,7 +15377,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_573__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_573__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_hash =
- 191043628;
+ 656649691;
cdat->dobj_573__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_len = 8;
@@ -15449,7 +15448,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_579__NLAMBDAB_NCLOSED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_579__NLAMBDAB_NCLOSED.obj_num = 4;
- cdat->dobj_579__NLAMBDAB_NCLOSED.obj_hash = 551734836;
+ cdat->dobj_579__NLAMBDAB_NCLOSED.obj_hash = 393902729;
cdat->dobj_579__NLAMBDAB_NCLOSED.obj_len = 4;
@@ -15508,7 +15507,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_583__NLAMBDAB_CONSTROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_583__NLAMBDAB_CONSTROUT.obj_num = 5;
- cdat->dobj_583__NLAMBDAB_CONSTROUT.obj_hash = 671961305;
+ cdat->dobj_583__NLAMBDAB_CONSTROUT.obj_hash = 314764040;
cdat->dobj_583__NLAMBDAB_CONSTROUT.obj_len = 4;
@@ -15567,7 +15566,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_587__NLAMBDAB_DATAROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_587__NLAMBDAB_DATAROUT.obj_num = 6;
- cdat->dobj_587__NLAMBDAB_DATAROUT.obj_hash = 570578442;
+ cdat->dobj_587__NLAMBDAB_DATAROUT.obj_hash = 740924697;
cdat->dobj_587__NLAMBDAB_DATAROUT.obj_len = 4;
@@ -15632,7 +15631,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_591__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_591__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_hash =
- 889435029;
+ 84653002;
cdat->dobj_591__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_len = 8;
@@ -15701,7 +15700,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_597__NINSTB_SLOTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_597__NINSTB_SLOTS.obj_num = 4;
- cdat->dobj_597__NINSTB_SLOTS.obj_hash = 717012482;
+ cdat->dobj_597__NINSTB_SLOTS.obj_hash = 720424766;
cdat->dobj_597__NINSTB_SLOTS.obj_len = 4;
@@ -15759,7 +15758,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_601__NINSTB_CLABIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_601__NINSTB_CLABIND.obj_num = 5;
- cdat->dobj_601__NINSTB_CLABIND.obj_hash = 602160088;
+ cdat->dobj_601__NINSTB_CLABIND.obj_hash = 659168720;
cdat->dobj_601__NINSTB_CLABIND.obj_len = 4;
@@ -15818,7 +15817,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_605__CLASS_NREP_ANYPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_605__CLASS_NREP_ANYPROC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_605__CLASS_NREP_ANYPROC.obj_hash = 139635761;
+ cdat->dobj_605__CLASS_NREP_ANYPROC.obj_hash = 989138435;
cdat->dobj_605__CLASS_NREP_ANYPROC.obj_len = 8;
@@ -15885,7 +15884,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_611__NPROC_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_611__NPROC_BODY.obj_num = 1;
- cdat->dobj_611__NPROC_BODY.obj_hash = 618411944;
+ cdat->dobj_611__NPROC_BODY.obj_hash = 461960296;
cdat->dobj_611__NPROC_BODY.obj_len = 4;
@@ -15941,7 +15940,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_615__CLASS_NREP_INITPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_615__CLASS_NREP_INITPROC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_615__CLASS_NREP_INITPROC.obj_hash = 331486222;
+ cdat->dobj_615__CLASS_NREP_INITPROC.obj_hash = 346444616;
cdat->dobj_615__CLASS_NREP_INITPROC.obj_len = 8;
@@ -16008,7 +16007,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_621__NINIT_TOPL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_621__NINIT_TOPL.obj_num = 2;
- cdat->dobj_621__NINIT_TOPL.obj_hash = 1044699593;
+ cdat->dobj_621__NINIT_TOPL.obj_hash = 511650248;
cdat->dobj_621__NINIT_TOPL.obj_len = 4;
@@ -16064,7 +16063,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_625__NINIT_DEFBINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_625__NINIT_DEFBINDS.obj_num = 3;
- cdat->dobj_625__NINIT_DEFBINDS.obj_hash = 5184947;
+ cdat->dobj_625__NINIT_DEFBINDS.obj_hash = 362105827;
cdat->dobj_625__NINIT_DEFBINDS.obj_len = 4;
@@ -16123,7 +16122,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_629__CLASS_NREP_ROUTPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_629__CLASS_NREP_ROUTPROC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_629__CLASS_NREP_ROUTPROC.obj_hash = 659581709;
+ cdat->dobj_629__CLASS_NREP_ROUTPROC.obj_hash = 426738835;
cdat->dobj_629__CLASS_NREP_ROUTPROC.obj_len = 8;
@@ -16190,7 +16189,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_635__NRPRO_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_635__NRPRO_NAME.obj_num = 2;
- cdat->dobj_635__NRPRO_NAME.obj_hash = 851309675;
+ cdat->dobj_635__NRPRO_NAME.obj_hash = 983764410;
cdat->dobj_635__NRPRO_NAME.obj_len = 4;
@@ -16242,7 +16241,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_639__NRPRO_ARGB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_639__NRPRO_ARGB.obj_num = 3;
- cdat->dobj_639__NRPRO_ARGB.obj_hash = 562819424;
+ cdat->dobj_639__NRPRO_ARGB.obj_hash = 1012445302;
cdat->dobj_639__NRPRO_ARGB.obj_len = 4;
@@ -16297,7 +16296,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_643__NRPRO_CLOSEDB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_643__NRPRO_CLOSEDB.obj_num = 4;
- cdat->dobj_643__NRPRO_CLOSEDB.obj_hash = 644527014;
+ cdat->dobj_643__NRPRO_CLOSEDB.obj_hash = 926961260;
cdat->dobj_643__NRPRO_CLOSEDB.obj_len = 4;
@@ -16352,7 +16351,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_647__NRPRO_CONST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_647__NRPRO_CONST.obj_num = 5;
- cdat->dobj_647__NRPRO_CONST.obj_hash = 209413689;
+ cdat->dobj_647__NRPRO_CONST.obj_hash = 701062576;
cdat->dobj_647__NRPRO_CONST.obj_len = 4;
@@ -16409,7 +16408,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_651__NRPRO_DATAROUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_651__NRPRO_DATAROUT.obj_num = 6;
- cdat->dobj_651__NRPRO_DATAROUT.obj_hash = 90736620;
+ cdat->dobj_651__NRPRO_DATAROUT.obj_hash = 647775931;
cdat->dobj_651__NRPRO_DATAROUT.obj_len = 4;
@@ -16468,7 +16467,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_655__NRPRO_DATACLOS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_655__NRPRO_DATACLOS.obj_num = 7;
- cdat->dobj_655__NRPRO_DATACLOS.obj_hash = 859846971;
+ cdat->dobj_655__NRPRO_DATACLOS.obj_hash = 295413662;
cdat->dobj_655__NRPRO_DATACLOS.obj_len = 4;
@@ -16527,7 +16526,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_659__NRPRO_THUNKLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_659__NRPRO_THUNKLIST.obj_num = 8;
- cdat->dobj_659__NRPRO_THUNKLIST.obj_hash = 226380922;
+ cdat->dobj_659__NRPRO_THUNKLIST.obj_hash = 1061594803;
cdat->dobj_659__NRPRO_THUNKLIST.obj_len = 4;
@@ -16586,7 +16585,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_663__NRPRO_VARIADIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_663__NRPRO_VARIADIC.obj_num = 9;
- cdat->dobj_663__NRPRO_VARIADIC.obj_hash = 238327322;
+ cdat->dobj_663__NRPRO_VARIADIC.obj_hash = 95811920;
cdat->dobj_663__NRPRO_VARIADIC.obj_len = 4;
@@ -16647,7 +16646,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_667__CLASS_NREP_LAMBDAROUTPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_667__CLASS_NREP_LAMBDAROUTPROC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_667__CLASS_NREP_LAMBDAROUTPROC.obj_hash = 969185803;
+ cdat->dobj_667__CLASS_NREP_LAMBDAROUTPROC.obj_hash = 1070960423;
cdat->dobj_667__CLASS_NREP_LAMBDAROUTPROC.obj_len = 8;
@@ -16720,7 +16719,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_673__CLASS_NREP_DEFUNROUTPROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_673__CLASS_NREP_DEFUNROUTPROC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_673__CLASS_NREP_DEFUNROUTPROC.obj_hash = 486752128;
+ cdat->dobj_673__CLASS_NREP_DEFUNROUTPROC.obj_hash = 907445174;
cdat->dobj_673__CLASS_NREP_DEFUNROUTPROC.obj_len = 8;
@@ -16791,7 +16790,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_679__CLASS_NREP_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_679__CLASS_NREP_PREDEF.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_679__CLASS_NREP_PREDEF.obj_hash = 708578625;
+ cdat->dobj_679__CLASS_NREP_PREDEF.obj_hash = 817718257;
cdat->dobj_679__CLASS_NREP_PREDEF.obj_len = 8;
@@ -16858,7 +16857,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_685__NRPREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_685__NRPREDEF.obj_num = 1;
- cdat->dobj_685__NRPREDEF.obj_hash = 894214296;
+ cdat->dobj_685__NRPREDEF.obj_hash = 764641211;
cdat->dobj_685__NRPREDEF.obj_len = 4;
@@ -16914,7 +16913,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_689__CLASS_NREP_NIL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_689__CLASS_NREP_NIL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_689__CLASS_NREP_NIL.obj_hash = 379460275;
+ cdat->dobj_689__CLASS_NREP_NIL.obj_hash = 157147990;
cdat->dobj_689__CLASS_NREP_NIL.obj_len = 8;
@@ -16985,7 +16984,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_695__CLASS_NREP_QUASIDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_695__CLASS_NREP_QUASIDATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_695__CLASS_NREP_QUASIDATA.obj_hash = 323585395;
+ cdat->dobj_695__CLASS_NREP_QUASIDATA.obj_hash = 251262141;
cdat->dobj_695__CLASS_NREP_QUASIDATA.obj_len = 8;
@@ -17058,7 +17057,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_701__CLASS_NREP_BOUND_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_701__CLASS_NREP_BOUND_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_701__CLASS_NREP_BOUND_DATA.obj_hash = 419489175;
+ cdat->dobj_701__CLASS_NREP_BOUND_DATA.obj_hash = 977886352;
cdat->dobj_701__CLASS_NREP_BOUND_DATA.obj_len = 8;
@@ -17125,7 +17124,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_707__NDATA_NAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_707__NDATA_NAME.obj_num = 1;
- cdat->dobj_707__NDATA_NAME.obj_hash = 11981353;
+ cdat->dobj_707__NDATA_NAME.obj_hash = 665884806;
cdat->dobj_707__NDATA_NAME.obj_len = 4;
@@ -17177,7 +17176,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_711__NDATA_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_711__NDATA_RANK.obj_num = 2;
- cdat->dobj_711__NDATA_RANK.obj_hash = 884376111;
+ cdat->dobj_711__NDATA_RANK.obj_hash = 606299702;
cdat->dobj_711__NDATA_RANK.obj_len = 4;
@@ -17232,7 +17231,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_715__NDATA_LOCBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_715__NDATA_LOCBIND.obj_num = 3;
- cdat->dobj_715__NDATA_LOCBIND.obj_hash = 110578419;
+ cdat->dobj_715__NDATA_LOCBIND.obj_hash = 661987112;
cdat->dobj_715__NDATA_LOCBIND.obj_len = 4;
@@ -17292,7 +17291,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_719__CLASS_NREP_DISCRIMINATED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_719__CLASS_NREP_DISCRIMINATED_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_719__CLASS_NREP_DISCRIMINATED_DATA.obj_hash = 309048175;
+ cdat->dobj_719__CLASS_NREP_DISCRIMINATED_DATA.obj_hash = 51489104;
cdat->dobj_719__CLASS_NREP_DISCRIMINATED_DATA.obj_len = 8;
@@ -17361,7 +17360,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_725__NDATA_DISCRX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_725__NDATA_DISCRX.obj_num = 4;
- cdat->dobj_725__NDATA_DISCRX.obj_hash = 372448139;
+ cdat->dobj_725__NDATA_DISCRX.obj_hash = 1015628074;
cdat->dobj_725__NDATA_DISCRX.obj_len = 4;
@@ -17421,7 +17420,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_729__CLASS_NREP_DATAINSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_729__CLASS_NREP_DATAINSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_729__CLASS_NREP_DATAINSTANCE.obj_hash = 368439209;
+ cdat->dobj_729__CLASS_NREP_DATAINSTANCE.obj_hash = 365029829;
cdat->dobj_729__CLASS_NREP_DATAINSTANCE.obj_len = 8;
@@ -17490,7 +17489,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_735__NINST_OBJNUM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_735__NINST_OBJNUM.obj_num = 5;
- cdat->dobj_735__NINST_OBJNUM.obj_hash = 814314844;
+ cdat->dobj_735__NINST_OBJNUM.obj_hash = 45606063;
cdat->dobj_735__NINST_OBJNUM.obj_len = 4;
@@ -17546,7 +17545,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_739__NINST_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_739__NINST_PREDEF.obj_num = 6;
- cdat->dobj_739__NINST_PREDEF.obj_hash = 94635059;
+ cdat->dobj_739__NINST_PREDEF.obj_hash = 741810748;
cdat->dobj_739__NINST_PREDEF.obj_len = 4;
@@ -17600,7 +17599,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_743__NINST_HASH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_743__NINST_HASH.obj_num = 7;
- cdat->dobj_743__NINST_HASH.obj_hash = 43894383;
+ cdat->dobj_743__NINST_HASH.obj_hash = 1009414693;
cdat->dobj_743__NINST_HASH.obj_len = 4;
@@ -17653,7 +17652,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_747__NINST_SLOTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_747__NINST_SLOTS.obj_num = 8;
- cdat->dobj_747__NINST_SLOTS.obj_hash = 709540908;
+ cdat->dobj_747__NINST_SLOTS.obj_hash = 927759700;
cdat->dobj_747__NINST_SLOTS.obj_len = 4;
@@ -17712,7 +17711,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_751__CLASS_NREP_DATASTRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_751__CLASS_NREP_DATASTRING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_751__CLASS_NREP_DATASTRING.obj_hash = 101362157;
+ cdat->dobj_751__CLASS_NREP_DATASTRING.obj_hash = 372908211;
cdat->dobj_751__CLASS_NREP_DATASTRING.obj_len = 8;
@@ -17780,7 +17779,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_757__NSTR_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_757__NSTR_STRING.obj_num = 5;
- cdat->dobj_757__NSTR_STRING.obj_hash = 104529986;
+ cdat->dobj_757__NSTR_STRING.obj_hash = 866276697;
cdat->dobj_757__NSTR_STRING.obj_len = 4;
@@ -17839,7 +17838,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_761__CLASS_NREP_DATABOXEDINTEGER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_761__CLASS_NREP_DATABOXEDINTEGER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_761__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 912189252;
+ cdat->dobj_761__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 956491007;
cdat->dobj_761__CLASS_NREP_DATABOXEDINTEGER.obj_len = 8;
@@ -17907,7 +17906,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_767__NBOXINT_NUM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_767__NBOXINT_NUM.obj_num = 5;
- cdat->dobj_767__NBOXINT_NUM.obj_hash = 517883845;
+ cdat->dobj_767__NBOXINT_NUM.obj_hash = 427572235;
cdat->dobj_767__NBOXINT_NUM.obj_len = 4;
@@ -17964,7 +17963,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_771__CLASS_NREP_DATATUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_771__CLASS_NREP_DATATUPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_771__CLASS_NREP_DATATUPLE.obj_hash = 517787481;
+ cdat->dobj_771__CLASS_NREP_DATATUPLE.obj_hash = 274248432;
cdat->dobj_771__CLASS_NREP_DATATUPLE.obj_len = 8;
@@ -18031,7 +18030,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_777__NTUP_COMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_777__NTUP_COMP.obj_num = 5;
- cdat->dobj_777__NTUP_COMP.obj_hash = 521914560;
+ cdat->dobj_777__NTUP_COMP.obj_hash = 332167797;
cdat->dobj_777__NTUP_COMP.obj_len = 4;
@@ -18089,7 +18088,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_781__CLASS_NREP_DATASYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_781__CLASS_NREP_DATASYMBOL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_781__CLASS_NREP_DATASYMBOL.obj_hash = 303418964;
+ cdat->dobj_781__CLASS_NREP_DATASYMBOL.obj_hash = 442775915;
cdat->dobj_781__CLASS_NREP_DATASYMBOL.obj_len = 8;
@@ -18158,7 +18157,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_787__NDSY_NAMESTR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_787__NDSY_NAMESTR.obj_num = 9;
- cdat->dobj_787__NDSY_NAMESTR.obj_hash = 716539615;
+ cdat->dobj_787__NDSY_NAMESTR.obj_hash = 494034829;
cdat->dobj_787__NDSY_NAMESTR.obj_len = 4;
@@ -18218,7 +18217,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_791__CLASS_NREP_DATAKEYWORD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_791__CLASS_NREP_DATAKEYWORD.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_791__CLASS_NREP_DATAKEYWORD.obj_hash = 707991564;
+ cdat->dobj_791__CLASS_NREP_DATAKEYWORD.obj_hash = 182202170;
cdat->dobj_791__CLASS_NREP_DATAKEYWORD.obj_len = 8;
@@ -18291,7 +18290,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_797__CLASS_NREP_DATAROUTINE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_797__CLASS_NREP_DATAROUTINE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_797__CLASS_NREP_DATAROUTINE.obj_hash = 500520642;
+ cdat->dobj_797__CLASS_NREP_DATAROUTINE.obj_hash = 404493362;
cdat->dobj_797__CLASS_NREP_DATAROUTINE.obj_len = 8;
@@ -18358,7 +18357,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_803__NDROU_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_803__NDROU_PROC.obj_num = 5;
- cdat->dobj_803__NDROU_PROC.obj_hash = 355057875;
+ cdat->dobj_803__NDROU_PROC.obj_hash = 253161341;
cdat->dobj_803__NDROU_PROC.obj_len = 4;
@@ -18416,7 +18415,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_807__CLASS_NREP_DATACLOSURE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_807__CLASS_NREP_DATACLOSURE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_807__CLASS_NREP_DATACLOSURE.obj_hash = 794908637;
+ cdat->dobj_807__CLASS_NREP_DATACLOSURE.obj_hash = 482980938;
cdat->dobj_807__CLASS_NREP_DATACLOSURE.obj_len = 8;
@@ -18483,7 +18482,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_813__NDCLO_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_813__NDCLO_PROC.obj_num = 5;
- cdat->dobj_813__NDCLO_PROC.obj_hash = 244614080;
+ cdat->dobj_813__NDCLO_PROC.obj_hash = 218671349;
cdat->dobj_813__NDCLO_PROC.obj_len = 4;
@@ -18536,7 +18535,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_817__NDCLO_CLOSV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_817__NDCLO_CLOSV.obj_num = 6;
- cdat->dobj_817__NDCLO_CLOSV.obj_hash = 264833157;
+ cdat->dobj_817__NDCLO_CLOSV.obj_hash = 668034934;
cdat->dobj_817__NDCLO_CLOSV.obj_len = 4;
@@ -18595,7 +18594,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_821__CLASS_NREP_IMPORTEDVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_821__CLASS_NREP_IMPORTEDVAL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_821__CLASS_NREP_IMPORTEDVAL.obj_hash = 171422503;
+ cdat->dobj_821__CLASS_NREP_IMPORTEDVAL.obj_hash = 50501172;
cdat->dobj_821__CLASS_NREP_IMPORTEDVAL.obj_len = 8;
@@ -18664,7 +18663,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_827__NIMPORT_SYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_827__NIMPORT_SYMB.obj_num = 1;
- cdat->dobj_827__NIMPORT_SYMB.obj_hash = 1070815957;
+ cdat->dobj_827__NIMPORT_SYMB.obj_hash = 559059754;
cdat->dobj_827__NIMPORT_SYMB.obj_len = 4;
@@ -18722,7 +18721,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_831__NIMPORT_SYDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_831__NIMPORT_SYDATA.obj_num = 2;
- cdat->dobj_831__NIMPORT_SYDATA.obj_hash = 952693984;
+ cdat->dobj_831__NIMPORT_SYDATA.obj_hash = 680958670;
cdat->dobj_831__NIMPORT_SYDATA.obj_len = 4;
@@ -18781,7 +18780,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_835__CLASS_NREP_SYMOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_835__CLASS_NREP_SYMOCC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_835__CLASS_NREP_SYMOCC.obj_hash = 419953514;
+ cdat->dobj_835__CLASS_NREP_SYMOCC.obj_hash = 323170478;
cdat->dobj_835__CLASS_NREP_SYMOCC.obj_len = 8;
@@ -18848,7 +18847,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_841__NOCC_SYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_841__NOCC_SYMB.obj_num = 1;
- cdat->dobj_841__NOCC_SYMB.obj_hash = 839265137;
+ cdat->dobj_841__NOCC_SYMB.obj_hash = 605694917;
cdat->dobj_841__NOCC_SYMB.obj_len = 4;
@@ -18900,7 +18899,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_845__NOCC_CTYP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_845__NOCC_CTYP.obj_num = 2;
- cdat->dobj_845__NOCC_CTYP.obj_hash = 371292529;
+ cdat->dobj_845__NOCC_CTYP.obj_hash = 18483643;
cdat->dobj_845__NOCC_CTYP.obj_len = 4;
@@ -18952,7 +18951,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_849__NOCC_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_849__NOCC_BIND.obj_num = 3;
- cdat->dobj_849__NOCC_BIND.obj_hash = 183148023;
+ cdat->dobj_849__NOCC_BIND.obj_hash = 418872250;
cdat->dobj_849__NOCC_BIND.obj_len = 4;
@@ -19008,7 +19007,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_853__CLASS_NREP_LOCSYMOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_853__CLASS_NREP_LOCSYMOCC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_853__CLASS_NREP_LOCSYMOCC.obj_hash = 963653811;
+ cdat->dobj_853__CLASS_NREP_LOCSYMOCC.obj_hash = 766829720;
cdat->dobj_853__CLASS_NREP_LOCSYMOCC.obj_len = 8;
@@ -19079,7 +19078,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_859__CLASS_NREP_CLOSEDOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_859__CLASS_NREP_CLOSEDOCC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_859__CLASS_NREP_CLOSEDOCC.obj_hash = 511013035;
+ cdat->dobj_859__CLASS_NREP_CLOSEDOCC.obj_hash = 517944653;
cdat->dobj_859__CLASS_NREP_CLOSEDOCC.obj_len = 8;
@@ -19148,7 +19147,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_865__NCLOC_PROCS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_865__NCLOC_PROCS.obj_num = 4;
- cdat->dobj_865__NCLOC_PROCS.obj_hash = 356237741;
+ cdat->dobj_865__NCLOC_PROCS.obj_hash = 297716340;
cdat->dobj_865__NCLOC_PROCS.obj_len = 4;
@@ -19205,7 +19204,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_869__CLASS_NREP_CONSTOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_869__CLASS_NREP_CONSTOCC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_869__CLASS_NREP_CONSTOCC.obj_hash = 674670201;
+ cdat->dobj_869__CLASS_NREP_CONSTOCC.obj_hash = 532297103;
cdat->dobj_869__CLASS_NREP_CONSTOCC.obj_len = 8;
@@ -19278,7 +19277,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_875__CLASS_NREP_QUASICONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_875__CLASS_NREP_QUASICONSTANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_875__CLASS_NREP_QUASICONSTANT.obj_hash = 595458464;
+ cdat->dobj_875__CLASS_NREP_QUASICONSTANT.obj_hash = 257215268;
cdat->dobj_875__CLASS_NREP_QUASICONSTANT.obj_len = 8;
@@ -19347,7 +19346,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_881__NCONST_SVAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_881__NCONST_SVAL.obj_num = 1;
- cdat->dobj_881__NCONST_SVAL.obj_hash = 1028892830;
+ cdat->dobj_881__NCONST_SVAL.obj_hash = 429150863;
cdat->dobj_881__NCONST_SVAL.obj_len = 4;
@@ -19402,7 +19401,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_885__NCONST_PROC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_885__NCONST_PROC.obj_num = 2;
- cdat->dobj_885__NCONST_PROC.obj_hash = 395134565;
+ cdat->dobj_885__NCONST_PROC.obj_hash = 47570347;
cdat->dobj_885__NCONST_PROC.obj_len = 4;
@@ -19457,7 +19456,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_889__NCONST_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_889__NCONST_DATA.obj_num = 3;
- cdat->dobj_889__NCONST_DATA.obj_hash = 952726365;
+ cdat->dobj_889__NCONST_DATA.obj_hash = 988928067;
cdat->dobj_889__NCONST_DATA.obj_len = 4;
@@ -19514,7 +19513,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_893__CLASS_NREP_CONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_893__CLASS_NREP_CONSTANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_893__CLASS_NREP_CONSTANT.obj_hash = 905663450;
+ cdat->dobj_893__CLASS_NREP_CONSTANT.obj_hash = 484804283;
cdat->dobj_893__CLASS_NREP_CONSTANT.obj_len = 8;
@@ -19587,7 +19586,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_899__CLASS_NREP_DEFINED_CONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_899__CLASS_NREP_DEFINED_CONSTANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_899__CLASS_NREP_DEFINED_CONSTANT.obj_hash = 987215677;
+ cdat->dobj_899__CLASS_NREP_DEFINED_CONSTANT.obj_hash = 175857055;
cdat->dobj_899__CLASS_NREP_DEFINED_CONSTANT.obj_len = 8;
@@ -19658,7 +19657,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_905__NCONST_DEFBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_905__NCONST_DEFBIND.obj_num = 4;
- cdat->dobj_905__NCONST_DEFBIND.obj_hash = 509089389;
+ cdat->dobj_905__NCONST_DEFBIND.obj_hash = 671854136;
cdat->dobj_905__NCONST_DEFBIND.obj_len = 4;
@@ -19728,7 +19727,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_909__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_num = MELTOBMAG_OBJECT;
cdat->dobj_909__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
- obj_hash = 578905167;
+ obj_hash = 1015170934;
cdat->dobj_909__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 8;
@@ -19806,7 +19805,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_915__NQCMEC_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_915__NQCMEC_COMMENT.obj_num = 4;
- cdat->dobj_915__NQCMEC_COMMENT.obj_hash = 670562423;
+ cdat->dobj_915__NQCMEC_COMMENT.obj_hash = 1012169506;
cdat->dobj_915__NQCMEC_COMMENT.obj_len = 4;
@@ -19876,7 +19875,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_919__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_num = MELTOBMAG_OBJECT;
cdat->dobj_919__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
- obj_hash = 302384328;
+ obj_hash = 480638668;
cdat->dobj_919__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 8;
@@ -19963,7 +19962,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_925__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_925__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_hash =
- 752426227;
+ 672349188;
cdat->dobj_925__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_len = 8;
@@ -20043,7 +20042,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_931__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_num =
MELTOBMAG_OBJECT;
cdat->dobj_931__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash =
- 81260100;
+ 98888438;
cdat->dobj_931__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 8;
@@ -20114,7 +20113,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_937__CLASS_NREP_FIELDACC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_937__CLASS_NREP_FIELDACC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_937__CLASS_NREP_FIELDACC.obj_hash = 639666053;
+ cdat->dobj_937__CLASS_NREP_FIELDACC.obj_hash = 49043128;
cdat->dobj_937__CLASS_NREP_FIELDACC.obj_len = 8;
@@ -20181,7 +20180,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_943__NACCF_OBJ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_943__NACCF_OBJ.obj_num = 1;
- cdat->dobj_943__NACCF_OBJ.obj_hash = 306598138;
+ cdat->dobj_943__NACCF_OBJ.obj_hash = 874795420;
cdat->dobj_943__NACCF_OBJ.obj_len = 4;
@@ -20233,7 +20232,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_947__NACCF_FLD.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_947__NACCF_FLD.obj_num = 2;
- cdat->dobj_947__NACCF_FLD.obj_hash = 296787860;
+ cdat->dobj_947__NACCF_FLD.obj_hash = 180387236;
cdat->dobj_947__NACCF_FLD.obj_len = 4;
@@ -20289,7 +20288,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_951__CLASS_NREP_MULTACC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_951__CLASS_NREP_MULTACC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_951__CLASS_NREP_MULTACC.obj_hash = 456095037;
+ cdat->dobj_951__CLASS_NREP_MULTACC.obj_hash = 193847907;
cdat->dobj_951__CLASS_NREP_MULTACC.obj_len = 8;
@@ -20356,7 +20355,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_957__NACCM_MUL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_957__NACCM_MUL.obj_num = 1;
- cdat->dobj_957__NACCM_MUL.obj_hash = 229119971;
+ cdat->dobj_957__NACCM_MUL.obj_hash = 718427559;
cdat->dobj_957__NACCM_MUL.obj_len = 4;
@@ -20408,7 +20407,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_961__NACCM_IX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_961__NACCM_IX.obj_num = 2;
- cdat->dobj_961__NACCM_IX.obj_hash = 459722678;
+ cdat->dobj_961__NACCM_IX.obj_hash = 236693091;
cdat->dobj_961__NACCM_IX.obj_len = 4;
@@ -20466,7 +20465,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_965__CLASS_NREP_STORE_PREDEFINED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_965__CLASS_NREP_STORE_PREDEFINED.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_965__CLASS_NREP_STORE_PREDEFINED.obj_hash = 596100597;
+ cdat->dobj_965__CLASS_NREP_STORE_PREDEFINED.obj_hash = 4322264;
cdat->dobj_965__CLASS_NREP_STORE_PREDEFINED.obj_len = 8;
@@ -20537,7 +20536,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_971__NSTPD_PREDEF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_971__NSTPD_PREDEF.obj_num = 1;
- cdat->dobj_971__NSTPD_PREDEF.obj_hash = 818580257;
+ cdat->dobj_971__NSTPD_PREDEF.obj_hash = 444324371;
cdat->dobj_971__NSTPD_PREDEF.obj_len = 4;
@@ -20594,7 +20593,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_975__NSTPD_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_975__NSTPD_VALUE.obj_num = 2;
- cdat->dobj_975__NSTPD_VALUE.obj_hash = 791837060;
+ cdat->dobj_975__NSTPD_VALUE.obj_hash = 1073061453;
cdat->dobj_975__NSTPD_VALUE.obj_len = 4;
@@ -20662,7 +20661,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_979__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_num = MELTOBMAG_OBJECT;
cdat->dobj_979__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
- obj_hash = 972354236;
+ obj_hash = 230792057;
cdat->dobj_979__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.
obj_len = 8;
@@ -20738,7 +20737,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_985__NUCMEB_EXPR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_985__NUCMEB_EXPR.obj_num = 1;
- cdat->dobj_985__NUCMEB_EXPR.obj_hash = 1048871745;
+ cdat->dobj_985__NUCMEB_EXPR.obj_hash = 749847668;
cdat->dobj_985__NUCMEB_EXPR.obj_len = 4;
@@ -20795,7 +20794,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_989__NCUMEB_COMMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_989__NCUMEB_COMMENT.obj_num = 2;
- cdat->dobj_989__NCUMEB_COMMENT.obj_hash = 239780846;
+ cdat->dobj_989__NCUMEB_COMMENT.obj_hash = 466494374;
cdat->dobj_989__NCUMEB_COMMENT.obj_len = 4;
@@ -20854,7 +20853,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_993__HAS_EXTRA_WARNINGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_993__HAS_EXTRA_WARNINGS.obj_hash = 478802163;
+ cdat->dobj_993__HAS_EXTRA_WARNINGS.obj_hash = 16055254;
cdat->dobj_993__HAS_EXTRA_WARNINGS.obj_len = 5;
/*inimult dtup_994__HAS_EXTRA_WARNINGS */
@@ -23887,7 +23886,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1206__LAST_GLOBPREDEF_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_1206__LAST_GLOBPREDEF_INDEX.obj_hash = 103884425;
+ cdat->dobj_1206__LAST_GLOBPREDEF_INDEX.obj_hash = 87280623;
cdat->dobj_1206__LAST_GLOBPREDEF_INDEX.obj_len = 5;
/*inimult dtup_1207__LAST_GLOBPREDEF_INDEX */
@@ -24042,7 +24041,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1219__NORMAL_EXP.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1219__NORMAL_EXP.obj_hash = 859233522;
+ cdat->dobj_1219__NORMAL_EXP.obj_hash = 303618392;
cdat->dobj_1219__NORMAL_EXP.obj_len = 4;
@@ -24257,7 +24256,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1237__GET_CTYPE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1237__GET_CTYPE.obj_hash = 79196424;
+ cdat->dobj_1237__GET_CTYPE.obj_hash = 226784518;
cdat->dobj_1237__GET_CTYPE.obj_len = 4;
@@ -24312,7 +24311,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1241__COMPILE_OBJ.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1241__COMPILE_OBJ.obj_hash = 631278366;
+ cdat->dobj_1241__COMPILE_OBJ.obj_hash = 123606807;
cdat->dobj_1241__COMPILE_OBJ.obj_len = 4;
@@ -24739,7 +24738,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1278.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1278.obj_num = 0;
- cdat->dobj_1278.obj_hash = 630461526;
+ cdat->dobj_1278.obj_hash = 647448414;
cdat->dobj_1278.obj_len = 2;
@@ -24786,7 +24785,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1281.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1281.obj_num = 1;
- cdat->dobj_1281.obj_hash = 11984127;
+ cdat->dobj_1281.obj_hash = 598724568;
cdat->dobj_1281.obj_len = 2;
@@ -24833,7 +24832,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1284.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1284.obj_num = 2;
- cdat->dobj_1284.obj_hash = 31404154;
+ cdat->dobj_1284.obj_hash = 679934305;
cdat->dobj_1284.obj_len = 2;
@@ -24880,7 +24879,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1287.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1287.obj_num = 3;
- cdat->dobj_1287.obj_hash = 700167666;
+ cdat->dobj_1287.obj_hash = 481547493;
cdat->dobj_1287.obj_len = 2;
@@ -24927,7 +24926,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1290.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1290.obj_num = 4;
- cdat->dobj_1290.obj_hash = 6281333;
+ cdat->dobj_1290.obj_hash = 638183052;
cdat->dobj_1290.obj_len = 2;
/*inimult dtup_1291__NORMALIZE_BINDING */
@@ -24952,7 +24951,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1292__NORMALIZE_BINDING.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1292__NORMALIZE_BINDING.obj_hash = 334078896;
+ cdat->dobj_1292__NORMALIZE_BINDING.obj_hash = 385394778;
cdat->dobj_1292__NORMALIZE_BINDING.obj_len = 4;
@@ -28326,7 +28325,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1569.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1569.obj_num = 0;
- cdat->dobj_1569.obj_hash = 357862522;
+ cdat->dobj_1569.obj_hash = 684095032;
cdat->dobj_1569.obj_len = 2;
@@ -28373,7 +28372,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1572.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1572.obj_num = 1;
- cdat->dobj_1572.obj_hash = 558358964;
+ cdat->dobj_1572.obj_hash = 56951771;
cdat->dobj_1572.obj_len = 2;
/*^iniobj */
@@ -28394,7 +28393,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1573.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1573.obj_num = 2;
- cdat->dobj_1573.obj_hash = 44209483;
+ cdat->dobj_1573.obj_hash = 723197883;
cdat->dobj_1573.obj_len = 2;
@@ -28441,7 +28440,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1576.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1576.obj_num = 3;
- cdat->dobj_1576.obj_hash = 1041315420;
+ cdat->dobj_1576.obj_hash = 585897614;
cdat->dobj_1576.obj_len = 2;
/*inimult dtup_1577__PREPARE_CONSTRUCTOR_BINDING */
@@ -28467,7 +28466,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1578__PREPARE_CONSTRUCTOR_BINDING.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1578__PREPARE_CONSTRUCTOR_BINDING.obj_hash = 964512371;
+ cdat->dobj_1578__PREPARE_CONSTRUCTOR_BINDING.obj_hash = 538550036;
cdat->dobj_1578__PREPARE_CONSTRUCTOR_BINDING.obj_len = 4;
@@ -28574,7 +28573,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1586.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1586.obj_num = 0;
- cdat->dobj_1586.obj_hash = 301774500;
+ cdat->dobj_1586.obj_hash = 542536840;
cdat->dobj_1586.obj_len = 2;
/*^iniobj */
@@ -28595,7 +28594,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1587.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1587.obj_num = 1;
- cdat->dobj_1587.obj_hash = 382927608;
+ cdat->dobj_1587.obj_hash = 10009542;
cdat->dobj_1587.obj_len = 2;
@@ -28642,7 +28641,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1590.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1590.obj_num = 2;
- cdat->dobj_1590.obj_hash = 321085050;
+ cdat->dobj_1590.obj_hash = 150826705;
cdat->dobj_1590.obj_len = 2;
/*^iniobj */
@@ -28663,7 +28662,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1591.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1591.obj_num = 3;
- cdat->dobj_1591.obj_hash = 873778782;
+ cdat->dobj_1591.obj_hash = 644229110;
cdat->dobj_1591.obj_len = 2;
/*^iniobj */
@@ -28684,7 +28683,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1592.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1592.obj_num = 4;
- cdat->dobj_1592.obj_hash = 289794978;
+ cdat->dobj_1592.obj_hash = 583027375;
cdat->dobj_1592.obj_len = 2;
/*^iniobj */
@@ -28705,7 +28704,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
cdat->dobj_1593.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_1593.obj_num = 5;
- cdat->dobj_1593.obj_hash = 1022815445;
+ cdat->dobj_1593.obj_hash = 1070045881;
cdat->dobj_1593.obj_len = 2;
/*inimult dtup_1594__NORMAL_LETREC_CONSTRUCTIVE */
@@ -28731,7 +28730,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_1595__NORMAL_LETREC_CONSTRUCTIVE.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V16*/ meltfptr[15]);
- cdat->dobj_1595__NORMAL_LETREC_CONSTRUCTIVE.obj_hash = 374645013;
+ cdat->dobj_1595__NORMAL_LETREC_CONSTRUCTIVE.obj_hash = 718486740;
cdat->dobj_1595__NORMAL_LETREC_CONSTRUCTIVE.obj_len = 4;
@@ -32185,7 +32184,8 @@ start_module_melt (void *modargp_)
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -139;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
+ /*minihash */ -3724;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_normal;
/**COMMENT: get previous environment **/ ;
@@ -107512,7 +107512,7 @@ forward_or_mark_module_start_frame_warmelt_normal (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -139);
+ meltframptr_->mcfr_nbvar == /*minihash */ -3724);
if (!marking && melt_is_forwarding)
{
dbgprintf
diff --git a/gcc/melt/generated/warmelt-normatch+01.c b/gcc/melt/generated/warmelt-normatch+01.c
index df21f0b8367..d25d9d9e9e9 100644
--- a/gcc/melt/generated/warmelt-normatch+01.c
+++ b/gcc/melt/generated/warmelt-normatch+01.c
@@ -690,7 +690,20 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -705,7 +718,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -721,7 +734,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -737,7 +750,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -752,7 +765,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -771,7 +784,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -784,7 +797,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -797,7 +810,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -812,7 +825,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -827,7 +840,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -842,7 +855,39 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -857,7 +902,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -870,7 +915,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -884,7 +929,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -900,7 +945,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -915,23 +960,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -945,7 +974,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -958,7 +987,22 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -971,7 +1015,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -986,7 +1030,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1001,7 +1045,22 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1017,7 +1076,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1032,7 +1091,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1047,7 +1106,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1063,7 +1122,45 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1082,7 +1179,26 @@ meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1101,7 +1217,7 @@ meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1120,7 +1236,7 @@ meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1135,7 +1251,7 @@ meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1150,7 +1266,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1165,7 +1281,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1180,7 +1296,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1195,7 +1311,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1208,7 +1324,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1223,7 +1339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1238,7 +1354,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1253,7 +1369,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1268,7 +1384,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1281,7 +1397,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1294,7 +1410,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1309,7 +1425,20 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1325,7 +1454,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1344,7 +1473,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1363,7 +1492,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1382,7 +1511,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1401,7 +1530,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1417,39 +1546,23 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1468,36 +1581,7 @@ meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1516,7 +1600,56 @@ meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1525,22 +1658,22 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1559,7 +1692,7 @@ meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1574,7 +1707,7 @@ meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1589,7 +1722,7 @@ meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1605,7 +1738,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1624,7 +1757,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1643,7 +1776,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1658,7 +1791,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1673,7 +1806,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1687,7 +1820,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1701,7 +1834,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1715,7 +1848,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1729,7 +1862,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1748,7 +1881,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1767,7 +1900,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1786,7 +1919,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1805,7 +1938,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1824,7 +1957,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1843,7 +1976,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1862,7 +1995,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1881,7 +2014,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1890,7 +2023,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1899,7 +2032,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1908,7 +2041,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1922,7 +2055,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1937,7 +2070,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1951,7 +2084,7 @@ meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1970,7 +2103,7 @@ meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1986,7 +2119,7 @@ meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2000,7 +2133,7 @@ meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2014,7 +2147,7 @@ meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2161,7 @@ meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2042,7 +2175,7 @@ meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -3466,7 +3599,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normatch.melt:206:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3485,7 +3623,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-normatch.melt:206:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V64*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V64*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3653,10 +3797,10 @@ meltrout_6_warmelt_normatch_SCANPAT_SRCPATCONSTRUCT (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 29
- void *mcfr_varptr[29];
-#define MELTFRAM_NBVARNUM 10
- long mcfr_varnum[10];
+#define MELTFRAM_NBVARPTR 33
+ void *mcfr_varptr[33];
+#define MELTFRAM_NBVARNUM 12
+ long mcfr_varnum[12];
/*others*/
long _spare_;
}
@@ -3667,13 +3811,13 @@ meltrout_6_warmelt_normatch_SCANPAT_SRCPATCONSTRUCT (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 29; ix++)
+ for (ix = 0; ix < 33; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 29;
+ meltfram__.mcfr_nbvar = 33;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -4086,7 +4230,7 @@ lab_endgetargs:;
argtab[2].meltbp_long = 229;
/*^apply.arg */
argtab[3].meltbp_cstring =
- "scanpat_srcpatconstruct cursubpa=";
+ "scanpat_srcpatconstruct before scan_pattern cursubpa=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.CURSUBPA__V20*/ meltfptr[18];
@@ -4167,6 +4311,114 @@ lab_endgetargs:;
""), argtab, "", (union meltparam_un *) 0);
}
;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:231:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
+ /*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-normatch.melt:231:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:231:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 231;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "scanpat_srcpatconstruct after scan_pattern cursubpa=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURSUBPA__V20*/ meltfptr[18];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " subix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#SUBIX__L6*/ meltfnum[0];
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V27*/ meltfptr[26] =
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:231:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V27*/ meltfptr[26] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:231:/ quasiblock");
+
+
+ /*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];;
+ /*^compute */
+
+ /*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[27];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:231:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V29*/ meltfptr[27] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
if ( /*_#SUBIX__L6*/ meltfnum[0] < 0)
break;
} /* end cit1__EACHTUP */
@@ -4181,11 +4433,13 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.SCAN_PATTERN__V25*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:232:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4200,7 +4454,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L11*/ meltfnum[1] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -4208,35 +4462,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:232:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:232:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1];
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 232;
+ argtab[2].meltbp_long = 233;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatconstruct done subpa=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.SUBPA__V16*/ meltfptr[15];
- /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] =
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -4246,48 +4500,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V27*/ meltfptr[26] =
- /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
+ /*_.IF___V31*/ meltfptr[27] =
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:232:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V27*/ meltfptr[26] = NULL;;
+ /*_.IF___V31*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:232:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ quasiblock");
- /*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];;
+ /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[27];;
/*^compute */
- /*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[27];;
+ /*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:232:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:233:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IF___V27*/ meltfptr[26] = 0;
+ /*clear *//*_.IF___V31*/ meltfptr[27] = 0;
/*^clear */
- /*clear *//*_.PROGN___V29*/ meltfptr[27] = 0;
+ /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
+ /*_.IFCPP___V30*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V26*/ meltfptr[22];;
+ /*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V30*/ meltfptr[26];;
MELT_LOCATION ("warmelt-normatch.melt:221:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
@@ -4298,7 +4552,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
+ /*clear *//*_.IFCPP___V30*/ meltfptr[26] = 0;
MELT_LOCATION ("warmelt-normatch.melt:217:/ quasiblock");
@@ -4396,7 +4650,7 @@ meltrout_7_warmelt_normatch_SCANPAT_SRCPATOBJECT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:241:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4437,7 +4691,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:242:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4460,7 +4714,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:242:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4470,7 +4724,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:242:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4480,7 +4734,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 242;
+ argtab[2].meltbp_long = 243;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatobject recv";
/*^apply.arg */
@@ -4499,7 +4753,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:242:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -4512,7 +4766,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:242:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -4521,7 +4775,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:242:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:243:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -4536,7 +4790,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:243:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:244:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4545,7 +4799,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:243:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:244:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4553,7 +4807,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:243:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:244:/ cond.else");
/*^block */
/*anyblock */
@@ -4567,7 +4821,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (243) ? (243) : __LINE__, __FUNCTION__);
+ (244) ? (244) : __LINE__, __FUNCTION__);
;
}
;
@@ -4582,7 +4836,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:243:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:244:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -4595,7 +4849,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:244:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:245:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4604,7 +4858,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OBJECT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:244:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:245:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4612,7 +4866,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:244:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:245:/ cond.else");
/*^block */
/*anyblock */
@@ -4626,7 +4880,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (244) ? (244) : __LINE__, __FUNCTION__);
+ (245) ? (245) : __LINE__, __FUNCTION__);
;
}
;
@@ -4641,7 +4895,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:244:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:245:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -4652,7 +4906,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:245:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:246:/ quasiblock");
/*^getslot */
@@ -4663,7 +4917,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:246:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:247:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SPAT_CLASS");
@@ -4671,7 +4925,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:247:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:248:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 4, "SPAT_FIELDS");
@@ -4681,7 +4935,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:249:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:250:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4690,7 +4944,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SCLA__V16*/ meltfptr[15]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:249:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:250:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4698,7 +4952,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:249:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:250:/ cond.else");
/*^block */
/*anyblock */
@@ -4712,7 +4966,7 @@ lab_endgetargs:;
melt_assert_failed (("check scla"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (249) ? (249) : __LINE__, __FUNCTION__);
+ (250) ? (250) : __LINE__, __FUNCTION__);
;
}
;
@@ -4727,7 +4981,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:249:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:250:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
@@ -4740,7 +4994,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:250:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:251:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4748,7 +5002,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L6*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SFIELDS__V17*/ meltfptr[16])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:250:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:251:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4756,7 +5010,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:250:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:251:/ cond.else");
/*^block */
/*anyblock */
@@ -4770,7 +5024,7 @@ lab_endgetargs:;
melt_assert_failed (("check sfields"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (250) ? (250) : __LINE__, __FUNCTION__);
+ (251) ? (251) : __LINE__, __FUNCTION__);
;
}
;
@@ -4785,7 +5039,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:250:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:251:/ clear");
/*clear *//*_#IS_MULTIPLE__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
@@ -4815,7 +5069,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:254:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:255:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4824,7 +5078,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.FLDPA__V22*/ meltfptr[20]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:254:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:255:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4832,7 +5086,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:254:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:255:/ cond.else");
/*^block */
/*anyblock */
@@ -4846,7 +5100,7 @@ lab_endgetargs:;
melt_assert_failed (("check fldp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (254) ? (254) : __LINE__,
+ __FILE__, (255) ? (255) : __LINE__,
__FUNCTION__);
;
}
@@ -4862,7 +5116,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.IFELSE___V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:254:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:255:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
@@ -4873,14 +5127,20 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:255:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:256:/ quasiblock");
/*^quasiblock */
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLDPA__V22*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLDPA__V22*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4900,7 +5160,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:256:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:257:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4909,7 +5169,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.F__V27*/ meltfptr[26]),
(melt_ptr_t) (( /*!CLASS_FIELD */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:256:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:257:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4917,7 +5177,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:256:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:257:/ cond.else");
/*^block */
/*anyblock */
@@ -4931,7 +5191,7 @@ lab_endgetargs:;
melt_assert_failed (("check fld"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (256) ? (256) : __LINE__,
+ __FILE__, (257) ? (257) : __LINE__,
__FUNCTION__);
;
}
@@ -4947,7 +5207,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[27] = /*_.IFELSE___V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:257:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0;
@@ -4962,13 +5222,18 @@ lab_endgetargs:;
/*_.LET___V26*/ meltfptr[25] = /*_.F__V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:255:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:256:/ clear");
/*clear *//*_.F__V27*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.IFCPP___V28*/ meltfptr[27] = 0;
/*_.FLD__V30*/ meltfptr[28] = /*_.LET___V26*/ meltfptr[25];;
- MELT_LOCATION ("warmelt-normatch.melt:258:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V30*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:259:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V30*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4986,7 +5251,7 @@ lab_endgetargs:;
/*_.FLCLA__V31*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:259:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:260:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLDPA__V22*/ meltfptr[20]), 3, "SPAF_PATTERN");
@@ -5005,7 +5270,7 @@ lab_endgetargs:;
/*_#NOT__L11*/ meltfnum[10] =
(!( /*_#SUBCLASS_OR_EQ__L10*/ meltfnum[0]));;
- MELT_LOCATION ("warmelt-normatch.melt:261:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:262:/ cond");
/*cond */ if ( /*_#NOT__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -5013,7 +5278,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:263:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:264:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLD__V30*/ meltfptr[28]), 1, "NAMED_NAME");
@@ -5023,7 +5288,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:262:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:263:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V15*/ meltfptr[14]),
("bad field in object pattern"),
@@ -5031,8 +5296,14 @@ lab_endgetargs:;
meltfptr[33]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:264:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SCLA__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:265:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SCLA__V16*/
+ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5052,7 +5323,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:264:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:265:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V15*/ meltfptr[14]),
("class in pattern is"),
@@ -5060,8 +5331,14 @@ lab_endgetargs:;
meltfptr[34]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:265:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLCLA__V31*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:266:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLCLA__V31*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5081,7 +5358,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:265:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:266:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V15*/ meltfptr[14]),
("class of field is"),
@@ -5089,14 +5366,14 @@ lab_endgetargs:;
meltfptr[35]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:266:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:267:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:266:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:267:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:261:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:262:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[37] =
@@ -5107,7 +5384,7 @@ lab_endgetargs:;
/*_.PROGN___V38*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:261:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:262:/ clear");
/*clear *//*_.NAMED_NAME__V34*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V35*/ meltfptr[34] = 0;
@@ -5126,7 +5403,7 @@ lab_endgetargs:;
/*_.IFELSE___V33*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:267:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:268:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -5151,7 +5428,7 @@ lab_endgetargs:;
/*_.LET___V25*/ meltfptr[23] =
/*_.SCAN_PATTERN__V39*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-normatch.melt:255:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:256:/ clear");
/*clear *//*_.LET___V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.FLD__V30*/ meltfptr[28] = 0;
@@ -5173,7 +5450,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:251:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:252:/ clear");
/*clear *//*_.FLDPA__V22*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_#IX__L7*/ meltfnum[1] = 0;
@@ -5185,7 +5462,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:270:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5208,7 +5485,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:270:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5218,7 +5495,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:270:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5229,7 +5506,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 270;
+ argtab[2].meltbp_long = 271;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatobject end recv";
/*^apply.arg */
@@ -5249,7 +5526,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:270:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[36] = 0;
@@ -5262,7 +5539,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:270:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[37] = /*_.IF___V41*/ meltfptr[35];;
@@ -5271,7 +5548,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[34] = /*_.PROGN___V43*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:270:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:271:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[35] = 0;
@@ -5288,7 +5565,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V40*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:245:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:246:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.SCLA__V16*/ meltfptr[15] = 0;
@@ -5300,11 +5577,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V20*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.IFCPP___V40*/ meltfptr[34] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:241:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:241:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -5400,7 +5677,7 @@ meltrout_8_warmelt_normatch_SCANPAT_SRCPATCOMPOSITE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:279:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -5441,7 +5718,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:280:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:281:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5450,7 +5727,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:280:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:281:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5458,7 +5735,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:280:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:281:/ cond.else");
/*^block */
/*anyblock */
@@ -5472,7 +5749,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (280) ? (280) : __LINE__, __FUNCTION__);
+ (281) ? (281) : __LINE__, __FUNCTION__);
;
}
;
@@ -5487,7 +5764,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:280:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:281:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -5500,7 +5777,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:281:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5523,7 +5800,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:281:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5533,7 +5810,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:281:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5543,7 +5820,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 281;
+ argtab[2].meltbp_long = 282;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatcomposite start recv=";
@@ -5570,7 +5847,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:281:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -5583,7 +5860,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:281:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -5592,7 +5869,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:281:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:282:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -5607,7 +5884,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:282:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:283:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5616,7 +5893,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:282:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:283:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -5624,7 +5901,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:282:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:283:/ cond.else");
/*^block */
/*anyblock */
@@ -5638,7 +5915,7 @@ lab_endgetargs:;
melt_assert_failed (("check ctyp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (282) ? (282) : __LINE__, __FUNCTION__);
+ (283) ? (283) : __LINE__, __FUNCTION__);
;
}
;
@@ -5653,7 +5930,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:282:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:283:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[9] = 0;
@@ -5666,7 +5943,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:283:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:284:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5674,7 +5951,7 @@ lab_endgetargs:;
/*_#IS_A__L5*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:283:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:284:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5682,7 +5959,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:283:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:284:/ cond.else");
/*^block */
/*anyblock */
@@ -5696,7 +5973,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (283) ? (283) : __LINE__, __FUNCTION__);
+ (284) ? (284) : __LINE__, __FUNCTION__);
;
}
;
@@ -5711,7 +5988,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[9] = /*_.IFELSE___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:283:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:284:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
@@ -5722,7 +5999,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:284:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:285:/ quasiblock");
/*^getslot */
@@ -5733,7 +6010,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:285:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:286:/ quasiblock");
/*^getslot */
@@ -5746,7 +6023,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:286:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5769,7 +6046,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:286:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -5779,7 +6056,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:286:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5789,7 +6066,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 286;
+ argtab[2].meltbp_long = 287;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite soper";
/*^apply.arg */
@@ -5809,7 +6086,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0;
@@ -5822,7 +6099,7 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:286:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ quasiblock");
/*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];;
@@ -5831,7 +6108,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:287:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IF___V21*/ meltfptr[20] = 0;
@@ -5846,7 +6123,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:287:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:288:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5855,7 +6132,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SOP__V19*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_ANY_MATCHER */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:287:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:288:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5863,7 +6140,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:287:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:288:/ cond.else");
/*^block */
/*anyblock */
@@ -5877,7 +6154,7 @@ lab_endgetargs:;
melt_assert_failed (("check soper"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (287) ? (287) : __LINE__, __FUNCTION__);
+ (288) ? (288) : __LINE__, __FUNCTION__);
;
}
;
@@ -5892,7 +6169,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[20] = /*_.IFELSE___V25*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:287:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:288:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V25*/ meltfptr[21] = 0;
@@ -5907,14 +6184,14 @@ lab_endgetargs:;
/*_.LET___V18*/ meltfptr[17] = /*_.SOP__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:285:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:286:/ clear");
/*clear *//*_.SOP__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.IFCPP___V24*/ meltfptr[20] = 0;
/*_.SOPER__V26*/ meltfptr[21] = /*_.LET___V18*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:289:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:290:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 7, "SPAC_INARGS");
@@ -5922,7 +6199,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:290:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:291:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 8, "SPAC_OUTARGS");
@@ -5930,7 +6207,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:291:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:292:/ quasiblock");
/*^getslot */
@@ -5943,7 +6220,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:292:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5966,7 +6243,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:292:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -5976,7 +6253,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:292:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5987,7 +6264,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 292;
+ argtab[2].meltbp_long = 293;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite matmb";
/*^apply.arg */
@@ -6007,7 +6284,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:292:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -6020,7 +6297,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:292:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -6029,7 +6306,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:292:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:293:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -6044,7 +6321,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:293:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:294:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6053,7 +6330,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MB__V30*/ meltfptr[29]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:293:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:294:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6061,7 +6338,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:293:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:294:/ cond.else");
/*^block */
/*anyblock */
@@ -6075,7 +6352,7 @@ lab_endgetargs:;
melt_assert_failed (("check matmb"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (293) ? (293) : __LINE__, __FUNCTION__);
+ (294) ? (294) : __LINE__, __FUNCTION__);
;
}
;
@@ -6090,7 +6367,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[31] = /*_.IFELSE___V36*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:293:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:294:/ clear");
/*clear *//*_#IS_A__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0;
@@ -6105,14 +6382,14 @@ lab_endgetargs:;
/*_.LET___V29*/ meltfptr[20] = /*_.MB__V30*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-normatch.melt:291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:292:/ clear");
/*clear *//*_.MB__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.IFCPP___V35*/ meltfptr[31] = 0;
/*_.MATMB__V37*/ meltfptr[32] = /*_.LET___V29*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:295:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:296:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SOPER__V26*/ meltfptr[21]), 2, "AMATCH_IN");
@@ -6120,7 +6397,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:296:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:297:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SOPER__V26*/ meltfptr[21]), 4, "AMATCH_OUT");
@@ -6128,7 +6405,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:297:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:298:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.SOPER__V26*/ meltfptr[21]), 1, "NAMED_NAME");
@@ -6136,7 +6413,7 @@ lab_endgetargs:;
meltfptr[31] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:298:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:299:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATMB__V37*/ meltfptr[32]), 1, "FBIND_TYPE");
@@ -6144,7 +6421,7 @@ lab_endgetargs:;
meltfptr[40] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:299:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:300:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 2, "PCTN_ENV");
@@ -6152,7 +6429,7 @@ lab_endgetargs:;
meltfptr[41] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:300:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:301:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 0, "PCTN_NORMCTXT");
@@ -6160,7 +6437,7 @@ lab_endgetargs:;
meltfptr[42] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:301:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:302:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 6, "PCTN_BINDLIST");
@@ -6170,7 +6447,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:303:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:304:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6179,7 +6456,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTYP__V41*/ meltfptr[40]),
(melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:303:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:304:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -6187,7 +6464,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:303:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:304:/ cond.else");
/*^block */
/*anyblock */
@@ -6201,7 +6478,7 @@ lab_endgetargs:;
melt_assert_failed (("check matctyp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (303) ? (303) : __LINE__, __FUNCTION__);
+ (304) ? (304) : __LINE__, __FUNCTION__);
;
}
;
@@ -6216,7 +6493,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = /*_.IFELSE___V46*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:304:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V46*/ meltfptr[45] = 0;
@@ -6229,7 +6506,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:304:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6252,7 +6529,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:304:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6262,7 +6539,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:304:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6273,7 +6550,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 304;
+ argtab[2].meltbp_long = 305;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite matout";
/*^apply.arg */
@@ -6293,7 +6570,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:304:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -6306,7 +6583,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:304:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];;
@@ -6315,7 +6592,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[45] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:304:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:305:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[47] = 0;
@@ -6332,7 +6609,7 @@ lab_endgetargs:;
/*_#__L15*/ meltfnum[2] =
(( /*_.CTYP__V4*/ meltfptr[3]) != ( /*_.MATCTYP__V41*/ meltfptr[40]));;
- MELT_LOCATION ("warmelt-normatch.melt:305:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:306:/ cond");
/*cond */ if ( /*_#__L15*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -6340,7 +6617,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:307:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:308:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTYP__V41*/ meltfptr[40]), 1, "NAMED_NAME");
@@ -6350,14 +6627,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:306:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:307:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V17*/ meltfptr[16]),
("invalid ctype in composite pattern - expecting"),
(melt_ptr_t) ( /*_.NAMED_NAME__V52*/
meltfptr[48]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:309:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:310:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3]), 1, "NAMED_NAME");
@@ -6367,7 +6644,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:308:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:309:/ locexp");
melt_warning_str (0, (melt_ptr_t) ( /*_.SLOC__V17*/ meltfptr[16]),
("got ctype"),
(melt_ptr_t) ( /*_.NAMED_NAME__V53*/
@@ -6376,7 +6653,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:310:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6399,7 +6676,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:310:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6409,7 +6686,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:310:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -6420,7 +6697,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 310;
+ argtab[2].meltbp_long = 311;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatcomposite mismatched ctyp=";
@@ -6454,7 +6731,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V56*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:310:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V56*/ meltfptr[55] = 0;
@@ -6467,7 +6744,7 @@ lab_endgetargs:;
/*_.IF___V55*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:310:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ quasiblock");
/*_.PROGN___V57*/ meltfptr[55] = /*_.IF___V55*/ meltfptr[54];;
@@ -6476,7 +6753,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[53] = /*_.PROGN___V57*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:310:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:311:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V55*/ meltfptr[54] = 0;
@@ -6489,14 +6766,14 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[53] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:313:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:314:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:313:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:314:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:305:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:306:/ quasiblock");
/*_.PROGN___V59*/ meltfptr[55] = /*_.RETURN___V58*/ meltfptr[54];;
@@ -6505,7 +6782,7 @@ lab_endgetargs:;
/*_.IFELSE___V51*/ meltfptr[47] = /*_.PROGN___V59*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:305:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:306:/ clear");
/*clear *//*_.NAMED_NAME__V52*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V53*/ meltfptr[52] = 0;
@@ -6524,7 +6801,7 @@ lab_endgetargs:;
/*_.IFELSE___V51*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:314:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:315:/ quasiblock");
/*^multiapply */
@@ -6556,7 +6833,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:317:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6579,7 +6856,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:317:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -6589,7 +6866,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:317:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6600,7 +6877,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 317;
+ argtab[2].meltbp_long = 318;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite nins";
/*^apply.arg */
@@ -6620,7 +6897,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V65*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] = 0;
@@ -6633,7 +6910,7 @@ lab_endgetargs:;
/*_.IF___V64*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:317:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[64] = /*_.IF___V64*/ meltfptr[55];;
@@ -6642,7 +6919,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[54] = /*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:318:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[55] = 0;
@@ -6655,7 +6932,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[54] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:318:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:319:/ cond");
/*cond */ if ( /*_.BINDINS__V62*/ meltfptr[53]) /*then */
{
/*^cond.then */
@@ -6683,7 +6960,7 @@ lab_endgetargs:;
/*_.LIST_APPEND2LIST__V68*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:318:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:319:/ clear");
/*clear *//*_.LIST_APPEND2LIST__V68*/ meltfptr[64] = 0;
}
;
@@ -6696,7 +6973,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:319:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6719,7 +6996,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:319:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6729,7 +7006,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:319:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -6740,7 +7017,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 319;
+ argtab[2].meltbp_long = 320;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite souts=";
/*^apply.arg */
@@ -6766,7 +7043,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -6779,7 +7056,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:319:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -6788,7 +7065,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[64] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:320:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -6819,7 +7096,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:323:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6842,7 +7119,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:323:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6852,7 +7129,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:323:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6863,7 +7140,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 323;
+ argtab[2].meltbp_long = 324;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatcomposite before scan_pattern pout";
@@ -6885,7 +7162,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V76*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:323:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V76*/ meltfptr[75] = 0;
@@ -6898,7 +7175,7 @@ lab_endgetargs:;
/*_.IF___V75*/ meltfptr[74] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:323:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ quasiblock");
/*_.PROGN___V77*/ meltfptr[75] = /*_.IF___V75*/ meltfptr[74];;
@@ -6907,7 +7184,7 @@ lab_endgetargs:;
/*_.IFCPP___V74*/ meltfptr[70] = /*_.PROGN___V77*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:323:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:324:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V75*/ meltfptr[74] = 0;
@@ -6920,15 +7197,21 @@ lab_endgetargs:;
/*_.IFCPP___V74*/ meltfptr[70] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:324:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:325:/ quasiblock");
/*_.CUROBIND__V79*/ meltfptr[75] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.MATOUT__V39*/ meltfptr[30]),
( /*_#IX__L22*/ meltfnum[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:325:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROBIND__V79*/ meltfptr[75]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:326:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROBIND__V79*/
+ meltfptr[75]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6948,7 +7231,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:327:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6971,7 +7254,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:327:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -6981,7 +7264,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:327:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -6992,7 +7275,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 327;
+ argtab[2].meltbp_long = 328;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatcomposite curobind=";
@@ -7020,7 +7303,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V83*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:327:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V83*/ meltfptr[82] = 0;
@@ -7033,7 +7316,7 @@ lab_endgetargs:;
/*_.IF___V82*/ meltfptr[81] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:327:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ quasiblock");
/*_.PROGN___V84*/ meltfptr[82] = /*_.IF___V82*/ meltfptr[81];;
@@ -7042,7 +7325,7 @@ lab_endgetargs:;
/*_.IFCPP___V81*/ meltfptr[80] = /*_.PROGN___V84*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:327:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:328:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IF___V82*/ meltfptr[81] = 0;
@@ -7057,7 +7340,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:328:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:329:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7067,7 +7350,7 @@ lab_endgetargs:;
( /*_.CURCTYPE__V80*/ meltfptr[79]),
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:328:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:329:/ cond");
/*cond */ if ( /*_#IS_A__L27*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7075,7 +7358,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:328:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:329:/ cond.else");
/*^block */
/*anyblock */
@@ -7089,7 +7372,7 @@ lab_endgetargs:;
melt_assert_failed (("check curctype"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (328) ? (328) : __LINE__,
+ __FILE__, (329) ? (329) : __LINE__,
__FUNCTION__);
;
}
@@ -7105,7 +7388,7 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[81] = /*_.IFELSE___V86*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:328:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:329:/ clear");
/*clear *//*_#IS_A__L27*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V86*/ meltfptr[82] = 0;
@@ -7116,7 +7399,7 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[81] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:329:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:330:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -7140,7 +7423,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:330:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7163,7 +7446,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:330:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -7173,7 +7456,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:330:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7184,7 +7467,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 330;
+ argtab[2].meltbp_long = 331;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpatcomposite after scan_pattern pout";
@@ -7206,7 +7489,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V90*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:330:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V90*/ meltfptr[89] = 0;
@@ -7219,7 +7502,7 @@ lab_endgetargs:;
/*_.IF___V89*/ meltfptr[88] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:330:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ quasiblock");
/*_.PROGN___V91*/ meltfptr[89] = /*_.IF___V89*/ meltfptr[88];;
@@ -7228,7 +7511,7 @@ lab_endgetargs:;
/*_.IFCPP___V88*/ meltfptr[87] = /*_.PROGN___V91*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:330:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:331:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IF___V89*/ meltfptr[88] = 0;
@@ -7245,7 +7528,7 @@ lab_endgetargs:;
/*_.LET___V78*/ meltfptr[74] = /*_.IFCPP___V88*/ meltfptr[87];;
- MELT_LOCATION ("warmelt-normatch.melt:324:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:325:/ clear");
/*clear *//*_.CUROBIND__V79*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.CURCTYPE__V80*/ meltfptr[79] = 0;
@@ -7263,7 +7546,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:320:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:321:/ clear");
/*clear *//*_.POUT__V73*/ meltfptr[69] = 0;
/*^clear */
/*clear *//*_#IX__L22*/ meltfnum[16] = 0;
@@ -7275,7 +7558,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:332:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7298,7 +7581,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:332:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7308,7 +7591,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:332:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7319,7 +7602,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 332;
+ argtab[2].meltbp_long = 333;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatcomposite end recv";
/*^apply.arg */
@@ -7339,7 +7622,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V94*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:332:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V94*/ meltfptr[75] = 0;
@@ -7352,7 +7635,7 @@ lab_endgetargs:;
/*_.IF___V93*/ meltfptr[89] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:332:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ quasiblock");
/*_.PROGN___V95*/ meltfptr[79] = /*_.IF___V93*/ meltfptr[89];;
@@ -7361,7 +7644,7 @@ lab_endgetargs:;
/*_.IFCPP___V92*/ meltfptr[88] = /*_.PROGN___V95*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:332:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:333:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V93*/ meltfptr[89] = 0;
@@ -7378,7 +7661,7 @@ lab_endgetargs:;
/*_.MULTI___V60*/ meltfptr[48] = /*_.IFCPP___V92*/ meltfptr[88];;
- MELT_LOCATION ("warmelt-normatch.melt:314:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:315:/ clear");
/*clear *//*_.IFCPP___V63*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[55] = 0;
@@ -7391,7 +7674,7 @@ lab_endgetargs:;
/*clear *//*_.BINDINS__V62*/ meltfptr[53] = 0;
/*_.LET___V16*/ meltfptr[14] = /*_.MULTI___V60*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:284:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:285:/ clear");
/*clear *//*_.SLOC__V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.LET___V18*/ meltfptr[17] = 0;
@@ -7429,11 +7712,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V51*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.MULTI___V60*/ meltfptr[48] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:279:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:279:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -7527,7 +7810,7 @@ meltrout_9_warmelt_normatch_SCANPAT_SRCPATOR (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:341:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7568,7 +7851,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:342:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7591,7 +7874,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:342:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7601,7 +7884,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:342:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7611,7 +7894,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 342;
+ argtab[2].meltbp_long = 343;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator recv";
/*^apply.arg */
@@ -7630,7 +7913,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -7643,7 +7926,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:342:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -7652,7 +7935,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:343:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -7667,7 +7950,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:343:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:344:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7676,7 +7959,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:343:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:344:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7684,7 +7967,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:343:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:344:/ cond.else");
/*^block */
/*anyblock */
@@ -7698,7 +7981,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (343) ? (343) : __LINE__, __FUNCTION__);
+ (344) ? (344) : __LINE__, __FUNCTION__);
;
}
;
@@ -7713,7 +7996,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:343:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:344:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -7726,7 +8009,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:344:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:345:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7735,7 +8018,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OR */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:344:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:345:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7743,7 +8026,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:344:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:345:/ cond.else");
/*^block */
/*anyblock */
@@ -7757,7 +8040,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (344) ? (344) : __LINE__, __FUNCTION__);
+ (345) ? (345) : __LINE__, __FUNCTION__);
;
}
;
@@ -7772,7 +8055,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:344:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:345:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -7785,7 +8068,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:345:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7808,7 +8091,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:345:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7818,7 +8101,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:345:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7828,7 +8111,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 345;
+ argtab[2].meltbp_long = 346;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator pcn start";
/*^apply.arg */
@@ -7848,7 +8131,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0;
@@ -7861,7 +8144,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:345:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ quasiblock");
/*_.PROGN___V17*/ meltfptr[15] = /*_.IF___V15*/ meltfptr[14];;
@@ -7870,7 +8153,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[12] = /*_.PROGN___V17*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:346:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V15*/ meltfptr[14] = 0;
@@ -7883,7 +8166,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:346:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:347:/ quasiblock");
/*^getslot */
@@ -7894,7 +8177,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:347:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:348:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ORPAT_DISJ");
@@ -7902,7 +8185,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:348:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:349:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 3, "PCTN_MAPATVAR");
@@ -7927,7 +8210,7 @@ lab_endgetargs:;
(meltgc_new_mapobjects
((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[3])),
( /*_#I__L9*/ meltfnum[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:351:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:352:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 10, "PCTN_VARHANDLERS");
@@ -7935,7 +8218,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:353:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ quasiblock");
/*^newclosure */
@@ -7972,7 +8255,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.OWNVARMAP__V22*/ meltfptr[21]);
;
/*_.OWNVARHANDLER__V24*/ meltfptr[23] = /*_.LAMBDA___V25*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-normatch.melt:361:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:362:/ quasiblock");
/*_#I__L10*/ meltfnum[9] =
@@ -8025,7 +8308,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:368:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:369:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.INIMAP__V27*/ meltfptr[26]),
(meltobject_ptr_t) ( /*_.CURSYM__V28*/
@@ -8042,7 +8325,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:365:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:366:/ clear");
/*clear *//*_.CURSYM__V28*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.CURPATVAR__V29*/ meltfptr[28] = 0;
@@ -8050,7 +8333,7 @@ lab_endgetargs:;
;
/*_.LET___V26*/ meltfptr[25] = /*_.INIMAP__V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:361:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:362:/ clear");
/*clear *//*_#I__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_#I__L11*/ meltfnum[10] = 0;
@@ -8061,7 +8344,7 @@ lab_endgetargs:;
/*_.INIPVARMAP__V30*/ meltfptr[26] = /*_.LET___V26*/ meltfptr[25];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:371:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8084,7 +8367,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:371:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -8094,7 +8377,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:371:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8105,7 +8388,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 371;
+ argtab[2].meltbp_long = 372;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator sdisj";
/*^apply.arg */
@@ -8125,7 +8408,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:371:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -8138,7 +8421,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:371:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -8147,7 +8430,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:371:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:372:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -8162,7 +8445,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:372:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:373:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8170,7 +8453,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L15*/ meltfnum[11] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SDISJ__V20*/ meltfptr[19])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:372:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:373:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L15*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -8178,7 +8461,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:372:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:373:/ cond.else");
/*^block */
/*anyblock */
@@ -8192,7 +8475,7 @@ lab_endgetargs:;
melt_assert_failed (("check sdisj"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (372) ? (372) : __LINE__, __FUNCTION__);
+ (373) ? (373) : __LINE__, __FUNCTION__);
;
}
;
@@ -8207,7 +8490,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[31] = /*_.IFELSE___V36*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:373:/ clear");
/*clear *//*_#IS_MULTIPLE__L15*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0;
@@ -8220,7 +8503,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:373:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:374:/ locexp");
meltgc_prepend_list ((melt_ptr_t)
( /*_.VARHDLERLIST__V23*/ meltfptr[22]),
(melt_ptr_t) ( /*_.OWNVARHANDLER__V24*/
@@ -8245,7 +8528,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:377:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8268,7 +8551,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:377:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -8278,7 +8561,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:377:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8289,7 +8572,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 377;
+ argtab[2].meltbp_long = 378;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator dis";
/*^apply.arg */
@@ -8310,7 +8593,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:377:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -8323,7 +8606,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:377:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];;
@@ -8332,7 +8615,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[37] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:377:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:378:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -8345,7 +8628,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[37] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:378:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:379:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -8373,7 +8656,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:374:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:375:/ clear");
/*clear *//*_.DIS__V37*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_#IX__L16*/ meltfnum[10] = 0;
@@ -8383,7 +8666,7 @@ lab_endgetargs:;
/*clear *//*_.SCAN_PATTERN__V42*/ meltfptr[38] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:380:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:381:/ quasiblock");
/*_#MAPOBJECT_COUNT__L19*/ meltfnum[11] =
@@ -8394,8 +8677,13 @@ lab_endgetargs:;
/*_#INCRPVARMAP__L20*/ meltfnum[9] =
(( /*_#MAPOBJECT_COUNT__L19*/ meltfnum[11]) -
( /*_#CNTPVARMAP__L7*/ meltfnum[0]));;
- MELT_LOCATION ("warmelt-normatch.melt:383:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:384:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8438,7 +8726,7 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.VARHDLERLIST__V23*/ meltfptr[22])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:388:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:389:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8446,7 +8734,7 @@ lab_endgetargs:;
/*_#IS_MAPOBJECT__L24*/ meltfnum[23] =
(melt_magic_discr ((melt_ptr_t) ( /*_.PMAPOR__V43*/ meltfptr[39])) ==
MELTOBMAG_MAPOBJECTS);;
- MELT_LOCATION ("warmelt-normatch.melt:388:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:389:/ cond");
/*cond */ if ( /*_#IS_MAPOBJECT__L24*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8454,7 +8742,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:388:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:389:/ cond.else");
/*^block */
/*anyblock */
@@ -8468,7 +8756,7 @@ lab_endgetargs:;
melt_assert_failed (("check pmapor"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (388) ? (388) : __LINE__, __FUNCTION__);
+ (389) ? (389) : __LINE__, __FUNCTION__);
;
}
;
@@ -8483,7 +8771,7 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[45] = /*_.IFELSE___V47*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:388:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:389:/ clear");
/*clear *//*_#IS_MAPOBJECT__L24*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V47*/ meltfptr[46] = 0;
@@ -8496,7 +8784,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:389:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:390:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8504,7 +8792,7 @@ lab_endgetargs:;
/*_#__L25*/ meltfnum[23] =
(( /*_.OLDVARHDLER__V45*/ meltfptr[44]) ==
( /*_.OWNVARHANDLER__V24*/ meltfptr[23]));;
- MELT_LOCATION ("warmelt-normatch.melt:389:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:390:/ cond");
/*cond */ if ( /*_#__L25*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8512,7 +8800,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:389:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:390:/ cond.else");
/*^block */
/*anyblock */
@@ -8526,7 +8814,7 @@ lab_endgetargs:;
melt_assert_failed (("check oldvarhdler"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (389) ? (389) : __LINE__, __FUNCTION__);
+ (390) ? (390) : __LINE__, __FUNCTION__);
;
}
;
@@ -8541,7 +8829,7 @@ lab_endgetargs:;
/*_.IFCPP___V48*/ meltfptr[46] = /*_.IFELSE___V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:389:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:390:/ clear");
/*clear *//*_#__L25*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V49*/ meltfptr[48] = 0;
@@ -8586,7 +8874,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:394:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:395:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8596,7 +8884,7 @@ lab_endgetargs:;
( /*_.CURSYM__V50*/ meltfptr[48]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */
meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:394:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:395:/ cond");
/*cond */ if ( /*_#IS_A__L26*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8604,7 +8892,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:394:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:395:/ cond.else");
/*^block */
/*anyblock */
@@ -8618,7 +8906,7 @@ lab_endgetargs:;
melt_assert_failed (("check cursym"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (394) ? (394) : __LINE__,
+ __FILE__, (395) ? (395) : __LINE__,
__FUNCTION__);
;
}
@@ -8634,7 +8922,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[51] = /*_.IFELSE___V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:394:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:395:/ clear");
/*clear *//*_#IS_A__L26*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V53*/ meltfptr[52] = 0;
@@ -8647,7 +8935,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:395:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:396:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8656,7 +8944,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURPATVAR__V51*/ meltfptr[50]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:395:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:396:/ cond");
/*cond */ if ( /*_#IS_A__L27*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8664,7 +8952,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:395:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:396:/ cond.else");
/*^block */
/*anyblock */
@@ -8678,7 +8966,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpatvar"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (395) ? (395) : __LINE__,
+ __FILE__, (396) ? (396) : __LINE__,
__FUNCTION__);
;
}
@@ -8694,7 +8982,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[52] = /*_.IFELSE___V55*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:395:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:396:/ clear");
/*clear *//*_#IS_A__L27*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V55*/ meltfptr[54] = 0;
@@ -8707,13 +8995,19 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:397:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:398:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:398:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATVAR__V51*/ meltfptr[50]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[9])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:399:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATVAR__V51*/
+ meltfptr[50]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8736,7 +9030,7 @@ lab_endgetargs:;
/*_#__L28*/ meltfnum[23] =
(( /*_.SPATVAR_SYMB__V57*/ meltfptr[56]) ==
( /*_.CURSYM__V50*/ meltfptr[48]));;
- MELT_LOCATION ("warmelt-normatch.melt:397:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:398:/ cond");
/*cond */ if ( /*_#__L28*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8744,7 +9038,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:397:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:398:/ cond.else");
/*^block */
/*anyblock */
@@ -8758,7 +9052,7 @@ lab_endgetargs:;
melt_assert_failed (("good curpatvar"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (397) ? (397) : __LINE__,
+ __FILE__, (398) ? (398) : __LINE__,
__FUNCTION__);
;
}
@@ -8774,7 +9068,7 @@ lab_endgetargs:;
/*_.IFCPP___V56*/ meltfptr[54] = /*_.IFELSE___V58*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:397:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:398:/ clear");
/*clear *//*_.SPATVAR_SYMB__V57*/ meltfptr[56] = 0;
/*^clear */
/*clear *//*_#__L28*/ meltfnum[23] = 0;
@@ -8798,7 +9092,7 @@ lab_endgetargs:;
/*_#NULL__L29*/ meltfnum[23] =
(( /*_.MAPOBJECT_GET__V59*/ meltfptr[56]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:399:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:400:/ cond");
/*cond */ if ( /*_#NULL__L29*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -8808,7 +9102,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:400:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:401:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.ORVARMAP__V44*/ meltfptr[43]),
(meltobject_ptr_t) ( /*_.CURSYM__V50*/ meltfptr[48]),
@@ -8829,7 +9123,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:391:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:392:/ clear");
/*clear *//*_.CURSYM__V50*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.CURPATVAR__V51*/ meltfptr[50] = 0;
@@ -8847,7 +9141,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:402:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8870,7 +9164,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:402:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -8880,7 +9174,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[30] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:402:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8891,7 +9185,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 402;
+ argtab[2].meltbp_long = 403;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator orvarmap";
/*^apply.arg */
@@ -8911,7 +9205,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:402:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0;
@@ -8924,7 +9218,7 @@ lab_endgetargs:;
/*_.IF___V61*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:402:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ quasiblock");
/*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[60];;
@@ -8933,7 +9227,7 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[57] = /*_.PROGN___V63*/ meltfptr[61];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:402:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:403:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V61*/ meltfptr[60] = 0;
@@ -8948,7 +9242,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:403:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:404:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.PMAPOR__V43*/ meltfptr[39]),
(meltobject_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
@@ -8957,7 +9251,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:380:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:381:/ clear");
/*clear *//*_#MAPOBJECT_COUNT__L19*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_#INCRPVARMAP__L20*/ meltfnum[9] = 0;
@@ -8981,7 +9275,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V60*/ meltfptr[57] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:405:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9004,7 +9298,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:405:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -9014,7 +9308,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L33*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:405:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -9025,7 +9319,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 405;
+ argtab[2].meltbp_long = 406;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpator end pcn=";
/*^apply.arg */
@@ -9051,7 +9345,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V66*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:405:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V66*/ meltfptr[39] = 0;
@@ -9064,7 +9358,7 @@ lab_endgetargs:;
/*_.IF___V65*/ meltfptr[61] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:405:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[43] = /*_.IF___V65*/ meltfptr[61];;
@@ -9073,7 +9367,7 @@ lab_endgetargs:;
/*_.IFCPP___V64*/ meltfptr[60] = /*_.PROGN___V67*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:405:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:406:/ clear");
/*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[61] = 0;
@@ -9090,7 +9384,7 @@ lab_endgetargs:;
/*_.LET___V18*/ meltfptr[14] = /*_.IFCPP___V64*/ meltfptr[60];;
- MELT_LOCATION ("warmelt-normatch.melt:346:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:347:/ clear");
/*clear *//*_.SLOC__V19*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.SDISJ__V20*/ meltfptr[19] = 0;
@@ -9118,11 +9412,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V35*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:341:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:341:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9214,7 +9508,7 @@ meltrout_10_warmelt_normatch_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:353:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ getarg");
/*_.MVAR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9246,7 +9540,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:354:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9269,7 +9563,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:354:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9279,7 +9573,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:354:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9289,7 +9583,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 354;
+ argtab[2].meltbp_long = 355;
/*^apply.arg */
argtab[3].meltbp_cstring =
"scanpat_srcpator.ownvarhandler mvar";
@@ -9309,7 +9603,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:354:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -9322,7 +9616,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:354:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -9331,7 +9625,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:354:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:355:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -9346,7 +9640,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:355:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:356:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9354,7 +9648,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.MVAR__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:355:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:356:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9362,7 +9656,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:355:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:356:/ cond.else");
/*^block */
/*anyblock */
@@ -9376,7 +9670,7 @@ lab_endgetargs:;
melt_assert_failed (("check mvar"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (355) ? (355) : __LINE__, __FUNCTION__);
+ (356) ? (356) : __LINE__, __FUNCTION__);
;
}
;
@@ -9391,7 +9685,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:355:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:356:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -9404,7 +9698,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:356:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:357:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9412,7 +9706,7 @@ lab_endgetargs:;
/*_#__L4*/ meltfnum[0] =
(( /*_.MYPCN__V3*/ meltfptr[2]) ==
(( /*~PCN */ meltfclos->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:356:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:357:/ cond");
/*cond */ if ( /*_#__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9420,7 +9714,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:356:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:357:/ cond.else");
/*^block */
/*anyblock */
@@ -9434,7 +9728,7 @@ lab_endgetargs:;
melt_assert_failed (("check mypcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (356) ? (356) : __LINE__, __FUNCTION__);
+ (357) ? (357) : __LINE__, __FUNCTION__);
;
}
;
@@ -9449,7 +9743,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:356:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:357:/ clear");
/*clear *//*_#__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -9460,7 +9754,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:357:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:358:/ quasiblock");
/*^getslot */
@@ -9473,7 +9767,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:358:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:359:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~OWNVARMAP */ meltfclos->tabval[1])),
(meltobject_ptr_t) ( /*_.MSYMB__V13*/
@@ -9482,11 +9776,11 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:357:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:358:/ clear");
/*clear *//*_.MSYMB__V13*/ meltfptr[11] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:353:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
@@ -9571,7 +9865,7 @@ meltrout_11_warmelt_normatch_SCANPAT_SRCPATAND (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:415:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9612,7 +9906,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:416:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9635,7 +9929,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:416:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9645,7 +9939,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:416:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9655,7 +9949,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 416;
+ argtab[2].meltbp_long = 417;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatand recv";
/*^apply.arg */
@@ -9674,7 +9968,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:416:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -9687,7 +9981,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:416:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -9696,7 +9990,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:416:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:417:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -9711,7 +10005,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:417:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:418:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9720,7 +10014,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:417:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:418:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9728,7 +10022,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:417:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:418:/ cond.else");
/*^block */
/*anyblock */
@@ -9742,7 +10036,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (417) ? (417) : __LINE__, __FUNCTION__);
+ (418) ? (418) : __LINE__, __FUNCTION__);
;
}
;
@@ -9757,7 +10051,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:417:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:418:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -9770,7 +10064,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:418:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:419:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9779,7 +10073,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_AND */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:418:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:419:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9787,7 +10081,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:418:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:419:/ cond.else");
/*^block */
/*anyblock */
@@ -9801,7 +10095,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (418) ? (418) : __LINE__, __FUNCTION__);
+ (419) ? (419) : __LINE__, __FUNCTION__);
;
}
;
@@ -9816,7 +10110,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:418:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:419:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -9827,7 +10121,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:419:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:420:/ quasiblock");
/*^getslot */
@@ -9838,7 +10132,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:420:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:421:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ANDPAT_CONJ");
@@ -9848,7 +10142,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:422:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:423:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9856,7 +10150,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L5*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SCONJ__V16*/ meltfptr[15])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:422:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:423:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9864,7 +10158,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:422:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:423:/ cond.else");
/*^block */
/*anyblock */
@@ -9878,7 +10172,7 @@ lab_endgetargs:;
melt_assert_failed (("check sconj"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (422) ? (422) : __LINE__, __FUNCTION__);
+ (423) ? (423) : __LINE__, __FUNCTION__);
;
}
;
@@ -9893,7 +10187,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:422:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:423:/ clear");
/*clear *//*_#IS_MULTIPLE__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
@@ -9920,7 +10214,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:426:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:427:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -9948,7 +10242,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:423:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:424:/ clear");
/*clear *//*_.DIS__V19*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_#IX__L6*/ meltfnum[0] = 0;
@@ -9958,7 +10252,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:428:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9981,7 +10275,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:428:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9991,7 +10285,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:428:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10001,7 +10295,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 428;
+ argtab[2].meltbp_long = 429;
/*^apply.arg */
argtab[3].meltbp_cstring = "scanpat_srcpatand end recv";
/*^apply.arg */
@@ -10021,7 +10315,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:428:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -10034,7 +10328,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:428:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -10043,7 +10337,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:428:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:429:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -10060,7 +10354,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V21*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:419:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:420:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.SCONJ__V16*/ meltfptr[15] = 0;
@@ -10068,11 +10362,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:415:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:415:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -10168,7 +10462,7 @@ meltrout_12_warmelt_normatch_REGISTER_NEW_NORMTESTER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:567:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ getarg");
/*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10189,7 +10483,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:568:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10212,7 +10506,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:568:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10222,7 +10516,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:568:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -10232,7 +10526,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 568;
+ argtab[2].meltbp_long = 569;
/*^apply.arg */
argtab[3].meltbp_cstring = "register_new_normtester ntest=";
/*^apply.arg */
@@ -10257,7 +10551,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:568:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -10270,7 +10564,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:568:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -10279,7 +10573,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:568:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:569:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -10294,7 +10588,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:569:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:570:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10303,7 +10597,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:569:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:570:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10311,7 +10605,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:569:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:570:/ cond.else");
/*^block */
/*anyblock */
@@ -10325,7 +10619,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (569) ? (569) : __LINE__, __FUNCTION__);
+ (570) ? (570) : __LINE__, __FUNCTION__);
;
}
;
@@ -10340,7 +10634,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:569:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:570:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -10353,7 +10647,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:570:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:571:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10362,7 +10656,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:570:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:571:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10370,7 +10664,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:570:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:571:/ cond.else");
/*^block */
/*anyblock */
@@ -10384,7 +10678,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (570) ? (570) : __LINE__, __FUNCTION__);
+ (571) ? (571) : __LINE__, __FUNCTION__);
;
}
;
@@ -10399,7 +10693,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:570:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:571:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -10410,7 +10704,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:571:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:572:/ quasiblock");
/*^getslot */
@@ -10421,7 +10715,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:572:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:573:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V3*/ meltfptr[2]), 7, "PCTN_STUFFMAP");
@@ -10431,7 +10725,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:574:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:575:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10439,7 +10733,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L5*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NMATCHED__V13*/ meltfptr[12]))
== MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:574:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:575:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10447,7 +10741,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:574:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:575:/ cond.else");
/*^block */
/*anyblock */
@@ -10461,7 +10755,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmatched"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (574) ? (574) : __LINE__, __FUNCTION__);
+ (575) ? (575) : __LINE__, __FUNCTION__);
;
}
;
@@ -10476,7 +10770,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:574:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:575:/ clear");
/*clear *//*_#IS_OBJECT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -10489,7 +10783,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:575:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:576:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10497,7 +10791,7 @@ lab_endgetargs:;
/*_#IS_MAPOBJECT__L6*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.STUFFMAP__V14*/ meltfptr[13]))
== MELTOBMAG_MAPOBJECTS);;
- MELT_LOCATION ("warmelt-normatch.melt:575:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:576:/ cond");
/*cond */ if ( /*_#IS_MAPOBJECT__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10505,7 +10799,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:575:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:576:/ cond.else");
/*^block */
/*anyblock */
@@ -10519,7 +10813,7 @@ lab_endgetargs:;
melt_assert_failed (("check stuffmap"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (575) ? (575) : __LINE__, __FUNCTION__);
+ (576) ? (576) : __LINE__, __FUNCTION__);
;
}
;
@@ -10534,7 +10828,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:575:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:576:/ clear");
/*clear *//*_#IS_MAPOBJECT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
@@ -10545,10 +10839,10 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:576:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:577:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:578:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:579:/ quasiblock");
/*_.NTL__V21*/ meltfptr[20] =
@@ -10561,7 +10855,7 @@ lab_endgetargs:;
/*_#IS_LIST__L7*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NTL__V21*/ meltfptr[20])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:579:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:580:/ cond");
/*cond */ if ( /*_#IS_LIST__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10569,13 +10863,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:579:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:580:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:581:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:582:/ quasiblock");
/*_.NEWNTL__V24*/ meltfptr[23] =
@@ -10584,7 +10878,7 @@ lab_endgetargs:;
(( /*!DISCR_LIST */ meltfrout->tabval[3]))));;
{
- MELT_LOCATION ("warmelt-normatch.melt:582:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:583:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.STUFFMAP__V14*/ meltfptr[13]),
(meltobject_ptr_t) ( /*_.NMATCHED__V13*/
@@ -10595,12 +10889,12 @@ lab_endgetargs:;
;
/*_.LET___V23*/ meltfptr[22] = /*_.NEWNTL__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-normatch.melt:581:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:582:/ clear");
/*clear *//*_.NEWNTL__V24*/ meltfptr[23] = 0;
/*_.IFELSE___V22*/ meltfptr[21] = /*_.LET___V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:579:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:580:/ clear");
/*clear *//*_.LET___V23*/ meltfptr[22] = 0;
}
;
@@ -10608,7 +10902,7 @@ lab_endgetargs:;
;
/*_.LET___V20*/ meltfptr[19] = /*_.IFELSE___V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-normatch.melt:578:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:579:/ clear");
/*clear *//*_.NTL__V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_#IS_LIST__L7*/ meltfnum[1] = 0;
@@ -10617,7 +10911,7 @@ lab_endgetargs:;
/*_.NTLIST__V25*/ meltfptr[23] = /*_.LET___V20*/ meltfptr[19];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:586:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:587:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10625,7 +10919,7 @@ lab_endgetargs:;
/*_#IS_LIST__L8*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NTLIST__V25*/ meltfptr[23])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:586:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:587:/ cond");
/*cond */ if ( /*_#IS_LIST__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10633,7 +10927,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:586:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:587:/ cond.else");
/*^block */
/*anyblock */
@@ -10647,7 +10941,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntlist"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (586) ? (586) : __LINE__, __FUNCTION__);
+ (587) ? (587) : __LINE__, __FUNCTION__);
;
}
;
@@ -10662,7 +10956,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = /*_.IFELSE___V27*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:586:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:587:/ clear");
/*clear *//*_#IS_LIST__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V27*/ meltfptr[20] = 0;
@@ -10675,14 +10969,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:587:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:588:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.NTLIST__V25*/ meltfptr[23]),
(melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:588:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10705,7 +10999,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:588:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10715,7 +11009,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:588:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10726,7 +11020,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 588;
+ argtab[2].meltbp_long = 589;
/*^apply.arg */
argtab[3].meltbp_cstring =
"register_new_normtester updated stuffmap";
@@ -10747,7 +11041,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:588:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0;
@@ -10760,7 +11054,7 @@ lab_endgetargs:;
/*_.IF___V29*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:588:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[20];;
@@ -10769,7 +11063,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[21] = /*_.PROGN___V31*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:588:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:589:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V29*/ meltfptr[20] = 0;
@@ -10782,16 +11076,16 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:589:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:590:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:589:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:590:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V19*/ meltfptr[17] = /*_.RETURN___V32*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:576:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:577:/ clear");
/*clear *//*_.LET___V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.NTLIST__V25*/ meltfptr[23] = 0;
@@ -10803,7 +11097,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V32*/ meltfptr[20] = 0;
/*_.LET___V12*/ meltfptr[10] = /*_.LET___V19*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:571:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:572:/ clear");
/*clear *//*_.NMATCHED__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.STUFFMAP__V14*/ meltfptr[13] = 0;
@@ -10813,11 +11107,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V17*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.LET___V19*/ meltfptr[17] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:567:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:567:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -10909,7 +11203,7 @@ meltrout_13_warmelt_normatch_PUT_TESTER_THEN (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:597:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ getarg");
/*_.CURTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -10931,7 +11225,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:598:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10954,7 +11248,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:598:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10964,7 +11258,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:598:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -10974,7 +11268,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 598;
+ argtab[2].meltbp_long = 599;
/*^apply.arg */
argtab[3].meltbp_cstring = "put_tester_then curtester=";
/*^apply.arg */
@@ -10999,7 +11293,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:598:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -11012,7 +11306,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:598:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -11021,7 +11315,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:598:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:599:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -11036,7 +11330,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:599:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:600:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11045,7 +11339,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CURTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:599:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:600:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11053,7 +11347,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:599:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:600:/ cond.else");
/*^block */
/*anyblock */
@@ -11067,7 +11361,7 @@ lab_endgetargs:;
melt_assert_failed (("check curtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (599) ? (599) : __LINE__, __FUNCTION__);
+ (600) ? (600) : __LINE__, __FUNCTION__);
;
}
;
@@ -11082,7 +11376,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:599:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:600:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -11095,7 +11389,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:600:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:601:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11104,7 +11398,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.THENTESTER__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:600:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:601:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11112,7 +11406,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:600:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:601:/ cond.else");
/*^block */
/*anyblock */
@@ -11126,7 +11420,7 @@ lab_endgetargs:;
melt_assert_failed (("check thentester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (600) ? (600) : __LINE__, __FUNCTION__);
+ (601) ? (601) : __LINE__, __FUNCTION__);
;
}
;
@@ -11141,7 +11435,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:600:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:601:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -11154,12 +11448,12 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:601:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:602:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:602:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:603:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURTESTER__V2*/ meltfptr[1]), 2, "NTEST_THEN");
@@ -11169,7 +11463,7 @@ lab_endgetargs:;
;
/*_#NULL__L5*/ meltfnum[1] =
(( /*_.NTEST_THEN__V13*/ meltfptr[12]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:601:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:602:/ cond");
/*cond */ if ( /*_#NULL__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11177,7 +11471,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:601:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:602:/ cond.else");
/*^block */
/*anyblock */
@@ -11191,7 +11485,7 @@ lab_endgetargs:;
melt_assert_failed (("check curtester has no then"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (601) ? (601) : __LINE__, __FUNCTION__);
+ (602) ? (602) : __LINE__, __FUNCTION__);
;
}
;
@@ -11206,7 +11500,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[10] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:601:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:602:/ clear");
/*clear *//*_.NTEST_THEN__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_#NULL__L5*/ meltfnum[1] = 0;
@@ -11219,7 +11513,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:603:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:604:/ quasiblock");
/*^getslot */
@@ -11232,7 +11526,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:604:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:605:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11240,7 +11534,7 @@ lab_endgetargs:;
/*_#IS_LIST__L6*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.THENCOME__V15*/ meltfptr[12]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:604:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:605:/ cond");
/*cond */ if ( /*_#IS_LIST__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11248,7 +11542,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:604:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:605:/ cond.else");
/*^block */
/*anyblock */
@@ -11262,7 +11556,7 @@ lab_endgetargs:;
melt_assert_failed (("check thencome"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (604) ? (604) : __LINE__, __FUNCTION__);
+ (605) ? (605) : __LINE__, __FUNCTION__);
;
}
;
@@ -11277,7 +11571,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[13] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:604:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:605:/ clear");
/*clear *//*_#IS_LIST__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -11290,19 +11584,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:605:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:606:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.THENCOME__V15*/ meltfptr[12]),
(melt_ptr_t) ( /*_.CURTESTER__V2*/ meltfptr[1]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:603:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:604:/ clear");
/*clear *//*_.THENCOME__V15*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.IFCPP___V16*/ meltfptr[13] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:606:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:607:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11311,7 +11605,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t) ( /*_.CURTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:606:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:607:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11319,7 +11613,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:606:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:607:/ cond.else");
/*^block */
/*anyblock */
@@ -11330,7 +11624,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check curtester not a normtester success"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (606) ? (606) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("check curtester not a normtester success"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (607) ? (607) : __LINE__, __FUNCTION__);
;
}
;
@@ -11345,7 +11639,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:607:/ clear");
/*clear *//*_#IS_NOT_A__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[12] = 0;
@@ -11356,7 +11650,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:608:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:609:/ quasiblock");
/*^putslot */
@@ -11376,7 +11670,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CURTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_DISJUNCTION */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:610:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:611:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11384,7 +11678,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:611:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:612:/ quasiblock");
/*^getslot */
@@ -11397,7 +11691,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:612:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11420,7 +11714,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:612:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11430,7 +11724,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:612:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11441,7 +11735,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 612;
+ argtab[2].meltbp_long = 613;
/*^apply.arg */
argtab[3].meltbp_cstring = "put_tester_then curdisjtuple";
/*^apply.arg */
@@ -11462,7 +11756,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:612:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -11475,7 +11769,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:612:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -11484,7 +11778,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[12] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:612:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:613:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -11517,7 +11811,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:616:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11540,7 +11834,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:616:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11550,7 +11844,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:616:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11561,7 +11855,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 616;
+ argtab[2].meltbp_long = 617;
/*^apply.arg */
argtab[3].meltbp_cstring =
"put_tester_then curdisj=";
@@ -11583,7 +11877,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:616:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
0;
/*^clear */
@@ -11597,7 +11891,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:616:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] =
@@ -11608,7 +11902,7 @@ lab_endgetargs:;
/*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:616:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:617:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[26] = 0;
@@ -11621,7 +11915,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:617:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:618:/ quasiblock");
/*^quasiblock */
@@ -11652,7 +11946,7 @@ lab_endgetargs:;
/*_.INST__V32*/ meltfptr[31];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:618:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11675,7 +11969,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:618:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -11685,7 +11979,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:618:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11696,7 +11990,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 618;
+ argtab[2].meltbp_long = 619;
/*^apply.arg */
argtab[3].meltbp_cstring =
"put_tester_then curcont start=";
@@ -11718,7 +12012,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:618:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[1] =
0;
/*^clear */
@@ -11732,7 +12026,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:618:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] =
@@ -11743,7 +12037,7 @@ lab_endgetargs:;
/*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:618:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:619:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -11756,7 +12050,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:619:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:620:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11776,7 +12070,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:620:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11799,7 +12093,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:620:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11809,7 +12103,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:620:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11820,7 +12114,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 620;
+ argtab[2].meltbp_long = 621;
/*^apply.arg */
argtab[3].meltbp_cstring =
"put_tester_then curcont done";
@@ -11842,7 +12136,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:620:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[12] =
0;
/*^clear */
@@ -11856,7 +12150,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:620:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] =
@@ -11867,7 +12161,7 @@ lab_endgetargs:;
/*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:620:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:621:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -11885,7 +12179,7 @@ lab_endgetargs:;
/*_.LET___V30*/ meltfptr[26] =
/*_.IFCPP___V38*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:617:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:618:/ clear");
/*clear *//*_.CURCONT__V31*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
@@ -11900,7 +12194,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:613:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:614:/ clear");
/*clear *//*_.CURDISJ__V25*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_#DISJIX__L11*/ meltfnum[9] = 0;
@@ -11911,7 +12205,7 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:612:/ clear");
/*clear *//*_.CURDISJTUPLE__V20*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.IFCPP___V21*/ meltfptr[12] = 0;
@@ -11922,7 +12216,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:623:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11945,7 +12239,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:623:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -11955,7 +12249,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:623:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11966,7 +12260,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 623;
+ argtab[2].meltbp_long = 624;
/*^apply.arg */
argtab[3].meltbp_cstring = "put_tester_then curtester done";
/*^apply.arg */
@@ -11986,7 +12280,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:623:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[27] = 0;
@@ -11999,7 +12293,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[39] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:623:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[32] = /*_.IF___V43*/ meltfptr[39];;
@@ -12008,7 +12302,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[38] = /*_.PROGN___V45*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:623:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:624:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[39] = 0;
@@ -12021,11 +12315,11 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[38] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:597:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V42*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:597:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12127,7 +12421,7 @@ meltrout_14_warmelt_normatch_SET_NEW_TESTER_LAST_THEN (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:627:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ getarg");
/*_.NEWTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12149,7 +12443,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:628:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12172,7 +12466,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:628:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12182,7 +12476,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:628:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -12192,7 +12486,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 628;
+ argtab[2].meltbp_long = 629;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_last_then newtester=";
@@ -12218,7 +12512,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:628:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -12231,7 +12525,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:628:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -12240,7 +12534,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:628:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:629:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -12255,7 +12549,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:629:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:630:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -12266,7 +12560,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:630:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:631:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12275,7 +12569,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NEWTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:630:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:631:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12283,7 +12577,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:630:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:631:/ cond.else");
/*^block */
/*anyblock */
@@ -12297,7 +12591,7 @@ lab_endgetargs:;
melt_assert_failed (("check newtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (630) ? (630) : __LINE__, __FUNCTION__);
+ (631) ? (631) : __LINE__, __FUNCTION__);
;
}
;
@@ -12312,7 +12606,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:630:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:631:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -12325,7 +12619,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:631:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:632:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12334,7 +12628,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TESTERCONT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:631:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:632:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12342,7 +12636,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:631:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:632:/ cond.else");
/*^block */
/*anyblock */
@@ -12356,7 +12650,7 @@ lab_endgetargs:;
melt_assert_failed (("check testercont"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (631) ? (631) : __LINE__, __FUNCTION__);
+ (632) ? (632) : __LINE__, __FUNCTION__);
;
}
;
@@ -12371,7 +12665,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:631:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:632:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -12382,11 +12676,17 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:632:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:633:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTERCONT__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTERCONT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12404,7 +12704,7 @@ lab_endgetargs:;
/*_.CURTESTER__V13*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:633:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:634:/ loop");
/*loop */
{
labloop_LASTESTERLOOP_1:; /*^loopbody */
@@ -12415,7 +12715,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:635:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12438,7 +12738,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:635:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12448,7 +12748,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:635:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12459,7 +12759,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 635;
+ argtab[2].meltbp_long = 636;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_last_then loop curtester";
@@ -12481,7 +12781,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:635:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0;
@@ -12494,7 +12794,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:635:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];;
@@ -12503,7 +12803,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:635:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:636:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[16] = 0;
@@ -12516,11 +12816,17 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:637:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:638:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURTESTER__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURTESTER__V13*/
+ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -12545,7 +12851,7 @@ lab_endgetargs:;
( /*_.NEXTESTER__V21*/ meltfptr[17]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:638:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:639:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12553,7 +12859,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:639:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:640:/ compute");
/*_.CURTESTER__V13*/ meltfptr[12] =
/*_.SETQ___V23*/ meltfptr[22] =
/*_.NEXTESTER__V21*/ meltfptr[17];;
@@ -12561,7 +12867,7 @@ lab_endgetargs:;
/*_.SETQ___V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:638:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:639:/ clear");
/*clear *//*_.SETQ___V23*/ meltfptr[22] = 0;
}
;
@@ -12573,7 +12879,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:640:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:641:/ quasiblock");
/*^compute */
@@ -12593,7 +12899,7 @@ lab_endgetargs:;
;
/*_.LET___V20*/ meltfptr[16] = /*_.IFELSE___V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-normatch.melt:637:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:638:/ clear");
/*clear *//*_.NEXTESTER__V21*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_#IS_A__L7*/ meltfnum[0] = 0;
@@ -12601,7 +12907,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:633:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:634:/ clear");
/*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.LET___V20*/ meltfptr[16] = 0;
@@ -12617,7 +12923,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:641:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12640,7 +12946,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:641:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12650,7 +12956,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:641:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12660,7 +12966,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 641;
+ argtab[2].meltbp_long = 642;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_last_then final curtester";
@@ -12681,7 +12987,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:641:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[21] = 0;
@@ -12694,7 +13000,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:641:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[15] = /*_.IF___V25*/ meltfptr[17];;
@@ -12703,7 +13009,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[22] = /*_.PROGN___V27*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:641:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:642:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[17] = 0;
@@ -12718,7 +13024,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:642:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:643:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12731,7 +13037,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:642:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:643:/ cond.else");
/*^block */
/*anyblock */
@@ -12742,7 +13048,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check curtester set_new_tester_last_then"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (642) ? (642) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("check curtester set_new_tester_last_then"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (643) ? (643) : __LINE__, __FUNCTION__);
;
}
;
@@ -12757,7 +13063,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[16] = /*_.IFELSE___V29*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:642:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:643:/ clear");
/*clear *//*_.IFELSE___V29*/ meltfptr[21] = 0;
}
@@ -12766,8 +13072,14 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:643:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTERCONT__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:644:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTERCONT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -12793,7 +13105,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:644:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:645:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12811,7 +13123,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:645:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12834,7 +13146,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:645:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12844,7 +13156,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:645:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12855,7 +13167,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 645;
+ argtab[2].meltbp_long = 646;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_last_then end testercont";
@@ -12876,7 +13188,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:645:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -12889,7 +13201,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:645:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[21];;
@@ -12898,7 +13210,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[15] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:645:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:646:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[21] = 0;
@@ -12915,7 +13227,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V31*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:632:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:633:/ clear");
/*clear *//*_.CURTESTER__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.FOREVER___V14*/ meltfptr[13] = 0;
@@ -12927,11 +13239,11 @@ lab_endgetargs:;
/*clear *//*_.PUT_TESTER_THEN__V30*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.IFCPP___V31*/ meltfptr[15] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:627:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:627:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13027,7 +13339,7 @@ meltrout_15_warmelt_normatch_SET_NEW_TESTER_ALL_ELSES (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:652:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ getarg");
/*_.NEWTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13059,7 +13371,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:653:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13082,7 +13394,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:653:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13092,7 +13404,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:653:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13102,7 +13414,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 653;
+ argtab[2].meltbp_long = 654;
/*^apply.arg */
argtab[3].meltbp_cstring = "set_new_tester_all_elses newtester";
/*^apply.arg */
@@ -13121,7 +13433,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:653:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -13134,7 +13446,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:653:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -13143,7 +13455,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:653:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:654:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -13158,7 +13470,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:654:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13181,7 +13493,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:654:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13191,7 +13503,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:654:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13201,7 +13513,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 654;
+ argtab[2].meltbp_long = 655;
/*^apply.arg */
argtab[3].meltbp_cstring = "set_new_tester_all_elses partester";
/*^apply.arg */
@@ -13221,7 +13533,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:654:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -13234,7 +13546,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:654:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
@@ -13243,7 +13555,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:654:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:655:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[6] = 0;
@@ -13258,7 +13570,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:655:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:656:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -13269,7 +13581,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:656:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:657:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13278,7 +13590,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NEWTESTER__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:656:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:657:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13286,7 +13598,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:656:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:657:/ cond.else");
/*^block */
/*anyblock */
@@ -13300,7 +13612,7 @@ lab_endgetargs:;
melt_assert_failed (("check newtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (656) ? (656) : __LINE__, __FUNCTION__);
+ (657) ? (657) : __LINE__, __FUNCTION__);
;
}
;
@@ -13315,7 +13627,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[6] = /*_.IFELSE___V14*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:656:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:657:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
@@ -13328,7 +13640,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:657:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:658:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13337,7 +13649,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PARTESTER__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:657:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:658:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13345,7 +13657,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:657:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:658:/ cond.else");
/*^block */
/*anyblock */
@@ -13359,7 +13671,7 @@ lab_endgetargs:;
melt_assert_failed (("check partester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (657) ? (657) : __LINE__, __FUNCTION__);
+ (658) ? (658) : __LINE__, __FUNCTION__);
;
}
;
@@ -13374,7 +13686,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[10] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:657:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:658:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -13389,7 +13701,7 @@ lab_endgetargs:;
/*_#NULL__L7*/ meltfnum[0] =
(( /*_.UPDATLIST__V4*/ meltfptr[3]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:658:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:659:/ cond");
/*cond */ if ( /*_#NULL__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13401,13 +13713,13 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
- MELT_LOCATION ("warmelt-normatch.melt:659:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:660:/ compute");
/*_.UPDATLIST__V4*/ meltfptr[3] = /*_.SETQ___V19*/ meltfptr[18] =
/*_.MAKE_LIST__V18*/ meltfptr[17];;
/*_.IF___V17*/ meltfptr[15] = /*_.SETQ___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:658:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:659:/ clear");
/*clear *//*_.MAKE_LIST__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.SETQ___V19*/ meltfptr[18] = 0;
@@ -13422,7 +13734,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:660:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:661:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13430,7 +13742,7 @@ lab_endgetargs:;
/*_#IS_LIST__L8*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.UPDATLIST__V4*/ meltfptr[3])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:660:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:661:/ cond");
/*cond */ if ( /*_#IS_LIST__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13438,7 +13750,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:660:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:661:/ cond.else");
/*^block */
/*anyblock */
@@ -13452,7 +13764,7 @@ lab_endgetargs:;
melt_assert_failed (("check updatlist"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (660) ? (660) : __LINE__, __FUNCTION__);
+ (661) ? (661) : __LINE__, __FUNCTION__);
;
}
;
@@ -13467,7 +13779,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[17] = /*_.IFELSE___V21*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:660:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:661:/ clear");
/*clear *//*_#IS_LIST__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[18] = 0;
@@ -13478,7 +13790,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[17] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:661:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:662:/ loop");
/*loop */
{
labloop_ALLELSELOOP_1:; /*^loopbody */
@@ -13489,7 +13801,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:663:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13512,7 +13824,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:663:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13522,7 +13834,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:663:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13533,7 +13845,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 663;
+ argtab[2].meltbp_long = 664;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_all_elses allelseloop partester";
@@ -13555,7 +13867,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:663:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -13568,7 +13880,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:663:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -13577,7 +13889,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:663:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:664:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
@@ -13594,7 +13906,7 @@ lab_endgetargs:;
/*_#NULL__L11*/ meltfnum[9] =
(( /*_.PARTESTER__V3*/ meltfptr[2]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:665:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:666:/ cond");
/*cond */ if ( /*_#NULL__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -13602,7 +13914,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:666:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:667:/ quasiblock");
/*^compute */
@@ -13621,7 +13933,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:665:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:666:/ cond.else");
/*^block */
/*anyblock */
@@ -13631,7 +13943,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.PARTESTER__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:667:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:668:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13639,7 +13951,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:668:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:669:/ quasiblock");
/*^getslot */
@@ -13650,7 +13962,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:669:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:670:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PARTESTER__V3*/ meltfptr[2]), 2, "NTEST_THEN");
@@ -13660,7 +13972,7 @@ lab_endgetargs:;
;
/*_#NULL__L13*/ meltfnum[12] =
(( /*_.ELTEST__V31*/ meltfptr[30]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:672:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:673:/ cond");
/*cond */ if ( /*_#NULL__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -13668,8 +13980,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:673:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PARTESTER__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:674:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PARTESTER__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -13702,7 +14019,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ cppif.then");
+ ("warmelt-normatch.melt:675:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13726,7 +14043,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ cond");
+ ("warmelt-normatch.melt:675:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -13737,7 +14054,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ apply");
+ ("warmelt-normatch.melt:675:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13750,7 +14067,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 674;
+ argtab[2].meltbp_long = 675;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_all_elses updated partester";
@@ -13778,7 +14095,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ clear");
+ ("warmelt-normatch.melt:675:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/
meltfnum[14] = 0;
/*^clear */
@@ -13794,7 +14111,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ quasiblock");
+ ("warmelt-normatch.melt:675:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] =
@@ -13806,7 +14123,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:674:/ clear");
+ ("warmelt-normatch.melt:675:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[13] =
0;
/*^clear */
@@ -13823,7 +14140,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:675:/ locexp");
+ ("warmelt-normatch.melt:676:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.UPDATLIST__V4*/
meltfptr[3]),
@@ -13831,7 +14148,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:672:/ quasiblock");
+ ("warmelt-normatch.melt:673:/ quasiblock");
/*epilog */
@@ -13870,7 +14187,7 @@ lab_endgetargs:;
(( /*_.CURTEST__V39*/ meltfptr[35]) ==
( /*_.PARTESTER__V3*/ meltfptr[2]));;
MELT_LOCATION
- ("warmelt-normatch.melt:681:/ cond");
+ ("warmelt-normatch.melt:682:/ cond");
/*cond */ if ( /*_#__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -13879,7 +14196,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:682:/ quasiblock");
+ ("warmelt-normatch.melt:683:/ quasiblock");
/*^compute */
@@ -13901,7 +14218,7 @@ lab_endgetargs:;
(( /*_.CURTEST__V39*/ meltfptr[35]) ==
( /*_.NEWTESTER__V2*/ meltfptr[1]));;
MELT_LOCATION
- ("warmelt-normatch.melt:683:/ cond");
+ ("warmelt-normatch.melt:684:/ cond");
/*cond */ if ( /*_#__L17*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -13910,7 +14227,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:684:/ quasiblock");
+ ("warmelt-normatch.melt:685:/ quasiblock");
/*^compute */
@@ -13933,7 +14250,7 @@ lab_endgetargs:;
/*citerepilog */
MELT_LOCATION
- ("warmelt-normatch.melt:678:/ clear");
+ ("warmelt-normatch.melt:679:/ clear");
/*clear *//*_.CURPAIR__V38*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.CURTEST__V39*/ meltfptr[35] = 0;
@@ -13944,12 +14261,12 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_LIST */
;
MELT_LOCATION
- ("warmelt-normatch.melt:686:/ compute");
+ ("warmelt-normatch.melt:687:/ compute");
/*_.PARTESTER__V3*/ meltfptr[2] =
/*_.SETQ___V40*/ meltfptr[33] =
/*_.ELTEST__V31*/ meltfptr[30];;
MELT_LOCATION
- ("warmelt-normatch.melt:677:/ quasiblock");
+ ("warmelt-normatch.melt:678:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[40] =
@@ -13960,7 +14277,7 @@ lab_endgetargs:;
/*_.PROGN___V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:672:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:673:/ clear");
/*clear *//*_.SETQ___V40*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.PROGN___V41*/ meltfptr[40] = 0;
@@ -13972,7 +14289,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.THTEST__V32*/ meltfptr[31]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:688:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:689:/ cond");
/*cond */ if ( /*_#IS_A__L18*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -14002,7 +14319,7 @@ lab_endgetargs:;
(( /*_.CURTEST__V44*/ meltfptr[43]) ==
( /*_.THTEST__V32*/ meltfptr[31]));;
MELT_LOCATION
- ("warmelt-normatch.melt:692:/ cond");
+ ("warmelt-normatch.melt:693:/ cond");
/*cond */ if ( /*_#__L19*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -14011,7 +14328,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:693:/ quasiblock");
+ ("warmelt-normatch.melt:694:/ quasiblock");
/*^compute */
@@ -14033,7 +14350,7 @@ lab_endgetargs:;
(( /*_.CURTEST__V44*/ meltfptr[43]) ==
( /*_.NEWTESTER__V2*/ meltfptr[1]));;
MELT_LOCATION
- ("warmelt-normatch.melt:694:/ cond");
+ ("warmelt-normatch.melt:695:/ cond");
/*cond */ if ( /*_#__L20*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -14042,7 +14359,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:695:/ quasiblock");
+ ("warmelt-normatch.melt:696:/ quasiblock");
/*^compute */
@@ -14065,7 +14382,7 @@ lab_endgetargs:;
/*citerepilog */
MELT_LOCATION
- ("warmelt-normatch.melt:689:/ clear");
+ ("warmelt-normatch.melt:690:/ clear");
/*clear *//*_.CURPAIR__V43*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.CURTEST__V44*/ meltfptr[43] = 0;
@@ -14078,7 +14395,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ cppif.then");
+ ("warmelt-normatch.melt:698:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14102,7 +14419,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ cond");
+ ("warmelt-normatch.melt:698:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -14113,7 +14430,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ apply");
+ ("warmelt-normatch.melt:698:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14126,7 +14443,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 697;
+ argtab[2].meltbp_long = 698;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_all_elses before recursion";
@@ -14154,7 +14471,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ clear");
+ ("warmelt-normatch.melt:698:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[21] = 0;
/*^clear */
@@ -14170,7 +14487,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ quasiblock");
+ ("warmelt-normatch.melt:698:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[46] =
@@ -14182,7 +14499,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:697:/ clear");
+ ("warmelt-normatch.melt:698:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[20] =
0;
/*^clear */
@@ -14196,7 +14513,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:698:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:699:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -14222,7 +14539,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ cppif.then");
+ ("warmelt-normatch.melt:700:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14246,7 +14563,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ cond");
+ ("warmelt-normatch.melt:700:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -14257,7 +14574,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ apply");
+ ("warmelt-normatch.melt:700:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14270,7 +14587,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 699;
+ argtab[2].meltbp_long = 700;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_all_elses after recursion";
@@ -14298,7 +14615,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ clear");
+ ("warmelt-normatch.melt:700:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/
meltfnum[20] = 0;
/*^clear */
@@ -14314,7 +14631,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ quasiblock");
+ ("warmelt-normatch.melt:700:/ quasiblock");
/*_.PROGN___V53*/ meltfptr[51] =
@@ -14326,7 +14643,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:699:/ clear");
+ ("warmelt-normatch.melt:700:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[21] =
0;
/*^clear */
@@ -14341,7 +14658,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:688:/ quasiblock");
+ ("warmelt-normatch.melt:689:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[50] =
@@ -14352,7 +14669,7 @@ lab_endgetargs:;
/*_.PROGN___V54*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:688:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:689:/ clear");
/*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
/*^clear */
/*clear *//*_.SET_NEW_TESTER_ALL_ELSES__V49*/
@@ -14375,7 +14692,7 @@ lab_endgetargs:;
/*_.LET___V30*/ meltfptr[29] =
/*_.IFELSE___V42*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-normatch.melt:668:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:669:/ clear");
/*clear *//*_.ELTEST__V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.THTEST__V32*/ meltfptr[31] = 0;
@@ -14391,7 +14708,7 @@ lab_endgetargs:;
/*_.LET___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:667:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:668:/ clear");
/*clear *//*_.LET___V30*/ meltfptr[29] = 0;
}
;
@@ -14403,7 +14720,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:703:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:704:/ quasiblock");
/*^compute */
@@ -14415,7 +14732,7 @@ lab_endgetargs:;
goto labexit_ALLELSELOOP_1;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:702:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:703:/ quasiblock");
/*epilog */
@@ -14427,7 +14744,7 @@ lab_endgetargs:;
/*_.IFELSE___V29*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:665:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:666:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0;
@@ -14437,7 +14754,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:661:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:662:/ clear");
/*clear *//*_.IFCPP___V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_#NULL__L11*/ meltfnum[9] = 0;
@@ -14454,7 +14771,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:705:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14477,7 +14794,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:705:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -14487,7 +14804,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:705:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14498,7 +14815,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 705;
+ argtab[2].meltbp_long = 706;
/*^apply.arg */
argtab[3].meltbp_cstring =
"set_new_tester_all_elses return updatlist";
@@ -14519,7 +14836,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:705:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[45] = 0;
@@ -14532,7 +14849,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[44] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:705:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[46] = /*_.IF___V56*/ meltfptr[44];;
@@ -14541,7 +14858,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = /*_.PROGN___V58*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:705:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:706:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[44] = 0;
@@ -14554,18 +14871,18 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:706:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:707:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.UPDATLIST__V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:706:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:707:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:652:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V59*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:652:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14669,7 +14986,7 @@ meltrout_16_warmelt_normatch_NORMPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:716:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14710,7 +15027,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:717:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14733,7 +15050,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:717:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14743,7 +15060,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:717:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14753,7 +15070,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 717;
+ argtab[2].meltbp_long = 718;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anyrecv recv";
/*^apply.arg */
@@ -14772,7 +15089,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:717:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -14785,7 +15102,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:717:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -14794,7 +15111,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:717:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:718:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -14809,7 +15126,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:718:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:719:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14818,7 +15135,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:718:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:719:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14826,7 +15143,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:718:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:719:/ cond.else");
/*^block */
/*anyblock */
@@ -14840,7 +15157,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (718) ? (718) : __LINE__, __FUNCTION__);
+ (719) ? (719) : __LINE__, __FUNCTION__);
;
}
;
@@ -14855,7 +15172,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:718:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:719:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -14866,13 +15183,19 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:719:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:720:/ quasiblock");
/*_.MYCLASS__V13*/ meltfptr[12] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:720:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:721:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14890,8 +15213,13 @@ lab_endgetargs:;
/*_.MYCLASSNAME__V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:721:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:722:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14909,8 +15237,14 @@ lab_endgetargs:;
/*_.PCTN_SRC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:721:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:722:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -14930,7 +15264,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:723:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:724:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.PSLOC__V16*/ meltfptr[15]),
("unimplemented normal_pattern for any "),
(melt_ptr_t) ( /*_.MYCLASSNAME__V14*/ meltfptr[13]));
@@ -14938,7 +15272,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:725:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:726:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14951,7 +15285,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:725:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:726:/ cond.else");
/*^block */
/*anyblock */
@@ -14965,7 +15299,7 @@ lab_endgetargs:;
melt_assert_failed (("catchall normal_pattern unimplemented"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (725) ? (725) : __LINE__, __FUNCTION__);
+ (726) ? (726) : __LINE__, __FUNCTION__);
;
}
;
@@ -14980,7 +15314,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:725:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:726:/ clear");
/*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0;
}
@@ -14993,7 +15327,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[7] = /*_.IFCPP___V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-normatch.melt:719:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:720:/ clear");
/*clear *//*_.MYCLASS__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.MYCLASSNAME__V14*/ meltfptr[13] = 0;
@@ -15003,11 +15337,11 @@ lab_endgetargs:;
/*clear *//*_.PSLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:716:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-normatch.melt:716:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -15097,7 +15431,7 @@ meltrout_17_warmelt_normatch_NORMPAT_ANYPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:732:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15138,7 +15472,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:733:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15161,7 +15495,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:733:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15171,7 +15505,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:733:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15181,7 +15515,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 733;
+ argtab[2].meltbp_long = 734;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anyrecv recv";
/*^apply.arg */
@@ -15200,7 +15534,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:733:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -15213,7 +15547,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:733:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -15222,7 +15556,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:733:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:734:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -15237,7 +15571,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:734:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:735:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15246,7 +15580,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:734:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:735:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15254,7 +15588,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:734:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:735:/ cond.else");
/*^block */
/*anyblock */
@@ -15268,7 +15602,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (734) ? (734) : __LINE__, __FUNCTION__);
+ (735) ? (735) : __LINE__, __FUNCTION__);
;
}
;
@@ -15283,7 +15617,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:734:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:735:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -15296,7 +15630,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:735:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:736:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15305,7 +15639,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:735:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:736:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15313,7 +15647,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:735:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:736:/ cond.else");
/*^block */
/*anyblock */
@@ -15327,7 +15661,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (735) ? (735) : __LINE__, __FUNCTION__);
+ (736) ? (736) : __LINE__, __FUNCTION__);
;
}
;
@@ -15342,7 +15676,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:735:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:736:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -15353,13 +15687,19 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:736:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:737:/ quasiblock");
/*_.MYCLASS__V15*/ meltfptr[14] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:737:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:738:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15377,8 +15717,13 @@ lab_endgetargs:;
/*_.MYCLASSNAME__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:738:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:739:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15396,8 +15741,14 @@ lab_endgetargs:;
/*_.PCTN_SRC__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:738:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:739:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15417,7 +15768,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:740:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15440,7 +15791,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:740:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15450,7 +15801,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:740:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -15460,7 +15811,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 740;
+ argtab[2].meltbp_long = 741;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anyrecv myclass=";
/*^apply.arg */
@@ -15492,7 +15843,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:740:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -15505,7 +15856,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:740:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -15514,7 +15865,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:740:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:741:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -15529,7 +15880,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:741:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:742:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.PSLOC__V18*/ meltfptr[17]),
("unimplemented NORMAL_PATTERN for pattern of "),
(melt_ptr_t) ( /*_.MYCLASSNAME__V16*/ meltfptr[15]));
@@ -15537,7 +15888,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:743:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:744:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15550,7 +15901,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:743:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:744:/ cond.else");
/*^block */
/*anyblock */
@@ -15561,7 +15912,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("catchall normal_pattern unimplemented on pattern"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (743) ? (743) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("catchall normal_pattern unimplemented on pattern"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (744) ? (744) : __LINE__, __FUNCTION__);
;
}
;
@@ -15576,7 +15927,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:743:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:744:/ clear");
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
}
@@ -15589,7 +15940,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V23*/ meltfptr[19];;
- MELT_LOCATION ("warmelt-normatch.melt:736:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:737:/ clear");
/*clear *//*_.MYCLASS__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.MYCLASSNAME__V16*/ meltfptr[15] = 0;
@@ -15601,11 +15952,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.IFCPP___V23*/ meltfptr[19] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:732:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:732:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -15701,7 +16052,7 @@ meltrout_18_warmelt_normatch_NORMVARPAT_GENREUSETEST (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:752:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ getarg");
/*_.SLOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15772,7 +16123,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:753:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:754:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15781,7 +16132,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V8*/ meltfptr[7]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:753:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:754:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15789,7 +16140,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:753:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:754:/ cond.else");
/*^block */
/*anyblock */
@@ -15803,7 +16154,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (753) ? (753) : __LINE__, __FUNCTION__);
+ (754) ? (754) : __LINE__, __FUNCTION__);
;
}
;
@@ -15818,7 +16169,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:753:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:754:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -15831,7 +16182,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:754:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:755:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15840,7 +16191,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.LOCOCC__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:754:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:755:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15848,7 +16199,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:754:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:755:/ cond.else");
/*^block */
/*anyblock */
@@ -15862,7 +16213,7 @@ lab_endgetargs:;
melt_assert_failed (("check lococc"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (754) ? (754) : __LINE__, __FUNCTION__);
+ (755) ? (755) : __LINE__, __FUNCTION__);
;
}
;
@@ -15877,7 +16228,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:754:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:755:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -15888,14 +16239,14 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:755:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:756:/ quasiblock");
/*_.TESTER__V14*/ meltfptr[13] = ( /*nil */ NULL);;
/*^compute */
/*_.CURHDLER__V15*/ meltfptr[14] = /*_.HDLER__V7*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:759:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:760:/ loop");
/*loop */
{
labloop_LOOPSTUFF_1:; /*^loopbody */
@@ -15906,7 +16257,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:761:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15929,7 +16280,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:761:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15939,7 +16290,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:761:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15950,7 +16301,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 761;
+ argtab[2].meltbp_long = 762;
/*^apply.arg */
argtab[3].meltbp_cstring = "normvarpat_genreusetest tstuff";
/*^apply.arg */
@@ -15971,7 +16322,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:761:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
@@ -15984,7 +16335,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:761:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ quasiblock");
/*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
@@ -15993,7 +16344,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:761:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:762:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V19*/ meltfptr[18] = 0;
@@ -16006,8 +16357,13 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:763:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:764:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V6*/ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16030,7 +16386,7 @@ lab_endgetargs:;
/*_#__L5*/ meltfnum[3] =
(( /*_.NTSAME_IDENTICAL__V22*/ meltfptr[18]) ==
( /*_.LOCOCC__V4*/ meltfptr[3]));;
- MELT_LOCATION ("warmelt-normatch.melt:763:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:764:/ cond");
/*cond */ if ( /*_#__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -16038,10 +16394,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:764:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:765:/ compute");
/*_.TESTER__V14*/ meltfptr[13] = /*_.SETQ___V24*/ meltfptr[23] =
/*_.TSTUFF__V6*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:765:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:766:/ quasiblock");
/*^compute */
@@ -16053,7 +16409,7 @@ lab_endgetargs:;
goto labexit_LOOPSTUFF_1;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:763:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:764:/ quasiblock");
/*epilog */
@@ -16074,7 +16430,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.TSTUFF__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:767:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:768:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16082,8 +16438,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:768:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:769:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V6*/
+ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16101,11 +16463,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:768:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:769:/ compute");
/*_.TSTUFF__V6*/ meltfptr[5] =
/*_.SETQ___V27*/ meltfptr[26] =
/*_.NTEST_ELSE__V26*/ meltfptr[25];;
- MELT_LOCATION ("warmelt-normatch.melt:770:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ quasiblock");
/*^newclosure */
@@ -16137,11 +16499,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V28*/ meltfptr[27] =
/*_.LAMBDA___V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-normatch.melt:769:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:770:/ compute");
/*_.CURHDLER__V15*/ meltfptr[14] =
/*_.SETQ___V30*/ meltfptr[29] =
/*_.LAMBDA___V28*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:767:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:768:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[30] =
@@ -16152,7 +16514,7 @@ lab_endgetargs:;
/*_.PROGN___V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:767:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:768:/ clear");
/*clear *//*_.NTEST_ELSE__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.SETQ___V27*/ meltfptr[26] = 0;
@@ -16172,14 +16534,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:778:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:779:/ quasiblock");
/*_.MAKE_LIST__V32*/ meltfptr[25] =
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[8]))));;
- MELT_LOCATION ("warmelt-normatch.melt:778:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:779:/ quasiblock");
/*^rawallocobj */
@@ -16276,7 +16638,7 @@ lab_endgetargs:;
/*_.INST__V34*/ meltfptr[27];;
{
- MELT_LOCATION ("warmelt-normatch.melt:787:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:788:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -16285,7 +16647,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:788:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:789:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -16305,7 +16667,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:789:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:790:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16328,7 +16690,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:789:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:790:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -16339,7 +16701,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:789:/ apply");
+ ("warmelt-normatch.melt:790:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16351,7 +16713,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 789;
+ argtab[2].meltbp_long = 790;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normvarpat_genreusetest newtester same";
@@ -16377,7 +16739,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:789:/ clear");
+ ("warmelt-normatch.melt:790:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7]
= 0;
/*^clear */
@@ -16393,7 +16755,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:789:/ quasiblock");
+ ("warmelt-normatch.melt:790:/ quasiblock");
/*_.PROGN___V39*/ meltfptr[37] =
@@ -16404,7 +16766,7 @@ lab_endgetargs:;
/*_.PROGN___V39*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:789:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:790:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V37*/ meltfptr[36] = 0;
@@ -16417,20 +16779,20 @@ lab_endgetargs:;
/*_.IFCPP___V36*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:790:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:791:/ compute");
/*_.TESTER__V14*/ meltfptr[13] =
/*_.SETQ___V40*/ meltfptr[36] =
/*_.NEWTESTER__V33*/ meltfptr[26];;
{
- MELT_LOCATION ("warmelt-normatch.melt:791:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:792:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V5*/ meltfptr[4]),
(melt_ptr_t) ( /*_.NEWTESTER__V33*/
meltfptr[26]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:792:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:793:/ apply");
/*apply */
{
/*_.CURHDLER__V41*/ meltfptr[37] =
@@ -16442,7 +16804,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:793:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:794:/ quasiblock");
/*^compute */
@@ -16455,7 +16817,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:778:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:779:/ clear");
/*clear *//*_.MAKE_LIST__V32*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.NEWTESTER__V33*/ meltfptr[26] = 0;
@@ -16468,7 +16830,7 @@ lab_endgetargs:;
/*clear *//*_.SETQ___V40*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V41*/ meltfptr[37] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:777:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:778:/ quasiblock");
/*epilog */
@@ -16480,7 +16842,7 @@ lab_endgetargs:;
/*_.IFELSE___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:763:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:764:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V25*/ meltfptr[23] = 0;
@@ -16490,7 +16852,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:759:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:760:/ clear");
/*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.NTSAME_IDENTICAL__V22*/ meltfptr[18] = 0;
@@ -16511,17 +16873,17 @@ lab_endgetargs:;
/*_.LET___V13*/ meltfptr[11] = /*_.FOREVER___V16*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:755:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:756:/ clear");
/*clear *//*_.TESTER__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.FOREVER___V16*/ meltfptr[15] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:752:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:752:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -16609,7 +16971,7 @@ meltrout_19_warmelt_normatch_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:770:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -16621,7 +16983,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:771:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:772:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -16631,8 +16993,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:772:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:773:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -16660,7 +17028,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:773:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16683,7 +17051,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:773:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16693,7 +17061,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:773:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16703,7 +17071,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 773;
+ argtab[2].meltbp_long = 774;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normvarpat_genreusetest lambda curhdler updatelse of tstuff";
@@ -16723,7 +17091,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:773:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -16736,7 +17104,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:773:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -16745,7 +17113,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:773:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:774:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -16758,8 +17126,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:774:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:775:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -16779,7 +17152,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:774:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:775:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -16788,7 +17161,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:770:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -16872,7 +17245,7 @@ meltrout_20_warmelt_normatch_NORMPAT_VARIABLEPAT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:804:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16913,7 +17286,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:805:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16936,7 +17309,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:805:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16946,7 +17319,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:805:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -16956,7 +17329,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 805;
+ argtab[2].meltbp_long = 806;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_variablepat recv=";
/*^apply.arg */
@@ -16981,7 +17354,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:805:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -16994,7 +17367,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:805:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -17003,7 +17376,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:805:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:806:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -17018,7 +17391,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:806:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:807:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17026,7 +17399,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:806:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:807:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17034,7 +17407,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:806:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:807:/ cond.else");
/*^block */
/*anyblock */
@@ -17048,7 +17421,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (806) ? (806) : __LINE__, __FUNCTION__);
+ (807) ? (807) : __LINE__, __FUNCTION__);
;
}
;
@@ -17063,7 +17436,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:806:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:807:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -17076,7 +17449,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:807:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:808:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17085,7 +17458,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:807:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:808:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17093,7 +17466,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:807:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:808:/ cond.else");
/*^block */
/*anyblock */
@@ -17107,7 +17480,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (807) ? (807) : __LINE__, __FUNCTION__);
+ (808) ? (808) : __LINE__, __FUNCTION__);
;
}
;
@@ -17122,7 +17495,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:807:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:808:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -17135,7 +17508,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:808:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:809:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -17144,11 +17517,16 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:809:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:810:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17166,8 +17544,13 @@ lab_endgetargs:;
/*_.STUFFMAP__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:810:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:811:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17185,8 +17568,13 @@ lab_endgetargs:;
/*_.PVARLOCMAP__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:811:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:812:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17204,8 +17592,14 @@ lab_endgetargs:;
/*_.PCTN_SRC__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:811:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:812:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V17*/ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17223,8 +17617,14 @@ lab_endgetargs:;
/*_.PSLOC__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:812:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:813:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17242,8 +17642,13 @@ lab_endgetargs:;
/*_.SLOC__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:813:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:814:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17275,8 +17680,13 @@ lab_endgetargs:;
( /*_.PVARLOCMAP__V16*/ meltfptr[15]),
(meltobject_ptr_t) ( /*_.PATVAR__V20*/
meltfptr[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:816:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:817:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17294,8 +17704,13 @@ lab_endgetargs:;
/*_.ENV__V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:817:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:818:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17313,8 +17728,13 @@ lab_endgetargs:;
/*_.NCX__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:818:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:819:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17334,7 +17754,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:820:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17357,7 +17777,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:820:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17367,7 +17787,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:820:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -17377,7 +17797,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 820;
+ argtab[2].meltbp_long = 821;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_variablepat tstuff=";
/*^apply.arg */
@@ -17409,7 +17829,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:820:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
@@ -17422,7 +17842,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:820:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];;
@@ -17431,7 +17851,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = /*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:820:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:821:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[26] = 0;
@@ -17450,7 +17870,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.LOCOCC__V22*/ meltfptr[21]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:823:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:824:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17460,7 +17880,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:825:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17483,7 +17903,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:825:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17493,7 +17913,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:825:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17504,7 +17924,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 825;
+ argtab[2].meltbp_long = 826;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat alreadybound lococc";
@@ -17526,7 +17946,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:825:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -17539,7 +17959,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:825:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -17548,7 +17968,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[27] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:825:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:826:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -17561,7 +17981,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[27] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:826:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:827:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -17594,7 +18014,7 @@ lab_endgetargs:;
""), argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:823:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:824:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[32] =
@@ -17604,7 +18024,7 @@ lab_endgetargs:;
/*_.IFELSE___V30*/ meltfptr[26] = /*_.PROGN___V36*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:823:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:824:/ clear");
/*clear *//*_.IFCPP___V31*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.NORMVARPAT_GENREUSETEST__V35*/ meltfptr[31] = 0;
@@ -17624,7 +18044,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.LOCOCC__V22*/ meltfptr[21]),
(melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:829:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:830:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -17634,7 +18054,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:830:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17657,7 +18077,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:830:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17667,7 +18087,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:830:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17678,7 +18098,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 830;
+ argtab[2].meltbp_long = 831;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat lococc orvariable";
@@ -17700,7 +18120,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:830:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
0;
/*^clear */
@@ -17714,7 +18134,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:830:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] =
@@ -17725,7 +18145,7 @@ lab_endgetargs:;
/*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:830:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:831:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[32] = 0;
@@ -17738,7 +18158,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[31] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:832:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:833:/ quasiblock");
/*^getslot */
@@ -17749,7 +18169,7 @@ lab_endgetargs:;
meltfptr[39] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:833:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:834:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.LOCOCC__V22*/ meltfptr[21]), 2, "NORVAR_PATVAR");
@@ -17757,8 +18177,14 @@ lab_endgetargs:;
meltfptr[43] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:834:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NPATVAR__V44*/ meltfptr[43]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:835:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NPATVAR__V44*/
+ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17778,7 +18204,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:836:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17801,7 +18227,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:836:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -17811,7 +18237,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:836:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17822,7 +18248,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 836;
+ argtab[2].meltbp_long = 837;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat orvariable npatvar";
@@ -17844,7 +18270,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V48*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:836:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[1] =
0;
/*^clear */
@@ -17858,7 +18284,7 @@ lab_endgetargs:;
/*_.IF___V47*/ meltfptr[46] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:836:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[47] =
@@ -17869,7 +18295,7 @@ lab_endgetargs:;
/*_.PROGN___V49*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:836:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:837:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V47*/ meltfptr[46] = 0;
@@ -17884,7 +18310,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:837:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:838:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17892,7 +18318,7 @@ lab_endgetargs:;
/*_#__L15*/ meltfnum[1] =
(( /*_.PATSYM__V45*/ meltfptr[44]) ==
( /*_.PATVAR__V20*/ meltfptr[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:837:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:838:/ cond");
/*cond */ if ( /*_#__L15*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17900,7 +18326,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:837:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:838:/ cond.else");
/*^block */
/*anyblock */
@@ -17915,7 +18341,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (837) ? (837) : __LINE__,
+ (838) ? (838) : __LINE__,
__FUNCTION__);
;
}
@@ -17932,7 +18358,7 @@ lab_endgetargs:;
/*_.IFELSE___V51*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:837:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:838:/ clear");
/*clear *//*_#__L15*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V51*/ meltfptr[47] = 0;
@@ -17945,7 +18371,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:838:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17968,7 +18394,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:838:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -17978,7 +18404,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:838:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17989,7 +18415,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 838;
+ argtab[2].meltbp_long = 839;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat orvariable realococc";
@@ -18012,7 +18438,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:838:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
0;
/*^clear */
@@ -18026,7 +18452,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:838:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[53] =
@@ -18037,7 +18463,7 @@ lab_endgetargs:;
/*_.PROGN___V55*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:838:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:839:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[52] = 0;
@@ -18054,7 +18480,7 @@ lab_endgetargs:;
/*_#NULL__L18*/ meltfnum[1] =
(( /*_.REALOCOCC__V43*/ meltfptr[39]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:839:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:840:/ cond");
/*cond */ if ( /*_#NULL__L18*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18063,10 +18489,10 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:841:/ quasiblock");
+ ("warmelt-normatch.melt:842:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:842:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:843:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -18084,7 +18510,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:843:/ quasiblock");
+ ("warmelt-normatch.melt:844:/ quasiblock");
/*^rawallocobj */
@@ -18148,7 +18574,7 @@ lab_endgetargs:;
/*_.CBIND__V59*/ meltfptr[58] =
/*_.INST__V60*/ meltfptr[59];;
MELT_LOCATION
- ("warmelt-normatch.melt:849:/ quasiblock");
+ ("warmelt-normatch.melt:850:/ quasiblock");
/*^rawallocobj */
@@ -18214,7 +18640,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:855:/ cppif.then");
+ ("warmelt-normatch.melt:856:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18237,7 +18663,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:855:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:856:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -18248,7 +18674,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[19] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:855:/ apply");
+ ("warmelt-normatch.melt:856:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18260,7 +18686,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 855;
+ argtab[2].meltbp_long = 856;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat fresh orvariable clocc";
@@ -18286,7 +18712,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:855:/ clear");
+ ("warmelt-normatch.melt:856:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/
meltfnum[19] = 0;
/*^clear */
@@ -18302,7 +18728,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:855:/ quasiblock");
+ ("warmelt-normatch.melt:856:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[64] =
@@ -18313,7 +18739,7 @@ lab_endgetargs:;
/*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:855:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:856:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[63] = 0;
@@ -18326,8 +18752,14 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[62] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:856:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LOCOCC__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:857:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LOCOCC__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -18367,7 +18799,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:859:/ cppif.then");
+ ("warmelt-normatch.melt:860:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18390,7 +18822,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:859:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:860:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -18401,7 +18833,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[11] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:859:/ apply");
+ ("warmelt-normatch.melt:860:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18413,7 +18845,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 859;
+ argtab[2].meltbp_long = 860;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat updated fresh orvariable lococc";
@@ -18439,7 +18871,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:859:/ clear");
+ ("warmelt-normatch.melt:860:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[11] = 0;
/*^clear */
@@ -18455,7 +18887,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:859:/ quasiblock");
+ ("warmelt-normatch.melt:860:/ quasiblock");
/*_.PROGN___V70*/ meltfptr[68] =
@@ -18466,7 +18898,7 @@ lab_endgetargs:;
/*_.PROGN___V70*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:859:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:860:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V68*/ meltfptr[64] = 0;
@@ -18481,7 +18913,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:860:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:861:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -18490,8 +18922,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:862:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[9])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:863:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18511,7 +18949,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:862:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:863:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V71*/
meltfptr[64]),
@@ -18522,7 +18960,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:863:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:864:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.PVARLOCMAP__V16*/
meltfptr[15]),
@@ -18534,7 +18972,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:864:/ cppif.then");
+ ("warmelt-normatch.melt:865:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18557,7 +18995,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:864:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:865:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -18568,7 +19006,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[19] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:864:/ apply");
+ ("warmelt-normatch.melt:865:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18580,7 +19018,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 864;
+ argtab[2].meltbp_long = 865;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat updated fresh orvariable pvarlocmap";
@@ -18606,7 +19044,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:864:/ clear");
+ ("warmelt-normatch.melt:865:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/
meltfnum[19] = 0;
/*^clear */
@@ -18622,7 +19060,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:864:/ quasiblock");
+ ("warmelt-normatch.melt:865:/ quasiblock");
/*_.PROGN___V75*/ meltfptr[73] =
@@ -18633,7 +19071,7 @@ lab_endgetargs:;
/*_.PROGN___V75*/ meltfptr[73];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:864:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:865:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V73*/ meltfptr[72] = 0;
@@ -18651,7 +19089,7 @@ lab_endgetargs:;
/*_.LET___V57*/ meltfptr[53] =
/*_.IFCPP___V72*/ meltfptr[68];;
- MELT_LOCATION ("warmelt-normatch.melt:841:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:842:/ clear");
/*clear *//*_.CTYP__V58*/ meltfptr[57] = 0;
/*^clear */
/*clear *//*_.CBIND__V59*/ meltfptr[58] = 0;
@@ -18669,7 +19107,7 @@ lab_endgetargs:;
/*_.LET___V57*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:839:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:840:/ clear");
/*clear *//*_.LET___V57*/ meltfptr[53] = 0;
}
;
@@ -18686,7 +19124,7 @@ lab_endgetargs:;
( /*_.REALOCOCC__V43*/
meltfptr[39]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:870:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:871:/ cond");
/*cond */ if ( /*_#IS_A__L25*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -18697,7 +19135,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ cppif.then");
+ ("warmelt-normatch.melt:872:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18722,7 +19160,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ cond");
+ ("warmelt-normatch.melt:872:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -18734,7 +19172,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ apply");
+ ("warmelt-normatch.melt:872:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18747,7 +19185,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 871;
+ argtab[2].meltbp_long = 872;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat bound orvariable realococccc";
@@ -18775,7 +19213,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ clear");
+ ("warmelt-normatch.melt:872:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/
meltfnum[26] = 0;
/*^clear */
@@ -18791,7 +19229,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ quasiblock");
+ ("warmelt-normatch.melt:872:/ quasiblock");
/*_.PROGN___V80*/ meltfptr[60] =
@@ -18803,7 +19241,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:871:/ clear");
+ ("warmelt-normatch.melt:872:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[11]
= 0;
/*^clear */
@@ -18818,7 +19256,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:872:/ apply");
+ ("warmelt-normatch.melt:873:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -18859,7 +19297,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:870:/ quasiblock");
+ ("warmelt-normatch.melt:871:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[63] =
@@ -18872,7 +19310,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:870:/ clear");
+ ("warmelt-normatch.melt:871:/ clear");
/*clear *//*_.IFCPP___V77*/ meltfptr[73] = 0;
/*^clear */
/*clear *//*_.NORMVARPAT_GENREUSETEST__V81*/
@@ -18895,7 +19333,7 @@ lab_endgetargs:;
meltfptr[39]),
(melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[10])));;
MELT_LOCATION
- ("warmelt-normatch.melt:876:/ cond");
+ ("warmelt-normatch.melt:877:/ cond");
/*cond */ if ( /*_#IS_A__L28*/ meltfnum[26]) /*then */
{
/*^cond.then */
@@ -18904,11 +19342,11 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:877:/ quasiblock");
+ ("warmelt-normatch.melt:878:/ quasiblock");
MELT_LOCATION
- ("warmelt-normatch.melt:878:/ msend");
+ ("warmelt-normatch.melt:879:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -18925,8 +19363,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:879:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.REALOCOCC__V43*/ meltfptr[39]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[10])))) /*then */
+ ("warmelt-normatch.melt:880:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.REALOCOCC__V43*/ meltfptr[39]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18947,7 +19389,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ cppif.then");
+ ("warmelt-normatch.melt:882:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18972,7 +19414,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ cond");
+ ("warmelt-normatch.melt:882:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -18984,7 +19426,7 @@ lab_endgetargs:;
meltfnum[29] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ apply");
+ ("warmelt-normatch.melt:882:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18998,7 +19440,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 881;
+ argtab[2].meltbp_long = 882;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat bxclocc";
@@ -19018,7 +19460,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ clear");
+ ("warmelt-normatch.melt:882:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/
meltfnum[29] = 0;
/*^clear */
@@ -19034,7 +19476,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ quasiblock");
+ ("warmelt-normatch.melt:882:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[73] =
@@ -19046,7 +19488,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:881:/ clear");
+ ("warmelt-normatch.melt:882:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/
meltfnum[11] = 0;
/*^clear */
@@ -19065,7 +19507,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:882:/ cppif.then");
+ ("warmelt-normatch.melt:883:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19074,7 +19516,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.BXCLOCC__V85*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[4])));;
MELT_LOCATION
- ("warmelt-normatch.melt:882:/ cond");
+ ("warmelt-normatch.melt:883:/ cond");
/*cond */ if ( /*_#IS_A__L31*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -19084,7 +19526,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:882:/ cond.else");
+ ("warmelt-normatch.melt:883:/ cond.else");
/*^block */
/*anyblock */
@@ -19095,7 +19537,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check bxclocc"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (882) ? (882) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("check bxclocc"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (883) ? (883) : __LINE__, __FUNCTION__);
;
}
;
@@ -19113,7 +19555,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:882:/ clear");
+ ("warmelt-normatch.melt:883:/ clear");
/*clear *//*_#IS_A__L31*/ meltfnum[29] =
0;
/*^clear */
@@ -19128,11 +19570,11 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:884:/ quasiblock");
+ ("warmelt-normatch.melt:885:/ quasiblock");
MELT_LOCATION
- ("warmelt-normatch.melt:885:/ getslot");
+ ("warmelt-normatch.melt:886:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.BXCLOCC__V85*/ meltfptr[53]), 2, "NOCC_CTYP");
@@ -19144,7 +19586,7 @@ lab_endgetargs:;
(( /*_.CTYP__V84*/ meltfptr[68]) !=
( /*_.PREVCTYP__V92*/ meltfptr[60]));;
MELT_LOCATION
- ("warmelt-normatch.melt:887:/ cond");
+ ("warmelt-normatch.melt:888:/ cond");
/*cond */ if ( /*_#__L32*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -19153,7 +19595,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:888:/ quasiblock");
+ ("warmelt-normatch.melt:889:/ quasiblock");
/*^getslot */
@@ -19165,7 +19607,7 @@ lab_endgetargs:;
};
;
MELT_LOCATION
- ("warmelt-normatch.melt:891:/ getslot");
+ ("warmelt-normatch.melt:892:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.BXCLOCC__V85*/ meltfptr[53]), 1, "NOCC_SYMB");
@@ -19174,7 +19616,11 @@ lab_endgetargs:;
};
;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NOCC_SYMB__V94*/ meltfptr[73]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NOCC_SYMB__V94*/ meltfptr[73]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19196,7 +19642,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:890:/ locexp");
+ ("warmelt-normatch.melt:891:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V19*/
meltfptr[18]),
@@ -19205,8 +19651,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:893:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V84*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))) /*then */
+ ("warmelt-normatch.melt:894:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V84*/ meltfptr[68]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19226,8 +19676,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:893:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V96*/ meltfptr[95]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))) /*then */
+ ("warmelt-normatch.melt:894:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V96*/ meltfptr[95]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19249,7 +19703,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:892:/ locexp");
+ ("warmelt-normatch.melt:893:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V19*/
meltfptr[18]),
@@ -19258,8 +19712,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:895:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVCTYP__V92*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))) /*then */
+ ("warmelt-normatch.melt:896:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVCTYP__V92*/ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19279,8 +19737,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:895:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V98*/ meltfptr[97]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))) /*then */
+ ("warmelt-normatch.melt:896:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V98*/ meltfptr[97]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19302,14 +19764,14 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:894:/ locexp");
+ ("warmelt-normatch.melt:895:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.PREVSLOC__V93*/ meltfptr[57]), ("disjunct pattern variable occurs previously with type"), (melt_ptr_t) ( /*_.NAMED_NAME__V99*/ meltfptr[98]));
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:888:/ clear");
+ ("warmelt-normatch.melt:889:/ clear");
/*clear *//*_.PREVSLOC__V93*/
meltfptr[57] = 0;
/*^clear */
@@ -19337,14 +19799,18 @@ lab_endgetargs:;
;
MELT_LOCATION
- ("warmelt-normatch.melt:884:/ clear");
+ ("warmelt-normatch.melt:885:/ clear");
/*clear *//*_.PREVCTYP__V92*/ meltfptr[60] =
0;
/*^clear */
/*clear *//*_#__L32*/ meltfnum[11] = 0;
MELT_LOCATION
- ("warmelt-normatch.melt:897:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LOCOCC__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[6])))) /*then */
+ ("warmelt-normatch.melt:898:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.LOCOCC__V22*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -19379,7 +19845,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ cppif.then");
+ ("warmelt-normatch.melt:901:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19404,7 +19870,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ cond");
+ ("warmelt-normatch.melt:901:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -19416,7 +19882,7 @@ lab_endgetargs:;
meltfnum[11] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ apply");
+ ("warmelt-normatch.melt:901:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19430,7 +19896,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 900;
+ argtab[2].meltbp_long = 901;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat updated reusing orvariable lococc";
@@ -19450,7 +19916,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ clear");
+ ("warmelt-normatch.melt:901:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/
meltfnum[11] = 0;
/*^clear */
@@ -19466,7 +19932,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ quasiblock");
+ ("warmelt-normatch.melt:901:/ quasiblock");
/*_.PROGN___V103*/ meltfptr[95] =
@@ -19478,7 +19944,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:900:/ clear");
+ ("warmelt-normatch.melt:901:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/
meltfnum[29] = 0;
/*^clear */
@@ -19498,7 +19964,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:901:/ locexp");
+ ("warmelt-normatch.melt:902:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -19511,7 +19977,7 @@ lab_endgetargs:;
/*_.IFCPP___V100*/ meltfptr[57];;
MELT_LOCATION
- ("warmelt-normatch.melt:877:/ clear");
+ ("warmelt-normatch.melt:878:/ clear");
/*clear *//*_.CTYP__V84*/ meltfptr[68] = 0;
/*^clear */
/*clear *//*_.BXCLOCC__V85*/ meltfptr[53] =
@@ -19532,7 +19998,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:876:/ cond.else");
+ ("warmelt-normatch.melt:877:/ cond.else");
/*^block */
/*anyblock */
@@ -19541,7 +20007,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:905:/ cppif.then");
+ ("warmelt-normatch.melt:906:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19556,7 +20022,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:905:/ cond.else");
+ ("warmelt-normatch.melt:906:/ cond.else");
/*^block */
/*anyblock */
@@ -19567,7 +20033,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normpat_variablepat corruption"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (905) ? (905) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normpat_variablepat corruption"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (906) ? (906) : __LINE__, __FUNCTION__);
;
}
;
@@ -19585,7 +20051,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:905:/ clear");
+ ("warmelt-normatch.melt:906:/ clear");
/*clear *//*_.IFELSE___V105*/ meltfptr[97]
= 0;
}
@@ -19597,7 +20063,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:904:/ quasiblock");
+ ("warmelt-normatch.melt:905:/ quasiblock");
/*_.PROGN___V106*/ meltfptr[98] =
@@ -19609,7 +20075,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:876:/ clear");
+ ("warmelt-normatch.melt:877:/ clear");
/*clear *//*_.IFCPP___V104*/ meltfptr[96] =
0;
/*^clear */
@@ -19624,7 +20090,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:870:/ clear");
+ ("warmelt-normatch.melt:871:/ clear");
/*clear *//*_#IS_A__L28*/ meltfnum[26] = 0;
/*^clear */
/*clear *//*_.IFELSE___V83*/ meltfptr[64] = 0;
@@ -19636,7 +20102,7 @@ lab_endgetargs:;
/*_.IFELSE___V76*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:839:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:840:/ clear");
/*clear *//*_#IS_A__L25*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IFELSE___V76*/ meltfptr[72] = 0;
@@ -19647,7 +20113,7 @@ lab_endgetargs:;
/*_.LET___V42*/ meltfptr[32] =
/*_.IFELSE___V56*/ meltfptr[52];;
- MELT_LOCATION ("warmelt-normatch.melt:832:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:833:/ clear");
/*clear *//*_.REALOCOCC__V43*/ meltfptr[39] = 0;
/*^clear */
/*clear *//*_.NPATVAR__V44*/ meltfptr[43] = 0;
@@ -19663,7 +20129,7 @@ lab_endgetargs:;
/*clear *//*_#NULL__L18*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V56*/ meltfptr[52] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:829:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:830:/ quasiblock");
/*_.PROGN___V107*/ meltfptr[60] =
@@ -19674,7 +20140,7 @@ lab_endgetargs:;
/*_.PROGN___V107*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:829:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:830:/ clear");
/*clear *//*_.IFCPP___V38*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.LET___V42*/ meltfptr[32] = 0;
@@ -19692,7 +20158,7 @@ lab_endgetargs:;
/*_#NULL__L35*/ meltfnum[11] =
(( /*_.LOCOCC__V22*/ meltfptr[21]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:911:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:912:/ cond");
/*cond */ if ( /*_#NULL__L35*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -19701,7 +20167,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:912:/ quasiblock");
+ ("warmelt-normatch.melt:913:/ quasiblock");
/*^msend */
@@ -19722,7 +20188,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:913:/ quasiblock");
+ ("warmelt-normatch.melt:914:/ quasiblock");
/*^rawallocobj */
@@ -19786,7 +20252,7 @@ lab_endgetargs:;
/*_.CBIND__V111*/ meltfptr[68] =
/*_.INST__V112*/ meltfptr[53];;
MELT_LOCATION
- ("warmelt-normatch.melt:919:/ quasiblock");
+ ("warmelt-normatch.melt:920:/ quasiblock");
/*^rawallocobj */
@@ -19852,7 +20318,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:925:/ cppif.then");
+ ("warmelt-normatch.melt:926:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19875,7 +20341,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:925:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:926:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -19886,7 +20352,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L37*/ meltfnum[26] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:925:/ apply");
+ ("warmelt-normatch.melt:926:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -19898,7 +20364,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 925;
+ argtab[2].meltbp_long = 926;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat ctyp=";
@@ -19932,7 +20398,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:925:/ clear");
+ ("warmelt-normatch.melt:926:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L37*/
meltfnum[26] = 0;
/*^clear */
@@ -19948,7 +20414,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:925:/ quasiblock");
+ ("warmelt-normatch.melt:926:/ quasiblock");
/*_.PROGN___V118*/ meltfptr[98] =
@@ -19959,7 +20425,7 @@ lab_endgetargs:;
/*_.PROGN___V118*/ meltfptr[98];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:925:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:926:/ clear");
/*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V116*/ meltfptr[97] = 0;
@@ -19974,7 +20440,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:926:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:927:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -19983,8 +20449,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:928:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[9])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:929:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -20004,7 +20476,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:928:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:929:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V119*/
meltfptr[64]),
@@ -20014,7 +20486,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:929:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:930:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.PVARLOCMAP__V16*/
meltfptr[15]),
@@ -20025,7 +20497,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:930:/ cppif.then");
+ ("warmelt-normatch.melt:931:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20048,7 +20520,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:930:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:931:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -20059,7 +20531,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[1] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:930:/ apply");
+ ("warmelt-normatch.melt:931:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -20071,7 +20543,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 930;
+ argtab[2].meltbp_long = 931;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_variablepat updated patvar=";
@@ -20113,7 +20585,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:930:/ clear");
+ ("warmelt-normatch.melt:931:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/
meltfnum[1] = 0;
/*^clear */
@@ -20129,7 +20601,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:930:/ quasiblock");
+ ("warmelt-normatch.melt:931:/ quasiblock");
/*_.PROGN___V123*/ meltfptr[44] =
@@ -20140,7 +20612,7 @@ lab_endgetargs:;
/*_.PROGN___V123*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:930:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:931:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V121*/ meltfptr[39] = 0;
@@ -20158,7 +20630,7 @@ lab_endgetargs:;
/*_.LET___V109*/ meltfptr[73] =
/*_.IFCPP___V120*/ meltfptr[72];;
- MELT_LOCATION ("warmelt-normatch.melt:912:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:913:/ clear");
/*clear *//*_.CTYP__V110*/ meltfptr[95] = 0;
/*^clear */
/*clear *//*_.CBIND__V111*/ meltfptr[68] = 0;
@@ -20175,7 +20647,7 @@ lab_endgetargs:;
/*_.LET___V109*/ meltfptr[73];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:911:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:912:/ clear");
/*clear *//*_.LET___V109*/ meltfptr[73] = 0;
}
;
@@ -20190,7 +20662,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:935:/ cppif.then");
+ ("warmelt-normatch.melt:936:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20205,7 +20677,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:935:/ cond.else");
+ ("warmelt-normatch.melt:936:/ cond.else");
/*^block */
/*anyblock */
@@ -20216,7 +20688,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normpat_variablepat unexpected lococc"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (935) ? (935) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normpat_variablepat unexpected lococc"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (936) ? (936) : __LINE__, __FUNCTION__);
;
}
;
@@ -20232,7 +20704,7 @@ lab_endgetargs:;
/*_.IFELSE___V125*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:935:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:936:/ clear");
/*clear *//*_.IFELSE___V125*/ meltfptr[46] = 0;
}
@@ -20242,7 +20714,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:934:/ quasiblock");
+ ("warmelt-normatch.melt:935:/ quasiblock");
/*_.PROGN___V126*/ meltfptr[47] =
@@ -20253,7 +20725,7 @@ lab_endgetargs:;
/*_.PROGN___V126*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:911:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:912:/ clear");
/*clear *//*_.IFCPP___V124*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_.PROGN___V126*/ meltfptr[47] = 0;
@@ -20265,7 +20737,7 @@ lab_endgetargs:;
/*_.IFELSE___V108*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:829:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:830:/ clear");
/*clear *//*_#NULL__L35*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IFELSE___V108*/ meltfptr[63] = 0;
@@ -20276,7 +20748,7 @@ lab_endgetargs:;
/*_.IFELSE___V30*/ meltfptr[26] = /*_.IFELSE___V37*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:823:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:824:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V37*/ meltfptr[27] = 0;
@@ -20286,7 +20758,7 @@ lab_endgetargs:;
;
/*_.LET___V14*/ meltfptr[12] = /*_.IFELSE___V30*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:809:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:810:/ clear");
/*clear *//*_.STUFFMAP__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.PVARLOCMAP__V16*/ meltfptr[15] = 0;
@@ -20314,11 +20786,11 @@ lab_endgetargs:;
/*clear *//*_#IS_A__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V30*/ meltfptr[26] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:804:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:804:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20410,7 +20882,7 @@ meltrout_21_warmelt_normatch_NORMPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:948:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -20451,7 +20923,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:949:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20474,7 +20946,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:949:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20484,7 +20956,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:949:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -20494,7 +20966,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 949;
+ argtab[2].meltbp_long = 950;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_jokerpat recv=";
/*^apply.arg */
@@ -20519,7 +20991,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:949:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -20532,7 +21004,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:949:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -20541,7 +21013,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:949:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:950:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -20556,7 +21028,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:950:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:951:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20564,7 +21036,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:950:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:951:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20572,7 +21044,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:950:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:951:/ cond.else");
/*^block */
/*anyblock */
@@ -20586,7 +21058,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (950) ? (950) : __LINE__, __FUNCTION__);
+ (951) ? (951) : __LINE__, __FUNCTION__);
;
}
;
@@ -20601,7 +21073,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:950:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:951:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -20614,7 +21086,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:951:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:952:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20623,7 +21095,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:951:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:952:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20631,7 +21103,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:951:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:952:/ cond.else");
/*^block */
/*anyblock */
@@ -20645,7 +21117,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (951) ? (951) : __LINE__, __FUNCTION__);
+ (952) ? (952) : __LINE__, __FUNCTION__);
;
}
;
@@ -20660,7 +21132,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:951:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:952:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -20671,11 +21143,11 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:948:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V12*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-normatch.melt:948:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20766,7 +21238,7 @@ meltrout_22_warmelt_normatch_NORMPAT_INSTANCEPAT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:962:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -20807,7 +21279,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:963:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20830,7 +21302,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:963:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20840,7 +21312,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:963:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -20850,7 +21322,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 963;
+ argtab[2].meltbp_long = 964;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_instancepat start recv=";
/*^apply.arg */
@@ -20875,7 +21347,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:963:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -20888,7 +21360,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:963:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -20897,7 +21369,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:963:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:964:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -20912,7 +21384,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:964:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:965:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20921,7 +21393,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:964:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:965:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20929,7 +21401,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:964:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:965:/ cond.else");
/*^block */
/*anyblock */
@@ -20943,7 +21415,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (964) ? (964) : __LINE__, __FUNCTION__);
+ (965) ? (965) : __LINE__, __FUNCTION__);
;
}
;
@@ -20958,7 +21430,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:964:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:965:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -20971,7 +21443,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:965:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:966:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20979,7 +21451,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_INSTANCE */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:965:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:966:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20987,7 +21459,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:965:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:966:/ cond.else");
/*^block */
/*anyblock */
@@ -21001,7 +21473,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (965) ? (965) : __LINE__, __FUNCTION__);
+ (966) ? (966) : __LINE__, __FUNCTION__);
;
}
;
@@ -21016,7 +21488,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:965:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:966:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -21027,11 +21499,16 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:966:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:967:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21049,8 +21526,14 @@ lab_endgetargs:;
/*_.PCTN_SRC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:966:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:967:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21068,8 +21551,14 @@ lab_endgetargs:;
/*_.PSLOC__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:967:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:968:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21087,7 +21576,7 @@ lab_endgetargs:;
/*_.SLOC__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:968:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:969:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 2, "PCTN_ENV");
@@ -21095,8 +21584,13 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:969:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OBJECT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:970:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OBJECT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21114,8 +21608,13 @@ lab_endgetargs:;
/*_.PATCLA__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:970:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OBJECT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:971:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OBJECT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21136,8 +21635,13 @@ lab_endgetargs:;
/*^compute */
/*_.OLDENV__V21*/ meltfptr[20] = /*_.ENV__V18*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:972:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:973:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21155,8 +21659,13 @@ lab_endgetargs:;
/*_.NCX__V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:973:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:974:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21187,8 +21696,13 @@ lab_endgetargs:;
/*^compute */
/*_.CURHDLER__V26*/ meltfptr[25] = /*_.HDLER__V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:977:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:978:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21206,7 +21720,7 @@ lab_endgetargs:;
/*_.TESTLIST__V27*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:980:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:981:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -21226,7 +21740,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:982:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:983:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21235,7 +21749,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PATCLA__V19*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:982:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:983:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21243,7 +21757,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:982:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:983:/ cond.else");
/*^block */
/*anyblock */
@@ -21257,7 +21771,7 @@ lab_endgetargs:;
melt_assert_failed (("check patcla"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (982) ? (982) : __LINE__, __FUNCTION__);
+ (983) ? (983) : __LINE__, __FUNCTION__);
;
}
;
@@ -21272,7 +21786,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = /*_.IFELSE___V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:982:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:983:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0;
@@ -21283,7 +21797,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:984:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:985:/ loop");
/*loop */
{
labloop_LOOPSTUFF_2:; /*^loopbody */
@@ -21294,7 +21808,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:986:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21317,7 +21831,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:986:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21327,7 +21841,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:986:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21338,7 +21852,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 986;
+ argtab[2].meltbp_long = 987;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat loop tstuff";
@@ -21360,7 +21874,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:986:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -21373,7 +21887,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:986:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -21382,7 +21896,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:986:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:987:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -21395,8 +21909,13 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:989:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:990:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V24*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21419,7 +21938,7 @@ lab_endgetargs:;
/*_#__L8*/ meltfnum[1] =
(( /*_.NTINST_CLASS__V37*/ meltfptr[33]) ==
( /*_.PATCLA__V19*/ meltfptr[18]));;
- MELT_LOCATION ("warmelt-normatch.melt:989:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:990:/ cond");
/*cond */ if ( /*_#__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21427,10 +21946,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:990:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:991:/ compute");
/*_.TESTER__V25*/ meltfptr[24] = /*_.SETQ___V39*/ meltfptr[38] =
/*_.TSTUFF__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-normatch.melt:991:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:992:/ quasiblock");
/*^compute */
@@ -21442,7 +21961,7 @@ lab_endgetargs:;
goto labexit_LOOPSTUFF_2;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:989:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:990:/ quasiblock");
/*epilog */
@@ -21463,7 +21982,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.TSTUFF__V24*/ meltfptr[23]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:993:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:994:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21471,8 +21990,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:994:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:995:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21490,11 +22015,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:994:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:995:/ compute");
/*_.TSTUFF__V24*/ meltfptr[23] =
/*_.SETQ___V42*/ meltfptr[41] =
/*_.NTEST_ELSE__V41*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-normatch.melt:996:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ quasiblock");
/*^newclosure */
@@ -21523,11 +22048,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V43*/ meltfptr[42] =
/*_.LAMBDA___V44*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:995:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:996:/ compute");
/*_.CURHDLER__V26*/ meltfptr[25] =
/*_.SETQ___V45*/ meltfptr[44] =
/*_.LAMBDA___V43*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-normatch.melt:993:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:994:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[45] =
@@ -21538,7 +22063,7 @@ lab_endgetargs:;
/*_.PROGN___V46*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:993:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:994:/ clear");
/*clear *//*_.NTEST_ELSE__V41*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.SETQ___V42*/ meltfptr[41] = 0;
@@ -21558,11 +22083,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1004:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1005:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1008:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PATCLA__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1009:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PATCLA__V19*/
+ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21605,7 +22136,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[13]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1011:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1012:/ quasiblock");
/*^rawallocobj */
@@ -21716,7 +22247,7 @@ lab_endgetargs:;
/*_.INST__V52*/ meltfptr[51];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1022:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1023:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21739,7 +22270,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1022:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1023:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -21750,7 +22281,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1022:/ apply");
+ ("warmelt-normatch.melt:1023:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21762,7 +22293,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1022;
+ argtab[2].meltbp_long = 1023;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat newtester";
@@ -21788,7 +22319,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1022:/ clear");
+ ("warmelt-normatch.melt:1023:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/
meltfnum[11] = 0;
/*^clear */
@@ -21804,7 +22335,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1022:/ quasiblock");
+ ("warmelt-normatch.melt:1023:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[54] =
@@ -21815,7 +22346,7 @@ lab_endgetargs:;
/*_.PROGN___V56*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1022:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1023:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V54*/ meltfptr[53] = 0;
@@ -21828,7 +22359,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1023:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1024:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -21846,13 +22377,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1024:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1025:/ compute");
/*_.TESTER__V25*/ meltfptr[24] =
/*_.SETQ___V58*/ meltfptr[54] =
/*_.NEWTESTER__V51*/ meltfptr[45];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1025:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1026:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V27*/ meltfptr[26]),
(melt_ptr_t) ( /*_.NEWTESTER__V51*/
@@ -21861,7 +22392,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1026:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1027:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21884,7 +22415,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1026:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1027:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -21895,7 +22426,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1026:/ apply");
+ ("warmelt-normatch.melt:1027:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21907,7 +22438,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1026;
+ argtab[2].meltbp_long = 1027;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat before calling curhdler";
@@ -21933,7 +22464,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1026:/ clear");
+ ("warmelt-normatch.melt:1027:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/
meltfnum[10] = 0;
/*^clear */
@@ -21949,7 +22480,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1026:/ quasiblock");
+ ("warmelt-normatch.melt:1027:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] =
@@ -21960,7 +22491,7 @@ lab_endgetargs:;
/*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1026:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1027:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[59] = 0;
@@ -21973,7 +22504,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[58] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1027:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1028:/ apply");
/*apply */
{
/*_.CURHDLER__V63*/ meltfptr[59] =
@@ -21987,7 +22518,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1028:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1029:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22010,7 +22541,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1028:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1029:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -22021,7 +22552,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[11] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1028:/ apply");
+ ("warmelt-normatch.melt:1029:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22033,7 +22564,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1028;
+ argtab[2].meltbp_long = 1029;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat after calling curhdler";
@@ -22059,7 +22590,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1028:/ clear");
+ ("warmelt-normatch.melt:1029:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/
meltfnum[11] = 0;
/*^clear */
@@ -22075,7 +22606,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1028:/ quasiblock");
+ ("warmelt-normatch.melt:1029:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[65] =
@@ -22086,7 +22617,7 @@ lab_endgetargs:;
/*_.PROGN___V67*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1028:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1029:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[64] = 0;
@@ -22099,7 +22630,7 @@ lab_endgetargs:;
/*_.IFCPP___V64*/ meltfptr[60] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1029:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1030:/ quasiblock");
/*^compute */
@@ -22112,7 +22643,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1004:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1005:/ clear");
/*clear *//*_.CLASS_FIELDS__V47*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L10*/ meltfnum[9] = 0;
@@ -22137,7 +22668,7 @@ lab_endgetargs:;
/*clear *//*_.CURHDLER__V63*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1003:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1004:/ quasiblock");
/*epilog */
@@ -22149,7 +22680,7 @@ lab_endgetargs:;
/*_.IFELSE___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:989:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:990:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V40*/ meltfptr[38] = 0;
@@ -22159,7 +22690,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:984:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:985:/ clear");
/*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.NTINST_CLASS__V37*/ meltfptr[33] = 0;
@@ -22178,7 +22709,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22201,7 +22732,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -22211,7 +22742,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -22222,7 +22753,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1033;
+ argtab[2].meltbp_long = 1034;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_instancepat tester=";
/*^apply.arg */
@@ -22254,7 +22785,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V70*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[40] = 0;
@@ -22267,7 +22798,7 @@ lab_endgetargs:;
/*_.IF___V69*/ meltfptr[65] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ quasiblock");
/*_.PROGN___V71*/ meltfptr[41] = /*_.IF___V69*/ meltfptr[65];;
@@ -22276,7 +22807,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = /*_.PROGN___V71*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1033:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1034:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V69*/ meltfptr[65] = 0;
@@ -22289,11 +22820,16 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1034:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1035:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V25*/ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22311,7 +22847,7 @@ lab_endgetargs:;
/*_.TESTLOCCL__V72*/ meltfptr[42] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1035:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1036:/ quasiblock");
/*^rawallocobj */
@@ -22337,7 +22873,7 @@ lab_endgetargs:;
"CONTAINER_VALUE");
;
/*_.TESTERCONT__V73*/ meltfptr[44] = /*_.INST__V74*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ quasiblock");
/*^newclosure */
@@ -22357,7 +22893,7 @@ lab_endgetargs:;
tabval[12])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22380,7 +22916,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -22390,7 +22926,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -22401,7 +22937,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1056;
+ argtab[2].meltbp_long = 1057;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat before loop testercont=";
@@ -22428,7 +22964,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[60] = 0;
@@ -22441,7 +22977,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[38] = /*_.IF___V79*/ meltfptr[59];;
@@ -22450,7 +22986,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[58] = /*_.PROGN___V81*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1056:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1057:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[59] = 0;
@@ -22465,7 +23001,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1057:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1058:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22473,7 +23009,7 @@ lab_endgetargs:;
/*_#IS_LIST__L21*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.TESTLOCCL__V72*/ meltfptr[42]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:1057:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1058:/ cond");
/*cond */ if ( /*_#IS_LIST__L21*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22481,7 +23017,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1057:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1058:/ cond.else");
/*^block */
/*anyblock */
@@ -22495,7 +23031,7 @@ lab_endgetargs:;
melt_assert_failed (("check testbindl"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1057) ? (1057) : __LINE__, __FUNCTION__);
+ (1058) ? (1058) : __LINE__, __FUNCTION__);
;
}
;
@@ -22510,7 +23046,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[32] = /*_.IFELSE___V83*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1057:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1058:/ clear");
/*clear *//*_#IS_LIST__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V83*/ meltfptr[33] = 0;
@@ -22541,7 +23077,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22564,7 +23100,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -22574,7 +23110,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -22585,7 +23121,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1061;
+ argtab[2].meltbp_long = 1062;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat in loop curpatf=";
@@ -22613,7 +23149,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V87*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V87*/ meltfptr[41] = 0;
@@ -22626,7 +23162,7 @@ lab_endgetargs:;
/*_.IF___V86*/ meltfptr[65] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ quasiblock");
/*_.PROGN___V88*/ meltfptr[60] = /*_.IF___V86*/ meltfptr[65];;
@@ -22635,7 +23171,7 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[40] = /*_.PROGN___V88*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1062:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V86*/ meltfptr[65] = 0;
@@ -22650,7 +23186,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1062:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1063:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22659,7 +23195,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURPATF__V84*/ meltfptr[34]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[19])));;
- MELT_LOCATION ("warmelt-normatch.melt:1062:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1063:/ cond");
/*cond */ if ( /*_#IS_A__L25*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -22667,7 +23203,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1062:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1063:/ cond.else");
/*^block */
/*anyblock */
@@ -22681,7 +23217,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpatf"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (1062) ? (1062) : __LINE__,
+ __FILE__, (1063) ? (1063) : __LINE__,
__FUNCTION__);
;
}
@@ -22697,7 +23233,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[59] = /*_.IFELSE___V90*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1062:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1063:/ clear");
/*clear *//*_#IS_A__L25*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V90*/ meltfptr[38] = 0;
@@ -22708,11 +23244,17 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[59] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1063:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1064:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATF__V84*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATF__V84*/
+ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22730,8 +23272,14 @@ lab_endgetargs:;
/*_.FLOC__V92*/ meltfptr[41] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1064:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATF__V84*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[19])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1065:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATF__V84*/
+ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22749,8 +23297,14 @@ lab_endgetargs:;
/*_.CURFLD__V93*/ meltfptr[65] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1065:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATF__V84*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[19])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1066:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATF__V84*/
+ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22768,8 +23322,14 @@ lab_endgetargs:;
/*_.CURSUBPAT__V94*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1066:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V93*/ meltfptr[65]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[20])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1067:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V93*/
+ meltfptr[65]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[20])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22787,7 +23347,7 @@ lab_endgetargs:;
/*_.CURFLDCLA__V95*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ quasiblock");
/*^newclosure */
@@ -22816,7 +23376,7 @@ lab_endgetargs:;
/*_.SUBHDLER__V96*/ meltfptr[95] = /*_.LAMBDA___V97*/ meltfptr[96];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22839,7 +23399,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22849,7 +23409,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22860,7 +23420,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1080;
+ argtab[2].meltbp_long = 1081;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_instancepat curfld";
/*^apply.arg */
@@ -22881,7 +23441,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] = 0;
@@ -22894,7 +23454,7 @@ lab_endgetargs:;
/*_.IF___V99*/ meltfptr[98] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] = /*_.IF___V99*/ meltfptr[98];;
@@ -22903,7 +23463,7 @@ lab_endgetargs:;
/*_.IFCPP___V98*/ meltfptr[97] = /*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1080:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1081:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[98] = 0;
@@ -22921,7 +23481,7 @@ lab_endgetargs:;
/*_#__L28*/ meltfnum[11] =
(( /*_.CURFLDCLA__V95*/ meltfptr[38]) ==
( /*_.PATCLA__V19*/ meltfptr[18]));;
- MELT_LOCATION ("warmelt-normatch.melt:1081:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1082:/ cond");
/*cond */ if ( /*_#__L28*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -22929,7 +23489,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1081:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1082:/ cond.else");
/*^block */
/*anyblock */
@@ -22939,7 +23499,7 @@ lab_endgetargs:;
melt_is_subclass_of ((meltobject_ptr_t)
( /*_.PATCLA__V19*/ meltfptr[18]),
(meltobject_ptr_t) ( /*_.CURFLDCLA__V95*/ meltfptr[38]));;
- MELT_LOCATION ("warmelt-normatch.melt:1082:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1083:/ cond");
/*cond */ if ( /*_#SUBCLASS_OF__L29*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -22947,14 +23507,20 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1082:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1083:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1083:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V93*/ meltfptr[65]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[26])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1084:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V93*/
+ meltfptr[65]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[26])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22974,7 +23540,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1083:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1084:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.FLOC__V92*/ meltfptr[41]),
("bad field in instance pattern"),
@@ -22987,7 +23553,7 @@ lab_endgetargs:;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1082:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1083:/ clear");
/*clear *//*_.NAMED_NAME__V104*/ meltfptr[103] = 0;
}
;
@@ -22997,7 +23563,7 @@ lab_endgetargs:;
/*_.IFELSE___V103*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1081:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1082:/ clear");
/*clear *//*_#SUBCLASS_OF__L29*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V103*/ meltfptr[99] = 0;
@@ -23007,7 +23573,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23030,7 +23596,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23040,7 +23606,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23051,7 +23617,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1084;
+ argtab[2].meltbp_long = 1085;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat before normal_pattern cursubpat";
@@ -23073,7 +23639,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V107*/ meltfptr[106];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V107*/ meltfptr[106] = 0;
@@ -23086,7 +23652,7 @@ lab_endgetargs:;
/*_.IF___V106*/ meltfptr[99] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ quasiblock");
/*_.PROGN___V108*/ meltfptr[106] = /*_.IF___V106*/ meltfptr[99];;
@@ -23096,7 +23662,7 @@ lab_endgetargs:;
/*_.PROGN___V108*/ meltfptr[106];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1084:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1085:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V106*/ meltfptr[99] = 0;
@@ -23109,13 +23675,13 @@ lab_endgetargs:;
/*_.IFCPP___V105*/ meltfptr[103] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1085:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1086:/ quasiblock");
/*_.CURLOCCL__V110*/ meltfptr[106] = ( /*nil */ NULL);;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23138,7 +23704,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -23148,7 +23714,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L33*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23159,7 +23725,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1087;
+ argtab[2].meltbp_long = 1088;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat scanning testloccl";
@@ -23181,7 +23747,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V113*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V113*/ meltfptr[112] = 0;
@@ -23194,7 +23760,7 @@ lab_endgetargs:;
/*_.IF___V112*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ quasiblock");
/*_.PROGN___V114*/ meltfptr[112] = /*_.IF___V112*/ meltfptr[111];;
@@ -23204,7 +23770,7 @@ lab_endgetargs:;
/*_.PROGN___V114*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1087:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1088:/ clear");
/*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V112*/ meltfptr[111] = 0;
@@ -23233,7 +23799,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1092:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1093:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23243,7 +23809,7 @@ lab_endgetargs:;
( /*_.TESTLOCSY__V116*/
meltfptr[112]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[27])));;
- MELT_LOCATION ("warmelt-normatch.melt:1092:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1093:/ cond");
/*cond */ if ( /*_#IS_A__L34*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23252,7 +23818,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:1092:/ cond.else");
+ ("warmelt-normatch.melt:1093:/ cond.else");
/*^block */
/*anyblock */
@@ -23267,7 +23833,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (1092) ? (1092) : __LINE__,
+ (1093) ? (1093) : __LINE__,
__FUNCTION__);
;
}
@@ -23284,7 +23850,7 @@ lab_endgetargs:;
/*_.IFELSE___V118*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1092:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1093:/ clear");
/*clear *//*_#IS_A__L34*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V118*/ meltfptr[117] = 0;
@@ -23295,8 +23861,14 @@ lab_endgetargs:;
/*_.IFCPP___V117*/ meltfptr[116] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1094:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTLOCSY__V116*/ meltfptr[112]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[28])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1095:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTLOCSY__V116*/
+ meltfptr[112]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23314,8 +23886,14 @@ lab_endgetargs:;
/*_.NOCC_BIND__V119*/ meltfptr[117] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1094:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NOCC_BIND__V119*/ meltfptr[117]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[29])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1095:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NOCC_BIND__V119*/
+ meltfptr[117]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[29])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23333,8 +23911,14 @@ lab_endgetargs:;
/*_.LETBIND_EXPR__V120*/ meltfptr[119] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1094:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LETBIND_EXPR__V120*/ meltfptr[119]), (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_GET_FIELD */ meltfrout->tabval[30])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1095:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LETBIND_EXPR__V120*/
+ meltfptr[119]),
+ (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_GET_FIELD */ meltfrout->tabval[30])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23357,7 +23941,7 @@ lab_endgetargs:;
/*_#__L35*/ meltfnum[1] =
(( /*_.CURFLD__V93*/ meltfptr[65]) ==
( /*_.NUGET_FIELD__V121*/ meltfptr[120]));;
- MELT_LOCATION ("warmelt-normatch.melt:1093:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1094:/ cond");
/*cond */ if ( /*_#__L35*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23365,15 +23949,15 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1096:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1097:/ compute");
/*_.TESTPAIR__V115*/ meltfptr[111] =
/*_.SETQ___V123*/ meltfptr[122] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1097:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1098:/ compute");
/*_.CURLOCCL__V110*/ meltfptr[106] =
/*_.SETQ___V124*/ meltfptr[123] =
/*_.TESTLOCSY__V116*/ meltfptr[112];;
MELT_LOCATION
- ("warmelt-normatch.melt:1095:/ quasiblock");
+ ("warmelt-normatch.melt:1096:/ quasiblock");
/*_.PROGN___V125*/ meltfptr[124] =
@@ -23384,7 +23968,7 @@ lab_endgetargs:;
/*_.PROGN___V125*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1093:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1094:/ clear");
/*clear *//*_.SETQ___V123*/ meltfptr[122] = 0;
/*^clear */
/*clear *//*_.SETQ___V124*/ meltfptr[123] = 0;
@@ -23403,7 +23987,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1089:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1090:/ clear");
/*clear *//*_.TESTPAIR__V115*/ meltfptr[111] = 0;
/*^clear */
/*clear *//*_.TESTLOCSY__V116*/ meltfptr[112] = 0;
@@ -23423,7 +24007,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23446,7 +24030,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -23456,7 +24040,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L37*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23467,7 +24051,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1099;
+ argtab[2].meltbp_long = 1100;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat got curloccl";
@@ -23489,7 +24073,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V128*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V128*/ meltfptr[124] = 0;
@@ -23502,7 +24086,7 @@ lab_endgetargs:;
/*_.IF___V127*/ meltfptr[123] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ quasiblock");
/*_.PROGN___V129*/ meltfptr[124] = /*_.IF___V127*/ meltfptr[123];;
@@ -23512,7 +24096,7 @@ lab_endgetargs:;
/*_.PROGN___V129*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1099:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1100:/ clear");
/*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V127*/ meltfptr[123] = 0;
@@ -23529,7 +24113,7 @@ lab_endgetargs:;
/*_#NULL__L38*/ meltfnum[0] =
(( /*_.CURLOCCL__V110*/ meltfptr[106]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1101:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1102:/ cond");
/*cond */ if ( /*_#NULL__L38*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23537,11 +24121,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1102:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1103:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1103:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V93*/ meltfptr[65]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[26])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1104:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V93*/
+ meltfptr[65]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[26])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23559,7 +24149,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V132*/ meltfptr[131] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1103:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1104:/ apply");
/*apply */
{
/*_.NEWSYM__V133*/ meltfptr[132] =
@@ -23571,7 +24161,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1104:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1105:/ quasiblock");
/*^rawallocobj */
@@ -23619,7 +24209,7 @@ lab_endgetargs:;
;
/*_.NFLEXP__V134*/ meltfptr[133] =
/*_.INST__V135*/ meltfptr[134];;
- MELT_LOCATION ("warmelt-normatch.melt:1108:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1109:/ quasiblock");
/*^rawallocobj */
@@ -23678,7 +24268,7 @@ lab_endgetargs:;
;
/*_.NEWBIND__V136*/ meltfptr[135] =
/*_.INST__V137*/ meltfptr[136];;
- MELT_LOCATION ("warmelt-normatch.melt:1113:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1114:/ quasiblock");
/*^rawallocobj */
@@ -23737,8 +24327,14 @@ lab_endgetargs:;
;
/*_.NEWLOCC__V138*/ meltfptr[137] =
/*_.INST__V139*/ meltfptr[138];;
- MELT_LOCATION ("warmelt-normatch.melt:1121:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1122:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V25*/
+ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23763,7 +24359,7 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.CURFLD__V93*/ meltfptr[65])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:1120:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1121:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NTINST_FIELDLOCS__V140*/
meltfptr[139]),
@@ -23772,8 +24368,14 @@ lab_endgetargs:;
meltfptr[137]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1125:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V22*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[34])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1126:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V22*/
+ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[34])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23793,7 +24395,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1125:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1126:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V141*/
meltfptr[140]),
@@ -23804,7 +24406,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23827,7 +24429,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -23837,7 +24439,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[40] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23848,7 +24450,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1126;
+ argtab[2].meltbp_long = 1127;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat updated fieldlocs tester";
@@ -23870,7 +24472,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V144*/ meltfptr[143];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[40] =
0;
/*^clear */
@@ -23885,7 +24487,7 @@ lab_endgetargs:;
/*_.IF___V143*/ meltfptr[142] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ quasiblock");
/*_.PROGN___V145*/ meltfptr[143] =
@@ -23896,7 +24498,7 @@ lab_endgetargs:;
/*_.PROGN___V145*/ meltfptr[143];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1126:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1127:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V143*/ meltfptr[142] = 0;
@@ -23911,7 +24513,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1127:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1128:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLOCCL__V72*/ meltfptr[42]),
(melt_ptr_t) ( /*_.NEWLOCC__V138*/
@@ -23920,7 +24522,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23943,7 +24545,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[40]) /*then */
{
/*^cond.then */
@@ -23953,7 +24555,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23964,7 +24566,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1128;
+ argtab[2].meltbp_long = 1129;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat made newlocc";
@@ -23987,7 +24589,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V148*/ meltfptr[147];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[39] =
0;
/*^clear */
@@ -24002,7 +24604,7 @@ lab_endgetargs:;
/*_.IF___V147*/ meltfptr[143] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ quasiblock");
/*_.PROGN___V149*/ meltfptr[147] =
@@ -24013,7 +24615,7 @@ lab_endgetargs:;
/*_.PROGN___V149*/ meltfptr[147];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1128:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1129:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[40] = 0;
/*^clear */
/*clear *//*_.IF___V147*/ meltfptr[143] = 0;
@@ -24026,14 +24628,14 @@ lab_endgetargs:;
/*_.IFCPP___V146*/ meltfptr[142] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1129:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1130:/ compute");
/*_.CURLOCCL__V110*/ meltfptr[106] =
/*_.SETQ___V150*/ meltfptr[143] =
/*_.NEWLOCC__V138*/ meltfptr[137];;
/*_.LET___V131*/ meltfptr[124] =
/*_.SETQ___V150*/ meltfptr[143];;
- MELT_LOCATION ("warmelt-normatch.melt:1102:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1103:/ clear");
/*clear *//*_.NAMED_NAME__V132*/ meltfptr[131] = 0;
/*^clear */
/*clear *//*_.NEWSYM__V133*/ meltfptr[132] = 0;
@@ -24059,7 +24661,7 @@ lab_endgetargs:;
/*_.LET___V131*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1101:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1102:/ clear");
/*clear *//*_.LET___V131*/ meltfptr[124] = 0;
}
;
@@ -24072,7 +24674,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24095,7 +24697,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -24105,7 +24707,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[40] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24116,7 +24718,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1131;
+ argtab[2].meltbp_long = 1132;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat before normal_pattern cursubpat";
@@ -24138,7 +24740,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V153*/ meltfptr[132];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/ meltfnum[40] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V153*/ meltfptr[132] = 0;
@@ -24151,7 +24753,7 @@ lab_endgetargs:;
/*_.IF___V152*/ meltfptr[131] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ quasiblock");
/*_.PROGN___V154*/ meltfptr[133] = /*_.IF___V152*/ meltfptr[131];;
@@ -24161,7 +24763,7 @@ lab_endgetargs:;
/*_.PROGN___V154*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1131:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1132:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V152*/ meltfptr[131] = 0;
@@ -24174,7 +24776,7 @@ lab_endgetargs:;
/*_.IFCPP___V151*/ meltfptr[147] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1132:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1133:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -24198,7 +24800,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24221,7 +24823,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -24231,7 +24833,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L47*/ meltfnum[40] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -24242,7 +24844,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1133;
+ argtab[2].meltbp_long = 1134;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat after normal_pattern cursubpat=";
@@ -24270,7 +24872,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V158*/ meltfptr[140];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L47*/ meltfnum[40] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V158*/ meltfptr[140] = 0;
@@ -24283,7 +24885,7 @@ lab_endgetargs:;
/*_.IF___V157*/ meltfptr[139] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ quasiblock");
/*_.PROGN___V159*/ meltfptr[141] = /*_.IF___V157*/ meltfptr[139];;
@@ -24293,7 +24895,7 @@ lab_endgetargs:;
/*_.PROGN___V159*/ meltfptr[141];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1133:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1134:/ clear");
/*clear *//*_#MELT_NEED_DBG__L46*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V157*/ meltfptr[139] = 0;
@@ -24310,7 +24912,7 @@ lab_endgetargs:;
/*_.LET___V109*/ meltfptr[99] = /*_.IFCPP___V156*/ meltfptr[137];;
- MELT_LOCATION ("warmelt-normatch.melt:1085:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1086:/ clear");
/*clear *//*_.CURLOCCL__V110*/ meltfptr[106] = 0;
/*^clear */
/*clear *//*_.IFCPP___V111*/ meltfptr[110] = 0;
@@ -24328,7 +24930,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V156*/ meltfptr[137] = 0;
/*_.LET___V91*/ meltfptr[33] = /*_.LET___V109*/ meltfptr[99];;
- MELT_LOCATION ("warmelt-normatch.melt:1063:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1064:/ clear");
/*clear *//*_.FLOC__V92*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_.CURFLD__V93*/ meltfptr[65] = 0;
@@ -24354,7 +24956,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1058:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1059:/ clear");
/*clear *//*_.CURPATF__V84*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_#PATIX__L22*/ meltfnum[10] = 0;
@@ -24367,7 +24969,7 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:1034:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1035:/ clear");
/*clear *//*_.TESTLOCCL__V72*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_.TESTERCONT__V73*/ meltfptr[44] = 0;
@@ -24381,7 +24983,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V82*/ meltfptr[32] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24404,7 +25006,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L48*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -24414,7 +25016,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L49*/ meltfnum[40] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24425,7 +25027,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1137;
+ argtab[2].meltbp_long = 1138;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_instancepat final tester";
/*^apply.arg */
@@ -24445,7 +25047,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V162*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L49*/ meltfnum[40] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V162*/ meltfptr[124] = 0;
@@ -24458,7 +25060,7 @@ lab_endgetargs:;
/*_.IF___V161*/ meltfptr[143] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ quasiblock");
/*_.PROGN___V163*/ meltfptr[132] = /*_.IF___V161*/ meltfptr[143];;
@@ -24467,7 +25069,7 @@ lab_endgetargs:;
/*_.IFCPP___V160*/ meltfptr[142] = /*_.PROGN___V163*/ meltfptr[132];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1137:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1138:/ clear");
/*clear *//*_#MELT_NEED_DBG__L48*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V161*/ meltfptr[143] = 0;
@@ -24484,7 +25086,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V160*/ meltfptr[142];;
- MELT_LOCATION ("warmelt-normatch.melt:966:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:967:/ clear");
/*clear *//*_.PCTN_SRC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.PSLOC__V16*/ meltfptr[15] = 0;
@@ -24522,7 +25124,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V160*/ meltfptr[142] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24545,7 +25147,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -24555,7 +25157,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L51*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24566,7 +25168,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1139;
+ argtab[2].meltbp_long = 1140;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_instancepat recv end";
/*^apply.arg */
@@ -24586,7 +25188,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V166*/ meltfptr[140];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L51*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V166*/ meltfptr[140] = 0;
@@ -24599,7 +25201,7 @@ lab_endgetargs:;
/*_.IF___V165*/ meltfptr[133] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ quasiblock");
/*_.PROGN___V167*/ meltfptr[139] = /*_.IF___V165*/ meltfptr[133];;
@@ -24608,7 +25210,7 @@ lab_endgetargs:;
/*_.IFCPP___V164*/ meltfptr[131] = /*_.PROGN___V167*/ meltfptr[139];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1139:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1140:/ clear");
/*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V165*/ meltfptr[133] = 0;
@@ -24621,11 +25223,11 @@ lab_endgetargs:;
/*_.IFCPP___V164*/ meltfptr[131] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:962:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V164*/ meltfptr[131];;
- MELT_LOCATION ("warmelt-normatch.melt:962:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -24717,7 +25319,7 @@ meltrout_23_warmelt_normatch_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:996:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -24729,7 +25331,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:997:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:998:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -24738,8 +25340,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:998:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:999:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -24767,7 +25375,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:999:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24790,7 +25398,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:999:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24800,7 +25408,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:999:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24810,7 +25418,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 999;
+ argtab[2].meltbp_long = 1000;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat lambda updatelse of tstuff";
@@ -24830,7 +25438,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:999:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -24843,7 +25451,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:999:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -24852,7 +25460,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:999:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1000:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -24865,8 +25473,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1000:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1001:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24886,7 +25499,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1000:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1001:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -24895,7 +25508,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:996:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -24976,7 +25589,7 @@ meltrout_24_warmelt_normatch_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ getarg");
/*_.PF1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -24997,7 +25610,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1042:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1043:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25006,7 +25619,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PF1__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:1042:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1043:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -25014,7 +25627,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1042:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1043:/ cond.else");
/*^block */
/*anyblock */
@@ -25028,7 +25641,7 @@ lab_endgetargs:;
melt_assert_failed (("check pf1"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1042) ? (1042) : __LINE__, __FUNCTION__);
+ (1043) ? (1043) : __LINE__, __FUNCTION__);
;
}
;
@@ -25043,7 +25656,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1042:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1043:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -25056,7 +25669,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1043:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1044:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25065,7 +25678,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PF2__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:1043:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1044:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -25073,7 +25686,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1043:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1044:/ cond.else");
/*^block */
/*anyblock */
@@ -25087,7 +25700,7 @@ lab_endgetargs:;
melt_assert_failed (("check pf2"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1043) ? (1043) : __LINE__, __FUNCTION__);
+ (1044) ? (1044) : __LINE__, __FUNCTION__);
;
}
;
@@ -25102,7 +25715,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1043:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1044:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -25113,11 +25726,16 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1044:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1045:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1045:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PF1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1046:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PF1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25135,8 +25753,13 @@ lab_endgetargs:;
/*_.SPAF_PATTERN__V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1044:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SPAF_PATTERN__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1045:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SPAF_PATTERN__V9*/ meltfptr[8]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25158,8 +25781,13 @@ lab_endgetargs:;
/*_#WPF1__L3*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.PAT_WEIGHT__V10*/ meltfptr[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:1047:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PF2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1048:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PF2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25177,8 +25805,14 @@ lab_endgetargs:;
/*_.SPAF_PATTERN__V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1046:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SPAF_PATTERN__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1047:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SPAF_PATTERN__V11*/
+ meltfptr[10]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25204,7 +25838,7 @@ lab_endgetargs:;
/*_#I__L5*/ meltfnum[4] =
(( /*_#WPF2__L4*/ meltfnum[3]) == ( /*_#WPF2__L4*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-normatch.melt:1049:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1050:/ cond");
/*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -25213,7 +25847,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1049:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1050:/ cond.else");
/*^block */
/*anyblock */
@@ -25221,7 +25855,7 @@ lab_endgetargs:;
/*_#I__L6*/ meltfnum[5] =
(( /*_#WPF1__L3*/ meltfnum[0]) < ( /*_#WPF2__L4*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-normatch.melt:1050:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1051:/ cond");
/*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -25230,13 +25864,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1050:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1051:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1051:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1052:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[14] =
@@ -25247,7 +25881,7 @@ lab_endgetargs:;
/*_.PROGN___V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1050:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1051:/ clear");
/*clear *//*_.PROGN___V15*/ meltfptr[14] = 0;
}
;
@@ -25256,7 +25890,7 @@ lab_endgetargs:;
/*_.IFELSE___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1049:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1050:/ clear");
/*clear *//*_#I__L6*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -25266,7 +25900,7 @@ lab_endgetargs:;
;
/*_.LET___V8*/ meltfptr[6] = /*_.IFELSE___V13*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:1044:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1045:/ clear");
/*clear *//*_.SPAF_PATTERN__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.PAT_WEIGHT__V10*/ meltfptr[9] = 0;
@@ -25282,11 +25916,11 @@ lab_endgetargs:;
/*clear *//*_#I__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -25374,7 +26008,7 @@ meltrout_25_warmelt_normatch_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ getarg");
/*_.NEWSUBTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -25386,7 +26020,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25409,7 +26043,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -25419,7 +26053,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -25429,7 +26063,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1069;
+ argtab[2].meltbp_long = 1070;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat.subhdler newsubtester=";
@@ -25455,7 +26089,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -25468,7 +26102,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -25477,7 +26111,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1069:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1070:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -25492,7 +26126,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1071:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1072:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -25501,11 +26135,18 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1072:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1073:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TESTERCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TESTERCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25525,7 +26166,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25548,7 +26189,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25558,7 +26199,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25568,7 +26209,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1073;
+ argtab[2].meltbp_long = 1074;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat.subhdler prevtester";
@@ -25589,7 +26230,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -25602,7 +26243,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -25611,7 +26252,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1073:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1074:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -25626,7 +26267,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1074:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1075:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25635,7 +26276,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PREVTESTER__V8*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1074:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1075:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -25643,7 +26284,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1074:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1075:/ cond.else");
/*^block */
/*anyblock */
@@ -25657,7 +26298,7 @@ lab_endgetargs:;
melt_assert_failed (("check prevtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1074) ? (1074) : __LINE__, __FUNCTION__);
+ (1075) ? (1075) : __LINE__, __FUNCTION__);
;
}
;
@@ -25672,7 +26313,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.IFELSE___V14*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1074:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1075:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
@@ -25683,7 +26324,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1075:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1076:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -25702,7 +26343,7 @@ lab_endgetargs:;
/*_.LET___V7*/ meltfptr[3] =
/*_.SET_NEW_TESTER_LAST_THEN__V15*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:1072:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1073:/ clear");
/*clear *//*_.PREVTESTER__V8*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.IFCPP___V9*/ meltfptr[8] = 0;
@@ -25712,7 +26353,7 @@ lab_endgetargs:;
/*clear *//*_.SET_NEW_TESTER_LAST_THEN__V15*/ meltfptr[10] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25735,7 +26376,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25745,7 +26386,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25755,7 +26396,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1077;
+ argtab[2].meltbp_long = 1078;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_instancepat.subhdler end newsubtester";
@@ -25776,7 +26417,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[9] = 0;
@@ -25789,7 +26430,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[10] = /*_.IF___V17*/ meltfptr[8];;
@@ -25798,7 +26439,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[4] = /*_.PROGN___V19*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1077:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1078:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[8] = 0;
@@ -25811,11 +26452,11 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V16*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -25905,7 +26546,7 @@ meltrout_26_warmelt_normatch_NORMPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -25946,7 +26587,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25969,7 +26610,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -25979,7 +26620,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -25989,7 +26630,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1154;
+ argtab[2].meltbp_long = 1155;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat recv=";
/*^apply.arg */
@@ -26020,7 +26661,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -26033,7 +26674,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -26042,7 +26683,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1154:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1155:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -26057,7 +26698,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1155:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1156:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26066,7 +26707,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1155:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1156:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -26074,7 +26715,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1155:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1156:/ cond.else");
/*^block */
/*anyblock */
@@ -26088,7 +26729,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1155) ? (1155) : __LINE__, __FUNCTION__);
+ (1156) ? (1156) : __LINE__, __FUNCTION__);
;
}
;
@@ -26103,7 +26744,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1156:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -26116,7 +26757,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1156:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1157:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26125,7 +26766,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_TUPLE */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1156:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1157:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26133,7 +26774,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1156:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1157:/ cond.else");
/*^block */
/*anyblock */
@@ -26147,7 +26788,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1156) ? (1156) : __LINE__, __FUNCTION__);
+ (1157) ? (1157) : __LINE__, __FUNCTION__);
;
}
;
@@ -26162,7 +26803,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1156:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1157:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -26173,11 +26814,17 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1157:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1158:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1158:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1159:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26195,8 +26842,13 @@ lab_endgetargs:;
/*_.SLOC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1159:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTRUCT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1160:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTRUCT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26219,8 +26871,13 @@ lab_endgetargs:;
/*_#NBCOMP__L5*/ meltfnum[1] =
(melt_multiple_length
((melt_ptr_t) ( /*_.TUPSUBPA__V16*/ meltfptr[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:1161:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1162:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26238,8 +26895,13 @@ lab_endgetargs:;
/*_.NCX__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1162:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1163:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26270,8 +26932,13 @@ lab_endgetargs:;
/*^compute */
/*_.TESTER__V21*/ meltfptr[20] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1166:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1167:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26291,7 +26958,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26314,7 +26981,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26324,7 +26991,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -26334,7 +27001,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1168;
+ argtab[2].meltbp_long = 1169;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat tupsubpa=";
/*^apply.arg */
@@ -26359,7 +27026,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -26372,7 +27039,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -26381,7 +27048,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1168:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1169:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -26394,7 +27061,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1170:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:1171:/ loop");
/*loop */
{
labloop_LOOPSTUFF_3:; /*^loopbody */
@@ -26405,7 +27072,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26428,7 +27095,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -26438,7 +27105,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26449,7 +27116,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1172;
+ argtab[2].meltbp_long = 1173;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat loop tstuff=";
/*^apply.arg */
@@ -26470,7 +27137,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0;
@@ -26483,7 +27150,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[29] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[29];;
@@ -26492,7 +27159,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = /*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1172:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1173:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[29] = 0;
@@ -26511,7 +27178,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V19*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26519,8 +27186,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1176:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1177:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V19*/
+ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26554,7 +27227,7 @@ lab_endgetargs:;
/*_#IF___L11*/ meltfnum[6] = /*_#I__L13*/ meltfnum[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ clear");
/*clear *//*_.NTTUPLE_COMPONENTS__V33*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L12*/ meltfnum[11] = 0;
@@ -26569,7 +27242,7 @@ lab_endgetargs:;
/*_#IF___L11*/ meltfnum[6] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ cond");
/*cond */ if ( /*_#IF___L11*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -26579,7 +27252,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26602,7 +27275,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -26612,7 +27285,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26623,7 +27296,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1178;
+ argtab[2].meltbp_long = 1179;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat found tstuff=";
@@ -26645,7 +27318,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0;
@@ -26658,7 +27331,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];;
@@ -26668,7 +27341,7 @@ lab_endgetargs:;
/*_.PROGN___V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1178:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1179:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[35] = 0;
@@ -26681,10 +27354,10 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[29] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1179:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1180:/ compute");
/*_.TESTER__V21*/ meltfptr[20] = /*_.SETQ___V39*/ meltfptr[35] =
/*_.TSTUFF__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[36] = /*_.SETQ___V39*/ meltfptr[35];;
@@ -26694,7 +27367,7 @@ lab_endgetargs:;
/*_.PROGN___V40*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ clear");
/*clear *//*_.IFCPP___V35*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.SETQ___V39*/ meltfptr[35] = 0;
@@ -26714,7 +27387,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.TSTUFF__V19*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:1181:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1182:/ cond");
/*cond */ if ( /*_#IS_A__L16*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -26722,8 +27395,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1182:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1183:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V19*/
+ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26741,11 +27420,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V42*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1182:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1183:/ compute");
/*_.TSTUFF__V19*/ meltfptr[18] =
/*_.SETQ___V43*/ meltfptr[36] =
/*_.NTEST_ELSE__V42*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ quasiblock");
/*^newclosure */
@@ -26777,11 +27456,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V44*/ meltfptr[43] =
/*_.LAMBDA___V45*/ meltfptr[44];;
- MELT_LOCATION ("warmelt-normatch.melt:1183:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1184:/ compute");
/*_.CURHDLER__V20*/ meltfptr[19] =
/*_.SETQ___V46*/ meltfptr[45] =
/*_.LAMBDA___V44*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:1181:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1182:/ quasiblock");
/*_.PROGN___V47*/ meltfptr[46] =
@@ -26792,7 +27471,7 @@ lab_endgetargs:;
/*_.PROGN___V47*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1181:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1182:/ clear");
/*clear *//*_.NTEST_ELSE__V42*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.SETQ___V43*/ meltfptr[36] = 0;
@@ -26812,7 +27491,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1192:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1193:/ quasiblock");
/*_.NEWCOMPLOCS__V48*/ meltfptr[35] =
@@ -26832,7 +27511,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[11]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1195:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1196:/ quasiblock");
/*^rawallocobj */
@@ -26932,7 +27611,7 @@ lab_endgetargs:;
/*_.INST__V52*/ meltfptr[46];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1205:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1206:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26955,7 +27634,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1205:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1206:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -26966,7 +27645,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1205:/ apply");
+ ("warmelt-normatch.melt:1206:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26978,7 +27657,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1205;
+ argtab[2].meltbp_long = 1206;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat newtester=";
@@ -27004,7 +27683,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1205:/ clear");
+ ("warmelt-normatch.melt:1206:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/
meltfnum[17] = 0;
/*^clear */
@@ -27020,7 +27699,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1205:/ quasiblock");
+ ("warmelt-normatch.melt:1206:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[54] =
@@ -27031,7 +27710,7 @@ lab_endgetargs:;
/*_.PROGN___V56*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1205:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1206:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V54*/ meltfptr[53] = 0;
@@ -27044,7 +27723,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1206:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1207:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27062,13 +27741,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1207:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1208:/ compute");
/*_.TESTER__V21*/ meltfptr[20] =
/*_.SETQ___V58*/ meltfptr[54] =
/*_.NEWTESTER__V51*/ meltfptr[45];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1208:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1209:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V22*/ meltfptr[21]),
(melt_ptr_t) ( /*_.NEWTESTER__V51*/
@@ -27077,7 +27756,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1209:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1210:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27100,7 +27779,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1209:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1210:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -27111,7 +27790,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[11] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1209:/ apply");
+ ("warmelt-normatch.melt:1210:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27123,7 +27802,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1209;
+ argtab[2].meltbp_long = 1210;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat before calling curhdler";
@@ -27149,7 +27828,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1209:/ clear");
+ ("warmelt-normatch.melt:1210:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/
meltfnum[11] = 0;
/*^clear */
@@ -27165,7 +27844,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1209:/ quasiblock");
+ ("warmelt-normatch.melt:1210:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] =
@@ -27176,7 +27855,7 @@ lab_endgetargs:;
/*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1209:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1210:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[59] = 0;
@@ -27189,7 +27868,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[58] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1210:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1211:/ apply");
/*apply */
{
/*_.CURHDLER__V63*/ meltfptr[59] =
@@ -27203,7 +27882,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1211:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1212:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27226,7 +27905,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1211:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1212:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -27237,7 +27916,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1211:/ apply");
+ ("warmelt-normatch.melt:1212:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27249,7 +27928,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1211;
+ argtab[2].meltbp_long = 1212;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat after calling curhdler";
@@ -27275,7 +27954,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1211:/ clear");
+ ("warmelt-normatch.melt:1212:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[17] = 0;
/*^clear */
@@ -27291,7 +27970,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1211:/ quasiblock");
+ ("warmelt-normatch.melt:1212:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[65] =
@@ -27302,7 +27981,7 @@ lab_endgetargs:;
/*_.PROGN___V67*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1211:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1212:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[64] = 0;
@@ -27315,7 +27994,7 @@ lab_endgetargs:;
/*_.IFCPP___V64*/ meltfptr[60] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1212:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1213:/ quasiblock");
/*^compute */
@@ -27328,7 +28007,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1192:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1193:/ clear");
/*clear *//*_.NEWCOMPLOCS__V48*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.MAKE_LIST__V49*/ meltfptr[36] = 0;
@@ -27349,7 +28028,7 @@ lab_endgetargs:;
/*clear *//*_.CURHDLER__V63*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1191:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1192:/ quasiblock");
/*epilog */
@@ -27361,7 +28040,7 @@ lab_endgetargs:;
/*_.IFELSE___V41*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1174:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1175:/ clear");
/*clear *//*_#IS_A__L16*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V41*/ meltfptr[29] = 0;
@@ -27371,7 +28050,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1170:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1171:/ clear");
/*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_#IS_A__L10*/ meltfnum[0] = 0;
@@ -27390,7 +28069,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27413,7 +28092,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -27423,7 +28102,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -27434,7 +28113,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1218;
+ argtab[2].meltbp_long = 1219;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat tester=";
/*^apply.arg */
@@ -27466,7 +28145,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V70*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[35] = 0;
@@ -27479,7 +28158,7 @@ lab_endgetargs:;
/*_.IF___V69*/ meltfptr[65] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ quasiblock");
/*_.PROGN___V71*/ meltfptr[36] = /*_.IF___V69*/ meltfptr[65];;
@@ -27488,7 +28167,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = /*_.PROGN___V71*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1218:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1219:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V69*/ meltfptr[65] = 0;
@@ -27501,11 +28180,16 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1220:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1221:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -27523,7 +28207,7 @@ lab_endgetargs:;
/*_.TESTLOCCL__V73*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1221:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1222:/ quasiblock");
/*^rawallocobj */
@@ -27549,7 +28233,7 @@ lab_endgetargs:;
"CONTAINER_VALUE");
;
/*_.TESTERCONT__V74*/ meltfptr[52] = /*_.INST__V75*/ meltfptr[53];;
- MELT_LOCATION ("warmelt-normatch.melt:1225:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1226:/ quasiblock");
/*_.LISTSUBPA__V77*/ meltfptr[58] =
@@ -27576,7 +28260,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t)
( /*_.SUBPA__V78*/ meltfptr[59]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:1232:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1233:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L26*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -27589,7 +28273,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[16])),
( /*_#SUBIX__L25*/ meltfnum[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:1234:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1235:/ quasiblock");
/*^rawallocobj */
@@ -27627,7 +28311,7 @@ lab_endgetargs:;
/*_.INST___V80*/ meltfptr[29] = /*_.INST__V81*/ meltfptr[28];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1233:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1234:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.LISTSUBPA__V77*/ meltfptr[58]),
(melt_ptr_t) ( /*_.INST___V80*/
@@ -27636,7 +28320,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1232:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1233:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V79*/ meltfptr[60] = 0;
/*^clear */
/*clear *//*_.INST___V80*/ meltfptr[29] = 0;
@@ -27650,7 +28334,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1228:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1229:/ clear");
/*clear *//*_.SUBPA__V78*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_#SUBIX__L25*/ meltfnum[12] = 0;
@@ -27660,7 +28344,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27683,7 +28367,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -27693,7 +28377,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27704,7 +28388,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1237;
+ argtab[2].meltbp_long = 1238;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat unsorted listsubpa=";
@@ -27725,7 +28409,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V84*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V84*/ meltfptr[65] = 0;
@@ -27738,7 +28422,7 @@ lab_endgetargs:;
/*_.IF___V83*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ quasiblock");
/*_.PROGN___V85*/ meltfptr[36] = /*_.IF___V83*/ meltfptr[35];;
@@ -27747,7 +28431,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[30] = /*_.PROGN___V85*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1237:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1238:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V83*/ meltfptr[35] = 0;
@@ -27760,7 +28444,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1238:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1239:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27778,14 +28462,14 @@ lab_endgetargs:;
;
/*_.LET___V76*/ meltfptr[54] = /*_.LIST_TO_MULTIPLE__V86*/ meltfptr[60];;
- MELT_LOCATION ("warmelt-normatch.melt:1225:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1226:/ clear");
/*clear *//*_.LISTSUBPA__V77*/ meltfptr[58] = 0;
/*^clear */
/*clear *//*_.IFCPP___V82*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.LIST_TO_MULTIPLE__V86*/ meltfptr[60] = 0;
/*_.UNSORTEDSUBPA__V87*/ meltfptr[29] = /*_.LET___V76*/ meltfptr[54];;
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ quasiblock");
/*^newclosure */
@@ -27806,7 +28490,7 @@ lab_endgetargs:;
tabval[10])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27829,7 +28513,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -27839,7 +28523,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -27850,7 +28534,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1252;
+ argtab[2].meltbp_long = 1253;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat testercont before loop testercont=";
@@ -27883,7 +28567,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V93*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V93*/ meltfptr[60] = 0;
@@ -27896,7 +28580,7 @@ lab_endgetargs:;
/*_.IF___V92*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ quasiblock");
/*_.PROGN___V94*/ meltfptr[60] = /*_.IF___V92*/ meltfptr[30];;
@@ -27905,7 +28589,7 @@ lab_endgetargs:;
/*_.IFCPP___V91*/ meltfptr[58] = /*_.PROGN___V94*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1252:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1253:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V92*/ meltfptr[30] = 0;
@@ -27920,7 +28604,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1255:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1256:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27928,7 +28612,7 @@ lab_endgetargs:;
/*_#IS_LIST__L31*/ meltfnum[6] =
(melt_magic_discr ((melt_ptr_t) ( /*_.TESTLOCCL__V73*/ meltfptr[45]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:1255:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1256:/ cond");
/*cond */ if ( /*_#IS_LIST__L31*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -27936,7 +28620,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1255:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1256:/ cond.else");
/*^block */
/*anyblock */
@@ -27950,7 +28634,7 @@ lab_endgetargs:;
melt_assert_failed (("check testbindl"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1255) ? (1255) : __LINE__, __FUNCTION__);
+ (1256) ? (1256) : __LINE__, __FUNCTION__);
;
}
;
@@ -27965,7 +28649,7 @@ lab_endgetargs:;
/*_.IFCPP___V95*/ meltfptr[30] = /*_.IFELSE___V96*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1255:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1256:/ clear");
/*clear *//*_#IS_LIST__L31*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V96*/ meltfptr[60] = 0;
@@ -27996,7 +28680,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28019,7 +28703,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -28029,7 +28713,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -28040,7 +28724,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1259;
+ argtab[2].meltbp_long = 1260;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat curtupat=";
/*^apply.arg */
@@ -28066,7 +28750,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] = 0;
@@ -28079,7 +28763,7 @@ lab_endgetargs:;
/*_.IF___V99*/ meltfptr[98] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] = /*_.IF___V99*/ meltfptr[98];;
@@ -28088,7 +28772,7 @@ lab_endgetargs:;
/*_.IFCPP___V98*/ meltfptr[97] = /*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1259:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1260:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[98] = 0;
@@ -28103,7 +28787,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1260:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1261:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28112,7 +28796,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURTUPAT__V97*/ meltfptr[60]),
(melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:1260:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1261:/ cond");
/*cond */ if ( /*_#IS_A__L35*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -28120,7 +28804,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1260:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1261:/ cond.else");
/*^block */
/*anyblock */
@@ -28134,7 +28818,7 @@ lab_endgetargs:;
melt_assert_failed (("check curtupat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (1260) ? (1260) : __LINE__,
+ __FILE__, (1261) ? (1261) : __LINE__,
__FUNCTION__);
;
}
@@ -28151,7 +28835,7 @@ lab_endgetargs:;
/*_.IFELSE___V103*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1260:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1261:/ clear");
/*clear *//*_#IS_A__L35*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V103*/ meltfptr[99] = 0;
@@ -28162,11 +28846,17 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[98] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1261:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1262:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURTUPAT__V97*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[15])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURTUPAT__V97*/
+ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28184,8 +28874,14 @@ lab_endgetargs:;
/*_.CURPAT__V105*/ meltfptr[104] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1262:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURTUPAT__V97*/ meltfptr[60]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[15])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1263:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURTUPAT__V97*/
+ meltfptr[60]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28208,7 +28904,7 @@ lab_endgetargs:;
/*_#PATIX__L36*/ meltfnum[17] =
(melt_get_int
((melt_ptr_t) ( /*_.TUPCP_INDEX__V106*/ meltfptr[105])));;
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ quasiblock");
/*^newclosure */
@@ -28238,7 +28934,7 @@ lab_endgetargs:;
/*_.LAMBDA___V108*/ meltfptr[107];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28261,7 +28957,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -28271,7 +28967,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -28282,7 +28978,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1276;
+ argtab[2].meltbp_long = 1277;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat curpat=";
/*^apply.arg */
@@ -28308,7 +29004,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V111*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V111*/ meltfptr[110] = 0;
@@ -28321,7 +29017,7 @@ lab_endgetargs:;
/*_.IF___V110*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ quasiblock");
/*_.PROGN___V112*/ meltfptr[110] = /*_.IF___V110*/ meltfptr[109];;
@@ -28331,7 +29027,7 @@ lab_endgetargs:;
/*_.PROGN___V112*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1276:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1277:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V110*/ meltfptr[109] = 0;
@@ -28344,13 +29040,13 @@ lab_endgetargs:;
/*_.IFCPP___V109*/ meltfptr[108] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1277:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1278:/ quasiblock");
/*_.CURLOCCL__V114*/ meltfptr[110] = ( /*nil */ NULL);;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28373,7 +29069,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -28383,7 +29079,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L40*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28394,7 +29090,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1279;
+ argtab[2].meltbp_long = 1280;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat scanning testloccl";
@@ -28416,7 +29112,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V117*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V117*/ meltfptr[116] = 0;
@@ -28429,7 +29125,7 @@ lab_endgetargs:;
/*_.IF___V116*/ meltfptr[115] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ quasiblock");
/*_.PROGN___V118*/ meltfptr[116] = /*_.IF___V116*/ meltfptr[115];;
@@ -28439,7 +29135,7 @@ lab_endgetargs:;
/*_.PROGN___V118*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1279:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1280:/ clear");
/*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V116*/ meltfptr[115] = 0;
@@ -28468,7 +29164,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1284:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1285:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28478,7 +29174,7 @@ lab_endgetargs:;
( /*_.TESTLOCSY__V120*/
meltfptr[116]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[26])));;
- MELT_LOCATION ("warmelt-normatch.melt:1284:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1285:/ cond");
/*cond */ if ( /*_#IS_A__L41*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -28487,7 +29183,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:1284:/ cond.else");
+ ("warmelt-normatch.melt:1285:/ cond.else");
/*^block */
/*anyblock */
@@ -28502,7 +29198,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (1284) ? (1284) : __LINE__,
+ (1285) ? (1285) : __LINE__,
__FUNCTION__);
;
}
@@ -28519,7 +29215,7 @@ lab_endgetargs:;
/*_.IFELSE___V122*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1284:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1285:/ clear");
/*clear *//*_#IS_A__L41*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V122*/ meltfptr[121] = 0;
@@ -28530,8 +29226,14 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[120] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1286:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTLOCSY__V120*/ meltfptr[116]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[27])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTLOCSY__V120*/
+ meltfptr[116]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[27])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28549,8 +29251,14 @@ lab_endgetargs:;
/*_.NOCC_BIND__V123*/ meltfptr[121] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1286:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NOCC_BIND__V123*/ meltfptr[121]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[28])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NOCC_BIND__V123*/
+ meltfptr[121]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28568,8 +29276,14 @@ lab_endgetargs:;
/*_.LETBIND_EXPR__V124*/ meltfptr[123] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1286:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LETBIND_EXPR__V124*/ meltfptr[123]), (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[29])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LETBIND_EXPR__V124*/
+ meltfptr[123]),
+ (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[29])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28597,7 +29311,7 @@ lab_endgetargs:;
/*_#I__L43*/ meltfnum[6] =
(( /*_#PATIX__L36*/ meltfnum[17]) ==
( /*_#GET_INT__L42*/ meltfnum[37]));;
- MELT_LOCATION ("warmelt-normatch.melt:1285:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1286:/ cond");
/*cond */ if ( /*_#I__L43*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -28605,15 +29319,15 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1288:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1289:/ compute");
/*_.TESTPAIR__V119*/ meltfptr[115] =
/*_.SETQ___V127*/ meltfptr[126] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1289:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1290:/ compute");
/*_.CURLOCCL__V114*/ meltfptr[110] =
/*_.SETQ___V128*/ meltfptr[127] =
/*_.TESTLOCSY__V120*/ meltfptr[116];;
MELT_LOCATION
- ("warmelt-normatch.melt:1287:/ quasiblock");
+ ("warmelt-normatch.melt:1288:/ quasiblock");
/*_.PROGN___V129*/ meltfptr[128] =
@@ -28624,7 +29338,7 @@ lab_endgetargs:;
/*_.PROGN___V129*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1285:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1286:/ clear");
/*clear *//*_.SETQ___V127*/ meltfptr[126] = 0;
/*^clear */
/*clear *//*_.SETQ___V128*/ meltfptr[127] = 0;
@@ -28643,7 +29357,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1281:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1282:/ clear");
/*clear *//*_.TESTPAIR__V119*/ meltfptr[115] = 0;
/*^clear */
/*clear *//*_.TESTLOCSY__V120*/ meltfptr[116] = 0;
@@ -28665,7 +29379,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28688,7 +29402,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -28698,7 +29412,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28709,7 +29423,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1291;
+ argtab[2].meltbp_long = 1292;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat got curloccl=";
@@ -28731,7 +29445,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V132*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V132*/ meltfptr[128] = 0;
@@ -28744,7 +29458,7 @@ lab_endgetargs:;
/*_.IF___V131*/ meltfptr[127] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ quasiblock");
/*_.PROGN___V133*/ meltfptr[128] = /*_.IF___V131*/ meltfptr[127];;
@@ -28754,7 +29468,7 @@ lab_endgetargs:;
/*_.PROGN___V133*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1292:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.IF___V131*/ meltfptr[127] = 0;
@@ -28771,7 +29485,7 @@ lab_endgetargs:;
/*_#NULL__L46*/ meltfnum[44] =
(( /*_.CURLOCCL__V114*/ meltfptr[110]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1293:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1294:/ cond");
/*cond */ if ( /*_#NULL__L46*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -28779,10 +29493,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1294:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1295:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1295:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1296:/ apply");
/*apply */
{
/*_.NEWSYM__V136*/ meltfptr[135] =
@@ -28799,7 +29513,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[16])),
( /*_#PATIX__L36*/ meltfnum[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:1296:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1297:/ quasiblock");
/*^rawallocobj */
@@ -28847,7 +29561,7 @@ lab_endgetargs:;
;
/*_.NUNTHEXP__V138*/ meltfptr[137] =
/*_.INST__V139*/ meltfptr[138];;
- MELT_LOCATION ("warmelt-normatch.melt:1301:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1302:/ quasiblock");
/*^rawallocobj */
@@ -28906,7 +29620,7 @@ lab_endgetargs:;
;
/*_.NEWBIND__V140*/ meltfptr[139] =
/*_.INST__V141*/ meltfptr[140];;
- MELT_LOCATION ("warmelt-normatch.melt:1306:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1307:/ quasiblock");
/*^rawallocobj */
@@ -28967,7 +29681,7 @@ lab_endgetargs:;
/*_.INST__V143*/ meltfptr[142];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28990,7 +29704,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -29000,7 +29714,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L48*/ meltfnum[47] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29011,7 +29725,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1313;
+ argtab[2].meltbp_long = 1314;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat newlocc=";
@@ -29034,7 +29748,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V146*/ meltfptr[145];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L48*/ meltfnum[47] =
0;
/*^clear */
@@ -29049,7 +29763,7 @@ lab_endgetargs:;
/*_.IF___V145*/ meltfptr[144] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ quasiblock");
/*_.PROGN___V147*/ meltfptr[145] =
@@ -29060,7 +29774,7 @@ lab_endgetargs:;
/*_.PROGN___V147*/ meltfptr[145];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1314:/ clear");
/*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.IF___V145*/ meltfptr[144] = 0;
@@ -29073,8 +29787,14 @@ lab_endgetargs:;
/*_.IFCPP___V144*/ meltfptr[143] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1315:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1316:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29094,7 +29814,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1314:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1315:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NTTUPLE_COMPONENTS__V148*/
meltfptr[144]),
@@ -29103,8 +29823,14 @@ lab_endgetargs:;
meltfptr[141]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1320:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V17*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[34])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1321:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V17*/
+ meltfptr[16]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[34])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29124,7 +29850,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1320:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1321:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V149*/
meltfptr[145]),
@@ -29135,7 +29861,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29158,7 +29884,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[47]) /*then */
{
/*^cond.then */
@@ -29168,7 +29894,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L50*/ meltfnum[43] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29179,7 +29905,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1321;
+ argtab[2].meltbp_long = 1322;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat updated components tester";
@@ -29201,7 +29927,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V152*/ meltfptr[151];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[43] =
0;
/*^clear */
@@ -29216,7 +29942,7 @@ lab_endgetargs:;
/*_.IF___V151*/ meltfptr[150] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ quasiblock");
/*_.PROGN___V153*/ meltfptr[151] =
@@ -29227,7 +29953,7 @@ lab_endgetargs:;
/*_.PROGN___V153*/ meltfptr[151];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1321:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1322:/ clear");
/*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.IF___V151*/ meltfptr[150] = 0;
@@ -29242,7 +29968,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1322:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1323:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLOCCL__V73*/ meltfptr[45]),
(melt_ptr_t) ( /*_.NEWLOCC__V142*/
@@ -29251,7 +29977,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29274,7 +30000,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -29284,7 +30010,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L52*/ meltfnum[47] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29295,7 +30021,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1323;
+ argtab[2].meltbp_long = 1324;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat made newlocc";
@@ -29318,7 +30044,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V156*/ meltfptr[155];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[47] =
0;
/*^clear */
@@ -29333,7 +30059,7 @@ lab_endgetargs:;
/*_.IF___V155*/ meltfptr[151] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ quasiblock");
/*_.PROGN___V157*/ meltfptr[155] =
@@ -29344,7 +30070,7 @@ lab_endgetargs:;
/*_.PROGN___V157*/ meltfptr[155];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1323:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1324:/ clear");
/*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.IF___V155*/ meltfptr[151] = 0;
@@ -29357,14 +30083,14 @@ lab_endgetargs:;
/*_.IFCPP___V154*/ meltfptr[150] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1324:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1325:/ compute");
/*_.CURLOCCL__V114*/ meltfptr[110] =
/*_.SETQ___V158*/ meltfptr[151] =
/*_.NEWLOCC__V142*/ meltfptr[141];;
/*_.LET___V135*/ meltfptr[128] =
/*_.SETQ___V158*/ meltfptr[151];;
- MELT_LOCATION ("warmelt-normatch.melt:1294:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1295:/ clear");
/*clear *//*_.NEWSYM__V136*/ meltfptr[135] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V137*/ meltfptr[136] = 0;
@@ -29390,7 +30116,7 @@ lab_endgetargs:;
/*_.LET___V135*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1293:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1294:/ clear");
/*clear *//*_.LET___V135*/ meltfptr[128] = 0;
}
;
@@ -29403,7 +30129,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29426,7 +30152,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[47]) /*then */
{
/*^cond.then */
@@ -29436,7 +30162,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L54*/ meltfnum[43] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -29447,7 +30173,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1326;
+ argtab[2].meltbp_long = 1327;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat before normal_pattern curpat=";
@@ -29475,7 +30201,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V161*/ meltfptr[136];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V161*/ meltfptr[136] = 0;
@@ -29488,7 +30214,7 @@ lab_endgetargs:;
/*_.IF___V160*/ meltfptr[135] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ quasiblock");
/*_.PROGN___V162*/ meltfptr[137] = /*_.IF___V160*/ meltfptr[135];;
@@ -29498,7 +30224,7 @@ lab_endgetargs:;
/*_.PROGN___V162*/ meltfptr[137];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1326:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1327:/ clear");
/*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.IF___V160*/ meltfptr[135] = 0;
@@ -29511,7 +30237,7 @@ lab_endgetargs:;
/*_.IFCPP___V159*/ meltfptr[155] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1327:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1328:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -29535,7 +30261,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29558,7 +30284,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -29568,7 +30294,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L56*/ meltfnum[47] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -29579,7 +30305,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1328;
+ argtab[2].meltbp_long = 1329;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat after normal_pattern curpat=";
@@ -29606,7 +30332,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V166*/ meltfptr[144];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V166*/ meltfptr[144] = 0;
@@ -29619,7 +30345,7 @@ lab_endgetargs:;
/*_.IF___V165*/ meltfptr[143] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ quasiblock");
/*_.PROGN___V167*/ meltfptr[145] = /*_.IF___V165*/ meltfptr[143];;
@@ -29629,7 +30355,7 @@ lab_endgetargs:;
/*_.PROGN___V167*/ meltfptr[145];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1328:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1329:/ clear");
/*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.IF___V165*/ meltfptr[143] = 0;
@@ -29646,7 +30372,7 @@ lab_endgetargs:;
/*_.LET___V113*/ meltfptr[109] = /*_.IFCPP___V164*/ meltfptr[141];;
- MELT_LOCATION ("warmelt-normatch.melt:1277:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1278:/ clear");
/*clear *//*_.CURLOCCL__V114*/ meltfptr[110] = 0;
/*^clear */
/*clear *//*_.IFCPP___V115*/ meltfptr[114] = 0;
@@ -29664,7 +30390,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V164*/ meltfptr[141] = 0;
/*_.LET___V104*/ meltfptr[99] = /*_.LET___V113*/ meltfptr[109];;
- MELT_LOCATION ("warmelt-normatch.melt:1261:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1262:/ clear");
/*clear *//*_.CURPAT__V105*/ meltfptr[104] = 0;
/*^clear */
/*clear *//*_.TUPCP_INDEX__V106*/ meltfptr[105] = 0;
@@ -29682,7 +30408,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1257:/ clear");
/*clear *//*_.CURTUPAT__V97*/ meltfptr[60] = 0;
/*^clear */
/*clear *//*_#TUPATIX__L32*/ meltfnum[11] = 0;
@@ -29696,7 +30422,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29719,7 +30445,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L57*/ meltfnum[47]) /*then */
{
/*^cond.then */
@@ -29729,7 +30455,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L58*/ meltfnum[43] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29740,7 +30466,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1330;
+ argtab[2].meltbp_long = 1331;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat final tester";
/*^apply.arg */
@@ -29760,7 +30486,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V170*/ meltfptr[151];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L58*/ meltfnum[43] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V170*/ meltfptr[151] = 0;
@@ -29773,7 +30499,7 @@ lab_endgetargs:;
/*_.IF___V169*/ meltfptr[150] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ quasiblock");
/*_.PROGN___V171*/ meltfptr[128] = /*_.IF___V169*/ meltfptr[150];;
@@ -29782,7 +30508,7 @@ lab_endgetargs:;
/*_.IFCPP___V168*/ meltfptr[149] = /*_.PROGN___V171*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1330:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1331:/ clear");
/*clear *//*_#MELT_NEED_DBG__L57*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.IF___V169*/ meltfptr[150] = 0;
@@ -29797,7 +30523,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29820,7 +30546,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L59*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -29830,7 +30556,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L60*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29841,7 +30567,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1331;
+ argtab[2].meltbp_long = 1332;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_tuplepat recv end";
/*^apply.arg */
@@ -29861,7 +30587,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V174*/ meltfptr[137];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L60*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V174*/ meltfptr[137] = 0;
@@ -29874,7 +30600,7 @@ lab_endgetargs:;
/*_.IF___V173*/ meltfptr[135] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ quasiblock");
/*_.PROGN___V175*/ meltfptr[144] = /*_.IF___V173*/ meltfptr[135];;
@@ -29883,7 +30609,7 @@ lab_endgetargs:;
/*_.IFCPP___V172*/ meltfptr[136] = /*_.PROGN___V175*/ meltfptr[144];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1331:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1332:/ clear");
/*clear *//*_#MELT_NEED_DBG__L59*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V173*/ meltfptr[135] = 0;
@@ -29900,7 +30626,7 @@ lab_endgetargs:;
/*_.LET___V72*/ meltfptr[43] = /*_.IFCPP___V172*/ meltfptr[136];;
- MELT_LOCATION ("warmelt-normatch.melt:1220:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1221:/ clear");
/*clear *//*_.TESTLOCCL__V73*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_.TESTERCONT__V74*/ meltfptr[52] = 0;
@@ -29922,7 +30648,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V172*/ meltfptr[136] = 0;
/*_.LET___V14*/ meltfptr[12] = /*_.LET___V72*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:1157:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1158:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.TUPSUBPA__V16*/ meltfptr[15] = 0;
@@ -29948,11 +30674,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V68*/ meltfptr[64] = 0;
/*^clear */
/*clear *//*_.LET___V72*/ meltfptr[43] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -30042,7 +30768,7 @@ meltrout_27_warmelt_normatch_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -30054,7 +30780,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:1185:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1186:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -30063,8 +30789,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1186:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1187:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -30092,7 +30824,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30115,7 +30847,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30125,7 +30857,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30135,7 +30867,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1187;
+ argtab[2].meltbp_long = 1188;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat lambda updatelse of tstuff";
@@ -30155,7 +30887,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -30168,7 +30900,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -30177,7 +30909,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1187:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1188:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -30190,8 +30922,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1188:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1189:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30211,7 +30948,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1188:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1189:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -30220,7 +30957,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -30301,7 +31038,7 @@ meltrout_28_warmelt_normatch_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ getarg");
/*_.SUPA1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -30321,11 +31058,16 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:1244:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1245:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SUPA1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SUPA1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30343,8 +31085,14 @@ lab_endgetargs:;
/*_.TUPCP_PATTERN__V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1244:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TUPCP_PATTERN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1245:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TUPCP_PATTERN__V5*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30366,8 +31114,13 @@ lab_endgetargs:;
/*_#WP1__L1*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.PAT_WEIGHT__V6*/ meltfptr[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:1245:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SUPA2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1246:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SUPA2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30385,8 +31138,14 @@ lab_endgetargs:;
/*_.TUPCP_PATTERN__V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1245:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TUPCP_PATTERN__V7*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1246:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TUPCP_PATTERN__V7*/
+ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30412,7 +31171,7 @@ lab_endgetargs:;
/*_#I__L3*/ meltfnum[2] =
(( /*_#WP1__L1*/ meltfnum[0]) == ( /*_#WP2__L2*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1247:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1248:/ cond");
/*cond */ if ( /*_#I__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -30421,7 +31180,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1247:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1248:/ cond.else");
/*^block */
/*anyblock */
@@ -30429,7 +31188,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[3] =
(( /*_#WP1__L1*/ meltfnum[0]) < ( /*_#WP2__L2*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1248:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1249:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -30438,13 +31197,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1248:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1249:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1249:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1250:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[10] =
@@ -30455,7 +31214,7 @@ lab_endgetargs:;
/*_.PROGN___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1248:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1249:/ clear");
/*clear *//*_.PROGN___V11*/ meltfptr[10] = 0;
}
;
@@ -30464,7 +31223,7 @@ lab_endgetargs:;
/*_.IFELSE___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1247:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1248:/ clear");
/*clear *//*_#I__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -30474,7 +31233,7 @@ lab_endgetargs:;
;
/*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V9*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-normatch.melt:1244:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1245:/ clear");
/*clear *//*_.TUPCP_PATTERN__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.PAT_WEIGHT__V6*/ meltfptr[5] = 0;
@@ -30490,11 +31249,11 @@ lab_endgetargs:;
/*clear *//*_#I__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -30578,7 +31337,7 @@ meltrout_29_warmelt_normatch_LAMBDA___8__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ getarg");
/*_.NEWSUBTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -30590,7 +31349,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30613,7 +31372,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30623,7 +31382,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -30633,7 +31392,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1265;
+ argtab[2].meltbp_long = 1266;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat.subhdler newsubtester=";
@@ -30659,7 +31418,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -30672,7 +31431,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -30681,7 +31440,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1265:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1266:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -30696,7 +31455,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1267:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1268:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -30705,11 +31464,18 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1268:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1269:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TESTERCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TESTERCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30729,7 +31495,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30752,7 +31518,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30762,7 +31528,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30772,7 +31538,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1269;
+ argtab[2].meltbp_long = 1270;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat.subhdler prevtester";
@@ -30793,7 +31559,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -30806,7 +31572,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -30815,7 +31581,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1269:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1270:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -30830,7 +31596,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1270:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1271:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30839,7 +31605,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PREVTESTER__V8*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1270:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1271:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30847,7 +31613,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1270:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1271:/ cond.else");
/*^block */
/*anyblock */
@@ -30861,7 +31627,7 @@ lab_endgetargs:;
melt_assert_failed (("check prevtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1270) ? (1270) : __LINE__, __FUNCTION__);
+ (1271) ? (1271) : __LINE__, __FUNCTION__);
;
}
;
@@ -30876,7 +31642,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.IFELSE___V14*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1270:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1271:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
@@ -30887,7 +31653,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1271:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1272:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -30906,7 +31672,7 @@ lab_endgetargs:;
/*_.LET___V7*/ meltfptr[3] =
/*_.SET_NEW_TESTER_LAST_THEN__V15*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:1268:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1269:/ clear");
/*clear *//*_.PREVTESTER__V8*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.IFCPP___V9*/ meltfptr[8] = 0;
@@ -30916,7 +31682,7 @@ lab_endgetargs:;
/*clear *//*_.SET_NEW_TESTER_LAST_THEN__V15*/ meltfptr[10] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30939,7 +31705,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30949,7 +31715,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30959,7 +31725,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1273;
+ argtab[2].meltbp_long = 1274;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_tuplepat.subhdler end newsubtester";
@@ -30980,7 +31746,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[9] = 0;
@@ -30993,7 +31759,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[10] = /*_.IF___V17*/ meltfptr[8];;
@@ -31002,7 +31768,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[4] = /*_.PROGN___V19*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1273:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1274:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[8] = 0;
@@ -31015,11 +31781,11 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V16*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -31109,7 +31875,7 @@ meltrout_30_warmelt_normatch_NORMPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -31150,7 +31916,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31173,7 +31939,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31183,7 +31949,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -31193,7 +31959,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1340;
+ argtab[2].meltbp_long = 1341;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_andpat recv=";
/*^apply.arg */
@@ -31224,7 +31990,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -31237,7 +32003,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -31246,7 +32012,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1340:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1341:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -31261,7 +32027,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1341:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1342:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31270,7 +32036,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1341:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1342:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -31278,7 +32044,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1341:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1342:/ cond.else");
/*^block */
/*anyblock */
@@ -31292,7 +32058,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1341) ? (1341) : __LINE__, __FUNCTION__);
+ (1342) ? (1342) : __LINE__, __FUNCTION__);
;
}
;
@@ -31307,7 +32073,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1341:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1342:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -31320,7 +32086,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1342:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1343:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31329,7 +32095,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_AND */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1342:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1343:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31337,7 +32103,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1342:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1343:/ cond.else");
/*^block */
/*anyblock */
@@ -31351,7 +32117,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1342) ? (1342) : __LINE__, __FUNCTION__);
+ (1343) ? (1343) : __LINE__, __FUNCTION__);
;
}
;
@@ -31366,7 +32132,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1343:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -31377,11 +32143,17 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1343:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1344:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1344:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1345:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31399,8 +32171,13 @@ lab_endgetargs:;
/*_.SLOC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1345:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_AND */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1346:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_AND */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31418,7 +32195,7 @@ lab_endgetargs:;
/*_.CONJPATS__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1346:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1347:/ quasiblock");
/*^rawallocobj */
@@ -31434,7 +32211,7 @@ lab_endgetargs:;
};
;
/*_.TESTERCONT__V17*/ meltfptr[16] = /*_.INST__V18*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ quasiblock");
/*^newclosure */
@@ -31490,7 +32267,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31513,7 +32290,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31523,7 +32300,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -31534,7 +32311,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1369;
+ argtab[2].meltbp_long = 1370;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat before normal_pattern testercont=";
@@ -31562,7 +32339,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -31575,7 +32352,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
@@ -31584,7 +32361,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1369:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1370:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[22] = 0;
@@ -31597,7 +32374,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1371:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1372:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -31621,7 +32398,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31644,7 +32421,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -31654,7 +32431,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -31665,7 +32442,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1372;
+ argtab[2].meltbp_long = 1373;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat after normal_pattern subpat=";
@@ -31693,7 +32470,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -31706,7 +32483,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -31715,7 +32492,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[23] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1373:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -31734,7 +32511,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1366:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1367:/ clear");
/*clear *//*_.SUBPAT__V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_#SUBIX__L5*/ meltfnum[1] = 0;
@@ -31748,7 +32525,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31771,7 +32548,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31781,7 +32558,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31792,7 +32569,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1375;
+ argtab[2].meltbp_long = 1376;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_andpat recv end";
/*^apply.arg */
@@ -31812,7 +32589,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -31825,7 +32602,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[28] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[28];;
@@ -31834,7 +32611,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[27] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1375:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1376:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[28] = 0;
@@ -31851,7 +32628,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V31*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:1343:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1344:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.CONJPATS__V16*/ meltfptr[15] = 0;
@@ -31861,11 +32638,11 @@ lab_endgetargs:;
/*clear *//*_.SUBHDLER__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.IFCPP___V31*/ meltfptr[27] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -31955,7 +32732,7 @@ meltrout_31_warmelt_normatch_LAMBDA___9__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ getarg");
/*_.NEWTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -31967,7 +32744,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31990,7 +32767,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32000,7 +32777,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -32010,7 +32787,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1349;
+ argtab[2].meltbp_long = 1350;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_andpat.subhdler newtester=";
/*^apply.arg */
@@ -32035,7 +32812,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -32048,7 +32825,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -32057,7 +32834,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1349:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1350:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -32070,11 +32847,18 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1351:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1352:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TESTERCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TESTERCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32098,7 +32882,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PREVTESTER__V8*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1353:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1354:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -32108,7 +32892,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32131,7 +32915,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32141,7 +32925,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32152,7 +32936,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1354;
+ argtab[2].meltbp_long = 1355;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat.subhdler prevtester";
@@ -32174,7 +32958,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -32187,7 +32971,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -32196,7 +32980,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1354:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1355:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -32209,7 +32993,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1355:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1356:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -32226,7 +33010,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1353:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1354:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[11] =
@@ -32236,7 +33020,7 @@ lab_endgetargs:;
/*_.IFELSE___V9*/ meltfptr[8] = /*_.PROGN___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1353:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1354:/ clear");
/*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.SET_NEW_TESTER_LAST_THEN__V14*/ meltfptr[10] = 0;
@@ -32254,7 +33038,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32277,7 +33061,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -32287,7 +33071,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32298,7 +33082,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1358;
+ argtab[2].meltbp_long = 1359;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat.subhdler before calling hdler";
@@ -32320,7 +33104,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[11] = 0;
@@ -32333,7 +33117,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[11] = /*_.IF___V17*/ meltfptr[10];;
@@ -32342,7 +33126,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[9] = /*_.PROGN___V19*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1358:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1359:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[10] = 0;
@@ -32355,7 +33139,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1359:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1360:/ apply");
/*apply */
{
/*_.HDLER__V20*/ meltfptr[10] =
@@ -32366,8 +33150,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1360:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TESTERCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1361:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TESTERCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -32396,7 +33186,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32419,7 +33209,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32429,7 +33219,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32440,7 +33230,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1361;
+ argtab[2].meltbp_long = 1362;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat.subhdler after calling hdler";
@@ -32462,7 +33252,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -32475,7 +33265,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -32484,7 +33274,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[11] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1361:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1362:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -32497,7 +33287,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1357:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1358:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[21] = /*_.IFCPP___V21*/ meltfptr[11];;
@@ -32506,7 +33296,7 @@ lab_endgetargs:;
/*_.IFELSE___V9*/ meltfptr[8] = /*_.PROGN___V25*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1353:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1354:/ clear");
/*clear *//*_.IFCPP___V16*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.HDLER__V20*/ meltfptr[10] = 0;
@@ -32520,7 +33310,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32543,7 +33333,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -32553,7 +33343,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32564,7 +33354,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1363;
+ argtab[2].meltbp_long = 1364;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_andpat.subhdler done testercont";
@@ -32585,7 +33375,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[10] = 0;
@@ -32598,7 +33388,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[11] = /*_.IF___V27*/ meltfptr[9];;
@@ -32607,7 +33397,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1363:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1364:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[9] = 0;
@@ -32624,7 +33414,7 @@ lab_endgetargs:;
/*_.LET___V7*/ meltfptr[3] = /*_.IFCPP___V26*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-normatch.melt:1351:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1352:/ clear");
/*clear *//*_.PREVTESTER__V8*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
@@ -32632,11 +33422,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -32722,7 +33512,7 @@ meltrout_32_warmelt_normatch_NORMPAT_ORPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -32763,7 +33553,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32786,7 +33576,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32796,7 +33586,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -32806,7 +33596,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1389;
+ argtab[2].meltbp_long = 1390;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat recv=";
/*^apply.arg */
@@ -32837,7 +33627,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -32850,7 +33640,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -32859,7 +33649,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1389:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1390:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -32874,7 +33664,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1390:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1391:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -32885,7 +33675,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1391:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1392:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32894,7 +33684,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1391:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1392:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -32902,7 +33692,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1391:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1392:/ cond.else");
/*^block */
/*anyblock */
@@ -32916,7 +33706,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1391) ? (1391) : __LINE__, __FUNCTION__);
+ (1392) ? (1392) : __LINE__, __FUNCTION__);
;
}
;
@@ -32931,7 +33721,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1391:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1392:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -32944,7 +33734,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1392:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1393:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32953,7 +33743,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OR */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1392:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1393:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32961,7 +33751,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1392:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1393:/ cond.else");
/*^block */
/*anyblock */
@@ -32975,7 +33765,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1392) ? (1392) : __LINE__, __FUNCTION__);
+ (1393) ? (1393) : __LINE__, __FUNCTION__);
;
}
;
@@ -32990,7 +33780,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1392:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1393:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -33001,11 +33791,17 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1393:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1394:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1394:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1395:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33023,8 +33819,13 @@ lab_endgetargs:;
/*_.SLOC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1395:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OR */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1396:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OR */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33042,8 +33843,13 @@ lab_endgetargs:;
/*_.DISJPATS__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1396:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1397:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33066,8 +33872,13 @@ lab_endgetargs:;
/*_.SUBTESTLIST__V18*/ meltfptr[17] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1398:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1399:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33085,8 +33896,13 @@ lab_endgetargs:;
/*_.STUFFMAP__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1399:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1400:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33104,8 +33920,13 @@ lab_endgetargs:;
/*_.PVARLOCMAP__V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1400:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1401:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33123,8 +33944,13 @@ lab_endgetargs:;
/*_.MAPOR__V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1401:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1402:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33148,7 +33974,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.MAPOR__V21*/ meltfptr[20]),
(meltobject_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1403:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1404:/ apply");
/*apply */
{
/*_.SORTEDORSYMBS__V24*/ meltfptr[23] =
@@ -33162,7 +33988,7 @@ lab_endgetargs:;
/*_.MAKE_LIST__V25*/ meltfptr[24] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1404:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1405:/ quasiblock");
/*^rawallocobj */
@@ -33249,7 +34075,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NTDISJ_SETORVAR");
;
/*_.DISJTESTER__V26*/ meltfptr[25] = /*_.INST__V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ quasiblock");
/*^newclosure */
@@ -33299,7 +34125,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.PVARLOCMAP__V20*/ meltfptr[19]);
;
/*_.LAMBDA___V28*/ meltfptr[27] = /*_.LAMBDA___V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-normatch.melt:1415:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1416:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -33315,7 +34141,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1437:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1438:/ quasiblock");
/*^rawallocobj */
@@ -33343,7 +34169,7 @@ lab_endgetargs:;
/*_.PREVCONT__V31*/ meltfptr[30] = /*_.INST__V32*/ meltfptr[31];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33366,7 +34192,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33376,7 +34202,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -33386,7 +34212,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1440;
+ argtab[2].meltbp_long = 1441;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat orig stuffmap=";
/*^apply.arg */
@@ -33418,7 +34244,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -33431,7 +34257,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -33440,7 +34266,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1440:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1441:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -33455,7 +34281,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1442:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1443:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33463,7 +34289,7 @@ lab_endgetargs:;
/*_#IS_MAPOBJECT__L7*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.ORVARMAP__V23*/ meltfptr[22]))
== MELTOBMAG_MAPOBJECTS);;
- MELT_LOCATION ("warmelt-normatch.melt:1442:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1443:/ cond");
/*cond */ if ( /*_#IS_MAPOBJECT__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33471,7 +34297,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1442:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1443:/ cond.else");
/*^block */
/*anyblock */
@@ -33485,7 +34311,7 @@ lab_endgetargs:;
melt_assert_failed (("check orvarmap"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1442) ? (1442) : __LINE__, __FUNCTION__);
+ (1443) ? (1443) : __LINE__, __FUNCTION__);
;
}
;
@@ -33500,7 +34326,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[33] = /*_.IFELSE___V38*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1442:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1443:/ clear");
/*clear *//*_#IS_MAPOBJECT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V38*/ meltfptr[34] = 0;
@@ -33513,7 +34339,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33536,7 +34362,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33546,7 +34372,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -33556,7 +34382,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1443;
+ argtab[2].meltbp_long = 1444;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat sortedorsymbs=";
/*^apply.arg */
@@ -33588,7 +34414,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0;
@@ -33601,7 +34427,7 @@ lab_endgetargs:;
/*_.IF___V40*/ meltfptr[39] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[39];;
@@ -33610,7 +34436,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[34] = /*_.PROGN___V42*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1443:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1444:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V40*/ meltfptr[39] = 0;
@@ -33623,7 +34449,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[34] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1446:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1447:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -33638,7 +34464,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1447:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1448:/ apply");
/*apply */
{
/*_.HDLER__V44*/ meltfptr[40] =
@@ -33649,14 +34475,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1448:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1449:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.TESTLIST__V17*/ meltfptr[16]),
(melt_ptr_t) ( /*_.DISJTESTER__V26*/ meltfptr[25]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33679,7 +34505,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33689,7 +34515,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33700,7 +34526,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1449;
+ argtab[2].meltbp_long = 1450;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat handled disjtester";
/*^apply.arg */
@@ -33720,7 +34546,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
@@ -33733,7 +34559,7 @@ lab_endgetargs:;
/*_.IF___V46*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
@@ -33742,7 +34568,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1449:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1450:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V46*/ meltfptr[45] = 0;
@@ -33772,7 +34598,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:1455:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1456:/ quasiblock");
/*_.CLEARLOCLIST__V51*/ meltfptr[50] =
@@ -33799,7 +34625,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1460:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1461:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33808,7 +34634,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURORVAR__V52*/ meltfptr[51]),
(melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:1460:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1461:/ cond");
/*cond */ if ( /*_#IS_A__L14*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -33817,7 +34643,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:1460:/ cond.else");
+ ("warmelt-normatch.melt:1461:/ cond.else");
/*^block */
/*anyblock */
@@ -33832,7 +34658,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (1460) ? (1460) : __LINE__,
+ (1461) ? (1461) : __LINE__,
__FUNCTION__);
;
}
@@ -33849,7 +34675,7 @@ lab_endgetargs:;
/*_.IFELSE___V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1460:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1461:/ clear");
/*clear *//*_#IS_A__L14*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
@@ -33860,7 +34686,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1461:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1462:/ quasiblock");
/*^getslot */
@@ -33875,7 +34701,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.ORVARLOCC__V55*/ meltfptr[53]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:1463:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1464:/ cond");
/*cond */ if ( /*_#IS_A__L15*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -33884,7 +34710,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:1464:/ quasiblock");
+ ("warmelt-normatch.melt:1465:/ quasiblock");
/*^quasiblock */
@@ -33915,8 +34741,13 @@ lab_endgetargs:;
;
/*_.ORVARCONT__V56*/ meltfptr[55] =
/*_.INST__V57*/ meltfptr[56];;
- MELT_LOCATION ("warmelt-normatch.melt:1465:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURORVAR__V52*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[14])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1466:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURORVAR__V52*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -33944,7 +34775,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1466:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1467:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.CLEARLOCLIST__V51*/
meltfptr[50]),
@@ -33952,7 +34783,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1464:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1465:/ clear");
/*clear *//*_.ORVARCONT__V56*/ meltfptr[55] = 0;
/*epilog */
}
@@ -33960,7 +34791,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1461:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1462:/ clear");
/*clear *//*_.ORVARLOCC__V55*/ meltfptr[53] = 0;
/*^clear */
/*clear *//*_#IS_A__L15*/ meltfnum[13] = 0;
@@ -33970,7 +34801,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1457:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1458:/ clear");
/*clear *//*_.CURORVAR__V52*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_#ORVIX__L13*/ meltfnum[0] = 0;
@@ -33978,14 +34809,14 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V53*/ meltfptr[52] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:1469:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1470:/ quasiblock");
/*_.MAKE_LIST__V59*/ meltfptr[53] =
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1476:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1477:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -34001,7 +34832,7 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1470:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1471:/ quasiblock");
/*^rawallocobj */
@@ -34074,7 +34905,7 @@ lab_endgetargs:;
/*_.NORCLEAR__V61*/ meltfptr[60] = /*_.INST__V62*/ meltfptr[61];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34097,7 +34928,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -34107,7 +34938,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34118,7 +34949,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1481;
+ argtab[2].meltbp_long = 1482;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat curdisj before normalization";
@@ -34140,7 +34971,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V65*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] = 0;
@@ -34153,7 +34984,7 @@ lab_endgetargs:;
/*_.IF___V64*/ meltfptr[63] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[64] = /*_.IF___V64*/ meltfptr[63];;
@@ -34162,7 +34993,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[62] = /*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1481:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1482:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[63] = 0;
@@ -34175,11 +35006,17 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[62] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1483:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1484:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1484:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVCONT__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1485:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PREVCONT__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34197,8 +35034,16 @@ lab_endgetargs:;
/*_.PREVTEST__V67*/ meltfptr[63] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1485:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVTEST__V67*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NREP */ meltfrout->tabval[19])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1486:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PREVTEST__V67*/
+ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NREP */
+ meltfrout->
+ tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34218,7 +35063,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34241,7 +35086,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -34251,7 +35096,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -34262,7 +35107,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1487;
+ argtab[2].meltbp_long = 1488;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat prevtest=";
/*^apply.arg */
@@ -34289,7 +35134,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -34302,7 +35147,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -34311,7 +35156,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[68] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1487:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1488:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -34326,7 +35171,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1488:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1489:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V17*/ meltfptr[16]),
(melt_ptr_t) ( /*_.NORCLEAR__V61*/
@@ -34335,7 +35180,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34358,7 +35203,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -34368,7 +35213,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -34379,7 +35224,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1489;
+ argtab[2].meltbp_long = 1490;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orclear setallelses norclear=";
@@ -34407,7 +35252,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V75*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V75*/ meltfptr[74] = 0;
@@ -34420,7 +35265,7 @@ lab_endgetargs:;
/*_.IF___V74*/ meltfptr[70] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ quasiblock");
/*_.PROGN___V76*/ meltfptr[74] = /*_.IF___V74*/ meltfptr[70];;
@@ -34429,7 +35274,7 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = /*_.PROGN___V76*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1489:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1490:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V74*/ meltfptr[70] = 0;
@@ -34442,7 +35287,7 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1490:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1491:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -34459,8 +35304,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1491:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PREVCONT__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1492:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PREVCONT__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -34489,7 +35340,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34512,7 +35363,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -34522,7 +35373,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34533,7 +35384,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1492;
+ argtab[2].meltbp_long = 1493;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat prevcont with norclear";
@@ -34555,7 +35406,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0;
@@ -34568,7 +35419,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[78] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[78];;
@@ -34577,7 +35428,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[74] = /*_.PROGN___V81*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1492:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1493:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[78] = 0;
@@ -34590,10 +35441,10 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[74] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1494:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1495:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1495:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1496:/ quasiblock");
/*^rawallocobj */
@@ -34618,7 +35469,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "CONTAINER_VALUE");
;
/*_.SUBDISJCONT__V82*/ meltfptr[78] = /*_.INST__V83*/ meltfptr[79];;
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ quasiblock");
/*^newclosure */
@@ -34676,7 +35527,7 @@ lab_endgetargs:;
;
/*_.SUBDISJHANDLER__V84*/ meltfptr[83] =
/*_.LAMBDA___V85*/ meltfptr[84];;
- MELT_LOCATION ("warmelt-normatch.melt:1513:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1514:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -34700,7 +35551,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34723,7 +35574,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -34733,7 +35584,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34744,7 +35595,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1515;
+ argtab[2].meltbp_long = 1516;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat curdisj after normalization";
@@ -34766,7 +35617,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V89*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V89*/ meltfptr[88] = 0;
@@ -34779,7 +35630,7 @@ lab_endgetargs:;
/*_.IF___V88*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ quasiblock");
/*_.PROGN___V90*/ meltfptr[88] = /*_.IF___V88*/ meltfptr[87];;
@@ -34788,7 +35639,7 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[86] = /*_.PROGN___V90*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1515:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1516:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V88*/ meltfptr[87] = 0;
@@ -34801,11 +35652,17 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[86] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1516:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1517:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1517:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SUBDISJCONT__V82*/ meltfptr[78]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1518:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SUBDISJCONT__V82*/
+ meltfptr[78]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34823,7 +35680,7 @@ lab_endgetargs:;
/*_.LASTDISJ__V91*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1518:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1519:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PREVCONT__V31*/ meltfptr[30]), 0, "CONTAINER_VALUE");
@@ -34835,7 +35692,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1519:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1520:/ quasiblock");
/*^rawallocobj */
@@ -34916,7 +35773,7 @@ lab_endgetargs:;
/*_.NORTRANSM__V94*/ meltfptr[93] = /*_.INST__V95*/ meltfptr[94];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34939,7 +35796,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -34949,7 +35806,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34960,7 +35817,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1529;
+ argtab[2].meltbp_long = 1530;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat prevtestrans";
/*^apply.arg */
@@ -34981,7 +35838,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V98*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V98*/ meltfptr[97] = 0;
@@ -34994,7 +35851,7 @@ lab_endgetargs:;
/*_.IF___V97*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ quasiblock");
/*_.PROGN___V99*/ meltfptr[97] = /*_.IF___V97*/ meltfptr[96];;
@@ -35003,7 +35860,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[95] = /*_.PROGN___V99*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1529:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1530:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V97*/ meltfptr[96] = 0;
@@ -35018,7 +35875,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1530:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1531:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V17*/ meltfptr[16]),
(melt_ptr_t) ( /*_.NORTRANSM__V94*/
@@ -35027,7 +35884,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35050,7 +35907,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -35060,7 +35917,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -35071,7 +35928,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1531;
+ argtab[2].meltbp_long = 1532;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat setlasthen nortransm=";
@@ -35099,7 +35956,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
@@ -35112,7 +35969,7 @@ lab_endgetargs:;
/*_.IF___V101*/ meltfptr[97] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ quasiblock");
/*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[97];;
@@ -35122,7 +35979,7 @@ lab_endgetargs:;
/*_.PROGN___V103*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1531:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1532:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V101*/ meltfptr[97] = 0;
@@ -35135,7 +35992,7 @@ lab_endgetargs:;
/*_.IFCPP___V100*/ meltfptr[96] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1532:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1533:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -35154,7 +36011,7 @@ lab_endgetargs:;
;
/*_#NULL__L30*/ meltfnum[16] =
(( /*_.LASTDISJ__V91*/ meltfptr[87]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1536:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1537:/ cond");
/*cond */ if ( /*_#NULL__L30*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -35164,7 +36021,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:1537:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1538:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.SUBTESTLIST__V18*/ meltfptr[17]),
(melt_ptr_t) ( /*_.NORTRANSM__V94*/
@@ -35177,7 +36034,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1516:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1517:/ clear");
/*clear *//*_.LASTDISJ__V91*/ meltfptr[87] = 0;
/*^clear */
/*clear *//*_.PREVTESTRANS__V92*/ meltfptr[88] = 0;
@@ -35194,7 +36051,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_#NULL__L30*/ meltfnum[16] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1494:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1495:/ clear");
/*clear *//*_.SUBDISJCONT__V82*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.SUBDISJHANDLER__V84*/ meltfptr[83] = 0;
@@ -35203,7 +36060,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V87*/ meltfptr[86] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1483:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1484:/ clear");
/*clear *//*_.PREVTEST__V67*/ meltfptr[63] = 0;
/*^clear */
/*clear *//*_.PREVLOC__V68*/ meltfptr[64] = 0;
@@ -35217,7 +36074,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V78*/ meltfptr[74] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35240,7 +36097,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -35250,7 +36107,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35261,7 +36118,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1541;
+ argtab[2].meltbp_long = 1542;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat done curdisj";
/*^apply.arg */
@@ -35282,7 +36139,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V107*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V107*/ meltfptr[88] = 0;
@@ -35295,7 +36152,7 @@ lab_endgetargs:;
/*_.IF___V106*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ quasiblock");
/*_.PROGN___V108*/ meltfptr[92] = /*_.IF___V106*/ meltfptr[87];;
@@ -35305,7 +36162,7 @@ lab_endgetargs:;
/*_.PROGN___V108*/ meltfptr[92];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1541:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1542:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V106*/ meltfptr[87] = 0;
@@ -35322,7 +36179,7 @@ lab_endgetargs:;
/*_.LET___V58*/ meltfptr[55] = /*_.IFCPP___V105*/ meltfptr[101];;
- MELT_LOCATION ("warmelt-normatch.melt:1469:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1470:/ clear");
/*clear *//*_.MAKE_LIST__V59*/ meltfptr[53] = 0;
/*^clear */
/*clear *//*_.LIST_TO_MULTIPLE__V60*/ meltfptr[59] = 0;
@@ -35334,7 +36191,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V105*/ meltfptr[101] = 0;
/*_.LET___V50*/ meltfptr[46] = /*_.LET___V58*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-normatch.melt:1455:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1456:/ clear");
/*clear *//*_.CLEARLOCLIST__V51*/ meltfptr[50] = 0;
/*^clear */
/*clear *//*_.LET___V58*/ meltfptr[55] = 0;
@@ -35344,7 +36201,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1452:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1453:/ clear");
/*clear *//*_.CURDISJ__V49*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_#DISJIX__L12*/ meltfnum[1] = 0;
@@ -35354,7 +36211,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35377,7 +36234,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -35387,7 +36244,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35398,7 +36255,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1546;
+ argtab[2].meltbp_long = 1547;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat pvarlocmap before freshorvar";
@@ -35419,7 +36276,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V111*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V111*/ meltfptr[96] = 0;
@@ -35432,7 +36289,7 @@ lab_endgetargs:;
/*_.IF___V110*/ meltfptr[95] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ quasiblock");
/*_.PROGN___V112*/ meltfptr[97] = /*_.IF___V110*/ meltfptr[95];;
@@ -35441,7 +36298,7 @@ lab_endgetargs:;
/*_.IFCPP___V109*/ meltfptr[93] = /*_.PROGN___V112*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1546:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1547:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V110*/ meltfptr[95] = 0;
@@ -35456,7 +36313,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35479,7 +36336,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -35489,7 +36346,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35500,7 +36357,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1547;
+ argtab[2].meltbp_long = 1548;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat final subtestlist";
/*^apply.arg */
@@ -35520,7 +36377,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V115*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V115*/ meltfptr[85] = 0;
@@ -35533,7 +36390,7 @@ lab_endgetargs:;
/*_.IF___V114*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ quasiblock");
/*_.PROGN___V116*/ meltfptr[86] = /*_.IF___V114*/ meltfptr[83];;
@@ -35542,7 +36399,7 @@ lab_endgetargs:;
/*_.IFCPP___V113*/ meltfptr[78] = /*_.PROGN___V116*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1547:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1548:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V114*/ meltfptr[83] = 0;
@@ -35555,10 +36412,10 @@ lab_endgetargs:;
/*_.IFCPP___V113*/ meltfptr[78] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1548:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1549:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ quasiblock");
/*^newclosure */
@@ -35569,7 +36426,7 @@ lab_endgetargs:;
tabval[33])), (0));
;
/*_.LAMBDA___V118*/ meltfptr[64] = /*_.LAMBDA___V119*/ meltfptr[68];;
- MELT_LOCATION ("warmelt-normatch.melt:1549:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1550:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -35587,7 +36444,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35610,7 +36467,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -35620,7 +36477,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35631,7 +36488,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1565;
+ argtab[2].meltbp_long = 1566;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat final freshorvar";
/*^apply.arg */
@@ -35651,7 +36508,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V123*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V123*/ meltfptr[88] = 0;
@@ -35664,7 +36521,7 @@ lab_endgetargs:;
/*_.IF___V122*/ meltfptr[74] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[87] = /*_.IF___V122*/ meltfptr[74];;
@@ -35673,7 +36530,7 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[70] = /*_.PROGN___V124*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1565:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1566:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V122*/ meltfptr[74] = 0;
@@ -35686,7 +36543,7 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[70] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1567:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1568:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -35702,8 +36559,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1566:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISJTESTER__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_DISJUNCTION */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1567:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISJTESTER__V26*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_DISJUNCTION */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -35742,7 +36604,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35765,7 +36627,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -35775,7 +36637,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L40*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35786,7 +36648,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1570;
+ argtab[2].meltbp_long = 1571;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat final disjtester";
/*^apply.arg */
@@ -35806,7 +36668,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V128*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V128*/ meltfptr[60] = 0;
@@ -35819,7 +36681,7 @@ lab_endgetargs:;
/*_.IF___V127*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ quasiblock");
/*_.PROGN___V129*/ meltfptr[62] = /*_.IF___V127*/ meltfptr[59];;
@@ -35828,7 +36690,7 @@ lab_endgetargs:;
/*_.IFCPP___V126*/ meltfptr[53] = /*_.PROGN___V129*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1570:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1571:/ clear");
/*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V127*/ meltfptr[59] = 0;
@@ -35845,7 +36707,7 @@ lab_endgetargs:;
/*_.LET___V117*/ meltfptr[63] = /*_.IFCPP___V126*/ meltfptr[53];;
- MELT_LOCATION ("warmelt-normatch.melt:1548:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1549:/ clear");
/*clear *//*_.LAMBDA___V118*/ meltfptr[64] = 0;
/*^clear */
/*clear *//*_.FRESHORVAR__V120*/ meltfptr[69] = 0;
@@ -35857,7 +36719,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V126*/ meltfptr[53] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35880,7 +36742,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -35890,7 +36752,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L42*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35901,7 +36763,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1574;
+ argtab[2].meltbp_long = 1575;
/*^apply.arg */
argtab[3].meltbp_cstring = "enf normpat_orpat recv";
/*^apply.arg */
@@ -35921,7 +36783,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V132*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V132*/ meltfptr[55] = 0;
@@ -35934,7 +36796,7 @@ lab_endgetargs:;
/*_.IF___V131*/ meltfptr[50] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ quasiblock");
/*_.PROGN___V133*/ meltfptr[96] = /*_.IF___V131*/ meltfptr[50];;
@@ -35943,7 +36805,7 @@ lab_endgetargs:;
/*_.IFCPP___V130*/ meltfptr[101] = /*_.PROGN___V133*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1574:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1575:/ clear");
/*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IF___V131*/ meltfptr[50] = 0;
@@ -35960,7 +36822,7 @@ lab_endgetargs:;
/*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V130*/ meltfptr[101];;
- MELT_LOCATION ("warmelt-normatch.melt:1393:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1394:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.DISJPATS__V16*/ meltfptr[15] = 0;
@@ -36010,11 +36872,11 @@ lab_endgetargs:;
/*clear *//*_.LET___V117*/ meltfptr[63] = 0;
/*^clear */
/*clear *//*_.IFCPP___V130*/ meltfptr[101] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -36104,7 +36966,7 @@ meltrout_33_warmelt_normatch_LAMBDA___10__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ getarg");
/*_.ORSYMB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -36120,7 +36982,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:1418:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1419:/ quasiblock");
/*_.CURVARPAT__V4*/ meltfptr[3] =
@@ -36128,7 +36990,7 @@ lab_endgetargs:;
(( /*~ORVARMAP */ meltfclos->tabval[0])),
(meltobject_ptr_t) ( /*_.ORSYMB__V2*/
meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1420:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1421:/ quasiblock");
/*^rawallocobj */
@@ -36184,7 +37046,7 @@ lab_endgetargs:;
/*_.CURORVAR__V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1427:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1428:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36192,7 +37054,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.CURVARPAT__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1427:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1428:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -36200,7 +37062,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1427:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1428:/ cond.else");
/*^block */
/*anyblock */
@@ -36214,7 +37076,7 @@ lab_endgetargs:;
melt_assert_failed (("check curvarpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1427) ? (1427) : __LINE__, __FUNCTION__);
+ (1428) ? (1428) : __LINE__, __FUNCTION__);
;
}
;
@@ -36229,7 +37091,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1427:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1428:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -36242,14 +37104,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1429:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1430:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.CURORVAR__V5*/ meltfptr[4]),
( /*_#ORIX__L1*/ meltfnum[0]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36272,7 +37134,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -36282,7 +37144,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -36292,7 +37154,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1430;
+ argtab[2].meltbp_long = 1431;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat/sortlambda curorvar=";
/*^apply.arg */
@@ -36324,7 +37186,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -36337,7 +37199,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -36346,7 +37208,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1430:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1431:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -36361,7 +37223,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1432:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1433:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~PVARLOCMAP */ meltfclos->tabval[2])),
(meltobject_ptr_t) ( /*_.ORSYMB__V2*/
@@ -36371,7 +37233,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36394,7 +37256,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -36404,7 +37266,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36414,7 +37276,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1433;
+ argtab[2].meltbp_long = 1434;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat/sortlambda updated pvarlocmap";
@@ -36435,7 +37297,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -36448,7 +37310,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[10];;
@@ -36457,7 +37319,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1433:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1434:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[10] = 0;
@@ -36470,16 +37332,16 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1434:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1435:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CURORVAR__V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:1434:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1435:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V3*/ meltfptr[2] = /*_.RETURN___V17*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:1418:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1419:/ clear");
/*clear *//*_.CURVARPAT__V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.CURORVAR__V5*/ meltfptr[4] = 0;
@@ -36491,11 +37353,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V13*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.RETURN___V17*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -36579,7 +37441,7 @@ meltrout_34_warmelt_normatch_LAMBDA___11__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ getarg");
/*_.SUBTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -36591,7 +37453,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36614,7 +37476,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36624,7 +37486,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36634,7 +37496,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1498;
+ argtab[2].meltbp_long = 1499;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat.lambda subtester";
/*^apply.arg */
@@ -36653,7 +37515,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -36666,7 +37528,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -36675,7 +37537,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1498:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1499:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -36688,7 +37550,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1499:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1500:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -36704,10 +37566,10 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1500:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1501:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1501:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1502:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*~PREVCONT */ meltfclos->tabval[1])), 0, "CONTAINER_VALUE");
@@ -36717,7 +37579,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1503:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1504:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~SUBTESTLIST */ meltfclos->tabval[2])),
(melt_ptr_t) ( /*_.SUBTESTER__V2*/ meltfptr[1]));
@@ -36725,7 +37587,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36748,7 +37610,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -36758,7 +37620,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -36768,7 +37630,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1504;
+ argtab[2].meltbp_long = 1505;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat.lambda setlastthen subtester=";
@@ -36795,7 +37657,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -36808,7 +37670,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -36817,7 +37679,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1504:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1505:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -36830,7 +37692,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1506:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1507:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -36848,7 +37710,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36871,7 +37733,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36881,7 +37743,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36891,7 +37753,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1507;
+ argtab[2].meltbp_long = 1508;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat.lambda done subtester";
@@ -36912,7 +37774,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] = 0;
@@ -36925,7 +37787,7 @@ lab_endgetargs:;
/*_.IF___V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ quasiblock");
/*_.PROGN___V18*/ meltfptr[16] = /*_.IF___V16*/ meltfptr[15];;
@@ -36934,7 +37796,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[11] = /*_.PROGN___V18*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1507:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1508:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V16*/ meltfptr[15] = 0;
@@ -36947,8 +37809,15 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1508:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~PREVCONT */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1509:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~PREVCONT */ meltfclos->
+ tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -36976,7 +37845,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36999,7 +37868,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -37009,7 +37878,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -37019,7 +37888,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1509;
+ argtab[2].meltbp_long = 1510;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_orpat prevcont with subtester";
@@ -37040,7 +37909,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -37053,7 +37922,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[16];;
@@ -37062,7 +37931,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[15] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1509:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1510:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[16] = 0;
@@ -37079,7 +37948,7 @@ lab_endgetargs:;
/*_.LET___V8*/ meltfptr[4] = /*_.IFCPP___V19*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:1500:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1501:/ clear");
/*clear *//*_.PREVTESTSUB__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
@@ -37089,11 +37958,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V15*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_.IFCPP___V19*/ meltfptr[15] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -37181,7 +38050,7 @@ meltrout_35_warmelt_normatch_LAMBDA___12__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ getarg");
/*_.CURORVAR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -37199,7 +38068,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1552:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1553:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37208,7 +38077,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CURORVAR__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMAL_OR_VARIABLE */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:1552:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1553:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -37216,7 +38085,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1552:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1553:/ cond.else");
/*^block */
/*anyblock */
@@ -37230,7 +38099,7 @@ lab_endgetargs:;
melt_assert_failed (("check curorvar"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1552) ? (1552) : __LINE__, __FUNCTION__);
+ (1553) ? (1553) : __LINE__, __FUNCTION__);
;
}
;
@@ -37245,7 +38114,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1552:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1553:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0;
@@ -37256,7 +38125,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1553:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1554:/ quasiblock");
/*^getslot */
@@ -37267,7 +38136,7 @@ lab_endgetargs:;
meltfptr[5] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:1554:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1555:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURORVAR__V2*/ meltfptr[1]), 2, "NORVAR_PATVAR");
@@ -37275,8 +38144,13 @@ lab_endgetargs:;
meltfptr[6] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:1555:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PATVAR__V7*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1556:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PATVAR__V7*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37300,7 +38174,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ORLOCSY__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->
tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1557:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1558:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -37308,8 +38182,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1558:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ORLOCSY__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1559:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ORLOCSY__V6*/
+ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37327,13 +38207,13 @@ lab_endgetargs:;
/*_.CONTAINER_VALUE__V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1558:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1559:/ compute");
/*_.ORLOCSY__V6*/ meltfptr[5] = /*_.SETQ___V11*/ meltfptr[10] =
/*_.CONTAINER_VALUE__V10*/ meltfptr[9];;
/*_.IF___V9*/ meltfptr[8] = /*_.SETQ___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1557:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1558:/ clear");
/*clear *//*_.CONTAINER_VALUE__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.SETQ___V11*/ meltfptr[10] = 0;
@@ -37348,7 +38228,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37371,7 +38251,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -37381,7 +38261,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -37391,7 +38271,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1560;
+ argtab[2].meltbp_long = 1561;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_orpat/finalambda orsymb=";
/*^apply.arg */
@@ -37417,7 +38297,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
@@ -37430,7 +38310,7 @@ lab_endgetargs:;
/*_.IF___V13*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[10];;
@@ -37439,7 +38319,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[9] = /*_.PROGN___V15*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1560:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1561:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V13*/ meltfptr[10] = 0;
@@ -37452,16 +38332,16 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1561:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1562:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.ORLOCSY__V6*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:1561:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1562:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V5*/ meltfptr[3] = /*_.RETURN___V16*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:1553:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1554:/ clear");
/*clear *//*_.ORLOCSY__V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.PATVAR__V7*/ meltfptr[6] = 0;
@@ -37475,11 +38355,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V12*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.RETURN___V16*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -37568,7 +38448,7 @@ meltrout_36_warmelt_normatch_NORMPAT_ANYMATCHPAT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -37609,7 +38489,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37632,7 +38512,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -37642,7 +38522,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -37652,7 +38532,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1585;
+ argtab[2].meltbp_long = 1586;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat recv=";
/*^apply.arg */
@@ -37683,7 +38563,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -37696,7 +38576,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -37705,7 +38585,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1585:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1586:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -37720,7 +38600,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1587:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1588:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37729,7 +38609,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1587:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1588:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -37737,7 +38617,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1587:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1588:/ cond.else");
/*^block */
/*anyblock */
@@ -37751,7 +38631,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1587) ? (1587) : __LINE__, __FUNCTION__);
+ (1588) ? (1588) : __LINE__, __FUNCTION__);
;
}
;
@@ -37766,7 +38646,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1587:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1588:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -37779,7 +38659,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1588:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1589:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37787,7 +38667,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_MATCHER */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1588:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1589:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -37795,7 +38675,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1588:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1589:/ cond.else");
/*^block */
/*anyblock */
@@ -37809,7 +38689,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1588) ? (1588) : __LINE__, __FUNCTION__);
+ (1589) ? (1589) : __LINE__, __FUNCTION__);
;
}
;
@@ -37824,7 +38704,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1588:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1589:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -37837,7 +38717,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1589:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1590:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -37846,11 +38726,17 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1590:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1591:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1591:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1592:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37868,8 +38754,13 @@ lab_endgetargs:;
/*_.SLOC__V14*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1592:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1593:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37887,8 +38778,13 @@ lab_endgetargs:;
/*_.MAT__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1593:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1594:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37906,8 +38802,13 @@ lab_endgetargs:;
/*_.MATOPBIND__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1594:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1595:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37925,8 +38826,13 @@ lab_endgetargs:;
/*_.INARGS__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1595:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1596:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_COMPOSITE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -37944,7 +38850,7 @@ lab_endgetargs:;
/*_.OUTARGS__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1596:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1597:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 2, "PCTN_ENV");
@@ -37953,7 +38859,7 @@ lab_endgetargs:;
};
;
/*_.OLDENV__V20*/ meltfptr[19] = /*_.ENV__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:1598:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1599:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 0, "PCTN_NORMCTXT");
@@ -37961,7 +38867,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:1599:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1600:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 6, "PCTN_BINDLIST");
@@ -37969,7 +38875,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:1600:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1601:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), 7, "PCTN_STUFFMAP");
@@ -37977,7 +38883,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:1601:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1602:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -37991,8 +38897,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1602:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1603:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38012,7 +38923,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1604:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1605:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38021,7 +38932,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]),
(melt_ptr_t) (( /*!CLASS_ANY_MATCHER */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:1604:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1605:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -38029,7 +38940,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1604:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1605:/ cond.else");
/*^block */
/*anyblock */
@@ -38043,7 +38954,7 @@ lab_endgetargs:;
melt_assert_failed (("check mat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1604) ? (1604) : __LINE__, __FUNCTION__);
+ (1605) ? (1605) : __LINE__, __FUNCTION__);
;
}
;
@@ -38058,7 +38969,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = /*_.IFELSE___V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1604:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1605:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V27*/ meltfptr[26] = 0;
@@ -38071,7 +38982,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1605:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1606:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38081,7 +38992,7 @@ lab_endgetargs:;
( /*_.MATOPBIND__V16*/ meltfptr[15]),
(melt_ptr_t) (( /*!CLASS_ANY_BINDING */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:1605:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1606:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -38089,7 +39000,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1605:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1606:/ cond.else");
/*^block */
/*anyblock */
@@ -38103,7 +39014,7 @@ lab_endgetargs:;
melt_assert_failed (("check matopbind"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1605) ? (1605) : __LINE__, __FUNCTION__);
+ (1606) ? (1606) : __LINE__, __FUNCTION__);
;
}
;
@@ -38118,7 +39029,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[26] = /*_.IFELSE___V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1605:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1606:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0;
@@ -38131,7 +39042,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38154,7 +39065,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -38164,7 +39075,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -38174,7 +39085,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1606;
+ argtab[2].meltbp_long = 1607;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat inargs=";
/*^apply.arg */
@@ -38206,7 +39117,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -38219,7 +39130,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
@@ -38228,7 +39139,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[28] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1607:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
@@ -38241,14 +39152,19 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[28] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1608:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1609:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1609:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1610:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATOPBIND__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATOPBIND__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38268,7 +39184,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38291,7 +39207,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -38301,7 +39217,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -38312,7 +39228,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1610;
+ argtab[2].meltbp_long = 1611;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat matvar";
/*^apply.arg */
@@ -38332,7 +39248,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
@@ -38345,7 +39261,7 @@ lab_endgetargs:;
/*_.IF___V38*/ meltfptr[37] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];;
@@ -38354,7 +39270,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1610:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1611:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[37] = 0;
@@ -38369,12 +39285,12 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1611:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1612:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1612:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1613:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -38392,7 +39308,7 @@ lab_endgetargs:;
/*_#__L11*/ meltfnum[1] =
(( /*_.FIND_ENV__V42*/ meltfptr[38]) ==
( /*_.MATOPBIND__V16*/ meltfptr[15]));;
- MELT_LOCATION ("warmelt-normatch.melt:1611:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1612:/ cond");
/*cond */ if ( /*_#__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -38400,7 +39316,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1611:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1612:/ cond.else");
/*^block */
/*anyblock */
@@ -38414,7 +39330,7 @@ lab_endgetargs:;
melt_assert_failed (("check matvar\'s binding"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1611) ? (1611) : __LINE__, __FUNCTION__);
+ (1612) ? (1612) : __LINE__, __FUNCTION__);
;
}
;
@@ -38429,7 +39345,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[37] = /*_.IFELSE___V43*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1612:/ clear");
/*clear *//*_.FIND_ENV__V42*/ meltfptr[38] = 0;
/*^clear */
/*clear *//*_#__L11*/ meltfnum[1] = 0;
@@ -38446,14 +39362,14 @@ lab_endgetargs:;
/*_.LET___V35*/ meltfptr[31] = /*_.MV__V36*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:1609:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1610:/ clear");
/*clear *//*_.MV__V36*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.IFCPP___V41*/ meltfptr[37] = 0;
/*_.MATVAR__V44*/ meltfptr[38] = /*_.LET___V35*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:1617:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1618:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -38473,7 +39389,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38496,7 +39412,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -38506,7 +39422,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -38517,7 +39433,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1619;
+ argtab[2].meltbp_long = 1620;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat matndata";
/*^apply.arg */
@@ -38537,7 +39453,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V48*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V48*/ meltfptr[37] = 0;
@@ -38550,7 +39466,7 @@ lab_endgetargs:;
/*_.IF___V47*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[37] = /*_.IF___V47*/ meltfptr[36];;
@@ -38559,7 +39475,7 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[35] = /*_.PROGN___V49*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1619:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1620:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V47*/ meltfptr[36] = 0;
@@ -38572,7 +39488,7 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[35] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1620:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1621:/ quasiblock");
/*^multiapply */
@@ -38604,7 +39520,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38627,7 +39543,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -38637,7 +39553,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -38648,7 +39564,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1623;
+ argtab[2].meltbp_long = 1624;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat nins=";
/*^apply.arg */
@@ -38674,7 +39590,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V55*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V55*/ meltfptr[54] = 0;
@@ -38687,7 +39603,7 @@ lab_endgetargs:;
/*_.IF___V54*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[54] = /*_.IF___V54*/ meltfptr[53];;
@@ -38696,7 +39612,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = /*_.PROGN___V56*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1623:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1624:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V54*/ meltfptr[53] = 0;
@@ -38709,7 +39625,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1624:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1625:/ cond");
/*cond */ if ( /*_.BINDINS__V52*/ meltfptr[51]) /*then */
{
/*^cond.then */
@@ -38737,7 +39653,7 @@ lab_endgetargs:;
/*_.LIST_APPEND2LIST__V58*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1624:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1625:/ clear");
/*clear *//*_.LIST_APPEND2LIST__V58*/ meltfptr[54] = 0;
}
;
@@ -38748,11 +39664,16 @@ lab_endgetargs:;
/*_.IF___V57*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1625:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1626:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1626:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1627:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38770,8 +39691,13 @@ lab_endgetargs:;
/*_.INMATCHS__V60*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1627:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1628:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38789,8 +39715,13 @@ lab_endgetargs:;
/*_.OUTMATCHS__V61*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1628:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1629:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38814,8 +39745,13 @@ lab_endgetargs:;
/*^compute */
/*_.TESTER__V64*/ meltfptr[63] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:1633:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATBIND__V62*/ meltfptr[61]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1634:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATBIND__V62*/ meltfptr[61]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38838,7 +39774,7 @@ lab_endgetargs:;
/*_#__L16*/ meltfnum[0] =
(( /*_.MATCHCTYPE__V24*/ meltfptr[23]) !=
( /*_.FBIND_TYPE__V65*/ meltfptr[64]));;
- MELT_LOCATION ("warmelt-normatch.melt:1633:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1634:/ cond");
/*cond */ if ( /*_#__L16*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -38846,8 +39782,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1635:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCHCTYPE__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1636:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCHCTYPE__V24*/
+ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38867,15 +39809,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1635:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1636:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V14*/ meltfptr[12]),
("unexpected matched type"),
(melt_ptr_t) ( /*_.NAMED_NAME__V66*/
meltfptr[65]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1636:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATBIND__V62*/ meltfptr[61]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1637:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATBIND__V62*/
+ meltfptr[61]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38893,8 +39841,14 @@ lab_endgetargs:;
/*_.FBIND_TYPE__V67*/ meltfptr[66] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1636:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FBIND_TYPE__V67*/ meltfptr[66]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1637:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FBIND_TYPE__V67*/
+ meltfptr[66]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -38914,19 +39868,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1636:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1637:/ locexp");
melt_inform_str ((melt_ptr_t) ( /*_.SLOC__V14*/ meltfptr[12]),
("expecting type in matcher"),
(melt_ptr_t) ( /*_.NAMED_NAME__V68*/
meltfptr[67]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1634:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1635:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1633:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1634:/ clear");
/*clear *//*_.NAMED_NAME__V66*/ meltfptr[65] = 0;
/*^clear */
/*clear *//*_.FBIND_TYPE__V67*/ meltfptr[66] = 0;
@@ -38938,7 +39892,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38961,7 +39915,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -38971,7 +39925,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -38982,7 +39936,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1638;
+ argtab[2].meltbp_long = 1639;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat inargs=";
/*^apply.arg */
@@ -39008,7 +39962,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[67] = 0;
@@ -39021,7 +39975,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[66] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[67] = /*_.IF___V70*/ meltfptr[66];;
@@ -39030,7 +39984,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[65] = /*_.PROGN___V72*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1638:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1639:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[66] = 0;
@@ -39043,7 +39997,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[65] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1639:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1640:/ quasiblock");
/*_#NBINARGS__L19*/ meltfnum[17] =
@@ -39059,7 +40013,7 @@ lab_endgetargs:;
/*_#I__L21*/ meltfnum[20] =
(( /*_#NBINARGS__L19*/ meltfnum[17]) !=
( /*_#MULTIPLE_LENGTH__L20*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1640:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1641:/ cond");
/*cond */ if ( /*_#I__L21*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -39067,8 +40021,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1644:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1645:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39088,7 +40047,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1641:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1642:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V14*/ meltfptr[12]),
("formal and actual number of input matching arguments differ for anymatch"),
(melt_ptr_t) ( /*_.NAMED_NAME__V73*/
@@ -39097,7 +40056,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1640:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1641:/ clear");
/*clear *//*_.NAMED_NAME__V73*/ meltfptr[66] = 0;
}
;
@@ -39105,7 +40064,7 @@ lab_endgetargs:;
;
/*_#I__L22*/ meltfnum[21] =
(( /*_#NBINARGS__L19*/ meltfnum[17]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:1645:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1646:/ cond");
/*cond */ if ( /*_#I__L22*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -39113,7 +40072,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1646:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1647:/ quasiblock");
/*^apply */
@@ -39147,7 +40106,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39170,7 +40129,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -39180,7 +40139,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -39191,7 +40150,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1650;
+ argtab[2].meltbp_long = 1651;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat ncurin";
@@ -39213,7 +40172,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V78*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
0;
/*^clear */
@@ -39227,7 +40186,7 @@ lab_endgetargs:;
/*_.IF___V77*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ quasiblock");
/*_.PROGN___V79*/ meltfptr[77] =
@@ -39238,7 +40197,7 @@ lab_endgetargs:;
/*_.PROGN___V79*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1650:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1651:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IF___V77*/ meltfptr[76] = 0;
@@ -39251,14 +40210,14 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[75] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1651:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1652:/ quasiblock");
/*_.CURMATCH__V81*/ meltfptr[77] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.INMATCHS__V60*/ meltfptr[59]),
( /*_#IX__L23*/ meltfnum[22])));;
- MELT_LOCATION ("warmelt-normatch.melt:1652:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1653:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -39275,8 +40234,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1653:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMATCH__V81*/ meltfptr[77]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1654:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMATCH__V81*/
+ meltfptr[77]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39296,7 +40261,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39319,7 +40284,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -39329,7 +40294,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -39340,7 +40305,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1655;
+ argtab[2].meltbp_long = 1656;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat curmatch";
@@ -39362,7 +40327,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[23] =
0;
/*^clear */
@@ -39376,7 +40341,7 @@ lab_endgetargs:;
/*_.IF___V85*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[85] =
@@ -39387,7 +40352,7 @@ lab_endgetargs:;
/*_.PROGN___V87*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1655:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1656:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V85*/ meltfptr[84] = 0;
@@ -39402,7 +40367,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1656:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1657:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39411,7 +40376,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURMATCH__V81*/ meltfptr[77]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:1656:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1657:/ cond");
/*cond */ if ( /*_#IS_A__L28*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -39420,7 +40385,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:1656:/ cond.else");
+ ("warmelt-normatch.melt:1657:/ cond.else");
/*^block */
/*anyblock */
@@ -39435,7 +40400,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (1656) ? (1656) : __LINE__,
+ (1657) ? (1657) : __LINE__,
__FUNCTION__);
;
}
@@ -39452,7 +40417,7 @@ lab_endgetargs:;
/*_.IFELSE___V89*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1656:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1657:/ clear");
/*clear *//*_#IS_A__L28*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V89*/ meltfptr[85] = 0;
@@ -39465,7 +40430,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39488,7 +40453,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -39498,7 +40463,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -39509,7 +40474,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1658;
+ argtab[2].meltbp_long = 1659;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat curctype=";
@@ -39538,7 +40503,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[23] =
0;
/*^clear */
@@ -39552,7 +40517,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[90] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[91] =
@@ -39563,7 +40528,7 @@ lab_endgetargs:;
/*_.PROGN___V93*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1658:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1659:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[90] = 0;
@@ -39581,7 +40546,7 @@ lab_endgetargs:;
/*_#__L31*/ meltfnum[23] =
(( /*_.CURCTYPE__V82*/ meltfptr[81]) !=
( /*_.MATCHTYPE__V83*/ meltfptr[82]));;
- MELT_LOCATION ("warmelt-normatch.melt:1659:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1660:/ cond");
/*cond */ if ( /*_#__L31*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -39589,8 +40554,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1663:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1664:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39610,7 +40581,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1661:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1662:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V14*/ meltfptr[12]),
("type mismatch for match argument in matcher"),
@@ -39618,8 +40589,13 @@ lab_endgetargs:;
meltfptr[91]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1666:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMATCH__V81*/ meltfptr[77]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1667:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMATCH__V81*/ meltfptr[77]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39637,8 +40613,14 @@ lab_endgetargs:;
/*_.BINDER__V96*/ meltfptr[95] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1666:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDER__V96*/ meltfptr[95]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1667:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDER__V96*/
+ meltfptr[95]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39658,7 +40640,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1664:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1665:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V14*/ meltfptr[12]),
("mismatched formal name in matcher is"),
@@ -39666,8 +40648,13 @@ lab_endgetargs:;
meltfptr[96]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1669:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYPE__V82*/ meltfptr[81]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1670:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYPE__V82*/ meltfptr[81]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39687,7 +40674,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1667:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1668:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V14*/ meltfptr[12]),
("mismatched input type is"),
@@ -39695,8 +40682,13 @@ lab_endgetargs:;
meltfptr[97]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1672:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCHTYPE__V83*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1673:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCHTYPE__V83*/ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39716,7 +40708,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1670:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1671:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V14*/ meltfptr[12]),
("expected match type is"),
@@ -39725,12 +40717,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1660:/ quasiblock");
+ ("warmelt-normatch.melt:1661:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1659:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1660:/ clear");
/*clear *//*_.NAMED_NAME__V95*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_.BINDER__V96*/ meltfptr[95] = 0;
@@ -39751,11 +40743,16 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:1674:/ quasiblock");
+ ("warmelt-normatch.melt:1675:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1676:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMATCH__V81*/ meltfptr[77]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1677:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMATCH__V81*/ meltfptr[77]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -39774,7 +40771,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1674:/ quasiblock");
+ ("warmelt-normatch.melt:1675:/ quasiblock");
/*^rawallocobj */
@@ -39840,7 +40837,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:1681:/ cppif.then");
+ ("warmelt-normatch.melt:1682:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39863,7 +40860,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1681:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1682:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -39874,7 +40871,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1681:/ apply");
+ ("warmelt-normatch.melt:1682:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -39886,7 +40883,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1681;
+ argtab[2].meltbp_long = 1682;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat newb";
@@ -39912,7 +40909,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1681:/ clear");
+ ("warmelt-normatch.melt:1682:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L33*/
meltfnum[32] = 0;
/*^clear */
@@ -39928,7 +40925,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1681:/ quasiblock");
+ ("warmelt-normatch.melt:1682:/ quasiblock");
/*_.PROGN___V107*/ meltfptr[105] =
@@ -39939,7 +40936,7 @@ lab_endgetargs:;
/*_.PROGN___V107*/ meltfptr[105];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1681:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1682:/ clear");
/*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V105*/ meltfptr[104] = 0;
@@ -39952,7 +40949,7 @@ lab_endgetargs:;
/*_.IFCPP___V104*/ meltfptr[98] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1682:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1683:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -39973,7 +40970,7 @@ lab_endgetargs:;
/*_.LET___V100*/ meltfptr[91] =
/*_.PUT_ENV__V108*/ meltfptr[104];;
- MELT_LOCATION ("warmelt-normatch.melt:1674:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1675:/ clear");
/*clear *//*_.BINDER__V101*/ meltfptr[95] = 0;
/*^clear */
/*clear *//*_.NEWB__V102*/ meltfptr[96] = 0;
@@ -39985,7 +40982,7 @@ lab_endgetargs:;
/*_.LET___V100*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1659:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1660:/ clear");
/*clear *//*_.LET___V100*/ meltfptr[91] = 0;
}
;
@@ -39994,7 +40991,7 @@ lab_endgetargs:;
/*_.LET___V80*/ meltfptr[76] =
/*_.IFELSE___V94*/ meltfptr[90];;
- MELT_LOCATION ("warmelt-normatch.melt:1651:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1652:/ clear");
/*clear *//*_.CURMATCH__V81*/ meltfptr[77] = 0;
/*^clear */
/*clear *//*_.CURCTYPE__V82*/ meltfptr[81] = 0;
@@ -40016,7 +41013,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1647:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1648:/ clear");
/*clear *//*_.NCURIN__V75*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_#IX__L23*/ meltfnum[22] = 0;
@@ -40026,11 +41023,16 @@ lab_endgetargs:;
/*clear *//*_.LET___V80*/ meltfptr[76] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:1684:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1685:/ compute");
/*_.ENV__V19*/ meltfptr[18] = /*_.SETQ___V109*/ meltfptr[105] =
/*_.NEWENV__V74*/ meltfptr[67];;
- MELT_LOCATION ("warmelt-normatch.melt:1685:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1686:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -40057,7 +41059,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1646:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1647:/ clear");
/*clear *//*_.NEWENV__V74*/ meltfptr[67] = 0;
/*^clear */
/*clear *//*_.SETQ___V109*/ meltfptr[105] = 0;
@@ -40067,7 +41069,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1639:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1640:/ clear");
/*clear *//*_#NBINARGS__L19*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L20*/ meltfnum[1] = 0;
@@ -40077,7 +41079,7 @@ lab_endgetargs:;
/*clear *//*_#I__L22*/ meltfnum[21] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40100,7 +41102,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[32]) /*then */
{
/*^cond.then */
@@ -40110,7 +41112,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L35*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -40121,7 +41123,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1688;
+ argtab[2].meltbp_long = 1689;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat outargs=";
/*^apply.arg */
@@ -40147,7 +41149,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V112*/ meltfptr[98];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V112*/ meltfptr[98] = 0;
@@ -40160,7 +41162,7 @@ lab_endgetargs:;
/*_.IF___V111*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ quasiblock");
/*_.PROGN___V113*/ meltfptr[104] = /*_.IF___V111*/ meltfptr[96];;
@@ -40169,7 +41171,7 @@ lab_endgetargs:;
/*_.IFCPP___V110*/ meltfptr[95] = /*_.PROGN___V113*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1688:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1689:/ clear");
/*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[32] = 0;
/*^clear */
/*clear *//*_.IF___V111*/ meltfptr[96] = 0;
@@ -40182,7 +41184,7 @@ lab_endgetargs:;
/*_.IFCPP___V110*/ meltfptr[95] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1689:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1690:/ quasiblock");
/*_#NBOUTARGS__L36*/ meltfnum[23] =
@@ -40198,7 +41200,7 @@ lab_endgetargs:;
/*_#I__L38*/ meltfnum[1] =
(( /*_#NBOUTARGS__L36*/ meltfnum[23]) !=
( /*_#MULTIPLE_LENGTH__L37*/ meltfnum[17]));;
- MELT_LOCATION ("warmelt-normatch.melt:1690:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1691:/ cond");
/*cond */ if ( /*_#I__L38*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -40206,8 +41208,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1694:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MAT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1695:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MAT__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -40227,7 +41234,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1691:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1692:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V14*/ meltfptr[12]),
("formal and actual number of output matched arguments differ for anymatch"),
(melt_ptr_t) ( /*_.NAMED_NAME__V115*/
@@ -40236,13 +41243,13 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1690:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1691:/ clear");
/*clear *//*_.NAMED_NAME__V115*/ meltfptr[77] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1695:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1696:/ quasiblock");
/*_.TSTUFF__V117*/ meltfptr[82] =
@@ -40253,7 +41260,7 @@ lab_endgetargs:;
/*^compute */
/*_.CURHDLER__V118*/ meltfptr[83] = /*_.HDLER__V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1698:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:1699:/ loop");
/*loop */
{
labloop_LOOPSTUFF_4:; /*^loopbody */
@@ -40264,7 +41271,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40287,7 +41294,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -40297,7 +41304,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L40*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -40308,7 +41315,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1700;
+ argtab[2].meltbp_long = 1701;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat tstuff";
/*^apply.arg */
@@ -40329,7 +41336,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V123*/ meltfptr[105];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V123*/ meltfptr[105] = 0;
@@ -40342,7 +41349,7 @@ lab_endgetargs:;
/*_.IF___V122*/ meltfptr[67] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[98] = /*_.IF___V122*/ meltfptr[67];;
@@ -40351,7 +41358,7 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[90] = /*_.PROGN___V124*/ meltfptr[98];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1700:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1701:/ clear");
/*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V122*/ meltfptr[67] = 0;
@@ -40371,7 +41378,7 @@ lab_endgetargs:;
( /*_.TSTUFF__V117*/ meltfptr[82]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */
meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ cond");
/*cond */ if ( /*_#IS_A__L41*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -40379,8 +41386,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1703:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V117*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1704:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V117*/
+ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -40408,7 +41421,7 @@ lab_endgetargs:;
/*_#IF___L42*/ meltfnum[32] = /*_#__L43*/ meltfnum[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ clear");
/*clear *//*_.NTMATCH_MATCHER__V125*/ meltfptr[96] = 0;
/*^clear */
/*clear *//*_#__L43*/ meltfnum[21] = 0;
@@ -40421,7 +41434,7 @@ lab_endgetargs:;
/*_#IF___L42*/ meltfnum[32] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ cond");
/*cond */ if ( /*_#IF___L42*/ meltfnum[32]) /*then */
{
/*^cond.then */
@@ -40429,11 +41442,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1704:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1705:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V117*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V117*/
+ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -40472,7 +41491,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:1710:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1711:/ quasiblock");
/*_.NTHINS__V130*/ meltfptr[98] =
@@ -40484,7 +41503,7 @@ lab_endgetargs:;
/*_#__L47*/ meltfnum[46] =
(( /*_.CURINARG__V129*/ meltfptr[67]) !=
( /*_.NTHINS__V130*/ meltfptr[98]));;
- MELT_LOCATION ("warmelt-normatch.melt:1711:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1712:/ cond");
/*cond */ if ( /*_#__L47*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -40493,7 +41512,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:1712:/ compute");
+ ("warmelt-normatch.melt:1713:/ compute");
/*_#GOOD__L44*/ meltfnum[20] =
/*_#SETQ___L49*/ meltfnum[48] = 0;;
/*_#IF___L48*/ meltfnum[47] =
@@ -40501,7 +41520,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1711:/ clear");
+ ("warmelt-normatch.melt:1712:/ clear");
/*clear *//*_#SETQ___L49*/ meltfnum[48] = 0;
}
;
@@ -40517,7 +41536,7 @@ lab_endgetargs:;
/*_#LET___L46*/ meltfnum[45] =
/*_#IF___L48*/ meltfnum[47];;
- MELT_LOCATION ("warmelt-normatch.melt:1710:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1711:/ clear");
/*clear *//*_.NTHINS__V130*/ meltfptr[98] = 0;
/*^clear */
/*clear *//*_#__L47*/ meltfnum[46] = 0;
@@ -40529,7 +41548,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1707:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1708:/ clear");
/*clear *//*_.CURINARG__V129*/ meltfptr[67] = 0;
/*^clear */
/*clear *//*_#IX__L45*/ meltfnum[21] = 0;
@@ -40537,7 +41556,7 @@ lab_endgetargs:;
/*clear *//*_#LET___L46*/ meltfnum[45] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:1714:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1715:/ cond");
/*cond */ if ( /*_#GOOD__L44*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -40547,7 +41566,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1716:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1717:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40570,7 +41589,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1716:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1717:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[48]) /*then */
{
/*^cond.then */
@@ -40581,7 +41600,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L51*/ meltfnum[46] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1716:/ apply");
+ ("warmelt-normatch.melt:1717:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -40593,7 +41612,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1716;
+ argtab[2].meltbp_long = 1717;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat good tstuff";
@@ -40619,7 +41638,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1716:/ clear");
+ ("warmelt-normatch.melt:1717:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L51*/
meltfnum[46] = 0;
/*^clear */
@@ -40635,7 +41654,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1716:/ quasiblock");
+ ("warmelt-normatch.melt:1717:/ quasiblock");
/*_.PROGN___V135*/ meltfptr[133] =
@@ -40646,7 +41665,7 @@ lab_endgetargs:;
/*_.PROGN___V135*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1716:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1717:/ clear");
/*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.IF___V133*/ meltfptr[132] = 0;
@@ -40659,11 +41678,11 @@ lab_endgetargs:;
/*_.IFCPP___V132*/ meltfptr[98] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1717:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1718:/ compute");
/*_.TESTER__V64*/ meltfptr[63] =
/*_.SETQ___V136*/ meltfptr[132] =
/*_.TSTUFF__V117*/ meltfptr[82];;
- MELT_LOCATION ("warmelt-normatch.melt:1718:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1719:/ quasiblock");
/*^compute */
@@ -40675,12 +41694,12 @@ lab_endgetargs:;
goto labexit_LOOPSTUFF_4;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1715:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1716:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1714:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1715:/ clear");
/*clear *//*_.IFCPP___V132*/ meltfptr[98] = 0;
/*^clear */
/*clear *//*_.SETQ___V136*/ meltfptr[132] = 0;
@@ -40694,8 +41713,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1720:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V117*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[18])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1721:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V117*/
+ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -40713,11 +41738,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V137*/ meltfptr[133] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1720:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1721:/ compute");
/*_.TSTUFF__V117*/ meltfptr[82] =
/*_.SETQ___V138*/ meltfptr[98] =
/*_.NTEST_ELSE__V137*/ meltfptr[133];;
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ quasiblock");
/*^newclosure */
@@ -40746,11 +41771,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V139*/ meltfptr[132] =
/*_.LAMBDA___V140*/ meltfptr[139];;
- MELT_LOCATION ("warmelt-normatch.melt:1721:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1722:/ compute");
/*_.CURHDLER__V118*/ meltfptr[83] =
/*_.SETQ___V141*/ meltfptr[140] =
/*_.LAMBDA___V139*/ meltfptr[132];;
- MELT_LOCATION ("warmelt-normatch.melt:1719:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1720:/ quasiblock");
/*_.PROGN___V142*/ meltfptr[141] =
@@ -40761,7 +41786,7 @@ lab_endgetargs:;
/*_.PROGN___V142*/ meltfptr[141];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1714:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1715:/ clear");
/*clear *//*_.NTEST_ELSE__V137*/ meltfptr[133] = 0;
/*^clear */
/*clear *//*_.SETQ___V138*/ meltfptr[98] = 0;
@@ -40778,7 +41803,7 @@ lab_endgetargs:;
/*_.LET___V127*/ meltfptr[77] =
/*_.IFELSE___V131*/ meltfptr[96];;
- MELT_LOCATION ("warmelt-normatch.melt:1704:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1705:/ clear");
/*clear *//*_.TINARGS__V128*/ meltfptr[105] = 0;
/*^clear */
/*clear *//*_#GOOD__L44*/ meltfnum[20] = 0;
@@ -40786,7 +41811,7 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V131*/ meltfptr[96] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1730:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1731:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40799,7 +41824,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1730:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1731:/ cond.else");
/*^block */
/*anyblock */
@@ -40810,7 +41835,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normpat_anymatchpat incomplete found tstuff"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (1730) ? (1730) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normpat_anymatchpat incomplete found tstuff"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (1731) ? (1731) : __LINE__, __FUNCTION__);
;
}
;
@@ -40826,7 +41851,7 @@ lab_endgetargs:;
/*_.IFELSE___V144*/ meltfptr[98];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1730:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1731:/ clear");
/*clear *//*_.IFELSE___V144*/ meltfptr[98] = 0;
}
@@ -40835,7 +41860,7 @@ lab_endgetargs:;
/*_.IFCPP___V143*/ meltfptr[133] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ quasiblock");
/*_.PROGN___V145*/ meltfptr[132] =
@@ -40846,7 +41871,7 @@ lab_endgetargs:;
/*_.PROGN___V145*/ meltfptr[132];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ clear");
/*clear *//*_.LET___V127*/ meltfptr[77] = 0;
/*^clear */
/*clear *//*_.IFCPP___V143*/ meltfptr[133] = 0;
@@ -40866,7 +41891,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.TSTUFF__V117*/ meltfptr[82]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[18])));;
- MELT_LOCATION ("warmelt-normatch.melt:1732:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1733:/ cond");
/*cond */ if ( /*_#IS_A__L52*/ meltfnum[47]) /*then */
{
/*^cond.then */
@@ -40874,8 +41899,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1733:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V117*/ meltfptr[82]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[18])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1734:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V117*/
+ meltfptr[82]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -40893,11 +41924,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V147*/ meltfptr[141] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1733:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1734:/ compute");
/*_.TSTUFF__V117*/ meltfptr[82] =
/*_.SETQ___V148*/ meltfptr[105] =
/*_.NTEST_ELSE__V147*/ meltfptr[141];;
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ quasiblock");
/*^newclosure */
@@ -40926,11 +41957,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V149*/ meltfptr[96] =
/*_.LAMBDA___V150*/ meltfptr[98];;
- MELT_LOCATION ("warmelt-normatch.melt:1734:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1735:/ compute");
/*_.CURHDLER__V118*/ meltfptr[83] =
/*_.SETQ___V151*/ meltfptr[77] =
/*_.LAMBDA___V149*/ meltfptr[96];;
- MELT_LOCATION ("warmelt-normatch.melt:1732:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1733:/ quasiblock");
/*_.PROGN___V152*/ meltfptr[133] =
@@ -40941,7 +41972,7 @@ lab_endgetargs:;
/*_.PROGN___V152*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1732:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1733:/ clear");
/*clear *//*_.NTEST_ELSE__V147*/ meltfptr[141] = 0;
/*^clear */
/*clear *//*_.SETQ___V148*/ meltfptr[105] = 0;
@@ -40961,10 +41992,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1743:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1744:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ quasiblock");
/*^newclosure */
@@ -41008,7 +42039,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V153*/ meltfptr[132] =
/*_.LAMBDA___V154*/ meltfptr[141];;
- MELT_LOCATION ("warmelt-normatch.melt:1745:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1746:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -41026,7 +42057,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1780:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1781:/ apply");
/*apply */
{
/*_.MULTIPLE_TO_LIST__V156*/ meltfptr[96] =
@@ -41043,7 +42074,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[35]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1772:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1773:/ quasiblock");
/*^rawallocobj */
@@ -41177,7 +42208,7 @@ lab_endgetargs:;
/*_.INST__V159*/ meltfptr[158];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1788:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1789:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41200,7 +42231,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1788:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1789:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -41211,7 +42242,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L54*/ meltfnum[48] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1788:/ apply");
+ ("warmelt-normatch.melt:1789:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -41223,7 +42254,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1788;
+ argtab[2].meltbp_long = 1789;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat newtester";
@@ -41249,7 +42280,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1788:/ clear");
+ ("warmelt-normatch.melt:1789:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L54*/
meltfnum[48] = 0;
/*^clear */
@@ -41265,7 +42296,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1788:/ quasiblock");
+ ("warmelt-normatch.melt:1789:/ quasiblock");
/*_.PROGN___V163*/ meltfptr[161] =
@@ -41276,7 +42307,7 @@ lab_endgetargs:;
/*_.PROGN___V163*/ meltfptr[161];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1788:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1789:/ clear");
/*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V161*/ meltfptr[160] = 0;
@@ -41289,7 +42320,7 @@ lab_endgetargs:;
/*_.IFCPP___V160*/ meltfptr[159] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1789:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1790:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -41307,13 +42338,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1790:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1791:/ compute");
/*_.TESTER__V64*/ meltfptr[63] =
/*_.SETQ___V165*/ meltfptr[161] =
/*_.NEWTESTER__V158*/ meltfptr[133];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1791:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1792:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V25*/ meltfptr[24]),
(melt_ptr_t) ( /*_.NEWTESTER__V158*/
@@ -41322,7 +42353,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1792:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1793:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -41331,7 +42362,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1793:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1794:/ apply");
/*apply */
{
/*_.CURHDLER__V166*/ meltfptr[165] =
@@ -41343,7 +42374,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1794:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1795:/ quasiblock");
/*^compute */
@@ -41356,7 +42387,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1743:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1744:/ clear");
/*clear *//*_.LAMBDA___V153*/ meltfptr[132] = 0;
/*^clear */
/*clear *//*_.OUTLOCS__V155*/ meltfptr[105] = 0;
@@ -41375,7 +42406,7 @@ lab_endgetargs:;
/*clear *//*_.SETQ___V165*/ meltfptr[161] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V166*/ meltfptr[165] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1742:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1743:/ quasiblock");
/*epilog */
@@ -41387,7 +42418,7 @@ lab_endgetargs:;
/*_.IFELSE___V146*/ meltfptr[140];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1702:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1703:/ clear");
/*clear *//*_#IS_A__L52*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.IFELSE___V146*/ meltfptr[140] = 0;
@@ -41397,7 +42428,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1698:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1699:/ clear");
/*clear *//*_.IFCPP___V121*/ meltfptr[90] = 0;
/*^clear */
/*clear *//*_#IS_A__L41*/ meltfnum[24] = 0;
@@ -41418,7 +42449,7 @@ lab_endgetargs:;
/*_.LET___V116*/ meltfptr[81] = /*_.FOREVER___V119*/ meltfptr[84];;
- MELT_LOCATION ("warmelt-normatch.melt:1695:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1696:/ clear");
/*clear *//*_.TSTUFF__V117*/ meltfptr[82] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V118*/ meltfptr[83] = 0;
@@ -41426,7 +42457,7 @@ lab_endgetargs:;
/*clear *//*_.FOREVER___V119*/ meltfptr[84] = 0;
/*_.LET___V114*/ meltfptr[91] = /*_.LET___V116*/ meltfptr[81];;
- MELT_LOCATION ("warmelt-normatch.melt:1689:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1690:/ clear");
/*clear *//*_#NBOUTARGS__L36*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L37*/ meltfnum[17] = 0;
@@ -41436,7 +42467,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V116*/ meltfptr[81] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41459,7 +42490,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -41469,7 +42500,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L56*/ meltfnum[48] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -41480,7 +42511,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1799;
+ argtab[2].meltbp_long = 1800;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat got tester";
/*^apply.arg */
@@ -41500,7 +42531,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V169*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V169*/ meltfptr[96] = 0;
@@ -41513,7 +42544,7 @@ lab_endgetargs:;
/*_.IF___V168*/ meltfptr[105] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ quasiblock");
/*_.PROGN___V170*/ meltfptr[77] = /*_.IF___V168*/ meltfptr[105];;
@@ -41522,7 +42553,7 @@ lab_endgetargs:;
/*_.IFCPP___V167*/ meltfptr[132] = /*_.PROGN___V170*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1799:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1800:/ clear");
/*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V168*/ meltfptr[105] = 0;
@@ -41537,7 +42568,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1800:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1801:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41546,7 +42577,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V64*/ meltfptr[63]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */
meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:1800:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1801:/ cond");
/*cond */ if ( /*_#IS_A__L57*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -41554,7 +42585,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1800:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1801:/ cond.else");
/*^block */
/*anyblock */
@@ -41568,7 +42599,7 @@ lab_endgetargs:;
melt_assert_failed (("check tester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1800) ? (1800) : __LINE__, __FUNCTION__);
+ (1801) ? (1801) : __LINE__, __FUNCTION__);
;
}
;
@@ -41583,7 +42614,7 @@ lab_endgetargs:;
/*_.IFCPP___V171*/ meltfptr[133] = /*_.IFELSE___V172*/ meltfptr[159];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1800:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1801:/ clear");
/*clear *//*_#IS_A__L57*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IFELSE___V172*/ meltfptr[159] = 0;
@@ -41594,11 +42625,16 @@ lab_endgetargs:;
/*_.IFCPP___V171*/ meltfptr[133] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1802:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1803:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V64*/ meltfptr[63]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V64*/ meltfptr[63]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -41618,7 +42654,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41641,7 +42677,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L58*/ meltfnum[47]) /*then */
{
/*^cond.then */
@@ -41651,7 +42687,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L59*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -41662,7 +42698,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1803;
+ argtab[2].meltbp_long = 1804;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpatfrom tester outlocs=";
@@ -41695,7 +42731,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V176*/ meltfptr[140];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L59*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V176*/ meltfptr[140] = 0;
@@ -41708,7 +42744,7 @@ lab_endgetargs:;
/*_.IF___V175*/ meltfptr[165] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ quasiblock");
/*_.PROGN___V177*/ meltfptr[90] = /*_.IF___V175*/ meltfptr[165];;
@@ -41717,7 +42753,7 @@ lab_endgetargs:;
/*_.IFCPP___V174*/ meltfptr[161] = /*_.PROGN___V177*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1803:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1804:/ clear");
/*clear *//*_#MELT_NEED_DBG__L58*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.IF___V175*/ meltfptr[165] = 0;
@@ -41749,14 +42785,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:1808:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1809:/ locexp");
debugnum (("normpat_anymatchpat ixm in outmatchs"),
( /*_#IXM__L60*/ meltfnum[32]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41779,7 +42815,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -41789,7 +42825,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L62*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -41800,7 +42836,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1809;
+ argtab[2].meltbp_long = 1810;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat curmatch in foreach";
@@ -41822,7 +42858,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V181*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V181*/ meltfptr[84] = 0;
@@ -41835,7 +42871,7 @@ lab_endgetargs:;
/*_.IF___V180*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ quasiblock");
/*_.PROGN___V182*/ meltfptr[81] = /*_.IF___V180*/ meltfptr[83];;
@@ -41845,7 +42881,7 @@ lab_endgetargs:;
/*_.PROGN___V182*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1809:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1810:/ clear");
/*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IF___V180*/ meltfptr[83] = 0;
@@ -41858,7 +42894,7 @@ lab_endgetargs:;
/*_.IFCPP___V179*/ meltfptr[82] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1810:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1811:/ quasiblock");
/*_.CLOCC__V184*/ meltfptr[105] =
@@ -41871,7 +42907,7 @@ lab_endgetargs:;
(melt_multiple_nth
((melt_ptr_t) ( /*_.OUTARGS__V18*/ meltfptr[17]),
( /*_#IXM__L60*/ meltfnum[32])));;
- MELT_LOCATION ("warmelt-normatch.melt:1812:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1813:/ quasiblock");
/*^rawallocobj */
@@ -41898,7 +42934,7 @@ lab_endgetargs:;
;
/*_.TESTERCONT__V186*/ meltfptr[159] =
/*_.INST__V187*/ meltfptr[140];;
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ quasiblock");
/*^newclosure */
@@ -41928,7 +42964,7 @@ lab_endgetargs:;
/*_.LAMBDA___V189*/ meltfptr[90];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -41951,7 +42987,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -41961,7 +42997,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L64*/ meltfnum[48] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -41972,7 +43008,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1823;
+ argtab[2].meltbp_long = 1824;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat before normal_pattern curout=";
@@ -42000,7 +43036,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V192*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V192*/ meltfptr[81] = 0;
@@ -42013,7 +43049,7 @@ lab_endgetargs:;
/*_.IF___V191*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ quasiblock");
/*_.PROGN___V193*/ meltfptr[81] = /*_.IF___V191*/ meltfptr[83];;
@@ -42023,7 +43059,7 @@ lab_endgetargs:;
/*_.PROGN___V193*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1823:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1824:/ clear");
/*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V191*/ meltfptr[83] = 0;
@@ -42038,7 +43074,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1824:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1825:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -42047,7 +43083,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1825:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:1826:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -42071,7 +43107,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -42094,7 +43130,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -42104,7 +43140,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L66*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -42115,7 +43151,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1826;
+ argtab[2].meltbp_long = 1827;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat curout after normal_pattern";
@@ -42137,7 +43173,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V197*/ meltfptr[196];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V197*/ meltfptr[196] = 0;
@@ -42150,7 +43186,7 @@ lab_endgetargs:;
/*_.IF___V196*/ meltfptr[195] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ quasiblock");
/*_.PROGN___V198*/ meltfptr[196] = /*_.IF___V196*/ meltfptr[195];;
@@ -42160,7 +43196,7 @@ lab_endgetargs:;
/*_.PROGN___V198*/ meltfptr[196];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1826:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1827:/ clear");
/*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V196*/ meltfptr[195] = 0;
@@ -42177,7 +43213,7 @@ lab_endgetargs:;
/*_.LET___V183*/ meltfptr[96] = /*_.IFCPP___V195*/ meltfptr[81];;
- MELT_LOCATION ("warmelt-normatch.melt:1810:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1811:/ clear");
/*clear *//*_.CLOCC__V184*/ meltfptr[105] = 0;
/*^clear */
/*clear *//*_.CUROUT__V185*/ meltfptr[77] = 0;
@@ -42197,7 +43233,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:1805:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1806:/ clear");
/*clear *//*_.CURMATCH__V178*/ meltfptr[104] = 0;
/*^clear */
/*clear *//*_#IXM__L60*/ meltfnum[32] = 0;
@@ -42208,13 +43244,13 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:1802:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1803:/ clear");
/*clear *//*_.OUTLOCS__V173*/ meltfptr[160] = 0;
/*^clear */
/*clear *//*_.IFCPP___V174*/ meltfptr[161] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -42237,7 +43273,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -42247,7 +43283,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L68*/ meltfnum[47] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -42258,7 +43294,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1830;
+ argtab[2].meltbp_long = 1831;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat outbinds";
/*^apply.arg */
@@ -42278,7 +43314,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V201*/ meltfptr[105];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V201*/ meltfptr[105] = 0;
@@ -42291,7 +43327,7 @@ lab_endgetargs:;
/*_.IF___V200*/ meltfptr[196] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ quasiblock");
/*_.PROGN___V202*/ meltfptr[77] = /*_.IF___V200*/ meltfptr[196];;
@@ -42300,7 +43336,7 @@ lab_endgetargs:;
/*_.IFCPP___V199*/ meltfptr[195] = /*_.PROGN___V202*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1830:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1831:/ clear");
/*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V200*/ meltfptr[196] = 0;
@@ -42317,7 +43353,7 @@ lab_endgetargs:;
/*_.LET___V59*/ meltfptr[54] = /*_.IFCPP___V199*/ meltfptr[195];;
- MELT_LOCATION ("warmelt-normatch.melt:1625:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1626:/ clear");
/*clear *//*_.INMATCHS__V60*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.OUTMATCHS__V61*/ meltfptr[60] = 0;
@@ -42345,7 +43381,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V199*/ meltfptr[195] = 0;
/*_.MULTI___V50*/ meltfptr[36] = /*_.LET___V59*/ meltfptr[54];;
- MELT_LOCATION ("warmelt-normatch.melt:1620:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1621:/ clear");
/*clear *//*_.IFCPP___V53*/ meltfptr[52] = 0;
/*^clear */
/*clear *//*_.IF___V57*/ meltfptr[53] = 0;
@@ -42356,7 +43392,7 @@ lab_endgetargs:;
/*clear *//*_.BINDINS__V52*/ meltfptr[51] = 0;
/*_.LET___V34*/ meltfptr[30] = /*_.MULTI___V50*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-normatch.melt:1608:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1609:/ clear");
/*clear *//*_.LET___V35*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.MATVAR__V44*/ meltfptr[38] = 0;
@@ -42368,7 +43404,7 @@ lab_endgetargs:;
/*clear *//*_.MULTI___V50*/ meltfptr[36] = 0;
/*_#__L69*/ meltfnum[17] =
(( /*_.ENV__V19*/ meltfptr[18]) != ( /*_.OLDENV__V20*/ meltfptr[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:1834:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1835:/ cond");
/*cond */ if ( /*_#__L69*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -42376,8 +43412,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1835:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1836:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -42409,7 +43450,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:1590:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1591:/ clear");
/*clear *//*_.SLOC__V14*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.MAT__V15*/ meltfptr[14] = 0;
@@ -42445,7 +43486,7 @@ lab_endgetargs:;
/*clear *//*_#__L69*/ meltfnum[17] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ clear");
/*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0;
@@ -42528,7 +43569,7 @@ meltrout_37_warmelt_normatch_LAMBDA___13__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -42540,7 +43581,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:1723:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1724:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -42550,8 +43591,14 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1724:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1725:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -42579,7 +43626,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -42602,7 +43649,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -42612,7 +43659,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -42622,7 +43669,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1725;
+ argtab[2].meltbp_long = 1726;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat lambda updatelse of tstuff";
@@ -42642,7 +43689,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -42655,7 +43702,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -42664,7 +43711,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1725:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1726:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -42677,8 +43724,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1726:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1727:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -42698,7 +43750,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1726:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1727:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -42707,7 +43759,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -42788,7 +43840,7 @@ meltrout_38_warmelt_normatch_LAMBDA___14__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -42798,8 +43850,14 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:1736:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1737:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -42827,7 +43885,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1737:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1738:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -42838,7 +43896,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -42861,7 +43919,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -42871,7 +43929,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -42881,7 +43939,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1738;
+ argtab[2].meltbp_long = 1739;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat updatelse tsuff";
@@ -42901,7 +43959,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -42914,7 +43972,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -42923,7 +43981,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1738:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1739:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -42936,8 +43994,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1739:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1740:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -42957,7 +44020,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1739:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1740:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -42966,7 +44029,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -43047,7 +44110,7 @@ meltrout_39_warmelt_normatch_LAMBDA___15__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ getarg");
/*_.CUROUTMATCH__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -43065,7 +44128,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43088,7 +44151,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -43098,7 +44161,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -43108,7 +44171,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1748;
+ argtab[2].meltbp_long = 1749;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_anymatchpat curoutmatch";
/*^apply.arg */
@@ -43127,7 +44190,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -43140,7 +44203,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -43149,7 +44212,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1748:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1749:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -43164,7 +44227,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1749:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1750:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43174,7 +44237,7 @@ lab_endgetargs:;
( /*_.CUROUTMATCH__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1749:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1750:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -43182,7 +44245,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1749:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1750:/ cond.else");
/*^block */
/*anyblock */
@@ -43196,7 +44259,7 @@ lab_endgetargs:;
melt_assert_failed (("check curoutmatch"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1749) ? (1749) : __LINE__, __FUNCTION__);
+ (1750) ? (1750) : __LINE__, __FUNCTION__);
;
}
;
@@ -43211,7 +44274,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1749:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1750:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
@@ -43222,11 +44285,16 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1750:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1751:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUTMATCH__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROUTMATCH__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -43244,7 +44312,7 @@ lab_endgetargs:;
/*_.BINDER__V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1750:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1751:/ apply");
/*apply */
{
/*_.CSYM__V11*/ meltfptr[10] =
@@ -43254,8 +44322,13 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1751:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUTMATCH__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1752:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROUTMATCH__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -43273,7 +44346,7 @@ lab_endgetargs:;
/*_.CURTYP__V12*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1752:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1753:/ quasiblock");
/*^rawallocobj */
@@ -43326,7 +44399,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "LETBIND_EXPR");
;
/*_.CBIND__V13*/ meltfptr[12] = /*_.INST__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:1761:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1762:/ quasiblock");
/*^rawallocobj */
@@ -43378,8 +44451,13 @@ lab_endgetargs:;
( /*_.CBIND__V13*/ meltfptr[12]), "NOCC_BIND");
;
/*_.CLOCC__V15*/ meltfptr[14] = /*_.INST__V16*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:1768:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NCX */ meltfclos->tabval[1])), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1769:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NCX */ meltfclos->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -43399,7 +44477,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1768:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1769:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V17*/ meltfptr[16]),
(meltobject_ptr_t) ( /*_.CSYM__V11*/
@@ -43409,7 +44487,7 @@ lab_endgetargs:;
;
/*_.LET___V9*/ meltfptr[4] = /*_.CLOCC__V15*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:1750:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1751:/ clear");
/*clear *//*_.BINDER__V10*/ meltfptr[9] = 0;
/*^clear */
/*clear *//*_.CSYM__V11*/ meltfptr[10] = 0;
@@ -43421,11 +44499,11 @@ lab_endgetargs:;
/*clear *//*_.CLOCC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.NCTX_SYMBCACHEMAP__V17*/ meltfptr[16] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -43513,7 +44591,7 @@ meltrout_40_warmelt_normatch_LAMBDA___16__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ getarg");
/*_.NEWTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -43525,7 +44603,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43548,7 +44626,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -43558,7 +44636,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -43568,7 +44646,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1818;
+ argtab[2].meltbp_long = 1819;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_anymatchpat subhdler newtester";
@@ -43588,7 +44666,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -43601,7 +44679,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -43610,7 +44688,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1818:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1819:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -43625,7 +44703,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1819:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1820:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -43634,7 +44712,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1820:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1821:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -43650,12 +44728,12 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.SET_NEW_TESTER_LAST_THEN__V7*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -43743,7 +44821,7 @@ meltrout_41_warmelt_normatch_NORMPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -43784,7 +44862,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43807,7 +44885,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -43817,7 +44895,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -43827,7 +44905,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1844;
+ argtab[2].meltbp_long = 1845;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_constpat recv=";
/*^apply.arg */
@@ -43858,7 +44936,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
@@ -43871,7 +44949,7 @@ lab_endgetargs:;
/*_.IF___V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
@@ -43880,7 +44958,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1844:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1845:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V7*/ meltfptr[6] = 0;
@@ -43895,7 +44973,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1845:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1846:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43904,7 +44982,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]),
(melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1845:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1846:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -43912,7 +44990,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1845:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1846:/ cond.else");
/*^block */
/*anyblock */
@@ -43926,7 +45004,7 @@ lab_endgetargs:;
melt_assert_failed (("check pcn"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1845) ? (1845) : __LINE__, __FUNCTION__);
+ (1846) ? (1846) : __LINE__, __FUNCTION__);
;
}
;
@@ -43941,7 +45019,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1845:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1846:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
@@ -43954,7 +45032,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1846:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1847:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -43962,7 +45040,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTANT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1846:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1847:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -43970,7 +45048,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1846:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1847:/ cond.else");
/*^block */
/*anyblock */
@@ -43984,7 +45062,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1846) ? (1846) : __LINE__, __FUNCTION__);
+ (1847) ? (1847) : __LINE__, __FUNCTION__);
;
}
;
@@ -43999,7 +45077,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1846:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1847:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
@@ -44010,11 +45088,17 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1847:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1848:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:1848:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1849:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44032,8 +45116,13 @@ lab_endgetargs:;
/*_.SLOC__V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1849:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTANT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1850:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTANT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44051,8 +45140,13 @@ lab_endgetargs:;
/*_.SCONST__V16*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1850:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1851:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44070,8 +45164,13 @@ lab_endgetargs:;
/*_.STUFFMAP__V17*/ meltfptr[16] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1851:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1852:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44089,8 +45188,13 @@ lab_endgetargs:;
/*_.PVARLOCMAP__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1852:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1853:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44108,8 +45212,14 @@ lab_endgetargs:;
/*_.PCTN_SRC__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1852:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCTN_SRC__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1853:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCTN_SRC__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44134,8 +45244,13 @@ lab_endgetargs:;
( /*_.STUFFMAP__V17*/ meltfptr[16]),
(meltobject_ptr_t) ( /*_.NMATCH__V3*/
meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:1854:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1855:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44153,8 +45268,13 @@ lab_endgetargs:;
/*_.ENV__V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1855:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1856:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44172,8 +45292,13 @@ lab_endgetargs:;
/*_.NCX__V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1856:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1857:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44191,8 +45316,13 @@ lab_endgetargs:;
/*_.TESTLIST__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1857:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1858:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44212,7 +45342,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -44235,7 +45365,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -44245,7 +45375,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -44255,7 +45385,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1860;
+ argtab[2].meltbp_long = 1861;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_constpat tstuff";
/*^apply.arg */
@@ -44275,7 +45405,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
@@ -44288,7 +45418,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];;
@@ -44297,7 +45427,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = /*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1860:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1861:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[26] = 0;
@@ -44310,7 +45440,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1861:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1862:/ quasiblock");
/*_.TESTER__V31*/ meltfptr[27] = ( /*nil */ NULL);;
@@ -44322,7 +45452,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L7*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SCONST__V16*/ meltfptr[15])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:1864:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1865:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -44341,7 +45471,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V34*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1864:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1865:/ clear");
/*clear *//*_.MAPOBJECT_GET__V34*/ meltfptr[33] = 0;
}
;
@@ -44354,7 +45484,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -44377,7 +45507,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -44387,7 +45517,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -44397,7 +45527,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1866;
+ argtab[2].meltbp_long = 1867;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_constpat nconst";
/*^apply.arg */
@@ -44417,7 +45547,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0;
@@ -44430,7 +45560,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];;
@@ -44439,7 +45569,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[33] = /*_.PROGN___V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1866:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1867:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[35] = 0;
@@ -44452,7 +45582,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1867:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:1868:/ loop");
/*loop */
{
labloop_LOOPSTUFF_5:; /*^loopbody */
@@ -44463,7 +45593,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -44486,7 +45616,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -44496,7 +45626,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -44507,7 +45637,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1869;
+ argtab[2].meltbp_long = 1870;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_constpat tstuff";
/*^apply.arg */
@@ -44528,7 +45658,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0;
@@ -44541,7 +45671,7 @@ lab_endgetargs:;
/*_.IF___V42*/ meltfptr[41] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];;
@@ -44550,7 +45680,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1869:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1870:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V42*/ meltfptr[41] = 0;
@@ -44563,8 +45693,13 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1871:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1872:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44587,7 +45722,7 @@ lab_endgetargs:;
/*_#__L12*/ meltfnum[1] =
(( /*_.NTSAME_IDENTICAL__V45*/ meltfptr[41]) ==
( /*_.NCONST__V33*/ meltfptr[32]));;
- MELT_LOCATION ("warmelt-normatch.melt:1871:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1872:/ cond");
/*cond */ if ( /*_#__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -44595,10 +45730,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1872:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1873:/ compute");
/*_.TESTER__V31*/ meltfptr[27] = /*_.SETQ___V47*/ meltfptr[46] =
/*_.TSTUFF__V21*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:1873:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1874:/ quasiblock");
/*^compute */
@@ -44610,7 +45745,7 @@ lab_endgetargs:;
goto labexit_LOOPSTUFF_5;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1871:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1872:/ quasiblock");
/*epilog */
@@ -44631,7 +45766,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.TSTUFF__V21*/ meltfptr[20]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:1874:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1875:/ cond");
/*cond */ if ( /*_#IS_A__L13*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -44639,8 +45774,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1875:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TSTUFF__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1876:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TSTUFF__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -44658,11 +45799,11 @@ lab_endgetargs:;
/*_.NTEST_ELSE__V49*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1875:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1876:/ compute");
/*_.TSTUFF__V21*/ meltfptr[20] =
/*_.SETQ___V50*/ meltfptr[49] =
/*_.NTEST_ELSE__V49*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ quasiblock");
/*^newclosure */
@@ -44694,11 +45835,11 @@ lab_endgetargs:;
;
/*_.LAMBDA___V51*/ meltfptr[50] =
/*_.LAMBDA___V52*/ meltfptr[51];;
- MELT_LOCATION ("warmelt-normatch.melt:1876:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1877:/ compute");
/*_.CURHDLER__V32*/ meltfptr[31] =
/*_.SETQ___V53*/ meltfptr[52] =
/*_.LAMBDA___V51*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:1874:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1875:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[53] =
@@ -44709,7 +45850,7 @@ lab_endgetargs:;
/*_.PROGN___V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1874:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1875:/ clear");
/*clear *//*_.NTEST_ELSE__V49*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.SETQ___V50*/ meltfptr[49] = 0;
@@ -44729,14 +45870,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:1885:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1886:/ quasiblock");
/*_.MAKE_LIST__V55*/ meltfptr[48] =
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[9]))));;
- MELT_LOCATION ("warmelt-normatch.melt:1885:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1886:/ quasiblock");
/*^rawallocobj */
@@ -44834,7 +45975,7 @@ lab_endgetargs:;
/*_.INST__V57*/ meltfptr[50];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1894:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1895:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -44843,7 +45984,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1895:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1896:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -44863,7 +46004,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1896:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1897:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -44886,7 +46027,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1896:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1897:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -44897,7 +46038,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:1896:/ apply");
+ ("warmelt-normatch.melt:1897:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -44909,7 +46050,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1896;
+ argtab[2].meltbp_long = 1897;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_constpat newtester same";
@@ -44935,7 +46076,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:1896:/ clear");
+ ("warmelt-normatch.melt:1897:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/
meltfnum[14] = 0;
/*^clear */
@@ -44951,7 +46092,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:1896:/ quasiblock");
+ ("warmelt-normatch.melt:1897:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] =
@@ -44962,7 +46103,7 @@ lab_endgetargs:;
/*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1896:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1897:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[59] = 0;
@@ -44975,20 +46116,20 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[53] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1897:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:1898:/ compute");
/*_.TESTER__V31*/ meltfptr[27] =
/*_.SETQ___V63*/ meltfptr[59] =
/*_.NEWTESTER__V56*/ meltfptr[49];;
{
- MELT_LOCATION ("warmelt-normatch.melt:1898:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1899:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.NEWTESTER__V56*/
meltfptr[49]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1899:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1900:/ apply");
/*apply */
{
/*_.CURHDLER__V64*/ meltfptr[60] =
@@ -45000,7 +46141,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1900:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1901:/ quasiblock");
/*^compute */
@@ -45013,7 +46154,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1885:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1886:/ clear");
/*clear *//*_.MAKE_LIST__V55*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.NEWTESTER__V56*/ meltfptr[49] = 0;
@@ -45026,7 +46167,7 @@ lab_endgetargs:;
/*clear *//*_.SETQ___V63*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V64*/ meltfptr[60] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1884:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1885:/ quasiblock");
/*epilog */
@@ -45038,7 +46179,7 @@ lab_endgetargs:;
/*_.IFELSE___V48*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1871:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1872:/ clear");
/*clear *//*_#IS_A__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V48*/ meltfptr[46] = 0;
@@ -45048,7 +46189,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1867:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1868:/ clear");
/*clear *//*_.IFCPP___V41*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.NTSAME_IDENTICAL__V45*/ meltfptr[41] = 0;
@@ -45067,7 +46208,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -45090,7 +46231,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -45100,7 +46241,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -45111,7 +46252,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1905;
+ argtab[2].meltbp_long = 1906;
/*^apply.arg */
argtab[3].meltbp_cstring = "normpat_constpat got tester";
/*^apply.arg */
@@ -45131,7 +46272,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V67*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[52] = 0;
@@ -45144,7 +46285,7 @@ lab_endgetargs:;
/*_.IF___V66*/ meltfptr[49] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[53] = /*_.IF___V66*/ meltfptr[49];;
@@ -45153,7 +46294,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[48] = /*_.PROGN___V68*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1905:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1906:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V66*/ meltfptr[49] = 0;
@@ -45170,7 +46311,7 @@ lab_endgetargs:;
/*_.LET___V30*/ meltfptr[26] = /*_.IFCPP___V65*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:1861:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1862:/ clear");
/*clear *//*_.TESTER__V31*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.CURHDLER__V32*/ meltfptr[31] = 0;
@@ -45186,7 +46327,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V65*/ meltfptr[48] = 0;
/*_.LET___V14*/ meltfptr[12] = /*_.LET___V30*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:1847:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1848:/ clear");
/*clear *//*_.SLOC__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.SCONST__V16*/ meltfptr[15] = 0;
@@ -45212,11 +46353,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.LET___V30*/ meltfptr[26] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -45306,7 +46447,7 @@ meltrout_42_warmelt_normatch_LAMBDA___17__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -45316,8 +46457,14 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:1878:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~TSTUFF */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1879:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~TSTUFF */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -45345,7 +46492,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1879:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1880:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -45356,7 +46503,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -45379,7 +46526,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -45389,7 +46536,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -45399,7 +46546,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1880;
+ argtab[2].meltbp_long = 1881;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normpat_constpat lambda updatelse tstuff";
@@ -45419,7 +46566,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -45432,7 +46579,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -45441,7 +46588,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1880:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1881:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -45454,8 +46601,13 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1881:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1882:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTER__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -45475,7 +46627,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1881:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1882:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NTEST_COMEFROM__V7*/ meltfptr[3]),
(melt_ptr_t) (( /*~TSTUFF */ meltfclos->
@@ -45484,7 +46636,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.NTEST_COMEFROM__V7*/ meltfptr[3] = 0;
@@ -45569,7 +46721,7 @@ meltrout_43_warmelt_normatch_MATCH_GRAPHIC_OPTSET (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ getarg");
/*_.OPTSYMB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -45587,7 +46739,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -45610,7 +46762,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -45620,7 +46772,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -45630,7 +46782,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1923;
+ argtab[2].meltbp_long = 1924;
/*^apply.arg */
argtab[3].meltbp_cstring = "match_graphic_optset optsumb";
/*^apply.arg */
@@ -45649,7 +46801,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -45662,7 +46814,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -45671,7 +46823,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1924:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -45684,15 +46836,22 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1924:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1925:/ quasiblock");
/*_.PREFSTR__V8*/ meltfptr[4] =
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[1])),
( /*_?*/ meltfram__.loc_CSTRING__o0)));;
- MELT_LOCATION ("warmelt-normatch.melt:1925:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1926:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!MATCH_GRAPHIC_DOT_PREFIX */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -45722,7 +46881,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -45745,7 +46904,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -45755,7 +46914,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -45765,7 +46924,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1926;
+ argtab[2].meltbp_long = 1927;
/*^apply.arg */
argtab[3].meltbp_cstring =
"match_graphic_optset match_graphic_dot_prefix";
@@ -45787,7 +46946,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -45800,7 +46959,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -45809,7 +46968,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1927:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -45822,27 +46981,27 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1927:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1928:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] =
( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[2]);;
- MELT_LOCATION ("warmelt-normatch.melt:1927:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1928:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V7*/ meltfptr[3] = /*_.RETURN___V13*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-normatch.melt:1924:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1925:/ clear");
/*clear *//*_.PREFSTR__V8*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.IFCPP___V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_.RETURN___V13*/ meltfptr[9] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -45930,7 +47089,7 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1951:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1952:/ getarg");
/*_.OUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -45952,14 +47111,14 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1952:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1953:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L1*/ meltfnum[0] =
(melt_is_out ((melt_ptr_t) /*_.OUT__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:1952:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1953:/ cond");
/*cond */ if ( /*_#IS_OUT__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -45967,7 +47126,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1952:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1953:/ cond.else");
/*^block */
/*anyblock */
@@ -45981,7 +47140,7 @@ lab_endgetargs:;
melt_assert_failed (("check out"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1952) ? (1952) : __LINE__, __FUNCTION__);
+ (1953) ? (1953) : __LINE__, __FUNCTION__);
;
}
;
@@ -45996,7 +47155,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1952:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1953:/ clear");
/*clear *//*_#IS_OUT__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
@@ -46009,7 +47168,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1953:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1954:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -46018,7 +47177,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:1953:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1954:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -46026,7 +47185,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1953:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1954:/ cond.else");
/*^block */
/*anyblock */
@@ -46040,7 +47199,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1953) ? (1953) : __LINE__, __FUNCTION__);
+ (1954) ? (1954) : __LINE__, __FUNCTION__);
;
}
;
@@ -46055,7 +47214,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1953:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1954:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -46066,13 +47225,19 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:1954:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1955:/ quasiblock");
/*_.CLA__V8*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.NTEST__V3*/ meltfptr[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1955:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLA__V8*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1956:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLA__V8*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -46100,14 +47265,14 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.NTEST__V3*/ meltfptr[2])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1961:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1962:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#I__L5*/ meltfnum[4] =
(( /*_#CLANAMLEN__L3*/ meltfnum[0]) > (6));;
- MELT_LOCATION ("warmelt-normatch.melt:1961:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1962:/ cond");
/*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -46115,7 +47280,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1961:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1962:/ cond.else");
/*^block */
/*anyblock */
@@ -46129,7 +47294,7 @@ lab_endgetargs:;
melt_assert_failed (("check clanamlen"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1961) ? (1961) : __LINE__, __FUNCTION__);
+ (1962) ? (1962) : __LINE__, __FUNCTION__);
;
}
;
@@ -46144,7 +47309,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1961:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1962:/ clear");
/*clear *//*_#I__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -46157,7 +47322,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:1963:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:1964:/ locexp");
/* mg_node_name OUTCHUNK__1 */
meltgc_add_out ((melt_ptr_t) /*_.OUT__V2*/ meltfptr[1],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V9*/
@@ -46168,7 +47333,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1954:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1955:/ clear");
/*clear *//*_.CLA__V8*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.CLANAM__V9*/ meltfptr[8] = 0;
@@ -46180,7 +47345,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1951:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1952:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
@@ -46203,16 +47368,14 @@ labend_rout:
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un * meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un * meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -46224,7 +47387,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST_st
+ struct frame_meltrout_45_warmelt_normatch_MGLABEL_ANY_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -46235,10 +47398,10 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 34
- void *mcfr_varptr[34];
-#define MELTFRAM_NBVARNUM 16
- long mcfr_varnum[16];
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
/*others*/
long _spare_;
}
@@ -46249,22 +47412,22 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 34; ix++)
+ for (ix = 0; ix < 12; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 34;
+ meltfram__.mcfr_nbvar = 12;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MGLABEL_ANY_TEST", meltcallcount);
+ melt_trace_start ("MGLABEL_ANY", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ getarg");
- /*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
/*^getarg */
@@ -46282,261 +47445,39 @@ lab_endgetargs:;
/*anyblock*/
{
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1978:/ cppif.then");
- /*^block */
- /*anyblock */
- {
+ MELT_LOCATION ("warmelt-normatch.melt:1979:/ quasiblock");
+ /*_.DIS__V5*/ meltfptr[4] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:1980:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[0])))
+ ) /*then */
{
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V5*/ meltfptr[4]), 1, "NAMED_NAME");
+ /*_.DISNAME__V6*/
+ meltfptr[5] = slot;
+ };
;
}
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:1978:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1978:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 1978;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_any_test start ntest";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
- 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);
- }
- ;
- /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1978:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V5*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1978:/ quasiblock");
-
-
- /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1978:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1979:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:1979:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:1979:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check ntest"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (1979) ? (1979) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1979:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1980:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
- meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:1980:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:1980:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check mg"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (1980) ? (1980) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1980:/ clear");
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1981:/ quasiblock");
-
+ else
+ { /*^cond.else */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 0, "NREP_LOC");
- /*_.NLOC__V13*/
- meltfptr[12] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1982:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
- /*_.NMATCHED__V14*/
- meltfptr[13] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1983:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
- /*_.NODOUT__V15*/
- meltfptr[14] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1984:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
- /*_.EDGOUT__V16*/
- meltfptr[15] = slot;
- };
+ /*_.DISNAME__V6*/ meltfptr[5] = NULL;;
+ }
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -46551,7 +47492,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L5*/ meltfnum[1] =
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -46559,162 +47500,116 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ apply");
/*apply */
{
- union meltparam_un argtab[7];
+ union meltparam_un argtab[9];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 1986;
+ argtab[2].meltbp_long = 1982;
/*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_any_test nloc=";
+ argtab[3].meltbp_cstring = "mglabel_any recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NLOC__V13*/ meltfptr[12];
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
/*^apply.arg */
- argtab[5].meltbp_cstring = " nmatched=";
+ argtab[5].meltbp_cstring = " mg=";
/*^apply.arg */
argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMATCHED__V14*/ meltfptr[13];
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ (melt_ptr_t *) & /*_.MG__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " dis=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V5*/ meltfptr[4];
+ /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[1])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.IF___V18*/ meltfptr[17] =
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V18*/ meltfptr[17] = NULL;;
+ /*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ quasiblock");
- /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
/*^compute */
- /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:1986:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1982:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*clear *//*_.IF___V8*/ meltfptr[7] = 0;
/*^clear */
- /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ /*clear *//*_.PROGN___V10*/ meltfptr[8] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
+ /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1987:/ cppif.then");
- /*^block */
- /*anyblock */
{
-
- /*_#IS_OUT__L7*/ meltfnum[0] =
- (melt_is_out ((melt_ptr_t) /*_.NODOUT__V15*/ meltfptr[14]));;
- MELT_LOCATION ("warmelt-normatch.melt:1987:/ cond");
- /*cond */ if ( /*_#IS_OUT__L7*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V22*/ meltfptr[18] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:1987:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nodout"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (1987) ? (1987) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V22*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1987:/ clear");
- /*clear *//*_#IS_OUT__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1983:/ locexp");
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unimplemented MATCHGRAPHIC_LABEL for "),
+ melt_string_str ((melt_ptr_t) ( /*_.DISNAME__V6*/ meltfptr[5])));
}
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V21*/ meltfptr[17] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:1988:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1984:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_OUT__L8*/ meltfnum[1] =
- (melt_is_out ((melt_ptr_t) /*_.EDGOUT__V16*/ meltfptr[15]));;
- MELT_LOCATION ("warmelt-normatch.melt:1988:/ cond");
- /*cond */ if ( /*_#IS_OUT__L8*/ meltfnum[1]) /*then */
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
{
/*^cond.then */
- /*_.IFELSE___V24*/ meltfptr[23] = ( /*nil */ NULL);;
+ /*_.IFELSE___V12*/ meltfptr[8] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:1988:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1984:/ cond.else");
/*^block */
/*anyblock */
@@ -46725,553 +47620,85 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check edgout"),
+ melt_assert_failed (("@$@unexpected mglabel_anyobj"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (1988) ? (1988) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V23*/ meltfptr[18] = /*_.IFELSE___V24*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:1988:/ clear");
- /*clear *//*_#IS_OUT__L8*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V23*/ meltfptr[18] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1990:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<tr><td>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1991:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<font color=\"blue\" face=\"Times-Roman Bold\" point-size=\"10\">"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:1993:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
- /*_.MG_OUT_NODE_NAME__V25*/ meltfptr[23] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MG_OUT_NODE_NAME */ meltfrout->tabval[3])),
- (melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1994:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1995:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<td><font face=\"Courier\" point-size=\"8\">#"));
- }
- ;
- /*_#OBJ_HASH__L9*/ meltfnum[0] =
- (melt_obj_hash ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1996:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ( /*_#OBJ_HASH__L9*/ meltfnum[0]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1997:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1998:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:1999:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- (2), 0);;
- }
- ;
- /*_#IS_MIXLOC__L10*/ meltfnum[1] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
- MELTOBMAG_MIXLOC);;
- MELT_LOCATION ("warmelt-normatch.melt:2002:/ cond");
- /*cond */ if ( /*_#IS_MIXLOC__L10*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2003:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<tr><td rowspan=\"2\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2004:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<font face=\"Courier Italic\" point-size=\"8\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2005:/ locexp");
- /*add2outmixloc */
- if (melt_magic_discr
- ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
- MELTOBMAG_MIXLOC)
- {
- char locbuf[128];
- location_t tloc =
- melt_location_mixloc ((melt_ptr_t) /*_.NLOC__V13*/
- meltfptr[12]);
- memset (locbuf, 0, sizeof (locbuf));
- snprintf (locbuf, sizeof (locbuf) - 1,
- "{%.110s:%d}",
- LOCATION_FILE (tloc), LOCATION_LINE (tloc));
- meltgc_add_out_raw ((melt_ptr_t) /*_.NODOUT__V15*/
- meltfptr[14], locbuf);
- } /*end add2outmixloc */
- ;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2006:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2007:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]), (2),
- 0);;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2002:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IFELSE___V26*/ meltfptr[25] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#IS_A__L11*/ meltfnum[10] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]),
- (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
- meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:2012:/ cond");
- /*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:2013:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 0, "NREP_LOC");
- /*_.NMALOC__V27*/
- meltfptr[26] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2014:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 1, "NOCC_SYMB");
- /*_.NMASYMB__V28*/
- meltfptr[27] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2016:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[5])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), 3, "CSYM_URANK");
- /*_.CSYM_URANK__V29*/
- meltfptr[28] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CSYM_URANK__V29*/ meltfptr[28] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#NMARANK__L12*/ meltfnum[11] =
- (melt_get_int
- ((melt_ptr_t) ( /*_.CSYM_URANK__V29*/ meltfptr[28])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2018:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<tr><td>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2019:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<font face=\"Courier Bold\" point-size=\"8\">"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2020:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V30*/
- meltfptr[29] = slot;
- };
+ (1984) ? (1984) : __LINE__, __FUNCTION__);
;
}
- else
- { /*^cond.else */
-
- /*_.NAMED_NAME__V30*/ meltfptr[29] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2020:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V30*/
- meltfptr[29])));
- }
- ;
- /*_#I__L13*/ meltfnum[12] =
- (( /*_#NMARANK__L12*/ meltfnum[11]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:2021:/ cond");
- /*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2023:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]), (" #"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2024:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]),
- ( /*_#NMARANK__L12*/ meltfnum[11]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2025:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]), (" "));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2022:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2027:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> <td><font point-size=\"8\">##"));
- }
- ;
- /*_#OBJ_HASH__L14*/ meltfnum[13] =
- (melt_obj_hash
- ((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2028:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]),
- ( /*_#OBJ_HASH__L14*/ meltfnum[13]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2029:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2030:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODOUT__V15*/ meltfptr[14]), (2),
- 0);;
- }
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:2013:/ clear");
- /*clear *//*_.NMALOC__V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.NMASYMB__V28*/ meltfptr[27] = 0;
- /*^clear */
- /*clear *//*_.CSYM_URANK__V29*/ meltfptr[28] = 0;
- /*^clear */
- /*clear *//*_#NMARANK__L12*/ meltfnum[11] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V30*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_#I__L13*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_#OBJ_HASH__L14*/ meltfnum[13] = 0;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2032:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L15*/ meltfnum[11] =
- /*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-normatch.melt:2032:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[11]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2032:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 2032;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_any_test end ntest";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V33*/ meltfptr[28] =
- 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);
- }
;
- /*_.IF___V32*/ meltfptr[27] =
- /*_.MELT_DEBUG_FUN__V33*/ meltfptr[28];;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
/*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:2032:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[28] = 0;
}
;
}
- else
- { /*^cond.else */
-
- /*_.IF___V32*/ meltfptr[27] = NULL;;
- }
;
- MELT_LOCATION ("warmelt-normatch.melt:2032:/ quasiblock");
-
-
- /*_.PROGN___V34*/ meltfptr[29] = /*_.IF___V32*/ meltfptr[27];;
/*^compute */
- /*_.IFCPP___V31*/ meltfptr[26] = /*_.PROGN___V34*/ meltfptr[29];;
+ /*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2032:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[11] = 0;
- /*^clear */
- /*clear *//*_.IF___V32*/ meltfptr[27] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V34*/ meltfptr[29] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1984:/ clear");
+ /*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V31*/ meltfptr[26] = ( /*nil */ NULL);
+ /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V31*/ meltfptr[26];;
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFCPP___V11*/ meltfptr[7];;
- MELT_LOCATION ("warmelt-normatch.melt:1981:/ clear");
- /*clear *//*_.NLOC__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.NMATCHED__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.NODOUT__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.EDGOUT__V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V21*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V23*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.MG_OUT_NODE_NAME__V25*/ meltfptr[23] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1979:/ clear");
+ /*clear *//*_.DIS__V5*/ meltfptr[4] = 0;
/*^clear */
- /*clear *//*_#OBJ_HASH__L9*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_#IS_MIXLOC__L10*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V26*/ meltfptr[25] = 0;
+ /*clear *//*_.DISNAME__V6*/ meltfptr[5] = 0;
/*^clear */
- /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0;
+ /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V31*/ meltfptr[26] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ quasiblock");
+ /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ quasiblock");
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ finalreturn");
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
/*^clear */
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("MGLABEL_ANY_TEST", meltcallcount);
+ melt_trace_end ("MGLABEL_ANY", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST */
+} /*end meltrout_45_warmelt_normatch_MGLABEL_ANY */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -47283,7 +47710,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST_st
+ struct frame_meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -47294,8 +47721,8 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 37
- void *mcfr_varptr[37];
+#define MELTFRAM_NBVARPTR 34
+ void *mcfr_varptr[34];
#define MELTFRAM_NBVARNUM 16
long mcfr_varnum[16];
/*others*/
@@ -47308,21 +47735,21 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 37; ix++)
+ for (ix = 0; ix < 34; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 37;
+ meltfram__.mcfr_nbvar = 34;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MGLABEL_INSTANCE_TEST", meltcallcount);
+ melt_trace_start ("MGLABEL_ANY_TEST", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ getarg");
/*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -47343,7 +47770,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -47366,7 +47793,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -47376,7 +47803,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -47386,9 +47813,9 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2038;
+ argtab[2].meltbp_long = 1989;
/*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_instance_test start ntest";
+ argtab[3].meltbp_cstring = "mglabel_any_test start ntest";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
@@ -47405,7 +47832,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -47418,7 +47845,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -47427,7 +47854,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2038:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1989:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -47442,16 +47869,16 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2039:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1990:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2039:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1990:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -47459,7 +47886,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2039:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1990:/ cond.else");
/*^block */
/*anyblock */
@@ -47473,7 +47900,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2039) ? (2039) : __LINE__, __FUNCTION__);
+ (1990) ? (1990) : __LINE__, __FUNCTION__);
;
}
;
@@ -47488,7 +47915,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2039:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1990:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -47501,7 +47928,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2040:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1991:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -47510,7 +47937,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2040:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1991:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -47518,7 +47945,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2040:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1991:/ cond.else");
/*^block */
/*anyblock */
@@ -47532,7 +47959,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2040) ? (2040) : __LINE__, __FUNCTION__);
+ (1991) ? (1991) : __LINE__, __FUNCTION__);
;
}
;
@@ -47547,7 +47974,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2040:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1991:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -47558,7 +47985,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2041:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1992:/ quasiblock");
/*^getslot */
@@ -47569,7 +47996,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2042:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1993:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -47577,7 +48004,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2043:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1994:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -47585,7 +48012,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2044:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:1995:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -47595,7 +48022,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -47618,7 +48045,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -47628,7 +48055,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -47638,14 +48065,14 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2046;
+ argtab[2].meltbp_long = 1997;
/*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_instance_test nloc=";
+ argtab[3].meltbp_cstring = "mglabel_any_test nloc=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NLOC__V13*/ meltfptr[12];
/*^apply.arg */
- argtab[5].meltbp_cstring = "nmatched=";
+ argtab[5].meltbp_cstring = " nmatched=";
/*^apply.arg */
argtab[6].meltbp_aptr =
(melt_ptr_t *) & /*_.NMATCHED__V14*/ meltfptr[13];
@@ -47664,7 +48091,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -47677,7 +48104,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
@@ -47686,7 +48113,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1997:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[17] = 0;
@@ -47701,14 +48128,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2047:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1998:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L7*/ meltfnum[0] =
(melt_is_out ((melt_ptr_t) /*_.NODOUT__V15*/ meltfptr[14]));;
- MELT_LOCATION ("warmelt-normatch.melt:2047:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1998:/ cond");
/*cond */ if ( /*_#IS_OUT__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -47716,7 +48143,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2047:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1998:/ cond.else");
/*^block */
/*anyblock */
@@ -47730,7 +48157,7 @@ lab_endgetargs:;
melt_assert_failed (("check nodout"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2047) ? (2047) : __LINE__, __FUNCTION__);
+ (1998) ? (1998) : __LINE__, __FUNCTION__);
;
}
;
@@ -47745,7 +48172,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V22*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2047:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1998:/ clear");
/*clear *//*_#IS_OUT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
@@ -47758,14 +48185,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2048:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:1999:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L8*/ meltfnum[1] =
(melt_is_out ((melt_ptr_t) /*_.EDGOUT__V16*/ meltfptr[15]));;
- MELT_LOCATION ("warmelt-normatch.melt:2048:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:1999:/ cond");
/*cond */ if ( /*_#IS_OUT__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -47773,7 +48200,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2048:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:1999:/ cond.else");
/*^block */
/*anyblock */
@@ -47787,7 +48214,7 @@ lab_endgetargs:;
melt_assert_failed (("check edgout"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2048) ? (2048) : __LINE__, __FUNCTION__);
+ (1999) ? (1999) : __LINE__, __FUNCTION__);
;
}
;
@@ -47802,7 +48229,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[18] = /*_.IFELSE___V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2048:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1999:/ clear");
/*clear *//*_#IS_OUT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
@@ -47815,19 +48242,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2050:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2001:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<tr><td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2051:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2002:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<font color=\"violet\" face=\"Times-Roman Bold\" point-size=\"10\">"));
+ ("<font color=\"blue\" face=\"Times-Roman Bold\" point-size=\"10\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2053:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2004:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -47844,14 +48271,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2054:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2005:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2055:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2006:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<td><font face=\"Courier\" point-size=\"8\">#"));
}
@@ -47860,108 +48287,28 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:2056:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2007:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
( /*_#OBJ_HASH__L9*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2057:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2008:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2058:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("<td><font face=\"Courier Italic\" point-size=\"8\">"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2061:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 7, "NTINST_CLASS");
- /*_.NTINST_CLASS__V26*/
- meltfptr[25] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NTINST_CLASS__V26*/ meltfptr[25] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2060:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTINST_CLASS__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTINST_CLASS__V26*/ meltfptr[25]), 1, "NOCC_SYMB");
- /*_.NOCC_SYMB__V27*/
- meltfptr[26] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NOCC_SYMB__V27*/ meltfptr[26] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:2059:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NOCC_SYMB__V27*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NOCC_SYMB__V27*/ meltfptr[26]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V28*/
- meltfptr[27] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NAMED_NAME__V28*/ meltfptr[27] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2059:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V28*/
- meltfptr[27])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2062:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
- ("</font></td> "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:2063:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2009:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2064:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2010:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
(2), 0);;
}
@@ -47969,7 +48316,7 @@ lab_endgetargs:;
/*_#IS_MIXLOC__L10*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
MELTOBMAG_MIXLOC);;
- MELT_LOCATION ("warmelt-normatch.melt:2067:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2013:/ cond");
/*cond */ if ( /*_#IS_MIXLOC__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -47979,21 +48326,21 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2068:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2014:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<tr><td rowspan=\"2\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2069:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2015:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<font face=\"Courier Italic\" point-size=\"8\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2070:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2016:/ locexp");
/*add2outmixloc */
if (melt_magic_discr
((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
@@ -48015,20 +48362,20 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2071:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2017:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2072:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2018:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]), (2),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2067:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2013:/ quasiblock");
/*epilog */
@@ -48038,7 +48385,7 @@ lab_endgetargs:;
else
{ /*^cond.else */
- /*_.IFELSE___V29*/ meltfptr[28] = NULL;;
+ /*_.IFELSE___V26*/ meltfptr[25] = NULL;;
}
;
/*^compute */
@@ -48046,8 +48393,8 @@ lab_endgetargs:;
/*_#IS_A__L11*/ meltfnum[10] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
- meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:2077:/ cond");
+ meltfrout->tabval[4])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2023:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -48055,94 +48402,106 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2078:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2024:/ quasiblock");
/*^getslot */
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 0, "NREP_LOC");
- /*_.NMALOC__V30*/
- meltfptr[29] = slot;
+ /*_.NMALOC__V27*/
+ meltfptr[26] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2079:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2025:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 1, "NOCC_SYMB");
- /*_.NMASYMB__V31*/
- meltfptr[30] = slot;
+ /*_.NMASYMB__V28*/
+ meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2081:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2027:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMASYMB__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), 3, "CSYM_URANK");
- /*_.CSYM_URANK__V32*/
- meltfptr[31] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), 3, "CSYM_URANK");
+ /*_.CSYM_URANK__V29*/
+ meltfptr[28] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.CSYM_URANK__V32*/ meltfptr[31] = NULL;;
+ /*_.CSYM_URANK__V29*/ meltfptr[28] = NULL;;
}
;
/*^compute */
/*_#NMARANK__L12*/ meltfnum[11] =
(melt_get_int
- ((melt_ptr_t) ( /*_.CSYM_URANK__V32*/ meltfptr[31])));;
+ ((melt_ptr_t) ( /*_.CSYM_URANK__V29*/ meltfptr[28])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:2083:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2029:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<tr><td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2084:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2030:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<font face=\"Courier Bold\" point-size=\"8\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2085:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2031:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMASYMB__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V33*/
- meltfptr[32] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V28*/ meltfptr[27]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V30*/
+ meltfptr[29] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.NAMED_NAME__V33*/ meltfptr[32] = NULL;;
+ /*_.NAMED_NAME__V30*/ meltfptr[29] = NULL;;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2085:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2031:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V33*/
- meltfptr[32])));
+ ( /*_.NAMED_NAME__V30*/
+ meltfptr[29])));
}
;
/*_#I__L13*/ meltfnum[12] =
(( /*_#NMARANK__L12*/ meltfnum[11]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:2086:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2032:/ cond");
/*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -48152,14 +48511,14 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2088:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2034:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]), (" #"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2089:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2035:/ locexp");
meltgc_add_out_hex ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]),
( /*_#NMARANK__L12*/ meltfnum[11]));
@@ -48167,12 +48526,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2090:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2036:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]), (" "));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2087:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2033:/ quasiblock");
/*epilog */
@@ -48182,7 +48541,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2092:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2038:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> <td><font point-size=\"8\">##"));
}
@@ -48192,7 +48551,7 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:2093:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2039:/ locexp");
meltgc_add_out_hex ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]),
( /*_#OBJ_HASH__L14*/ meltfnum[13]));
@@ -48200,30 +48559,30 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2094:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2040:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2095:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2041:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]), (2),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2078:/ clear");
- /*clear *//*_.NMALOC__V30*/ meltfptr[29] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2024:/ clear");
+ /*clear *//*_.NMALOC__V27*/ meltfptr[26] = 0;
/*^clear */
- /*clear *//*_.NMASYMB__V31*/ meltfptr[30] = 0;
+ /*clear *//*_.NMASYMB__V28*/ meltfptr[27] = 0;
/*^clear */
- /*clear *//*_.CSYM_URANK__V32*/ meltfptr[31] = 0;
+ /*clear *//*_.CSYM_URANK__V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_#NMARANK__L12*/ meltfnum[11] = 0;
/*^clear */
- /*clear *//*_.NAMED_NAME__V33*/ meltfptr[32] = 0;
+ /*clear *//*_.NAMED_NAME__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_#I__L13*/ meltfnum[12] = 0;
/*^clear */
@@ -48235,7 +48594,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -48258,7 +48617,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -48268,7 +48627,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -48279,13 +48638,13 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2097;
+ argtab[2].meltbp_long = 2043;
/*^apply.arg */
- argtab[3].meltbp_cstring = "mglabel_instance_test end ntest";
+ argtab[3].meltbp_cstring = "mglabel_any_test end ntest";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[31] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[28] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -48295,50 +48654,50 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V35*/ meltfptr[30] =
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[31];;
+ /*_.IF___V32*/ meltfptr[27] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[31] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[28] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V35*/ meltfptr[30] = NULL;;
+ /*_.IF___V32*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ quasiblock");
- /*_.PROGN___V37*/ meltfptr[32] = /*_.IF___V35*/ meltfptr[30];;
+ /*_.PROGN___V34*/ meltfptr[29] = /*_.IF___V32*/ meltfptr[27];;
/*^compute */
- /*_.IFCPP___V34*/ meltfptr[29] = /*_.PROGN___V37*/ meltfptr[32];;
+ /*_.IFCPP___V31*/ meltfptr[26] = /*_.PROGN___V34*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2097:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2043:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[11] = 0;
/*^clear */
- /*clear *//*_.IF___V35*/ meltfptr[30] = 0;
+ /*clear *//*_.IF___V32*/ meltfptr[27] = 0;
/*^clear */
- /*clear *//*_.PROGN___V37*/ meltfptr[32] = 0;
+ /*clear *//*_.PROGN___V34*/ meltfptr[29] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V34*/ meltfptr[29] = ( /*nil */ NULL);
+ /*_.IFCPP___V31*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V34*/ meltfptr[29];;
+ /*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V31*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:2041:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:1992:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V14*/ meltfptr[13] = 0;
@@ -48357,24 +48716,18 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_#OBJ_HASH__L9*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.NTINST_CLASS__V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.NOCC_SYMB__V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V28*/ meltfptr[27] = 0;
- /*^clear */
/*clear *//*_#IS_MIXLOC__L10*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0;
+ /*clear *//*_.IFELSE___V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_#IS_A__L11*/ meltfnum[10] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V34*/ meltfptr[29] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ quasiblock");
+ /*clear *//*_.IFCPP___V31*/ meltfptr[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -48392,14 +48745,14 @@ lab_endgetargs:;
;
goto labend_rout;
labend_rout:
- melt_trace_end ("MGLABEL_INSTANCE_TEST", meltcallcount);
+ melt_trace_end ("MGLABEL_ANY_TEST", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST */
+} /*end meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST */
diff --git a/gcc/melt/generated/warmelt-normatch+02.c b/gcc/melt/generated/warmelt-normatch+02.c
index fcbad084f38..6db7c700d18 100644
--- a/gcc/melt/generated/warmelt-normatch+02.c
+++ b/gcc/melt/generated/warmelt-normatch+02.c
@@ -690,7 +690,20 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -705,7 +718,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -721,7 +734,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -737,7 +750,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -752,7 +765,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -771,7 +784,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -784,7 +797,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -797,7 +810,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -812,7 +825,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -827,7 +840,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -842,7 +855,39 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -857,7 +902,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -870,7 +915,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -884,7 +929,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -900,7 +945,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -915,23 +960,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -945,7 +974,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -958,7 +987,22 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -971,7 +1015,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -986,7 +1030,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1001,7 +1045,22 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1017,7 +1076,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1032,7 +1091,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1047,7 +1106,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1063,7 +1122,45 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1082,7 +1179,26 @@ meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1101,7 +1217,7 @@ meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1120,7 +1236,7 @@ meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1135,7 +1251,7 @@ meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1150,7 +1266,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1165,7 +1281,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1180,7 +1296,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1195,7 +1311,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1208,7 +1324,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1223,7 +1339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1238,7 +1354,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1253,7 +1369,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1268,7 +1384,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1281,7 +1397,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1294,7 +1410,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1309,7 +1425,20 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1325,7 +1454,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1344,7 +1473,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1363,7 +1492,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1382,7 +1511,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1401,7 +1530,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1417,39 +1546,23 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1468,36 +1581,7 @@ meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1516,7 +1600,56 @@ meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1525,22 +1658,22 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1559,7 +1692,7 @@ meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1574,7 +1707,7 @@ meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1589,7 +1722,7 @@ meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1605,7 +1738,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1624,7 +1757,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1643,7 +1776,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1658,7 +1791,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1673,7 +1806,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1687,7 +1820,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1701,7 +1834,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1715,7 +1848,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1729,7 +1862,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1748,7 +1881,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1767,7 +1900,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1786,7 +1919,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1805,7 +1938,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1824,7 +1957,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1843,7 +1976,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1862,7 +1995,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1881,7 +2014,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1890,7 +2023,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1899,7 +2032,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1908,7 +2041,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1922,7 +2055,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1937,7 +2070,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1951,7 +2084,7 @@ meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1970,7 +2103,7 @@ meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1986,7 +2119,7 @@ meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2000,7 +2133,7 @@ meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2014,7 +2147,7 @@ meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2161,7 @@ meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2042,7 +2175,7 @@ meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2168,17 +2301,1191 @@ static void forward_or_mark_module_start_frame_warmelt_normatch (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 37
+ void *mcfr_varptr[37];
+#define MELTFRAM_NBVARNUM 16
+ long mcfr_varnum[16];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 37; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 37;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MGLABEL_INSTANCE_TEST", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ getarg");
+ /*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.MG__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2049:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:2049:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2049:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2049;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mglabel_instance_test start ntest";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
+ 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);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2049:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2049:/ quasiblock");
+
+
+ /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2049:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2050:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2050:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2050:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check ntest"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2050) ? (2050) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2050:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2051:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2051:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2051:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check mg"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2051) ? (2051) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2051:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2052:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 0, "NREP_LOC");
+ /*_.NLOC__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2053:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
+ /*_.NMATCHED__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2054:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
+ /*_.NODOUT__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2055:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
+ /*_.EDGOUT__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2057:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:2057:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2057:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2057;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mglabel_instance_test nloc=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NLOC__V13*/ meltfptr[12];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "nmatched=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMATCHED__V14*/ meltfptr[13];
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V18*/ meltfptr[17] =
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2057:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V18*/ meltfptr[17] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2057:/ quasiblock");
+
+
+ /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2057:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2058:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_OUT__L7*/ meltfnum[0] =
+ (melt_is_out ((melt_ptr_t) /*_.NODOUT__V15*/ meltfptr[14]));;
+ MELT_LOCATION ("warmelt-normatch.melt:2058:/ cond");
+ /*cond */ if ( /*_#IS_OUT__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V22*/ meltfptr[18] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2058:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nodout"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2058) ? (2058) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V22*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2058:/ clear");
+ /*clear *//*_#IS_OUT__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V21*/ meltfptr[17] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2059:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_OUT__L8*/ meltfnum[1] =
+ (melt_is_out ((melt_ptr_t) /*_.EDGOUT__V16*/ meltfptr[15]));;
+ MELT_LOCATION ("warmelt-normatch.melt:2059:/ cond");
+ /*cond */ if ( /*_#IS_OUT__L8*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V24*/ meltfptr[23] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2059:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check edgout"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2059) ? (2059) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V23*/ meltfptr[18] = /*_.IFELSE___V24*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2059:/ clear");
+ /*clear *//*_#IS_OUT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V23*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2061:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<tr><td>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2062:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<font color=\"violet\" face=\"Times-Roman Bold\" point-size=\"10\">"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2064:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
+ /*_.MG_OUT_NODE_NAME__V25*/ meltfptr[23] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MG_OUT_NODE_NAME */ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2065:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2066:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<td><font face=\"Courier\" point-size=\"8\">#"));
+ }
+ ;
+ /*_#OBJ_HASH__L9*/ meltfnum[0] =
+ (melt_obj_hash ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2067:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ( /*_#OBJ_HASH__L9*/ meltfnum[0]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2068:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2069:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<td><font face=\"Courier Italic\" point-size=\"8\">"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2072:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTEST__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 7, "NTINST_CLASS");
+ /*_.NTINST_CLASS__V26*/
+ meltfptr[25] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NTINST_CLASS__V26*/ meltfptr[25] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2071:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTINST_CLASS__V26*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTINST_CLASS__V26*/ meltfptr[25]), 1, "NOCC_SYMB");
+ /*_.NOCC_SYMB__V27*/
+ meltfptr[26] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NOCC_SYMB__V27*/ meltfptr[26] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2070:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NOCC_SYMB__V27*/ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[5])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NOCC_SYMB__V27*/ meltfptr[26]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V28*/
+ meltfptr[27] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V28*/ meltfptr[27] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2070:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V28*/
+ meltfptr[27])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2073:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2074:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2075:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ (2), 0);;
+ }
+ ;
+ /*_#IS_MIXLOC__L10*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
+ MELTOBMAG_MIXLOC);;
+ MELT_LOCATION ("warmelt-normatch.melt:2078:/ cond");
+ /*cond */ if ( /*_#IS_MIXLOC__L10*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2079:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<tr><td rowspan=\"2\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2080:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<font face=\"Courier Italic\" point-size=\"8\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2081:/ locexp");
+ /*add2outmixloc */
+ if (melt_magic_discr
+ ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
+ MELTOBMAG_MIXLOC)
+ {
+ char locbuf[128];
+ location_t tloc =
+ melt_location_mixloc ((melt_ptr_t) /*_.NLOC__V13*/
+ meltfptr[12]);
+ memset (locbuf, 0, sizeof (locbuf));
+ snprintf (locbuf, sizeof (locbuf) - 1,
+ "{%.110s:%d}",
+ LOCATION_FILE (tloc), LOCATION_LINE (tloc));
+ meltgc_add_out_raw ((melt_ptr_t) /*_.NODOUT__V15*/
+ meltfptr[14], locbuf);
+ } /*end add2outmixloc */
+ ;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2082:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2083:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]), (2),
+ 0);;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2078:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IFELSE___V29*/ meltfptr[28] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#IS_A__L11*/ meltfnum[10] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
+ meltfrout->tabval[6])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2088:/ cond");
+ /*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:2089:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 0, "NREP_LOC");
+ /*_.NMALOC__V30*/
+ meltfptr[29] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2090:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13]), 1, "NOCC_SYMB");
+ /*_.NMASYMB__V31*/
+ meltfptr[30] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2092:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMASYMB__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[7])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), 3, "CSYM_URANK");
+ /*_.CSYM_URANK__V32*/
+ meltfptr[31] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CSYM_URANK__V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#NMARANK__L12*/ meltfnum[11] =
+ (melt_get_int
+ ((melt_ptr_t) ( /*_.CSYM_URANK__V32*/ meltfptr[31])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2094:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<tr><td>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2095:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("<font face=\"Courier Bold\" point-size=\"8\">"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2096:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMASYMB__V31*/
+ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMASYMB__V31*/ meltfptr[30]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V33*/
+ meltfptr[32] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V33*/ meltfptr[32] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2096:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V33*/
+ meltfptr[32])));
+ }
+ ;
+ /*_#I__L13*/ meltfnum[12] =
+ (( /*_#NMARANK__L12*/ meltfnum[11]) > (0));;
+ MELT_LOCATION ("warmelt-normatch.melt:2097:/ cond");
+ /*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2099:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]), (" #"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2100:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ( /*_#NMARANK__L12*/ meltfnum[11]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2101:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]), (" "));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2098:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2103:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> <td><font point-size=\"8\">##"));
+ }
+ ;
+ /*_#OBJ_HASH__L14*/ meltfnum[13] =
+ (melt_obj_hash
+ ((melt_ptr_t) ( /*_.NMATCHED__V14*/ meltfptr[13])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2104:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ( /*_#OBJ_HASH__L14*/ meltfnum[13]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2105:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2106:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODOUT__V15*/ meltfptr[14]), (2),
+ 0);;
+ }
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:2089:/ clear");
+ /*clear *//*_.NMALOC__V30*/ meltfptr[29] = 0;
+ /*^clear */
+ /*clear *//*_.NMASYMB__V31*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.CSYM_URANK__V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_#NMARANK__L12*/ meltfnum[11] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V33*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_#I__L13*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_#OBJ_HASH__L14*/ meltfnum[13] = 0;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2108:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L15*/ meltfnum[11] =
+ /*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-normatch.melt:2108:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[11]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2108:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2108;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mglabel_instance_test end ntest";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NTEST__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[31] =
+ 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);
+ }
+ ;
+ /*_.IF___V35*/ meltfptr[30] =
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2108:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[31] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V35*/ meltfptr[30] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2108:/ quasiblock");
+
+
+ /*_.PROGN___V37*/ meltfptr[32] = /*_.IF___V35*/ meltfptr[30];;
+ /*^compute */
+
+ /*_.IFCPP___V34*/ meltfptr[29] = /*_.PROGN___V37*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2108:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[11] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V35*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V37*/ meltfptr[32] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V34*/ meltfptr[29] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V34*/ meltfptr[29];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:2052:/ clear");
+ /*clear *//*_.NLOC__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.NMATCHED__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NODOUT__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.EDGOUT__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V21*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V23*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.MG_OUT_NODE_NAME__V25*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_#OBJ_HASH__L9*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.NTINST_CLASS__V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.NOCC_SYMB__V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V28*/ meltfptr[27] = 0;
+ /*^clear */
+ /*clear *//*_#IS_MIXLOC__L10*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V34*/ meltfptr[29] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MGLABEL_INSTANCE_TEST", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
+ union meltparam_un *
+ meltxargtab_,
const melt_argdescr_cell_t
meltxresdescr_[],
- union meltparam_un
- *meltxrestab_)
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -2190,7 +3497,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST_st
+ struct frame_meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2229,7 +3536,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ getarg");
/*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2250,7 +3557,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2273,7 +3580,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2283,7 +3590,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2293,7 +3600,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2103;
+ argtab[2].meltbp_long = 2114;
/*^apply.arg */
argtab[3].meltbp_cstring = "mglabel_success_test start ntest";
/*^apply.arg */
@@ -2312,7 +3619,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -2325,7 +3632,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -2334,7 +3641,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2103:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2114:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -2349,7 +3656,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2104:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2115:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2358,7 +3665,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2104:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2115:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2366,7 +3673,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2104:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2115:/ cond.else");
/*^block */
/*anyblock */
@@ -2380,7 +3687,7 @@ lab_endgetargs:;
melt_assert_failed (("check ntest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2104) ? (2104) : __LINE__, __FUNCTION__);
+ (2115) ? (2115) : __LINE__, __FUNCTION__);
;
}
;
@@ -2395,7 +3702,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2104:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2115:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -2408,7 +3715,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2105:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2116:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2417,7 +3724,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2105:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2116:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2425,7 +3732,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2105:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2116:/ cond.else");
/*^block */
/*anyblock */
@@ -2439,7 +3746,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2105) ? (2105) : __LINE__, __FUNCTION__);
+ (2116) ? (2116) : __LINE__, __FUNCTION__);
;
}
;
@@ -2454,7 +3761,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2105:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2116:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -2465,7 +3772,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2106:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2117:/ quasiblock");
/*^getslot */
@@ -2476,7 +3783,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2107:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2118:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), 1, "NTEST_MATCHED");
@@ -2484,7 +3791,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2108:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2119:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -2492,7 +3799,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2109:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2120:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -2502,7 +3809,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2525,7 +3832,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2535,7 +3842,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -2545,7 +3852,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2111;
+ argtab[2].meltbp_long = 2122;
/*^apply.arg */
argtab[3].meltbp_cstring = "mglabel_success_test nloc=";
/*^apply.arg */
@@ -2571,7 +3878,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -2584,7 +3891,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
@@ -2593,7 +3900,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2111:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2122:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[17] = 0;
@@ -2608,14 +3915,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2112:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2123:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L7*/ meltfnum[0] =
(melt_is_out ((melt_ptr_t) /*_.NODOUT__V15*/ meltfptr[14]));;
- MELT_LOCATION ("warmelt-normatch.melt:2112:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2123:/ cond");
/*cond */ if ( /*_#IS_OUT__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2623,7 +3930,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2112:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2123:/ cond.else");
/*^block */
/*anyblock */
@@ -2637,7 +3944,7 @@ lab_endgetargs:;
melt_assert_failed (("check nodout"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2112) ? (2112) : __LINE__, __FUNCTION__);
+ (2123) ? (2123) : __LINE__, __FUNCTION__);
;
}
;
@@ -2652,7 +3959,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V22*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2112:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2123:/ clear");
/*clear *//*_#IS_OUT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0;
@@ -2665,14 +3972,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2113:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2124:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#IS_OUT__L8*/ meltfnum[1] =
(melt_is_out ((melt_ptr_t) /*_.EDGOUT__V16*/ meltfptr[15]));;
- MELT_LOCATION ("warmelt-normatch.melt:2113:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2124:/ cond");
/*cond */ if ( /*_#IS_OUT__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2680,7 +3987,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2113:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2124:/ cond.else");
/*^block */
/*anyblock */
@@ -2694,7 +4001,7 @@ lab_endgetargs:;
melt_assert_failed (("check edgout"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2113) ? (2113) : __LINE__, __FUNCTION__);
+ (2124) ? (2124) : __LINE__, __FUNCTION__);
;
}
;
@@ -2709,7 +4016,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[18] = /*_.IFELSE___V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2124:/ clear");
/*clear *//*_#IS_OUT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
@@ -2722,19 +4029,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2115:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2126:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<tr><td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2116:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2127:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<font color=\"sienna\" face=\"Times-Roman Bold\" point-size=\"10\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2118:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2129:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -2751,14 +4058,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2119:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2130:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2120:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2131:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<td><font face=\"Courier\" point-size=\"8\">#"));
}
@@ -2767,28 +4074,28 @@ lab_endgetargs:;
(melt_obj_hash ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:2121:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2132:/ locexp");
meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
( /*_#OBJ_HASH__L9*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2122:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2133:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2123:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2134:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2124:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2135:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
(2), 0);;
}
@@ -2796,7 +4103,7 @@ lab_endgetargs:;
/*_#IS_MIXLOC__L10*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
MELTOBMAG_MIXLOC);;
- MELT_LOCATION ("warmelt-normatch.melt:2127:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2138:/ cond");
/*cond */ if ( /*_#IS_MIXLOC__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2806,21 +4113,21 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2128:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2139:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<tr><td rowspan=\"2\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2129:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2140:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("<font face=\"Courier Italic\" point-size=\"8\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2130:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2141:/ locexp");
/*add2outmixloc */
if (melt_magic_discr
((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[12])) ==
@@ -2842,20 +4149,20 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2131:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2142:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2132:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2143:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V15*/ meltfptr[14]), (2),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2127:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2138:/ quasiblock");
/*epilog */
@@ -2870,7 +4177,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2893,7 +4200,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -2903,7 +4210,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2914,7 +4221,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2135;
+ argtab[2].meltbp_long = 2146;
/*^apply.arg */
argtab[3].meltbp_cstring = "mglabel_success_test end ntest";
/*^apply.arg */
@@ -2934,7 +4241,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -2947,7 +4254,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -2956,7 +4263,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2135:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2146:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -2973,7 +4280,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[10] = /*_.IFCPP___V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:2106:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2117:/ clear");
/*clear *//*_.NLOC__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NMATCHED__V14*/ meltfptr[13] = 0;
@@ -2997,11 +4304,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.IFCPP___V27*/ meltfptr[26] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -3026,14 +4333,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST */
+} /*end meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -3054,7 +4361,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS_st
+ struct frame_meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3093,7 +4400,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ getarg");
/*_.TESTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -3114,7 +4421,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3137,7 +4444,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3147,7 +4454,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -3157,7 +4464,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2143;
+ argtab[2].meltbp_long = 2154;
/*^apply.arg */
argtab[3].meltbp_cstring = "matchgraphic_tests start testup=";
/*^apply.arg */
@@ -3182,7 +4489,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -3195,7 +4502,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -3204,7 +4511,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2143:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2154:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -3219,7 +4526,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2144:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2155:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3227,7 +4534,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L3*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.TESTUP__V2*/ meltfptr[1])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:2144:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2155:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3235,7 +4542,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2144:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2155:/ cond.else");
/*^block */
/*anyblock */
@@ -3249,7 +4556,7 @@ lab_endgetargs:;
melt_assert_failed (("check testup"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2144) ? (2144) : __LINE__, __FUNCTION__);
+ (2155) ? (2155) : __LINE__, __FUNCTION__);
;
}
;
@@ -3264,7 +4571,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2144:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2155:/ clear");
/*clear *//*_#IS_MULTIPLE__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -3277,7 +4584,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2145:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2156:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3286,7 +4593,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2145:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2156:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3294,7 +4601,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2145:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2156:/ cond.else");
/*^block */
/*anyblock */
@@ -3308,7 +4615,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2145) ? (2145) : __LINE__, __FUNCTION__);
+ (2156) ? (2156) : __LINE__, __FUNCTION__);
;
}
;
@@ -3323,7 +4630,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2145:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2156:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -3334,7 +4641,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2146:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2157:/ quasiblock");
/*^getslot */
@@ -3345,7 +4652,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2147:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2158:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -3355,14 +4662,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2149:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2160:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2150:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2161:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.EDGOUT__V13*/ meltfptr[12]),
(0), 0);;
}
@@ -3385,7 +4692,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2154:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2165:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3395,7 +4702,7 @@ lab_endgetargs:;
( /*_.CURTEST__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2154:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2165:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3403,7 +4710,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2154:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2165:/ cond.else");
/*^block */
/*anyblock */
@@ -3417,7 +4724,7 @@ lab_endgetargs:;
melt_assert_failed (("check curtest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2154) ? (2154) : __LINE__,
+ __FILE__, (2165) ? (2165) : __LINE__,
__FUNCTION__);
;
}
@@ -3433,7 +4740,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2154:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2165:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -3446,7 +4753,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3469,7 +4776,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3479,7 +4786,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3490,7 +4797,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2155;
+ argtab[2].meltbp_long = 2166;
/*^apply.arg */
argtab[3].meltbp_cstring = "matchgraphic_tests curtest";
/*^apply.arg */
@@ -3511,7 +4818,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -3524,7 +4831,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
@@ -3533,7 +4840,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2166:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[17] = 0;
@@ -3546,7 +4853,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2157:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2168:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3564,27 +4871,27 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2158:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2169:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
(" [ label=<"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2159:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2170:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
("<table border=\"1\" cellborder=\"1\" cellspacing=\"1\" cellpadding=\"1\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2160:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2171:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V12*/ meltfptr[10]), (1),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2161:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:2172:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -3601,7 +4908,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2162:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2173:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V12*/ meltfptr[10]), (1),
0);;
@@ -3609,21 +4916,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2163:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2174:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
("</table>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2164:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2175:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
(">, margin=0"));
}
;
/*_#I__L9*/ meltfnum[7] =
(( /*_#TIX__L5*/ meltfnum[1]) == (0));;
- MELT_LOCATION ("warmelt-normatch.melt:2165:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2176:/ cond");
/*cond */ if ( /*_#I__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -3633,7 +4940,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2166:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2177:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.NODOUT__V12*/ meltfptr[10]),
(", style=\"bold\""));
@@ -3646,20 +4953,20 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2167:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2178:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODOUT__V12*/ meltfptr[10]),
(" ];"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2168:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2179:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.NODOUT__V12*/ meltfptr[10]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2170:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2181:/ quasiblock");
/*^getslot */
@@ -3670,7 +4977,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2171:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2182:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURTEST__V14*/ meltfptr[13]), 3, "NTEST_ELSE");
@@ -3683,7 +4990,7 @@ lab_endgetargs:;
( /*_.NTHEN__V23*/ meltfptr[22]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2173:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2184:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3691,7 +4998,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2175:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2186:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3711,13 +5018,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2176:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2187:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(" -> /*then*/ "));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2177:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2188:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3737,7 +5044,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2178:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2189:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(" [ arrowhead=normal, color=green ];"));
@@ -3745,18 +5052,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2179:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2190:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2174:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2185:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2173:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2184:/ clear");
/*clear *//*_.MG_OUT_NODE_NAME__V25*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.MG_OUT_NODE_NAME__V26*/ meltfptr[25] = 0;
@@ -3769,7 +5076,7 @@ lab_endgetargs:;
( /*_.NELSE__V24*/ meltfptr[23]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2181:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2192:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -3777,7 +5084,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2183:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2194:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3797,13 +5104,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2184:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2195:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(" -> /*else*/ "));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2185:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2196:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3823,7 +5130,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2186:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2197:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(" [ arrowhead=diamond, color=red ];"));
@@ -3831,18 +5138,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2187:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2198:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGOUT__V13*/ meltfptr[12]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2182:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2193:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2181:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2192:/ clear");
/*clear *//*_.MG_OUT_NODE_NAME__V27*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.MG_OUT_NODE_NAME__V28*/ meltfptr[25] = 0;
@@ -3851,7 +5158,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:2170:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2181:/ clear");
/*clear *//*_.NTHEN__V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.NELSE__V24*/ meltfptr[23] = 0;
@@ -3865,7 +5172,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2151:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2162:/ clear");
/*clear *//*_.CURTEST__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_#TIX__L5*/ meltfnum[1] = 0;
@@ -3882,13 +5189,13 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:2146:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2157:/ clear");
/*clear *//*_.NODOUT__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.EDGOUT__V13*/ meltfptr[12] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -3906,14 +5213,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS */
+} /*end meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -3938,7 +5245,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE_st
+ struct frame_meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3977,7 +5284,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ getarg");
/*_.NMATCH__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4007,7 +5314,7 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:2196:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2207:/ quasiblock");
/*_#HCODNMATCH__L1*/ meltfnum[0] =
@@ -4028,7 +5335,7 @@ lab_endgetargs:;
(char *) 0);;
{
- MELT_LOCATION ("warmelt-normatch.melt:2205:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2216:/ locexp");
/* mg_draw_match_graphviz_file UNIQCNT__1 */
static long uniqcounter;
uniqcounter++;
@@ -4038,7 +5345,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2210:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2221:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4046,7 +5353,7 @@ lab_endgetargs:;
/*_#IS_STRBUF__L4*/ meltfnum[3] =
(melt_magic_discr ((melt_ptr_t) ( /*_.PATHSBUF__V5*/ meltfptr[4])) ==
MELTOBMAG_STRBUF);;
- MELT_LOCATION ("warmelt-normatch.melt:2210:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2221:/ cond");
/*cond */ if ( /*_#IS_STRBUF__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4054,7 +5361,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2210:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2221:/ cond.else");
/*^block */
/*anyblock */
@@ -4068,7 +5375,7 @@ lab_endgetargs:;
melt_assert_failed (("check pathsbuf"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2210) ? (2210) : __LINE__, __FUNCTION__);
+ (2221) ? (2221) : __LINE__, __FUNCTION__);
;
}
;
@@ -4083,7 +5390,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2210:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2221:/ clear");
/*clear *//*_#IS_STRBUF__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4096,7 +5403,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2211:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2222:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V5*/ meltfptr[4]),
melt_string_str ((melt_ptr_t)
( /*_.DOTPREFIX__V3*/
@@ -4105,21 +5412,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2212:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2223:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.PATHSBUF__V5*/ meltfptr[4]),
( /*_#CNT__L2*/ meltfnum[1]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2213:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2224:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V5*/ meltfptr[4]),
(".dot"));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4142,7 +5449,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4152,7 +5459,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4162,7 +5469,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2214;
+ argtab[2].meltbp_long = 2225;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mg_draw_match_graphviz_file pathsbuf";
@@ -4183,7 +5490,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -4196,7 +5503,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -4205,7 +5512,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2214:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2225:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -4224,7 +5531,7 @@ lab_endgetargs:;
(meltgc_new_stringdup
((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[2])),
melt_strbuf_str ((melt_ptr_t) ( /*_.PATHSBUF__V5*/ meltfptr[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:2202:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2213:/ quasiblock");
/*_.DOTFILENAME__V13*/ meltfptr[9] =
@@ -4241,7 +5548,7 @@ lab_endgetargs:;
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[0])),
(char *) 0);;
- MELT_LOCATION ("warmelt-normatch.melt:2218:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2229:/ quasiblock");
/*^rawallocobj */
@@ -4287,7 +5594,7 @@ lab_endgetargs:;
/*_.MG__V16*/ meltfptr[15] = /*_.INST__V17*/ meltfptr[16];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4310,7 +5617,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -4320,7 +5627,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4330,7 +5637,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2224;
+ argtab[2].meltbp_long = 2235;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mg_draw_match_graphviz_file initial mg";
@@ -4351,7 +5658,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
@@ -4364,7 +5671,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ quasiblock");
/*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
@@ -4373,7 +5680,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2224:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2235:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IF___V19*/ meltfptr[18] = 0;
@@ -4386,7 +5693,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2225:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2236:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4403,7 +5710,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4426,7 +5733,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -4436,7 +5743,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4447,7 +5754,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2226;
+ argtab[2].meltbp_long = 2237;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mg_draw_match_graphviz_file final mg";
@@ -4468,7 +5775,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -4481,7 +5788,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -4490,7 +5797,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2226:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2237:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -4505,7 +5812,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2227:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2238:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4513,7 +5820,7 @@ lab_endgetargs:;
/*_#IS_STRING__L11*/ meltfnum[5] =
(melt_magic_discr ((melt_ptr_t) ( /*_.DOTFILENAME__V13*/ meltfptr[9]))
== MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:2227:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2238:/ cond");
/*cond */ if ( /*_#IS_STRING__L11*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -4521,7 +5828,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2227:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2238:/ cond.else");
/*^block */
/*anyblock */
@@ -4535,7 +5842,7 @@ lab_endgetargs:;
melt_assert_failed (("check dotfilename"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2227) ? (2227) : __LINE__, __FUNCTION__);
+ (2238) ? (2238) : __LINE__, __FUNCTION__);
;
}
;
@@ -4550,7 +5857,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[23] = /*_.IFELSE___V28*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2227:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2238:/ clear");
/*clear *//*_#IS_STRING__L11*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IFELSE___V28*/ meltfptr[24] = 0;
@@ -4563,7 +5870,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2230:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2241:/ locexp");
/* mg_draw_match_graphviz_file OUTPUTMG__1 */
time_t nowt = 0;
char nowbuf[60];
@@ -4601,7 +5908,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2196:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2207:/ clear");
/*clear *//*_#HCODNMATCH__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_#CNT__L2*/ meltfnum[1] = 0;
@@ -4644,14 +5951,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE */
+} /*end meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4670,7 +5977,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_50_warmelt_normatch_NORMEXP_MATCH_st
+ struct frame_meltrout_51_warmelt_normatch_NORMEXP_MATCH_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4709,7 +6016,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4749,7 +6056,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2264:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2275:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4758,7 +6065,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_MATCH */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:2264:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2275:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4766,7 +6073,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2264:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2275:/ cond.else");
/*^block */
/*anyblock */
@@ -4780,7 +6087,7 @@ lab_endgetargs:;
melt_assert_failed (("check match recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2264) ? (2264) : __LINE__, __FUNCTION__);
+ (2275) ? (2275) : __LINE__, __FUNCTION__);
;
}
;
@@ -4795,7 +6102,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2264:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2275:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -4808,7 +6115,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2265:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2276:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4817,7 +6124,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2265:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2276:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4825,7 +6132,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2265:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2276:/ cond.else");
/*^block */
/*anyblock */
@@ -4839,7 +6146,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2265) ? (2265) : __LINE__, __FUNCTION__);
+ (2276) ? (2276) : __LINE__, __FUNCTION__);
;
}
;
@@ -4854,7 +6161,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.IFELSE___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2265:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2276:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
@@ -4867,7 +6174,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2266:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2277:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4876,7 +6183,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2266:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2277:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4884,7 +6191,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2266:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2277:/ cond.else");
/*^block */
/*anyblock */
@@ -4898,7 +6205,7 @@ lab_endgetargs:;
melt_assert_failed (("check nctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2266) ? (2266) : __LINE__, __FUNCTION__);
+ (2277) ? (2277) : __LINE__, __FUNCTION__);
;
}
;
@@ -4913,7 +6220,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[8] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2266:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2277:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -4926,7 +6233,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4949,7 +6256,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4959,7 +6266,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4969,7 +6276,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2267;
+ argtab[2].meltbp_long = 2278;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match recv";
/*^apply.arg */
@@ -4989,7 +6296,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
@@ -5002,7 +6309,7 @@ lab_endgetargs:;
/*_.IF___V13*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
@@ -5011,7 +6318,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[10] = /*_.PROGN___V15*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2267:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2278:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V13*/ meltfptr[12] = 0;
@@ -5024,7 +6331,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2268:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2279:/ quasiblock");
/*^getslot */
@@ -5035,7 +6342,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2269:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2280:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "SMAT_MATCHEDX");
@@ -5043,7 +6350,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2270:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2281:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SMAT_CASES");
@@ -5098,7 +6405,7 @@ lab_endgetargs:;
/*_.OLDTESTER__V26*/ meltfptr[25] = ( /*nil */ NULL);;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5121,7 +6428,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5131,7 +6438,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5142,7 +6449,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2282;
+ argtab[2].meltbp_long = 2293;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match smatsx";
/*^apply.arg */
@@ -5162,7 +6469,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -5175,7 +6482,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -5184,7 +6491,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2282:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2293:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -5197,7 +6504,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2283:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2294:/ quasiblock");
/*^multimsend */
@@ -5226,7 +6533,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5249,7 +6556,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -5259,7 +6566,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5270,7 +6577,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2286;
+ argtab[2].meltbp_long = 2297;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match nmatx=";
/*^apply.arg */
@@ -5296,7 +6603,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -5309,7 +6616,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];;
@@ -5318,7 +6625,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2297:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[34] = 0;
@@ -5331,7 +6638,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2287:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2298:/ quasiblock");
/*^msend */
@@ -5350,7 +6657,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5373,7 +6680,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5383,7 +6690,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5394,7 +6701,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2289;
+ argtab[2].meltbp_long = 2300;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match ctyp";
/*^apply.arg */
@@ -5414,7 +6721,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0;
@@ -5427,7 +6734,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];;
@@ -5436,7 +6743,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2289:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2300:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -5458,7 +6765,7 @@ lab_endgetargs:;
/*_#NOT__L16*/ meltfnum[8] =
(!( /*_#IS_OBJECT__L15*/ meltfnum[9]));;
- MELT_LOCATION ("warmelt-normatch.melt:2292:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2303:/ cond");
/*cond */ if ( /*_#NOT__L16*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5466,10 +6773,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2293:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2304:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2294:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2305:/ apply");
/*apply */
{
/*_.CSYM__V46*/ meltfptr[45] =
@@ -5481,7 +6788,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2295:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2306:/ quasiblock");
/*^rawallocobj */
@@ -5534,7 +6841,7 @@ lab_endgetargs:;
"LETBIND_EXPR");
;
/*_.CBIND__V47*/ meltfptr[46] = /*_.INST__V48*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-normatch.melt:2300:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2311:/ quasiblock");
/*^rawallocobj */
@@ -5589,14 +6896,14 @@ lab_endgetargs:;
/*_.CLOCC__V49*/ meltfptr[48] = /*_.INST__V50*/ meltfptr[49];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2306:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2317:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L17*/ meltfnum[16] =
(( /*_.NBINDMATX__V33*/ meltfptr[32]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2306:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2317:/ cond");
/*cond */ if ( /*_#NULL__L17*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -5604,7 +6911,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2306:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2317:/ cond.else");
/*^block */
/*anyblock */
@@ -5618,7 +6925,7 @@ lab_endgetargs:;
melt_assert_failed (("check no binding"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2306) ? (2306) : __LINE__,
+ __FILE__, (2317) ? (2317) : __LINE__,
__FUNCTION__);
;
}
@@ -5634,7 +6941,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[50] = /*_.IFELSE___V52*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2306:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2317:/ clear");
/*clear *//*_#NULL__L17*/ meltfnum[16] = 0;
/*^clear */
/*clear *//*_.IFELSE___V52*/ meltfptr[51] = 0;
@@ -5645,8 +6952,13 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[50] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2308:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2319:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5666,7 +6978,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2308:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2319:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V53*/
meltfptr[51]),
@@ -5676,7 +6988,7 @@ lab_endgetargs:;
meltfptr[48]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2309:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-normatch.melt:2320:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -5734,7 +7046,7 @@ lab_endgetargs:;
/*_.LIST___V54*/ meltfptr[53] = /*_.LIST___V56*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2309:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2320:/ clear");
/*clear *//*_.CBIND__V55*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.LIST___V56*/ meltfptr[55] = 0;
@@ -5747,12 +7059,12 @@ lab_endgetargs:;
/*^compute */
/*_.NBINDMATX__V33*/ meltfptr[32] = /*_.SETQ___V57*/ meltfptr[54] =
/*_.LIST___V54*/ meltfptr[53];;
- MELT_LOCATION ("warmelt-normatch.melt:2310:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2321:/ compute");
/*_.NMATX__V32*/ meltfptr[28] = /*_.SETQ___V58*/ meltfptr[55] =
/*_.CLOCC__V49*/ meltfptr[48];;
/*_.LET___V45*/ meltfptr[41] = /*_.SETQ___V58*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-normatch.melt:2293:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2304:/ clear");
/*clear *//*_.CSYM__V46*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_.CBIND__V47*/ meltfptr[46] = 0;
@@ -5771,7 +7083,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[40] = /*_.LET___V45*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2292:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2303:/ clear");
/*clear *//*_.LET___V45*/ meltfptr[41] = 0;
}
;
@@ -5786,7 +7098,7 @@ lab_endgetargs:;
/*_#NULL__L18*/ meltfnum[16] =
(( /*_.NBINDMATX__V33*/ meltfptr[32]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2313:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2324:/ cond");
/*cond */ if ( /*_#NULL__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
@@ -5798,13 +7110,13 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[6]))));;
- MELT_LOCATION ("warmelt-normatch.melt:2313:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2324:/ compute");
/*_.NBINDMATX__V33*/ meltfptr[32] = /*_.SETQ___V61*/ meltfptr[48] =
/*_.MAKE_LIST__V60*/ meltfptr[46];;
/*_.IF___V59*/ meltfptr[45] = /*_.SETQ___V61*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2324:/ clear");
/*clear *//*_.MAKE_LIST__V60*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.SETQ___V61*/ meltfptr[48] = 0;
@@ -5835,7 +7147,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5858,7 +7170,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -5868,7 +7180,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5879,7 +7191,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2319;
+ argtab[2].meltbp_long = 2330;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match curcas";
/*^apply.arg */
@@ -5900,7 +7212,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V65*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[54] = 0;
@@ -5913,7 +7225,7 @@ lab_endgetargs:;
/*_.IF___V64*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[55] = /*_.IF___V64*/ meltfptr[53];;
@@ -5922,7 +7234,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[51] = /*_.PROGN___V66*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2330:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[53] = 0;
@@ -5937,7 +7249,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2320:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2331:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5946,7 +7258,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURCAS__V62*/ meltfptr[50]),
(melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */ meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:2320:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2331:/ cond");
/*cond */ if ( /*_#IS_A__L22*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -5954,7 +7266,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2320:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2331:/ cond.else");
/*^block */
/*anyblock */
@@ -5968,7 +7280,7 @@ lab_endgetargs:;
melt_assert_failed (("check curcas"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2320) ? (2320) : __LINE__,
+ __FILE__, (2331) ? (2331) : __LINE__,
__FUNCTION__);
;
}
@@ -5984,7 +7296,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[41] = /*_.IFELSE___V68*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2320:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2331:/ clear");
/*clear *//*_#IS_A__L22*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IFELSE___V68*/ meltfptr[46] = 0;
@@ -5995,10 +7307,10 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[41] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2321:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2332:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2322:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2333:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCAS__V62*/ meltfptr[50]), 1, "LOCA_LOCATION");
@@ -6006,7 +7318,7 @@ lab_endgetargs:;
meltfptr[54] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2323:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2334:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCAS__V62*/ meltfptr[50]), 2, "SCAM_PATT");
@@ -6014,7 +7326,7 @@ lab_endgetargs:;
meltfptr[53] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2324:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2335:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCAS__V62*/ meltfptr[50]), 3, "SCAM_BODY");
@@ -6050,7 +7362,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[6]))));;
- MELT_LOCATION ("warmelt-normatch.melt:2330:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2341:/ quasiblock");
/*^rawallocobj */
@@ -6172,7 +7484,7 @@ lab_endgetargs:;
"PCTN_VARHANDLERS");
;
/*_.PCN__V78*/ meltfptr[77] = /*_.INST__V79*/ meltfptr[78];;
- MELT_LOCATION ("warmelt-normatch.melt:2343:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2354:/ quasiblock");
/*^rawallocobj */
@@ -6190,7 +7502,7 @@ lab_endgetargs:;
/*_.NTESTCONT__V80*/ meltfptr[79] = /*_.INST__V81*/ meltfptr[80];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6213,7 +7525,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -6223,7 +7535,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6234,7 +7546,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2345;
+ argtab[2].meltbp_long = 2356;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match curpat before scan_pattern";
@@ -6256,7 +7568,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V84*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V84*/ meltfptr[83] = 0;
@@ -6269,7 +7581,7 @@ lab_endgetargs:;
/*_.IF___V83*/ meltfptr[82] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ quasiblock");
/*_.PROGN___V85*/ meltfptr[83] = /*_.IF___V83*/ meltfptr[82];;
@@ -6278,7 +7590,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[81] = /*_.PROGN___V85*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2356:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V83*/ meltfptr[82] = 0;
@@ -6293,7 +7605,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2348:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2359:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6306,7 +7618,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2348:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2359:/ cond.else");
/*^block */
/*anyblock */
@@ -6320,7 +7632,7 @@ lab_endgetargs:;
melt_assert_failed (("normexp_match check curpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2348) ? (2348) : __LINE__,
+ __FILE__, (2359) ? (2359) : __LINE__,
__FUNCTION__);
;
}
@@ -6336,7 +7648,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[82] = /*_.IFELSE___V87*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2348:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2359:/ clear");
/*clear *//*_.IFELSE___V87*/ meltfptr[83] = 0;
}
@@ -6345,7 +7657,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[82] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2349:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:2360:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -6369,7 +7681,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6392,7 +7704,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -6402,7 +7714,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -6413,7 +7725,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2350;
+ argtab[2].meltbp_long = 2361;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match after scan_pattern curpat=";
@@ -6453,7 +7765,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V91*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[90] = 0;
@@ -6466,7 +7778,7 @@ lab_endgetargs:;
/*_.IF___V90*/ meltfptr[89] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ quasiblock");
/*_.PROGN___V92*/ meltfptr[90] = /*_.IF___V90*/ meltfptr[89];;
@@ -6475,7 +7787,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[88] = /*_.PROGN___V92*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2350:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2361:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V90*/ meltfptr[89] = 0;
@@ -6490,7 +7802,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2353:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2364:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.TUPVARMAP__V20*/ meltfptr[19]),
( /*_#IX__L19*/ meltfnum[18]),
@@ -6500,7 +7812,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2354:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2365:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.TUPCSTMAP__V21*/ meltfptr[20]),
( /*_#IX__L19*/ meltfnum[18]),
@@ -6510,7 +7822,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6533,7 +7845,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -6543,7 +7855,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -6554,7 +7866,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2355;
+ argtab[2].meltbp_long = 2366;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match before normal_pattern shabindlist=";
@@ -6582,7 +7894,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V95*/ meltfptr[94];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V95*/ meltfptr[94] = 0;
@@ -6595,7 +7907,7 @@ lab_endgetargs:;
/*_.IF___V94*/ meltfptr[90] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ quasiblock");
/*_.PROGN___V96*/ meltfptr[94] = /*_.IF___V94*/ meltfptr[90];;
@@ -6604,7 +7916,7 @@ lab_endgetargs:;
/*_.IFCPP___V93*/ meltfptr[89] = /*_.PROGN___V96*/ meltfptr[94];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2355:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2366:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V94*/ meltfptr[90] = 0;
@@ -6617,7 +7929,7 @@ lab_endgetargs:;
/*_.IFCPP___V93*/ meltfptr[89] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ quasiblock");
/*^newclosure */
@@ -6644,7 +7956,7 @@ lab_endgetargs:;
(melt_ptr_t) ( /*_.NTESTCONT__V80*/ meltfptr[79]);
;
/*_.LAMBDA___V97*/ meltfptr[90] = /*_.LAMBDA___V98*/ meltfptr[94];;
- MELT_LOCATION ("warmelt-normatch.melt:2358:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:2369:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -6668,7 +7980,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6691,7 +8003,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -6701,7 +8013,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -6712,7 +8024,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2367;
+ argtab[2].meltbp_long = 2378;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match after normal_pattern curpat=";
@@ -6752,7 +8064,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
@@ -6765,7 +8077,7 @@ lab_endgetargs:;
/*_.IF___V101*/ meltfptr[100] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ quasiblock");
/*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[100];;
@@ -6775,7 +8087,7 @@ lab_endgetargs:;
/*_.PROGN___V103*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2367:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2378:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V101*/ meltfptr[100] = 0;
@@ -6788,11 +8100,16 @@ lab_endgetargs:;
/*_.IFCPP___V100*/ meltfptr[99] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2372:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2383:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCN__V78*/ meltfptr[77]), (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCN__V78*/ meltfptr[77]),
+ (melt_ptr_t) (( /*!CLASS_PATTERN_CONTEXT */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6810,8 +8127,14 @@ lab_endgetargs:;
/*_.NEWENV__V105*/ meltfptr[101] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2373:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NTESTCONT__V80*/ meltfptr[79]), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[15])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2384:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NTESTCONT__V80*/
+ meltfptr[79]),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6835,7 +8158,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[6]))));;
- MELT_LOCATION ("warmelt-normatch.melt:2379:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2390:/ quasiblock");
/*^rawallocobj */
@@ -6908,7 +8231,7 @@ lab_endgetargs:;
/*_.INST__V109*/ meltfptr[108];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6931,7 +8254,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -6941,7 +8264,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ apply");
/*apply */
{
union meltparam_un argtab[15];
@@ -6952,7 +8275,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2391;
+ argtab[2].meltbp_long = 2402;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match after normal_pattern newenv=";
@@ -7004,7 +8327,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V112*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V112*/ meltfptr[111] = 0;
@@ -7017,7 +8340,7 @@ lab_endgetargs:;
/*_.IF___V111*/ meltfptr[110] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ quasiblock");
/*_.PROGN___V113*/ meltfptr[111] = /*_.IF___V111*/ meltfptr[110];;
@@ -7027,7 +8350,7 @@ lab_endgetargs:;
/*_.PROGN___V113*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2391:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2402:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V111*/ meltfptr[110] = 0;
@@ -7042,7 +8365,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2399:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2410:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.TESTLIST__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.NEWSUCTESTER__V108*/
@@ -7051,7 +8374,7 @@ lab_endgetargs:;
;
/*_#NULL__L33*/ meltfnum[20] =
(( /*_.CURTESTER__V106*/ meltfptr[105]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2401:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2412:/ cond");
/*cond */ if ( /*_#NULL__L33*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -7061,7 +8384,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7084,7 +8407,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -7094,7 +8417,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L35*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7105,7 +8428,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2402;
+ argtab[2].meltbp_long = 2413;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match curcas for null curtester";
@@ -7127,7 +8450,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V117*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[34] =
0;
/*^clear */
@@ -7142,7 +8465,7 @@ lab_endgetargs:;
/*_.IF___V116*/ meltfptr[115] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ quasiblock");
/*_.PROGN___V118*/ meltfptr[116] =
@@ -7153,7 +8476,7 @@ lab_endgetargs:;
/*_.PROGN___V118*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2402:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2413:/ clear");
/*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V116*/ meltfptr[115] = 0;
@@ -7180,7 +8503,7 @@ lab_endgetargs:;
/*_#I__L38*/ meltfnum[37] =
(( /*_#IX__L19*/ meltfnum[18]) <
( /*_#I__L37*/ meltfnum[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:2405:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2416:/ cond");
/*cond */ if ( /*_#I__L38*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -7190,7 +8513,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2406:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2417:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V17*/ meltfptr[13]),
("joker case in MATCH is not last"),
@@ -7202,13 +8525,13 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:2408:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2419:/ compute");
/*_.CURTESTER__V106*/ meltfptr[105] =
/*_.SETQ___V119*/ meltfptr[115] =
/*_.NEWSUCTESTER__V108*/ meltfptr[107];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7231,7 +8554,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -7241,7 +8564,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7252,7 +8575,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2409;
+ argtab[2].meltbp_long = 2420;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match curestester set to success";
@@ -7275,7 +8598,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V122*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39] =
0;
/*^clear */
@@ -7290,7 +8613,7 @@ lab_endgetargs:;
/*_.IF___V121*/ meltfptr[120] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ quasiblock");
/*_.PROGN___V123*/ meltfptr[121] =
@@ -7301,7 +8624,7 @@ lab_endgetargs:;
/*_.PROGN___V123*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2409:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2420:/ clear");
/*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V121*/ meltfptr[120] = 0;
@@ -7314,7 +8637,7 @@ lab_endgetargs:;
/*_.IFCPP___V120*/ meltfptr[116] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2401:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2412:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[120] =
@@ -7325,7 +8648,7 @@ lab_endgetargs:;
/*_.PROGN___V124*/ meltfptr[120];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2401:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2412:/ clear");
/*clear *//*_.IFCPP___V115*/ meltfptr[111] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L36*/ meltfnum[34] = 0;
@@ -7351,7 +8674,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2413:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2424:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7361,7 +8684,7 @@ lab_endgetargs:;
( /*_.CURTESTER__V106*/
meltfptr[105]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[21])));;
- MELT_LOCATION ("warmelt-normatch.melt:2413:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2424:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L41*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -7370,7 +8693,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:2413:/ cond.else");
+ ("warmelt-normatch.melt:2424:/ cond.else");
/*^block */
/*anyblock */
@@ -7385,7 +8708,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (2413) ? (2413) : __LINE__,
+ (2424) ? (2424) : __LINE__,
__FUNCTION__);
;
}
@@ -7402,7 +8725,7 @@ lab_endgetargs:;
/*_.IFELSE___V126*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2413:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2424:/ clear");
/*clear *//*_#IS_NOT_A__L41*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IFELSE___V126*/ meltfptr[111] = 0;
@@ -7413,7 +8736,7 @@ lab_endgetargs:;
/*_.IFCPP___V125*/ meltfptr[121] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2416:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2427:/ quasiblock");
/*^quasiblock */
@@ -7444,7 +8767,7 @@ lab_endgetargs:;
/*_.INST__V129*/ meltfptr[120];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7467,7 +8790,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -7477,7 +8800,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -7488,7 +8811,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2418;
+ argtab[2].meltbp_long = 2429;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match our curtestcont=";
@@ -7518,7 +8841,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V132*/ meltfptr[131];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[34] =
0;
/*^clear */
@@ -7533,7 +8856,7 @@ lab_endgetargs:;
/*_.IF___V131*/ meltfptr[130] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ quasiblock");
/*_.PROGN___V133*/ meltfptr[131] =
@@ -7544,7 +8867,7 @@ lab_endgetargs:;
/*_.PROGN___V133*/ meltfptr[131];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2418:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2429:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V131*/ meltfptr[130] = 0;
@@ -7557,7 +8880,7 @@ lab_endgetargs:;
/*_.IFCPP___V130*/ meltfptr[111] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2420:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2431:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7577,7 +8900,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7600,7 +8923,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -7610,7 +8933,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7621,7 +8944,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2421;
+ argtab[2].meltbp_long = 2432;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match final curtestcont";
@@ -7644,7 +8967,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V137*/ meltfptr[136];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/ meltfnum[37] =
0;
/*^clear */
@@ -7659,7 +8982,7 @@ lab_endgetargs:;
/*_.IF___V136*/ meltfptr[135] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ quasiblock");
/*_.PROGN___V138*/ meltfptr[136] =
@@ -7670,7 +8993,7 @@ lab_endgetargs:;
/*_.PROGN___V138*/ meltfptr[136];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2421:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2432:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V136*/ meltfptr[135] = 0;
@@ -7688,7 +9011,7 @@ lab_endgetargs:;
/*_.LET___V127*/ meltfptr[115] =
/*_.IFCPP___V135*/ meltfptr[131];;
- MELT_LOCATION ("warmelt-normatch.melt:2416:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2427:/ clear");
/*clear *//*_.CURTESTCONT__V128*/ meltfptr[116] = 0;
/*^clear */
/*clear *//*_.IFCPP___V130*/ meltfptr[111] = 0;
@@ -7697,7 +9020,7 @@ lab_endgetargs:;
0;
/*^clear */
/*clear *//*_.IFCPP___V135*/ meltfptr[131] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2412:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2423:/ quasiblock");
/*_.PROGN___V139*/ meltfptr[135] =
@@ -7708,7 +9031,7 @@ lab_endgetargs:;
/*_.PROGN___V139*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2401:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2412:/ clear");
/*clear *//*_.IFCPP___V125*/ meltfptr[121] = 0;
/*^clear */
/*clear *//*_.LET___V127*/ meltfptr[115] = 0;
@@ -7720,7 +9043,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7743,7 +9066,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -7753,7 +9076,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L47*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7764,7 +9087,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2425;
+ argtab[2].meltbp_long = 2436;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match final curtester";
@@ -7786,7 +9109,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V142*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L47*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V142*/ meltfptr[111] = 0;
@@ -7799,7 +9122,7 @@ lab_endgetargs:;
/*_.IF___V141*/ meltfptr[116] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ quasiblock");
/*_.PROGN___V143*/ meltfptr[130] = /*_.IF___V141*/ meltfptr[116];;
@@ -7809,7 +9132,7 @@ lab_endgetargs:;
/*_.PROGN___V143*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2425:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2436:/ clear");
/*clear *//*_#MELT_NEED_DBG__L46*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V141*/ meltfptr[116] = 0;
@@ -7824,7 +9147,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2426:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2437:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7834,7 +9157,7 @@ lab_endgetargs:;
( /*_.CURTESTER__V106*/ meltfptr[105]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[23])));;
- MELT_LOCATION ("warmelt-normatch.melt:2426:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2437:/ cond");
/*cond */ if ( /*_#IS_A__L48*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -7842,7 +9165,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2426:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2437:/ cond.else");
/*^block */
/*anyblock */
@@ -7856,7 +9179,7 @@ lab_endgetargs:;
melt_assert_failed (("check final curtester"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2426) ? (2426) : __LINE__,
+ __FILE__, (2437) ? (2437) : __LINE__,
__FUNCTION__);
;
}
@@ -7873,7 +9196,7 @@ lab_endgetargs:;
/*_.IFELSE___V145*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2426:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2437:/ clear");
/*clear *//*_#IS_A__L48*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IFELSE___V145*/ meltfptr[121] = 0;
@@ -7890,7 +9213,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.OLDTESTER__V26*/ meltfptr[25]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[24])));;
- MELT_LOCATION ("warmelt-normatch.melt:2428:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2439:/ cond");
/*cond */ if ( /*_#IS_A__L49*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -7900,7 +9223,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7923,7 +9246,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -7933,7 +9256,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L51*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7944,7 +9267,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2430;
+ argtab[2].meltbp_long = 2441;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match initial oldtester";
@@ -7967,7 +9290,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V149*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L51*/ meltfnum[34] =
0;
/*^clear */
@@ -7982,7 +9305,7 @@ lab_endgetargs:;
/*_.IF___V148*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ quasiblock");
/*_.PROGN___V150*/ meltfptr[130] =
@@ -7993,7 +9316,7 @@ lab_endgetargs:;
/*_.PROGN___V150*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2430:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2441:/ clear");
/*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V148*/ meltfptr[111] = 0;
@@ -8006,7 +9329,7 @@ lab_endgetargs:;
/*_.IFCPP___V147*/ meltfptr[135] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2431:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2442:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8026,7 +9349,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8049,7 +9372,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -8059,7 +9382,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L53*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8070,7 +9393,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2432;
+ argtab[2].meltbp_long = 2443;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match final oldtester";
@@ -8093,7 +9416,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V154*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L53*/ meltfnum[38] =
0;
/*^clear */
@@ -8108,7 +9431,7 @@ lab_endgetargs:;
/*_.IF___V153*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ quasiblock");
/*_.PROGN___V155*/ meltfptr[130] =
@@ -8119,7 +9442,7 @@ lab_endgetargs:;
/*_.PROGN___V155*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2432:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2443:/ clear");
/*clear *//*_#MELT_NEED_DBG__L52*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V153*/ meltfptr[111] = 0;
@@ -8132,7 +9455,7 @@ lab_endgetargs:;
/*_.IFCPP___V152*/ meltfptr[116] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2429:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2440:/ quasiblock");
/*_.PROGN___V156*/ meltfptr[111] =
@@ -8143,7 +9466,7 @@ lab_endgetargs:;
/*_.PROGN___V156*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2428:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2439:/ clear");
/*clear *//*_.IFCPP___V147*/ meltfptr[135] = 0;
/*^clear */
/*clear *//*_.SET_NEW_TESTER_ALL_ELSES__V151*/ meltfptr[121] =
@@ -8161,13 +9484,13 @@ lab_endgetargs:;
/*_.IF___V146*/ meltfptr[115] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2435:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2446:/ compute");
/*_.OLDTESTER__V26*/ meltfptr[25] =
/*_.SETQ___V157*/ meltfptr[130] =
/*_.CURTESTER__V106*/ meltfptr[105];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8190,7 +9513,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L54*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -8200,7 +9523,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L55*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -8211,7 +9534,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2436;
+ argtab[2].meltbp_long = 2447;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match after lastesterloop pcn=";
@@ -8239,7 +9562,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V160*/ meltfptr[116];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L55*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V160*/ meltfptr[116] = 0;
@@ -8252,7 +9575,7 @@ lab_endgetargs:;
/*_.IF___V159*/ meltfptr[121] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ quasiblock");
/*_.PROGN___V161*/ meltfptr[111] = /*_.IF___V159*/ meltfptr[121];;
@@ -8262,7 +9585,7 @@ lab_endgetargs:;
/*_.PROGN___V161*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2436:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2447:/ clear");
/*clear *//*_#MELT_NEED_DBG__L54*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.IF___V159*/ meltfptr[121] = 0;
@@ -8275,7 +9598,7 @@ lab_endgetargs:;
/*_.IFCPP___V158*/ meltfptr[135] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2438:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2449:/ quasiblock");
/*^apply */
@@ -8300,7 +9623,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[4])),
( /*_#MULTIPLE_LENGTH__L56*/ meltfnum[38])));;
- MELT_LOCATION ("warmelt-normatch.melt:2440:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2451:/ apply");
/*apply */
{
/*_.FRESHNEWENV__V165*/ meltfptr[164] =
@@ -8313,7 +9636,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8336,7 +9659,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L57*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -8346,7 +9669,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L58*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8357,7 +9680,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2442;
+ argtab[2].meltbp_long = 2453;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match sortedvars";
/*^apply.arg */
@@ -8378,7 +9701,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V168*/ meltfptr[167];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L58*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V168*/ meltfptr[167] = 0;
@@ -8391,7 +9714,7 @@ lab_endgetargs:;
/*_.IF___V167*/ meltfptr[166] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ quasiblock");
/*_.PROGN___V169*/ meltfptr[167] = /*_.IF___V167*/ meltfptr[166];;
@@ -8401,7 +9724,7 @@ lab_endgetargs:;
/*_.PROGN___V169*/ meltfptr[167];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2442:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2453:/ clear");
/*clear *//*_#MELT_NEED_DBG__L57*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V167*/ meltfptr[166] = 0;
@@ -8434,7 +9757,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8457,7 +9780,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L60*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -8467,7 +9790,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L61*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8478,7 +9801,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2447;
+ argtab[2].meltbp_long = 2458;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match svar";
/*^apply.arg */
@@ -8499,7 +9822,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V173*/ meltfptr[172];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L61*/ meltfnum[39] =
0;
/*^clear */
@@ -8514,7 +9837,7 @@ lab_endgetargs:;
/*_.IF___V172*/ meltfptr[171] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ quasiblock");
/*_.PROGN___V174*/ meltfptr[172] =
@@ -8525,7 +9848,7 @@ lab_endgetargs:;
/*_.PROGN___V174*/ meltfptr[172];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2447:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2458:/ clear");
/*clear *//*_#MELT_NEED_DBG__L60*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V172*/ meltfptr[171] = 0;
@@ -8538,7 +9861,7 @@ lab_endgetargs:;
/*_.IFCPP___V171*/ meltfptr[167] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2448:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2459:/ quasiblock");
/*_.SOCC__V176*/ meltfptr[172] =
@@ -8548,7 +9871,7 @@ lab_endgetargs:;
meltfptr[166]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8571,7 +9894,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L62*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -8581,7 +9904,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L63*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8592,7 +9915,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2450;
+ argtab[2].meltbp_long = 2461;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match socc";
/*^apply.arg */
@@ -8613,7 +9936,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V179*/ meltfptr[178];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L63*/ meltfnum[19] =
0;
/*^clear */
@@ -8628,7 +9951,7 @@ lab_endgetargs:;
/*_.IF___V178*/ meltfptr[177] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ quasiblock");
/*_.PROGN___V180*/ meltfptr[178] =
@@ -8639,7 +9962,7 @@ lab_endgetargs:;
/*_.PROGN___V180*/ meltfptr[178];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2450:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2461:/ clear");
/*clear *//*_#MELT_NEED_DBG__L62*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V178*/ meltfptr[177] = 0;
@@ -8654,7 +9977,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2451:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2462:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8663,7 +9986,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.SOCC__V176*/ meltfptr[172]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:2451:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2462:/ cond");
/*cond */ if ( /*_#IS_A__L64*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -8672,7 +9995,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:2451:/ cond.else");
+ ("warmelt-normatch.melt:2462:/ cond.else");
/*^block */
/*anyblock */
@@ -8687,7 +10010,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (2451) ? (2451) : __LINE__,
+ (2462) ? (2462) : __LINE__,
__FUNCTION__);
;
}
@@ -8704,7 +10027,7 @@ lab_endgetargs:;
/*_.IFELSE___V182*/ meltfptr[178];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2451:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2462:/ clear");
/*clear *//*_#IS_A__L64*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IFELSE___V182*/ meltfptr[178] = 0;
@@ -8715,7 +10038,7 @@ lab_endgetargs:;
/*_.IFCPP___V181*/ meltfptr[177] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2452:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2463:/ quasiblock");
/*^getslot */
@@ -8728,7 +10051,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8751,7 +10074,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -8761,7 +10084,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L66*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8772,7 +10095,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2453;
+ argtab[2].meltbp_long = 2464;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match sbind";
/*^apply.arg */
@@ -8793,7 +10116,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V187*/ meltfptr[186];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[19] =
0;
/*^clear */
@@ -8808,7 +10131,7 @@ lab_endgetargs:;
/*_.IF___V186*/ meltfptr[185] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ quasiblock");
/*_.PROGN___V188*/ meltfptr[186] =
@@ -8819,7 +10142,7 @@ lab_endgetargs:;
/*_.PROGN___V188*/ meltfptr[186];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2453:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2464:/ clear");
/*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V186*/ meltfptr[185] = 0;
@@ -8834,7 +10157,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2454:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2465:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.SORTEDBINDINGS__V164*/
meltfptr[111]),
@@ -8843,7 +10166,7 @@ lab_endgetargs:;
meltfptr[183]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2455:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2466:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8863,7 +10186,7 @@ lab_endgetargs:;
/*_.LET___V183*/ meltfptr[178] =
/*_.PUT_ENV__V189*/ meltfptr[185];;
- MELT_LOCATION ("warmelt-normatch.melt:2452:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2463:/ clear");
/*clear *//*_.SBIND__V184*/ meltfptr[183] = 0;
/*^clear */
/*clear *//*_.IFCPP___V185*/ meltfptr[184] = 0;
@@ -8872,7 +10195,7 @@ lab_endgetargs:;
/*_.LET___V175*/ meltfptr[171] =
/*_.LET___V183*/ meltfptr[178];;
- MELT_LOCATION ("warmelt-normatch.melt:2448:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2459:/ clear");
/*clear *//*_.SOCC__V176*/ meltfptr[172] = 0;
/*^clear */
/*clear *//*_.IFCPP___V177*/ meltfptr[176] = 0;
@@ -8886,7 +10209,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2444:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2455:/ clear");
/*clear *//*_.SVAR__V170*/ meltfptr[166] = 0;
/*^clear */
/*clear *//*_#SVIX__L59*/ meltfnum[34] = 0;
@@ -8898,7 +10221,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8921,7 +10244,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -8931,7 +10254,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L68*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -8942,7 +10265,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2458;
+ argtab[2].meltbp_long = 2469;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match freshnewenv=";
/*^apply.arg */
@@ -8970,7 +10293,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V192*/ meltfptr[184];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V192*/ meltfptr[184] = 0;
@@ -8983,7 +10306,7 @@ lab_endgetargs:;
/*_.IF___V191*/ meltfptr[183] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ quasiblock");
/*_.PROGN___V193*/ meltfptr[185] = /*_.IF___V191*/ meltfptr[183];;
@@ -8993,7 +10316,7 @@ lab_endgetargs:;
/*_.PROGN___V193*/ meltfptr[185];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2458:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2469:/ clear");
/*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V191*/ meltfptr[183] = 0;
@@ -9008,7 +10331,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2460:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2471:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9017,7 +10340,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.SORTEDBINDINGS__V164*/ meltfptr[111])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:2460:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2471:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L69*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -9025,7 +10348,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2460:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2471:/ cond.else");
/*^block */
/*anyblock */
@@ -9039,7 +10362,7 @@ lab_endgetargs:;
melt_assert_failed (("check sortedbindings"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2460) ? (2460) : __LINE__,
+ __FILE__, (2471) ? (2471) : __LINE__,
__FUNCTION__);
;
}
@@ -9056,7 +10379,7 @@ lab_endgetargs:;
/*_.IFELSE___V195*/ meltfptr[176];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2460:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2471:/ clear");
/*clear *//*_#IS_MULTIPLE__L69*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IFELSE___V195*/ meltfptr[176] = 0;
@@ -9067,7 +10390,7 @@ lab_endgetargs:;
/*_.IFCPP___V194*/ meltfptr[172] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2461:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2472:/ quasiblock");
/*_.SUBINDLIST__V197*/ meltfptr[178] =
@@ -9095,7 +10418,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9118,7 +10441,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L71*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -9128,7 +10451,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L72*/ meltfnum[71] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9139,7 +10462,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2466;
+ argtab[2].meltbp_long = 2477;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match cursortbind";
@@ -9162,7 +10485,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V201*/ meltfptr[176];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L72*/ meltfnum[71] =
0;
/*^clear */
@@ -9177,7 +10500,7 @@ lab_endgetargs:;
/*_.IF___V200*/ meltfptr[185] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ quasiblock");
/*_.PROGN___V202*/ meltfptr[176] =
@@ -9188,7 +10511,7 @@ lab_endgetargs:;
/*_.PROGN___V202*/ meltfptr[176];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2466:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2477:/ clear");
/*clear *//*_#MELT_NEED_DBG__L71*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V200*/ meltfptr[185] = 0;
@@ -9203,7 +10526,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2467:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2478:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9213,7 +10536,7 @@ lab_endgetargs:;
( /*_.CURSORTBIND__V198*/
meltfptr[184]),
(melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:2467:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2478:/ cond");
/*cond */ if ( /*_#IS_A__L73*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -9222,7 +10545,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:2467:/ cond.else");
+ ("warmelt-normatch.melt:2478:/ cond.else");
/*^block */
/*anyblock */
@@ -9237,7 +10560,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (2467) ? (2467) : __LINE__,
+ (2478) ? (2478) : __LINE__,
__FUNCTION__);
;
}
@@ -9254,7 +10577,7 @@ lab_endgetargs:;
/*_.IFELSE___V204*/ meltfptr[176];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2467:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2478:/ clear");
/*clear *//*_#IS_A__L73*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IFELSE___V204*/ meltfptr[176] = 0;
@@ -9267,7 +10590,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2469:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2480:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.SUBINDLIST__V197*/ meltfptr[178]),
(melt_ptr_t) ( /*_.CURSORTBIND__V198*/
@@ -9280,7 +10603,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2463:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2474:/ clear");
/*clear *//*_.CURSORTBIND__V198*/ meltfptr[184] = 0;
/*^clear */
/*clear *//*_#SORTBIX__L70*/ meltfnum[19] = 0;
@@ -9292,7 +10615,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9315,7 +10638,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L74*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -9325,7 +10648,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L75*/ meltfnum[71] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9336,7 +10659,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2471;
+ argtab[2].meltbp_long = 2482;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match curbody before normalize_tuple";
@@ -9358,7 +10681,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V207*/ meltfptr[206];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L75*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V207*/ meltfptr[206] = 0;
@@ -9371,7 +10694,7 @@ lab_endgetargs:;
/*_.IF___V206*/ meltfptr[205] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ quasiblock");
/*_.PROGN___V208*/ meltfptr[206] = /*_.IF___V206*/ meltfptr[205];;
@@ -9381,7 +10704,7 @@ lab_endgetargs:;
/*_.PROGN___V208*/ meltfptr[206];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2471:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2482:/ clear");
/*clear *//*_#MELT_NEED_DBG__L74*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V206*/ meltfptr[205] = 0;
@@ -9394,7 +10717,7 @@ lab_endgetargs:;
/*_.IFCPP___V205*/ meltfptr[176] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2472:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2483:/ quasiblock");
/*^multiapply */
@@ -9427,7 +10750,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9450,7 +10773,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L76*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -9460,7 +10783,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L77*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -9471,7 +10794,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2475;
+ argtab[2].meltbp_long = 2486;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match after normalize_tuple curbody=";
@@ -9505,7 +10828,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V214*/ meltfptr[213];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L77*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V214*/ meltfptr[213] = 0;
@@ -9518,7 +10841,7 @@ lab_endgetargs:;
/*_.IF___V213*/ meltfptr[212] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ quasiblock");
/*_.PROGN___V215*/ meltfptr[213] = /*_.IF___V213*/ meltfptr[212];;
@@ -9528,7 +10851,7 @@ lab_endgetargs:;
/*_.PROGN___V215*/ meltfptr[213];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2475:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2486:/ clear");
/*clear *//*_#MELT_NEED_DBG__L76*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IF___V213*/ meltfptr[212] = 0;
@@ -9543,7 +10866,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2478:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2489:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9554,7 +10877,7 @@ lab_endgetargs:;
(melt_unsafe_magic_discr
((melt_ptr_t) ( /*_.BINDSBODY__V211*/ meltfptr[210])) ==
MELTOBMAG_LIST));;
- MELT_LOCATION ("warmelt-normatch.melt:2478:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2489:/ cond");
/*cond */ if ( /*_#IS_LIST_OR_NULL__L78*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -9562,7 +10885,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2478:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2489:/ cond.else");
/*^block */
/*anyblock */
@@ -9576,7 +10899,7 @@ lab_endgetargs:;
melt_assert_failed (("check bindsbody"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2478) ? (2478) : __LINE__,
+ __FILE__, (2489) ? (2489) : __LINE__,
__FUNCTION__);
;
}
@@ -9593,7 +10916,7 @@ lab_endgetargs:;
/*_.IFELSE___V217*/ meltfptr[213];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2478:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2489:/ clear");
/*clear *//*_#IS_LIST_OR_NULL__L78*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IFELSE___V217*/ meltfptr[213] = 0;
@@ -9620,7 +10943,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9643,7 +10966,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L79*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -9653,7 +10976,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L80*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9664,7 +10987,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2482;
+ argtab[2].meltbp_long = 2493;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match curbindbody";
@@ -9687,7 +11010,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V222*/ meltfptr[221];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L80*/ meltfnum[39] =
0;
/*^clear */
@@ -9702,7 +11025,7 @@ lab_endgetargs:;
/*_.IF___V221*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ quasiblock");
/*_.PROGN___V223*/ meltfptr[221] =
@@ -9713,7 +11036,7 @@ lab_endgetargs:;
/*_.PROGN___V223*/ meltfptr[221];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2482:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2493:/ clear");
/*clear *//*_#MELT_NEED_DBG__L79*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IF___V221*/ meltfptr[220] = 0;
@@ -9728,7 +11051,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2483:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2494:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.SUBINDLIST__V197*/ meltfptr[178]),
(melt_ptr_t) ( /*_.CURBINDBODY__V219*/
@@ -9739,7 +11062,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2479:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2490:/ clear");
/*clear *//*_.BINDBODYPAIR__V218*/ meltfptr[213] = 0;
/*^clear */
/*clear *//*_.CURBINDBODY__V219*/ meltfptr[218] = 0;
@@ -9749,7 +11072,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9772,7 +11095,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L81*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -9782,7 +11105,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L82*/ meltfnum[71] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9793,7 +11116,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2485;
+ argtab[2].meltbp_long = 2496;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match final subindlist";
@@ -9815,7 +11138,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V226*/ meltfptr[225];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L82*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V226*/ meltfptr[225] = 0;
@@ -9828,7 +11151,7 @@ lab_endgetargs:;
/*_.IF___V225*/ meltfptr[221] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ quasiblock");
/*_.PROGN___V227*/ meltfptr[225] = /*_.IF___V225*/ meltfptr[221];;
@@ -9838,7 +11161,7 @@ lab_endgetargs:;
/*_.PROGN___V227*/ meltfptr[225];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2485:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2496:/ clear");
/*clear *//*_#MELT_NEED_DBG__L81*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V225*/ meltfptr[221] = 0;
@@ -9851,7 +11174,7 @@ lab_endgetargs:;
/*_.IFCPP___V224*/ meltfptr[220] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2486:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2497:/ quasiblock");
/*^apply */
@@ -9876,7 +11199,7 @@ lab_endgetargs:;
/*_.LASTNBODY__V230*/ meltfptr[229] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.NBODY__V210*/ meltfptr[206]), (-1)));;
- MELT_LOCATION ("warmelt-normatch.melt:2488:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:2499:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -9894,7 +11217,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9917,7 +11240,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L83*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -9927,7 +11250,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L84*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -9938,7 +11261,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2490;
+ argtab[2].meltbp_long = 2501;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match wnlet=";
/*^apply.arg */
@@ -9971,7 +11294,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V234*/ meltfptr[233];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L84*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V234*/ meltfptr[233] = 0;
@@ -9984,7 +11307,7 @@ lab_endgetargs:;
/*_.IF___V233*/ meltfptr[232] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ quasiblock");
/*_.PROGN___V235*/ meltfptr[233] = /*_.IF___V233*/ meltfptr[232];;
@@ -9994,7 +11317,7 @@ lab_endgetargs:;
/*_.PROGN___V235*/ meltfptr[233];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2490:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2501:/ clear");
/*clear *//*_#MELT_NEED_DBG__L83*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IF___V233*/ meltfptr[232] = 0;
@@ -10007,8 +11330,14 @@ lab_endgetargs:;
/*_.IFCPP___V232*/ meltfptr[231] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2493:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NEWSUCTESTER__V108*/ meltfptr[107]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[21])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2504:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NEWSUCTESTER__V108*/
+ meltfptr[107]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[21])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -10037,7 +11366,7 @@ lab_endgetargs:;
;
/*_#NULL__L85*/ meltfnum[39] =
(( /*_.WHOLECTYPE__V25*/ meltfptr[24]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2496:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2507:/ cond");
/*cond */ if ( /*_#NULL__L85*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -10045,7 +11374,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2497:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2508:/ compute");
/*_.WHOLECTYPE__V25*/ meltfptr[24] =
/*_.SETQ___V237*/ meltfptr[233] =
/*_.LASTCTYPE__V231*/ meltfptr[230];;
@@ -10053,7 +11382,7 @@ lab_endgetargs:;
/*_.SETQ___V237*/ meltfptr[233];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2496:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2507:/ clear");
/*clear *//*_.SETQ___V237*/ meltfptr[233] = 0;
}
;
@@ -10068,7 +11397,7 @@ lab_endgetargs:;
/*_#__L86*/ meltfnum[71] =
(( /*_.LASTCTYPE__V231*/ meltfptr[230]) ==
(( /*!CTYPE_VOID */ meltfrout->tabval[31])));;
- MELT_LOCATION ("warmelt-normatch.melt:2498:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2509:/ cond");
/*cond */ if ( /*_#__L86*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -10076,7 +11405,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2499:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:2510:/ compute");
/*_.WHOLECTYPE__V25*/ meltfptr[24] =
/*_.SETQ___V239*/ meltfptr[238] =
( /*!CTYPE_VOID */ meltfrout->tabval[31]);;
@@ -10084,7 +11413,7 @@ lab_endgetargs:;
/*_.SETQ___V239*/ meltfptr[238];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2498:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2509:/ clear");
/*clear *//*_.SETQ___V239*/ meltfptr[238] = 0;
}
;
@@ -10099,7 +11428,7 @@ lab_endgetargs:;
/*_#__L87*/ meltfnum[86] =
(( /*_.WHOLECTYPE__V25*/ meltfptr[24]) ==
(( /*!CTYPE_VOID */ meltfrout->tabval[31])));;
- MELT_LOCATION ("warmelt-normatch.melt:2500:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2511:/ cond");
/*cond */ if ( /*_#__L87*/ meltfnum[86]) /*then */
{
/*^cond.then */
@@ -10109,7 +11438,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:2500:/ cond.else");
+ ("warmelt-normatch.melt:2511:/ cond.else");
/*^block */
/*anyblock */
@@ -10119,7 +11448,7 @@ lab_endgetargs:;
(( /*_.WHOLECTYPE__V25*/ meltfptr[24]) !=
( /*_.LASTCTYPE__V231*/ meltfptr[230]));;
MELT_LOCATION
- ("warmelt-normatch.melt:2502:/ cond");
+ ("warmelt-normatch.melt:2513:/ cond");
/*cond */ if ( /*_#__L88*/ meltfnum[87]) /*then */
{
/*^cond.then */
@@ -10128,8 +11457,12 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:2504:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LASTCTYPE__V231*/ meltfptr[230]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[32])))) /*then */
+ ("warmelt-normatch.melt:2515:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.LASTCTYPE__V231*/ meltfptr[230]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[32])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10151,7 +11484,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:2503:/ locexp");
+ ("warmelt-normatch.melt:2514:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.CURLOC__V70*/
meltfptr[54]),
@@ -10160,8 +11493,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:2506:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.WHOLECTYPE__V25*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[32])))) /*then */
+ ("warmelt-normatch.melt:2517:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.WHOLECTYPE__V25*/ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[32])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10183,7 +11520,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:2505:/ locexp");
+ ("warmelt-normatch.melt:2516:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V17*/
meltfptr[13]),
@@ -10192,7 +11529,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:2502:/ quasiblock");
+ ("warmelt-normatch.melt:2513:/ quasiblock");
/*epilog */
@@ -10219,7 +11556,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:2500:/ clear");
+ ("warmelt-normatch.melt:2511:/ clear");
/*clear *//*_#__L88*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.IFELSE___V241*/ meltfptr[240] = 0;
@@ -10231,7 +11568,7 @@ lab_endgetargs:;
/*_.IFELSE___V240*/ meltfptr[238];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2498:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2509:/ clear");
/*clear *//*_#__L87*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.IFELSE___V240*/ meltfptr[238] = 0;
@@ -10243,7 +11580,7 @@ lab_endgetargs:;
/*_.IFELSE___V238*/ meltfptr[233];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2496:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2507:/ clear");
/*clear *//*_#__L86*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IFELSE___V238*/ meltfptr[233] = 0;
@@ -10253,7 +11590,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10276,7 +11613,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L89*/ meltfnum[87]) /*then */
{
/*^cond.then */
@@ -10286,7 +11623,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L90*/ meltfnum[86] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10297,7 +11634,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2508;
+ argtab[2].meltbp_long = 2519;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match updated newsuctester";
@@ -10319,7 +11656,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V246*/ meltfptr[240];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L90*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V246*/ meltfptr[240] = 0;
@@ -10332,7 +11669,7 @@ lab_endgetargs:;
/*_.IF___V245*/ meltfptr[242] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ quasiblock");
/*_.PROGN___V247*/ meltfptr[238] = /*_.IF___V245*/ meltfptr[242];;
@@ -10342,7 +11679,7 @@ lab_endgetargs:;
/*_.PROGN___V247*/ meltfptr[238];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2508:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2519:/ clear");
/*clear *//*_#MELT_NEED_DBG__L89*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.IF___V245*/ meltfptr[242] = 0;
@@ -10359,7 +11696,7 @@ lab_endgetargs:;
/*_.LET___V228*/ meltfptr[221] = /*_.IFCPP___V244*/ meltfptr[241];;
- MELT_LOCATION ("warmelt-normatch.melt:2486:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2497:/ clear");
/*clear *//*_.WNLET__V229*/ meltfptr[225] = 0;
/*^clear */
/*clear *//*_.LASTNBODY__V230*/ meltfptr[229] = 0;
@@ -10375,7 +11712,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V244*/ meltfptr[241] = 0;
/*_.MULTI___V209*/ meltfptr[205] = /*_.LET___V228*/ meltfptr[221];;
- MELT_LOCATION ("warmelt-normatch.melt:2472:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2483:/ clear");
/*clear *//*_.IFCPP___V212*/ meltfptr[211] = 0;
/*^clear */
/*clear *//*_.IFCPP___V216*/ meltfptr[212] = 0;
@@ -10388,7 +11725,7 @@ lab_endgetargs:;
/*clear *//*_.BINDSBODY__V211*/ meltfptr[210] = 0;
/*_.LET___V196*/ meltfptr[177] = /*_.MULTI___V209*/ meltfptr[205];;
- MELT_LOCATION ("warmelt-normatch.melt:2461:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2472:/ clear");
/*clear *//*_.SUBINDLIST__V197*/ meltfptr[178] = 0;
/*^clear */
/*clear *//*_.IFCPP___V205*/ meltfptr[176] = 0;
@@ -10396,7 +11733,7 @@ lab_endgetargs:;
/*clear *//*_.MULTI___V209*/ meltfptr[205] = 0;
/*_.LET___V162*/ meltfptr[116] = /*_.LET___V196*/ meltfptr[177];;
- MELT_LOCATION ("warmelt-normatch.melt:2438:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2449:/ clear");
/*clear *//*_.SORTEDVARS__V163*/ meltfptr[121] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L56*/ meltfnum[38] = 0;
@@ -10414,7 +11751,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V196*/ meltfptr[177] = 0;
/*_.LET___V104*/ meltfptr[100] = /*_.LET___V162*/ meltfptr[116];;
- MELT_LOCATION ("warmelt-normatch.melt:2372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2383:/ clear");
/*clear *//*_.NEWENV__V105*/ meltfptr[101] = 0;
/*^clear */
/*clear *//*_.CURTESTER__V106*/ meltfptr[105] = 0;
@@ -10444,7 +11781,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V162*/ meltfptr[116] = 0;
/*_.LET___V69*/ meltfptr[48] = /*_.LET___V104*/ meltfptr[100];;
- MELT_LOCATION ("warmelt-normatch.melt:2321:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2332:/ clear");
/*clear *//*_.CURLOC__V70*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.CURPAT__V71*/ meltfptr[53] = 0;
@@ -10488,7 +11825,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2316:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2327:/ clear");
/*clear *//*_.CURCAS__V62*/ meltfptr[50] = 0;
/*^clear */
/*clear *//*_#IX__L19*/ meltfnum[18] = 0;
@@ -10502,7 +11839,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10525,7 +11862,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L91*/ meltfnum[71]) /*then */
{
/*^cond.then */
@@ -10535,7 +11872,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L92*/ meltfnum[86] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2516:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2527:/ quasiblock");
/*_.STMPKLIST__V251*/ meltfptr[238] =
@@ -10579,7 +11916,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:2520:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2531:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STMPKLIST__V251*/
meltfptr[238]),
@@ -10595,7 +11932,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2517:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2528:/ clear");
/*clear *//*_.LOCOCCK__V252*/ meltfptr[225] = 0;
/*^clear */
/*clear *//*_.LITEST__V253*/ meltfptr[229] = 0;
@@ -10604,9 +11941,9 @@ lab_endgetargs:;
/*_.LET___V250*/ meltfptr[242] =
/*_.STMPKLIST__V251*/ meltfptr[238];;
- MELT_LOCATION ("warmelt-normatch.melt:2516:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2527:/ clear");
/*clear *//*_.STMPKLIST__V251*/ meltfptr[238] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ apply");
/*apply */
{
union meltparam_un argtab[13];
@@ -10617,7 +11954,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2511;
+ argtab[2].meltbp_long = 2522;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match tupvarmap=";
/*^apply.arg */
@@ -10661,7 +11998,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V254*/ meltfptr[230];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L92*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.LET___V250*/ meltfptr[242] = 0;
@@ -10676,7 +12013,7 @@ lab_endgetargs:;
/*_.IF___V249*/ meltfptr[240] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ quasiblock");
/*_.PROGN___V255*/ meltfptr[231] = /*_.IF___V249*/ meltfptr[240];;
@@ -10685,7 +12022,7 @@ lab_endgetargs:;
/*_.IFCPP___V248*/ meltfptr[233] = /*_.PROGN___V255*/ meltfptr[231];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2511:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2522:/ clear");
/*clear *//*_#MELT_NEED_DBG__L91*/ meltfnum[71] = 0;
/*^clear */
/*clear *//*_.IF___V249*/ meltfptr[240] = 0;
@@ -10698,10 +12035,10 @@ lab_endgetargs:;
/*_.IFCPP___V248*/ meltfptr[233] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2523:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2534:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2524:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2535:/ quasiblock");
/*^apply */
@@ -10722,7 +12059,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10745,7 +12082,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L93*/ meltfnum[87]) /*then */
{
/*^cond.then */
@@ -10755,7 +12092,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L94*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10766,7 +12103,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2525;
+ argtab[2].meltbp_long = 2536;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match teststupl";
/*^apply.arg */
@@ -10786,7 +12123,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V261*/ meltfptr[221];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L94*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V261*/ meltfptr[221] = 0;
@@ -10799,7 +12136,7 @@ lab_endgetargs:;
/*_.IF___V260*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ quasiblock");
/*_.PROGN___V262*/ meltfptr[206] = /*_.IF___V260*/ meltfptr[220];;
@@ -10808,7 +12145,7 @@ lab_endgetargs:;
/*_.IFCPP___V259*/ meltfptr[212] = /*_.PROGN___V262*/ meltfptr[206];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2525:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2536:/ clear");
/*clear *//*_#MELT_NEED_DBG__L93*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.IF___V260*/ meltfptr[220] = 0;
@@ -10825,12 +12162,12 @@ lab_endgetargs:;
/*_.LET___V257*/ meltfptr[241] = /*_.TT__V258*/ meltfptr[211];;
- MELT_LOCATION ("warmelt-normatch.melt:2524:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2535:/ clear");
/*clear *//*_.TT__V258*/ meltfptr[211] = 0;
/*^clear */
/*clear *//*_.IFCPP___V259*/ meltfptr[212] = 0;
/*_.TESTSTUPL__V263*/ meltfptr[210] = /*_.LET___V257*/ meltfptr[241];;
- MELT_LOCATION ("warmelt-normatch.melt:2527:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2538:/ quasiblock");
/*^rawallocobj */
@@ -10894,7 +12231,7 @@ lab_endgetargs:;
( /*_.NMATX__V32*/ meltfptr[28]), "NMATCH_MATCHED");
;
/*_.NMATCH__V264*/ meltfptr[178] = /*_.INST__V265*/ meltfptr[176];;
- MELT_LOCATION ("warmelt-normatch.melt:2534:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2545:/ apply");
/*apply */
{
/*_.CSYM__V266*/ meltfptr[205] =
@@ -10905,7 +12242,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2535:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2546:/ quasiblock");
/*^rawallocobj */
@@ -10948,7 +12285,7 @@ lab_endgetargs:;
( /*_.CSYM__V266*/ meltfptr[205]), "NOCC_SYMB");
;
/*_.CLOCC__V267*/ meltfptr[121] = /*_.INST__V268*/ meltfptr[111];;
- MELT_LOCATION ("warmelt-normatch.melt:2539:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2550:/ quasiblock");
/*^rawallocobj */
@@ -11004,7 +12341,7 @@ lab_endgetargs:;
/*_.CBIND__V269*/ meltfptr[164] = /*_.INST__V270*/ meltfptr[165];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11027,7 +12364,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L95*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -11037,7 +12374,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L96*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11048,7 +12385,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2545;
+ argtab[2].meltbp_long = 2556;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match csym";
/*^apply.arg */
@@ -11068,7 +12405,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V273*/ meltfptr[177];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L96*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V273*/ meltfptr[177] = 0;
@@ -11081,7 +12418,7 @@ lab_endgetargs:;
/*_.IF___V272*/ meltfptr[172] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ quasiblock");
/*_.PROGN___V274*/ meltfptr[101] = /*_.IF___V272*/ meltfptr[172];;
@@ -11090,7 +12427,7 @@ lab_endgetargs:;
/*_.IFCPP___V271*/ meltfptr[186] = /*_.PROGN___V274*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2556:/ clear");
/*clear *//*_#MELT_NEED_DBG__L95*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V272*/ meltfptr[172] = 0;
@@ -11103,8 +12440,13 @@ lab_endgetargs:;
/*_.IFCPP___V271*/ meltfptr[186] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2546:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CLOCC__V267*/ meltfptr[121]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[36])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2557:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CLOCC__V267*/ meltfptr[121]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[36])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -11132,7 +12474,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11155,7 +12497,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L97*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -11165,7 +12507,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L98*/ meltfnum[86] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11176,7 +12518,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2547;
+ argtab[2].meltbp_long = 2558;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match clocc";
/*^apply.arg */
@@ -11196,7 +12538,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V277*/ meltfptr[107];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L98*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V277*/ meltfptr[107] = 0;
@@ -11209,7 +12551,7 @@ lab_endgetargs:;
/*_.IF___V276*/ meltfptr[106] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ quasiblock");
/*_.PROGN___V278*/ meltfptr[109] = /*_.IF___V276*/ meltfptr[106];;
@@ -11218,7 +12560,7 @@ lab_endgetargs:;
/*_.IFCPP___V275*/ meltfptr[105] = /*_.PROGN___V278*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2547:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2558:/ clear");
/*clear *//*_#MELT_NEED_DBG__L97*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V276*/ meltfptr[106] = 0;
@@ -11231,8 +12573,13 @@ lab_endgetargs:;
/*_.IFCPP___V275*/ meltfptr[105] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2549:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2560:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11252,7 +12599,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2549:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2560:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.NCTX_SYMBCACHEMAP__V279*/ meltfptr[110]),
(meltobject_ptr_t) ( /*_.CSYM__V266*/
@@ -11280,7 +12627,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11303,7 +12650,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L100*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -11313,7 +12660,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L101*/ meltfnum[87] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11324,7 +12671,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2554;
+ argtab[2].meltbp_long = 2565;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match raw curtest";
/*^apply.arg */
@@ -11345,7 +12692,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V283*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L101*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V283*/ meltfptr[130] = 0;
@@ -11358,7 +12705,7 @@ lab_endgetargs:;
/*_.IF___V282*/ meltfptr[115] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ quasiblock");
/*_.PROGN___V284*/ meltfptr[135] = /*_.IF___V282*/ meltfptr[115];;
@@ -11368,7 +12715,7 @@ lab_endgetargs:;
/*_.PROGN___V284*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2554:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2565:/ clear");
/*clear *//*_#MELT_NEED_DBG__L100*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V282*/ meltfptr[115] = 0;
@@ -11383,7 +12730,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2555:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2566:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11393,7 +12740,7 @@ lab_endgetargs:;
( /*_.CURTEST__V280*/ meltfptr[136]),
(melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */
meltfrout->tabval[23])));;
- MELT_LOCATION ("warmelt-normatch.melt:2555:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2566:/ cond");
/*cond */ if ( /*_#IS_A__L102*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -11401,7 +12748,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2555:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2566:/ cond.else");
/*^block */
/*anyblock */
@@ -11415,7 +12762,7 @@ lab_endgetargs:;
melt_assert_failed (("check curtest"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2555) ? (2555) : __LINE__,
+ __FILE__, (2566) ? (2566) : __LINE__,
__FUNCTION__);
;
}
@@ -11432,7 +12779,7 @@ lab_endgetargs:;
/*_.IFELSE___V286*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2555:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2566:/ clear");
/*clear *//*_#IS_A__L102*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IFELSE___V286*/ meltfptr[54] = 0;
@@ -11445,14 +12792,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2556:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2567:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#I__L103*/ meltfnum[38] =
(( /*_#TSTIX__L99*/ meltfnum[71]) >= (0));;
- MELT_LOCATION ("warmelt-normatch.melt:2556:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2567:/ cond");
/*cond */ if ( /*_#I__L103*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -11460,7 +12807,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2556:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2567:/ cond.else");
/*^block */
/*anyblock */
@@ -11474,7 +12821,7 @@ lab_endgetargs:;
melt_assert_failed (("check tstix"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2556) ? (2556) : __LINE__,
+ __FILE__, (2567) ? (2567) : __LINE__,
__FUNCTION__);
;
}
@@ -11491,7 +12838,7 @@ lab_endgetargs:;
/*_.IFELSE___V288*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2556:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2567:/ clear");
/*clear *//*_#I__L103*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IFELSE___V288*/ meltfptr[55] = 0;
@@ -11504,14 +12851,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2557:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2568:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#I__L104*/ meltfnum[86] =
(( /*_#TSTIX__L99*/ meltfnum[71]) < (32767));;
- MELT_LOCATION ("warmelt-normatch.melt:2557:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2568:/ cond");
/*cond */ if ( /*_#I__L104*/ meltfnum[86]) /*then */
{
/*^cond.then */
@@ -11519,7 +12866,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2557:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2568:/ cond.else");
/*^block */
/*anyblock */
@@ -11533,7 +12880,7 @@ lab_endgetargs:;
melt_assert_failed (("check tstix not too big"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (2557) ? (2557) : __LINE__,
+ __FILE__, (2568) ? (2568) : __LINE__,
__FUNCTION__);
;
}
@@ -11550,7 +12897,7 @@ lab_endgetargs:;
/*_.IFELSE___V290*/ meltfptr[73];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2557:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2568:/ clear");
/*clear *//*_#I__L104*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.IFELSE___V290*/ meltfptr[73] = 0;
@@ -11563,20 +12910,26 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2558:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2569:/ locexp");
debugnum (("normexp_match testindex tstix"),
( /*_#TSTIX__L99*/ meltfnum[71]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2559:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2570:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.CURTEST__V280*/ meltfptr[136]),
( /*_#TSTIX__L99*/ meltfnum[71]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2560:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURTEST__V280*/ meltfptr[136]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[23])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2571:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURTEST__V280*/
+ meltfptr[136]),
+ (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[23])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -11605,7 +12958,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11628,7 +12981,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L105*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -11638,7 +12991,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L106*/ meltfnum[87] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11649,7 +13002,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2561;
+ argtab[2].meltbp_long = 2572;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match indexed curtest";
@@ -11671,7 +13024,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V293*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L106*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V293*/ meltfptr[76] = 0;
@@ -11684,7 +13037,7 @@ lab_endgetargs:;
/*_.IF___V292*/ meltfptr[75] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ quasiblock");
/*_.PROGN___V294*/ meltfptr[77] = /*_.IF___V292*/ meltfptr[75];;
@@ -11694,7 +13047,7 @@ lab_endgetargs:;
/*_.PROGN___V294*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2561:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2572:/ clear");
/*clear *//*_#MELT_NEED_DBG__L105*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V292*/ meltfptr[75] = 0;
@@ -11713,7 +13066,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2551:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2562:/ clear");
/*clear *//*_.CURTEST__V280*/ meltfptr[136] = 0;
/*^clear */
/*clear *//*_#TSTIX__L99*/ meltfnum[71] = 0;
@@ -11737,7 +13090,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2563:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2574:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L107*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -11745,11 +13098,16 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2564:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2575:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[37])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[15])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[37])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[15])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11769,7 +13127,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11792,7 +13150,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L108*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -11802,7 +13160,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L109*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -11813,7 +13171,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2565;
+ argtab[2].meltbp_long = 2576;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_match match_graphic_dot_prefix=";
@@ -11842,7 +13200,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V300*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L109*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V300*/ meltfptr[89] = 0;
@@ -11855,7 +13213,7 @@ lab_endgetargs:;
/*_.IF___V299*/ meltfptr[88] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ quasiblock");
/*_.PROGN___V301*/ meltfptr[90] = /*_.IF___V299*/ meltfptr[88];;
@@ -11865,7 +13223,7 @@ lab_endgetargs:;
/*_.PROGN___V301*/ meltfptr[90];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2565:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2576:/ clear");
/*clear *//*_#MELT_NEED_DBG__L108*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V299*/ meltfptr[88] = 0;
@@ -11884,7 +13242,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.DOTPREFIX__V297*/ meltfptr[82])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:2567:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2578:/ cond");
/*cond */ if ( /*_#IS_STRING__L110*/ meltfnum[86]) /*then */
{
/*^cond.then */
@@ -11892,7 +13250,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2568:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2579:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -11917,7 +13275,7 @@ lab_endgetargs:;
/*_.MG_DRAW_MATCH_GRAPHVIZ_FILE__V303*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2567:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2578:/ clear");
/*clear *//*_.MG_DRAW_MATCH_GRAPHVIZ_FILE__V303*/ meltfptr[99]
= 0;
}
@@ -11933,7 +13291,7 @@ lab_endgetargs:;
/*_.LET___V296*/ meltfptr[81] = /*_.IF___V302*/ meltfptr[98];;
- MELT_LOCATION ("warmelt-normatch.melt:2564:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2575:/ clear");
/*clear *//*_.DOTPREFIX__V297*/ meltfptr[82] = 0;
/*^clear */
/*clear *//*_.IFCPP___V298*/ meltfptr[83] = 0;
@@ -11944,7 +13302,7 @@ lab_endgetargs:;
/*_.IF___V295*/ meltfptr[79] = /*_.LET___V296*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2563:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2574:/ clear");
/*clear *//*_.LET___V296*/ meltfptr[81] = 0;
}
;
@@ -11955,7 +13313,7 @@ lab_endgetargs:;
/*_.IF___V295*/ meltfptr[79] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2570:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2581:/ quasiblock");
/*^putslot */
@@ -11973,7 +13331,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11996,7 +13354,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L111*/ meltfnum[87]) /*then */
{
/*^cond.then */
@@ -12006,7 +13364,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L112*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -12017,7 +13375,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2571;
+ argtab[2].meltbp_long = 2582;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match final teststupl=";
/*^apply.arg */
@@ -12043,7 +13401,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V306*/ meltfptr[242];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L112*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V306*/ meltfptr[242] = 0;
@@ -12056,7 +13414,7 @@ lab_endgetargs:;
/*_.IF___V305*/ meltfptr[238] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ quasiblock");
/*_.PROGN___V307*/ meltfptr[230] = /*_.IF___V305*/ meltfptr[238];;
@@ -12065,7 +13423,7 @@ lab_endgetargs:;
/*_.IFCPP___V304*/ meltfptr[100] = /*_.PROGN___V307*/ meltfptr[230];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2571:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2582:/ clear");
/*clear *//*_#MELT_NEED_DBG__L111*/ meltfnum[87] = 0;
/*^clear */
/*clear *//*_.IF___V305*/ meltfptr[238] = 0;
@@ -12080,7 +13438,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2572:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2583:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12088,7 +13446,7 @@ lab_endgetargs:;
/*_#IS_LIST__L113*/ meltfnum[38] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NBINDMATX__V33*/ meltfptr[32]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:2572:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2583:/ cond");
/*cond */ if ( /*_#IS_LIST__L113*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -12096,7 +13454,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2572:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2583:/ cond.else");
/*^block */
/*anyblock */
@@ -12110,7 +13468,7 @@ lab_endgetargs:;
melt_assert_failed (("check nbindmatx"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2572) ? (2572) : __LINE__, __FUNCTION__);
+ (2583) ? (2583) : __LINE__, __FUNCTION__);
;
}
;
@@ -12125,7 +13483,7 @@ lab_endgetargs:;
/*_.IFCPP___V308*/ meltfptr[240] = /*_.IFELSE___V309*/ meltfptr[231];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2572:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2583:/ clear");
/*clear *//*_#IS_LIST__L113*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IFELSE___V309*/ meltfptr[231] = 0;
@@ -12138,14 +13496,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2573:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2584:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.NBINDMATX__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.CBIND__V269*/ meltfptr[164]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12168,7 +13526,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L114*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -12178,7 +13536,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L115*/ meltfnum[86] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ apply");
/*apply */
{
union meltparam_un argtab[11];
@@ -12189,7 +13547,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2574;
+ argtab[2].meltbp_long = 2585;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match final nmatch=";
/*^apply.arg */
@@ -12227,7 +13585,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V312*/ meltfptr[206];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L115*/ meltfnum[86] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V312*/ meltfptr[206] = 0;
@@ -12240,7 +13598,7 @@ lab_endgetargs:;
/*_.IF___V311*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ quasiblock");
/*_.PROGN___V313*/ meltfptr[211] = /*_.IF___V311*/ meltfptr[220];;
@@ -12249,7 +13607,7 @@ lab_endgetargs:;
/*_.IFCPP___V310*/ meltfptr[221] = /*_.PROGN___V313*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2574:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2585:/ clear");
/*clear *//*_#MELT_NEED_DBG__L114*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V311*/ meltfptr[220] = 0;
@@ -12262,11 +13620,11 @@ lab_endgetargs:;
/*_.IFCPP___V310*/ meltfptr[221] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2577:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2588:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.CLOCC__V267*/ meltfptr[121];;
- MELT_LOCATION ("warmelt-normatch.melt:2577:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:2588:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -12280,7 +13638,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V256*/ meltfptr[232] = /*_.RETURN___V314*/ meltfptr[212];;
- MELT_LOCATION ("warmelt-normatch.melt:2523:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2534:/ clear");
/*clear *//*_.LET___V257*/ meltfptr[241] = 0;
/*^clear */
/*clear *//*_.TESTSTUPL__V263*/ meltfptr[210] = 0;
@@ -12312,7 +13670,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V314*/ meltfptr[212] = 0;
/*_.LET___V38*/ meltfptr[34] = /*_.LET___V256*/ meltfptr[232];;
- MELT_LOCATION ("warmelt-normatch.melt:2287:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2298:/ clear");
/*clear *//*_.CTYP__V39*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.IFCPP___V40*/ meltfptr[39] = 0;
@@ -12332,7 +13690,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V256*/ meltfptr[232] = 0;
/*_.MULTI___V31*/ meltfptr[27] = /*_.LET___V38*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:2283:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2294:/ clear");
/*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.LET___V38*/ meltfptr[34] = 0;
@@ -12341,7 +13699,7 @@ lab_endgetargs:;
/*clear *//*_.NBINDMATX__V33*/ meltfptr[32] = 0;
/*_.LET___V16*/ meltfptr[12] = /*_.MULTI___V31*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:2268:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2279:/ clear");
/*clear *//*_.SLOC__V17*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.SMATSX__V18*/ meltfptr[17] = 0;
@@ -12371,11 +13729,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V27*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.MULTI___V31*/ meltfptr[27] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12402,14 +13760,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_50_warmelt_normatch_NORMEXP_MATCH */
+} /*end meltrout_51_warmelt_normatch_NORMEXP_MATCH */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12428,7 +13786,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_51_warmelt_normatch_LAMBDA___18___st
+ struct frame_meltrout_52_warmelt_normatch_LAMBDA___18___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12467,7 +13825,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ getarg");
/*_.TESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -12479,7 +13837,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12502,7 +13860,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12512,7 +13870,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12522,7 +13880,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2361;
+ argtab[2].meltbp_long = 2372;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_match.lambda tester";
/*^apply.arg */
@@ -12541,7 +13899,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
@@ -12554,7 +13912,7 @@ lab_endgetargs:;
/*_.IF___V4*/ meltfptr[3] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ quasiblock");
/*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
@@ -12563,7 +13921,7 @@ lab_endgetargs:;
/*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2361:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2372:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V4*/ meltfptr[3] = 0;
@@ -12578,7 +13936,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2362:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2373:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -12589,12 +13947,12 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2363:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2374:/ cppif.then");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2364:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2375:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*~NTESTCONT */ meltfclos->tabval[0])), 0, "CONTAINER_VALUE");
@@ -12604,7 +13962,7 @@ lab_endgetargs:;
;
/*_#NULL__L3*/ meltfnum[1] =
(( /*_.CONTAINER_VALUE__V8*/ meltfptr[4]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2363:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2374:/ cond");
/*cond */ if ( /*_#NULL__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12612,7 +13970,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2363:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2374:/ cond.else");
/*^block */
/*anyblock */
@@ -12626,7 +13984,7 @@ lab_endgetargs:;
melt_assert_failed (("check empty ntestcont"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2363) ? (2363) : __LINE__, __FUNCTION__);
+ (2374) ? (2374) : __LINE__, __FUNCTION__);
;
}
;
@@ -12641,7 +13999,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2363:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2374:/ clear");
/*clear *//*_.CONTAINER_VALUE__V8*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_#NULL__L3*/ meltfnum[1] = 0;
@@ -12654,8 +14012,15 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2365:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*~NTESTCONT */ meltfclos->tabval[0])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2376:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*~NTESTCONT */ meltfclos->
+ tabval[0])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -12683,7 +14048,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ clear");
/*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
/*^clear */
/*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
@@ -12699,14 +14064,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_51_warmelt_normatch_LAMBDA___18__ */
+} /*end meltrout_52_warmelt_normatch_LAMBDA___18__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12727,7 +14092,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND_st
+ struct frame_meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12766,7 +14131,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ getarg");
/*_.BIND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12816,7 +14181,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2660:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2671:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12825,7 +14190,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCHED_BINDING */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:2660:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2671:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12833,7 +14198,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2660:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2671:/ cond.else");
/*^block */
/*anyblock */
@@ -12847,7 +14212,7 @@ lab_endgetargs:;
melt_assert_failed (("check bind"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2660) ? (2660) : __LINE__, __FUNCTION__);
+ (2671) ? (2671) : __LINE__, __FUNCTION__);
;
}
;
@@ -12862,7 +14227,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2660:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2671:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -12875,7 +14240,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2661:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2672:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12884,7 +14249,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2661:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2672:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12892,7 +14257,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2661:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2672:/ cond.else");
/*^block */
/*anyblock */
@@ -12906,7 +14271,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2661) ? (2661) : __LINE__, __FUNCTION__);
+ (2672) ? (2672) : __LINE__, __FUNCTION__);
;
}
;
@@ -12921,7 +14286,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2661:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2672:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -12934,7 +14299,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2662:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2673:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12943,7 +14308,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2662:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2673:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12951,7 +14316,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2662:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2673:/ cond.else");
/*^block */
/*anyblock */
@@ -12965,7 +14330,7 @@ lab_endgetargs:;
melt_assert_failed (("check ncx"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2662) ? (2662) : __LINE__, __FUNCTION__);
+ (2673) ? (2673) : __LINE__, __FUNCTION__);
;
}
;
@@ -12980,7 +14345,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2662:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2673:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -12991,7 +14356,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2663:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2674:/ quasiblock");
/*^getslot */
@@ -13002,7 +14367,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2664:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2675:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), 0, "BINDER");
@@ -13010,7 +14375,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2665:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2676:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), 1, "MATCHBIND_DATA");
@@ -13018,7 +14383,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2666:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2677:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.BIND__V2*/ meltfptr[1]), 2, "MATCHBIND_NBOCC");
@@ -13028,8 +14393,13 @@ lab_endgetargs:;
;
/*_#NBOCC__L4*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.BOXNBOCC__V17*/ meltfptr[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:2671:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2682:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDATA__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13047,7 +14417,7 @@ lab_endgetargs:;
/*_.MDATA_CTYPE__V18*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2669:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2680:/ quasiblock");
/*^rawallocobj */
@@ -13106,14 +14476,14 @@ lab_endgetargs:;
(( /*_#NBOCC__L4*/ meltfnum[0]) + (1));;
{
- MELT_LOCATION ("warmelt-normatch.melt:2676:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2687:/ locexp");
melt_put_int ((melt_ptr_t) ( /*_.BOXNBOCC__V17*/ meltfptr[16]),
( /*_#I__L5*/ meltfnum[4]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2678:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2689:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.SYCMAP__V14*/ meltfptr[13]),
(meltobject_ptr_t) ( /*_.SYMB__V15*/
@@ -13123,7 +14493,7 @@ lab_endgetargs:;
;
/*_.LET___V13*/ meltfptr[11] = /*_.SYOCC__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:2663:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2674:/ clear");
/*clear *//*_.SYCMAP__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.SYMB__V15*/ meltfptr[14] = 0;
@@ -13139,11 +14509,11 @@ lab_endgetargs:;
/*clear *//*_.SYOCC__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_#I__L5*/ meltfnum[4] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13168,14 +14538,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND */
+} /*end meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -13196,7 +14566,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG_st
+ struct frame_meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -13235,7 +14605,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ getarg");
/*_.SPAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -13265,7 +14635,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13288,7 +14658,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13298,7 +14668,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -13308,7 +14678,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2857;
+ argtab[2].meltbp_long = 2868;
/*^apply.arg */
argtab[3].meltbp_cstring = "make_match_flag spat=";
/*^apply.arg */
@@ -13339,7 +14709,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -13352,7 +14722,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -13361,7 +14731,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2857:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2868:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -13376,7 +14746,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2858:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2869:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13385,7 +14755,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SPAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2858:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2869:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13393,7 +14763,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2858:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2869:/ cond.else");
/*^block */
/*anyblock */
@@ -13407,7 +14777,7 @@ lab_endgetargs:;
melt_assert_failed (("check spat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2858) ? (2858) : __LINE__, __FUNCTION__);
+ (2869) ? (2869) : __LINE__, __FUNCTION__);
;
}
;
@@ -13422,7 +14792,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2858:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2869:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -13435,7 +14805,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2859:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2870:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13444,7 +14814,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:2859:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2870:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13452,7 +14822,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2859:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2870:/ cond.else");
/*^block */
/*anyblock */
@@ -13466,7 +14836,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcx"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2859) ? (2859) : __LINE__, __FUNCTION__);
+ (2870) ? (2870) : __LINE__, __FUNCTION__);
;
}
;
@@ -13481,7 +14851,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2859:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2870:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -13494,7 +14864,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2860:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2871:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13502,7 +14872,7 @@ lab_endgetargs:;
/*_#IS_STRING__L5*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.STR__V4*/ meltfptr[3])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:2860:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2871:/ cond");
/*cond */ if ( /*_#IS_STRING__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13510,7 +14880,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2860:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2871:/ cond.else");
/*^block */
/*anyblock */
@@ -13524,7 +14894,7 @@ lab_endgetargs:;
melt_assert_failed (("check str"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2860) ? (2860) : __LINE__, __FUNCTION__);
+ (2871) ? (2871) : __LINE__, __FUNCTION__);
;
}
;
@@ -13539,7 +14909,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2860:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2871:/ clear");
/*clear *//*_#IS_STRING__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -13550,7 +14920,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2861:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2872:/ quasiblock");
/*^getslot */
@@ -13561,7 +14931,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2862:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2873:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), 8, "MCTX_FLAGS");
@@ -13575,8 +14945,14 @@ lab_endgetargs:;
/*_.LASTFLAG__V19*/ meltfptr[18] =
(melt_pair_head ((melt_ptr_t) ( /*_.LIST_LAST__V18*/ meltfptr[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:2864:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LASTFLAG__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:2875:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.LASTFLAG__V19*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13600,7 +14976,7 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.MFLAG_RANK__V20*/ meltfptr[19])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2866:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2877:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13608,7 +14984,7 @@ lab_endgetargs:;
/*_#IS_LIST__L7*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.FLAGLIST__V17*/ meltfptr[16]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:2866:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2877:/ cond");
/*cond */ if ( /*_#IS_LIST__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13616,7 +14992,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2866:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2877:/ cond.else");
/*^block */
/*anyblock */
@@ -13630,7 +15006,7 @@ lab_endgetargs:;
melt_assert_failed (("check flaglist"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2866) ? (2866) : __LINE__, __FUNCTION__);
+ (2877) ? (2877) : __LINE__, __FUNCTION__);
;
}
;
@@ -13645,7 +15021,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2866:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2877:/ clear");
/*clear *//*_#IS_LIST__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
@@ -13658,14 +15034,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#NULL__L8*/ meltfnum[1] =
(( /*_.LASTFLAG__V19*/ meltfptr[18]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ cond");
/*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13673,7 +15049,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ cond.else");
/*^block */
/*anyblock */
@@ -13686,7 +15062,7 @@ lab_endgetargs:;
/*_#OR___L9*/ meltfnum[8] = /*_#I__L10*/ meltfnum[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ clear");
/*clear *//*_#I__L10*/ meltfnum[9] = 0;
}
;
@@ -13700,7 +15076,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ cond.else");
/*^block */
/*anyblock */
@@ -13714,7 +15090,7 @@ lab_endgetargs:;
melt_assert_failed (("check lastrank"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2867) ? (2867) : __LINE__, __FUNCTION__);
+ (2878) ? (2878) : __LINE__, __FUNCTION__);
;
}
;
@@ -13729,7 +15105,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[21] = /*_.IFELSE___V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2867:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2878:/ clear");
/*clear *//*_#NULL__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_#OR___L9*/ meltfnum[8] = 0;
@@ -13742,7 +15118,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2868:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2879:/ quasiblock");
/*_#I__L11*/ meltfnum[9] =
@@ -13754,7 +15130,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[4])),
( /*_#I__L11*/ meltfnum[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:2869:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2880:/ quasiblock");
/*^rawallocobj */
@@ -13809,14 +15185,14 @@ lab_endgetargs:;
/*_.MFLAG__V27*/ meltfptr[26] = /*_.INST__V28*/ meltfptr[27];;
{
- MELT_LOCATION ("warmelt-normatch.melt:2877:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:2888:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.FLAGLIST__V17*/ meltfptr[16]),
(melt_ptr_t) ( /*_.MFLAG__V27*/ meltfptr[26]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13839,7 +15215,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13849,7 +15225,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13860,7 +15236,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2878;
+ argtab[2].meltbp_long = 2889;
/*^apply.arg */
argtab[3].meltbp_cstring = "make_match_flag return mflag";
/*^apply.arg */
@@ -13880,7 +15256,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0;
@@ -13893,7 +15269,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[29] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[29];;
@@ -13902,7 +15278,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[28] = /*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2878:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2889:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[29] = 0;
@@ -13919,7 +15295,7 @@ lab_endgetargs:;
/*_.LET___V25*/ meltfptr[23] = /*_.MFLAG__V27*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:2868:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2879:/ clear");
/*clear *//*_#I__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MAKE_INTEGERBOX__V26*/ meltfptr[25] = 0;
@@ -13929,7 +15305,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0;
/*_.LET___V15*/ meltfptr[13] = /*_.LET___V25*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-normatch.melt:2861:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2872:/ clear");
/*clear *//*_.SLOC__V16*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.FLAGLIST__V17*/ meltfptr[16] = 0;
@@ -13947,11 +15323,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V23*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_.LET___V25*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -13978,14 +15354,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG */
+} /*end meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14006,7 +15382,7 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV_st
+ struct frame_meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14045,7 +15421,7 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2901:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2912:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14073,14 +15449,14 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:2902:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2913:/ quasiblock");
/*_.DIS__V6*/ meltfptr[5] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14103,7 +15479,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14113,7 +15489,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -14123,7 +15499,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2903;
+ argtab[2].meltbp_long = 2914;
/*^apply.arg */
argtab[3].meltbp_cstring = "scansubpat_anyrecv recv=";
/*^apply.arg */
@@ -14148,7 +15524,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -14161,7 +15537,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -14170,7 +15546,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2903:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2914:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -14183,7 +15559,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2904:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2915:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[5]), 1, "NAMED_NAME");
@@ -14202,7 +15578,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2905:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2916:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14215,7 +15591,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2905:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2916:/ cond.else");
/*^block */
/*anyblock */
@@ -14229,7 +15605,7 @@ lab_endgetargs:;
melt_assert_failed (("@$@unexpected scansubpat_anyrecv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2905) ? (2905) : __LINE__, __FUNCTION__);
+ (2916) ? (2916) : __LINE__, __FUNCTION__);
;
}
;
@@ -14244,7 +15620,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2905:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2916:/ clear");
/*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
}
@@ -14257,7 +15633,7 @@ lab_endgetargs:;
/*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V12*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-normatch.melt:2902:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2913:/ clear");
/*clear *//*_.DIS__V6*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
@@ -14265,11 +15641,11 @@ lab_endgetargs:;
/*clear *//*_.NAMED_NAME__V11*/ meltfptr[7] = 0;
/*^clear */
/*clear *//*_.IFCPP___V12*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:2901:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2912:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:2901:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:2912:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14288,23 +15664,24 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV */
+} /*end meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -14316,7 +15693,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP_st
+ struct frame_meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14327,8 +15704,8 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 9
- void *mcfr_varptr[9];
+#define MELTFRAM_NBVARPTR 13
+ void *mcfr_varptr[13];
#define MELTFRAM_NBVARNUM 2
long mcfr_varnum[2];
/*others*/
@@ -14341,21 +15718,21 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 9; ix++)
+ for (ix = 0; ix < 13; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 9;
+ meltfram__.mcfr_nbvar = 13;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_NOOP", meltcallcount);
+ melt_trace_start ("SCANSTEPDATA_ANYRECV", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2920:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14383,9 +15760,14 @@ lab_endgetargs:;
/*anyblock*/
{
+ MELT_LOCATION ("warmelt-normatch.melt:2921:/ quasiblock");
+
+
+ /*_.DIS__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14408,7 +15790,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14418,115 +15800,199 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2910;
+ argtab[2].meltbp_long = 2922;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_noop recv=";
+ argtab[3].meltbp_cstring = "scanstepdata_anyrecv recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " of discrim=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V6*/ meltfptr[5];
+ /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
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 MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V6*/ meltfptr[5] = NULL;;
+ /*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ quasiblock");
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
/*^compute */
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2910:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2922:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*clear *//*_.IF___V8*/ meltfptr[7] = 0;
/*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ /*clear *//*_.PROGN___V10*/ meltfptr[8] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+ /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2923:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[5]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V11*/
+ meltfptr[7] = slot;
+ };
+ ;
+ {
+ /*^locexp */
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unexpected scan_step_data for"),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V11*/ meltfptr[7])));
+ }
+ ;
- /*_.RETVAL___V9*/ meltfptr[5] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ quasiblock");
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2924:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2924:/ cond.else");
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETVAL___V9*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ finalreturn");
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected scanstepdata_anyrecv"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2924) ? (2924) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2924:/ clear");
+ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[8] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
- /*finalret */ goto labend_rout;
+ /*^compute */
+
+ /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V12*/ meltfptr[8];;
+ MELT_LOCATION ("warmelt-normatch.melt:2921:/ clear");
+ /*clear *//*_.DIS__V6*/ meltfptr[5] = 0;
/*^clear */
- /*clear *//*_.RETVAL___V9*/ meltfptr[5] = 0;
+ /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V11*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V12*/ meltfptr[8] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2920:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-normatch.melt:2920:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
/*epilog */
/*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*clear *//*_.LET___V5*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_NOOP", meltcallcount);
+ melt_trace_end ("SCANSTEPDATA_ANYRECV", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP */
+} /*end meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un * meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un * meltxrestab_)
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -14538,7 +16004,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_56_warmelt_normatch_SCANSUBPAT_OR_st
+ struct frame_meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14549,10 +16015,10 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 11
- void *mcfr_varptr[11];
-#define MELTFRAM_NBVARNUM 3
- long mcfr_varnum[3];
+#define MELTFRAM_NBVARPTR 13
+ void *mcfr_varptr[13];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
/*others*/
long _spare_;
}
@@ -14563,21 +16029,21 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 11; ix++)
+ for (ix = 0; ix < 13; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 11;
+ meltfram__.mcfr_nbvar = 13;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_OR", meltcallcount);
+ melt_trace_start ("SCANSTEPFLAG_ANYRECV", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2916:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2928:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14605,9 +16071,14 @@ lab_endgetargs:;
/*anyblock*/
{
+ MELT_LOCATION ("warmelt-normatch.melt:2929:/ quasiblock");
+
+
+ /*_.DIS__V6*/ meltfptr[5] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14630,7 +16101,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14640,162 +16111,420 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2917;
+ argtab[2].meltbp_long = 2930;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_or recv=";
+ argtab[3].meltbp_cstring = "scanstepflag_anyrecv recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " of discrim=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V6*/ meltfptr[5];
+ /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
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 MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V6*/ meltfptr[5] = NULL;;
+ /*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ quasiblock");
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
/*^compute */
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2917:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2930:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*clear *//*_.IF___V8*/ meltfptr[7] = 0;
/*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ /*clear *//*_.PROGN___V10*/ meltfptr[8] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+ /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2918:/ quasiblock");
-
-
- /*^getslot */
+ MELT_LOCATION ("warmelt-normatch.melt:2931:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ORPAT_DISJ");
- /*_.DISJTUP__V9*/
- meltfptr[5] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V6*/ meltfptr[5]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V11*/
+ meltfptr[7] = slot;
};
;
- /*citerblock FOREACH_IN_MULTIPLE */
+
{
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.DISJTUP__V9*/ meltfptr[5]);
- for ( /*_#DIX__L3*/ meltfnum[1] = 0;
- ( /*_#DIX__L3*/ meltfnum[1] >= 0)
- && ( /*_#DIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#DIX__L3*/ meltfnum[1]++)
+ /*^locexp */
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unexpected scan_step_flag for"),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V11*/ meltfptr[7])));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2932:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
{
- /*_.CURDISJ__V10*/ meltfptr[6] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.DISJTUP__V9*/ meltfptr[5]),
- /*_#DIX__L3*/ meltfnum[1]);
+ /*^cond.then */
+ /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2932:/ cond.else");
+ /*^block */
+ /*anyblock */
+ {
- MELT_LOCATION ("warmelt-normatch.melt:2922:/ apply");
- /*apply */
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected scanstepflag_anyrecv"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2932) ? (2932) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2932:/ clear");
+ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[8] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V12*/ meltfptr[8];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:2929:/ clear");
+ /*clear *//*_.DIS__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V11*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V12*/ meltfptr[8] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2928:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-normatch.melt:2928:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V5*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPFLAG_ANYRECV", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 9
+ void *mcfr_varptr[9];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 9; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 9;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSUBPAT_NOOP", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2937:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:2937:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
{
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V11*/ meltfptr[10] =
- melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CURDISJ__V10*/ meltfptr[6]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2937:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2937;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scansubpat_noop recv=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2937:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
}
;
- if ( /*_#DIX__L3*/ meltfnum[1] < 0)
- break;
- } /* end cit1__EACHTUP */
+ }
+ else
+ { /*^cond.else */
- /*citerepilog */
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2937:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2919:/ clear");
- /*clear *//*_.CURDISJ__V10*/ meltfptr[6] = 0;
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2937:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_#DIX__L3*/ meltfnum[1] = 0;
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
/*^clear */
- /*clear *//*_.FUN__V11*/ meltfptr[10] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2918:/ clear");
- /*clear *//*_.DISJTUP__V9*/ meltfptr[5] = 0;
+
+ /*_.RETVAL___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETVAL___V9*/ meltfptr[5];;
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+
+ /*^clear */
+ /*clear *//*_.RETVAL___V9*/ meltfptr[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2916:/ clear");
+ /*^clear */
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_OR", meltcallcount);
+ melt_trace_end ("SCANSUBPAT_NOOP", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_56_warmelt_normatch_SCANSUBPAT_OR */
+} /*end meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un * meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un * meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -14807,7 +16536,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_57_warmelt_normatch_SCANSUBPAT_AND_st
+ struct frame_meltrout_59_warmelt_normatch_SCANSUBPAT_OR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14842,11 +16571,11 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_AND", meltcallcount);
+ melt_trace_start ("SCANSUBPAT_OR", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2925:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2943:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14876,7 +16605,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14899,7 +16628,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14909,7 +16638,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14919,9 +16648,9 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2926;
+ argtab[2].meltbp_long = 2944;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_and recv=";
+ argtab[3].meltbp_cstring = "scansubpat_or recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
@@ -14938,7 +16667,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -14951,7 +16680,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -14960,7 +16689,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2944:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -14973,14 +16702,14 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2927:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2945:/ quasiblock");
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ANDPAT_CONJ");
- /*_.CONJTUP__V9*/
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ORPAT_DISJ");
+ /*_.DISJTUP__V9*/
meltfptr[5] = slot;
};
;
@@ -14988,19 +16717,19 @@ lab_endgetargs:;
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.CONJTUP__V9*/ meltfptr[5]);
- for ( /*_#CIX__L3*/ meltfnum[1] = 0;
- ( /*_#CIX__L3*/ meltfnum[1] >= 0)
- && ( /*_#CIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#CIX__L3*/ meltfnum[1]++)
+ melt_multiple_length ((melt_ptr_t) /*_.DISJTUP__V9*/ meltfptr[5]);
+ for ( /*_#DIX__L3*/ meltfnum[1] = 0;
+ ( /*_#DIX__L3*/ meltfnum[1] >= 0)
+ && ( /*_#DIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#DIX__L3*/ meltfnum[1]++)
{
- /*_.CURCONJ__V10*/ meltfptr[6] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.CONJTUP__V9*/ meltfptr[5]),
- /*_#CIX__L3*/ meltfnum[1]);
+ /*_.CURDISJ__V10*/ meltfptr[6] =
+ melt_multiple_nth ((melt_ptr_t) ( /*_.DISJTUP__V9*/ meltfptr[5]),
+ /*_#DIX__L3*/ meltfnum[1]);
- MELT_LOCATION ("warmelt-normatch.melt:2931:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2949:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -15010,62 +16739,61 @@ lab_endgetargs:;
(melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
/*_.FUN__V11*/ meltfptr[10] =
melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CURCONJ__V10*/ meltfptr[6]),
+ (melt_ptr_t) ( /*_.CURDISJ__V10*/ meltfptr[6]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- if ( /*_#CIX__L3*/ meltfnum[1] < 0)
+ if ( /*_#DIX__L3*/ meltfnum[1] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2928:/ clear");
- /*clear *//*_.CURCONJ__V10*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2946:/ clear");
+ /*clear *//*_.CURDISJ__V10*/ meltfptr[6] = 0;
/*^clear */
- /*clear *//*_#CIX__L3*/ meltfnum[1] = 0;
+ /*clear *//*_#DIX__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.FUN__V11*/ meltfptr[10] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:2927:/ clear");
- /*clear *//*_.CONJTUP__V9*/ meltfptr[5] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2945:/ clear");
+ /*clear *//*_.DISJTUP__V9*/ meltfptr[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2925:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2943:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_AND", meltcallcount);
+ melt_trace_end ("SCANSUBPAT_OR", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*noretval */ NULL);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_57_warmelt_normatch_SCANSUBPAT_AND */
+} /*end meltrout_59_warmelt_normatch_SCANSUBPAT_OR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -15077,7 +16805,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT_st
+ struct frame_meltrout_60_warmelt_normatch_SCANSUBPAT_AND_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15088,10 +16816,10 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 11
- void *mcfr_varptr[11];
-#define MELTFRAM_NBVARNUM 3
- long mcfr_varnum[3];
+#define MELTFRAM_NBVARPTR 15
+ void *mcfr_varptr[15];
+#define MELTFRAM_NBVARNUM 5
+ long mcfr_varnum[5];
/*others*/
long _spare_;
}
@@ -15102,21 +16830,21 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 11; ix++)
+ for (ix = 0; ix < 15; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 11;
+ meltfram__.mcfr_nbvar = 15;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_CONSTRUCT", meltcallcount);
+ melt_trace_start ("SCANSUBPAT_AND", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2935:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2952:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15146,7 +16874,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15169,7 +16897,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15179,7 +16907,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15189,9 +16917,9 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2936;
+ argtab[2].meltbp_long = 2953;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_construct recv=";
+ argtab[3].meltbp_cstring = "scansubpat_and recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
@@ -15208,7 +16936,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -15221,7 +16949,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -15230,7 +16958,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2936:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2953:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -15243,14 +16971,14 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2937:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2954:/ quasiblock");
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "CTPAT_SUBPA");
- /*_.SUBPATUP__V9*/
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ANDPAT_CONJ");
+ /*_.CONJTUP__V9*/
meltfptr[5] = slot;
};
;
@@ -15258,19 +16986,126 @@ lab_endgetargs:;
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.SUBPATUP__V9*/ meltfptr[5]);
- for ( /*_#PIX__L3*/ meltfnum[1] = 0;
- ( /*_#PIX__L3*/ meltfnum[1] >= 0)
- && ( /*_#PIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#PIX__L3*/ meltfnum[1]++)
+ melt_multiple_length ((melt_ptr_t) /*_.CONJTUP__V9*/ meltfptr[5]);
+ for ( /*_#CIX__L3*/ meltfnum[1] = 0;
+ ( /*_#CIX__L3*/ meltfnum[1] >= 0)
+ && ( /*_#CIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#CIX__L3*/ meltfnum[1]++)
{
- /*_.CURPA__V10*/ meltfptr[6] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.SUBPATUP__V9*/ meltfptr[5]),
- /*_#PIX__L3*/ meltfnum[1]);
+ /*_.CURCONJ__V10*/ meltfptr[6] =
+ melt_multiple_nth ((melt_ptr_t) ( /*_.CONJTUP__V9*/ meltfptr[5]),
+ /*_#CIX__L3*/ meltfnum[1]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2958:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:2958:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2958:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2958;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scansubpat_and curconj=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCONJ__V10*/ meltfptr[6];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " cix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#CIX__L3*/ meltfnum[1];
+ /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V12*/ meltfptr[11] =
+ /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
+ /*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2941:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2958:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V12*/ meltfptr[11] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2958:/ quasiblock");
+
+
+ /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2958:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V14*/ meltfptr[12] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2959:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -15278,63 +17113,66 @@ lab_endgetargs:;
/*^apply.arg */
argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V11*/ meltfptr[10] =
+ /*_.FUN__V15*/ meltfptr[11] =
melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CURPA__V10*/ meltfptr[6]),
+ (melt_ptr_t) ( /*_.CURCONJ__V10*/ meltfptr[6]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- if ( /*_#PIX__L3*/ meltfnum[1] < 0)
+ if ( /*_#CIX__L3*/ meltfnum[1] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2938:/ clear");
- /*clear *//*_.CURPA__V10*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2955:/ clear");
+ /*clear *//*_.CURCONJ__V10*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_#CIX__L3*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_#PIX__L3*/ meltfnum[1] = 0;
+ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
/*^clear */
- /*clear *//*_.FUN__V11*/ meltfptr[10] = 0;
+ /*clear *//*_.FUN__V15*/ meltfptr[11] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:2937:/ clear");
- /*clear *//*_.SUBPATUP__V9*/ meltfptr[5] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2954:/ clear");
+ /*clear *//*_.CONJTUP__V9*/ meltfptr[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2935:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2952:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_CONSTRUCT", meltcallcount);
+ melt_trace_end ("SCANSUBPAT_AND", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*noretval */ NULL);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT */
+} /*end meltrout_60_warmelt_normatch_SCANSUBPAT_AND */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -15346,7 +17184,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT_st
+ struct frame_meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15357,10 +17195,10 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 13
- void *mcfr_varptr[13];
-#define MELTFRAM_NBVARNUM 4
- long mcfr_varnum[4];
+#define MELTFRAM_NBVARPTR 25
+ void *mcfr_varptr[25];
+#define MELTFRAM_NBVARNUM 10
+ long mcfr_varnum[10];
/*others*/
long _spare_;
}
@@ -15371,21 +17209,21 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 13; ix++)
+ for (ix = 0; ix < 25; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 13;
+ meltfram__.mcfr_nbvar = 25;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_OBJECT", meltcallcount);
+ melt_trace_start ("SCANSUBPAT_CONSTRUCT", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2944:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2963:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15415,7 +17253,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15438,7 +17276,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15448,28 +17286,34 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2945;
+ argtab[2].meltbp_long = 2964;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_object recv=";
+ argtab[3].meltbp_cstring = "scansubpat_construct recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " fun=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FUN__V3*/ meltfptr[2];
/*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
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 MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -15477,7 +17321,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -15490,7 +17334,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -15499,7 +17343,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2945:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2964:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -15512,140 +17356,508 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2946:/ quasiblock");
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2965:/ locexp");
- /*^getslot */
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("scansubpat_construct"), (10));
+#endif
+ ;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2966:/ cppif.then");
+ /*^block */
+ /*anyblock */
{
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 4, "SPAT_FIELDS");
- /*_.PATFIELTUP__V9*/
- meltfptr[5] = slot;
- };
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTRUCT */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2966:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:2966:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check recv"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (2966) ? (2966) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2966:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2967:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTRUCT */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "CTPAT_SUBPA");
+ /*_.SUBPATUP__V11*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.SUBPATUP__V11*/ meltfptr[6] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2968:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:2968:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2968:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2968;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scansubpat_construct subpatup=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SUBPATUP__V11*/ meltfptr[6];
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
+ 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);
+ }
+ ;
+ /*_.IF___V13*/ meltfptr[12] =
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2968:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2968:/ quasiblock");
+
+
+ /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[11] = /*_.PROGN___V15*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2968:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
/*citerblock FOREACH_IN_MULTIPLE */
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.PATFIELTUP__V9*/ meltfptr[5]);
- for ( /*_#FLIX__L3*/ meltfnum[1] = 0;
- ( /*_#FLIX__L3*/ meltfnum[1] >= 0)
- && ( /*_#FLIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#FLIX__L3*/ meltfnum[1]++)
+ melt_multiple_length ((melt_ptr_t) /*_.SUBPATUP__V11*/ meltfptr[6]);
+ for ( /*_#PIX__L6*/ meltfnum[1] = 0;
+ ( /*_#PIX__L6*/ meltfnum[1] >= 0)
+ && ( /*_#PIX__L6*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#PIX__L6*/ meltfnum[1]++)
{
- /*_.CURPATFLD__V10*/ meltfptr[6] =
+ /*_.CURPA__V16*/ meltfptr[12] =
melt_multiple_nth ((melt_ptr_t)
- ( /*_.PATFIELTUP__V9*/ meltfptr[5]),
- /*_#FLIX__L3*/ meltfnum[1]);
+ ( /*_.SUBPATUP__V11*/ meltfptr[6]),
+ /*_#PIX__L6*/ meltfnum[1]);
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURPATFLD__V10*/ meltfptr[6]),
- (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2950:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2972:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
{
- /*^cond.then */
- /*^block */
- /*anyblock */
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-normatch.melt:2972:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
-
- MELT_LOCATION ("warmelt-normatch.melt:2951:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPATFLD__V10*/ meltfptr[6]), 3, "SPAF_PATTERN");
- /*_.SPAF_PATTERN__V12*/
- meltfptr[11] = slot;
- };
- ;
- /*^apply */
- /*apply */
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
{
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V13*/ meltfptr[12] =
- melt_apply ((meltclosure_ptr_t)
- ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.SPAF_PATTERN__V12*/
- meltfptr[11]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2972:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2972;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "scansubpat_construct before curpa=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURPA__V16*/ meltfptr[12];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " pix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#PIX__L6*/ meltfnum[1];
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V18*/ meltfptr[17] =
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2972:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
}
;
- /*_.IF___V11*/ meltfptr[10] = /*_.FUN__V13*/ meltfptr[12];;
- /*epilog */
+ }
+ else
+ { /*^cond.else */
- MELT_LOCATION ("warmelt-normatch.melt:2950:/ clear");
- /*clear *//*_.SPAF_PATTERN__V12*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.FUN__V13*/ meltfptr[12] = 0;
+ /*_.IF___V18*/ meltfptr[17] = NULL;;
}
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2972:/ quasiblock");
+
+
+ /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IFCPP___V17*/ meltfptr[13] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2972:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V17*/ meltfptr[13] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2973:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V21*/ meltfptr[17] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CURPA__V16*/ meltfptr[12]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2974:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
;
}
- else
- { /*^cond.else */
+ ;
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
+ /*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-normatch.melt:2974:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
- /*_.IF___V11*/ meltfptr[10] = NULL;;
- }
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2974:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2974;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "scansubpat_construct after curpa=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURPA__V16*/ meltfptr[12];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " pix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#PIX__L6*/ meltfnum[1];
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V23*/ meltfptr[22] =
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2974:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V23*/ meltfptr[22] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2974:/ quasiblock");
+
+
+ /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
+ /*^compute */
+
+ /*_.IFCPP___V22*/ meltfptr[18] = /*_.PROGN___V25*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2974:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V25*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
- if ( /*_#FLIX__L3*/ meltfnum[1] < 0)
+ if ( /*_#PIX__L6*/ meltfnum[1] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2947:/ clear");
- /*clear *//*_.CURPATFLD__V10*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2969:/ clear");
+ /*clear *//*_.CURPA__V16*/ meltfptr[12] = 0;
/*^clear */
- /*clear *//*_#FLIX__L3*/ meltfnum[1] = 0;
+ /*clear *//*_#PIX__L6*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*clear *//*_.IFCPP___V17*/ meltfptr[13] = 0;
/*^clear */
- /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
+ /*clear *//*_.FUN__V21*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:2946:/ clear");
- /*clear *//*_.PATFIELTUP__V9*/ meltfptr[5] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2967:/ clear");
+ /*clear *//*_.SUBPATUP__V11*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2944:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2963:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_OBJECT", meltcallcount);
+ melt_trace_end ("SCANSUBPAT_CONSTRUCT", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*noretval */ NULL);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT */
+} /*end meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -15657,7 +17869,7 @@ meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT_st
+ struct frame_meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15668,10 +17880,10 @@ meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 11
- void *mcfr_varptr[11];
-#define MELTFRAM_NBVARNUM 3
- long mcfr_varnum[3];
+#define MELTFRAM_NBVARPTR 13
+ void *mcfr_varptr[13];
+#define MELTFRAM_NBVARNUM 4
+ long mcfr_varnum[4];
/*others*/
long _spare_;
}
@@ -15682,21 +17894,21 @@ meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 11; ix++)
+ for (ix = 0; ix < 13; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 11;
+ meltfram__.mcfr_nbvar = 13;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSUBPAT_CONSTRUCT", meltcallcount);
+ melt_trace_start ("SCANSUBPAT_OBJECT", meltcallcount);
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2954:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2978:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15726,7 +17938,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15749,7 +17961,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15759,7 +17971,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15769,9 +17981,9 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2955;
+ argtab[2].meltbp_long = 2979;
/*^apply.arg */
- argtab[3].meltbp_cstring = "scansubpat_construct recv=";
+ argtab[3].meltbp_cstring = "scansubpat_object recv=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
@@ -15788,7 +18000,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -15801,7 +18013,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -15810,7 +18022,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2955:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2979:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -15823,14 +18035,14 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2956:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2980:/ quasiblock");
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "CTPAT_SUBPA");
- /*_.OUTUP__V9*/
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 4, "SPAT_FIELDS");
+ /*_.PATFIELTUP__V9*/
meltfptr[5] = slot;
};
;
@@ -15838,74 +18050,115 @@ lab_endgetargs:;
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.OUTUP__V9*/ meltfptr[5]);
- for ( /*_#OIX__L3*/ meltfnum[1] = 0;
- ( /*_#OIX__L3*/ meltfnum[1] >= 0)
- && ( /*_#OIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#OIX__L3*/ meltfnum[1]++)
+ melt_multiple_length ((melt_ptr_t) /*_.PATFIELTUP__V9*/ meltfptr[5]);
+ for ( /*_#FLIX__L3*/ meltfnum[1] = 0;
+ ( /*_#FLIX__L3*/ meltfnum[1] >= 0)
+ && ( /*_#FLIX__L3*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#FLIX__L3*/ meltfnum[1]++)
{
- /*_.CUROUT__V10*/ meltfptr[6] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.OUTUP__V9*/ meltfptr[5]),
- /*_#OIX__L3*/ meltfnum[1]);
+ /*_.CURPATFLD__V10*/ meltfptr[6] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.PATFIELTUP__V9*/ meltfptr[5]),
+ /*_#FLIX__L3*/ meltfnum[1]);
- MELT_LOCATION ("warmelt-normatch.melt:2960:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V11*/ meltfptr[10] =
- melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CUROUT__V10*/ meltfptr[6]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATFLD__V10*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:2984:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:2985:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPATFLD__V10*/ meltfptr[6]), 3, "SPAF_PATTERN");
+ /*_.SPAF_PATTERN__V12*/
+ meltfptr[11] = slot;
+ };
+ ;
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V13*/ meltfptr[12] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.SPAF_PATTERN__V12*/
+ meltfptr[11]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V11*/ meltfptr[10] = /*_.FUN__V13*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2984:/ clear");
+ /*clear *//*_.SPAF_PATTERN__V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.FUN__V13*/ meltfptr[12] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V11*/ meltfptr[10] = NULL;;
+ }
;
- if ( /*_#OIX__L3*/ meltfnum[1] < 0)
+ if ( /*_#FLIX__L3*/ meltfnum[1] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:2957:/ clear");
- /*clear *//*_.CUROUT__V10*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2981:/ clear");
+ /*clear *//*_.CURPATFLD__V10*/ meltfptr[6] = 0;
/*^clear */
- /*clear *//*_#OIX__L3*/ meltfnum[1] = 0;
+ /*clear *//*_#FLIX__L3*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.FUN__V11*/ meltfptr[10] = 0;
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:2956:/ clear");
- /*clear *//*_.OUTUP__V9*/ meltfptr[5] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2980:/ clear");
+ /*clear *//*_.PATFIELTUP__V9*/ meltfptr[5] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2954:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2978:/ clear");
/*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("SCANSUBPAT_CONSTRUCT", meltcallcount);
+ melt_trace_end ("SCANSUBPAT_OBJECT", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
return (melt_ptr_t) ( /*noretval */ NULL);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT */
+} /*end meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -15926,7 +18179,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_61_warmelt_normatch_FILL_MATCHCASE_st
+ struct frame_meltrout_63_warmelt_normatch_FILL_MATCHCASE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15937,10 +18190,10 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 20
- void *mcfr_varptr[20];
-#define MELTFRAM_NBVARNUM 5
- long mcfr_varnum[5];
+#define MELTFRAM_NBVARPTR 31
+ void *mcfr_varptr[31];
+#define MELTFRAM_NBVARNUM 11
+ long mcfr_varnum[11];
/*others*/
long _spare_;
}
@@ -15951,13 +18204,13 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 20; ix++)
+ for (ix = 0; ix < 31; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 20;
+ meltfram__.mcfr_nbvar = 31;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -15965,7 +18218,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ getarg");
/*_.CURMCASE__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15987,7 +18240,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16010,7 +18263,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16020,7 +18273,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16030,7 +18283,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2965;
+ argtab[2].meltbp_long = 2990;
/*^apply.arg */
argtab[3].meltbp_cstring = "fill_matchcase curmcase";
/*^apply.arg */
@@ -16049,7 +18302,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -16062,7 +18315,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -16071,7 +18324,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2965:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2990:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -16086,7 +18339,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2966:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:2991:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16095,7 +18348,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2966:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:2991:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16103,7 +18356,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:2966:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:2991:/ cond.else");
/*^block */
/*anyblock */
@@ -16117,7 +18370,7 @@ lab_endgetargs:;
melt_assert_failed (("check curmcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (2966) ? (2966) : __LINE__, __FUNCTION__);
+ (2991) ? (2991) : __LINE__, __FUNCTION__);
;
}
;
@@ -16132,7 +18385,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2966:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2991:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -16143,14 +18396,14 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2967:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:2992:/ quasiblock");
/*_.OURPATVARMAP__V10*/ meltfptr[5] =
(meltgc_new_mapobjects
((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[2])),
(17)));;
- MELT_LOCATION ("warmelt-normatch.melt:2969:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2994:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 2, "MCASE_SOURCE");
@@ -16158,7 +18411,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2970:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:2995:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V11*/ meltfptr[10]), 2, "SCAM_PATT");
@@ -16166,12 +18419,112 @@ lab_endgetargs:;
meltfptr[11] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:2972:/ blockmultialloc");
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:2997:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:2997:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:2997:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 2997;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "fill_matchcase ourpatvarmap=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
+ /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] =
+ 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);
+ }
+ ;
+ /*_.IF___V14*/ meltfptr[13] =
+ /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2997:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V14*/ meltfptr[13] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2997:/ quasiblock");
+
+
+ /*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
+ /*^compute */
+
+ /*_.IFCPP___V13*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:2997:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V16*/ meltfptr[14] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:2998:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
{
- struct MELT_CLOSURE_STRUCT (0) rclo_0__VARPATSCANNER;
+ struct MELT_CLOSURE_STRUCT (2) rclo_0__VARPATSCANNER;
long meltletrec_1_endgap;
} *meltletrec_1_ptr = 0;
meltletrec_1_ptr =
@@ -16179,33 +18532,175 @@ lab_endgetargs:;
meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
/*^blockmultialloc.initfill */
/*iniclos rclo_0__VARPATSCANNER */
- /*_.VARPATSCANNER__V14*/ meltfptr[13] =
+ /*_.VARPATSCANNER__V18*/ meltfptr[14] =
(void *) &meltletrec_1_ptr->rclo_0__VARPATSCANNER;
meltletrec_1_ptr->rclo_0__VARPATSCANNER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- meltletrec_1_ptr->rclo_0__VARPATSCANNER.nbval = 0;
+ meltletrec_1_ptr->rclo_0__VARPATSCANNER.nbval = 2;
meltletrec_1_ptr->rclo_0__VARPATSCANNER.rout =
- (meltroutine_ptr_t) (( /*!konst_6 */ meltfrout->tabval[6]));
+ (meltroutine_ptr_t) (( /*!konst_7 */ meltfrout->tabval[7]));
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ putclosurout");
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ putclosurout");
/*putclosurout#1 */
melt_assertmsg ("putclosrout#1 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VARPATSCANNER__V14*/
- meltfptr[13])) == MELTOBMAG_CLOSURE);
+ ( /*_.VARPATSCANNER__V18*/
+ meltfptr[14])) == MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#1 checkrout",
melt_magic_discr ((melt_ptr_t)
- (( /*!konst_6 */ meltfrout->
- tabval[6]))) == MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VARPATSCANNER__V14*/ meltfptr[13])->rout =
- (meltroutine_ptr_t) (( /*!konst_6 */ meltfrout->tabval[6]));
+ (( /*!konst_7 */ meltfrout->
+ tabval[7]))) == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VARPATSCANNER__V18*/ meltfptr[14])->rout =
+ (meltroutine_ptr_t) (( /*!konst_7 */ meltfrout->tabval[7]));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VARPATSCANNER__V18*/
+ meltfptr[14])) == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.VARPATSCANNER__V18*/
+ meltfptr[14])));
+ ((meltclosure_ptr_t) /*_.VARPATSCANNER__V18*/ meltfptr[14])->tabval[0] =
+ (melt_ptr_t) ( /*_.OURPATVARMAP__V10*/ meltfptr[5]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VARPATSCANNER__V18*/
+ meltfptr[14])) == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 1 >= 0
+ && 1 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.VARPATSCANNER__V18*/
+ meltfptr[14])));
+ ((meltclosure_ptr_t) /*_.VARPATSCANNER__V18*/ meltfptr[14])->tabval[1] =
+ (melt_ptr_t) ( /*_.VARPATSCANNER__V18*/ meltfptr[14]);
;
/*^touch */
- meltgc_touch ( /*_.VARPATSCANNER__V14*/ meltfptr[13]);
+ meltgc_touch ( /*_.VARPATSCANNER__V18*/ meltfptr[14]);
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3028:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L6*/ 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-normatch.melt:3028:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3028:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3028;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "fill_matchcase before varpatscanner curpat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURPAT__V12*/ meltfptr[11];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " ourpatvarmap=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n varpatscanner=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VARPATSCANNER__V18*/ meltfptr[14];
+ /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V20*/ meltfptr[19] =
+ /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3028:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V20*/ meltfptr[19] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3028:/ quasiblock");
+
+
+ /*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
+ /*^compute */
+
+ /*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3028:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V20*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V22*/ meltfptr[20] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2989:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3029:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -16213,50 +18708,142 @@ lab_endgetargs:;
/*^apply.arg */
argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
- /*_.VARPATSCANNER__V15*/ meltfptr[14] =
+ /*_.VARPATSCANNER__V23*/ meltfptr[19] =
melt_apply ((meltclosure_ptr_t)
- ( /*_.VARPATSCANNER__V14*/ meltfptr[13]),
+ ( /*_.VARPATSCANNER__V18*/ meltfptr[14]),
(melt_ptr_t) ( /*_.CURPAT__V12*/ meltfptr[11]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2990:/ msend");
- /*msend */
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3030:/ cppif.then");
+ /*^block */
+ /*anyblock */
{
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VARPATSCANNER__V14*/ meltfptr[13];
- /*^ojbmsend.arg */
- argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
- /*_.SCAN_SUBPATTERNS__V16*/ meltfptr[15] =
- meltgc_send ((melt_ptr_t) ( /*_.CURPAT__V12*/ meltfptr[11]),
- (melt_ptr_t) (( /*!SCAN_SUBPATTERNS */ meltfrout->
- tabval[7])),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L8*/ meltfnum[0] =
+ /*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-normatch.melt:3030:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3030:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3030;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "fill_matchcase after varpatscanner curpat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURPAT__V12*/ meltfptr[11];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n ourpatvarmap=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
+ /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V25*/ meltfptr[24] =
+ /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3030:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V25*/ meltfptr[24] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3030:/ quasiblock");
+
+
+ /*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
+ /*^compute */
+
+ /*_.IFCPP___V24*/ meltfptr[20] = /*_.PROGN___V27*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3030:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V27*/ meltfptr[25] = 0;
}
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V24*/ meltfptr[20] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
- /*_.LETREC___V13*/ meltfptr[12] =
- /*_.SCAN_SUBPATTERNS__V16*/ meltfptr[15];;
+ /*^compute */
+
+ /*_.LETREC___V17*/ meltfptr[13] = /*_.IFCPP___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2972:/ clear");
- /*clear *//*_.VARPATSCANNER__V14*/ meltfptr[13] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:2998:/ clear");
+ /*clear *//*_.VARPATSCANNER__V18*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.VARPATSCANNER__V18*/ meltfptr[14] = 0;
/*^clear */
- /*clear *//*_.VARPATSCANNER__V14*/ meltfptr[13] = 0;
+ /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
/*^clear */
- /*clear *//*_.VARPATSCANNER__V15*/ meltfptr[14] = 0;
+ /*clear *//*_.VARPATSCANNER__V23*/ meltfptr[19] = 0;
/*^clear */
- /*clear *//*_.SCAN_SUBPATTERNS__V16*/ meltfptr[15] = 0;
+ /*clear *//*_.IFCPP___V24*/ meltfptr[20] = 0;
} /*end multiallocblock */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16271,7 +18858,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L10*/ meltfnum[1] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -16279,112 +18866,136 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2992;
+ argtab[2].meltbp_long = 3032;
/*^apply.arg */
- argtab[3].meltbp_cstring = "fill_matchcase ourpatvarmap";
+ argtab[3].meltbp_cstring = "fill_matchcase final ourpatvarmap=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.OURPATVARMAP__V10*/ meltfptr[5];
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[15] =
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " for curmcase=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURMCASE__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[14] =
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 MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.IF___V18*/ meltfptr[14] =
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[15];;
+ /*_.IF___V29*/ meltfptr[25] =
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[15] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[14] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V18*/ meltfptr[14] = NULL;;
+ /*_.IF___V29*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ quasiblock");
- /*_.PROGN___V20*/ meltfptr[15] = /*_.IF___V18*/ meltfptr[14];;
+ /*_.PROGN___V31*/ meltfptr[18] = /*_.IF___V29*/ meltfptr[25];;
/*^compute */
- /*_.IFCPP___V17*/ meltfptr[13] = /*_.PROGN___V20*/ meltfptr[15];;
+ /*_.IFCPP___V28*/ meltfptr[24] = /*_.PROGN___V31*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2992:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3032:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IF___V18*/ meltfptr[14] = 0;
+ /*clear *//*_.IF___V29*/ meltfptr[25] = 0;
/*^clear */
- /*clear *//*_.PROGN___V20*/ meltfptr[15] = 0;
+ /*clear *//*_.PROGN___V31*/ meltfptr[18] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V17*/ meltfptr[13] = ( /*nil */ NULL);
+ /*_.IFCPP___V28*/ meltfptr[24] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2993:/ quasiblock");
-
+ MELT_LOCATION ("warmelt-normatch.melt:3033:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMCASE__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_CASE */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCASE_VARMAP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.CURMCASE__V2*/ meltfptr[1])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.CURMCASE__V2*/ meltfptr[1]), (4),
- ( /*_.OURPATVARMAP__V10*/ meltfptr[5]),
- "MCASE_VARMAP");
- ;
- /*^touch */
- meltgc_touch ( /*_.CURMCASE__V2*/ meltfptr[1]);
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCASE_VARMAP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.CURMCASE__V2*/ meltfptr[1]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.CURMCASE__V2*/ meltfptr[1]), (4),
+ ( /*_.OURPATVARMAP__V10*/ meltfptr[5]),
+ "MCASE_VARMAP");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.CURMCASE__V2*/ meltfptr[1]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
;
-
- MELT_LOCATION ("warmelt-normatch.melt:2967:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2992:/ clear");
/*clear *//*_.OURPATVARMAP__V10*/ meltfptr[5] = 0;
/*^clear */
/*clear *//*_.CURSCAS__V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.CURPAT__V12*/ meltfptr[11] = 0;
/*^clear */
- /*clear *//*_.LETREC___V13*/ meltfptr[12] = 0;
+ /*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V17*/ meltfptr[13] = 0;
+ /*clear *//*_.LETREC___V17*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -16400,14 +19011,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_61_warmelt_normatch_FILL_MATCHCASE */
+} /*end meltrout_63_warmelt_normatch_FILL_MATCHCASE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -16426,7 +19037,7 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_62_warmelt_normatch_LAMBDA___19___st
+ struct frame_meltrout_64_warmelt_normatch_LAMBDA___19___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16437,10 +19048,10 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 11
- void *mcfr_varptr[11];
-#define MELTFRAM_NBVARNUM 4
- long mcfr_varnum[4];
+#define MELTFRAM_NBVARPTR 32
+ void *mcfr_varptr[32];
+#define MELTFRAM_NBVARNUM 12
+ long mcfr_varnum[12];
/*others*/
long _spare_;
}
@@ -16451,13 +19062,13 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 11; ix++)
+ for (ix = 0; ix < 32; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 11;
+ meltfram__.mcfr_nbvar = 32;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -16465,7 +19076,7 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ getarg");
/*_.PAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16487,7 +19098,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16510,7 +19121,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16520,28 +19131,34 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 2975;
+ argtab[2].meltbp_long = 3001;
/*^apply.arg */
- argtab[3].meltbp_cstring = "fill_matchcase/varpatscanner pat";
+ argtab[3].meltbp_cstring = "fill_matchcase/varpatscanner pat=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.PAT__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " patvarmap=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PATVARMAP__V3*/ meltfptr[2];
/*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
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 MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -16549,7 +19166,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -16562,7 +19179,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -16571,7 +19188,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2975:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3001:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -16584,105 +19201,638 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
- /*_#IS_A__L3*/ meltfnum[1] =
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3002:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MAPOBJECT__L3*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.PATVARMAP__V3*/ meltfptr[2])) ==
+ MELTOBMAG_MAPOBJECTS);;
+ MELT_LOCATION ("warmelt-normatch.melt:3002:/ cond");
+ /*cond */ if ( /*_#IS_MAPOBJECT__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3002:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check patvarmap"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3002) ? (3002) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3002:/ clear");
+ /*clear *//*_#IS_MAPOBJECT__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3003:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#__L4*/ meltfnum[0] =
+ (( /*_.PATVARMAP__V3*/ meltfptr[2]) ==
+ (( /*~OURPATVARMAP */ meltfclos->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3003:/ cond");
+ /*cond */ if ( /*_#__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3003:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("same patvarmap"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3003) ? (3003) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3003:/ clear");
+ /*clear *//*_#__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3004:/ locexp");
+
+#if MELT_HAVE_DEBUG
+ if (melt_flag_debug)
+ melt_dbgshortbacktrace (("fill_matchcase/varpatscanner"), (10));
+#endif
+ ;
+ }
+ ;
+ /*_#IS_A__L5*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.PAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:2976:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3005:/ cond");
+ /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:2977:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3006:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:2978:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3007:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.PAT__V2*/ meltfptr[1]), 3, "SPATVAR_SYMB");
- /*_.PVARSYMB__V8*/
- meltfptr[4] = slot;
+ /*_.PVARSYMB__V13*/
+ meltfptr[12] = slot;
};
;
- /*_.VAROCCLIST__V9*/ meltfptr[5] =
+ /*_.VAROCCLIST__V14*/ meltfptr[13] =
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.PATVARMAP__V3*/ meltfptr[2]),
- (meltobject_ptr_t) ( /*_.PVARSYMB__V8*/
- meltfptr[4]));;
+ (meltobject_ptr_t) ( /*_.PVARSYMB__V13*/
+ meltfptr[12]));;
/*^compute */
- /*_#NULL__L4*/ meltfnum[0] =
- (( /*_.VAROCCLIST__V9*/ meltfptr[5]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:2981:/ cond");
- /*cond */ if ( /*_#NULL__L4*/ meltfnum[0]) /*then */
+ /*_#NULL__L6*/ meltfnum[0] =
+ (( /*_.VAROCCLIST__V14*/ meltfptr[13]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:3010:/ cond");
+ /*cond */ if ( /*_#NULL__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_.MAKE_LIST__V10*/ meltfptr[9] =
+ /*_.MAKE_LIST__V16*/ meltfptr[15] =
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[2]))));;
- MELT_LOCATION ("warmelt-normatch.melt:2983:/ compute");
- /*_.VAROCCLIST__V9*/ meltfptr[5] =
- /*_.SETQ___V11*/ meltfptr[10] =
- /*_.MAKE_LIST__V10*/ meltfptr[9];;
+ MELT_LOCATION ("warmelt-normatch.melt:3012:/ compute");
+ /*_.VAROCCLIST__V14*/ meltfptr[13] =
+ /*_.SETQ___V17*/ meltfptr[16] =
+ /*_.MAKE_LIST__V16*/ meltfptr[15];;
{
- MELT_LOCATION ("warmelt-normatch.melt:2984:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3013:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.PATVARMAP__V3*/ meltfptr[2]),
- (meltobject_ptr_t) ( /*_.PVARSYMB__V8*/ meltfptr[4]),
- (melt_ptr_t) ( /*_.VAROCCLIST__V9*/
- meltfptr[5]));
+ (meltobject_ptr_t) ( /*_.PVARSYMB__V13*/ meltfptr[12]),
+ (melt_ptr_t) ( /*_.VAROCCLIST__V14*/
+ meltfptr[13]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3014:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[6] =
+ /*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-normatch.melt:3014:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3014:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3014;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "fill_matchcase/varpatscanner updated patvarmap=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PATVARMAP__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " for pat=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PAT__V2*/ meltfptr[1];
+ /*_.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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V19*/ meltfptr[18] =
+ /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3014:/ 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-normatch.melt:3014:/ quasiblock");
+
+
+ /*_.PROGN___V21*/ meltfptr[19] =
+ /*_.IF___V19*/ meltfptr[18];;
+ /*^compute */
+
+ /*_.IFCPP___V18*/ meltfptr[17] =
+ /*_.PROGN___V21*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3014:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V21*/ meltfptr[19] = 0;
}
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:2982:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3011:/ quasiblock");
+ /*_.PROGN___V22*/ meltfptr[18] =
+ /*_.IFCPP___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IF___V15*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2981:/ clear");
- /*clear *//*_.MAKE_LIST__V10*/ meltfptr[9] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3010:/ clear");
+ /*clear *//*_.MAKE_LIST__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.SETQ___V17*/ meltfptr[16] = 0;
/*^clear */
- /*clear *//*_.SETQ___V11*/ meltfptr[10] = 0;
+ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V22*/ meltfptr[18] = 0;
}
;
- } /*noelse */
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V15*/ meltfptr[14] = NULL;;
+ }
;
{
- MELT_LOCATION ("warmelt-normatch.melt:2985:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3016:/ locexp");
meltgc_append_list ((melt_ptr_t)
- ( /*_.VAROCCLIST__V9*/ meltfptr[5]),
+ ( /*_.VAROCCLIST__V14*/ meltfptr[13]),
(melt_ptr_t) ( /*_.PAT__V2*/ meltfptr[1]));
}
;
+ /*_.IFELSE___V12*/ meltfptr[10] = /*_.IF___V15*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:2977:/ clear");
- /*clear *//*_.PVARSYMB__V8*/ meltfptr[4] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3006:/ clear");
+ /*clear *//*_.PVARSYMB__V13*/ meltfptr[12] = 0;
/*^clear */
- /*clear *//*_.VAROCCLIST__V9*/ meltfptr[5] = 0;
+ /*clear *//*_.VAROCCLIST__V14*/ meltfptr[13] = 0;
/*^clear */
- /*clear *//*_#NULL__L4*/ meltfnum[0] = 0;
+ /*clear *//*_#NULL__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V15*/ meltfptr[14] = 0;
/*epilog */
}
;
- } /*noelse */
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3005:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3019:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
+ /*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-normatch.melt:3019:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3019:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3019;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "fill_matchcase/varpatscanner before scan_subpatterns pat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PAT__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n ourpatvarmap=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~OURPATVARMAP */ meltfclos->
+ tabval[0]);
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[16] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V24*/ meltfptr[15] =
+ /*_.MELT_DEBUG_FUN__V25*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3019:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[16] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V24*/ meltfptr[15] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3019:/ quasiblock");
+
+
+ /*_.PROGN___V26*/ meltfptr[17] = /*_.IF___V24*/ meltfptr[15];;
+ /*^compute */
+
+ /*_.IFCPP___V23*/ meltfptr[19] = /*_.PROGN___V26*/ meltfptr[17];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3019:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V24*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V26*/ meltfptr[17] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3021:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~VARPATSCANNER */ meltfclos->tabval[1]);
+ /*^ojbmsend.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~OURPATVARMAP */ meltfclos->tabval[0]);
+ /*_.SCAN_SUBPATTERNS__V27*/ meltfptr[18] =
+ meltgc_send ((melt_ptr_t) ( /*_.PAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!SCAN_SUBPATTERNS */ meltfrout->
+ tabval[3])),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3022:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L11*/ meltfnum[0] =
+ /*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-normatch.melt:3022:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[6] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3022:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[6];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3022;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "fill_matchcase/varpatscanner after scan_subpatterns pat=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PAT__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n ourpatvarmap=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~OURPATVARMAP */ meltfclos->
+ tabval[0]);
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[14] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V29*/ meltfptr[13] =
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3022:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[14] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V29*/ meltfptr[13] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3022:/ quasiblock");
+
+
+ /*_.PROGN___V31*/ meltfptr[16] = /*_.IF___V29*/ meltfptr[13];;
+ /*^compute */
+
+ /*_.IFCPP___V28*/ meltfptr[12] = /*_.PROGN___V31*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3022:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V29*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V31*/ meltfptr[16] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V28*/ meltfptr[12] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3018:/ quasiblock");
+
+
+ /*_.PROGN___V32*/ meltfptr[15] = /*_.IFCPP___V28*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFELSE___V12*/ meltfptr[10] = /*_.PROGN___V32*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3005:/ clear");
+ /*clear *//*_.IFCPP___V23*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.SCAN_SUBPATTERNS__V27*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V28*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V32*/ meltfptr[15] = 0;
+ }
+ ;
+ }
;
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V12*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ clear");
+ /*^clear */
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V12*/ meltfptr[10] = 0;
}
;
@@ -16690,19 +19840,341 @@ lab_endgetargs:;
labend_rout:
melt_trace_end ("LAMBDA_", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_62_warmelt_normatch_LAMBDA___19__ */
+} /*end meltrout_64_warmelt_normatch_LAMBDA___19__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("PUTTHEN_MATCHANY", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.THENSTEP__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.THENSTEP__V3*/ meltfptr[2])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:3045:/ quasiblock");
+
+
+ /*_.DIS__V5*/ meltfptr[4] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3047:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3047:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3047:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3047;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "putelse_mathany recv=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "thenstep=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.THENSTEP__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " for discrim=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V5*/ meltfptr[4];
+ /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3047:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V7*/ meltfptr[6] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3047:/ quasiblock");
+
+
+ /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3047:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V9*/ meltfptr[7] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3048:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V5*/ meltfptr[4]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V10*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V10*/ meltfptr[6] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3048:/ locexp");
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unexpected PUT_THEN_MATCH for "),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V10*/ meltfptr[6])));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3049:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3049:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected PUT_THEN_MATCH [putthen_matchany]"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (3049) ? (3049) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3049:/ clear");
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFCPP___V11*/ meltfptr[7];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3045:/ clear");
+ /*clear *//*_.DIS__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V10*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("PUTTHEN_MATCHANY", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -16721,7 +20193,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_63_warmelt_normatch_START_STEP_st
+ struct frame_meltrout_66_warmelt_normatch_START_STEP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16760,7 +20232,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -16772,7 +20244,7 @@ lab_endgetargs:;
/*_#NULL__L1*/ meltfnum[0] =
(( /*_.STEP__V2*/ meltfptr[1]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3006:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3055:/ cond");
/*cond */ if ( /*_#NULL__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16780,17 +20252,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3007:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3056:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3007:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3056:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.RETURN___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3006:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3055:/ clear");
/*clear *//*_.RETURN___V4*/ meltfptr[3] = 0;
}
;
@@ -16805,7 +20277,7 @@ lab_endgetargs:;
/*_#IS_A__L2*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3009:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3058:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16813,7 +20285,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3010:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3059:/ quasiblock");
/*^getslot */
@@ -16826,7 +20298,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16849,7 +20321,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -16859,7 +20331,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16870,7 +20342,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3012;
+ argtab[2].meltbp_long = 3061;
/*^apply.arg */
argtab[3].meltbp_cstring = "start_step group step";
/*^apply.arg */
@@ -16891,7 +20363,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -16904,7 +20376,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -16914,7 +20386,7 @@ lab_endgetargs:;
/*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3012:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3061:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -16929,7 +20401,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16952,7 +20424,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -16962,7 +20434,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16973,7 +20445,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3013;
+ argtab[2].meltbp_long = 3062;
/*^apply.arg */
argtab[3].meltbp_cstring = "stastep return stastep";
/*^apply.arg */
@@ -16994,7 +20466,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
@@ -17007,7 +20479,7 @@ lab_endgetargs:;
/*_.IF___V13*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[13] =
@@ -17018,7 +20490,7 @@ lab_endgetargs:;
/*_.PROGN___V15*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3013:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3062:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V13*/ meltfptr[9] = 0;
@@ -17033,7 +20505,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3014:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3063:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17042,7 +20514,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.STASTEP__V7*/ meltfptr[6]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3014:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3063:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -17051,7 +20523,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3014:/ cond.else");
+ ("warmelt-normatch.melt:3063:/ cond.else");
/*^block */
/*anyblock */
@@ -17066,7 +20538,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (3014) ? (3014) : __LINE__,
+ (3063) ? (3063) : __LINE__,
__FUNCTION__);
;
}
@@ -17083,7 +20555,7 @@ lab_endgetargs:;
/*_.IFELSE___V17*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3014:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3063:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[13] = 0;
@@ -17094,17 +20566,17 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3015:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3064:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.STASTEP__V7*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:3015:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3064:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V6*/ meltfptr[5] = /*_.RETURN___V18*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:3010:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3059:/ clear");
/*clear *//*_.STASTEP__V7*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[7] = 0;
@@ -17117,7 +20589,7 @@ lab_endgetargs:;
/*_.IFELSE___V5*/ meltfptr[3] = /*_.LET___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3009:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3058:/ clear");
/*clear *//*_.LET___V6*/ meltfptr[5] = 0;
}
;
@@ -17131,7 +20603,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17154,7 +20626,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -17164,7 +20636,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17175,7 +20647,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3017;
+ argtab[2].meltbp_long = 3066;
/*^apply.arg */
argtab[3].meltbp_cstring =
"start_step ordinary step";
@@ -17197,7 +20669,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[8] = 0;
@@ -17210,7 +20682,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[9] = /*_.IF___V20*/ meltfptr[7];;
@@ -17220,7 +20692,7 @@ lab_endgetargs:;
/*_.PROGN___V22*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3017:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3066:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[7] = 0;
@@ -17235,7 +20707,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3018:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3067:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17244,7 +20716,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3018:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3067:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -17253,7 +20725,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3018:/ cond.else");
+ ("warmelt-normatch.melt:3067:/ cond.else");
/*^block */
/*anyblock */
@@ -17268,7 +20740,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (3018) ? (3018) : __LINE__,
+ (3067) ? (3067) : __LINE__,
__FUNCTION__);
;
}
@@ -17285,7 +20757,7 @@ lab_endgetargs:;
/*_.IFELSE___V24*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3018:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3067:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[5] = 0;
@@ -17296,14 +20768,14 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[13] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3019:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3068:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEP__V2*/ meltfptr[1];;
- MELT_LOCATION ("warmelt-normatch.melt:3019:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3068:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3016:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3065:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[7] =
@@ -17314,7 +20786,7 @@ lab_endgetargs:;
/*_.PROGN___V26*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3009:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3058:/ clear");
/*clear *//*_.IFCPP___V19*/ meltfptr[6] = 0;
/*^clear */
/*clear *//*_.IFCPP___V23*/ meltfptr[13] = 0;
@@ -17329,7 +20801,7 @@ lab_endgetargs:;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V5*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3006:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3055:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V5*/ meltfptr[3] = 0;
@@ -17337,11 +20809,11 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -17362,14 +20834,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_63_warmelt_normatch_START_STEP */
+} /*end meltrout_66_warmelt_normatch_START_STEP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -17390,7 +20862,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN_st
+ struct frame_meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -17429,7 +20901,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -17451,7 +20923,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17474,7 +20946,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17484,7 +20956,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17494,7 +20966,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3024;
+ argtab[2].meltbp_long = 3073;
/*^apply.arg */
argtab[3].meltbp_cstring = "putthen_matchthen recv";
/*^apply.arg */
@@ -17513,7 +20985,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -17526,7 +20998,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -17535,7 +21007,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3024:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3073:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -17550,7 +21022,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3025:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3074:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17559,7 +21031,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_THEN */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3025:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3074:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17567,7 +21039,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3025:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3074:/ cond.else");
/*^block */
/*anyblock */
@@ -17581,7 +21053,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3025) ? (3025) : __LINE__, __FUNCTION__);
+ (3074) ? (3074) : __LINE__, __FUNCTION__);
;
}
;
@@ -17596,7 +21068,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3025:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3074:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -17609,7 +21081,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17632,7 +21104,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17642,7 +21114,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17652,7 +21124,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3026;
+ argtab[2].meltbp_long = 3075;
/*^apply.arg */
argtab[3].meltbp_cstring = "putthen_matchthen thenstep";
/*^apply.arg */
@@ -17672,7 +21144,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -17685,7 +21157,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -17694,7 +21166,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3026:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3075:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -17709,7 +21181,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3027:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3076:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17718,7 +21190,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.THENSTEP__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3027:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3076:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17726,7 +21198,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3027:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3076:/ cond.else");
/*^block */
/*anyblock */
@@ -17740,7 +21212,7 @@ lab_endgetargs:;
melt_assert_failed (("check thenstep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3027) ? (3027) : __LINE__, __FUNCTION__);
+ (3076) ? (3076) : __LINE__, __FUNCTION__);
;
}
;
@@ -17755,7 +21227,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3027:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3076:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
@@ -17768,14 +21240,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3028:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3077:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#__L7*/ meltfnum[0] =
(( /*_.RECV__V2*/ meltfptr[1]) != ( /*_.THENSTEP__V3*/ meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:3028:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3077:/ cond");
/*cond */ if ( /*_#__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17783,7 +21255,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3028:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3077:/ cond.else");
/*^block */
/*anyblock */
@@ -17797,7 +21269,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv!=then"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3028) ? (3028) : __LINE__, __FUNCTION__);
+ (3077) ? (3077) : __LINE__, __FUNCTION__);
;
}
;
@@ -17812,7 +21284,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3028:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3077:/ clear");
/*clear *//*_#__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -17825,14 +21297,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3030:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3079:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#MELT_APPLICATION_SHALLOWER__L8*/ meltfnum[1] =
(melt_application_depth () < 100);;
- MELT_LOCATION ("warmelt-normatch.melt:3030:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3079:/ cond");
/*cond */ if ( /*_#MELT_APPLICATION_SHALLOWER__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17840,7 +21312,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3030:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3079:/ cond.else");
/*^block */
/*anyblock */
@@ -17854,7 +21326,7 @@ lab_endgetargs:;
melt_assert_failed (("putthen_matchthen check shallow100"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3030) ? (3030) : __LINE__, __FUNCTION__);
+ (3079) ? (3079) : __LINE__, __FUNCTION__);
;
}
;
@@ -17869,7 +21341,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3030:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3079:/ clear");
/*clear *//*_#MELT_APPLICATION_SHALLOWER__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
@@ -17885,7 +21357,7 @@ lab_endgetargs:;
/*_#IS_A__L9*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_INSTANCE */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3033:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3082:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17895,7 +21367,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:3034:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3083:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -17910,7 +21382,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3035:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3084:/ quasiblock");
/*^getslot */
@@ -17921,7 +21393,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3036:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3085:/ apply");
/*apply */
{
/*_.STARTHEN__V22*/ meltfptr[21] =
@@ -17933,7 +21405,7 @@ lab_endgetargs:;
;
/*_#__L10*/ meltfnum[1] =
(( /*_.RECV__V2*/ meltfptr[1]) == ( /*_.STARTHEN__V22*/ meltfptr[21]));;
- MELT_LOCATION ("warmelt-normatch.melt:3038:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3087:/ cond");
/*cond */ if ( /*_#__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17943,7 +21415,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17966,7 +21438,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -17976,7 +21448,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17987,7 +21459,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3040;
+ argtab[2].meltbp_long = 3089;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchthen recv same starthen";
@@ -18009,7 +21481,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -18022,7 +21494,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -18031,7 +21503,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3040:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3089:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
@@ -18044,14 +21516,14 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3041:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3090:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3041:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3090:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3039:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3088:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[25] = /*_.RETURN___V28*/ meltfptr[24];;
@@ -18060,7 +21532,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3038:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3087:/ clear");
/*clear *//*_.IFCPP___V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.RETURN___V28*/ meltfptr[24] = 0;
@@ -18080,7 +21552,7 @@ lab_endgetargs:;
/*_#__L13*/ meltfnum[11] =
(( /*_.MYTHEN__V21*/ meltfptr[20]) ==
( /*_.STARTHEN__V22*/ meltfptr[21]));;
- MELT_LOCATION ("warmelt-normatch.melt:3042:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3091:/ cond");
/*cond */ if ( /*_#__L13*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -18090,7 +21562,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18113,7 +21585,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -18123,7 +21595,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18134,7 +21606,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3044;
+ argtab[2].meltbp_long = 3093;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchthen mythen same starthen";
@@ -18156,7 +21628,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -18169,7 +21641,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[25];;
@@ -18178,7 +21650,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[24] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3044:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3093:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[25] = 0;
@@ -18191,14 +21663,14 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[24] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3045:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3094:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3045:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3094:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3043:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3092:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[32] = /*_.RETURN___V35*/ meltfptr[25];;
@@ -18207,7 +21679,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[23] = /*_.PROGN___V36*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3042:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3091:/ clear");
/*clear *//*_.IFCPP___V31*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.RETURN___V35*/ meltfptr[25] = 0;
@@ -18226,7 +21698,7 @@ lab_endgetargs:;
/*_#NULL__L16*/ meltfnum[14] =
(( /*_.MYTHEN__V21*/ meltfptr[20]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3046:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3095:/ cond");
/*cond */ if ( /*_#NULL__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -18234,7 +21706,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3048:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3097:/ quasiblock");
/*^putslot */
@@ -18253,7 +21725,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18276,7 +21748,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -18286,7 +21758,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18297,7 +21769,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3049;
+ argtab[2].meltbp_long = 3098;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchthen updated recv";
@@ -18319,7 +21791,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -18332,7 +21804,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[32];;
@@ -18341,7 +21813,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[25] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3049:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3098:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[32] = 0;
@@ -18354,7 +21826,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3047:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3096:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[32] = /*_.IFCPP___V38*/ meltfptr[25];;
@@ -18363,7 +21835,7 @@ lab_endgetargs:;
/*_.IFELSE___V37*/ meltfptr[24] = /*_.PROGN___V42*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3095:/ clear");
/*clear *//*_.IFCPP___V38*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.PROGN___V42*/ meltfptr[32] = 0;
@@ -18379,7 +21851,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18402,7 +21874,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -18412,7 +21884,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18423,7 +21895,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3053;
+ argtab[2].meltbp_long = 3102;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchthen recursing in mythen";
@@ -18445,7 +21917,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V45*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[32] = 0;
@@ -18458,7 +21930,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[32] = /*_.IF___V44*/ meltfptr[25];;
@@ -18467,7 +21939,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[39] = /*_.PROGN___V46*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3053:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3102:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[25] = 0;
@@ -18482,7 +21954,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18505,7 +21977,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -18515,7 +21987,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18526,7 +21998,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3054;
+ argtab[2].meltbp_long = 3103;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchthen recursing for starthen";
@@ -18548,7 +22020,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -18561,7 +22033,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[32];;
@@ -18570,7 +22042,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[25] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3054:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3103:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[32] = 0;
@@ -18583,7 +22055,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3055:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3104:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -18600,7 +22072,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18623,7 +22095,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -18633,7 +22105,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18644,7 +22116,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3056;
+ argtab[2].meltbp_long = 3105;
/*^apply.arg */
argtab[3].meltbp_cstring = "putthen_matchthen did mythen";
/*^apply.arg */
@@ -18665,7 +22137,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0;
@@ -18678,7 +22150,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];;
@@ -18687,7 +22159,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[48] = /*_.PROGN___V55*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3056:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3105:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[52] = 0;
@@ -18700,7 +22172,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[48] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3052:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3101:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[52] = /*_.IFCPP___V52*/ meltfptr[48];;
@@ -18709,7 +22181,7 @@ lab_endgetargs:;
/*_.IFELSE___V37*/ meltfptr[24] = /*_.PROGN___V56*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3095:/ clear");
/*clear *//*_.IFCPP___V43*/ meltfptr[39] = 0;
/*^clear */
/*clear *//*_.IFCPP___V47*/ meltfptr[25] = 0;
@@ -18725,7 +22197,7 @@ lab_endgetargs:;
;
/*_.LET___V20*/ meltfptr[18] = /*_.IFELSE___V37*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-normatch.melt:3035:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3084:/ clear");
/*clear *//*_.MYTHEN__V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.STARTHEN__V22*/ meltfptr[21] = 0;
@@ -18741,11 +22213,11 @@ lab_endgetargs:;
/*clear *//*_#NULL__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IFELSE___V37*/ meltfptr[24] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V20*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -18778,14 +22250,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN */
+} /*end meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -18806,7 +22278,7 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP_st
+ struct frame_meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -18845,7 +22317,7 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -18867,7 +22339,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18890,7 +22362,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18900,7 +22372,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18910,7 +22382,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3063;
+ argtab[2].meltbp_long = 3112;
/*^apply.arg */
argtab[3].meltbp_cstring = "putthen_matchgroup recv";
/*^apply.arg */
@@ -18929,7 +22401,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -18942,7 +22414,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -18951,7 +22423,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3063:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3112:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -18966,7 +22438,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3064:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3113:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18975,7 +22447,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3064:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3113:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18983,7 +22455,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3064:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3113:/ cond.else");
/*^block */
/*anyblock */
@@ -18997,7 +22469,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3064) ? (3064) : __LINE__, __FUNCTION__);
+ (3113) ? (3113) : __LINE__, __FUNCTION__);
;
}
;
@@ -19012,7 +22484,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3064:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3113:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -19025,7 +22497,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19048,7 +22520,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19058,7 +22530,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19068,7 +22540,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3065;
+ argtab[2].meltbp_long = 3114;
/*^apply.arg */
argtab[3].meltbp_cstring = "putthen_matchgroup thenstep";
/*^apply.arg */
@@ -19088,7 +22560,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -19101,7 +22573,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -19110,7 +22582,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3065:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3114:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -19125,7 +22597,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3066:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3115:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19134,7 +22606,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.THENSTEP__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3066:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3115:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19142,7 +22614,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3066:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3115:/ cond.else");
/*^block */
/*anyblock */
@@ -19156,7 +22628,7 @@ lab_endgetargs:;
melt_assert_failed (("check thenstep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3066) ? (3066) : __LINE__, __FUNCTION__);
+ (3115) ? (3115) : __LINE__, __FUNCTION__);
;
}
;
@@ -19171,7 +22643,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3066:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3115:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
@@ -19182,7 +22654,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3067:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3116:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -19197,7 +22669,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3068:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3117:/ quasiblock");
/*^getslot */
@@ -19210,7 +22682,7 @@ lab_endgetargs:;
;
/*_#NULL__L7*/ meltfnum[0] =
(( /*_.THENGROUP__V18*/ meltfptr[17]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3070:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3119:/ cond");
/*cond */ if ( /*_#NULL__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19218,17 +22690,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3071:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3120:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3071:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3120:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.IFELSE___V19*/ meltfptr[18] = /*_.RETURN___V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3070:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3119:/ clear");
/*clear *//*_.RETURN___V20*/ meltfptr[19] = 0;
}
;
@@ -19245,7 +22717,7 @@ lab_endgetargs:;
( /*_.THENGROUP__V18*/ meltfptr[17]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3072:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3121:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19253,7 +22725,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3073:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3122:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19274,7 +22746,7 @@ lab_endgetargs:;
/*_.PUT_THEN_MATCH__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3072:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3121:/ clear");
/*clear *//*_.PUT_THEN_MATCH__V22*/ meltfptr[21] = 0;
}
;
@@ -19290,7 +22762,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.THENGROUP__V18*/ meltfptr[17])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:3074:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3123:/ cond");
/*cond */ if ( /*_#IS_LIST__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -19317,7 +22789,7 @@ lab_endgetargs:;
MELT_LOCATION
- ("warmelt-normatch.melt:3078:/ msend");
+ ("warmelt-normatch.melt:3127:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19339,7 +22811,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3075:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3124:/ clear");
/*clear *//*_.CURPAIR__V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.CURTHEN__V25*/ meltfptr[24] = 0;
@@ -19353,7 +22825,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3074:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3123:/ cond.else");
/*^block */
/*anyblock */
@@ -19363,7 +22835,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.THENGROUP__V18*/ meltfptr[17]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:3079:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3128:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L10*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -19394,7 +22866,7 @@ lab_endgetargs:;
MELT_LOCATION
- ("warmelt-normatch.melt:3083:/ msend");
+ ("warmelt-normatch.melt:3132:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19419,7 +22891,7 @@ lab_endgetargs:;
/*citerepilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3080:/ clear");
+ ("warmelt-normatch.melt:3129:/ clear");
/*clear *//*_.CURTHEN__V28*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_#THIX__L11*/ meltfnum[10] = 0;
@@ -19435,7 +22907,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3079:/ cond.else");
+ ("warmelt-normatch.melt:3128:/ cond.else");
/*^block */
/*anyblock */
@@ -19444,7 +22916,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ cppif.then");
+ ("warmelt-normatch.melt:3134:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19469,7 +22941,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ cond");
+ ("warmelt-normatch.melt:3134:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -19481,7 +22953,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ apply");
+ ("warmelt-normatch.melt:3134:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19494,7 +22966,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3085;
+ argtab[2].meltbp_long = 3134;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putthen_matchgroup bad thengroup";
@@ -19522,7 +22994,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ clear");
+ ("warmelt-normatch.melt:3134:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/
meltfnum[12] = 0;
/*^clear */
@@ -19538,7 +23010,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ quasiblock");
+ ("warmelt-normatch.melt:3134:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] =
@@ -19550,7 +23022,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3085:/ clear");
+ ("warmelt-normatch.melt:3134:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[11]
= 0;
/*^clear */
@@ -19567,7 +23039,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3086:/ cppif.then");
+ ("warmelt-normatch.melt:3135:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19582,7 +23054,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3086:/ cond.else");
+ ("warmelt-normatch.melt:3135:/ cond.else");
/*^block */
/*anyblock */
@@ -19598,7 +23070,7 @@ lab_endgetargs:;
?
("warmelt-normatch.melt")
: __FILE__,
- (3086) ? (3086) :
+ (3135) ? (3135) :
__LINE__,
__FUNCTION__);
;
@@ -19618,7 +23090,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3086:/ clear");
+ ("warmelt-normatch.melt:3135:/ clear");
/*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
}
@@ -19628,7 +23100,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3084:/ quasiblock");
+ ("warmelt-normatch.melt:3133:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[31] =
@@ -19640,7 +23112,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3079:/ clear");
+ ("warmelt-normatch.melt:3128:/ clear");
/*clear *//*_.IFCPP___V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.IFCPP___V34*/ meltfptr[30] = 0;
@@ -19654,7 +23126,7 @@ lab_endgetargs:;
/*_.IFELSE___V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3074:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3123:/ clear");
/*clear *//*_#IS_MULTIPLE__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V27*/ meltfptr[26] = 0;
@@ -19666,7 +23138,7 @@ lab_endgetargs:;
/*_.IFELSE___V23*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3072:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3121:/ clear");
/*clear *//*_#IS_LIST__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V23*/ meltfptr[21] = 0;
@@ -19677,7 +23149,7 @@ lab_endgetargs:;
/*_.IFELSE___V19*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3070:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3119:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V21*/ meltfptr[19] = 0;
@@ -19687,17 +23159,17 @@ lab_endgetargs:;
;
/*_.LET___V17*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:3068:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3117:/ clear");
/*clear *//*_.THENGROUP__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_#NULL__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -19726,14 +23198,336 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP */
+} /*end meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_69_warmelt_normatch_PUTELSE_MATCHANY_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("PUTELSE_MATCHANY", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.ELSESTEP__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.ELSESTEP__V3*/ meltfptr[2])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:3147:/ quasiblock");
+
+
+ /*_.DIS__V5*/ meltfptr[4] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3149:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3149:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3149:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3149;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "putelse_mathany recv=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "elsestep=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ELSESTEP__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " for discrim=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V5*/ meltfptr[4];
+ /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3149:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V7*/ meltfptr[6] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3149:/ quasiblock");
+
+
+ /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3149:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V9*/ meltfptr[7] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3150:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V5*/ meltfptr[4]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V10*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V10*/ meltfptr[6] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3150:/ locexp");
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unexpected PUT_ELSE_MATCH for "),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V10*/ meltfptr[6])));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3151:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3151:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected PUT_ELSE_MATCH [putelse_matchany]"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (3151) ? (3151) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3151:/ clear");
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFCPP___V11*/ meltfptr[7];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3147:/ clear");
+ /*clear *//*_.DIS__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V10*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("PUTELSE_MATCHANY", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_69_warmelt_normatch_PUTELSE_MATCHANY */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -19755,7 +23549,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN_st
+ struct frame_meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -19794,7 +23588,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -19816,7 +23610,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19839,7 +23633,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -19849,7 +23643,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19859,7 +23653,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3097;
+ argtab[2].meltbp_long = 3157;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchstepthen recv";
/*^apply.arg */
@@ -19878,7 +23672,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -19891,7 +23685,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -19900,7 +23694,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3097:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3157:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -19915,7 +23709,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3098:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3158:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19924,7 +23718,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_THEN */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3098:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3158:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19932,7 +23726,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3098:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3158:/ cond.else");
/*^block */
/*anyblock */
@@ -19946,7 +23740,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3098) ? (3098) : __LINE__, __FUNCTION__);
+ (3158) ? (3158) : __LINE__, __FUNCTION__);
;
}
;
@@ -19961,7 +23755,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3098:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3158:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -19974,7 +23768,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19997,7 +23791,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20007,7 +23801,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20017,7 +23811,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3099;
+ argtab[2].meltbp_long = 3159;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchstepthen elsestep";
/*^apply.arg */
@@ -20037,7 +23831,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -20050,7 +23844,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -20059,7 +23853,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3099:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3159:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -20074,7 +23868,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3100:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3160:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20083,7 +23877,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ELSESTEP__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3100:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3160:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20091,7 +23885,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3100:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3160:/ cond.else");
/*^block */
/*anyblock */
@@ -20105,7 +23899,7 @@ lab_endgetargs:;
melt_assert_failed (("check elsestep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3100) ? (3100) : __LINE__, __FUNCTION__);
+ (3160) ? (3160) : __LINE__, __FUNCTION__);
;
}
;
@@ -20120,7 +23914,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3100:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3160:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
@@ -20133,14 +23927,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3102:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3162:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0] =
(melt_application_depth () < 100);;
- MELT_LOCATION ("warmelt-normatch.melt:3102:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3162:/ cond");
/*cond */ if ( /*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20148,7 +23942,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3102:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3162:/ cond.else");
/*^block */
/*anyblock */
@@ -20162,7 +23956,7 @@ lab_endgetargs:;
melt_assert_failed (("putelse_matchstepthen check shallow100"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3102) ? (3102) : __LINE__, __FUNCTION__);
+ (3162) ? (3162) : __LINE__, __FUNCTION__);
;
}
;
@@ -20177,7 +23971,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3102:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3162:/ clear");
/*clear *//*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -20188,10 +23982,10 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3104:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3164:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3105:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3165:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -20199,7 +23993,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3106:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3166:/ apply");
/*apply */
{
/*_.ELSESTART__V20*/ meltfptr[19] =
@@ -20212,7 +24006,7 @@ lab_endgetargs:;
/*_#__L8*/ meltfnum[1] =
(( /*_.RECV__V2*/ meltfptr[1]) ==
( /*_.ELSESTART__V20*/ meltfptr[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:3109:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3169:/ cond");
/*cond */ if ( /*_#__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20222,7 +24016,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20245,7 +24039,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20255,7 +24049,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20266,7 +24060,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3110;
+ argtab[2].meltbp_long = 3170;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen recv same elsestart";
@@ -20288,7 +24082,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -20301,7 +24095,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
@@ -20310,7 +24104,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3110:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3170:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[22] = 0;
@@ -20323,14 +24117,14 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3111:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3171:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3111:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3171:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3109:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3169:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[23] = /*_.RETURN___V26*/ meltfptr[22];;
@@ -20339,7 +24133,7 @@ lab_endgetargs:;
/*_.IFELSE___V21*/ meltfptr[20] = /*_.PROGN___V27*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3109:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3169:/ clear");
/*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_.RETURN___V26*/ meltfptr[22] = 0;
@@ -20358,7 +24152,7 @@ lab_endgetargs:;
/*_#__L11*/ meltfnum[9] =
(( /*_.MYTHEN__V19*/ meltfptr[18]) ==
( /*_.ELSESTEP__V3*/ meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:3112:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3172:/ cond");
/*cond */ if ( /*_#__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -20368,7 +24162,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20391,7 +24185,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20401,7 +24195,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20412,7 +24206,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3113;
+ argtab[2].meltbp_long = 3173;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen mythen same elsestep";
@@ -20434,7 +24228,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
0;
/*^clear */
@@ -20448,7 +24242,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] =
@@ -20459,7 +24253,7 @@ lab_endgetargs:;
/*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3173:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[23] = 0;
@@ -20472,14 +24266,14 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3114:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3174:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3114:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3174:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3112:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3172:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[30] =
@@ -20490,7 +24284,7 @@ lab_endgetargs:;
/*_.PROGN___V34*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3112:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3172:/ clear");
/*clear *//*_.IFCPP___V29*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.RETURN___V33*/ meltfptr[23] = 0;
@@ -20509,7 +24303,7 @@ lab_endgetargs:;
/*_#__L14*/ meltfnum[12] =
(( /*_.MYTHEN__V19*/ meltfptr[18]) ==
( /*_.ELSESTART__V20*/ meltfptr[19]));;
- MELT_LOCATION ("warmelt-normatch.melt:3115:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3175:/ cond");
/*cond */ if ( /*_#__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -20520,7 +24314,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3116:/ cppif.then");
+ ("warmelt-normatch.melt:3176:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20543,7 +24337,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3116:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3176:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20554,7 +24348,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3116:/ apply");
+ ("warmelt-normatch.melt:3176:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20566,7 +24360,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3116;
+ argtab[2].meltbp_long = 3176;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen mythen same elsestart";
@@ -20592,7 +24386,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3116:/ clear");
+ ("warmelt-normatch.melt:3176:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/
meltfnum[15] = 0;
/*^clear */
@@ -20608,7 +24402,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3116:/ quasiblock");
+ ("warmelt-normatch.melt:3176:/ quasiblock");
/*_.PROGN___V39*/ meltfptr[37] =
@@ -20619,7 +24413,7 @@ lab_endgetargs:;
/*_.PROGN___V39*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3116:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3176:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V37*/ meltfptr[30] = 0;
@@ -20633,16 +24427,16 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3117:/ quasiblock");
+ ("warmelt-normatch.melt:3177:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
MELT_LOCATION
- ("warmelt-normatch.melt:3117:/ finalreturn");
+ ("warmelt-normatch.melt:3177:/ finalreturn");
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3115:/ quasiblock");
+ ("warmelt-normatch.melt:3175:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[37] =
@@ -20653,7 +24447,7 @@ lab_endgetargs:;
/*_.PROGN___V41*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3115:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3175:/ clear");
/*clear *//*_.IFCPP___V36*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.RETURN___V40*/ meltfptr[30] = 0;
@@ -20669,7 +24463,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3118:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3178:/ cond");
/*cond */ if ( /*_.MYTHEN__V19*/ meltfptr[18]) /*then */
{
/*^cond.then */
@@ -20680,7 +24474,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ cppif.then");
+ ("warmelt-normatch.melt:3179:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20705,7 +24499,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ cond");
+ ("warmelt-normatch.melt:3179:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -20716,7 +24510,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ apply");
+ ("warmelt-normatch.melt:3179:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20729,7 +24523,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3119;
+ argtab[2].meltbp_long = 3179;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen recursing in mythen";
@@ -20757,7 +24551,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ clear");
+ ("warmelt-normatch.melt:3179:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/
meltfnum[0] = 0;
/*^clear */
@@ -20773,7 +24567,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ quasiblock");
+ ("warmelt-normatch.melt:3179:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[44] =
@@ -20785,7 +24579,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3119:/ clear");
+ ("warmelt-normatch.melt:3179:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15]
= 0;
/*^clear */
@@ -20802,7 +24596,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ cppif.then");
+ ("warmelt-normatch.melt:3180:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20827,7 +24621,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ cond");
+ ("warmelt-normatch.melt:3180:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -20839,7 +24633,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ apply");
+ ("warmelt-normatch.melt:3180:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20852,7 +24646,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3120;
+ argtab[2].meltbp_long = 3180;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen recursing for elsestart";
@@ -20880,7 +24674,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ clear");
+ ("warmelt-normatch.melt:3180:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/
meltfnum[15] = 0;
/*^clear */
@@ -20896,7 +24690,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ quasiblock");
+ ("warmelt-normatch.melt:3180:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] =
@@ -20908,7 +24702,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3120:/ clear");
+ ("warmelt-normatch.melt:3180:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[0] =
0;
/*^clear */
@@ -20925,7 +24719,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ cppif.then");
+ ("warmelt-normatch.melt:3181:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20950,7 +24744,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ cond");
+ ("warmelt-normatch.melt:3181:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -20961,7 +24755,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[0] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ apply");
+ ("warmelt-normatch.melt:3181:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20974,7 +24768,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3121;
+ argtab[2].meltbp_long = 3181;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen recursing from recv";
@@ -21002,7 +24796,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ clear");
+ ("warmelt-normatch.melt:3181:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[0] = 0;
/*^clear */
@@ -21018,7 +24812,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ quasiblock");
+ ("warmelt-normatch.melt:3181:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] =
@@ -21030,7 +24824,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3121:/ clear");
+ ("warmelt-normatch.melt:3181:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[15]
= 0;
/*^clear */
@@ -21045,7 +24839,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3122:/ msend");
+ ("warmelt-normatch.melt:3182:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -21064,7 +24858,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ cppif.then");
+ ("warmelt-normatch.melt:3183:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21089,7 +24883,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ cond");
+ ("warmelt-normatch.melt:3183:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21101,7 +24895,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ apply");
+ ("warmelt-normatch.melt:3183:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21114,7 +24908,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3123;
+ argtab[2].meltbp_long = 3183;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchstepthen done recursing in mythen";
@@ -21142,7 +24936,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ clear");
+ ("warmelt-normatch.melt:3183:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/
meltfnum[15] = 0;
/*^clear */
@@ -21158,7 +24952,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ quasiblock");
+ ("warmelt-normatch.melt:3183:/ quasiblock");
/*_.PROGN___V59*/ meltfptr[57] =
@@ -21170,7 +24964,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3123:/ clear");
+ ("warmelt-normatch.melt:3183:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[0] =
0;
/*^clear */
@@ -21185,7 +24979,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3118:/ quasiblock");
+ ("warmelt-normatch.melt:3178:/ quasiblock");
/*_.PROGN___V60*/ meltfptr[56] =
@@ -21197,7 +24991,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3118:/ clear");
+ ("warmelt-normatch.melt:3178:/ clear");
/*clear *//*_.IFCPP___V43*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.IFCPP___V47*/ meltfptr[37] = 0;
@@ -21225,7 +25019,7 @@ lab_endgetargs:;
/*_.IFELSE___V42*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3115:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3175:/ clear");
/*clear *//*_.IFELSE___V42*/ meltfptr[23] = 0;
}
;
@@ -21235,7 +25029,7 @@ lab_endgetargs:;
/*_.IFELSE___V35*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3112:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3172:/ clear");
/*clear *//*_#__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V35*/ meltfptr[22] = 0;
@@ -21246,7 +25040,7 @@ lab_endgetargs:;
/*_.IFELSE___V21*/ meltfptr[20] = /*_.IFELSE___V28*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3109:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3169:/ clear");
/*clear *//*_#__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V28*/ meltfptr[21] = 0;
@@ -21256,7 +25050,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21279,7 +25073,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -21289,7 +25083,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21300,7 +25094,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3125;
+ argtab[2].meltbp_long = 3185;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchstepthen end recv";
/*^apply.arg */
@@ -21320,7 +25114,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V63*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[37] = 0;
@@ -21333,7 +25127,7 @@ lab_endgetargs:;
/*_.IF___V62*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[44] = /*_.IF___V62*/ meltfptr[30];;
@@ -21342,7 +25136,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[57] = /*_.PROGN___V64*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3125:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3185:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V62*/ meltfptr[30] = 0;
@@ -21359,7 +25153,7 @@ lab_endgetargs:;
/*_.LET___V18*/ meltfptr[16] = /*_.IFCPP___V61*/ meltfptr[57];;
- MELT_LOCATION ("warmelt-normatch.melt:3104:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3164:/ clear");
/*clear *//*_.MYTHEN__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.ELSESTART__V20*/ meltfptr[19] = 0;
@@ -21369,11 +25163,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
/*^clear */
/*clear *//*_.IFCPP___V61*/ meltfptr[57] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21402,14 +25196,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN */
+} /*end meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -21430,7 +25224,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST_st
+ struct frame_meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21469,7 +25263,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21491,7 +25285,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21514,7 +25308,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21524,7 +25318,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21534,7 +25328,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3132;
+ argtab[2].meltbp_long = 3192;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchtest recv";
/*^apply.arg */
@@ -21553,7 +25347,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -21566,7 +25360,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -21575,7 +25369,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3132:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3192:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -21590,7 +25384,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3133:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3193:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21599,7 +25393,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3133:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3193:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21607,7 +25401,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3133:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3193:/ cond.else");
/*^block */
/*anyblock */
@@ -21621,7 +25415,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3133) ? (3133) : __LINE__, __FUNCTION__);
+ (3193) ? (3193) : __LINE__, __FUNCTION__);
;
}
;
@@ -21636,7 +25430,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3133:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3193:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -21649,7 +25443,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21672,7 +25466,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21682,7 +25476,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21692,7 +25486,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3134;
+ argtab[2].meltbp_long = 3194;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchtest elsestep";
/*^apply.arg */
@@ -21712,7 +25506,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -21725,7 +25519,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -21734,7 +25528,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3134:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3194:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -21749,7 +25543,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3135:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3195:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21758,7 +25552,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ELSESTEP__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3135:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3195:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21766,7 +25560,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3135:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3195:/ cond.else");
/*^block */
/*anyblock */
@@ -21780,7 +25574,7 @@ lab_endgetargs:;
melt_assert_failed (("check elsestep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3135) ? (3135) : __LINE__, __FUNCTION__);
+ (3195) ? (3195) : __LINE__, __FUNCTION__);
;
}
;
@@ -21795,7 +25589,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3135:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3195:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
@@ -21808,14 +25602,14 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3137:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3197:/ cppif.then");
/*^block */
/*anyblock */
{
/*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0] =
(melt_application_depth () < 100);;
- MELT_LOCATION ("warmelt-normatch.melt:3137:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3197:/ cond");
/*cond */ if ( /*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21823,7 +25617,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3137:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3197:/ cond.else");
/*^block */
/*anyblock */
@@ -21837,7 +25631,7 @@ lab_endgetargs:;
melt_assert_failed (("putelse_matchtest check shallow100"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3137) ? (3137) : __LINE__, __FUNCTION__);
+ (3197) ? (3197) : __LINE__, __FUNCTION__);
;
}
;
@@ -21852,7 +25646,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3137:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3197:/ clear");
/*clear *//*_#MELT_APPLICATION_SHALLOWER__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
@@ -21863,10 +25657,10 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3139:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3199:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3140:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3200:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -21874,7 +25668,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3141:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3201:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -21882,7 +25676,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3142:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3202:/ apply");
/*apply */
{
/*_.ELSESTART__V21*/ meltfptr[20] =
@@ -21894,7 +25688,7 @@ lab_endgetargs:;
;
/*_#__L8*/ meltfnum[1] =
(( /*_.RECV__V2*/ meltfptr[1]) == ( /*_.ELSESTEP__V3*/ meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:3145:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3205:/ cond");
/*cond */ if ( /*_#__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21904,7 +25698,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21927,7 +25721,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21937,7 +25731,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21948,7 +25742,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3146;
+ argtab[2].meltbp_long = 3206;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest recv same as elsestep";
@@ -21970,7 +25764,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -21983,7 +25777,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -21992,7 +25786,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3146:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3206:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -22005,14 +25799,14 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3147:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3207:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3147:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3207:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3145:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3205:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[24] = /*_.RETURN___V27*/ meltfptr[23];;
@@ -22021,7 +25815,7 @@ lab_endgetargs:;
/*_.IFELSE___V22*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3145:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3205:/ clear");
/*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.RETURN___V27*/ meltfptr[23] = 0;
@@ -22040,7 +25834,7 @@ lab_endgetargs:;
/*_#__L11*/ meltfnum[9] =
(( /*_.RECV__V2*/ meltfptr[1]) ==
( /*_.ELSESTART__V21*/ meltfptr[20]));;
- MELT_LOCATION ("warmelt-normatch.melt:3148:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3208:/ cond");
/*cond */ if ( /*_#__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -22050,7 +25844,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22073,7 +25867,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22083,7 +25877,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22094,7 +25888,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3149;
+ argtab[2].meltbp_long = 3209;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest recv same as elsestart";
@@ -22116,7 +25910,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
0;
/*^clear */
@@ -22130,7 +25924,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] =
@@ -22141,7 +25935,7 @@ lab_endgetargs:;
/*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3149:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3209:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[24] = 0;
@@ -22154,14 +25948,14 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[23] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3150:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3210:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3150:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3210:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3148:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3208:/ quasiblock");
/*_.PROGN___V35*/ meltfptr[31] =
@@ -22172,7 +25966,7 @@ lab_endgetargs:;
/*_.PROGN___V35*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3148:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3208:/ clear");
/*clear *//*_.IFCPP___V30*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.RETURN___V34*/ meltfptr[24] = 0;
@@ -22191,7 +25985,7 @@ lab_endgetargs:;
/*_#__L14*/ meltfnum[12] =
(( /*_.MYELSE__V19*/ meltfptr[18]) ==
( /*_.ELSESTART__V21*/ meltfptr[20]));;
- MELT_LOCATION ("warmelt-normatch.melt:3151:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3211:/ cond");
/*cond */ if ( /*_#__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -22202,7 +25996,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3152:/ cppif.then");
+ ("warmelt-normatch.melt:3212:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22225,7 +26019,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3152:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3212:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22236,7 +26030,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3152:/ apply");
+ ("warmelt-normatch.melt:3212:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22248,7 +26042,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3152;
+ argtab[2].meltbp_long = 3212;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest myelse same as elsestart";
@@ -22273,7 +26067,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3152:/ clear");
+ ("warmelt-normatch.melt:3212:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/
meltfnum[15] = 0;
/*^clear */
@@ -22289,7 +26083,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3152:/ quasiblock");
+ ("warmelt-normatch.melt:3212:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] =
@@ -22300,7 +26094,7 @@ lab_endgetargs:;
/*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3152:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3212:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[31] = 0;
@@ -22314,16 +26108,16 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3153:/ quasiblock");
+ ("warmelt-normatch.melt:3213:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
MELT_LOCATION
- ("warmelt-normatch.melt:3153:/ finalreturn");
+ ("warmelt-normatch.melt:3213:/ finalreturn");
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3151:/ quasiblock");
+ ("warmelt-normatch.melt:3211:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[38] =
@@ -22334,7 +26128,7 @@ lab_endgetargs:;
/*_.PROGN___V42*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3151:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3211:/ clear");
/*clear *//*_.IFCPP___V37*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.RETURN___V41*/ meltfptr[31] = 0;
@@ -22353,7 +26147,7 @@ lab_endgetargs:;
/*_#__L17*/ meltfnum[15] =
(( /*_.MYELSE__V19*/ meltfptr[18]) ==
( /*_.ELSESTEP__V3*/ meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:3154:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3214:/ cond");
/*cond */ if ( /*_#__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -22364,7 +26158,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ cppif.then");
+ ("warmelt-normatch.melt:3215:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22389,7 +26183,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ cond");
+ ("warmelt-normatch.melt:3215:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22401,7 +26195,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ apply");
+ ("warmelt-normatch.melt:3215:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22414,7 +26208,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3155;
+ argtab[2].meltbp_long = 3215;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest myelse same as elsestep";
@@ -22442,7 +26236,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ clear");
+ ("warmelt-normatch.melt:3215:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/
meltfnum[18] = 0;
/*^clear */
@@ -22458,7 +26252,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ quasiblock");
+ ("warmelt-normatch.melt:3215:/ quasiblock");
/*_.PROGN___V47*/ meltfptr[45] =
@@ -22470,7 +26264,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3155:/ clear");
+ ("warmelt-normatch.melt:3215:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[0] =
0;
/*^clear */
@@ -22485,16 +26279,16 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3156:/ quasiblock");
+ ("warmelt-normatch.melt:3216:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
MELT_LOCATION
- ("warmelt-normatch.melt:3156:/ finalreturn");
+ ("warmelt-normatch.melt:3216:/ finalreturn");
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3154:/ quasiblock");
+ ("warmelt-normatch.melt:3214:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[45] =
@@ -22506,7 +26300,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3154:/ clear");
+ ("warmelt-normatch.melt:3214:/ clear");
/*clear *//*_.IFCPP___V44*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.RETURN___V48*/ meltfptr[38] = 0;
@@ -22526,7 +26320,7 @@ lab_endgetargs:;
(( /*_.MYTHEN__V20*/ meltfptr[19]) ==
( /*_.ELSESTEP__V3*/ meltfptr[2]));;
MELT_LOCATION
- ("warmelt-normatch.melt:3157:/ cond");
+ ("warmelt-normatch.melt:3217:/ cond");
/*cond */ if ( /*_#__L20*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -22537,7 +26331,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ cppif.then");
+ ("warmelt-normatch.melt:3218:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22562,7 +26356,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ cond");
+ ("warmelt-normatch.melt:3218:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22574,7 +26368,7 @@ lab_endgetargs:;
meltfnum[21] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ apply");
+ ("warmelt-normatch.melt:3218:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22588,7 +26382,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3158;
+ argtab[2].meltbp_long = 3218;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest mythen same as elsestep";
@@ -22608,7 +26402,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ clear");
+ ("warmelt-normatch.melt:3218:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[21] = 0;
/*^clear */
@@ -22624,7 +26418,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ quasiblock");
+ ("warmelt-normatch.melt:3218:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] =
@@ -22636,7 +26430,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3158:/ clear");
+ ("warmelt-normatch.melt:3218:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/
meltfnum[0] = 0;
/*^clear */
@@ -22653,16 +26447,16 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3159:/ quasiblock");
+ ("warmelt-normatch.melt:3219:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
MELT_LOCATION
- ("warmelt-normatch.melt:3159:/ finalreturn");
+ ("warmelt-normatch.melt:3219:/ finalreturn");
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3157:/ quasiblock");
+ ("warmelt-normatch.melt:3217:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[52] =
@@ -22674,7 +26468,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3157:/ clear");
+ ("warmelt-normatch.melt:3217:/ clear");
/*clear *//*_.IFCPP___V51*/ meltfptr[38] =
0;
/*^clear */
@@ -22697,7 +26491,7 @@ lab_endgetargs:;
(( /*_.MYTHEN__V20*/ meltfptr[19]) ==
( /*_.ELSESTART__V21*/ meltfptr[20]));;
MELT_LOCATION
- ("warmelt-normatch.melt:3160:/ cond");
+ ("warmelt-normatch.melt:3220:/ cond");
/*cond */ if ( /*_#__L23*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -22708,7 +26502,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ cppif.then");
+ ("warmelt-normatch.melt:3221:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22734,7 +26528,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ cond");
+ ("warmelt-normatch.melt:3221:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22746,7 +26540,7 @@ lab_endgetargs:;
meltfnum[24] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ apply");
+ ("warmelt-normatch.melt:3221:/ apply");
/*apply */
{
union meltparam_un
@@ -22762,7 +26556,7 @@ lab_endgetargs:;
"warmelt-normatch.melt";
/*^apply.arg */
argtab[2].meltbp_long =
- 3161;
+ 3221;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest mythen same as elsestart";
@@ -22782,7 +26576,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ clear");
+ ("warmelt-normatch.melt:3221:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/
meltfnum[24] = 0;
/*^clear */
@@ -22799,7 +26593,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ quasiblock");
+ ("warmelt-normatch.melt:3221:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] =
@@ -22811,7 +26605,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3161:/ clear");
+ ("warmelt-normatch.melt:3221:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/
meltfnum[0] = 0;
/*^clear */
@@ -22829,16 +26623,16 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3162:/ quasiblock");
+ ("warmelt-normatch.melt:3222:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
MELT_LOCATION
- ("warmelt-normatch.melt:3162:/ finalreturn");
+ ("warmelt-normatch.melt:3222:/ finalreturn");
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3160:/ quasiblock");
+ ("warmelt-normatch.melt:3220:/ quasiblock");
/*_.PROGN___V63*/ meltfptr[59] =
@@ -22850,7 +26644,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3160:/ clear");
+ ("warmelt-normatch.melt:3220:/ clear");
/*clear *//*_.IFCPP___V58*/
meltfptr[45] = 0;
/*^clear */
@@ -22873,7 +26667,7 @@ lab_endgetargs:;
(( /*_.MYELSE__V19*/ meltfptr[18])
== NULL);;
MELT_LOCATION
- ("warmelt-normatch.melt:3163:/ cond");
+ ("warmelt-normatch.melt:3223:/ cond");
/*cond */ if ( /*_#NULL__L26*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -22882,7 +26676,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:3164:/ quasiblock");
+ ("warmelt-normatch.melt:3224:/ quasiblock");
/*^putslot */
@@ -22900,7 +26694,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ cppif.then");
+ ("warmelt-normatch.melt:3225:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22926,7 +26720,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ cond");
+ ("warmelt-normatch.melt:3225:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22938,7 +26732,7 @@ lab_endgetargs:;
meltfnum[27] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ apply");
+ ("warmelt-normatch.melt:3225:/ apply");
/*apply */
{
union meltparam_un
@@ -22957,7 +26751,7 @@ lab_endgetargs:;
"warmelt-normatch.melt";
/*^apply.arg */
argtab[2].
- meltbp_long = 3165;
+ meltbp_long = 3225;
/*^apply.arg */
argtab[3].
meltbp_cstring =
@@ -22980,7 +26774,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ clear");
+ ("warmelt-normatch.melt:3225:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/
meltfnum[27] = 0;
/*^clear */
@@ -22997,7 +26791,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ quasiblock");
+ ("warmelt-normatch.melt:3225:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[66]
@@ -23013,7 +26807,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3165:/ clear");
+ ("warmelt-normatch.melt:3225:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/
meltfnum[0] = 0;
/*^clear */
@@ -23033,7 +26827,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:3166:/ locexp");
+ ("warmelt-normatch.melt:3226:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -23043,7 +26837,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3163:/ quasiblock");
+ ("warmelt-normatch.melt:3223:/ quasiblock");
/*epilog */
@@ -23064,7 +26858,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ cppif.then");
+ ("warmelt-normatch.melt:3229:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23090,7 +26884,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ cond");
+ ("warmelt-normatch.melt:3229:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[27]) /*then */
{
/*^cond.then */
@@ -23102,7 +26896,7 @@ lab_endgetargs:;
meltfnum[0] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ apply");
+ ("warmelt-normatch.melt:3229:/ apply");
/*apply */
{
union meltparam_un
@@ -23121,7 +26915,7 @@ lab_endgetargs:;
"warmelt-normatch.melt";
/*^apply.arg */
argtab[2].
- meltbp_long = 3169;
+ meltbp_long = 3229;
/*^apply.arg */
argtab[3].
meltbp_cstring =
@@ -23144,7 +26938,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ clear");
+ ("warmelt-normatch.melt:3229:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/
meltfnum[0] = 0;
/*^clear */
@@ -23161,7 +26955,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ quasiblock");
+ ("warmelt-normatch.melt:3229:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[52]
@@ -23177,7 +26971,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3169:/ clear");
+ ("warmelt-normatch.melt:3229:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/
meltfnum[27] = 0;
/*^clear */
@@ -23195,7 +26989,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3170:/ msend");
+ ("warmelt-normatch.melt:3230:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -23213,7 +27007,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3168:/ quasiblock");
+ ("warmelt-normatch.melt:3228:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[52] =
@@ -23228,7 +27022,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3163:/ clear");
+ ("warmelt-normatch.melt:3223:/ clear");
/*clear *//*_.IFCPP___V69*/
meltfptr[59] = 0;
/*^clear */
@@ -23246,7 +27040,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3160:/ clear");
+ ("warmelt-normatch.melt:3220:/ clear");
/*clear *//*_#NULL__L26*/ meltfnum[24]
= 0;
/*^clear */
@@ -23261,7 +27055,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3157:/ clear");
+ ("warmelt-normatch.melt:3217:/ clear");
/*clear *//*_#__L23*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.IFELSE___V57*/ meltfptr[38] =
@@ -23275,7 +27069,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3154:/ clear");
+ ("warmelt-normatch.melt:3214:/ clear");
/*clear *//*_#__L20*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IFELSE___V50*/ meltfptr[31] = 0;
@@ -23287,7 +27081,7 @@ lab_endgetargs:;
/*_.IFELSE___V43*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3151:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3211:/ clear");
/*clear *//*_#__L17*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IFELSE___V43*/ meltfptr[24] = 0;
@@ -23299,7 +27093,7 @@ lab_endgetargs:;
/*_.IFELSE___V36*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3148:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3208:/ clear");
/*clear *//*_#__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[23] = 0;
@@ -23310,7 +27104,7 @@ lab_endgetargs:;
/*_.IFELSE___V22*/ meltfptr[21] = /*_.IFELSE___V29*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3145:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3205:/ clear");
/*clear *//*_#__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[22] = 0;
@@ -23318,7 +27112,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3173:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3233:/ cond");
/*cond */ if ( /*_.MYTHEN__V20*/ meltfptr[19]) /*then */
{
/*^cond.then */
@@ -23328,7 +27122,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23351,7 +27145,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23361,7 +27155,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[27] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23372,7 +27166,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3175;
+ argtab[2].meltbp_long = 3235;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest recursing in mythen";
@@ -23394,7 +27188,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V78*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V78*/ meltfptr[45] = 0;
@@ -23407,7 +27201,7 @@ lab_endgetargs:;
/*_.IF___V77*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ quasiblock");
/*_.PROGN___V79*/ meltfptr[38] = /*_.IF___V77*/ meltfptr[52];;
@@ -23416,7 +27210,7 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[66] = /*_.PROGN___V79*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3175:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3235:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V77*/ meltfptr[52] = 0;
@@ -23431,7 +27225,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23454,7 +27248,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -23464,7 +27258,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23475,7 +27269,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3176;
+ argtab[2].meltbp_long = 3236;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchtest recursing with elsestart";
@@ -23497,7 +27291,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V82*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V82*/ meltfptr[23] = 0;
@@ -23510,7 +27304,7 @@ lab_endgetargs:;
/*_.IF___V81*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ quasiblock");
/*_.PROGN___V83*/ meltfptr[22] = /*_.IF___V81*/ meltfptr[24];;
@@ -23519,7 +27313,7 @@ lab_endgetargs:;
/*_.IFCPP___V80*/ meltfptr[31] = /*_.PROGN___V83*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3176:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3236:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V81*/ meltfptr[24] = 0;
@@ -23532,7 +27326,7 @@ lab_endgetargs:;
/*_.IFCPP___V80*/ meltfptr[31] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3177:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3237:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -23547,7 +27341,7 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3174:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3234:/ quasiblock");
/*_.PROGN___V85*/ meltfptr[52] =
@@ -23557,7 +27351,7 @@ lab_endgetargs:;
/*_.IF___V75*/ meltfptr[59] = /*_.PROGN___V85*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3173:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3233:/ clear");
/*clear *//*_.IFCPP___V76*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_.IFCPP___V80*/ meltfptr[31] = 0;
@@ -23576,7 +27370,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23599,7 +27393,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -23609,7 +27403,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23620,7 +27414,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3179;
+ argtab[2].meltbp_long = 3239;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchtest end recv";
/*^apply.arg */
@@ -23640,7 +27434,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V88*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[24] = 0;
@@ -23653,7 +27447,7 @@ lab_endgetargs:;
/*_.IF___V87*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[22] = /*_.IF___V87*/ meltfptr[23];;
@@ -23662,7 +27456,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[38] = /*_.PROGN___V89*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3179:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3239:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V87*/ meltfptr[23] = 0;
@@ -23679,7 +27473,7 @@ lab_endgetargs:;
/*_.LET___V18*/ meltfptr[16] = /*_.IFCPP___V86*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:3139:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3199:/ clear");
/*clear *//*_.MYELSE__V19*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.MYTHEN__V20*/ meltfptr[19] = 0;
@@ -23693,11 +27487,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V75*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.IFCPP___V86*/ meltfptr[38] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -23726,14 +27520,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST */
+} /*end meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -23754,7 +27548,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP_st
+ struct frame_meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -23793,7 +27587,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -23815,7 +27609,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23838,7 +27632,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23848,7 +27642,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23858,7 +27652,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3186;
+ argtab[2].meltbp_long = 3246;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchgroup recv";
/*^apply.arg */
@@ -23877,7 +27671,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -23890,7 +27684,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -23899,7 +27693,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3186:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3246:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -23914,7 +27708,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3187:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3247:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23923,7 +27717,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3187:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3247:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23931,7 +27725,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3187:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3247:/ cond.else");
/*^block */
/*anyblock */
@@ -23945,7 +27739,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3187) ? (3187) : __LINE__, __FUNCTION__);
+ (3247) ? (3247) : __LINE__, __FUNCTION__);
;
}
;
@@ -23960,7 +27754,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3187:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3247:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -23973,7 +27767,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23996,7 +27790,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24006,7 +27800,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24016,7 +27810,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3188;
+ argtab[2].meltbp_long = 3248;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchgroup elsestep";
/*^apply.arg */
@@ -24036,7 +27830,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -24049,7 +27843,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -24058,7 +27852,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3188:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3248:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -24073,7 +27867,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3189:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3249:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24082,7 +27876,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ELSESTEP__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3189:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3249:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24090,7 +27884,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3189:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3249:/ cond.else");
/*^block */
/*anyblock */
@@ -24104,7 +27898,7 @@ lab_endgetargs:;
melt_assert_failed (("check elsestep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3189) ? (3189) : __LINE__, __FUNCTION__);
+ (3249) ? (3249) : __LINE__, __FUNCTION__);
;
}
;
@@ -24119,7 +27913,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3189:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3249:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
@@ -24130,7 +27924,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3190:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3250:/ quasiblock");
/*^getslot */
@@ -24141,7 +27935,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3191:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3251:/ apply");
/*apply */
{
/*_.ELSESTART__V18*/ meltfptr[17] =
@@ -24151,7 +27945,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3192:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3252:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 6, "MSTGROUP_START");
@@ -24161,7 +27955,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24184,7 +27978,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24194,7 +27988,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24204,7 +27998,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3194;
+ argtab[2].meltbp_long = 3254;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchgroup elsestart";
/*^apply.arg */
@@ -24224,7 +28018,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0;
@@ -24237,7 +28031,7 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ quasiblock");
/*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];;
@@ -24246,7 +28040,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3194:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3254:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V21*/ meltfptr[20] = 0;
@@ -24259,7 +28053,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3195:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3255:/ cond");
/*cond */ if ( /*_.STARTGROUP__V19*/ meltfptr[18]) /*then */
{
/*^cond.then */
@@ -24269,7 +28063,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24292,7 +28086,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24302,7 +28096,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24313,7 +28107,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3197;
+ argtab[2].meltbp_long = 3257;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchgroup recursing startgroup";
@@ -24335,7 +28129,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
@@ -24348,7 +28142,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
@@ -24357,7 +28151,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3197:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3257:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[25] = 0;
@@ -24370,7 +28164,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3198:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3258:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -24385,7 +28179,7 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3196:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3256:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[26] =
@@ -24395,7 +28189,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[20] = /*_.PROGN___V30*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3195:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3255:/ clear");
/*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_.PUT_ELSE_MATCH__V29*/ meltfptr[25] = 0;
@@ -24412,7 +28206,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24435,7 +28229,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24445,7 +28239,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24456,7 +28250,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3200;
+ argtab[2].meltbp_long = 3260;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchgroup elsegroup";
/*^apply.arg */
@@ -24476,7 +28270,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[26] = 0;
@@ -24489,7 +28283,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[26] = /*_.IF___V32*/ meltfptr[25];;
@@ -24498,7 +28292,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[21] = /*_.PROGN___V34*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3200:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3260:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[25] = 0;
@@ -24515,7 +28309,7 @@ lab_endgetargs:;
/*_#NULL__L13*/ meltfnum[1] =
(( /*_.ELSEGROUP__V17*/ meltfptr[16]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3202:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3262:/ cond");
/*cond */ if ( /*_#NULL__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24523,7 +28317,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3202:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3262:/ cond.else");
/*^block */
/*anyblock */
@@ -24534,7 +28328,7 @@ lab_endgetargs:;
( /*_.ELSEGROUP__V17*/ meltfptr[16]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3204:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3264:/ cond");
/*cond */ if ( /*_#IS_A__L14*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -24544,7 +28338,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24567,7 +28361,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -24577,7 +28371,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24588,7 +28382,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3205;
+ argtab[2].meltbp_long = 3265;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchgroup elsegroup step";
@@ -24611,7 +28405,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
0;
/*^clear */
@@ -24625,7 +28419,7 @@ lab_endgetargs:;
/*_.IF___V38*/ meltfptr[37] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] =
@@ -24636,7 +28430,7 @@ lab_endgetargs:;
/*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3205:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3265:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[37] = 0;
@@ -24649,7 +28443,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[36] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3206:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3266:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -24666,7 +28460,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3204:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3264:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[38] =
@@ -24677,7 +28471,7 @@ lab_endgetargs:;
/*_.PROGN___V42*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3204:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3264:/ clear");
/*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.PUT_ELSE_MATCH__V41*/ meltfptr[37] = 0;
@@ -24697,7 +28491,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.ELSEGROUP__V17*/ meltfptr[16])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:3207:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3267:/ cond");
/*cond */ if ( /*_#IS_LIST__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24726,7 +28520,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ cppif.then");
+ ("warmelt-normatch.melt:3271:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24751,7 +28545,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ cond");
+ ("warmelt-normatch.melt:3271:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -24763,7 +28557,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ apply");
+ ("warmelt-normatch.melt:3271:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24776,7 +28570,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3211;
+ argtab[2].meltbp_long = 3271;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchgroup curelse from list";
@@ -24804,7 +28598,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ clear");
+ ("warmelt-normatch.melt:3271:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/
meltfnum[18] = 0;
/*^clear */
@@ -24820,7 +28614,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ quasiblock");
+ ("warmelt-normatch.melt:3271:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[47] =
@@ -24832,7 +28626,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3211:/ clear");
+ ("warmelt-normatch.melt:3271:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[14]
= 0;
/*^clear */
@@ -24847,7 +28641,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3212:/ msend");
+ ("warmelt-normatch.melt:3272:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -24869,7 +28663,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3208:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3268:/ clear");
/*clear *//*_.CURPAIR__V44*/ meltfptr[37] = 0;
/*^clear */
/*clear *//*_.CURELSE__V45*/ meltfptr[38] = 0;
@@ -24885,7 +28679,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3207:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3267:/ cond.else");
/*^block */
/*anyblock */
@@ -24895,7 +28689,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.ELSEGROUP__V17*/ meltfptr[16]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:3213:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3273:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L20*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -24928,7 +28722,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ cppif.then");
+ ("warmelt-normatch.melt:3277:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24953,7 +28747,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ cond");
+ ("warmelt-normatch.melt:3277:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -24965,7 +28759,7 @@ lab_endgetargs:;
meltfnum[22] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ apply");
+ ("warmelt-normatch.melt:3277:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24979,7 +28773,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3217;
+ argtab[2].meltbp_long = 3277;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchgroup curelse from tuple";
@@ -24999,7 +28793,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ clear");
+ ("warmelt-normatch.melt:3277:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/
meltfnum[22] = 0;
/*^clear */
@@ -25015,7 +28809,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ quasiblock");
+ ("warmelt-normatch.melt:3277:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[54] =
@@ -25027,7 +28821,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3217:/ clear");
+ ("warmelt-normatch.melt:3277:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/
meltfnum[21] = 0;
/*^clear */
@@ -25044,7 +28838,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3218:/ msend");
+ ("warmelt-normatch.melt:3278:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -25069,7 +28863,7 @@ lab_endgetargs:;
/*citerepilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3214:/ clear");
+ ("warmelt-normatch.melt:3274:/ clear");
/*clear *//*_.CURELSE__V52*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_#THIX__L21*/ meltfnum[14] = 0;
@@ -25087,7 +28881,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3213:/ cond.else");
+ ("warmelt-normatch.melt:3273:/ cond.else");
/*^block */
/*anyblock */
@@ -25096,7 +28890,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ cppif.then");
+ ("warmelt-normatch.melt:3280:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25121,7 +28915,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ cond");
+ ("warmelt-normatch.melt:3280:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[22]) /*then */
{
/*^cond.then */
@@ -25133,7 +28927,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ apply");
+ ("warmelt-normatch.melt:3280:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25146,7 +28940,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3220;
+ argtab[2].meltbp_long = 3280;
/*^apply.arg */
argtab[3].meltbp_cstring =
"putelse_matchgroup bad elsegroup";
@@ -25174,7 +28968,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ clear");
+ ("warmelt-normatch.melt:3280:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/
meltfnum[21] = 0;
/*^clear */
@@ -25190,7 +28984,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ quasiblock");
+ ("warmelt-normatch.melt:3280:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] =
@@ -25202,7 +28996,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3220:/ clear");
+ ("warmelt-normatch.melt:3280:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[22]
= 0;
/*^clear */
@@ -25219,7 +29013,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3221:/ cppif.then");
+ ("warmelt-normatch.melt:3281:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25234,7 +29028,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3221:/ cond.else");
+ ("warmelt-normatch.melt:3281:/ cond.else");
/*^block */
/*anyblock */
@@ -25250,7 +29044,7 @@ lab_endgetargs:;
?
("warmelt-normatch.melt")
: __FILE__,
- (3221) ? (3221) :
+ (3281) ? (3281) :
__LINE__,
__FUNCTION__);
;
@@ -25270,7 +29064,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3221:/ clear");
+ ("warmelt-normatch.melt:3281:/ clear");
/*clear *//*_.IFELSE___V63*/ meltfptr[59] = 0;
}
@@ -25280,7 +29074,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3219:/ quasiblock");
+ ("warmelt-normatch.melt:3279:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[59] =
@@ -25292,7 +29086,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3213:/ clear");
+ ("warmelt-normatch.melt:3273:/ clear");
/*clear *//*_.IFCPP___V58*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.IFCPP___V62*/ meltfptr[58] = 0;
@@ -25306,7 +29100,7 @@ lab_endgetargs:;
/*_.IFELSE___V51*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3207:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3267:/ clear");
/*clear *//*_#IS_MULTIPLE__L20*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IFELSE___V51*/ meltfptr[47] = 0;
@@ -25318,7 +29112,7 @@ lab_endgetargs:;
/*_.IFELSE___V43*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3204:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3264:/ clear");
/*clear *//*_#IS_LIST__L17*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IFELSE___V43*/ meltfptr[36] = 0;
@@ -25329,7 +29123,7 @@ lab_endgetargs:;
/*_.IFELSE___V35*/ meltfptr[25] = /*_.IFELSE___V36*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3202:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3262:/ clear");
/*clear *//*_#IS_A__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[26] = 0;
@@ -25339,7 +29133,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25362,7 +29156,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -25372,7 +29166,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[22] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25383,7 +29177,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3222;
+ argtab[2].meltbp_long = 3282;
/*^apply.arg */
argtab[3].meltbp_cstring = "putelse_matchgroup end recv";
/*^apply.arg */
@@ -25403,7 +29197,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V67*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[22] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[59] = 0;
@@ -25416,7 +29210,7 @@ lab_endgetargs:;
/*_.IF___V66*/ meltfptr[58] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[47] = /*_.IF___V66*/ meltfptr[58];;
@@ -25425,7 +29219,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[54] = /*_.PROGN___V68*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3222:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3282:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.IF___V66*/ meltfptr[58] = 0;
@@ -25442,7 +29236,7 @@ lab_endgetargs:;
/*_.LET___V16*/ meltfptr[11] = /*_.IFCPP___V65*/ meltfptr[54];;
- MELT_LOCATION ("warmelt-normatch.melt:3190:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3250:/ clear");
/*clear *//*_.ELSEGROUP__V17*/ meltfptr[16] = 0;
/*^clear */
/*clear *//*_.ELSESTART__V18*/ meltfptr[17] = 0;
@@ -25460,11 +29254,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V35*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.IFCPP___V65*/ meltfptr[54] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -25491,14 +29285,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP */
+} /*end meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -25520,7 +29314,7 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS_st
+ struct frame_meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -25531,10 +29325,10 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 10
- void *mcfr_varptr[10];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
+#define MELTFRAM_NBVARPTR 14
+ void *mcfr_varptr[14];
+#define MELTFRAM_NBVARNUM 4
+ long mcfr_varnum[4];
/*others*/
long _spare_;
}
@@ -25545,13 +29339,13 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 10; ix++)
+ for (ix = 0; ix < 14; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 10;
+ meltfram__.mcfr_nbvar = 14;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -25559,7 +29353,7 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3228:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3288:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -25589,7 +29383,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3229:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3289:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25597,756 +29391,7 @@ lab_endgetargs:;
/*_#IS_A__L1*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_INSTANCE */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3229:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:3229:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (3229) ? (3229) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3229:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3230:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 7, "MSTINS_SLOTS");
- /*_.SLOTUP__V7*/
- meltfptr[5] = slot;
- };
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.SLOTUP__V7*/ meltfptr[5]);
- for ( /*_#IX__L2*/ meltfnum[0] = 0;
- ( /*_#IX__L2*/ meltfnum[0] >= 0)
- && ( /*_#IX__L2*/ meltfnum[0] < cit1__EACHTUP_ln);
- /*_#IX__L2*/ meltfnum[0]++)
- {
- /*_.CURSLOT__V8*/ meltfptr[7] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.SLOTUP__V7*/ meltfptr[5]),
- /*_#IX__L2*/ meltfnum[0]);
-
-
-
- MELT_LOCATION ("warmelt-normatch.melt:3235:/ cond");
- /*cond */ if ( /*_.CURSLOT__V8*/ meltfptr[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:3236:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t)
- ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CURSLOT__V8*/ meltfptr[7]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3235:/ clear");
- /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- if ( /*_#IX__L2*/ meltfnum[0] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3232:/ clear");
- /*clear *//*_.CURSLOT__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_#IX__L2*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:3230:/ clear");
- /*clear *//*_.SLOTUP__V7*/ meltfptr[5] = 0;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3228:/ clear");
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("SCANSTEPDATA_TESTINS", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 10
- void *mcfr_varptr[10];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 10; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 10;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSTEPDATA_TESTMATCHER", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3239:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.FUN__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.CTX__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3240:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3240:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:3240:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (3240) ? (3240) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3240:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3241:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 9, "MSTMA_OUTS");
- /*_.OUTS__V7*/
- meltfptr[5] = slot;
- };
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.OUTS__V7*/ meltfptr[5]);
- for ( /*_#OUTIX__L2*/ meltfnum[0] = 0;
- ( /*_#OUTIX__L2*/ meltfnum[0] >= 0)
- && ( /*_#OUTIX__L2*/ meltfnum[0] < cit1__EACHTUP_ln);
- /*_#OUTIX__L2*/ meltfnum[0]++)
- {
- /*_.CUROUT__V8*/ meltfptr[7] =
- melt_multiple_nth ((melt_ptr_t) ( /*_.OUTS__V7*/ meltfptr[5]),
- /*_#OUTIX__L2*/ meltfnum[0]);
-
-
-
- MELT_LOCATION ("warmelt-normatch.melt:3246:/ cond");
- /*cond */ if ( /*_.CUROUT__V8*/ meltfptr[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t)
- ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CUROUT__V8*/ meltfptr[7]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3246:/ clear");
- /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- if ( /*_#OUTIX__L2*/ meltfnum[0] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3243:/ clear");
- /*clear *//*_.CUROUT__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_#OUTIX__L2*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:3241:/ clear");
- /*clear *//*_.OUTS__V7*/ meltfptr[5] = 0;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3239:/ clear");
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("SCANSTEPDATA_TESTMATCHER", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 10
- void *mcfr_varptr[10];
-#define MELTFRAM_NBVARNUM 1
- long mcfr_varnum[1];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 10; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 10;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSTEPFLAG_STEPWITHFLAG", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3250:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.FUN__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.CTX__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3251:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3251:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:3251:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (3251) ? (3251) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3251:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3252:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
- /*_.FLAG__V8*/
- meltfptr[7] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3254:/ cond");
- /*cond */ if ( /*_.FLAG__V8*/ meltfptr[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.FLAG__V8*/ meltfptr[7]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3254:/ clear");
- /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.LET___V7*/ meltfptr[5] = /*_.IF___V9*/ meltfptr[8];;
-
- MELT_LOCATION ("warmelt-normatch.melt:3252:/ clear");
- /*clear *//*_.FLAG__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3250:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:3250:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.LET___V7*/ meltfptr[5] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("SCANSTEPFLAG_STEPWITHFLAG", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 12
- void *mcfr_varptr[12];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 12; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 12;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("SCANSTEPFLAG_STEPFLAGOPER", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3259:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.FUN__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.CTX__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3260:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3260:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3289:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -26354,7 +29399,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3260:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3289:/ cond.else");
/*^block */
/*anyblock */
@@ -26368,7 +29413,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3260) ? (3260) : __LINE__, __FUNCTION__);
+ (3289) ? (3289) : __LINE__, __FUNCTION__);
;
}
;
@@ -26383,7 +29428,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3260:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3289:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
@@ -26394,267 +29439,9 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3261:/ quasiblock");
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
- /*_.FLAG__V7*/
- meltfptr[5] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3262:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_FLAGARGS");
- /*_.FLAGARGS__V8*/
- meltfptr[7] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3264:/ cond");
- /*cond */ if ( /*_.FLAG__V7*/ meltfptr[5]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V10*/ meltfptr[9] =
- melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.FLAG__V7*/ meltfptr[5]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3264:/ clear");
- /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3265:/ cond");
- /*cond */ if ( /*_.FLAGARGS__V8*/ meltfptr[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.FLAGARGS__V8*/
- meltfptr[7]);
- for ( /*_#FLAGIX__L2*/ meltfnum[0] = 0;
- ( /*_#FLAGIX__L2*/ meltfnum[0] >= 0)
- && ( /*_#FLAGIX__L2*/ meltfnum[0] < cit1__EACHTUP_ln);
- /*_#FLAGIX__L2*/ meltfnum[0]++)
- {
- /*_.CURFLAG__V11*/ meltfptr[9] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.FLAGARGS__V8*/ meltfptr[7]),
- /*_#FLAGIX__L2*/ meltfnum[0]);
-
-
-
- MELT_LOCATION ("warmelt-normatch.melt:3269:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
- /*_.FUN__V12*/ meltfptr[11] =
- melt_apply ((meltclosure_ptr_t)
- ( /*_.FUN__V3*/ meltfptr[2]),
- (melt_ptr_t) ( /*_.CURFLAG__V11*/
- meltfptr[9]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- if ( /*_#FLAGIX__L2*/ meltfnum[0] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3266:/ clear");
- /*clear *//*_.CURFLAG__V11*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_#FLAGIX__L2*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.FUN__V12*/ meltfptr[11] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:3261:/ clear");
- /*clear *//*_.FLAG__V7*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.FLAGARGS__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3259:/ clear");
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("SCANSTEPFLAG_STEPFLAGOPER", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 23
- void *mcfr_varptr[23];
-#define MELTFRAM_NBVARNUM 6
- long mcfr_varnum[6];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 23; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 23;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("TRANSLPAT_ANYRECV", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3284:/ getarg");
- /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.MDATA__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.MCASE__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3])) !=
- NULL);
-
-
- /*getarg#3 */
- /*^getarg */
- if (meltxargdescr_[2] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.VARMAP__V5*/ meltfptr[4] =
- (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.VARMAP__V5*/ meltfptr[4])) !=
- NULL);
-
-
- /*getarg#4 */
- /*^getarg */
- if (meltxargdescr_[3] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.SLOC__V6*/ meltfptr[5] =
- (meltxargtab_[3].meltbp_aptr) ? (*(meltxargtab_[3].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V6*/ meltfptr[5])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26669,7 +29456,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L2*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -26677,38 +29464,44 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ /*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3285;
+ argtab[2].meltbp_long = 3290;
/*^apply.arg */
- argtab[3].meltbp_cstring = "translpat_anyrecv recv";
+ argtab[3].meltbp_cstring = "scanstepdata_testins step=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " fun=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FUN__V3*/ meltfptr[2];
/*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[1])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -26716,8 +29509,8 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
}
@@ -26729,17 +29522,17 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
/*^compute */
- /*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
+ /*_.IFCPP___V7*/ meltfptr[5] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3285:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3290:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
/*^clear */
@@ -26748,323 +29541,111 @@ lab_endgetargs:;
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3286:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^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-normatch.melt:3286:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3286:/ apply");
- /*apply */
- {
- 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-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 3286;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translpat_anyrecv mdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MDATA__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] =
- 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);
- }
- ;
- /*_.IF___V12*/ meltfptr[8] =
- /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3286:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V12*/ meltfptr[8] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3286:/ quasiblock");
-
-
- /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[8];;
- /*^compute */
-
- /*_.IFCPP___V11*/ meltfptr[7] = /*_.PROGN___V14*/ meltfptr[12];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3286:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V12*/ meltfptr[8] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V14*/ meltfptr[12] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
+ /*_.IFCPP___V7*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3287:/ quasiblock");
-
-
- /*_.DIS__V16*/ meltfptr[12] =
- (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3288:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L5*/ meltfnum[0] =
- /*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-normatch.melt:3288:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3288:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 3288;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translpat_anyrecv dis";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DIS__V16*/ meltfptr[12];
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
- 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);
- }
- ;
- /*_.IF___V18*/ meltfptr[17] =
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3288:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V18*/ meltfptr[17] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3288:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3291:/ quasiblock");
- /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
- /*^compute */
-
- /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:3288:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:3289:/ getslot");
+ /*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V16*/ meltfptr[12]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V21*/
- meltfptr[17] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 7, "MSTINS_SLOTS");
+ /*_.SLOTUP__V11*/
+ meltfptr[7] = slot;
};
;
-
- {
- /*^locexp */
- melt_error_str ((melt_ptr_t) ( /*_.SLOC__V6*/ meltfptr[5]),
- ("unexpected TRANSLATE_PATTERN for"),
- (melt_ptr_t) ( /*_.NAMED_NAME__V21*/ meltfptr[17]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3290:/ cppif.then");
- /*^block */
- /*anyblock */
+ /*citerblock FOREACH_IN_MULTIPLE */
{
-
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V23*/ meltfptr[22] = ( /*nil */ NULL);;
- }
- else
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.SLOTUP__V11*/ meltfptr[7]);
+ for ( /*_#IX__L4*/ meltfnum[2] = 0;
+ ( /*_#IX__L4*/ meltfnum[2] >= 0)
+ && ( /*_#IX__L4*/ meltfnum[2] < cit1__EACHTUP_ln);
+ /*_#IX__L4*/ meltfnum[2]++)
{
- MELT_LOCATION ("warmelt-normatch.melt:3290:/ cond.else");
+ /*_.CURSLOT__V12*/ meltfptr[8] =
+ melt_multiple_nth ((melt_ptr_t) ( /*_.SLOTUP__V11*/ meltfptr[7]),
+ /*_#IX__L4*/ meltfnum[2]);
- /*^block */
- /*anyblock */
- {
+ MELT_LOCATION ("warmelt-normatch.melt:3296:/ cond");
+ /*cond */ if ( /*_.CURSLOT__V12*/ meltfptr[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3297:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V14*/ meltfptr[13] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CURSLOT__V12*/
+ meltfptr[8]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V13*/ meltfptr[12] = /*_.FUN__V14*/ meltfptr[13];;
+ /*epilog */
- {
- /*^locexp */
- melt_assert_failed (("@$@unexpected translpat_anyrecv"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (3290) ? (3290) : __LINE__, __FUNCTION__);
+ MELT_LOCATION ("warmelt-normatch.melt:3296:/ clear");
+ /*clear *//*_.FUN__V14*/ meltfptr[13] = 0;
+ }
;
}
- ;
- /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
+ else
+ { /*^cond.else */
- /*_.IFCPP___V22*/ meltfptr[18] = /*_.IFELSE___V23*/ meltfptr[22];;
- /*epilog */
+ /*_.IF___V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+ if ( /*_#IX__L4*/ meltfnum[2] < 0)
+ break;
+ } /* end cit1__EACHTUP */
- MELT_LOCATION ("warmelt-normatch.melt:3290:/ clear");
- /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
- }
+ /*citerepilog */
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
+ MELT_LOCATION ("warmelt-normatch.melt:3293:/ clear");
+ /*clear *//*_.CURSLOT__V12*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_#IX__L4*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
;
- /*^compute */
-
- /*_.LET___V15*/ meltfptr[8] = /*_.IFCPP___V22*/ meltfptr[18];;
-
- MELT_LOCATION ("warmelt-normatch.melt:3287:/ clear");
- /*clear *//*_.DIS__V16*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V21*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3284:/ quasiblock");
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-normatch.melt:3284:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:3291:/ clear");
+ /*clear *//*_.SLOTUP__V11*/ meltfptr[7] = 0;
/*epilog */
+ MELT_LOCATION ("warmelt-normatch.melt:3288:/ clear");
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_.LET___V15*/ meltfptr[8] = 0;
+ /*clear *//*_.IFCPP___V7*/ meltfptr[5] = 0;
}
;
goto labend_rout;
labend_rout:
- melt_trace_end ("TRANSLPAT_ANYRECV", meltcallcount);
+ melt_trace_end ("SCANSTEPDATA_TESTINS", meltcallcount);
melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+ return (melt_ptr_t) ( /*noretval */ NULL);
#undef meltcallcount
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV */
+} /*end meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS */
diff --git a/gcc/melt/generated/warmelt-normatch+03.c b/gcc/melt/generated/warmelt-normatch+03.c
index b334023e385..bf963b3772b 100644
--- a/gcc/melt/generated/warmelt-normatch+03.c
+++ b/gcc/melt/generated/warmelt-normatch+03.c
@@ -690,7 +690,20 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -705,7 +718,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -721,7 +734,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -737,7 +750,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -752,7 +765,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -771,7 +784,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -784,7 +797,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -797,7 +810,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -812,7 +825,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -827,7 +840,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -842,7 +855,39 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -857,7 +902,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -870,7 +915,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -884,7 +929,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -900,7 +945,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -915,23 +960,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -945,7 +974,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -958,7 +987,22 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -971,7 +1015,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -986,7 +1030,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1001,7 +1045,22 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1017,7 +1076,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1032,7 +1091,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1047,7 +1106,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1063,7 +1122,45 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1082,7 +1179,7 @@ meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1101,7 +1198,7 @@ meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1120,7 +1217,26 @@ meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1135,7 +1251,7 @@ meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1150,7 +1266,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1165,7 +1281,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1180,7 +1296,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1195,7 +1311,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1208,7 +1324,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1223,7 +1339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1238,7 +1354,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1253,7 +1369,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1268,7 +1384,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1281,7 +1397,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1294,7 +1410,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1309,7 +1425,20 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1325,7 +1454,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1344,7 +1473,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1363,7 +1492,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1382,7 +1511,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1401,7 +1530,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1417,39 +1546,23 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1468,36 +1581,7 @@ meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1516,7 +1600,56 @@ meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1525,22 +1658,22 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1559,7 +1692,7 @@ meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1574,7 +1707,7 @@ meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1589,7 +1722,7 @@ meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1605,7 +1738,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1624,7 +1757,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1643,7 +1776,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1658,7 +1791,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1673,7 +1806,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1687,7 +1820,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1701,7 +1834,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1715,7 +1848,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1729,7 +1862,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1748,7 +1881,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1767,7 +1900,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1786,7 +1919,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1805,7 +1938,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1824,7 +1957,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1843,7 +1976,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1862,7 +1995,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1881,7 +2014,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1890,7 +2023,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1899,7 +2032,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1908,7 +2041,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1922,7 +2055,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1937,7 +2070,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1951,7 +2084,7 @@ meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1970,7 +2103,7 @@ meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1986,7 +2119,7 @@ meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2000,7 +2133,7 @@ meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2014,7 +2147,7 @@ meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2161,7 @@ meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2042,7 +2175,7 @@ meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2168,16 +2301,2334 @@ static void forward_or_mark_module_start_frame_warmelt_normatch (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 18
+ void *mcfr_varptr[18];
+#define MELTFRAM_NBVARNUM 6
+ long mcfr_varnum[6];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 18; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 18;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPDATA_TESTTUPLE", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3300:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3301:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3301:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3301:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3301;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scanstepdata_testtuple step=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " fun=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FUN__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3301:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3301:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3301:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3302:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3302:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3302:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3302) ? (3302) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3302:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3303:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTTUP_COMPONENTS");
+ /*_.MTUPCOMP__V11*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MTUPCOMP__V11*/ meltfptr[6] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3305:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:3305:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3305:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3305;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scanstepdata_testtuple mtupcomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MTUPCOMP__V11*/ meltfptr[6];
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
+ 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);
+ }
+ ;
+ /*_.IF___V13*/ meltfptr[12] =
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3305:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3305:/ quasiblock");
+
+
+ /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[11] = /*_.PROGN___V15*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3305:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.MTUPCOMP__V11*/ meltfptr[6]);
+ for ( /*_#MIX__L6*/ meltfnum[1] = 0;
+ ( /*_#MIX__L6*/ meltfnum[1] >= 0)
+ && ( /*_#MIX__L6*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#MIX__L6*/ meltfnum[1]++)
+ {
+ /*_.CURCOMP__V16*/ meltfptr[12] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.MTUPCOMP__V11*/ meltfptr[6]),
+ /*_#MIX__L6*/ meltfnum[1]);
+
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:3309:/ cond");
+ /*cond */ if ( /*_.CURCOMP__V16*/ meltfptr[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:3310:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V18*/ meltfptr[17] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CURCOMP__V16*/
+ meltfptr[12]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V17*/ meltfptr[13] = /*_.FUN__V18*/ meltfptr[17];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3309:/ clear");
+ /*clear *//*_.FUN__V18*/ meltfptr[17] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V17*/ meltfptr[13] = NULL;;
+ }
+ ;
+ if ( /*_#MIX__L6*/ meltfnum[1] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3306:/ clear");
+ /*clear *//*_.CURCOMP__V16*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_#MIX__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V17*/ meltfptr[13] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3303:/ clear");
+ /*clear *//*_.MTUPCOMP__V11*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3300:/ clear");
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPDATA_TESTTUPLE", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 8
+ void *mcfr_varptr[8];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 8; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 8;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPDATA_TESTWITHFLAG", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3317:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3318:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3318:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3318:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3318;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scanstepdata_testwithflag step=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " fun=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FUN__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3318:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3318:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3318:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3317:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V5*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-normatch.melt:3317:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPDATA_TESTWITHFLAG", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 10
+ void *mcfr_varptr[10];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 10; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 10;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPDATA_TESTMATCHER", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3323:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3324:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3324:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3324:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3324) ? (3324) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3324:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3325:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 9, "MSTMA_OUTS");
+ /*_.OUTS__V7*/
+ meltfptr[5] = slot;
+ };
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.OUTS__V7*/ meltfptr[5]);
+ for ( /*_#OUTIX__L2*/ meltfnum[0] = 0;
+ ( /*_#OUTIX__L2*/ meltfnum[0] >= 0)
+ && ( /*_#OUTIX__L2*/ meltfnum[0] < cit1__EACHTUP_ln);
+ /*_#OUTIX__L2*/ meltfnum[0]++)
+ {
+ /*_.CUROUT__V8*/ meltfptr[7] =
+ melt_multiple_nth ((melt_ptr_t) ( /*_.OUTS__V7*/ meltfptr[5]),
+ /*_#OUTIX__L2*/ meltfnum[0]);
+
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:3330:/ cond");
+ /*cond */ if ( /*_.CUROUT__V8*/ meltfptr[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V10*/ meltfptr[9] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CUROUT__V8*/ meltfptr[7]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3330:/ clear");
+ /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ if ( /*_#OUTIX__L2*/ meltfnum[0] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3327:/ clear");
+ /*clear *//*_.CUROUT__V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_#OUTIX__L2*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3325:/ clear");
+ /*clear *//*_.OUTS__V7*/ meltfptr[5] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3323:/ clear");
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPDATA_TESTMATCHER", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 10
+ void *mcfr_varptr[10];
+#define MELTFRAM_NBVARNUM 1
+ long mcfr_varnum[1];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 10; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 10;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPFLAG_STEPWITHFLAG", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3334:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3335:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3335:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3335:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3335) ? (3335) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3335:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3336:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
+ /*_.FLAG__V8*/
+ meltfptr[7] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3338:/ cond");
+ /*cond */ if ( /*_.FLAG__V8*/ meltfptr[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V10*/ meltfptr[9] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.FLAG__V8*/ meltfptr[7]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3338:/ clear");
+ /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.LET___V7*/ meltfptr[5] = /*_.IF___V9*/ meltfptr[8];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3336:/ clear");
+ /*clear *//*_.FLAG__V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3334:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];;
+ MELT_LOCATION ("warmelt-normatch.melt:3334:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V7*/ meltfptr[5] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPFLAG_STEPWITHFLAG", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPFLAG_STEPFLAGOPER", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3343:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3344:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3344:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3344:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3344) ? (3344) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3344:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3345:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
+ /*_.FLAG__V7*/
+ meltfptr[5] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3346:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_FLAGARGS");
+ /*_.FLAGARGS__V8*/
+ meltfptr[7] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3348:/ cond");
+ /*cond */ if ( /*_.FLAG__V7*/ meltfptr[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V10*/ meltfptr[9] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.FLAG__V7*/ meltfptr[5]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V9*/ meltfptr[8] = /*_.FUN__V10*/ meltfptr[9];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3348:/ clear");
+ /*clear *//*_.FUN__V10*/ meltfptr[9] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3349:/ cond");
+ /*cond */ if ( /*_.FLAGARGS__V8*/ meltfptr[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.FLAGARGS__V8*/
+ meltfptr[7]);
+ for ( /*_#FLAGIX__L2*/ meltfnum[0] = 0;
+ ( /*_#FLAGIX__L2*/ meltfnum[0] >= 0)
+ && ( /*_#FLAGIX__L2*/ meltfnum[0] < cit1__EACHTUP_ln);
+ /*_#FLAGIX__L2*/ meltfnum[0]++)
+ {
+ /*_.CURFLAG__V11*/ meltfptr[9] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.FLAGARGS__V8*/ meltfptr[7]),
+ /*_#FLAGIX__L2*/ meltfnum[0]);
+
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:3353:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CTX__V4*/ meltfptr[3];
+ /*_.FUN__V12*/ meltfptr[11] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.FUN__V3*/ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CURFLAG__V11*/
+ meltfptr[9]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ if ( /*_#FLAGIX__L2*/ meltfnum[0] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3350:/ clear");
+ /*clear *//*_.CURFLAG__V11*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_#FLAGIX__L2*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.FUN__V12*/ meltfptr[11] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3345:/ clear");
+ /*clear *//*_.FLAG__V7*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.FLAGARGS__V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3343:/ clear");
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPFLAG_STEPFLAGOPER", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 10
+ void *mcfr_varptr[10];
+#define MELTFRAM_NBVARNUM 3
+ long mcfr_varnum[3];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 10; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 10;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("SCANSTEPFLAG_STEPWITHDATA", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.FUN__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.FUN__V3*/ meltfptr[2])) != NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.CTX__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTX__V4*/ meltfptr[3])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3362:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3362:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3362:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3362;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "scanstepflag_stepwithdata step=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " fun=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FUN__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3362:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3362:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3362:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3363:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:3363:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3363:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3363) ? (3363) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3363:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[5];;
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("SCANSTEPFLAG_STEPWITHDATA", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 23
+ void *mcfr_varptr[23];
+#define MELTFRAM_NBVARNUM 6
+ long mcfr_varnum[6];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 23; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 23;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("TRANSLPAT_ANYRECV", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:3377:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.MDATA__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.MCASE__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3])) !=
+ NULL);
+
+
+ /*getarg#3 */
+ /*^getarg */
+ if (meltxargdescr_[2] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.VARMAP__V5*/ meltfptr[4] =
+ (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.VARMAP__V5*/ meltfptr[4])) !=
+ NULL);
+
+
+ /*getarg#4 */
+ /*^getarg */
+ if (meltxargdescr_[3] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.SLOC__V6*/ meltfptr[5] =
+ (meltxargtab_[3].meltbp_aptr) ? (*(meltxargtab_[3].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V6*/ meltfptr[5])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3378:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:3378:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3378:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3378;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translpat_anyrecv recv";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
+ 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);
+ }
+ ;
+ /*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3378:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V8*/ meltfptr[7] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3378:/ quasiblock");
+
+
+ /*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
+ /*^compute */
+
+ /*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3378:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V10*/ meltfptr[8] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3379:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^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-normatch.melt:3379:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3379:/ apply");
+ /*apply */
+ {
+ 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-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3379;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translpat_anyrecv mdata";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] =
+ 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);
+ }
+ ;
+ /*_.IF___V12*/ meltfptr[8] =
+ /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3379:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V12*/ meltfptr[8] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3379:/ quasiblock");
+
+
+ /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[8];;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[7] = /*_.PROGN___V14*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3379:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V12*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V14*/ meltfptr[12] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3380:/ quasiblock");
+
+
+ /*_.DIS__V16*/ meltfptr[12] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3381:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ meltfnum[0] =
+ /*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-normatch.melt:3381:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:3381:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 3381;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translpat_anyrecv dis";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V16*/ meltfptr[12];
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ 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);
+ }
+ ;
+ /*_.IF___V18*/ meltfptr[17] =
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3381:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V18*/ meltfptr[17] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3381:/ quasiblock");
+
+
+ /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3381:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:3382:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V16*/ meltfptr[12]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V21*/
+ meltfptr[17] = slot;
+ };
+ ;
+
+ {
+ /*^locexp */
+ melt_error_str ((melt_ptr_t) ( /*_.SLOC__V6*/ meltfptr[5]),
+ ("unexpected TRANSLATE_PATTERN for"),
+ (melt_ptr_t) ( /*_.NAMED_NAME__V21*/ meltfptr[17]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:3383:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V23*/ meltfptr[22] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:3383:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected translpat_anyrecv"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (3383) ? (3383) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V22*/ meltfptr[18] = /*_.IFELSE___V23*/ meltfptr[22];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:3383:/ clear");
+ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V15*/ meltfptr[8] = /*_.IFCPP___V22*/ meltfptr[18];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:3380:/ clear");
+ /*clear *//*_.DIS__V16*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V21*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:3377:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[8];;
+ MELT_LOCATION ("warmelt-normatch.melt:3377:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V15*/ meltfptr[8] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("TRANSLPAT_ANYRECV", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
+ union meltparam_un *
+ meltxargtab_,
const melt_argdescr_cell_t
meltxresdescr_[],
- union meltparam_un
- *meltxrestab_)
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -2189,7 +4640,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT_st
+ struct frame_meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2228,7 +4679,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2280,7 +4731,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3295:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3388:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2288,7 +4739,7 @@ lab_endgetargs:;
/*_#IS_A__L1*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3295:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3388:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2296,7 +4747,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3295:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3388:/ cond.else");
/*^block */
/*anyblock */
@@ -2310,7 +4761,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3295) ? (3295) : __LINE__, __FUNCTION__);
+ (3388) ? (3388) : __LINE__, __FUNCTION__);
;
}
;
@@ -2325,7 +4776,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3295:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3388:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -2338,7 +4789,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2361,7 +4812,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2371,7 +4822,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2381,7 +4832,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3296;
+ argtab[2].meltbp_long = 3389;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_jokerpat recv";
/*^apply.arg */
@@ -2401,7 +4852,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -2414,7 +4865,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -2423,7 +4874,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3296:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3389:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -2436,18 +4887,18 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3297:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3390:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3297:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3390:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V13*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -2470,14 +4921,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT */
+} /*end meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2498,7 +4949,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT_st
+ struct frame_meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2537,7 +4988,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2589,7 +5040,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2612,7 +5063,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2622,7 +5073,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2632,7 +5083,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3303;
+ argtab[2].meltbp_long = 3396;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat recv";
/*^apply.arg */
@@ -2651,7 +5102,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -2664,7 +5115,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -2673,7 +5124,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3396:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -2688,7 +5139,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3304:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3397:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2696,7 +5147,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_CONSTANT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3304:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3397:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2704,7 +5155,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3304:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3397:/ cond.else");
/*^block */
/*anyblock */
@@ -2718,7 +5169,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3304) ? (3304) : __LINE__, __FUNCTION__);
+ (3397) ? (3397) : __LINE__, __FUNCTION__);
;
}
;
@@ -2733,7 +5184,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3304:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3397:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -2746,7 +5197,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2769,7 +5220,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2779,7 +5230,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2789,7 +5240,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3305;
+ argtab[2].meltbp_long = 3398;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat mdata";
/*^apply.arg */
@@ -2809,7 +5260,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -2822,7 +5273,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -2831,7 +5282,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3305:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3398:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -2846,7 +5297,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3306:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3399:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2855,7 +5306,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3306:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3399:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2863,7 +5314,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3306:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3399:/ cond.else");
/*^block */
/*anyblock */
@@ -2877,7 +5328,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3306) ? (3306) : __LINE__, __FUNCTION__);
+ (3399) ? (3399) : __LINE__, __FUNCTION__);
;
}
;
@@ -2892,7 +5343,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3306:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3399:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -2905,7 +5356,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2928,7 +5379,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2938,7 +5389,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2948,7 +5399,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3307;
+ argtab[2].meltbp_long = 3400;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat mcase";
/*^apply.arg */
@@ -2968,7 +5419,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -2981,7 +5432,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -2990,7 +5441,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3307:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3400:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -3005,7 +5456,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3308:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3401:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3014,7 +5465,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3308:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3401:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3022,7 +5473,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3308:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3401:/ cond.else");
/*^block */
/*anyblock */
@@ -3036,7 +5487,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3308) ? (3308) : __LINE__, __FUNCTION__);
+ (3401) ? (3401) : __LINE__, __FUNCTION__);
;
}
;
@@ -3051,7 +5502,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3308:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3401:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -3062,10 +5513,10 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3309:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3402:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3310:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3403:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -3081,12 +5532,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3310:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3403:/ cond.else");
/*_.SLOC__V27*/ meltfptr[26] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3311:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3404:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "PAT_WEIGHT");
@@ -3094,7 +5545,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3312:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3405:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SPAT_CONSTX");
@@ -3102,7 +5553,7 @@ lab_endgetargs:;
meltfptr[28] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3313:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3406:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -3110,8 +5561,13 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3314:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCTXT__V30*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3407:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCTXT__V30*/ meltfptr[29]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3129,8 +5585,13 @@ lab_endgetargs:;
/*_.NCX__V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3315:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCTXT__V30*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3408:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCTXT__V30*/ meltfptr[29]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3148,7 +5609,7 @@ lab_endgetargs:;
/*_.ENV__V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3316:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3409:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]), 4, "MDATA_STEPS");
@@ -3158,7 +5619,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3318:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3411:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3167,7 +5628,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V31*/ meltfptr[30]),
(melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:3318:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3411:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3175,7 +5636,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3318:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3411:/ cond.else");
/*^block */
/*anyblock */
@@ -3189,7 +5650,7 @@ lab_endgetargs:;
melt_assert_failed (("check ncx"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3318) ? (3318) : __LINE__, __FUNCTION__);
+ (3411) ? (3411) : __LINE__, __FUNCTION__);
;
}
;
@@ -3204,7 +5665,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[33] = /*_.IFELSE___V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3318:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3411:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V35*/ meltfptr[34] = 0;
@@ -3217,7 +5678,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3319:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3412:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3226,7 +5687,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V32*/ meltfptr[31]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:3319:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3412:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3234,7 +5695,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3319:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3412:/ cond.else");
/*^block */
/*anyblock */
@@ -3248,7 +5709,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3319) ? (3319) : __LINE__, __FUNCTION__);
+ (3412) ? (3412) : __LINE__, __FUNCTION__);
;
}
;
@@ -3263,7 +5724,7 @@ lab_endgetargs:;
/*_.IFCPP___V36*/ meltfptr[34] = /*_.IFELSE___V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3412:/ clear");
/*clear *//*_#IS_A__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V37*/ meltfptr[36] = 0;
@@ -3276,7 +5737,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3299,7 +5760,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3309,7 +5770,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3320,7 +5781,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3320;
+ argtab[2].meltbp_long = 3413;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_constpat before normalization sconstx";
@@ -3341,7 +5802,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -3354,7 +5815,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];;
@@ -3363,7 +5824,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[36] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3320:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3413:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -3376,7 +5837,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[36] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3321:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3414:/ quasiblock");
/*^multimsend */
@@ -3405,7 +5866,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3428,7 +5889,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3438,7 +5899,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3449,7 +5910,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3324;
+ argtab[2].meltbp_long = 3417;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat nconst";
/*^apply.arg */
@@ -3469,7 +5930,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
@@ -3482,7 +5943,7 @@ lab_endgetargs:;
/*_.IF___V46*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
@@ -3491,7 +5952,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3324:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3417:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V46*/ meltfptr[45] = 0;
@@ -3506,7 +5967,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3529,7 +5990,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3539,7 +6000,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3550,7 +6011,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3325;
+ argtab[2].meltbp_long = 3418;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat nbindconst";
/*^apply.arg */
@@ -3570,7 +6031,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V51*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V51*/ meltfptr[50] = 0;
@@ -3583,7 +6044,7 @@ lab_endgetargs:;
/*_.IF___V50*/ meltfptr[46] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ quasiblock");
/*_.PROGN___V52*/ meltfptr[50] = /*_.IF___V50*/ meltfptr[46];;
@@ -3592,7 +6053,7 @@ lab_endgetargs:;
/*_.IFCPP___V49*/ meltfptr[45] = /*_.PROGN___V52*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3325:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3418:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V50*/ meltfptr[46] = 0;
@@ -3605,11 +6066,18 @@ lab_endgetargs:;
/*_.IFCPP___V49*/ meltfptr[45] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3326:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3419:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3328:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCONST__V43*/ meltfptr[39]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3421:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCONST__V43*/ meltfptr[39]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->
+ tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3627,7 +6095,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V54*/ meltfptr[50] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3328:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3421:/ cond");
/*cond */ if ( /*_.NAMED_NAME__V54*/ meltfptr[50]) /*then */
{
/*^cond.then */
@@ -3635,12 +6103,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3328:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3421:/ cond.else");
/*_.OR___V55*/ meltfptr[54] = ( /*!konst_9 */ meltfrout->tabval[9]);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3327:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3420:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -3657,7 +6125,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3329:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3422:/ quasiblock");
/*^rawallocobj */
@@ -3700,7 +6168,7 @@ lab_endgetargs:;
( /*_.MFLAG__V56*/ meltfptr[55]), "MSTEP_FLAG");
;
/*_.FLAGSTEP__V57*/ meltfptr[56] = /*_.INST__V58*/ meltfptr[57];;
- MELT_LOCATION ("warmelt-normatch.melt:3333:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3426:/ quasiblock");
/*^rawallocobj */
@@ -3772,7 +6240,7 @@ lab_endgetargs:;
/*_.STEPTEST__V59*/ meltfptr[58] = /*_.INST__V60*/ meltfptr[59];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3795,7 +6263,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -3805,7 +6273,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3816,7 +6284,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3342;
+ argtab[2].meltbp_long = 3435;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat flagstep";
/*^apply.arg */
@@ -3836,7 +6304,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0;
@@ -3849,7 +6317,7 @@ lab_endgetargs:;
/*_.IF___V62*/ meltfptr[61] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[61];;
@@ -3858,7 +6326,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[60] = /*_.PROGN___V64*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3435:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V62*/ meltfptr[61] = 0;
@@ -3873,21 +6341,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3343:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3436:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.STEPLIST__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.STEPTEST__V59*/ meltfptr[58]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3344:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3437:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.STEPLIST__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.FLAGSTEP__V57*/ meltfptr[56]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3910,7 +6378,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3920,7 +6388,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3931,7 +6399,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3345;
+ argtab[2].meltbp_long = 3438;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat return steptest";
/*^apply.arg */
@@ -3951,7 +6419,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V67*/ meltfptr[66];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[66] = 0;
@@ -3964,7 +6432,7 @@ lab_endgetargs:;
/*_.IF___V66*/ meltfptr[62] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[66] = /*_.IF___V66*/ meltfptr[62];;
@@ -3973,7 +6441,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[61] = /*_.PROGN___V68*/ meltfptr[66];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3438:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V66*/ meltfptr[62] = 0;
@@ -3988,7 +6456,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4011,7 +6479,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4021,7 +6489,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4032,7 +6500,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3346;
+ argtab[2].meltbp_long = 3439;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_constpat return mflag";
/*^apply.arg */
@@ -4052,7 +6520,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -4065,7 +6533,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[66] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[66];;
@@ -4074,7 +6542,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[62] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3346:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3439:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[66] = 0;
@@ -4087,11 +6555,11 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[62] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3347:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3440:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPTEST__V59*/ meltfptr[58];;
- MELT_LOCATION ("warmelt-normatch.melt:3347:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3440:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -4105,7 +6573,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V53*/ meltfptr[46] = /*_.RETURN___V73*/ meltfptr[66];;
- MELT_LOCATION ("warmelt-normatch.melt:3326:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3419:/ clear");
/*clear *//*_.NAMED_NAME__V54*/ meltfptr[50] = 0;
/*^clear */
/*clear *//*_.OR___V55*/ meltfptr[54] = 0;
@@ -4125,7 +6593,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V73*/ meltfptr[66] = 0;
/*_.MULTI___V42*/ meltfptr[38] = /*_.LET___V53*/ meltfptr[46];;
- MELT_LOCATION ("warmelt-normatch.melt:3321:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3414:/ clear");
/*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
/*^clear */
/*clear *//*_.IFCPP___V49*/ meltfptr[45] = 0;
@@ -4136,7 +6604,7 @@ lab_endgetargs:;
/*clear *//*_.NBINDCONST__V44*/ meltfptr[43] = 0;
/*_.LET___V25*/ meltfptr[20] = /*_.MULTI___V42*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:3309:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3402:/ clear");
/*clear *//*_.LOCA_LOCATION__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.SLOC__V27*/ meltfptr[26] = 0;
@@ -4160,11 +6628,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V38*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.MULTI___V42*/ meltfptr[38] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4195,14 +6663,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT */
+} /*end meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4223,7 +6691,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT_st
+ struct frame_meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4262,7 +6730,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4314,7 +6782,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3356:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3449:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4323,7 +6791,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_LIST */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3356:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3449:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4331,7 +6799,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3356:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3449:/ cond.else");
/*^block */
/*anyblock */
@@ -4345,7 +6813,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3356) ? (3356) : __LINE__, __FUNCTION__);
+ (3449) ? (3449) : __LINE__, __FUNCTION__);
;
}
;
@@ -4360,7 +6828,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3356:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3449:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -4373,7 +6841,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4396,7 +6864,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4406,7 +6874,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4416,7 +6884,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3357;
+ argtab[2].meltbp_long = 3450;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_listpat recv";
/*^apply.arg */
@@ -4436,7 +6904,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -4449,7 +6917,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -4458,7 +6926,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3357:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3450:/ clear");
/*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -4473,14 +6941,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3358:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3451:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V6*/ meltfptr[5]),
("@@unimplemented translpat_listpat"), (melt_ptr_t) 0);
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3359:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3452:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4493,7 +6961,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3359:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3452:/ cond.else");
/*^block */
/*anyblock */
@@ -4507,7 +6975,7 @@ lab_endgetargs:;
melt_assert_failed (("$@$ translpat_listpat unimplemented"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3359) ? (3359) : __LINE__, __FUNCTION__);
+ (3452) ? (3452) : __LINE__, __FUNCTION__);
;
}
;
@@ -4522,7 +6990,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.IFELSE___V14*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3359:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3452:/ clear");
/*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
}
@@ -4531,11 +6999,11 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V13*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -4558,14 +7026,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT */
+} /*end meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -4586,7 +7054,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT_st
+ struct frame_meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -4625,7 +7093,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -4677,7 +7145,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4700,7 +7168,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4710,7 +7178,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -4720,7 +7188,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3367;
+ argtab[2].meltbp_long = 3460;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat recv=";
/*^apply.arg */
@@ -4751,7 +7219,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -4764,7 +7232,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -4773,7 +7241,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3367:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3460:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -4788,7 +7256,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3368:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3461:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4797,7 +7265,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_TUPLE */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3368:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3461:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4805,7 +7273,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3368:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3461:/ cond.else");
/*^block */
/*anyblock */
@@ -4819,7 +7287,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3368) ? (3368) : __LINE__, __FUNCTION__);
+ (3461) ? (3461) : __LINE__, __FUNCTION__);
;
}
;
@@ -4834,7 +7302,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3368:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3461:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -4847,7 +7315,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3369:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3462:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4856,7 +7324,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3369:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3462:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4864,7 +7332,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3369:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3462:/ cond.else");
/*^block */
/*anyblock */
@@ -4878,7 +7346,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3369) ? (3369) : __LINE__, __FUNCTION__);
+ (3462) ? (3462) : __LINE__, __FUNCTION__);
;
}
;
@@ -4893,7 +7361,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.IFELSE___V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3369:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3462:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0;
@@ -4906,7 +7374,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3370:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3463:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4915,7 +7383,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3370:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3463:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4923,7 +7391,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3370:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3463:/ cond.else");
/*^block */
/*anyblock */
@@ -4937,7 +7405,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3370) ? (3370) : __LINE__, __FUNCTION__);
+ (3463) ? (3463) : __LINE__, __FUNCTION__);
;
}
;
@@ -4952,7 +7420,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3370:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3463:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -4963,7 +7431,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[13] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3371:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3464:/ quasiblock");
/*^getslot */
@@ -4982,12 +7450,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3371:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3464:/ cond.else");
/*_.SLOC__V19*/ meltfptr[18] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3372:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3465:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "CTPAT_SUBPA");
@@ -5003,7 +7471,7 @@ lab_endgetargs:;
/*_.PATCOMPLIST__V21*/ meltfptr[20] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:3375:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3468:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -5030,7 +7498,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5053,7 +7521,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -5063,7 +7531,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5074,7 +7542,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3380;
+ argtab[2].meltbp_long = 3473;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat cursubpat=";
@@ -5101,7 +7569,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -5114,7 +7582,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -5123,7 +7591,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3380:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3473:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
@@ -5138,7 +7606,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3382:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3475:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5148,7 +7616,7 @@ lab_endgetargs:;
( /*_.CURSUBPAT__V23*/ meltfptr[22]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:3382:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3475:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5156,7 +7624,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3382:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3475:/ cond.else");
/*^block */
/*anyblock */
@@ -5170,7 +7638,7 @@ lab_endgetargs:;
melt_assert_failed (("check cursubpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3382) ? (3382) : __LINE__,
+ __FILE__, (3475) ? (3475) : __LINE__,
__FUNCTION__);
;
}
@@ -5186,7 +7654,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[24] = /*_.IFELSE___V29*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3382:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3475:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0;
@@ -5203,7 +7671,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t)
( /*_.CURSUBPAT__V23*/ meltfptr[22]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:3383:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3476:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L11*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -5211,7 +7679,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3384:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3477:/ quasiblock");
/*_.MAKE_INTEGERBOX__V30*/ meltfptr[25] =
@@ -5219,7 +7687,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[8])),
( /*_#PATIX__L7*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3384:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3477:/ quasiblock");
/*^rawallocobj */
@@ -5258,7 +7726,7 @@ lab_endgetargs:;
/*_.INST__V32*/ meltfptr[31];;
{
- MELT_LOCATION ("warmelt-normatch.melt:3388:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3481:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.PATCOMPLIST__V21*/ meltfptr[20]),
(melt_ptr_t) ( /*_.TUCOMP__V31*/
@@ -5266,7 +7734,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3384:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3477:/ clear");
/*clear *//*_.MAKE_INTEGERBOX__V30*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.TUCOMP__V31*/ meltfptr[30] = 0;
@@ -5281,7 +7749,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3377:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3470:/ clear");
/*clear *//*_.CURSUBPAT__V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_#PATIX__L7*/ meltfnum[1] = 0;
@@ -5295,7 +7763,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5318,7 +7786,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5328,7 +7796,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5339,7 +7807,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3390;
+ argtab[2].meltbp_long = 3483;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat patcomplist=";
/*^apply.arg */
@@ -5359,7 +7827,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -5372,7 +7840,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[30];;
@@ -5381,7 +7849,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[25] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3390:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3483:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[30] = 0;
@@ -5394,7 +7862,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3391:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3484:/ quasiblock");
/*^apply */
@@ -5413,7 +7881,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ quasiblock");
/*^newclosure */
@@ -5434,7 +7902,7 @@ lab_endgetargs:;
tabval[10])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5457,7 +7925,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -5467,7 +7935,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5478,7 +7946,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3405;
+ argtab[2].meltbp_long = 3498;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat sortedpatcomptup=";
@@ -5506,7 +7974,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -5519,7 +7987,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[42] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];;
@@ -5528,7 +7996,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[41] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3405:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3498:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[42] = 0;
@@ -5541,14 +8009,14 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[41] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3409:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3502:/ quasiblock");
/*_.ISTEP__V47*/ meltfptr[43] = ( /*nil */ NULL);;
/*^compute */
/*_.LASTSTEPTEST__V48*/ meltfptr[47] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3411:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3504:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]), 4, "MDATA_STEPS");
@@ -5574,7 +8042,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURSTEP__V51*/ meltfptr[50]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ cond");
/*cond */ if ( /*_#IS_A__L16*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -5582,8 +8050,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3418:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURSTEP__V51*/ meltfptr[50]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[14])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3511:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSTEP__V51*/
+ meltfptr[50]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5617,7 +8091,7 @@ lab_endgetargs:;
/*_#IF___L17*/ meltfnum[12] = /*_#I__L19*/ meltfnum[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ clear");
/*clear *//*_.MSTTUP_COMPONENTS__V52*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_#MULTIPLE_LENGTH__L18*/ meltfnum[17] = 0;
@@ -5632,7 +8106,7 @@ lab_endgetargs:;
/*_#IF___L17*/ meltfnum[12] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ cond");
/*cond */ if ( /*_#IF___L17*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -5640,14 +8114,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3420:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3513:/ compute");
/*_.CURPAIR__V50*/ meltfptr[49] =
/*_.SETQ___V54*/ meltfptr[53] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3421:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3514:/ compute");
/*_.ISTEP__V47*/ meltfptr[43] =
/*_.SETQ___V55*/ meltfptr[54] =
/*_.CURSTEP__V51*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[55] =
@@ -5658,7 +8132,7 @@ lab_endgetargs:;
/*_.PROGN___V56*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ clear");
/*clear *//*_.SETQ___V54*/ meltfptr[53] = 0;
/*^clear */
/*clear *//*_.SETQ___V55*/ meltfptr[54] = 0;
@@ -5678,7 +8152,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURSTEP__V51*/ meltfptr[50]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:3422:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3515:/ cond");
/*cond */ if ( /*_#IS_A__L20*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -5686,7 +8160,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3423:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3516:/ compute");
/*_.LASTSTEPTEST__V48*/ meltfptr[47] =
/*_.SETQ___V58*/ meltfptr[54] =
/*_.CURSTEP__V51*/ meltfptr[50];;
@@ -5694,7 +8168,7 @@ lab_endgetargs:;
/*_.SETQ___V58*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3422:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3515:/ clear");
/*clear *//*_.SETQ___V58*/ meltfptr[54] = 0;
}
;
@@ -5711,7 +8185,7 @@ lab_endgetargs:;
/*_.IFELSE___V57*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3417:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3510:/ clear");
/*clear *//*_#IS_A__L20*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IFELSE___V57*/ meltfptr[53] = 0;
@@ -5723,7 +8197,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3413:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3506:/ clear");
/*clear *//*_.CURPAIR__V50*/ meltfptr[49] = 0;
/*^clear */
/*clear *//*_.CURSTEP__V51*/ meltfptr[50] = 0;
@@ -5737,7 +8211,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5760,7 +8234,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -5770,7 +8244,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5781,7 +8255,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3425;
+ argtab[2].meltbp_long = 3518;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat laststeptest=";
/*^apply.arg */
@@ -5807,7 +8281,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[53] = 0;
@@ -5820,7 +8294,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[53] = /*_.IF___V60*/ meltfptr[54];;
@@ -5829,7 +8303,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[55] = /*_.PROGN___V62*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3425:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3518:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[54] = 0;
@@ -5846,7 +8320,7 @@ lab_endgetargs:;
/*_#NULL__L23*/ meltfnum[17] =
(( /*_.ISTEP__V47*/ meltfptr[43]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3427:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3520:/ cond");
/*cond */ if ( /*_#NULL__L23*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -5854,7 +8328,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3428:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3521:/ quasiblock");
/*_.DCOMP__V65*/ meltfptr[64] =
@@ -5862,7 +8336,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[10])),
( /*_#NBSUBPAT__L6*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:3430:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3523:/ quasiblock");
/*^rawallocobj */
@@ -5923,12 +8397,12 @@ lab_endgetargs:;
"MSTTUP_COMPONENTS");
;
/*_.NEWSTEP__V66*/ meltfptr[65] = /*_.INST__V67*/ meltfptr[66];;
- MELT_LOCATION ("warmelt-normatch.melt:3437:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3530:/ compute");
/*_.ISTEP__V47*/ meltfptr[43] = /*_.SETQ___V68*/ meltfptr[67] =
/*_.NEWSTEP__V66*/ meltfptr[65];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5951,7 +8425,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -5961,7 +8435,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5972,7 +8446,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3438;
+ argtab[2].meltbp_long = 3531;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat newstep";
/*^apply.arg */
@@ -5993,7 +8467,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -6006,7 +8480,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -6015,7 +8489,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[68] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3438:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3531:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -6030,7 +8504,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3439:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3532:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STEPLIST__V49*/ meltfptr[48]),
(melt_ptr_t) ( /*_.NEWSTEP__V66*/
@@ -6039,7 +8513,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6062,7 +8536,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -6072,7 +8546,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6083,7 +8557,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3440;
+ argtab[2].meltbp_long = 3533;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat updated steplist=";
@@ -6105,7 +8579,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V75*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V75*/ meltfptr[74] = 0;
@@ -6118,7 +8592,7 @@ lab_endgetargs:;
/*_.IF___V74*/ meltfptr[70] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ quasiblock");
/*_.PROGN___V76*/ meltfptr[74] = /*_.IF___V74*/ meltfptr[70];;
@@ -6127,7 +8601,7 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = /*_.PROGN___V76*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3440:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3533:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V74*/ meltfptr[70] = 0;
@@ -6140,7 +8614,7 @@ lab_endgetargs:;
/*_.IFCPP___V73*/ meltfptr[69] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3441:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3534:/ cond");
/*cond */ if ( /*_.LASTSTEPTEST__V48*/ meltfptr[47]) /*then */
{
/*^cond.then */
@@ -6148,7 +8622,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3443:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3536:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -6167,7 +8641,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6190,7 +8664,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -6200,7 +8674,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6211,7 +8685,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3444;
+ argtab[2].meltbp_long = 3537;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat updated laststeptest=";
@@ -6234,7 +8708,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] =
0;
/*^clear */
@@ -6248,7 +8722,7 @@ lab_endgetargs:;
/*_.IF___V80*/ meltfptr[79] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[80] =
@@ -6259,7 +8733,7 @@ lab_endgetargs:;
/*_.PROGN___V82*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3444:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3537:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V80*/ meltfptr[79] = 0;
@@ -6272,7 +8746,7 @@ lab_endgetargs:;
/*_.IFCPP___V79*/ meltfptr[78] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3442:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3535:/ quasiblock");
/*_.PROGN___V83*/ meltfptr[79] =
@@ -6282,7 +8756,7 @@ lab_endgetargs:;
/*_.IF___V77*/ meltfptr[70] = /*_.PROGN___V83*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3441:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3534:/ clear");
/*clear *//*_.PUT_ELSE_MATCH__V78*/ meltfptr[74] = 0;
/*^clear */
/*clear *//*_.IFCPP___V79*/ meltfptr[78] = 0;
@@ -6301,7 +8775,7 @@ lab_endgetargs:;
/*_.LET___V64*/ meltfptr[53] = /*_.IF___V77*/ meltfptr[70];;
- MELT_LOCATION ("warmelt-normatch.melt:3428:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3521:/ clear");
/*clear *//*_.DCOMP__V65*/ meltfptr[64] = 0;
/*^clear */
/*clear *//*_.NEWSTEP__V66*/ meltfptr[65] = 0;
@@ -6316,7 +8790,7 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[54] = /*_.LET___V64*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3427:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3520:/ clear");
/*clear *//*_.LET___V64*/ meltfptr[53] = 0;
}
;
@@ -6327,12 +8801,17 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3447:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3540:/ quasiblock");
/*_.LASTSTEP__V85*/ meltfptr[74] = /*_.ISTEP__V47*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:3449:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ISTEP__V47*/ meltfptr[43]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[14])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3542:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ISTEP__V47*/ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6362,7 +8841,7 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6385,7 +8864,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -6395,7 +8874,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6406,7 +8885,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3453;
+ argtab[2].meltbp_long = 3546;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat dcomp=";
/*^apply.arg */
@@ -6426,7 +8905,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V91*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[68] = 0;
@@ -6439,7 +8918,7 @@ lab_endgetargs:;
/*_.IF___V90*/ meltfptr[67] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ quasiblock");
/*_.PROGN___V92*/ meltfptr[69] = /*_.IF___V90*/ meltfptr[67];;
@@ -6448,7 +8927,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[65] = /*_.PROGN___V92*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3453:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3546:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V90*/ meltfptr[67] = 0;
@@ -6463,7 +8942,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3454:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3547:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.ELSELIST__V88*/ meltfptr[64]),
(melt_ptr_t) ( /*_.ISTEP__V47*/ meltfptr[43]));
}
@@ -6488,7 +8967,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6511,7 +8990,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -6521,7 +9000,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[33] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -6532,7 +9011,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3458;
+ argtab[2].meltbp_long = 3551;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat curpatcomp=";
@@ -6559,7 +9038,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V96*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V96*/ meltfptr[67] = 0;
@@ -6572,7 +9051,7 @@ lab_endgetargs:;
/*_.IF___V95*/ meltfptr[68] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ quasiblock");
/*_.PROGN___V97*/ meltfptr[69] = /*_.IF___V95*/ meltfptr[68];;
@@ -6581,7 +9060,7 @@ lab_endgetargs:;
/*_.IFCPP___V94*/ meltfptr[53] = /*_.PROGN___V97*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3458:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3551:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V95*/ meltfptr[68] = 0;
@@ -6596,7 +9075,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3459:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3552:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6605,7 +9084,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURPATCOMP__V93*/ meltfptr[70]),
(melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:3459:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3552:/ cond");
/*cond */ if ( /*_#IS_A__L35*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -6613,7 +9092,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3459:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3552:/ cond.else");
/*^block */
/*anyblock */
@@ -6627,7 +9106,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpatcomp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3459) ? (3459) : __LINE__,
+ __FILE__, (3552) ? (3552) : __LINE__,
__FUNCTION__);
;
}
@@ -6643,7 +9122,7 @@ lab_endgetargs:;
/*_.IFCPP___V98*/ meltfptr[67] = /*_.IFELSE___V99*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3459:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3552:/ clear");
/*clear *//*_#IS_A__L35*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IFELSE___V99*/ meltfptr[68] = 0;
@@ -6654,11 +9133,17 @@ lab_endgetargs:;
/*_.IFCPP___V98*/ meltfptr[67] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3460:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3553:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATCOMP__V93*/ meltfptr[70]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[7])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATCOMP__V93*/
+ meltfptr[70]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6676,8 +9161,14 @@ lab_endgetargs:;
/*_.CURPAT__V100*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3461:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURPATCOMP__V93*/ meltfptr[70]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3554:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURPATCOMP__V93*/
+ meltfptr[70]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6708,7 +9199,7 @@ lab_endgetargs:;
( /*_#PIX__L36*/ meltfnum[24])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6731,7 +9222,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -6741,7 +9232,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -6752,7 +9243,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3464;
+ argtab[2].meltbp_long = 3557;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat curpat=";
/*^apply.arg */
@@ -6784,7 +9275,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V105*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V105*/ meltfptr[104] = 0;
@@ -6797,7 +9288,7 @@ lab_endgetargs:;
/*_.IF___V104*/ meltfptr[103] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ quasiblock");
/*_.PROGN___V106*/ meltfptr[104] = /*_.IF___V104*/ meltfptr[103];;
@@ -6807,7 +9298,7 @@ lab_endgetargs:;
/*_.PROGN___V106*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3464:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3557:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IF___V104*/ meltfptr[103] = 0;
@@ -6822,7 +9313,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3465:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3558:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6832,7 +9323,7 @@ lab_endgetargs:;
( /*_.CURPAT__V100*/ meltfptr[69]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:3465:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3558:/ cond");
/*cond */ if ( /*_#IS_A__L39*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -6840,7 +9331,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3465:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3558:/ cond.else");
/*^block */
/*anyblock */
@@ -6854,7 +9345,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3465) ? (3465) : __LINE__,
+ __FILE__, (3558) ? (3558) : __LINE__,
__FUNCTION__);
;
}
@@ -6871,7 +9362,7 @@ lab_endgetargs:;
/*_.IFELSE___V108*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3465:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3558:/ clear");
/*clear *//*_#IS_A__L39*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IFELSE___V108*/ meltfptr[104] = 0;
@@ -6886,7 +9377,7 @@ lab_endgetargs:;
/*_#NULL__L40*/ meltfnum[33] =
(( /*_.CURDATA__V102*/ meltfptr[101]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3466:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3559:/ cond");
/*cond */ if ( /*_#NULL__L40*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -6894,10 +9385,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3467:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3560:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3468:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3561:/ apply");
/*apply */
{
/*_.CLONE_SYMBOL__V109*/ meltfptr[104] =
@@ -6913,7 +9404,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:3467:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3560:/ quasiblock");
/*^rawallocobj */
@@ -6974,7 +9465,7 @@ lab_endgetargs:;
/*_.INST__V112*/ meltfptr[111];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6997,7 +9488,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -7007,10 +9498,10 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[9];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
@@ -7018,7 +9509,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3473;
+ argtab[2].meltbp_long = 3566;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat newdata=";
@@ -7026,6 +9517,15 @@ lab_endgetargs:;
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NEWDATA__V111*/
meltfptr[110];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " for istep=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ISTEP__V47*/ meltfptr[43];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " pix=";
+ /*^apply.arg */
+ argtab[8].meltbp_long = /*_#PIX__L36*/ meltfnum[24];
/*_.MELT_DEBUG_FUN__V115*/ meltfptr[114] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
@@ -7033,7 +9533,9 @@ lab_endgetargs:;
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
(union meltparam_un *) 0);
}
;
@@ -7041,7 +9543,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V115*/ meltfptr[114];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41] =
0;
/*^clear */
@@ -7056,7 +9558,7 @@ lab_endgetargs:;
/*_.IF___V114*/ meltfptr[113] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ quasiblock");
/*_.PROGN___V116*/ meltfptr[114] =
@@ -7067,7 +9569,7 @@ lab_endgetargs:;
/*_.PROGN___V116*/ meltfptr[114];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3473:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3566:/ clear");
/*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V114*/ meltfptr[113] = 0;
@@ -7080,13 +9582,13 @@ lab_endgetargs:;
/*_.IFCPP___V113*/ meltfptr[112] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3474:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3567:/ compute");
/*_.CURDATA__V102*/ meltfptr[101] =
/*_.SETQ___V117*/ meltfptr[113] =
/*_.NEWDATA__V111*/ meltfptr[110];;
{
- MELT_LOCATION ("warmelt-normatch.melt:3475:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3568:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.DCOMP__V86*/ meltfptr[78]),
( /*_#PIX__L36*/ meltfnum[24]),
@@ -7095,7 +9597,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3467:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3560:/ clear");
/*clear *//*_.CLONE_SYMBOL__V109*/ meltfptr[104] = 0;
/*^clear */
/*clear *//*_.MAKE_LIST__V110*/ meltfptr[109] = 0;
@@ -7112,7 +9614,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7135,7 +9637,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L43*/ meltfnum[41]) /*then */
{
/*^cond.then */
@@ -7145,10 +9647,10 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L44*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
@@ -7156,13 +9658,18 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3477;
+ argtab[2].meltbp_long = 3570;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat before translating curpat=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.CURPAT__V100*/ meltfptr[69];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " with istep=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ISTEP__V47*/ meltfptr[43];
/*_.MELT_DEBUG_FUN__V120*/ meltfptr[109] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
@@ -7170,6 +9677,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -7178,7 +9686,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V120*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L44*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V120*/ meltfptr[109] = 0;
@@ -7191,7 +9699,7 @@ lab_endgetargs:;
/*_.IF___V119*/ meltfptr[104] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ quasiblock");
/*_.PROGN___V121*/ meltfptr[110] = /*_.IF___V119*/ meltfptr[104];;
@@ -7201,7 +9709,7 @@ lab_endgetargs:;
/*_.PROGN___V121*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3477:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3570:/ clear");
/*clear *//*_#MELT_NEED_DBG__L43*/ meltfnum[41] = 0;
/*^clear */
/*clear *//*_.IF___V119*/ meltfptr[104] = 0;
@@ -7214,7 +9722,7 @@ lab_endgetargs:;
/*_.IFCPP___V118*/ meltfptr[114] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3478:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3571:/ quasiblock");
/*^multimsend */
@@ -7247,7 +9755,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7270,7 +9778,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L45*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -7280,7 +9788,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L46*/ meltfnum[41] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -7291,7 +9799,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3481;
+ argtab[2].meltbp_long = 3574;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat after translating curpat=";
@@ -7325,7 +9833,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V126*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L46*/ meltfnum[41] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V126*/ meltfptr[110] = 0;
@@ -7338,7 +9846,7 @@ lab_endgetargs:;
/*_.IF___V125*/ meltfptr[104] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ quasiblock");
/*_.PROGN___V127*/ meltfptr[110] = /*_.IF___V125*/ meltfptr[104];;
@@ -7348,7 +9856,7 @@ lab_endgetargs:;
/*_.PROGN___V127*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3481:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3574:/ clear");
/*clear *//*_#MELT_NEED_DBG__L45*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V125*/ meltfptr[104] = 0;
@@ -7361,7 +9869,7 @@ lab_endgetargs:;
/*_.IFCPP___V124*/ meltfptr[109] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3483:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3576:/ cond");
/*cond */ if ( /*_.SUBSTEP__V122*/ meltfptr[112]) /*then */
{
/*^cond.then */
@@ -7371,7 +9879,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7394,7 +9902,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[41]) /*then */
{
/*^cond.then */
@@ -7404,7 +9912,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L48*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7415,7 +9923,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3485;
+ argtab[2].meltbp_long = 3578;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat laststep=";
@@ -7437,7 +9945,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V131*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L48*/ meltfnum[37] =
0;
/*^clear */
@@ -7452,7 +9960,7 @@ lab_endgetargs:;
/*_.IF___V130*/ meltfptr[129] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ quasiblock");
/*_.PROGN___V132*/ meltfptr[130] =
@@ -7463,7 +9971,7 @@ lab_endgetargs:;
/*_.PROGN___V132*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3485:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3578:/ clear");
/*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[41] = 0;
/*^clear */
/*clear *//*_.IF___V130*/ meltfptr[129] = 0;
@@ -7476,7 +9984,7 @@ lab_endgetargs:;
/*_.IFCPP___V129*/ meltfptr[110] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3486:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3579:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -7495,18 +10003,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3487:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3580:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.ELSELIST__V88*/ meltfptr[64]),
(melt_ptr_t) ( /*_.SUBSTEP__V122*/
meltfptr[112]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3488:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3581:/ compute");
/*_.LASTSTEP__V85*/ meltfptr[74] =
/*_.SETQ___V134*/ meltfptr[130] =
/*_.SUBSTEP__V122*/ meltfptr[112];;
- MELT_LOCATION ("warmelt-normatch.melt:3484:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3577:/ quasiblock");
/*_.PROGN___V135*/ meltfptr[134] =
@@ -7517,7 +10025,7 @@ lab_endgetargs:;
/*_.PROGN___V135*/ meltfptr[134];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3483:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3576:/ clear");
/*clear *//*_.IFCPP___V129*/ meltfptr[110] = 0;
/*^clear */
/*clear *//*_.PUT_THEN_MATCH__V133*/ meltfptr[129] = 0;
@@ -7534,7 +10042,7 @@ lab_endgetargs:;
/*_.IF___V128*/ meltfptr[104] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3489:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3582:/ cond");
/*cond */ if ( /*_.SUBFLAG__V123*/ meltfptr[113]) /*then */
{
/*^cond.then */
@@ -7544,7 +10052,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7567,7 +10075,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -7577,7 +10085,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L50*/ meltfnum[41] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7588,7 +10096,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3491;
+ argtab[2].meltbp_long = 3584;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat subflag=";
@@ -7611,7 +10119,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V138*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[41] =
0;
/*^clear */
@@ -7626,7 +10134,7 @@ lab_endgetargs:;
/*_.IF___V137*/ meltfptr[129] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ quasiblock");
/*_.PROGN___V139*/ meltfptr[134] =
@@ -7637,7 +10145,7 @@ lab_endgetargs:;
/*_.PROGN___V139*/ meltfptr[134];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3491:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3584:/ clear");
/*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V137*/ meltfptr[129] = 0;
@@ -7652,26 +10160,26 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3492:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3585:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.FLAGLIST__V87*/ meltfptr[79]),
(melt_ptr_t) ( /*_.SUBFLAG__V123*/
meltfptr[113]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3490:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3583:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3489:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3582:/ clear");
/*clear *//*_.IFCPP___V136*/ meltfptr[110] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3478:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3571:/ clear");
/*clear *//*_.IFCPP___V124*/ meltfptr[109] = 0;
/*^clear */
/*clear *//*_.IF___V128*/ meltfptr[104] = 0;
@@ -7679,7 +10187,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.SUBFLAG__V123*/ meltfptr[113] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3460:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3553:/ clear");
/*clear *//*_.CURPAT__V100*/ meltfptr[69] = 0;
/*^clear */
/*clear *//*_.TUPCP_INDEX__V101*/ meltfptr[68] = 0;
@@ -7701,7 +10209,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3455:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3548:/ clear");
/*clear *//*_.CURPATCOMP__V93*/ meltfptr[70] = 0;
/*^clear */
/*clear *//*_#CURPIX__L32*/ meltfnum[18] = 0;
@@ -7713,7 +10221,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7736,7 +10244,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[41]) /*then */
{
/*^cond.then */
@@ -7746,7 +10254,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L52*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7757,7 +10265,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3497;
+ argtab[2].meltbp_long = 3590;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat elselist";
/*^apply.arg */
@@ -7777,7 +10285,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V142*/ meltfptr[134];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V142*/ meltfptr[134] = 0;
@@ -7790,7 +10298,7 @@ lab_endgetargs:;
/*_.IF___V141*/ meltfptr[129] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ quasiblock");
/*_.PROGN___V143*/ meltfptr[110] = /*_.IF___V141*/ meltfptr[129];;
@@ -7799,7 +10307,7 @@ lab_endgetargs:;
/*_.IFCPP___V140*/ meltfptr[130] = /*_.PROGN___V143*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3497:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3590:/ clear");
/*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[41] = 0;
/*^clear */
/*clear *//*_.IF___V141*/ meltfptr[129] = 0;
@@ -7812,10 +10320,10 @@ lab_endgetargs:;
/*_.IFCPP___V140*/ meltfptr[130] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3498:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3591:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3499:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3592:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -7836,7 +10344,7 @@ lab_endgetargs:;
/*_.LIST_FIRST_ELEMENT__V146*/ meltfptr[112] =
(melt_pair_head
(melt_list_first ((melt_ptr_t) ( /*_.FLAGLIST__V87*/ meltfptr[79]))));;
- MELT_LOCATION ("warmelt-normatch.melt:3501:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3594:/ cond");
/*cond */ if ( /*_.LIST_FIRST_ELEMENT__V146*/ meltfptr[112]) /*then */
{
/*^cond.then */
@@ -7844,7 +10352,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3506:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3599:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7860,7 +10368,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3502:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3595:/ quasiblock");
/*^rawallocobj */
@@ -7919,7 +10427,7 @@ lab_endgetargs:;
/*_.INST___V149*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3501:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3594:/ clear");
/*clear *//*_.LIST_TO_MULTIPLE__V148*/ meltfptr[69] = 0;
/*^clear */
/*clear *//*_.INST___V149*/ meltfptr[68] = 0;
@@ -7933,7 +10441,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3507:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3600:/ quasiblock");
/*^rawallocobj */
@@ -7982,13 +10490,13 @@ lab_endgetargs:;
/*_.INST___V151*/ meltfptr[102];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3501:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3594:/ clear");
/*clear *//*_.INST___V151*/ meltfptr[102] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3518:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3611:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8004,7 +10512,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3511:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3604:/ quasiblock");
/*^rawallocobj */
@@ -8083,8 +10591,15 @@ lab_endgetargs:;
"MSTGROUP_ELSE");
;
/*_.STEPGROUP__V154*/ meltfptr[134] = /*_.INST__V155*/ meltfptr[129];;
- MELT_LOCATION ("warmelt-normatch.melt:3521:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MFLAG__V145*/ meltfptr[104]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[27])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3614:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MFLAG__V145*/ meltfptr[104]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->
+ tabval[27])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -8112,7 +10627,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8135,7 +10650,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -8145,7 +10660,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L54*/ meltfnum[33] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8156,7 +10671,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3522;
+ argtab[2].meltbp_long = 3615;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_tuplepat stepsetflag";
/*^apply.arg */
@@ -8176,7 +10691,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V158*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V158*/ meltfptr[68] = 0;
@@ -8189,7 +10704,7 @@ lab_endgetargs:;
/*_.IF___V157*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ quasiblock");
/*_.PROGN___V159*/ meltfptr[102] = /*_.IF___V157*/ meltfptr[69];;
@@ -8198,7 +10713,7 @@ lab_endgetargs:;
/*_.IFCPP___V156*/ meltfptr[110] = /*_.PROGN___V159*/ meltfptr[102];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3522:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3615:/ clear");
/*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V157*/ meltfptr[69] = 0;
@@ -8211,7 +10726,7 @@ lab_endgetargs:;
/*_.IFCPP___V156*/ meltfptr[110] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3523:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3616:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -8228,7 +10743,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8251,7 +10766,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -8261,7 +10776,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L56*/ meltfnum[41] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -8272,7 +10787,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3524;
+ argtab[2].meltbp_long = 3617;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_tuplepat return stepgroup=";
@@ -8295,7 +10810,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V163*/ meltfptr[162];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[41] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[162] = 0;
@@ -8308,7 +10823,7 @@ lab_endgetargs:;
/*_.IF___V162*/ meltfptr[102] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ quasiblock");
/*_.PROGN___V164*/ meltfptr[162] = /*_.IF___V162*/ meltfptr[102];;
@@ -8317,7 +10832,7 @@ lab_endgetargs:;
/*_.IFCPP___V161*/ meltfptr[69] = /*_.PROGN___V164*/ meltfptr[162];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3524:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3617:/ clear");
/*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V162*/ meltfptr[102] = 0;
@@ -8330,11 +10845,11 @@ lab_endgetargs:;
/*_.IFCPP___V161*/ meltfptr[69] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3525:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3618:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPGROUP__V154*/ meltfptr[134];;
- MELT_LOCATION ("warmelt-normatch.melt:3525:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3618:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -8348,7 +10863,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V144*/ meltfptr[109] = /*_.RETURN___V165*/ meltfptr[102];;
- MELT_LOCATION ("warmelt-normatch.melt:3498:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3591:/ clear");
/*clear *//*_.MFLAG__V145*/ meltfptr[104] = 0;
/*^clear */
/*clear *//*_.LIST_FIRST_ELEMENT__V146*/ meltfptr[112] = 0;
@@ -8368,7 +10883,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V165*/ meltfptr[102] = 0;
/*_.LET___V84*/ meltfptr[80] = /*_.LET___V144*/ meltfptr[109];;
- MELT_LOCATION ("warmelt-normatch.melt:3447:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3540:/ clear");
/*clear *//*_.LASTSTEP__V85*/ meltfptr[74] = 0;
/*^clear */
/*clear *//*_.DCOMP__V86*/ meltfptr[78] = 0;
@@ -8384,7 +10899,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V144*/ meltfptr[109] = 0;
/*_.LET___V46*/ meltfptr[42] = /*_.LET___V84*/ meltfptr[80];;
- MELT_LOCATION ("warmelt-normatch.melt:3409:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3502:/ clear");
/*clear *//*_.ISTEP__V47*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.LASTSTEPTEST__V48*/ meltfptr[47] = 0;
@@ -8400,7 +10915,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V84*/ meltfptr[80] = 0;
/*_.LET___V37*/ meltfptr[30] = /*_.LET___V46*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-normatch.melt:3391:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3484:/ clear");
/*clear *//*_.RAWPATCOMPTUP__V38*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.LAMBDA___V39*/ meltfptr[38] = 0;
@@ -8412,7 +10927,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V46*/ meltfptr[42] = 0;
/*_.LET___V17*/ meltfptr[15] = /*_.LET___V37*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-normatch.melt:3371:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3464:/ clear");
/*clear *//*_.LOCA_LOCATION__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.SLOC__V19*/ meltfptr[18] = 0;
@@ -8428,11 +10943,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V33*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.LET___V37*/ meltfptr[30] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -8459,14 +10974,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT */
+} /*end meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8485,7 +11000,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_78_warmelt_normatch_LAMBDA___20___st
+ struct frame_meltrout_85_warmelt_normatch_LAMBDA___20___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8524,7 +11039,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ getarg");
/*_.TC1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8543,11 +11058,16 @@ lab_endgetargs:;
/*anyblock*/
{
- MELT_LOCATION ("warmelt-normatch.melt:3396:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3489:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TC1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TC1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8565,8 +11085,14 @@ lab_endgetargs:;
/*_.TUPCP_PATTERN__V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3396:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TUPCP_PATTERN__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3489:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TUPCP_PATTERN__V5*/
+ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8588,8 +11114,13 @@ lab_endgetargs:;
/*_#WTC1__L1*/ meltfnum[0] =
(melt_get_int ((melt_ptr_t) ( /*_.PAT_WEIGHT__V6*/ meltfptr[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:3397:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TC2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3490:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TC2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_TUPLE_COMPONENT_PATTERN */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8607,8 +11138,14 @@ lab_endgetargs:;
/*_.TUPCP_PATTERN__V7*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3397:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TUPCP_PATTERN__V7*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3490:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TUPCP_PATTERN__V7*/
+ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8634,7 +11171,7 @@ lab_endgetargs:;
/*_#I__L3*/ meltfnum[2] =
(( /*_#WTC1__L1*/ meltfnum[0]) == ( /*_#WTC2__L2*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:3400:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3493:/ cond");
/*cond */ if ( /*_#I__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -8643,7 +11180,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3400:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3493:/ cond.else");
/*^block */
/*anyblock */
@@ -8651,7 +11188,7 @@ lab_endgetargs:;
/*_#I__L4*/ meltfnum[3] =
(( /*_#WTC1__L1*/ meltfnum[0]) < ( /*_#WTC2__L2*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:3401:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3494:/ cond");
/*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */
{
/*^cond.then */
@@ -8660,13 +11197,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3401:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3494:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3402:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3495:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[10] =
@@ -8677,7 +11214,7 @@ lab_endgetargs:;
/*_.PROGN___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3401:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3494:/ clear");
/*clear *//*_.PROGN___V11*/ meltfptr[10] = 0;
}
;
@@ -8686,7 +11223,7 @@ lab_endgetargs:;
/*_.IFELSE___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3400:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3493:/ clear");
/*clear *//*_#I__L4*/ meltfnum[3] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0;
@@ -8696,7 +11233,7 @@ lab_endgetargs:;
;
/*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V9*/ meltfptr[8];;
- MELT_LOCATION ("warmelt-normatch.melt:3396:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3489:/ clear");
/*clear *//*_.TUPCP_PATTERN__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.PAT_WEIGHT__V6*/ meltfptr[5] = 0;
@@ -8712,11 +11249,11 @@ lab_endgetargs:;
/*clear *//*_#I__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -8735,14 +11272,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_78_warmelt_normatch_LAMBDA___20__ */
+} /*end meltrout_85_warmelt_normatch_LAMBDA___20__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -8763,7 +11300,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT_st
+ struct frame_meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -8802,7 +11339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -8854,7 +11391,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8877,7 +11414,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -8887,7 +11424,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -8897,7 +11434,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3533;
+ argtab[2].meltbp_long = 3628;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat recv";
/*^apply.arg */
@@ -8916,7 +11453,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -8929,7 +11466,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -8938,7 +11475,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3533:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3628:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -8953,7 +11490,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3534:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3629:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8961,7 +11498,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_INSTANCE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3534:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3629:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -8969,7 +11506,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3534:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3629:/ cond.else");
/*^block */
/*anyblock */
@@ -8983,7 +11520,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3534) ? (3534) : __LINE__, __FUNCTION__);
+ (3629) ? (3629) : __LINE__, __FUNCTION__);
;
}
;
@@ -8998,7 +11535,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3534:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3629:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -9011,7 +11548,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9034,7 +11571,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9044,7 +11581,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9054,7 +11591,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3535;
+ argtab[2].meltbp_long = 3630;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat mdata";
/*^apply.arg */
@@ -9074,7 +11611,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -9087,7 +11624,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -9096,7 +11633,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3535:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3630:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -9111,7 +11648,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3536:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3631:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9120,7 +11657,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3536:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3631:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9128,7 +11665,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3536:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3631:/ cond.else");
/*^block */
/*anyblock */
@@ -9142,7 +11679,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3536) ? (3536) : __LINE__, __FUNCTION__);
+ (3631) ? (3631) : __LINE__, __FUNCTION__);
;
}
;
@@ -9157,7 +11694,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3536:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3631:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -9170,7 +11707,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9193,7 +11730,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9203,7 +11740,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9213,7 +11750,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3537;
+ argtab[2].meltbp_long = 3632;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat mcase";
/*^apply.arg */
@@ -9233,7 +11770,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -9246,7 +11783,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -9255,7 +11792,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3537:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3632:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -9270,7 +11807,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3538:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3633:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9279,7 +11816,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3538:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3633:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9287,7 +11824,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3538:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3633:/ cond.else");
/*^block */
/*anyblock */
@@ -9301,7 +11838,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3538) ? (3538) : __LINE__, __FUNCTION__);
+ (3633) ? (3633) : __LINE__, __FUNCTION__);
;
}
;
@@ -9316,7 +11853,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3538:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3633:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -9327,10 +11864,10 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3539:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3634:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3540:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3635:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SPAT_CLASS");
@@ -9338,7 +11875,7 @@ lab_endgetargs:;
meltfptr[25] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3541:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3636:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 4, "SPAT_FIELDS");
@@ -9346,7 +11883,7 @@ lab_endgetargs:;
meltfptr[26] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3542:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3637:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -9362,12 +11899,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3542:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3637:/ cond.else");
/*_.SLOC__V29*/ meltfptr[28] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3543:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3638:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -9377,7 +11914,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3545:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3640:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9386,7 +11923,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.PCLASS__V26*/ meltfptr[25]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:3545:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3640:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9394,7 +11931,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3545:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3640:/ cond.else");
/*^block */
/*anyblock */
@@ -9408,7 +11945,7 @@ lab_endgetargs:;
melt_assert_failed (("check pclass"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3545) ? (3545) : __LINE__, __FUNCTION__);
+ (3640) ? (3640) : __LINE__, __FUNCTION__);
;
}
;
@@ -9423,7 +11960,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.IFELSE___V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3640:/ clear");
/*clear *//*_#IS_A__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V32*/ meltfptr[31] = 0;
@@ -9434,7 +11971,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3546:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3641:/ quasiblock");
/*^getslot */
@@ -9448,8 +11985,14 @@ lab_endgetargs:;
/*_#NBFIELDS__L11*/ meltfnum[1] =
(melt_multiple_length
((melt_ptr_t) ( /*_.CLASS_FIELDS__V34*/ meltfptr[33])));;
- MELT_LOCATION ("warmelt-normatch.melt:3547:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCLASS__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3642:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCLASS__V26*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9467,7 +12010,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3547:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3642:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9504,7 +12047,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3553:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3648:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9513,7 +12056,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURPFLD__V37*/ meltfptr[36]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:3553:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3648:/ cond");
/*cond */ if ( /*_#IS_A__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -9521,7 +12064,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3553:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3648:/ cond.else");
/*^block */
/*anyblock */
@@ -9535,7 +12078,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpfld"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3553) ? (3553) : __LINE__,
+ __FILE__, (3648) ? (3648) : __LINE__,
__FUNCTION__);
;
}
@@ -9551,7 +12094,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[37] = /*_.IFELSE___V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3553:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3648:/ clear");
/*clear *//*_#IS_A__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V39*/ meltfptr[38] = 0;
@@ -9562,7 +12105,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[37] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3554:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3649:/ quasiblock");
/*^getslot */
@@ -9582,12 +12125,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3554:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3649:/ cond.else");
/*_.FSLOC__V42*/ meltfptr[41] = /*_.SLOC__V29*/ meltfptr[28];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3555:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3650:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPFLD__V37*/ meltfptr[36]), 2, "SPAF_FIELD");
@@ -9595,8 +12138,14 @@ lab_endgetargs:;
meltfptr[42] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3556:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFLD__V43*/ meltfptr[42]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3651:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFLD__V43*/
+ meltfptr[42]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9616,7 +12165,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3558:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3653:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9626,7 +12175,7 @@ lab_endgetargs:;
( /*_.CURFLD__V43*/ meltfptr[42]),
(melt_ptr_t) (( /*!CLASS_FIELD */
meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:3558:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3653:/ cond");
/*cond */ if ( /*_#IS_A__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -9634,7 +12183,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3558:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3653:/ cond.else");
/*^block */
/*anyblock */
@@ -9648,7 +12197,7 @@ lab_endgetargs:;
melt_assert_failed (("check curfld"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3558) ? (3558) : __LINE__,
+ __FILE__, (3653) ? (3653) : __LINE__,
__FUNCTION__);
;
}
@@ -9664,7 +12213,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[44] = /*_.IFELSE___V46*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3558:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3653:/ clear");
/*clear *//*_#IS_A__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IFELSE___V46*/ meltfptr[45] = 0;
@@ -9689,7 +12238,7 @@ lab_endgetargs:;
/*_#NOT__L16*/ meltfnum[15] =
(!( /*_#SUBCLASS_OR_EQ__L15*/ meltfnum[12]));;
- MELT_LOCATION ("warmelt-normatch.melt:3559:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3654:/ cond");
/*cond */ if ( /*_#NOT__L16*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -9697,7 +12246,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3561:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3656:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURFLD__V43*/ meltfptr[42]), 1, "NAMED_NAME");
@@ -9707,7 +12256,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3560:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3655:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V29*/ meltfptr[28]),
("bad field in object pattern"),
@@ -9715,8 +12264,14 @@ lab_endgetargs:;
meltfptr[47]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3562:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PCLASS__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3657:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PCLASS__V26*/
+ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9736,7 +12291,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3562:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3657:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V29*/ meltfptr[28]),
("class in pattern is"),
@@ -9744,8 +12299,14 @@ lab_endgetargs:;
meltfptr[48]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3563:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLCLA__V44*/ meltfptr[43]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3658:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLCLA__V44*/
+ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9765,7 +12326,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3563:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3658:/ locexp");
melt_inform_str ((melt_ptr_t)
( /*_.SLOC__V29*/ meltfptr[28]),
("class of field is"),
@@ -9773,14 +12334,14 @@ lab_endgetargs:;
meltfptr[49]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3564:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3659:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3564:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3659:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3559:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3654:/ quasiblock");
/*_.PROGN___V52*/ meltfptr[51] =
@@ -9791,7 +12352,7 @@ lab_endgetargs:;
/*_.PROGN___V52*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3559:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3654:/ clear");
/*clear *//*_.NAMED_NAME__V48*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V49*/ meltfptr[48] = 0;
@@ -9814,7 +12375,7 @@ lab_endgetargs:;
/*_.LET___V40*/ meltfptr[38] = /*_.IFELSE___V47*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-normatch.melt:3554:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3649:/ clear");
/*clear *//*_.LOCA_LOCATION__V41*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.FSLOC__V42*/ meltfptr[41] = 0;
@@ -9836,7 +12397,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3550:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3645:/ clear");
/*clear *//*_.CURPFLD__V37*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_#PIX__L12*/ meltfnum[0] = 0;
@@ -9846,14 +12407,14 @@ lab_endgetargs:;
/*clear *//*_.LET___V40*/ meltfptr[38] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:3568:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3663:/ quasiblock");
/*_.ISTEP__V54*/ meltfptr[48] = ( /*nil */ NULL);;
/*^compute */
/*_.LASTSTEPTEST__V55*/ meltfptr[49] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3570:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3665:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]), 4, "MDATA_STEPS");
@@ -9879,7 +12440,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURSTEP__V58*/ meltfptr[40]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_INSTANCE */ meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ cond");
/*cond */ if ( /*_#IS_A__L17*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -9887,7 +12448,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3577:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3672:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSTEP__V58*/ meltfptr[40]), 6, "MSTINS_CLASS");
@@ -9903,7 +12464,7 @@ lab_endgetargs:;
/*_#IF___L18*/ meltfnum[15] = /*_#__L19*/ meltfnum[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ clear");
/*clear *//*_.MSTINS_CLASS__V59*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_#__L19*/ meltfnum[18] = 0;
@@ -9916,7 +12477,7 @@ lab_endgetargs:;
/*_#IF___L18*/ meltfnum[15] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ cond");
/*cond */ if ( /*_#IF___L18*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -9924,14 +12485,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3578:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3673:/ compute");
/*_.CURPAIR__V57*/ meltfptr[51] =
/*_.SETQ___V61*/ meltfptr[43] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3579:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3674:/ compute");
/*_.ISTEP__V54*/ meltfptr[48] =
/*_.SETQ___V62*/ meltfptr[44] =
/*_.CURSTEP__V58*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ quasiblock");
/*_.PROGN___V63*/ meltfptr[45] =
@@ -9942,7 +12503,7 @@ lab_endgetargs:;
/*_.PROGN___V63*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ clear");
/*clear *//*_.SETQ___V61*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.SETQ___V62*/ meltfptr[44] = 0;
@@ -9962,7 +12523,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURSTEP__V58*/ meltfptr[40]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */ meltfrout->tabval[10])));;
- MELT_LOCATION ("warmelt-normatch.melt:3581:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3676:/ cond");
/*cond */ if ( /*_#IS_A__L20*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -9970,7 +12531,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3582:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3677:/ compute");
/*_.LASTSTEPTEST__V55*/ meltfptr[49] =
/*_.SETQ___V65*/ meltfptr[43] =
/*_.CURSTEP__V58*/ meltfptr[40];;
@@ -9978,7 +12539,7 @@ lab_endgetargs:;
/*_.SETQ___V65*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3581:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3676:/ clear");
/*clear *//*_.SETQ___V65*/ meltfptr[43] = 0;
}
;
@@ -9995,7 +12556,7 @@ lab_endgetargs:;
/*_.IFELSE___V64*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3576:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3671:/ clear");
/*clear *//*_#IS_A__L20*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IFELSE___V64*/ meltfptr[41] = 0;
@@ -10007,7 +12568,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3572:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3667:/ clear");
/*clear *//*_.CURPAIR__V57*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_.CURSTEP__V58*/ meltfptr[40] = 0;
@@ -10021,7 +12582,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10044,7 +12605,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -10054,7 +12615,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10065,7 +12626,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3584;
+ argtab[2].meltbp_long = 3679;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat laststeptest";
/*^apply.arg */
@@ -10085,7 +12646,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V68*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[43] = 0;
@@ -10098,7 +12659,7 @@ lab_endgetargs:;
/*_.IF___V67*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ quasiblock");
/*_.PROGN___V69*/ meltfptr[41] = /*_.IF___V67*/ meltfptr[45];;
@@ -10107,7 +12668,7 @@ lab_endgetargs:;
/*_.IFCPP___V66*/ meltfptr[44] = /*_.PROGN___V69*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3584:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3679:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[45] = 0;
@@ -10124,7 +12685,7 @@ lab_endgetargs:;
/*_#NULL__L23*/ meltfnum[21] =
(( /*_.ISTEP__V54*/ meltfptr[48]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3586:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3681:/ cond");
/*cond */ if ( /*_#NULL__L23*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -10132,7 +12693,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3587:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3682:/ quasiblock");
/*_.DSLOTS__V72*/ meltfptr[41] =
@@ -10140,7 +12701,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[11])),
( /*_#NBFIELDS__L11*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3590:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3685:/ quasiblock");
/*^rawallocobj */
@@ -10211,12 +12772,12 @@ lab_endgetargs:;
"MSTINS_SLOTS");
;
/*_.NEWSTEP__V73*/ meltfptr[72] = /*_.INST__V74*/ meltfptr[73];;
- MELT_LOCATION ("warmelt-normatch.melt:3599:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3694:/ compute");
/*_.ISTEP__V54*/ meltfptr[48] = /*_.SETQ___V75*/ meltfptr[74] =
/*_.NEWSTEP__V73*/ meltfptr[72];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10239,7 +12800,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -10249,7 +12810,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10260,7 +12821,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3600;
+ argtab[2].meltbp_long = 3695;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat newstep";
/*^apply.arg */
@@ -10281,7 +12842,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V78*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V78*/ meltfptr[77] = 0;
@@ -10294,7 +12855,7 @@ lab_endgetargs:;
/*_.IF___V77*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ quasiblock");
/*_.PROGN___V79*/ meltfptr[77] = /*_.IF___V77*/ meltfptr[76];;
@@ -10303,7 +12864,7 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[75] = /*_.PROGN___V79*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3600:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3695:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V77*/ meltfptr[76] = 0;
@@ -10318,7 +12879,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3601:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3696:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STEPLIST__V56*/ meltfptr[50]),
(melt_ptr_t) ( /*_.NEWSTEP__V73*/
@@ -10327,7 +12888,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10350,7 +12911,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -10360,7 +12921,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10371,7 +12932,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3602;
+ argtab[2].meltbp_long = 3697;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat updated steplist";
@@ -10393,7 +12954,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V82*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V82*/ meltfptr[81] = 0;
@@ -10406,7 +12967,7 @@ lab_endgetargs:;
/*_.IF___V81*/ meltfptr[77] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ quasiblock");
/*_.PROGN___V83*/ meltfptr[81] = /*_.IF___V81*/ meltfptr[77];;
@@ -10415,7 +12976,7 @@ lab_endgetargs:;
/*_.IFCPP___V80*/ meltfptr[76] = /*_.PROGN___V83*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3602:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3697:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V81*/ meltfptr[77] = 0;
@@ -10428,7 +12989,7 @@ lab_endgetargs:;
/*_.IFCPP___V80*/ meltfptr[76] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3603:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3698:/ cond");
/*cond */ if ( /*_.LASTSTEPTEST__V55*/ meltfptr[49]) /*then */
{
/*^cond.then */
@@ -10436,7 +12997,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3605:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3700:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -10455,7 +13016,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10478,7 +13039,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -10488,7 +13049,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10499,7 +13060,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3606;
+ argtab[2].meltbp_long = 3701;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat updated laststeptest";
@@ -10522,7 +13083,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] =
0;
/*^clear */
@@ -10536,7 +13097,7 @@ lab_endgetargs:;
/*_.IF___V87*/ meltfptr[86] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[87] =
@@ -10547,7 +13108,7 @@ lab_endgetargs:;
/*_.PROGN___V89*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3701:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V87*/ meltfptr[86] = 0;
@@ -10560,7 +13121,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[85] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3604:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3699:/ quasiblock");
/*_.PROGN___V90*/ meltfptr[86] =
@@ -10570,7 +13131,7 @@ lab_endgetargs:;
/*_.IF___V84*/ meltfptr[77] = /*_.PROGN___V90*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3603:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3698:/ clear");
/*clear *//*_.PUT_ELSE_MATCH__V85*/ meltfptr[81] = 0;
/*^clear */
/*clear *//*_.IFCPP___V86*/ meltfptr[85] = 0;
@@ -10589,7 +13150,7 @@ lab_endgetargs:;
/*_.LET___V71*/ meltfptr[45] = /*_.IF___V84*/ meltfptr[77];;
- MELT_LOCATION ("warmelt-normatch.melt:3587:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3682:/ clear");
/*clear *//*_.DSLOTS__V72*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_.NEWSTEP__V73*/ meltfptr[72] = 0;
@@ -10604,7 +13165,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[43] = /*_.LET___V71*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3586:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3681:/ clear");
/*clear *//*_.LET___V71*/ meltfptr[45] = 0;
}
;
@@ -10615,7 +13176,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3609:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3704:/ quasiblock");
/*^getslot */
@@ -10639,7 +13200,7 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[13]))));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3614:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3709:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10647,7 +13208,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L30*/ meltfnum[24] =
(melt_magic_discr ((melt_ptr_t) ( /*_.MSLOTS__V92*/ meltfptr[81])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:3614:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3709:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L30*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -10655,7 +13216,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3614:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3709:/ cond.else");
/*^block */
/*anyblock */
@@ -10669,7 +13230,7 @@ lab_endgetargs:;
melt_assert_failed (("check mslots"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3614) ? (3614) : __LINE__, __FUNCTION__);
+ (3709) ? (3709) : __LINE__, __FUNCTION__);
;
}
;
@@ -10684,7 +13245,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[72] = /*_.IFELSE___V97*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3614:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3709:/ clear");
/*clear *//*_#IS_MULTIPLE__L30*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IFELSE___V97*/ meltfptr[74] = 0;
@@ -10697,7 +13258,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3615:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3710:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.ELSELIST__V95*/ meltfptr[41]),
(melt_ptr_t) ( /*_.ISTEP__V54*/ meltfptr[48]));
}
@@ -10721,7 +13282,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3619:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3714:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10730,7 +13291,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURPFLD__V98*/ meltfptr[75]),
(melt_ptr_t) (( /*!CLASS_SOURCE_FIELD_PATTERN */ meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:3619:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3714:/ cond");
/*cond */ if ( /*_#IS_A__L32*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -10738,7 +13299,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3619:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3714:/ cond.else");
/*^block */
/*anyblock */
@@ -10752,7 +13313,7 @@ lab_endgetargs:;
melt_assert_failed (("check curpfld"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3619) ? (3619) : __LINE__,
+ __FILE__, (3714) ? (3714) : __LINE__,
__FUNCTION__);
;
}
@@ -10769,7 +13330,7 @@ lab_endgetargs:;
/*_.IFELSE___V100*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3619:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3714:/ clear");
/*clear *//*_#IS_A__L32*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IFELSE___V100*/ meltfptr[77] = 0;
@@ -10780,7 +13341,7 @@ lab_endgetargs:;
/*_.IFCPP___V99*/ meltfptr[76] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3620:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3715:/ quasiblock");
/*^getslot */
@@ -10800,12 +13361,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3620:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3715:/ cond.else");
/*_.FSLOC__V102*/ meltfptr[74] = /*_.SLOC__V29*/ meltfptr[28];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3621:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3716:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPFLD__V98*/ meltfptr[75]), 2, "SPAF_FIELD");
@@ -10813,7 +13374,7 @@ lab_endgetargs:;
meltfptr[77] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3622:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3717:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPFLD__V98*/ meltfptr[75]), 3, "SPAF_PATTERN");
@@ -10825,7 +13386,7 @@ lab_endgetargs:;
!melt_is_instance_of ((melt_ptr_t)
( /*_.CURFPAT__V104*/ meltfptr[103]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:3624:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3719:/ cond");
/*cond */ if ( /*_#IS_NOT_A__L33*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -10833,7 +13394,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3625:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3720:/ quasiblock");
/*_#CURFIX__L34*/ meltfnum[33] =
@@ -10849,7 +13410,7 @@ lab_endgetargs:;
/*_#NULL__L35*/ meltfnum[34] =
(( /*_.CURSLOTDATA__V105*/ meltfptr[104]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3628:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3723:/ cond");
/*cond */ if ( /*_#NULL__L35*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -10858,10 +13419,10 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:3629:/ quasiblock");
+ ("warmelt-normatch.melt:3724:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3630:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3725:/ apply");
/*apply */
{
/*_.CLONE_SYMBOL__V106*/ meltfptr[105] =
@@ -10879,7 +13440,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[13]))));;
MELT_LOCATION
- ("warmelt-normatch.melt:3629:/ quasiblock");
+ ("warmelt-normatch.melt:3724:/ quasiblock");
/*^rawallocobj */
@@ -10945,7 +13506,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3636:/ cppif.then");
+ ("warmelt-normatch.melt:3731:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10968,7 +13529,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3636:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3731:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -10979,7 +13540,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L37*/ meltfnum[36] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3636:/ apply");
+ ("warmelt-normatch.melt:3731:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10991,7 +13552,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3636;
+ argtab[2].meltbp_long = 3731;
/*^apply.arg */
argtab[3].meltbp_cstring =
" translpat_inspat newslot";
@@ -11017,7 +13578,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3636:/ clear");
+ ("warmelt-normatch.melt:3731:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L37*/
meltfnum[36] = 0;
/*^clear */
@@ -11033,7 +13594,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3636:/ quasiblock");
+ ("warmelt-normatch.melt:3731:/ quasiblock");
/*_.PROGN___V113*/ meltfptr[111] =
@@ -11044,7 +13605,7 @@ lab_endgetargs:;
/*_.PROGN___V113*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3636:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3731:/ clear");
/*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.IF___V111*/ meltfptr[110] = 0;
@@ -11057,13 +13618,13 @@ lab_endgetargs:;
/*_.IFCPP___V110*/ meltfptr[109] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3637:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3732:/ compute");
/*_.CURSLOTDATA__V105*/ meltfptr[104] =
/*_.SETQ___V114*/ meltfptr[110] =
/*_.NEWSLOT__V108*/ meltfptr[107];;
{
- MELT_LOCATION ("warmelt-normatch.melt:3638:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3733:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.MSLOTS__V92*/
meltfptr[81]),
@@ -11073,7 +13634,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3629:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3724:/ clear");
/*clear *//*_.CLONE_SYMBOL__V106*/ meltfptr[105] = 0;
/*^clear */
/*clear *//*_.MAKE_LIST__V107*/ meltfptr[106] = 0;
@@ -11090,7 +13651,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11113,7 +13674,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[36]) /*then */
{
/*^cond.then */
@@ -11123,7 +13684,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11134,7 +13695,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3639;
+ argtab[2].meltbp_long = 3734;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat before translation curfpat";
@@ -11157,7 +13718,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V117*/ meltfptr[106];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[35] =
0;
/*^clear */
@@ -11172,7 +13733,7 @@ lab_endgetargs:;
/*_.IF___V116*/ meltfptr[105] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ quasiblock");
/*_.PROGN___V118*/ meltfptr[107] =
@@ -11183,7 +13744,7 @@ lab_endgetargs:;
/*_.PROGN___V118*/ meltfptr[107];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3639:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3734:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[36] = 0;
/*^clear */
/*clear *//*_.IF___V116*/ meltfptr[105] = 0;
@@ -11196,7 +13757,7 @@ lab_endgetargs:;
/*_.IFCPP___V115*/ meltfptr[111] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3640:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3735:/ quasiblock");
/*^multimsend */
@@ -11230,7 +13791,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11253,7 +13814,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -11263,7 +13824,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[36] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11274,7 +13835,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3643;
+ argtab[2].meltbp_long = 3738;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat flstep";
@@ -11296,7 +13857,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V123*/ meltfptr[107];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[36] =
0;
/*^clear */
@@ -11311,7 +13872,7 @@ lab_endgetargs:;
/*_.IF___V122*/ meltfptr[105] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[107] =
@@ -11322,7 +13883,7 @@ lab_endgetargs:;
/*_.PROGN___V124*/ meltfptr[107];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3643:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3738:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.IF___V122*/ meltfptr[105] = 0;
@@ -11337,7 +13898,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11360,7 +13921,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[36]) /*then */
{
/*^cond.then */
@@ -11370,7 +13931,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11381,7 +13942,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3644;
+ argtab[2].meltbp_long = 3739;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat flflag";
@@ -11403,7 +13964,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V127*/ meltfptr[126];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[35] =
0;
/*^clear */
@@ -11418,7 +13979,7 @@ lab_endgetargs:;
/*_.IF___V126*/ meltfptr[107] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ quasiblock");
/*_.PROGN___V128*/ meltfptr[126] =
@@ -11429,7 +13990,7 @@ lab_endgetargs:;
/*_.PROGN___V128*/ meltfptr[126];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3644:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3739:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[36] = 0;
/*^clear */
/*clear *//*_.IF___V126*/ meltfptr[107] = 0;
@@ -11442,7 +14003,7 @@ lab_endgetargs:;
/*_.IFCPP___V125*/ meltfptr[105] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3645:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3740:/ cond");
/*cond */ if ( /*_.FLSTEP__V119*/ meltfptr[109]) /*then */
{
/*^cond.then */
@@ -11453,7 +14014,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3647:/ cppif.then");
+ ("warmelt-normatch.melt:3742:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11476,7 +14037,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3647:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3742:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -11487,7 +14048,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[36] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3647:/ apply");
+ ("warmelt-normatch.melt:3742:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11499,7 +14060,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3647;
+ argtab[2].meltbp_long = 3742;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_inspat laststep";
@@ -11525,7 +14086,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3647:/ clear");
+ ("warmelt-normatch.melt:3742:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/
meltfnum[36] = 0;
/*^clear */
@@ -11541,7 +14102,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3647:/ quasiblock");
+ ("warmelt-normatch.melt:3742:/ quasiblock");
/*_.PROGN___V133*/ meltfptr[131] =
@@ -11552,7 +14113,7 @@ lab_endgetargs:;
/*_.PROGN___V133*/ meltfptr[131];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3647:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3742:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.IF___V131*/ meltfptr[130] = 0;
@@ -11565,7 +14126,7 @@ lab_endgetargs:;
/*_.IFCPP___V130*/ meltfptr[126] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3648:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3743:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -11584,7 +14145,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3649:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3744:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.ELSELIST__V95*/
meltfptr[41]),
@@ -11592,12 +14153,12 @@ lab_endgetargs:;
meltfptr[109]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3650:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3745:/ compute");
/*_.LASTSTEP__V93*/ meltfptr[85] =
/*_.SETQ___V135*/ meltfptr[131] =
/*_.FLSTEP__V119*/ meltfptr[109];;
MELT_LOCATION
- ("warmelt-normatch.melt:3646:/ quasiblock");
+ ("warmelt-normatch.melt:3741:/ quasiblock");
/*_.PROGN___V136*/ meltfptr[135] =
@@ -11608,7 +14169,7 @@ lab_endgetargs:;
/*_.PROGN___V136*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3645:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3740:/ clear");
/*clear *//*_.IFCPP___V130*/ meltfptr[126] = 0;
/*^clear */
/*clear *//*_.PUT_THEN_MATCH__V134*/ meltfptr[130] = 0;
@@ -11625,7 +14186,7 @@ lab_endgetargs:;
/*_.IF___V129*/ meltfptr[107] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3652:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3747:/ cond");
/*cond */ if ( /*_.FLFLAG__V120*/ meltfptr[110]) /*then */
{
/*^cond.then */
@@ -11635,7 +14196,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:3653:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3748:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.FLAGLIST__V94*/
meltfptr[86]),
@@ -11649,7 +14210,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3640:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3735:/ clear");
/*clear *//*_.IFCPP___V121*/ meltfptr[106] = 0;
/*^clear */
/*clear *//*_.IFCPP___V125*/ meltfptr[105] = 0;
@@ -11659,7 +14220,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.FLFLAG__V120*/ meltfptr[110] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3625:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3720:/ clear");
/*clear *//*_#CURFIX__L34*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.CURSLOTDATA__V105*/ meltfptr[104] = 0;
@@ -11673,7 +14234,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3620:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3715:/ clear");
/*clear *//*_.LOCA_LOCATION__V101*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_.FSLOC__V102*/ meltfptr[74] = 0;
@@ -11689,7 +14250,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3616:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3711:/ clear");
/*clear *//*_.CURPFLD__V98*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_#PIX__L31*/ meltfnum[18] = 0;
@@ -11699,7 +14260,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11722,7 +14283,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[36]) /*then */
{
/*^cond.then */
@@ -11732,7 +14293,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L47*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11743,7 +14304,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3655;
+ argtab[2].meltbp_long = 3750;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat elselist";
/*^apply.arg */
@@ -11763,7 +14324,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V139*/ meltfptr[131];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L47*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V139*/ meltfptr[131] = 0;
@@ -11776,7 +14337,7 @@ lab_endgetargs:;
/*_.IF___V138*/ meltfptr[130] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ quasiblock");
/*_.PROGN___V140*/ meltfptr[135] = /*_.IF___V138*/ meltfptr[130];;
@@ -11785,7 +14346,7 @@ lab_endgetargs:;
/*_.IFCPP___V137*/ meltfptr[126] = /*_.PROGN___V140*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3655:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3750:/ clear");
/*clear *//*_#MELT_NEED_DBG__L46*/ meltfnum[36] = 0;
/*^clear */
/*clear *//*_.IF___V138*/ meltfptr[130] = 0;
@@ -11798,13 +14359,13 @@ lab_endgetargs:;
/*_.IFCPP___V137*/ meltfptr[126] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3656:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3751:/ quasiblock");
/*_.LIST_FIRST_ELEMENT__V142*/ meltfptr[105] =
(melt_pair_head
(melt_list_first ((melt_ptr_t) ( /*_.FLAGLIST__V94*/ meltfptr[86]))));;
- MELT_LOCATION ("warmelt-normatch.melt:3658:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3753:/ cond");
/*cond */ if ( /*_.LIST_FIRST_ELEMENT__V142*/ meltfptr[105]) /*then */
{
/*^cond.then */
@@ -11812,7 +14373,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3663:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3758:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11828,7 +14389,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3659:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3754:/ quasiblock");
/*^rawallocobj */
@@ -11887,7 +14448,7 @@ lab_endgetargs:;
/*_.INST___V145*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3658:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3753:/ clear");
/*clear *//*_.LIST_TO_MULTIPLE__V144*/ meltfptr[109] = 0;
/*^clear */
/*clear *//*_.INST___V145*/ meltfptr[110] = 0;
@@ -11901,7 +14462,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3664:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3759:/ quasiblock");
/*^rawallocobj */
@@ -11950,13 +14511,13 @@ lab_endgetargs:;
/*_.INST___V147*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3658:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3753:/ clear");
/*clear *//*_.INST___V147*/ meltfptr[111] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3675:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3770:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -11972,7 +14533,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3668:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3763:/ quasiblock");
/*^rawallocobj */
@@ -12051,8 +14612,15 @@ lab_endgetargs:;
"MSTGROUP_ELSE");
;
/*_.STEPGROUP__V150*/ meltfptr[77] = /*_.INST__V151*/ meltfptr[103];;
- MELT_LOCATION ("warmelt-normatch.melt:3678:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MFLAG__V36*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[23])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3773:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MFLAG__V36*/ meltfptr[35]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->
+ tabval[23])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -12079,7 +14647,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12102,7 +14670,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L48*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -12112,7 +14680,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L49*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12123,7 +14691,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3679;
+ argtab[2].meltbp_long = 3774;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat stepsetflag";
/*^apply.arg */
@@ -12143,7 +14711,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V154*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L49*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V154*/ meltfptr[135] = 0;
@@ -12156,7 +14724,7 @@ lab_endgetargs:;
/*_.IF___V153*/ meltfptr[130] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ quasiblock");
/*_.PROGN___V155*/ meltfptr[109] = /*_.IF___V153*/ meltfptr[130];;
@@ -12165,7 +14733,7 @@ lab_endgetargs:;
/*_.IFCPP___V152*/ meltfptr[131] = /*_.PROGN___V155*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3679:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3774:/ clear");
/*clear *//*_#MELT_NEED_DBG__L48*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IF___V153*/ meltfptr[130] = 0;
@@ -12178,7 +14746,7 @@ lab_endgetargs:;
/*_.IFCPP___V152*/ meltfptr[131] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3680:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3775:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -12195,7 +14763,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12218,7 +14786,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[24]) /*then */
{
/*^cond.then */
@@ -12228,7 +14796,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L51*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12239,7 +14807,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3681;
+ argtab[2].meltbp_long = 3776;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_inspat return stepgroup";
/*^apply.arg */
@@ -12259,7 +14827,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V159*/ meltfptr[130];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L51*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V159*/ meltfptr[130] = 0;
@@ -12272,7 +14840,7 @@ lab_endgetargs:;
/*_.IF___V158*/ meltfptr[135] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ quasiblock");
/*_.PROGN___V160*/ meltfptr[109] = /*_.IF___V158*/ meltfptr[135];;
@@ -12281,7 +14849,7 @@ lab_endgetargs:;
/*_.IFCPP___V157*/ meltfptr[111] = /*_.PROGN___V160*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3681:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3776:/ clear");
/*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[24] = 0;
/*^clear */
/*clear *//*_.IF___V158*/ meltfptr[135] = 0;
@@ -12294,11 +14862,11 @@ lab_endgetargs:;
/*_.IFCPP___V157*/ meltfptr[111] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3682:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3777:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPGROUP__V150*/ meltfptr[77];;
- MELT_LOCATION ("warmelt-normatch.melt:3682:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3777:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -12312,7 +14880,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V141*/ meltfptr[106] = /*_.RETURN___V161*/ meltfptr[130];;
- MELT_LOCATION ("warmelt-normatch.melt:3656:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3751:/ clear");
/*clear *//*_.LIST_FIRST_ELEMENT__V142*/ meltfptr[105] = 0;
/*^clear */
/*clear *//*_.STEPSETFLAG__V143*/ meltfptr[107] = 0;
@@ -12330,7 +14898,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V161*/ meltfptr[130] = 0;
/*_.LET___V91*/ meltfptr[87] = /*_.LET___V141*/ meltfptr[106];;
- MELT_LOCATION ("warmelt-normatch.melt:3609:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3704:/ clear");
/*clear *//*_.MSLOTS__V92*/ meltfptr[81] = 0;
/*^clear */
/*clear *//*_.LASTSTEP__V93*/ meltfptr[85] = 0;
@@ -12346,7 +14914,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V141*/ meltfptr[106] = 0;
/*_.LET___V53*/ meltfptr[47] = /*_.LET___V91*/ meltfptr[87];;
- MELT_LOCATION ("warmelt-normatch.melt:3568:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3663:/ clear");
/*clear *//*_.ISTEP__V54*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.LASTSTEPTEST__V55*/ meltfptr[49] = 0;
@@ -12362,7 +14930,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V91*/ meltfptr[87] = 0;
/*_.LET___V33*/ meltfptr[31] = /*_.LET___V53*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-normatch.melt:3546:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3641:/ clear");
/*clear *//*_.CLASS_FIELDS__V34*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_#NBFIELDS__L11*/ meltfnum[1] = 0;
@@ -12374,7 +14942,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V53*/ meltfptr[47] = 0;
/*_.LET___V25*/ meltfptr[20] = /*_.LET___V33*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:3539:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3634:/ clear");
/*clear *//*_.PCLASS__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.PFIELDS__V27*/ meltfptr[26] = 0;
@@ -12388,11 +14956,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.LET___V33*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -12423,14 +14991,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT */
+} /*end meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -12451,7 +15019,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT_st
+ struct frame_meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -12490,7 +15058,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -12542,7 +15110,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12565,7 +15133,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12575,7 +15143,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12585,7 +15153,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3690;
+ argtab[2].meltbp_long = 3786;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat recv";
/*^apply.arg */
@@ -12604,7 +15172,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -12617,7 +15185,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -12626,7 +15194,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3690:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3786:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -12641,7 +15209,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3691:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3787:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12649,7 +15217,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3691:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3787:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12657,7 +15225,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3691:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3787:/ cond.else");
/*^block */
/*anyblock */
@@ -12671,7 +15239,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3691) ? (3691) : __LINE__, __FUNCTION__);
+ (3787) ? (3787) : __LINE__, __FUNCTION__);
;
}
;
@@ -12686,7 +15254,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3691:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3787:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -12699,7 +15267,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12722,7 +15290,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12732,7 +15300,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12742,7 +15310,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3692;
+ argtab[2].meltbp_long = 3788;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat mdata";
/*^apply.arg */
@@ -12762,7 +15330,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -12775,7 +15343,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -12784,7 +15352,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3692:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3788:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -12799,7 +15367,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3693:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3789:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12808,7 +15376,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3693:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3789:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12816,7 +15384,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3693:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3789:/ cond.else");
/*^block */
/*anyblock */
@@ -12830,7 +15398,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3693) ? (3693) : __LINE__, __FUNCTION__);
+ (3789) ? (3789) : __LINE__, __FUNCTION__);
;
}
;
@@ -12845,7 +15413,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3693:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3789:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -12858,7 +15426,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12881,7 +15449,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12891,7 +15459,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12901,7 +15469,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3694;
+ argtab[2].meltbp_long = 3790;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat mcase";
/*^apply.arg */
@@ -12921,7 +15489,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -12934,7 +15502,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -12943,7 +15511,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3694:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3790:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -12958,7 +15526,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3695:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3791:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12967,7 +15535,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3695:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3791:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12975,7 +15543,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3695:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3791:/ cond.else");
/*^block */
/*anyblock */
@@ -12989,7 +15557,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3695) ? (3695) : __LINE__, __FUNCTION__);
+ (3791) ? (3791) : __LINE__, __FUNCTION__);
;
}
;
@@ -13004,7 +15572,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3695:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3791:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -13015,10 +15583,10 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3696:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3792:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3697:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3793:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -13034,12 +15602,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3697:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3793:/ cond.else");
/*_.SLOC__V27*/ meltfptr[26] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3698:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3794:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SPATVAR_SYMB");
@@ -13047,7 +15615,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3699:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3795:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -13060,8 +15628,13 @@ lab_endgetargs:;
( /*_.VARMAP__V5*/ meltfptr[4]),
(meltobject_ptr_t) ( /*_.SYMB__V28*/
meltfptr[27]));;
- MELT_LOCATION ("warmelt-normatch.melt:3701:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3797:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V29*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13079,7 +15652,7 @@ lab_endgetargs:;
/*_.MHANDLERS__V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3702:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3798:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]), 4, "MDATA_STEPS");
@@ -13087,7 +15660,7 @@ lab_endgetargs:;
meltfptr[31] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3703:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3799:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -13095,8 +15668,14 @@ lab_endgetargs:;
meltfptr[32] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3704:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYMB__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3800:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYMB__V28*/ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -13114,7 +15693,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3704:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3800:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -13132,7 +15711,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3705:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3801:/ quasiblock");
/*^rawallocobj */
@@ -13177,7 +15756,7 @@ lab_endgetargs:;
/*_.FLAGSTEP__V36*/ meltfptr[35] = /*_.INST__V37*/ meltfptr[36];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13200,7 +15779,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13210,7 +15789,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13221,7 +15800,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3710;
+ argtab[2].meltbp_long = 3806;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat symb";
/*^apply.arg */
@@ -13241,7 +15820,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -13254,7 +15833,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];;
@@ -13263,7 +15842,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[37] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3710:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3806:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[38] = 0;
@@ -13278,7 +15857,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13301,7 +15880,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13311,7 +15890,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13322,7 +15901,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3711;
+ argtab[2].meltbp_long = 3807;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat symbval";
/*^apply.arg */
@@ -13342,7 +15921,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -13355,7 +15934,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[39] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[39];;
@@ -13364,7 +15943,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[38] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3711:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3807:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[39] = 0;
@@ -13377,8 +15956,14 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[38] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3712:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MFLAG__V35*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3808:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MFLAG__V35*/ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -13405,7 +15990,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13428,7 +16013,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13438,7 +16023,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13449,7 +16034,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3713;
+ argtab[2].meltbp_long = 3809;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_varpat flagstep";
/*^apply.arg */
@@ -13469,7 +16054,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V48*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V48*/ meltfptr[47] = 0;
@@ -13482,7 +16067,7 @@ lab_endgetargs:;
/*_.IF___V47*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ quasiblock");
/*_.PROGN___V49*/ meltfptr[47] = /*_.IF___V47*/ meltfptr[43];;
@@ -13491,7 +16076,7 @@ lab_endgetargs:;
/*_.IFCPP___V46*/ meltfptr[39] = /*_.PROGN___V49*/ meltfptr[47];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3713:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3809:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V47*/ meltfptr[43] = 0;
@@ -13508,7 +16093,7 @@ lab_endgetargs:;
/*_#NULL__L16*/ meltfnum[1] =
(( /*_.SYMBVAL__V30*/ meltfptr[29]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3715:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3811:/ cond");
/*cond */ if ( /*_#NULL__L16*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -13518,7 +16103,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:3716:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3812:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.VARMAP__V5*/ meltfptr[4]),
(meltobject_ptr_t) ( /*_.SYMB__V28*/
@@ -13529,7 +16114,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13552,7 +16137,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13562,7 +16147,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13573,7 +16158,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3717;
+ argtab[2].meltbp_long = 3813;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat updated varmap & return null";
@@ -13595,7 +16180,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
@@ -13608,7 +16193,7 @@ lab_endgetargs:;
/*_.IF___V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
@@ -13617,7 +16202,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[47] = /*_.PROGN___V54*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3717:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3813:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V52*/ meltfptr[51] = 0;
@@ -13632,7 +16217,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3718:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3814:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STEPLIST__V32*/ meltfptr[31]),
(melt_ptr_t) ( /*_.FLAGSTEP__V36*/
@@ -13653,7 +16238,7 @@ lab_endgetargs:;
melt_pair_head ( /*_.CURPAIR__V55*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-normatch.melt:3722:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3818:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -13690,7 +16275,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3719:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3815:/ clear");
/*clear *//*_.CURPAIR__V55*/ meltfptr[51] = 0;
/*^clear */
/*clear *//*_.CURHANDLER__V56*/ meltfptr[52] = 0;
@@ -13700,7 +16285,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13723,7 +16308,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -13733,7 +16318,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13744,7 +16329,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3723;
+ argtab[2].meltbp_long = 3819;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return mflag";
@@ -13766,7 +16351,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
@@ -13779,7 +16364,7 @@ lab_endgetargs:;
/*_.IF___V59*/ meltfptr[58] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[58];;
@@ -13788,7 +16373,7 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[57] = /*_.PROGN___V61*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3723:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3819:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V59*/ meltfptr[58] = 0;
@@ -13803,7 +16388,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13826,7 +16411,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -13836,7 +16421,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13847,7 +16432,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3724;
+ argtab[2].meltbp_long = 3820;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return flagstep";
@@ -13869,7 +16454,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
@@ -13882,7 +16467,7 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ quasiblock");
/*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[59];;
@@ -13891,7 +16476,7 @@ lab_endgetargs:;
/*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3724:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3820:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V63*/ meltfptr[59] = 0;
@@ -13904,11 +16489,11 @@ lab_endgetargs:;
/*_.IFCPP___V62*/ meltfptr[58] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3725:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3821:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.FLAGSTEP__V36*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:3725:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3821:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -13920,7 +16505,7 @@ lab_endgetargs:;
/*^finalreturn */
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3715:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3811:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[63] = /*_.RETURN___V66*/ meltfptr[59];;
@@ -13929,7 +16514,7 @@ lab_endgetargs:;
/*_.IFELSE___V50*/ meltfptr[43] = /*_.PROGN___V67*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3715:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3811:/ clear");
/*clear *//*_.IFCPP___V51*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.IFCPP___V58*/ meltfptr[57] = 0;
@@ -13951,7 +16536,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3728:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3824:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13961,7 +16546,7 @@ lab_endgetargs:;
( /*_.SYMBVAL__V30*/ meltfptr[29]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3728:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3824:/ cond");
/*cond */ if ( /*_#IS_A__L23*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -13969,7 +16554,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3728:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3824:/ cond.else");
/*^block */
/*anyblock */
@@ -13983,7 +16568,7 @@ lab_endgetargs:;
melt_assert_failed (("check symbval"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3728) ? (3728) : __LINE__,
+ __FILE__, (3824) ? (3824) : __LINE__,
__FUNCTION__);
;
}
@@ -13999,7 +16584,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[47] = /*_.IFELSE___V69*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3728:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3824:/ clear");
/*clear *//*_#IS_A__L23*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IFELSE___V69*/ meltfptr[57] = 0;
@@ -14010,7 +16595,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[47] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3729:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3825:/ quasiblock");
/*_.LASTSTEPTEST__V71*/ meltfptr[59] = ( /*nil */ NULL);;
@@ -14032,7 +16617,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURTESTSTEP__V73*/ meltfptr[57]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_VARIABLE */ meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:3735:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3831:/ cond");
/*cond */ if ( /*_#IS_A__L24*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14040,7 +16625,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3736:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3832:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURTESTSTEP__V73*/ meltfptr[57]), 6, "MSTEPTESTVAR_DATA");
@@ -14056,7 +16641,7 @@ lab_endgetargs:;
/*_#IF___L25*/ meltfnum[17] = /*_#__L26*/ meltfnum[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3735:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3831:/ clear");
/*clear *//*_.MSTEPTESTVAR_DATA__V74*/ meltfptr[73] = 0;
/*^clear */
/*clear *//*_#__L26*/ meltfnum[25] = 0;
@@ -14069,7 +16654,7 @@ lab_endgetargs:;
/*_#IF___L25*/ meltfnum[17] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3735:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3831:/ cond");
/*cond */ if ( /*_#IF___L25*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -14080,7 +16665,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3738:/ cppif.then");
+ ("warmelt-normatch.melt:3834:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14103,7 +16688,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3738:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3834:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -14114,7 +16699,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3738:/ apply");
+ ("warmelt-normatch.melt:3834:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14126,7 +16711,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3738;
+ argtab[2].meltbp_long = 3834;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat found curteststep";
@@ -14152,7 +16737,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3738:/ clear");
+ ("warmelt-normatch.melt:3834:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/
meltfnum[27] = 0;
/*^clear */
@@ -14168,7 +16753,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3738:/ quasiblock");
+ ("warmelt-normatch.melt:3834:/ quasiblock");
/*_.PROGN___V79*/ meltfptr[77] =
@@ -14179,7 +16764,7 @@ lab_endgetargs:;
/*_.PROGN___V79*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3738:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3834:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V77*/ meltfptr[76] = 0;
@@ -14192,7 +16777,7 @@ lab_endgetargs:;
/*_.IFCPP___V76*/ meltfptr[75] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3739:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3835:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -14228,7 +16813,7 @@ lab_endgetargs:;
MELT_LOCATION
- ("warmelt-normatch.melt:3743:/ apply");
+ ("warmelt-normatch.melt:3839:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -14271,7 +16856,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3740:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3836:/ clear");
/*clear *//*_.CURPAIR__V81*/ meltfptr[77] = 0;
/*^clear */
/*clear *//*_.CURHANDLER__V82*/ meltfptr[81] = 0;
@@ -14282,7 +16867,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3744:/ cppif.then");
+ ("warmelt-normatch.melt:3840:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14305,7 +16890,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3744:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3840:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[27]) /*then */
{
/*^cond.then */
@@ -14316,7 +16901,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[25] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3744:/ apply");
+ ("warmelt-normatch.melt:3840:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14328,7 +16913,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3744;
+ argtab[2].meltbp_long = 3840;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return mflag";
@@ -14354,7 +16939,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3744:/ clear");
+ ("warmelt-normatch.melt:3840:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/
meltfnum[25] = 0;
/*^clear */
@@ -14370,7 +16955,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3744:/ quasiblock");
+ ("warmelt-normatch.melt:3840:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[85] =
@@ -14381,7 +16966,7 @@ lab_endgetargs:;
/*_.PROGN___V87*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3744:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3840:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.IF___V85*/ meltfptr[84] = 0;
@@ -14397,7 +16982,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3745:/ cppif.then");
+ ("warmelt-normatch.melt:3841:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14420,7 +17005,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3745:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3841:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -14431,7 +17016,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[27] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3745:/ apply");
+ ("warmelt-normatch.melt:3841:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14443,7 +17028,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3745;
+ argtab[2].meltbp_long = 3841;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return curteststep";
@@ -14469,7 +17054,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3745:/ clear");
+ ("warmelt-normatch.melt:3841:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/
meltfnum[27] = 0;
/*^clear */
@@ -14485,7 +17070,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3745:/ quasiblock");
+ ("warmelt-normatch.melt:3841:/ quasiblock");
/*_.PROGN___V91*/ meltfptr[89] =
@@ -14496,7 +17081,7 @@ lab_endgetargs:;
/*_.PROGN___V91*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3745:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3841:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V89*/ meltfptr[85] = 0;
@@ -14510,13 +17095,13 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3746:/ quasiblock");
+ ("warmelt-normatch.melt:3842:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.CURTESTSTEP__V73*/ meltfptr[57];;
MELT_LOCATION
- ("warmelt-normatch.melt:3746:/ putxtraresult");
+ ("warmelt-normatch.melt:3842:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -14529,7 +17114,7 @@ lab_endgetargs:;
;
/*finalret */ goto labend_rout;
MELT_LOCATION
- ("warmelt-normatch.melt:3737:/ quasiblock");
+ ("warmelt-normatch.melt:3833:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[89] =
@@ -14540,7 +17125,7 @@ lab_endgetargs:;
/*_.PROGN___V93*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3735:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3831:/ clear");
/*clear *//*_.IFCPP___V76*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.PUT_THEN_MATCH__V80*/ meltfptr[76] = 0;
@@ -14567,7 +17152,7 @@ lab_endgetargs:;
( /*_.CURTESTSTEP__V73*/
meltfptr[57]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */ meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:3747:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3843:/ cond");
/*cond */ if ( /*_#IS_A__L33*/ meltfnum[27]) /*then */
{
/*^cond.then */
@@ -14576,7 +17161,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:3748:/ compute");
+ ("warmelt-normatch.melt:3844:/ compute");
/*_.LASTSTEPTEST__V71*/ meltfptr[59] =
/*_.SETQ___V95*/ meltfptr[76] =
/*_.CURTESTSTEP__V73*/ meltfptr[57];;
@@ -14585,7 +17170,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3747:/ clear");
+ ("warmelt-normatch.melt:3843:/ clear");
/*clear *//*_.SETQ___V95*/ meltfptr[76] = 0;
}
;
@@ -14602,7 +17187,7 @@ lab_endgetargs:;
/*_.IFELSE___V94*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3735:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3831:/ clear");
/*clear *//*_#IS_A__L33*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.IFELSE___V94*/ meltfptr[75] = 0;
@@ -14614,7 +17199,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3731:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3827:/ clear");
/*clear *//*_.CURPAIR__V72*/ meltfptr[63] = 0;
/*^clear */
/*clear *//*_.CURTESTSTEP__V73*/ meltfptr[57] = 0;
@@ -14628,7 +17213,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14651,7 +17236,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -14661,7 +17246,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L35*/ meltfnum[27] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14672,7 +17257,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3751;
+ argtab[2].meltbp_long = 3847;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat laststeptest";
@@ -14694,7 +17279,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V98*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V98*/ meltfptr[85] = 0;
@@ -14707,7 +17292,7 @@ lab_endgetargs:;
/*_.IF___V97*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ quasiblock");
/*_.PROGN___V99*/ meltfptr[89] = /*_.IF___V97*/ meltfptr[84];;
@@ -14716,7 +17301,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[83] = /*_.PROGN___V99*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3751:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3847:/ clear");
/*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V97*/ meltfptr[84] = 0;
@@ -14729,7 +17314,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[83] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3752:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3848:/ quasiblock");
/*^quasiblock */
@@ -14787,7 +17372,7 @@ lab_endgetargs:;
/*_.STEPTEST__V101*/ meltfptr[75] = /*_.INST__V102*/ meltfptr[85];;
{
- MELT_LOCATION ("warmelt-normatch.melt:3759:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3855:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STEPLIST__V32*/ meltfptr[31]),
(melt_ptr_t) ( /*_.STEPTEST__V101*/
@@ -14796,7 +17381,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14819,7 +17404,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[27]) /*then */
{
/*^cond.then */
@@ -14829,7 +17414,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L37*/ meltfnum[25] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14840,7 +17425,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3760;
+ argtab[2].meltbp_long = 3856;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat made steptest";
@@ -14862,7 +17447,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V105*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V105*/ meltfptr[104] = 0;
@@ -14875,7 +17460,7 @@ lab_endgetargs:;
/*_.IF___V104*/ meltfptr[89] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ quasiblock");
/*_.PROGN___V106*/ meltfptr[104] = /*_.IF___V104*/ meltfptr[89];;
@@ -14885,7 +17470,7 @@ lab_endgetargs:;
/*_.PROGN___V106*/ meltfptr[104];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3760:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3856:/ clear");
/*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.IF___V104*/ meltfptr[89] = 0;
@@ -14898,7 +17483,7 @@ lab_endgetargs:;
/*_.IFCPP___V103*/ meltfptr[84] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3761:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3857:/ cond");
/*cond */ if ( /*_.LASTSTEPTEST__V71*/ meltfptr[59]) /*then */
{
/*^cond.then */
@@ -14906,7 +17491,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3763:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3859:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -14925,7 +17510,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14948,7 +17533,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -14958,7 +17543,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[27] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14969,7 +17554,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3764;
+ argtab[2].meltbp_long = 3860;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat updated laststeptest";
@@ -14992,7 +17577,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V111*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[27] =
0;
/*^clear */
@@ -15007,7 +17592,7 @@ lab_endgetargs:;
/*_.IF___V110*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ quasiblock");
/*_.PROGN___V112*/ meltfptr[110] =
@@ -15018,7 +17603,7 @@ lab_endgetargs:;
/*_.PROGN___V112*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3764:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3860:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V110*/ meltfptr[109] = 0;
@@ -15031,7 +17616,7 @@ lab_endgetargs:;
/*_.IFCPP___V109*/ meltfptr[108] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3762:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3858:/ quasiblock");
/*_.PROGN___V113*/ meltfptr[109] =
@@ -15042,7 +17627,7 @@ lab_endgetargs:;
/*_.PROGN___V113*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3761:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3857:/ clear");
/*clear *//*_.PUT_ELSE_MATCH__V108*/ meltfptr[104] = 0;
/*^clear */
/*clear *//*_.IFCPP___V109*/ meltfptr[108] = 0;
@@ -15071,7 +17656,7 @@ lab_endgetargs:;
melt_pair_head ( /*_.CURPAIR__V114*/ meltfptr[110]);
- MELT_LOCATION ("warmelt-normatch.melt:3768:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3864:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -15108,7 +17693,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3765:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3861:/ clear");
/*clear *//*_.CURPAIR__V114*/ meltfptr[110] = 0;
/*^clear */
/*clear *//*_.CURHANDLER__V115*/ meltfptr[104] = 0;
@@ -15118,7 +17703,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15141,7 +17726,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[27]) /*then */
{
/*^cond.then */
@@ -15151,7 +17736,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[25] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15162,7 +17747,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3769;
+ argtab[2].meltbp_long = 3865;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return mflag";
@@ -15184,7 +17769,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V119*/ meltfptr[118];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V119*/ meltfptr[118] = 0;
@@ -15197,7 +17782,7 @@ lab_endgetargs:;
/*_.IF___V118*/ meltfptr[117] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ quasiblock");
/*_.PROGN___V120*/ meltfptr[118] = /*_.IF___V118*/ meltfptr[117];;
@@ -15207,7 +17792,7 @@ lab_endgetargs:;
/*_.PROGN___V120*/ meltfptr[118];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3769:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3865:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.IF___V118*/ meltfptr[117] = 0;
@@ -15222,7 +17807,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15245,7 +17830,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -15255,7 +17840,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[27] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15266,7 +17851,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3770;
+ argtab[2].meltbp_long = 3866;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_varpat return steptest";
@@ -15288,7 +17873,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V123*/ meltfptr[122];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[27] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V123*/ meltfptr[122] = 0;
@@ -15301,7 +17886,7 @@ lab_endgetargs:;
/*_.IF___V122*/ meltfptr[118] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[122] = /*_.IF___V122*/ meltfptr[118];;
@@ -15311,7 +17896,7 @@ lab_endgetargs:;
/*_.PROGN___V124*/ meltfptr[122];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3770:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3866:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V122*/ meltfptr[118] = 0;
@@ -15324,11 +17909,11 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[117] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3771:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3867:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPTEST__V101*/ meltfptr[75];;
- MELT_LOCATION ("warmelt-normatch.melt:3771:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3867:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -15342,7 +17927,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V100*/ meltfptr[76] = /*_.RETURN___V125*/ meltfptr[118];;
- MELT_LOCATION ("warmelt-normatch.melt:3752:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3848:/ clear");
/*clear *//*_.STEPTEST__V101*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.IFCPP___V103*/ meltfptr[84] = 0;
@@ -15356,13 +17941,13 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V125*/ meltfptr[118] = 0;
/*_.LET___V70*/ meltfptr[58] = /*_.LET___V100*/ meltfptr[76];;
- MELT_LOCATION ("warmelt-normatch.melt:3729:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3825:/ clear");
/*clear *//*_.LASTSTEPTEST__V71*/ meltfptr[59] = 0;
/*^clear */
/*clear *//*_.IFCPP___V96*/ meltfptr[83] = 0;
/*^clear */
/*clear *//*_.LET___V100*/ meltfptr[76] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3727:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3823:/ quasiblock");
/*_.PROGN___V126*/ meltfptr[122] = /*_.LET___V70*/ meltfptr[58];;
@@ -15371,7 +17956,7 @@ lab_endgetargs:;
/*_.IFELSE___V50*/ meltfptr[43] = /*_.PROGN___V126*/ meltfptr[122];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3715:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3811:/ clear");
/*clear *//*_.IFCPP___V68*/ meltfptr[47] = 0;
/*^clear */
/*clear *//*_.LET___V70*/ meltfptr[58] = 0;
@@ -15383,7 +17968,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3773:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3869:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15396,7 +17981,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3773:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3869:/ cond.else");
/*^block */
/*anyblock */
@@ -15410,7 +17995,7 @@ lab_endgetargs:;
melt_assert_failed (("@$@failed translpat_varpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3773) ? (3773) : __LINE__, __FUNCTION__);
+ (3869) ? (3869) : __LINE__, __FUNCTION__);
;
}
;
@@ -15425,7 +18010,7 @@ lab_endgetargs:;
/*_.IFCPP___V127*/ meltfptr[75] = /*_.IFELSE___V128*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3773:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3869:/ clear");
/*clear *//*_.IFELSE___V128*/ meltfptr[84] = 0;
}
@@ -15438,7 +18023,7 @@ lab_endgetargs:;
/*_.LET___V25*/ meltfptr[20] = /*_.IFCPP___V127*/ meltfptr[75];;
- MELT_LOCATION ("warmelt-normatch.melt:3696:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3792:/ clear");
/*clear *//*_.LOCA_LOCATION__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.SLOC__V27*/ meltfptr[26] = 0;
@@ -15472,11 +18057,11 @@ lab_endgetargs:;
/*clear *//*_.IFELSE___V50*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.IFCPP___V127*/ meltfptr[75] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -15507,14 +18092,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT */
+} /*end meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -15535,7 +18120,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT_st
+ struct frame_meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -15574,7 +18159,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -15626,7 +18211,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15649,7 +18234,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15659,7 +18244,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15669,7 +18254,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3782;
+ argtab[2].meltbp_long = 3878;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat recv";
/*^apply.arg */
@@ -15688,7 +18273,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -15701,7 +18286,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -15710,7 +18295,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3782:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3878:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -15725,7 +18310,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3783:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3879:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15734,7 +18319,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_AND */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3783:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3879:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15742,7 +18327,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3783:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3879:/ cond.else");
/*^block */
/*anyblock */
@@ -15756,7 +18341,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3783) ? (3783) : __LINE__, __FUNCTION__);
+ (3879) ? (3879) : __LINE__, __FUNCTION__);
;
}
;
@@ -15771,7 +18356,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3783:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3879:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -15784,7 +18369,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15807,7 +18392,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15817,7 +18402,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15827,7 +18412,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3784;
+ argtab[2].meltbp_long = 3880;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat mdata";
/*^apply.arg */
@@ -15847,7 +18432,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -15860,7 +18445,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -15869,7 +18454,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3784:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3880:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -15884,7 +18469,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3785:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3881:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15893,7 +18478,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3785:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3881:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15901,7 +18486,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3785:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3881:/ cond.else");
/*^block */
/*anyblock */
@@ -15915,7 +18500,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3785) ? (3785) : __LINE__, __FUNCTION__);
+ (3881) ? (3881) : __LINE__, __FUNCTION__);
;
}
;
@@ -15930,7 +18515,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3785:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3881:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -15943,7 +18528,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15966,7 +18551,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15976,7 +18561,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15986,7 +18571,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3786;
+ argtab[2].meltbp_long = 3882;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat mcase";
/*^apply.arg */
@@ -16006,7 +18591,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -16019,7 +18604,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -16028,7 +18613,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3786:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3882:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -16043,7 +18628,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3787:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3883:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16052,7 +18637,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3787:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3883:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16060,7 +18645,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3787:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3883:/ cond.else");
/*^block */
/*anyblock */
@@ -16074,7 +18659,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3787) ? (3787) : __LINE__, __FUNCTION__);
+ (3883) ? (3883) : __LINE__, __FUNCTION__);
;
}
;
@@ -16089,7 +18674,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3787:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3883:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -16100,10 +18685,10 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3788:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3884:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3789:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3885:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -16119,12 +18704,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3789:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3885:/ cond.else");
/*_.SLOC__V27*/ meltfptr[26] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3790:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3886:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ANDPAT_CONJ");
@@ -16151,7 +18736,7 @@ lab_endgetargs:;
/*_.FLAGLIST__V33*/ meltfptr[32] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));;
- MELT_LOCATION ("warmelt-normatch.melt:3796:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3892:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -16159,7 +18744,7 @@ lab_endgetargs:;
meltfptr[33] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3797:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3893:/ quasiblock");
/*^rawallocobj */
@@ -16218,7 +18803,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "MSTGROUP_ELSE");
;
/*_.STEPGROUP__V35*/ meltfptr[34] = /*_.INST__V36*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:3804:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3900:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -16236,7 +18821,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3805:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3901:/ quasiblock");
/*^rawallocobj */
@@ -16279,7 +18864,7 @@ lab_endgetargs:;
/*_.FLAGSTEP__V38*/ meltfptr[37] = /*_.INST__V39*/ meltfptr[38];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3811:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3907:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16287,7 +18872,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L10*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SCONJ__V28*/ meltfptr[27])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:3811:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3907:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16295,7 +18880,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3811:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3907:/ cond.else");
/*^block */
/*anyblock */
@@ -16309,7 +18894,7 @@ lab_endgetargs:;
melt_assert_failed (("check sconj"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3811) ? (3811) : __LINE__, __FUNCTION__);
+ (3907) ? (3907) : __LINE__, __FUNCTION__);
;
}
;
@@ -16324,7 +18909,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.IFELSE___V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3811:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3907:/ clear");
/*clear *//*_#IS_MULTIPLE__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V41*/ meltfptr[40] = 0;
@@ -16337,7 +18922,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16360,7 +18945,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16370,7 +18955,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16381,7 +18966,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3812;
+ argtab[2].meltbp_long = 3908;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat flagstep";
/*^apply.arg */
@@ -16401,7 +18986,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -16414,7 +18999,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[42] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];;
@@ -16423,7 +19008,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[40] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3812:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3908:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[42] = 0;
@@ -16436,8 +19021,14 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[40] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3813:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MFLAG__V37*/ meltfptr[36]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[9])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3909:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MFLAG__V37*/ meltfptr[36]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -16480,7 +19071,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16503,7 +19094,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16513,7 +19104,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16524,7 +19115,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3817;
+ argtab[2].meltbp_long = 3913;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat curconj";
/*^apply.arg */
@@ -16545,7 +19136,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -16558,7 +19149,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];;
@@ -16567,7 +19158,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3817:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3913:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[47] = 0;
@@ -16580,7 +19171,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3818:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3914:/ quasiblock");
/*^multimsend */
@@ -16613,7 +19204,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16636,7 +19227,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -16646,7 +19237,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16657,7 +19248,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3821;
+ argtab[2].meltbp_long = 3917;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat conjstep";
/*^apply.arg */
@@ -16678,7 +19269,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V55*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V55*/ meltfptr[54] = 0;
@@ -16691,7 +19282,7 @@ lab_endgetargs:;
/*_.IF___V54*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ quasiblock");
/*_.PROGN___V56*/ meltfptr[54] = /*_.IF___V54*/ meltfptr[53];;
@@ -16700,7 +19291,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[52] = /*_.PROGN___V56*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3821:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3917:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V54*/ meltfptr[53] = 0;
@@ -16715,7 +19306,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16738,7 +19329,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16748,7 +19339,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16759,7 +19350,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3822;
+ argtab[2].meltbp_long = 3918;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat conjflag";
/*^apply.arg */
@@ -16780,7 +19371,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V59*/ meltfptr[58];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V59*/ meltfptr[58] = 0;
@@ -16793,7 +19384,7 @@ lab_endgetargs:;
/*_.IF___V58*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ quasiblock");
/*_.PROGN___V60*/ meltfptr[58] = /*_.IF___V58*/ meltfptr[54];;
@@ -16802,7 +19393,7 @@ lab_endgetargs:;
/*_.IFCPP___V57*/ meltfptr[53] = /*_.PROGN___V60*/ meltfptr[58];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3822:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3918:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V58*/ meltfptr[54] = 0;
@@ -16815,7 +19406,7 @@ lab_endgetargs:;
/*_.IFCPP___V57*/ meltfptr[53] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3823:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3919:/ cond");
/*cond */ if ( /*_.CONJSTEP__V51*/ meltfptr[47]) /*then */
{
/*^cond.then */
@@ -16825,7 +19416,7 @@ lab_endgetargs:;
/*_#NULL__L20*/ meltfnum[14] =
(( /*_.CURSTEP__V29*/ meltfptr[28]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3825:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3921:/ cond");
/*cond */ if ( /*_#NULL__L20*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -16833,14 +19424,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3827:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3923:/ compute");
/*_.FIRSTSTEP__V30*/ meltfptr[29] =
/*_.SETQ___V63*/ meltfptr[62] =
/*_.CONJSTEP__V51*/ meltfptr[47];;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3828:/ cppif.then");
+ ("warmelt-normatch.melt:3924:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16863,7 +19454,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3828:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3924:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16874,7 +19465,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3828:/ apply");
+ ("warmelt-normatch.melt:3924:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16886,7 +19477,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3828;
+ argtab[2].meltbp_long = 3924;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_andpat firststep";
@@ -16912,7 +19503,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3828:/ clear");
+ ("warmelt-normatch.melt:3924:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/
meltfnum[21] = 0;
/*^clear */
@@ -16928,7 +19519,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3828:/ quasiblock");
+ ("warmelt-normatch.melt:3924:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[65] =
@@ -16939,7 +19530,7 @@ lab_endgetargs:;
/*_.PROGN___V67*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3828:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3924:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[64] = 0;
@@ -16954,7 +19545,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3829:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3925:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.THENLIST__V31*/
meltfptr[30]),
@@ -16962,12 +19553,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3826:/ quasiblock");
+ ("warmelt-normatch.melt:3922:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3825:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3921:/ clear");
/*clear *//*_.SETQ___V63*/ meltfptr[62] = 0;
/*^clear */
/*clear *//*_.IFCPP___V64*/ meltfptr[63] = 0;
@@ -16984,7 +19575,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3832:/ cppif.then");
+ ("warmelt-normatch.melt:3928:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17007,7 +19598,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3832:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3928:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -17018,7 +19609,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[1] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3832:/ apply");
+ ("warmelt-normatch.melt:3928:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17030,7 +19621,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3832;
+ argtab[2].meltbp_long = 3928;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_andpat curstep";
@@ -17056,7 +19647,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3832:/ clear");
+ ("warmelt-normatch.melt:3928:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/
meltfnum[1] = 0;
/*^clear */
@@ -17072,7 +19663,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3832:/ quasiblock");
+ ("warmelt-normatch.melt:3928:/ quasiblock");
/*_.PROGN___V71*/ meltfptr[63] =
@@ -17083,7 +19674,7 @@ lab_endgetargs:;
/*_.PROGN___V71*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3832:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3928:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.IF___V69*/ meltfptr[65] = 0;
@@ -17096,7 +19687,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3833:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3929:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17114,7 +19705,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3831:/ quasiblock");
+ ("warmelt-normatch.melt:3927:/ quasiblock");
/*_.PROGN___V73*/ meltfptr[65] =
@@ -17125,7 +19716,7 @@ lab_endgetargs:;
/*_.PROGN___V73*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3825:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3921:/ clear");
/*clear *//*_.IFCPP___V68*/ meltfptr[64] = 0;
/*^clear */
/*clear *//*_.PUT_THEN_MATCH__V72*/ meltfptr[62] = 0;
@@ -17137,18 +19728,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3836:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3932:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.ELSELIST__V32*/ meltfptr[31]),
(melt_ptr_t) ( /*_.CONJSTEP__V51*/
meltfptr[47]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3837:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:3933:/ compute");
/*_.CURSTEP__V29*/ meltfptr[28] =
/*_.SETQ___V74*/ meltfptr[63] =
/*_.CONJSTEP__V51*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-normatch.melt:3824:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3920:/ quasiblock");
/*_.PROGN___V75*/ meltfptr[64] =
@@ -17158,7 +19749,7 @@ lab_endgetargs:;
/*_.IF___V61*/ meltfptr[54] = /*_.PROGN___V75*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3823:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3919:/ clear");
/*clear *//*_#NULL__L20*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IFELSE___V62*/ meltfptr[58] = 0;
@@ -17175,7 +19766,7 @@ lab_endgetargs:;
/*_.IF___V61*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3840:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3936:/ cond");
/*cond */ if ( /*_.CONJFLAG__V52*/ meltfptr[48]) /*then */
{
/*^cond.then */
@@ -17185,7 +19776,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3842:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3938:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17194,7 +19785,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CONJFLAG__V52*/ meltfptr[48]),
(melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:3842:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3938:/ cond");
/*cond */ if ( /*_#IS_A__L25*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17203,7 +19794,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:3842:/ cond.else");
+ ("warmelt-normatch.melt:3938:/ cond.else");
/*^block */
/*anyblock */
@@ -17218,7 +19809,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (3842) ? (3842) : __LINE__,
+ (3938) ? (3938) : __LINE__,
__FUNCTION__);
;
}
@@ -17235,7 +19826,7 @@ lab_endgetargs:;
/*_.IFELSE___V77*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3842:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3938:/ clear");
/*clear *//*_#IS_A__L25*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V77*/ meltfptr[65] = 0;
@@ -17248,26 +19839,26 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3843:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3939:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.FLAGLIST__V33*/ meltfptr[32]),
(melt_ptr_t) ( /*_.CONJFLAG__V52*/
meltfptr[48]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3841:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3937:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3840:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3936:/ clear");
/*clear *//*_.IFCPP___V76*/ meltfptr[62] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3818:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3914:/ clear");
/*clear *//*_.IFCPP___V53*/ meltfptr[52] = 0;
/*^clear */
/*clear *//*_.IFCPP___V57*/ meltfptr[53] = 0;
@@ -17282,7 +19873,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3814:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3910:/ clear");
/*clear *//*_.CURCONJ__V46*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_#CONJIX__L13*/ meltfnum[0] = 0;
@@ -17290,7 +19881,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:3847:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3943:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17306,7 +19897,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3848:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3944:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17322,7 +19913,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3845:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3941:/ quasiblock");
/*^putslot */
@@ -17361,7 +19952,7 @@ lab_endgetargs:;
/*_#NULL__L26*/ meltfnum[21] =
(( /*_.FIRSTSTEP__V30*/ meltfptr[29]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3849:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3945:/ cond");
/*cond */ if ( /*_#NULL__L26*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -17371,20 +19962,20 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:3851:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:3947:/ locexp");
melt_warning_str (0, (melt_ptr_t) ( /*_.SLOC__V27*/ meltfptr[26]),
("degenerate ?(AND ...) pattern"),
(melt_ptr_t) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3852:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3948:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:3852:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3948:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:3849:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3945:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[62] = /*_.RETURN___V81*/ meltfptr[65];;
@@ -17393,7 +19984,7 @@ lab_endgetargs:;
/*_.IFELSE___V80*/ meltfptr[64] = /*_.PROGN___V82*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3849:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3945:/ clear");
/*clear *//*_.RETURN___V81*/ meltfptr[65] = 0;
/*^clear */
/*clear *//*_.PROGN___V82*/ meltfptr[62] = 0;
@@ -17406,7 +19997,7 @@ lab_endgetargs:;
/*_.IFELSE___V80*/ meltfptr[64] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3855:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3951:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -17423,7 +20014,12 @@ lab_endgetargs:;
}
;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLAGSTEP__V38*/ meltfptr[37]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLAGSTEP__V38*/ meltfptr[37]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -17449,7 +20045,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3856:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:3952:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -17466,7 +20062,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17489,7 +20085,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -17499,7 +20095,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17510,7 +20106,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3857;
+ argtab[2].meltbp_long = 3953;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_andpat return stepgroup";
/*^apply.arg */
@@ -17530,7 +20126,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V87*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V87*/ meltfptr[48] = 0;
@@ -17543,7 +20139,7 @@ lab_endgetargs:;
/*_.IF___V86*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ quasiblock");
/*_.PROGN___V88*/ meltfptr[65] = /*_.IF___V86*/ meltfptr[47];;
@@ -17552,7 +20148,7 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[54] = /*_.PROGN___V88*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3857:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3953:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V86*/ meltfptr[47] = 0;
@@ -17565,11 +20161,11 @@ lab_endgetargs:;
/*_.IFCPP___V85*/ meltfptr[54] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3858:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3954:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPGROUP__V35*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:3858:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:3954:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -17583,7 +20179,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V25*/ meltfptr[20] = /*_.RETURN___V89*/ meltfptr[62];;
- MELT_LOCATION ("warmelt-normatch.melt:3788:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3884:/ clear");
/*clear *//*_.LOCA_LOCATION__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.SLOC__V27*/ meltfptr[26] = 0;
@@ -17627,11 +20223,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V85*/ meltfptr[54] = 0;
/*^clear */
/*clear *//*_.RETURN___V89*/ meltfptr[62] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -17662,14 +20258,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT */
+} /*end meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -17690,7 +20286,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT_st
+ struct frame_meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -17729,7 +20325,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -17781,7 +20377,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17804,7 +20400,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17814,7 +20410,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17824,7 +20420,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3866;
+ argtab[2].meltbp_long = 3962;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat recv";
/*^apply.arg */
@@ -17843,7 +20439,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -17856,7 +20452,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -17865,7 +20461,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3866:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3962:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -17880,7 +20476,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3867:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3963:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17889,7 +20485,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_OR */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3867:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3963:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17897,7 +20493,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3867:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3963:/ cond.else");
/*^block */
/*anyblock */
@@ -17911,7 +20507,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3867) ? (3867) : __LINE__, __FUNCTION__);
+ (3963) ? (3963) : __LINE__, __FUNCTION__);
;
}
;
@@ -17926,7 +20522,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3867:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3963:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -17939,7 +20535,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17962,7 +20558,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17972,7 +20568,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17982,7 +20578,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3868;
+ argtab[2].meltbp_long = 3964;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat mdata";
/*^apply.arg */
@@ -18002,7 +20598,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -18015,7 +20611,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -18024,7 +20620,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3868:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3964:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -18039,7 +20635,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3869:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3965:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18048,7 +20644,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3869:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3965:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18056,7 +20652,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3869:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3965:/ cond.else");
/*^block */
/*anyblock */
@@ -18070,7 +20666,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3869) ? (3869) : __LINE__, __FUNCTION__);
+ (3965) ? (3965) : __LINE__, __FUNCTION__);
;
}
;
@@ -18085,7 +20681,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3869:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3965:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -18098,7 +20694,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18121,7 +20717,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18131,7 +20727,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18141,7 +20737,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3870;
+ argtab[2].meltbp_long = 3966;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat mcase";
/*^apply.arg */
@@ -18161,7 +20757,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -18174,7 +20770,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -18183,7 +20779,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3870:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3966:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -18198,7 +20794,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3871:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3967:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18207,7 +20803,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3871:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3967:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18215,7 +20811,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3871:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3967:/ cond.else");
/*^block */
/*anyblock */
@@ -18229,7 +20825,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3871) ? (3871) : __LINE__, __FUNCTION__);
+ (3967) ? (3967) : __LINE__, __FUNCTION__);
;
}
;
@@ -18244,7 +20840,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3871:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3967:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -18255,14 +20851,14 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3872:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3968:/ quasiblock");
/*_.FIRSTSTEP__V26*/ meltfptr[25] = ( /*nil */ NULL);;
/*^compute */
/*_.PREVSTEP__V27*/ meltfptr[26] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3875:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3971:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -18278,12 +20874,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3875:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3971:/ cond.else");
/*_.SLOC__V29*/ meltfptr[28] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3876:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3972:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "ORPAT_DISJ");
@@ -18291,7 +20887,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3877:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:3973:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -18299,8 +20895,13 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3878:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCTXT__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:3974:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCTXT__V31*/ meltfptr[30]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18318,7 +20919,7 @@ lab_endgetargs:;
/*_.MHANDLERS__V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3879:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3975:/ quasiblock");
/*^rawallocobj */
@@ -18377,7 +20978,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "MSTGROUP_ELSE");
;
/*_.STEPGROUP__V33*/ meltfptr[32] = /*_.INST__V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-normatch.melt:3886:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3982:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -18395,7 +20996,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3887:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3983:/ quasiblock");
/*^rawallocobj */
@@ -18448,7 +21049,7 @@ lab_endgetargs:;
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[9]))));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18471,7 +21072,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18481,7 +21082,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18492,7 +21093,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3895;
+ argtab[2].meltbp_long = 3991;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat flagstep";
/*^apply.arg */
@@ -18512,7 +21113,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0;
@@ -18525,7 +21126,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];;
@@ -18534,7 +21135,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3895:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3991:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -18549,7 +21150,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3896:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3992:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18557,7 +21158,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L12*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.SDISJ__V30*/ meltfptr[29])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:3896:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3992:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18565,7 +21166,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3896:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:3992:/ cond.else");
/*^block */
/*anyblock */
@@ -18579,7 +21180,7 @@ lab_endgetargs:;
melt_assert_failed (("check sdisj"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3896) ? (3896) : __LINE__, __FUNCTION__);
+ (3992) ? (3992) : __LINE__, __FUNCTION__);
;
}
;
@@ -18594,7 +21195,7 @@ lab_endgetargs:;
/*_.IFCPP___V44*/ meltfptr[40] = /*_.IFELSE___V45*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3896:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3992:/ clear");
/*clear *//*_#IS_MULTIPLE__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V45*/ meltfptr[41] = 0;
@@ -18623,7 +21224,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18646,7 +21247,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18656,7 +21257,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18667,7 +21268,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3900;
+ argtab[2].meltbp_long = 3996;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat curdisj";
/*^apply.arg */
@@ -18688,7 +21289,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -18701,7 +21302,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[47] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];;
@@ -18710,7 +21311,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[46] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3900:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3996:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[47] = 0;
@@ -18723,14 +21324,14 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[46] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3901:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3997:/ quasiblock");
/*_.NEWVARMAP__V52*/ meltfptr[48] =
(meltgc_new_mapobjects
((meltobject_ptr_t)
(( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[10])), (11)));;
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ quasiblock");
/*^newclosure */
@@ -18760,7 +21361,7 @@ lab_endgetargs:;
/*_.LAMBDA___V54*/ meltfptr[53];;
{
- MELT_LOCATION ("warmelt-normatch.melt:3918:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4014:/ locexp");
meltgc_prepend_list ((melt_ptr_t)
( /*_.MHANDLERS__V32*/ meltfptr[31]),
(melt_ptr_t) ( /*_.VARHANDLER__V53*/
@@ -18769,7 +21370,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18792,7 +21393,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -18802,7 +21403,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18813,7 +21414,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3919;
+ argtab[2].meltbp_long = 4015;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat curdisj before translate_pattern";
@@ -18835,7 +21436,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
@@ -18848,7 +21449,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];;
@@ -18857,7 +21458,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[54] = /*_.PROGN___V58*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3919:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4015:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[55] = 0;
@@ -18870,7 +21471,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[54] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3920:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4016:/ quasiblock");
/*^multimsend */
@@ -18903,7 +21504,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18926,7 +21527,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18936,7 +21537,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[14] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18947,7 +21548,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3923;
+ argtab[2].meltbp_long = 4019;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat disjstep";
/*^apply.arg */
@@ -18968,7 +21569,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0;
@@ -18981,7 +21582,7 @@ lab_endgetargs:;
/*_.IF___V62*/ meltfptr[61] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[61];;
@@ -18990,7 +21591,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[60] = /*_.PROGN___V64*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4019:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V62*/ meltfptr[61] = 0;
@@ -19005,7 +21606,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19028,7 +21629,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -19038,7 +21639,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19049,7 +21650,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3924;
+ argtab[2].meltbp_long = 4020;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat disjflag";
/*^apply.arg */
@@ -19070,7 +21671,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V67*/ meltfptr[66];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[66] = 0;
@@ -19083,7 +21684,7 @@ lab_endgetargs:;
/*_.IF___V66*/ meltfptr[62] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[66] = /*_.IF___V66*/ meltfptr[62];;
@@ -19092,7 +21693,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[61] = /*_.PROGN___V68*/ meltfptr[66];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3924:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4020:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V66*/ meltfptr[62] = 0;
@@ -19105,7 +21706,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[61] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3925:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4021:/ cond");
/*cond */ if ( /*_.DISJFLAG__V60*/ meltfptr[56]) /*then */
{
/*^cond.then */
@@ -19115,7 +21716,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:3926:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4022:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.FLAGLIST__V38*/ meltfptr[37]),
(melt_ptr_t) ( /*_.DISJFLAG__V60*/
@@ -19127,7 +21728,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3927:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4023:/ cond");
/*cond */ if ( /*_.DISJSTEP__V59*/ meltfptr[55]) /*then */
{
/*^cond.then */
@@ -19139,7 +21740,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.PREVSTEP__V27*/ meltfptr[26]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_CLEAR */ meltfrout->tabval[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:3930:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4026:/ cond");
/*cond */ if ( /*_#IS_A__L22*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -19150,7 +21751,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3931:/ cppif.then");
+ ("warmelt-normatch.melt:4027:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19173,7 +21774,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3931:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4027:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -19184,7 +21785,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[23] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3931:/ apply");
+ ("warmelt-normatch.melt:4027:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19196,7 +21797,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3931;
+ argtab[2].meltbp_long = 4027;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat prevstep clear so putthen";
@@ -19222,7 +21823,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3931:/ clear");
+ ("warmelt-normatch.melt:4027:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/
meltfnum[23] = 0;
/*^clear */
@@ -19238,7 +21839,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3931:/ quasiblock");
+ ("warmelt-normatch.melt:4027:/ quasiblock");
/*_.PROGN___V73*/ meltfptr[71] =
@@ -19249,7 +21850,7 @@ lab_endgetargs:;
/*_.PROGN___V73*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3931:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4027:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V71*/ meltfptr[70] = 0;
@@ -19262,7 +21863,7 @@ lab_endgetargs:;
/*_.IFCPP___V70*/ meltfptr[66] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3932:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4028:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19280,7 +21881,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3930:/ quasiblock");
+ ("warmelt-normatch.melt:4026:/ quasiblock");
/*_.PROGN___V75*/ meltfptr[71] =
@@ -19291,7 +21892,7 @@ lab_endgetargs:;
/*_.PROGN___V75*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3930:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4026:/ clear");
/*clear *//*_.IFCPP___V70*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_.PUT_THEN_MATCH__V74*/ meltfptr[70] = 0;
@@ -19307,7 +21908,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3933:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4029:/ cond");
/*cond */ if ( /*_.PREVSTEP__V27*/ meltfptr[26]) /*then */
{
/*^cond.then */
@@ -19318,7 +21919,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ cppif.then");
+ ("warmelt-normatch.melt:4030:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19343,7 +21944,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ cond");
+ ("warmelt-normatch.melt:4030:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -19355,7 +21956,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ apply");
+ ("warmelt-normatch.melt:4030:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19368,7 +21969,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3934;
+ argtab[2].meltbp_long = 4030;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat prevstep notnull so putelse";
@@ -19396,7 +21997,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ clear");
+ ("warmelt-normatch.melt:4030:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/
meltfnum[14] = 0;
/*^clear */
@@ -19412,7 +22013,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ quasiblock");
+ ("warmelt-normatch.melt:4030:/ quasiblock");
/*_.PROGN___V80*/ meltfptr[78] =
@@ -19424,7 +22025,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3934:/ clear");
+ ("warmelt-normatch.melt:4030:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[23]
= 0;
/*^clear */
@@ -19439,7 +22040,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3935:/ msend");
+ ("warmelt-normatch.melt:4031:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19456,7 +22057,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3933:/ quasiblock");
+ ("warmelt-normatch.melt:4029:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[78] =
@@ -19468,7 +22069,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3933:/ clear");
+ ("warmelt-normatch.melt:4029:/ clear");
/*clear *//*_.IFCPP___V77*/ meltfptr[70] = 0;
/*^clear */
/*clear *//*_.PUT_ELSE_MATCH__V81*/ meltfptr[71] =
@@ -19490,7 +22091,7 @@ lab_endgetargs:;
/*_.IFELSE___V76*/ meltfptr[66];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3930:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4026:/ clear");
/*clear *//*_.IFELSE___V76*/ meltfptr[66] = 0;
}
;
@@ -19504,7 +22105,7 @@ lab_endgetargs:;
/*_#I__L28*/ meltfnum[23] =
(( /*_#MAPOBJECT_COUNT__L27*/ meltfnum[14]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:3936:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4032:/ cond");
/*cond */ if ( /*_#I__L28*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -19513,10 +22114,10 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:3937:/ quasiblock");
+ ("warmelt-normatch.melt:4033:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3938:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4034:/ apply");
/*apply */
{
/*_.SORTEDSYMBS__V85*/ meltfptr[78] =
@@ -19525,7 +22126,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3942:/ quasiblock");
+ ("warmelt-normatch.melt:4038:/ quasiblock");
/*^newclosure */
@@ -19554,7 +22155,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V86*/ meltfptr[66] =
/*_.LAMBDA___V87*/ meltfptr[86];;
- MELT_LOCATION ("warmelt-normatch.melt:3940:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4036:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -19572,8 +22173,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3946:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISJSTEP__V59*/ meltfptr[55]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[22])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4042:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISJSTEP__V59*/ meltfptr[55]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19592,7 +22198,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3945:/ quasiblock");
+ ("warmelt-normatch.melt:4041:/ quasiblock");
/*^rawallocobj */
@@ -19646,7 +22252,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3952:/ cppif.then");
+ ("warmelt-normatch.melt:4048:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19669,7 +22275,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3952:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4048:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -19680,7 +22286,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3952:/ apply");
+ ("warmelt-normatch.melt:4048:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19692,7 +22298,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3952;
+ argtab[2].meltbp_long = 4048;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat erasestep";
@@ -19718,7 +22324,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3952:/ clear");
+ ("warmelt-normatch.melt:4048:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/
meltfnum[29] = 0;
/*^clear */
@@ -19734,7 +22340,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3952:/ quasiblock");
+ ("warmelt-normatch.melt:4048:/ quasiblock");
/*_.PROGN___V95*/ meltfptr[93] =
@@ -19745,7 +22351,7 @@ lab_endgetargs:;
/*_.PROGN___V95*/ meltfptr[93];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3952:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4048:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V93*/ meltfptr[92] = 0;
@@ -19758,7 +22364,7 @@ lab_endgetargs:;
/*_.IFCPP___V92*/ meltfptr[91] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3953:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4049:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -19775,14 +22381,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3954:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4050:/ compute");
/*_.PREVSTEP__V27*/ meltfptr[26] =
/*_.SETQ___V97*/ meltfptr[93] =
/*_.ERASESTEP__V90*/ meltfptr[89];;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3955:/ cppif.then");
+ ("warmelt-normatch.melt:4051:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19805,7 +22411,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3955:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4051:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -19816,7 +22422,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3955:/ apply");
+ ("warmelt-normatch.melt:4051:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19828,7 +22434,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3955;
+ argtab[2].meltbp_long = 4051;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat prevstep is erasestep";
@@ -19854,7 +22460,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3955:/ clear");
+ ("warmelt-normatch.melt:4051:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/
meltfnum[28] = 0;
/*^clear */
@@ -19870,7 +22476,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3955:/ quasiblock");
+ ("warmelt-normatch.melt:4051:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] =
@@ -19881,7 +22487,7 @@ lab_endgetargs:;
/*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3955:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4051:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[98] = 0;
@@ -19899,7 +22505,7 @@ lab_endgetargs:;
/*_.LET___V84*/ meltfptr[71] =
/*_.IFCPP___V98*/ meltfptr[97];;
- MELT_LOCATION ("warmelt-normatch.melt:3937:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4033:/ clear");
/*clear *//*_.SORTEDSYMBS__V85*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.LAMBDA___V86*/ meltfptr[66] = 0;
@@ -19921,7 +22527,7 @@ lab_endgetargs:;
/*_.LET___V84*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3936:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4032:/ clear");
/*clear *//*_.LET___V84*/ meltfptr[71] = 0;
}
;
@@ -19933,14 +22539,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3958:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4054:/ compute");
/*_.PREVSTEP__V27*/ meltfptr[26] =
/*_.SETQ___V102*/ meltfptr[98] =
/*_.DISJSTEP__V59*/ meltfptr[55];;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:3959:/ cppif.then");
+ ("warmelt-normatch.melt:4055:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19963,7 +22569,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3959:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4055:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -19974,7 +22580,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[29] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:3959:/ apply");
+ ("warmelt-normatch.melt:4055:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19986,7 +22592,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3959;
+ argtab[2].meltbp_long = 4055;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat prevstep is disjstep";
@@ -20012,7 +22618,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:3959:/ clear");
+ ("warmelt-normatch.melt:4055:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/
meltfnum[29] = 0;
/*^clear */
@@ -20028,7 +22634,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:3959:/ quasiblock");
+ ("warmelt-normatch.melt:4055:/ quasiblock");
/*_.PROGN___V106*/ meltfptr[87] =
@@ -20039,7 +22645,7 @@ lab_endgetargs:;
/*_.PROGN___V106*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3959:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4055:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V104*/ meltfptr[78] = 0;
@@ -20053,7 +22659,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:3957:/ quasiblock");
+ ("warmelt-normatch.melt:4053:/ quasiblock");
/*_.PROGN___V107*/ meltfptr[88] =
@@ -20064,7 +22670,7 @@ lab_endgetargs:;
/*_.PROGN___V107*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3936:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4032:/ clear");
/*clear *//*_.SETQ___V102*/ meltfptr[98] = 0;
/*^clear */
/*clear *//*_.IFCPP___V103*/ meltfptr[99] = 0;
@@ -20076,19 +22682,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3961:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4057:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.STEPLIST__V39*/ meltfptr[38]),
(melt_ptr_t) ( /*_.DISJSTEP__V59*/
meltfptr[55]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3928:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4024:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3927:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4023:/ clear");
/*clear *//*_#IS_A__L22*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V69*/ meltfptr[62] = 0;
@@ -20103,7 +22709,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:3920:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4016:/ clear");
/*clear *//*_.IFCPP___V61*/ meltfptr[60] = 0;
/*^clear */
/*clear *//*_.IFCPP___V65*/ meltfptr[61] = 0;
@@ -20112,7 +22718,7 @@ lab_endgetargs:;
/*clear *//*_.DISJFLAG__V60*/ meltfptr[56] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20135,7 +22741,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -20145,7 +22751,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20156,7 +22762,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3964;
+ argtab[2].meltbp_long = 4060;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat newvarmap";
/*^apply.arg */
@@ -20177,7 +22783,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V110*/ meltfptr[92];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V110*/ meltfptr[92] = 0;
@@ -20190,7 +22796,7 @@ lab_endgetargs:;
/*_.IF___V109*/ meltfptr[91] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ quasiblock");
/*_.PROGN___V111*/ meltfptr[93] = /*_.IF___V109*/ meltfptr[91];;
@@ -20200,7 +22806,7 @@ lab_endgetargs:;
/*_.PROGN___V111*/ meltfptr[93];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3964:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4060:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V109*/ meltfptr[91] = 0;
@@ -20213,7 +22819,7 @@ lab_endgetargs:;
/*_.IFCPP___V108*/ meltfptr[89] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3965:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4061:/ quasiblock");
/*_.OLDVARHDLER__V113*/ meltfptr[71] =
@@ -20221,7 +22827,7 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.MHANDLERS__V32*/ meltfptr[31])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3967:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4063:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20229,7 +22835,7 @@ lab_endgetargs:;
/*_#__L37*/ meltfnum[1] =
(( /*_.OLDVARHDLER__V113*/ meltfptr[71]) ==
( /*_.VARHANDLER__V53*/ meltfptr[52]));;
- MELT_LOCATION ("warmelt-normatch.melt:3967:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4063:/ cond");
/*cond */ if ( /*_#__L37*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20237,7 +22843,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3967:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4063:/ cond.else");
/*^block */
/*anyblock */
@@ -20251,7 +22857,7 @@ lab_endgetargs:;
melt_assert_failed (("check oldvarhdler"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (3967) ? (3967) : __LINE__,
+ __FILE__, (4063) ? (4063) : __LINE__,
__FUNCTION__);
;
}
@@ -20268,7 +22874,7 @@ lab_endgetargs:;
/*_.IFELSE___V115*/ meltfptr[78];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3967:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4063:/ clear");
/*clear *//*_#__L37*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V115*/ meltfptr[78] = 0;
@@ -20283,13 +22889,13 @@ lab_endgetargs:;
/*_.LET___V112*/ meltfptr[97] = /*_.IFCPP___V114*/ meltfptr[66];;
- MELT_LOCATION ("warmelt-normatch.melt:3965:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4061:/ clear");
/*clear *//*_.OLDVARHDLER__V113*/ meltfptr[71] = 0;
/*^clear */
/*clear *//*_.IFCPP___V114*/ meltfptr[66] = 0;
/*_.LET___V51*/ meltfptr[47] = /*_.LET___V112*/ meltfptr[97];;
- MELT_LOCATION ("warmelt-normatch.melt:3901:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3997:/ clear");
/*clear *//*_.NEWVARMAP__V52*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.VARHANDLER__V53*/ meltfptr[52] = 0;
@@ -20305,7 +22911,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:3897:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3993:/ clear");
/*clear *//*_.CURDISJ__V46*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_#DISJIX__L13*/ meltfnum[0] = 0;
@@ -20317,7 +22923,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20340,7 +22946,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -20350,7 +22956,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20361,7 +22967,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3970;
+ argtab[2].meltbp_long = 4066;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat final steplist";
/*^apply.arg */
@@ -20381,7 +22987,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V118*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V118*/ meltfptr[99] = 0;
@@ -20394,7 +23000,7 @@ lab_endgetargs:;
/*_.IF___V117*/ meltfptr[98] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ quasiblock");
/*_.PROGN___V119*/ meltfptr[88] = /*_.IF___V117*/ meltfptr[98];;
@@ -20403,7 +23009,7 @@ lab_endgetargs:;
/*_.IFCPP___V116*/ meltfptr[87] = /*_.PROGN___V119*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3970:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4066:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V117*/ meltfptr[98] = 0;
@@ -20416,7 +23022,7 @@ lab_endgetargs:;
/*_.IFCPP___V116*/ meltfptr[87] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3973:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4069:/ apply");
/*apply */
{
/*_.LIST_TO_MULTIPLE__V120*/ meltfptr[62] =
@@ -20426,8 +23032,13 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3971:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEPGROUP__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4067:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEPGROUP__V33*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -20476,7 +23087,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20499,7 +23110,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -20509,7 +23120,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20520,7 +23131,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3976;
+ argtab[2].meltbp_long = 4072;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat final flaglist";
/*^apply.arg */
@@ -20540,7 +23151,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V123*/ meltfptr[61];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V123*/ meltfptr[61] = 0;
@@ -20553,7 +23164,7 @@ lab_endgetargs:;
/*_.IF___V122*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ quasiblock");
/*_.PROGN___V124*/ meltfptr[55] = /*_.IF___V122*/ meltfptr[60];;
@@ -20562,7 +23173,7 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[70] = /*_.PROGN___V124*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3976:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4072:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V122*/ meltfptr[60] = 0;
@@ -20575,7 +23186,7 @@ lab_endgetargs:;
/*_.IFCPP___V121*/ meltfptr[70] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3977:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4073:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -20592,7 +23203,12 @@ lab_endgetargs:;
}
;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLAGSTEP__V36*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[25])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLAGSTEP__V36*/ meltfptr[35]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[25])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -20620,7 +23236,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20643,7 +23259,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -20653,7 +23269,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20664,7 +23280,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3978;
+ argtab[2].meltbp_long = 4074;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat final flagstep";
/*^apply.arg */
@@ -20684,7 +23300,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V128*/ meltfptr[93];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V128*/ meltfptr[93] = 0;
@@ -20697,7 +23313,7 @@ lab_endgetargs:;
/*_.IF___V127*/ meltfptr[91] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ quasiblock");
/*_.PROGN___V129*/ meltfptr[78] = /*_.IF___V127*/ meltfptr[91];;
@@ -20706,7 +23322,7 @@ lab_endgetargs:;
/*_.IFCPP___V126*/ meltfptr[92] = /*_.PROGN___V129*/ meltfptr[78];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3978:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4074:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V127*/ meltfptr[91] = 0;
@@ -20719,7 +23335,7 @@ lab_endgetargs:;
/*_.IFCPP___V126*/ meltfptr[92] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3979:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4075:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -20736,7 +23352,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20759,7 +23375,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[14]) /*then */
{
/*^cond.then */
@@ -20769,7 +23385,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20780,7 +23396,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3980;
+ argtab[2].meltbp_long = 4076;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat return stepgroup";
/*^apply.arg */
@@ -20800,7 +23416,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V133*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V133*/ meltfptr[52] = 0;
@@ -20813,7 +23429,7 @@ lab_endgetargs:;
/*_.IF___V132*/ meltfptr[48] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ quasiblock");
/*_.PROGN___V134*/ meltfptr[54] = /*_.IF___V132*/ meltfptr[48];;
@@ -20822,7 +23438,7 @@ lab_endgetargs:;
/*_.IFCPP___V131*/ meltfptr[66] = /*_.PROGN___V134*/ meltfptr[54];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3980:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4076:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[14] = 0;
/*^clear */
/*clear *//*_.IF___V132*/ meltfptr[48] = 0;
@@ -20835,11 +23451,11 @@ lab_endgetargs:;
/*_.IFCPP___V131*/ meltfptr[66] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3981:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4077:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPGROUP__V33*/ meltfptr[32];;
- MELT_LOCATION ("warmelt-normatch.melt:3981:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:4077:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -20853,7 +23469,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V25*/ meltfptr[20] = /*_.RETURN___V135*/ meltfptr[89];;
- MELT_LOCATION ("warmelt-normatch.melt:3872:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:3968:/ clear");
/*clear *//*_.FIRSTSTEP__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.PREVSTEP__V27*/ meltfptr[26] = 0;
@@ -20897,11 +23513,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V131*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_.RETURN___V135*/ meltfptr[89] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20932,14 +23548,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT */
+} /*end meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -20958,7 +23574,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_83_warmelt_normatch_LAMBDA___21___st
+ struct frame_meltrout_90_warmelt_normatch_LAMBDA___21___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -20997,7 +23613,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ getarg");
/*_.VARPAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21069,7 +23685,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21092,7 +23708,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21102,7 +23718,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21112,7 +23728,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3906;
+ argtab[2].meltbp_long = 4002;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_orpat.varhandler varpat";
/*^apply.arg */
@@ -21132,7 +23748,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -21145,7 +23761,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -21154,7 +23770,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3906:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4002:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -21169,7 +23785,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21192,7 +23808,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21202,7 +23818,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21212,7 +23828,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3907;
+ argtab[2].meltbp_long = 4003;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat.varhandler varmdata";
@@ -21233,7 +23849,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -21246,7 +23862,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[10];;
@@ -21255,7 +23871,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3907:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4003:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[10] = 0;
@@ -21270,7 +23886,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3908:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4004:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21278,7 +23894,7 @@ lab_endgetargs:;
/*_#IS_A__L5*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.VARPAT__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3908:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4004:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21286,7 +23902,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3908:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4004:/ cond.else");
/*^block */
/*anyblock */
@@ -21300,7 +23916,7 @@ lab_endgetargs:;
melt_assert_failed (("check varpat"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3908) ? (3908) : __LINE__, __FUNCTION__);
+ (4004) ? (4004) : __LINE__, __FUNCTION__);
;
}
;
@@ -21315,7 +23931,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[10] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3908:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4004:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -21328,7 +23944,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3909:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4005:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21337,7 +23953,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.VARMDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3909:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4005:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21345,7 +23961,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3909:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4005:/ cond.else");
/*^block */
/*anyblock */
@@ -21359,7 +23975,7 @@ lab_endgetargs:;
melt_assert_failed (("check varmdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3909) ? (3909) : __LINE__, __FUNCTION__);
+ (4005) ? (4005) : __LINE__, __FUNCTION__);
;
}
;
@@ -21374,7 +23990,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.IFELSE___V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3909:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4005:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
@@ -21389,7 +24005,7 @@ lab_endgetargs:;
/*_#NULL__L7*/ meltfnum[0] =
(( /*_.VARSYMBVAL__V5*/ meltfptr[4]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:3910:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4006:/ cond");
/*cond */ if ( /*_#NULL__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21397,8 +24013,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:3912:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VARPAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4008:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.VARPAT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -21418,7 +24039,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:3912:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4008:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
(( /*~NEWVARMAP */ meltfclos->tabval[0])),
(meltobject_ptr_t) ( /*_.SPATVAR_SYMB__V22*/ meltfptr[21]),
@@ -21428,7 +24049,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21451,7 +24072,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21461,7 +24082,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21472,7 +24093,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3914;
+ argtab[2].meltbp_long = 4010;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_orpat.varhandler updated newvarmap";
@@ -21495,7 +24116,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -21508,7 +24129,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -21517,7 +24138,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3914:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4010:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -21530,7 +24151,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3911:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4007:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[23] = /*_.IFCPP___V23*/ meltfptr[22];;
@@ -21539,7 +24160,7 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[19] = /*_.PROGN___V27*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3910:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4006:/ clear");
/*clear *//*_.SPATVAR_SYMB__V22*/ meltfptr[21] = 0;
/*^clear */
/*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
@@ -21554,11 +24175,11 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V21*/ meltfptr[19];;
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21587,14 +24208,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_83_warmelt_normatch_LAMBDA___21__ */
+} /*end meltrout_90_warmelt_normatch_LAMBDA___21__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -21613,7 +24234,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_84_warmelt_normatch_LAMBDA___22___st
+ struct frame_meltrout_91_warmelt_normatch_LAMBDA___22___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21652,7 +24273,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3942:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4038:/ getarg");
/*_.CURSYMB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21673,11 +24294,11 @@ lab_endgetargs:;
(( /*~NEWVARMAP */ meltfclos->tabval[0])),
(meltobject_ptr_t) ( /*_.CURSYMB__V2*/
meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:3942:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4038:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.MAPOBJECT_GET__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:3942:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4038:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -21696,14 +24317,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_84_warmelt_normatch_LAMBDA___22__ */
+} /*end meltrout_91_warmelt_normatch_LAMBDA___22__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -21724,7 +24345,7 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT_st
+ struct frame_meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -21763,7 +24384,7 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21815,7 +24436,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21838,7 +24459,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21848,7 +24469,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21858,7 +24479,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3990;
+ argtab[2].meltbp_long = 4086;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat recv";
/*^apply.arg */
@@ -21877,7 +24498,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = 0;
@@ -21890,7 +24511,7 @@ lab_endgetargs:;
/*_.IF___V8*/ meltfptr[7] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ quasiblock");
/*_.PROGN___V10*/ meltfptr[8] = /*_.IF___V8*/ meltfptr[7];;
@@ -21899,7 +24520,7 @@ lab_endgetargs:;
/*_.IFCPP___V7*/ meltfptr[6] = /*_.PROGN___V10*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3990:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4086:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V8*/ meltfptr[7] = 0;
@@ -21914,7 +24535,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3991:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4087:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21922,7 +24543,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_MATCHER */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:3991:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4087:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21930,7 +24551,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3991:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4087:/ cond.else");
/*^block */
/*anyblock */
@@ -21944,7 +24565,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3991) ? (3991) : __LINE__, __FUNCTION__);
+ (4087) ? (4087) : __LINE__, __FUNCTION__);
;
}
;
@@ -21959,7 +24580,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3991:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4087:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[8] = 0;
@@ -21972,7 +24593,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21995,7 +24616,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22005,7 +24626,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22015,7 +24636,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3992;
+ argtab[2].meltbp_long = 4088;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat mdata";
/*^apply.arg */
@@ -22035,7 +24656,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -22048,7 +24669,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -22057,7 +24678,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[8] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3992:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4088:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -22072,7 +24693,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3993:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4089:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22081,7 +24702,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:3993:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4089:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22089,7 +24710,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3993:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4089:/ cond.else");
/*^block */
/*anyblock */
@@ -22103,7 +24724,7 @@ lab_endgetargs:;
melt_assert_failed (("check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3993) ? (3993) : __LINE__, __FUNCTION__);
+ (4089) ? (4089) : __LINE__, __FUNCTION__);
;
}
;
@@ -22118,7 +24739,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[13] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3993:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4089:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -22131,7 +24752,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22154,7 +24775,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -22164,7 +24785,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22174,7 +24795,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 3994;
+ argtab[2].meltbp_long = 4090;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat mcase";
/*^apply.arg */
@@ -22194,7 +24815,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -22207,7 +24828,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -22216,7 +24837,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3994:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4090:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -22231,7 +24852,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:3995:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4091:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22240,7 +24861,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:3995:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4091:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22248,7 +24869,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3995:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4091:/ cond.else");
/*^block */
/*anyblock */
@@ -22262,7 +24883,7 @@ lab_endgetargs:;
melt_assert_failed (("check mcase"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (3995) ? (3995) : __LINE__, __FUNCTION__);
+ (4091) ? (4091) : __LINE__, __FUNCTION__);
;
}
;
@@ -22277,7 +24898,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:3995:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4091:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -22288,10 +24909,10 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:3996:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4092:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:3997:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4093:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
@@ -22307,12 +24928,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:3997:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4093:/ cond.else");
/*_.SLOC__V27*/ meltfptr[26] = /*_.PSLOC__V6*/ meltfptr[5];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:3998:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4094:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 6, "SPAC_OPERBIND");
@@ -22320,7 +24941,7 @@ lab_endgetargs:;
meltfptr[27] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:3999:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4095:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 5, "SPAC_OPERATOR");
@@ -22328,7 +24949,7 @@ lab_endgetargs:;
meltfptr[28] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4000:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4096:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 7, "SPAC_INARGS");
@@ -22336,7 +24957,7 @@ lab_endgetargs:;
meltfptr[29] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4001:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4097:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 8, "SPAC_OUTARGS");
@@ -22344,7 +24965,7 @@ lab_endgetargs:;
meltfptr[30] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4002:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4098:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE__V4*/ meltfptr[3]), 1, "MCASE_MCTXT");
@@ -22352,8 +24973,13 @@ lab_endgetargs:;
meltfptr[31] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4003:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V32*/ meltfptr[31]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4099:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V32*/ meltfptr[31]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22371,8 +24997,13 @@ lab_endgetargs:;
/*_.ENV__V33*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4004:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V32*/ meltfptr[31]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4100:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V32*/ meltfptr[31]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22390,8 +25021,13 @@ lab_endgetargs:;
/*_.NCX__V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4005:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4101:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SOPER__V29*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22409,8 +25045,13 @@ lab_endgetargs:;
/*_.OPIN__V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4006:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4102:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SOPER__V29*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22435,7 +25076,7 @@ lab_endgetargs:;
/*^compute */
/*_.CURSTEP__V37*/ meltfptr[36] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:4009:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4105:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V3*/ meltfptr[2]), 4, "MDATA_STEPS");
@@ -22443,8 +25084,14 @@ lab_endgetargs:;
meltfptr[37] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4010:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4106:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SOPER__V29*/ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22462,7 +25109,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V39*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4010:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4106:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -22482,7 +25129,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4012:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4108:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22491,7 +25138,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V32*/ meltfptr[31]),
(melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:4012:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4108:/ cond");
/*cond */ if ( /*_#IS_A__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22499,7 +25146,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4012:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4108:/ cond.else");
/*^block */
/*anyblock */
@@ -22513,7 +25160,7 @@ lab_endgetargs:;
melt_assert_failed (("check matctx"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4012) ? (4012) : __LINE__, __FUNCTION__);
+ (4108) ? (4108) : __LINE__, __FUNCTION__);
;
}
;
@@ -22528,7 +25175,7 @@ lab_endgetargs:;
/*_.IFCPP___V41*/ meltfptr[40] = /*_.IFELSE___V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4012:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4108:/ clear");
/*clear *//*_#IS_A__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V42*/ meltfptr[41] = 0;
@@ -22541,7 +25188,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4013:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4109:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22550,7 +25197,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V33*/ meltfptr[32]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:4013:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4109:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22558,7 +25205,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4013:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4109:/ cond.else");
/*^block */
/*anyblock */
@@ -22572,7 +25219,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4013) ? (4013) : __LINE__, __FUNCTION__);
+ (4109) ? (4109) : __LINE__, __FUNCTION__);
;
}
;
@@ -22587,7 +25234,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[41] = /*_.IFELSE___V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4013:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4109:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V44*/ meltfptr[43] = 0;
@@ -22600,7 +25247,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22623,7 +25270,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22633,7 +25280,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22644,7 +25291,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4014;
+ argtab[2].meltbp_long = 4110;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat soper";
/*^apply.arg */
@@ -22664,7 +25311,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
@@ -22677,7 +25324,7 @@ lab_endgetargs:;
/*_.IF___V46*/ meltfptr[45] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
@@ -22686,7 +25333,7 @@ lab_endgetargs:;
/*_.IFCPP___V45*/ meltfptr[43] = /*_.PROGN___V48*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4014:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4110:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V46*/ meltfptr[45] = 0;
@@ -22701,7 +25348,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4015:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4111:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22710,7 +25357,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V29*/ meltfptr[28]),
(melt_ptr_t) (( /*!CLASS_ANY_MATCHER */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:4015:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4111:/ cond");
/*cond */ if ( /*_#IS_A__L15*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -22718,7 +25365,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4015:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4111:/ cond.else");
/*^block */
/*anyblock */
@@ -22732,7 +25379,7 @@ lab_endgetargs:;
melt_assert_failed (("check soper"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4015) ? (4015) : __LINE__, __FUNCTION__);
+ (4111) ? (4111) : __LINE__, __FUNCTION__);
;
}
;
@@ -22747,7 +25394,7 @@ lab_endgetargs:;
/*_.IFCPP___V49*/ meltfptr[45] = /*_.IFELSE___V50*/ meltfptr[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4015:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4111:/ clear");
/*clear *//*_#IS_A__L15*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IFELSE___V50*/ meltfptr[46] = 0;
@@ -22760,7 +25407,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22783,7 +25430,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22793,7 +25440,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22804,7 +25451,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4016;
+ argtab[2].meltbp_long = 4112;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat sins";
/*^apply.arg */
@@ -22824,7 +25471,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
@@ -22837,7 +25484,7 @@ lab_endgetargs:;
/*_.IF___V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
@@ -22846,7 +25493,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[46] = /*_.PROGN___V54*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4016:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4112:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V52*/ meltfptr[51] = 0;
@@ -22861,7 +25508,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22884,7 +25531,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -22894,7 +25541,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22905,7 +25552,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4017;
+ argtab[2].meltbp_long = 4113;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat souts";
/*^apply.arg */
@@ -22925,7 +25572,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
@@ -22938,7 +25585,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[52];;
@@ -22947,7 +25594,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = /*_.PROGN___V58*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4017:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4113:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[52] = 0;
@@ -22962,7 +25609,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22985,7 +25632,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -22995,7 +25642,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23006,7 +25653,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4018;
+ argtab[2].meltbp_long = 4114;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat sopbind";
/*^apply.arg */
@@ -23026,7 +25673,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[60] = 0;
@@ -23039,7 +25686,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] = /*_.IF___V60*/ meltfptr[56];;
@@ -23048,7 +25695,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[52] = /*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4018:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4114:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[56] = 0;
@@ -23061,7 +25708,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4019:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4115:/ quasiblock");
/*^multiapply */
@@ -23093,7 +25740,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23116,7 +25763,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -23126,7 +25773,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23137,7 +25784,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4022;
+ argtab[2].meltbp_long = 4118;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat nins";
/*^apply.arg */
@@ -23157,7 +25804,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V68*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] = 0;
@@ -23170,7 +25817,7 @@ lab_endgetargs:;
/*_.IF___V67*/ meltfptr[66] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ quasiblock");
/*_.PROGN___V69*/ meltfptr[67] = /*_.IF___V67*/ meltfptr[66];;
@@ -23179,7 +25826,7 @@ lab_endgetargs:;
/*_.IFCPP___V66*/ meltfptr[65] = /*_.PROGN___V69*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4022:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4118:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[66] = 0;
@@ -23194,7 +25841,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23217,7 +25864,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23227,7 +25874,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[13] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23238,7 +25885,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4023;
+ argtab[2].meltbp_long = 4119;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat inbinds";
/*^apply.arg */
@@ -23258,7 +25905,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V72*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] = 0;
@@ -23271,7 +25918,7 @@ lab_endgetargs:;
/*_.IF___V71*/ meltfptr[67] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ quasiblock");
/*_.PROGN___V73*/ meltfptr[71] = /*_.IF___V71*/ meltfptr[67];;
@@ -23280,7 +25927,7 @@ lab_endgetargs:;
/*_.IFCPP___V70*/ meltfptr[66] = /*_.PROGN___V73*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4023:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4119:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V71*/ meltfptr[67] = 0;
@@ -23295,7 +25942,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4024:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4120:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23306,7 +25953,7 @@ lab_endgetargs:;
(melt_unsafe_magic_discr
((melt_ptr_t) ( /*_.INBINDS__V65*/ meltfptr[64])) ==
MELTOBMAG_LIST));;
- MELT_LOCATION ("warmelt-normatch.melt:4024:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4120:/ cond");
/*cond */ if ( /*_#IS_LIST_OR_NULL__L26*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -23314,7 +25961,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4024:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4120:/ cond.else");
/*^block */
/*anyblock */
@@ -23328,7 +25975,7 @@ lab_endgetargs:;
melt_assert_failed (("check inbinds"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4024) ? (4024) : __LINE__, __FUNCTION__);
+ (4120) ? (4120) : __LINE__, __FUNCTION__);
;
}
;
@@ -23343,7 +25990,7 @@ lab_endgetargs:;
/*_.IFCPP___V74*/ meltfptr[67] = /*_.IFELSE___V75*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4024:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4120:/ clear");
/*clear *//*_#IS_LIST_OR_NULL__L26*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IFELSE___V75*/ meltfptr[71] = 0;
@@ -23367,7 +26014,7 @@ lab_endgetargs:;
/*_#I__L29*/ meltfnum[28] =
(( /*_#MULTIPLE_LENGTH__L27*/ meltfnum[1]) !=
( /*_#MULTIPLE_LENGTH__L28*/ meltfnum[13]));;
- MELT_LOCATION ("warmelt-normatch.melt:4025:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4121:/ cond");
/*cond */ if ( /*_#I__L29*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -23375,8 +26022,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4027:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SOPER__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4123:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SOPER__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23396,7 +26049,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4026:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4122:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V27*/ meltfptr[26]),
("bad input arity of matcher in pattern"),
(melt_ptr_t) ( /*_.NAMED_NAME__V76*/
@@ -23405,7 +26058,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4025:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4121:/ clear");
/*clear *//*_.NAMED_NAME__V76*/ meltfptr[71] = 0;
}
;
@@ -23427,14 +26080,14 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:4031:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4127:/ quasiblock");
/*_.CUROPIN__V79*/ meltfptr[78] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.OPIN__V35*/ meltfptr[34]),
( /*_#NIX__L30*/ meltfnum[29])));;
- MELT_LOCATION ("warmelt-normatch.melt:4032:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4128:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -23449,8 +26102,14 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4033:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROPIN__V79*/ meltfptr[78]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4129:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROPIN__V79*/
+ meltfptr[78]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23470,7 +26129,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23493,7 +26152,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -23503,7 +26162,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[31] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23514,7 +26173,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4035;
+ argtab[2].meltbp_long = 4131;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat curnin";
/*^apply.arg */
@@ -23535,7 +26194,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V84*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[31] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V84*/ meltfptr[83] = 0;
@@ -23548,7 +26207,7 @@ lab_endgetargs:;
/*_.IF___V83*/ meltfptr[82] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ quasiblock");
/*_.PROGN___V85*/ meltfptr[83] = /*_.IF___V83*/ meltfptr[82];;
@@ -23557,7 +26216,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[81] = /*_.PROGN___V85*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4035:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4131:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.IF___V83*/ meltfptr[82] = 0;
@@ -23572,7 +26231,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23595,7 +26254,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[31]) /*then */
{
/*^cond.then */
@@ -23605,7 +26264,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[30] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23616,7 +26275,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4036;
+ argtab[2].meltbp_long = 4132;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat curopin";
/*^apply.arg */
@@ -23637,7 +26296,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] = 0;
@@ -23650,7 +26309,7 @@ lab_endgetargs:;
/*_.IF___V87*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[87] = /*_.IF___V87*/ meltfptr[83];;
@@ -23659,7 +26318,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[82] = /*_.PROGN___V89*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4036:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4132:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[31] = 0;
/*^clear */
/*clear *//*_.IF___V87*/ meltfptr[83] = 0;
@@ -23674,7 +26333,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23697,7 +26356,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -23707,7 +26366,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[31] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23718,7 +26377,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4037;
+ argtab[2].meltbp_long = 4133;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat curctyp";
/*^apply.arg */
@@ -23739,7 +26398,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[31] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V92*/ meltfptr[91] = 0;
@@ -23752,7 +26411,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[91] = /*_.IF___V91*/ meltfptr[87];;
@@ -23761,7 +26420,7 @@ lab_endgetargs:;
/*_.IFCPP___V90*/ meltfptr[83] = /*_.PROGN___V93*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4037:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4133:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[87] = 0;
@@ -23776,7 +26435,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4038:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4134:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23786,7 +26445,7 @@ lab_endgetargs:;
( /*_.CUROPIN__V79*/ meltfptr[78]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:4038:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4134:/ cond");
/*cond */ if ( /*_#IS_A__L37*/ meltfnum[31]) /*then */
{
/*^cond.then */
@@ -23794,7 +26453,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4038:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4134:/ cond.else");
/*^block */
/*anyblock */
@@ -23808,7 +26467,7 @@ lab_endgetargs:;
melt_assert_failed (("check curopin"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (4038) ? (4038) : __LINE__,
+ __FILE__, (4134) ? (4134) : __LINE__,
__FUNCTION__);
;
}
@@ -23824,7 +26483,7 @@ lab_endgetargs:;
/*_.IFCPP___V94*/ meltfptr[87] = /*_.IFELSE___V95*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4038:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4134:/ clear");
/*clear *//*_#IS_A__L37*/ meltfnum[31] = 0;
/*^clear */
/*clear *//*_.IFELSE___V95*/ meltfptr[91] = 0;
@@ -23837,7 +26496,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4039:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4135:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23847,7 +26506,7 @@ lab_endgetargs:;
( /*_.CURCTYP__V80*/ meltfptr[79]),
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->tabval[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:4039:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4135:/ cond");
/*cond */ if ( /*_#IS_A__L38*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -23855,7 +26514,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4039:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4135:/ cond.else");
/*^block */
/*anyblock */
@@ -23869,7 +26528,7 @@ lab_endgetargs:;
melt_assert_failed (("check curctyp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (4039) ? (4039) : __LINE__,
+ __FILE__, (4135) ? (4135) : __LINE__,
__FUNCTION__);
;
}
@@ -23885,7 +26544,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[91] = /*_.IFELSE___V97*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4039:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4135:/ clear");
/*clear *//*_#IS_A__L38*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.IFELSE___V97*/ meltfptr[96] = 0;
@@ -23901,7 +26560,7 @@ lab_endgetargs:;
/*_#__L39*/ meltfnum[31] =
(( /*_.CURCTYP__V80*/ meltfptr[79]) !=
( /*_.INCTYP__V81*/ meltfptr[80]));;
- MELT_LOCATION ("warmelt-normatch.melt:4040:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4136:/ cond");
/*cond */ if ( /*_#__L39*/ meltfnum[31]) /*then */
{
/*^cond.then */
@@ -23909,8 +26568,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4043:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.INCTYP__V81*/ meltfptr[80]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4139:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.INCTYP__V81*/
+ meltfptr[80]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23930,7 +26595,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4042:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4138:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V27*/ meltfptr[26]),
("bad input type in matcher, expecting"),
@@ -23938,8 +26603,14 @@ lab_endgetargs:;
meltfptr[98]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4046:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROPIN__V79*/ meltfptr[78]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4142:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROPIN__V79*/
+ meltfptr[78]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23957,8 +26628,14 @@ lab_endgetargs:;
/*_.BINDER__V100*/ meltfptr[99] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4046:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.BINDER__V100*/ meltfptr[99]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4142:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDER__V100*/
+ meltfptr[99]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -23978,7 +26655,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4044:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4140:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V27*/ meltfptr[26]),
("mistyped formal name in matcher is"),
@@ -23986,8 +26663,14 @@ lab_endgetargs:;
meltfptr[100]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4048:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYP__V80*/ meltfptr[79]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4144:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYP__V80*/
+ meltfptr[79]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24007,7 +26690,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4047:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4143:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V27*/ meltfptr[26]),
("got input type in matcher"),
@@ -24015,14 +26698,14 @@ lab_endgetargs:;
meltfptr[101]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4049:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4145:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:4049:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4145:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:4041:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4137:/ quasiblock");
/*_.PROGN___V104*/ meltfptr[103] =
@@ -24033,7 +26716,7 @@ lab_endgetargs:;
/*_.PROGN___V104*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4040:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4136:/ clear");
/*clear *//*_.NAMED_NAME__V99*/ meltfptr[98] = 0;
/*^clear */
/*clear *//*_.BINDER__V100*/ meltfptr[99] = 0;
@@ -24058,7 +26741,7 @@ lab_endgetargs:;
/*_.LET___V78*/ meltfptr[77] = /*_.IF___V98*/ meltfptr[96];;
- MELT_LOCATION ("warmelt-normatch.melt:4031:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4127:/ clear");
/*clear *//*_.CUROPIN__V79*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.CURCTYP__V80*/ meltfptr[79] = 0;
@@ -24084,7 +26767,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4028:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4124:/ clear");
/*clear *//*_.CURNIN__V77*/ meltfptr[71] = 0;
/*^clear */
/*clear *//*_#NIX__L30*/ meltfnum[29] = 0;
@@ -24092,7 +26775,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V78*/ meltfptr[77] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4052:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4148:/ quasiblock");
/*_.LASTSTEPTEST__V106*/ meltfptr[99] = ( /*nil */ NULL);;
@@ -24112,7 +26795,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4058:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4154:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24122,7 +26805,7 @@ lab_endgetargs:;
( /*_.CURDATASTEP__V108*/ meltfptr[101]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:4058:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4154:/ cond");
/*cond */ if ( /*_#IS_A__L40*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -24130,7 +26813,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4058:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4154:/ cond.else");
/*^block */
/*anyblock */
@@ -24144,7 +26827,7 @@ lab_endgetargs:;
melt_assert_failed (("check curdatastep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (4058) ? (4058) : __LINE__,
+ __FILE__, (4154) ? (4154) : __LINE__,
__FUNCTION__);
;
}
@@ -24161,7 +26844,7 @@ lab_endgetargs:;
/*_.IFELSE___V110*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4058:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4154:/ clear");
/*clear *//*_#IS_A__L40*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.IFELSE___V110*/ meltfptr[103] = 0;
@@ -24179,7 +26862,7 @@ lab_endgetargs:;
( /*_.CURDATASTEP__V108*/ meltfptr[101]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */
meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:4059:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4155:/ cond");
/*cond */ if ( /*_#IS_A__L41*/ meltfnum[31]) /*then */
{
/*^cond.then */
@@ -24187,7 +26870,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4060:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4156:/ compute");
/*_.LASTSTEPTEST__V106*/ meltfptr[99] =
/*_.SETQ___V112*/ meltfptr[79] =
/*_.CURDATASTEP__V108*/ meltfptr[101];;
@@ -24195,7 +26878,7 @@ lab_endgetargs:;
/*_.SETQ___V112*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4059:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4155:/ clear");
/*clear *//*_.SETQ___V112*/ meltfptr[79] = 0;
}
;
@@ -24212,7 +26895,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURDATASTEP__V108*/ meltfptr[101]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ cond");
/*cond */ if ( /*_#IS_A__L42*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -24220,8 +26903,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4063:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURDATASTEP__V108*/ meltfptr[101]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4159:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURDATASTEP__V108*/
+ meltfptr[101]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24244,7 +26933,7 @@ lab_endgetargs:;
/*_#__L44*/ meltfnum[43] =
(( /*_.MSTEP_DATA__V113*/ meltfptr[80]) ==
( /*_.MDATA__V3*/ meltfptr[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ cond");
/*cond */ if ( /*_#__L44*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -24252,7 +26941,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4064:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4160:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATASTEP__V108*/ meltfptr[101]), 6, "MSTMA_MATCHER");
@@ -24263,7 +26952,7 @@ lab_endgetargs:;
/*_#__L46*/ meltfnum[45] =
(( /*_.MSTMA_MATCHER__V114*/ meltfptr[81]) ==
( /*_.SOPER__V29*/ meltfptr[28]));;
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ cond");
/*cond */ if ( /*_#__L46*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -24281,7 +26970,7 @@ lab_endgetargs:;
(( /*_#LIST_LENGTH__L48*/ meltfnum[47]) ==
(0));;
MELT_LOCATION
- ("warmelt-normatch.melt:4061:/ cond");
+ ("warmelt-normatch.melt:4157:/ cond");
/*cond */ if ( /*_#I__L49*/ meltfnum[48]) /*then */
{
/*^cond.then */
@@ -24290,7 +26979,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:4066:/ getslot");
+ ("warmelt-normatch.melt:4162:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATASTEP__V108*/ meltfptr[101]), 7, "MSTMA_BINDS");
@@ -24315,7 +27004,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:4061:/ clear");
+ ("warmelt-normatch.melt:4157:/ clear");
/*clear *//*_.MSTMA_BINDS__V115*/
meltfptr[82] = 0;
/*^clear */
@@ -24339,7 +27028,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:4061:/ clear");
+ ("warmelt-normatch.melt:4157:/ clear");
/*clear *//*_#LIST_LENGTH__L48*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_#I__L49*/ meltfnum[48] = 0;
@@ -24360,7 +27049,7 @@ lab_endgetargs:;
/*_#IF___L47*/ meltfnum[46];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ clear");
/*clear *//*_.MSTMA_MATCHER__V114*/ meltfptr[81] = 0;
/*^clear */
/*clear *//*_#__L46*/ meltfnum[45] = 0;
@@ -24380,7 +27069,7 @@ lab_endgetargs:;
/*_#IF___L43*/ meltfnum[42] = /*_#IF___L45*/ meltfnum[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ clear");
/*clear *//*_.MSTEP_DATA__V113*/ meltfptr[80] = 0;
/*^clear */
/*clear *//*_#__L44*/ meltfnum[43] = 0;
@@ -24395,7 +27084,7 @@ lab_endgetargs:;
/*_#IF___L43*/ meltfnum[42] = 0;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ cond");
/*cond */ if ( /*_#IF___L43*/ meltfnum[42]) /*then */
{
/*^cond.then */
@@ -24403,12 +27092,12 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4068:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4164:/ quasiblock");
/*_.SIMILARSTEP__V118*/ meltfptr[91] =
/*_.CURDATASTEP__V108*/ meltfptr[101];;
- MELT_LOCATION ("warmelt-normatch.melt:4069:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4165:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATASTEP__V108*/ meltfptr[101]), 8, "MSTMA_INS");
@@ -24443,7 +27132,7 @@ lab_endgetargs:;
/*_#__L54*/ meltfnum[51] =
(( /*_.MULTIPLE_NTH__V121*/ meltfptr[79]) !=
( /*_.CURSIMIN__V120*/ meltfptr[103]));;
- MELT_LOCATION ("warmelt-normatch.melt:4074:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4170:/ cond");
/*cond */ if ( /*_#__L54*/ meltfnum[51]) /*then */
{
/*^cond.then */
@@ -24452,21 +27141,21 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:4076:/ compute");
+ ("warmelt-normatch.melt:4172:/ compute");
/*_#SIMIX__L53*/ meltfnum[50] =
/*_#SETQ___L55*/ meltfnum[47] = -1;;
MELT_LOCATION
- ("warmelt-normatch.melt:4077:/ compute");
+ ("warmelt-normatch.melt:4173:/ compute");
/*_.CURSIMIN__V120*/ meltfptr[103] =
/*_.SETQ___V123*/ meltfptr[81] =
( /*nil */ NULL);;
MELT_LOCATION
- ("warmelt-normatch.melt:4078:/ compute");
+ ("warmelt-normatch.melt:4174:/ compute");
/*_.SIMILARSTEP__V118*/ meltfptr[91] =
/*_.SETQ___V124*/ meltfptr[80] =
( /*nil */ NULL);;
MELT_LOCATION
- ("warmelt-normatch.melt:4075:/ quasiblock");
+ ("warmelt-normatch.melt:4171:/ quasiblock");
/*_.PROGN___V125*/ meltfptr[124] =
@@ -24478,7 +27167,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:4074:/ clear");
+ ("warmelt-normatch.melt:4170:/ clear");
/*clear *//*_#SETQ___L55*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.SETQ___V123*/ meltfptr[81] = 0;
@@ -24501,7 +27190,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4071:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4167:/ clear");
/*clear *//*_.CURSIMIN__V120*/ meltfptr[103] = 0;
/*^clear */
/*clear *//*_#SIMIX__L53*/ meltfnum[50] = 0;
@@ -24515,7 +27204,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24538,7 +27227,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[48]) /*then */
{
/*^cond.then */
@@ -24548,7 +27237,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L57*/ meltfnum[49] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24559,7 +27248,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4080;
+ argtab[2].meltbp_long = 4176;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat similiarstep";
@@ -24582,7 +27271,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V128*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[49] =
0;
/*^clear */
@@ -24597,7 +27286,7 @@ lab_endgetargs:;
/*_.IF___V127*/ meltfptr[80] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ quasiblock");
/*_.PROGN___V129*/ meltfptr[124] =
@@ -24608,7 +27297,7 @@ lab_endgetargs:;
/*_.PROGN___V129*/ meltfptr[124];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4080:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4176:/ clear");
/*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.IF___V127*/ meltfptr[80] = 0;
@@ -24621,7 +27310,7 @@ lab_endgetargs:;
/*_.IFCPP___V126*/ meltfptr[81] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4081:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4177:/ cond");
/*cond */ if ( /*_.SIMILARSTEP__V118*/ meltfptr[91]) /*then */
{
/*^cond.then */
@@ -24629,18 +27318,18 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4083:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4179:/ compute");
/*_.CURSTEP__V37*/ meltfptr[36] =
/*_.SETQ___V131*/ meltfptr[124] =
/*_.SIMILARSTEP__V118*/ meltfptr[91];;
- MELT_LOCATION ("warmelt-normatch.melt:4084:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4180:/ compute");
/*_.CURPAIRSTEP__V107*/ meltfptr[100] =
/*_.SETQ___V132*/ meltfptr[131] = ( /*nil */ NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:4085:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4181:/ compute");
/*_.CURDATASTEP__V108*/ meltfptr[101] =
/*_.SETQ___V133*/ meltfptr[132] = ( /*nil */ NULL);;
MELT_LOCATION
- ("warmelt-normatch.melt:4082:/ quasiblock");
+ ("warmelt-normatch.melt:4178:/ quasiblock");
/*_.PROGN___V134*/ meltfptr[133] =
@@ -24651,7 +27340,7 @@ lab_endgetargs:;
/*_.PROGN___V134*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4081:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4177:/ clear");
/*clear *//*_.SETQ___V131*/ meltfptr[124] = 0;
/*^clear */
/*clear *//*_.SETQ___V132*/ meltfptr[131] = 0;
@@ -24672,7 +27361,7 @@ lab_endgetargs:;
/*_.LET___V117*/ meltfptr[87] = /*_.IF___V130*/ meltfptr[80];;
- MELT_LOCATION ("warmelt-normatch.melt:4068:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4164:/ clear");
/*clear *//*_.SIMILARSTEP__V118*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_.CURINS__V119*/ meltfptr[96] = 0;
@@ -24683,7 +27372,7 @@ lab_endgetargs:;
/*_.IF___V116*/ meltfptr[83] = /*_.LET___V117*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4157:/ clear");
/*clear *//*_.LET___V117*/ meltfptr[87] = 0;
}
;
@@ -24698,7 +27387,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4055:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4151:/ clear");
/*clear *//*_.CURPAIRSTEP__V107*/ meltfptr[100] = 0;
/*^clear */
/*clear *//*_.CURDATASTEP__V108*/ meltfptr[101] = 0;
@@ -24718,7 +27407,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24741,7 +27430,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L58*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -24751,7 +27440,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L59*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24762,7 +27451,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4088;
+ argtab[2].meltbp_long = 4184;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat custep after seeking";
@@ -24783,7 +27472,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V137*/ meltfptr[132];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L59*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V137*/ meltfptr[132] = 0;
@@ -24796,7 +27485,7 @@ lab_endgetargs:;
/*_.IF___V136*/ meltfptr[131] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ quasiblock");
/*_.PROGN___V138*/ meltfptr[133] = /*_.IF___V136*/ meltfptr[131];;
@@ -24805,7 +27494,7 @@ lab_endgetargs:;
/*_.IFCPP___V135*/ meltfptr[124] = /*_.PROGN___V138*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4088:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4184:/ clear");
/*clear *//*_#MELT_NEED_DBG__L58*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.IF___V136*/ meltfptr[131] = 0;
@@ -24822,7 +27511,7 @@ lab_endgetargs:;
/*_#NULL__L60*/ meltfnum[43] =
(( /*_.CURSTEP__V37*/ meltfptr[36]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:4089:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4185:/ cond");
/*cond */ if ( /*_#NULL__L60*/ meltfnum[43]) /*then */
{
/*^cond.then */
@@ -24830,7 +27519,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4090:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4186:/ quasiblock");
/*_.OUTDATATUP__V139*/ meltfptr[91] =
@@ -24838,7 +27527,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[18])),
( /*_#NBOPOUT__L10*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:4092:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4188:/ quasiblock");
/*^rawallocobj */
@@ -24928,12 +27617,12 @@ lab_endgetargs:;
"MSTMA_OUTS");
;
/*_.NEWSTEP__V140*/ meltfptr[96] = /*_.INST__V141*/ meltfptr[81];;
- MELT_LOCATION ("warmelt-normatch.melt:4102:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4198:/ compute");
/*_.CURSTEP__V37*/ meltfptr[36] = /*_.SETQ___V142*/ meltfptr[80] =
/*_.NEWSTEP__V140*/ meltfptr[96];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24956,7 +27645,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -24966,7 +27655,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L62*/ meltfnum[47] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24977,7 +27666,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4103;
+ argtab[2].meltbp_long = 4199;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat newstep";
/*^apply.arg */
@@ -24998,7 +27687,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V145*/ meltfptr[131];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[47] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V145*/ meltfptr[131] = 0;
@@ -25011,7 +27700,7 @@ lab_endgetargs:;
/*_.IF___V144*/ meltfptr[132] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ quasiblock");
/*_.PROGN___V146*/ meltfptr[133] = /*_.IF___V144*/ meltfptr[132];;
@@ -25021,7 +27710,7 @@ lab_endgetargs:;
/*_.PROGN___V146*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4103:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4199:/ clear");
/*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V144*/ meltfptr[132] = 0;
@@ -25036,7 +27725,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4104:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4200:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.MDATASTEPS__V38*/ meltfptr[37]),
(melt_ptr_t) ( /*_.NEWSTEP__V140*/
@@ -25045,7 +27734,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25068,7 +27757,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[49]) /*then */
{
/*^cond.then */
@@ -25078,7 +27767,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L64*/ meltfnum[48] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25089,7 +27778,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4105;
+ argtab[2].meltbp_long = 4201;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat updated mdatasteps";
@@ -25111,7 +27800,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V149*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V149*/ meltfptr[133] = 0;
@@ -25124,7 +27813,7 @@ lab_endgetargs:;
/*_.IF___V148*/ meltfptr[132] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ quasiblock");
/*_.PROGN___V150*/ meltfptr[133] = /*_.IF___V148*/ meltfptr[132];;
@@ -25134,7 +27823,7 @@ lab_endgetargs:;
/*_.PROGN___V150*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4105:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4201:/ clear");
/*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.IF___V148*/ meltfptr[132] = 0;
@@ -25147,7 +27836,7 @@ lab_endgetargs:;
/*_.IFCPP___V147*/ meltfptr[131] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4106:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4202:/ cond");
/*cond */ if ( /*_.LASTSTEPTEST__V106*/ meltfptr[99]) /*then */
{
/*^cond.then */
@@ -25155,7 +27844,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4108:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4204:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -25174,7 +27863,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25197,7 +27886,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -25207,7 +27896,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L66*/ meltfnum[45] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25218,7 +27907,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4109;
+ argtab[2].meltbp_long = 4205;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat updated laststeptest";
@@ -25241,7 +27930,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V155*/ meltfptr[154];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[45] =
0;
/*^clear */
@@ -25256,7 +27945,7 @@ lab_endgetargs:;
/*_.IF___V154*/ meltfptr[153] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ quasiblock");
/*_.PROGN___V156*/ meltfptr[154] =
@@ -25267,7 +27956,7 @@ lab_endgetargs:;
/*_.PROGN___V156*/ meltfptr[154];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4109:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4205:/ clear");
/*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V154*/ meltfptr[153] = 0;
@@ -25280,7 +27969,7 @@ lab_endgetargs:;
/*_.IFCPP___V153*/ meltfptr[152] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4107:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4203:/ quasiblock");
/*_.PROGN___V157*/ meltfptr[153] =
@@ -25291,7 +27980,7 @@ lab_endgetargs:;
/*_.PROGN___V157*/ meltfptr[153];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4106:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4202:/ clear");
/*clear *//*_.PUT_ELSE_MATCH__V152*/ meltfptr[133] = 0;
/*^clear */
/*clear *//*_.IFCPP___V153*/ meltfptr[152] = 0;
@@ -25326,7 +28015,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25349,7 +28038,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L68*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -25359,7 +28048,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L69*/ meltfnum[48] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25370,7 +28059,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4113;
+ argtab[2].meltbp_long = 4209;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat curoutbind";
@@ -25393,7 +28082,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V161*/ meltfptr[153];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L69*/ meltfnum[48] =
0;
/*^clear */
@@ -25408,7 +28097,7 @@ lab_endgetargs:;
/*_.IF___V160*/ meltfptr[152] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ quasiblock");
/*_.PROGN___V162*/ meltfptr[153] =
@@ -25419,7 +28108,7 @@ lab_endgetargs:;
/*_.PROGN___V162*/ meltfptr[153];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4209:/ clear");
/*clear *//*_#MELT_NEED_DBG__L68*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V160*/ meltfptr[152] = 0;
@@ -25434,7 +28123,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4114:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4210:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25444,7 +28133,7 @@ lab_endgetargs:;
( /*_.CUROUTBIND__V158*/
meltfptr[154]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:4114:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4210:/ cond");
/*cond */ if ( /*_#IS_A__L70*/ meltfnum[49]) /*then */
{
/*^cond.then */
@@ -25453,7 +28142,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4114:/ cond.else");
+ ("warmelt-normatch.melt:4210:/ cond.else");
/*^block */
/*anyblock */
@@ -25468,7 +28157,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4114) ? (4114) : __LINE__,
+ (4210) ? (4210) : __LINE__,
__FUNCTION__);
;
}
@@ -25485,7 +28174,7 @@ lab_endgetargs:;
/*_.IFELSE___V164*/ meltfptr[153];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4114:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4210:/ clear");
/*clear *//*_#IS_A__L70*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.IFELSE___V164*/ meltfptr[153] = 0;
@@ -25496,11 +28185,17 @@ lab_endgetargs:;
/*_.IFCPP___V163*/ meltfptr[152] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4115:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4211:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUTBIND__V158*/ meltfptr[154]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[13])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROUTBIND__V158*/
+ meltfptr[154]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25518,8 +28213,14 @@ lab_endgetargs:;
/*_.OUTSYMB__V166*/ meltfptr[165] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4116:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUTBIND__V158*/ meltfptr[154]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4212:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROUTBIND__V158*/
+ meltfptr[154]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25537,7 +28238,7 @@ lab_endgetargs:;
/*_.OUTCTYP__V167*/ meltfptr[166] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4118:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4214:/ apply");
/*apply */
{
/*_.CLONE_SYMBOL__V168*/ meltfptr[167] =
@@ -25553,7 +28254,7 @@ lab_endgetargs:;
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[21]))));;
- MELT_LOCATION ("warmelt-normatch.melt:4117:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4213:/ quasiblock");
/*^rawallocobj */
@@ -25614,7 +28315,7 @@ lab_endgetargs:;
/*_.INST__V171*/ meltfptr[170];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25637,7 +28338,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L71*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -25647,7 +28348,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L72*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25658,7 +28359,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4123;
+ argtab[2].meltbp_long = 4219;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat outsymb";
@@ -25681,7 +28382,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V174*/ meltfptr[173];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L72*/ meltfnum[46] =
0;
/*^clear */
@@ -25696,7 +28397,7 @@ lab_endgetargs:;
/*_.IF___V173*/ meltfptr[172] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ quasiblock");
/*_.PROGN___V175*/ meltfptr[173] =
@@ -25707,7 +28408,7 @@ lab_endgetargs:;
/*_.PROGN___V175*/ meltfptr[173];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4123:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4219:/ clear");
/*clear *//*_#MELT_NEED_DBG__L71*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.IF___V173*/ meltfptr[172] = 0;
@@ -25722,7 +28423,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25745,7 +28446,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L73*/ meltfnum[48]) /*then */
{
/*^cond.then */
@@ -25755,7 +28456,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L74*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25766,7 +28467,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4124;
+ argtab[2].meltbp_long = 4220;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat newslot";
@@ -25789,7 +28490,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V178*/ meltfptr[177];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L74*/ meltfnum[44] =
0;
/*^clear */
@@ -25804,7 +28505,7 @@ lab_endgetargs:;
/*_.IF___V177*/ meltfptr[173] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ quasiblock");
/*_.PROGN___V179*/ meltfptr[177] =
@@ -25815,7 +28516,7 @@ lab_endgetargs:;
/*_.PROGN___V179*/ meltfptr[177];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4124:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4220:/ clear");
/*clear *//*_#MELT_NEED_DBG__L73*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.IF___V177*/ meltfptr[173] = 0;
@@ -25830,7 +28531,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4125:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4221:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.OUTDATATUP__V139*/
meltfptr[91]),
@@ -25841,7 +28542,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4126:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4222:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25852,7 +28553,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->
tabval[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:4126:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4222:/ cond");
/*cond */ if ( /*_#IS_A__L75*/ meltfnum[49]) /*then */
{
/*^cond.then */
@@ -25861,7 +28562,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4126:/ cond.else");
+ ("warmelt-normatch.melt:4222:/ cond.else");
/*^block */
/*anyblock */
@@ -25876,7 +28577,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4126) ? (4126) : __LINE__,
+ (4222) ? (4222) : __LINE__,
__FUNCTION__);
;
}
@@ -25893,7 +28594,7 @@ lab_endgetargs:;
/*_.IFELSE___V181*/ meltfptr[177];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4126:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4222:/ clear");
/*clear *//*_#IS_A__L75*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.IFELSE___V181*/ meltfptr[177] = 0;
@@ -25909,7 +28610,7 @@ lab_endgetargs:;
/*_.LET___V165*/ meltfptr[153] =
/*_.IFCPP___V180*/ meltfptr[173];;
- MELT_LOCATION ("warmelt-normatch.melt:4115:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4211:/ clear");
/*clear *//*_.OUTSYMB__V166*/ meltfptr[165] = 0;
/*^clear */
/*clear *//*_.OUTCTYP__V167*/ meltfptr[166] = 0;
@@ -25931,7 +28632,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4110:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4206:/ clear");
/*clear *//*_.CUROUTBIND__V158*/ meltfptr[154] = 0;
/*^clear */
/*clear *//*_#OUTIX__L67*/ meltfnum[47] = 0;
@@ -25944,7 +28645,7 @@ lab_endgetargs:;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4090:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4186:/ clear");
/*clear *//*_.OUTDATATUP__V139*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_.NEWSTEP__V140*/ meltfptr[96] = 0;
@@ -25963,7 +28664,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25986,7 +28687,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L76*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -25996,7 +28697,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L77*/ meltfnum[45] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26007,7 +28708,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4129;
+ argtab[2].meltbp_long = 4225;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat curstep after making it";
@@ -26028,7 +28729,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V184*/ meltfptr[166];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L77*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V184*/ meltfptr[166] = 0;
@@ -26041,7 +28742,7 @@ lab_endgetargs:;
/*_.IF___V183*/ meltfptr[165] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ quasiblock");
/*_.PROGN___V185*/ meltfptr[167] = /*_.IF___V183*/ meltfptr[165];;
@@ -26050,7 +28751,7 @@ lab_endgetargs:;
/*_.IFCPP___V182*/ meltfptr[177] = /*_.PROGN___V185*/ meltfptr[167];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4129:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4225:/ clear");
/*clear *//*_#MELT_NEED_DBG__L76*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V183*/ meltfptr[165] = 0;
@@ -26065,7 +28766,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4130:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4226:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26073,7 +28774,7 @@ lab_endgetargs:;
/*_#IS_A__L78*/ meltfnum[44] =
melt_is_instance_of ((melt_ptr_t) ( /*_.CURSTEP__V37*/ meltfptr[36]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:4130:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4226:/ cond");
/*cond */ if ( /*_#IS_A__L78*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -26081,7 +28782,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4130:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4226:/ cond.else");
/*^block */
/*anyblock */
@@ -26095,7 +28796,7 @@ lab_endgetargs:;
melt_assert_failed (("check curstep"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4130) ? (4130) : __LINE__, __FUNCTION__);
+ (4226) ? (4226) : __LINE__, __FUNCTION__);
;
}
;
@@ -26110,7 +28811,7 @@ lab_endgetargs:;
/*_.IFCPP___V186*/ meltfptr[168] = /*_.IFELSE___V187*/ meltfptr[169];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4130:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4226:/ clear");
/*clear *//*_#IS_A__L78*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IFELSE___V187*/ meltfptr[169] = 0;
@@ -26123,7 +28824,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26146,7 +28847,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L79*/ meltfnum[48]) /*then */
{
/*^cond.then */
@@ -26156,7 +28857,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L80*/ meltfnum[49] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26167,7 +28868,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4131;
+ argtab[2].meltbp_long = 4227;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat souts again";
/*^apply.arg */
@@ -26187,7 +28888,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V190*/ meltfptr[173];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L80*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V190*/ meltfptr[173] = 0;
@@ -26200,7 +28901,7 @@ lab_endgetargs:;
/*_.IF___V189*/ meltfptr[172] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ quasiblock");
/*_.PROGN___V191*/ meltfptr[91] = /*_.IF___V189*/ meltfptr[172];;
@@ -26209,7 +28910,7 @@ lab_endgetargs:;
/*_.IFCPP___V188*/ meltfptr[171] = /*_.PROGN___V191*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4131:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4227:/ clear");
/*clear *//*_#MELT_NEED_DBG__L79*/ meltfnum[48] = 0;
/*^clear */
/*clear *//*_.IF___V189*/ meltfptr[172] = 0;
@@ -26222,11 +28923,16 @@ lab_endgetargs:;
/*_.IFCPP___V188*/ meltfptr[171] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4132:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4228:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:4133:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURSTEP__V37*/ meltfptr[36]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[16])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4229:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSTEP__V37*/ meltfptr[36]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26262,7 +28968,7 @@ lab_endgetargs:;
/*^compute */
/*_.LASTSTEP__V197*/ meltfptr[166] = /*_.CURSTEP__V37*/ meltfptr[36];;
- MELT_LOCATION ("warmelt-normatch.melt:4138:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4234:/ quasiblock");
/*^rawallocobj */
@@ -26342,7 +29048,7 @@ lab_endgetargs:;
/*_.TESTGROUP__V198*/ meltfptr[165] = /*_.INST__V199*/ meltfptr[167];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26365,7 +29071,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L81*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -26375,7 +29081,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L82*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26386,7 +29092,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4148;
+ argtab[2].meltbp_long = 4244;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat outdata before foreach";
@@ -26407,7 +29113,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V202*/ meltfptr[172];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L82*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V202*/ meltfptr[172] = 0;
@@ -26420,7 +29126,7 @@ lab_endgetargs:;
/*_.IF___V201*/ meltfptr[173] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ quasiblock");
/*_.PROGN___V203*/ meltfptr[91] = /*_.IF___V201*/ meltfptr[173];;
@@ -26429,7 +29135,7 @@ lab_endgetargs:;
/*_.IFCPP___V200*/ meltfptr[169] = /*_.PROGN___V203*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4148:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4244:/ clear");
/*clear *//*_#MELT_NEED_DBG__L81*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.IF___V201*/ meltfptr[173] = 0;
@@ -26444,7 +29150,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26467,7 +29173,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L83*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -26477,7 +29183,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L84*/ meltfnum[49] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26488,7 +29194,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4149;
+ argtab[2].meltbp_long = 4245;
/*^apply.arg */
argtab[3].meltbp_cstring =
"translpat_patmat souts before foreach";
@@ -26509,7 +29215,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V206*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L84*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V206*/ meltfptr[91] = 0;
@@ -26522,7 +29228,7 @@ lab_endgetargs:;
/*_.IF___V205*/ meltfptr[173] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ quasiblock");
/*_.PROGN___V207*/ meltfptr[91] = /*_.IF___V205*/ meltfptr[173];;
@@ -26531,7 +29237,7 @@ lab_endgetargs:;
/*_.IFCPP___V204*/ meltfptr[172] = /*_.PROGN___V207*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4149:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4245:/ clear");
/*clear *//*_#MELT_NEED_DBG__L83*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V205*/ meltfptr[173] = 0;
@@ -26561,7 +29267,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:4153:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4249:/ quasiblock");
/*_.OUTPAT__V209*/ meltfptr[91] =
@@ -26570,7 +29276,7 @@ lab_endgetargs:;
( /*_#DIX__L85*/ meltfnum[48])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26593,7 +29299,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L86*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -26603,7 +29309,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L87*/ meltfnum[45] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26614,7 +29320,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4155;
+ argtab[2].meltbp_long = 4251;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat curoutdata";
/*^apply.arg */
@@ -26635,7 +29341,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V212*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L87*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V212*/ meltfptr[211] = 0;
@@ -26648,7 +29354,7 @@ lab_endgetargs:;
/*_.IF___V211*/ meltfptr[210] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ quasiblock");
/*_.PROGN___V213*/ meltfptr[211] = /*_.IF___V211*/ meltfptr[210];;
@@ -26658,7 +29364,7 @@ lab_endgetargs:;
/*_.PROGN___V213*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4251:/ clear");
/*clear *//*_#MELT_NEED_DBG__L86*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V211*/ meltfptr[210] = 0;
@@ -26673,7 +29379,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26696,7 +29402,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L88*/ meltfnum[49]) /*then */
{
/*^cond.then */
@@ -26706,7 +29412,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L89*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26717,7 +29423,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4156;
+ argtab[2].meltbp_long = 4252;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat outpat";
/*^apply.arg */
@@ -26738,7 +29444,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V216*/ meltfptr[215];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L89*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V216*/ meltfptr[215] = 0;
@@ -26751,7 +29457,7 @@ lab_endgetargs:;
/*_.IF___V215*/ meltfptr[211] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ quasiblock");
/*_.PROGN___V217*/ meltfptr[215] = /*_.IF___V215*/ meltfptr[211];;
@@ -26761,7 +29467,7 @@ lab_endgetargs:;
/*_.PROGN___V217*/ meltfptr[215];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4156:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4252:/ clear");
/*clear *//*_#MELT_NEED_DBG__L88*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.IF___V215*/ meltfptr[211] = 0;
@@ -26774,7 +29480,7 @@ lab_endgetargs:;
/*_.IFCPP___V214*/ meltfptr[210] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4157:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4253:/ quasiblock");
/*^multimsend */
@@ -26807,7 +29513,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26830,7 +29536,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L90*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -26840,7 +29546,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L91*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26851,7 +29557,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4160;
+ argtab[2].meltbp_long = 4256;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat outstep";
/*^apply.arg */
@@ -26872,7 +29578,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V222*/ meltfptr[221];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L91*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V222*/ meltfptr[221] = 0;
@@ -26885,7 +29591,7 @@ lab_endgetargs:;
/*_.IF___V221*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ quasiblock");
/*_.PROGN___V223*/ meltfptr[221] = /*_.IF___V221*/ meltfptr[220];;
@@ -26895,7 +29601,7 @@ lab_endgetargs:;
/*_.PROGN___V223*/ meltfptr[221];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4160:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4256:/ clear");
/*clear *//*_#MELT_NEED_DBG__L90*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.IF___V221*/ meltfptr[220] = 0;
@@ -26910,7 +29616,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26933,7 +29639,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L92*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -26943,7 +29649,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L93*/ meltfnum[49] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26954,7 +29660,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4161;
+ argtab[2].meltbp_long = 4257;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat outflag";
/*^apply.arg */
@@ -26975,7 +29681,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V226*/ meltfptr[225];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L93*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V226*/ meltfptr[225] = 0;
@@ -26988,7 +29694,7 @@ lab_endgetargs:;
/*_.IF___V225*/ meltfptr[221] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ quasiblock");
/*_.PROGN___V227*/ meltfptr[225] = /*_.IF___V225*/ meltfptr[221];;
@@ -26998,7 +29704,7 @@ lab_endgetargs:;
/*_.PROGN___V227*/ meltfptr[225];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4161:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4257:/ clear");
/*clear *//*_#MELT_NEED_DBG__L92*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V225*/ meltfptr[221] = 0;
@@ -27011,7 +29717,7 @@ lab_endgetargs:;
/*_.IFCPP___V224*/ meltfptr[220] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4162:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4258:/ cond");
/*cond */ if ( /*_.OUTSTEP__V218*/ meltfptr[211]) /*then */
{
/*^cond.then */
@@ -27019,7 +29725,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4164:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:4260:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -27038,18 +29744,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4165:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4261:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.ELSELIST__V195*/ meltfptr[131]),
(melt_ptr_t) ( /*_.OUTSTEP__V218*/
meltfptr[211]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4166:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:4262:/ compute");
/*_.LASTSTEP__V197*/ meltfptr[166] =
/*_.SETQ___V230*/ meltfptr[229] =
/*_.OUTSTEP__V218*/ meltfptr[211];;
- MELT_LOCATION ("warmelt-normatch.melt:4163:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4259:/ quasiblock");
/*_.PROGN___V231*/ meltfptr[230] =
@@ -27060,7 +29766,7 @@ lab_endgetargs:;
/*_.PROGN___V231*/ meltfptr[230];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4162:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4258:/ clear");
/*clear *//*_.PUT_THEN_MATCH__V229*/ meltfptr[225] = 0;
/*^clear */
/*clear *//*_.SETQ___V230*/ meltfptr[229] = 0;
@@ -27075,7 +29781,7 @@ lab_endgetargs:;
/*_.IF___V228*/ meltfptr[221] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4168:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4264:/ cond");
/*cond */ if ( /*_.OUTFLAG__V219*/ meltfptr[215]) /*then */
{
/*^cond.then */
@@ -27085,7 +29791,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4170:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4266:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27094,7 +29800,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.OUTFLAG__V219*/ meltfptr[215]),
(melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[25])));;
- MELT_LOCATION ("warmelt-normatch.melt:4170:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4266:/ cond");
/*cond */ if ( /*_#IS_A__L94*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -27103,7 +29809,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4170:/ cond.else");
+ ("warmelt-normatch.melt:4266:/ cond.else");
/*^block */
/*anyblock */
@@ -27118,7 +29824,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4170) ? (4170) : __LINE__,
+ (4266) ? (4266) : __LINE__,
__FUNCTION__);
;
}
@@ -27135,7 +29841,7 @@ lab_endgetargs:;
/*_.IFELSE___V233*/ meltfptr[229];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4170:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4266:/ clear");
/*clear *//*_#IS_A__L94*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IFELSE___V233*/ meltfptr[229] = 0;
@@ -27148,26 +29854,26 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4171:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4267:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.FLAGLIST__V196*/ meltfptr[132]),
(melt_ptr_t) ( /*_.OUTFLAG__V219*/
meltfptr[215]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4169:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4265:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4168:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4264:/ clear");
/*clear *//*_.IFCPP___V232*/ meltfptr[225] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4157:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4253:/ clear");
/*clear *//*_.IFCPP___V220*/ meltfptr[219] = 0;
/*^clear */
/*clear *//*_.IFCPP___V224*/ meltfptr[220] = 0;
@@ -27177,7 +29883,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.OUTFLAG__V219*/ meltfptr[215] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4153:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4249:/ clear");
/*clear *//*_.OUTPAT__V209*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_.IFCPP___V210*/ meltfptr[209] = 0;
@@ -27189,20 +29895,20 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4150:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4246:/ clear");
/*clear *//*_.CUROUTDATA__V208*/ meltfptr[173] = 0;
/*^clear */
/*clear *//*_#DIX__L85*/ meltfnum[48] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4173:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4269:/ quasiblock");
/*_.LIST_FIRST_ELEMENT__V235*/ meltfptr[229] =
(melt_pair_head
(melt_list_first
((melt_ptr_t) ( /*_.FLAGLIST__V196*/ meltfptr[132]))));;
- MELT_LOCATION ("warmelt-normatch.melt:4174:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4270:/ cond");
/*cond */ if ( /*_.LIST_FIRST_ELEMENT__V235*/ meltfptr[229]) /*then */
{
/*^cond.then */
@@ -27210,7 +29916,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4179:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4275:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -27226,7 +29932,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4175:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4271:/ quasiblock");
/*^rawallocobj */
@@ -27285,7 +29991,7 @@ lab_endgetargs:;
/*_.INST___V238*/ meltfptr[220];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4174:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4270:/ clear");
/*clear *//*_.LIST_TO_MULTIPLE__V237*/ meltfptr[219] = 0;
/*^clear */
/*clear *//*_.INST___V238*/ meltfptr[220] = 0;
@@ -27299,7 +30005,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4181:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4277:/ quasiblock");
/*^rawallocobj */
@@ -27348,7 +30054,7 @@ lab_endgetargs:;
/*_.INST___V240*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4174:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4270:/ clear");
/*clear *//*_.INST___V240*/ meltfptr[211] = 0;
}
;
@@ -27356,7 +30062,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27379,7 +30085,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L95*/ meltfnum[45]) /*then */
{
/*^cond.then */
@@ -27389,7 +30095,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L96*/ meltfnum[49] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27400,7 +30106,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4189;
+ argtab[2].meltbp_long = 4285;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat flagstep";
/*^apply.arg */
@@ -27420,7 +30126,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V244*/ meltfptr[210];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L96*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V244*/ meltfptr[210] = 0;
@@ -27433,7 +30139,7 @@ lab_endgetargs:;
/*_.IF___V243*/ meltfptr[209] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ quasiblock");
/*_.PROGN___V245*/ meltfptr[219] = /*_.IF___V243*/ meltfptr[209];;
@@ -27442,7 +30148,7 @@ lab_endgetargs:;
/*_.IFCPP___V242*/ meltfptr[91] = /*_.PROGN___V245*/ meltfptr[219];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4189:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4285:/ clear");
/*clear *//*_#MELT_NEED_DBG__L95*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.IF___V243*/ meltfptr[209] = 0;
@@ -27455,7 +30161,7 @@ lab_endgetargs:;
/*_.IFCPP___V242*/ meltfptr[91] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4190:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4286:/ cond");
/*cond */ if ( /*_.LASTSTEP__V197*/ meltfptr[166]) /*then */
{
/*^cond.then */
@@ -27482,7 +30188,7 @@ lab_endgetargs:;
/*_.PUT_THEN_MATCH__V247*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4190:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4286:/ clear");
/*clear *//*_.PUT_THEN_MATCH__V247*/ meltfptr[211] = 0;
}
;
@@ -27493,8 +30199,15 @@ lab_endgetargs:;
/*_.IF___V246*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4191:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MFLAG__V40*/ meltfptr[39]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[25])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4287:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MFLAG__V40*/ meltfptr[39]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->
+ tabval[25])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -27519,8 +30232,14 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4192:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTGROUP__V198*/ meltfptr[165]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */ meltfrout->tabval[22])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4288:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTGROUP__V198*/
+ meltfptr[165]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */ meltfrout->tabval[22])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -27559,7 +30278,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27582,7 +30301,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L97*/ meltfnum[44]) /*then */
{
/*^cond.then */
@@ -27592,7 +30311,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L98*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27603,7 +30322,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4196;
+ argtab[2].meltbp_long = 4292;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat return mflag";
/*^apply.arg */
@@ -27623,7 +30342,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V250*/ meltfptr[219];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L98*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V250*/ meltfptr[219] = 0;
@@ -27636,7 +30355,7 @@ lab_endgetargs:;
/*_.IF___V249*/ meltfptr[209] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ quasiblock");
/*_.PROGN___V251*/ meltfptr[211] = /*_.IF___V249*/ meltfptr[209];;
@@ -27645,7 +30364,7 @@ lab_endgetargs:;
/*_.IFCPP___V248*/ meltfptr[210] = /*_.PROGN___V251*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4196:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4292:/ clear");
/*clear *//*_#MELT_NEED_DBG__L97*/ meltfnum[44] = 0;
/*^clear */
/*clear *//*_.IF___V249*/ meltfptr[209] = 0;
@@ -27660,7 +30379,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27683,7 +30402,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L99*/ meltfnum[49]) /*then */
{
/*^cond.then */
@@ -27693,7 +30412,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L100*/ meltfnum[45] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27704,7 +30423,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4197;
+ argtab[2].meltbp_long = 4293;
/*^apply.arg */
argtab[3].meltbp_cstring = "translpat_patmat return testgroup";
/*^apply.arg */
@@ -27724,7 +30443,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V254*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L100*/ meltfnum[45] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V254*/ meltfptr[211] = 0;
@@ -27737,7 +30456,7 @@ lab_endgetargs:;
/*_.IF___V253*/ meltfptr[209] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ quasiblock");
/*_.PROGN___V255*/ meltfptr[211] = /*_.IF___V253*/ meltfptr[209];;
@@ -27746,7 +30465,7 @@ lab_endgetargs:;
/*_.IFCPP___V252*/ meltfptr[219] = /*_.PROGN___V255*/ meltfptr[211];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4197:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4293:/ clear");
/*clear *//*_#MELT_NEED_DBG__L99*/ meltfnum[49] = 0;
/*^clear */
/*clear *//*_.IF___V253*/ meltfptr[209] = 0;
@@ -27759,11 +30478,11 @@ lab_endgetargs:;
/*_.IFCPP___V252*/ meltfptr[219] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4198:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4294:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.TESTGROUP__V198*/ meltfptr[165];;
- MELT_LOCATION ("warmelt-normatch.melt:4198:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:4294:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -27777,7 +30496,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V234*/ meltfptr[230] = /*_.RETURN___V256*/ meltfptr[209];;
- MELT_LOCATION ("warmelt-normatch.melt:4173:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4269:/ clear");
/*clear *//*_.LIST_FIRST_ELEMENT__V235*/ meltfptr[229] = 0;
/*^clear */
/*clear *//*_.FLAGSTEP__V236*/ meltfptr[225] = 0;
@@ -27793,7 +30512,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V256*/ meltfptr[209] = 0;
/*_.LET___V192*/ meltfptr[96] = /*_.LET___V234*/ meltfptr[230];;
- MELT_LOCATION ("warmelt-normatch.melt:4132:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4228:/ clear");
/*clear *//*_.OUTDATA__V193*/ meltfptr[80] = 0;
/*^clear */
/*clear *//*_.THENLIST__V194*/ meltfptr[87] = 0;
@@ -27813,7 +30532,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V234*/ meltfptr[230] = 0;
/*_.LET___V105*/ meltfptr[98] = /*_.LET___V192*/ meltfptr[96];;
- MELT_LOCATION ("warmelt-normatch.melt:4052:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4148:/ clear");
/*clear *//*_.LASTSTEPTEST__V106*/ meltfptr[99] = 0;
/*^clear */
/*clear *//*_.IFCPP___V135*/ meltfptr[124] = 0;
@@ -27829,7 +30548,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V192*/ meltfptr[96] = 0;
/*_.MULTI___V63*/ meltfptr[56] = /*_.LET___V105*/ meltfptr[98];;
- MELT_LOCATION ("warmelt-normatch.melt:4019:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4115:/ clear");
/*clear *//*_.IFCPP___V66*/ meltfptr[65] = 0;
/*^clear */
/*clear *//*_.IFCPP___V70*/ meltfptr[66] = 0;
@@ -27848,7 +30567,7 @@ lab_endgetargs:;
/*clear *//*_.INBINDS__V65*/ meltfptr[64] = 0;
/*_.LET___V25*/ meltfptr[20] = /*_.MULTI___V63*/ meltfptr[56];;
- MELT_LOCATION ("warmelt-normatch.melt:3996:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4092:/ clear");
/*clear *//*_.LOCA_LOCATION__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.SLOC__V27*/ meltfptr[26] = 0;
@@ -27896,11 +30615,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V59*/ meltfptr[52] = 0;
/*^clear */
/*clear *//*_.MULTI___V63*/ meltfptr[56] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -27931,14 +30650,333 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT */
+} /*end meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un * meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un * meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_93_warmelt_normatch_MGALTSTEP_ANY_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MGALTSTEP_ANY", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.MG__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:4312:/ quasiblock");
+
+
+ /*_.DIS__V5*/ meltfptr[4] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4314:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:4314:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4314:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4314;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mgaltstep_any recv=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " mg=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MG__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " for discrim=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V5*/ meltfptr[4];
+ /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4314:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V7*/ meltfptr[6] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4314:/ quasiblock");
+
+
+ /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4314:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V9*/ meltfptr[7] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4315:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V5*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V5*/ meltfptr[4]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V10*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V10*/ meltfptr[6] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4315:/ locexp");
+ error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter,
+ ("unexpected MATCHGRAPHIC_ALTSTEP for "),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V10*/ meltfptr[6])));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4316:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4316:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected MATCHGRAPHIC_ALTSTEP [mgaltstep_any]"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (4316) ? (4316) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[7] = /*_.IFELSE___V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4316:/ clear");
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFCPP___V11*/ meltfptr[7];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4312:/ clear");
+ /*clear *//*_.DIS__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V10*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MGALTSTEP_ANY", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_93_warmelt_normatch_MGALTSTEP_ANY */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -27960,7 +30998,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR_st
+ struct frame_meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -27999,7 +31037,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -28020,7 +31058,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28043,7 +31081,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28053,7 +31091,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28063,7 +31101,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4219;
+ argtab[2].meltbp_long = 4323;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_steptestvar step";
/*^apply.arg */
@@ -28082,7 +31120,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -28095,7 +31133,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -28104,7 +31142,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4219:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4323:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -28119,7 +31157,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4220:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4324:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28127,7 +31165,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4220:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4324:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -28135,7 +31173,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4220:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4324:/ cond.else");
/*^block */
/*anyblock */
@@ -28149,7 +31187,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4220) ? (4220) : __LINE__, __FUNCTION__);
+ (4324) ? (4324) : __LINE__, __FUNCTION__);
;
}
;
@@ -28164,7 +31202,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4220:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4324:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -28177,7 +31215,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4221:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4325:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28186,7 +31224,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4221:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4325:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28194,7 +31232,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4221:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4325:/ cond.else");
/*^block */
/*anyblock */
@@ -28208,7 +31246,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4221) ? (4221) : __LINE__, __FUNCTION__);
+ (4325) ? (4325) : __LINE__, __FUNCTION__);
;
}
;
@@ -28223,7 +31261,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4221:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4325:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -28234,7 +31272,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4222:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4326:/ quasiblock");
/*^getslot */
@@ -28245,7 +31283,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4223:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4327:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -28253,7 +31291,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4224:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4328:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -28261,7 +31299,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4225:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4329:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTEPTESTVAR_DATA");
@@ -28269,7 +31307,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4226:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4330:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -28277,7 +31315,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4227:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4331:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -28285,7 +31323,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4228:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4332:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -28293,7 +31331,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4229:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4333:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -28305,7 +31343,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V19*/ meltfptr[18]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4231:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4335:/ cond");
/*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
{
/*^cond.then */
@@ -28324,7 +31362,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4231:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4335:/ clear");
/*clear *//*_.MAPOBJECT_GET__V22*/ meltfptr[21] = 0;
}
;
@@ -28335,7 +31373,7 @@ lab_endgetargs:;
/*_.THENNAME__V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4232:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4336:/ cond");
/*cond */ if ( /*_.SELSE__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -28354,7 +31392,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4232:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4336:/ clear");
/*clear *//*_.MAPOBJECT_GET__V24*/ meltfptr[23] = 0;
}
;
@@ -28373,8 +31411,14 @@ lab_endgetargs:;
/*_.DIS__V25*/ meltfptr[23] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4235:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V25*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4339:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V25*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28394,14 +31438,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4237:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4341:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("<tr><td><font color=\"royalblue4\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4240:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4344:/ locexp");
/* OUTCLANAM__1 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V16*/ meltfptr[15],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V26*/
@@ -28411,21 +31455,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4244:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4348:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4245:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4349:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4246:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4350:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
MELTOBMAG_MIXLOC)
@@ -28442,28 +31486,28 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4247:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4351:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4248:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4352:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4249:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4353:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("<tr><td colspan=\"2\"><font face=\"Time-Roman Italics\" point-size=\"7\" color=\"navy\">"));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28486,7 +31530,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28496,7 +31540,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28506,7 +31550,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4251;
+ argtab[2].meltbp_long = 4355;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_steptestvar testdata";
/*^apply.arg */
@@ -28526,7 +31570,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -28539,7 +31583,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -28548,7 +31592,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4251:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4355:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -28561,11 +31605,16 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4252:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4356:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTDATA__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTDATA__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28583,8 +31632,15 @@ lab_endgetargs:;
/*_.TESTDATASYMB__V31*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4254:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTDATASYMB__V31*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4358:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTDATASYMB__V31*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28604,7 +31660,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4254:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4358:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V32*/
@@ -28616,7 +31672,7 @@ lab_endgetargs:;
( /*_.TESTDATASYMB__V31*/ meltfptr[27]),
(melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:4255:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4359:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -28624,11 +31680,17 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4256:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4360:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTDATASYMB__V31*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTDATASYMB__V31*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28653,21 +31715,21 @@ lab_endgetargs:;
((melt_ptr_t) ( /*_.CSYM_URANK__V33*/ meltfptr[32])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:4258:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4362:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("$"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4259:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4363:/ locexp");
meltgc_add_out_dec ((melt_ptr_t)
( /*_.NODEBUF__V16*/ meltfptr[15]),
( /*_#SYRANK__L9*/ meltfnum[0]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4360:/ clear");
/*clear *//*_.CSYM_URANK__V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_#SYRANK__L9*/ meltfnum[0] = 0;
@@ -28677,7 +31739,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4252:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4356:/ clear");
/*clear *//*_.TESTDATASYMB__V31*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V32*/ meltfptr[28] = 0;
@@ -28685,19 +31747,19 @@ lab_endgetargs:;
/*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
{
- MELT_LOCATION ("warmelt-normatch.melt:4261:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4365:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4262:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4366:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4263:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4367:/ cond");
/*cond */ if ( /*_.THENNAME__V21*/ meltfptr[20]) /*then */
{
/*^cond.then */
@@ -28707,7 +31769,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4265:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4369:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
0);;
@@ -28715,7 +31777,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4266:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4370:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V20*/
@@ -28724,14 +31786,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4267:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4371:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
(" /*then*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4268:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4372:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
melt_string_str ((melt_ptr_t)
( /*_.THENNAME__V21*/
@@ -28740,12 +31802,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4269:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4373:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
(" [ arrowhead=normal, color=green ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4264:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4368:/ quasiblock");
/*epilog */
@@ -28753,7 +31815,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4271:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4375:/ cond");
/*cond */ if ( /*_.ELSENAME__V23*/ meltfptr[21]) /*then */
{
/*^cond.then */
@@ -28763,7 +31825,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4273:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4377:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
0);;
@@ -28771,7 +31833,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4274:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4378:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V20*/
@@ -28780,14 +31842,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4275:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4379:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
(" /*else*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4276:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4380:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
melt_string_str ((melt_ptr_t)
( /*_.ELSENAME__V23*/
@@ -28796,12 +31858,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4277:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4381:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
(" [ arrowhead=diamond, color=red ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4272:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4376:/ quasiblock");
/*epilog */
@@ -28810,7 +31872,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4222:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4326:/ clear");
/*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
@@ -28842,7 +31904,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V27*/ meltfptr[26] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -28860,14 +31922,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR */
+} /*end meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -28892,7 +31954,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST_st
+ struct frame_meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -28931,7 +31993,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -28952,7 +32014,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28975,7 +32037,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28985,7 +32047,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28995,7 +32057,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4285;
+ argtab[2].meltbp_long = 4389;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_steptestinst step";
/*^apply.arg */
@@ -29014,7 +32076,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -29027,7 +32089,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -29036,7 +32098,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4285:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4389:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -29051,7 +32113,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4286:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4390:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29059,7 +32121,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_INSTANCE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4286:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4390:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -29067,7 +32129,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4286:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4390:/ cond.else");
/*^block */
/*anyblock */
@@ -29081,7 +32143,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4286) ? (4286) : __LINE__, __FUNCTION__);
+ (4390) ? (4390) : __LINE__, __FUNCTION__);
;
}
;
@@ -29096,7 +32158,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4390:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -29109,7 +32171,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4287:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4391:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29118,7 +32180,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4287:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4391:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -29126,7 +32188,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4287:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4391:/ cond.else");
/*^block */
/*anyblock */
@@ -29140,7 +32202,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4287) ? (4287) : __LINE__, __FUNCTION__);
+ (4391) ? (4391) : __LINE__, __FUNCTION__);
;
}
;
@@ -29155,7 +32217,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4287:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4391:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -29166,7 +32228,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4288:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4392:/ quasiblock");
/*^getslot */
@@ -29177,7 +32239,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4289:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4393:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -29185,7 +32247,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4290:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4394:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -29193,7 +32255,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4291:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4395:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTINS_CLASS");
@@ -29201,7 +32263,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4292:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4396:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 7, "MSTINS_SLOTS");
@@ -29209,7 +32271,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4293:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4397:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -29217,7 +32279,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4294:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4398:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -29225,7 +32287,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4295:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4399:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -29233,7 +32295,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4296:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4400:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -29245,7 +32307,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V21*/ meltfptr[20]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4298:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4402:/ cond");
/*cond */ if ( /*_.STHEN__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -29264,7 +32326,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4298:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4402:/ clear");
/*clear *//*_.MAPOBJECT_GET__V24*/ meltfptr[23] = 0;
}
;
@@ -29275,7 +32337,7 @@ lab_endgetargs:;
/*_.THENNAME__V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4299:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4403:/ cond");
/*cond */ if ( /*_.SELSE__V15*/ meltfptr[14]) /*then */
{
/*^cond.then */
@@ -29294,7 +32356,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4299:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4403:/ clear");
/*clear *//*_.MAPOBJECT_GET__V26*/ meltfptr[25] = 0;
}
;
@@ -29313,8 +32375,14 @@ lab_endgetargs:;
/*_.DIS__V27*/ meltfptr[25] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4302:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V27*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4406:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V27*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29334,14 +32402,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4304:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4408:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("<tr><td><font color=\"salmon4\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4307:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4411:/ locexp");
/* OUTCLANAM__2 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V18*/ meltfptr[17],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V28*/
@@ -29351,21 +32419,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4311:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4415:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4312:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4416:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4313:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4417:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V13*/ meltfptr[12])) ==
MELTOBMAG_MIXLOC)
@@ -29382,27 +32450,33 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4314:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4418:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4315:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4419:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4316:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4420:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("<tr><td colspan=\"2\"><font color=\"salmon\" face=\"Helvetica Oblique\" point-size=\"6\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4317:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTCLASS__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4421:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTCLASS__V16*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29422,7 +32496,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4317:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4421:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V29*/
@@ -29431,14 +32505,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4318:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4422:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4319:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4423:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V18*/ meltfptr[17]),
(0), 0);;
}
@@ -29460,7 +32534,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:4323:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4427:/ cond");
/*cond */ if ( /*_.CURSLOT__V30*/ meltfptr[29]) /*then */
{
/*^cond.then */
@@ -29470,7 +32544,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4325:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4429:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29479,7 +32553,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURSLOT__V30*/ meltfptr[29]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:4325:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4429:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -29488,7 +32562,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4325:/ cond.else");
+ ("warmelt-normatch.melt:4429:/ cond.else");
/*^block */
/*anyblock */
@@ -29503,7 +32577,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4325) ? (4325) : __LINE__,
+ (4429) ? (4429) : __LINE__,
__FUNCTION__);
;
}
@@ -29520,7 +32594,7 @@ lab_endgetargs:;
/*_.IFELSE___V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4325:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4429:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V33*/ meltfptr[32] = 0;
@@ -29531,7 +32605,7 @@ lab_endgetargs:;
/*_.IFCPP___V32*/ meltfptr[31] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4326:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4430:/ quasiblock");
/*_.CURSLOTDATA__V35*/ meltfptr[34] =
@@ -29539,8 +32613,14 @@ lab_endgetargs:;
( /*_.DATAMAP__V20*/ meltfptr[19]),
(meltobject_ptr_t) ( /*_.CURSLOT__V30*/
meltfptr[29]));;
- MELT_LOCATION ("warmelt-normatch.melt:4328:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.TESTCLASS__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4432:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.TESTCLASS__V16*/
+ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29564,8 +32644,14 @@ lab_endgetargs:;
(melt_multiple_nth
((melt_ptr_t) ( /*_.CLASS_FIELDS__V36*/ meltfptr[35]),
( /*_#SLIX__L6*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:4329:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V37*/ meltfptr[36]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4433:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V37*/
+ meltfptr[36]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29585,7 +32671,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4331:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4435:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V19*/ meltfptr[18]),
(0), 0);;
@@ -29593,7 +32679,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4332:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4436:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29604,7 +32690,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_FIELD */
meltfrout->
tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:4332:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4436:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -29613,7 +32699,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4332:/ cond.else");
+ ("warmelt-normatch.melt:4436:/ cond.else");
/*^block */
/*anyblock */
@@ -29628,7 +32714,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4332) ? (4332) : __LINE__,
+ (4436) ? (4436) : __LINE__,
__FUNCTION__);
;
}
@@ -29645,7 +32731,7 @@ lab_endgetargs:;
/*_.IFELSE___V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4332:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4436:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V40*/ meltfptr[39] = 0;
@@ -29656,7 +32742,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[38] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4333:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4437:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -29692,7 +32778,7 @@ lab_endgetargs:;
/*_.LET___V34*/ meltfptr[32] =
/*_.ADD2OUT__V41*/ meltfptr[39];;
- MELT_LOCATION ("warmelt-normatch.melt:4326:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4430:/ clear");
/*clear *//*_.CURSLOTDATA__V35*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.CLASS_FIELDS__V36*/ meltfptr[35] = 0;
@@ -29704,7 +32790,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V39*/ meltfptr[38] = 0;
/*^clear */
/*clear *//*_.ADD2OUT__V41*/ meltfptr[39] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4324:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4428:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[34] =
@@ -29714,7 +32800,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = /*_.PROGN___V42*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4323:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4427:/ clear");
/*clear *//*_.IFCPP___V32*/ meltfptr[31] = 0;
/*^clear */
/*clear *//*_.LET___V34*/ meltfptr[32] = 0;
@@ -29735,7 +32821,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4320:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4424:/ clear");
/*clear *//*_.CURSLOT__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_#SLIX__L6*/ meltfnum[0] = 0;
@@ -29743,7 +32829,7 @@ lab_endgetargs:;
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4339:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4443:/ cond");
/*cond */ if ( /*_.THENNAME__V23*/ meltfptr[22]) /*then */
{
/*^cond.then */
@@ -29753,13 +32839,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4341:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4445:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V19*/ meltfptr[18]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4342:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4446:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -29783,7 +32869,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4340:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4444:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[37] = /*_.ADD2OUT__V44*/ meltfptr[36];;
@@ -29792,7 +32878,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[35] = /*_.PROGN___V45*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4339:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4443:/ clear");
/*clear *//*_.ADD2OUT__V44*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.PROGN___V45*/ meltfptr[37] = 0;
@@ -29805,7 +32891,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4344:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4448:/ cond");
/*cond */ if ( /*_.ELSENAME__V25*/ meltfptr[23]) /*then */
{
/*^cond.then */
@@ -29815,13 +32901,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4346:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4450:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V19*/ meltfptr[18]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4347:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4451:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -29845,7 +32931,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4345:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4449:/ quasiblock");
/*_.PROGN___V48*/ meltfptr[31] = /*_.ADD2OUT__V47*/ meltfptr[39];;
@@ -29854,7 +32940,7 @@ lab_endgetargs:;
/*_.IF___V46*/ meltfptr[38] = /*_.PROGN___V48*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4344:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4448:/ clear");
/*clear *//*_.ADD2OUT__V47*/ meltfptr[39] = 0;
/*^clear */
/*clear *//*_.PROGN___V48*/ meltfptr[31] = 0;
@@ -29871,7 +32957,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[10] = /*_.IF___V46*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:4288:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4392:/ clear");
/*clear *//*_.LOCA__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.STHEN__V14*/ meltfptr[13] = 0;
@@ -29907,11 +32993,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V43*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.IF___V46*/ meltfptr[38] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -29936,14 +33022,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST */
+} /*end meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -29968,7 +33054,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT_st
+ struct frame_meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -29979,10 +33065,10 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 44
- void *mcfr_varptr[44];
-#define MELTFRAM_NBVARNUM 8
- long mcfr_varnum[8];
+#define MELTFRAM_NBVARPTR 63
+ void *mcfr_varptr[63];
+#define MELTFRAM_NBVARNUM 17
+ long mcfr_varnum[17];
/*others*/
long _spare_;
}
@@ -29993,13 +33079,13 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 44; ix++)
+ for (ix = 0; ix < 63; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 44;
+ meltfram__.mcfr_nbvar = 63;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -30007,7 +33093,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -30028,7 +33114,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30051,7 +33137,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30061,7 +33147,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30071,9 +33157,9 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4356;
+ argtab[2].meltbp_long = 4460;
/*^apply.arg */
- argtab[3].meltbp_cstring = "mgaltstep_steptestmult step";
+ argtab[3].meltbp_cstring = "mgaltstep_steptestmult step=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
@@ -30090,7 +33176,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -30103,7 +33189,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -30112,7 +33198,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4356:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4460:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -30127,7 +33213,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4357:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4461:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30135,7 +33221,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4357:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4461:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30143,7 +33229,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4357:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4461:/ cond.else");
/*^block */
/*anyblock */
@@ -30157,7 +33243,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4357) ? (4357) : __LINE__, __FUNCTION__);
+ (4461) ? (4461) : __LINE__, __FUNCTION__);
;
}
;
@@ -30172,7 +33258,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4357:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4461:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -30185,7 +33271,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4358:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4462:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30194,7 +33280,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4358:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4462:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30202,7 +33288,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4358:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4462:/ cond.else");
/*^block */
/*anyblock */
@@ -30216,7 +33302,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4358) ? (4358) : __LINE__, __FUNCTION__);
+ (4462) ? (4462) : __LINE__, __FUNCTION__);
;
}
;
@@ -30231,7 +33317,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4358:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4462:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -30242,7 +33328,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4359:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4463:/ quasiblock");
/*^getslot */
@@ -30253,7 +33339,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4360:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4464:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -30261,7 +33347,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4361:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4465:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -30269,7 +33355,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4362:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4466:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -30277,7 +33363,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4363:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4467:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -30285,7 +33371,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4364:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4468:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -30293,7 +33379,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4365:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4469:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
@@ -30301,7 +33387,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4366:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4470:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTTUP_COMPONENTS");
@@ -30309,7 +33395,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4367:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4471:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -30317,7 +33403,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4368:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4472:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -30329,7 +33415,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V22*/ meltfptr[21]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4370:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4474:/ cond");
/*cond */ if ( /*_.STHEN__V16*/ meltfptr[15]) /*then */
{
/*^cond.then */
@@ -30348,7 +33434,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4370:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4474:/ clear");
/*clear *//*_.MAPOBJECT_GET__V25*/ meltfptr[24] = 0;
}
;
@@ -30359,7 +33445,7 @@ lab_endgetargs:;
/*_.THENNAME__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4371:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4475:/ cond");
/*cond */ if ( /*_.SELSE__V17*/ meltfptr[16]) /*then */
{
/*^cond.then */
@@ -30378,7 +33464,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4371:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4475:/ clear");
/*clear *//*_.MAPOBJECT_GET__V27*/ meltfptr[26] = 0;
}
;
@@ -30401,8 +33487,14 @@ lab_endgetargs:;
/*_.DIS__V28*/ meltfptr[26] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4375:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V28*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4479:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V28*/ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -30422,14 +33514,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4377:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4481:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V14*/ meltfptr[13]),
("<tr><td><font color=\"hotpink\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4380:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4484:/ locexp");
/* OUTCLANAM__3 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V14*/ meltfptr[13],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V29*/
@@ -30437,18 +33529,18 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4384:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4488:/ apply");
/*apply */
{
union meltparam_un argtab[3];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_cstring =
- "</font> <font color=\"darkred\" face=\"Courier\" point-size=\"6\">^";
+ "</font> <font color=\"red\" face=\"Courier\" point-size=\"6\">^";
/*^apply.arg */
argtab[1].meltbp_long = /*_#NBCOMP__L6*/ meltfnum[0];
/*^apply.arg */
- argtab[2].meltbp_cstring = "</font>";
+ argtab[2].meltbp_cstring = "</font></td>";
/*_.ADD2OUT__V30*/ meltfptr[29] =
melt_apply ((meltclosure_ptr_t)
(( /*!ADD2OUT */ meltfrout->tabval[4])),
@@ -30459,21 +33551,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4385:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4489:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V14*/ meltfptr[13]),
("<td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4386:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4490:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V14*/ meltfptr[13]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4387:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4491:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V13*/ meltfptr[12])) ==
MELTOBMAG_MIXLOC)
@@ -30490,36 +33582,244 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4388:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4492:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V14*/ meltfptr[13]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4389:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4493:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V14*/ meltfptr[13]),
(0), 0);;
}
;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4495:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[6] =
+ /*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-normatch.melt:4495:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4495:/ 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-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4495;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mgaltstep_steptestmult scomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SCOMP__V20*/ meltfptr[19];
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] =
+ 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);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[31] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4495:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4495:/ quasiblock");
+
+
+ /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
+ /*^compute */
+
+ /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4495:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V34*/ meltfptr[32] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
/*citerblock FOREACH_IN_MULTIPLE */
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
melt_multiple_length ((melt_ptr_t) /*_.SCOMP__V20*/ meltfptr[19]);
- for ( /*_#CPIX__L7*/ meltfnum[6] = 0;
- ( /*_#CPIX__L7*/ meltfnum[6] >= 0)
- && ( /*_#CPIX__L7*/ meltfnum[6] < cit1__EACHTUP_ln);
- /*_#CPIX__L7*/ meltfnum[6]++)
+ for ( /*_#CPIX__L9*/ meltfnum[7] = 0;
+ ( /*_#CPIX__L9*/ meltfnum[7] >= 0)
+ && ( /*_#CPIX__L9*/ meltfnum[7] < cit1__EACHTUP_ln);
+ /*_#CPIX__L9*/ meltfnum[7]++)
{
- /*_.CURCOMP__V31*/ meltfptr[30] =
+ /*_.CURCOMP__V35*/ meltfptr[31] =
melt_multiple_nth ((melt_ptr_t) ( /*_.SCOMP__V20*/ meltfptr[19]),
- /*_#CPIX__L7*/ meltfnum[6]);
+ /*_#CPIX__L9*/ meltfnum[7]);
+
- MELT_LOCATION ("warmelt-normatch.melt:4394:/ cond");
- /*cond */ if ( /*_.CURCOMP__V31*/ meltfptr[30]) /*then */
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4499:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L10*/ meltfnum[6] =
+ /*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-normatch.melt:4499:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4499:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4499;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_steptestmult curcomp=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMP__V35*/ meltfptr[31];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " cpix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#CPIX__L9*/ meltfnum[7];
+ /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V37*/ meltfptr[36] =
+ /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4499:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V37*/ meltfptr[36] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4499:/ quasiblock");
+
+
+ /*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];;
+ /*^compute */
+
+ /*_.IFCPP___V36*/ meltfptr[32] = /*_.PROGN___V39*/ meltfptr[37];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4499:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V37*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V39*/ meltfptr[37] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V36*/ meltfptr[32] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4500:/ cond");
+ /*cond */ if ( /*_.CURCOMP__V35*/ meltfptr[31]) /*then */
{
/*^cond.then */
/*^block */
@@ -30528,25 +33828,25 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4396:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4502:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L8*/ meltfnum[7] =
+ /*_#IS_A__L12*/ meltfnum[10] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURCOMP__V31*/ meltfptr[30]),
+ ( /*_.CURCOMP__V35*/ meltfptr[31]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[5])));;
- MELT_LOCATION ("warmelt-normatch.melt:4396:/ cond");
- /*cond */ if ( /*_#IS_A__L8*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4502:/ cond");
+ /*cond */ if ( /*_#IS_A__L12*/ meltfnum[10]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V34*/ meltfptr[33] = ( /*nil */ NULL);;
+ /*_.IFELSE___V42*/ meltfptr[41] = ( /*nil */ NULL);;
}
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:4396:/ cond.else");
+ ("warmelt-normatch.melt:4502:/ cond.else");
/*^block */
/*anyblock */
@@ -30561,12 +33861,12 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (4396) ? (4396) : __LINE__,
+ (4502) ? (4502) : __LINE__,
__FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0;
+ /*clear *//*_.IFELSE___V42*/ meltfptr[41] = 0;
/*epilog */
}
;
@@ -30574,38 +33874,358 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V33*/ meltfptr[32] =
- /*_.IFELSE___V34*/ meltfptr[33];;
+ /*_.IFCPP___V41*/ meltfptr[37] =
+ /*_.IFELSE___V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4396:/ clear");
- /*clear *//*_#IS_A__L8*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4502:/ clear");
+ /*clear *//*_#IS_A__L12*/ meltfnum[10] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0;
+ /*clear *//*_.IFELSE___V42*/ meltfptr[41] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL);
+ /*_.IFCPP___V41*/ meltfptr[37] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4397:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4503:/ quasiblock");
- /*_.CURCOMPDATA__V36*/ meltfptr[35] =
+ /*_.CURCOMPDATA__V44*/ meltfptr[43] =
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.DATAMAP__V21*/ meltfptr[20]),
- (meltobject_ptr_t) ( /*_.CURCOMP__V31*/
- meltfptr[30]));;
+ (meltobject_ptr_t) ( /*_.CURCOMP__V35*/
+ meltfptr[31]));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4506:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L13*/ meltfnum[6] =
+ /*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-normatch.melt:4506:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4506:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4506;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_steptestmult curcompdata=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMPDATA__V44*/
+ meltfptr[43];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " cpix=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#CPIX__L9*/ meltfnum[7];
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V46*/ meltfptr[45] =
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4506:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V46*/ meltfptr[45] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4506:/ quasiblock");
+
+
+ /*_.PROGN___V48*/ meltfptr[46] =
+ /*_.IF___V46*/ meltfptr[45];;
+ /*^compute */
+
+ /*_.IFCPP___V45*/ meltfptr[44] =
+ /*_.PROGN___V48*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4506:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V46*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V48*/ meltfptr[46] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#NULL__L15*/ meltfnum[10] =
+ (( /*_.CURCOMPDATA__V44*/ meltfptr[43]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:4507:/ cond");
+ /*cond */ if ( /*_#NULL__L15*/ meltfnum[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ /*^cppif.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L16*/ meltfnum[6] =
+ /*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-normatch.melt:4507:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4507:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4507;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_steptestmult bad datamap=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DATAMAP__V21*/
+ meltfptr[20];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " for curcomp=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURCOMP__V35*/
+ meltfptr[31];
+ /*_.MELT_DEBUG_FUN__V52*/ meltfptr[51] =
+ 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
+ MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V51*/ meltfptr[50] =
+ /*_.MELT_DEBUG_FUN__V52*/ meltfptr[51];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4507:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L17*/
+ meltfnum[16] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V52*/ meltfptr[51]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V51*/ meltfptr[50] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4507:/ quasiblock");
+
+
+ /*_.PROGN___V53*/ meltfptr[51] =
+ /*_.IF___V51*/ meltfptr[50];;
+ /*^compute */
+
+ /*_.IFCPP___V50*/ meltfptr[46] =
+ /*_.PROGN___V53*/ meltfptr[51];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4507:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V51*/ meltfptr[50] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V53*/ meltfptr[51] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V50*/ meltfptr[46] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IF___V49*/ meltfptr[45] =
+ /*_.IFCPP___V50*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4507:/ clear");
+ /*clear *//*_.IFCPP___V50*/ meltfptr[46] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V49*/ meltfptr[45] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4508:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if ( /*_.CURCOMPDATA__V44*/ meltfptr[43]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V55*/ meltfptr[51] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4508:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curcompdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__,
+ (4508) ? (4508) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V55*/ meltfptr[51] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V54*/ meltfptr[50] =
+ /*_.IFELSE___V55*/ meltfptr[51];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4508:/ clear");
+ /*clear *//*_.IFELSE___V55*/ meltfptr[51] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V54*/ meltfptr[50] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
{
- MELT_LOCATION ("warmelt-normatch.melt:4400:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4509:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4401:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4510:/ apply");
/*apply */
{
union meltparam_un argtab[6];
@@ -30618,16 +34238,16 @@ lab_endgetargs:;
" /* testtuplcomp */ -> /*data*/ ";
/*^apply.arg */
argtab[2].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURCOMPDATA__V36*/ meltfptr[35];
+ (melt_ptr_t *) & /*_.CURCOMPDATA__V44*/ meltfptr[43];
/*^apply.arg */
argtab[3].meltbp_cstring =
- " \n [ arrowhead=open, label=<<font point-size=\"6.5\" color=\"indigo\">[";
+ " \n [ arrowhead=open, label=<<font point-size=\"6.5\" color=\"indigo\">[";
/*^apply.arg */
- argtab[4].meltbp_long = /*_#CPIX__L7*/ meltfnum[6];
+ argtab[4].meltbp_long = /*_#CPIX__L9*/ meltfnum[7];
/*^apply.arg */
argtab[5].meltbp_cstring =
- "]</font>>, color=violet, style=dotted ];\n\t\t ";
- /*_.ADD2OUT__V37*/ meltfptr[36] =
+ "]</font>>, color=violet, style=dotted ];\n\t\t ";
+ /*_.ADD2OUT__V56*/ meltfptr[46] =
melt_apply ((meltclosure_ptr_t)
(( /*!ADD2OUT */ meltfrout->tabval[4])),
(melt_ptr_t) ( /*_.EDGEBUF__V15*/
@@ -30638,53 +34258,63 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- /*_.LET___V35*/ meltfptr[33] =
- /*_.ADD2OUT__V37*/ meltfptr[36];;
+ /*_.LET___V43*/ meltfptr[41] =
+ /*_.ADD2OUT__V56*/ meltfptr[46];;
- MELT_LOCATION ("warmelt-normatch.melt:4397:/ clear");
- /*clear *//*_.CURCOMPDATA__V36*/ meltfptr[35] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4503:/ clear");
+ /*clear *//*_.CURCOMPDATA__V44*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
+ /*^clear */
+ /*clear *//*_#NULL__L15*/ meltfnum[10] = 0;
/*^clear */
- /*clear *//*_.ADD2OUT__V37*/ meltfptr[36] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4395:/ quasiblock");
+ /*clear *//*_.IF___V49*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V54*/ meltfptr[50] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V56*/ meltfptr[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4501:/ quasiblock");
- /*_.PROGN___V38*/ meltfptr[35] =
- /*_.LET___V35*/ meltfptr[33];;
+ /*_.PROGN___V57*/ meltfptr[51] =
+ /*_.LET___V43*/ meltfptr[41];;
/*^compute */
- /*_.IF___V32*/ meltfptr[31] = /*_.PROGN___V38*/ meltfptr[35];;
+ /*_.IF___V40*/ meltfptr[36] = /*_.PROGN___V57*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4394:/ clear");
- /*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4500:/ clear");
+ /*clear *//*_.IFCPP___V41*/ meltfptr[37] = 0;
/*^clear */
- /*clear *//*_.LET___V35*/ meltfptr[33] = 0;
+ /*clear *//*_.LET___V43*/ meltfptr[41] = 0;
/*^clear */
- /*clear *//*_.PROGN___V38*/ meltfptr[35] = 0;
+ /*clear *//*_.PROGN___V57*/ meltfptr[51] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V32*/ meltfptr[31] = NULL;;
+ /*_.IF___V40*/ meltfptr[36] = NULL;;
}
;
- if ( /*_#CPIX__L7*/ meltfnum[6] < 0)
+ if ( /*_#CPIX__L9*/ meltfnum[7] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4391:/ clear");
- /*clear *//*_.CURCOMP__V31*/ meltfptr[30] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4496:/ clear");
+ /*clear *//*_.CURCOMP__V35*/ meltfptr[31] = 0;
/*^clear */
- /*clear *//*_#CPIX__L7*/ meltfnum[6] = 0;
+ /*clear *//*_#CPIX__L9*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*clear *//*_.IFCPP___V36*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V40*/ meltfptr[36] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4406:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4515:/ cond");
/*cond */ if ( /*_.THENNAME__V24*/ meltfptr[23]) /*then */
{
/*^cond.then */
@@ -30694,13 +34324,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4408:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4517:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V15*/ meltfptr[14]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4409:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4518:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -30715,7 +34345,7 @@ lab_endgetargs:;
(melt_ptr_t *) & /*_.THENNAME__V24*/ meltfptr[23];
/*^apply.arg */
argtab[3].meltbp_cstring = " [ arrowhead=normal, color=green ];";
- /*_.ADD2OUT__V40*/ meltfptr[32] =
+ /*_.ADD2OUT__V59*/ meltfptr[44] =
melt_apply ((meltclosure_ptr_t)
(( /*!ADD2OUT */ meltfrout->tabval[4])),
(melt_ptr_t) ( /*_.EDGEBUF__V15*/ meltfptr[14]),
@@ -30724,29 +34354,29 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4407:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4516:/ quasiblock");
- /*_.PROGN___V41*/ meltfptr[33] = /*_.ADD2OUT__V40*/ meltfptr[32];;
+ /*_.PROGN___V60*/ meltfptr[45] = /*_.ADD2OUT__V59*/ meltfptr[44];;
/*^compute */
- /*_.IF___V39*/ meltfptr[36] = /*_.PROGN___V41*/ meltfptr[33];;
+ /*_.IF___V58*/ meltfptr[43] = /*_.PROGN___V60*/ meltfptr[45];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4406:/ clear");
- /*clear *//*_.ADD2OUT__V40*/ meltfptr[32] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4515:/ clear");
+ /*clear *//*_.ADD2OUT__V59*/ meltfptr[44] = 0;
/*^clear */
- /*clear *//*_.PROGN___V41*/ meltfptr[33] = 0;
+ /*clear *//*_.PROGN___V60*/ meltfptr[45] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V39*/ meltfptr[36] = NULL;;
+ /*_.IF___V58*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4411:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4520:/ cond");
/*cond */ if ( /*_.ELSENAME__V26*/ meltfptr[24]) /*then */
{
/*^cond.then */
@@ -30756,13 +34386,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4413:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4522:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V15*/ meltfptr[14]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4414:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4523:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -30777,7 +34407,7 @@ lab_endgetargs:;
(melt_ptr_t *) & /*_.ELSENAME__V26*/ meltfptr[24];
/*^apply.arg */
argtab[3].meltbp_cstring = " [ arrowhead=diamond, color=red ];";
- /*_.ADD2OUT__V43*/ meltfptr[32] =
+ /*_.ADD2OUT__V62*/ meltfptr[46] =
melt_apply ((meltclosure_ptr_t)
(( /*!ADD2OUT */ meltfrout->tabval[4])),
(melt_ptr_t) ( /*_.EDGEBUF__V15*/ meltfptr[14]),
@@ -30786,33 +34416,33 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4412:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4521:/ quasiblock");
- /*_.PROGN___V44*/ meltfptr[33] = /*_.ADD2OUT__V43*/ meltfptr[32];;
+ /*_.PROGN___V63*/ meltfptr[37] = /*_.ADD2OUT__V62*/ meltfptr[46];;
/*^compute */
- /*_.IF___V42*/ meltfptr[35] = /*_.PROGN___V44*/ meltfptr[33];;
+ /*_.IF___V61*/ meltfptr[50] = /*_.PROGN___V63*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4411:/ clear");
- /*clear *//*_.ADD2OUT__V43*/ meltfptr[32] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4520:/ clear");
+ /*clear *//*_.ADD2OUT__V62*/ meltfptr[46] = 0;
/*^clear */
- /*clear *//*_.PROGN___V44*/ meltfptr[33] = 0;
+ /*clear *//*_.PROGN___V63*/ meltfptr[37] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V42*/ meltfptr[35] = NULL;;
+ /*_.IF___V61*/ meltfptr[50] = NULL;;
}
;
/*^compute */
- /*_.LET___V12*/ meltfptr[10] = /*_.IF___V42*/ meltfptr[35];;
+ /*_.LET___V12*/ meltfptr[10] = /*_.IF___V61*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:4359:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4463:/ clear");
/*clear *//*_.LOCA__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NODEBUF__V14*/ meltfptr[13] = 0;
@@ -30849,14 +34479,16 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.ADD2OUT__V30*/ meltfptr[29] = 0;
/*^clear */
- /*clear *//*_.IF___V39*/ meltfptr[36] = 0;
+ /*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V58*/ meltfptr[43] = 0;
/*^clear */
- /*clear *//*_.IF___V42*/ meltfptr[35] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ quasiblock");
+ /*clear *//*_.IF___V61*/ meltfptr[50] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -30881,14 +34513,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT */
+} /*end meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -30913,7 +34545,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP_st
+ struct frame_meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -30952,7 +34584,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -30973,7 +34605,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30996,7 +34628,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31006,7 +34638,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31016,7 +34648,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4421;
+ argtab[2].meltbp_long = 4530;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_steptestgroup step";
/*^apply.arg */
@@ -31035,7 +34667,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -31048,7 +34680,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -31057,7 +34689,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4421:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4530:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -31072,7 +34704,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4422:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4531:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31081,7 +34713,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4422:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4531:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -31089,7 +34721,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4422:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4531:/ cond.else");
/*^block */
/*anyblock */
@@ -31103,7 +34735,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4422) ? (4422) : __LINE__, __FUNCTION__);
+ (4531) ? (4531) : __LINE__, __FUNCTION__);
;
}
;
@@ -31118,7 +34750,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4422:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4531:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -31131,7 +34763,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4423:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4532:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31140,7 +34772,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4423:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4532:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31148,7 +34780,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4423:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4532:/ cond.else");
/*^block */
/*anyblock */
@@ -31162,7 +34794,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4423) ? (4423) : __LINE__, __FUNCTION__);
+ (4532) ? (4532) : __LINE__, __FUNCTION__);
;
}
;
@@ -31177,7 +34809,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4423:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4532:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -31188,7 +34820,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4424:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4533:/ quasiblock");
/*^getslot */
@@ -31199,7 +34831,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4425:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4534:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -31207,7 +34839,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4426:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4535:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -31215,7 +34847,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4427:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4536:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -31223,7 +34855,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4428:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4537:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -31231,7 +34863,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4429:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4538:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -31239,7 +34871,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4430:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4539:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -31251,7 +34883,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V19*/ meltfptr[18]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4432:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4541:/ cond");
/*cond */ if ( /*_.STHEN__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -31270,7 +34902,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4432:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4541:/ clear");
/*clear *//*_.MAPOBJECT_GET__V22*/ meltfptr[21] = 0;
}
;
@@ -31281,7 +34913,7 @@ lab_endgetargs:;
/*_.THENNAME__V21*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4433:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4542:/ cond");
/*cond */ if ( /*_.SELSE__V15*/ meltfptr[14]) /*then */
{
/*^cond.then */
@@ -31300,7 +34932,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4433:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4542:/ clear");
/*clear *//*_.MAPOBJECT_GET__V24*/ meltfptr[23] = 0;
}
;
@@ -31319,8 +34951,14 @@ lab_endgetargs:;
/*_.DIS__V25*/ meltfptr[23] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4436:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V25*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4545:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V25*/ meltfptr[23]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -31340,14 +34978,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4438:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4547:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("<tr><td><font color=\"hotpink\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4441:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4550:/ locexp");
/* OUTCLANAM__4 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V16*/ meltfptr[15],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V26*/
@@ -31357,21 +34995,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4445:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4554:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4446:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4555:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4447:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4556:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V13*/ meltfptr[12])) ==
MELTOBMAG_MIXLOC)
@@ -31388,19 +35026,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4448:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4557:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4449:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4558:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4450:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4559:/ cond");
/*cond */ if ( /*_.THENNAME__V21*/ meltfptr[20]) /*then */
{
/*^cond.then */
@@ -31410,13 +35048,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4452:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4561:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4453:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4562:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -31440,7 +35078,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4451:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4560:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[28] = /*_.ADD2OUT__V28*/ meltfptr[27];;
@@ -31449,7 +35087,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = /*_.PROGN___V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4450:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4559:/ clear");
/*clear *//*_.ADD2OUT__V28*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.PROGN___V29*/ meltfptr[28] = 0;
@@ -31462,7 +35100,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4455:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4564:/ cond");
/*cond */ if ( /*_.ELSENAME__V23*/ meltfptr[21]) /*then */
{
/*^cond.then */
@@ -31472,13 +35110,13 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4457:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4566:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4458:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4567:/ apply");
/*apply */
{
union meltparam_un argtab[4];
@@ -31502,7 +35140,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4456:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4565:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[31] = /*_.ADD2OUT__V31*/ meltfptr[28];;
@@ -31511,7 +35149,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[27] = /*_.PROGN___V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4455:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4564:/ clear");
/*clear *//*_.ADD2OUT__V31*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_.PROGN___V32*/ meltfptr[31] = 0;
@@ -31528,7 +35166,7 @@ lab_endgetargs:;
/*_.LET___V12*/ meltfptr[10] = /*_.IF___V30*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:4424:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4533:/ clear");
/*clear *//*_.LOCA__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.STHEN__V14*/ meltfptr[13] = 0;
@@ -31558,11 +35196,11 @@ lab_endgetargs:;
/*clear *//*_.IF___V27*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[27] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -31587,14 +35225,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP */
+} /*end meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -31619,7 +35257,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER_st
+ struct frame_meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -31658,7 +35296,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -31679,7 +35317,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31702,7 +35340,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31712,7 +35350,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31722,7 +35360,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4465;
+ argtab[2].meltbp_long = 4574;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_steptestmatcher step";
/*^apply.arg */
@@ -31741,7 +35379,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -31754,7 +35392,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -31763,7 +35401,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4465:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4574:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -31778,7 +35416,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4466:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4575:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31786,7 +35424,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4466:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4575:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -31794,7 +35432,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4466:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4575:/ cond.else");
/*^block */
/*anyblock */
@@ -31808,7 +35446,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4466) ? (4466) : __LINE__, __FUNCTION__);
+ (4575) ? (4575) : __LINE__, __FUNCTION__);
;
}
;
@@ -31823,7 +35461,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4466:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4575:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -31836,7 +35474,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4467:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4576:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31845,7 +35483,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4467:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4576:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31853,7 +35491,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4467:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4576:/ cond.else");
/*^block */
/*anyblock */
@@ -31867,7 +35505,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4467) ? (4467) : __LINE__, __FUNCTION__);
+ (4576) ? (4576) : __LINE__, __FUNCTION__);
;
}
;
@@ -31882,7 +35520,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4467:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4576:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -31893,7 +35531,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4468:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4577:/ quasiblock");
/*^getslot */
@@ -31904,7 +35542,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4469:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4578:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -31912,7 +35550,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4470:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4579:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -31920,7 +35558,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4471:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4580:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTMA_MATCHER");
@@ -31928,7 +35566,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4472:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4581:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 9, "MSTMA_OUTS");
@@ -31936,7 +35574,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4473:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4582:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -31944,7 +35582,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4474:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4583:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -31952,7 +35590,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4475:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4584:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -31960,7 +35598,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4476:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4585:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -31972,7 +35610,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V20*/ meltfptr[19]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4478:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4587:/ cond");
/*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
{
/*^cond.then */
@@ -31991,7 +35629,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4478:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4587:/ clear");
/*clear *//*_.MAPOBJECT_GET__V23*/ meltfptr[22] = 0;
}
;
@@ -32002,7 +35640,7 @@ lab_endgetargs:;
/*_.THENNAME__V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4479:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4588:/ cond");
/*cond */ if ( /*_.SELSE__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -32021,7 +35659,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4479:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4588:/ clear");
/*clear *//*_.MAPOBJECT_GET__V25*/ meltfptr[24] = 0;
}
;
@@ -32040,8 +35678,14 @@ lab_endgetargs:;
/*_.DIS__V26*/ meltfptr[24] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4482:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V26*/ meltfptr[24]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4591:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V26*/ meltfptr[24]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32061,14 +35705,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4484:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4593:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("<tr><td><font color=\"peru\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4487:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4596:/ locexp");
/* OUTCLANAM__5 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V17*/ meltfptr[16],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V27*/
@@ -32078,21 +35722,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4491:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4600:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4492:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4601:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4493:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4602:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
MELTOBMAG_MIXLOC)
@@ -32109,27 +35753,33 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4494:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4603:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4495:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4604:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4496:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4605:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("<tr><td colspan=\"2\"><font color=\"peru\" face=\"Time-Roman Italics\" point-size=\"7\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4497:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SMATCHER__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4606:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SMATCHER__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32149,7 +35799,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4497:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4606:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V28*/
@@ -32158,14 +35808,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4498:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4607:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4499:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4608:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V17*/ meltfptr[16]),
(0), 0);;
}
@@ -32188,7 +35838,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32211,7 +35861,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -32221,7 +35871,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32232,7 +35882,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4503;
+ argtab[2].meltbp_long = 4612;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mgaltstep_steptestmatcher curout";
@@ -32254,7 +35904,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -32267,7 +35917,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
@@ -32276,7 +35926,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[29] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4503:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4612:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
@@ -32291,7 +35941,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4504:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4613:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32301,7 +35951,7 @@ lab_endgetargs:;
( /*_.CUROUT__V29*/ meltfptr[28]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:4504:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4613:/ cond");
/*cond */ if ( /*_#IS_A__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -32309,7 +35959,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4504:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4613:/ cond.else");
/*^block */
/*anyblock */
@@ -32323,7 +35973,7 @@ lab_endgetargs:;
melt_assert_failed (("check curout"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (4504) ? (4504) : __LINE__,
+ __FILE__, (4613) ? (4613) : __LINE__,
__FUNCTION__);
;
}
@@ -32339,7 +35989,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = /*_.IFELSE___V35*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4504:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4613:/ clear");
/*clear *//*_#IS_A__L9*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
@@ -32352,7 +36002,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4505:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4614:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]), (0),
0);;
@@ -32360,7 +36010,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4506:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4615:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V21*/
@@ -32369,7 +36019,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4507:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4616:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" /*matchstep*/ -> /*data*/ "));
}
@@ -32381,7 +36031,7 @@ lab_endgetargs:;
meltfptr[28]));;
{
- MELT_LOCATION ("warmelt-normatch.melt:4508:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4617:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.MAPOBJECT_GET__V36*/
@@ -32390,16 +36040,22 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4509:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4618:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" [ arrowhead=open, "));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4510:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4619:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SMATCHER__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SMATCHER__V15*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32423,8 +36079,14 @@ lab_endgetargs:;
(melt_multiple_nth
((melt_ptr_t) ( /*_.AMATCH_OUT__V37*/ meltfptr[36]),
( /*_#OUTIX__L6*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:4511:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OUTBIND__V38*/ meltfptr[37]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[6])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4620:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OUTBIND__V38*/
+ meltfptr[37]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[6])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32449,7 +36111,7 @@ lab_endgetargs:;
( /*_.OUTSYMB__V39*/ meltfptr[38]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:4513:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4622:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -32459,14 +36121,20 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4515:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4624:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" label=<<font face=\"Helvetica\" point-size=\"6\">"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4516:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OUTSYMB__V39*/ meltfptr[38]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4625:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OUTSYMB__V39*/
+ meltfptr[38]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -32486,7 +36154,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4516:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4625:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
@@ -32496,25 +36164,25 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4517:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4626:/ locexp");
meltgc_add_out ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]),
("</font>>, "));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4514:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4623:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4513:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4622:/ clear");
/*clear *//*_.NAMED_NAME__V40*/ meltfptr[39] = 0;
}
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4510:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4619:/ clear");
/*clear *//*_.AMATCH_OUT__V37*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.OUTBIND__V38*/ meltfptr[37] = 0;
@@ -32524,7 +36192,7 @@ lab_endgetargs:;
/*clear *//*_#IS_A__L10*/ meltfnum[6] = 0;
{
- MELT_LOCATION ("warmelt-normatch.melt:4518:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4627:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" color=violet, style=dotted ];"));
}
@@ -32535,7 +36203,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4500:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4609:/ clear");
/*clear *//*_.CUROUT__V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_#OUTIX__L6*/ meltfnum[0] = 0;
@@ -32547,7 +36215,7 @@ lab_endgetargs:;
/*clear *//*_.MAPOBJECT_GET__V36*/ meltfptr[31] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:4520:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4629:/ cond");
/*cond */ if ( /*_.THENNAME__V22*/ meltfptr[21]) /*then */
{
/*^cond.then */
@@ -32557,7 +36225,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4522:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4631:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]), (0),
0);;
@@ -32565,7 +36233,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4523:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4632:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V21*/
@@ -32574,14 +36242,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4524:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4633:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" /*then*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4525:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4634:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.THENNAME__V22*/
@@ -32590,12 +36258,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4526:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4635:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" [ arrowhead=normal, color=green ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4521:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4630:/ quasiblock");
/*epilog */
@@ -32603,7 +36271,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4528:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4637:/ cond");
/*cond */ if ( /*_.ELSENAME__V24*/ meltfptr[22]) /*then */
{
/*^cond.then */
@@ -32613,7 +36281,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4530:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4639:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V18*/ meltfptr[17]), (0),
0);;
@@ -32621,7 +36289,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4531:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4640:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V21*/
@@ -32630,14 +36298,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4532:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4641:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" /*else*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4533:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4642:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
melt_string_str ((melt_ptr_t)
( /*_.ELSENAME__V24*/
@@ -32646,12 +36314,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4534:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4643:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V18*/ meltfptr[17]),
(" [ arrowhead=diamond, color=red ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4529:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4638:/ quasiblock");
/*epilog */
@@ -32660,7 +36328,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4468:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4577:/ clear");
/*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
@@ -32694,7 +36362,7 @@ lab_endgetargs:;
/*clear *//*_.NAMED_NAME__V28*/ meltfptr[27] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -32712,14 +36380,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER */
+} /*end meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -32741,7 +36409,7 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS_st
+ struct frame_meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -32780,7 +36448,7 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -32801,7 +36469,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32824,7 +36492,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32834,7 +36502,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32844,7 +36512,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4542;
+ argtab[2].meltbp_long = 4651;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_stepsuccess step";
/*^apply.arg */
@@ -32863,7 +36531,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -32876,7 +36544,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -32885,7 +36553,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4542:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4651:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -32900,7 +36568,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4543:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4652:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32908,7 +36576,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4543:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4652:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -32916,7 +36584,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4543:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4652:/ cond.else");
/*^block */
/*anyblock */
@@ -32930,7 +36598,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4543) ? (4543) : __LINE__, __FUNCTION__);
+ (4652) ? (4652) : __LINE__, __FUNCTION__);
;
}
;
@@ -32945,7 +36613,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4543:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4652:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -32958,7 +36626,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4544:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4653:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32967,7 +36635,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4544:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4653:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32975,7 +36643,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4544:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4653:/ cond.else");
/*^block */
/*anyblock */
@@ -32989,7 +36657,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4544) ? (4544) : __LINE__, __FUNCTION__);
+ (4653) ? (4653) : __LINE__, __FUNCTION__);
;
}
;
@@ -33004,7 +36672,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4544:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4653:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -33015,7 +36683,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4545:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4654:/ quasiblock");
/*^getslot */
@@ -33026,7 +36694,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4546:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4655:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -33034,7 +36702,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4547:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4656:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
@@ -33042,7 +36710,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4548:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4657:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -33050,7 +36718,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4549:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4658:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -33058,7 +36726,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4550:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4659:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -33066,7 +36734,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4551:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4660:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -33078,7 +36746,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V18*/ meltfptr[17]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4553:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4662:/ cond");
/*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
{
/*^cond.then */
@@ -33097,7 +36765,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4553:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4662:/ clear");
/*clear *//*_.MAPOBJECT_GET__V21*/ meltfptr[20] = 0;
}
;
@@ -33112,8 +36780,14 @@ lab_endgetargs:;
/*_#STEPHASH__L5*/ meltfnum[1] =
(melt_obj_hash ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4555:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4664:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33131,8 +36805,14 @@ lab_endgetargs:;
/*_.FLAGRANK__V22*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4556:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4665:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33150,8 +36830,14 @@ lab_endgetargs:;
/*_.FLAGSTRING__V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4557:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4666:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33169,8 +36855,14 @@ lab_endgetargs:;
/*_.FLAGLOC__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4558:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4667:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33192,8 +36884,14 @@ lab_endgetargs:;
/*_.DIS__V26*/ meltfptr[25] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4560:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4669:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V26*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -33213,7 +36911,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33236,7 +36934,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33246,7 +36944,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33256,7 +36954,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4562;
+ argtab[2].meltbp_long = 4671;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_stepsuccess sflag";
/*^apply.arg */
@@ -33276,7 +36974,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0;
@@ -33289,7 +36987,7 @@ lab_endgetargs:;
/*_.IF___V29*/ meltfptr[28] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[28];;
@@ -33298,7 +36996,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[27] = /*_.PROGN___V31*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4562:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4671:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V29*/ meltfptr[28] = 0;
@@ -33313,7 +37011,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4563:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4672:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33322,7 +37020,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]),
(melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:4563:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4672:/ cond");
/*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -33330,7 +37028,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4563:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4672:/ cond.else");
/*^block */
/*anyblock */
@@ -33344,7 +37042,7 @@ lab_endgetargs:;
melt_assert_failed (("check sflag"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4563) ? (4563) : __LINE__, __FUNCTION__);
+ (4672) ? (4672) : __LINE__, __FUNCTION__);
;
}
;
@@ -33359,7 +37057,7 @@ lab_endgetargs:;
/*_.IFCPP___V32*/ meltfptr[28] = /*_.IFELSE___V33*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4563:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4672:/ clear");
/*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V33*/ meltfptr[29] = 0;
@@ -33372,14 +37070,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4564:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4673:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"firebrick\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4567:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4676:/ locexp");
/* OUTCLANAM__6 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V15*/ meltfptr[14],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V27*/
@@ -33389,21 +37087,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4571:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4680:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4572:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4681:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4573:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4682:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
MELTOBMAG_MIXLOC)
@@ -33420,21 +37118,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4574:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4683:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4575:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4684:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4576:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4685:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"turquoise4\" face=\"Times-Roman\" point-size=\"7\">flag#"));
}
@@ -33443,20 +37141,20 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.FLAGRANK__V22*/ meltfptr[20])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:4577:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4686:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
( /*_#GET_INT__L9*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4578:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4687:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]), (" "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4579:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4688:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
melt_string_str ((melt_ptr_t)
( /*_.FLAGSTRING__V23*/
@@ -33465,14 +37163,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4580:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4689:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> <td><font face=\"Helvetiva Italic\" color=\"olivedrab\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4581:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4690:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.FLAGLOC__V24*/ meltfptr[23]))
== MELTOBMAG_MIXLOC)
@@ -33490,19 +37188,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4582:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4691:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4583:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4692:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4584:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4693:/ cond");
/*cond */ if ( /*_.THENNAME__V20*/ meltfptr[19]) /*then */
{
/*^cond.then */
@@ -33512,7 +37210,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4586:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4695:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V16*/ meltfptr[15]), (0),
0);;
@@ -33520,7 +37218,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4587:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4696:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V19*/
@@ -33529,14 +37227,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4588:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4697:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" /*then*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4589:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4698:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.THENNAME__V20*/
@@ -33545,12 +37243,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4590:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4699:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" [ arrowhead=normal, color=green ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4585:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4694:/ quasiblock");
/*epilog */
@@ -33562,7 +37260,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ARGFSTEP__V25*/ meltfptr[24]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:4592:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4701:/ cond");
/*cond */ if ( /*_#IS_A__L10*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -33570,7 +37268,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:4593:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4702:/ quasiblock");
/*_.ARGFSTEPNAME__V34*/ meltfptr[29] =
@@ -33580,7 +37278,7 @@ lab_endgetargs:;
meltfptr[24]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33603,7 +37301,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -33613,7 +37311,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33624,7 +37322,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4595;
+ argtab[2].meltbp_long = 4704;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mgaltstep_stepsuccess argfstep";
@@ -33646,7 +37344,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0;
@@ -33659,7 +37357,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];;
@@ -33668,7 +37366,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[34] = /*_.PROGN___V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4595:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4704:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[35] = 0;
@@ -33683,7 +37381,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33706,7 +37404,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -33716,7 +37414,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33727,7 +37425,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4596;
+ argtab[2].meltbp_long = 4705;
/*^apply.arg */
argtab[3].meltbp_cstring =
"mgaltstep_stepsuccess argfstepname";
@@ -33749,7 +37447,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0;
@@ -33762,7 +37460,7 @@ lab_endgetargs:;
/*_.IF___V40*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[36];;
@@ -33771,7 +37469,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[35] = /*_.PROGN___V42*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4596:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4705:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V40*/ meltfptr[36] = 0;
@@ -33786,7 +37484,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4597:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4706:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33795,7 +37493,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.ARGFSTEPNAME__V34*/ meltfptr[29])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:4597:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4706:/ cond");
/*cond */ if ( /*_#IS_STRING__L15*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -33803,7 +37501,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4597:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4706:/ cond.else");
/*^block */
/*anyblock */
@@ -33814,7 +37512,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("mgaltstep_stepsuccess check argfstepname"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (4597) ? (4597) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("mgaltstep_stepsuccess check argfstepname"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (4706) ? (4706) : __LINE__, __FUNCTION__);
;
}
;
@@ -33829,7 +37527,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[36] = /*_.IFELSE___V44*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4597:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4706:/ clear");
/*clear *//*_#IS_STRING__L15*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFELSE___V44*/ meltfptr[40] = 0;
@@ -33842,7 +37540,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4598:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4707:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V16*/ meltfptr[15]), (0),
0);;
@@ -33850,7 +37548,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4599:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4708:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.ARGFSTEPNAME__V34*/
@@ -33859,14 +37557,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4600:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4709:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" /*argflag suc*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4601:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4710:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V19*/
@@ -33875,13 +37573,13 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4602:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4711:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" [ arrowhead=olnormal, color=chartreuse2, style=dotted ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4593:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4702:/ clear");
/*clear *//*_.ARGFSTEPNAME__V34*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.IFCPP___V35*/ meltfptr[34] = 0;
@@ -33895,7 +37593,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4654:/ clear");
/*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
@@ -33937,7 +37635,7 @@ lab_endgetargs:;
/*clear *//*_#IS_A__L10*/ meltfnum[6] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -33955,24 +37653,24 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS */
+} /*end meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -33984,7 +37682,7 @@ meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR_st
+ struct frame_meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -34023,7 +37721,7 @@ meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -34044,7 +37742,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34067,7 +37765,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34077,7 +37775,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34087,7 +37785,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4611;
+ argtab[2].meltbp_long = 4720;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_stepclear step";
/*^apply.arg */
@@ -34106,7 +37804,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -34119,7 +37817,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -34128,7 +37826,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4720:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -34143,7 +37841,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4612:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4721:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34152,7 +37850,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_CLEAR */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4612:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4721:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -34160,7 +37858,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4612:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4721:/ cond.else");
/*^block */
/*anyblock */
@@ -34174,7 +37872,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4612) ? (4612) : __LINE__, __FUNCTION__);
+ (4721) ? (4721) : __LINE__, __FUNCTION__);
;
}
;
@@ -34189,7 +37887,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4612:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4721:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -34202,7 +37900,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4613:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4722:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34211,7 +37909,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4613:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4722:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34219,7 +37917,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4613:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4722:/ cond.else");
/*^block */
/*anyblock */
@@ -34233,7 +37931,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4613) ? (4613) : __LINE__, __FUNCTION__);
+ (4722) ? (4722) : __LINE__, __FUNCTION__);
;
}
;
@@ -34248,7 +37946,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4613:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4722:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -34259,7 +37957,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4614:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4723:/ quasiblock");
/*^getslot */
@@ -34270,7 +37968,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4615:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4724:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -34278,7 +37976,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4616:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4725:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_CLEARDATA");
@@ -34286,7 +37984,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4617:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4726:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -34294,7 +37992,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4618:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4727:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -34302,7 +38000,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4619:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4728:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -34310,7 +38008,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4620:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4729:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -34322,7 +38020,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V18*/ meltfptr[17]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4622:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4731:/ cond");
/*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
{
/*^cond.then */
@@ -34341,7 +38039,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4622:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4731:/ clear");
/*clear *//*_.MAPOBJECT_GET__V21*/ meltfptr[20] = 0;
}
;
@@ -34360,8 +38058,14 @@ lab_endgetargs:;
/*_.DIS__V22*/ meltfptr[20] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4625:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V22*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4734:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V22*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -34381,14 +38085,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4627:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4736:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"SaddleBrown\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4630:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4739:/ locexp");
/* OUTCLANAM__7 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V15*/ meltfptr[14],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V23*/
@@ -34398,21 +38102,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4634:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4743:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4635:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4744:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4636:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4745:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
MELTOBMAG_MIXLOC)
@@ -34429,21 +38133,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4637:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4746:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4638:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4747:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4639:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4748:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"LimeGreen\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
@@ -34468,7 +38172,7 @@ lab_endgetargs:;
/*_#I__L7*/ meltfnum[6] =
(( /*_#CIX__L6*/ meltfnum[0]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:4643:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4752:/ cond");
/*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -34488,7 +38192,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4644:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4753:/ quasiblock");
/*_.CDATANAM__V25*/ meltfptr[24] =
@@ -34498,7 +38202,7 @@ lab_endgetargs:;
meltfptr[23]));;
{
- MELT_LOCATION ("warmelt-normatch.melt:4646:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4755:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
melt_string_str ((melt_ptr_t)
( /*_.CDATANAM__V25*/
@@ -34507,7 +38211,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4647:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4756:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V16*/ meltfptr[15]), (0),
0);;
@@ -34515,7 +38219,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4648:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4757:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.CDATANAM__V25*/
@@ -34524,14 +38228,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4649:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4758:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" /*cleared data*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4650:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4759:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V19*/
@@ -34540,20 +38244,20 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4651:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4760:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" [ arrowhead=open,"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4652:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4761:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" color=violet, style=dotted ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4644:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4753:/ clear");
/*clear *//*_.CDATANAM__V25*/ meltfptr[24] = 0;
if ( /*_#CIX__L6*/ meltfnum[0] < 0)
break;
@@ -34561,7 +38265,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:4640:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4749:/ clear");
/*clear *//*_.CURCDATA__V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_#CIX__L6*/ meltfnum[0] = 0;
@@ -34571,19 +38275,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4654:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4763:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4655:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4764:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4656:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4765:/ cond");
/*cond */ if ( /*_.THENNAME__V20*/ meltfptr[19]) /*then */
{
/*^cond.then */
@@ -34593,7 +38297,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4658:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4767:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V16*/ meltfptr[15]), (0),
0);;
@@ -34601,7 +38305,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4659:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4768:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V19*/
@@ -34610,14 +38314,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4660:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4769:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" /*then*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4661:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4770:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.THENNAME__V20*/
@@ -34626,12 +38330,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4662:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4771:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" [ arrowhead=normal, color=green ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4657:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4766:/ quasiblock");
/*epilog */
@@ -34640,7 +38344,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4614:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4723:/ clear");
/*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
@@ -34666,7 +38370,7 @@ lab_endgetargs:;
/*clear *//*_.CLANAM__V23*/ meltfptr[22] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -34684,24 +38388,27 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR */
+} /*end meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -34713,7 +38420,7 @@ meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET_st
+ struct frame_meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -34752,7 +38459,7 @@ meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -34773,7 +38480,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34796,7 +38503,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34806,7 +38513,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34816,7 +38523,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 4668;
+ argtab[2].meltbp_long = 4777;
/*^apply.arg */
argtab[3].meltbp_cstring = "mgaltstep_stepflagset step";
/*^apply.arg */
@@ -34835,7 +38542,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -34848,7 +38555,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -34857,7 +38564,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4668:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4777:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -34872,7 +38579,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4669:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4778:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34881,7 +38588,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_SET */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4669:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4778:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -34889,7 +38596,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4669:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4778:/ cond.else");
/*^block */
/*anyblock */
@@ -34903,7 +38610,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4669) ? (4669) : __LINE__, __FUNCTION__);
+ (4778) ? (4778) : __LINE__, __FUNCTION__);
;
}
;
@@ -34918,7 +38625,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4669:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4778:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -34931,7 +38638,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4670:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:4779:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34940,7 +38647,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4670:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4779:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34948,7 +38655,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:4670:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:4779:/ cond.else");
/*^block */
/*anyblock */
@@ -34962,7 +38669,7 @@ lab_endgetargs:;
melt_assert_failed (("check mg"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (4670) ? (4670) : __LINE__, __FUNCTION__);
+ (4779) ? (4779) : __LINE__, __FUNCTION__);
;
}
;
@@ -34977,7 +38684,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4670:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4779:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -34988,7 +38695,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:4671:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4780:/ quasiblock");
/*^getslot */
@@ -34999,7 +38706,7 @@ lab_endgetargs:;
meltfptr[10] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4672:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4781:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -35007,7 +38714,7 @@ lab_endgetargs:;
meltfptr[12] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4673:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4782:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
@@ -35015,7 +38722,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4674:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4783:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
@@ -35023,7 +38730,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4675:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4784:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
@@ -35031,7 +38738,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4676:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4785:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
@@ -35039,7 +38746,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:4677:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:4786:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
@@ -35051,7 +38758,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V18*/ meltfptr[17]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4679:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4788:/ cond");
/*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
{
/*^cond.then */
@@ -35070,7 +38777,7 @@ lab_endgetargs:;
/*_.MAPOBJECT_GET__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4679:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4788:/ clear");
/*clear *//*_.MAPOBJECT_GET__V21*/ meltfptr[20] = 0;
}
;
@@ -35089,8 +38796,14 @@ lab_endgetargs:;
/*_.DIS__V22*/ meltfptr[20] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4682:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V22*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4791:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V22*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35108,8 +38821,14 @@ lab_endgetargs:;
/*_.CLANAM__V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4683:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4792:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35127,8 +38846,14 @@ lab_endgetargs:;
/*_.FLAGRANK__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4684:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4793:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35146,8 +38871,14 @@ lab_endgetargs:;
/*_.FLAGSTRING__V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4685:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:4794:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -35167,14 +38898,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4687:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4796:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"darkolivegreen4\" face=\"Times-Roman Bold\" point-size=\"6\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4690:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4799:/ locexp");
/* OUTCLANAM__8 */
meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V15*/ meltfptr[14],
melt_string_str ((melt_ptr_t) /*_.CLANAM__V23*/
@@ -35184,21 +38915,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4694:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4803:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> <td>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4695:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4804:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4696:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4805:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
MELTOBMAG_MIXLOC)
@@ -35215,21 +38946,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4697:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4806:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4698:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4807:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4699:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4808:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("<tr><td><font color=\"turquoise4\" face=\"Times-Roman\" point-size=\"7\">flag#"));
}
@@ -35238,20 +38969,20 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.FLAGRANK__V24*/ meltfptr[23])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:4700:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4809:/ locexp");
meltgc_add_out_dec ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
( /*_#GET_INT__L6*/ meltfnum[0]));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4701:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4810:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]), (" "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4702:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4811:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
melt_string_str ((melt_ptr_t)
( /*_.FLAGSTRING__V25*/
@@ -35260,14 +38991,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4703:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4812:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> <td><font face=\"Helvetiva Italic\" color=\"olivedrab\" point-size=\"6.5\"> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4704:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4813:/ locexp");
/*add2sbufshortmixloc */
if (melt_magic_discr ((melt_ptr_t) ( /*_.FLAGLOC__V26*/ meltfptr[25]))
== MELTOBMAG_MIXLOC)
@@ -35285,19 +39016,19 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4705:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4814:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
("</font></td> </tr>"));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4706:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4815:/ locexp");
meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V15*/ meltfptr[14]),
(0), 0);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4707:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:4816:/ cond");
/*cond */ if ( /*_.THENNAME__V20*/ meltfptr[19]) /*then */
{
/*^cond.then */
@@ -35307,7 +39038,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:4709:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4818:/ locexp");
meltgc_out_add_indent ((melt_ptr_t)
( /*_.EDGEBUF__V16*/ meltfptr[15]), (0),
0);;
@@ -35315,7 +39046,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4710:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4819:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.STEPNAME__V19*/
@@ -35324,14 +39055,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4711:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4820:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" /*then*/ -> "));
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4712:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4821:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
melt_string_str ((melt_ptr_t)
( /*_.THENNAME__V20*/
@@ -35340,12 +39071,12 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:4713:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:4822:/ locexp");
meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V16*/ meltfptr[15]),
(" [ arrowhead=normal, color=green ];"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:4708:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:4817:/ quasiblock");
/*epilog */
@@ -35354,7 +39085,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:4671:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4780:/ clear");
/*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
@@ -35388,7 +39119,7 @@ lab_endgetargs:;
/*clear *//*_#GET_INT__L6*/ meltfnum[0] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ clear");
/*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
/*^clear */
/*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
@@ -35406,13383 +39137,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 48
- void *mcfr_varptr[48];
-#define MELTFRAM_NBVARNUM 20
- long mcfr_varnum[20];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 48; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 48;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MGALTSTEP_STEPFLAGOPER", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.MG__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4720:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:4720:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4720:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4720;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mgaltstep_stepflagoper step";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
- 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);
- }
- ;
- /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4720:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V5*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4720:/ quasiblock");
-
-
- /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4720:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4721:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4721:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4721:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4721) ? (4721) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4721:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4722:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
- meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4722:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4722:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check mg"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4722) ? (4722) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4722:/ clear");
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4723:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
- /*_.LOCA__V12*/
- meltfptr[10] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4724:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
- /*_.STHEN__V13*/
- meltfptr[12] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4725:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
- /*_.SFLAG__V14*/
- meltfptr[13] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4726:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_FLAGARGS");
- /*_.SFLAGARGS__V15*/
- meltfptr[14] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4727:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
- /*_.NODEBUF__V16*/
- meltfptr[15] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4728:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
- /*_.EDGEBUF__V17*/
- meltfptr[16] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4729:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
- /*_.DATAMAP__V18*/
- meltfptr[17] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4730:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
- /*_.STEPMAP__V19*/
- meltfptr[18] = slot;
- };
- ;
- /*_.STEPNAME__V20*/ meltfptr[19] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.STEPMAP__V19*/ meltfptr[18]),
- (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:4732:/ cond");
- /*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_.MAPOBJECT_GET__V22*/ meltfptr[21] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.STEPMAP__V19*/ meltfptr[18]),
- (meltobject_ptr_t) ( /*_.STHEN__V13*/
- meltfptr[12]));;
- /*^compute */
-
- /*_.THENNAME__V21*/ meltfptr[20] =
- /*_.MAPOBJECT_GET__V22*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4732:/ clear");
- /*clear *//*_.MAPOBJECT_GET__V22*/ meltfptr[21] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.THENNAME__V21*/ meltfptr[20] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#STEPHASH__L5*/ meltfnum[1] =
- (melt_obj_hash ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- /*^compute */
-
- /*_.DIS__V23*/ meltfptr[21] =
- (melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4735:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V23*/ meltfptr[21]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V23*/ meltfptr[21]), 1, "NAMED_NAME");
- /*_.CLANAM__V24*/
- meltfptr[23] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CLANAM__V24*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4736:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 3, "MFLAG_RANK");
- /*_.FLAGRANK__V25*/
- meltfptr[24] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.FLAGRANK__V25*/ meltfptr[24] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4737:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 4, "MFLAG_STRING");
- /*_.FLAGSTRING__V26*/
- meltfptr[25] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.FLAGSTRING__V26*/ meltfptr[25] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4738:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[5])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 1, "LOCA_LOCATION");
- /*_.FLAGLOC__V27*/
- meltfptr[26] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.FLAGLOC__V27*/ meltfptr[26] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4740:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("<tr><td><font color=\"mediumseagreen\" face=\"Times-Roman Bold\" point-size=\"6\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4743:/ locexp");
- /* OUTCLANAM__9 */
- meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V16*/ meltfptr[15],
- melt_string_str ((melt_ptr_t) /*_.CLANAM__V24*/
- meltfptr[23]) + 6);
- ;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4747:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("</font></td> <td>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4748:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4749:/ locexp");
- /*add2sbufshortmixloc */
- if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
- MELTOBMAG_MIXLOC)
- {
- location_t loc =
- melt_location_mixloc ((melt_ptr_t) /*_.LOCA__V12*/ meltfptr[10]);
- meltgc_strbuf_printf ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/ meltfptr[15]),
- "{%s:%d:%d}",
- lbasename (LOCATION_FILE (loc)),
- LOCATION_LINE (loc), LOCATION_COLUMN (loc));
- } /*end add2sbufshortmixloc */ ;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4750:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4751:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4752:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("<tr><td><font color=\"turquoise4\" face=\"Times-Roman\" point-size=\"7\">flag#"));
- }
- ;
- /*_#GET_INT__L6*/ meltfnum[0] =
- (melt_get_int ((melt_ptr_t) ( /*_.FLAGRANK__V25*/ meltfptr[24])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4753:/ locexp");
- meltgc_add_out_dec ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ( /*_#GET_INT__L6*/ meltfnum[0]));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4754:/ cond");
- /*cond */ if ( /*_.FLAGSTRING__V26*/ meltfptr[25]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4756:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- (" "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4757:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- melt_string_str ((melt_ptr_t)
- ( /*_.FLAGSTRING__V26*/
- meltfptr[25])));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4755:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4759:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("</font></td> <td><font face=\"Helvetiva Italic\" color=\"olivedrab\" point-size=\"6.5\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4760:/ locexp");
- /*add2sbufshortmixloc */
- if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
- MELTOBMAG_MIXLOC)
- {
- location_t loc =
- melt_location_mixloc ((melt_ptr_t) /*_.LOCA__V12*/ meltfptr[10]);
- meltgc_strbuf_printf ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/ meltfptr[15]),
- "{%s:%d:%d}",
- lbasename (LOCATION_FILE (loc)),
- LOCATION_LINE (loc), LOCATION_COLUMN (loc));
- } /*end add2sbufshortmixloc */ ;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4761:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("</font></td> </tr>"));
- }
- ;
- /*_#IS_MULTIPLE__L7*/ meltfnum[6] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.SFLAGARGS__V15*/ meltfptr[14])) ==
- MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:4762:/ cond");
- /*cond */ if ( /*_#IS_MULTIPLE__L7*/ meltfnum[6]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4764:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/ meltfptr[15]), (0),
- 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4765:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
- ("<tr><td colspan=\"2\"><font color=\"goldenrod4\" face=\"Times-Roman\" point-size=\"6.5\">flags{"));
- }
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.SFLAGARGS__V15*/
- meltfptr[14]);
- for ( /*_#ARGIX__L8*/ meltfnum[7] = 0;
- ( /*_#ARGIX__L8*/ meltfnum[7] >= 0)
- && ( /*_#ARGIX__L8*/ meltfnum[7] < cit1__EACHTUP_ln);
- /*_#ARGIX__L8*/ meltfnum[7]++)
- {
- /*_.ARGFLAG__V28*/ meltfptr[27] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.SFLAGARGS__V15*/ meltfptr[14]),
- /*_#ARGIX__L8*/ meltfnum[7]);
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4769:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L9*/ meltfnum[8] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.ARGFLAG__V28*/ meltfptr[27]),
- (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:4769:/ cond");
- /*cond */ if ( /*_#IS_A__L9*/ meltfnum[8]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V30*/ meltfptr[29] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:4769:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check argflag"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__,
- (4769) ? (4769) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V29*/ meltfptr[28] =
- /*_.IFELSE___V30*/ meltfptr[29];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4769:/ clear");
- /*clear *//*_#IS_A__L9*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V29*/ meltfptr[28] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4770:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), 3, "MFLAG_RANK");
- /*_.MFLAG_RANK__V31*/
- meltfptr[29] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MFLAG_RANK__V31*/ meltfptr[29] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#ARGRANK__L10*/ meltfnum[8] =
- (melt_get_int
- ((melt_ptr_t) ( /*_.MFLAG_RANK__V31*/ meltfptr[29])));;
- MELT_LOCATION ("warmelt-normatch.melt:4771:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), 5, "MFLAG_SETSTEP");
- /*_.ARGFSTEP__V32*/
- meltfptr[31] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.ARGFSTEP__V32*/ meltfptr[31] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#I__L11*/ meltfnum[10] =
- (( /*_#ARGRANK__L10*/ meltfnum[8]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:4773:/ cond");
- /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4775:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/ meltfptr[15]),
- (" "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4776:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/
- meltfptr[15]),
- ( /*_#ARGRANK__L10*/
- meltfnum[8]));
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:4774:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
- /*_#IS_A__L12*/ meltfnum[11] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.ARGFSTEP__V32*/ meltfptr[31]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */ meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:4778:/ cond");
- /*cond */ if ( /*_#IS_A__L12*/ meltfnum[11]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4779:/ quasiblock");
-
-
- /*_.ARGFSTEPNAME__V33*/ meltfptr[32] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.STEPMAP__V19*/
- meltfptr[18]),
- (meltobject_ptr_t) ( /*_.ARGFSTEP__V32*/ meltfptr[31]));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:4781:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L13*/ meltfnum[12] =
- /*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-normatch.melt:4781:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:4781:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4781;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mgaltstep_stepflagoper argfstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.ARGFSTEP__V32*/
- meltfptr[31];
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] =
- 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);
- }
- ;
- /*_.IF___V35*/ meltfptr[34] =
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4781:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L14*/
- meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35]
- = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V35*/ meltfptr[34] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:4781:/ quasiblock");
-
-
- /*_.PROGN___V37*/ meltfptr[35] =
- /*_.IF___V35*/ meltfptr[34];;
- /*^compute */
-
- /*_.IFCPP___V34*/ meltfptr[33] =
- /*_.PROGN___V37*/ meltfptr[35];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4781:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V35*/ meltfptr[34] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V37*/ meltfptr[35] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V34*/ meltfptr[33] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:4782:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L15*/ meltfnum[13] =
- /*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-normatch.melt:4782:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:4782:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4782;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mgaltstep_stepflagoper argfstepname";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.ARGFSTEPNAME__V33*/
- meltfptr[32];
- /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] =
- 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);
- }
- ;
- /*_.IF___V39*/ meltfptr[35] =
- /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4782:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L16*/
- meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39]
- = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V39*/ meltfptr[35] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:4782:/ quasiblock");
-
-
- /*_.PROGN___V41*/ meltfptr[39] =
- /*_.IF___V39*/ meltfptr[35];;
- /*^compute */
-
- /*_.IFCPP___V38*/ meltfptr[34] =
- /*_.PROGN___V41*/ meltfptr[39];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4782:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V39*/ meltfptr[35] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V41*/ meltfptr[39] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V38*/ meltfptr[34] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#NULL__L17*/ meltfnum[12] =
- (( /*_.ARGFSTEPNAME__V33*/ meltfptr[32]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:4783:/ cond");
- /*cond */ if ( /*_#NULL__L17*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:4784:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L18*/ meltfnum[13] =
- /*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-normatch.melt:4784:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18]
- =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:4784:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L19*/
- meltfnum[18];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4784;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mgaltstep_stepflagoper bad stepmap";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEPMAP__V19*/
- meltfptr[18];
- /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] =
- 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);
- }
- ;
- /*_.IF___V44*/ meltfptr[43] =
- /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4784:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L19*/
- meltfnum[18] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V45*/
- meltfptr[44] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V44*/ meltfptr[43] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:4784:/ quasiblock");
-
-
- /*_.PROGN___V46*/ meltfptr[44] =
- /*_.IF___V44*/ meltfptr[43];;
- /*^compute */
-
- /*_.IFCPP___V43*/ meltfptr[39] =
- /*_.PROGN___V46*/ meltfptr[44];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4784:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[13]
- = 0;
- /*^clear */
- /*clear *//*_.IF___V44*/ meltfptr[43] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V46*/ meltfptr[44] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.IF___V42*/ meltfptr[35] =
- /*_.IFCPP___V43*/ meltfptr[39];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:4783:/ clear");
- /*clear *//*_.IFCPP___V43*/ meltfptr[39] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V42*/ meltfptr[35] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:4785:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_STRING__L20*/ meltfnum[18] =
- (melt_magic_discr
- ((melt_ptr_t)
- ( /*_.ARGFSTEPNAME__V33*/ meltfptr[32])) ==
- MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:4785:/ cond");
- /*cond */ if ( /*_#IS_STRING__L20*/ meltfnum[18]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V48*/ meltfptr[44] =
- ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:4785:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check argstepname"),
- ("warmelt-normatch.melt")
- ?
- ("warmelt-normatch.melt")
- : __FILE__,
- (4785) ? (4785) :
- __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V47*/ meltfptr[43] =
- /*_.IFELSE___V48*/ meltfptr[44];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4785:/ clear");
- /*clear *//*_#IS_STRING__L20*/ meltfnum[18] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4786:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/
- meltfptr[16]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4787:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- melt_string_str ((melt_ptr_t)
- ( /*_.ARGFSTEPNAME__V33*/ meltfptr[32])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4788:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- (" /*argflag flagop*/ -> "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4789:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- melt_string_str ((melt_ptr_t)
- ( /*_.STEPNAME__V20*/
- meltfptr[19])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4790:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- (" [ arrowhead=olnormal, color=chartreuse2, style=dotted ];"));
- }
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:4779:/ clear");
- /*clear *//*_.ARGFSTEPNAME__V33*/ meltfptr[32] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V38*/ meltfptr[34] = 0;
- /*^clear */
- /*clear *//*_#NULL__L17*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V42*/ meltfptr[35] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:4770:/ clear");
- /*clear *//*_.MFLAG_RANK__V31*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_#ARGRANK__L10*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.ARGFSTEP__V32*/ meltfptr[31] = 0;
- /*^clear */
- /*clear *//*_#I__L11*/ meltfnum[10] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L12*/ meltfnum[11] = 0;
- if ( /*_#ARGIX__L8*/ meltfnum[7] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4766:/ clear");
- /*clear *//*_.ARGFLAG__V28*/ meltfptr[27] = 0;
- /*^clear */
- /*clear *//*_#ARGIX__L8*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4793:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t)
- ( /*_.NODEBUF__V16*/ meltfptr[15]),
- (" }</font></td> </tr>"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4763:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4795:/ cond");
- /*cond */ if ( /*_.THENNAME__V21*/ meltfptr[20]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4797:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
- 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4798:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- melt_string_str ((melt_ptr_t)
- ( /*_.STEPNAME__V20*/
- meltfptr[19])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4799:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- (" /*then*/ -> "));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4800:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- melt_string_str ((melt_ptr_t)
- ( /*_.THENNAME__V21*/
- meltfptr[20])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4801:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
- (" [ arrowhead=normal, color=green ];"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4796:/ quasiblock");
-
-
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:4723:/ clear");
- /*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.SFLAG__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.SFLAGARGS__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.NODEBUF__V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.EDGEBUF__V17*/ meltfptr[16] = 0;
- /*^clear */
- /*clear *//*_.DATAMAP__V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.STEPMAP__V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.STEPNAME__V20*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.THENNAME__V21*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_#STEPHASH__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.DIS__V23*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.CLANAM__V24*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.FLAGRANK__V25*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.FLAGSTRING__V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.FLAGLOC__V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_#IS_MULTIPLE__L7*/ meltfnum[6] = 0;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ clear");
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("MGALTSTEP_STEPFLAGOPER", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 173
- void *mcfr_varptr[173];
-#define MELTFRAM_NBVARNUM 68
- long mcfr_varnum[68];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 173; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 173;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("TRANSLATE_MATCHCASE", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ getarg");
- /*_.CURMCASE__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.SLOC__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.PREVSTEP__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PREVSTEP__V4*/ meltfptr[3])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4815:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:4815:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4815:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4815;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase curmcase";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURMCASE__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
- 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);
- }
- ;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4815:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V6*/ meltfptr[5] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4815:/ quasiblock");
-
-
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4815:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4816:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_CASE */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:4816:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4816:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curmcase"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4816) ? (4816) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4816:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4817:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 1, "MCASE_MCTXT");
- /*_.MATCTX__V12*/
- meltfptr[11] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4818:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 2, "MCASE_SOURCE");
- /*_.CURSCAS__V13*/
- meltfptr[12] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4819:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 1, "LOCA_LOCATION");
- /*_.MLOC__V14*/
- meltfptr[13] = slot;
- };
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4821:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]),
- (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */
- meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:4821:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V16*/ meltfptr[15] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4821:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check matctx"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4821) ? (4821) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4821:/ clear");
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4822:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:4822:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4822:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4822;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase curscas";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSCAS__V13*/ meltfptr[12];
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
- 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);
- }
- ;
- /*_.IF___V18*/ meltfptr[17] =
- /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4822:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V18*/ meltfptr[17] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4822:/ quasiblock");
-
-
- /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
- /*^compute */
-
- /*_.IFCPP___V17*/ meltfptr[15] = /*_.PROGN___V20*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4822:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4823:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
- /*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-normatch.melt:4823:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4823:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4823;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase prevstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
- /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] =
- 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);
- }
- ;
- /*_.IF___V22*/ meltfptr[18] =
- /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4823:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V22*/ meltfptr[18] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4823:/ quasiblock");
-
-
- /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[18];;
- /*^compute */
-
- /*_.IFCPP___V21*/ meltfptr[17] = /*_.PROGN___V24*/ meltfptr[22];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4823:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V22*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V24*/ meltfptr[22] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V21*/ meltfptr[17] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4824:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L9*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]),
- (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */
- meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:4824:/ cond");
- /*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V26*/ meltfptr[22] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4824:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curscas"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4824) ? (4824) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V25*/ meltfptr[18] = /*_.IFELSE___V26*/ meltfptr[22];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4824:/ clear");
- /*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V25*/ meltfptr[18] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4825:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-normatch.melt:4826:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 1, "LOCA_LOCATION");
- /*_.CURLOC__V28*/
- meltfptr[27] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4827:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 2, "SCAM_PATT");
- /*_.CURPAT__V29*/
- meltfptr[28] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4828:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 3, "SCAM_BODY");
- /*_.CURBODY__V30*/
- meltfptr[29] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4829:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 2, "MCTX_NMATCHED");
- /*_.NMATX__V31*/
- meltfptr[30] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4830:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 6, "MCTX_MDATA");
- /*_.MDATA__V32*/
- meltfptr[31] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4831:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 0, "MCTX_NORMCTXT");
- /*_.NCX__V33*/
- meltfptr[32] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4832:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 5, "MCTX_ENV");
- /*_.ENV__V34*/
- meltfptr[33] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4834:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 4, "MCASE_VARMAP");
- /*_.MCASE_VARMAP__V35*/
- meltfptr[34] = slot;
- };
- ;
- /*_#MAPOBJECT_COUNT__L10*/ meltfnum[0] =
- (melt_count_mapobjects
- ((meltmapobjects_ptr_t) ( /*_.MCASE_VARMAP__V35*/ meltfptr[34])));;
- /*^compute */
-
- /*_#I__L11*/ meltfnum[1] =
- ((2) * ( /*_#MAPOBJECT_COUNT__L10*/ meltfnum[0]));;
- /*^compute */
-
- /*_#I__L12*/ meltfnum[11] =
- ((12) + ( /*_#I__L11*/ meltfnum[1]));;
- /*^compute */
-
- /*_.VARMAP__V36*/ meltfptr[35] =
- (meltgc_new_mapobjects
- ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[4])),
- ( /*_#I__L12*/ meltfnum[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:4835:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V33*/ meltfptr[32]), 6, "NCTX_SYMBCACHEMAP");
- /*_.SYCMAP__V37*/
- meltfptr[36] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4836:/ apply");
- /*apply */
- {
- /*_.NEWENV__V38*/ meltfptr[37] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!FRESH_ENV */ meltfrout->tabval[5])),
- (melt_ptr_t) ( /*_.ENV__V34*/ meltfptr[33]), (""),
- (union meltparam_un *) 0, "", (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4838:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L13*/ meltfnum[12] =
- /*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-normatch.melt:4838:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4838:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4838;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase nmatx";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMATX__V31*/ meltfptr[30];
- /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] =
- 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);
- }
- ;
- /*_.IF___V40*/ meltfptr[39] =
- /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4838:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V40*/ meltfptr[39] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4838:/ quasiblock");
-
-
- /*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[39];;
- /*^compute */
-
- /*_.IFCPP___V39*/ meltfptr[38] = /*_.PROGN___V42*/ meltfptr[40];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4838:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V40*/ meltfptr[39] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V42*/ meltfptr[40] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V39*/ meltfptr[38] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4839:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L15*/ meltfnum[13] =
- /*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-normatch.melt:4839:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4839:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4839;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase curpat";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURPAT__V29*/ meltfptr[28];
- /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] =
- 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);
- }
- ;
- /*_.IF___V44*/ meltfptr[40] =
- /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4839:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V44*/ meltfptr[40] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4839:/ quasiblock");
-
-
- /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[40];;
- /*^compute */
-
- /*_.IFCPP___V43*/ meltfptr[39] = /*_.PROGN___V46*/ meltfptr[44];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4839:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V44*/ meltfptr[40] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V46*/ meltfptr[44] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4840:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L17*/ meltfnum[12] =
- /*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-normatch.melt:4840:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4840:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4840;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase mdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MDATA__V32*/ meltfptr[31];
- /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] =
- 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);
- }
- ;
- /*_.IF___V48*/ meltfptr[44] =
- /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4840:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V48*/ meltfptr[44] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4840:/ quasiblock");
-
-
- /*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[44];;
- /*^compute */
-
- /*_.IFCPP___V47*/ meltfptr[40] = /*_.PROGN___V50*/ meltfptr[48];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4840:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V48*/ meltfptr[44] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V50*/ meltfptr[48] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V47*/ meltfptr[40] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4841:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L19*/ meltfnum[13] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V33*/ meltfptr[32]),
- (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
- meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:4841:/ cond");
- /*cond */ if ( /*_#IS_A__L19*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V52*/ meltfptr[48] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4841:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check ncx"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4841) ? (4841) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V52*/ meltfptr[48] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V51*/ meltfptr[44] = /*_.IFELSE___V52*/ meltfptr[48];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4841:/ clear");
- /*clear *//*_#IS_A__L19*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V52*/ meltfptr[48] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V51*/ meltfptr[44] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4842:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L20*/ meltfnum[12] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V34*/ meltfptr[33]),
- (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
- meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:4842:/ cond");
- /*cond */ if ( /*_#IS_A__L20*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V54*/ meltfptr[53] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4842:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check env"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (4842) ? (4842) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V53*/ meltfptr[48] = /*_.IFELSE___V54*/ meltfptr[53];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4842:/ clear");
- /*clear *//*_#IS_A__L20*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V53*/ meltfptr[48] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4843:/ quasiblock");
-
-
- /*^multimsend */
- /*multimsend */
- {
- union meltparam_un argtab[4];
- union meltparam_un restab[1];
- memset (&argtab, 0, sizeof (argtab));
- memset (&restab, 0, sizeof (restab));
- /*^multimsend.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MDATA__V32*/ meltfptr[31]; /*^multimsend.arg */
- argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.CURMCASE__V2*/ meltfptr[1]; /*^multimsend.arg */
- argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.VARMAP__V36*/ meltfptr[35]; /*^multimsend.arg */
- argtab[3].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V3*/ meltfptr[2];
- /*^multimsend.xres */
- restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MFLAG__V57*/ meltfptr[56]; /*^multimsend.send */
- /*_.MSTEP__V56*/ meltfptr[55] =
- meltgc_send ((melt_ptr_t) ( /*_.CURPAT__V29*/ meltfptr[28]),
- ((melt_ptr_t)
- (( /*!TRANSLATE_PATTERN */ meltfrout->tabval[8]))),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR MELTBPARSTR_PTR
- MELTBPARSTR_PTR ""), argtab, (MELTBPARSTR_PTR ""),
- restab);
- }
- ;
- /*^quasiblock */
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4846:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L21*/ meltfnum[13] =
- /*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-normatch.melt:4846:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4846:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4846;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase got mstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] =
- 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);
- }
- ;
- /*_.IF___V59*/ meltfptr[58] =
- /*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4846:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V59*/ meltfptr[58] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4846:/ quasiblock");
-
-
- /*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[58];;
- /*^compute */
-
- /*_.IFCPP___V58*/ meltfptr[57] = /*_.PROGN___V61*/ meltfptr[59];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4846:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V59*/ meltfptr[58] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V61*/ meltfptr[59] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V58*/ meltfptr[57] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4847:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L23*/ meltfnum[12] =
- /*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-normatch.melt:4847:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4847:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4847;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase got mflag";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MFLAG__V57*/ meltfptr[56];
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] =
- 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);
- }
- ;
- /*_.IF___V63*/ meltfptr[59] =
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4847:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V63*/ meltfptr[59] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4847:/ quasiblock");
-
-
- /*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[59];;
- /*^compute */
-
- /*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4847:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V63*/ meltfptr[59] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V65*/ meltfptr[63] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V62*/ meltfptr[58] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4848:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L25*/ meltfnum[13] =
- /*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-normatch.melt:4848:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4848:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4848;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase got curbody";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURBODY__V30*/ meltfptr[29];
- /*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] =
- 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);
- }
- ;
- /*_.IF___V67*/ meltfptr[63] =
- /*_.MELT_DEBUG_FUN__V68*/ meltfptr[67];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4848:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V67*/ meltfptr[63] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4848:/ quasiblock");
-
-
- /*_.PROGN___V69*/ meltfptr[67] = /*_.IF___V67*/ meltfptr[63];;
- /*^compute */
-
- /*_.IFCPP___V66*/ meltfptr[59] = /*_.PROGN___V69*/ meltfptr[67];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4848:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V67*/ meltfptr[63] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V69*/ meltfptr[67] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V66*/ meltfptr[59] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4849:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L27*/ meltfnum[12] =
- /*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-normatch.melt:4849:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4849:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4849;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase got varmap";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.VARMAP__V36*/ meltfptr[35];
- /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] =
- 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);
- }
- ;
- /*_.IF___V71*/ meltfptr[67] =
- /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4849:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V71*/ meltfptr[67] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4849:/ quasiblock");
-
-
- /*_.PROGN___V73*/ meltfptr[71] = /*_.IF___V71*/ meltfptr[67];;
- /*^compute */
-
- /*_.IFCPP___V70*/ meltfptr[63] = /*_.PROGN___V73*/ meltfptr[71];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4849:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V71*/ meltfptr[67] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V73*/ meltfptr[71] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V70*/ meltfptr[63] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_MAPOBJECT */
- {
- /*cit1__EACHOBMAP : */ int cit1__EACHOBMAP_ix = 0, cit1__EACHOBMAP_siz =
- 0;
- for (cit1__EACHOBMAP_ix = 0;
- /* we retrieve in cit1__EACHOBMAP_siz the size at each iteration since it could change. */
- cit1__EACHOBMAP_ix >= 0
- && (cit1__EACHOBMAP_siz =
- melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/
- meltfptr[35])) > 0
- && cit1__EACHOBMAP_ix < cit1__EACHOBMAP_siz; cit1__EACHOBMAP_ix++)
- {
- /*_.CURSYM__V74*/ meltfptr[67] = NULL;
- /*_.CURMDATA__V75*/ meltfptr[71] = NULL;
- /*_.CURSYM__V74*/ meltfptr[67] =
- ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/ meltfptr[35])->
- entab[cit1__EACHOBMAP_ix].e_at;
- if ( /*_.CURSYM__V74*/ meltfptr[67] == HTAB_DELETED_ENTRY)
- { /*_.CURSYM__V74*/
- meltfptr[67] = NULL;
- continue;
- };
- if (! /*_.CURSYM__V74*/ meltfptr[67])
- continue;
- /*_.CURMDATA__V75*/ meltfptr[71] =
- ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/ meltfptr[35])->
- entab[cit1__EACHOBMAP_ix].e_va;
- if (! /*_.CURMDATA__V75*/ meltfptr[71])
- continue;
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4853:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L29*/ meltfnum[13] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURSYM__V74*/ meltfptr[67]),
- (melt_ptr_t) (( /*!CLASS_SYMBOL */
- meltfrout->tabval[9])));;
- MELT_LOCATION ("warmelt-normatch.melt:4853:/ cond");
- /*cond */ if ( /*_#IS_A__L29*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V77*/ meltfptr[76] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4853:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check cursym"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (4853) ? (4853) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V76*/ meltfptr[75] = /*_.IFELSE___V77*/ meltfptr[76];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4853:/ clear");
- /*clear *//*_#IS_A__L29*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V76*/ meltfptr[75] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4854:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L30*/ meltfnum[12] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURMDATA__V75*/ meltfptr[71]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
- meltfrout->tabval[10])));;
- MELT_LOCATION ("warmelt-normatch.melt:4854:/ cond");
- /*cond */ if ( /*_#IS_A__L30*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V79*/ meltfptr[78] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:4854:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check curmdata"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (4854) ? (4854) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V79*/ meltfptr[78] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V78*/ meltfptr[76] = /*_.IFELSE___V79*/ meltfptr[78];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4854:/ clear");
- /*clear *//*_#IS_A__L30*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V79*/ meltfptr[78] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V78*/ meltfptr[76] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4855:/ quasiblock");
-
-
- /*_.MAKE_INTEGERBOX__V81*/ meltfptr[80] =
- (meltgc_new_int
- ((meltobject_ptr_t)
- (( /*!DISCR_INTEGER */ meltfrout->tabval[12])), (0)));;
- MELT_LOCATION ("warmelt-normatch.melt:4855:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_MATCHED_BINDING */ meltfrout->tabval[11])), (3), "CLASS_MATCHED_BINDING");
- /*_.INST__V83*/ meltfptr[82] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @BINDER",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V83*/ meltfptr[82]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (0),
- ( /*_.CURSYM__V74*/ meltfptr[67]), "BINDER");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MATCHBIND_DATA",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V83*/ meltfptr[82]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (1),
- ( /*_.CURMDATA__V75*/ meltfptr[71]),
- "MATCHBIND_DATA");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MATCHBIND_NBOCC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V83*/ meltfptr[82]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (2),
- ( /*_.MAKE_INTEGERBOX__V81*/ meltfptr[80]),
- "MATCHBIND_NBOCC");
- ;
- /*_.MATCHBIND__V82*/ meltfptr[81] = /*_.INST__V83*/ meltfptr[82];;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4861:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L31*/ meltfnum[13] =
- /*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-normatch.melt:4861:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4861:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4861;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase matchbind";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATCHBIND__V82*/ meltfptr[81];
- /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] =
- 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);
- }
- ;
- /*_.IF___V85*/ meltfptr[84] =
- /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4861:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V85*/ meltfptr[84] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4861:/ quasiblock");
-
-
- /*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];;
- /*^compute */
-
- /*_.IFCPP___V84*/ meltfptr[83] = /*_.PROGN___V87*/ meltfptr[85];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4861:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V85*/ meltfptr[84] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V87*/ meltfptr[85] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V84*/ meltfptr[83] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4862:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATCHBIND__V82*/ meltfptr[81];
- /*_.PUT_ENV__V88*/ meltfptr[84] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!PUT_ENV */ meltfrout->tabval[13])),
- (melt_ptr_t) ( /*_.NEWENV__V38*/ meltfptr[37]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.LET___V80*/ meltfptr[78] = /*_.PUT_ENV__V88*/ meltfptr[84];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4855:/ clear");
- /*clear *//*_.MAKE_INTEGERBOX__V81*/ meltfptr[80] = 0;
- /*^clear */
- /*clear *//*_.MATCHBIND__V82*/ meltfptr[81] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V84*/ meltfptr[83] = 0;
- /*^clear */
- /*clear *//*_.PUT_ENV__V88*/ meltfptr[84] = 0;
- /* end cit1__EACHOBMAP */
- /*_.CURSYM__V74*/ meltfptr[67] = NULL;
- /*_.CURMDATA__V75*/ meltfptr[71] = NULL;
- }
-
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4850:/ clear");
- /*clear *//*_.CURSYM__V74*/ meltfptr[67] = 0;
- /*^clear */
- /*clear *//*_.CURMDATA__V75*/ meltfptr[71] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V76*/ meltfptr[75] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V78*/ meltfptr[76] = 0;
- /*^clear */
- /*clear *//*_.LET___V80*/ meltfptr[78] = 0;
- } /*endciterblock FOREACH_IN_MAPOBJECT */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4864:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L33*/ meltfnum[12] =
- /*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-normatch.melt:4864:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4864:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4864;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase updated newenv";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NEWENV__V38*/ meltfptr[37];
- /*_.MELT_DEBUG_FUN__V91*/ meltfptr[81] =
- 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);
- }
- ;
- /*_.IF___V90*/ meltfptr[80] =
- /*_.MELT_DEBUG_FUN__V91*/ meltfptr[81];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4864:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[81] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V90*/ meltfptr[80] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4864:/ quasiblock");
-
-
- /*_.PROGN___V92*/ meltfptr[83] = /*_.IF___V90*/ meltfptr[80];;
- /*^compute */
-
- /*_.IFCPP___V89*/ meltfptr[85] = /*_.PROGN___V92*/ meltfptr[83];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4864:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V90*/ meltfptr[80] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V92*/ meltfptr[83] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V89*/ meltfptr[85] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4865:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L35*/ meltfnum[13] =
- /*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-normatch.melt:4865:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4865:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4865;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase before normalizing curbody";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURBODY__V30*/ meltfptr[29];
- /*_.MELT_DEBUG_FUN__V95*/ meltfptr[80] =
- 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);
- }
- ;
- /*_.IF___V94*/ meltfptr[81] =
- /*_.MELT_DEBUG_FUN__V95*/ meltfptr[80];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4865:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V95*/ meltfptr[80] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V94*/ meltfptr[81] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4865:/ quasiblock");
-
-
- /*_.PROGN___V96*/ meltfptr[83] = /*_.IF___V94*/ meltfptr[81];;
- /*^compute */
-
- /*_.IFCPP___V93*/ meltfptr[84] = /*_.PROGN___V96*/ meltfptr[83];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4865:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V94*/ meltfptr[81] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V96*/ meltfptr[83] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V93*/ meltfptr[84] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4866:/ quasiblock");
-
-
- /*^multiapply */
- /*multiapply 4args, 1x.res */
- {
- union meltparam_un argtab[3];
-
- union meltparam_un restab[1];
- memset (&restab, 0, sizeof (restab));
- memset (&argtab, 0, sizeof (argtab));
- /*^multiapply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NEWENV__V38*/ meltfptr[37]; /*^multiapply.arg */
- argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NCX__V33*/ meltfptr[32]; /*^multiapply.arg */
- argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V3*/ meltfptr[2];
- /*^multiapply.xres */
- restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NBINDS__V99*/ meltfptr[83];
- /*^multiapply.appl */
- /*_.NBODY__V98*/ meltfptr[81] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!NORMALIZE_TUPLE */ meltfrout->tabval[14])),
- (melt_ptr_t) ( /*_.CURBODY__V30*/ meltfptr[29]),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR MELTBPARSTR_PTR ""),
- argtab, (MELTBPARSTR_PTR ""), restab);
- }
- ;
- /*^quasiblock */
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4869:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L37*/ meltfnum[12] =
- /*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-normatch.melt:4869:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4869:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4869;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase nbody after body normalization";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NBODY__V98*/ meltfptr[81];
- /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
- 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);
- }
- ;
- /*_.IF___V101*/ meltfptr[100] =
- /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4869:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V101*/ meltfptr[100] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4869:/ quasiblock");
-
-
- /*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[100];;
- /*^compute */
-
- /*_.IFCPP___V100*/ meltfptr[99] = /*_.PROGN___V103*/ meltfptr[101];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4869:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.IF___V101*/ meltfptr[100] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V103*/ meltfptr[101] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V100*/ meltfptr[99] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4870:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L39*/ meltfnum[13] =
- /*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-normatch.melt:4870:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4870:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4870;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase nbinds after body normalization";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NBINDS__V99*/ meltfptr[83];
- /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] =
- 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);
- }
- ;
- /*_.IF___V105*/ meltfptr[101] =
- /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4870:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V105*/ meltfptr[101] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4870:/ quasiblock");
-
-
- /*_.PROGN___V107*/ meltfptr[105] = /*_.IF___V105*/ meltfptr[101];;
- /*^compute */
-
- /*_.IFCPP___V104*/ meltfptr[100] = /*_.PROGN___V107*/ meltfptr[105];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4870:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[13] = 0;
- /*^clear */
- /*clear *//*_.IF___V105*/ meltfptr[101] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V107*/ meltfptr[105] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V104*/ meltfptr[100] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4871:/ quasiblock");
-
-
- /*_.LISTVAROCC__V109*/ meltfptr[105] =
- (meltgc_new_list
- ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[15]))));;
- MELT_LOCATION ("warmelt-normatch.melt:4873:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NEWENV__V38*/ meltfptr[37]), (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[7])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NEWENV__V38*/ meltfptr[37]), 0, "ENV_BIND");
- /*_.NEWBINDMAP__V110*/
- meltfptr[109] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NEWBINDMAP__V110*/ meltfptr[109] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4874:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[16])), (7), "CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG");
- /*_.INST__V112*/ meltfptr[111] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @LOCA_LOCATION",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (1),
- ( /*_.SLOC__V3*/ meltfptr[2]), "LOCA_LOCATION");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEP_THEN",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (2),
- (( /*nil */ NULL)), "MSTEP_THEN");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEP_FLAG",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (3),
- ( /*_.MFLAG__V57*/ meltfptr[56]), "MSTEP_FLAG");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_VAROCC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (4),
- (( /*nil */ NULL)), "MSTEPSUCCESS_VAROCC");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_BINDS",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (5),
- ( /*_.NBINDS__V99*/ meltfptr[83]),
- "MSTEPSUCCESS_BINDS");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_BODY",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V112*/ meltfptr[111])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (6),
- ( /*_.NBODY__V98*/ meltfptr[81]),
- "MSTEPSUCCESS_BODY");
- ;
- /*_.STEPSUCC__V111*/ meltfptr[110] = /*_.INST__V112*/ meltfptr[111];;
- /*citerblock FOREACH_IN_MAPOBJECT */
- {
- /*cit2__EACHOBMAP : */ int cit2__EACHOBMAP_ix = 0, cit2__EACHOBMAP_siz =
- 0;
- for (cit2__EACHOBMAP_ix = 0;
- /* we retrieve in cit2__EACHOBMAP_siz the size at each iteration since it could change. */
- cit2__EACHOBMAP_ix >= 0
- && (cit2__EACHOBMAP_siz =
- melt_size_mapobjects ((meltmapobjects_ptr_t)
- /*_.NEWBINDMAP__V110*/ meltfptr[109])) >
- 0
- && cit2__EACHOBMAP_ix < cit2__EACHOBMAP_siz; cit2__EACHOBMAP_ix++)
- {
- /*_.BSYMB__V113*/ meltfptr[112] = NULL;
- /*_.BINDING__V114*/ meltfptr[113] = NULL;
- /*_.BSYMB__V113*/ meltfptr[112] =
- ((meltmapobjects_ptr_t) /*_.NEWBINDMAP__V110*/ meltfptr[109])->
- entab[cit2__EACHOBMAP_ix].e_at;
- if ( /*_.BSYMB__V113*/ meltfptr[112] == HTAB_DELETED_ENTRY)
- { /*_.BSYMB__V113*/
- meltfptr[112] = NULL;
- continue;
- };
- if (! /*_.BSYMB__V113*/ meltfptr[112])
- continue;
- /*_.BINDING__V114*/ meltfptr[113] =
- ((meltmapobjects_ptr_t) /*_.NEWBINDMAP__V110*/ meltfptr[109])->
- entab[cit2__EACHOBMAP_ix].e_va;
- if (! /*_.BINDING__V114*/ meltfptr[113])
- continue;
-
-
-
- /*_#IS_A__L41*/ meltfnum[12] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.BINDING__V114*/ meltfptr[113]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_BINDING */
- meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:4886:/ cond");
- /*cond */ if ( /*_#IS_A__L41*/ meltfnum[12]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:4887:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.BINDING__V114*/ meltfptr[113]), 2, "MATCHBIND_NBOCC");
- /*_.MATCHBIND_NBOCC__V115*/
- meltfptr[114] = slot;
- };
- ;
- /*_#GET_INT__L43*/ meltfnum[42] =
- (melt_get_int
- ((melt_ptr_t)
- ( /*_.MATCHBIND_NBOCC__V115*/ meltfptr[114])));;
- /*^compute */
-
- /*_#I__L44*/ meltfnum[43] =
- (( /*_#GET_INT__L43*/ meltfnum[42]) > (0));;
- /*^compute */
-
- /*_#IF___L42*/ meltfnum[13] = /*_#I__L44*/ meltfnum[43];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4886:/ clear");
- /*clear *//*_.MATCHBIND_NBOCC__V115*/ meltfptr[114] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L43*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_#I__L44*/ meltfnum[43] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_#IF___L42*/ meltfnum[13] = 0;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4886:/ cond");
- /*cond */ if ( /*_#IF___L42*/ meltfnum[13]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:4888:/ quasiblock");
-
-
- /*_.SYOCC__V116*/ meltfptr[114] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.SYCMAP__V37*/ meltfptr[36]),
- (meltobject_ptr_t) ( /*_.BSYMB__V113*/
- meltfptr[112]));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4890:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L45*/ meltfnum[42] =
- /*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-normatch.melt:4890:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L45*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4890:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4890;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase found syocc";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.SYOCC__V116*/ meltfptr[114];
- /*_.MELT_DEBUG_FUN__V119*/ meltfptr[118] =
- 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);
- }
- ;
- /*_.IF___V118*/ meltfptr[117] =
- /*_.MELT_DEBUG_FUN__V119*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4890:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V119*/ meltfptr[118] =
- 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V118*/ meltfptr[117] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4890:/ quasiblock");
-
-
- /*_.PROGN___V120*/ meltfptr[118] =
- /*_.IF___V118*/ meltfptr[117];;
- /*^compute */
-
- /*_.IFCPP___V117*/ meltfptr[116] =
- /*_.PROGN___V120*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4890:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L45*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V118*/ meltfptr[117] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V120*/ meltfptr[118] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V117*/ meltfptr[116] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4891:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L47*/ meltfnum[43] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.SYOCC__V116*/ meltfptr[114]),
- (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:4891:/ cond");
- /*cond */ if ( /*_#IS_A__L47*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V122*/ meltfptr[118] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:4891:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check syocc"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__,
- (4891) ? (4891) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V122*/ meltfptr[118] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V121*/ meltfptr[117] =
- /*_.IFELSE___V122*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4891:/ clear");
- /*clear *//*_#IS_A__L47*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V122*/ meltfptr[118] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V121*/ meltfptr[117] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4892:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SYOCC__V116*/ meltfptr[114]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[18])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYOCC__V116*/ meltfptr[114]), 3, "NOCC_BIND");
- /*_.NOCC_BIND__V124*/
- meltfptr[123] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NOCC_BIND__V124*/ meltfptr[123] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#__L48*/ meltfnum[42] =
- (( /*_.NOCC_BIND__V124*/ meltfptr[123]) ==
- ( /*_.BINDING__V114*/ meltfptr[113]));;
- MELT_LOCATION ("warmelt-normatch.melt:4892:/ cond");
- /*cond */ if ( /*_#__L48*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V125*/ meltfptr[124] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:4892:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check syocc binding"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__,
- (4892) ? (4892) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V125*/ meltfptr[124] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V123*/ meltfptr[118] =
- /*_.IFELSE___V125*/ meltfptr[124];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4892:/ clear");
- /*clear *//*_.NOCC_BIND__V124*/ meltfptr[123] = 0;
- /*^clear */
- /*clear *//*_#__L48*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V125*/ meltfptr[124] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V123*/ meltfptr[118] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:4893:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.LISTVAROCC__V109*/ meltfptr[105]),
- (melt_ptr_t) ( /*_.SYOCC__V116*/
- meltfptr[114]));
- }
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:4888:/ clear");
- /*clear *//*_.SYOCC__V116*/ meltfptr[114] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V117*/ meltfptr[116] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V121*/ meltfptr[117] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V123*/ meltfptr[118] = 0;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
- /* end cit2__EACHOBMAP */
- /*_.BSYMB__V113*/ meltfptr[112] = NULL;
- /*_.BINDING__V114*/ meltfptr[113] = NULL;
- }
-
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4883:/ clear");
- /*clear *//*_.BSYMB__V113*/ meltfptr[112] = 0;
- /*^clear */
- /*clear *//*_.BINDING__V114*/ meltfptr[113] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L41*/ meltfnum[12] = 0;
- /*^clear */
- /*clear *//*_#IF___L42*/ meltfnum[13] = 0;
- } /*endciterblock FOREACH_IN_MAPOBJECT */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4896:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L49*/ meltfnum[43] =
- /*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-normatch.melt:4896:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4896:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4896;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase listvarocc";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LISTVAROCC__V109*/ meltfptr[105];
- /*_.MELT_DEBUG_FUN__V128*/ meltfptr[114] =
- 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);
- }
- ;
- /*_.IF___V127*/ meltfptr[124] =
- /*_.MELT_DEBUG_FUN__V128*/ meltfptr[114];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4896:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V128*/ meltfptr[114] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V127*/ meltfptr[124] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4896:/ quasiblock");
-
-
- /*_.PROGN___V129*/ meltfptr[116] = /*_.IF___V127*/ meltfptr[124];;
- /*^compute */
-
- /*_.IFCPP___V126*/ meltfptr[123] = /*_.PROGN___V129*/ meltfptr[116];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4896:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IF___V127*/ meltfptr[124] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V129*/ meltfptr[116] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V126*/ meltfptr[123] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4897:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L51*/ meltfnum[42] =
- /*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-normatch.melt:4897:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4897:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4897;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase have mstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V132*/ meltfptr[114] =
- 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);
- }
- ;
- /*_.IF___V131*/ meltfptr[118] =
- /*_.MELT_DEBUG_FUN__V132*/ meltfptr[114];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4897:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V132*/ meltfptr[114] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V131*/ meltfptr[118] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4897:/ quasiblock");
-
-
- /*_.PROGN___V133*/ meltfptr[124] = /*_.IF___V131*/ meltfptr[118];;
- /*^compute */
-
- /*_.IFCPP___V130*/ meltfptr[117] = /*_.PROGN___V133*/ meltfptr[124];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4897:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V131*/ meltfptr[118] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V133*/ meltfptr[124] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V130*/ meltfptr[117] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4898:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-normatch.melt:4900:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[20]);
- /*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[19])),
- (melt_ptr_t) ( /*_.LISTVAROCC__V109*/ meltfptr[105]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ quasiblock");
-
-
- /*^newclosure */
- /*newclosure *//*_.LAMBDA___V136*/ meltfptr[118] =
- meltgc_new_closure ((meltobject_ptr_t)
- (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
- (meltroutine_ptr_t) (( /*!konst_23 */ meltfrout->
- tabval[23])), (0));
- ;
- /*_.LAMBDA___V135*/ meltfptr[114] = /*_.LAMBDA___V136*/ meltfptr[118];;
- /*^compute */
-
- /*_.SORTEDVAROCC__V137*/ meltfptr[124] =
- meltgc_sort_multiple ((melt_ptr_t)
- ( /*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116]),
- (melt_ptr_t) ( /*_.LAMBDA___V135*/ meltfptr[114]),
- (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
- tabval[20])));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4905:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L53*/ meltfnum[43] =
- /*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-normatch.melt:4905:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4905:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4905;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase sortedvarocc";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.SORTEDVAROCC__V137*/ meltfptr[124];
- /*_.MELT_DEBUG_FUN__V140*/ meltfptr[139] =
- 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);
- }
- ;
- /*_.IF___V139*/ meltfptr[138] =
- /*_.MELT_DEBUG_FUN__V140*/ meltfptr[139];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4905:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V140*/ meltfptr[139] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V139*/ meltfptr[138] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4905:/ quasiblock");
-
-
- /*_.PROGN___V141*/ meltfptr[139] = /*_.IF___V139*/ meltfptr[138];;
- /*^compute */
-
- /*_.IFCPP___V138*/ meltfptr[137] = /*_.PROGN___V141*/ meltfptr[139];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4905:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IF___V139*/ meltfptr[138] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V141*/ meltfptr[139] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V138*/ meltfptr[137] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4906:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEPSUCC__V111*/ meltfptr[110]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[16])))) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_VAROCC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.STEPSUCC__V111*/
- meltfptr[110])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.STEPSUCC__V111*/ meltfptr[110]), (4),
- ( /*_.SORTEDVAROCC__V137*/ meltfptr[124]),
- "MSTEPSUCCESS_VAROCC");
- ;
- /*^touch */
- meltgc_touch ( /*_.STEPSUCC__V111*/ meltfptr[110]);
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:4898:/ clear");
- /*clear *//*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116] = 0;
- /*^clear */
- /*clear *//*_.LAMBDA___V135*/ meltfptr[114] = 0;
- /*^clear */
- /*clear *//*_.SORTEDVAROCC__V137*/ meltfptr[124] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V138*/ meltfptr[137] = 0;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4908:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L55*/ meltfnum[42] =
- /*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-normatch.melt:4908:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4908:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4908;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase stepsucc";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
- /*_.MELT_DEBUG_FUN__V144*/ meltfptr[116] =
- 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);
- }
- ;
- /*_.IF___V143*/ meltfptr[139] =
- /*_.MELT_DEBUG_FUN__V144*/ meltfptr[116];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4908:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V144*/ meltfptr[116] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V143*/ meltfptr[139] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4908:/ quasiblock");
-
-
- /*_.PROGN___V145*/ meltfptr[114] = /*_.IF___V143*/ meltfptr[139];;
- /*^compute */
-
- /*_.IFCPP___V142*/ meltfptr[138] = /*_.PROGN___V145*/ meltfptr[114];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4908:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V143*/ meltfptr[139] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V145*/ meltfptr[114] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V142*/ meltfptr[138] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4909:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L57*/ meltfnum[43] =
- /*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-normatch.melt:4909:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L57*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4909:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4909;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase mstep before put_then";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V148*/ meltfptr[116] =
- 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);
- }
- ;
- /*_.IF___V147*/ meltfptr[137] =
- /*_.MELT_DEBUG_FUN__V148*/ meltfptr[116];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4909:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V148*/ meltfptr[116] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V147*/ meltfptr[137] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4909:/ quasiblock");
-
-
- /*_.PROGN___V149*/ meltfptr[139] = /*_.IF___V147*/ meltfptr[137];;
- /*^compute */
-
- /*_.IFCPP___V146*/ meltfptr[124] = /*_.PROGN___V149*/ meltfptr[139];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4909:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L57*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IF___V147*/ meltfptr[137] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V149*/ meltfptr[139] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V146*/ meltfptr[124] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4910:/ msend");
- /*msend */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
- /*_.PUT_THEN_MATCH__V150*/ meltfptr[114] =
- meltgc_send ((melt_ptr_t) ( /*_.MSTEP__V56*/ meltfptr[55]),
- (melt_ptr_t) (( /*!PUT_THEN_MATCH */ meltfrout->
- tabval[24])), (MELTBPARSTR_PTR ""),
- argtab, "", (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4911:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L59*/ meltfnum[42] =
- /*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-normatch.melt:4911:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L59*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4911:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4911;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase updated mstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V153*/ meltfptr[139] =
- 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);
- }
- ;
- /*_.IF___V152*/ meltfptr[137] =
- /*_.MELT_DEBUG_FUN__V153*/ meltfptr[139];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4911:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V153*/ meltfptr[139] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V152*/ meltfptr[137] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4911:/ quasiblock");
-
-
- /*_.PROGN___V154*/ meltfptr[139] = /*_.IF___V152*/ meltfptr[137];;
- /*^compute */
-
- /*_.IFCPP___V151*/ meltfptr[116] = /*_.PROGN___V154*/ meltfptr[139];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4911:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L59*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V152*/ meltfptr[137] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V154*/ meltfptr[139] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V151*/ meltfptr[116] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4912:/ cond");
- /*cond */ if ( /*_.PREVSTEP__V4*/ meltfptr[3]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4914:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L61*/ meltfnum[43] =
- /*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-normatch.melt:4914:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4914:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4914;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase got prevstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
- /*_.MELT_DEBUG_FUN__V158*/ meltfptr[157] =
- 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);
- }
- ;
- /*_.IF___V157*/ meltfptr[156] =
- /*_.MELT_DEBUG_FUN__V158*/ meltfptr[157];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4914:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V158*/ meltfptr[157] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V157*/ meltfptr[156] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4914:/ quasiblock");
-
-
- /*_.PROGN___V159*/ meltfptr[157] = /*_.IF___V157*/ meltfptr[156];;
- /*^compute */
-
- /*_.IFCPP___V156*/ meltfptr[139] =
- /*_.PROGN___V159*/ meltfptr[157];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4914:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IF___V157*/ meltfptr[156] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V159*/ meltfptr[157] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V156*/ meltfptr[139] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4913:/ quasiblock");
-
-
- /*_.PROGN___V160*/ meltfptr[156] = ( /*nil */ NULL);;
- /*^compute */
-
- /*_.IF___V155*/ meltfptr[137] = /*_.PROGN___V160*/ meltfptr[156];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4912:/ clear");
- /*clear *//*_.IFCPP___V156*/ meltfptr[139] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V160*/ meltfptr[156] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V155*/ meltfptr[137] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4919:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L63*/ meltfnum[42] =
- /*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-normatch.melt:4919:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4919:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4919;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase updated prevstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[156] =
- 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);
- }
- ;
- /*_.IF___V162*/ meltfptr[139] =
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[156];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4919:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[156] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V162*/ meltfptr[139] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4919:/ quasiblock");
-
-
- /*_.PROGN___V164*/ meltfptr[156] = /*_.IF___V162*/ meltfptr[139];;
- /*^compute */
-
- /*_.IFCPP___V161*/ meltfptr[157] = /*_.PROGN___V164*/ meltfptr[156];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4919:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V162*/ meltfptr[139] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V164*/ meltfptr[156] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V161*/ meltfptr[157] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4920:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L65*/ meltfnum[43] =
- /*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-normatch.melt:4920:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[43]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4920:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4920;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "translate_matchcase return mstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V167*/ meltfptr[166] =
- 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);
- }
- ;
- /*_.IF___V166*/ meltfptr[156] =
- /*_.MELT_DEBUG_FUN__V167*/ meltfptr[166];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4920:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V167*/ meltfptr[166] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V166*/ meltfptr[156] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4920:/ quasiblock");
-
-
- /*_.PROGN___V168*/ meltfptr[166] = /*_.IF___V166*/ meltfptr[156];;
- /*^compute */
-
- /*_.IFCPP___V165*/ meltfptr[139] = /*_.PROGN___V168*/ meltfptr[166];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4920:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.IF___V166*/ meltfptr[156] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V168*/ meltfptr[166] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V165*/ meltfptr[139] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:4921:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L67*/ meltfnum[42] =
- /*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-normatch.melt:4921:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[42]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:4921:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 4921;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "translate_matchcase return stepsucc";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
- /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] =
- 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);
- }
- ;
- /*_.IF___V170*/ meltfptr[166] =
- /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4921:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V170*/ meltfptr[166] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4921:/ quasiblock");
-
-
- /*_.PROGN___V172*/ meltfptr[170] = /*_.IF___V170*/ meltfptr[166];;
- /*^compute */
-
- /*_.IFCPP___V169*/ meltfptr[156] = /*_.PROGN___V172*/ meltfptr[170];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:4921:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[42] = 0;
- /*^clear */
- /*clear *//*_.IF___V170*/ meltfptr[166] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V172*/ meltfptr[170] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V169*/ meltfptr[156] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4922:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.MSTEP__V56*/ meltfptr[55];;
- MELT_LOCATION ("warmelt-normatch.melt:4922:/ putxtraresult");
- if (!meltxrestab_ || !meltxresdescr_)
- goto labend_rout;
- if (meltxresdescr_[0] != MELTBPAR_PTR)
- goto labend_rout;
- if (meltxrestab_[0].meltbp_aptr)
- *(meltxrestab_[0].meltbp_aptr) =
- (melt_ptr_t) ( /*_.STEPSUCC__V111*/ meltfptr[110]);
- ;
- /*^finalreturn */
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V108*/ meltfptr[101] = /*_.RETURN___V173*/ meltfptr[166];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4871:/ clear");
- /*clear *//*_.LISTVAROCC__V109*/ meltfptr[105] = 0;
- /*^clear */
- /*clear *//*_.NEWBINDMAP__V110*/ meltfptr[109] = 0;
- /*^clear */
- /*clear *//*_.STEPSUCC__V111*/ meltfptr[110] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V126*/ meltfptr[123] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V130*/ meltfptr[117] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V142*/ meltfptr[138] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V146*/ meltfptr[124] = 0;
- /*^clear */
- /*clear *//*_.PUT_THEN_MATCH__V150*/ meltfptr[114] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V151*/ meltfptr[116] = 0;
- /*^clear */
- /*clear *//*_.IF___V155*/ meltfptr[137] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V161*/ meltfptr[157] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V165*/ meltfptr[139] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V169*/ meltfptr[156] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V173*/ meltfptr[166] = 0;
- /*_.MULTI___V97*/ meltfptr[80] = /*_.LET___V108*/ meltfptr[101];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4866:/ clear");
- /*clear *//*_.IFCPP___V100*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V104*/ meltfptr[100] = 0;
- /*^clear */
- /*clear *//*_.LET___V108*/ meltfptr[101] = 0;
-
- /*^clear */
- /*clear *//*_.NBINDS__V99*/ meltfptr[83] = 0;
- /*_.MULTI___V55*/ meltfptr[53] = /*_.MULTI___V97*/ meltfptr[80];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4843:/ clear");
- /*clear *//*_.IFCPP___V58*/ meltfptr[57] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V62*/ meltfptr[58] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V66*/ meltfptr[59] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V70*/ meltfptr[63] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V89*/ meltfptr[85] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V93*/ meltfptr[84] = 0;
- /*^clear */
- /*clear *//*_.MULTI___V97*/ meltfptr[80] = 0;
-
- /*^clear */
- /*clear *//*_.MFLAG__V57*/ meltfptr[56] = 0;
- /*_.LET___V27*/ meltfptr[22] = /*_.MULTI___V55*/ meltfptr[53];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4825:/ clear");
- /*clear *//*_.CURLOC__V28*/ meltfptr[27] = 0;
- /*^clear */
- /*clear *//*_.CURPAT__V29*/ meltfptr[28] = 0;
- /*^clear */
- /*clear *//*_.CURBODY__V30*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_.NMATX__V31*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.MDATA__V32*/ meltfptr[31] = 0;
- /*^clear */
- /*clear *//*_.NCX__V33*/ meltfptr[32] = 0;
- /*^clear */
- /*clear *//*_.ENV__V34*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.MCASE_VARMAP__V35*/ meltfptr[34] = 0;
- /*^clear */
- /*clear *//*_#MAPOBJECT_COUNT__L10*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_#I__L11*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_#I__L12*/ meltfnum[11] = 0;
- /*^clear */
- /*clear *//*_.VARMAP__V36*/ meltfptr[35] = 0;
- /*^clear */
- /*clear *//*_.SYCMAP__V37*/ meltfptr[36] = 0;
- /*^clear */
- /*clear *//*_.NEWENV__V38*/ meltfptr[37] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V39*/ meltfptr[38] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V43*/ meltfptr[39] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V47*/ meltfptr[40] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V51*/ meltfptr[44] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V53*/ meltfptr[48] = 0;
- /*^clear */
- /*clear *//*_.MULTI___V55*/ meltfptr[53] = 0;
- /*_.LET___V11*/ meltfptr[6] = /*_.LET___V27*/ meltfptr[22];;
-
- MELT_LOCATION ("warmelt-normatch.melt:4817:/ clear");
- /*clear *//*_.MATCTX__V12*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.CURSCAS__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.MLOC__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V17*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V21*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V25*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.LET___V27*/ meltfptr[22] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.LET___V11*/ meltfptr[6] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("TRANSLATE_MATCHCASE", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un * meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un * meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_96_warmelt_normatch_LAMBDA___23___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 6
- void *mcfr_varptr[6];
-/*no varnum*/
-#define MELTFRAM_NBVARNUM /*none*/0
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 6; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 6;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ getarg");
- /*_.O1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.O2__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.O2__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:4902:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.O1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.O1__V2*/ meltfptr[1]), 1, "NOCC_SYMB");
- /*_.NOCC_SYMB__V4*/
- meltfptr[3] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NOCC_SYMB__V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4902:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.O2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.O2__V3*/ meltfptr[2]), 1, "NOCC_SYMB");
- /*_.NOCC_SYMB__V5*/
- meltfptr[4] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NOCC_SYMB__V5*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4902:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.NOCC_SYMB__V5*/ meltfptr[4];
- /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!COMPARE_NAMED_ALPHA */ meltfrout->tabval[0])),
- (melt_ptr_t) ( /*_.NOCC_SYMB__V4*/ meltfptr[3]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.NOCC_SYMB__V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.NOCC_SYMB__V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_96_warmelt_normatch_LAMBDA___23__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 21
- void *mcfr_varptr[21];
-#define MELTFRAM_NBVARNUM 6
- long mcfr_varnum[6];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 21; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 21;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("ALTMATCH_NORMALIZE_FLAG", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ getarg");
- /*_.FLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NMCTXT__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5030:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5030:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5030:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5030;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "altmatch_normalize_flag flag";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.FLAG__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
- 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);
- }
- ;
- /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5030:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V5*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5030:/ quasiblock");
-
-
- /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5030:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5031:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5031:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5031:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("altmatch_normalize_flag check flag"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5031) ? (5031) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5031:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5033:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5033:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5033:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("altmatch_normalize_flag check nmctxt"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5033) ? (5033) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5033:/ clear");
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5035:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 3, "MATNORX_FLAGMAP");
- /*_.FLAGMAP__V13*/
- meltfptr[12] = slot;
- };
- ;
- /*_.NFLA__V14*/ meltfptr[13] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.FLAGMAP__V13*/ meltfptr[12]),
- (meltobject_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:5037:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 1, "MATNORX_NMATCH");
- /*_.NMATCH__V15*/
- meltfptr[14] = slot;
- };
- ;
- /*_#NULL__L5*/ meltfnum[1] =
- (( /*_.NFLA__V14*/ meltfptr[13]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:5039:/ cond");
- /*cond */ if ( /*_#NULL__L5*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:5042:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[3])), (3), "CLASS_NREP_MATCH_FLAG");
- /*_.INST__V17*/ meltfptr[16] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NRPFLA_FLAG",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V17*/ meltfptr[16]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (1),
- ( /*_.FLAG__V2*/ meltfptr[1]), "NRPFLA_FLAG");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NRPFLA_NMATCH",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V17*/ meltfptr[16]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (2),
- ( /*_.NMATCH__V15*/ meltfptr[14]),
- "NRPFLA_NMATCH");
- ;
- /*_.INST___V16*/ meltfptr[15] = /*_.INST__V17*/ meltfptr[16];;
- MELT_LOCATION ("warmelt-normatch.melt:5041:/ compute");
- /*_.NFLA__V14*/ meltfptr[13] = /*_.SETQ___V18*/ meltfptr[17] =
- /*_.INST___V16*/ meltfptr[15];;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:5045:/ locexp");
- meltgc_put_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.FLAGMAP__V13*/ meltfptr[12]),
- (meltobject_ptr_t) ( /*_.FLAG__V2*/
- meltfptr[1]),
- (melt_ptr_t) ( /*_.NFLA__V14*/
- meltfptr[13]));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5040:/ quasiblock");
-
-
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5039:/ clear");
- /*clear *//*_.INST___V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.SETQ___V18*/ meltfptr[17] = 0;
- }
- ;
- } /*noelse */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5046:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L6*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NFLA__V14*/ meltfptr[13]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
- meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:5046:/ cond");
- /*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V20*/ meltfptr[17] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5046:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("altmatch_normalize_flag check nfla"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5046) ? (5046) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V20*/ meltfptr[17] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V19*/ meltfptr[15] = /*_.IFELSE___V20*/ meltfptr[17];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5046:/ clear");
- /*clear *//*_#IS_A__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V20*/ meltfptr[17] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V19*/ meltfptr[15] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5048:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NFLA__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:5048:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V21*/ meltfptr[17];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5035:/ clear");
- /*clear *//*_.FLAGMAP__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.NFLA__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.NMATCH__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_#NULL__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V19*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V21*/ meltfptr[17] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("ALTMATCH_NORMALIZE_FLAG", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
- (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t meltxargdescr_[],
- union meltparam_un * meltxargtab_,
- const melt_argdescr_cell_t meltxresdescr_[],
- union meltparam_un * meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 41
- void *mcfr_varptr[41];
-#define MELTFRAM_NBVARNUM 19
- long mcfr_varnum[19];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 41; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 41;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MATCH_DATA_UPDATE_DATA_STEPS_INDEX", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ getarg");
- /*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5062:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5062:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5062:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5062;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_data_update_steps_index mdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5062:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5062:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5062:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5063:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5063:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5063:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check mdata"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5063) ? (5063) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5063:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5064:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), 4, "MDATA_STEPS");
- /*_.MSTEPS__V10*/
- meltfptr[9] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MSTEPS__V10*/ meltfptr[9] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#IS_LIST_OR_NULL__L4*/ meltfnum[0] =
- (( /*_.MSTEPS__V10*/ meltfptr[9]) == NULL
- ||
- (melt_unsafe_magic_discr
- ((melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9])) == MELTOBMAG_LIST));;
- MELT_LOCATION ("warmelt-normatch.melt:5066:/ cond");
- /*cond */ if ( /*_#IS_LIST_OR_NULL__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:5067:/ quasiblock");
-
-
- /*^apply */
- /*apply */
- {
- /*_.MSTEPTUP__V13*/ meltfptr[12] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[2])),
- (melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit1__EACHTUP: */
- long cit1__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.MSTEPTUP__V13*/
- meltfptr[12]);
- for ( /*_#STIX__L5*/ meltfnum[1] = 0;
- ( /*_#STIX__L5*/ meltfnum[1] >= 0)
- && ( /*_#STIX__L5*/ meltfnum[1] < cit1__EACHTUP_ln);
- /*_#STIX__L5*/ meltfnum[1]++)
- {
- /*_.CURMSTEP__V14*/ meltfptr[13] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.MSTEPTUP__V13*/ meltfptr[12]),
- /*_#STIX__L5*/ meltfnum[1]);
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5072:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L6*/ meltfnum[5] =
- /*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-normatch.melt:5072:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5072:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5072;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_data_update_data_steps_index curmstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURMSTEP__V14*/ meltfptr[13];
- /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] =
- 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);
- }
- ;
- /*_.IF___V16*/ meltfptr[15] =
- /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5072:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V16*/ meltfptr[15] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5072:/ quasiblock");
-
-
- /*_.PROGN___V18*/ meltfptr[16] =
- /*_.IF___V16*/ meltfptr[15];;
- /*^compute */
-
- /*_.IFCPP___V15*/ meltfptr[14] =
- /*_.PROGN___V18*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5072:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.IF___V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V18*/ meltfptr[16] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_A__L8*/ meltfnum[6] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURMSTEP__V14*/ meltfptr[13]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:5073:/ cond");
- /*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5074:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMSTEP__V14*/ meltfptr[13]), 4, "MSTEP_INDEX");
- /*_.OLDIXV__V21*/
- meltfptr[20] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5075:/ cond");
- /*cond */ if ( /*_.OLDIXV__V21*/ meltfptr[20]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5076:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#GET_INT__L9*/ meltfnum[5] =
- (melt_get_int
- ((melt_ptr_t)
- ( /*_.OLDIXV__V21*/ meltfptr[20])));;
- /*^compute */
-
- /*_#I__L10*/ meltfnum[9] =
- (( /*_#STIX__L5*/ meltfnum[1]) + (1));;
- /*^compute */
-
- /*_#I__L11*/ meltfnum[10] =
- (( /*_#GET_INT__L9*/ meltfnum[5]) ==
- ( /*_#I__L10*/ meltfnum[9]));;
- MELT_LOCATION
- ("warmelt-normatch.melt:5076:/ cond");
- /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V24*/ meltfptr[23] =
- ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5076:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check oldix"),
- ("warmelt-normatch.melt")
- ?
- ("warmelt-normatch.melt")
- : __FILE__,
- (5076) ? (5076) :
- __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V24*/ meltfptr[23]
- = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V23*/ meltfptr[22] =
- /*_.IFELSE___V24*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5076:/ clear");
- /*clear *//*_#GET_INT__L9*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_#I__L10*/ meltfnum[9] = 0;
- /*^clear */
- /*clear *//*_#I__L11*/ meltfnum[10] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.IFELSE___V22*/ meltfptr[21] =
- /*_.IFCPP___V23*/ meltfptr[22];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5075:/ clear");
- /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#I__L12*/ meltfnum[5] =
- (( /*_#STIX__L5*/ meltfnum[1]) + (1));;
- /*^compute */
-
- /*_.MAKE_INTEGERBOX__V25*/ meltfptr[23] =
- (meltgc_new_int
- ((meltobject_ptr_t)
- (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->
- tabval[4])), ( /*_#I__L12*/ meltfnum[5])));;
- MELT_LOCATION
- ("warmelt-normatch.melt:5077:/ quasiblock");
-
-
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MSTEP_INDEX",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.CURMSTEP__V14*/ meltfptr[13])) == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.CURMSTEP__V14*/
- meltfptr[13]), (4),
- ( /*_.MAKE_INTEGERBOX__V25*/
- meltfptr[23]),
- "MSTEP_INDEX");
- ;
- /*^touch */
- meltgc_touch ( /*_.CURMSTEP__V14*/ meltfptr[13]);
- ;
- /*_.IFELSE___V22*/ meltfptr[21] =
- /*_.CURMSTEP__V14*/ meltfptr[13];;
-
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5075:/ clear");
- /*clear *//*_#I__L12*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.MAKE_INTEGERBOX__V25*/ meltfptr[23]
- = 0;
- }
- ;
- }
- ;
- /*_.LET___V20*/ meltfptr[16] =
- /*_.IFELSE___V22*/ meltfptr[21];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5074:/ clear");
- /*clear *//*_.OLDIXV__V21*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
- /*_.IF___V19*/ meltfptr[15] =
- /*_.LET___V20*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5073:/ clear");
- /*clear *//*_.LET___V20*/ meltfptr[16] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V19*/ meltfptr[15] = NULL;;
- }
- ;
- if ( /*_#STIX__L5*/ meltfnum[1] < 0)
- break;
- } /* end cit1__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5069:/ clear");
- /*clear *//*_.CURMSTEP__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_#STIX__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
- /*^clear */
- /*clear *//*_.IF___V19*/ meltfptr[15] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5081:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MDATA_STEPS",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.MDATA__V2*/
- meltfptr[1])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.MDATA__V2*/ meltfptr[1]), (4),
- ( /*_.MSTEPTUP__V13*/ meltfptr[12]),
- "MDATA_STEPS");
- ;
- /*^touch */
- meltgc_touch ( /*_.MDATA__V2*/ meltfptr[1]);
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5082:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L13*/ meltfnum[9] =
- /*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-normatch.melt:5082:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[9]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5082:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5082;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_data_update_data_steps_index updated msteptup";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEPTUP__V13*/ meltfptr[12];
- /*_.MELT_DEBUG_FUN__V28*/ meltfptr[20] =
- 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);
- }
- ;
- /*_.IF___V27*/ meltfptr[23] =
- /*_.MELT_DEBUG_FUN__V28*/ meltfptr[20];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5082:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[20] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V27*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5082:/ quasiblock");
-
-
- /*_.PROGN___V29*/ meltfptr[21] = /*_.IF___V27*/ meltfptr[23];;
- /*^compute */
-
- /*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5082:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[9] = 0;
- /*^clear */
- /*clear *//*_.IF___V27*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V29*/ meltfptr[21] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.LET___V12*/ meltfptr[11] = /*_.IFCPP___V26*/ meltfptr[22];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5067:/ clear");
- /*clear *//*_.MSTEPTUP__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
- /*_.IFELSE___V11*/ meltfptr[10] = /*_.LET___V12*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5066:/ clear");
- /*clear *//*_.LET___V12*/ meltfptr[11] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_MULTIPLE__L15*/ meltfnum[5] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9]))
- == MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5085:/ cond");
- /*cond */ if ( /*_#IS_MULTIPLE__L15*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5086:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L16*/ meltfnum[10] =
- /*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-normatch.melt:5086:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5086:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5086;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_data_update_data_steps_index msteps already tuple";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEPS__V10*/ meltfptr[9];
- /*_.MELT_DEBUG_FUN__V33*/ meltfptr[21] =
- 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);
- }
- ;
- /*_.IF___V32*/ meltfptr[23] =
- /*_.MELT_DEBUG_FUN__V33*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5086:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[21] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V32*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5086:/ quasiblock");
-
-
- /*_.PROGN___V34*/ meltfptr[12] =
- /*_.IF___V32*/ meltfptr[23];;
- /*^compute */
-
- /*_.IFCPP___V31*/ meltfptr[20] =
- /*_.PROGN___V34*/ meltfptr[12];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5086:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[10] = 0;
- /*^clear */
- /*clear *//*_.IF___V32*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V34*/ meltfptr[12] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V31*/ meltfptr[20] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.IFELSE___V30*/ meltfptr[16] =
- /*_.IFCPP___V31*/ meltfptr[20];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5085:/ clear");
- /*clear *//*_.IFCPP___V31*/ meltfptr[20] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5089:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L18*/ meltfnum[9] =
- /*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-normatch.melt:5089:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[9]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5089:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5089;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_data_update_data_steps_index unexpected msteps";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEPS__V10*/ meltfptr[9];
- /*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] =
- 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);
- }
- ;
- /*_.IF___V36*/ meltfptr[11] =
- /*_.MELT_DEBUG_FUN__V37*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5089:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V36*/ meltfptr[11] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5089:/ quasiblock");
-
-
- /*_.PROGN___V38*/ meltfptr[23] =
- /*_.IF___V36*/ meltfptr[11];;
- /*^compute */
-
- /*_.IFCPP___V35*/ meltfptr[22] =
- /*_.PROGN___V38*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5089:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[9] = 0;
- /*^clear */
- /*clear *//*_.IF___V36*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V38*/ meltfptr[23] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V35*/ meltfptr[22] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5090:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V40*/ meltfptr[20] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5090:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("@$@unexpected msteps in match_data_update_data_steps_index"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5090) ? (5090) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V40*/ meltfptr[20] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V39*/ meltfptr[12] =
- /*_.IFELSE___V40*/ meltfptr[20];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5090:/ clear");
- /*clear *//*_.IFELSE___V40*/ meltfptr[20] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V39*/ meltfptr[12] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5088:/ quasiblock");
-
-
- /*_.PROGN___V41*/ meltfptr[21] =
- /*_.IFCPP___V39*/ meltfptr[12];;
- /*^compute */
-
- /*_.IFELSE___V30*/ meltfptr[16] =
- /*_.PROGN___V41*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5085:/ clear");
- /*clear *//*_.IFCPP___V35*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V39*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V41*/ meltfptr[21] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V11*/ meltfptr[10] = /*_.IFELSE___V30*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5066:/ clear");
- /*clear *//*_#IS_MULTIPLE__L15*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V30*/ meltfptr[16] = 0;
- }
- ;
- }
- ;
- /*_.LET___V9*/ meltfptr[4] = /*_.IFELSE___V11*/ meltfptr[10];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5064:/ clear");
- /*clear *//*_.MSTEPS__V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_#IS_LIST_OR_NULL__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];;
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("MATCH_DATA_UPDATE_DATA_STEPS_INDEX", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_99_warmelt_normatch_MATCH_STEP_INDEX_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 42
- void *mcfr_varptr[42];
-#define MELTFRAM_NBVARNUM 14
- long mcfr_varnum[14];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 42; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 42;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MATCH_STEP_INDEX", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ getarg");
- /*_.MSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5096:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5096:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5096:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5096;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "match_step_index mstep start";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5096:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5096:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5096:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5097:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5097:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5097:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check mstep"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5097) ? (5097) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5097:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_NOT_A__L4*/ meltfnum[0] =
- !melt_is_instance_of ((melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */
- meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5098:/ cond");
- /*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5100:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:5100:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5100:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5100;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_step_index mstep without data so return nil";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MSTEP__V2*/ meltfptr[1];
- /*_.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);
- }
- ;
- /*_.IF___V11*/ meltfptr[10] =
- /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5100:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V11*/ meltfptr[10] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5100:/ quasiblock");
-
-
- /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5100:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5101:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = NULL;;
- MELT_LOCATION ("warmelt-normatch.melt:5101:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:5099:/ quasiblock");
-
-
- /*_.PROGN___V15*/ meltfptr[11] = /*_.RETURN___V14*/ meltfptr[10];;
- /*^compute */
-
- /*_.IF___V9*/ meltfptr[4] = /*_.PROGN___V15*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5098:/ clear");
- /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V14*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V15*/ meltfptr[11] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5102:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
- /*_.MATINDEX__V17*/
- meltfptr[10] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5104:/ cond");
- /*cond */ if ( /*_.MATINDEX__V17*/ meltfptr[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5106:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_INTEGERBOX__L7*/ meltfnum[5] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.MATINDEX__V17*/ meltfptr[10])) ==
- MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-normatch.melt:5106:/ cond");
- /*cond */ if ( /*_#IS_INTEGERBOX__L7*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V20*/ meltfptr[19] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5106:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check matindex"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (5106) ? (5106) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V19*/ meltfptr[18] = /*_.IFELSE___V20*/ meltfptr[19];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5106:/ clear");
- /*clear *//*_#IS_INTEGERBOX__L7*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5107:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:5107:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:5105:/ quasiblock");
-
-
- /*_.PROGN___V22*/ meltfptr[21] = /*_.RETURN___V21*/ meltfptr[19];;
- /*^compute */
-
- /*_.IFELSE___V18*/ meltfptr[11] = /*_.PROGN___V22*/ meltfptr[21];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5104:/ clear");
- /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V21*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V22*/ meltfptr[21] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:5108:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[2])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
- /*_.MATDATA__V24*/
- meltfptr[19] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MATDATA__V24*/ meltfptr[19] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5110:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L8*/ 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-normatch.melt:5110:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5110:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5110;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_step_index matdata before match_data_update_data_steps_index";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATDATA__V24*/ meltfptr[19];
- /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] =
- 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);
- }
- ;
- /*_.IF___V26*/ meltfptr[25] =
- /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5110:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V26*/ meltfptr[25] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5110:/ quasiblock");
-
-
- /*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
- /*^compute */
-
- /*_.IFCPP___V25*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[26];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5110:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V28*/ meltfptr[26] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V25*/ meltfptr[21] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5111:/ apply");
- /*apply */
- {
- /*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V29*/ meltfptr[25] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
- meltfrout->tabval[3])),
- (melt_ptr_t) ( /*_.MATDATA__V24*/ meltfptr[19]),
- (""), (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5112:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L10*/ meltfnum[5] =
- /*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-normatch.melt:5112:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5112:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5112;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_step_index matdata after match_data_update_data_steps_index";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATDATA__V24*/ meltfptr[19];
- /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
- 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);
- }
- ;
- /*_.IF___V31*/ meltfptr[30] =
- /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5112:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V31*/ meltfptr[30] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5112:/ quasiblock");
-
-
- /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
- /*^compute */
-
- /*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5112:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.IF___V31*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V30*/ meltfptr[26] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5113:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
- /*_.MSTEP_INDEX__V34*/
- meltfptr[30] = slot;
- };
- ;
- /*^compute */
- /*_.MATINDEX__V17*/ meltfptr[10] = /*_.SETQ___V35*/ meltfptr[31] =
- /*_.MSTEP_INDEX__V34*/ meltfptr[30];;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5114:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L12*/ 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-normatch.melt:5114:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5114:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5114;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "match_step_index final matindex";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATINDEX__V17*/ meltfptr[10];
- /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] =
- 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);
- }
- ;
- /*_.IF___V37*/ meltfptr[36] =
- /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5114:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V37*/ meltfptr[36] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5114:/ quasiblock");
-
-
- /*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];;
- /*^compute */
-
- /*_.IFCPP___V36*/ meltfptr[35] = /*_.PROGN___V39*/ meltfptr[37];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5114:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V37*/ meltfptr[36] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V39*/ meltfptr[37] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V36*/ meltfptr[35] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5115:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_INTEGERBOX__L14*/ meltfnum[5] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.MATINDEX__V17*/ meltfptr[10])) ==
- MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-normatch.melt:5115:/ cond");
- /*cond */ if ( /*_#IS_INTEGERBOX__L14*/ meltfnum[5]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V41*/ meltfptr[37] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5115:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("match_step_index bad matindex"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (5115) ? (5115) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V40*/ meltfptr[36] = /*_.IFELSE___V41*/ meltfptr[37];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5115:/ clear");
- /*clear *//*_#IS_INTEGERBOX__L14*/ meltfnum[5] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V40*/ meltfptr[36] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5116:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:5116:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V23*/ meltfptr[18] = /*_.RETURN___V42*/ meltfptr[37];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5108:/ clear");
- /*clear *//*_.MATDATA__V24*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V29*/ meltfptr[25]
- = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V30*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.MSTEP_INDEX__V34*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.SETQ___V35*/ meltfptr[31] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V36*/ meltfptr[35] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V40*/ meltfptr[36] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V42*/ meltfptr[37] = 0;
- /*_.IFELSE___V18*/ meltfptr[11] = /*_.LET___V23*/ meltfptr[18];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5104:/ clear");
- /*clear *//*_.LET___V23*/ meltfptr[18] = 0;
- }
- ;
- }
- ;
- /*_.LET___V16*/ meltfptr[9] = /*_.IFELSE___V18*/ meltfptr[11];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5102:/ clear");
- /*clear *//*_.MATINDEX__V17*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V18*/ meltfptr[11] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_#IS_NOT_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.LET___V16*/ meltfptr[9] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("MATCH_STEP_INDEX", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_99_warmelt_normatch_MATCH_STEP_INDEX */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 145
- void *mcfr_varptr[145];
-#define MELTFRAM_NBVARNUM 57
- long mcfr_varnum[57];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 145; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 145;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("COMPLETE_NORMSTEP_IF_LAST", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NORMSTEP__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NMCTXT__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5122:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5122:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5122:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5122;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last start step";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
- 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);
- }
- ;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5122:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V6*/ meltfptr[5] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5122:/ quasiblock");
-
-
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5122:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5123:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^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-normatch.melt:5123:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5123:/ apply");
- /*apply */
- {
- 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-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5123;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last start normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] =
- 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);
- }
- ;
- /*_.IF___V10*/ meltfptr[6] =
- /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5123:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V10*/ meltfptr[6] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5123:/ quasiblock");
-
-
- /*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
- /*^compute */
-
- /*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5123:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V10*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V12*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5124:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L5*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5124:/ cond");
- /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V14*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5124:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5124) ? (5124) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V13*/ meltfptr[6] = /*_.IFELSE___V14*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5124:/ clear");
- /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V13*/ meltfptr[6] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5125:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L6*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]),
- (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5125:/ cond");
- /*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V16*/ meltfptr[15] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5125:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nmctxt"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5125) ? (5125) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V15*/ meltfptr[10] = /*_.IFELSE___V16*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5125:/ clear");
- /*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V15*/ meltfptr[10] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_NOT_A__L7*/ meltfnum[0] =
- !melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */
- meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:5126:/ cond");
- /*cond */ if ( /*_#IS_NOT_A__L7*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5128:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L8*/ 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-normatch.melt:5128:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5128:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5128;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last step without data";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.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);
- }
- ;
- /*_.IF___V19*/ meltfptr[18] =
- /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5128:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V19*/ meltfptr[18] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5128:/ quasiblock");
-
-
- /*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
- /*^compute */
-
- /*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5128:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V21*/ meltfptr[19] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5129:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L10*/ meltfnum[8] =
- /*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-normatch.melt:5129:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5129:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5129;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last returning unchanged normstep without data";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] =
- 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);
- }
- ;
- /*_.IF___V23*/ meltfptr[19] =
- /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5129:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V23*/ meltfptr[19] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5129:/ quasiblock");
-
-
- /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[19];;
- /*^compute */
-
- /*_.IFCPP___V22*/ meltfptr[18] = /*_.PROGN___V25*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5129:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.IF___V23*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V25*/ meltfptr[23] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5130:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5130:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:5127:/ quasiblock");
-
-
- /*_.PROGN___V27*/ meltfptr[23] = /*_.RETURN___V26*/ meltfptr[19];;
- /*^compute */
-
- /*_.IF___V17*/ meltfptr[15] = /*_.PROGN___V27*/ meltfptr[23];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5126:/ clear");
- /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V26*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V27*/ meltfptr[23] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V17*/ meltfptr[15] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5131:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[3])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
- /*_.MATDATA__V29*/
- meltfptr[18] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MATDATA__V29*/ meltfptr[18] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5133:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L12*/ 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-normatch.melt:5133:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5133:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5133;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last matdata before match_data_update_data_steps_index";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATDATA__V29*/ meltfptr[18];
- /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
- 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);
- }
- ;
- /*_.IF___V31*/ meltfptr[23] =
- /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5133:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V31*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5133:/ quasiblock");
-
-
- /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[23];;
- /*^compute */
-
- /*_.IFCPP___V30*/ meltfptr[19] = /*_.PROGN___V33*/ meltfptr[31];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5133:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V31*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V30*/ meltfptr[19] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5134:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L14*/ meltfnum[8] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
- meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:5134:/ cond");
- /*cond */ if ( /*_#IS_A__L14*/ meltfnum[8]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V35*/ meltfptr[31] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5134:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check matdata"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5134) ? (5134) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V34*/ meltfptr[23] = /*_.IFELSE___V35*/ meltfptr[31];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5134:/ clear");
- /*clear *//*_#IS_A__L14*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V34*/ meltfptr[23] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5135:/ apply");
- /*apply */
- {
- /*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V36*/ meltfptr[31] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MATCH_DATA_UPDATE_DATA_STEPS_INDEX */ meltfrout->
- tabval[5])),
- (melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]), (""),
- (union meltparam_un *) 0, "", (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5136:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L15*/ 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-normatch.melt:5136:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5136:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5136;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last matdata after match_data_update_data_steps_index";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATDATA__V29*/ meltfptr[18];
- /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] =
- 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);
- }
- ;
- /*_.IF___V38*/ meltfptr[37] =
- /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5136:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V38*/ meltfptr[37] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5136:/ quasiblock");
-
-
- /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];;
- /*^compute */
-
- /*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5136:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V38*/ meltfptr[37] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V40*/ meltfptr[38] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V37*/ meltfptr[36] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5137:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-normatch.melt:5138:/ apply");
- /*apply */
- {
- /*_.MATINDEX__V42*/ meltfptr[38] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MATCH_STEP_INDEX */ meltfrout->tabval[6])),
- (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (""),
- (union meltparam_un *) 0, "", (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5139:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 2, "MATNORX_DATAMAP");
- /*_.DATAMAP__V43*/
- meltfptr[42] = slot;
- };
- ;
- /*_.NDATA__V44*/ meltfptr[43] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.DATAMAP__V43*/ meltfptr[42]),
- (meltobject_ptr_t) ( /*_.MATDATA__V29*/
- meltfptr[18]));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5142:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L17*/ meltfnum[8] =
- /*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-normatch.melt:5142:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[8]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5142:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5142;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "complete_normstep_if_last matindex";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATINDEX__V42*/ meltfptr[38];
- /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] =
- 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);
- }
- ;
- /*_.IF___V46*/ meltfptr[45] =
- /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5142:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V46*/ meltfptr[45] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5142:/ quasiblock");
-
-
- /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
- /*^compute */
-
- /*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5142:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.IF___V46*/ meltfptr[45] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V48*/ meltfptr[46] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5143:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_INTEGERBOX__L19*/ meltfnum[1] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.MATINDEX__V42*/ meltfptr[38]))
- == MELTOBMAG_INT);;
- MELT_LOCATION ("warmelt-normatch.melt:5143:/ cond");
- /*cond */ if ( /*_#IS_INTEGERBOX__L19*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V50*/ meltfptr[46] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5143:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check matindex"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5143) ? (5143) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V50*/ meltfptr[46] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V49*/ meltfptr[45] = /*_.IFELSE___V50*/ meltfptr[46];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5143:/ clear");
- /*clear *//*_#IS_INTEGERBOX__L19*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V50*/ meltfptr[46] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V49*/ meltfptr[45] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5144:/ quasiblock");
-
-
- /*_#NUMINDEX__L20*/ meltfnum[8] =
- (melt_get_int ((melt_ptr_t) ( /*_.MATINDEX__V42*/ meltfptr[38])));;
- MELT_LOCATION ("warmelt-normatch.melt:5145:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]), 4, "MDATA_STEPS");
- /*_.DATASTEPS__V52*/
- meltfptr[51] = slot;
- };
- ;
- /*_#NBDATASTEPS__L21*/ meltfnum[1] =
- (melt_multiple_length
- ((melt_ptr_t) ( /*_.DATASTEPS__V52*/ meltfptr[51])));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5148:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#I__L22*/ meltfnum[21] =
- (( /*_#NUMINDEX__L20*/ meltfnum[8]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:5148:/ cond");
- /*cond */ if ( /*_#I__L22*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V54*/ meltfptr[53] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5148:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check numindex"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5148) ? (5148) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V53*/ meltfptr[52] = /*_.IFELSE___V54*/ meltfptr[53];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5148:/ clear");
- /*clear *//*_#I__L22*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5149:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#I__L23*/ meltfnum[21] =
- (( /*_#NBDATASTEPS__L21*/ meltfnum[1]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:5149:/ cond");
- /*cond */ if ( /*_#I__L23*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V56*/ meltfptr[55] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5149:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nbdatasteps"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5149) ? (5149) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V56*/ meltfptr[55] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V55*/ meltfptr[53] = /*_.IFELSE___V56*/ meltfptr[55];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5149:/ clear");
- /*clear *//*_#I__L23*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V56*/ meltfptr[55] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V55*/ meltfptr[53] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5150:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#I__L24*/ meltfnum[21] =
- (( /*_#NUMINDEX__L20*/ meltfnum[8]) <=
- ( /*_#NBDATASTEPS__L21*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:5150:/ cond");
- /*cond */ if ( /*_#I__L24*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V58*/ meltfptr[57] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5150:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("good numindex"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5150) ? (5150) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V58*/ meltfptr[57] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V57*/ meltfptr[55] = /*_.IFELSE___V58*/ meltfptr[57];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5150:/ clear");
- /*clear *//*_#I__L24*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V58*/ meltfptr[57] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V57*/ meltfptr[55] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#I__L25*/ meltfnum[21] =
- (( /*_#NUMINDEX__L20*/ meltfnum[8]) <
- ( /*_#NBDATASTEPS__L21*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:5151:/ cond");
- /*cond */ if ( /*_#I__L25*/ meltfnum[21]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5153:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L26*/ meltfnum[25] =
- /*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-normatch.melt:5153:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[25]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5153:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5153;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last return non-last normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] =
- 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);
- }
- ;
- /*_.IF___V61*/ meltfptr[60] =
- /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5153:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V61*/ meltfptr[60] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5153:/ quasiblock");
-
-
- /*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[60];;
- /*^compute */
-
- /*_.IFCPP___V60*/ meltfptr[59] = /*_.PROGN___V63*/ meltfptr[61];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5153:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[25] = 0;
- /*^clear */
- /*clear *//*_.IF___V61*/ meltfptr[60] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V63*/ meltfptr[61] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V60*/ meltfptr[59] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5154:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5154:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:5152:/ quasiblock");
-
-
- /*_.PROGN___V65*/ meltfptr[61] = /*_.RETURN___V64*/ meltfptr[60];;
- /*^compute */
-
- /*_.IF___V59*/ meltfptr[57] = /*_.PROGN___V65*/ meltfptr[61];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5151:/ clear");
- /*clear *//*_.IFCPP___V60*/ meltfptr[59] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V64*/ meltfptr[60] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V65*/ meltfptr[61] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V59*/ meltfptr[57] = NULL;;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5156:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L28*/ meltfnum[26] =
- /*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-normatch.melt:5156:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5156:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5156;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last last step";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V68*/ meltfptr[61] =
- 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);
- }
- ;
- /*_.IF___V67*/ meltfptr[60] =
- /*_.MELT_DEBUG_FUN__V68*/ meltfptr[61];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5156:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[61] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V67*/ meltfptr[60] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5156:/ quasiblock");
-
-
- /*_.PROGN___V69*/ meltfptr[61] = /*_.IF___V67*/ meltfptr[60];;
- /*^compute */
-
- /*_.IFCPP___V66*/ meltfptr[59] = /*_.PROGN___V69*/ meltfptr[61];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5156:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V67*/ meltfptr[60] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V69*/ meltfptr[61] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V66*/ meltfptr[59] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5157:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L30*/ meltfnum[25] =
- /*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-normatch.melt:5157:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[25]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5157:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5157;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "complete_normstep_if_last ndata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NDATA__V44*/ meltfptr[43];
- /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] =
- 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);
- }
- ;
- /*_.IF___V71*/ meltfptr[61] =
- /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5157:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V71*/ meltfptr[61] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5157:/ quasiblock");
-
-
- /*_.PROGN___V73*/ meltfptr[71] = /*_.IF___V71*/ meltfptr[61];;
- /*^compute */
-
- /*_.IFCPP___V70*/ meltfptr[60] = /*_.PROGN___V73*/ meltfptr[71];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5157:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[25] = 0;
- /*^clear */
- /*clear *//*_.IF___V71*/ meltfptr[61] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V73*/ meltfptr[71] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V70*/ meltfptr[60] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5158:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L32*/ meltfnum[26] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V44*/ meltfptr[43]),
- (melt_ptr_t) (( /*!CLASS_NREP_SIMPLE */
- meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:5158:/ cond");
- /*cond */ if ( /*_#IS_A__L32*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V75*/ meltfptr[71] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5158:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check ndata"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5158) ? (5158) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V75*/ meltfptr[71] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V74*/ meltfptr[61] = /*_.IFELSE___V75*/ meltfptr[71];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5158:/ clear");
- /*clear *//*_#IS_A__L32*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V75*/ meltfptr[71] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V74*/ meltfptr[61] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_A__L33*/ meltfnum[25] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V44*/ meltfptr[43]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */
- meltfrout->tabval[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:5159:/ cond");
- /*cond */ if ( /*_#IS_A__L33*/ meltfnum[25]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:5160:/ quasiblock");
-
-
- /*^quasiblock */
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_CLEAR */ meltfrout->tabval[9])), (2), "CLASS_NREP_MATCH_DATA_CLEAR");
- /*_.INST__V79*/ meltfptr[78] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NMDAC_DATA",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V79*/ meltfptr[78]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V79*/ meltfptr[78]), (1),
- ( /*_.NDATA__V44*/ meltfptr[43]),
- "NMDAC_DATA");
- ;
- /*_.CLEARNDATA__V78*/ meltfptr[77] = /*_.INST__V79*/ meltfptr[78];;
- MELT_LOCATION ("warmelt-normatch.melt:5162:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_FINALIZER */ meltfrout->tabval[10])), (2), "CLASS_NREP_MATCH_DATA_FINALIZER");
- /*_.INST__V81*/ meltfptr[80] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NMDAC_DATA",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V81*/ meltfptr[80]))
- == MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V81*/ meltfptr[80]), (1),
- ( /*_.NDATA__V44*/ meltfptr[43]),
- "NMDAC_DATA");
- ;
- /*_.FINALNDATA__V80*/ meltfptr[79] = /*_.INST__V81*/ meltfptr[80];;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5165:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L34*/ meltfnum[26] =
- /*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-normatch.melt:5165:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[34] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5165:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[34];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5165;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last clearndata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CLEARNDATA__V78*/ meltfptr[77];
- /*_.MELT_DEBUG_FUN__V84*/ meltfptr[83] =
- 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);
- }
- ;
- /*_.IF___V83*/ meltfptr[82] =
- /*_.MELT_DEBUG_FUN__V84*/ meltfptr[83];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5165:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[34] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V84*/ meltfptr[83] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V83*/ meltfptr[82] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5165:/ quasiblock");
-
-
- /*_.PROGN___V85*/ meltfptr[83] = /*_.IF___V83*/ meltfptr[82];;
- /*^compute */
-
- /*_.IFCPP___V82*/ meltfptr[81] = /*_.PROGN___V85*/ meltfptr[83];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5165:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V83*/ meltfptr[82] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V85*/ meltfptr[83] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V82*/ meltfptr[81] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5166:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L36*/ meltfnum[34] =
- /*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-normatch.melt:5166:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[34]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L37*/ meltfnum[26] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5166:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L37*/ meltfnum[26];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5166;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last finalndata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.FINALNDATA__V80*/ meltfptr[79];
- /*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] =
- 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);
- }
- ;
- /*_.IF___V87*/ meltfptr[83] =
- /*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5166:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V87*/ meltfptr[83] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5166:/ quasiblock");
-
-
- /*_.PROGN___V89*/ meltfptr[87] = /*_.IF___V87*/ meltfptr[83];;
- /*^compute */
-
- /*_.IFCPP___V86*/ meltfptr[82] = /*_.PROGN___V89*/ meltfptr[87];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5166:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[34] = 0;
- /*^clear */
- /*clear *//*_.IF___V87*/ meltfptr[83] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V89*/ meltfptr[87] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V86*/ meltfptr[82] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5167:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L38*/ meltfnum[26] =
- /*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-normatch.melt:5167:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L39*/ meltfnum[34] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5167:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L39*/ meltfnum[34];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5167;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V92*/ meltfptr[91] =
- 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);
- }
- ;
- /*_.IF___V91*/ meltfptr[87] =
- /*_.MELT_DEBUG_FUN__V92*/ meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5167:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[34] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V92*/ meltfptr[91] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V91*/ meltfptr[87] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5167:/ quasiblock");
-
-
- /*_.PROGN___V93*/ meltfptr[91] = /*_.IF___V91*/ meltfptr[87];;
- /*^compute */
-
- /*_.IFCPP___V90*/ meltfptr[83] = /*_.PROGN___V93*/ meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5167:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V91*/ meltfptr[87] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V93*/ meltfptr[91] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V90*/ meltfptr[83] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_#IS_OBJECT__L40*/ meltfnum[34] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2]))
- == MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5168:/ cond");
- /*cond */ if ( /*_#IS_OBJECT__L40*/ meltfnum[34]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:5169:/ quasiblock");
-
-
- /*^blockmultialloc */
- /*multiallocblock */
- {
- struct meltletrec_1_st
- {
- struct MELT_MULTIPLE_STRUCT (3) rtup_0__TUPLREC__x1;
- long meltletrec_1_endgap;
- } *meltletrec_1_ptr = 0;
- meltletrec_1_ptr =
- (struct meltletrec_1_st *)
- meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
- /*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x1 */
- /*_.TUPLREC___V97*/ meltfptr[96] =
- (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x1;
- meltletrec_1_ptr->rtup_0__TUPLREC__x1.discr =
- (meltobject_ptr_t) (((void
- *) (MELT_PREDEF (DISCR_MULTIPLE))));
- meltletrec_1_ptr->rtup_0__TUPLREC__x1.nbval = 3;
-
-
- /*^putuple */
- /*putupl#1 */
- melt_assertmsg ("putupl [:5169] #1 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96])) ==
- MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5169] #1 checkoff",
- (0 >= 0
- && 0 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V97*/ meltfptr[96]))->
- tabval[0] =
- (melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2]);
- ;
- /*^putuple */
- /*putupl#2 */
- melt_assertmsg ("putupl [:5169] #2 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96])) ==
- MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5169] #2 checkoff",
- (1 >= 0
- && 1 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V97*/ meltfptr[96]))->
- tabval[1] =
- (melt_ptr_t) ( /*_.CLEARNDATA__V78*/ meltfptr[77]);
- ;
- /*^putuple */
- /*putupl#3 */
- melt_assertmsg ("putupl [:5169] #3 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96])) ==
- MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5169] #3 checkoff",
- (2 >= 0
- && 2 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V97*/
- meltfptr[96]))));
- ((meltmultiple_ptr_t) ( /*_.TUPLREC___V97*/ meltfptr[96]))->
- tabval[2] =
- (melt_ptr_t) ( /*_.FINALNDATA__V80*/ meltfptr[79]);
- ;
- /*^touch */
- meltgc_touch ( /*_.TUPLREC___V97*/ meltfptr[96]);
- ;
- /*_.NORMSTEPTUP__V96*/ meltfptr[95] =
- /*_.TUPLREC___V97*/ meltfptr[96];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5169:/ clear");
- /*clear *//*_.TUPLREC___V97*/ meltfptr[96] = 0;
- /*^clear */
- /*clear *//*_.TUPLREC___V97*/ meltfptr[96] = 0;
- } /*end multiallocblock */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5170:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L41*/ meltfnum[26] =
- /*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-normatch.melt:5170:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5170:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5170;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last new normsteptup";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEPTUP__V96*/
- meltfptr[95];
- /*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] =
- 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);
- }
- ;
- /*_.IF___V99*/ meltfptr[98] =
- /*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5170:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41] =
- 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V99*/ meltfptr[98] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5170:/ quasiblock");
-
-
- /*_.PROGN___V101*/ meltfptr[99] =
- /*_.IF___V99*/ meltfptr[98];;
- /*^compute */
-
- /*_.IFCPP___V98*/ meltfptr[96] =
- /*_.PROGN___V101*/ meltfptr[99];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5170:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V99*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V101*/ meltfptr[99] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V98*/ meltfptr[96] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5171:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- /*_.NORMSTEPTUP__V96*/ meltfptr[95];;
- MELT_LOCATION ("warmelt-normatch.melt:5171:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V95*/ meltfptr[91] =
- /*_.RETURN___V102*/ meltfptr[98];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5169:/ clear");
- /*clear *//*_.NORMSTEPTUP__V96*/ meltfptr[95] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V98*/ meltfptr[96] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V102*/ meltfptr[98] = 0;
- /*_.IFELSE___V94*/ meltfptr[87] =
- /*_.LET___V95*/ meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5168:/ clear");
- /*clear *//*_.LET___V95*/ meltfptr[91] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#NULL__L43*/ meltfnum[41] =
- (( /*_.NORMSTEP__V3*/ meltfptr[2]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:5172:/ cond");
- /*cond */ if ( /*_#NULL__L43*/ meltfnum[41]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5173:/ quasiblock");
-
-
- /*^blockmultialloc */
- /*multiallocblock */
- {
- struct meltletrec_2_st
- {
- struct MELT_MULTIPLE_STRUCT (2) rtup_0__TUPLREC__x2;
- long meltletrec_2_endgap;
- } *meltletrec_2_ptr = 0;
- meltletrec_2_ptr =
- (struct meltletrec_2_st *)
- meltgc_allocate (sizeof (struct meltletrec_2_st),
- 0);
- /*^blockmultialloc.initfill */
- /*inimult rtup_0__TUPLREC__x2 */
- /*_.TUPLREC___V106*/ meltfptr[98] =
- (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x2;
- meltletrec_2_ptr->rtup_0__TUPLREC__x2.discr =
- (meltobject_ptr_t) (((void
- *) (MELT_PREDEF
- (DISCR_MULTIPLE))));
- meltletrec_2_ptr->rtup_0__TUPLREC__x2.nbval = 2;
-
-
- /*^putuple */
- /*putupl#4 */
- melt_assertmsg ("putupl [:5173] #4 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98])) == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5173] #4 checkoff",
- (0 >= 0
- && 0 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98]))));
- ((meltmultiple_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98]))->tabval[0] =
- (melt_ptr_t) ( /*_.CLEARNDATA__V78*/ meltfptr[77]);
- ;
- /*^putuple */
- /*putupl#5 */
- melt_assertmsg ("putupl [:5173] #5 checktup",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98])) == MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5173] #5 checkoff",
- (1 >= 0
- && 1 <
- melt_multiple_length ((melt_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98]))));
- ((meltmultiple_ptr_t)
- ( /*_.TUPLREC___V106*/ meltfptr[98]))->tabval[1] =
- (melt_ptr_t) ( /*_.FINALNDATA__V80*/ meltfptr[79]);
- ;
- /*^touch */
- meltgc_touch ( /*_.TUPLREC___V106*/ meltfptr[98]);
- ;
- /*_.STEPTUPN__V105*/ meltfptr[96] =
- /*_.TUPLREC___V106*/ meltfptr[98];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5173:/ clear");
- /*clear *//*_.TUPLREC___V106*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.TUPLREC___V106*/ meltfptr[98] = 0;
- } /*end multiallocblock */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5174:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L44*/ meltfnum[26] =
- /*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-normatch.melt:5174:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L45*/ meltfnum[44] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:5174:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L45*/ meltfnum[44];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5174;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last new steptupn for nil";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEPTUPN__V105*/
- meltfptr[96];
- /*_.MELT_DEBUG_FUN__V109*/ meltfptr[108] =
- 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);
- }
- ;
- /*_.IF___V108*/ meltfptr[98] =
- /*_.MELT_DEBUG_FUN__V109*/ meltfptr[108];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5174:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L45*/
- meltfnum[44] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V109*/
- meltfptr[108] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V108*/ meltfptr[98] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5174:/ quasiblock");
-
-
- /*_.PROGN___V110*/ meltfptr[108] =
- /*_.IF___V108*/ meltfptr[98];;
- /*^compute */
-
- /*_.IFCPP___V107*/ meltfptr[91] =
- /*_.PROGN___V110*/ meltfptr[108];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5174:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V108*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V110*/ meltfptr[108] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V107*/ meltfptr[91] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5175:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- /*_.STEPTUPN__V105*/ meltfptr[96];;
- MELT_LOCATION
- ("warmelt-normatch.melt:5175:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V104*/ meltfptr[95] =
- /*_.RETURN___V111*/ meltfptr[98];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5173:/ clear");
- /*clear *//*_.STEPTUPN__V105*/ meltfptr[96] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V107*/ meltfptr[91] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V111*/ meltfptr[98] = 0;
- /*_.IFELSE___V103*/ meltfptr[99] =
- /*_.LET___V104*/ meltfptr[95];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5172:/ clear");
- /*clear *//*_.LET___V104*/ meltfptr[95] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_MULTIPLE__L46*/ meltfnum[44] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2])) ==
- MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5176:/ cond");
- /*cond */ if ( /*_#IS_MULTIPLE__L46*/ meltfnum[44]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5177:/ quasiblock");
-
-
- /*^apply */
- /*apply */
- {
- /*_.NORMSTEPLIST__V114*/ meltfptr[91] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MULTIPLE_TO_LIST */
- meltfrout->tabval[11])),
- (melt_ptr_t) ( /*_.NORMSTEP__V3*/
- meltfptr[2]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
-
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5179:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.NORMSTEPLIST__V114*/
- meltfptr[91]),
- (melt_ptr_t) ( /*_.CLEARNDATA__V78*/ meltfptr[77]));
- }
- ;
-
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5180:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.NORMSTEPLIST__V114*/
- meltfptr[91]),
- (melt_ptr_t) ( /*_.FINALNDATA__V80*/ meltfptr[79]));
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5181:/ quasiblock");
-
-
- /*^apply */
- /*apply */
- {
- /*_.NEWNORMSTEP__V116*/ meltfptr[95] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!LIST_TO_MULTIPLE */
- meltfrout->tabval[12])),
- (melt_ptr_t) ( /*_.NORMSTEPLIST__V114*/ meltfptr[91]), (""), (union meltparam_un *) 0, "", (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5182:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L47*/ meltfnum[26] =
- /*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-normatch.melt:5182:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[47]
- =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:5182:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L48*/
- meltfnum[47];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5182;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last newnormstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) &
- /*_.NEWNORMSTEP__V116*/ meltfptr[95];
- /*_.MELT_DEBUG_FUN__V119*/ meltfptr[118]
- =
- 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);
- }
- ;
- /*_.IF___V118*/ meltfptr[117] =
- /*_.MELT_DEBUG_FUN__V119*/
- meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5182:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L48*/
- meltfnum[47] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V119*/
- meltfptr[118] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V118*/ meltfptr[117] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5182:/ quasiblock");
-
-
- /*_.PROGN___V120*/ meltfptr[118] =
- /*_.IF___V118*/ meltfptr[117];;
- /*^compute */
-
- /*_.IFCPP___V117*/ meltfptr[116] =
- /*_.PROGN___V120*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5182:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[26]
- = 0;
- /*^clear */
- /*clear *//*_.IF___V118*/ meltfptr[117] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V120*/ meltfptr[118] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V117*/ meltfptr[116] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5183:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- /*_.NEWNORMSTEP__V116*/ meltfptr[95];;
- MELT_LOCATION
- ("warmelt-normatch.melt:5183:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V115*/ meltfptr[98] =
- /*_.RETURN___V121*/ meltfptr[117];;
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5181:/ clear");
- /*clear *//*_.NEWNORMSTEP__V116*/ meltfptr[95] =
- 0;
- /*^clear */
- /*clear *//*_.IFCPP___V117*/ meltfptr[116] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V121*/ meltfptr[117] = 0;
- /*_.LET___V113*/ meltfptr[96] =
- /*_.LET___V115*/ meltfptr[98];;
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5177:/ clear");
- /*clear *//*_.NORMSTEPLIST__V114*/ meltfptr[91] =
- 0;
- /*^clear */
- /*clear *//*_.LET___V115*/ meltfptr[98] = 0;
- /*_.IFELSE___V112*/ meltfptr[108] =
- /*_.LET___V113*/ meltfptr[96];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5176:/ clear");
- /*clear *//*_.LET___V113*/ meltfptr[96] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_LIST__L49*/ meltfnum[47] =
- (melt_magic_discr
- ((melt_ptr_t)
- ( /*_.NORMSTEP__V3*/ meltfptr[2])) ==
- MELTOBMAG_LIST);;
- MELT_LOCATION
- ("warmelt-normatch.melt:5185:/ cond");
- /*cond */ if ( /*_#IS_LIST__L49*/ meltfnum[47]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5186:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.NORMSTEP__V3*/
- meltfptr[2]),
- (melt_ptr_t) ( /*_.CLEARNDATA__V78*/ meltfptr[77]));
- }
- ;
-
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5187:/ locexp");
- meltgc_append_list ((melt_ptr_t)
- ( /*_.NORMSTEP__V3*/
- meltfptr[2]),
- (melt_ptr_t) ( /*_.FINALNDATA__V80*/ meltfptr[79]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5188:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L50*/ meltfnum[26] =
- /*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-normatch.melt:5188:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L51*/
- meltfnum[50] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:5188:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0,
- sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L51*/
- meltfnum[50];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5188;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last extended normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) &
- /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V125*/
- meltfptr[117] =
- 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);
- }
- ;
- /*_.IF___V124*/ meltfptr[116] =
- /*_.MELT_DEBUG_FUN__V125*/
- meltfptr[117];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5188:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L51*/
- meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V125*/
- meltfptr[117] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V124*/ meltfptr[116] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5188:/ quasiblock");
-
-
- /*_.PROGN___V126*/ meltfptr[91] =
- /*_.IF___V124*/ meltfptr[116];;
- /*^compute */
-
- /*_.IFCPP___V123*/ meltfptr[95] =
- /*_.PROGN___V126*/ meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5188:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L50*/
- meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V124*/ meltfptr[116] =
- 0;
- /*^clear */
- /*clear *//*_.PROGN___V126*/ meltfptr[91]
- = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V123*/ meltfptr[95] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5189:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- /*_.NORMSTEP__V3*/ meltfptr[2];;
- MELT_LOCATION
- ("warmelt-normatch.melt:5189:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION
- ("warmelt-normatch.melt:5185:/ quasiblock");
-
-
- /*_.PROGN___V128*/ meltfptr[96] =
- /*_.RETURN___V127*/ meltfptr[98];;
- /*^compute */
-
- /*_.IFELSE___V122*/ meltfptr[118] =
- /*_.PROGN___V128*/ meltfptr[96];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5185:/ clear");
- /*clear *//*_.IFCPP___V123*/ meltfptr[95] =
- 0;
- /*^clear */
- /*clear *//*_.RETURN___V127*/ meltfptr[98] =
- 0;
- /*^clear */
- /*clear *//*_.PROGN___V128*/ meltfptr[96] =
- 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5191:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L52*/ meltfnum[50] =
- /*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-normatch.melt:5191:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[50]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L53*/
- meltfnum[26] =
- meltcallcount;;
- MELT_LOCATION
- ("warmelt-normatch.melt:5191:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0,
- sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L53*/
- meltfnum[26];
- /*^apply.arg */
- argtab[1].meltbp_cstring =
- "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5191;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last bad normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) &
- /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V131*/
- meltfptr[91] =
- 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);
- }
- ;
- /*_.IF___V130*/ meltfptr[116] =
- /*_.MELT_DEBUG_FUN__V131*/
- meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5191:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L53*/
- meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V131*/
- meltfptr[91] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V130*/ meltfptr[116] = NULL;;
- }
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5191:/ quasiblock");
-
-
- /*_.PROGN___V132*/ meltfptr[95] =
- /*_.IF___V130*/ meltfptr[116];;
- /*^compute */
-
- /*_.IFCPP___V129*/ meltfptr[117] =
- /*_.PROGN___V132*/ meltfptr[95];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5191:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L52*/
- meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.IF___V130*/ meltfptr[116] =
- 0;
- /*^clear */
- /*clear *//*_.PROGN___V132*/ meltfptr[95]
- = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V129*/ meltfptr[117] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION
- ("warmelt-normatch.melt:5192:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V134*/ meltfptr[96] =
- ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION
- ("warmelt-normatch.melt:5192:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("complete_normstep_if_last unexpected normstep"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5192) ? (5192) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V134*/
- meltfptr[96] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V133*/ meltfptr[98] =
- /*_.IFELSE___V134*/ meltfptr[96];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5192:/ clear");
- /*clear *//*_.IFELSE___V134*/ meltfptr[96]
- = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V133*/ meltfptr[98] =
- ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION
- ("warmelt-normatch.melt:5190:/ quasiblock");
-
-
- /*_.PROGN___V135*/ meltfptr[91] =
- /*_.IFCPP___V133*/ meltfptr[98];;
- /*^compute */
-
- /*_.IFELSE___V122*/ meltfptr[118] =
- /*_.PROGN___V135*/ meltfptr[91];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5185:/ clear");
- /*clear *//*_.IFCPP___V129*/ meltfptr[117] =
- 0;
- /*^clear */
- /*clear *//*_.IFCPP___V133*/ meltfptr[98] =
- 0;
- /*^clear */
- /*clear *//*_.PROGN___V135*/ meltfptr[91] =
- 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V112*/ meltfptr[108] =
- /*_.IFELSE___V122*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION
- ("warmelt-normatch.melt:5176:/ clear");
- /*clear *//*_#IS_LIST__L49*/ meltfnum[47] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V122*/ meltfptr[118] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V103*/ meltfptr[99] =
- /*_.IFELSE___V112*/ meltfptr[108];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5172:/ clear");
- /*clear *//*_#IS_MULTIPLE__L46*/ meltfnum[44] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V112*/ meltfptr[108] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V94*/ meltfptr[87] =
- /*_.IFELSE___V103*/ meltfptr[99];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5168:/ clear");
- /*clear *//*_#NULL__L43*/ meltfnum[41] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V103*/ meltfptr[99] = 0;
- }
- ;
- }
- ;
- /*_.LET___V77*/ meltfptr[76] = /*_.IFELSE___V94*/ meltfptr[87];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5160:/ clear");
- /*clear *//*_.CLEARNDATA__V78*/ meltfptr[77] = 0;
- /*^clear */
- /*clear *//*_.FINALNDATA__V80*/ meltfptr[79] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V82*/ meltfptr[81] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V86*/ meltfptr[82] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V90*/ meltfptr[83] = 0;
- /*^clear */
- /*clear *//*_#IS_OBJECT__L40*/ meltfnum[34] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V94*/ meltfptr[87] = 0;
- /*_.IFELSE___V76*/ meltfptr[71] = /*_.LET___V77*/ meltfptr[76];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5159:/ clear");
- /*clear *//*_.LET___V77*/ meltfptr[76] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5195:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L54*/ meltfnum[26] =
- /*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-normatch.melt:5195:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L54*/ meltfnum[26]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[50] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5195:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L55*/ meltfnum[50];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5195;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last ndata not a matched data";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NDATA__V44*/ meltfptr[43];
- /*_.MELT_DEBUG_FUN__V138*/ meltfptr[96] =
- 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);
- }
- ;
- /*_.IF___V137*/ meltfptr[95] =
- /*_.MELT_DEBUG_FUN__V138*/ meltfptr[96];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5195:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L55*/ meltfnum[50] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V138*/ meltfptr[96] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V137*/ meltfptr[95] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5195:/ quasiblock");
-
-
- /*_.PROGN___V139*/ meltfptr[117] = /*_.IF___V137*/ meltfptr[95];;
- /*^compute */
-
- /*_.IFCPP___V136*/ meltfptr[116] =
- /*_.PROGN___V139*/ meltfptr[117];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5195:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L54*/ meltfnum[26] = 0;
- /*^clear */
- /*clear *//*_.IF___V137*/ meltfptr[95] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V139*/ meltfptr[117] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V136*/ meltfptr[116] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5196:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L56*/ meltfnum[47] =
- /*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-normatch.melt:5196:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[47]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5196:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5196;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "complete_normstep_if_last unchanged normstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
- /*_.MELT_DEBUG_FUN__V142*/ meltfptr[118] =
- 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);
- }
- ;
- /*_.IF___V141*/ meltfptr[91] =
- /*_.MELT_DEBUG_FUN__V142*/ meltfptr[118];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5196:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V142*/ meltfptr[118] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V141*/ meltfptr[91] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5196:/ quasiblock");
-
-
- /*_.PROGN___V143*/ meltfptr[108] = /*_.IF___V141*/ meltfptr[91];;
- /*^compute */
-
- /*_.IFCPP___V140*/ meltfptr[98] =
- /*_.PROGN___V143*/ meltfptr[108];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5196:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[47] = 0;
- /*^clear */
- /*clear *//*_.IF___V141*/ meltfptr[91] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V143*/ meltfptr[108] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V140*/ meltfptr[98] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5197:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5197:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:5194:/ quasiblock");
-
-
- /*_.PROGN___V145*/ meltfptr[77] = /*_.RETURN___V144*/ meltfptr[99];;
- /*^compute */
-
- /*_.IFELSE___V76*/ meltfptr[71] = /*_.PROGN___V145*/ meltfptr[77];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5159:/ clear");
- /*clear *//*_.IFCPP___V136*/ meltfptr[116] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V140*/ meltfptr[98] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V144*/ meltfptr[99] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V145*/ meltfptr[77] = 0;
- }
- ;
- }
- ;
- /*_.LET___V51*/ meltfptr[46] = /*_.IFELSE___V76*/ meltfptr[71];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5144:/ clear");
- /*clear *//*_#NUMINDEX__L20*/ meltfnum[8] = 0;
- /*^clear */
- /*clear *//*_.DATASTEPS__V52*/ meltfptr[51] = 0;
- /*^clear */
- /*clear *//*_#NBDATASTEPS__L21*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V53*/ meltfptr[52] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V55*/ meltfptr[53] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V57*/ meltfptr[55] = 0;
- /*^clear */
- /*clear *//*_#I__L25*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_.IF___V59*/ meltfptr[57] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V66*/ meltfptr[59] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V70*/ meltfptr[60] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V74*/ meltfptr[61] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L33*/ meltfnum[25] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V76*/ meltfptr[71] = 0;
- /*_.LET___V41*/ meltfptr[37] = /*_.LET___V51*/ meltfptr[46];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5137:/ clear");
- /*clear *//*_.MATINDEX__V42*/ meltfptr[38] = 0;
- /*^clear */
- /*clear *//*_.DATAMAP__V43*/ meltfptr[42] = 0;
- /*^clear */
- /*clear *//*_.NDATA__V44*/ meltfptr[43] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V49*/ meltfptr[45] = 0;
- /*^clear */
- /*clear *//*_.LET___V51*/ meltfptr[46] = 0;
- /*_.LET___V28*/ meltfptr[17] = /*_.LET___V41*/ meltfptr[37];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5131:/ clear");
- /*clear *//*_.MATDATA__V29*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V30*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V34*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V36*/ meltfptr[31] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0;
- /*^clear */
- /*clear *//*_.LET___V41*/ meltfptr[37] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V28*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V13*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V15*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_#IS_NOT_A__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V17*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.LET___V28*/ meltfptr[17] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("COMPLETE_NORMSTEP_IF_LAST", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 19
- void *mcfr_varptr[19];
-#define MELTFRAM_NBVARNUM 5
- long mcfr_varnum[5];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 19; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 19;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("NORMSTEP_ANYRECV", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ getarg");
- /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NMCTXT__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.SLOC__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5201:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5201:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5201:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5201;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normstep_anyrecv recv";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
- 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);
- }
- ;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5201:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V6*/ meltfptr[5] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5201:/ quasiblock");
-
-
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5201:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5202:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5202:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5202:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nmctxt"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5202) ? (5202) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5202:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5203:/ quasiblock");
-
-
- /*_.DIS__V12*/ meltfptr[11] =
- (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5204:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V12*/ meltfptr[11]), 1, "NAMED_NAME");
- /*_.DISNAME__V13*/
- meltfptr[12] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.DISNAME__V13*/ meltfptr[12] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:5206:/ locexp");
- melt_error_str ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3]),
- ("unexpected NORMALIZE_STEP for"),
- (melt_ptr_t) ( /*_.DISNAME__V13*/ meltfptr[12]));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5207:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
- /*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-normatch.melt:5207:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5207:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5207;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normstep_anyrecv dis";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DIS__V12*/ meltfptr[11];
- /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] =
- 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);
- }
- ;
- /*_.IF___V15*/ meltfptr[14] =
- /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5207:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V15*/ meltfptr[14] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5207:/ quasiblock");
-
-
- /*_.PROGN___V17*/ meltfptr[15] = /*_.IF___V15*/ meltfptr[14];;
- /*^compute */
-
- /*_.IFCPP___V14*/ meltfptr[13] = /*_.PROGN___V17*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5207:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V17*/ meltfptr[15] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5208:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V19*/ meltfptr[15] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5208:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("@$@ unexpected normstep_anyrecv"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5208) ? (5208) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V19*/ meltfptr[15] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V18*/ meltfptr[14] = /*_.IFELSE___V19*/ meltfptr[15];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5208:/ clear");
- /*clear *//*_.IFELSE___V19*/ meltfptr[15] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V18*/ meltfptr[14] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.LET___V11*/ meltfptr[6] = /*_.IFCPP___V18*/ meltfptr[14];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5203:/ clear");
- /*clear *//*_.DIS__V12*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.DISNAME__V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V18*/ meltfptr[14] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.LET___V11*/ meltfptr[6] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("NORMSTEP_ANYRECV", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 38
- void *mcfr_varptr[38];
-#define MELTFRAM_NBVARNUM 8
- long mcfr_varnum[8];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 38; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 38;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("NORMSTEP_MFLAGSET", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NMCTXT__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
- NULL);
-
-
- /*getarg#2 */
- /*^getarg */
- if (meltxargdescr_[1] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.SLOC__V4*/ meltfptr[3] =
- (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5214:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:5214:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5214:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5214;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normstep_mflagset step";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
- 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);
- }
- ;
- /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5214:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V6*/ meltfptr[5] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5214:/ quasiblock");
-
-
- /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
- /*^compute */
-
- /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5214:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5215:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_SET */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5215:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5215:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5215) ? (5215) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5215:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5216:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L4*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5216:/ cond");
- /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5216:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nmctxt"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5216) ? (5216) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5216:/ clear");
- /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5217:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
- /*_.LOCA_LOCATION__V14*/
- meltfptr[13] = slot;
- };
- ;
- /*^cond */
- /*cond */ if ( /*_.LOCA_LOCATION__V14*/ meltfptr[13]) /*then */
- {
- /*^cond.then */
- /*_.NSLOC__V15*/ meltfptr[14] =
- /*_.LOCA_LOCATION__V14*/ meltfptr[13];;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:5217:/ cond.else");
-
- /*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5218:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
- /*_.MATFLAG__V16*/
- meltfptr[15] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5219:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
- /*_.MATTHEN__V17*/
- meltfptr[16] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5220:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
- /*_.NTHEN__V18*/ meltfptr[17] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!ALTMATCH_NORMALIZE_STEP */ meltfrout->tabval[3])),
- (melt_ptr_t) ( /*_.MATTHEN__V17*/ meltfptr[16]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5221:/ apply");
- /*apply */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
- /*_.NFLAG__V19*/ meltfptr[18] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!ALTMATCH_NORMALIZE_FLAG */ meltfrout->tabval[4])),
- (melt_ptr_t) ( /*_.MATFLAG__V16*/ meltfptr[15]),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5222:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_SETQ */
- meltfrout->tabval[5])), (3),
- "CLASS_NREP_SETQ");
- /*_.INST__V21*/ meltfptr[20] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NREP_LOC",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V21*/ meltfptr[20])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (0),
- ( /*_.NSLOC__V15*/ meltfptr[14]), "NREP_LOC");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NSTQ_VAR",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V21*/ meltfptr[20])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (1),
- ( /*_.NFLAG__V19*/ meltfptr[18]), "NSTQ_VAR");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NSTQ_EXP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V21*/ meltfptr[20])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (2),
- (( /*!konst_6 */ meltfrout->tabval[6])),
- "NSTQ_EXP");
- ;
- /*_.NSETFLAG__V20*/ meltfptr[19] = /*_.INST__V21*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:5226:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_JUMP */
- meltfrout->tabval[7])), (2),
- "CLASS_NREP_MATCH_JUMP");
- /*_.INST__V23*/ meltfptr[22] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @NMJMP_LABEL",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V23*/ meltfptr[22])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V23*/ meltfptr[22]), (1),
- ( /*_.NTHEN__V18*/ meltfptr[17]), "NMJMP_LABEL");
- ;
- /*_.NJUMP__V22*/ meltfptr[21] = /*_.INST__V23*/ meltfptr[22];;
- MELT_LOCATION ("warmelt-normatch.melt:5228:/ blockmultialloc");
- /*multiallocblock */
- {
- struct meltletrec_1_st
- {
- struct meltpair_st rpair_0__NSETFLAG_x1;
- struct meltpair_st rpair_1__NJUMP_x1;
- struct meltlist_st rlist_2__LIST_;
- long meltletrec_1_endgap;
- } *meltletrec_1_ptr = 0;
- meltletrec_1_ptr =
- (struct meltletrec_1_st *)
- meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
- /*^blockmultialloc.initfill */
- /*inipair rpair_0__NSETFLAG_x1 */
- /*_.NSETFLAG__V25*/ meltfptr[24] =
- (void *) &meltletrec_1_ptr->rpair_0__NSETFLAG_x1;
- meltletrec_1_ptr->rpair_0__NSETFLAG_x1.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_PAIR))));
-
- /*inipair rpair_1__NJUMP_x1 */
- /*_.NJUMP__V26*/ meltfptr[25] =
- (void *) &meltletrec_1_ptr->rpair_1__NJUMP_x1;
- meltletrec_1_ptr->rpair_1__NJUMP_x1.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_PAIR))));
-
- /*inilist rlist_2__LIST_ */
- /*_.LIST___V27*/ meltfptr[26] =
- (void *) &meltletrec_1_ptr->rlist_2__LIST_;
- meltletrec_1_ptr->rlist_2__LIST_.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_LIST))));
-
-
-
- /*^putpairhead */
- /*putpairhead */
- melt_assertmsg ("putpairhead /2 checkpair",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.NSETFLAG__V25*/ meltfptr[24]))
- == MELTOBMAG_PAIR);
- ((meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]))->hd =
- (melt_ptr_t) ( /*_.NSETFLAG__V20*/ meltfptr[19]);
- ;
- /*^putpairtail */
- /*putpairtail */
- melt_assertmsg ("putpairtail /2b0248b9 checkpair",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.NSETFLAG__V25*/ meltfptr[24]))
- == MELTOBMAG_PAIR);
- ((meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]))->tl =
- (meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]);
- ;
- /*^touch */
- meltgc_touch ( /*_.NSETFLAG__V25*/ meltfptr[24]);
- ;
- /*^putpairhead */
- /*putpairhead */
- melt_assertmsg ("putpairhead /3 checkpair",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.NJUMP__V26*/ meltfptr[25])) ==
- MELTOBMAG_PAIR);
- ((meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]))->hd =
- (melt_ptr_t) ( /*_.NJUMP__V22*/ meltfptr[21]);
- ;
- /*^touch */
- meltgc_touch ( /*_.NJUMP__V26*/ meltfptr[25]);
- ;
- /*^putlist */
- /*putlist */
- melt_assertmsg ("putlist checklist",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LIST___V27*/ meltfptr[26])) ==
- MELTOBMAG_LIST);
- ((meltlist_ptr_t) ( /*_.LIST___V27*/ meltfptr[26]))->first =
- (meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]);
- ((meltlist_ptr_t) ( /*_.LIST___V27*/ meltfptr[26]))->last =
- (meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]);
- ;
- /*^touch */
- meltgc_touch ( /*_.LIST___V27*/ meltfptr[26]);
- ;
- /*_.NLISTI__V24*/ meltfptr[23] = /*_.LIST___V27*/ meltfptr[26];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5228:/ clear");
- /*clear *//*_.NSETFLAG__V25*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.NJUMP__V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.LIST___V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.NSETFLAG__V25*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.NJUMP__V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.LIST___V27*/ meltfptr[26] = 0;
- } /*end multiallocblock */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5230:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:5230:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5230:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5230;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normstep_mflagset nlisti";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NLISTI__V24*/ meltfptr[23];
- /*_.MELT_DEBUG_FUN__V30*/ meltfptr[26] =
- 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);
- }
- ;
- /*_.IF___V29*/ meltfptr[25] =
- /*_.MELT_DEBUG_FUN__V30*/ meltfptr[26];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5230:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[26] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V29*/ meltfptr[25] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5230:/ quasiblock");
-
-
- /*_.PROGN___V31*/ meltfptr[26] = /*_.IF___V29*/ meltfptr[25];;
- /*^compute */
-
- /*_.IFCPP___V28*/ meltfptr[24] = /*_.PROGN___V31*/ meltfptr[26];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5230:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V29*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V31*/ meltfptr[26] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V28*/ meltfptr[24] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5231:/ quasiblock");
-
-
- /*^apply */
- /*apply */
- {
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NLISTI__V24*/ meltfptr[23];
- /*^apply.arg */
- argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
- /*_.RES__V33*/ meltfptr[26] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!COMPLETE_NORMSTEP_IF_LAST */ meltfrout->tabval[8])),
- (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5232:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
- /*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-normatch.melt:5232:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5232:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 5232;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normstep_mflagset return res";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.RES__V33*/ meltfptr[26];
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] =
- 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);
- }
- ;
- /*_.IF___V35*/ meltfptr[34] =
- /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5232:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V35*/ meltfptr[34] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5232:/ quasiblock");
-
-
- /*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];;
- /*^compute */
-
- /*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:5232:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V35*/ meltfptr[34] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V37*/ meltfptr[35] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V34*/ meltfptr[33] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:5233:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V33*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:5233:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V32*/ meltfptr[25] = /*_.RETURN___V38*/ meltfptr[34];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5231:/ clear");
- /*clear *//*_.RES__V33*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V38*/ meltfptr[34] = 0;
- /*_.LET___V13*/ meltfptr[11] = /*_.LET___V32*/ meltfptr[25];;
-
- MELT_LOCATION ("warmelt-normatch.melt:5217:/ clear");
- /*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_.MATFLAG__V16*/ meltfptr[15] = 0;
- /*^clear */
- /*clear *//*_.MATTHEN__V17*/ meltfptr[16] = 0;
- /*^clear */
- /*clear *//*_.NTHEN__V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.NFLAG__V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.NSETFLAG__V20*/ meltfptr[19] = 0;
- /*^clear */
- /*clear *//*_.NJUMP__V22*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.NLISTI__V24*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.LET___V32*/ meltfptr[25] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V11*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.LET___V13*/ meltfptr[11] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("NORMSTEP_MFLAGSET", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET */
+} /*end meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET */
diff --git a/gcc/melt/generated/warmelt-normatch+04.c b/gcc/melt/generated/warmelt-normatch+04.c
index 9c003e83082..39f31fd42f9 100644
--- a/gcc/melt/generated/warmelt-normatch+04.c
+++ b/gcc/melt/generated/warmelt-normatch+04.c
@@ -690,7 +690,20 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -705,7 +718,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -721,7 +734,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -737,7 +750,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -752,7 +765,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -771,7 +784,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -784,7 +797,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -797,7 +810,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -812,7 +825,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -827,7 +840,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -842,7 +855,39 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -857,7 +902,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -870,7 +915,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -884,7 +929,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -900,7 +945,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -915,23 +960,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -945,7 +974,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -958,7 +987,22 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -971,7 +1015,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -986,7 +1030,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1001,7 +1045,22 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1017,7 +1076,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1032,7 +1091,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1047,7 +1106,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1063,7 +1122,45 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1082,7 +1179,7 @@ meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1101,7 +1198,7 @@ meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1120,7 +1217,26 @@ meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1135,7 +1251,7 @@ meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1150,7 +1266,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1165,7 +1281,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1180,7 +1296,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1195,7 +1311,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1208,7 +1324,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1223,7 +1339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1238,7 +1354,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1253,7 +1369,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1268,7 +1384,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1281,7 +1397,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1294,7 +1410,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1309,7 +1425,20 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1325,7 +1454,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1344,7 +1473,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1363,7 +1492,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1382,7 +1511,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1401,7 +1530,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1417,39 +1546,23 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1468,36 +1581,7 @@ meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1516,7 +1600,56 @@ meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1525,22 +1658,22 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1559,7 +1692,7 @@ meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1574,7 +1707,7 @@ meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1589,7 +1722,7 @@ meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1605,7 +1738,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1624,7 +1757,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1643,7 +1776,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1658,7 +1791,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1673,7 +1806,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1687,7 +1820,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1701,7 +1834,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1715,7 +1848,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1729,7 +1862,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1748,7 +1881,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1767,7 +1900,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1786,7 +1919,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1805,7 +1938,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1824,7 +1957,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1843,7 +1976,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1862,7 +1995,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1881,7 +2014,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1890,7 +2023,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1899,7 +2032,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1908,7 +2041,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1922,7 +2055,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1937,7 +2070,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1951,7 +2084,7 @@ meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1970,7 +2103,7 @@ meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1986,7 +2119,7 @@ meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2000,7 +2133,7 @@ meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2014,7 +2147,7 @@ meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2161,7 @@ meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2042,7 +2175,7 @@ meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2168,17 +2301,13093 @@ static void forward_or_mark_module_start_frame_warmelt_normatch (struct
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 48
+ void *mcfr_varptr[48];
+#define MELTFRAM_NBVARNUM 20
+ long mcfr_varnum[20];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 48; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 48;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MGALTSTEP_STEPFLAGOPER", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.MG__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4829:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:4829:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4829:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4829;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mgaltstep_stepflagoper step";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
+ 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);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4829:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4829:/ quasiblock");
+
+
+ /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4829:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4830:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_OPERATION */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4830:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4830:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4830) ? (4830) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4830:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4831:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4831:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4831:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check mg"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4831) ? (4831) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4831:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4832:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
+ /*_.LOCA__V12*/
+ meltfptr[10] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4833:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
+ /*_.STHEN__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4834:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
+ /*_.SFLAG__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4835:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_FLAGARGS");
+ /*_.SFLAGARGS__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4836:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 2, "MCHGX_NODOUT");
+ /*_.NODEBUF__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4837:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 3, "MCHGX_EDGOUT");
+ /*_.EDGEBUF__V17*/
+ meltfptr[16] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4838:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 4, "MCHGX_DATANAMEMAP");
+ /*_.DATAMAP__V18*/
+ meltfptr[17] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4839:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MG__V3*/ meltfptr[2]), 5, "MCHGX_STEPNAMEMAP");
+ /*_.STEPMAP__V19*/
+ meltfptr[18] = slot;
+ };
+ ;
+ /*_.STEPNAME__V20*/ meltfptr[19] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.STEPMAP__V19*/ meltfptr[18]),
+ (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:4841:/ cond");
+ /*cond */ if ( /*_.STHEN__V13*/ meltfptr[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_.MAPOBJECT_GET__V22*/ meltfptr[21] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.STEPMAP__V19*/ meltfptr[18]),
+ (meltobject_ptr_t) ( /*_.STHEN__V13*/
+ meltfptr[12]));;
+ /*^compute */
+
+ /*_.THENNAME__V21*/ meltfptr[20] =
+ /*_.MAPOBJECT_GET__V22*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4841:/ clear");
+ /*clear *//*_.MAPOBJECT_GET__V22*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.THENNAME__V21*/ meltfptr[20] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#STEPHASH__L5*/ meltfnum[1] =
+ (melt_obj_hash ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
+ /*^compute */
+
+ /*_.DIS__V23*/ meltfptr[21] =
+ (melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4844:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V23*/ meltfptr[21]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V23*/ meltfptr[21]), 1, "NAMED_NAME");
+ /*_.CLANAM__V24*/
+ meltfptr[23] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CLANAM__V24*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4845:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 3, "MFLAG_RANK");
+ /*_.FLAGRANK__V25*/
+ meltfptr[24] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.FLAGRANK__V25*/ meltfptr[24] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4846:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 4, "MFLAG_STRING");
+ /*_.FLAGSTRING__V26*/
+ meltfptr[25] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.FLAGSTRING__V26*/ meltfptr[25] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4847:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SFLAG__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[5])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SFLAG__V14*/ meltfptr[13]), 1, "LOCA_LOCATION");
+ /*_.FLAGLOC__V27*/
+ meltfptr[26] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.FLAGLOC__V27*/ meltfptr[26] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4849:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("<tr><td><font color=\"mediumseagreen\" face=\"Times-Roman Bold\" point-size=\"6\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4852:/ locexp");
+ /* OUTCLANAM__9 */
+ meltgc_add_out ((melt_ptr_t) /*_.NODEBUF__V16*/ meltfptr[15],
+ melt_string_str ((melt_ptr_t) /*_.CLANAM__V24*/
+ meltfptr[23]) + 6);
+ ;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4856:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("</font></td> <td>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4857:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("<font face=\"Helvetica Italic\" color=\"darkgreen\" point-size=\"6.5\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4858:/ locexp");
+ /*add2sbufshortmixloc */
+ if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
+ MELTOBMAG_MIXLOC)
+ {
+ location_t loc =
+ melt_location_mixloc ((melt_ptr_t) /*_.LOCA__V12*/ meltfptr[10]);
+ meltgc_strbuf_printf ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ "{%s:%d:%d}",
+ lbasename (LOCATION_FILE (loc)),
+ LOCATION_LINE (loc), LOCATION_COLUMN (loc));
+ } /*end add2sbufshortmixloc */ ;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4859:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4860:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4861:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("<tr><td><font color=\"turquoise4\" face=\"Times-Roman\" point-size=\"7\">flag#"));
+ }
+ ;
+ /*_#GET_INT__L6*/ meltfnum[0] =
+ (melt_get_int ((melt_ptr_t) ( /*_.FLAGRANK__V25*/ meltfptr[24])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4862:/ locexp");
+ meltgc_add_out_dec ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ( /*_#GET_INT__L6*/ meltfnum[0]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4863:/ cond");
+ /*cond */ if ( /*_.FLAGSTRING__V26*/ meltfptr[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4865:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ (" "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4866:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.FLAGSTRING__V26*/
+ meltfptr[25])));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4864:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4868:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("</font></td> <td><font face=\"Helvetiva Italic\" color=\"olivedrab\" point-size=\"6.5\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4869:/ locexp");
+ /*add2sbufshortmixloc */
+ if (melt_magic_discr ((melt_ptr_t) ( /*_.LOCA__V12*/ meltfptr[10])) ==
+ MELTOBMAG_MIXLOC)
+ {
+ location_t loc =
+ melt_location_mixloc ((melt_ptr_t) /*_.LOCA__V12*/ meltfptr[10]);
+ meltgc_strbuf_printf ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ "{%s:%d:%d}",
+ lbasename (LOCATION_FILE (loc)),
+ LOCATION_LINE (loc), LOCATION_COLUMN (loc));
+ } /*end add2sbufshortmixloc */ ;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4870:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("</font></td> </tr>"));
+ }
+ ;
+ /*_#IS_MULTIPLE__L7*/ meltfnum[6] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.SFLAGARGS__V15*/ meltfptr[14])) ==
+ MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-normatch.melt:4871:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L7*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4873:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/ meltfptr[15]), (0),
+ 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4874:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ ("<tr><td colspan=\"2\"><font color=\"goldenrod4\" face=\"Times-Roman\" point-size=\"6.5\">flags{"));
+ }
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.SFLAGARGS__V15*/
+ meltfptr[14]);
+ for ( /*_#ARGIX__L8*/ meltfnum[7] = 0;
+ ( /*_#ARGIX__L8*/ meltfnum[7] >= 0)
+ && ( /*_#ARGIX__L8*/ meltfnum[7] < cit1__EACHTUP_ln);
+ /*_#ARGIX__L8*/ meltfnum[7]++)
+ {
+ /*_.ARGFLAG__V28*/ meltfptr[27] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.SFLAGARGS__V15*/ meltfptr[14]),
+ /*_#ARGIX__L8*/ meltfnum[7]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4878:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L9*/ meltfnum[8] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ARGFLAG__V28*/ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4878:/ cond");
+ /*cond */ if ( /*_#IS_A__L9*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V30*/ meltfptr[29] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4878:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check argflag"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__,
+ (4878) ? (4878) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V29*/ meltfptr[28] =
+ /*_.IFELSE___V30*/ meltfptr[29];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4878:/ clear");
+ /*clear *//*_#IS_A__L9*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V29*/ meltfptr[28] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4879:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ARGFLAG__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), 3, "MFLAG_RANK");
+ /*_.MFLAG_RANK__V31*/
+ meltfptr[29] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MFLAG_RANK__V31*/ meltfptr[29] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#ARGRANK__L10*/ meltfnum[8] =
+ (melt_get_int
+ ((melt_ptr_t) ( /*_.MFLAG_RANK__V31*/ meltfptr[29])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4880:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ARGFLAG__V28*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.ARGFLAG__V28*/ meltfptr[27]), 5, "MFLAG_SETSTEP");
+ /*_.ARGFSTEP__V32*/
+ meltfptr[31] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.ARGFSTEP__V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#I__L11*/ meltfnum[10] =
+ (( /*_#ARGRANK__L10*/ meltfnum[8]) > (0));;
+ MELT_LOCATION ("warmelt-normatch.melt:4882:/ cond");
+ /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4884:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ (" "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4885:/ locexp");
+ meltgc_add_strbuf_dec ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/
+ meltfptr[15]),
+ ( /*_#ARGRANK__L10*/
+ meltfnum[8]));
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4883:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+ /*_#IS_A__L12*/ meltfnum[11] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ARGFSTEP__V32*/ meltfptr[31]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */ meltfrout->tabval[6])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4887:/ cond");
+ /*cond */ if ( /*_#IS_A__L12*/ meltfnum[11]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4888:/ quasiblock");
+
+
+ /*_.ARGFSTEPNAME__V33*/ meltfptr[32] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.STEPMAP__V19*/
+ meltfptr[18]),
+ (meltobject_ptr_t) ( /*_.ARGFSTEP__V32*/ meltfptr[31]));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4890:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L13*/ meltfnum[12] =
+ /*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-normatch.melt:4890:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4890:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4890;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_stepflagoper argfstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ARGFSTEP__V32*/
+ meltfptr[31];
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] =
+ 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);
+ }
+ ;
+ /*_.IF___V35*/ meltfptr[34] =
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4890:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L14*/
+ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V35*/ meltfptr[34] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4890:/ quasiblock");
+
+
+ /*_.PROGN___V37*/ meltfptr[35] =
+ /*_.IF___V35*/ meltfptr[34];;
+ /*^compute */
+
+ /*_.IFCPP___V34*/ meltfptr[33] =
+ /*_.PROGN___V37*/ meltfptr[35];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4890:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V35*/ meltfptr[34] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V37*/ meltfptr[35] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V34*/ meltfptr[33] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4891:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L15*/ meltfnum[13] =
+ /*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-normatch.melt:4891:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4891:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4891;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_stepflagoper argfstepname";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.ARGFSTEPNAME__V33*/
+ meltfptr[32];
+ /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] =
+ 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);
+ }
+ ;
+ /*_.IF___V39*/ meltfptr[35] =
+ /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4891:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L16*/
+ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V39*/ meltfptr[35] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4891:/ quasiblock");
+
+
+ /*_.PROGN___V41*/ meltfptr[39] =
+ /*_.IF___V39*/ meltfptr[35];;
+ /*^compute */
+
+ /*_.IFCPP___V38*/ meltfptr[34] =
+ /*_.PROGN___V41*/ meltfptr[39];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4891:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V39*/ meltfptr[35] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V41*/ meltfptr[39] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V38*/ meltfptr[34] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#NULL__L17*/ meltfnum[12] =
+ (( /*_.ARGFSTEPNAME__V33*/ meltfptr[32]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:4892:/ cond");
+ /*cond */ if ( /*_#NULL__L17*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4893:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L18*/ meltfnum[13] =
+ /*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-normatch.melt:4893:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18]
+ =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4893:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L19*/
+ meltfnum[18];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4893;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mgaltstep_stepflagoper bad stepmap";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPMAP__V19*/
+ meltfptr[18];
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] =
+ 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);
+ }
+ ;
+ /*_.IF___V44*/ meltfptr[43] =
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4893:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L19*/
+ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V45*/
+ meltfptr[44] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V44*/ meltfptr[43] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4893:/ quasiblock");
+
+
+ /*_.PROGN___V46*/ meltfptr[44] =
+ /*_.IF___V44*/ meltfptr[43];;
+ /*^compute */
+
+ /*_.IFCPP___V43*/ meltfptr[39] =
+ /*_.PROGN___V46*/ meltfptr[44];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4893:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[13]
+ = 0;
+ /*^clear */
+ /*clear *//*_.IF___V44*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V46*/ meltfptr[44] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IF___V42*/ meltfptr[35] =
+ /*_.IFCPP___V43*/ meltfptr[39];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4892:/ clear");
+ /*clear *//*_.IFCPP___V43*/ meltfptr[39] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V42*/ meltfptr[35] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4894:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_STRING__L20*/ meltfnum[18] =
+ (melt_magic_discr
+ ((melt_ptr_t)
+ ( /*_.ARGFSTEPNAME__V33*/ meltfptr[32])) ==
+ MELTOBMAG_STRING);;
+ MELT_LOCATION ("warmelt-normatch.melt:4894:/ cond");
+ /*cond */ if ( /*_#IS_STRING__L20*/ meltfnum[18]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V48*/ meltfptr[44] =
+ ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:4894:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check argstepname"),
+ ("warmelt-normatch.melt")
+ ?
+ ("warmelt-normatch.melt")
+ : __FILE__,
+ (4894) ? (4894) :
+ __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V47*/ meltfptr[43] =
+ /*_.IFELSE___V48*/ meltfptr[44];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4894:/ clear");
+ /*clear *//*_#IS_STRING__L20*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4895:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/
+ meltfptr[16]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4896:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.ARGFSTEPNAME__V33*/ meltfptr[32])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4897:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ (" /*argflag flagop*/ -> "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4898:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.STEPNAME__V20*/
+ meltfptr[19])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4899:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ (" [ arrowhead=olnormal, color=chartreuse2, style=dotted ];"));
+ }
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4888:/ clear");
+ /*clear *//*_.ARGFSTEPNAME__V33*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V38*/ meltfptr[34] = 0;
+ /*^clear */
+ /*clear *//*_#NULL__L17*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V42*/ meltfptr[35] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4879:/ clear");
+ /*clear *//*_.MFLAG_RANK__V31*/ meltfptr[29] = 0;
+ /*^clear */
+ /*clear *//*_#ARGRANK__L10*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.ARGFSTEP__V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_#I__L11*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L12*/ meltfnum[11] = 0;
+ if ( /*_#ARGIX__L8*/ meltfnum[7] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4875:/ clear");
+ /*clear *//*_.ARGFLAG__V28*/ meltfptr[27] = 0;
+ /*^clear */
+ /*clear *//*_#ARGIX__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4902:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t)
+ ( /*_.NODEBUF__V16*/ meltfptr[15]),
+ (" }</font></td> </tr>"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4872:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4904:/ cond");
+ /*cond */ if ( /*_.THENNAME__V21*/ meltfptr[20]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4906:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.EDGEBUF__V17*/ meltfptr[16]), (0),
+ 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4907:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.STEPNAME__V20*/
+ meltfptr[19])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4908:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ (" /*then*/ -> "));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4909:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.THENNAME__V21*/
+ meltfptr[20])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4910:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.EDGEBUF__V17*/ meltfptr[16]),
+ (" [ arrowhead=normal, color=green ];"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4905:/ quasiblock");
+
+
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4832:/ clear");
+ /*clear *//*_.LOCA__V12*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.STHEN__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.SFLAG__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.SFLAGARGS__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.NODEBUF__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.EDGEBUF__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.DATAMAP__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.STEPMAP__V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.STEPNAME__V20*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.THENNAME__V21*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_#STEPHASH__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DIS__V23*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.CLANAM__V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.FLAGRANK__V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.FLAGSTRING__V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.FLAGLOC__V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_#IS_MULTIPLE__L7*/ meltfnum[6] = 0;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ clear");
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MGALTSTEP_STEPFLAGOPER", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 173
+ void *mcfr_varptr[173];
+#define MELTFRAM_NBVARNUM 68
+ long mcfr_varnum[68];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 173; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 173;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("TRANSLATE_MATCHCASE", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ getarg");
+ /*_.CURMCASE__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.SLOC__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.PREVSTEP__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PREVSTEP__V4*/ meltfptr[3])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4924:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:4924:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4924:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4924;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase curmcase";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURMCASE__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4924:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4924:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4924:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4925:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_CASE */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4925:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4925:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curmcase"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4925) ? (4925) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4925:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4926:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 1, "MCASE_MCTXT");
+ /*_.MATCTX__V12*/
+ meltfptr[11] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4927:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 2, "MCASE_SOURCE");
+ /*_.CURSCAS__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4928:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 1, "LOCA_LOCATION");
+ /*_.MLOC__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4930:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4930:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V16*/ meltfptr[15] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4930:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check matctx"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4930) ? (4930) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4930:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4931:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:4931:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4931:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4931;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase curscas";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURSCAS__V13*/ meltfptr[12];
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] =
+ 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);
+ }
+ ;
+ /*_.IF___V18*/ meltfptr[17] =
+ /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4931:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V18*/ meltfptr[17] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4931:/ quasiblock");
+
+
+ /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];;
+ /*^compute */
+
+ /*_.IFCPP___V17*/ meltfptr[15] = /*_.PROGN___V20*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4931:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4932:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-normatch.melt:4932:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4932:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4932;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase prevstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
+ /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] =
+ 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);
+ }
+ ;
+ /*_.IF___V22*/ meltfptr[18] =
+ /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4932:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V22*/ meltfptr[18] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4932:/ quasiblock");
+
+
+ /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[18];;
+ /*^compute */
+
+ /*_.IFCPP___V21*/ meltfptr[17] = /*_.PROGN___V24*/ meltfptr[22];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4932:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V22*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V24*/ meltfptr[22] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V21*/ meltfptr[17] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4933:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L9*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */
+ meltfrout->tabval[3])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4933:/ cond");
+ /*cond */ if ( /*_#IS_A__L9*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V26*/ meltfptr[22] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4933:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curscas"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4933) ? (4933) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V25*/ meltfptr[18] = /*_.IFELSE___V26*/ meltfptr[22];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4933:/ clear");
+ /*clear *//*_#IS_A__L9*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V25*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4934:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:4935:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 1, "LOCA_LOCATION");
+ /*_.CURLOC__V28*/
+ meltfptr[27] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4936:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 2, "SCAM_PATT");
+ /*_.CURPAT__V29*/
+ meltfptr[28] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4937:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSCAS__V13*/ meltfptr[12]), 3, "SCAM_BODY");
+ /*_.CURBODY__V30*/
+ meltfptr[29] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4938:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 2, "MCTX_NMATCHED");
+ /*_.NMATX__V31*/
+ meltfptr[30] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4939:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 6, "MCTX_MDATA");
+ /*_.MDATA__V32*/
+ meltfptr[31] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4940:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 0, "MCTX_NORMCTXT");
+ /*_.NCX__V33*/
+ meltfptr[32] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4941:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V12*/ meltfptr[11]), 5, "MCTX_ENV");
+ /*_.ENV__V34*/
+ meltfptr[33] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4943:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V2*/ meltfptr[1]), 4, "MCASE_VARMAP");
+ /*_.MCASE_VARMAP__V35*/
+ meltfptr[34] = slot;
+ };
+ ;
+ /*_#MAPOBJECT_COUNT__L10*/ meltfnum[0] =
+ (melt_count_mapobjects
+ ((meltmapobjects_ptr_t) ( /*_.MCASE_VARMAP__V35*/ meltfptr[34])));;
+ /*^compute */
+
+ /*_#I__L11*/ meltfnum[1] =
+ ((2) * ( /*_#MAPOBJECT_COUNT__L10*/ meltfnum[0]));;
+ /*^compute */
+
+ /*_#I__L12*/ meltfnum[11] =
+ ((12) + ( /*_#I__L11*/ meltfnum[1]));;
+ /*^compute */
+
+ /*_.VARMAP__V36*/ meltfptr[35] =
+ (meltgc_new_mapobjects
+ ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[4])),
+ ( /*_#I__L12*/ meltfnum[11])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4944:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V33*/ meltfptr[32]), 6, "NCTX_SYMBCACHEMAP");
+ /*_.SYCMAP__V37*/
+ meltfptr[36] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4945:/ apply");
+ /*apply */
+ {
+ /*_.NEWENV__V38*/ meltfptr[37] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!FRESH_ENV */ meltfrout->tabval[5])),
+ (melt_ptr_t) ( /*_.ENV__V34*/ meltfptr[33]), (""),
+ (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4947:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L13*/ meltfnum[12] =
+ /*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-normatch.melt:4947:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4947:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4947;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase nmatx";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NMATX__V31*/ meltfptr[30];
+ /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] =
+ 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);
+ }
+ ;
+ /*_.IF___V40*/ meltfptr[39] =
+ /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4947:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V40*/ meltfptr[39] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4947:/ quasiblock");
+
+
+ /*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[39];;
+ /*^compute */
+
+ /*_.IFCPP___V39*/ meltfptr[38] = /*_.PROGN___V42*/ meltfptr[40];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4947:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V40*/ meltfptr[39] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V42*/ meltfptr[40] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V39*/ meltfptr[38] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4948:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L15*/ meltfnum[13] =
+ /*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-normatch.melt:4948:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4948:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4948;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase curpat";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURPAT__V29*/ meltfptr[28];
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] =
+ 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);
+ }
+ ;
+ /*_.IF___V44*/ meltfptr[40] =
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4948:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V44*/ meltfptr[40] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4948:/ quasiblock");
+
+
+ /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[40];;
+ /*^compute */
+
+ /*_.IFCPP___V43*/ meltfptr[39] = /*_.PROGN___V46*/ meltfptr[44];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4948:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V44*/ meltfptr[40] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V46*/ meltfptr[44] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4949:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L17*/ meltfnum[12] =
+ /*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-normatch.melt:4949:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4949:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4949;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase mdata";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V32*/ meltfptr[31];
+ /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] =
+ 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);
+ }
+ ;
+ /*_.IF___V48*/ meltfptr[44] =
+ /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4949:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V48*/ meltfptr[44] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4949:/ quasiblock");
+
+
+ /*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[44];;
+ /*^compute */
+
+ /*_.IFCPP___V47*/ meltfptr[40] = /*_.PROGN___V50*/ meltfptr[48];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4949:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V48*/ meltfptr[44] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V50*/ meltfptr[48] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V47*/ meltfptr[40] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4950:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L19*/ meltfnum[13] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V33*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
+ meltfrout->tabval[6])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4950:/ cond");
+ /*cond */ if ( /*_#IS_A__L19*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V52*/ meltfptr[48] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4950:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check ncx"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4950) ? (4950) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V52*/ meltfptr[48] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V51*/ meltfptr[44] = /*_.IFELSE___V52*/ meltfptr[48];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4950:/ clear");
+ /*clear *//*_#IS_A__L19*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V52*/ meltfptr[48] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V51*/ meltfptr[44] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4951:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L20*/ meltfnum[12] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V34*/ meltfptr[33]),
+ (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
+ meltfrout->tabval[7])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4951:/ cond");
+ /*cond */ if ( /*_#IS_A__L20*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V54*/ meltfptr[53] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4951:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check env"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (4951) ? (4951) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V53*/ meltfptr[48] = /*_.IFELSE___V54*/ meltfptr[53];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4951:/ clear");
+ /*clear *//*_#IS_A__L20*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V53*/ meltfptr[48] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4952:/ quasiblock");
+
+
+ /*^multimsend */
+ /*multimsend */
+ {
+ union meltparam_un argtab[4];
+ union meltparam_un restab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ memset (&restab, 0, sizeof (restab));
+ /*^multimsend.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MDATA__V32*/ meltfptr[31]; /*^multimsend.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.CURMCASE__V2*/ meltfptr[1]; /*^multimsend.arg */
+ argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.VARMAP__V36*/ meltfptr[35]; /*^multimsend.arg */
+ argtab[3].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V3*/ meltfptr[2];
+ /*^multimsend.xres */
+ restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MFLAG__V57*/ meltfptr[56]; /*^multimsend.send */
+ /*_.MSTEP__V56*/ meltfptr[55] =
+ meltgc_send ((melt_ptr_t) ( /*_.CURPAT__V29*/ meltfptr[28]),
+ ((melt_ptr_t)
+ (( /*!TRANSLATE_PATTERN */ meltfrout->tabval[8]))),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR MELTBPARSTR_PTR
+ MELTBPARSTR_PTR ""), argtab, (MELTBPARSTR_PTR ""),
+ restab);
+ }
+ ;
+ /*^quasiblock */
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4955:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L21*/ meltfnum[13] =
+ /*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-normatch.melt:4955:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4955:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4955;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase got mstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
+ /*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] =
+ 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);
+ }
+ ;
+ /*_.IF___V59*/ meltfptr[58] =
+ /*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4955:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V59*/ meltfptr[58] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4955:/ quasiblock");
+
+
+ /*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[58];;
+ /*^compute */
+
+ /*_.IFCPP___V58*/ meltfptr[57] = /*_.PROGN___V61*/ meltfptr[59];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4955:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V59*/ meltfptr[58] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V61*/ meltfptr[59] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V58*/ meltfptr[57] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4956:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L23*/ meltfnum[12] =
+ /*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-normatch.melt:4956:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4956:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4956;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase got mflag";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MFLAG__V57*/ meltfptr[56];
+ /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] =
+ 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);
+ }
+ ;
+ /*_.IF___V63*/ meltfptr[59] =
+ /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4956:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V63*/ meltfptr[59] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4956:/ quasiblock");
+
+
+ /*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[59];;
+ /*^compute */
+
+ /*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4956:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V63*/ meltfptr[59] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V65*/ meltfptr[63] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V62*/ meltfptr[58] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4957:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L25*/ meltfnum[13] =
+ /*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-normatch.melt:4957:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4957:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4957;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase got curbody";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURBODY__V30*/ meltfptr[29];
+ /*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] =
+ 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);
+ }
+ ;
+ /*_.IF___V67*/ meltfptr[63] =
+ /*_.MELT_DEBUG_FUN__V68*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4957:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V67*/ meltfptr[63] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4957:/ quasiblock");
+
+
+ /*_.PROGN___V69*/ meltfptr[67] = /*_.IF___V67*/ meltfptr[63];;
+ /*^compute */
+
+ /*_.IFCPP___V66*/ meltfptr[59] = /*_.PROGN___V69*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4957:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V67*/ meltfptr[63] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V69*/ meltfptr[67] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V66*/ meltfptr[59] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4958:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L27*/ meltfnum[12] =
+ /*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-normatch.melt:4958:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4958:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4958;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase got varmap";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VARMAP__V36*/ meltfptr[35];
+ /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] =
+ 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);
+ }
+ ;
+ /*_.IF___V71*/ meltfptr[67] =
+ /*_.MELT_DEBUG_FUN__V72*/ meltfptr[71];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4958:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V71*/ meltfptr[67] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4958:/ quasiblock");
+
+
+ /*_.PROGN___V73*/ meltfptr[71] = /*_.IF___V71*/ meltfptr[67];;
+ /*^compute */
+
+ /*_.IFCPP___V70*/ meltfptr[63] = /*_.PROGN___V73*/ meltfptr[71];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4958:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V71*/ meltfptr[67] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V73*/ meltfptr[71] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V70*/ meltfptr[63] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MAPOBJECT */
+ {
+ /*cit1__EACHOBMAP : */ int cit1__EACHOBMAP_ix = 0, cit1__EACHOBMAP_siz =
+ 0;
+ for (cit1__EACHOBMAP_ix = 0;
+ /* we retrieve in cit1__EACHOBMAP_siz the size at each iteration since it could change. */
+ cit1__EACHOBMAP_ix >= 0
+ && (cit1__EACHOBMAP_siz =
+ melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/
+ meltfptr[35])) > 0
+ && cit1__EACHOBMAP_ix < cit1__EACHOBMAP_siz; cit1__EACHOBMAP_ix++)
+ {
+ /*_.CURSYM__V74*/ meltfptr[67] = NULL;
+ /*_.CURMDATA__V75*/ meltfptr[71] = NULL;
+ /*_.CURSYM__V74*/ meltfptr[67] =
+ ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/ meltfptr[35])->
+ entab[cit1__EACHOBMAP_ix].e_at;
+ if ( /*_.CURSYM__V74*/ meltfptr[67] == HTAB_DELETED_ENTRY)
+ { /*_.CURSYM__V74*/
+ meltfptr[67] = NULL;
+ continue;
+ };
+ if (! /*_.CURSYM__V74*/ meltfptr[67])
+ continue;
+ /*_.CURMDATA__V75*/ meltfptr[71] =
+ ((meltmapobjects_ptr_t) /*_.VARMAP__V36*/ meltfptr[35])->
+ entab[cit1__EACHOBMAP_ix].e_va;
+ if (! /*_.CURMDATA__V75*/ meltfptr[71])
+ continue;
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4962:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L29*/ meltfnum[13] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSYM__V74*/ meltfptr[67]),
+ (melt_ptr_t) (( /*!CLASS_SYMBOL */
+ meltfrout->tabval[9])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4962:/ cond");
+ /*cond */ if ( /*_#IS_A__L29*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V77*/ meltfptr[76] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4962:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check cursym"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (4962) ? (4962) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V76*/ meltfptr[75] = /*_.IFELSE___V77*/ meltfptr[76];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4962:/ clear");
+ /*clear *//*_#IS_A__L29*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V76*/ meltfptr[75] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4963:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L30*/ meltfnum[12] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMDATA__V75*/ meltfptr[71]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[10])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4963:/ cond");
+ /*cond */ if ( /*_#IS_A__L30*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V79*/ meltfptr[78] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:4963:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check curmdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (4963) ? (4963) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V79*/ meltfptr[78] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V78*/ meltfptr[76] = /*_.IFELSE___V79*/ meltfptr[78];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4963:/ clear");
+ /*clear *//*_#IS_A__L30*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V79*/ meltfptr[78] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V78*/ meltfptr[76] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4964:/ quasiblock");
+
+
+ /*_.MAKE_INTEGERBOX__V81*/ meltfptr[80] =
+ (meltgc_new_int
+ ((meltobject_ptr_t)
+ (( /*!DISCR_INTEGER */ meltfrout->tabval[12])), (0)));;
+ MELT_LOCATION ("warmelt-normatch.melt:4964:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_MATCHED_BINDING */ meltfrout->tabval[11])), (3), "CLASS_MATCHED_BINDING");
+ /*_.INST__V83*/ meltfptr[82] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @BINDER",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V83*/ meltfptr[82]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (0),
+ ( /*_.CURSYM__V74*/ meltfptr[67]), "BINDER");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MATCHBIND_DATA",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V83*/ meltfptr[82]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (1),
+ ( /*_.CURMDATA__V75*/ meltfptr[71]),
+ "MATCHBIND_DATA");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MATCHBIND_NBOCC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V83*/ meltfptr[82]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V83*/ meltfptr[82]), (2),
+ ( /*_.MAKE_INTEGERBOX__V81*/ meltfptr[80]),
+ "MATCHBIND_NBOCC");
+ ;
+ /*_.MATCHBIND__V82*/ meltfptr[81] = /*_.INST__V83*/ meltfptr[82];;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4970:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L31*/ meltfnum[13] =
+ /*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-normatch.melt:4970:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4970:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4970;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase matchbind";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATCHBIND__V82*/ meltfptr[81];
+ /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] =
+ 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);
+ }
+ ;
+ /*_.IF___V85*/ meltfptr[84] =
+ /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4970:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V85*/ meltfptr[84] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4970:/ quasiblock");
+
+
+ /*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];;
+ /*^compute */
+
+ /*_.IFCPP___V84*/ meltfptr[83] = /*_.PROGN___V87*/ meltfptr[85];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4970:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V85*/ meltfptr[84] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V87*/ meltfptr[85] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V84*/ meltfptr[83] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4971:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATCHBIND__V82*/ meltfptr[81];
+ /*_.PUT_ENV__V88*/ meltfptr[84] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!PUT_ENV */ meltfrout->tabval[13])),
+ (melt_ptr_t) ( /*_.NEWENV__V38*/ meltfptr[37]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.LET___V80*/ meltfptr[78] = /*_.PUT_ENV__V88*/ meltfptr[84];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4964:/ clear");
+ /*clear *//*_.MAKE_INTEGERBOX__V81*/ meltfptr[80] = 0;
+ /*^clear */
+ /*clear *//*_.MATCHBIND__V82*/ meltfptr[81] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V84*/ meltfptr[83] = 0;
+ /*^clear */
+ /*clear *//*_.PUT_ENV__V88*/ meltfptr[84] = 0;
+ /* end cit1__EACHOBMAP */
+ /*_.CURSYM__V74*/ meltfptr[67] = NULL;
+ /*_.CURMDATA__V75*/ meltfptr[71] = NULL;
+ }
+
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4959:/ clear");
+ /*clear *//*_.CURSYM__V74*/ meltfptr[67] = 0;
+ /*^clear */
+ /*clear *//*_.CURMDATA__V75*/ meltfptr[71] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V76*/ meltfptr[75] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V78*/ meltfptr[76] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V80*/ meltfptr[78] = 0;
+ } /*endciterblock FOREACH_IN_MAPOBJECT */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4973:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L33*/ meltfnum[12] =
+ /*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-normatch.melt:4973:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4973:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4973;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase updated newenv";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NEWENV__V38*/ meltfptr[37];
+ /*_.MELT_DEBUG_FUN__V91*/ meltfptr[81] =
+ 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);
+ }
+ ;
+ /*_.IF___V90*/ meltfptr[80] =
+ /*_.MELT_DEBUG_FUN__V91*/ meltfptr[81];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4973:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[81] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V90*/ meltfptr[80] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4973:/ quasiblock");
+
+
+ /*_.PROGN___V92*/ meltfptr[83] = /*_.IF___V90*/ meltfptr[80];;
+ /*^compute */
+
+ /*_.IFCPP___V89*/ meltfptr[85] = /*_.PROGN___V92*/ meltfptr[83];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4973:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V90*/ meltfptr[80] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V92*/ meltfptr[83] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V89*/ meltfptr[85] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4974:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L35*/ meltfnum[13] =
+ /*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-normatch.melt:4974:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4974:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4974;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase before normalizing curbody";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURBODY__V30*/ meltfptr[29];
+ /*_.MELT_DEBUG_FUN__V95*/ meltfptr[80] =
+ 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);
+ }
+ ;
+ /*_.IF___V94*/ meltfptr[81] =
+ /*_.MELT_DEBUG_FUN__V95*/ meltfptr[80];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4974:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V95*/ meltfptr[80] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V94*/ meltfptr[81] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4974:/ quasiblock");
+
+
+ /*_.PROGN___V96*/ meltfptr[83] = /*_.IF___V94*/ meltfptr[81];;
+ /*^compute */
+
+ /*_.IFCPP___V93*/ meltfptr[84] = /*_.PROGN___V96*/ meltfptr[83];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4974:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V94*/ meltfptr[81] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V96*/ meltfptr[83] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V93*/ meltfptr[84] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4975:/ quasiblock");
+
+
+ /*^multiapply */
+ /*multiapply 4args, 1x.res */
+ {
+ union meltparam_un argtab[3];
+
+ union meltparam_un restab[1];
+ memset (&restab, 0, sizeof (restab));
+ memset (&argtab, 0, sizeof (argtab));
+ /*^multiapply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NEWENV__V38*/ meltfptr[37]; /*^multiapply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NCX__V33*/ meltfptr[32]; /*^multiapply.arg */
+ argtab[2].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V3*/ meltfptr[2];
+ /*^multiapply.xres */
+ restab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NBINDS__V99*/ meltfptr[83];
+ /*^multiapply.appl */
+ /*_.NBODY__V98*/ meltfptr[81] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!NORMALIZE_TUPLE */ meltfrout->tabval[14])),
+ (melt_ptr_t) ( /*_.CURBODY__V30*/ meltfptr[29]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR MELTBPARSTR_PTR ""),
+ argtab, (MELTBPARSTR_PTR ""), restab);
+ }
+ ;
+ /*^quasiblock */
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4978:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L37*/ meltfnum[12] =
+ /*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-normatch.melt:4978:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4978:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4978;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase nbody after body normalization";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NBODY__V98*/ meltfptr[81];
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
+ 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);
+ }
+ ;
+ /*_.IF___V101*/ meltfptr[100] =
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4978:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V101*/ meltfptr[100] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4978:/ quasiblock");
+
+
+ /*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[100];;
+ /*^compute */
+
+ /*_.IFCPP___V100*/ meltfptr[99] = /*_.PROGN___V103*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4978:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V101*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V103*/ meltfptr[101] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V100*/ meltfptr[99] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4979:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L39*/ meltfnum[13] =
+ /*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-normatch.melt:4979:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4979:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4979;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase nbinds after body normalization";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NBINDS__V99*/ meltfptr[83];
+ /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] =
+ 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);
+ }
+ ;
+ /*_.IF___V105*/ meltfptr[101] =
+ /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4979:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V105*/ meltfptr[101] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4979:/ quasiblock");
+
+
+ /*_.PROGN___V107*/ meltfptr[105] = /*_.IF___V105*/ meltfptr[101];;
+ /*^compute */
+
+ /*_.IFCPP___V104*/ meltfptr[100] = /*_.PROGN___V107*/ meltfptr[105];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4979:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V105*/ meltfptr[101] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V107*/ meltfptr[105] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V104*/ meltfptr[100] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4980:/ quasiblock");
+
+
+ /*_.LISTVAROCC__V109*/ meltfptr[105] =
+ (meltgc_new_list
+ ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[15]))));;
+ MELT_LOCATION ("warmelt-normatch.melt:4982:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NEWENV__V38*/ meltfptr[37]),
+ (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[7])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NEWENV__V38*/ meltfptr[37]), 0, "ENV_BIND");
+ /*_.NEWBINDMAP__V110*/
+ meltfptr[109] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NEWBINDMAP__V110*/ meltfptr[109] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4983:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[16])), (7), "CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG");
+ /*_.INST__V112*/ meltfptr[111] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @LOCA_LOCATION",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (1),
+ ( /*_.SLOC__V3*/ meltfptr[2]), "LOCA_LOCATION");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEP_THEN",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (2),
+ (( /*nil */ NULL)), "MSTEP_THEN");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEP_FLAG",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (3),
+ ( /*_.MFLAG__V57*/ meltfptr[56]), "MSTEP_FLAG");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_VAROCC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (4),
+ (( /*nil */ NULL)), "MSTEPSUCCESS_VAROCC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_BINDS",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (5),
+ ( /*_.NBINDS__V99*/ meltfptr[83]),
+ "MSTEPSUCCESS_BINDS");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_BODY",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V112*/ meltfptr[111])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V112*/ meltfptr[111]), (6),
+ ( /*_.NBODY__V98*/ meltfptr[81]),
+ "MSTEPSUCCESS_BODY");
+ ;
+ /*_.STEPSUCC__V111*/ meltfptr[110] = /*_.INST__V112*/ meltfptr[111];;
+ /*citerblock FOREACH_IN_MAPOBJECT */
+ {
+ /*cit2__EACHOBMAP : */ int cit2__EACHOBMAP_ix = 0, cit2__EACHOBMAP_siz =
+ 0;
+ for (cit2__EACHOBMAP_ix = 0;
+ /* we retrieve in cit2__EACHOBMAP_siz the size at each iteration since it could change. */
+ cit2__EACHOBMAP_ix >= 0
+ && (cit2__EACHOBMAP_siz =
+ melt_size_mapobjects ((meltmapobjects_ptr_t)
+ /*_.NEWBINDMAP__V110*/ meltfptr[109])) >
+ 0
+ && cit2__EACHOBMAP_ix < cit2__EACHOBMAP_siz; cit2__EACHOBMAP_ix++)
+ {
+ /*_.BSYMB__V113*/ meltfptr[112] = NULL;
+ /*_.BINDING__V114*/ meltfptr[113] = NULL;
+ /*_.BSYMB__V113*/ meltfptr[112] =
+ ((meltmapobjects_ptr_t) /*_.NEWBINDMAP__V110*/ meltfptr[109])->
+ entab[cit2__EACHOBMAP_ix].e_at;
+ if ( /*_.BSYMB__V113*/ meltfptr[112] == HTAB_DELETED_ENTRY)
+ { /*_.BSYMB__V113*/
+ meltfptr[112] = NULL;
+ continue;
+ };
+ if (! /*_.BSYMB__V113*/ meltfptr[112])
+ continue;
+ /*_.BINDING__V114*/ meltfptr[113] =
+ ((meltmapobjects_ptr_t) /*_.NEWBINDMAP__V110*/ meltfptr[109])->
+ entab[cit2__EACHOBMAP_ix].e_va;
+ if (! /*_.BINDING__V114*/ meltfptr[113])
+ continue;
+
+
+
+ /*_#IS_A__L41*/ meltfnum[12] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.BINDING__V114*/ meltfptr[113]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_BINDING */
+ meltfrout->tabval[11])));;
+ MELT_LOCATION ("warmelt-normatch.melt:4995:/ cond");
+ /*cond */ if ( /*_#IS_A__L41*/ meltfnum[12]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:4996:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.BINDING__V114*/ meltfptr[113]), 2, "MATCHBIND_NBOCC");
+ /*_.MATCHBIND_NBOCC__V115*/
+ meltfptr[114] = slot;
+ };
+ ;
+ /*_#GET_INT__L43*/ meltfnum[42] =
+ (melt_get_int
+ ((melt_ptr_t)
+ ( /*_.MATCHBIND_NBOCC__V115*/ meltfptr[114])));;
+ /*^compute */
+
+ /*_#I__L44*/ meltfnum[43] =
+ (( /*_#GET_INT__L43*/ meltfnum[42]) > (0));;
+ /*^compute */
+
+ /*_#IF___L42*/ meltfnum[13] = /*_#I__L44*/ meltfnum[43];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4995:/ clear");
+ /*clear *//*_.MATCHBIND_NBOCC__V115*/ meltfptr[114] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L43*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_#I__L44*/ meltfnum[43] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_#IF___L42*/ meltfnum[13] = 0;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4995:/ cond");
+ /*cond */ if ( /*_#IF___L42*/ meltfnum[13]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:4997:/ quasiblock");
+
+
+ /*_.SYOCC__V116*/ meltfptr[114] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.SYCMAP__V37*/ meltfptr[36]),
+ (meltobject_ptr_t) ( /*_.BSYMB__V113*/
+ meltfptr[112]));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:4999:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L45*/ meltfnum[42] =
+ /*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-normatch.melt:4999:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L45*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:4999:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 4999;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase found syocc";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SYOCC__V116*/ meltfptr[114];
+ /*_.MELT_DEBUG_FUN__V119*/ meltfptr[118] =
+ 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);
+ }
+ ;
+ /*_.IF___V118*/ meltfptr[117] =
+ /*_.MELT_DEBUG_FUN__V119*/ meltfptr[118];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4999:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L46*/ meltfnum[43] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V119*/ meltfptr[118] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V118*/ meltfptr[117] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:4999:/ quasiblock");
+
+
+ /*_.PROGN___V120*/ meltfptr[118] =
+ /*_.IF___V118*/ meltfptr[117];;
+ /*^compute */
+
+ /*_.IFCPP___V117*/ meltfptr[116] =
+ /*_.PROGN___V120*/ meltfptr[118];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4999:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L45*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V118*/ meltfptr[117] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V120*/ meltfptr[118] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V117*/ meltfptr[116] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5000:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L47*/ meltfnum[43] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYOCC__V116*/ meltfptr[114]),
+ (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[17])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5000:/ cond");
+ /*cond */ if ( /*_#IS_A__L47*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V122*/ meltfptr[118] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5000:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check syocc"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__,
+ (5000) ? (5000) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V122*/ meltfptr[118] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V121*/ meltfptr[117] =
+ /*_.IFELSE___V122*/ meltfptr[118];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5000:/ clear");
+ /*clear *//*_#IS_A__L47*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V122*/ meltfptr[118] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V121*/ meltfptr[117] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5001:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SYOCC__V116*/
+ meltfptr[114]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[18])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYOCC__V116*/ meltfptr[114]), 3, "NOCC_BIND");
+ /*_.NOCC_BIND__V124*/
+ meltfptr[123] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NOCC_BIND__V124*/ meltfptr[123] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#__L48*/ meltfnum[42] =
+ (( /*_.NOCC_BIND__V124*/ meltfptr[123]) ==
+ ( /*_.BINDING__V114*/ meltfptr[113]));;
+ MELT_LOCATION ("warmelt-normatch.melt:5001:/ cond");
+ /*cond */ if ( /*_#__L48*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V125*/ meltfptr[124] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5001:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check syocc binding"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__,
+ (5001) ? (5001) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V125*/ meltfptr[124] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V123*/ meltfptr[118] =
+ /*_.IFELSE___V125*/ meltfptr[124];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5001:/ clear");
+ /*clear *//*_.NOCC_BIND__V124*/ meltfptr[123] = 0;
+ /*^clear */
+ /*clear *//*_#__L48*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V125*/ meltfptr[124] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V123*/ meltfptr[118] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5002:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.LISTVAROCC__V109*/ meltfptr[105]),
+ (melt_ptr_t) ( /*_.SYOCC__V116*/
+ meltfptr[114]));
+ }
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4997:/ clear");
+ /*clear *//*_.SYOCC__V116*/ meltfptr[114] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V117*/ meltfptr[116] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V121*/ meltfptr[117] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V123*/ meltfptr[118] = 0;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+ /* end cit2__EACHOBMAP */
+ /*_.BSYMB__V113*/ meltfptr[112] = NULL;
+ /*_.BINDING__V114*/ meltfptr[113] = NULL;
+ }
+
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:4992:/ clear");
+ /*clear *//*_.BSYMB__V113*/ meltfptr[112] = 0;
+ /*^clear */
+ /*clear *//*_.BINDING__V114*/ meltfptr[113] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L41*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_#IF___L42*/ meltfnum[13] = 0;
+ } /*endciterblock FOREACH_IN_MAPOBJECT */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5005:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L49*/ meltfnum[43] =
+ /*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-normatch.melt:5005:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5005:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5005;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase listvarocc";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.LISTVAROCC__V109*/ meltfptr[105];
+ /*_.MELT_DEBUG_FUN__V128*/ meltfptr[114] =
+ 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);
+ }
+ ;
+ /*_.IF___V127*/ meltfptr[124] =
+ /*_.MELT_DEBUG_FUN__V128*/ meltfptr[114];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5005:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V128*/ meltfptr[114] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V127*/ meltfptr[124] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5005:/ quasiblock");
+
+
+ /*_.PROGN___V129*/ meltfptr[116] = /*_.IF___V127*/ meltfptr[124];;
+ /*^compute */
+
+ /*_.IFCPP___V126*/ meltfptr[123] = /*_.PROGN___V129*/ meltfptr[116];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5005:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V127*/ meltfptr[124] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V129*/ meltfptr[116] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V126*/ meltfptr[123] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5006:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L51*/ meltfnum[42] =
+ /*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-normatch.melt:5006:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5006:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5006;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase have mstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
+ /*_.MELT_DEBUG_FUN__V132*/ meltfptr[114] =
+ 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);
+ }
+ ;
+ /*_.IF___V131*/ meltfptr[118] =
+ /*_.MELT_DEBUG_FUN__V132*/ meltfptr[114];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5006:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V132*/ meltfptr[114] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V131*/ meltfptr[118] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5006:/ quasiblock");
+
+
+ /*_.PROGN___V133*/ meltfptr[124] = /*_.IF___V131*/ meltfptr[118];;
+ /*^compute */
+
+ /*_.IFCPP___V130*/ meltfptr[117] = /*_.PROGN___V133*/ meltfptr[124];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5006:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V131*/ meltfptr[118] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V133*/ meltfptr[124] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V130*/ meltfptr[117] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5007:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:5009:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[20]);
+ /*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[19])),
+ (melt_ptr_t) ( /*_.LISTVAROCC__V109*/ meltfptr[105]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ quasiblock");
+
+
+ /*^newclosure */
+ /*newclosure *//*_.LAMBDA___V136*/ meltfptr[118] =
+ meltgc_new_closure ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
+ (meltroutine_ptr_t) (( /*!konst_23 */ meltfrout->
+ tabval[23])), (0));
+ ;
+ /*_.LAMBDA___V135*/ meltfptr[114] = /*_.LAMBDA___V136*/ meltfptr[118];;
+ /*^compute */
+
+ /*_.SORTEDVAROCC__V137*/ meltfptr[124] =
+ meltgc_sort_multiple ((melt_ptr_t)
+ ( /*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116]),
+ (melt_ptr_t) ( /*_.LAMBDA___V135*/ meltfptr[114]),
+ (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
+ tabval[20])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5014:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L53*/ meltfnum[43] =
+ /*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-normatch.melt:5014:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5014:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5014;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase sortedvarocc";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SORTEDVAROCC__V137*/ meltfptr[124];
+ /*_.MELT_DEBUG_FUN__V140*/ meltfptr[139] =
+ 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);
+ }
+ ;
+ /*_.IF___V139*/ meltfptr[138] =
+ /*_.MELT_DEBUG_FUN__V140*/ meltfptr[139];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5014:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V140*/ meltfptr[139] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V139*/ meltfptr[138] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5014:/ quasiblock");
+
+
+ /*_.PROGN___V141*/ meltfptr[139] = /*_.IF___V139*/ meltfptr[138];;
+ /*^compute */
+
+ /*_.IFCPP___V138*/ meltfptr[137] = /*_.PROGN___V141*/ meltfptr[139];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5014:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V139*/ meltfptr[138] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V141*/ meltfptr[139] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V138*/ meltfptr[137] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5015:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEPSUCC__V111*/ meltfptr[110]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[16])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEPSUCCESS_VAROCC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.STEPSUCC__V111*/
+ meltfptr[110])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.STEPSUCC__V111*/ meltfptr[110]), (4),
+ ( /*_.SORTEDVAROCC__V137*/ meltfptr[124]),
+ "MSTEPSUCCESS_VAROCC");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.STEPSUCC__V111*/ meltfptr[110]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5007:/ clear");
+ /*clear *//*_.LIST_TO_MULTIPLE__V134*/ meltfptr[116] = 0;
+ /*^clear */
+ /*clear *//*_.LAMBDA___V135*/ meltfptr[114] = 0;
+ /*^clear */
+ /*clear *//*_.SORTEDVAROCC__V137*/ meltfptr[124] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V138*/ meltfptr[137] = 0;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5017:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L55*/ meltfnum[42] =
+ /*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-normatch.melt:5017:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5017:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5017;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase stepsucc";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
+ /*_.MELT_DEBUG_FUN__V144*/ meltfptr[116] =
+ 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);
+ }
+ ;
+ /*_.IF___V143*/ meltfptr[139] =
+ /*_.MELT_DEBUG_FUN__V144*/ meltfptr[116];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5017:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V144*/ meltfptr[116] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V143*/ meltfptr[139] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5017:/ quasiblock");
+
+
+ /*_.PROGN___V145*/ meltfptr[114] = /*_.IF___V143*/ meltfptr[139];;
+ /*^compute */
+
+ /*_.IFCPP___V142*/ meltfptr[138] = /*_.PROGN___V145*/ meltfptr[114];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5017:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V143*/ meltfptr[139] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V145*/ meltfptr[114] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V142*/ meltfptr[138] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5018:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L57*/ meltfnum[43] =
+ /*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-normatch.melt:5018:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L57*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5018:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5018;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase mstep before put_then";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
+ /*_.MELT_DEBUG_FUN__V148*/ meltfptr[116] =
+ 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);
+ }
+ ;
+ /*_.IF___V147*/ meltfptr[137] =
+ /*_.MELT_DEBUG_FUN__V148*/ meltfptr[116];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5018:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L58*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V148*/ meltfptr[116] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V147*/ meltfptr[137] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5018:/ quasiblock");
+
+
+ /*_.PROGN___V149*/ meltfptr[139] = /*_.IF___V147*/ meltfptr[137];;
+ /*^compute */
+
+ /*_.IFCPP___V146*/ meltfptr[124] = /*_.PROGN___V149*/ meltfptr[139];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5018:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L57*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V147*/ meltfptr[137] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V149*/ meltfptr[139] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V146*/ meltfptr[124] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5019:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
+ /*_.PUT_THEN_MATCH__V150*/ meltfptr[114] =
+ meltgc_send ((melt_ptr_t) ( /*_.MSTEP__V56*/ meltfptr[55]),
+ (melt_ptr_t) (( /*!PUT_THEN_MATCH */ meltfrout->
+ tabval[24])), (MELTBPARSTR_PTR ""),
+ argtab, "", (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5020:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L59*/ meltfnum[42] =
+ /*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-normatch.melt:5020:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L59*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5020:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5020;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase updated mstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
+ /*_.MELT_DEBUG_FUN__V153*/ meltfptr[139] =
+ 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);
+ }
+ ;
+ /*_.IF___V152*/ meltfptr[137] =
+ /*_.MELT_DEBUG_FUN__V153*/ meltfptr[139];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5020:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L60*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V153*/ meltfptr[139] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V152*/ meltfptr[137] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5020:/ quasiblock");
+
+
+ /*_.PROGN___V154*/ meltfptr[139] = /*_.IF___V152*/ meltfptr[137];;
+ /*^compute */
+
+ /*_.IFCPP___V151*/ meltfptr[116] = /*_.PROGN___V154*/ meltfptr[139];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5020:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L59*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V152*/ meltfptr[137] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V154*/ meltfptr[139] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V151*/ meltfptr[116] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5021:/ cond");
+ /*cond */ if ( /*_.PREVSTEP__V4*/ meltfptr[3]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5023:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L61*/ meltfnum[43] =
+ /*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-normatch.melt:5023:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5023:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5023;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase got prevstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
+ /*_.MELT_DEBUG_FUN__V158*/ meltfptr[157] =
+ 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);
+ }
+ ;
+ /*_.IF___V157*/ meltfptr[156] =
+ /*_.MELT_DEBUG_FUN__V158*/ meltfptr[157];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5023:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V158*/ meltfptr[157] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V157*/ meltfptr[156] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5023:/ quasiblock");
+
+
+ /*_.PROGN___V159*/ meltfptr[157] = /*_.IF___V157*/ meltfptr[156];;
+ /*^compute */
+
+ /*_.IFCPP___V156*/ meltfptr[139] =
+ /*_.PROGN___V159*/ meltfptr[157];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5023:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V157*/ meltfptr[156] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V159*/ meltfptr[157] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V156*/ meltfptr[139] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5022:/ quasiblock");
+
+
+ /*_.PROGN___V160*/ meltfptr[156] = ( /*nil */ NULL);;
+ /*^compute */
+
+ /*_.IF___V155*/ meltfptr[137] = /*_.PROGN___V160*/ meltfptr[156];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5021:/ clear");
+ /*clear *//*_.IFCPP___V156*/ meltfptr[139] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V160*/ meltfptr[156] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V155*/ meltfptr[137] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5028:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L63*/ meltfnum[42] =
+ /*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-normatch.melt:5028:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5028:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5028;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase updated prevstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PREVSTEP__V4*/ meltfptr[3];
+ /*_.MELT_DEBUG_FUN__V163*/ meltfptr[156] =
+ 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);
+ }
+ ;
+ /*_.IF___V162*/ meltfptr[139] =
+ /*_.MELT_DEBUG_FUN__V163*/ meltfptr[156];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5028:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[156] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V162*/ meltfptr[139] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5028:/ quasiblock");
+
+
+ /*_.PROGN___V164*/ meltfptr[156] = /*_.IF___V162*/ meltfptr[139];;
+ /*^compute */
+
+ /*_.IFCPP___V161*/ meltfptr[157] = /*_.PROGN___V164*/ meltfptr[156];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5028:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V162*/ meltfptr[139] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V164*/ meltfptr[156] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V161*/ meltfptr[157] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5029:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L65*/ meltfnum[43] =
+ /*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-normatch.melt:5029:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[43]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5029:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5029;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "translate_matchcase return mstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V56*/ meltfptr[55];
+ /*_.MELT_DEBUG_FUN__V167*/ meltfptr[166] =
+ 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);
+ }
+ ;
+ /*_.IF___V166*/ meltfptr[156] =
+ /*_.MELT_DEBUG_FUN__V167*/ meltfptr[166];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5029:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V167*/ meltfptr[166] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V166*/ meltfptr[156] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5029:/ quasiblock");
+
+
+ /*_.PROGN___V168*/ meltfptr[166] = /*_.IF___V166*/ meltfptr[156];;
+ /*^compute */
+
+ /*_.IFCPP___V165*/ meltfptr[139] = /*_.PROGN___V168*/ meltfptr[166];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5029:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V166*/ meltfptr[156] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V168*/ meltfptr[166] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V165*/ meltfptr[139] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5030:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L67*/ meltfnum[42] =
+ /*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-normatch.melt:5030:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[42]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5030:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5030;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "translate_matchcase return stepsucc";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPSUCC__V111*/ meltfptr[110];
+ /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] =
+ 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);
+ }
+ ;
+ /*_.IF___V170*/ meltfptr[166] =
+ /*_.MELT_DEBUG_FUN__V171*/ meltfptr[170];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5030:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[43] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V171*/ meltfptr[170] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V170*/ meltfptr[166] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5030:/ quasiblock");
+
+
+ /*_.PROGN___V172*/ meltfptr[170] = /*_.IF___V170*/ meltfptr[166];;
+ /*^compute */
+
+ /*_.IFCPP___V169*/ meltfptr[156] = /*_.PROGN___V172*/ meltfptr[170];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5030:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[42] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V170*/ meltfptr[166] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V172*/ meltfptr[170] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V169*/ meltfptr[156] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5031:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.MSTEP__V56*/ meltfptr[55];;
+ MELT_LOCATION ("warmelt-normatch.melt:5031:/ putxtraresult");
+ if (!meltxrestab_ || !meltxresdescr_)
+ goto labend_rout;
+ if (meltxresdescr_[0] != MELTBPAR_PTR)
+ goto labend_rout;
+ if (meltxrestab_[0].meltbp_aptr)
+ *(meltxrestab_[0].meltbp_aptr) =
+ (melt_ptr_t) ( /*_.STEPSUCC__V111*/ meltfptr[110]);
+ ;
+ /*^finalreturn */
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V108*/ meltfptr[101] = /*_.RETURN___V173*/ meltfptr[166];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4980:/ clear");
+ /*clear *//*_.LISTVAROCC__V109*/ meltfptr[105] = 0;
+ /*^clear */
+ /*clear *//*_.NEWBINDMAP__V110*/ meltfptr[109] = 0;
+ /*^clear */
+ /*clear *//*_.STEPSUCC__V111*/ meltfptr[110] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V126*/ meltfptr[123] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V130*/ meltfptr[117] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V142*/ meltfptr[138] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V146*/ meltfptr[124] = 0;
+ /*^clear */
+ /*clear *//*_.PUT_THEN_MATCH__V150*/ meltfptr[114] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V151*/ meltfptr[116] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V155*/ meltfptr[137] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V161*/ meltfptr[157] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V165*/ meltfptr[139] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V169*/ meltfptr[156] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V173*/ meltfptr[166] = 0;
+ /*_.MULTI___V97*/ meltfptr[80] = /*_.LET___V108*/ meltfptr[101];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4975:/ clear");
+ /*clear *//*_.IFCPP___V100*/ meltfptr[99] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V104*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V108*/ meltfptr[101] = 0;
+
+ /*^clear */
+ /*clear *//*_.NBINDS__V99*/ meltfptr[83] = 0;
+ /*_.MULTI___V55*/ meltfptr[53] = /*_.MULTI___V97*/ meltfptr[80];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4952:/ clear");
+ /*clear *//*_.IFCPP___V58*/ meltfptr[57] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V62*/ meltfptr[58] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V66*/ meltfptr[59] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V70*/ meltfptr[63] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V89*/ meltfptr[85] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V93*/ meltfptr[84] = 0;
+ /*^clear */
+ /*clear *//*_.MULTI___V97*/ meltfptr[80] = 0;
+
+ /*^clear */
+ /*clear *//*_.MFLAG__V57*/ meltfptr[56] = 0;
+ /*_.LET___V27*/ meltfptr[22] = /*_.MULTI___V55*/ meltfptr[53];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4934:/ clear");
+ /*clear *//*_.CURLOC__V28*/ meltfptr[27] = 0;
+ /*^clear */
+ /*clear *//*_.CURPAT__V29*/ meltfptr[28] = 0;
+ /*^clear */
+ /*clear *//*_.CURBODY__V30*/ meltfptr[29] = 0;
+ /*^clear */
+ /*clear *//*_.NMATX__V31*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.MDATA__V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.NCX__V33*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_.ENV__V34*/ meltfptr[33] = 0;
+ /*^clear */
+ /*clear *//*_.MCASE_VARMAP__V35*/ meltfptr[34] = 0;
+ /*^clear */
+ /*clear *//*_#MAPOBJECT_COUNT__L10*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_#I__L11*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_#I__L12*/ meltfnum[11] = 0;
+ /*^clear */
+ /*clear *//*_.VARMAP__V36*/ meltfptr[35] = 0;
+ /*^clear */
+ /*clear *//*_.SYCMAP__V37*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.NEWENV__V38*/ meltfptr[37] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V39*/ meltfptr[38] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V43*/ meltfptr[39] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V47*/ meltfptr[40] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V51*/ meltfptr[44] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V53*/ meltfptr[48] = 0;
+ /*^clear */
+ /*clear *//*_.MULTI___V55*/ meltfptr[53] = 0;
+ /*_.LET___V11*/ meltfptr[6] = /*_.LET___V27*/ meltfptr[22];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:4926:/ clear");
+ /*clear *//*_.MATCTX__V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.CURSCAS__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.MLOC__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V17*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V21*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V25*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V27*/ meltfptr[22] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];;
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V11*/ meltfptr[6] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("TRANSLATE_MATCHCASE", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_104_warmelt_normatch_LAMBDA___23___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 6
+ void *mcfr_varptr[6];
+/*no varnum*/
+#define MELTFRAM_NBVARNUM /*none*/0
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 6; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 6;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ getarg");
+ /*_.O1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.O2__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.O2__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5011:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.O1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.O1__V2*/ meltfptr[1]), 1, "NOCC_SYMB");
+ /*_.NOCC_SYMB__V4*/
+ meltfptr[3] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NOCC_SYMB__V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5011:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.O2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.O2__V3*/ meltfptr[2]), 1, "NOCC_SYMB");
+ /*_.NOCC_SYMB__V5*/
+ meltfptr[4] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NOCC_SYMB__V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5011:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NOCC_SYMB__V5*/ meltfptr[4];
+ /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!COMPARE_NAMED_ALPHA */ meltfrout->tabval[0])),
+ (melt_ptr_t) ( /*_.NOCC_SYMB__V4*/ meltfptr[3]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];;
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.NOCC_SYMB__V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.NOCC_SYMB__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_104_warmelt_normatch_LAMBDA___23__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 21
+ void *mcfr_varptr[21];
+#define MELTFRAM_NBVARNUM 6
+ long mcfr_varnum[6];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 21; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 21;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("ALTMATCH_NORMALIZE_FLAG", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ getarg");
+ /*_.FLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NMCTXT__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5139:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5139:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5139:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5139;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "altmatch_normalize_flag flag";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FLAG__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] =
+ 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);
+ }
+ ;
+ /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5139:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V5*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5139:/ quasiblock");
+
+
+ /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5139:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5140:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5140:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5140:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("altmatch_normalize_flag check flag"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5140) ? (5140) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5140:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5142:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5142:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5142:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("altmatch_normalize_flag check nmctxt"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5142) ? (5142) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5142:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5144:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 3, "MATNORX_FLAGMAP");
+ /*_.FLAGMAP__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ /*_.NFLA__V14*/ meltfptr[13] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.FLAGMAP__V13*/ meltfptr[12]),
+ (meltobject_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:5146:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 1, "MATNORX_NMATCH");
+ /*_.NMATCH__V15*/
+ meltfptr[14] = slot;
+ };
+ ;
+ /*_#NULL__L5*/ meltfnum[1] =
+ (( /*_.NFLA__V14*/ meltfptr[13]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:5148:/ cond");
+ /*cond */ if ( /*_#NULL__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5151:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[3])), (3), "CLASS_NREP_MATCH_FLAG");
+ /*_.INST__V17*/ meltfptr[16] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NRPFLA_FLAG",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V17*/ meltfptr[16]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (1),
+ ( /*_.FLAG__V2*/ meltfptr[1]), "NRPFLA_FLAG");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NRPFLA_NMATCH",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V17*/ meltfptr[16]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (2),
+ ( /*_.NMATCH__V15*/ meltfptr[14]),
+ "NRPFLA_NMATCH");
+ ;
+ /*_.INST___V16*/ meltfptr[15] = /*_.INST__V17*/ meltfptr[16];;
+ MELT_LOCATION ("warmelt-normatch.melt:5150:/ compute");
+ /*_.NFLA__V14*/ meltfptr[13] = /*_.SETQ___V18*/ meltfptr[17] =
+ /*_.INST___V16*/ meltfptr[15];;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5154:/ locexp");
+ meltgc_put_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.FLAGMAP__V13*/ meltfptr[12]),
+ (meltobject_ptr_t) ( /*_.FLAG__V2*/
+ meltfptr[1]),
+ (melt_ptr_t) ( /*_.NFLA__V14*/
+ meltfptr[13]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5149:/ quasiblock");
+
+
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5148:/ clear");
+ /*clear *//*_.INST___V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.SETQ___V18*/ meltfptr[17] = 0;
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5155:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L6*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NFLA__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
+ meltfrout->tabval[3])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5155:/ cond");
+ /*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V20*/ meltfptr[17] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5155:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("altmatch_normalize_flag check nfla"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5155) ? (5155) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V20*/ meltfptr[17] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V19*/ meltfptr[15] = /*_.IFELSE___V20*/ meltfptr[17];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5155:/ clear");
+ /*clear *//*_#IS_A__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V20*/ meltfptr[17] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V19*/ meltfptr[15] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5157:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NFLA__V14*/ meltfptr[13];;
+ MELT_LOCATION ("warmelt-normatch.melt:5157:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V21*/ meltfptr[17];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5144:/ clear");
+ /*clear *//*_.FLAGMAP__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.NFLA__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NMATCH__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_#NULL__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V19*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V21*/ meltfptr[17] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V12*/ meltfptr[10] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("ALTMATCH_NORMALIZE_FLAG", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t meltxargdescr_[],
+ union meltparam_un * meltxargtab_,
+ const melt_argdescr_cell_t meltxresdescr_[],
+ union meltparam_un * meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 41
+ void *mcfr_varptr[41];
+#define MELTFRAM_NBVARNUM 19
+ long mcfr_varnum[19];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 41; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 41;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MATCH_DATA_UPDATE_DATA_STEPS_INDEX", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ getarg");
+ /*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5171:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5171:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5171:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5171;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_data_update_steps_index mdata";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5171:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5171:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5171:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5172:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5172:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5172:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check mdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5172) ? (5172) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5172:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5173:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), 4, "MDATA_STEPS");
+ /*_.MSTEPS__V10*/
+ meltfptr[9] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MSTEPS__V10*/ meltfptr[9] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#IS_LIST_OR_NULL__L4*/ meltfnum[0] =
+ (( /*_.MSTEPS__V10*/ meltfptr[9]) == NULL
+ ||
+ (melt_unsafe_magic_discr
+ ((melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9])) == MELTOBMAG_LIST));;
+ MELT_LOCATION ("warmelt-normatch.melt:5175:/ cond");
+ /*cond */ if ( /*_#IS_LIST_OR_NULL__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5176:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.MSTEPTUP__V13*/ meltfptr[12] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[2])),
+ (melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit1__EACHTUP: */
+ long cit1__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.MSTEPTUP__V13*/
+ meltfptr[12]);
+ for ( /*_#STIX__L5*/ meltfnum[1] = 0;
+ ( /*_#STIX__L5*/ meltfnum[1] >= 0)
+ && ( /*_#STIX__L5*/ meltfnum[1] < cit1__EACHTUP_ln);
+ /*_#STIX__L5*/ meltfnum[1]++)
+ {
+ /*_.CURMSTEP__V14*/ meltfptr[13] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.MSTEPTUP__V13*/ meltfptr[12]),
+ /*_#STIX__L5*/ meltfnum[1]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5181:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L6*/ meltfnum[5] =
+ /*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-normatch.melt:5181:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5181:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5181;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_data_update_data_steps_index curmstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURMSTEP__V14*/ meltfptr[13];
+ /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] =
+ 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);
+ }
+ ;
+ /*_.IF___V16*/ meltfptr[15] =
+ /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5181:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V16*/ meltfptr[15] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5181:/ quasiblock");
+
+
+ /*_.PROGN___V18*/ meltfptr[16] =
+ /*_.IF___V16*/ meltfptr[15];;
+ /*^compute */
+
+ /*_.IFCPP___V15*/ meltfptr[14] =
+ /*_.PROGN___V18*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5181:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V18*/ meltfptr[16] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_A__L8*/ meltfnum[6] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMSTEP__V14*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[3])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5182:/ cond");
+ /*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5183:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMSTEP__V14*/ meltfptr[13]), 4, "MSTEP_INDEX");
+ /*_.OLDIXV__V21*/
+ meltfptr[20] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5184:/ cond");
+ /*cond */ if ( /*_.OLDIXV__V21*/ meltfptr[20]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5185:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#GET_INT__L9*/ meltfnum[5] =
+ (melt_get_int
+ ((melt_ptr_t)
+ ( /*_.OLDIXV__V21*/ meltfptr[20])));;
+ /*^compute */
+
+ /*_#I__L10*/ meltfnum[9] =
+ (( /*_#STIX__L5*/ meltfnum[1]) + (1));;
+ /*^compute */
+
+ /*_#I__L11*/ meltfnum[10] =
+ (( /*_#GET_INT__L9*/ meltfnum[5]) ==
+ ( /*_#I__L10*/ meltfnum[9]));;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5185:/ cond");
+ /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V24*/ meltfptr[23] =
+ ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5185:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check oldix"),
+ ("warmelt-normatch.melt")
+ ?
+ ("warmelt-normatch.melt")
+ : __FILE__,
+ (5185) ? (5185) :
+ __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V24*/ meltfptr[23]
+ = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V23*/ meltfptr[22] =
+ /*_.IFELSE___V24*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5185:/ clear");
+ /*clear *//*_#GET_INT__L9*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_#I__L10*/ meltfnum[9] = 0;
+ /*^clear */
+ /*clear *//*_#I__L11*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V22*/ meltfptr[21] =
+ /*_.IFCPP___V23*/ meltfptr[22];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5184:/ clear");
+ /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L12*/ meltfnum[5] =
+ (( /*_#STIX__L5*/ meltfnum[1]) + (1));;
+ /*^compute */
+
+ /*_.MAKE_INTEGERBOX__V25*/ meltfptr[23] =
+ (meltgc_new_int
+ ((meltobject_ptr_t)
+ (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->
+ tabval[4])), ( /*_#I__L12*/ meltfnum[5])));;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5186:/ quasiblock");
+
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MSTEP_INDEX",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.CURMSTEP__V14*/ meltfptr[13])) == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.CURMSTEP__V14*/
+ meltfptr[13]), (4),
+ ( /*_.MAKE_INTEGERBOX__V25*/
+ meltfptr[23]),
+ "MSTEP_INDEX");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.CURMSTEP__V14*/ meltfptr[13]);
+ ;
+ /*_.IFELSE___V22*/ meltfptr[21] =
+ /*_.CURMSTEP__V14*/ meltfptr[13];;
+
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5184:/ clear");
+ /*clear *//*_#I__L12*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.MAKE_INTEGERBOX__V25*/ meltfptr[23]
+ = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V20*/ meltfptr[16] =
+ /*_.IFELSE___V22*/ meltfptr[21];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5183:/ clear");
+ /*clear *//*_.OLDIXV__V21*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
+ /*_.IF___V19*/ meltfptr[15] =
+ /*_.LET___V20*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5182:/ clear");
+ /*clear *//*_.LET___V20*/ meltfptr[16] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V19*/ meltfptr[15] = NULL;;
+ }
+ ;
+ if ( /*_#STIX__L5*/ meltfnum[1] < 0)
+ break;
+ } /* end cit1__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5178:/ clear");
+ /*clear *//*_.CURMSTEP__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_#STIX__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L8*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V19*/ meltfptr[15] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5190:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MDATA_STEPS",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.MDATA__V2*/
+ meltfptr[1])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.MDATA__V2*/ meltfptr[1]), (4),
+ ( /*_.MSTEPTUP__V13*/ meltfptr[12]),
+ "MDATA_STEPS");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.MDATA__V2*/ meltfptr[1]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5191:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L13*/ meltfnum[9] =
+ /*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-normatch.melt:5191:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[9]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5191:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5191;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_data_update_data_steps_index updated msteptup";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEPTUP__V13*/ meltfptr[12];
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[20] =
+ 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);
+ }
+ ;
+ /*_.IF___V27*/ meltfptr[23] =
+ /*_.MELT_DEBUG_FUN__V28*/ meltfptr[20];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5191:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[20] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V27*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5191:/ quasiblock");
+
+
+ /*_.PROGN___V29*/ meltfptr[21] = /*_.IF___V27*/ meltfptr[23];;
+ /*^compute */
+
+ /*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5191:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[9] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V27*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V29*/ meltfptr[21] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V12*/ meltfptr[11] = /*_.IFCPP___V26*/ meltfptr[22];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5176:/ clear");
+ /*clear *//*_.MSTEPTUP__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
+ /*_.IFELSE___V11*/ meltfptr[10] = /*_.LET___V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5175:/ clear");
+ /*clear *//*_.LET___V12*/ meltfptr[11] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MULTIPLE__L15*/ meltfnum[5] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.MSTEPS__V10*/ meltfptr[9]))
+ == MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-normatch.melt:5194:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L15*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5195:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L16*/ meltfnum[10] =
+ /*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-normatch.melt:5195:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5195:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5195;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_data_update_data_steps_index msteps already tuple";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEPS__V10*/ meltfptr[9];
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[21] =
+ 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);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[23] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5195:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5195:/ quasiblock");
+
+
+ /*_.PROGN___V34*/ meltfptr[12] =
+ /*_.IF___V32*/ meltfptr[23];;
+ /*^compute */
+
+ /*_.IFCPP___V31*/ meltfptr[20] =
+ /*_.PROGN___V34*/ meltfptr[12];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5195:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V34*/ meltfptr[12] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V31*/ meltfptr[20] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.IFELSE___V30*/ meltfptr[16] =
+ /*_.IFCPP___V31*/ meltfptr[20];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5194:/ clear");
+ /*clear *//*_.IFCPP___V31*/ meltfptr[20] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5198:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L18*/ meltfnum[9] =
+ /*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-normatch.melt:5198:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[9]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5198:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5198;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_data_update_data_steps_index unexpected msteps";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEPS__V10*/ meltfptr[9];
+ /*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] =
+ 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);
+ }
+ ;
+ /*_.IF___V36*/ meltfptr[11] =
+ /*_.MELT_DEBUG_FUN__V37*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5198:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[10] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V36*/ meltfptr[11] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5198:/ quasiblock");
+
+
+ /*_.PROGN___V38*/ meltfptr[23] =
+ /*_.IF___V36*/ meltfptr[11];;
+ /*^compute */
+
+ /*_.IFCPP___V35*/ meltfptr[22] =
+ /*_.PROGN___V38*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5198:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[9] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V36*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V38*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V35*/ meltfptr[22] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5199:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V40*/ meltfptr[20] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5199:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@unexpected msteps in match_data_update_data_steps_index"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5199) ? (5199) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V40*/ meltfptr[20] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V39*/ meltfptr[12] =
+ /*_.IFELSE___V40*/ meltfptr[20];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5199:/ clear");
+ /*clear *//*_.IFELSE___V40*/ meltfptr[20] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V39*/ meltfptr[12] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5197:/ quasiblock");
+
+
+ /*_.PROGN___V41*/ meltfptr[21] =
+ /*_.IFCPP___V39*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFELSE___V30*/ meltfptr[16] =
+ /*_.PROGN___V41*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5194:/ clear");
+ /*clear *//*_.IFCPP___V35*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V39*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V41*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V11*/ meltfptr[10] = /*_.IFELSE___V30*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5175:/ clear");
+ /*clear *//*_#IS_MULTIPLE__L15*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V30*/ meltfptr[16] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V9*/ meltfptr[4] = /*_.IFELSE___V11*/ meltfptr[10];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5173:/ clear");
+ /*clear *//*_.MSTEPS__V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_#IS_LIST_OR_NULL__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];;
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MATCH_DATA_UPDATE_DATA_STEPS_INDEX", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_107_warmelt_normatch_MATCH_STEP_INDEX_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 42
+ void *mcfr_varptr[42];
+#define MELTFRAM_NBVARNUM 14
+ long mcfr_varnum[14];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 42; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 42;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MATCH_STEP_INDEX", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ getarg");
+ /*_.MSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5205:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5205:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5205:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5205;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "match_step_index mstep start";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5205:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5205:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5205:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5206:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5206:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5206:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check mstep"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5206) ? (5206) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5206:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_NOT_A__L4*/ meltfnum[0] =
+ !melt_is_instance_of ((melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5207:/ cond");
+ /*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5209:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:5209:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5209:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5209;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_step_index mstep without data so return nil";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MSTEP__V2*/ meltfptr[1];
+ /*_.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);
+ }
+ ;
+ /*_.IF___V11*/ meltfptr[10] =
+ /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5209:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V11*/ meltfptr[10] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5209:/ quasiblock");
+
+
+ /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5209:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5210:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = NULL;;
+ MELT_LOCATION ("warmelt-normatch.melt:5210:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:5208:/ quasiblock");
+
+
+ /*_.PROGN___V15*/ meltfptr[11] = /*_.RETURN___V14*/ meltfptr[10];;
+ /*^compute */
+
+ /*_.IF___V9*/ meltfptr[4] = /*_.PROGN___V15*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5207:/ clear");
+ /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V14*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V15*/ meltfptr[11] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5211:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
+ /*_.MATINDEX__V17*/
+ meltfptr[10] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5213:/ cond");
+ /*cond */ if ( /*_.MATINDEX__V17*/ meltfptr[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5215:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_INTEGERBOX__L7*/ meltfnum[5] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.MATINDEX__V17*/ meltfptr[10])) ==
+ MELTOBMAG_INT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5215:/ cond");
+ /*cond */ if ( /*_#IS_INTEGERBOX__L7*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V20*/ meltfptr[19] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5215:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check matindex"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (5215) ? (5215) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V19*/ meltfptr[18] = /*_.IFELSE___V20*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5215:/ clear");
+ /*clear *//*_#IS_INTEGERBOX__L7*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5216:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:5216:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:5214:/ quasiblock");
+
+
+ /*_.PROGN___V22*/ meltfptr[21] = /*_.RETURN___V21*/ meltfptr[19];;
+ /*^compute */
+
+ /*_.IFELSE___V18*/ meltfptr[11] = /*_.PROGN___V22*/ meltfptr[21];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5213:/ clear");
+ /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V21*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V22*/ meltfptr[21] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5217:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MSTEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
+ /*_.MATDATA__V24*/
+ meltfptr[19] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MATDATA__V24*/ meltfptr[19] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5219:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L8*/ 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-normatch.melt:5219:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5219:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5219;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_step_index matdata before match_data_update_data_steps_index";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATDATA__V24*/ meltfptr[19];
+ /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] =
+ 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);
+ }
+ ;
+ /*_.IF___V26*/ meltfptr[25] =
+ /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5219:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V26*/ meltfptr[25] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5219:/ quasiblock");
+
+
+ /*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
+ /*^compute */
+
+ /*_.IFCPP___V25*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5219:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V28*/ meltfptr[26] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V25*/ meltfptr[21] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5220:/ apply");
+ /*apply */
+ {
+ /*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V29*/ meltfptr[25] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
+ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.MATDATA__V24*/ meltfptr[19]),
+ (""), (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5221:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L10*/ meltfnum[5] =
+ /*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-normatch.melt:5221:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5221:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5221;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_step_index matdata after match_data_update_data_steps_index";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATDATA__V24*/ meltfptr[19];
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
+ 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);
+ }
+ ;
+ /*_.IF___V31*/ meltfptr[30] =
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5221:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V31*/ meltfptr[30] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5221:/ quasiblock");
+
+
+ /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
+ /*^compute */
+
+ /*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5221:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V31*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V30*/ meltfptr[26] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5222:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSTEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
+ /*_.MSTEP_INDEX__V34*/
+ meltfptr[30] = slot;
+ };
+ ;
+ /*^compute */
+ /*_.MATINDEX__V17*/ meltfptr[10] = /*_.SETQ___V35*/ meltfptr[31] =
+ /*_.MSTEP_INDEX__V34*/ meltfptr[30];;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5223:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L12*/ 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-normatch.melt:5223:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5223:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5223;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "match_step_index final matindex";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATINDEX__V17*/ meltfptr[10];
+ /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] =
+ 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);
+ }
+ ;
+ /*_.IF___V37*/ meltfptr[36] =
+ /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5223:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V37*/ meltfptr[36] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5223:/ quasiblock");
+
+
+ /*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];;
+ /*^compute */
+
+ /*_.IFCPP___V36*/ meltfptr[35] = /*_.PROGN___V39*/ meltfptr[37];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5223:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V37*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V39*/ meltfptr[37] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V36*/ meltfptr[35] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5224:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_INTEGERBOX__L14*/ meltfnum[5] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.MATINDEX__V17*/ meltfptr[10])) ==
+ MELTOBMAG_INT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5224:/ cond");
+ /*cond */ if ( /*_#IS_INTEGERBOX__L14*/ meltfnum[5]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V41*/ meltfptr[37] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5224:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("match_step_index bad matindex"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (5224) ? (5224) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V40*/ meltfptr[36] = /*_.IFELSE___V41*/ meltfptr[37];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5224:/ clear");
+ /*clear *//*_#IS_INTEGERBOX__L14*/ meltfnum[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V40*/ meltfptr[36] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5225:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:5225:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V23*/ meltfptr[18] = /*_.RETURN___V42*/ meltfptr[37];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5217:/ clear");
+ /*clear *//*_.MATDATA__V24*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V29*/ meltfptr[25]
+ = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V30*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.MSTEP_INDEX__V34*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.SETQ___V35*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V36*/ meltfptr[35] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V40*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V42*/ meltfptr[37] = 0;
+ /*_.IFELSE___V18*/ meltfptr[11] = /*_.LET___V23*/ meltfptr[18];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5213:/ clear");
+ /*clear *//*_.LET___V23*/ meltfptr[18] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V16*/ meltfptr[9] = /*_.IFELSE___V18*/ meltfptr[11];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5211:/ clear");
+ /*clear *//*_.MATINDEX__V17*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V18*/ meltfptr[11] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[9];;
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_#IS_NOT_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V16*/ meltfptr[9] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MATCH_STEP_INDEX", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_107_warmelt_normatch_MATCH_STEP_INDEX */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 129
+ void *mcfr_varptr[129];
+#define MELTFRAM_NBVARNUM 49
+ long mcfr_varnum[49];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 129; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 129;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("COMPLETE_NORMSTEP_IF_LAST", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NORMSTEP__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NMCTXT__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5231:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5231:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5231:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5231;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last start step";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5231:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5231:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5231:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5232:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^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-normatch.melt:5232:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5232:/ apply");
+ /*apply */
+ {
+ 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-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5232;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last start normstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] =
+ 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);
+ }
+ ;
+ /*_.IF___V10*/ meltfptr[6] =
+ /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5232:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V10*/ meltfptr[6] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5232:/ quasiblock");
+
+
+ /*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5232:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V10*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V12*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5233:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L5*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5233:/ cond");
+ /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V14*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5233:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5233) ? (5233) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V13*/ meltfptr[6] = /*_.IFELSE___V14*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5233:/ clear");
+ /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V13*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5234:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L6*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5234:/ cond");
+ /*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V16*/ meltfptr[15] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5234:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmctxt"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5234) ? (5234) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V15*/ meltfptr[10] = /*_.IFELSE___V16*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5234:/ clear");
+ /*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V15*/ meltfptr[10] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_NOT_A__L7*/ meltfnum[0] =
+ !melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */
+ meltfrout->tabval[3])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5235:/ cond");
+ /*cond */ if ( /*_#IS_NOT_A__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5237:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L8*/ 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-normatch.melt:5237:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5237:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5237;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last step without data";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*_.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);
+ }
+ ;
+ /*_.IF___V19*/ meltfptr[18] =
+ /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5237:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V19*/ meltfptr[18] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5237:/ quasiblock");
+
+
+ /*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
+ /*^compute */
+
+ /*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5237:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V21*/ meltfptr[19] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5238:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L10*/ meltfnum[8] =
+ /*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-normatch.melt:5238:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5238:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5238;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last returning unchanged normstep without data";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] =
+ 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);
+ }
+ ;
+ /*_.IF___V23*/ meltfptr[19] =
+ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5238:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V23*/ meltfptr[19] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5238:/ quasiblock");
+
+
+ /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[19];;
+ /*^compute */
+
+ /*_.IFCPP___V22*/ meltfptr[18] = /*_.PROGN___V25*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5238:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V23*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V25*/ meltfptr[23] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5239:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
+ MELT_LOCATION ("warmelt-normatch.melt:5239:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:5236:/ quasiblock");
+
+
+ /*_.PROGN___V27*/ meltfptr[23] = /*_.RETURN___V26*/ meltfptr[19];;
+ /*^compute */
+
+ /*_.IF___V17*/ meltfptr[15] = /*_.PROGN___V27*/ meltfptr[23];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5235:/ clear");
+ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V26*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V27*/ meltfptr[23] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V17*/ meltfptr[15] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5240:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
+ /*_.MATDATA__V29*/
+ meltfptr[18] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MATDATA__V29*/ meltfptr[18] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5242:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L12*/ 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-normatch.melt:5242:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5242:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5242;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last matdata before match_data_update_data_steps_index";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATDATA__V29*/ meltfptr[18];
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] =
+ 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);
+ }
+ ;
+ /*_.IF___V31*/ meltfptr[23] =
+ /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5242:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V31*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5242:/ quasiblock");
+
+
+ /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[23];;
+ /*^compute */
+
+ /*_.IFCPP___V30*/ meltfptr[19] = /*_.PROGN___V33*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5242:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V31*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V33*/ meltfptr[31] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V30*/ meltfptr[19] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5243:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L14*/ meltfnum[8] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[4])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5243:/ cond");
+ /*cond */ if ( /*_#IS_A__L14*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V35*/ meltfptr[31] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5243:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check matdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5243) ? (5243) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V34*/ meltfptr[23] = /*_.IFELSE___V35*/ meltfptr[31];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5243:/ clear");
+ /*clear *//*_#IS_A__L14*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V34*/ meltfptr[23] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5244:/ apply");
+ /*apply */
+ {
+ /*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V36*/ meltfptr[31] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MATCH_DATA_UPDATE_DATA_STEPS_INDEX */ meltfrout->
+ tabval[5])),
+ (melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]), (""),
+ (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5245:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L15*/ 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-normatch.melt:5245:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5245:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5245;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last matdata after match_data_update_data_steps_index";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATDATA__V29*/ meltfptr[18];
+ /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] =
+ 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);
+ }
+ ;
+ /*_.IF___V38*/ meltfptr[37] =
+ /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5245:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V38*/ meltfptr[37] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5245:/ quasiblock");
+
+
+ /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];;
+ /*^compute */
+
+ /*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5245:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V38*/ meltfptr[37] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V40*/ meltfptr[38] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V37*/ meltfptr[36] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5246:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:5247:/ apply");
+ /*apply */
+ {
+ /*_.MATINDEX__V42*/ meltfptr[38] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MATCH_STEP_INDEX */ meltfrout->tabval[6])),
+ (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (""),
+ (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5248:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 2, "MATNORX_DATAMAP");
+ /*_.DATAMAP__V43*/
+ meltfptr[42] = slot;
+ };
+ ;
+ /*_.NDATA__V44*/ meltfptr[43] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.DATAMAP__V43*/ meltfptr[42]),
+ (meltobject_ptr_t) ( /*_.MATDATA__V29*/
+ meltfptr[18]));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5251:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L17*/ meltfnum[8] =
+ /*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-normatch.melt:5251:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5251:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5251;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "complete_normstep_if_last matindex";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATINDEX__V42*/ meltfptr[38];
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] =
+ 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);
+ }
+ ;
+ /*_.IF___V46*/ meltfptr[45] =
+ /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5251:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V46*/ meltfptr[45] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5251:/ quasiblock");
+
+
+ /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];;
+ /*^compute */
+
+ /*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5251:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V46*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V48*/ meltfptr[46] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5252:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_INTEGERBOX__L19*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.MATINDEX__V42*/ meltfptr[38]))
+ == MELTOBMAG_INT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5252:/ cond");
+ /*cond */ if ( /*_#IS_INTEGERBOX__L19*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V50*/ meltfptr[46] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5252:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check matindex"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5252) ? (5252) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V50*/ meltfptr[46] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V49*/ meltfptr[45] = /*_.IFELSE___V50*/ meltfptr[46];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5252:/ clear");
+ /*clear *//*_#IS_INTEGERBOX__L19*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V50*/ meltfptr[46] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V49*/ meltfptr[45] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5253:/ quasiblock");
+
+
+ /*_#NUMINDEX__L20*/ meltfnum[8] =
+ (melt_get_int ((melt_ptr_t) ( /*_.MATINDEX__V42*/ meltfptr[38])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5254:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATDATA__V29*/ meltfptr[18]), 4, "MDATA_STEPS");
+ /*_.DATASTEPS__V52*/
+ meltfptr[51] = slot;
+ };
+ ;
+ /*_#NBDATASTEPS__L21*/ meltfnum[1] =
+ (melt_multiple_length
+ ((melt_ptr_t) ( /*_.DATASTEPS__V52*/ meltfptr[51])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5257:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L22*/ meltfnum[21] =
+ (( /*_#NUMINDEX__L20*/ meltfnum[8]) > (0));;
+ MELT_LOCATION ("warmelt-normatch.melt:5257:/ cond");
+ /*cond */ if ( /*_#I__L22*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V54*/ meltfptr[53] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5257:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check numindex"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5257) ? (5257) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V53*/ meltfptr[52] = /*_.IFELSE___V54*/ meltfptr[53];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5257:/ clear");
+ /*clear *//*_#I__L22*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5258:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L23*/ meltfnum[21] =
+ (( /*_#NBDATASTEPS__L21*/ meltfnum[1]) > (0));;
+ MELT_LOCATION ("warmelt-normatch.melt:5258:/ cond");
+ /*cond */ if ( /*_#I__L23*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V56*/ meltfptr[55] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5258:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nbdatasteps"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5258) ? (5258) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V56*/ meltfptr[55] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V55*/ meltfptr[53] = /*_.IFELSE___V56*/ meltfptr[55];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5258:/ clear");
+ /*clear *//*_#I__L23*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V56*/ meltfptr[55] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V55*/ meltfptr[53] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5259:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#I__L24*/ meltfnum[21] =
+ (( /*_#NUMINDEX__L20*/ meltfnum[8]) <=
+ ( /*_#NBDATASTEPS__L21*/ meltfnum[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:5259:/ cond");
+ /*cond */ if ( /*_#I__L24*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V58*/ meltfptr[57] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5259:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("good numindex"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5259) ? (5259) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V58*/ meltfptr[57] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V57*/ meltfptr[55] = /*_.IFELSE___V58*/ meltfptr[57];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5259:/ clear");
+ /*clear *//*_#I__L24*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V58*/ meltfptr[57] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V57*/ meltfptr[55] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#I__L25*/ meltfnum[21] =
+ (( /*_#NUMINDEX__L20*/ meltfnum[8]) <
+ ( /*_#NBDATASTEPS__L21*/ meltfnum[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:5260:/ cond");
+ /*cond */ if ( /*_#I__L25*/ meltfnum[21]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5262:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L26*/ meltfnum[25] =
+ /*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-normatch.melt:5262:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5262:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5262;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last return non-last normstep=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " numindex=";
+ /*^apply.arg */
+ argtab[6].meltbp_long = /*_#NUMINDEX__L20*/ meltfnum[8];
+ /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V61*/ meltfptr[60] =
+ /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5262:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V61*/ meltfptr[60] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5262:/ quasiblock");
+
+
+ /*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[60];;
+ /*^compute */
+
+ /*_.IFCPP___V60*/ meltfptr[59] = /*_.PROGN___V63*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5262:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V61*/ meltfptr[60] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V63*/ meltfptr[61] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V60*/ meltfptr[59] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5263:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
+ MELT_LOCATION ("warmelt-normatch.melt:5263:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:5261:/ quasiblock");
+
+
+ /*_.PROGN___V65*/ meltfptr[61] = /*_.RETURN___V64*/ meltfptr[60];;
+ /*^compute */
+
+ /*_.IF___V59*/ meltfptr[57] = /*_.PROGN___V65*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5260:/ clear");
+ /*clear *//*_.IFCPP___V60*/ meltfptr[59] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V64*/ meltfptr[60] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V65*/ meltfptr[61] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V59*/ meltfptr[57] = NULL;;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5265:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L28*/ meltfnum[26] =
+ /*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-normatch.melt:5265:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5265:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5265;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last last step=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " ndata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NDATA__V44*/ meltfptr[43];
+ /*_.MELT_DEBUG_FUN__V68*/ meltfptr[61] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V67*/ meltfptr[60] =
+ /*_.MELT_DEBUG_FUN__V68*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5265:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[61] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V67*/ meltfptr[60] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5265:/ quasiblock");
+
+
+ /*_.PROGN___V69*/ meltfptr[61] = /*_.IF___V67*/ meltfptr[60];;
+ /*^compute */
+
+ /*_.IFCPP___V66*/ meltfptr[59] = /*_.PROGN___V69*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5265:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V67*/ meltfptr[60] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V69*/ meltfptr[61] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V66*/ meltfptr[59] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5266:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L30*/ meltfnum[25] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V44*/ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SIMPLE */
+ meltfrout->tabval[7])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5266:/ cond");
+ /*cond */ if ( /*_#IS_A__L30*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V71*/ meltfptr[61] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5266:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check ndata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5266) ? (5266) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V71*/ meltfptr[61] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V70*/ meltfptr[60] = /*_.IFELSE___V71*/ meltfptr[61];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5266:/ clear");
+ /*clear *//*_#IS_A__L30*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V71*/ meltfptr[61] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V70*/ meltfptr[60] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_A__L31*/ meltfnum[26] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V44*/ meltfptr[43]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */
+ meltfrout->tabval[8])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5267:/ cond");
+ /*cond */ if ( /*_#IS_A__L31*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5268:/ quasiblock");
+
+
+ /*^quasiblock */
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_CLEAR */ meltfrout->tabval[9])), (2), "CLASS_NREP_MATCH_DATA_CLEAR");
+ /*_.INST__V75*/ meltfptr[74] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NMDAC_DATA",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V75*/ meltfptr[74]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V75*/ meltfptr[74]), (1),
+ ( /*_.NDATA__V44*/ meltfptr[43]),
+ "NMDAC_DATA");
+ ;
+ /*_.CLEARNDATA__V74*/ meltfptr[73] = /*_.INST__V75*/ meltfptr[74];;
+ MELT_LOCATION ("warmelt-normatch.melt:5270:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_FINALIZER */ meltfrout->tabval[10])), (2), "CLASS_NREP_MATCH_DATA_FINALIZER");
+ /*_.INST__V77*/ meltfptr[76] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NMDAC_DATA",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V77*/ meltfptr[76]))
+ == MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V77*/ meltfptr[76]), (1),
+ ( /*_.NDATA__V44*/ meltfptr[43]),
+ "NMDAC_DATA");
+ ;
+ /*_.FINALNDATA__V76*/ meltfptr[75] = /*_.INST__V77*/ meltfptr[76];;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5273:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L32*/ meltfnum[25] =
+ /*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-normatch.melt:5273:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5273:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5273;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last clearndata=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CLEARNDATA__V74*/ meltfptr[73];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " finalndata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FINALNDATA__V76*/ meltfptr[75];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n normstep=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V79*/ meltfptr[78] =
+ /*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5273:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V79*/ meltfptr[78] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5273:/ quasiblock");
+
+
+ /*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[78];;
+ /*^compute */
+
+ /*_.IFCPP___V78*/ meltfptr[77] = /*_.PROGN___V81*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5273:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V79*/ meltfptr[78] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V81*/ meltfptr[79] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V78*/ meltfptr[77] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_OBJECT__L34*/ meltfnum[32] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2]))
+ == MELTOBMAG_OBJECT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5275:/ cond");
+ /*cond */ if ( /*_#IS_OBJECT__L34*/ meltfnum[32]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5276:/ quasiblock");
+
+
+ /*^blockmultialloc */
+ /*multiallocblock */
+ {
+ struct meltletrec_1_st
+ {
+ struct MELT_MULTIPLE_STRUCT (3) rtup_0__TUPLREC__x1;
+ long meltletrec_1_endgap;
+ } *meltletrec_1_ptr = 0;
+ meltletrec_1_ptr =
+ (struct meltletrec_1_st *)
+ meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
+ /*^blockmultialloc.initfill */
+ /*inimult rtup_0__TUPLREC__x1 */
+ /*_.TUPLREC___V85*/ meltfptr[84] =
+ (void *) &meltletrec_1_ptr->rtup_0__TUPLREC__x1;
+ meltletrec_1_ptr->rtup_0__TUPLREC__x1.discr =
+ (meltobject_ptr_t) (((void
+ *) (MELT_PREDEF (DISCR_MULTIPLE))));
+ meltletrec_1_ptr->rtup_0__TUPLREC__x1.nbval = 3;
+
+
+ /*^putuple */
+ /*putupl#1 */
+ melt_assertmsg ("putupl [:5276] #1 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl [:5276] #1 checkoff",
+ (0 >= 0
+ && 0 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84]))));
+ ((meltmultiple_ptr_t) ( /*_.TUPLREC___V85*/ meltfptr[84]))->
+ tabval[0] =
+ (melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2]);
+ ;
+ /*^putuple */
+ /*putupl#2 */
+ melt_assertmsg ("putupl [:5276] #2 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl [:5276] #2 checkoff",
+ (1 >= 0
+ && 1 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84]))));
+ ((meltmultiple_ptr_t) ( /*_.TUPLREC___V85*/ meltfptr[84]))->
+ tabval[1] =
+ (melt_ptr_t) ( /*_.CLEARNDATA__V74*/ meltfptr[73]);
+ ;
+ /*^putuple */
+ /*putupl#3 */
+ melt_assertmsg ("putupl [:5276] #3 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84])) ==
+ MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl [:5276] #3 checkoff",
+ (2 >= 0
+ && 2 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.TUPLREC___V85*/
+ meltfptr[84]))));
+ ((meltmultiple_ptr_t) ( /*_.TUPLREC___V85*/ meltfptr[84]))->
+ tabval[2] =
+ (melt_ptr_t) ( /*_.FINALNDATA__V76*/ meltfptr[75]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.TUPLREC___V85*/ meltfptr[84]);
+ ;
+ /*_.NORMSTEPTUP__V84*/ meltfptr[83] =
+ /*_.TUPLREC___V85*/ meltfptr[84];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5276:/ clear");
+ /*clear *//*_.TUPLREC___V85*/ meltfptr[84] = 0;
+ /*^clear */
+ /*clear *//*_.TUPLREC___V85*/ meltfptr[84] = 0;
+ } /*end multiallocblock */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5277:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L35*/ meltfnum[25] =
+ /*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-normatch.melt:5277:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5277:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5277;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last new normsteptup=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEPTUP__V84*/
+ meltfptr[83];
+ /*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] =
+ 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);
+ }
+ ;
+ /*_.IF___V87*/ meltfptr[86] =
+ /*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5277:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V87*/ meltfptr[86] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5277:/ quasiblock");
+
+
+ /*_.PROGN___V89*/ meltfptr[87] =
+ /*_.IF___V87*/ meltfptr[86];;
+ /*^compute */
+
+ /*_.IFCPP___V86*/ meltfptr[84] =
+ /*_.PROGN___V89*/ meltfptr[87];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5277:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V87*/ meltfptr[86] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V89*/ meltfptr[87] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V86*/ meltfptr[84] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5278:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ /*_.NORMSTEPTUP__V84*/ meltfptr[83];;
+ MELT_LOCATION ("warmelt-normatch.melt:5278:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V83*/ meltfptr[79] =
+ /*_.RETURN___V90*/ meltfptr[86];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5276:/ clear");
+ /*clear *//*_.NORMSTEPTUP__V84*/ meltfptr[83] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V86*/ meltfptr[84] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V90*/ meltfptr[86] = 0;
+ /*_.IFELSE___V82*/ meltfptr[78] =
+ /*_.LET___V83*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5275:/ clear");
+ /*clear *//*_.LET___V83*/ meltfptr[79] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#NULL__L37*/ meltfnum[35] =
+ (( /*_.NORMSTEP__V3*/ meltfptr[2]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:5279:/ cond");
+ /*cond */ if ( /*_#NULL__L37*/ meltfnum[35]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5280:/ quasiblock");
+
+
+ /*^blockmultialloc */
+ /*multiallocblock */
+ {
+ struct meltletrec_2_st
+ {
+ struct MELT_MULTIPLE_STRUCT (2) rtup_0__TUPLREC__x2;
+ long meltletrec_2_endgap;
+ } *meltletrec_2_ptr = 0;
+ meltletrec_2_ptr =
+ (struct meltletrec_2_st *)
+ meltgc_allocate (sizeof (struct meltletrec_2_st),
+ 0);
+ /*^blockmultialloc.initfill */
+ /*inimult rtup_0__TUPLREC__x2 */
+ /*_.TUPLREC___V94*/ meltfptr[86] =
+ (void *) &meltletrec_2_ptr->rtup_0__TUPLREC__x2;
+ meltletrec_2_ptr->rtup_0__TUPLREC__x2.discr =
+ (meltobject_ptr_t) (((void
+ *) (MELT_PREDEF
+ (DISCR_MULTIPLE))));
+ meltletrec_2_ptr->rtup_0__TUPLREC__x2.nbval = 2;
+
+
+ /*^putuple */
+ /*putupl#4 */
+ melt_assertmsg ("putupl [:5280] #4 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86])) == MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl [:5280] #4 checkoff",
+ (0 >= 0
+ && 0 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86]))));
+ ((meltmultiple_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86]))->tabval[0] =
+ (melt_ptr_t) ( /*_.CLEARNDATA__V74*/ meltfptr[73]);
+ ;
+ /*^putuple */
+ /*putupl#5 */
+ melt_assertmsg ("putupl [:5280] #5 checktup",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86])) == MELTOBMAG_MULTIPLE);
+ melt_assertmsg ("putupl [:5280] #5 checkoff",
+ (1 >= 0
+ && 1 <
+ melt_multiple_length ((melt_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86]))));
+ ((meltmultiple_ptr_t)
+ ( /*_.TUPLREC___V94*/ meltfptr[86]))->tabval[1] =
+ (melt_ptr_t) ( /*_.FINALNDATA__V76*/ meltfptr[75]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.TUPLREC___V94*/ meltfptr[86]);
+ ;
+ /*_.STEPTUPN__V93*/ meltfptr[84] =
+ /*_.TUPLREC___V94*/ meltfptr[86];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5280:/ clear");
+ /*clear *//*_.TUPLREC___V94*/ meltfptr[86] = 0;
+ /*^clear */
+ /*clear *//*_.TUPLREC___V94*/ meltfptr[86] = 0;
+ } /*end multiallocblock */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5281:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L38*/ meltfnum[25] =
+ /*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-normatch.melt:5281:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L39*/ meltfnum[38] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5281:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L39*/ meltfnum[38];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5281;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last new for nil steptupn=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEPTUPN__V93*/
+ meltfptr[84];
+ /*_.MELT_DEBUG_FUN__V97*/ meltfptr[96] =
+ 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);
+ }
+ ;
+ /*_.IF___V96*/ meltfptr[86] =
+ /*_.MELT_DEBUG_FUN__V97*/ meltfptr[96];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5281:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L39*/
+ meltfnum[38] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V97*/ meltfptr[96]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V96*/ meltfptr[86] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5281:/ quasiblock");
+
+
+ /*_.PROGN___V98*/ meltfptr[96] =
+ /*_.IF___V96*/ meltfptr[86];;
+ /*^compute */
+
+ /*_.IFCPP___V95*/ meltfptr[79] =
+ /*_.PROGN___V98*/ meltfptr[96];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5281:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V96*/ meltfptr[86] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V98*/ meltfptr[96] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V95*/ meltfptr[79] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5282:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ /*_.STEPTUPN__V93*/ meltfptr[84];;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5282:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V92*/ meltfptr[83] =
+ /*_.RETURN___V99*/ meltfptr[86];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5280:/ clear");
+ /*clear *//*_.STEPTUPN__V93*/ meltfptr[84] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V95*/ meltfptr[79] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V99*/ meltfptr[86] = 0;
+ /*_.IFELSE___V91*/ meltfptr[87] =
+ /*_.LET___V92*/ meltfptr[83];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5279:/ clear");
+ /*clear *//*_.LET___V92*/ meltfptr[83] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MULTIPLE__L40*/ meltfnum[38] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.NORMSTEP__V3*/ meltfptr[2])) ==
+ MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-normatch.melt:5283:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L40*/ meltfnum[38]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5284:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.NORMSTEPLIST__V102*/ meltfptr[79] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MULTIPLE_TO_LIST */
+ meltfrout->tabval[11])),
+ (melt_ptr_t) ( /*_.NORMSTEP__V3*/
+ meltfptr[2]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5286:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NORMSTEPLIST__V102*/
+ meltfptr[79]),
+ (melt_ptr_t) ( /*_.CLEARNDATA__V74*/ meltfptr[73]));
+ }
+ ;
+
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5287:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NORMSTEPLIST__V102*/
+ meltfptr[79]),
+ (melt_ptr_t) ( /*_.FINALNDATA__V76*/ meltfptr[75]));
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5288:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.NEWNORMSTEP__V104*/ meltfptr[83] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_TO_MULTIPLE */
+ meltfrout->tabval[12])),
+ (melt_ptr_t) ( /*_.NORMSTEPLIST__V102*/ meltfptr[79]), (""), (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5289:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L41*/ meltfnum[25] =
+ /*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-normatch.melt:5289:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41]
+ =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5289:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L42*/
+ meltfnum[41];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5289;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last newnormstep=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) &
+ /*_.NEWNORMSTEP__V104*/ meltfptr[83];
+ /*_.MELT_DEBUG_FUN__V107*/ meltfptr[106]
+ =
+ 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);
+ }
+ ;
+ /*_.IF___V106*/ meltfptr[105] =
+ /*_.MELT_DEBUG_FUN__V107*/
+ meltfptr[106];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5289:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L42*/
+ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V107*/
+ meltfptr[106] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V106*/ meltfptr[105] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5289:/ quasiblock");
+
+
+ /*_.PROGN___V108*/ meltfptr[106] =
+ /*_.IF___V106*/ meltfptr[105];;
+ /*^compute */
+
+ /*_.IFCPP___V105*/ meltfptr[104] =
+ /*_.PROGN___V108*/ meltfptr[106];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5289:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[25]
+ = 0;
+ /*^clear */
+ /*clear *//*_.IF___V106*/ meltfptr[105] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V108*/ meltfptr[106] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V105*/ meltfptr[104] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5290:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ /*_.NEWNORMSTEP__V104*/ meltfptr[83];;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5290:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V103*/ meltfptr[86] =
+ /*_.RETURN___V109*/ meltfptr[105];;
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5288:/ clear");
+ /*clear *//*_.NEWNORMSTEP__V104*/ meltfptr[83] =
+ 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V105*/ meltfptr[104] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V109*/ meltfptr[105] = 0;
+ /*_.LET___V101*/ meltfptr[84] =
+ /*_.LET___V103*/ meltfptr[86];;
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5284:/ clear");
+ /*clear *//*_.NORMSTEPLIST__V102*/ meltfptr[79] =
+ 0;
+ /*^clear */
+ /*clear *//*_.LET___V103*/ meltfptr[86] = 0;
+ /*_.IFELSE___V100*/ meltfptr[96] =
+ /*_.LET___V101*/ meltfptr[84];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5283:/ clear");
+ /*clear *//*_.LET___V101*/ meltfptr[84] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_LIST__L43*/ meltfnum[41] =
+ (melt_magic_discr
+ ((melt_ptr_t)
+ ( /*_.NORMSTEP__V3*/ meltfptr[2])) ==
+ MELTOBMAG_LIST);;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5292:/ cond");
+ /*cond */ if ( /*_#IS_LIST__L43*/ meltfnum[41]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5293:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NORMSTEP__V3*/
+ meltfptr[2]),
+ (melt_ptr_t) ( /*_.CLEARNDATA__V74*/ meltfptr[73]));
+ }
+ ;
+
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5294:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NORMSTEP__V3*/
+ meltfptr[2]),
+ (melt_ptr_t) ( /*_.FINALNDATA__V76*/ meltfptr[75]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5295:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L44*/ meltfnum[25] =
+ /*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-normatch.melt:5295:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L45*/
+ meltfnum[44] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5295:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0,
+ sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L45*/
+ meltfnum[44];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5295;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last extended normstep=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) &
+ /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V113*/
+ meltfptr[105] =
+ 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);
+ }
+ ;
+ /*_.IF___V112*/ meltfptr[104] =
+ /*_.MELT_DEBUG_FUN__V113*/
+ meltfptr[105];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5295:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L45*/
+ meltfnum[44] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V113*/
+ meltfptr[105] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V112*/ meltfptr[104] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5295:/ quasiblock");
+
+
+ /*_.PROGN___V114*/ meltfptr[79] =
+ /*_.IF___V112*/ meltfptr[104];;
+ /*^compute */
+
+ /*_.IFCPP___V111*/ meltfptr[83] =
+ /*_.PROGN___V114*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5295:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L44*/
+ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V112*/ meltfptr[104] =
+ 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V114*/ meltfptr[79]
+ = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V111*/ meltfptr[83] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5296:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ /*_.NORMSTEP__V3*/ meltfptr[2];;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5296:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5292:/ quasiblock");
+
+
+ /*_.PROGN___V116*/ meltfptr[84] =
+ /*_.RETURN___V115*/ meltfptr[86];;
+ /*^compute */
+
+ /*_.IFELSE___V110*/ meltfptr[106] =
+ /*_.PROGN___V116*/ meltfptr[84];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5292:/ clear");
+ /*clear *//*_.IFCPP___V111*/ meltfptr[83] =
+ 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V115*/ meltfptr[86] =
+ 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V116*/ meltfptr[84] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5298:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L46*/ meltfnum[44] =
+ /*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-normatch.melt:5298:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[44]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L47*/
+ meltfnum[25] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5298:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0,
+ sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L47*/
+ meltfnum[25];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5298;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last bad normstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) &
+ /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V119*/
+ meltfptr[79] =
+ 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);
+ }
+ ;
+ /*_.IF___V118*/ meltfptr[104] =
+ /*_.MELT_DEBUG_FUN__V119*/
+ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5298:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L47*/
+ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V119*/
+ meltfptr[79] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V118*/ meltfptr[104] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5298:/ quasiblock");
+
+
+ /*_.PROGN___V120*/ meltfptr[83] =
+ /*_.IF___V118*/ meltfptr[104];;
+ /*^compute */
+
+ /*_.IFCPP___V117*/ meltfptr[105] =
+ /*_.PROGN___V120*/ meltfptr[83];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5298:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L46*/
+ meltfnum[44] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V118*/ meltfptr[104] =
+ 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V120*/ meltfptr[83]
+ = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V117*/ meltfptr[105] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5299:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V122*/ meltfptr[84] =
+ ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5299:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("complete_normstep_if_last unexpected normstep"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5299) ? (5299) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V122*/
+ meltfptr[84] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V121*/ meltfptr[86] =
+ /*_.IFELSE___V122*/ meltfptr[84];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5299:/ clear");
+ /*clear *//*_.IFELSE___V122*/ meltfptr[84]
+ = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V121*/ meltfptr[86] =
+ ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5297:/ quasiblock");
+
+
+ /*_.PROGN___V123*/ meltfptr[79] =
+ /*_.IFCPP___V121*/ meltfptr[86];;
+ /*^compute */
+
+ /*_.IFELSE___V110*/ meltfptr[106] =
+ /*_.PROGN___V123*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5292:/ clear");
+ /*clear *//*_.IFCPP___V117*/ meltfptr[105] =
+ 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V121*/ meltfptr[86] =
+ 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V123*/ meltfptr[79] =
+ 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V100*/ meltfptr[96] =
+ /*_.IFELSE___V110*/ meltfptr[106];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5283:/ clear");
+ /*clear *//*_#IS_LIST__L43*/ meltfnum[41] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V110*/ meltfptr[106] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V91*/ meltfptr[87] =
+ /*_.IFELSE___V100*/ meltfptr[96];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5279:/ clear");
+ /*clear *//*_#IS_MULTIPLE__L40*/ meltfnum[38] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V100*/ meltfptr[96] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V82*/ meltfptr[78] =
+ /*_.IFELSE___V91*/ meltfptr[87];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5275:/ clear");
+ /*clear *//*_#NULL__L37*/ meltfnum[35] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V91*/ meltfptr[87] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V73*/ meltfptr[72] = /*_.IFELSE___V82*/ meltfptr[78];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5268:/ clear");
+ /*clear *//*_.CLEARNDATA__V74*/ meltfptr[73] = 0;
+ /*^clear */
+ /*clear *//*_.FINALNDATA__V76*/ meltfptr[75] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V78*/ meltfptr[77] = 0;
+ /*^clear */
+ /*clear *//*_#IS_OBJECT__L34*/ meltfnum[32] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V82*/ meltfptr[78] = 0;
+ /*_.IFELSE___V72*/ meltfptr[61] = /*_.LET___V73*/ meltfptr[72];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5267:/ clear");
+ /*clear *//*_.LET___V73*/ meltfptr[72] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5302:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L48*/ meltfnum[25] =
+ /*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-normatch.melt:5302:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L48*/ meltfnum[25]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L49*/ meltfnum[44] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5302:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L49*/ meltfnum[44];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5302;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "complete_normstep_if_last not a matched data ndata=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NDATA__V44*/ meltfptr[43];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n unchanged normstep";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NORMSTEP__V3*/ meltfptr[2];
+ /*_.MELT_DEBUG_FUN__V126*/ meltfptr[84] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V125*/ meltfptr[83] =
+ /*_.MELT_DEBUG_FUN__V126*/ meltfptr[84];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5302:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L49*/ meltfnum[44] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V126*/ meltfptr[84] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V125*/ meltfptr[83] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5302:/ quasiblock");
+
+
+ /*_.PROGN___V127*/ meltfptr[105] = /*_.IF___V125*/ meltfptr[83];;
+ /*^compute */
+
+ /*_.IFCPP___V124*/ meltfptr[104] =
+ /*_.PROGN___V127*/ meltfptr[105];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5302:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L48*/ meltfnum[25] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V125*/ meltfptr[83] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V127*/ meltfptr[105] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V124*/ meltfptr[104] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5304:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];;
+ MELT_LOCATION ("warmelt-normatch.melt:5304:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:5301:/ quasiblock");
+
+
+ /*_.PROGN___V129*/ meltfptr[79] = /*_.RETURN___V128*/ meltfptr[86];;
+ /*^compute */
+
+ /*_.IFELSE___V72*/ meltfptr[61] = /*_.PROGN___V129*/ meltfptr[79];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5267:/ clear");
+ /*clear *//*_.IFCPP___V124*/ meltfptr[104] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V128*/ meltfptr[86] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V129*/ meltfptr[79] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V51*/ meltfptr[46] = /*_.IFELSE___V72*/ meltfptr[61];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5253:/ clear");
+ /*clear *//*_#NUMINDEX__L20*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.DATASTEPS__V52*/ meltfptr[51] = 0;
+ /*^clear */
+ /*clear *//*_#NBDATASTEPS__L21*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V53*/ meltfptr[52] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V55*/ meltfptr[53] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V57*/ meltfptr[55] = 0;
+ /*^clear */
+ /*clear *//*_#I__L25*/ meltfnum[21] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V59*/ meltfptr[57] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V66*/ meltfptr[59] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V70*/ meltfptr[60] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L31*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V72*/ meltfptr[61] = 0;
+ /*_.LET___V41*/ meltfptr[37] = /*_.LET___V51*/ meltfptr[46];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5246:/ clear");
+ /*clear *//*_.MATINDEX__V42*/ meltfptr[38] = 0;
+ /*^clear */
+ /*clear *//*_.DATAMAP__V43*/ meltfptr[42] = 0;
+ /*^clear */
+ /*clear *//*_.NDATA__V44*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V49*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V51*/ meltfptr[46] = 0;
+ /*_.LET___V28*/ meltfptr[17] = /*_.LET___V41*/ meltfptr[37];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5240:/ clear");
+ /*clear *//*_.MATDATA__V29*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V30*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V34*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V36*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V41*/ meltfptr[37] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V28*/ meltfptr[17];;
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V13*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V15*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_#IS_NOT_A__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V17*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V28*/ meltfptr[17] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("COMPLETE_NORMSTEP_IF_LAST", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 19
+ void *mcfr_varptr[19];
+#define MELTFRAM_NBVARNUM 5
+ long mcfr_varnum[5];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 19; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 19;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("NORMSTEP_ANYRECV", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ getarg");
+ /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NMCTXT__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.SLOC__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5310:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5310:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5310:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5310;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_anyrecv recv";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5310:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5310:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5310:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5311:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5311:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5311:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmctxt"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5311) ? (5311) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5311:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5312:/ quasiblock");
+
+
+ /*_.DIS__V12*/ meltfptr[11] =
+ (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5313:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DIS__V12*/ meltfptr[11]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DIS__V12*/ meltfptr[11]), 1, "NAMED_NAME");
+ /*_.DISNAME__V13*/
+ meltfptr[12] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.DISNAME__V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5315:/ locexp");
+ melt_error_str ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3]),
+ ("unexpected NORMALIZE_STEP for"),
+ (melt_ptr_t) ( /*_.DISNAME__V13*/ meltfptr[12]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5316:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:5316:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5316:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5316;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_anyrecv dis";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DIS__V12*/ meltfptr[11];
+ /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] =
+ 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);
+ }
+ ;
+ /*_.IF___V15*/ meltfptr[14] =
+ /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5316:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V15*/ meltfptr[14] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5316:/ quasiblock");
+
+
+ /*_.PROGN___V17*/ meltfptr[15] = /*_.IF___V15*/ meltfptr[14];;
+ /*^compute */
+
+ /*_.IFCPP___V14*/ meltfptr[13] = /*_.PROGN___V17*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5316:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V17*/ meltfptr[15] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5317:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V19*/ meltfptr[15] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5317:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("@$@ unexpected normstep_anyrecv"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5317) ? (5317) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V19*/ meltfptr[15] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V18*/ meltfptr[14] = /*_.IFELSE___V19*/ meltfptr[15];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5317:/ clear");
+ /*clear *//*_.IFELSE___V19*/ meltfptr[15] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V18*/ meltfptr[14] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LET___V11*/ meltfptr[6] = /*_.IFCPP___V18*/ meltfptr[14];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5312:/ clear");
+ /*clear *//*_.DIS__V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.DISNAME__V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V18*/ meltfptr[14] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];;
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V11*/ meltfptr[6] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("NORMSTEP_ANYRECV", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 38
+ void *mcfr_varptr[38];
+#define MELTFRAM_NBVARNUM 8
+ long mcfr_varnum[8];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 38; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 38;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("NORMSTEP_MFLAGSET", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NMCTXT__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2])) !=
+ NULL);
+
+
+ /*getarg#2 */
+ /*^getarg */
+ if (meltxargdescr_[1] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.SLOC__V4*/ meltfptr[3] =
+ (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.SLOC__V4*/ meltfptr[3])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5323:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:5323:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5323:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5323;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_mflagset step";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] =
+ 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);
+ }
+ ;
+ /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5323:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V6*/ meltfptr[5] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5323:/ quasiblock");
+
+
+ /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
+ /*^compute */
+
+ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5323:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5324:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_SET */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5324:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5324:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5324) ? (5324) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5324:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5325:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L4*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5325:/ cond");
+ /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5325:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nmctxt"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (5325) ? (5325) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5325:/ clear");
+ /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5326:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 1, "LOCA_LOCATION");
+ /*_.LOCA_LOCATION__V14*/
+ meltfptr[13] = slot;
+ };
+ ;
+ /*^cond */
+ /*cond */ if ( /*_.LOCA_LOCATION__V14*/ meltfptr[13]) /*then */
+ {
+ /*^cond.then */
+ /*_.NSLOC__V15*/ meltfptr[14] =
+ /*_.LOCA_LOCATION__V14*/ meltfptr[13];;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5326:/ cond.else");
+
+ /*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5327:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
+ /*_.MATFLAG__V16*/
+ meltfptr[15] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5328:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
+ /*_.MATTHEN__V17*/
+ meltfptr[16] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5329:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
+ /*_.NTHEN__V18*/ meltfptr[17] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ALTMATCH_NORMALIZE_STEP */ meltfrout->tabval[3])),
+ (melt_ptr_t) ( /*_.MATTHEN__V17*/ meltfptr[16]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5330:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
+ /*_.NFLAG__V19*/ meltfptr[18] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ALTMATCH_NORMALIZE_FLAG */ meltfrout->tabval[4])),
+ (melt_ptr_t) ( /*_.MATFLAG__V16*/ meltfptr[15]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5331:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_SETQ */
+ meltfrout->tabval[5])), (3),
+ "CLASS_NREP_SETQ");
+ /*_.INST__V21*/ meltfptr[20] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NREP_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V21*/ meltfptr[20])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (0),
+ ( /*_.NSLOC__V15*/ meltfptr[14]), "NREP_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NSTQ_VAR",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V21*/ meltfptr[20])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (1),
+ ( /*_.NFLAG__V19*/ meltfptr[18]), "NSTQ_VAR");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NSTQ_EXP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V21*/ meltfptr[20])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V21*/ meltfptr[20]), (2),
+ (( /*!konst_6 */ meltfrout->tabval[6])),
+ "NSTQ_EXP");
+ ;
+ /*_.NSETFLAG__V20*/ meltfptr[19] = /*_.INST__V21*/ meltfptr[20];;
+ MELT_LOCATION ("warmelt-normatch.melt:5335:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_JUMP */
+ meltfrout->tabval[7])), (2),
+ "CLASS_NREP_MATCH_JUMP");
+ /*_.INST__V23*/ meltfptr[22] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NMJMP_LABEL",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V23*/ meltfptr[22])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V23*/ meltfptr[22]), (1),
+ ( /*_.NTHEN__V18*/ meltfptr[17]), "NMJMP_LABEL");
+ ;
+ /*_.NJUMP__V22*/ meltfptr[21] = /*_.INST__V23*/ meltfptr[22];;
+ MELT_LOCATION ("warmelt-normatch.melt:5337:/ blockmultialloc");
+ /*multiallocblock */
+ {
+ struct meltletrec_1_st
+ {
+ struct meltpair_st rpair_0__NSETFLAG_x1;
+ struct meltpair_st rpair_1__NJUMP_x1;
+ struct meltlist_st rlist_2__LIST_;
+ long meltletrec_1_endgap;
+ } *meltletrec_1_ptr = 0;
+ meltletrec_1_ptr =
+ (struct meltletrec_1_st *)
+ meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
+ /*^blockmultialloc.initfill */
+ /*inipair rpair_0__NSETFLAG_x1 */
+ /*_.NSETFLAG__V25*/ meltfptr[24] =
+ (void *) &meltletrec_1_ptr->rpair_0__NSETFLAG_x1;
+ meltletrec_1_ptr->rpair_0__NSETFLAG_x1.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_PAIR))));
+
+ /*inipair rpair_1__NJUMP_x1 */
+ /*_.NJUMP__V26*/ meltfptr[25] =
+ (void *) &meltletrec_1_ptr->rpair_1__NJUMP_x1;
+ meltletrec_1_ptr->rpair_1__NJUMP_x1.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_PAIR))));
+
+ /*inilist rlist_2__LIST_ */
+ /*_.LIST___V27*/ meltfptr[26] =
+ (void *) &meltletrec_1_ptr->rlist_2__LIST_;
+ meltletrec_1_ptr->rlist_2__LIST_.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_LIST))));
+
+
+
+ /*^putpairhead */
+ /*putpairhead */
+ melt_assertmsg ("putpairhead /2 checkpair",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.NSETFLAG__V25*/ meltfptr[24]))
+ == MELTOBMAG_PAIR);
+ ((meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]))->hd =
+ (melt_ptr_t) ( /*_.NSETFLAG__V20*/ meltfptr[19]);
+ ;
+ /*^putpairtail */
+ /*putpairtail */
+ melt_assertmsg ("putpairtail /21e34e73 checkpair",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.NSETFLAG__V25*/ meltfptr[24]))
+ == MELTOBMAG_PAIR);
+ ((meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]))->tl =
+ (meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.NSETFLAG__V25*/ meltfptr[24]);
+ ;
+ /*^putpairhead */
+ /*putpairhead */
+ melt_assertmsg ("putpairhead /3 checkpair",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.NJUMP__V26*/ meltfptr[25])) ==
+ MELTOBMAG_PAIR);
+ ((meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]))->hd =
+ (melt_ptr_t) ( /*_.NJUMP__V22*/ meltfptr[21]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.NJUMP__V26*/ meltfptr[25]);
+ ;
+ /*^putlist */
+ /*putlist */
+ melt_assertmsg ("putlist checklist",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LIST___V27*/ meltfptr[26])) ==
+ MELTOBMAG_LIST);
+ ((meltlist_ptr_t) ( /*_.LIST___V27*/ meltfptr[26]))->first =
+ (meltpair_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24]);
+ ((meltlist_ptr_t) ( /*_.LIST___V27*/ meltfptr[26]))->last =
+ (meltpair_ptr_t) ( /*_.NJUMP__V26*/ meltfptr[25]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.LIST___V27*/ meltfptr[26]);
+ ;
+ /*_.NLISTI__V24*/ meltfptr[23] = /*_.LIST___V27*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5337:/ clear");
+ /*clear *//*_.NSETFLAG__V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.NJUMP__V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.LIST___V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.NSETFLAG__V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.NJUMP__V26*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.LIST___V27*/ meltfptr[26] = 0;
+ } /*end multiallocblock */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5339:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L5*/ 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-normatch.melt:5339:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5339:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5339;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_mflagset nlisti";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NLISTI__V24*/ meltfptr[23];
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[26] =
+ 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);
+ }
+ ;
+ /*_.IF___V29*/ meltfptr[25] =
+ /*_.MELT_DEBUG_FUN__V30*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5339:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[26] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V29*/ meltfptr[25] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5339:/ quasiblock");
+
+
+ /*_.PROGN___V31*/ meltfptr[26] = /*_.IF___V29*/ meltfptr[25];;
+ /*^compute */
+
+ /*_.IFCPP___V28*/ meltfptr[24] = /*_.PROGN___V31*/ meltfptr[26];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5339:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V29*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V31*/ meltfptr[26] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V28*/ meltfptr[24] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5340:/ quasiblock");
+
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NLISTI__V24*/ meltfptr[23];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
+ /*_.RES__V33*/ meltfptr[26] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!COMPLETE_NORMSTEP_IF_LAST */ meltfrout->tabval[8])),
+ (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5341:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[0] =
+ /*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-normatch.melt:5341:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5341:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5341;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_mflagset return res";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.RES__V33*/ meltfptr[26];
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] =
+ 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);
+ }
+ ;
+ /*_.IF___V35*/ meltfptr[34] =
+ /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5341:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V35*/ meltfptr[34] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5341:/ quasiblock");
+
+
+ /*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];;
+ /*^compute */
+
+ /*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5341:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V35*/ meltfptr[34] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V37*/ meltfptr[35] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V34*/ meltfptr[33] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5342:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V33*/ meltfptr[26];;
+ MELT_LOCATION ("warmelt-normatch.melt:5342:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V32*/ meltfptr[25] = /*_.RETURN___V38*/ meltfptr[34];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5340:/ clear");
+ /*clear *//*_.RES__V33*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V38*/ meltfptr[34] = 0;
+ /*_.LET___V13*/ meltfptr[11] = /*_.LET___V32*/ meltfptr[25];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5326:/ clear");
+ /*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_.MATFLAG__V16*/ meltfptr[15] = 0;
+ /*^clear */
+ /*clear *//*_.MATTHEN__V17*/ meltfptr[16] = 0;
+ /*^clear */
+ /*clear *//*_.NTHEN__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.NFLAG__V19*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.NSETFLAG__V20*/ meltfptr[19] = 0;
+ /*^clear */
+ /*clear *//*_.NJUMP__V22*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.NLISTI__V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V32*/ meltfptr[25] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V11*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V13*/ meltfptr[11] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("NORMSTEP_MFLAGSET", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
+ union meltparam_un *
+ meltxargtab_,
const melt_argdescr_cell_t
meltxresdescr_[],
- union meltparam_un
- *meltxrestab_)
+ union meltparam_un *
+ meltxrestab_)
{
#if MELT_HAVE_DEBUG
static long call_counter__;
@@ -2190,7 +15399,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ_st
+ struct frame_meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -2229,7 +15438,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -2261,7 +15470,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2284,7 +15493,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2294,7 +15503,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2304,7 +15513,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5238;
+ argtab[2].meltbp_long = 5347;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mflagconj step";
/*^apply.arg */
@@ -2323,7 +15532,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -2336,7 +15545,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -2345,7 +15554,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5238:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5347:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -2360,7 +15569,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5239:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5348:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2368,7 +15577,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_FLAG_CONJUNCTION */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5239:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5348:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -2376,7 +15585,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5239:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5348:/ cond.else");
/*^block */
/*anyblock */
@@ -2390,7 +15599,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5239) ? (5239) : __LINE__, __FUNCTION__);
+ (5348) ? (5348) : __LINE__, __FUNCTION__);
;
}
;
@@ -2405,7 +15614,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5239:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5348:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -2418,7 +15627,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5240:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5349:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2426,7 +15635,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5240:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5349:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2434,7 +15643,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5240:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5349:/ cond.else");
/*^block */
/*anyblock */
@@ -2448,7 +15657,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5240) ? (5240) : __LINE__, __FUNCTION__);
+ (5349) ? (5349) : __LINE__, __FUNCTION__);
;
}
;
@@ -2463,7 +15672,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5240:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5349:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -2474,7 +15683,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5241:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5350:/ quasiblock");
/*^getslot */
@@ -2494,12 +15703,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5241:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5350:/ cond.else");
/*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5242:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5351:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
@@ -2507,7 +15716,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5243:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5352:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_FLAGARGS");
@@ -2518,7 +15727,7 @@ lab_endgetargs:;
/*_#MATFLAGNBARGS__L5*/ meltfnum[1] =
(melt_multiple_length
((melt_ptr_t) ( /*_.MATFLAGARGS__V17*/ meltfptr[16])));;
- MELT_LOCATION ("warmelt-normatch.melt:5245:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5354:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -2526,7 +15735,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5246:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5355:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -2541,7 +15750,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5247:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5356:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -2556,7 +15765,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5248:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5357:/ quasiblock");
/*^rawallocobj */
@@ -2599,7 +15808,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NSTQ_EXP");
;
/*_.NSETFLAG__V21*/ meltfptr[20] = /*_.INST__V22*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-normatch.melt:5252:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5361:/ quasiblock");
/*^rawallocobj */
@@ -2624,7 +15833,7 @@ lab_endgetargs:;
( /*_.NTHEN__V19*/ meltfptr[18]), "NMJMP_LABEL");
;
/*_.NJUMP__V23*/ meltfptr[22] = /*_.INST__V24*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-normatch.melt:5254:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-normatch.melt:5363:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -2669,7 +15878,7 @@ lab_endgetargs:;
;
/*^putpairtail */
/*putpairtail */
- melt_assertmsg ("putpairtail /52eda3b checkpair",
+ melt_assertmsg ("putpairtail /2899b03c checkpair",
melt_magic_discr ((melt_ptr_t)
( /*_.NSETFLAG__V26*/ meltfptr[25]))
== MELTOBMAG_PAIR);
@@ -2708,7 +15917,7 @@ lab_endgetargs:;
/*_.NLISTI__V25*/ meltfptr[24] = /*_.LIST___V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5254:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5363:/ clear");
/*clear *//*_.NSETFLAG__V26*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.NJUMP__V27*/ meltfptr[26] = 0;
@@ -2724,7 +15933,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2747,7 +15956,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2757,7 +15966,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2767,7 +15976,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5256;
+ argtab[2].meltbp_long = 5365;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mflagconj nlisti";
/*^apply.arg */
@@ -2787,7 +15996,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[27] = 0;
@@ -2800,7 +16009,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[27] = /*_.IF___V30*/ meltfptr[26];;
@@ -2809,7 +16018,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[25] = /*_.PROGN___V32*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5365:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[26] = 0;
@@ -2824,7 +16033,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -2847,7 +16056,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -2857,7 +16066,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -2867,7 +16076,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5257;
+ argtab[2].meltbp_long = 5366;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mflagconj matflagargs";
/*^apply.arg */
@@ -2887,7 +16096,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -2900,7 +16109,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[27];;
@@ -2909,7 +16118,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[26] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5257:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5366:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[27] = 0;
@@ -2926,7 +16135,7 @@ lab_endgetargs:;
/*_#I__L10*/ meltfnum[0] =
(( /*_#MATFLAGNBARGS__L5*/ meltfnum[1]) <= (0));;
- MELT_LOCATION ("warmelt-normatch.melt:5259:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5368:/ cond");
/*cond */ if ( /*_#I__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -2934,8 +16143,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5260:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NSETFLAG__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5369:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NSETFLAG__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -2968,7 +16183,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5259:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5368:/ cond.else");
/*^block */
/*anyblock */
@@ -2976,7 +16191,7 @@ lab_endgetargs:;
/*_#I__L11*/ meltfnum[6] =
(( /*_#MATFLAGNBARGS__L5*/ meltfnum[1]) == (1));;
- MELT_LOCATION ("warmelt-normatch.melt:5263:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5372:/ cond");
/*cond */ if ( /*_#I__L11*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -2984,14 +16199,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5264:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5373:/ quasiblock");
/*_.FIRSTFLAG__V37*/ meltfptr[27] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.MATFLAGARGS__V17*/ meltfptr[16]),
(0)));;
- MELT_LOCATION ("warmelt-normatch.melt:5265:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5374:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -3009,8 +16224,14 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5267:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NSETFLAG__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5376:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NSETFLAG__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3038,7 +16259,7 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:5264:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5373:/ clear");
/*clear *//*_.FIRSTFLAG__V37*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.N1STFLAG__V38*/ meltfptr[34] = 0;
@@ -3048,20 +16269,20 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5263:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5372:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5269:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5378:/ quasiblock");
/*_.NCONJLIST__V39*/ meltfptr[27] =
(meltgc_new_list
((meltobject_ptr_t)
(( /*!DISCR_LIST */ meltfrout->tabval[8]))));;
- MELT_LOCATION ("warmelt-normatch.melt:5270:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5379:/ quasiblock");
/*^rawallocobj */
@@ -3142,7 +16363,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5280:/ cppif.then");
+ ("warmelt-normatch.melt:5389:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3165,7 +16386,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5280:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5389:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -3176,7 +16397,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5280:/ apply");
+ ("warmelt-normatch.melt:5389:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3188,7 +16409,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5280;
+ argtab[2].meltbp_long = 5389;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mflagconj curmatflag";
@@ -3214,7 +16435,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5280:/ clear");
+ ("warmelt-normatch.melt:5389:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/
meltfnum[13] = 0;
/*^clear */
@@ -3230,7 +16451,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5280:/ quasiblock");
+ ("warmelt-normatch.melt:5389:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[44] =
@@ -3241,7 +16462,7 @@ lab_endgetargs:;
/*_.PROGN___V46*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5280:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5389:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[43] = 0;
@@ -3255,7 +16476,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5281:/ quasiblock");
+ ("warmelt-normatch.melt:5390:/ quasiblock");
/*^apply */
@@ -3279,7 +16500,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5283:/ cppif.then");
+ ("warmelt-normatch.melt:5392:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3302,7 +16523,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5283:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5392:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -3313,7 +16534,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5283:/ apply");
+ ("warmelt-normatch.melt:5392:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3325,7 +16546,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5283;
+ argtab[2].meltbp_long = 5392;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mflagconj curnflag";
@@ -3351,7 +16572,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5283:/ clear");
+ ("warmelt-normatch.melt:5392:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/
meltfnum[12] = 0;
/*^clear */
@@ -3367,7 +16588,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5283:/ quasiblock");
+ ("warmelt-normatch.melt:5392:/ quasiblock");
/*_.PROGN___V51*/ meltfptr[49] =
@@ -3378,7 +16599,7 @@ lab_endgetargs:;
/*_.PROGN___V51*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5283:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5392:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V49*/ meltfptr[48] = 0;
@@ -3395,7 +16616,7 @@ lab_endgetargs:;
/*_#I__L17*/ meltfnum[12] =
(( /*_#FLAGIX__L12*/ meltfnum[11]) > (0));;
- MELT_LOCATION ("warmelt-normatch.melt:5284:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5393:/ cond");
/*cond */ if ( /*_#I__L17*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -3411,7 +16632,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5285:/ locexp");
+ ("warmelt-normatch.melt:5394:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NCONJLIST__V39*/
meltfptr[27]),
@@ -3421,7 +16642,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5284:/ clear");
+ ("warmelt-normatch.melt:5393:/ clear");
/*clear *//*_.MAKE_STRINGCONST__V52*/ meltfptr[48]
= 0;
}
@@ -3430,7 +16651,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5286:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5395:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NCONJLIST__V39*/
meltfptr[27]),
@@ -3439,7 +16660,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5281:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5390:/ clear");
/*clear *//*_.CURNFLAG__V47*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.IFCPP___V48*/ meltfptr[44] = 0;
@@ -3451,7 +16672,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5277:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5386:/ clear");
/*clear *//*_.CURMATFLAG__V42*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_#FLAGIX__L12*/ meltfnum[11] = 0;
@@ -3459,7 +16680,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V43*/ meltfptr[42] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:5288:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5397:/ apply");
/*apply */
{
/*_.LIST_TO_MULTIPLE__V53*/ meltfptr[49] =
@@ -3473,7 +16694,13 @@ lab_endgetargs:;
}
;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NCHUNK__V40*/ meltfptr[34]), (melt_ptr_t) (( /*!CLASS_NREP_CHUNK */ meltfrout->tabval[9])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NCHUNK__V40*/
+ meltfptr[34]),
+ (melt_ptr_t) (( /*!CLASS_NREP_CHUNK */ meltfrout->tabval[9])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3501,8 +16728,14 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:5289:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NSETFLAG__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5398:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NSETFLAG__V21*/
+ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -3530,13 +16763,13 @@ lab_endgetargs:;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:5269:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5378:/ clear");
/*clear *//*_.NCONJLIST__V39*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.NCHUNK__V40*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.LIST_TO_MULTIPLE__V53*/ meltfptr[49] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5268:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5377:/ quasiblock");
/*epilog */
@@ -3546,7 +16779,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5259:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5368:/ clear");
/*clear *//*_#I__L11*/ meltfnum[6] = 0;
}
;
@@ -3554,7 +16787,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3577,7 +16810,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[13]) /*then */
{
/*^cond.then */
@@ -3587,7 +16820,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3598,7 +16831,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5291;
+ argtab[2].meltbp_long = 5400;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mflagconj nsetflag";
/*^apply.arg */
@@ -3618,7 +16851,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V56*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V56*/ meltfptr[44] = 0;
@@ -3631,7 +16864,7 @@ lab_endgetargs:;
/*_.IF___V55*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ quasiblock");
/*_.PROGN___V57*/ meltfptr[27] = /*_.IF___V55*/ meltfptr[43];;
@@ -3640,7 +16873,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[48] = /*_.PROGN___V57*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5400:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[13] = 0;
/*^clear */
/*clear *//*_.IF___V55*/ meltfptr[43] = 0;
@@ -3653,7 +16886,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[48] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5292:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5401:/ quasiblock");
/*^apply */
@@ -3676,7 +16909,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3699,7 +16932,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -3709,7 +16942,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3720,7 +16953,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5293;
+ argtab[2].meltbp_long = 5402;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mflagconj return res";
/*^apply.arg */
@@ -3740,7 +16973,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V62*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[27] = 0;
@@ -3753,7 +16986,7 @@ lab_endgetargs:;
/*_.IF___V61*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ quasiblock");
/*_.PROGN___V63*/ meltfptr[27] = /*_.IF___V61*/ meltfptr[43];;
@@ -3762,7 +16995,7 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[44] = /*_.PROGN___V63*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5293:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5402:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V61*/ meltfptr[43] = 0;
@@ -3775,16 +17008,16 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[44] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5294:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5403:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V59*/ meltfptr[49];;
- MELT_LOCATION ("warmelt-normatch.melt:5294:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5403:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V58*/ meltfptr[34] = /*_.RETURN___V64*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:5292:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5401:/ clear");
/*clear *//*_.RES__V59*/ meltfptr[49] = 0;
/*^clear */
/*clear *//*_.IFCPP___V60*/ meltfptr[44] = 0;
@@ -3792,7 +17025,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V64*/ meltfptr[43] = 0;
/*_.LET___V13*/ meltfptr[11] = /*_.LET___V58*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:5241:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5350:/ clear");
/*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
@@ -3824,11 +17057,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V54*/ meltfptr[48] = 0;
/*^clear */
/*clear *//*_.LET___V58*/ meltfptr[34] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -3853,14 +17086,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ */
+} /*end meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -3885,7 +17118,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE_st
+ struct frame_meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -3924,7 +17157,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -3956,7 +17189,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -3979,7 +17212,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -3989,7 +17222,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -3999,7 +17232,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5301;
+ argtab[2].meltbp_long = 5410;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance step";
/*^apply.arg */
@@ -4018,7 +17251,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -4031,7 +17264,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -4040,7 +17273,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5301:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5410:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -4055,7 +17288,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5302:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5411:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4063,7 +17296,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_INSTANCE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5302:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5411:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4071,7 +17304,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5302:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5411:/ cond.else");
/*^block */
/*anyblock */
@@ -4085,7 +17318,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5302) ? (5302) : __LINE__, __FUNCTION__);
+ (5411) ? (5411) : __LINE__, __FUNCTION__);
;
}
;
@@ -4100,7 +17333,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5302:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5411:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -4113,7 +17346,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5303:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5412:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4121,7 +17354,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5303:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5412:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4129,7 +17362,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5303:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5412:/ cond.else");
/*^block */
/*anyblock */
@@ -4143,7 +17376,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5303) ? (5303) : __LINE__, __FUNCTION__);
+ (5412) ? (5412) : __LINE__, __FUNCTION__);
;
}
;
@@ -4158,7 +17391,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5412:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -4169,7 +17402,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5304:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5413:/ quasiblock");
/*^getslot */
@@ -4189,12 +17422,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5304:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5413:/ cond.else");
/*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5305:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5414:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -4202,7 +17435,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5306:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5415:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -4210,7 +17443,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5307:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5416:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -4218,7 +17451,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5308:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5417:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTINS_CLASS");
@@ -4226,7 +17459,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5309:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5418:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 7, "MSTINS_SLOTS");
@@ -4234,7 +17467,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5310:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5419:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 9, "MATNORX_MATCHCTXT");
@@ -4242,7 +17475,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5311:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5420:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4259,7 +17492,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4282,7 +17515,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4292,7 +17525,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4302,7 +17535,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5313;
+ argtab[2].meltbp_long = 5422;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance matclass";
/*^apply.arg */
@@ -4322,7 +17555,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0;
@@ -4335,7 +17568,7 @@ lab_endgetargs:;
/*_.IF___V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ quasiblock");
/*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];;
@@ -4344,7 +17577,7 @@ lab_endgetargs:;
/*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5422:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V24*/ meltfptr[23] = 0;
@@ -4359,7 +17592,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4382,7 +17615,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4392,7 +17625,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4402,7 +17635,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5314;
+ argtab[2].meltbp_long = 5423;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance ndata";
/*^apply.arg */
@@ -4422,7 +17655,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -4435,7 +17668,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[24];;
@@ -4444,7 +17677,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[23] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5314:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5423:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[24] = 0;
@@ -4459,7 +17692,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4482,7 +17715,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4492,7 +17725,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4503,7 +17736,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5315;
+ argtab[2].meltbp_long = 5424;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance matslots";
/*^apply.arg */
@@ -4523,7 +17756,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -4536,7 +17769,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[28] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[28];;
@@ -4545,7 +17778,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[24] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5315:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5424:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[28] = 0;
@@ -4560,7 +17793,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4583,7 +17816,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4593,7 +17826,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4604,7 +17837,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5316;
+ argtab[2].meltbp_long = 5425;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance matthen";
/*^apply.arg */
@@ -4624,7 +17857,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0;
@@ -4637,7 +17870,7 @@ lab_endgetargs:;
/*_.IF___V36*/ meltfptr[32] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ quasiblock");
/*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[32];;
@@ -4646,7 +17879,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[28] = /*_.PROGN___V38*/ meltfptr[36];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5316:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5425:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V36*/ meltfptr[32] = 0;
@@ -4661,7 +17894,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4684,7 +17917,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -4694,7 +17927,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -4705,7 +17938,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5317;
+ argtab[2].meltbp_long = 5426;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance matelse";
/*^apply.arg */
@@ -4725,7 +17958,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0;
@@ -4738,7 +17971,7 @@ lab_endgetargs:;
/*_.IF___V40*/ meltfptr[36] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ quasiblock");
/*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[36];;
@@ -4747,7 +17980,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[32] = /*_.PROGN___V42*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5426:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V40*/ meltfptr[36] = 0;
@@ -4762,7 +17995,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5318:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5427:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -4771,7 +18004,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MATCLASS__V19*/ meltfptr[18]),
(melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->
tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:5318:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5427:/ cond");
/*cond */ if ( /*_#IS_A__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -4779,7 +18012,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5318:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5427:/ cond.else");
/*^block */
/*anyblock */
@@ -4793,7 +18026,7 @@ lab_endgetargs:;
melt_assert_failed (("check matclass"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5318) ? (5318) : __LINE__, __FUNCTION__);
+ (5427) ? (5427) : __LINE__, __FUNCTION__);
;
}
;
@@ -4808,7 +18041,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[36] = /*_.IFELSE___V44*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5318:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5427:/ clear");
/*clear *//*_#IS_A__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V44*/ meltfptr[40] = 0;
@@ -4819,10 +18052,10 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[36] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5319:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5428:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5320:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5429:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4837,7 +18070,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5321:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5430:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -4852,7 +18085,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5322:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5431:/ quasiblock");
/*^rawallocobj */
@@ -4877,7 +18110,7 @@ lab_endgetargs:;
( /*_.NTHEN__V46*/ meltfptr[45]), "NMJMP_LABEL");
;
/*_.JUMPTHEN__V48*/ meltfptr[47] = /*_.INST__V49*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:5324:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5433:/ quasiblock");
/*^rawallocobj */
@@ -4902,7 +18135,7 @@ lab_endgetargs:;
( /*_.NELSE__V47*/ meltfptr[46]), "NMJMP_LABEL");
;
/*_.JUMPELSE__V50*/ meltfptr[49] = /*_.INST__V51*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:5326:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5435:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -4920,7 +18153,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5327:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5436:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -4938,8 +18171,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5328:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5437:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4957,8 +18195,13 @@ lab_endgetargs:;
/*_.NCX__V54*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5329:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5438:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4976,7 +18219,7 @@ lab_endgetargs:;
/*_.ENV__V55*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5330:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:5439:/ msend");
/*msend */
{
union meltparam_un argtab[3];
@@ -4994,7 +18237,7 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5331:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5440:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCLASS__V19*/ meltfptr[18]), 6, "CLASS_FIELDS");
@@ -5005,7 +18248,7 @@ lab_endgetargs:;
/*_.NIFLIST__V58*/ meltfptr[57] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[10]))));;
- MELT_LOCATION ("warmelt-normatch.melt:5333:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5442:/ quasiblock");
/*^rawallocobj */
@@ -5078,7 +18321,7 @@ lab_endgetargs:;
/*_.NIFISA__V59*/ meltfptr[58] = /*_.INST__V60*/ meltfptr[59];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5101,7 +18344,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -5111,7 +18354,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5122,7 +18365,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5341;
+ argtab[2].meltbp_long = 5450;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance nthen=";
/*^apply.arg */
@@ -5148,7 +18391,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0;
@@ -5161,7 +18404,7 @@ lab_endgetargs:;
/*_.IF___V62*/ meltfptr[61] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ quasiblock");
/*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[61];;
@@ -5170,7 +18413,7 @@ lab_endgetargs:;
/*_.IFCPP___V61*/ meltfptr[60] = /*_.PROGN___V64*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5341:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5450:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V62*/ meltfptr[61] = 0;
@@ -5185,7 +18428,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5342:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5451:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5194,7 +18437,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NTHEN__V46*/ meltfptr[45]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:5342:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5451:/ cond");
/*cond */ if ( /*_#IS_A__L18*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5202,7 +18445,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5342:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5451:/ cond.else");
/*^block */
/*anyblock */
@@ -5216,7 +18459,7 @@ lab_endgetargs:;
melt_assert_failed (("check nthen"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5342) ? (5342) : __LINE__, __FUNCTION__);
+ (5451) ? (5451) : __LINE__, __FUNCTION__);
;
}
;
@@ -5231,7 +18474,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[61] = /*_.IFELSE___V66*/ meltfptr[62];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5342:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5451:/ clear");
/*clear *//*_#IS_A__L18*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V66*/ meltfptr[62] = 0;
@@ -5244,7 +18487,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5343:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5452:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5253,7 +18496,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NELSE__V47*/ meltfptr[46]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:5343:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5452:/ cond");
/*cond */ if ( /*_#IS_A__L19*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -5261,7 +18504,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5343:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5452:/ cond.else");
/*^block */
/*anyblock */
@@ -5275,7 +18518,7 @@ lab_endgetargs:;
melt_assert_failed (("check nelse"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5343) ? (5343) : __LINE__, __FUNCTION__);
+ (5452) ? (5452) : __LINE__, __FUNCTION__);
;
}
;
@@ -5290,7 +18533,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[62] = /*_.IFELSE___V68*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5343:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5452:/ clear");
/*clear *//*_#IS_A__L19*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V68*/ meltfptr[67] = 0;
@@ -5303,7 +18546,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5326,7 +18569,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5336,7 +18579,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ apply");
/*apply */
{
union meltparam_un argtab[7];
@@ -5347,7 +18590,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5344;
+ argtab[2].meltbp_long = 5453;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance njthen=";
/*^apply.arg */
@@ -5373,7 +18616,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -5386,7 +18629,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -5395,7 +18638,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[67] = /*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5344:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5453:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -5425,7 +18668,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:5348:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5457:/ cond");
/*cond */ if ( /*_.CURMSLOT__V73*/ meltfptr[69]) /*then */
{
/*^cond.then */
@@ -5435,7 +18678,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5458,7 +18701,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5468,7 +18711,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5479,7 +18722,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5350;
+ argtab[2].meltbp_long = 5459;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance curmslot";
@@ -5501,7 +18744,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V76*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[23] =
0;
/*^clear */
@@ -5515,7 +18758,7 @@ lab_endgetargs:;
/*_.IF___V75*/ meltfptr[74] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ quasiblock");
/*_.PROGN___V77*/ meltfptr[75] =
@@ -5526,7 +18769,7 @@ lab_endgetargs:;
/*_.PROGN___V77*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5350:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5459:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V75*/ meltfptr[74] = 0;
@@ -5541,7 +18784,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5351:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5460:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5550,7 +18793,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURMSLOT__V73*/ meltfptr[69]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[14])));;
- MELT_LOCATION ("warmelt-normatch.melt:5351:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5460:/ cond");
/*cond */ if ( /*_#IS_A__L25*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -5559,7 +18802,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5351:/ cond.else");
+ ("warmelt-normatch.melt:5460:/ cond.else");
/*^block */
/*anyblock */
@@ -5574,7 +18817,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (5351) ? (5351) : __LINE__,
+ (5460) ? (5460) : __LINE__,
__FUNCTION__);
;
}
@@ -5591,7 +18834,7 @@ lab_endgetargs:;
/*_.IFELSE___V79*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5351:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5460:/ clear");
/*clear *//*_#IS_A__L25*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V79*/ meltfptr[75] = 0;
@@ -5602,7 +18845,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[74] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5352:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5461:/ quasiblock");
/*^apply */
@@ -5627,7 +18870,7 @@ lab_endgetargs:;
(melt_multiple_nth
((melt_ptr_t) ( /*_.CLAFIELDS__V57*/ meltfptr[56]),
( /*_#CURIX__L22*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5354:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5463:/ quasiblock");
/*^rawallocobj */
@@ -5675,7 +18918,7 @@ lab_endgetargs:;
;
/*_.NFLEXP__V82*/ meltfptr[81] =
/*_.INST__V83*/ meltfptr[82];;
- MELT_LOCATION ("warmelt-normatch.melt:5358:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5467:/ quasiblock");
/*^rawallocobj */
@@ -5724,7 +18967,7 @@ lab_endgetargs:;
/*_.NSETF__V84*/ meltfptr[83] = /*_.INST__V85*/ meltfptr[84];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5747,7 +18990,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5757,7 +19000,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5768,7 +19011,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5363;
+ argtab[2].meltbp_long = 5472;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance nslot";
@@ -5790,7 +19033,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[23] =
0;
/*^clear */
@@ -5804,7 +19047,7 @@ lab_endgetargs:;
/*_.IF___V87*/ meltfptr[86] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[87] =
@@ -5815,7 +19058,7 @@ lab_endgetargs:;
/*_.PROGN___V89*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5363:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5472:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V87*/ meltfptr[86] = 0;
@@ -5830,7 +19073,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5853,7 +19096,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -5863,7 +19106,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5874,7 +19117,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5364;
+ argtab[2].meltbp_long = 5473;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance curfld";
@@ -5896,7 +19139,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[0] =
0;
/*^clear */
@@ -5910,7 +19153,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[91] =
@@ -5921,7 +19164,7 @@ lab_endgetargs:;
/*_.PROGN___V93*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5364:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5473:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[87] = 0;
@@ -5936,7 +19179,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -5959,7 +19202,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -5969,7 +19212,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -5980,7 +19223,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5365;
+ argtab[2].meltbp_long = 5474;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance nsetf";
@@ -6002,7 +19245,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V96*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[23] =
0;
/*^clear */
@@ -6016,7 +19259,7 @@ lab_endgetargs:;
/*_.IF___V95*/ meltfptr[91] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ quasiblock");
/*_.PROGN___V97*/ meltfptr[95] =
@@ -6027,7 +19270,7 @@ lab_endgetargs:;
/*_.PROGN___V97*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5365:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5474:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V95*/ meltfptr[91] = 0;
@@ -6042,7 +19285,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5366:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5475:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6053,7 +19296,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_FIELD */
meltfrout->
tabval[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:5366:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5475:/ cond");
/*cond */ if ( /*_#IS_A__L32*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -6062,7 +19305,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5366:/ cond.else");
+ ("warmelt-normatch.melt:5475:/ cond.else");
/*^block */
/*anyblock */
@@ -6077,7 +19320,7 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (5366) ? (5366) : __LINE__,
+ (5475) ? (5475) : __LINE__,
__FUNCTION__);
;
}
@@ -6094,7 +19337,7 @@ lab_endgetargs:;
/*_.IFELSE___V99*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5366:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5475:/ clear");
/*clear *//*_#IS_A__L32*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.IFELSE___V99*/ meltfptr[95] = 0;
@@ -6107,7 +19350,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5367:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5476:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NIFLIST__V58*/ meltfptr[57]),
(melt_ptr_t) ( /*_.NSETF__V84*/
@@ -6115,7 +19358,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5352:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5461:/ clear");
/*clear *//*_.NSLOT__V80*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.CURFLD__V81*/ meltfptr[80] = 0;
@@ -6131,12 +19374,12 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V94*/ meltfptr[87] = 0;
/*^clear */
/*clear *//*_.IFCPP___V98*/ meltfptr[91] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5349:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5458:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5348:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5457:/ clear");
/*clear *//*_.IFCPP___V74*/ meltfptr[70] = 0;
/*^clear */
/*clear *//*_.IFCPP___V78*/ meltfptr[74] = 0;
@@ -6150,7 +19393,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5345:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5454:/ clear");
/*clear *//*_.CURMSLOT__V73*/ meltfptr[69] = 0;
/*^clear */
/*clear *//*_#CURIX__L22*/ meltfnum[1] = 0;
@@ -6158,7 +19401,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6181,7 +19424,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6191,7 +19434,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[23] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6202,7 +19445,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5369;
+ argtab[2].meltbp_long = 5478;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance nifisa";
/*^apply.arg */
@@ -6222,7 +19465,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V102*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[23] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[80] = 0;
@@ -6235,7 +19478,7 @@ lab_endgetargs:;
/*_.IF___V101*/ meltfptr[75] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ quasiblock");
/*_.PROGN___V103*/ meltfptr[81] = /*_.IF___V101*/ meltfptr[75];;
@@ -6244,7 +19487,7 @@ lab_endgetargs:;
/*_.IFCPP___V100*/ meltfptr[95] = /*_.PROGN___V103*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5369:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5478:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V101*/ meltfptr[75] = 0;
@@ -6262,7 +19505,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L35*/ meltfnum[23] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V52*/ meltfptr[51])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5370:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5479:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L35*/ meltfnum[23]) /*then */
{
/*^cond.then */
@@ -6274,7 +19517,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5371:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5480:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NIFLIST__V58*/ meltfptr[57]),
(melt_ptr_t) ( /*_.NJTHEN__V52*/
@@ -6288,7 +19531,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5370:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5479:/ cond.else");
/*^block */
/*anyblock */
@@ -6297,7 +19540,7 @@ lab_endgetargs:;
/*_#IS_LIST__L36*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V52*/ meltfptr[51]))
== MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:5372:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5481:/ cond");
/*cond */ if ( /*_#IS_LIST__L36*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6305,7 +19548,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5373:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5482:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -6327,7 +19570,7 @@ lab_endgetargs:;
/*_.LIST_APPEND2LIST__V106*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5481:/ clear");
/*clear *//*_.LIST_APPEND2LIST__V106*/ meltfptr[86] = 0;
}
;
@@ -6343,7 +19586,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.NJTHEN__V52*/ meltfptr[51])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5374:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5483:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L37*/ meltfnum[36]) /*then */
{
/*^cond.then */
@@ -6374,7 +19617,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5378:/ locexp");
+ ("warmelt-normatch.melt:5487:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NIFLIST__V58*/
meltfptr[57]),
@@ -6387,7 +19630,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5375:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5484:/ clear");
/*clear *//*_.CURJTHEN__V108*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_#JIX__L38*/ meltfnum[37] = 0;
@@ -6399,7 +19642,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5374:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5483:/ cond.else");
/*^block */
/*anyblock */
@@ -6408,7 +19651,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5380:/ cppif.then");
+ ("warmelt-normatch.melt:5489:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6431,7 +19674,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5380:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5489:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -6442,7 +19685,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5380:/ apply");
+ ("warmelt-normatch.melt:5489:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6454,7 +19697,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5380;
+ argtab[2].meltbp_long = 5489;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance unexpected njthen";
@@ -6480,7 +19723,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5380:/ clear");
+ ("warmelt-normatch.melt:5489:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L40*/
meltfnum[39] = 0;
/*^clear */
@@ -6496,7 +19739,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5380:/ quasiblock");
+ ("warmelt-normatch.melt:5489:/ quasiblock");
/*_.PROGN___V112*/ meltfptr[75] =
@@ -6507,7 +19750,7 @@ lab_endgetargs:;
/*_.PROGN___V112*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5380:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5489:/ clear");
/*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V110*/ meltfptr[74] = 0;
@@ -6523,7 +19766,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5381:/ cppif.then");
+ ("warmelt-normatch.melt:5490:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6538,7 +19781,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5381:/ cond.else");
+ ("warmelt-normatch.melt:5490:/ cond.else");
/*^block */
/*anyblock */
@@ -6549,7 +19792,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normstep_mtestinstance unexpected njthen"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5381) ? (5381) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normstep_mtestinstance unexpected njthen"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5490) ? (5490) : __LINE__, __FUNCTION__);
;
}
;
@@ -6565,7 +19808,7 @@ lab_endgetargs:;
/*_.IFELSE___V114*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5381:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5490:/ clear");
/*clear *//*_.IFELSE___V114*/ meltfptr[86] = 0;
}
@@ -6575,7 +19818,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5379:/ quasiblock");
+ ("warmelt-normatch.melt:5488:/ quasiblock");
/*_.PROGN___V115*/ meltfptr[80] =
@@ -6586,7 +19829,7 @@ lab_endgetargs:;
/*_.PROGN___V115*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5374:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5483:/ clear");
/*clear *//*_.IFCPP___V109*/ meltfptr[70] = 0;
/*^clear */
/*clear *//*_.IFCPP___V113*/ meltfptr[81] = 0;
@@ -6600,7 +19843,7 @@ lab_endgetargs:;
/*_.IFELSE___V107*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5372:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5481:/ clear");
/*clear *//*_#IS_MULTIPLE__L37*/ meltfnum[36] = 0;
/*^clear */
/*clear *//*_.IFELSE___V107*/ meltfptr[87] = 0;
@@ -6612,7 +19855,7 @@ lab_endgetargs:;
/*_.IFELSE___V105*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5370:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5479:/ clear");
/*clear *//*_#IS_LIST__L36*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V105*/ meltfptr[85] = 0;
@@ -6622,7 +19865,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6645,7 +19888,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -6655,7 +19898,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L42*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6666,7 +19909,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5382;
+ argtab[2].meltbp_long = 5491;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestinstance niflist";
/*^apply.arg */
@@ -6686,7 +19929,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V118*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V118*/ meltfptr[86] = 0;
@@ -6699,7 +19942,7 @@ lab_endgetargs:;
/*_.IF___V117*/ meltfptr[75] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ quasiblock");
/*_.PROGN___V119*/ meltfptr[70] = /*_.IF___V117*/ meltfptr[75];;
@@ -6708,7 +19951,7 @@ lab_endgetargs:;
/*_.IFCPP___V116*/ meltfptr[74] = /*_.PROGN___V119*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5382:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5491:/ clear");
/*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V117*/ meltfptr[75] = 0;
@@ -6721,10 +19964,10 @@ lab_endgetargs:;
/*_.IFCPP___V116*/ meltfptr[74] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5383:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5492:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5385:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5494:/ apply");
/*apply */
{
/*_.LIST_TO_MULTIPLE__V120*/ meltfptr[81] =
@@ -6734,7 +19977,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5383:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5492:/ quasiblock");
/*^rawallocobj */
@@ -6783,7 +20026,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L43*/ meltfnum[36] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V53*/ meltfptr[52])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5390:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5499:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L43*/ meltfnum[36]) /*then */
{
/*^cond.then */
@@ -6791,7 +20034,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5390:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5499:/ cond.else");
/*^block */
/*anyblock */
@@ -6800,7 +20043,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L44*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V53*/ meltfptr[52]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5392:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5501:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L44*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -6808,7 +20051,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5393:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5502:/ quasiblock");
/*^rawallocobj */
@@ -6861,7 +20104,7 @@ lab_endgetargs:;
/*_.INST___V125*/ meltfptr[75];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5392:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5501:/ clear");
/*clear *//*_.INST___V125*/ meltfptr[75] = 0;
}
;
@@ -6875,7 +20118,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6898,7 +20141,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L45*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -6908,7 +20151,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L46*/ meltfnum[39] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -6919,7 +20162,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5398;
+ argtab[2].meltbp_long = 5507;
/*^apply.arg */
argtab[3].meltbp_cstring = "unexpected njelse";
/*^apply.arg */
@@ -6940,7 +20183,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V129*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L46*/ meltfnum[39] =
0;
/*^clear */
@@ -6955,7 +20198,7 @@ lab_endgetargs:;
/*_.IF___V128*/ meltfptr[127] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ quasiblock");
/*_.PROGN___V130*/ meltfptr[128] =
@@ -6966,7 +20209,7 @@ lab_endgetargs:;
/*_.PROGN___V130*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5398:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5507:/ clear");
/*clear *//*_#MELT_NEED_DBG__L45*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V128*/ meltfptr[127] = 0;
@@ -6981,7 +20224,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5399:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5508:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -6995,7 +20238,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5399:/ cond.else");
+ ("warmelt-normatch.melt:5508:/ cond.else");
/*^block */
/*anyblock */
@@ -7006,7 +20249,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normstep_mtestinstance unexpected njelse"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5399) ? (5399) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normstep_mtestinstance unexpected njelse"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5508) ? (5508) : __LINE__, __FUNCTION__);
;
}
;
@@ -7022,7 +20265,7 @@ lab_endgetargs:;
/*_.IFELSE___V132*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5399:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5508:/ clear");
/*clear *//*_.IFELSE___V132*/ meltfptr[128] = 0;
}
@@ -7031,7 +20274,7 @@ lab_endgetargs:;
/*_.IFCPP___V131*/ meltfptr[127] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5397:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5506:/ quasiblock");
/*_.PROGN___V133*/ meltfptr[128] =
@@ -7042,7 +20285,7 @@ lab_endgetargs:;
/*_.PROGN___V133*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5392:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5501:/ clear");
/*clear *//*_.IFCPP___V127*/ meltfptr[75] = 0;
/*^clear */
/*clear *//*_.IFCPP___V131*/ meltfptr[127] = 0;
@@ -7055,7 +20298,7 @@ lab_endgetargs:;
/*_.NPELSE__V123*/ meltfptr[85] = /*_.IFELSE___V124*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5390:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5499:/ clear");
/*clear *//*_#IS_MULTIPLE__L44*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V124*/ meltfptr[86] = 0;
@@ -7063,7 +20306,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5401:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5510:/ quasiblock");
/*^putslot */
@@ -7089,7 +20332,7 @@ lab_endgetargs:;
;
- MELT_LOCATION ("warmelt-normatch.melt:5383:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5492:/ clear");
/*clear *//*_.LIST_TO_MULTIPLE__V120*/ meltfptr[81] = 0;
/*^clear */
/*clear *//*_.NTHENPROGN__V121*/ meltfptr[80] = 0;
@@ -7099,7 +20342,7 @@ lab_endgetargs:;
/*clear *//*_.NPELSE__V123*/ meltfptr[85] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7122,7 +20365,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[39]) /*then */
{
/*^cond.then */
@@ -7132,7 +20375,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L48*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -7143,7 +20386,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5403;
+ argtab[2].meltbp_long = 5512;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestinstance updated nifisa";
@@ -7164,7 +20407,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V136*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L48*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V136*/ meltfptr[128] = 0;
@@ -7177,7 +20420,7 @@ lab_endgetargs:;
/*_.IF___V135*/ meltfptr[127] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ quasiblock");
/*_.PROGN___V137*/ meltfptr[86] = /*_.IF___V135*/ meltfptr[127];;
@@ -7186,7 +20429,7 @@ lab_endgetargs:;
/*_.IFCPP___V134*/ meltfptr[75] = /*_.PROGN___V137*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5403:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5512:/ clear");
/*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[39] = 0;
/*^clear */
/*clear *//*_.IF___V135*/ meltfptr[127] = 0;
@@ -7199,16 +20442,16 @@ lab_endgetargs:;
/*_.IFCPP___V134*/ meltfptr[75] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5404:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5513:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFISA__V59*/ meltfptr[58];;
- MELT_LOCATION ("warmelt-normatch.melt:5404:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5513:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V45*/ meltfptr[40] = /*_.RETURN___V138*/ meltfptr[81];;
- MELT_LOCATION ("warmelt-normatch.melt:5319:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5428:/ clear");
/*clear *//*_.NTHEN__V46*/ meltfptr[45] = 0;
/*^clear */
/*clear *//*_.NELSE__V47*/ meltfptr[46] = 0;
@@ -7254,7 +20497,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V138*/ meltfptr[81] = 0;
/*_.LET___V13*/ meltfptr[11] = /*_.LET___V45*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-normatch.melt:5304:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5413:/ clear");
/*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
@@ -7286,11 +20529,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V43*/ meltfptr[36] = 0;
/*^clear */
/*clear *//*_.LET___V45*/ meltfptr[40] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -7315,14 +20558,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE */
+} /*end meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -7347,7 +20590,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE_st
+ struct frame_meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -7358,10 +20601,10 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 75
- void *mcfr_varptr[75];
-#define MELTFRAM_NBVARNUM 19
- long mcfr_varnum[19];
+#define MELTFRAM_NBVARPTR 111
+ void *mcfr_varptr[111];
+#define MELTFRAM_NBVARNUM 36
+ long mcfr_varnum[36];
/*others*/
long _spare_;
}
@@ -7372,13 +20615,13 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 75; ix++)
+ for (ix = 0; ix < 111; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 75;
+ meltfram__.mcfr_nbvar = 111;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -7386,7 +20629,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -7418,7 +20661,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7441,7 +20684,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7455,7 +20698,7 @@ lab_endgetargs:;
/*_.DISCRIM__V7*/ meltfptr[6] =
(melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -7465,7 +20708,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5412;
+ argtab[2].meltbp_long = 5521;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmultiple step=";
/*^apply.arg */
@@ -7496,7 +20739,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.DISCRIM__V7*/ meltfptr[6] = 0;
@@ -7511,7 +20754,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ quasiblock");
/*_.PROGN___V9*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -7520,7 +20763,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5412:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5521:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -7535,7 +20778,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5413:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5522:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7543,7 +20786,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MULTIPLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5413:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5522:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -7551,7 +20794,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5413:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5522:/ cond.else");
/*^block */
/*anyblock */
@@ -7565,7 +20808,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5413) ? (5413) : __LINE__, __FUNCTION__);
+ (5522) ? (5522) : __LINE__, __FUNCTION__);
;
}
;
@@ -7580,7 +20823,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[7] = /*_.IFELSE___V11*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5413:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5522:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[5] = 0;
@@ -7593,7 +20836,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5414:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5523:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7601,7 +20844,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5414:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5523:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -7609,7 +20852,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5414:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5523:/ cond.else");
/*^block */
/*anyblock */
@@ -7623,7 +20866,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5414) ? (5414) : __LINE__, __FUNCTION__);
+ (5523) ? (5523) : __LINE__, __FUNCTION__);
;
}
;
@@ -7638,7 +20881,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[6] = /*_.IFELSE___V13*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5414:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5523:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[5] = 0;
@@ -7649,7 +20892,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5415:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5524:/ quasiblock");
/*^getslot */
@@ -7669,12 +20912,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5415:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5524:/ cond.else");
/*_.NSLOC__V16*/ meltfptr[15] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5416:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5525:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -7682,7 +20925,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5417:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5526:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -7690,7 +20933,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5418:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5527:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -7698,7 +20941,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5419:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5528:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
@@ -7706,7 +20949,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5420:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5529:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 9, "MATNORX_MATCHCTXT");
@@ -7716,7 +20959,7 @@ lab_endgetargs:;
;
/*_#MATIX__L5*/ meltfnum[1] =
(melt_get_int ((melt_ptr_t) ( /*_.MATINDEX__V20*/ meltfptr[19])));;
- MELT_LOCATION ("warmelt-normatch.melt:5422:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5531:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTTUP_COMPONENTS");
@@ -7724,7 +20967,10 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5423:/ apply");
+ /*_#NBCOMP__L6*/ meltfnum[0] =
+ (melt_multiple_length
+ ((melt_ptr_t) ( /*_.MATCOMP__V22*/ meltfptr[21])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5533:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7741,7 +20987,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -7756,7 +21002,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L6*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L7*/ meltfnum[6] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -7764,27 +21010,27 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] =
+ /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ apply");
/*apply */
{
union meltparam_un argtab[11];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6];
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5425;
+ argtab[2].meltbp_long = 5535;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmultiple matdata=";
/*^apply.arg */
@@ -7821,8 +21067,8 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
}
@@ -7834,7 +21080,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -7843,8 +21089,8 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5425:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5535:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
/*^clear */
@@ -7856,10 +21102,10 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5427:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5537:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5428:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5538:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7874,7 +21120,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5429:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5539:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -7889,7 +21135,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5430:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5540:/ quasiblock");
/*^rawallocobj */
@@ -7914,7 +21160,7 @@ lab_endgetargs:;
( /*_.NTHEN__V29*/ meltfptr[25]), "NMJMP_LABEL");
;
/*_.JUMPTHEN__V31*/ meltfptr[30] = /*_.INST__V32*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:5432:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5542:/ quasiblock");
/*^rawallocobj */
@@ -7939,7 +21185,7 @@ lab_endgetargs:;
( /*_.NELSE__V30*/ meltfptr[29]), "NMJMP_LABEL");
;
/*_.JUMPELSE__V33*/ meltfptr[32] = /*_.INST__V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-normatch.melt:5434:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5544:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -7957,7 +21203,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5435:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5545:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -7975,8 +21221,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5436:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5546:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7999,7 +21250,14 @@ lab_endgetargs:;
/*_.NIFLIST__V38*/ meltfptr[37] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[8]))));;
- MELT_LOCATION ("warmelt-normatch.melt:5438:/ quasiblock");
+ /*^compute */
+
+ /*_.NBCOMPVAL__V39*/ meltfptr[38] =
+ (meltgc_new_int
+ ((meltobject_ptr_t)
+ (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[9])),
+ ( /*_#NBCOMP__L6*/ meltfnum[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5549:/ quasiblock");
/*^rawallocobj */
@@ -8008,35 +21266,95 @@ lab_endgetargs:;
melt_ptr_t newobj = 0;
melt_raw_object_create (newobj,
(melt_ptr_t) (( /*!CLASS_NREP_IFTUPLESIZED */
- meltfrout->tabval[9])), (6),
+ meltfrout->tabval[10])), (6),
"CLASS_NREP_IFTUPLESIZED");
- /*_.INST__V40*/ meltfptr[39] =
+ /*_.INST__V41*/ meltfptr[40] =
newobj;
};
;
- /*_.NIFISTUPLE__V39*/ meltfptr[38] = /*_.INST__V40*/ meltfptr[39];;
- MELT_LOCATION ("warmelt-normatch.melt:5440:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V21*/ meltfptr[20]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[7])))) /*then */
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NREP_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (0),
+ ( /*_.SLOC__V4*/ meltfptr[3]), "NREP_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_TESTVAL",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (4),
+ ( /*_.NDATA__V23*/ meltfptr[22]), "NIF_TESTVAL");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_TUPSIZ",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (5),
+ ( /*_.NBCOMPVAL__V39*/ meltfptr[38]), "NIF_TUPSIZ");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NEXPR_CTYP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (1),
+ (( /*!CTYPE_VOID */ meltfrout->tabval[11])),
+ "NEXPR_CTYP");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_THEN",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (2),
+ (( /*nil */ NULL)), "NIF_THEN");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_ELSE",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V41*/ meltfptr[40])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V41*/ meltfptr[40]), (3),
+ (( /*nil */ NULL)), "NIF_ELSE");
+ ;
+ /*_.NIFISTUPLE__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];;
+ MELT_LOCATION ("warmelt-normatch.melt:5557:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V21*/ meltfptr[20]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATCTX__V21*/ meltfptr[20]), 5, "MCTX_ENV");
- /*_.ENV__V41*/
- meltfptr[40] = slot;
+ /*_.ENV__V42*/
+ meltfptr[41] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.ENV__V41*/ meltfptr[40] = NULL;;
+ /*_.ENV__V42*/ meltfptr[41] = NULL;;
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8051,7 +21369,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L8*/ meltfnum[6] =
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[7] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -8059,27 +21377,28 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[6]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ apply");
/*apply */
{
union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0];
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5442;
+ argtab[2].meltbp_long = 5559;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmultiple nthen=";
/*^apply.arg */
@@ -8090,7 +21409,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[6].meltbp_aptr =
(melt_ptr_t *) & /*_.NELSE__V30*/ meltfptr[29];
- /*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] =
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -8101,65 +21420,65 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V43*/ meltfptr[42] =
- /*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
+ /*_.IF___V44*/ meltfptr[43] =
+ /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V43*/ meltfptr[42] = NULL;;
+ /*_.IF___V44*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ quasiblock");
- /*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];;
+ /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];;
/*^compute */
- /*_.IFCPP___V42*/ meltfptr[41] = /*_.PROGN___V45*/ meltfptr[43];;
+ /*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5442:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5559:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.IF___V43*/ meltfptr[42] = 0;
+ /*clear *//*_.IF___V44*/ meltfptr[43] = 0;
/*^clear */
- /*clear *//*_.PROGN___V45*/ meltfptr[43] = 0;
+ /*clear *//*_.PROGN___V46*/ meltfptr[44] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V42*/ meltfptr[41] = ( /*nil */ NULL);
+ /*_.IFCPP___V43*/ meltfptr[42] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5443:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5560:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L10*/ meltfnum[0] =
+ /*_#IS_A__L11*/ meltfnum[6] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NTHEN__V29*/ meltfptr[25]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
- meltfrout->tabval[10])));;
- MELT_LOCATION ("warmelt-normatch.melt:5443:/ cond");
- /*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */
+ meltfrout->tabval[12])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5560:/ cond");
+ /*cond */ if ( /*_#IS_A__L11*/ meltfnum[6]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V47*/ meltfptr[43] = ( /*nil */ NULL);;
+ /*_.IFELSE___V48*/ meltfptr[44] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5443:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5560:/ cond.else");
/*^block */
/*anyblock */
@@ -8173,11 +21492,11 @@ lab_endgetargs:;
melt_assert_failed (("check nthen"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5443) ? (5443) : __LINE__, __FUNCTION__);
+ (5560) ? (5560) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V47*/ meltfptr[43] = 0;
+ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
/*epilog */
}
;
@@ -8185,40 +21504,40 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V46*/ meltfptr[42] = /*_.IFELSE___V47*/ meltfptr[43];;
+ /*_.IFCPP___V47*/ meltfptr[43] = /*_.IFELSE___V48*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5443:/ clear");
- /*clear *//*_#IS_A__L10*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5560:/ clear");
+ /*clear *//*_#IS_A__L11*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V47*/ meltfptr[43] = 0;
+ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V46*/ meltfptr[42] = ( /*nil */ NULL);
+ /*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5444:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5561:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L11*/ meltfnum[6] =
+ /*_#IS_A__L12*/ meltfnum[7] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NELSE__V30*/ meltfptr[29]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
- meltfrout->tabval[10])));;
- MELT_LOCATION ("warmelt-normatch.melt:5444:/ cond");
- /*cond */ if ( /*_#IS_A__L11*/ meltfnum[6]) /*then */
+ meltfrout->tabval[12])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5561:/ cond");
+ /*cond */ if ( /*_#IS_A__L12*/ meltfnum[7]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V49*/ meltfptr[48] = ( /*nil */ NULL);;
+ /*_.IFELSE___V50*/ meltfptr[49] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5444:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5561:/ cond.else");
/*^block */
/*anyblock */
@@ -8232,11 +21551,11 @@ lab_endgetargs:;
melt_assert_failed (("check nelse"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5444) ? (5444) : __LINE__, __FUNCTION__);
+ (5561) ? (5561) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V49*/ meltfptr[48] = 0;
+ /*clear *//*_.IFELSE___V50*/ meltfptr[49] = 0;
/*epilog */
}
;
@@ -8244,23 +21563,23 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V48*/ meltfptr[43] = /*_.IFELSE___V49*/ meltfptr[48];;
+ /*_.IFCPP___V49*/ meltfptr[44] = /*_.IFELSE___V50*/ meltfptr[49];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5444:/ clear");
- /*clear *//*_#IS_A__L11*/ meltfnum[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5561:/ clear");
+ /*clear *//*_#IS_A__L12*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V49*/ meltfptr[48] = 0;
+ /*clear *//*_.IFELSE___V50*/ meltfptr[49] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V48*/ meltfptr[43] = ( /*nil */ NULL);
+ /*_.IFCPP___V49*/ meltfptr[44] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8275,7 +21594,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L12*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L13*/ meltfnum[6] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -8283,28 +21602,28 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[6]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[6] =
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ apply");
/*apply */
{
union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[6];
+ /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5445;
+ argtab[2].meltbp_long = 5562;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmultiple njthen=";
/*^apply.arg */
@@ -8315,7 +21634,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[6].meltbp_aptr =
(melt_ptr_t *) & /*_.NJELSE__V36*/ meltfptr[35];
- /*_.MELT_DEBUG_FUN__V52*/ meltfptr[51] =
+ /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -8326,43 +21645,43 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V51*/ meltfptr[50] =
- /*_.MELT_DEBUG_FUN__V52*/ meltfptr[51];;
+ /*_.IF___V52*/ meltfptr[51] =
+ /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V52*/ meltfptr[51] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V51*/ meltfptr[50] = NULL;;
+ /*_.IF___V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ quasiblock");
- /*_.PROGN___V53*/ meltfptr[51] = /*_.IF___V51*/ meltfptr[50];;
+ /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
/*^compute */
- /*_.IFCPP___V50*/ meltfptr[48] = /*_.PROGN___V53*/ meltfptr[51];;
+ /*_.IFCPP___V51*/ meltfptr[49] = /*_.PROGN___V54*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5445:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5562:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.IF___V51*/ meltfptr[50] = 0;
+ /*clear *//*_.IF___V52*/ meltfptr[51] = 0;
/*^clear */
- /*clear *//*_.PROGN___V53*/ meltfptr[51] = 0;
+ /*clear *//*_.PROGN___V54*/ meltfptr[52] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V50*/ meltfptr[48] = ( /*nil */ NULL);
+ /*_.IFCPP___V51*/ meltfptr[49] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*citerblock FOREACH_IN_MULTIPLE */
@@ -8370,21 +21689,21 @@ lab_endgetargs:;
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
melt_multiple_length ((melt_ptr_t) /*_.MATCOMP__V22*/ meltfptr[21]);
- for ( /*_#CURIX__L14*/ meltfnum[6] = 0;
- ( /*_#CURIX__L14*/ meltfnum[6] >= 0)
- && ( /*_#CURIX__L14*/ meltfnum[6] < cit1__EACHTUP_ln);
- /*_#CURIX__L14*/ meltfnum[6]++)
+ for ( /*_#CURIX__L15*/ meltfnum[7] = 0;
+ ( /*_#CURIX__L15*/ meltfnum[7] >= 0)
+ && ( /*_#CURIX__L15*/ meltfnum[7] < cit1__EACHTUP_ln);
+ /*_#CURIX__L15*/ meltfnum[7]++)
{
- /*_.CURMDATA__V54*/ meltfptr[50] =
+ /*_.CURMDATA__V55*/ meltfptr[51] =
melt_multiple_nth ((melt_ptr_t)
( /*_.MATCOMP__V22*/ meltfptr[21]),
- /*_#CURIX__L14*/ meltfnum[6]);
+ /*_#CURIX__L15*/ meltfnum[7]);
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8399,7 +21718,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L15*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L16*/ meltfnum[6] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -8407,39 +21726,39 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[6]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ apply");
/*apply */
{
union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15];
+ /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5449;
+ argtab[2].meltbp_long = 5566;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmultiple curmdata=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURMDATA__V54*/ meltfptr[50];
+ (melt_ptr_t *) & /*_.CURMDATA__V55*/ meltfptr[51];
/*^apply.arg */
argtab[5].meltbp_cstring = " curix=";
/*^apply.arg */
- argtab[6].meltbp_long = /*_#CURIX__L14*/ meltfnum[6];
- /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] =
+ argtab[6].meltbp_long = /*_#CURIX__L15*/ meltfnum[7];
+ /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[0])),
@@ -8451,47 +21770,47 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V56*/ meltfptr[55] =
- /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
+ /*_.IF___V57*/ meltfptr[56] =
+ /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V56*/ meltfptr[55] = NULL;;
+ /*_.IF___V57*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ quasiblock");
- /*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];;
+ /*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];;
/*^compute */
- /*_.IFCPP___V55*/ meltfptr[51] = /*_.PROGN___V58*/ meltfptr[56];;
+ /*_.IFCPP___V56*/ meltfptr[52] = /*_.PROGN___V59*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5449:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5566:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.IF___V56*/ meltfptr[55] = 0;
+ /*clear *//*_.IF___V57*/ meltfptr[56] = 0;
/*^clear */
- /*clear *//*_.PROGN___V58*/ meltfptr[56] = 0;
+ /*clear *//*_.PROGN___V59*/ meltfptr[57] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V55*/ meltfptr[51] = ( /*nil */ NULL);
+ /*_.IFCPP___V56*/ meltfptr[52] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5450:/ cond");
- /*cond */ if ( /*_.CURMDATA__V54*/ meltfptr[50]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5567:/ cond");
+ /*cond */ if ( /*_.CURMDATA__V55*/ meltfptr[51]) /*then */
{
/*^cond.then */
/*^block */
@@ -8500,25 +21819,25 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5452:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5569:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L17*/ meltfnum[15] =
+ /*_#IS_A__L18*/ meltfnum[16] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURMDATA__V54*/ meltfptr[50]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[11])));;
- MELT_LOCATION ("warmelt-normatch.melt:5452:/ cond");
- /*cond */ if ( /*_#IS_A__L17*/ meltfnum[15]) /*then */
+ ( /*_.CURMDATA__V55*/ meltfptr[51]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[13])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5569:/ cond");
+ /*cond */ if ( /*_#IS_A__L18*/ meltfnum[16]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V61*/ meltfptr[60] = ( /*nil */ NULL);;
+ /*_.IFELSE___V61*/ meltfptr[57] = ( /*nil */ NULL);;
}
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5452:/ cond.else");
+ ("warmelt-normatch.melt:5569:/ cond.else");
/*^block */
/*anyblock */
@@ -8533,12 +21852,12 @@ lab_endgetargs:;
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
__FILE__,
- (5452) ? (5452) : __LINE__,
+ (5569) ? (5569) : __LINE__,
__FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V61*/ meltfptr[60] = 0;
+ /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
/*epilog */
}
;
@@ -8547,13 +21866,13 @@ lab_endgetargs:;
/*^compute */
/*_.IFCPP___V60*/ meltfptr[56] =
- /*_.IFELSE___V61*/ meltfptr[60];;
+ /*_.IFELSE___V61*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5452:/ clear");
- /*clear *//*_#IS_A__L17*/ meltfnum[15] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5569:/ clear");
+ /*clear *//*_#IS_A__L18*/ meltfnum[16] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V61*/ meltfptr[60] = 0;
+ /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0;
}
#else /*MELT_HAVE_DEBUG */
@@ -8561,10 +21880,10 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[56] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5453:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5570:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5454:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5571:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -8572,22 +21891,22 @@ lab_endgetargs:;
/*^apply.arg */
argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.NMCTXT__V3*/ meltfptr[2];
- /*_.NCOMPDATA__V63*/ meltfptr[62] =
+ /*_.NCOMPDATA__V62*/ meltfptr[57] =
melt_apply ((meltclosure_ptr_t)
(( /*!ALTMATCH_NORMALIZE_MDATA */ meltfrout->
tabval[3])),
- (melt_ptr_t) ( /*_.CURMDATA__V54*/
- meltfptr[50]),
+ (melt_ptr_t) ( /*_.CURMDATA__V55*/
+ meltfptr[51]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.MAKE_INTEGERBOX__V64*/ meltfptr[63] =
+ /*_.MAKE_INTEGERBOX__V63*/ meltfptr[62] =
(meltgc_new_int
((meltobject_ptr_t)
- (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[13])),
- ( /*_#CURIX__L14*/ meltfnum[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:5455:/ quasiblock");
+ (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[9])),
+ ( /*_#CURIX__L15*/ meltfnum[7])));;
+ MELT_LOCATION ("warmelt-normatch.melt:5572:/ quasiblock");
/*^rawallocobj */
@@ -8595,8 +21914,8 @@ lab_endgetargs:;
{
melt_ptr_t newobj = 0;
melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[12])), (3), "CLASS_NREP_UNSAFE_NTH_COMPONENT");
- /*_.INST__V66*/ meltfptr[65] =
+ (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[14])), (3), "CLASS_NREP_UNSAFE_NTH_COMPONENT");
+ /*_.INST__V65*/ meltfptr[64] =
newobj;
};
;
@@ -8604,10 +21923,10 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NREP_LOC",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V66*/
- meltfptr[65])) ==
+ ( /*_.INST__V65*/
+ meltfptr[64])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V66*/ meltfptr[65]), (0),
+ melt_putfield_object (( /*_.INST__V65*/ meltfptr[64]), (0),
( /*_.NSLOC__V16*/ meltfptr[15]),
"NREP_LOC");
;
@@ -8615,10 +21934,10 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NUNTH_TUPLE",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V66*/
- meltfptr[65])) ==
+ ( /*_.INST__V65*/
+ meltfptr[64])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V66*/ meltfptr[65]), (1),
+ melt_putfield_object (( /*_.INST__V65*/ meltfptr[64]), (1),
( /*_.NDATA__V23*/ meltfptr[22]),
"NUNTH_TUPLE");
;
@@ -8626,16 +21945,16 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NUNTH_INDEX",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V66*/
- meltfptr[65])) ==
+ ( /*_.INST__V65*/
+ meltfptr[64])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V66*/ meltfptr[65]), (2),
- ( /*_.MAKE_INTEGERBOX__V64*/
- meltfptr[63]), "NUNTH_INDEX");
+ melt_putfield_object (( /*_.INST__V65*/ meltfptr[64]), (2),
+ ( /*_.MAKE_INTEGERBOX__V63*/
+ meltfptr[62]), "NUNTH_INDEX");
;
- /*_.NCOMPEXP__V65*/ meltfptr[64] =
- /*_.INST__V66*/ meltfptr[65];;
- MELT_LOCATION ("warmelt-normatch.melt:5460:/ quasiblock");
+ /*_.NCOMPEXP__V64*/ meltfptr[63] =
+ /*_.INST__V65*/ meltfptr[64];;
+ MELT_LOCATION ("warmelt-normatch.melt:5577:/ quasiblock");
/*^rawallocobj */
@@ -8643,8 +21962,8 @@ lab_endgetargs:;
{
melt_ptr_t newobj = 0;
melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[14])), (3), "CLASS_NREP_SETQ");
- /*_.INST__V68*/ meltfptr[67] =
+ (melt_ptr_t) (( /*!CLASS_NREP_SETQ */ meltfrout->tabval[15])), (3), "CLASS_NREP_SETQ");
+ /*_.INST__V67*/ meltfptr[66] =
newobj;
};
;
@@ -8652,10 +21971,10 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NREP_LOC",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V68*/
- meltfptr[67])) ==
+ ( /*_.INST__V67*/
+ meltfptr[66])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V68*/ meltfptr[67]), (0),
+ melt_putfield_object (( /*_.INST__V67*/ meltfptr[66]), (0),
( /*_.NSLOC__V16*/ meltfptr[15]),
"NREP_LOC");
;
@@ -8663,28 +21982,28 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NSTQ_VAR",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V68*/
- meltfptr[67])) ==
+ ( /*_.INST__V67*/
+ meltfptr[66])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V68*/ meltfptr[67]), (1),
- ( /*_.NCOMPDATA__V63*/ meltfptr[62]),
+ melt_putfield_object (( /*_.INST__V67*/ meltfptr[66]), (1),
+ ( /*_.NCOMPDATA__V62*/ meltfptr[57]),
"NSTQ_VAR");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @NSTQ_EXP",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V68*/
- meltfptr[67])) ==
+ ( /*_.INST__V67*/
+ meltfptr[66])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V68*/ meltfptr[67]), (2),
- ( /*_.NCOMPEXP__V65*/ meltfptr[64]),
+ melt_putfield_object (( /*_.INST__V67*/ meltfptr[66]), (2),
+ ( /*_.NCOMPEXP__V64*/ meltfptr[63]),
"NSTQ_EXP");
;
- /*_.NSETF__V67*/ meltfptr[66] = /*_.INST__V68*/ meltfptr[67];;
+ /*_.NSETF__V66*/ meltfptr[65] = /*_.INST__V67*/ meltfptr[66];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -8699,7 +22018,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L18*/ meltfnum[0] =
+ /*_#MELT_NEED_DBG__L19*/ meltfnum[6] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -8707,46 +22026,46 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[0]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[6]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15] =
+ /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[16] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ apply");
/*apply */
{
union meltparam_un argtab[9];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15];
+ /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[16];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5465;
+ argtab[2].meltbp_long = 5582;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmultiple ncompdata=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NCOMPDATA__V63*/
- meltfptr[62];
+ (melt_ptr_t *) & /*_.NCOMPDATA__V62*/
+ meltfptr[57];
/*^apply.arg */
argtab[5].meltbp_cstring = "\n ncompexp=";
/*^apply.arg */
argtab[6].meltbp_aptr =
- (melt_ptr_t *) & /*_.NCOMPEXP__V65*/ meltfptr[64];
+ (melt_ptr_t *) & /*_.NCOMPEXP__V64*/ meltfptr[63];
/*^apply.arg */
argtab[7].meltbp_cstring = "\n nsetf=";
/*^apply.arg */
argtab[8].meltbp_aptr =
- (melt_ptr_t *) & /*_.NSETF__V67*/ meltfptr[66];
- /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] =
+ (melt_ptr_t *) & /*_.NSETF__V66*/ meltfptr[65];
+ /*_.MELT_DEBUG_FUN__V70*/ meltfptr[69] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[0])),
@@ -8759,170 +22078,1174 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V70*/ meltfptr[69] =
- /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
+ /*_.IF___V69*/ meltfptr[68] =
+ /*_.MELT_DEBUG_FUN__V70*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15] =
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[16] =
0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[69] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V70*/ meltfptr[69] = NULL;;
+ /*_.IF___V69*/ meltfptr[68] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ quasiblock");
- /*_.PROGN___V72*/ meltfptr[70] =
- /*_.IF___V70*/ meltfptr[69];;
+ /*_.PROGN___V71*/ meltfptr[69] =
+ /*_.IF___V69*/ meltfptr[68];;
/*^compute */
- /*_.IFCPP___V69*/ meltfptr[68] =
- /*_.PROGN___V72*/ meltfptr[70];;
+ /*_.IFCPP___V68*/ meltfptr[67] =
+ /*_.PROGN___V71*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5465:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5582:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.IF___V70*/ meltfptr[69] = 0;
+ /*clear *//*_.IF___V69*/ meltfptr[68] = 0;
/*^clear */
- /*clear *//*_.PROGN___V72*/ meltfptr[70] = 0;
+ /*clear *//*_.PROGN___V71*/ meltfptr[69] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V69*/ meltfptr[68] = ( /*nil */ NULL);
+ /*_.IFCPP___V68*/ meltfptr[67] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
- /*_.LET___V62*/ meltfptr[60] =
- /*_.IFCPP___V69*/ meltfptr[68];;
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5584:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NIFLIST__V38*/ meltfptr[37]),
+ (melt_ptr_t) ( /*_.NSETF__V66*/
+ meltfptr[65]));
+ }
+ ;
- MELT_LOCATION ("warmelt-normatch.melt:5453:/ clear");
- /*clear *//*_.NCOMPDATA__V63*/ meltfptr[62] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5570:/ clear");
+ /*clear *//*_.NCOMPDATA__V62*/ meltfptr[57] = 0;
/*^clear */
- /*clear *//*_.MAKE_INTEGERBOX__V64*/ meltfptr[63] = 0;
+ /*clear *//*_.MAKE_INTEGERBOX__V63*/ meltfptr[62] = 0;
/*^clear */
- /*clear *//*_.NCOMPEXP__V65*/ meltfptr[64] = 0;
+ /*clear *//*_.NCOMPEXP__V64*/ meltfptr[63] = 0;
/*^clear */
- /*clear *//*_.NSETF__V67*/ meltfptr[66] = 0;
+ /*clear *//*_.NSETF__V66*/ meltfptr[65] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V69*/ meltfptr[68] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5451:/ quasiblock");
-
+ /*clear *//*_.IFCPP___V68*/ meltfptr[67] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5568:/ quasiblock");
- /*_.PROGN___V73*/ meltfptr[69] =
- /*_.LET___V62*/ meltfptr[60];;
- /*^compute */
- /*_.IF___V59*/ meltfptr[55] = /*_.PROGN___V73*/ meltfptr[69];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5450:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5567:/ clear");
/*clear *//*_.IFCPP___V60*/ meltfptr[56] = 0;
- /*^clear */
- /*clear *//*_.LET___V62*/ meltfptr[60] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V73*/ meltfptr[69] = 0;
}
;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V59*/ meltfptr[55] = NULL;;
- }
+ } /*noelse */
;
- if ( /*_#CURIX__L14*/ meltfnum[6] < 0)
+ if ( /*_#CURIX__L15*/ meltfnum[7] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5446:/ clear");
- /*clear *//*_.CURMDATA__V54*/ meltfptr[50] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5563:/ clear");
+ /*clear *//*_.CURMDATA__V55*/ meltfptr[51] = 0;
/*^clear */
- /*clear *//*_#CURIX__L14*/ meltfnum[6] = 0;
+ /*clear *//*_#CURIX__L15*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V55*/ meltfptr[51] = 0;
- /*^clear */
- /*clear *//*_.IF___V59*/ meltfptr[55] = 0;
+ /*clear *//*_.IFCPP___V56*/ meltfptr[52] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- {
- MELT_LOCATION ("warmelt-normatch.melt:5469:/ locexp");
- melt_error_str ((melt_ptr_t) ( /*_.NSLOC__V16*/ meltfptr[15]),
- ("unimplemented NORMALIZE_STEP for TUPLE"),
- (melt_ptr_t) 0);
- }
- ;
-
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5470:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5587:/ cppif.then");
/*^block */
/*anyblock */
{
- /*^cond */
- /*cond */ if (( /*nil */ NULL)) /*then */
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L21*/ meltfnum[16] =
+ /*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-normatch.melt:5587:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[16]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V75*/ meltfptr[62] = ( /*nil */ NULL);;
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[6] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5587:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[6];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5587;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "normstep_mtestmultiple niflist=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NIFLIST__V38*/ meltfptr[37];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " nifistuple=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NIFISTUPLE__V40*/ meltfptr[39];
+ /*_.MELT_DEBUG_FUN__V74*/ meltfptr[57] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V73*/ meltfptr[69] =
+ /*_.MELT_DEBUG_FUN__V74*/ meltfptr[57];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5587:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[6] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V74*/ meltfptr[57] = 0;
+ }
+ ;
}
else
+ { /*^cond.else */
+
+ /*_.IF___V73*/ meltfptr[69] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5587:/ quasiblock");
+
+
+ /*_.PROGN___V75*/ meltfptr[62] = /*_.IF___V73*/ meltfptr[69];;
+ /*^compute */
+
+ /*_.IFCPP___V72*/ meltfptr[68] = /*_.PROGN___V75*/ meltfptr[62];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5587:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[16] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V73*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V75*/ meltfptr[62] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V72*/ meltfptr[68] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_#IS_OBJECT__L23*/ meltfnum[6] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V35*/ meltfptr[34])) ==
+ MELTOBMAG_OBJECT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5588:/ cond");
+ /*cond */ if ( /*_#IS_OBJECT__L23*/ meltfnum[6]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5589:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NIFLIST__V38*/ meltfptr[37]),
+ (melt_ptr_t) ( /*_.NJTHEN__V35*/
+ meltfptr[34]));
+ }
+ ;
+ /*clear *//*_.IFELSE___V76*/ meltfptr[63] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5588:/ cond.else");
+
+ /*^block */
+ /*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5470:/ cond.else");
+ /*_#IS_LIST__L24*/ meltfnum[16] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V35*/ meltfptr[34]))
+ == MELTOBMAG_LIST);;
+ MELT_LOCATION ("warmelt-normatch.melt:5590:/ cond");
+ /*cond */ if ( /*_#IS_LIST__L24*/ meltfnum[16]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5591:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NJTHEN__V35*/ meltfptr[34];
+ /*_.LIST_APPEND2LIST__V78*/ meltfptr[67] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_APPEND2LIST */ meltfrout->
+ tabval[16])),
+ (melt_ptr_t) ( /*_.NIFLIST__V38*/
+ meltfptr[37]),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IFELSE___V77*/ meltfptr[65] =
+ /*_.LIST_APPEND2LIST__V78*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5590:/ clear");
+ /*clear *//*_.LIST_APPEND2LIST__V78*/ meltfptr[67] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MULTIPLE__L25*/ meltfnum[24] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.NJTHEN__V35*/ meltfptr[34])) ==
+ MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-normatch.melt:5592:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L25*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit2__EACHTUP: */
+ long cit2__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.NJTHEN__V35*/
+ meltfptr[34]);
+ for ( /*_#JIX__L26*/ meltfnum[25] = 0;
+ ( /*_#JIX__L26*/ meltfnum[25] >= 0)
+ && ( /*_#JIX__L26*/ meltfnum[25] <
+ cit2__EACHTUP_ln);
+ /*_#JIX__L26*/ meltfnum[25]++)
+ {
+ /*_.CURJTHEN__V80*/ meltfptr[57] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.NJTHEN__V35*/
+ meltfptr[34]),
+ /*_#JIX__L26*/ meltfnum[25]);
+
+
+
+
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5596:/ locexp");
+ meltgc_append_list ((melt_ptr_t)
+ ( /*_.NIFLIST__V38*/
+ meltfptr[37]),
+ (melt_ptr_t) ( /*_.CURJTHEN__V80*/ meltfptr[57]));
+ }
+ ;
+ if ( /*_#JIX__L26*/ meltfnum[25] < 0)
+ break;
+ } /* end cit2__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5593:/ clear");
+ /*clear *//*_.CURJTHEN__V80*/ meltfptr[57] = 0;
+ /*^clear */
+ /*clear *//*_#JIX__L26*/ meltfnum[25] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5592:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5598:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L27*/ meltfnum[26] =
+ /*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-normatch.melt:5598:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27] =
+ meltcallcount;;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5598:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring =
+ "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5598;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "normstep_mtestmultiple unexpected njthen";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NJTHEN__V35*/
+ meltfptr[34];
+ /*_.MELT_DEBUG_FUN__V83*/ meltfptr[67] =
+ 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);
+ }
+ ;
+ /*_.IF___V82*/ meltfptr[62] =
+ /*_.MELT_DEBUG_FUN__V83*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5598:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L28*/
+ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V83*/ meltfptr[67]
+ = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V82*/ meltfptr[62] = NULL;;
+ }
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5598:/ quasiblock");
+
+
+ /*_.PROGN___V84*/ meltfptr[67] =
+ /*_.IF___V82*/ meltfptr[62];;
+ /*^compute */
+
+ /*_.IFCPP___V81*/ meltfptr[69] =
+ /*_.PROGN___V84*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5598:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V82*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V84*/ meltfptr[67] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V81*/ meltfptr[69] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5599:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V86*/ meltfptr[67] =
+ ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5599:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("normstep_mtestmultiple unexpected njthen"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5599) ? (5599) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V86*/ meltfptr[67] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V85*/ meltfptr[62] =
+ /*_.IFELSE___V86*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5599:/ clear");
+ /*clear *//*_.IFELSE___V86*/ meltfptr[67] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V85*/ meltfptr[62] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5597:/ quasiblock");
+
+
+ /*_.PROGN___V87*/ meltfptr[67] =
+ /*_.IFCPP___V85*/ meltfptr[62];;
+ /*^compute */
+
+ /*_.IFELSE___V79*/ meltfptr[56] =
+ /*_.PROGN___V87*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5592:/ clear");
+ /*clear *//*_.IFCPP___V81*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V85*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V87*/ meltfptr[67] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V77*/ meltfptr[65] =
+ /*_.IFELSE___V79*/ meltfptr[56];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5590:/ clear");
+ /*clear *//*_#IS_MULTIPLE__L25*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V79*/ meltfptr[56] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V76*/ meltfptr[63] = /*_.IFELSE___V77*/ meltfptr[65];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5588:/ clear");
+ /*clear *//*_#IS_LIST__L24*/ meltfnum[16] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V77*/ meltfptr[65] = 0;
+ }
+ ;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5600:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L29*/ meltfnum[27] =
+ /*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-normatch.melt:5600:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[27]) /*then */
+ {
+ /*^cond.then */
/*^block */
/*anyblock */
{
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[26] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5600:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[26];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5600;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "normstep_mtestmultiple updated niflist=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NIFLIST__V38*/ meltfptr[37];
+ /*_.MELT_DEBUG_FUN__V90*/ meltfptr[67] =
+ 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);
+ }
+ ;
+ /*_.IF___V89*/ meltfptr[62] =
+ /*_.MELT_DEBUG_FUN__V90*/ meltfptr[67];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5600:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V90*/ meltfptr[67] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V89*/ meltfptr[62] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5600:/ quasiblock");
+ /*_.PROGN___V91*/ meltfptr[56] = /*_.IF___V89*/ meltfptr[62];;
+ /*^compute */
+ /*_.IFCPP___V88*/ meltfptr[69] = /*_.PROGN___V91*/ meltfptr[56];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5600:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V89*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V91*/ meltfptr[56] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V88*/ meltfptr[69] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5601:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:5603:/ apply");
+ /*apply */
+ {
+ /*_.LIST_TO_MULTIPLE__V93*/ meltfptr[67] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[18])),
+ (melt_ptr_t) ( /*_.NIFLIST__V38*/ meltfptr[37]), (""),
+ (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5601:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_PROGN */
+ meltfrout->tabval[17])), (3),
+ "CLASS_NREP_PROGN");
+ /*_.INST__V95*/ meltfptr[56] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NREP_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V95*/ meltfptr[56])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V95*/ meltfptr[56]), (0),
+ ( /*_.NSLOC__V16*/ meltfptr[15]), "NREP_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NPROGN_SEQ",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V95*/ meltfptr[56])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V95*/ meltfptr[56]), (1),
+ ( /*_.LIST_TO_MULTIPLE__V93*/ meltfptr[67]),
+ "NPROGN_SEQ");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NPROGN_LAST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V95*/ meltfptr[56])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V95*/ meltfptr[56]), (2),
+ (( /*nil */ NULL)), "NPROGN_LAST");
+ ;
+ /*_.NTHENPROGN__V94*/ meltfptr[62] = /*_.INST__V95*/ meltfptr[56];;
+ /*^compute */
+
+ /*_#IS_OBJECT__L31*/ meltfnum[24] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V36*/ meltfptr[35])) ==
+ MELTOBMAG_OBJECT);;
+ MELT_LOCATION ("warmelt-normatch.melt:5608:/ cond");
+ /*cond */ if ( /*_#IS_OBJECT__L31*/ meltfnum[24]) /*then */
+ {
+ /*^cond.then */
+ /*_.NPELSE__V96*/ meltfptr[95] = /*_.NJELSE__V36*/ meltfptr[35];;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:5608:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_MULTIPLE__L32*/ meltfnum[16] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V36*/ meltfptr[35]))
+ == MELTOBMAG_MULTIPLE);;
+ MELT_LOCATION ("warmelt-normatch.melt:5610:/ cond");
+ /*cond */ if ( /*_#IS_MULTIPLE__L32*/ meltfnum[16]) /*then */
{
- /*^locexp */
- melt_assert_failed (("@$@unimplemented normstep_mtestmultiple"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (5470) ? (5470) : __LINE__, __FUNCTION__);
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:5611:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_NREP_PROGN */ meltfrout->tabval[17])), (3), "CLASS_NREP_PROGN");
+ /*_.INST__V99*/ meltfptr[98] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NREP_LOC",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V99*/
+ meltfptr[98])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V99*/ meltfptr[98]), (0),
+ ( /*_.NSLOC__V16*/ meltfptr[15]),
+ "NREP_LOC");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NPROGN_SEQ",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V99*/
+ meltfptr[98])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V99*/ meltfptr[98]), (1),
+ ( /*_.NJELSE__V36*/ meltfptr[35]),
+ "NPROGN_SEQ");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NPROGN_LAST",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V99*/
+ meltfptr[98])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V99*/ meltfptr[98]), (2),
+ (( /*nil */ NULL)), "NPROGN_LAST");
+ ;
+ /*_.INST___V98*/ meltfptr[97] = /*_.INST__V99*/ meltfptr[98];;
+ /*^compute */
+
+ /*_.IFELSE___V97*/ meltfptr[96] =
+ /*_.INST___V98*/ meltfptr[97];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5610:/ clear");
+ /*clear *//*_.INST___V98*/ meltfptr[97] = 0;
+ }
;
}
+ else
+ { /*^cond.else */
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5616:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L33*/ meltfnum[26] =
+ /*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-normatch.melt:5616:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[27] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5616:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[27];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5616;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "unexpected njelse";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NJELSE__V36*/ meltfptr[35];
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
+ 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);
+ }
+ ;
+ /*_.IF___V101*/ meltfptr[100] =
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5616:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[27] =
+ 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
+ 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V101*/ meltfptr[100] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5616:/ quasiblock");
+
+
+ /*_.PROGN___V103*/ meltfptr[101] =
+ /*_.IF___V101*/ meltfptr[100];;
+ /*^compute */
+
+ /*_.IFCPP___V100*/ meltfptr[97] =
+ /*_.PROGN___V103*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5616:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V101*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V103*/ meltfptr[101] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V100*/ meltfptr[97] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5617:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^cond */
+ /*cond */ if (( /*nil */ NULL)) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V105*/ meltfptr[101] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION
+ ("warmelt-normatch.melt:5617:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("normstep_mtestmultiple unexpected njelse"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5617) ? (5617) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V105*/ meltfptr[101] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V104*/ meltfptr[100] =
+ /*_.IFELSE___V105*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5617:/ clear");
+ /*clear *//*_.IFELSE___V105*/ meltfptr[101] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V104*/ meltfptr[100] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5615:/ quasiblock");
+
+
+ /*_.PROGN___V106*/ meltfptr[101] =
+ /*_.IFCPP___V104*/ meltfptr[100];;
+ /*^compute */
+
+ /*_.IFELSE___V97*/ meltfptr[96] =
+ /*_.PROGN___V106*/ meltfptr[101];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5610:/ clear");
+ /*clear *//*_.IFCPP___V100*/ meltfptr[97] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V104*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V106*/ meltfptr[101] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.NPELSE__V96*/ meltfptr[95] = /*_.IFELSE___V97*/ meltfptr[96];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5608:/ clear");
+ /*clear *//*_#IS_MULTIPLE__L32*/ meltfnum[16] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V97*/ meltfptr[96] = 0;
+ }
+ ;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:5619:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NIFISTUPLE__V40*/ meltfptr[39]),
+ (melt_ptr_t) (( /*!CLASS_NREP_IFCOMMON */ meltfrout->tabval[19])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_THEN",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.NIFISTUPLE__V40*/
+ meltfptr[39])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.NIFISTUPLE__V40*/ meltfptr[39]), (2),
+ ( /*_.NTHENPROGN__V94*/ meltfptr[62]),
+ "NIF_THEN");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @NIF_ELSE",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.NIFISTUPLE__V40*/
+ meltfptr[39])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.NIFISTUPLE__V40*/ meltfptr[39]), (3),
+ ( /*_.NPELSE__V96*/ meltfptr[95]),
+ "NIF_ELSE");
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.NIFISTUPLE__V40*/ meltfptr[39]);
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:5620:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L35*/ meltfnum[27] =
+ /*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-normatch.melt:5620:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[27]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[26] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:5620:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[26];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 5620;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "normstep_mtestmultiple final nifistuple=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NIFISTUPLE__V40*/ meltfptr[39];
+ /*_.MELT_DEBUG_FUN__V109*/ meltfptr[101] =
+ 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___V75*/ meltfptr[62] = 0;
+ /*_.IF___V108*/ meltfptr[100] =
+ /*_.MELT_DEBUG_FUN__V109*/ meltfptr[101];;
/*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:5620:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V109*/ meltfptr[101] = 0;
}
;
}
+ else
+ { /*^cond.else */
+
+ /*_.IF___V108*/ meltfptr[100] = NULL;;
+ }
;
+ MELT_LOCATION ("warmelt-normatch.melt:5620:/ quasiblock");
+
+
+ /*_.PROGN___V110*/ meltfptr[96] = /*_.IF___V108*/ meltfptr[100];;
/*^compute */
- /*_.IFCPP___V74*/ meltfptr[70] = /*_.IFELSE___V75*/ meltfptr[62];;
+ /*_.IFCPP___V107*/ meltfptr[97] = /*_.PROGN___V110*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5470:/ clear");
- /*clear *//*_.IFELSE___V75*/ meltfptr[62] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:5620:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V108*/ meltfptr[100] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V110*/ meltfptr[96] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V74*/ meltfptr[70] = ( /*nil */ NULL);
+ /*_.IFCPP___V107*/ meltfptr[97] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
+ MELT_LOCATION ("warmelt-normatch.melt:5621:/ quasiblock");
- /*_.LET___V28*/ meltfptr[24] = /*_.IFCPP___V74*/ meltfptr[70];;
- MELT_LOCATION ("warmelt-normatch.melt:5427:/ clear");
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFISTUPLE__V40*/ meltfptr[39];;
+ MELT_LOCATION ("warmelt-normatch.melt:5621:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V92*/ meltfptr[65] = /*_.RETURN___V111*/ meltfptr[101];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5601:/ clear");
+ /*clear *//*_.LIST_TO_MULTIPLE__V93*/ meltfptr[67] = 0;
+ /*^clear */
+ /*clear *//*_.NTHENPROGN__V94*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_#IS_OBJECT__L31*/ meltfnum[24] = 0;
+ /*^clear */
+ /*clear *//*_.NPELSE__V96*/ meltfptr[95] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V107*/ meltfptr[97] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V111*/ meltfptr[101] = 0;
+ /*_.LET___V28*/ meltfptr[24] = /*_.LET___V92*/ meltfptr[65];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:5537:/ clear");
/*clear *//*_.NTHEN__V29*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.NELSE__V30*/ meltfptr[29] = 0;
@@ -8939,22 +23262,32 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.NIFLIST__V38*/ meltfptr[37] = 0;
/*^clear */
- /*clear *//*_.NIFISTUPLE__V39*/ meltfptr[38] = 0;
+ /*clear *//*_.NBCOMPVAL__V39*/ meltfptr[38] = 0;
+ /*^clear */
+ /*clear *//*_.NIFISTUPLE__V40*/ meltfptr[39] = 0;
+ /*^clear */
+ /*clear *//*_.ENV__V42*/ meltfptr[41] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V43*/ meltfptr[42] = 0;
/*^clear */
- /*clear *//*_.ENV__V41*/ meltfptr[40] = 0;
+ /*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V49*/ meltfptr[44] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V42*/ meltfptr[41] = 0;
+ /*clear *//*_.IFCPP___V51*/ meltfptr[49] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V46*/ meltfptr[42] = 0;
+ /*clear *//*_.IFCPP___V72*/ meltfptr[68] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V48*/ meltfptr[43] = 0;
+ /*clear *//*_#IS_OBJECT__L23*/ meltfnum[6] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V50*/ meltfptr[48] = 0;
+ /*clear *//*_.IFELSE___V76*/ meltfptr[63] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V74*/ meltfptr[70] = 0;
+ /*clear *//*_.IFCPP___V88*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V92*/ meltfptr[65] = 0;
/*_.LET___V14*/ meltfptr[5] = /*_.LET___V28*/ meltfptr[24];;
- MELT_LOCATION ("warmelt-normatch.melt:5415:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5524:/ clear");
/*clear *//*_.LOCA_LOCATION__V15*/ meltfptr[14] = 0;
/*^clear */
/*clear *//*_.NSLOC__V16*/ meltfptr[15] = 0;
@@ -8973,16 +23306,18 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.MATCOMP__V22*/ meltfptr[21] = 0;
/*^clear */
+ /*clear *//*_#NBCOMP__L6*/ meltfnum[0] = 0;
+ /*^clear */
/*clear *//*_.NDATA__V23*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.IFCPP___V24*/ meltfptr[23] = 0;
/*^clear */
/*clear *//*_.LET___V28*/ meltfptr[24] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[5];;
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -9007,14 +23342,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE */
+} /*end meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -9035,7 +23370,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR_st
+ struct frame_meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -9074,7 +23409,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -9106,7 +23441,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9129,7 +23464,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9139,7 +23474,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9149,7 +23484,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5479;
+ argtab[2].meltbp_long = 5630;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar step";
/*^apply.arg */
@@ -9168,7 +23503,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -9181,7 +23516,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -9190,7 +23525,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5479:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5630:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -9205,7 +23540,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5480:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5631:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9213,7 +23548,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_VARIABLE */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5480:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5631:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9221,7 +23556,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5480:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5631:/ cond.else");
/*^block */
/*anyblock */
@@ -9235,7 +23570,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5480) ? (5480) : __LINE__, __FUNCTION__);
+ (5631) ? (5631) : __LINE__, __FUNCTION__);
;
}
;
@@ -9250,7 +23585,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5480:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5631:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -9263,7 +23598,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5481:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5632:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9271,7 +23606,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5481:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5632:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9279,7 +23614,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5481:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5632:/ cond.else");
/*^block */
/*anyblock */
@@ -9293,7 +23628,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5481) ? (5481) : __LINE__, __FUNCTION__);
+ (5632) ? (5632) : __LINE__, __FUNCTION__);
;
}
;
@@ -9308,7 +23643,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5481:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5632:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -9319,7 +23654,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5482:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5633:/ quasiblock");
/*^getslot */
@@ -9339,12 +23674,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5482:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5633:/ cond.else");
/*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5483:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5634:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
@@ -9352,7 +23687,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5484:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5635:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -9360,7 +23695,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5485:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5636:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -9368,7 +23703,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5486:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5637:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -9376,7 +23711,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5487:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5638:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTEPTESTVAR_DATA");
@@ -9386,7 +23721,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9409,7 +23744,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9419,7 +23754,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9429,7 +23764,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5489;
+ argtab[2].meltbp_long = 5640;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar matthen";
/*^apply.arg */
@@ -9449,7 +23784,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -9462,7 +23797,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];;
@@ -9471,7 +23806,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5489:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5640:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[21] = 0;
@@ -9486,7 +23821,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9509,7 +23844,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9519,7 +23854,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9529,7 +23864,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5490;
+ argtab[2].meltbp_long = 5641;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar matelse";
/*^apply.arg */
@@ -9549,7 +23884,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
@@ -9562,7 +23897,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[22];;
@@ -9571,7 +23906,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5490:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5641:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[22] = 0;
@@ -9586,7 +23921,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9609,7 +23944,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -9619,7 +23954,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9630,7 +23965,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5491;
+ argtab[2].meltbp_long = 5642;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar matdata";
/*^apply.arg */
@@ -9650,7 +23985,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0;
@@ -9663,7 +23998,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[26];;
@@ -9672,7 +24007,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[22] = /*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5491:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5642:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[26] = 0;
@@ -9687,7 +24022,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -9710,7 +24045,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -9720,7 +24055,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -9731,7 +24066,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5492;
+ argtab[2].meltbp_long = 5643;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar matestdata";
/*^apply.arg */
@@ -9751,7 +24086,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -9764,7 +24099,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[30];;
@@ -9773,7 +24108,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[26] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5492:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5643:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[30] = 0;
@@ -9786,10 +24121,10 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5493:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5644:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5494:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5645:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9804,7 +24139,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5495:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5646:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9819,7 +24154,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5496:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5647:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 9, "MATNORX_MATCHCTXT");
@@ -9827,7 +24162,7 @@ lab_endgetargs:;
meltfptr[39] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5497:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5648:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9842,7 +24177,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5498:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5649:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -9857,7 +24192,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5499:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5650:/ quasiblock");
/*^rawallocobj */
@@ -9882,7 +24217,7 @@ lab_endgetargs:;
( /*_.NTHEN__V38*/ meltfptr[34]), "NMJMP_LABEL");
;
/*_.JUMPTHEN__V43*/ meltfptr[42] = /*_.INST__V44*/ meltfptr[43];;
- MELT_LOCATION ("warmelt-normatch.melt:5501:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5652:/ quasiblock");
/*^rawallocobj */
@@ -9907,7 +24242,7 @@ lab_endgetargs:;
( /*_.NELSE__V39*/ meltfptr[38]), "NMJMP_LABEL");
;
/*_.JUMPELSE__V45*/ meltfptr[44] = /*_.INST__V46*/ meltfptr[45];;
- MELT_LOCATION ("warmelt-normatch.melt:5503:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5654:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9925,7 +24260,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5504:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5655:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -9943,7 +24278,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5505:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5656:/ quasiblock");
/*^rawallocobj */
@@ -10006,7 +24341,7 @@ lab_endgetargs:;
/*_.NTESTSAME__V49*/ meltfptr[48] = /*_.INST__V50*/ meltfptr[49];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10029,7 +24364,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10039,7 +24374,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10050,7 +24385,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5512;
+ argtab[2].meltbp_long = 5663;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar nthen";
/*^apply.arg */
@@ -10070,7 +24405,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0;
@@ -10083,7 +24418,7 @@ lab_endgetargs:;
/*_.IF___V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ quasiblock");
/*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];;
@@ -10092,7 +24427,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5512:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5663:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V52*/ meltfptr[51] = 0;
@@ -10107,7 +24442,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10130,7 +24465,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10140,7 +24475,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10151,7 +24486,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5513;
+ argtab[2].meltbp_long = 5664;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar nelse";
/*^apply.arg */
@@ -10171,7 +24506,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0;
@@ -10184,7 +24519,7 @@ lab_endgetargs:;
/*_.IF___V56*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[52];;
@@ -10193,7 +24528,7 @@ lab_endgetargs:;
/*_.IFCPP___V55*/ meltfptr[51] = /*_.PROGN___V58*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5513:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5664:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V56*/ meltfptr[52] = 0;
@@ -10208,7 +24543,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10231,7 +24566,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10241,7 +24576,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10252,7 +24587,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5514;
+ argtab[2].meltbp_long = 5665;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar ndata";
/*^apply.arg */
@@ -10272,7 +24607,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[60] = 0;
@@ -10285,7 +24620,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] = /*_.IF___V60*/ meltfptr[56];;
@@ -10294,7 +24629,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[52] = /*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5514:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5665:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[56] = 0;
@@ -10309,7 +24644,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10332,7 +24667,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10342,7 +24677,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10353,7 +24688,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5515;
+ argtab[2].meltbp_long = 5666;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar ntestdata";
/*^apply.arg */
@@ -10373,7 +24708,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V65*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] = 0;
@@ -10386,7 +24721,7 @@ lab_endgetargs:;
/*_.IF___V64*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[64] = /*_.IF___V64*/ meltfptr[60];;
@@ -10395,7 +24730,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[56] = /*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5515:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5666:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[60] = 0;
@@ -10410,7 +24745,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10433,7 +24768,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10443,7 +24778,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10454,7 +24789,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5516;
+ argtab[2].meltbp_long = 5667;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar step";
/*^apply.arg */
@@ -10474,7 +24809,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V69*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V69*/ meltfptr[68] = 0;
@@ -10487,7 +24822,7 @@ lab_endgetargs:;
/*_.IF___V68*/ meltfptr[64] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ quasiblock");
/*_.PROGN___V70*/ meltfptr[68] = /*_.IF___V68*/ meltfptr[64];;
@@ -10496,7 +24831,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[60] = /*_.PROGN___V70*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5516:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5667:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V68*/ meltfptr[64] = 0;
@@ -10511,7 +24846,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10534,7 +24869,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10544,7 +24879,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10555,7 +24890,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5517;
+ argtab[2].meltbp_long = 5668;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar ntestsame";
/*^apply.arg */
@@ -10575,7 +24910,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0;
@@ -10588,7 +24923,7 @@ lab_endgetargs:;
/*_.IF___V72*/ meltfptr[68] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[68];;
@@ -10597,7 +24932,7 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[64] = /*_.PROGN___V74*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5517:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5668:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V72*/ meltfptr[68] = 0;
@@ -10612,7 +24947,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10635,7 +24970,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10645,7 +24980,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10656,7 +24991,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5519;
+ argtab[2].meltbp_long = 5670;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar njthen";
/*^apply.arg */
@@ -10676,7 +25011,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V77*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V77*/ meltfptr[76] = 0;
@@ -10689,7 +25024,7 @@ lab_endgetargs:;
/*_.IF___V76*/ meltfptr[72] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ quasiblock");
/*_.PROGN___V78*/ meltfptr[76] = /*_.IF___V76*/ meltfptr[72];;
@@ -10698,7 +25033,7 @@ lab_endgetargs:;
/*_.IFCPP___V75*/ meltfptr[68] = /*_.PROGN___V78*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5519:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5670:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V76*/ meltfptr[72] = 0;
@@ -10716,7 +25051,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L27*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V47*/ meltfptr[46])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5520:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5671:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L27*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -10724,7 +25059,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5521:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5672:/ quasiblock");
/*^putslot */
@@ -10750,7 +25085,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5520:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5671:/ cond.else");
/*^block */
/*anyblock */
@@ -10759,7 +25094,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L28*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJTHEN__V47*/ meltfptr[46]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5522:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5673:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L28*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -10767,7 +25102,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5524:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5675:/ quasiblock");
/*^rawallocobj */
@@ -10813,7 +25148,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NPROGN_LAST");
;
/*_.INST___V81*/ meltfptr[80] = /*_.INST__V82*/ meltfptr[81];;
- MELT_LOCATION ("warmelt-normatch.melt:5523:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5674:/ quasiblock");
/*^putslot */
@@ -10835,7 +25170,7 @@ lab_endgetargs:;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5522:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5673:/ clear");
/*clear *//*_.INST___V81*/ meltfptr[80] = 0;
}
;
@@ -10849,7 +25184,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10872,7 +25207,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -10882,7 +25217,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -10893,7 +25228,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5530;
+ argtab[2].meltbp_long = 5681;
/*^apply.arg */
argtab[3].meltbp_cstring = "unexpected njelse";
/*^apply.arg */
@@ -10914,7 +25249,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V85*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] =
0;
/*^clear */
@@ -10928,7 +25263,7 @@ lab_endgetargs:;
/*_.IF___V84*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ quasiblock");
/*_.PROGN___V86*/ meltfptr[84] =
@@ -10939,7 +25274,7 @@ lab_endgetargs:;
/*_.PROGN___V86*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5530:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5681:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V84*/ meltfptr[83] = 0;
@@ -10954,7 +25289,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5531:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5682:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -10968,7 +25303,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5531:/ cond.else");
+ ("warmelt-normatch.melt:5682:/ cond.else");
/*^block */
/*anyblock */
@@ -10979,7 +25314,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normstep_mtestvar unexpected njthen"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5531) ? (5531) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normstep_mtestvar unexpected njthen"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5682) ? (5682) : __LINE__, __FUNCTION__);
;
}
;
@@ -10995,7 +25330,7 @@ lab_endgetargs:;
/*_.IFELSE___V88*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5531:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5682:/ clear");
/*clear *//*_.IFELSE___V88*/ meltfptr[84] = 0;
}
@@ -11004,7 +25339,7 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[83] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5529:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5680:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[84] =
@@ -11015,7 +25350,7 @@ lab_endgetargs:;
/*_.PROGN___V89*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5522:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5673:/ clear");
/*clear *//*_.IFCPP___V83*/ meltfptr[80] = 0;
/*^clear */
/*clear *//*_.IFCPP___V87*/ meltfptr[83] = 0;
@@ -11028,7 +25363,7 @@ lab_endgetargs:;
/*_.IFELSE___V79*/ meltfptr[72] = /*_.IFELSE___V80*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5520:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5671:/ clear");
/*clear *//*_#IS_MULTIPLE__L28*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V80*/ meltfptr[76] = 0;
@@ -11038,7 +25373,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11061,7 +25396,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -11071,7 +25406,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11082,7 +25417,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5534;
+ argtab[2].meltbp_long = 5685;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar njelse";
/*^apply.arg */
@@ -11102,7 +25437,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V92*/ meltfptr[84] = 0;
@@ -11115,7 +25450,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[76] = /*_.IF___V91*/ meltfptr[83];;
@@ -11124,7 +25459,7 @@ lab_endgetargs:;
/*_.IFCPP___V90*/ meltfptr[80] = /*_.PROGN___V93*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5534:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5685:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[83] = 0;
@@ -11142,7 +25477,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L33*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V48*/ meltfptr[47])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5535:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5686:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L33*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11150,7 +25485,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5536:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5687:/ quasiblock");
/*^putslot */
@@ -11176,7 +25511,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5535:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5686:/ cond.else");
/*^block */
/*anyblock */
@@ -11185,7 +25520,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L34*/ meltfnum[28] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NJELSE__V48*/ meltfptr[47]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5537:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5688:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L34*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -11193,7 +25528,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5539:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5690:/ quasiblock");
/*^rawallocobj */
@@ -11239,7 +25574,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NPROGN_LAST");
;
/*_.INST___V96*/ meltfptr[76] = /*_.INST__V97*/ meltfptr[96];;
- MELT_LOCATION ("warmelt-normatch.melt:5538:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5689:/ quasiblock");
/*^putslot */
@@ -11261,7 +25596,7 @@ lab_endgetargs:;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5537:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5688:/ clear");
/*clear *//*_.INST___V96*/ meltfptr[76] = 0;
}
;
@@ -11275,7 +25610,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11298,7 +25633,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -11308,7 +25643,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11319,7 +25654,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5545;
+ argtab[2].meltbp_long = 5696;
/*^apply.arg */
argtab[3].meltbp_cstring = "unexpected njelse";
/*^apply.arg */
@@ -11340,7 +25675,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35] =
0;
/*^clear */
@@ -11354,7 +25689,7 @@ lab_endgetargs:;
/*_.IF___V99*/ meltfptr[98] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] =
@@ -11365,7 +25700,7 @@ lab_endgetargs:;
/*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5545:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5696:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[98] = 0;
@@ -11380,7 +25715,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5546:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5697:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11394,7 +25729,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5546:/ cond.else");
+ ("warmelt-normatch.melt:5697:/ cond.else");
/*^block */
/*anyblock */
@@ -11405,7 +25740,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normstep_mtestvar unexpected njelse"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5546) ? (5546) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normstep_mtestvar unexpected njelse"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5697) ? (5697) : __LINE__, __FUNCTION__);
;
}
;
@@ -11421,7 +25756,7 @@ lab_endgetargs:;
/*_.IFELSE___V103*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5546:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5697:/ clear");
/*clear *//*_.IFELSE___V103*/ meltfptr[99] = 0;
}
@@ -11430,7 +25765,7 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[98] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5544:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5695:/ quasiblock");
/*_.PROGN___V104*/ meltfptr[99] =
@@ -11441,7 +25776,7 @@ lab_endgetargs:;
/*_.PROGN___V104*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5537:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5688:/ clear");
/*clear *//*_.IFCPP___V98*/ meltfptr[76] = 0;
/*^clear */
/*clear *//*_.IFCPP___V102*/ meltfptr[98] = 0;
@@ -11454,7 +25789,7 @@ lab_endgetargs:;
/*_.IFELSE___V94*/ meltfptr[84] = /*_.IFELSE___V95*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5535:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5686:/ clear");
/*clear *//*_#IS_MULTIPLE__L34*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IFELSE___V95*/ meltfptr[83] = 0;
@@ -11464,7 +25799,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11487,7 +25822,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -11497,7 +25832,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -11508,7 +25843,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5549;
+ argtab[2].meltbp_long = 5700;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestvar final ntestsame";
/*^apply.arg */
@@ -11528,7 +25863,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V107*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V107*/ meltfptr[99] = 0;
@@ -11541,7 +25876,7 @@ lab_endgetargs:;
/*_.IF___V106*/ meltfptr[98] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ quasiblock");
/*_.PROGN___V108*/ meltfptr[83] = /*_.IF___V106*/ meltfptr[98];;
@@ -11550,7 +25885,7 @@ lab_endgetargs:;
/*_.IFCPP___V105*/ meltfptr[76] = /*_.PROGN___V108*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5549:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5700:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.IF___V106*/ meltfptr[98] = 0;
@@ -11563,16 +25898,16 @@ lab_endgetargs:;
/*_.IFCPP___V105*/ meltfptr[76] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5550:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5701:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NTESTSAME__V49*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:5550:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5701:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V37*/ meltfptr[30] = /*_.RETURN___V109*/ meltfptr[99];;
- MELT_LOCATION ("warmelt-normatch.melt:5493:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5644:/ clear");
/*clear *//*_.NTHEN__V38*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.NELSE__V39*/ meltfptr[38] = 0;
@@ -11622,7 +25957,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V109*/ meltfptr[99] = 0;
/*_.LET___V13*/ meltfptr[11] = /*_.LET___V37*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-normatch.melt:5482:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5633:/ clear");
/*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
@@ -11646,11 +25981,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V33*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.LET___V37*/ meltfptr[30] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -11675,14 +26010,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR */
+} /*end meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -11703,7 +26038,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_107_warmelt_normatch_NORMSTEP_MGROUP_st
+ struct frame_meltrout_115_warmelt_normatch_NORMSTEP_MGROUP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -11742,7 +26077,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -11774,7 +26109,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11797,7 +26132,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11807,7 +26142,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ apply");
/*apply */
{
union meltparam_un argtab[9];
@@ -11817,7 +26152,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5556;
+ argtab[2].meltbp_long = 5707;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup step=";
/*^apply.arg */
@@ -11849,7 +26184,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -11862,7 +26197,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -11871,7 +26206,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5556:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5707:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -11886,7 +26221,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5559:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5710:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11895,7 +26230,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_GROUP */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5559:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5710:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -11903,7 +26238,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5559:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5710:/ cond.else");
/*^block */
/*anyblock */
@@ -11917,7 +26252,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5559) ? (5559) : __LINE__, __FUNCTION__);
+ (5710) ? (5710) : __LINE__, __FUNCTION__);
;
}
;
@@ -11932,7 +26267,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5559:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5710:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -11945,7 +26280,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5560:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5711:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -11953,7 +26288,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5560:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5711:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -11961,7 +26296,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5560:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5711:/ cond.else");
/*^block */
/*anyblock */
@@ -11975,7 +26310,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5560) ? (5560) : __LINE__, __FUNCTION__);
+ (5711) ? (5711) : __LINE__, __FUNCTION__);
;
}
;
@@ -11990,7 +26325,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5560:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5711:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -12001,7 +26336,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5561:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5712:/ quasiblock");
/*^getslot */
@@ -12012,7 +26347,7 @@ lab_endgetargs:;
meltfptr[13] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5562:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5713:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -12020,7 +26355,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5563:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5714:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -12028,7 +26363,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5564:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5715:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -12036,7 +26371,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5565:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5716:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
@@ -12044,7 +26379,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5566:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5717:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTGROUP_START");
@@ -12052,7 +26387,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5567:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5718:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 7, "MSTGROUP_THEN");
@@ -12060,7 +26395,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5568:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5719:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 8, "MSTGROUP_ELSE");
@@ -12068,7 +26403,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5569:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5720:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12083,7 +26418,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5570:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5721:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12098,7 +26433,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5571:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5722:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12113,7 +26448,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5572:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5723:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12131,7 +26466,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L5*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.MGRTHEN__V20*/ meltfptr[19])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5575:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5726:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -12139,7 +26474,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5576:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5727:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12160,7 +26495,7 @@ lab_endgetargs:;
/*_.ALTMATCH_NORMALIZE_STEP__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5575:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5726:/ clear");
/*clear *//*_.ALTMATCH_NORMALIZE_STEP__V27*/ meltfptr[26] = 0;
}
;
@@ -12176,7 +26511,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.MGRTHEN__V20*/ meltfptr[19])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:5577:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5728:/ cond");
/*cond */ if ( /*_#IS_LIST__L6*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12184,7 +26519,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ quasiblock");
/*^newclosure */
@@ -12213,7 +26548,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V29*/ meltfptr[28] =
/*_.LAMBDA___V30*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12234,7 +26569,7 @@ lab_endgetargs:;
/*_.LIST_MAP__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5577:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5728:/ clear");
/*clear *//*_.LAMBDA___V29*/ meltfptr[28] = 0;
/*^clear */
/*clear *//*_.LIST_MAP__V31*/ meltfptr[30] = 0;
@@ -12252,7 +26587,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.MGRTHEN__V20*/ meltfptr[19])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5580:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5731:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L7*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -12261,7 +26596,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5581:/ quasiblock");
+ ("warmelt-normatch.melt:5732:/ quasiblock");
/*^newclosure */
@@ -12290,7 +26625,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V33*/ meltfptr[30] =
/*_.LAMBDA___V34*/ meltfptr[33];;
- MELT_LOCATION ("warmelt-normatch.melt:5581:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5732:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12312,7 +26647,7 @@ lab_endgetargs:;
/*_.MULTIPLE_MAP__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5580:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5731:/ clear");
/*clear *//*_.LAMBDA___V33*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.MULTIPLE_MAP__V35*/ meltfptr[34] = 0;
@@ -12328,7 +26663,7 @@ lab_endgetargs:;
/*_#NULL__L8*/ meltfnum[7] =
(( /*_.MGRTHEN__V20*/ meltfptr[19]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:5583:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5734:/ cond");
/*cond */ if ( /*_#NULL__L8*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -12337,7 +26672,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5583:/ cond.else");
+ ("warmelt-normatch.melt:5734:/ cond.else");
/*^block */
/*anyblock */
@@ -12346,7 +26681,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ cppif.then");
+ ("warmelt-normatch.melt:5737:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12371,7 +26706,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ cond");
+ ("warmelt-normatch.melt:5737:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -12382,7 +26717,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ apply");
+ ("warmelt-normatch.melt:5737:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12395,7 +26730,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5586;
+ argtab[2].meltbp_long = 5737;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mgroup bad mgrthen";
@@ -12423,7 +26758,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ clear");
+ ("warmelt-normatch.melt:5737:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/
meltfnum[9] = 0;
/*^clear */
@@ -12439,7 +26774,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ quasiblock");
+ ("warmelt-normatch.melt:5737:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] =
@@ -12451,7 +26786,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5586:/ clear");
+ ("warmelt-normatch.melt:5737:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[8] =
0;
/*^clear */
@@ -12468,7 +26803,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5587:/ cppif.then");
+ ("warmelt-normatch.melt:5738:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12483,7 +26818,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5587:/ cond.else");
+ ("warmelt-normatch.melt:5738:/ cond.else");
/*^block */
/*anyblock */
@@ -12499,7 +26834,7 @@ lab_endgetargs:;
?
("warmelt-normatch.melt")
: __FILE__,
- (5587) ? (5587) :
+ (5738) ? (5738) :
__LINE__,
__FUNCTION__);
;
@@ -12519,7 +26854,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5587:/ clear");
+ ("warmelt-normatch.melt:5738:/ clear");
/*clear *//*_.IFELSE___V42*/ meltfptr[38] = 0;
}
@@ -12529,7 +26864,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5585:/ quasiblock");
+ ("warmelt-normatch.melt:5736:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[38] =
@@ -12541,7 +26876,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5583:/ clear");
+ ("warmelt-normatch.melt:5734:/ clear");
/*clear *//*_.IFCPP___V37*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.IFCPP___V41*/ meltfptr[37] = 0;
@@ -12555,7 +26890,7 @@ lab_endgetargs:;
/*_.IFELSE___V36*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5580:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5731:/ clear");
/*clear *//*_#NULL__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[30] = 0;
@@ -12567,7 +26902,7 @@ lab_endgetargs:;
/*_.IFELSE___V32*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5577:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5728:/ clear");
/*clear *//*_#IS_MULTIPLE__L7*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V32*/ meltfptr[28] = 0;
@@ -12578,7 +26913,7 @@ lab_endgetargs:;
/*_.NTHENGR__V26*/ meltfptr[25] = /*_.IFELSE___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5575:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5726:/ clear");
/*clear *//*_#IS_LIST__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V28*/ meltfptr[26] = 0;
@@ -12589,7 +26924,7 @@ lab_endgetargs:;
/*_#IS_OBJECT__L11*/ meltfnum[9] =
(melt_magic_discr ((melt_ptr_t) ( /*_.MGRELSE__V21*/ meltfptr[20])) ==
MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-normatch.melt:5591:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5742:/ cond");
/*cond */ if ( /*_#IS_OBJECT__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -12597,7 +26932,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5592:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5743:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12618,7 +26953,7 @@ lab_endgetargs:;
/*_.ALTMATCH_NORMALIZE_STEP__V45*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5591:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5742:/ clear");
/*clear *//*_.ALTMATCH_NORMALIZE_STEP__V45*/ meltfptr[37] = 0;
}
;
@@ -12634,7 +26969,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.MGRELSE__V21*/ meltfptr[20])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:5593:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5744:/ cond");
/*cond */ if ( /*_#IS_LIST__L12*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -12642,7 +26977,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ quasiblock");
/*^newclosure */
@@ -12672,7 +27007,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V47*/ meltfptr[30] =
/*_.LAMBDA___V48*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12693,7 +27028,7 @@ lab_endgetargs:;
/*_.LIST_MAP__V49*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5593:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5744:/ clear");
/*clear *//*_.LAMBDA___V47*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.LIST_MAP__V49*/ meltfptr[26] = 0;
@@ -12711,7 +27046,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.MGRELSE__V21*/ meltfptr[20])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5596:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5747:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L13*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -12720,7 +27055,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5597:/ quasiblock");
+ ("warmelt-normatch.melt:5748:/ quasiblock");
/*^newclosure */
@@ -12749,7 +27084,7 @@ lab_endgetargs:;
;
/*_.LAMBDA___V51*/ meltfptr[30] =
/*_.LAMBDA___V52*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:5597:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5748:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -12771,7 +27106,7 @@ lab_endgetargs:;
/*_.MULTIPLE_MAP__V53*/ meltfptr[52];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5596:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5747:/ clear");
/*clear *//*_.LAMBDA___V51*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.MULTIPLE_MAP__V53*/ meltfptr[52] = 0;
@@ -12787,7 +27122,7 @@ lab_endgetargs:;
/*_#NULL__L14*/ meltfnum[6] =
(( /*_.MGRELSE__V21*/ meltfptr[20]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:5599:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5750:/ cond");
/*cond */ if ( /*_#NULL__L14*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -12796,7 +27131,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5599:/ cond.else");
+ ("warmelt-normatch.melt:5750:/ cond.else");
/*^block */
/*anyblock */
@@ -12805,7 +27140,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ cppif.then");
+ ("warmelt-normatch.melt:5753:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12830,7 +27165,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ cond");
+ ("warmelt-normatch.melt:5753:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -12842,7 +27177,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ apply");
+ ("warmelt-normatch.melt:5753:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -12855,7 +27190,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5602;
+ argtab[2].meltbp_long = 5753;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mgroup bad mgrelse";
@@ -12883,7 +27218,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ clear");
+ ("warmelt-normatch.melt:5753:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/
meltfnum[15] = 0;
/*^clear */
@@ -12899,7 +27234,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ quasiblock");
+ ("warmelt-normatch.melt:5753:/ quasiblock");
/*_.PROGN___V58*/ meltfptr[56] =
@@ -12911,7 +27246,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5602:/ clear");
+ ("warmelt-normatch.melt:5753:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] =
0;
/*^clear */
@@ -12928,7 +27263,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5603:/ cppif.then");
+ ("warmelt-normatch.melt:5754:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -12943,7 +27278,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5603:/ cond.else");
+ ("warmelt-normatch.melt:5754:/ cond.else");
/*^block */
/*anyblock */
@@ -12959,7 +27294,7 @@ lab_endgetargs:;
?
("warmelt-normatch.melt")
: __FILE__,
- (5603) ? (5603) :
+ (5754) ? (5754) :
__LINE__,
__FUNCTION__);
;
@@ -12979,7 +27314,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5603:/ clear");
+ ("warmelt-normatch.melt:5754:/ clear");
/*clear *//*_.IFELSE___V60*/ meltfptr[56] = 0;
}
@@ -12989,7 +27324,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5601:/ quasiblock");
+ ("warmelt-normatch.melt:5752:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[56] =
@@ -13001,7 +27336,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5599:/ clear");
+ ("warmelt-normatch.melt:5750:/ clear");
/*clear *//*_.IFCPP___V55*/ meltfptr[52] = 0;
/*^clear */
/*clear *//*_.IFCPP___V59*/ meltfptr[55] = 0;
@@ -13015,7 +27350,7 @@ lab_endgetargs:;
/*_.IFELSE___V54*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5596:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5747:/ clear");
/*clear *//*_#NULL__L14*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IFELSE___V54*/ meltfptr[30] = 0;
@@ -13027,7 +27362,7 @@ lab_endgetargs:;
/*_.IFELSE___V50*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5593:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5744:/ clear");
/*clear *//*_#IS_MULTIPLE__L13*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IFELSE___V50*/ meltfptr[37] = 0;
@@ -13038,7 +27373,7 @@ lab_endgetargs:;
/*_.NELSEGR__V44*/ meltfptr[34] = /*_.IFELSE___V46*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5591:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5742:/ clear");
/*clear *//*_#IS_LIST__L12*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IFELSE___V46*/ meltfptr[38] = 0;
@@ -13048,7 +27383,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13071,7 +27406,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -13081,7 +27416,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13092,7 +27427,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5606;
+ argtab[2].meltbp_long = 5757;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup ndata";
/*^apply.arg */
@@ -13112,7 +27447,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V64*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[56] = 0;
@@ -13125,7 +27460,7 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ quasiblock");
/*_.PROGN___V65*/ meltfptr[30] = /*_.IF___V63*/ meltfptr[55];;
@@ -13134,7 +27469,7 @@ lab_endgetargs:;
/*_.IFCPP___V62*/ meltfptr[52] = /*_.PROGN___V65*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5606:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5757:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V63*/ meltfptr[55] = 0;
@@ -13149,7 +27484,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13172,7 +27507,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -13182,7 +27517,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13193,7 +27528,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5607;
+ argtab[2].meltbp_long = 5758;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup matthen";
/*^apply.arg */
@@ -13213,7 +27548,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V68*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[56] = 0;
@@ -13226,7 +27561,7 @@ lab_endgetargs:;
/*_.IF___V67*/ meltfptr[38] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ quasiblock");
/*_.PROGN___V69*/ meltfptr[55] = /*_.IF___V67*/ meltfptr[38];;
@@ -13235,7 +27570,7 @@ lab_endgetargs:;
/*_.IFCPP___V66*/ meltfptr[37] = /*_.PROGN___V69*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5607:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5758:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[38] = 0;
@@ -13250,7 +27585,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13273,7 +27608,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -13283,7 +27618,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13294,7 +27629,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5608;
+ argtab[2].meltbp_long = 5759;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup matelse";
/*^apply.arg */
@@ -13314,7 +27649,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V72*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[38] = 0;
@@ -13327,7 +27662,7 @@ lab_endgetargs:;
/*_.IF___V71*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ quasiblock");
/*_.PROGN___V73*/ meltfptr[55] = /*_.IF___V71*/ meltfptr[56];;
@@ -13336,7 +27671,7 @@ lab_endgetargs:;
/*_.IFCPP___V70*/ meltfptr[30] = /*_.PROGN___V73*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5608:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5759:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V71*/ meltfptr[56] = 0;
@@ -13351,7 +27686,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13374,7 +27709,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -13384,7 +27719,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13395,7 +27730,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5609;
+ argtab[2].meltbp_long = 5760;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup nthen";
/*^apply.arg */
@@ -13415,7 +27750,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V76*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V76*/ meltfptr[55] = 0;
@@ -13428,7 +27763,7 @@ lab_endgetargs:;
/*_.IF___V75*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ quasiblock");
/*_.PROGN___V77*/ meltfptr[55] = /*_.IF___V75*/ meltfptr[56];;
@@ -13437,7 +27772,7 @@ lab_endgetargs:;
/*_.IFCPP___V74*/ meltfptr[38] = /*_.PROGN___V77*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5609:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5760:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V75*/ meltfptr[56] = 0;
@@ -13452,7 +27787,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13475,7 +27810,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -13485,7 +27820,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13496,7 +27831,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5610;
+ argtab[2].meltbp_long = 5761;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup nelse";
/*^apply.arg */
@@ -13516,7 +27851,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0;
@@ -13529,7 +27864,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[55];;
@@ -13538,7 +27873,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[56] = /*_.PROGN___V81*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5610:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5761:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[55] = 0;
@@ -13553,7 +27888,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13576,7 +27911,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -13586,7 +27921,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13597,7 +27932,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5611;
+ argtab[2].meltbp_long = 5762;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup mgrstart";
/*^apply.arg */
@@ -13617,7 +27952,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V84*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V84*/ meltfptr[83] = 0;
@@ -13630,7 +27965,7 @@ lab_endgetargs:;
/*_.IF___V83*/ meltfptr[79] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ quasiblock");
/*_.PROGN___V85*/ meltfptr[83] = /*_.IF___V83*/ meltfptr[79];;
@@ -13639,7 +27974,7 @@ lab_endgetargs:;
/*_.IFCPP___V82*/ meltfptr[55] = /*_.PROGN___V85*/ meltfptr[83];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5611:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5762:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V83*/ meltfptr[79] = 0;
@@ -13654,7 +27989,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13677,7 +28012,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -13687,7 +28022,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13698,7 +28033,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5612;
+ argtab[2].meltbp_long = 5763;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup nstartgr";
/*^apply.arg */
@@ -13718,7 +28053,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V88*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[87] = 0;
@@ -13731,7 +28066,7 @@ lab_endgetargs:;
/*_.IF___V87*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[87] = /*_.IF___V87*/ meltfptr[83];;
@@ -13740,7 +28075,7 @@ lab_endgetargs:;
/*_.IFCPP___V86*/ meltfptr[79] = /*_.PROGN___V89*/ meltfptr[87];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5612:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5763:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V87*/ meltfptr[83] = 0;
@@ -13755,7 +28090,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13778,7 +28113,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -13788,7 +28123,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13799,7 +28134,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5613;
+ argtab[2].meltbp_long = 5764;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup mgrthen";
/*^apply.arg */
@@ -13819,7 +28154,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V92*/ meltfptr[91] = 0;
@@ -13832,7 +28167,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[87] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[91] = /*_.IF___V91*/ meltfptr[87];;
@@ -13841,7 +28176,7 @@ lab_endgetargs:;
/*_.IFCPP___V90*/ meltfptr[83] = /*_.PROGN___V93*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5613:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5764:/ clear");
/*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[87] = 0;
@@ -13856,7 +28191,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13879,7 +28214,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[8]) /*then */
{
/*^cond.then */
@@ -13889,7 +28224,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L34*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -13900,7 +28235,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5614;
+ argtab[2].meltbp_long = 5765;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup nthengr";
/*^apply.arg */
@@ -13920,7 +28255,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V96*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V96*/ meltfptr[95] = 0;
@@ -13933,7 +28268,7 @@ lab_endgetargs:;
/*_.IF___V95*/ meltfptr[91] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ quasiblock");
/*_.PROGN___V97*/ meltfptr[95] = /*_.IF___V95*/ meltfptr[91];;
@@ -13942,7 +28277,7 @@ lab_endgetargs:;
/*_.IFCPP___V94*/ meltfptr[87] = /*_.PROGN___V97*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5614:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5765:/ clear");
/*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.IF___V95*/ meltfptr[91] = 0;
@@ -13957,7 +28292,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -13980,7 +28315,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -13990,7 +28325,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L36*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14001,7 +28336,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5615;
+ argtab[2].meltbp_long = 5766;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup mgrelse";
/*^apply.arg */
@@ -14021,7 +28356,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] = 0;
@@ -14034,7 +28369,7 @@ lab_endgetargs:;
/*_.IF___V99*/ meltfptr[95] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] = /*_.IF___V99*/ meltfptr[95];;
@@ -14043,7 +28378,7 @@ lab_endgetargs:;
/*_.IFCPP___V98*/ meltfptr[91] = /*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5615:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5766:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[95] = 0;
@@ -14058,7 +28393,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14081,7 +28416,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[6]) /*then */
{
/*^cond.then */
@@ -14091,7 +28426,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14102,7 +28437,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5616;
+ argtab[2].meltbp_long = 5767;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mgroup nelseg";
/*^apply.arg */
@@ -14122,7 +28457,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V104*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V104*/ meltfptr[103] = 0;
@@ -14135,7 +28470,7 @@ lab_endgetargs:;
/*_.IF___V103*/ meltfptr[99] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ quasiblock");
/*_.PROGN___V105*/ meltfptr[103] = /*_.IF___V103*/ meltfptr[99];;
@@ -14144,7 +28479,7 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[95] = /*_.PROGN___V105*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5616:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5767:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[6] = 0;
/*^clear */
/*clear *//*_.IF___V103*/ meltfptr[99] = 0;
@@ -14159,7 +28494,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5617:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5768:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14172,7 +28507,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5617:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5768:/ cond.else");
/*^block */
/*anyblock */
@@ -14186,7 +28521,7 @@ lab_endgetargs:;
melt_assert_failed (("$@$unimplemented normstep_mgroup"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5617) ? (5617) : __LINE__, __FUNCTION__);
+ (5768) ? (5768) : __LINE__, __FUNCTION__);
;
}
;
@@ -14201,7 +28536,7 @@ lab_endgetargs:;
/*_.IFCPP___V106*/ meltfptr[99] = /*_.IFELSE___V107*/ meltfptr[103];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5617:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5768:/ clear");
/*clear *//*_.IFELSE___V107*/ meltfptr[103] = 0;
}
@@ -14214,7 +28549,7 @@ lab_endgetargs:;
/*_.LET___V13*/ meltfptr[11] = /*_.IFCPP___V106*/ meltfptr[99];;
- MELT_LOCATION ("warmelt-normatch.melt:5561:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5712:/ clear");
/*clear *//*_.MATSLOC__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.MATTHEN__V15*/ meltfptr[14] = 0;
@@ -14270,11 +28605,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V102*/ meltfptr[95] = 0;
/*^clear */
/*clear *//*_.IFCPP___V106*/ meltfptr[99] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14299,14 +28634,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_107_warmelt_normatch_NORMSTEP_MGROUP */
+} /*end meltrout_115_warmelt_normatch_NORMSTEP_MGROUP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14327,7 +28662,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_108_warmelt_normatch_LAMBDA___24___st
+ struct frame_meltrout_116_warmelt_normatch_LAMBDA___24___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14366,7 +28701,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ getarg");
/*_.ELSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -14397,7 +28732,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14416,14 +28751,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_108_warmelt_normatch_LAMBDA___24__ */
+} /*end meltrout_116_warmelt_normatch_LAMBDA___24__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14444,7 +28779,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_109_warmelt_normatch_LAMBDA___25___st
+ struct frame_meltrout_117_warmelt_normatch_LAMBDA___25___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14483,7 +28818,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5581:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5732:/ getarg");
/*_.ELSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -14514,7 +28849,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5581:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5732:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14533,14 +28868,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_109_warmelt_normatch_LAMBDA___25__ */
+} /*end meltrout_117_warmelt_normatch_LAMBDA___25__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14561,7 +28896,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_110_warmelt_normatch_LAMBDA___26___st
+ struct frame_meltrout_118_warmelt_normatch_LAMBDA___26___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14600,7 +28935,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ getarg");
/*_.ELSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -14631,7 +28966,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14650,14 +28985,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_110_warmelt_normatch_LAMBDA___26__ */
+} /*end meltrout_118_warmelt_normatch_LAMBDA___26__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -14678,7 +29013,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_111_warmelt_normatch_LAMBDA___27___st
+ struct frame_meltrout_119_warmelt_normatch_LAMBDA___27___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14717,7 +29052,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5597:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5748:/ getarg");
/*_.ELSTEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -14748,7 +29083,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] =
/*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:5597:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5748:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -14767,14 +29102,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_111_warmelt_normatch_LAMBDA___27__ */
+} /*end meltrout_119_warmelt_normatch_LAMBDA___27__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -14799,7 +29134,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG_st
+ struct frame_meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -14838,7 +29173,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -14870,7 +29205,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14893,7 +29228,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -14903,7 +29238,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -14913,7 +29248,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5624;
+ argtab[2].meltbp_long = 5775;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag step";
/*^apply.arg */
@@ -14932,7 +29267,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -14945,7 +29280,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -14954,7 +29289,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5624:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5775:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -14969,7 +29304,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5625:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5776:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -14977,7 +29312,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5625:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5776:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -14985,7 +29320,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5625:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5776:/ cond.else");
/*^block */
/*anyblock */
@@ -14999,7 +29334,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5625) ? (5625) : __LINE__, __FUNCTION__);
+ (5776) ? (5776) : __LINE__, __FUNCTION__);
;
}
;
@@ -15014,7 +29349,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5625:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5776:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -15027,7 +29362,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5626:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5777:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15035,7 +29370,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5626:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5777:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15043,7 +29378,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5626:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5777:/ cond.else");
/*^block */
/*anyblock */
@@ -15057,7 +29392,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5626) ? (5626) : __LINE__, __FUNCTION__);
+ (5777) ? (5777) : __LINE__, __FUNCTION__);
;
}
;
@@ -15072,7 +29407,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5626:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5777:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -15083,7 +29418,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5627:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5778:/ quasiblock");
/*^getslot */
@@ -15103,12 +29438,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5627:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5778:/ cond.else");
/*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5628:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5779:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
@@ -15116,7 +29451,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5629:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5780:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -15124,7 +29459,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5630:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5781:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEPSUCCESS_VAROCC");
@@ -15132,8 +29467,13 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5631:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5782:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMCTXT__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -15151,7 +29491,7 @@ lab_endgetargs:;
/*_.NMATRESLOC__V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5632:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5783:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEPSUCCESS_BINDS");
@@ -15159,7 +29499,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5633:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5784:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTEPSUCCESS_BODY");
@@ -15169,7 +29509,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15192,7 +29532,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15202,7 +29542,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15212,7 +29552,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5635;
+ argtab[2].meltbp_long = 5786;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag mflag";
/*^apply.arg */
@@ -15232,7 +29572,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -15245,7 +29585,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
@@ -15254,7 +29594,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5635:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5786:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[22] = 0;
@@ -15269,7 +29609,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15292,7 +29632,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15302,7 +29642,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15312,7 +29652,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5636;
+ argtab[2].meltbp_long = 5787;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag matvarocc";
/*^apply.arg */
@@ -15332,7 +29672,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
@@ -15345,7 +29685,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[23];;
@@ -15354,7 +29694,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5636:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5787:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[23] = 0;
@@ -15369,7 +29709,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15392,7 +29732,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15402,7 +29742,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15413,7 +29753,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5637;
+ argtab[2].meltbp_long = 5788;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag mbinds";
/*^apply.arg */
@@ -15433,7 +29773,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -15446,7 +29786,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[27];;
@@ -15455,7 +29795,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[23] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5637:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5788:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[27] = 0;
@@ -15470,7 +29810,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15493,7 +29833,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15503,7 +29843,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15514,7 +29854,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5638;
+ argtab[2].meltbp_long = 5789;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag matbody";
/*^apply.arg */
@@ -15534,7 +29874,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -15547,7 +29887,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[31];;
@@ -15556,7 +29896,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[27] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5638:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5789:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[31] = 0;
@@ -15571,7 +29911,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15594,7 +29934,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -15604,7 +29944,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15615,7 +29955,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5639;
+ argtab[2].meltbp_long = 5790;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag mthen";
/*^apply.arg */
@@ -15635,7 +29975,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0;
@@ -15648,7 +29988,7 @@ lab_endgetargs:;
/*_.IF___V39*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ quasiblock");
/*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[35];;
@@ -15657,7 +29997,7 @@ lab_endgetargs:;
/*_.IFCPP___V38*/ meltfptr[31] = /*_.PROGN___V41*/ meltfptr[39];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5639:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5790:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V39*/ meltfptr[35] = 0;
@@ -15672,7 +30012,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15695,7 +30035,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -15705,7 +30045,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -15716,7 +30056,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5640;
+ argtab[2].meltbp_long = 5791;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag nmatresloc";
/*^apply.arg */
@@ -15736,7 +30076,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0;
@@ -15749,7 +30089,7 @@ lab_endgetargs:;
/*_.IF___V43*/ meltfptr[39] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ quasiblock");
/*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[39];;
@@ -15758,7 +30098,7 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[35] = /*_.PROGN___V45*/ meltfptr[43];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5640:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5791:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V43*/ meltfptr[39] = 0;
@@ -15771,10 +30111,10 @@ lab_endgetargs:;
/*_.IFCPP___V42*/ meltfptr[35] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5641:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5792:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5642:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5793:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -15789,7 +30129,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5643:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5794:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -15804,7 +30144,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5644:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5795:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 9, "MATNORX_MATCHCTXT");
@@ -15812,7 +30152,7 @@ lab_endgetargs:;
meltfptr[48] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5645:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5796:/ quasiblock");
/*^rawallocobj */
@@ -15837,7 +30177,7 @@ lab_endgetargs:;
( /*_.NTHEN__V47*/ meltfptr[43]), "NMJMP_LABEL");
;
/*_.JUMPTHEN__V50*/ meltfptr[49] = /*_.INST__V51*/ meltfptr[50];;
- MELT_LOCATION ("warmelt-normatch.melt:5647:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5798:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -15863,7 +30203,7 @@ lab_endgetargs:;
/*_.LASTMATBODY__V53*/ meltfptr[52] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.MATBODY__V21*/ meltfptr[20]), (-1)));;
- MELT_LOCATION ("warmelt-normatch.melt:5650:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5801:/ quasiblock");
/*^rawallocobj */
@@ -15935,7 +30275,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5662:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5813:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEWMATBODY__V56*/ meltfptr[55]),
( /*_#BIX__L19*/ meltfnum[18]),
@@ -15949,7 +30289,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5659:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5810:/ clear");
/*clear *//*_.CURMATBODY__V57*/ meltfptr[56] = 0;
/*^clear */
/*clear *//*_#BIX__L19*/ meltfnum[18] = 0;
@@ -15957,7 +30297,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5664:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5815:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEWMATBODY__V56*/ meltfptr[55]), (-2),
(melt_ptr_t) ( /*_.NSETQRES__V54*/
@@ -15966,7 +30306,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5665:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5816:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEWMATBODY__V56*/ meltfptr[55]), (-1),
(melt_ptr_t) ( /*_.NJTHEN__V52*/
@@ -15975,7 +30315,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -15998,7 +30338,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -16008,7 +30348,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16019,7 +30359,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5666;
+ argtab[2].meltbp_long = 5817;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag nthen";
/*^apply.arg */
@@ -16039,7 +30379,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
@@ -16052,7 +30392,7 @@ lab_endgetargs:;
/*_.IF___V59*/ meltfptr[58] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[58];;
@@ -16061,7 +30401,7 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[57] = /*_.PROGN___V61*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5666:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5817:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V59*/ meltfptr[58] = 0;
@@ -16076,7 +30416,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16099,7 +30439,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -16109,7 +30449,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16120,7 +30460,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5667;
+ argtab[2].meltbp_long = 5818;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag njthen";
/*^apply.arg */
@@ -16140,7 +30480,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
@@ -16153,7 +30493,7 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ quasiblock");
/*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[59];;
@@ -16162,7 +30502,7 @@ lab_endgetargs:;
/*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5667:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5818:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V63*/ meltfptr[59] = 0;
@@ -16177,7 +30517,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16200,7 +30540,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -16210,7 +30550,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16221,7 +30561,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5668;
+ argtab[2].meltbp_long = 5819;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag nflag";
/*^apply.arg */
@@ -16241,7 +30581,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V68*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] = 0;
@@ -16254,7 +30594,7 @@ lab_endgetargs:;
/*_.IF___V67*/ meltfptr[63] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ quasiblock");
/*_.PROGN___V69*/ meltfptr[67] = /*_.IF___V67*/ meltfptr[63];;
@@ -16263,7 +30603,7 @@ lab_endgetargs:;
/*_.IFCPP___V66*/ meltfptr[59] = /*_.PROGN___V69*/ meltfptr[67];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5668:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5819:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[63] = 0;
@@ -16278,7 +30618,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16301,7 +30641,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[20]) /*then */
{
/*^cond.then */
@@ -16311,7 +30651,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L27*/ meltfnum[19] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16322,7 +30662,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5669;
+ argtab[2].meltbp_long = 5820;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_msuccwhenflag newmatbody";
/*^apply.arg */
@@ -16342,7 +30682,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V72*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V72*/ meltfptr[71] = 0;
@@ -16355,7 +30695,7 @@ lab_endgetargs:;
/*_.IF___V71*/ meltfptr[67] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ quasiblock");
/*_.PROGN___V73*/ meltfptr[71] = /*_.IF___V71*/ meltfptr[67];;
@@ -16364,7 +30704,7 @@ lab_endgetargs:;
/*_.IFCPP___V70*/ meltfptr[63] = /*_.PROGN___V73*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5669:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5820:/ clear");
/*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.IF___V71*/ meltfptr[67] = 0;
@@ -16377,10 +30717,10 @@ lab_endgetargs:;
/*_.IFCPP___V70*/ meltfptr[63] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5670:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5821:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5674:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5825:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -16397,7 +30737,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5671:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5822:/ quasiblock");
/*^rawallocobj */
@@ -16462,7 +30802,7 @@ lab_endgetargs:;
/*_.NIFSUCC__V76*/ meltfptr[75] = /*_.INST__V77*/ meltfptr[76];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16485,7 +30825,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[19]) /*then */
{
/*^cond.then */
@@ -16495,7 +30835,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[20] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16506,7 +30846,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5679;
+ argtab[2].meltbp_long = 5830;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_msuccwhenflag final nifsucc";
@@ -16527,7 +30867,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[20] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0;
@@ -16540,7 +30880,7 @@ lab_endgetargs:;
/*_.IF___V79*/ meltfptr[78] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ quasiblock");
/*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[78];;
@@ -16549,7 +30889,7 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[77] = /*_.PROGN___V81*/ meltfptr[79];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5679:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5830:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[19] = 0;
/*^clear */
/*clear *//*_.IF___V79*/ meltfptr[78] = 0;
@@ -16562,16 +30902,16 @@ lab_endgetargs:;
/*_.IFCPP___V78*/ meltfptr[77] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5680:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5831:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFSUCC__V76*/ meltfptr[75];;
- MELT_LOCATION ("warmelt-normatch.melt:5680:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5831:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V74*/ meltfptr[67] = /*_.RETURN___V82*/ meltfptr[78];;
- MELT_LOCATION ("warmelt-normatch.melt:5670:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5821:/ clear");
/*clear *//*_.WRAP_NORMAL_LETSEQ__V75*/ meltfptr[71] = 0;
/*^clear */
/*clear *//*_.NIFSUCC__V76*/ meltfptr[75] = 0;
@@ -16581,7 +30921,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V82*/ meltfptr[78] = 0;
/*_.LET___V46*/ meltfptr[39] = /*_.LET___V74*/ meltfptr[67];;
- MELT_LOCATION ("warmelt-normatch.melt:5641:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5792:/ clear");
/*clear *//*_.NTHEN__V47*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.NFLAG__V48*/ meltfptr[47] = 0;
@@ -16613,7 +30953,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V74*/ meltfptr[67] = 0;
/*_.LET___V13*/ meltfptr[11] = /*_.LET___V46*/ meltfptr[39];;
- MELT_LOCATION ("warmelt-normatch.melt:5627:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5778:/ clear");
/*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
@@ -16643,11 +30983,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V42*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.LET___V46*/ meltfptr[39] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -16672,14 +31012,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG */
+} /*end meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -16704,7 +31044,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL_st
+ struct frame_meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -16743,7 +31083,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -16805,7 +31145,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16828,7 +31168,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -16838,7 +31178,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16848,7 +31188,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5699;
+ argtab[2].meltbp_long = 5850;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_catchall recv";
/*^apply.arg */
@@ -16868,7 +31208,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -16881,7 +31221,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -16890,7 +31230,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[7] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5699:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5850:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -16905,7 +31245,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -16928,7 +31268,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -16938,7 +31278,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -16948,7 +31288,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5700;
+ argtab[2].meltbp_long = 5851;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_catchall nmctxt";
/*^apply.arg */
@@ -16968,7 +31308,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
@@ -16981,7 +31321,7 @@ lab_endgetargs:;
/*_.IF___V13*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[9];;
@@ -16990,7 +31330,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = /*_.PROGN___V15*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5700:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5851:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V13*/ meltfptr[9] = 0;
@@ -17005,7 +31345,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17028,7 +31368,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17038,7 +31378,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17048,7 +31388,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5701;
+ argtab[2].meltbp_long = 5852;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_catchall ndata";
/*^apply.arg */
@@ -17068,7 +31408,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0;
@@ -17081,7 +31421,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ quasiblock");
/*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[13];;
@@ -17090,7 +31430,7 @@ lab_endgetargs:;
/*_.IFCPP___V16*/ meltfptr[9] = /*_.PROGN___V19*/ meltfptr[17];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5701:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5852:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V17*/ meltfptr[13] = 0;
@@ -17105,7 +31445,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17128,7 +31468,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17138,7 +31478,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17148,7 +31488,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5702;
+ argtab[2].meltbp_long = 5853;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_catchall bindlist";
/*^apply.arg */
@@ -17168,7 +31508,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0;
@@ -17181,7 +31521,7 @@ lab_endgetargs:;
/*_.IF___V21*/ meltfptr[17] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ quasiblock");
/*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[17];;
@@ -17190,7 +31530,7 @@ lab_endgetargs:;
/*_.IFCPP___V20*/ meltfptr[13] = /*_.PROGN___V23*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5702:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5853:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V21*/ meltfptr[17] = 0;
@@ -17205,7 +31545,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17228,7 +31568,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17238,7 +31578,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17249,7 +31589,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5703;
+ argtab[2].meltbp_long = 5854;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_catchall njelse";
/*^apply.arg */
@@ -17269,7 +31609,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -17282,7 +31622,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[21] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[21];;
@@ -17291,7 +31631,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[17] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5703:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5854:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[21] = 0;
@@ -17304,13 +31644,19 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[17] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5704:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5855:/ quasiblock");
/*_.MYCLASS__V29*/ meltfptr[25] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5705:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V29*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5856:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V29*/ meltfptr[25]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17330,7 +31676,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5706:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5857:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V3*/ meltfptr[2]),
("unimplemented normalize_test_matcher for any "),
(melt_ptr_t) ( /*_.MYCLASSNAME__V30*/ meltfptr[29]));
@@ -17338,7 +31684,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5708:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5859:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17351,7 +31697,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5708:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5859:/ cond.else");
/*^block */
/*anyblock */
@@ -17362,7 +31708,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("catchallnormalize_test_matcher unimplemented for any receiver"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5708) ? (5708) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("catchallnormalize_test_matcher unimplemented for any receiver"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5859) ? (5859) : __LINE__, __FUNCTION__);
;
}
;
@@ -17377,7 +31723,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.IFELSE___V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5708:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5859:/ clear");
/*clear *//*_.IFELSE___V32*/ meltfptr[31] = 0;
}
@@ -17390,17 +31736,17 @@ lab_endgetargs:;
/*_.LET___V28*/ meltfptr[21] = /*_.IFCPP___V31*/ meltfptr[30];;
- MELT_LOCATION ("warmelt-normatch.melt:5704:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5855:/ clear");
/*clear *//*_.MYCLASS__V29*/ meltfptr[25] = 0;
/*^clear */
/*clear *//*_.MYCLASSNAME__V30*/ meltfptr[29] = 0;
/*^clear */
/*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V28*/ meltfptr[21];;
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -17429,14 +31775,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL */
+} /*end meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -17461,7 +31807,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL_st
+ struct frame_meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -17500,7 +31846,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -17582,7 +31928,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17605,7 +31951,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -17615,7 +31961,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17625,7 +31971,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5713;
+ argtab[2].meltbp_long = 5864;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_catchall recv";
/*^apply.arg */
@@ -17645,7 +31991,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
@@ -17658,7 +32004,7 @@ lab_endgetargs:;
/*_.IF___V11*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ quasiblock");
/*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
@@ -17667,7 +32013,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5713:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5864:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V11*/ meltfptr[10] = 0;
@@ -17682,7 +32028,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17705,7 +32051,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -17715,7 +32061,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -17725,7 +32071,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5714;
+ argtab[2].meltbp_long = 5865;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_catchall nmctxt";
/*^apply.arg */
@@ -17745,7 +32091,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0;
@@ -17758,7 +32104,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[11] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ quasiblock");
/*_.PROGN___V17*/ meltfptr[15] = /*_.IF___V15*/ meltfptr[11];;
@@ -17767,7 +32113,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = /*_.PROGN___V17*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5714:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5865:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V15*/ meltfptr[11] = 0;
@@ -17780,13 +32126,19 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5715:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5866:/ quasiblock");
/*_.MYCLASS__V19*/ meltfptr[15] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5716:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V19*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5867:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V19*/ meltfptr[15]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17806,7 +32158,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5717:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5868:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.SLOC__V3*/ meltfptr[2]),
("unimplemented normalize_fill_matcher for any "),
(melt_ptr_t) ( /*_.MYCLASSNAME__V20*/ meltfptr[19]));
@@ -17814,7 +32166,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5719:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5870:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -17827,7 +32179,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5719:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5870:/ cond.else");
/*^block */
/*anyblock */
@@ -17838,7 +32190,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("catchall normalize_test_matcher unimplemented for any receiver"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5719) ? (5719) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("catchall normalize_test_matcher unimplemented for any receiver"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5870) ? (5870) : __LINE__, __FUNCTION__);
;
}
;
@@ -17853,7 +32205,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V22*/ meltfptr[21];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5719:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5870:/ clear");
/*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0;
}
@@ -17866,17 +32218,17 @@ lab_endgetargs:;
/*_.LET___V18*/ meltfptr[11] = /*_.IFCPP___V21*/ meltfptr[20];;
- MELT_LOCATION ("warmelt-normatch.melt:5715:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5866:/ clear");
/*clear *//*_.MYCLASS__V19*/ meltfptr[15] = 0;
/*^clear */
/*clear *//*_.MYCLASSNAME__V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -17899,14 +32251,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL */
+} /*end meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -17931,7 +32283,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER_st
+ struct frame_meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -17970,7 +32322,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -18032,7 +32384,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18055,7 +32407,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18065,7 +32417,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18075,7 +32427,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5725;
+ argtab[2].meltbp_long = 5876;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher recv";
/*^apply.arg */
@@ -18095,7 +32447,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0;
@@ -18108,7 +32460,7 @@ lab_endgetargs:;
/*_.IF___V9*/ meltfptr[8] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ quasiblock");
/*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];;
@@ -18117,7 +32469,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[7] = /*_.PROGN___V11*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5725:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5876:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V9*/ meltfptr[8] = 0;
@@ -18132,7 +32484,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5726:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5877:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18141,7 +32493,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CMATCHER */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5726:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5877:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18149,7 +32501,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5726:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5877:/ cond.else");
/*^block */
/*anyblock */
@@ -18163,7 +32515,7 @@ lab_endgetargs:;
melt_assert_failed (("check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5726) ? (5726) : __LINE__, __FUNCTION__);
+ (5877) ? (5877) : __LINE__, __FUNCTION__);
;
}
;
@@ -18178,7 +32530,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[9];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5726:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5877:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V13*/ meltfptr[9] = 0;
@@ -18191,7 +32543,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18214,7 +32566,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18224,7 +32576,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18234,7 +32586,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5727;
+ argtab[2].meltbp_long = 5878;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher nmctxt";
/*^apply.arg */
@@ -18254,7 +32606,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0;
@@ -18267,7 +32619,7 @@ lab_endgetargs:;
/*_.IF___V15*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ quasiblock");
/*_.PROGN___V17*/ meltfptr[15] = /*_.IF___V15*/ meltfptr[14];;
@@ -18276,7 +32628,7 @@ lab_endgetargs:;
/*_.IFCPP___V14*/ meltfptr[9] = /*_.PROGN___V17*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5727:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5878:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V15*/ meltfptr[14] = 0;
@@ -18291,7 +32643,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18314,7 +32666,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18324,7 +32676,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18334,7 +32686,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5728;
+ argtab[2].meltbp_long = 5879;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher ndata";
/*^apply.arg */
@@ -18354,7 +32706,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
@@ -18367,7 +32719,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[15] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ quasiblock");
/*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[15];;
@@ -18376,7 +32728,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[14] = /*_.PROGN___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5728:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5879:/ clear");
/*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V19*/ meltfptr[15] = 0;
@@ -18391,7 +32743,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18414,7 +32766,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18424,7 +32776,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18434,7 +32786,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5729;
+ argtab[2].meltbp_long = 5880;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher njelse";
/*^apply.arg */
@@ -18454,7 +32806,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -18467,7 +32819,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[19];;
@@ -18476,7 +32828,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[15] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5729:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5880:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[19] = 0;
@@ -18491,7 +32843,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18514,7 +32866,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -18524,7 +32876,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18535,7 +32887,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5730;
+ argtab[2].meltbp_long = 5881;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher bindlist";
/*^apply.arg */
@@ -18555,7 +32907,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
@@ -18568,7 +32920,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[23];;
@@ -18577,7 +32929,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[19] = /*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5730:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5881:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[23] = 0;
@@ -18592,7 +32944,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5731:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5882:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18600,7 +32952,7 @@ lab_endgetargs:;
/*_#IS_A__L12*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V6*/ meltfptr[5]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5731:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5882:/ cond");
/*cond */ if ( /*_#IS_A__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -18608,7 +32960,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5731:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5882:/ cond.else");
/*^block */
/*anyblock */
@@ -18622,7 +32974,7 @@ lab_endgetargs:;
melt_assert_failed (("normtestmatch_cmatcher check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5731) ? (5731) : __LINE__, __FUNCTION__);
+ (5882) ? (5882) : __LINE__, __FUNCTION__);
;
}
;
@@ -18637,7 +32989,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[23] = /*_.IFELSE___V31*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5731:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5882:/ clear");
/*clear *//*_#IS_A__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V31*/ meltfptr[27] = 0;
@@ -18648,10 +33000,10 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[23] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5732:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5883:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5733:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5884:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND");
@@ -18659,7 +33011,7 @@ lab_endgetargs:;
meltfptr[32] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5734:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5885:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 5, "CMATCH_STATE");
@@ -18667,7 +33019,7 @@ lab_endgetargs:;
meltfptr[33] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5735:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5886:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 6, "CMATCH_EXPTEST");
@@ -18682,8 +33034,13 @@ lab_endgetargs:;
/*_#LENBINDLIST__L14*/ meltfnum[0] =
(melt_list_length ((melt_ptr_t) ( /*_.BINDLIST__V5*/ meltfptr[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:5738:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATBIND__V33*/ meltfptr[32]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5889:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATBIND__V33*/ meltfptr[32]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18707,7 +33064,7 @@ lab_endgetargs:;
(meltgc_new_multiple
((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[4])),
( /*_#EXPTESTLEN__L13*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5740:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5891:/ apply");
/*apply */
{
/*_.CSYMSTATE__V38*/ meltfptr[37] =
@@ -18717,15 +33074,21 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5741:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5892:/ quasiblock");
/*_.SBUF__V40*/ meltfptr[39] =
meltgc_new_strbuf ((meltobject_ptr_t)
(( /*!DISCR_STRBUF */ meltfrout->tabval[6])),
(char *) 0);;
- MELT_LOCATION ("warmelt-normatch.melt:5742:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CSYMSTATE__V38*/ meltfptr[37]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5893:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CSYMSTATE__V38*/ meltfptr[37]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18745,7 +33108,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5742:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5893:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V40*/ meltfptr[39]),
melt_string_str ((melt_ptr_t)
( /*_.NAMED_NAME__V41*/
@@ -18754,13 +33117,18 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5743:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5894:/ locexp");
meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V40*/ meltfptr[39]),
("__"));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5744:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CSYMSTATE__V38*/ meltfptr[37]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5895:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CSYMSTATE__V38*/ meltfptr[37]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18784,7 +33152,7 @@ lab_endgetargs:;
(melt_get_int ((melt_ptr_t) ( /*_.CSYM_URANK__V42*/ meltfptr[41])));;
{
- MELT_LOCATION ("warmelt-normatch.melt:5744:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5895:/ locexp");
meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V40*/ meltfptr[39]),
( /*_#GET_INT__L15*/ meltfnum[14]));
}
@@ -18798,7 +33166,7 @@ lab_endgetargs:;
/*_.LET___V39*/ meltfptr[38] = /*_.STRBUF2STRING__V43*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-normatch.melt:5741:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5892:/ clear");
/*clear *//*_.SBUF__V40*/ meltfptr[39] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V41*/ meltfptr[40] = 0;
@@ -18809,7 +33177,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.STRBUF2STRING__V43*/ meltfptr[42] = 0;
/*_.CSYMSTR__V44*/ meltfptr[39] = /*_.LET___V39*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:5747:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5898:/ quasiblock");
/*^rawallocobj */
@@ -18863,7 +33231,7 @@ lab_endgetargs:;
"NEXPR_CTYP");
;
/*_.NCHUNK__V45*/ meltfptr[40] = /*_.INST__V46*/ meltfptr[41];;
- MELT_LOCATION ("warmelt-normatch.melt:5752:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5903:/ quasiblock");
/*^rawallocobj */
@@ -18941,7 +33309,7 @@ lab_endgetargs:;
( /*_#I__L17*/ meltfnum[16])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -18964,7 +33332,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -18974,7 +33342,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -18985,7 +33353,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5760;
+ argtab[2].meltbp_long = 5911;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher matbind";
/*^apply.arg */
@@ -19005,7 +33373,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V52*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V52*/ meltfptr[51] = 0;
@@ -19018,7 +33386,7 @@ lab_endgetargs:;
/*_.IF___V51*/ meltfptr[50] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ quasiblock");
/*_.PROGN___V53*/ meltfptr[51] = /*_.IF___V51*/ meltfptr[50];;
@@ -19027,7 +33395,7 @@ lab_endgetargs:;
/*_.IFCPP___V50*/ meltfptr[49] = /*_.PROGN___V53*/ meltfptr[51];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5760:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5911:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V51*/ meltfptr[50] = 0;
@@ -19042,7 +33410,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19065,7 +33433,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -19075,7 +33443,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L21*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19086,7 +33454,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5761;
+ argtab[2].meltbp_long = 5912;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher matstate";
/*^apply.arg */
@@ -19106,7 +33474,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V56*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V56*/ meltfptr[55] = 0;
@@ -19119,7 +33487,7 @@ lab_endgetargs:;
/*_.IF___V55*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ quasiblock");
/*_.PROGN___V57*/ meltfptr[55] = /*_.IF___V55*/ meltfptr[51];;
@@ -19128,7 +33496,7 @@ lab_endgetargs:;
/*_.IFCPP___V54*/ meltfptr[50] = /*_.PROGN___V57*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5761:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5912:/ clear");
/*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V55*/ meltfptr[51] = 0;
@@ -19143,7 +33511,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19166,7 +33534,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -19176,7 +33544,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L23*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19187,7 +33555,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5762;
+ argtab[2].meltbp_long = 5913;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher exptest";
/*^apply.arg */
@@ -19207,7 +33575,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
@@ -19220,7 +33588,7 @@ lab_endgetargs:;
/*_.IF___V59*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[55];;
@@ -19229,7 +33597,7 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[51] = /*_.PROGN___V61*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5762:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5913:/ clear");
/*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V59*/ meltfptr[55] = 0;
@@ -19258,7 +33626,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19281,7 +33649,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -19291,7 +33659,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L25*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19302,7 +33670,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5766;
+ argtab[2].meltbp_long = 5917;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher curbind";
@@ -19324,7 +33692,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V66*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V66*/ meltfptr[65] = 0;
@@ -19337,7 +33705,7 @@ lab_endgetargs:;
/*_.IF___V65*/ meltfptr[64] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ quasiblock");
/*_.PROGN___V67*/ meltfptr[65] = /*_.IF___V65*/ meltfptr[64];;
@@ -19346,7 +33714,7 @@ lab_endgetargs:;
/*_.IFCPP___V64*/ meltfptr[63] = /*_.PROGN___V67*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5766:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5917:/ clear");
/*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V65*/ meltfptr[64] = 0;
@@ -19361,7 +33729,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5767:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5918:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19370,7 +33738,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.CURBIND__V63*/ meltfptr[59]),
(melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:5767:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5918:/ cond");
/*cond */ if ( /*_#IS_A__L26*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -19378,7 +33746,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5767:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5918:/ cond.else");
/*^block */
/*anyblock */
@@ -19389,7 +33757,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normtestmatch_cmatcher check curbind"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5767) ? (5767) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normtestmatch_cmatcher check curbind"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5918) ? (5918) : __LINE__, __FUNCTION__);
;
}
;
@@ -19404,7 +33772,7 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = /*_.IFELSE___V69*/ meltfptr[65];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5767:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5918:/ clear");
/*clear *//*_#IS_A__L26*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IFELSE___V69*/ meltfptr[65] = 0;
@@ -19415,8 +33783,14 @@ lab_endgetargs:;
/*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5768:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V63*/ meltfptr[59]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5919:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V63*/
+ meltfptr[59]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19434,8 +33808,14 @@ lab_endgetargs:;
/*_.BINDER__V70*/ meltfptr[65] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5768:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBIND__V63*/ meltfptr[59]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[16])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5919:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBIND__V63*/
+ meltfptr[59]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19455,7 +33835,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5768:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5919:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.BINDMAP__V49*/ meltfptr[48]),
(meltobject_ptr_t) ( /*_.BINDER__V70*/
@@ -19468,7 +33848,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5763:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5914:/ clear");
/*clear *//*_.CURPAIRBIND__V62*/ meltfptr[55] = 0;
/*^clear */
/*clear *//*_.CURBIND__V63*/ meltfptr[59] = 0;
@@ -19484,7 +33864,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5770:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5921:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19493,7 +33873,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MATBIND__V33*/ meltfptr[32]),
(melt_ptr_t) (( /*!CLASS_ANY_BINDING */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:5770:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5921:/ cond");
/*cond */ if ( /*_#IS_A__L27*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -19501,7 +33881,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5770:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5921:/ cond.else");
/*^block */
/*anyblock */
@@ -19515,7 +33895,7 @@ lab_endgetargs:;
melt_assert_failed (("normtestmatch_cmatcher check matbind"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5770) ? (5770) : __LINE__, __FUNCTION__);
+ (5921) ? (5921) : __LINE__, __FUNCTION__);
;
}
;
@@ -19530,7 +33910,7 @@ lab_endgetargs:;
/*_.IFCPP___V72*/ meltfptr[71] = /*_.IFELSE___V73*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5770:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5921:/ clear");
/*clear *//*_#IS_A__L27*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IFELSE___V73*/ meltfptr[72] = 0;
@@ -19560,7 +33940,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19583,7 +33963,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -19593,7 +33973,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19604,7 +33984,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5774;
+ argtab[2].meltbp_long = 5925;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher curexp";
@@ -19626,7 +34006,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V77*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V77*/ meltfptr[76] = 0;
@@ -19639,7 +34019,7 @@ lab_endgetargs:;
/*_.IF___V76*/ meltfptr[75] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ quasiblock");
/*_.PROGN___V78*/ meltfptr[76] = /*_.IF___V76*/ meltfptr[75];;
@@ -19648,7 +34028,7 @@ lab_endgetargs:;
/*_.IFCPP___V75*/ meltfptr[74] = /*_.PROGN___V78*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5774:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5925:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V76*/ meltfptr[75] = 0;
@@ -19666,7 +34046,7 @@ lab_endgetargs:;
/*_#IS_STRING__L31*/ meltfnum[29] =
(melt_magic_discr ((melt_ptr_t) ( /*_.CUREXP__V74*/ meltfptr[72]))
== MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:5776:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5927:/ cond");
/*cond */ if ( /*_#IS_STRING__L31*/ meltfnum[29]) /*then */
{
/*^cond.then */
@@ -19678,7 +34058,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5777:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5928:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.EXPARGS__V37*/ meltfptr[36]),
( /*_#IX__L28*/ meltfnum[17]),
@@ -19693,7 +34073,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5776:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5927:/ cond.else");
/*^block */
/*anyblock */
@@ -19702,7 +34082,7 @@ lab_endgetargs:;
/*_#__L32*/ meltfnum[18] =
(( /*_.CUREXP__V74*/ meltfptr[72]) ==
( /*_.MATSTATE__V34*/ meltfptr[33]));;
- MELT_LOCATION ("warmelt-normatch.melt:5778:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5929:/ cond");
/*cond */ if ( /*_#__L32*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -19714,7 +34094,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5779:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:5930:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.EXPARGS__V37*/
meltfptr[36]),
@@ -19730,7 +34110,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5778:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5929:/ cond.else");
/*^block */
/*anyblock */
@@ -19739,7 +34119,7 @@ lab_endgetargs:;
/*_#__L33*/ meltfnum[32] =
(( /*_.CUREXP__V74*/ meltfptr[72]) ==
( /*_.MATSYMB__V36*/ meltfptr[35]));;
- MELT_LOCATION ("warmelt-normatch.melt:5780:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5931:/ cond");
/*cond */ if ( /*_#__L33*/ meltfnum[32]) /*then */
{
/*^cond.then */
@@ -19752,7 +34132,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5781:/ locexp");
+ ("warmelt-normatch.melt:5932:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.EXPARGS__V37*/
meltfptr[36]),
@@ -19769,7 +34149,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5780:/ cond.else");
+ ("warmelt-normatch.melt:5931:/ cond.else");
/*^block */
/*anyblock */
@@ -19781,7 +34161,7 @@ lab_endgetargs:;
meltfptr[72]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->tabval[17])));;
MELT_LOCATION
- ("warmelt-normatch.melt:5782:/ cond");
+ ("warmelt-normatch.melt:5933:/ cond");
/*cond */ if ( /*_#IS_A__L34*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -19790,7 +34170,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5783:/ quasiblock");
+ ("warmelt-normatch.melt:5934:/ quasiblock");
/*_.NVAL__V83*/ meltfptr[82] =
@@ -19798,7 +34178,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ cppif.then");
+ ("warmelt-normatch.melt:5936:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -19823,7 +34203,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ cond");
+ ("warmelt-normatch.melt:5936:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -19835,7 +34215,7 @@ lab_endgetargs:;
meltfnum[35] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ apply");
+ ("warmelt-normatch.melt:5936:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -19849,7 +34229,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5785;
+ argtab[2].meltbp_long = 5936;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher nval";
@@ -19869,7 +34249,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ clear");
+ ("warmelt-normatch.melt:5936:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/
meltfnum[35] = 0;
/*^clear */
@@ -19885,7 +34265,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ quasiblock");
+ ("warmelt-normatch.melt:5936:/ quasiblock");
/*_.PROGN___V87*/ meltfptr[85] =
@@ -19897,7 +34277,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5785:/ clear");
+ ("warmelt-normatch.melt:5936:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/
meltfnum[34] = 0;
/*^clear */
@@ -19921,7 +34301,7 @@ lab_endgetargs:;
meltfptr[82]),
(melt_ptr_t) (( /*!CLASS_NREP */ meltfrout->tabval[18])));;
MELT_LOCATION
- ("warmelt-normatch.melt:5786:/ cond");
+ ("warmelt-normatch.melt:5937:/ cond");
/*cond */ if ( /*_#IS_A__L37*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -19932,7 +34312,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5787:/ locexp");
+ ("warmelt-normatch.melt:5938:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.EXPARGS__V37*/ meltfptr[36]), ( /*_#IX__L28*/ meltfnum[17]), (melt_ptr_t) ( /*_.NVAL__V83*/ meltfptr[82]));
}
;
@@ -19943,15 +34323,19 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5786:/ cond.else");
+ ("warmelt-normatch.melt:5937:/ cond.else");
/*^block */
/*anyblock */
{
MELT_LOCATION
- ("warmelt-normatch.melt:5789:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUREXP__V74*/ meltfptr[72]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))) /*then */
+ ("warmelt-normatch.melt:5940:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t) ( /*_.CUREXP__V74*/ meltfptr[72]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[7])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -19973,7 +34357,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5789:/ locexp");
+ ("warmelt-normatch.melt:5940:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V3*/
meltfptr[2]),
@@ -19984,7 +34368,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5790:/ locexp");
+ ("warmelt-normatch.melt:5941:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -19994,13 +34378,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5788:/ quasiblock");
+ ("warmelt-normatch.melt:5939:/ quasiblock");
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5786:/ clear");
+ ("warmelt-normatch.melt:5937:/ clear");
/*clear *//*_.NAMED_NAME__V88*/
meltfptr[84] = 0;
}
@@ -20011,7 +34395,7 @@ lab_endgetargs:;
/*_.IFCPP___V84*/ meltfptr[83];;
MELT_LOCATION
- ("warmelt-normatch.melt:5783:/ clear");
+ ("warmelt-normatch.melt:5934:/ clear");
/*clear *//*_.NVAL__V83*/ meltfptr[82] = 0;
/*^clear */
/*clear *//*_.IFCPP___V84*/ meltfptr[83] =
@@ -20025,7 +34409,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5782:/ cond.else");
+ ("warmelt-normatch.melt:5933:/ cond.else");
/*^block */
/*anyblock */
@@ -20034,7 +34418,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5793:/ locexp");
+ ("warmelt-normatch.melt:5944:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.SLOC__V3*/
meltfptr[2]),
@@ -20045,7 +34429,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5794:/ cppif.then");
+ ("warmelt-normatch.melt:5945:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20060,7 +34444,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5794:/ cond.else");
+ ("warmelt-normatch.melt:5945:/ cond.else");
/*^block */
/*anyblock */
@@ -20071,7 +34455,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normtestmatch_cmatcher unimplemented case"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5794) ? (5794) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normtestmatch_cmatcher unimplemented case"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5945) ? (5945) : __LINE__, __FUNCTION__);
;
}
;
@@ -20089,7 +34473,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5794:/ clear");
+ ("warmelt-normatch.melt:5945:/ clear");
/*clear *//*_.IFELSE___V90*/ meltfptr[84]
= 0;
}
@@ -20101,7 +34485,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5792:/ quasiblock");
+ ("warmelt-normatch.melt:5943:/ quasiblock");
/*_.PROGN___V91*/ meltfptr[82] =
@@ -20113,7 +34497,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5782:/ clear");
+ ("warmelt-normatch.melt:5933:/ clear");
/*clear *//*_.IFCPP___V89*/ meltfptr[85] =
0;
/*^clear */
@@ -20128,7 +34512,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5780:/ clear");
+ ("warmelt-normatch.melt:5931:/ clear");
/*clear *//*_#IS_A__L34*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IFELSE___V82*/ meltfptr[81] = 0;
@@ -20140,7 +34524,7 @@ lab_endgetargs:;
/*_.IFELSE___V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5778:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5929:/ clear");
/*clear *//*_#__L33*/ meltfnum[32] = 0;
/*^clear */
/*clear *//*_.IFELSE___V81*/ meltfptr[80] = 0;
@@ -20152,7 +34536,7 @@ lab_endgetargs:;
/*_.IFELSE___V80*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5776:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5927:/ clear");
/*clear *//*_#__L32*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IFELSE___V80*/ meltfptr[76] = 0;
@@ -20166,7 +34550,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5771:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5922:/ clear");
/*clear *//*_.CUREXP__V74*/ meltfptr[72] = 0;
/*^clear */
/*clear *//*_#IX__L28*/ meltfnum[17] = 0;
@@ -20180,7 +34564,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20203,7 +34587,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -20213,7 +34597,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20224,7 +34608,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5796;
+ argtab[2].meltbp_long = 5947;
/*^apply.arg */
argtab[3].meltbp_cstring = "normtestmatch_cmatcher expargs";
/*^apply.arg */
@@ -20244,7 +34628,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V94*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V94*/ meltfptr[85] = 0;
@@ -20257,7 +34641,7 @@ lab_endgetargs:;
/*_.IF___V93*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ quasiblock");
/*_.PROGN___V95*/ meltfptr[82] = /*_.IF___V93*/ meltfptr[84];;
@@ -20266,7 +34650,7 @@ lab_endgetargs:;
/*_.IFCPP___V92*/ meltfptr[83] = /*_.PROGN___V95*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5796:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5947:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.IF___V93*/ meltfptr[84] = 0;
@@ -20281,7 +34665,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20304,7 +34688,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -20314,7 +34698,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[32] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20325,7 +34709,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5797;
+ argtab[2].meltbp_long = 5948;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher return ntestelse";
@@ -20346,7 +34730,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V98*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[32] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V98*/ meltfptr[76] = 0;
@@ -20359,7 +34743,7 @@ lab_endgetargs:;
/*_.IF___V97*/ meltfptr[80] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ quasiblock");
/*_.PROGN___V99*/ meltfptr[85] = /*_.IF___V97*/ meltfptr[80];;
@@ -20368,7 +34752,7 @@ lab_endgetargs:;
/*_.IFCPP___V96*/ meltfptr[81] = /*_.PROGN___V99*/ meltfptr[85];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5797:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5948:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IF___V97*/ meltfptr[80] = 0;
@@ -20383,7 +34767,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20406,7 +34790,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[18]) /*then */
{
/*^cond.then */
@@ -20416,7 +34800,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20427,7 +34811,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5798;
+ argtab[2].meltbp_long = 5949;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher return csymstate";
@@ -20448,7 +34832,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V102*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[76] = 0;
@@ -20461,7 +34845,7 @@ lab_endgetargs:;
/*_.IF___V101*/ meltfptr[82] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ quasiblock");
/*_.PROGN___V103*/ meltfptr[80] = /*_.IF___V101*/ meltfptr[82];;
@@ -20470,7 +34854,7 @@ lab_endgetargs:;
/*_.IFCPP___V100*/ meltfptr[84] = /*_.PROGN___V103*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5798:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5949:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.IF___V101*/ meltfptr[82] = 0;
@@ -20485,7 +34869,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20508,7 +34892,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L44*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -20518,7 +34902,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L45*/ meltfnum[32] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20529,7 +34913,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5799;
+ argtab[2].meltbp_long = 5950;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher return csymstr";
@@ -20550,7 +34934,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V106*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L45*/ meltfnum[32] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V106*/ meltfptr[82] = 0;
@@ -20563,7 +34947,7 @@ lab_endgetargs:;
/*_.IF___V105*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ quasiblock");
/*_.PROGN___V107*/ meltfptr[80] = /*_.IF___V105*/ meltfptr[76];;
@@ -20572,7 +34956,7 @@ lab_endgetargs:;
/*_.IFCPP___V104*/ meltfptr[85] = /*_.PROGN___V107*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5799:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5950:/ clear");
/*clear *//*_#MELT_NEED_DBG__L44*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.IF___V105*/ meltfptr[76] = 0;
@@ -20587,7 +34971,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -20610,7 +34994,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -20620,7 +35004,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L47*/ meltfnum[35] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -20631,7 +35015,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5800;
+ argtab[2].meltbp_long = 5951;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normtestmatch_cmatcher return bindmap";
@@ -20652,7 +35036,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V110*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L47*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V110*/ meltfptr[80] = 0;
@@ -20665,7 +35049,7 @@ lab_endgetargs:;
/*_.IF___V109*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ quasiblock");
/*_.PROGN___V111*/ meltfptr[80] = /*_.IF___V109*/ meltfptr[76];;
@@ -20674,7 +35058,7 @@ lab_endgetargs:;
/*_.IFCPP___V108*/ meltfptr[82] = /*_.PROGN___V111*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5800:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5951:/ clear");
/*clear *//*_#MELT_NEED_DBG__L46*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IF___V109*/ meltfptr[76] = 0;
@@ -20687,7 +35071,7 @@ lab_endgetargs:;
/*_.IFCPP___V108*/ meltfptr[82] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5801:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-normatch.melt:5952:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -20709,11 +35093,11 @@ lab_endgetargs:;
/*^putuple */
/*putupl#6 */
- melt_assertmsg ("putupl [:5801] #6 checktup",
+ melt_assertmsg ("putupl [:5952] #6 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V113*/ meltfptr[80]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5801] #6 checkoff",
+ melt_assertmsg ("putupl [:5952] #6 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -20724,11 +35108,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#7 */
- melt_assertmsg ("putupl [:5801] #7 checktup",
+ melt_assertmsg ("putupl [:5952] #7 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V113*/ meltfptr[80]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5801] #7 checkoff",
+ melt_assertmsg ("putupl [:5952] #7 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -20739,11 +35123,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#8 */
- melt_assertmsg ("putupl [:5801] #8 checktup",
+ melt_assertmsg ("putupl [:5952] #8 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V113*/ meltfptr[80]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:5801] #8 checkoff",
+ melt_assertmsg ("putupl [:5952] #8 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -20758,7 +35142,7 @@ lab_endgetargs:;
/*_.TUPLE___V112*/ meltfptr[76] = /*_.TUPLREC___V113*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5801:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5952:/ clear");
/*clear *//*_.TUPLREC___V113*/ meltfptr[80] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V113*/ meltfptr[80] = 0;
@@ -20768,7 +35152,7 @@ lab_endgetargs:;
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NTESTELSE__V47*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-normatch.melt:5801:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:5952:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -20782,7 +35166,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V32*/ meltfptr[27] = /*_.RETURN___V114*/ meltfptr[80];;
- MELT_LOCATION ("warmelt-normatch.melt:5732:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5883:/ clear");
/*clear *//*_.MATBIND__V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.MATSTATE__V34*/ meltfptr[33] = 0;
@@ -20834,11 +35218,11 @@ lab_endgetargs:;
/*clear *//*_.TUPLE___V112*/ meltfptr[76] = 0;
/*^clear */
/*clear *//*_.RETURN___V114*/ meltfptr[80] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V32*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -20871,14 +35255,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER */
+} /*end meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -20903,7 +35287,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER_st
+ struct frame_meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -20942,7 +35326,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -21014,7 +35398,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21037,7 +35421,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21047,7 +35431,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21057,7 +35441,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5810;
+ argtab[2].meltbp_long = 5961;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher recv";
/*^apply.arg */
@@ -21077,7 +35461,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -21090,7 +35474,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[9] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];;
@@ -21099,7 +35483,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5810:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5961:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[9] = 0;
@@ -21114,7 +35498,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21137,7 +35521,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21147,7 +35531,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21157,7 +35541,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5811;
+ argtab[2].meltbp_long = 5962;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher nmctxt";
/*^apply.arg */
@@ -21177,7 +35561,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -21190,7 +35574,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[10];;
@@ -21199,7 +35583,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[9] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5811:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5962:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[10] = 0;
@@ -21214,7 +35598,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21237,7 +35621,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21247,7 +35631,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21257,7 +35641,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5812;
+ argtab[2].meltbp_long = 5963;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher ndata";
/*^apply.arg */
@@ -21277,7 +35661,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0;
@@ -21290,7 +35674,7 @@ lab_endgetargs:;
/*_.IF___V18*/ meltfptr[14] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ quasiblock");
/*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[14];;
@@ -21299,7 +35683,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[10] = /*_.PROGN___V20*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5812:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5963:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V18*/ meltfptr[14] = 0;
@@ -21314,7 +35698,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21337,7 +35721,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21347,7 +35731,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21357,7 +35741,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5813;
+ argtab[2].meltbp_long = 5964;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher bindlist";
/*^apply.arg */
@@ -21377,7 +35761,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0;
@@ -21390,7 +35774,7 @@ lab_endgetargs:;
/*_.IF___V22*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ quasiblock");
/*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[18];;
@@ -21399,7 +35783,7 @@ lab_endgetargs:;
/*_.IFCPP___V21*/ meltfptr[14] = /*_.PROGN___V24*/ meltfptr[22];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5813:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5964:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V22*/ meltfptr[18] = 0;
@@ -21414,7 +35798,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21437,7 +35821,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21447,7 +35831,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21458,7 +35842,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5814;
+ argtab[2].meltbp_long = 5965;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher nouts";
/*^apply.arg */
@@ -21478,7 +35862,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
@@ -21491,7 +35875,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[22];;
@@ -21500,7 +35884,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[18] = /*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5814:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5965:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[22] = 0;
@@ -21515,7 +35899,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21538,7 +35922,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21548,7 +35932,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21559,7 +35943,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5815;
+ argtab[2].meltbp_long = 5966;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher testdata";
/*^apply.arg */
@@ -21579,7 +35963,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0;
@@ -21592,7 +35976,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[26];;
@@ -21601,7 +35985,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[22] = /*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5815:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5966:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[26] = 0;
@@ -21616,7 +36000,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5816:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5967:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21625,7 +36009,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_CMATCHER */ meltfrout->
tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5816:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5967:/ cond");
/*cond */ if ( /*_#IS_A__L13*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -21633,7 +36017,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5816:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5967:/ cond.else");
/*^block */
/*anyblock */
@@ -21647,7 +36031,7 @@ lab_endgetargs:;
melt_assert_failed (("normfillmatch_cmatcher check recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5816) ? (5816) : __LINE__, __FUNCTION__);
+ (5967) ? (5967) : __LINE__, __FUNCTION__);
;
}
;
@@ -21662,7 +36046,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[26] = /*_.IFELSE___V34*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5816:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5967:/ clear");
/*clear *//*_#IS_A__L13*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V34*/ meltfptr[30] = 0;
@@ -21675,7 +36059,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5817:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5968:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21683,7 +36067,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L14*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.TESTDATA__V8*/ meltfptr[7])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:5817:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5968:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -21691,7 +36075,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5817:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5968:/ cond.else");
/*^block */
/*anyblock */
@@ -21705,7 +36089,7 @@ lab_endgetargs:;
melt_assert_failed (("normfillmatch_cmatcher check testdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5817) ? (5817) : __LINE__, __FUNCTION__);
+ (5968) ? (5968) : __LINE__, __FUNCTION__);
;
}
;
@@ -21720,7 +36104,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[30] = /*_.IFELSE___V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5817:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5968:/ clear");
/*clear *//*_#IS_MULTIPLE__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V36*/ meltfptr[35] = 0;
@@ -21731,7 +36115,7 @@ lab_endgetargs:;
/*_.IFCPP___V35*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5818:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5969:/ quasiblock");
/*^getslot */
@@ -21742,7 +36126,7 @@ lab_endgetargs:;
meltfptr[37] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5819:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5970:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 5, "CMATCH_STATE");
@@ -21750,7 +36134,7 @@ lab_endgetargs:;
meltfptr[38] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5820:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5971:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 4, "AMATCH_OUT");
@@ -21758,7 +36142,7 @@ lab_endgetargs:;
meltfptr[39] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5821:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5972:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND");
@@ -21766,7 +36150,7 @@ lab_endgetargs:;
meltfptr[40] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5822:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:5973:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "AMATCH_IN");
@@ -21806,7 +36190,7 @@ lab_endgetargs:;
/*_.BINDMAP__V46*/ meltfptr[45] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.TESTDATA__V8*/ meltfptr[7]), (2)));;
- MELT_LOCATION ("warmelt-normatch.melt:5830:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5981:/ quasiblock");
/*^rawallocobj */
@@ -21862,7 +36246,7 @@ lab_endgetargs:;
/*_.NFILLCHUNK__V47*/ meltfptr[46] = /*_.INST__V48*/ meltfptr[47];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21885,7 +36269,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -21895,7 +36279,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -21906,7 +36290,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5836;
+ argtab[2].meltbp_long = 5987;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher matout";
/*^apply.arg */
@@ -21926,7 +36310,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V51*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V51*/ meltfptr[50] = 0;
@@ -21939,7 +36323,7 @@ lab_endgetargs:;
/*_.IF___V50*/ meltfptr[49] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ quasiblock");
/*_.PROGN___V52*/ meltfptr[50] = /*_.IF___V50*/ meltfptr[49];;
@@ -21948,7 +36332,7 @@ lab_endgetargs:;
/*_.IFCPP___V49*/ meltfptr[48] = /*_.PROGN___V52*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5836:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5987:/ clear");
/*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V50*/ meltfptr[49] = 0;
@@ -21963,7 +36347,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5837:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5988:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -21976,7 +36360,7 @@ lab_endgetargs:;
/*_#I__L21*/ meltfnum[17] =
(( /*_#NBNOUTS__L17*/ meltfnum[16]) ==
( /*_#MULTIPLE_LENGTH__L20*/ meltfnum[18]));;
- MELT_LOCATION ("warmelt-normatch.melt:5837:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5988:/ cond");
/*cond */ if ( /*_#I__L21*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -21984,7 +36368,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5837:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5988:/ cond.else");
/*^block */
/*anyblock */
@@ -21998,7 +36382,7 @@ lab_endgetargs:;
melt_assert_failed (("normfillmatch_cmatcher check nbnouts"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5837) ? (5837) : __LINE__, __FUNCTION__);
+ (5988) ? (5988) : __LINE__, __FUNCTION__);
;
}
;
@@ -22013,7 +36397,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[49] = /*_.IFELSE___V54*/ meltfptr[50];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5837:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5988:/ clear");
/*clear *//*_#MULTIPLE_LENGTH__L20*/ meltfnum[18] = 0;
/*^clear */
/*clear *//*_#I__L21*/ meltfnum[17] = 0;
@@ -22042,15 +36426,21 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:5841:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5992:/ quasiblock");
/*_.CUROUTF__V56*/ meltfptr[55] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.MATOUT__V40*/ meltfptr[39]),
( /*_#NOUTIX__L22*/ meltfnum[18])));;
- MELT_LOCATION ("warmelt-normatch.melt:5842:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUTF__V56*/ meltfptr[55]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[5])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:5993:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CUROUTF__V56*/
+ meltfptr[55]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[5])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -22070,7 +36460,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5847:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:5998:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22080,7 +36470,7 @@ lab_endgetargs:;
( /*_.CUROUTF__V56*/ meltfptr[55]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:5847:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:5998:/ cond");
/*cond */ if ( /*_#IS_A__L23*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -22088,7 +36478,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5847:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:5998:/ cond.else");
/*^block */
/*anyblock */
@@ -22099,7 +36489,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normfillmatch_cmatcher check curoutf"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5847) ? (5847) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normfillmatch_cmatcher check curoutf"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5998) ? (5998) : __LINE__, __FUNCTION__);
;
}
;
@@ -22114,7 +36504,7 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[57] = /*_.IFELSE___V59*/ meltfptr[58];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5847:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5998:/ clear");
/*clear *//*_#IS_A__L23*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IFELSE___V59*/ meltfptr[58] = 0;
@@ -22127,7 +36517,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5849:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6000:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22137,7 +36527,7 @@ lab_endgetargs:;
( /*_.CUROUTSYM__V57*/ meltfptr[56]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */
meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:5849:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6000:/ cond");
/*cond */ if ( /*_#IS_A__L24*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -22145,7 +36535,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5849:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6000:/ cond.else");
/*^block */
/*anyblock */
@@ -22156,7 +36546,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normfillmatch_cmatcher check curoutsym"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5849) ? (5849) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normfillmatch_cmatcher check curoutsym"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6000) ? (6000) : __LINE__, __FUNCTION__);
;
}
;
@@ -22171,7 +36561,7 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[58] = /*_.IFELSE___V61*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5849:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6000:/ clear");
/*clear *//*_#IS_A__L24*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IFELSE___V61*/ meltfptr[60] = 0;
@@ -22184,7 +36574,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5851:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6002:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.BINDMAP__V46*/ meltfptr[45]),
(meltobject_ptr_t) ( /*_.CUROUTSYM__V57*/
@@ -22194,7 +36584,7 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5841:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5992:/ clear");
/*clear *//*_.CUROUTF__V56*/ meltfptr[55] = 0;
/*^clear */
/*clear *//*_.CUROUTSYM__V57*/ meltfptr[56] = 0;
@@ -22208,7 +36598,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5838:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5989:/ clear");
/*clear *//*_.CURNOUT__V55*/ meltfptr[50] = 0;
/*^clear */
/*clear *//*_#NOUTIX__L22*/ meltfnum[18] = 0;
@@ -22216,7 +36606,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22239,7 +36629,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[17]) /*then */
{
/*^cond.then */
@@ -22249,7 +36639,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[25] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22260,7 +36650,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5853;
+ argtab[2].meltbp_long = 6004;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normfillmatch_cmatcher updated bindmap";
@@ -22281,7 +36671,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V64*/ meltfptr[56];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[56] = 0;
@@ -22294,7 +36684,7 @@ lab_endgetargs:;
/*_.IF___V63*/ meltfptr[55] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ quasiblock");
/*_.PROGN___V65*/ meltfptr[57] = /*_.IF___V63*/ meltfptr[55];;
@@ -22303,7 +36693,7 @@ lab_endgetargs:;
/*_.IFCPP___V62*/ meltfptr[60] = /*_.PROGN___V65*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5853:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6004:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.IF___V63*/ meltfptr[55] = 0;
@@ -22318,7 +36708,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22341,7 +36731,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -22351,7 +36741,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[17] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22362,7 +36752,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5854;
+ argtab[2].meltbp_long = 6005;
/*^apply.arg */
argtab[3].meltbp_cstring = "normfillmatch_cmatcher expfill";
/*^apply.arg */
@@ -22382,7 +36772,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V68*/ meltfptr[55];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[17] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[55] = 0;
@@ -22395,7 +36785,7 @@ lab_endgetargs:;
/*_.IF___V67*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ quasiblock");
/*_.PROGN___V69*/ meltfptr[57] = /*_.IF___V67*/ meltfptr[56];;
@@ -22404,7 +36794,7 @@ lab_endgetargs:;
/*_.IFCPP___V66*/ meltfptr[58] = /*_.PROGN___V69*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5854:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6005:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V67*/ meltfptr[56] = 0;
@@ -22436,7 +36826,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22459,7 +36849,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -22469,7 +36859,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[30] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22480,7 +36870,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5858;
+ argtab[2].meltbp_long = 6009;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normfillmatch_cmatcher curfill";
@@ -22502,7 +36892,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[30] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0;
@@ -22515,7 +36905,7 @@ lab_endgetargs:;
/*_.IF___V72*/ meltfptr[57] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[57];;
@@ -22524,7 +36914,7 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[56] = /*_.PROGN___V74*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5858:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6009:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IF___V72*/ meltfptr[57] = 0;
@@ -22543,7 +36933,7 @@ lab_endgetargs:;
(melt_magic_discr
((melt_ptr_t) ( /*_.CURFILL__V70*/ meltfptr[55])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:5860:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6011:/ cond");
/*cond */ if ( /*_#IS_STRING__L32*/ meltfnum[30]) /*then */
{
/*^cond.then */
@@ -22555,7 +36945,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5861:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6012:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEXPARGS__V43*/
meltfptr[42]),
@@ -22571,7 +36961,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5860:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6011:/ cond.else");
/*^block */
/*anyblock */
@@ -22580,7 +36970,7 @@ lab_endgetargs:;
/*_#__L33*/ meltfnum[25] =
(( /*_.CURFILL__V70*/ meltfptr[55]) ==
( /*_.MATSTATE__V39*/ meltfptr[38]));;
- MELT_LOCATION ("warmelt-normatch.melt:5863:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6014:/ cond");
/*cond */ if ( /*_#__L33*/ meltfnum[25]) /*then */
{
/*^cond.then */
@@ -22592,7 +36982,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:5864:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6015:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEXPARGS__V43*/
meltfptr[42]),
@@ -22608,7 +36998,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5863:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6014:/ cond.else");
/*^block */
/*anyblock */
@@ -22619,7 +37009,7 @@ lab_endgetargs:;
( /*_.CURFILL__V70*/
meltfptr[55]),
(melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->tabval[7])));;
- MELT_LOCATION ("warmelt-normatch.melt:5866:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6017:/ cond");
/*cond */ if ( /*_#IS_A__L34*/ meltfnum[33]) /*then */
{
/*^cond.then */
@@ -22628,7 +37018,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5867:/ quasiblock");
+ ("warmelt-normatch.melt:6018:/ quasiblock");
/*_.NFILL__V79*/ meltfptr[78] =
@@ -22639,7 +37029,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ cppif.then");
+ ("warmelt-normatch.melt:6020:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22664,7 +37054,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;;
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ cond");
+ ("warmelt-normatch.melt:6020:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[34]) /*then */
{
/*^cond.then */
@@ -22676,7 +37066,7 @@ lab_endgetargs:;
=
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ apply");
+ ("warmelt-normatch.melt:6020:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -22689,7 +37079,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5869;
+ argtab[2].meltbp_long = 6020;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normfillmatch_cmatcher nfill";
@@ -22717,7 +37107,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ clear");
+ ("warmelt-normatch.melt:6020:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L36*/
meltfnum[35] = 0;
/*^clear */
@@ -22733,7 +37123,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ quasiblock");
+ ("warmelt-normatch.melt:6020:/ quasiblock");
/*_.PROGN___V83*/ meltfptr[81] =
@@ -22745,7 +37135,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5869:/ clear");
+ ("warmelt-normatch.melt:6020:/ clear");
/*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[34]
= 0;
/*^clear */
@@ -22760,7 +37150,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5870:/ cond");
+ ("warmelt-normatch.melt:6021:/ cond");
/*cond */ if ( /*_.NFILL__V79*/ meltfptr[78]) /*then */
{
/*^cond.then */
@@ -22773,7 +37163,7 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:5871:/ locexp");
+ ("warmelt-normatch.melt:6022:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NEXPARGS__V43*/ meltfptr[42]), ( /*_#NIX__L29*/ meltfnum[17]), (melt_ptr_t) ( /*_.NFILL__V79*/ meltfptr[78]));
}
@@ -22787,7 +37177,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5870:/ cond.else");
+ ("warmelt-normatch.melt:6021:/ cond.else");
/*^block */
/*anyblock */
@@ -22796,7 +37186,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5872:/ cppif.then");
+ ("warmelt-normatch.melt:6023:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22811,7 +37201,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5872:/ cond.else");
+ ("warmelt-normatch.melt:6023:/ cond.else");
/*^block */
/*anyblock */
@@ -22822,7 +37212,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("normfillmatch_cmatcher no nfill"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5872) ? (5872) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("normfillmatch_cmatcher no nfill"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6023) ? (6023) : __LINE__, __FUNCTION__);
;
}
;
@@ -22840,7 +37230,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5872:/ clear");
+ ("warmelt-normatch.melt:6023:/ clear");
/*clear *//*_.IFELSE___V86*/ meltfptr[85]
= 0;
}
@@ -22858,7 +37248,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5870:/ clear");
+ ("warmelt-normatch.melt:6021:/ clear");
/*clear *//*_.IFCPP___V85*/ meltfptr[81] =
0;
}
@@ -22869,7 +37259,7 @@ lab_endgetargs:;
/*_.IFELSE___V84*/ meltfptr[80];;
MELT_LOCATION
- ("warmelt-normatch.melt:5867:/ clear");
+ ("warmelt-normatch.melt:6018:/ clear");
/*clear *//*_.NFILL__V79*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.IFCPP___V80*/ meltfptr[79] = 0;
@@ -22880,7 +37270,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5866:/ clear");
+ ("warmelt-normatch.melt:6017:/ clear");
/*clear *//*_.LET___V78*/ meltfptr[77] = 0;
}
;
@@ -22895,7 +37285,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:5875:/ cppif.then");
+ ("warmelt-normatch.melt:6026:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -22910,7 +37300,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:5875:/ cond.else");
+ ("warmelt-normatch.melt:6026:/ cond.else");
/*^block */
/*anyblock */
@@ -22921,7 +37311,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("unexpected curfull normfillmatch_cmatcher"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (5875) ? (5875) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("unexpected curfull normfillmatch_cmatcher"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6026) ? (6026) : __LINE__, __FUNCTION__);
;
}
;
@@ -22939,7 +37329,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5875:/ clear");
+ ("warmelt-normatch.melt:6026:/ clear");
/*clear *//*_.IFELSE___V88*/ meltfptr[81] = 0;
}
@@ -22949,7 +37339,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:5874:/ quasiblock");
+ ("warmelt-normatch.melt:6025:/ quasiblock");
/*_.PROGN___V89*/ meltfptr[78] =
@@ -22961,7 +37351,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:5866:/ clear");
+ ("warmelt-normatch.melt:6017:/ clear");
/*clear *//*_.IFCPP___V87*/ meltfptr[85] = 0;
/*^clear */
/*clear *//*_.PROGN___V89*/ meltfptr[78] = 0;
@@ -22973,7 +37363,7 @@ lab_endgetargs:;
/*_.IFELSE___V77*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5863:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6014:/ clear");
/*clear *//*_#IS_A__L34*/ meltfnum[33] = 0;
/*^clear */
/*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0;
@@ -22985,7 +37375,7 @@ lab_endgetargs:;
/*_.IFELSE___V76*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5860:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6011:/ clear");
/*clear *//*_#__L33*/ meltfnum[25] = 0;
/*^clear */
/*clear *//*_.IFELSE___V76*/ meltfptr[72] = 0;
@@ -22999,7 +37389,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5855:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6006:/ clear");
/*clear *//*_.CURFILL__V70*/ meltfptr[55] = 0;
/*^clear */
/*clear *//*_#NIX__L29*/ meltfnum[17] = 0;
@@ -23013,7 +37403,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23036,7 +37426,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -23046,7 +37436,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L38*/ meltfnum[34] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23057,7 +37447,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5877;
+ argtab[2].meltbp_long = 6028;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normfillmatch_cmatcher return nfillchunk";
@@ -23078,7 +37468,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V92*/ meltfptr[77];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[34] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V92*/ meltfptr[77] = 0;
@@ -23091,7 +37481,7 @@ lab_endgetargs:;
/*_.IF___V91*/ meltfptr[80] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ quasiblock");
/*_.PROGN___V93*/ meltfptr[81] = /*_.IF___V91*/ meltfptr[80];;
@@ -23100,7 +37490,7 @@ lab_endgetargs:;
/*_.IFCPP___V90*/ meltfptr[79] = /*_.PROGN___V93*/ meltfptr[81];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5877:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6028:/ clear");
/*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[35] = 0;
/*^clear */
/*clear *//*_.IF___V91*/ meltfptr[80] = 0;
@@ -23113,11 +37503,11 @@ lab_endgetargs:;
/*_.IFCPP___V90*/ meltfptr[79] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5878:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6029:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NFILLCHUNK__V47*/ meltfptr[46];;
- MELT_LOCATION ("warmelt-normatch.melt:5878:/ putxtraresult");
+ MELT_LOCATION ("warmelt-normatch.melt:6029:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
@@ -23130,7 +37520,7 @@ lab_endgetargs:;
/*finalret */ goto labend_rout;
/*_.LET___V37*/ meltfptr[35] = /*_.RETURN___V94*/ meltfptr[85];;
- MELT_LOCATION ("warmelt-normatch.melt:5818:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:5969:/ clear");
/*clear *//*_.EXPFILL__V38*/ meltfptr[37] = 0;
/*^clear */
/*clear *//*_.MATSTATE__V39*/ meltfptr[38] = 0;
@@ -23168,11 +37558,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V90*/ meltfptr[79] = 0;
/*^clear */
/*clear *//*_.RETURN___V94*/ meltfptr[85] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V37*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -23207,14 +37597,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER */
+} /*end meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -23239,7 +37629,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER_st
+ struct frame_meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -23278,7 +37668,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -23310,7 +37700,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23333,7 +37723,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23343,7 +37733,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23353,7 +37743,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5886;
+ argtab[2].meltbp_long = 6037;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher step";
/*^apply.arg */
@@ -23372,7 +37762,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -23385,7 +37775,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -23394,7 +37784,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5886:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6037:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -23409,7 +37799,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5887:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6038:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23417,7 +37807,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST_MATCHER */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:5887:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6038:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23425,7 +37815,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5887:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6038:/ cond.else");
/*^block */
/*anyblock */
@@ -23439,7 +37829,7 @@ lab_endgetargs:;
melt_assert_failed (("check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5887) ? (5887) : __LINE__, __FUNCTION__);
+ (6038) ? (6038) : __LINE__, __FUNCTION__);
;
}
;
@@ -23454,7 +37844,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5887:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6038:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0;
@@ -23467,7 +37857,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5888:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6039:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23475,7 +37865,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:5888:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6039:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23483,7 +37873,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5888:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6039:/ cond.else");
/*^block */
/*anyblock */
@@ -23497,7 +37887,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5888) ? (5888) : __LINE__, __FUNCTION__);
+ (6039) ? (6039) : __LINE__, __FUNCTION__);
;
}
;
@@ -23512,7 +37902,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5888:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6039:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0;
@@ -23523,7 +37913,7 @@ lab_endgetargs:;
/*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5889:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6040:/ quasiblock");
/*^getslot */
@@ -23543,12 +37933,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5889:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6040:/ cond.else");
/*_.NSLOC__V15*/ meltfptr[14] = /*_.SLOC__V4*/ meltfptr[3];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5890:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6041:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
@@ -23556,7 +37946,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5891:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6042:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
@@ -23564,7 +37954,7 @@ lab_endgetargs:;
meltfptr[16] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5892:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6043:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
@@ -23572,7 +37962,7 @@ lab_endgetargs:;
meltfptr[17] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5893:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6044:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 4, "MSTEP_INDEX");
@@ -23580,7 +37970,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5894:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6045:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 6, "MSTMA_MATCHER");
@@ -23588,7 +37978,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5895:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6046:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 8, "MSTMA_INS");
@@ -23596,7 +37986,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5896:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6047:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 9, "MSTMA_OUTS");
@@ -23604,7 +37994,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:5897:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6048:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 9, "MATNORX_MATCHCTXT");
@@ -23614,7 +38004,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23637,7 +38027,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23647,7 +38037,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23657,7 +38047,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5899;
+ argtab[2].meltbp_long = 6050;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher matdata";
/*^apply.arg */
@@ -23677,7 +38067,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
@@ -23690,7 +38080,7 @@ lab_endgetargs:;
/*_.IF___V25*/ meltfptr[24] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ quasiblock");
/*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
@@ -23699,7 +38089,7 @@ lab_endgetargs:;
/*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5899:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6050:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V25*/ meltfptr[24] = 0;
@@ -23714,7 +38104,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23737,7 +38127,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23747,7 +38137,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23757,7 +38147,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5900;
+ argtab[2].meltbp_long = 6051;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher mins";
/*^apply.arg */
@@ -23777,7 +38167,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0;
@@ -23790,7 +38180,7 @@ lab_endgetargs:;
/*_.IF___V29*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[25];;
@@ -23799,7 +38189,7 @@ lab_endgetargs:;
/*_.IFCPP___V28*/ meltfptr[24] = /*_.PROGN___V31*/ meltfptr[29];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5900:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6051:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V29*/ meltfptr[25] = 0;
@@ -23814,7 +38204,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23837,7 +38227,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -23847,7 +38237,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23858,7 +38248,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5901;
+ argtab[2].meltbp_long = 6052;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher mouts";
/*^apply.arg */
@@ -23878,7 +38268,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V34*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V34*/ meltfptr[33] = 0;
@@ -23891,7 +38281,7 @@ lab_endgetargs:;
/*_.IF___V33*/ meltfptr[29] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ quasiblock");
/*_.PROGN___V35*/ meltfptr[33] = /*_.IF___V33*/ meltfptr[29];;
@@ -23900,7 +38290,7 @@ lab_endgetargs:;
/*_.IFCPP___V32*/ meltfptr[25] = /*_.PROGN___V35*/ meltfptr[33];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5901:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6052:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V33*/ meltfptr[29] = 0;
@@ -23915,7 +38305,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -23938,7 +38328,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -23948,7 +38338,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -23959,7 +38349,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5902;
+ argtab[2].meltbp_long = 6053;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher matmatcher";
/*^apply.arg */
@@ -23979,7 +38369,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0;
@@ -23992,7 +38382,7 @@ lab_endgetargs:;
/*_.IF___V37*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ quasiblock");
/*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[33];;
@@ -24001,7 +38391,7 @@ lab_endgetargs:;
/*_.IFCPP___V36*/ meltfptr[29] = /*_.PROGN___V39*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5902:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6053:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V37*/ meltfptr[33] = 0;
@@ -24016,7 +38406,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5903:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6054:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24026,7 +38416,7 @@ lab_endgetargs:;
( /*_.MATMATCHER__V20*/ meltfptr[19]),
(melt_ptr_t) (( /*!CLASS_ANY_MATCHER */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:5903:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6054:/ cond");
/*cond */ if ( /*_#IS_A__L13*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24034,7 +38424,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5903:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6054:/ cond.else");
/*^block */
/*anyblock */
@@ -24048,7 +38438,7 @@ lab_endgetargs:;
melt_assert_failed (("check matmatcher"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5903) ? (5903) : __LINE__, __FUNCTION__);
+ (6054) ? (6054) : __LINE__, __FUNCTION__);
;
}
;
@@ -24063,7 +38453,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[33] = /*_.IFELSE___V41*/ meltfptr[37];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5903:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6054:/ clear");
/*clear *//*_#IS_A__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0;
@@ -24074,10 +38464,10 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5904:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6055:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:5905:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6056:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -24092,7 +38482,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5906:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6057:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -24107,7 +38497,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5907:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6058:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -24122,7 +38512,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5908:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6059:/ quasiblock");
/*^rawallocobj */
@@ -24147,7 +38537,7 @@ lab_endgetargs:;
( /*_.NTHEN__V43*/ meltfptr[42]), "NMJMP_LABEL");
;
/*_.JUMPTHEN__V46*/ meltfptr[45] = /*_.INST__V47*/ meltfptr[46];;
- MELT_LOCATION ("warmelt-normatch.melt:5910:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6061:/ quasiblock");
/*^rawallocobj */
@@ -24172,7 +38562,7 @@ lab_endgetargs:;
( /*_.NELSE__V44*/ meltfptr[43]), "NMJMP_LABEL");
;
/*_.JUMPELSE__V48*/ meltfptr[47] = /*_.INST__V49*/ meltfptr[48];;
- MELT_LOCATION ("warmelt-normatch.melt:5912:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6063:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -24190,7 +38580,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5913:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6064:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -24208,8 +38598,13 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5914:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6065:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24227,8 +38622,13 @@ lab_endgetargs:;
/*_.AMIN__V52*/ meltfptr[51] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5915:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6066:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24246,8 +38646,13 @@ lab_endgetargs:;
/*_.AMBIND__V53*/ meltfptr[52] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5916:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6067:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_ANY_MATCHER */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24265,8 +38670,13 @@ lab_endgetargs:;
/*_.AMOUT__V54*/ meltfptr[53] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5917:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATCTX__V23*/ meltfptr[22]), (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6068:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATCTX__V23*/ meltfptr[22]),
+ (melt_ptr_t) (( /*!CLASS_MATCHING_CONTEXT */ meltfrout->tabval[8])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -24284,7 +38694,7 @@ lab_endgetargs:;
/*_.ENV__V55*/ meltfptr[54] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5918:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6069:/ apply");
/*apply */
{
/*_.NEWENV__V56*/ meltfptr[55] =
@@ -24309,7 +38719,7 @@ lab_endgetargs:;
( /*_#NBMOUTS__L14*/ meltfnum[0])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24332,7 +38742,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24342,7 +38752,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24353,7 +38763,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5923;
+ argtab[2].meltbp_long = 6074;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher njthen";
/*^apply.arg */
@@ -24373,7 +38783,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[60] = 0;
@@ -24386,7 +38796,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[59] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[60] = /*_.IF___V60*/ meltfptr[59];;
@@ -24395,7 +38805,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[58] = /*_.PROGN___V62*/ meltfptr[60];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5923:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6074:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[59] = 0;
@@ -24410,7 +38820,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24433,7 +38843,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24443,7 +38853,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24454,7 +38864,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5924;
+ argtab[2].meltbp_long = 6075;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher njelse";
/*^apply.arg */
@@ -24474,7 +38884,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V65*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] = 0;
@@ -24487,7 +38897,7 @@ lab_endgetargs:;
/*_.IF___V64*/ meltfptr[60] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ quasiblock");
/*_.PROGN___V66*/ meltfptr[64] = /*_.IF___V64*/ meltfptr[60];;
@@ -24496,7 +38906,7 @@ lab_endgetargs:;
/*_.IFCPP___V63*/ meltfptr[59] = /*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5924:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6075:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V64*/ meltfptr[60] = 0;
@@ -24511,7 +38921,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24534,7 +38944,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24544,7 +38954,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24555,7 +38965,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5925;
+ argtab[2].meltbp_long = 6076;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher ndata";
/*^apply.arg */
@@ -24575,7 +38985,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V69*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V69*/ meltfptr[68] = 0;
@@ -24588,7 +38998,7 @@ lab_endgetargs:;
/*_.IF___V68*/ meltfptr[64] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ quasiblock");
/*_.PROGN___V70*/ meltfptr[68] = /*_.IF___V68*/ meltfptr[64];;
@@ -24597,7 +39007,7 @@ lab_endgetargs:;
/*_.IFCPP___V67*/ meltfptr[60] = /*_.PROGN___V70*/ meltfptr[68];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5925:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6076:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V68*/ meltfptr[64] = 0;
@@ -24612,7 +39022,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24635,7 +39045,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24645,7 +39055,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24656,7 +39066,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5926;
+ argtab[2].meltbp_long = 6077;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher ambind";
/*^apply.arg */
@@ -24676,7 +39086,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0;
@@ -24689,7 +39099,7 @@ lab_endgetargs:;
/*_.IF___V72*/ meltfptr[68] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ quasiblock");
/*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[68];;
@@ -24698,7 +39108,7 @@ lab_endgetargs:;
/*_.IFCPP___V71*/ meltfptr[64] = /*_.PROGN___V74*/ meltfptr[72];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5926:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6077:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V72*/ meltfptr[68] = 0;
@@ -24713,7 +39123,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24736,7 +39146,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24746,7 +39156,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24757,7 +39167,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5927;
+ argtab[2].meltbp_long = 6078;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher amin";
/*^apply.arg */
@@ -24777,7 +39187,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V77*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V77*/ meltfptr[76] = 0;
@@ -24790,7 +39200,7 @@ lab_endgetargs:;
/*_.IF___V76*/ meltfptr[72] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ quasiblock");
/*_.PROGN___V78*/ meltfptr[76] = /*_.IF___V76*/ meltfptr[72];;
@@ -24799,7 +39209,7 @@ lab_endgetargs:;
/*_.IFCPP___V75*/ meltfptr[68] = /*_.PROGN___V78*/ meltfptr[76];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5927:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6078:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V76*/ meltfptr[72] = 0;
@@ -24814,7 +39224,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24837,7 +39247,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -24847,7 +39257,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24858,7 +39268,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5928;
+ argtab[2].meltbp_long = 6079;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher mins again";
/*^apply.arg */
@@ -24878,7 +39288,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V81*/ meltfptr[80] = 0;
@@ -24891,7 +39301,7 @@ lab_endgetargs:;
/*_.IF___V80*/ meltfptr[76] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ quasiblock");
/*_.PROGN___V82*/ meltfptr[80] = /*_.IF___V80*/ meltfptr[76];;
@@ -24900,7 +39310,7 @@ lab_endgetargs:;
/*_.IFCPP___V79*/ meltfptr[72] = /*_.PROGN___V82*/ meltfptr[80];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5928:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6079:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IF___V80*/ meltfptr[76] = 0;
@@ -24915,7 +39325,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -24938,7 +39348,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -24948,7 +39358,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[15] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -24959,7 +39369,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5929;
+ argtab[2].meltbp_long = 6080;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher matctx";
/*^apply.arg */
@@ -24979,7 +39389,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V85*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V85*/ meltfptr[84] = 0;
@@ -24992,7 +39402,7 @@ lab_endgetargs:;
/*_.IF___V84*/ meltfptr[80] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ quasiblock");
/*_.PROGN___V86*/ meltfptr[84] = /*_.IF___V84*/ meltfptr[80];;
@@ -25001,7 +39411,7 @@ lab_endgetargs:;
/*_.IFCPP___V83*/ meltfptr[76] = /*_.PROGN___V86*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5929:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6080:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V84*/ meltfptr[80] = 0;
@@ -25016,7 +39426,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5930:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6081:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25025,7 +39435,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V55*/ meltfptr[54]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[12])));;
- MELT_LOCATION ("warmelt-normatch.melt:5930:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6081:/ cond");
/*cond */ if ( /*_#IS_A__L29*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -25033,7 +39443,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5930:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6081:/ cond.else");
/*^block */
/*anyblock */
@@ -25047,7 +39457,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5930) ? (5930) : __LINE__, __FUNCTION__);
+ (6081) ? (6081) : __LINE__, __FUNCTION__);
;
}
;
@@ -25062,7 +39472,7 @@ lab_endgetargs:;
/*_.IFCPP___V87*/ meltfptr[80] = /*_.IFELSE___V88*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5930:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6081:/ clear");
/*clear *//*_#IS_A__L29*/ meltfnum[15] = 0;
/*^clear */
/*clear *//*_.IFELSE___V88*/ meltfptr[84] = 0;
@@ -25075,7 +39485,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5932:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6083:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25084,7 +39494,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.AMBIND__V53*/ meltfptr[52]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:5932:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6083:/ cond");
/*cond */ if ( /*_#IS_A__L30*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25092,7 +39502,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5932:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6083:/ cond.else");
/*^block */
/*anyblock */
@@ -25106,7 +39516,7 @@ lab_endgetargs:;
melt_assert_failed (("check ambind"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (5932) ? (5932) : __LINE__, __FUNCTION__);
+ (6083) ? (6083) : __LINE__, __FUNCTION__);
;
}
;
@@ -25121,7 +39531,7 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[84] = /*_.IFELSE___V90*/ meltfptr[89];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5932:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6083:/ clear");
/*clear *//*_#IS_A__L30*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V90*/ meltfptr[89] = 0;
@@ -25132,11 +39542,16 @@ lab_endgetargs:;
/*_.IFCPP___V89*/ meltfptr[84] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5933:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6084:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.AMBIND__V53*/ meltfptr[52]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.AMBIND__V53*/ meltfptr[52]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25154,8 +39569,13 @@ lab_endgetargs:;
/*_.AMBINDER__V92*/ meltfptr[91] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5934:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.AMBIND__V53*/ meltfptr[52]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6085:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.AMBIND__V53*/ meltfptr[52]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25173,7 +39593,7 @@ lab_endgetargs:;
/*_.AMCTYPE__V93*/ meltfptr[92] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5935:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:6086:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -25187,7 +39607,7 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5936:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6087:/ quasiblock");
/*^rawallocobj */
@@ -25244,7 +39664,7 @@ lab_endgetargs:;
/*_#__L31*/ meltfnum[15] =
(( /*_.AMCTYPE__V93*/ meltfptr[92]) !=
( /*_.DATCTYPE__V94*/ meltfptr[93]));;
- MELT_LOCATION ("warmelt-normatch.melt:5942:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6093:/ cond");
/*cond */ if ( /*_#__L31*/ meltfnum[15]) /*then */
{
/*^cond.then */
@@ -25252,8 +39672,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5945:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6096:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25273,15 +39699,21 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5944:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6095:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.NSLOC__V15*/ meltfptr[14]),
("invalid matched data ctype in matcher"),
(melt_ptr_t) ( /*_.NAMED_NAME__V98*/
meltfptr[97]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5947:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.AMCTYPE__V93*/ meltfptr[92]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6098:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.AMCTYPE__V93*/
+ meltfptr[92]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25301,7 +39733,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5946:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6097:/ locexp");
melt_warning_str (0,
(melt_ptr_t) ( /*_.NSLOC__V15*/ meltfptr[14]),
("expected matched data ctype"),
@@ -25309,8 +39741,14 @@ lab_endgetargs:;
meltfptr[98]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5949:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DATCTYPE__V94*/ meltfptr[93]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6100:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DATCTYPE__V94*/
+ meltfptr[93]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25330,7 +39768,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5948:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6099:/ locexp");
melt_warning_str (0,
(melt_ptr_t) ( /*_.NSLOC__V15*/ meltfptr[14]),
("actual matched data ctype"),
@@ -25338,12 +39776,12 @@ lab_endgetargs:;
meltfptr[99]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5943:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6094:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5942:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6093:/ clear");
/*clear *//*_.NAMED_NAME__V98*/ meltfptr[97] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V99*/ meltfptr[98] = 0;
@@ -25359,7 +39797,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5951:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6102:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -25378,7 +39816,7 @@ lab_endgetargs:;
/*_.IFELSE___V97*/ meltfptr[96] = /*_.PUT_ENV__V101*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5942:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6093:/ clear");
/*clear *//*_.PUT_ENV__V101*/ meltfptr[97] = 0;
}
;
@@ -25386,7 +39824,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25409,7 +39847,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -25419,7 +39857,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25430,7 +39868,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5953;
+ argtab[2].meltbp_long = 6104;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher newambinding";
/*^apply.arg */
@@ -25450,7 +39888,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V104*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[32] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V104*/ meltfptr[97] = 0;
@@ -25463,7 +39901,7 @@ lab_endgetargs:;
/*_.IF___V103*/ meltfptr[99] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ quasiblock");
/*_.PROGN___V105*/ meltfptr[97] = /*_.IF___V103*/ meltfptr[99];;
@@ -25472,7 +39910,7 @@ lab_endgetargs:;
/*_.IFCPP___V102*/ meltfptr[98] = /*_.PROGN___V105*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5953:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6104:/ clear");
/*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V103*/ meltfptr[99] = 0;
@@ -25487,7 +39925,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5954:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6105:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.NEWBINDLIST__V57*/ meltfptr[56]),
(melt_ptr_t) ( /*_.NEWAMBINDING__V95*/
meltfptr[94]));
@@ -25504,7 +39942,7 @@ lab_endgetargs:;
/*_#I__L36*/ meltfnum[35] =
(( /*_#MULTIPLE_LENGTH__L34*/ meltfnum[32]) !=
( /*_#MULTIPLE_LENGTH__L35*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:5956:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6107:/ cond");
/*cond */ if ( /*_#I__L36*/ meltfnum[35]) /*then */
{
/*^cond.then */
@@ -25512,8 +39950,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5959:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6110:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25533,7 +39977,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5957:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6108:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.NSLOC__V15*/ meltfptr[14]),
("mismatch on input arity of matcher"),
(melt_ptr_t) ( /*_.NAMED_NAME__V106*/
@@ -25542,7 +39986,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5956:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6107:/ clear");
/*clear *//*_.NAMED_NAME__V106*/ meltfptr[99] = 0;
}
;
@@ -25564,14 +40008,14 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:5964:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6115:/ quasiblock");
/*_.CURINS__V108*/ meltfptr[99] =
(melt_multiple_nth
((melt_ptr_t) ( /*_.MINS__V21*/ meltfptr[20]),
( /*_#MINIX__L37*/ meltfnum[36])));;
- MELT_LOCATION ("warmelt-normatch.melt:5965:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:6116:/ msend");
/*msend */
{
union meltparam_un argtab[1];
@@ -25586,8 +40030,14 @@ lab_endgetargs:;
argtab, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5966:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMIN__V107*/ meltfptr[97]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[13])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6117:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMIN__V107*/
+ meltfptr[97]),
+ (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[13])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25605,8 +40055,14 @@ lab_endgetargs:;
/*_.CURMINTYPE__V110*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5967:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMIN__V107*/ meltfptr[97]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6118:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMIN__V107*/
+ meltfptr[97]),
+ (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[14])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -25626,7 +40082,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25649,7 +40105,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -25659,7 +40115,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25670,7 +40126,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5969;
+ argtab[2].meltbp_long = 6120;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher curmin";
/*^apply.arg */
@@ -25691,7 +40147,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V114*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V114*/ meltfptr[113] = 0;
@@ -25704,7 +40160,7 @@ lab_endgetargs:;
/*_.IF___V113*/ meltfptr[112] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ quasiblock");
/*_.PROGN___V115*/ meltfptr[113] = /*_.IF___V113*/ meltfptr[112];;
@@ -25714,7 +40170,7 @@ lab_endgetargs:;
/*_.PROGN___V115*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5969:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6120:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V113*/ meltfptr[112] = 0;
@@ -25729,7 +40185,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25752,7 +40208,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -25762,7 +40218,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L41*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25773,7 +40229,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5970;
+ argtab[2].meltbp_long = 6121;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher curins";
/*^apply.arg */
@@ -25794,7 +40250,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V118*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V118*/ meltfptr[117] = 0;
@@ -25807,7 +40263,7 @@ lab_endgetargs:;
/*_.IF___V117*/ meltfptr[113] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ quasiblock");
/*_.PROGN___V119*/ meltfptr[117] = /*_.IF___V117*/ meltfptr[113];;
@@ -25817,7 +40273,7 @@ lab_endgetargs:;
/*_.PROGN___V119*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5970:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6121:/ clear");
/*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V117*/ meltfptr[113] = 0;
@@ -25832,7 +40288,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25855,7 +40311,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L42*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -25865,7 +40321,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L43*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -25876,7 +40332,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5971;
+ argtab[2].meltbp_long = 6122;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher curctype";
@@ -25898,7 +40354,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V122*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L43*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V122*/ meltfptr[121] = 0;
@@ -25911,7 +40367,7 @@ lab_endgetargs:;
/*_.IF___V121*/ meltfptr[117] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ quasiblock");
/*_.PROGN___V123*/ meltfptr[121] = /*_.IF___V121*/ meltfptr[117];;
@@ -25921,7 +40377,7 @@ lab_endgetargs:;
/*_.PROGN___V123*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5971:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6122:/ clear");
/*clear *//*_#MELT_NEED_DBG__L42*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V121*/ meltfptr[117] = 0;
@@ -25936,7 +40392,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5972:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6123:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -25946,7 +40402,7 @@ lab_endgetargs:;
( /*_.CURMIN__V107*/ meltfptr[97]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:5972:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6123:/ cond");
/*cond */ if ( /*_#IS_A__L44*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -25954,7 +40410,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:5972:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6123:/ cond.else");
/*^block */
/*anyblock */
@@ -25968,7 +40424,7 @@ lab_endgetargs:;
melt_assert_failed (("check curmin"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (5972) ? (5972) : __LINE__,
+ __FILE__, (6123) ? (6123) : __LINE__,
__FUNCTION__);
;
}
@@ -25985,7 +40441,7 @@ lab_endgetargs:;
/*_.IFELSE___V125*/ meltfptr[121];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5972:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6123:/ clear");
/*clear *//*_#IS_A__L44*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IFELSE___V125*/ meltfptr[121] = 0;
@@ -26001,7 +40457,7 @@ lab_endgetargs:;
/*_#__L45*/ meltfnum[37] =
(( /*_.CURMINTYPE__V110*/ meltfptr[109]) !=
( /*_.CURCTYPE__V109*/ meltfptr[108]));;
- MELT_LOCATION ("warmelt-normatch.melt:5973:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6124:/ cond");
/*cond */ if ( /*_#__L45*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -26009,8 +40465,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:5976:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6127:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26030,7 +40492,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5975:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6126:/ locexp");
melt_error_str ((melt_ptr_t)
( /*_.NSLOC__V15*/ meltfptr[14]),
("mismatched input data in matcher"),
@@ -26038,8 +40500,14 @@ lab_endgetargs:;
meltfptr[121]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5978:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMINBINDER__V111*/ meltfptr[110]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6129:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMINBINDER__V111*/
+ meltfptr[110]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26059,7 +40527,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5977:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6128:/ locexp");
melt_warning_str (0,
(melt_ptr_t) ( /*_.NSLOC__V15*/
meltfptr[14]),
@@ -26068,8 +40536,14 @@ lab_endgetargs:;
meltfptr[126]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5980:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURCTYPE__V109*/ meltfptr[108]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6131:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURCTYPE__V109*/
+ meltfptr[108]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26089,7 +40563,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5979:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6130:/ locexp");
melt_warning_str (0,
(melt_ptr_t) ( /*_.NSLOC__V15*/
meltfptr[14]),
@@ -26098,8 +40572,14 @@ lab_endgetargs:;
meltfptr[127]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5982:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMINTYPE__V110*/ meltfptr[109]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6133:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMINTYPE__V110*/
+ meltfptr[109]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26119,7 +40599,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5981:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6132:/ locexp");
melt_warning_str (0,
(melt_ptr_t) ( /*_.NSLOC__V15*/
meltfptr[14]),
@@ -26128,12 +40608,12 @@ lab_endgetargs:;
meltfptr[128]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5974:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6125:/ quasiblock");
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5973:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6124:/ clear");
/*clear *//*_.NAMED_NAME__V126*/ meltfptr[121] = 0;
/*^clear */
/*clear *//*_.NAMED_NAME__V127*/ meltfptr[126] = 0;
@@ -26145,7 +40625,7 @@ lab_endgetargs:;
;
} /*noelse */
;
- MELT_LOCATION ("warmelt-normatch.melt:5984:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6135:/ quasiblock");
/*^quasiblock */
@@ -26205,7 +40685,7 @@ lab_endgetargs:;
/*_.INST__V131*/ meltfptr[126];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26228,7 +40708,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L46*/ meltfnum[38]) /*then */
{
/*^cond.then */
@@ -26238,7 +40718,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L47*/ meltfnum[46] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26249,7 +40729,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5990;
+ argtab[2].meltbp_long = 6141;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher newbinding";
@@ -26271,7 +40751,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V134*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L47*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V134*/ meltfptr[133] = 0;
@@ -26284,7 +40764,7 @@ lab_endgetargs:;
/*_.IF___V133*/ meltfptr[128] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ quasiblock");
/*_.PROGN___V135*/ meltfptr[133] = /*_.IF___V133*/ meltfptr[128];;
@@ -26294,7 +40774,7 @@ lab_endgetargs:;
/*_.PROGN___V135*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5990:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6141:/ clear");
/*clear *//*_#MELT_NEED_DBG__L46*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.IF___V133*/ meltfptr[128] = 0;
@@ -26307,7 +40787,7 @@ lab_endgetargs:;
/*_.IFCPP___V132*/ meltfptr[127] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:5991:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6142:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -26325,7 +40805,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:5992:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6143:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.NEWBINDLIST__V57*/ meltfptr[56]),
(melt_ptr_t) ( /*_.NEWBINDING__V130*/
@@ -26333,14 +40813,14 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5984:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6135:/ clear");
/*clear *//*_.NEWBINDING__V130*/ meltfptr[121] = 0;
/*^clear */
/*clear *//*_.IFCPP___V132*/ meltfptr[127] = 0;
/*^clear */
/*clear *//*_.PUT_ENV__V136*/ meltfptr[128] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5964:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6115:/ clear");
/*clear *//*_.CURINS__V108*/ meltfptr[99] = 0;
/*^clear */
/*clear *//*_.CURCTYPE__V109*/ meltfptr[108] = 0;
@@ -26364,7 +40844,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:5961:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6112:/ clear");
/*clear *//*_.CURMIN__V107*/ meltfptr[97] = 0;
/*^clear */
/*clear *//*_#MINIX__L37*/ meltfnum[36] = 0;
@@ -26372,7 +40852,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26395,7 +40875,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L48*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -26405,7 +40885,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L49*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26416,7 +40896,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5995;
+ argtab[2].meltbp_long = 6146;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher newbindlist";
/*^apply.arg */
@@ -26436,7 +40916,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V139*/ meltfptr[127];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L49*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V139*/ meltfptr[127] = 0;
@@ -26449,7 +40929,7 @@ lab_endgetargs:;
/*_.IF___V138*/ meltfptr[121] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ quasiblock");
/*_.PROGN___V140*/ meltfptr[128] = /*_.IF___V138*/ meltfptr[121];;
@@ -26458,7 +40938,7 @@ lab_endgetargs:;
/*_.IFCPP___V137*/ meltfptr[133] = /*_.PROGN___V140*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5995:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6146:/ clear");
/*clear *//*_#MELT_NEED_DBG__L48*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V138*/ meltfptr[121] = 0;
@@ -26473,7 +40953,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26496,7 +40976,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[37]) /*then */
{
/*^cond.then */
@@ -26506,7 +40986,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L51*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26517,7 +40997,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5997;
+ argtab[2].meltbp_long = 6148;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher amout";
/*^apply.arg */
@@ -26537,7 +41017,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V143*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L51*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V143*/ meltfptr[109] = 0;
@@ -26550,7 +41030,7 @@ lab_endgetargs:;
/*_.IF___V142*/ meltfptr[108] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ quasiblock");
/*_.PROGN___V144*/ meltfptr[110] = /*_.IF___V142*/ meltfptr[108];;
@@ -26559,7 +41039,7 @@ lab_endgetargs:;
/*_.IFCPP___V141*/ meltfptr[99] = /*_.PROGN___V144*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5997:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6148:/ clear");
/*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[37] = 0;
/*^clear */
/*clear *//*_.IF___V142*/ meltfptr[108] = 0;
@@ -26574,7 +41054,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26597,7 +41077,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -26607,7 +41087,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L53*/ meltfnum[38] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26618,7 +41098,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 5998;
+ argtab[2].meltbp_long = 6149;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher mouts again";
/*^apply.arg */
@@ -26638,7 +41118,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V147*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L53*/ meltfnum[38] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V147*/ meltfptr[113] = 0;
@@ -26651,7 +41131,7 @@ lab_endgetargs:;
/*_.IF___V146*/ meltfptr[112] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ quasiblock");
/*_.PROGN___V148*/ meltfptr[117] = /*_.IF___V146*/ meltfptr[112];;
@@ -26660,7 +41140,7 @@ lab_endgetargs:;
/*_.IFCPP___V145*/ meltfptr[111] = /*_.PROGN___V148*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5998:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6149:/ clear");
/*clear *//*_#MELT_NEED_DBG__L52*/ meltfnum[46] = 0;
/*^clear */
/*clear *//*_.IF___V146*/ meltfptr[112] = 0;
@@ -26686,7 +41166,7 @@ lab_endgetargs:;
/*_#I__L56*/ meltfnum[46] =
(( /*_#MULTIPLE_LENGTH__L54*/ meltfnum[37]) !=
( /*_#MULTIPLE_LENGTH__L55*/ meltfnum[38]));;
- MELT_LOCATION ("warmelt-normatch.melt:5999:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6150:/ cond");
/*cond */ if ( /*_#I__L56*/ meltfnum[46]) /*then */
{
/*^cond.then */
@@ -26694,8 +41174,14 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6002:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MATMATCHER__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6153:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MATMATCHER__V20*/
+ meltfptr[19]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[17])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -26715,7 +41201,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6000:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6151:/ locexp");
melt_error_str ((melt_ptr_t) ( /*_.NSLOC__V15*/ meltfptr[14]),
("mismatch on output arity of matcher"),
(melt_ptr_t) ( /*_.NAMED_NAME__V149*/
@@ -26724,7 +41210,7 @@ lab_endgetargs:;
;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:5999:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6150:/ clear");
/*clear *//*_.NAMED_NAME__V149*/ meltfptr[127] = 0;
}
;
@@ -26746,7 +41232,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:6006:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6157:/ quasiblock");
/*_.CUROUTS__V151*/ meltfptr[128] =
@@ -26755,7 +41241,7 @@ lab_endgetargs:;
( /*_#MIX__L57*/ meltfnum[56])));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26778,7 +41264,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L58*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -26788,7 +41274,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L59*/ meltfnum[58] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26799,7 +41285,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6008;
+ argtab[2].meltbp_long = 6159;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher curmoutbind";
@@ -26821,7 +41307,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V154*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L59*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V154*/ meltfptr[110] = 0;
@@ -26834,7 +41320,7 @@ lab_endgetargs:;
/*_.IF___V153*/ meltfptr[108] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ quasiblock");
/*_.PROGN___V155*/ meltfptr[113] = /*_.IF___V153*/ meltfptr[108];;
@@ -26844,7 +41330,7 @@ lab_endgetargs:;
/*_.PROGN___V155*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6008:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6159:/ clear");
/*clear *//*_#MELT_NEED_DBG__L58*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IF___V153*/ meltfptr[108] = 0;
@@ -26859,7 +41345,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26882,7 +41368,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L60*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -26892,7 +41378,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L61*/ meltfnum[57] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -26903,7 +41389,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6009;
+ argtab[2].meltbp_long = 6160;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher curouts";
@@ -26925,7 +41411,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V158*/ meltfptr[127];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L61*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V158*/ meltfptr[127] = 0;
@@ -26938,7 +41424,7 @@ lab_endgetargs:;
/*_.IF___V157*/ meltfptr[117] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ quasiblock");
/*_.PROGN___V159*/ meltfptr[110] = /*_.IF___V157*/ meltfptr[117];;
@@ -26948,7 +41434,7 @@ lab_endgetargs:;
/*_.PROGN___V159*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6009:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6160:/ clear");
/*clear *//*_#MELT_NEED_DBG__L60*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IF___V157*/ meltfptr[117] = 0;
@@ -26963,7 +41449,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6010:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6161:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -26973,7 +41459,7 @@ lab_endgetargs:;
( /*_.CURMOUTBIND__V150*/ meltfptr[121]),
(melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */
meltfrout->tabval[13])));;
- MELT_LOCATION ("warmelt-normatch.melt:6010:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6161:/ cond");
/*cond */ if ( /*_#IS_A__L62*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -26981,7 +41467,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6010:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6161:/ cond.else");
/*^block */
/*anyblock */
@@ -26995,7 +41481,7 @@ lab_endgetargs:;
melt_assert_failed (("check curmoutbind"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6010) ? (6010) : __LINE__,
+ __FILE__, (6161) ? (6161) : __LINE__,
__FUNCTION__);
;
}
@@ -27012,7 +41498,7 @@ lab_endgetargs:;
/*_.IFELSE___V161*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6010:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6161:/ clear");
/*clear *//*_#IS_A__L62*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IFELSE___V161*/ meltfptr[113] = 0;
@@ -27025,7 +41511,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6011:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6162:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27035,7 +41521,7 @@ lab_endgetargs:;
( /*_.CUROUTS__V151*/ meltfptr[128]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[19])));;
- MELT_LOCATION ("warmelt-normatch.melt:6011:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6162:/ cond");
/*cond */ if ( /*_#IS_A__L63*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -27043,7 +41529,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6011:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6162:/ cond.else");
/*^block */
/*anyblock */
@@ -27057,7 +41543,7 @@ lab_endgetargs:;
melt_assert_failed (("check curouts"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6011) ? (6011) : __LINE__,
+ __FILE__, (6162) ? (6162) : __LINE__,
__FUNCTION__);
;
}
@@ -27074,7 +41560,7 @@ lab_endgetargs:;
/*_.IFELSE___V163*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6011:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6162:/ clear");
/*clear *//*_#IS_A__L63*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IFELSE___V163*/ meltfptr[117] = 0;
@@ -27085,7 +41571,7 @@ lab_endgetargs:;
/*_.IFCPP___V162*/ meltfptr[127] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6012:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6163:/ quasiblock");
/*^apply */
@@ -27107,7 +41593,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27130,7 +41616,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L64*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -27140,7 +41626,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L65*/ meltfnum[58] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27151,7 +41637,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6014;
+ argtab[2].meltbp_long = 6165;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher nouts";
/*^apply.arg */
@@ -27172,7 +41658,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V167*/ meltfptr[166];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L65*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V167*/ meltfptr[166] = 0;
@@ -27185,7 +41671,7 @@ lab_endgetargs:;
/*_.IF___V166*/ meltfptr[117] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ quasiblock");
/*_.PROGN___V168*/ meltfptr[166] = /*_.IF___V166*/ meltfptr[117];;
@@ -27195,7 +41681,7 @@ lab_endgetargs:;
/*_.PROGN___V168*/ meltfptr[166];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6014:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6165:/ clear");
/*clear *//*_#MELT_NEED_DBG__L64*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IF___V166*/ meltfptr[117] = 0;
@@ -27210,7 +41696,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6016:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6167:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27219,7 +41705,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t)
( /*_.NOUTS__V164*/ meltfptr[110]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[20])));;
- MELT_LOCATION ("warmelt-normatch.melt:6016:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6167:/ cond");
/*cond */ if ( /*_#IS_A__L66*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -27227,7 +41713,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6016:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6167:/ cond.else");
/*^block */
/*anyblock */
@@ -27241,7 +41727,7 @@ lab_endgetargs:;
melt_assert_failed (("check nouts"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6016) ? (6016) : __LINE__,
+ __FILE__, (6167) ? (6167) : __LINE__,
__FUNCTION__);
;
}
@@ -27258,7 +41744,7 @@ lab_endgetargs:;
/*_.IFELSE___V170*/ meltfptr[166];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6016:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6167:/ clear");
/*clear *//*_#IS_A__L66*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IFELSE___V170*/ meltfptr[166] = 0;
@@ -27271,7 +41757,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6017:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6168:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.NORMOUTS__V58*/ meltfptr[57]),
( /*_#MIX__L57*/ meltfnum[56]),
@@ -27280,14 +41766,14 @@ lab_endgetargs:;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6012:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6163:/ clear");
/*clear *//*_.NOUTS__V164*/ meltfptr[110] = 0;
/*^clear */
/*clear *//*_.IFCPP___V165*/ meltfptr[113] = 0;
/*^clear */
/*clear *//*_.IFCPP___V169*/ meltfptr[117] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6006:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6157:/ clear");
/*clear *//*_.CUROUTS__V151*/ meltfptr[128] = 0;
/*^clear */
/*clear *//*_.IFCPP___V152*/ meltfptr[109] = 0;
@@ -27303,7 +41789,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6003:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6154:/ clear");
/*clear *//*_.CURMOUTBIND__V150*/ meltfptr[121] = 0;
/*^clear */
/*clear *//*_#MIX__L57*/ meltfnum[56] = 0;
@@ -27311,7 +41797,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27334,7 +41820,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -27344,7 +41830,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L68*/ meltfnum[58] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27355,7 +41841,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6021;
+ argtab[2].meltbp_long = 6172;
/*^apply.arg */
argtab[3].meltbp_cstring = "normstep_mtestmatcher normouts";
/*^apply.arg */
@@ -27375,7 +41861,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V173*/ meltfptr[113];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V173*/ meltfptr[113] = 0;
@@ -27388,7 +41874,7 @@ lab_endgetargs:;
/*_.IF___V172*/ meltfptr[110] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ quasiblock");
/*_.PROGN___V174*/ meltfptr[117] = /*_.IF___V172*/ meltfptr[110];;
@@ -27397,7 +41883,7 @@ lab_endgetargs:;
/*_.IFCPP___V171*/ meltfptr[166] = /*_.PROGN___V174*/ meltfptr[117];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6021:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6172:/ clear");
/*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IF___V172*/ meltfptr[110] = 0;
@@ -27412,7 +41898,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27435,7 +41921,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L69*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -27445,7 +41931,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L70*/ meltfnum[57] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27456,7 +41942,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6024;
+ argtab[2].meltbp_long = 6175;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher matmatcher before normalize_test_matcher";
@@ -27477,7 +41963,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V177*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L70*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V177*/ meltfptr[112] = 0;
@@ -27490,7 +41976,7 @@ lab_endgetargs:;
/*_.IF___V176*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ quasiblock");
/*_.PROGN___V178*/ meltfptr[108] = /*_.IF___V176*/ meltfptr[109];;
@@ -27499,7 +41985,7 @@ lab_endgetargs:;
/*_.IFCPP___V175*/ meltfptr[128] = /*_.PROGN___V178*/ meltfptr[108];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6024:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6175:/ clear");
/*clear *//*_#MELT_NEED_DBG__L69*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IF___V176*/ meltfptr[109] = 0;
@@ -27512,7 +41998,7 @@ lab_endgetargs:;
/*_.IFCPP___V175*/ meltfptr[128] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6025:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6176:/ quasiblock");
/*^multimsend */
@@ -27545,7 +42031,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27568,7 +42054,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L71*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -27578,7 +42064,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L72*/ meltfnum[58] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27589,7 +42075,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6028;
+ argtab[2].meltbp_long = 6179;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher ntest after normalize_test_matcher";
@@ -27610,7 +42096,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V184*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L72*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V184*/ meltfptr[109] = 0;
@@ -27623,7 +42109,7 @@ lab_endgetargs:;
/*_.IF___V183*/ meltfptr[112] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ quasiblock");
/*_.PROGN___V185*/ meltfptr[108] = /*_.IF___V183*/ meltfptr[112];;
@@ -27632,7 +42118,7 @@ lab_endgetargs:;
/*_.IFCPP___V182*/ meltfptr[117] = /*_.PROGN___V185*/ meltfptr[108];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6028:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6179:/ clear");
/*clear *//*_#MELT_NEED_DBG__L71*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IF___V183*/ meltfptr[112] = 0;
@@ -27647,7 +42133,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27670,7 +42156,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L73*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -27680,7 +42166,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L74*/ meltfnum[57] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27691,7 +42177,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6029;
+ argtab[2].meltbp_long = 6180;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher testdata after normalize_test_matcher";
@@ -27712,7 +42198,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V188*/ meltfptr[108];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L74*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V188*/ meltfptr[108] = 0;
@@ -27725,7 +42211,7 @@ lab_endgetargs:;
/*_.IF___V187*/ meltfptr[112] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ quasiblock");
/*_.PROGN___V189*/ meltfptr[108] = /*_.IF___V187*/ meltfptr[112];;
@@ -27734,7 +42220,7 @@ lab_endgetargs:;
/*_.IFCPP___V186*/ meltfptr[109] = /*_.PROGN___V189*/ meltfptr[108];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6029:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6180:/ clear");
/*clear *//*_#MELT_NEED_DBG__L73*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IF___V187*/ meltfptr[112] = 0;
@@ -27747,10 +42233,10 @@ lab_endgetargs:;
/*_.IFCPP___V186*/ meltfptr[109] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6030:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6181:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6032:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:6183:/ msend");
/*msend */
{
union meltparam_un argtab[6];
@@ -27781,7 +42267,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27804,7 +42290,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L75*/ meltfnum[57]) /*then */
{
/*^cond.then */
@@ -27814,7 +42300,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L76*/ meltfnum[58] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -27825,7 +42311,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6035;
+ argtab[2].meltbp_long = 6186;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normstep_mtestmatcher after normalize_fill_matcher nfill";
@@ -27846,7 +42332,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V194*/ meltfptr[193];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L76*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V194*/ meltfptr[193] = 0;
@@ -27859,7 +42345,7 @@ lab_endgetargs:;
/*_.IF___V193*/ meltfptr[192] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ quasiblock");
/*_.PROGN___V195*/ meltfptr[193] = /*_.IF___V193*/ meltfptr[192];;
@@ -27868,7 +42354,7 @@ lab_endgetargs:;
/*_.IFCPP___V192*/ meltfptr[191] = /*_.PROGN___V195*/ meltfptr[193];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6035:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6186:/ clear");
/*clear *//*_#MELT_NEED_DBG__L75*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.IF___V193*/ meltfptr[192] = 0;
@@ -27881,7 +42367,7 @@ lab_endgetargs:;
/*_.IFCPP___V192*/ meltfptr[191] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6036:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6187:/ quasiblock");
/*^blockmultialloc */
@@ -27906,11 +42392,11 @@ lab_endgetargs:;
/*^putuple */
/*putupl#9 */
- melt_assertmsg ("putupl [:6036] #9 checktup",
+ melt_assertmsg ("putupl [:6187] #9 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V198*/ meltfptr[197]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:6036] #9 checkoff",
+ melt_assertmsg ("putupl [:6187] #9 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
@@ -27921,11 +42407,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#10 */
- melt_assertmsg ("putupl [:6036] #10 checktup",
+ melt_assertmsg ("putupl [:6187] #10 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V198*/ meltfptr[197]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:6036] #10 checkoff",
+ melt_assertmsg ("putupl [:6187] #10 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
@@ -27936,11 +42422,11 @@ lab_endgetargs:;
;
/*^putuple */
/*putupl#11 */
- melt_assertmsg ("putupl [:6036] #11 checktup",
+ melt_assertmsg ("putupl [:6187] #11 checktup",
melt_magic_discr ((melt_ptr_t)
( /*_.TUPLREC___V198*/ meltfptr[197]))
== MELTOBMAG_MULTIPLE);
- melt_assertmsg ("putupl [:6036] #11 checkoff",
+ melt_assertmsg ("putupl [:6187] #11 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
@@ -27955,7 +42441,7 @@ lab_endgetargs:;
/*_.RESTUP__V197*/ meltfptr[193] = /*_.TUPLREC___V198*/ meltfptr[197];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6036:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6187:/ clear");
/*clear *//*_.TUPLREC___V198*/ meltfptr[197] = 0;
/*^clear */
/*clear *//*_.TUPLREC___V198*/ meltfptr[197] = 0;
@@ -27963,7 +42449,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -27986,7 +42472,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L77*/ meltfnum[58]) /*then */
{
/*^cond.then */
@@ -27996,7 +42482,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L78*/ meltfnum[57] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28007,7 +42493,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6037;
+ argtab[2].meltbp_long = 6188;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normalize_fill_matcher return restup";
@@ -28028,7 +42514,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V201*/ meltfptr[200];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L78*/ meltfnum[57] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V201*/ meltfptr[200] = 0;
@@ -28041,7 +42527,7 @@ lab_endgetargs:;
/*_.IF___V200*/ meltfptr[199] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ quasiblock");
/*_.PROGN___V202*/ meltfptr[200] = /*_.IF___V200*/ meltfptr[199];;
@@ -28050,7 +42536,7 @@ lab_endgetargs:;
/*_.IFCPP___V199*/ meltfptr[197] = /*_.PROGN___V202*/ meltfptr[200];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6037:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6188:/ clear");
/*clear *//*_#MELT_NEED_DBG__L77*/ meltfnum[58] = 0;
/*^clear */
/*clear *//*_.IF___V200*/ meltfptr[199] = 0;
@@ -28063,16 +42549,16 @@ lab_endgetargs:;
/*_.IFCPP___V199*/ meltfptr[197] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6038:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6189:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.RESTUP__V197*/ meltfptr[193];;
- MELT_LOCATION ("warmelt-normatch.melt:6038:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6189:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V196*/ meltfptr[192] = /*_.RETURN___V203*/ meltfptr[199];;
- MELT_LOCATION ("warmelt-normatch.melt:6036:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6187:/ clear");
/*clear *//*_.RESTUP__V197*/ meltfptr[193] = 0;
/*^clear */
/*clear *//*_.IFCPP___V199*/ meltfptr[197] = 0;
@@ -28080,7 +42566,7 @@ lab_endgetargs:;
/*clear *//*_.RETURN___V203*/ meltfptr[199] = 0;
/*_.LET___V190*/ meltfptr[112] = /*_.LET___V196*/ meltfptr[192];;
- MELT_LOCATION ("warmelt-normatch.melt:6030:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6181:/ clear");
/*clear *//*_.NFILL__V191*/ meltfptr[108] = 0;
/*^clear */
/*clear *//*_.IFCPP___V192*/ meltfptr[191] = 0;
@@ -28088,7 +42574,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V196*/ meltfptr[192] = 0;
/*_.MULTI___V179*/ meltfptr[127] = /*_.LET___V190*/ meltfptr[112];;
- MELT_LOCATION ("warmelt-normatch.melt:6025:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6176:/ clear");
/*clear *//*_.IFCPP___V182*/ meltfptr[117] = 0;
/*^clear */
/*clear *//*_.IFCPP___V186*/ meltfptr[109] = 0;
@@ -28099,7 +42585,7 @@ lab_endgetargs:;
/*clear *//*_.TESTDATA__V181*/ meltfptr[110] = 0;
/*_.LET___V91*/ meltfptr[89] = /*_.MULTI___V179*/ meltfptr[127];;
- MELT_LOCATION ("warmelt-normatch.melt:5933:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6084:/ clear");
/*clear *//*_.AMBINDER__V92*/ meltfptr[91] = 0;
/*^clear */
/*clear *//*_.AMCTYPE__V93*/ meltfptr[92] = 0;
@@ -28139,7 +42625,7 @@ lab_endgetargs:;
/*clear *//*_.MULTI___V179*/ meltfptr[127] = 0;
/*_.LET___V42*/ meltfptr[37] = /*_.LET___V91*/ meltfptr[89];;
- MELT_LOCATION ("warmelt-normatch.melt:5904:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6055:/ clear");
/*clear *//*_.NTHEN__V43*/ meltfptr[42] = 0;
/*^clear */
/*clear *//*_.NELSE__V44*/ meltfptr[43] = 0;
@@ -28191,7 +42677,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V91*/ meltfptr[89] = 0;
/*_.LET___V13*/ meltfptr[11] = /*_.LET___V42*/ meltfptr[37];;
- MELT_LOCATION ("warmelt-normatch.melt:5889:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6040:/ clear");
/*clear *//*_.LOCA_LOCATION__V14*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NSLOC__V15*/ meltfptr[14] = 0;
@@ -28223,11 +42709,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V40*/ meltfptr[33] = 0;
/*^clear */
/*clear *//*_.LET___V42*/ meltfptr[37] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -28252,14 +42738,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER */
+} /*end meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -28284,7 +42770,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP_st
+ struct frame_meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -28323,7 +42809,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ getarg");
/*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -28345,7 +42831,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28368,7 +42854,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28378,7 +42864,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28388,7 +42874,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6046;
+ argtab[2].meltbp_long = 6197;
/*^apply.arg */
argtab[3].meltbp_cstring = "altmatch_normalize_step step";
/*^apply.arg */
@@ -28407,7 +42893,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -28420,7 +42906,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -28429,7 +42915,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6046:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6197:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -28444,7 +42930,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6047:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6198:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28452,7 +42938,7 @@ lab_endgetargs:;
/*_#IS_A__L3*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6047:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6198:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -28460,7 +42946,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6047:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6198:/ cond.else");
/*^block */
/*anyblock */
@@ -28474,7 +42960,7 @@ lab_endgetargs:;
melt_assert_failed (("altmatch_normalize_step check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6047) ? (6047) : __LINE__, __FUNCTION__);
+ (6198) ? (6198) : __LINE__, __FUNCTION__);
;
}
;
@@ -28489,7 +42975,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6047:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6198:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -28504,7 +42990,7 @@ lab_endgetargs:;
/*_#NULL__L4*/ meltfnum[0] =
(( /*_.STEP__V2*/ meltfptr[1]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6049:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6200:/ cond");
/*cond */ if ( /*_#NULL__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -28512,7 +42998,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6050:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6201:/ quasiblock");
/*^getslot */
@@ -28525,7 +43011,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28548,7 +43034,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -28558,7 +43044,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28569,7 +43055,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6052;
+ argtab[2].meltbp_long = 6203;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_step null step so return endlab";
@@ -28591,7 +43077,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -28604,7 +43090,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[13] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
@@ -28613,7 +43099,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6052:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6203:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[13] = 0;
@@ -28626,16 +43112,16 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6053:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6204:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.ENDLAB__V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:6053:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6204:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V11*/ meltfptr[10] = /*_.RETURN___V17*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:6050:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6201:/ clear");
/*clear *//*_.ENDLAB__V12*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0;
@@ -28644,7 +43130,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[5] = /*_.LET___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6049:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6200:/ clear");
/*clear *//*_.LET___V11*/ meltfptr[10] = 0;
}
;
@@ -28657,7 +43143,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6054:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6205:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28666,7 +43152,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:6054:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6205:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -28674,7 +43160,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6054:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6205:/ cond.else");
/*^block */
/*anyblock */
@@ -28688,7 +43174,7 @@ lab_endgetargs:;
melt_assert_failed (("altmatch_normalize_step check step"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6054) ? (6054) : __LINE__, __FUNCTION__);
+ (6205) ? (6205) : __LINE__, __FUNCTION__);
;
}
;
@@ -28703,7 +43189,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[14] = /*_.IFELSE___V19*/ meltfptr[11];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6054:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6205:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IFELSE___V19*/ meltfptr[11] = 0;
@@ -28714,7 +43200,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[14] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6055:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6206:/ quasiblock");
/*^getslot */
@@ -28729,7 +43215,7 @@ lab_endgetargs:;
melt_get_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V21*/ meltfptr[13]),
(meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6057:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6208:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 7, "MATNORX_BODYLIST");
@@ -28737,8 +43223,14 @@ lab_endgetargs:;
meltfptr[11] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6058:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[3])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6209:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -28756,7 +43248,7 @@ lab_endgetargs:;
/*_.SLOC__V24*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6059:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6210:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 6, "MATNORX_MSTEPQUEUE");
@@ -28766,7 +43258,7 @@ lab_endgetargs:;
;
/*_#NULL__L8*/ meltfnum[1] =
(( /*_.NLAB__V22*/ meltfptr[10]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6061:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6212:/ cond");
/*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -28774,10 +43266,10 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6062:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6213:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6063:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6214:/ quasiblock");
/*^rawallocobj */
@@ -28811,7 +43303,7 @@ lab_endgetargs:;
/*_.NEWLAB__V28*/ meltfptr[27] = /*_.INST__V29*/ meltfptr[28];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28834,7 +43326,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -28844,7 +43336,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28855,7 +43347,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6067;
+ argtab[2].meltbp_long = 6218;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_step newlab";
@@ -28877,7 +43369,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -28890,7 +43382,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
@@ -28899,7 +43391,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[29] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6067:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6218:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
@@ -28914,7 +43406,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6068:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6219:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.STEPMAP__V21*/ meltfptr[13]),
(meltobject_ptr_t) ( /*_.STEP__V2*/
@@ -28925,7 +43417,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6069:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6220:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.MSTEPQUEUE__V25*/ meltfptr[24]),
(melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));
@@ -28933,7 +43425,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -28956,7 +43448,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[9]) /*then */
{
/*^cond.then */
@@ -28966,7 +43458,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[5] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -28977,7 +43469,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6070;
+ argtab[2].meltbp_long = 6221;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_step updated mstepqueue";
@@ -28999,7 +43491,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -29012,7 +43504,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[31];;
@@ -29021,7 +43513,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6070:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6221:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[9] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[31] = 0;
@@ -29034,12 +43526,12 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6071:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:6222:/ compute");
/*_.NLAB__V22*/ meltfptr[10] = /*_.SETQ___V38*/ meltfptr[31] =
/*_.NEWLAB__V28*/ meltfptr[27];;
/*_.LET___V27*/ meltfptr[26] = /*_.SETQ___V38*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:6062:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6213:/ clear");
/*clear *//*_.NEWLAB__V28*/ meltfptr[27] = 0;
/*^clear */
/*clear *//*_.IFCPP___V30*/ meltfptr[29] = 0;
@@ -29050,7 +43542,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[25] = /*_.LET___V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6061:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6212:/ clear");
/*clear *//*_.LET___V27*/ meltfptr[26] = 0;
}
;
@@ -29063,7 +43555,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6073:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6224:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29072,7 +43564,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NLAB__V22*/ meltfptr[10]),
(melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:6073:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6224:/ cond");
/*cond */ if ( /*_#IS_A__L13*/ meltfnum[5]) /*then */
{
/*^cond.then */
@@ -29080,7 +43572,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6073:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6224:/ cond.else");
/*^block */
/*anyblock */
@@ -29094,7 +43586,7 @@ lab_endgetargs:;
melt_assert_failed (("check good nlab"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6073) ? (6073) : __LINE__, __FUNCTION__);
+ (6224) ? (6224) : __LINE__, __FUNCTION__);
;
}
;
@@ -29109,7 +43601,7 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[35] = /*_.IFELSE___V40*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6073:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6224:/ clear");
/*clear *//*_#IS_A__L13*/ meltfnum[5] = 0;
/*^clear */
/*clear *//*_.IFELSE___V40*/ meltfptr[27] = 0;
@@ -29120,16 +43612,16 @@ lab_endgetargs:;
/*_.IFCPP___V39*/ meltfptr[35] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6074:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6225:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NLAB__V22*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:6074:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6225:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V20*/ meltfptr[12] = /*_.RETURN___V41*/ meltfptr[29];;
- MELT_LOCATION ("warmelt-normatch.melt:6055:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6206:/ clear");
/*clear *//*_.STEPMAP__V21*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.NLAB__V22*/ meltfptr[10] = 0;
@@ -29147,11 +43639,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V39*/ meltfptr[35] = 0;
/*^clear */
/*clear *//*_.RETURN___V41*/ meltfptr[29] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V20*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -29180,14 +43672,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP */
+} /*end meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -29212,7 +43704,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
#define meltcallcount 0L
#endif
- struct frame_meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA_st
+ struct frame_meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -29251,7 +43743,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ getarg");
/*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -29273,7 +43765,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29296,7 +43788,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -29306,7 +43798,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29316,7 +43808,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6079;
+ argtab[2].meltbp_long = 6230;
/*^apply.arg */
argtab[3].meltbp_cstring = "altmatch_normalize_mdata mdata";
/*^apply.arg */
@@ -29335,7 +43827,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0;
@@ -29348,7 +43840,7 @@ lab_endgetargs:;
/*_.IF___V5*/ meltfptr[4] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ quasiblock");
/*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];;
@@ -29357,7 +43849,7 @@ lab_endgetargs:;
/*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6079:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6230:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V5*/ meltfptr[4] = 0;
@@ -29372,7 +43864,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6080:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6231:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29381,7 +43873,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6080:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6231:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -29389,7 +43881,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6080:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6231:/ cond.else");
/*^block */
/*anyblock */
@@ -29403,7 +43895,7 @@ lab_endgetargs:;
melt_assert_failed (("altmatch_normalize_mdata check mdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6080) ? (6080) : __LINE__, __FUNCTION__);
+ (6231) ? (6231) : __LINE__, __FUNCTION__);
;
}
;
@@ -29418,7 +43910,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6080:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6231:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0;
@@ -29431,7 +43923,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6081:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6232:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29439,7 +43931,7 @@ lab_endgetargs:;
/*_#IS_A__L4*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:6081:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6232:/ cond");
/*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -29447,7 +43939,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6081:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6232:/ cond.else");
/*^block */
/*anyblock */
@@ -29461,7 +43953,7 @@ lab_endgetargs:;
melt_assert_failed (("altmatch_normalize_mdata check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6081) ? (6081) : __LINE__, __FUNCTION__);
+ (6232) ? (6232) : __LINE__, __FUNCTION__);
;
}
;
@@ -29476,7 +43968,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6081:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6232:/ clear");
/*clear *//*_#IS_A__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -29487,7 +43979,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6082:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6233:/ quasiblock");
/*^getslot */
@@ -29503,7 +43995,7 @@ lab_endgetargs:;
( /*_.DATAMAP__V13*/ meltfptr[12]),
(meltobject_ptr_t) ( /*_.MDATA__V2*/
meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6084:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6235:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 5, "MATNORX_MDATAQUEUE");
@@ -29511,7 +44003,7 @@ lab_endgetargs:;
meltfptr[14] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6085:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6236:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V3*/ meltfptr[2]), 7, "MATNORX_BODYLIST");
@@ -29519,7 +44011,7 @@ lab_endgetargs:;
meltfptr[15] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6087:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6238:/ cond");
/*cond */ if ( /*_.NDATA__V14*/ meltfptr[13]) /*then */
{
/*^cond.then */
@@ -29529,7 +44021,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29552,7 +44044,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -29562,7 +44054,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -29573,7 +44065,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6089;
+ argtab[2].meltbp_long = 6240;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_mdata found ndata";
@@ -29595,7 +44087,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
@@ -29608,7 +44100,7 @@ lab_endgetargs:;
/*_.IF___V19*/ meltfptr[18] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ quasiblock");
/*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
@@ -29617,7 +44109,7 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6089:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6240:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V19*/ meltfptr[18] = 0;
@@ -29630,14 +44122,14 @@ lab_endgetargs:;
/*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6090:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6241:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:6090:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6241:/ finalreturn");
;
/*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:6088:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6239:/ quasiblock");
/*_.PROGN___V23*/ meltfptr[19] = /*_.RETURN___V22*/ meltfptr[18];;
@@ -29646,7 +44138,7 @@ lab_endgetargs:;
/*_.IF___V17*/ meltfptr[16] = /*_.PROGN___V23*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6087:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6238:/ clear");
/*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.RETURN___V22*/ meltfptr[18] = 0;
@@ -29667,7 +44159,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCHED_NORMAL_DATA */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:6091:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6242:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -29675,7 +44167,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6093:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6244:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), 3, "MDATA_ORIG");
@@ -29688,7 +44180,7 @@ lab_endgetargs:;
/*_.MDATA_ORIG__V25*/ meltfptr[18];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -29711,7 +44203,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -29721,10 +44213,10 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
@@ -29732,13 +44224,18 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6094;
+ argtab[2].meltbp_long = 6245;
/*^apply.arg */
argtab[3].meltbp_cstring =
- "altmatch_normalize_mdata got normal data";
+ "altmatch_normalize_mdata got normal ndata=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NDATA__V14*/ meltfptr[13];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " from mdata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
@@ -29746,6 +44243,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -29754,7 +44252,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0;
@@ -29767,7 +44265,7 @@ lab_endgetargs:;
/*_.IF___V28*/ meltfptr[27] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ quasiblock");
/*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];;
@@ -29776,7 +44274,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = /*_.PROGN___V30*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6094:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6245:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V28*/ meltfptr[27] = 0;
@@ -29789,7 +44287,7 @@ lab_endgetargs:;
/*_.IFCPP___V27*/ meltfptr[26] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6092:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6243:/ quasiblock");
/*_.PROGN___V31*/ meltfptr[27] = /*_.IFCPP___V27*/ meltfptr[26];;
@@ -29798,7 +44296,7 @@ lab_endgetargs:;
/*_.IFELSE___V24*/ meltfptr[17] = /*_.PROGN___V31*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6091:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6242:/ clear");
/*clear *//*_.MDATA_ORIG__V25*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.SETQ___V26*/ meltfptr[19] = 0;
@@ -29816,7 +44314,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6095:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6246:/ quasiblock");
/*^getslot */
@@ -29827,7 +44325,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6096:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6247:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), 2, "MDATA_CTYPE");
@@ -29835,8 +44333,13 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6098:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6249:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29854,8 +44357,14 @@ lab_endgetargs:;
/*_.MDATA_ORIG__V35*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6097:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA_ORIG__V35*/ meltfptr[26]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6248:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MDATA_ORIG__V35*/
+ meltfptr[26]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -29889,7 +44398,7 @@ lab_endgetargs:;
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[6])),
( /*_#I__L11*/ meltfnum[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6100:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6251:/ quasiblock");
/*^rawallocobj */
@@ -29942,7 +44451,7 @@ lab_endgetargs:;
"NRMATD_RANK");
;
/*_.NEWDATA__V38*/ meltfptr[37] = /*_.INST__V39*/ meltfptr[38];;
- MELT_LOCATION ("warmelt-normatch.melt:6107:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6258:/ quasiblock");
/*^rawallocobj */
@@ -29975,12 +44484,12 @@ lab_endgetargs:;
"NMDAC_DATA");
;
/*_.NEWDATAINIT__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];;
- MELT_LOCATION ("warmelt-normatch.melt:6111:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:6262:/ compute");
/*_.NDATA__V14*/ meltfptr[13] = /*_.SETQ___V42*/ meltfptr[41] =
/*_.NEWDATA__V38*/ meltfptr[37];;
{
- MELT_LOCATION ("warmelt-normatch.melt:6112:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6263:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.BODYL__V16*/ meltfptr[15]),
(melt_ptr_t) ( /*_.NEWDATAINIT__V40*/
meltfptr[39]));
@@ -29988,7 +44497,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30011,7 +44520,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -30021,7 +44530,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30032,10 +44541,10 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6113;
+ argtab[2].meltbp_long = 6264;
/*^apply.arg */
argtab[3].meltbp_cstring =
- "altmatch_normalize_mdata made newdata";
+ "altmatch_normalize_mdata made newdata=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.NEWDATA__V38*/ meltfptr[37];
@@ -30054,7 +44563,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
@@ -30067,7 +44576,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];;
@@ -30076,7 +44585,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6113:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6264:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[43] = 0;
@@ -30093,7 +44602,7 @@ lab_endgetargs:;
/*_.LET___V32*/ meltfptr[28] = /*_.IFCPP___V43*/ meltfptr[42];;
- MELT_LOCATION ("warmelt-normatch.melt:6095:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6246:/ clear");
/*clear *//*_.MSYMB__V33*/ meltfptr[18] = 0;
/*^clear */
/*clear *//*_.MCTYP__V34*/ meltfptr[19] = 0;
@@ -30118,7 +44627,7 @@ lab_endgetargs:;
/*_.IFELSE___V24*/ meltfptr[17] = /*_.LET___V32*/ meltfptr[28];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6091:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6242:/ clear");
/*clear *//*_.LET___V32*/ meltfptr[28] = 0;
}
;
@@ -30126,7 +44635,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6115:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6266:/ locexp");
meltgc_put_mapobjects ((meltmapobjects_ptr_t)
( /*_.DATAMAP__V13*/ meltfptr[12]),
(meltobject_ptr_t) ( /*_.MDATA__V2*/
@@ -30136,14 +44645,14 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6116:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6267:/ locexp");
meltgc_append_list ((melt_ptr_t) ( /*_.MDATAQUEUE__V15*/ meltfptr[14]),
(melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]));
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30166,7 +44675,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[12]) /*then */
{
/*^cond.then */
@@ -30176,7 +44685,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30187,7 +44696,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6117;
+ argtab[2].meltbp_long = 6268;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_mdata final ndata";
@@ -30208,7 +44717,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[18] = 0;
@@ -30221,7 +44730,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[44] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[19] = /*_.IF___V48*/ meltfptr[44];;
@@ -30230,7 +44739,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = /*_.PROGN___V50*/ meltfptr[19];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6117:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6268:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[12] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[44] = 0;
@@ -30243,16 +44752,16 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6118:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6269:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V14*/ meltfptr[13];;
- MELT_LOCATION ("warmelt-normatch.melt:6118:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6269:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V51*/ meltfptr[26];;
- MELT_LOCATION ("warmelt-normatch.melt:6082:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6233:/ clear");
/*clear *//*_.DATAMAP__V13*/ meltfptr[12] = 0;
/*^clear */
/*clear *//*_.NDATA__V14*/ meltfptr[13] = 0;
@@ -30270,11 +44779,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0;
/*^clear */
/*clear *//*_.RETURN___V51*/ meltfptr[26] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -30299,14 +44808,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA */
+} /*end meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -30323,7 +44832,7 @@ meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
#define meltcallcount 0L
#endif
- struct frame_meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA_st
+ struct frame_meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -30362,7 +44871,7 @@ meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ getarg");
/*_.MATDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -30394,7 +44903,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30417,7 +44926,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30427,7 +44936,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30437,7 +44946,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6123;
+ argtab[2].meltbp_long = 6274;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata matdata";
@@ -30457,7 +44966,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -30470,7 +44979,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -30479,7 +44988,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6123:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6274:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -30494,7 +45003,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30517,7 +45026,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30527,7 +45036,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30537,7 +45046,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6124;
+ argtab[2].meltbp_long = 6275;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata ndata";
@@ -30558,7 +45067,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -30571,7 +45080,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
@@ -30580,7 +45089,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6124:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6275:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[6] = 0;
@@ -30595,7 +45104,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6125:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6276:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30604,7 +45113,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.MATDATA__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6125:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6276:/ cond");
/*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30612,7 +45121,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6125:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6276:/ cond.else");
/*^block */
/*anyblock */
@@ -30626,7 +45135,7 @@ lab_endgetargs:;
melt_assert_failed (("check matdata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6125) ? (6125) : __LINE__, __FUNCTION__);
+ (6276) ? (6276) : __LINE__, __FUNCTION__);
;
}
;
@@ -30641,7 +45150,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[6] = /*_.IFELSE___V14*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6125:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6276:/ clear");
/*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V14*/ meltfptr[10] = 0;
@@ -30654,7 +45163,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6126:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6277:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30663,7 +45172,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_NREP_SIMPLE */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:6126:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6277:/ cond");
/*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30671,7 +45180,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6126:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6277:/ cond.else");
/*^block */
/*anyblock */
@@ -30685,7 +45194,7 @@ lab_endgetargs:;
melt_assert_failed (("check ndata"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6126) ? (6126) : __LINE__, __FUNCTION__);
+ (6277) ? (6277) : __LINE__, __FUNCTION__);
;
}
;
@@ -30700,7 +45209,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[10] = /*_.IFELSE___V16*/ meltfptr[15];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6126:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6277:/ clear");
/*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0;
@@ -30711,7 +45220,7 @@ lab_endgetargs:;
/*_.IFCPP___V15*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6127:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6278:/ quasiblock");
/*^getslot */
@@ -30724,7 +45233,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30747,7 +45256,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30757,7 +45266,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30767,7 +45276,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6129;
+ argtab[2].meltbp_long = 6280;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata msteps";
@@ -30788,7 +45297,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0;
@@ -30801,7 +45310,7 @@ lab_endgetargs:;
/*_.IF___V20*/ meltfptr[19] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ quasiblock");
/*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];;
@@ -30810,7 +45319,7 @@ lab_endgetargs:;
/*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6129:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6280:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V20*/ meltfptr[19] = 0;
@@ -30828,7 +45337,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L9*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.MSTEPS__V18*/ meltfptr[17])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:6131:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6282:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -30840,7 +45349,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:6132:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6283:/ locexp");
/*void */ 0;
}
;
@@ -30851,7 +45360,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6131:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6282:/ cond.else");
/*^block */
/*anyblock */
@@ -30863,7 +45372,7 @@ lab_endgetargs:;
&& NULL !=
melt_list_first ((melt_ptr_t)
( /*_.MSTEPS__V18*/ meltfptr[17])));;
- MELT_LOCATION ("warmelt-normatch.melt:6133:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6284:/ cond");
/*cond */ if ( /*_#IS_NON_EMPTY_LIST__L10*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -30873,7 +45382,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -30896,7 +45405,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -30906,7 +45415,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -30917,7 +45426,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6134;
+ argtab[2].meltbp_long = 6285;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata msteps nonemptylist";
@@ -30939,7 +45448,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] =
0;
/*^clear */
@@ -30953,7 +45462,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] =
@@ -30964,7 +45473,7 @@ lab_endgetargs:;
/*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6134:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6285:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[25] = 0;
@@ -30979,7 +45488,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31002,7 +45511,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -31012,7 +45521,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31023,7 +45532,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6135;
+ argtab[2].meltbp_long = 6286;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata matdata before match_data_update_data_steps_index";
@@ -31045,7 +45554,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] =
0;
/*^clear */
@@ -31059,7 +45568,7 @@ lab_endgetargs:;
/*_.IF___V30*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ quasiblock");
/*_.PROGN___V32*/ meltfptr[30] =
@@ -31070,7 +45579,7 @@ lab_endgetargs:;
/*_.PROGN___V32*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6135:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6286:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V30*/ meltfptr[26] = 0;
@@ -31083,7 +45592,7 @@ lab_endgetargs:;
/*_.IFCPP___V29*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6137:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6288:/ apply");
/*apply */
{
/*_.MATCH_DATA_UPDATE_DATA_STEPS_INDEX__V33*/ meltfptr[26] =
@@ -31097,7 +45606,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31120,7 +45629,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -31130,7 +45639,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31141,7 +45650,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6138;
+ argtab[2].meltbp_long = 6289;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata matdata after match_data_update_data_steps_index";
@@ -31163,7 +45672,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[11] =
0;
/*^clear */
@@ -31177,7 +45686,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] =
@@ -31188,7 +45697,7 @@ lab_endgetargs:;
/*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6138:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6289:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[34] = 0;
@@ -31201,7 +45710,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6139:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6290:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.MATDATA__V2*/ meltfptr[1]), 4, "MDATA_STEPS");
@@ -31215,7 +45724,7 @@ lab_endgetargs:;
/*_.MDATA_STEPS__V38*/ meltfptr[34];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31238,7 +45747,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -31248,7 +45757,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L18*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31259,7 +45768,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6140;
+ argtab[2].meltbp_long = 6291;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata msteps after match_data_update_data_steps";
@@ -31281,7 +45790,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[10] =
0;
/*^clear */
@@ -31295,7 +45804,7 @@ lab_endgetargs:;
/*_.IF___V41*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ quasiblock");
/*_.PROGN___V43*/ meltfptr[41] =
@@ -31306,7 +45815,7 @@ lab_endgetargs:;
/*_.PROGN___V43*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6140:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6291:/ clear");
/*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V41*/ meltfptr[40] = 0;
@@ -31319,7 +45828,7 @@ lab_endgetargs:;
/*_.IFCPP___V40*/ meltfptr[39] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6133:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6284:/ quasiblock");
/*_.PROGN___V44*/ meltfptr[40] =
@@ -31330,7 +45839,7 @@ lab_endgetargs:;
/*_.PROGN___V44*/ meltfptr[40];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6133:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6284:/ clear");
/*clear *//*_.IFCPP___V25*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_.IFCPP___V29*/ meltfptr[25] = 0;
@@ -31361,13 +45870,13 @@ lab_endgetargs:;
(meltgc_new_multiple
((meltobject_ptr_t)
(( /*!DISCR_MULTIPLE */ meltfrout->tabval[4])), (0)));;
- MELT_LOCATION ("warmelt-normatch.melt:6143:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:6294:/ compute");
/*_.MSTEPS__V18*/ meltfptr[17] =
/*_.SETQ___V46*/ meltfptr[24] =
/*_.MAKE_MULTIPLE__V45*/ meltfptr[41];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31390,7 +45899,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[10]) /*then */
{
/*^cond.then */
@@ -31400,7 +45909,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L20*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31411,7 +45920,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6144;
+ argtab[2].meltbp_long = 6295;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata msteps emptytuple";
@@ -31433,7 +45942,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[11] =
0;
/*^clear */
@@ -31447,7 +45956,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[26] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[34] =
@@ -31458,7 +45967,7 @@ lab_endgetargs:;
/*_.PROGN___V50*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6144:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6295:/ clear");
/*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[26] = 0;
@@ -31471,7 +45980,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6142:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6293:/ quasiblock");
/*_.PROGN___V51*/ meltfptr[35] =
@@ -31482,7 +45991,7 @@ lab_endgetargs:;
/*_.PROGN___V51*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6133:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6284:/ clear");
/*clear *//*_.MAKE_MULTIPLE__V45*/ meltfptr[41] = 0;
/*^clear */
/*clear *//*_.SETQ___V46*/ meltfptr[24] = 0;
@@ -31497,7 +46006,7 @@ lab_endgetargs:;
/*_.IFELSE___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6131:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6282:/ clear");
/*clear *//*_#IS_NON_EMPTY_LIST__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0;
@@ -31507,7 +46016,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31530,7 +46039,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -31540,7 +46049,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[10] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31551,7 +46060,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6145;
+ argtab[2].meltbp_long = 6296;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata updated msteps";
@@ -31572,7 +46081,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V54*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[30] = 0;
@@ -31585,7 +46094,7 @@ lab_endgetargs:;
/*_.IF___V53*/ meltfptr[40] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ quasiblock");
/*_.PROGN___V55*/ meltfptr[26] = /*_.IF___V53*/ meltfptr[40];;
@@ -31594,7 +46103,7 @@ lab_endgetargs:;
/*_.IFCPP___V52*/ meltfptr[39] = /*_.PROGN___V55*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6145:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6296:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V53*/ meltfptr[40] = 0;
@@ -31609,7 +46118,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6146:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6297:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31617,7 +46126,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L23*/ meltfnum[0] =
(melt_magic_discr ((melt_ptr_t) ( /*_.MSTEPS__V18*/ meltfptr[17])) ==
MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:6146:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6297:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L23*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31625,7 +46134,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6146:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6297:/ cond.else");
/*^block */
/*anyblock */
@@ -31639,7 +46148,7 @@ lab_endgetargs:;
melt_assert_failed (("good tuple msteps"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6146) ? (6146) : __LINE__, __FUNCTION__);
+ (6297) ? (6297) : __LINE__, __FUNCTION__);
;
}
;
@@ -31654,7 +46163,7 @@ lab_endgetargs:;
/*_.IFCPP___V56*/ meltfptr[34] = /*_.IFELSE___V57*/ meltfptr[41];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6146:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6297:/ clear");
/*clear *//*_#IS_MULTIPLE__L23*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V57*/ meltfptr[41] = 0;
@@ -31683,7 +46192,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31706,7 +46215,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -31716,7 +46225,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31727,7 +46236,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6150;
+ argtab[2].meltbp_long = 6301;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata befora normalizing curstep";
@@ -31749,7 +46258,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V61*/ meltfptr[20];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[20] = 0;
@@ -31762,7 +46271,7 @@ lab_endgetargs:;
/*_.IF___V60*/ meltfptr[35] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ quasiblock");
/*_.PROGN___V62*/ meltfptr[30] = /*_.IF___V60*/ meltfptr[35];;
@@ -31771,7 +46280,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[25] = /*_.PROGN___V62*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6150:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6301:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V60*/ meltfptr[35] = 0;
@@ -31784,7 +46293,7 @@ lab_endgetargs:;
/*_.IFCPP___V59*/ meltfptr[25] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6151:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6302:/ quasiblock");
/*^apply */
@@ -31806,7 +46315,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31829,7 +46338,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -31839,7 +46348,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L28*/ meltfnum[11] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31850,7 +46359,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6153;
+ argtab[2].meltbp_long = 6304;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_handle_normalized_mdata after normalizing nlab";
@@ -31872,7 +46381,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V67*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[35] = 0;
@@ -31885,7 +46394,7 @@ lab_endgetargs:;
/*_.IF___V66*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ quasiblock");
/*_.PROGN___V68*/ meltfptr[30] = /*_.IF___V66*/ meltfptr[20];;
@@ -31894,7 +46403,7 @@ lab_endgetargs:;
/*_.IFCPP___V65*/ meltfptr[41] = /*_.PROGN___V68*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6153:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6304:/ clear");
/*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V66*/ meltfptr[20] = 0;
@@ -31911,7 +46420,7 @@ lab_endgetargs:;
/*_.LET___V63*/ meltfptr[40] = /*_.IFCPP___V65*/ meltfptr[41];;
- MELT_LOCATION ("warmelt-normatch.melt:6151:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6302:/ clear");
/*clear *//*_.NLAB__V64*/ meltfptr[26] = 0;
/*^clear */
/*clear *//*_.IFCPP___V65*/ meltfptr[41] = 0;
@@ -31921,7 +46430,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6147:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6298:/ clear");
/*clear *//*_.CURSTEP__V58*/ meltfptr[24] = 0;
/*^clear */
/*clear *//*_#STEPIX__L24*/ meltfnum[10] = 0;
@@ -31933,7 +46442,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -31956,7 +46465,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[11]) /*then */
{
/*^cond.then */
@@ -31966,7 +46475,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L30*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -31977,7 +46486,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6155;
+ argtab[2].meltbp_long = 6306;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_step final nmctxt";
@@ -31998,7 +46507,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[30];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[30] = 0;
@@ -32011,7 +46520,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[20] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[26] = /*_.IF___V70*/ meltfptr[20];;
@@ -32020,7 +46529,7 @@ lab_endgetargs:;
/*_.IFCPP___V69*/ meltfptr[35] = /*_.PROGN___V72*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6155:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6306:/ clear");
/*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[11] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[20] = 0;
@@ -32037,7 +46546,7 @@ lab_endgetargs:;
/*_.LET___V17*/ meltfptr[15] = /*_.IFCPP___V69*/ meltfptr[35];;
- MELT_LOCATION ("warmelt-normatch.melt:6127:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6278:/ clear");
/*clear *//*_.MSTEPS__V18*/ meltfptr[17] = 0;
/*^clear */
/*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0;
@@ -32051,11 +46560,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V56*/ meltfptr[34] = 0;
/*^clear */
/*clear *//*_.IFCPP___V69*/ meltfptr[35] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];;
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -32082,14 +46591,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA */
+} /*end meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -32106,7 +46615,7 @@ meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
#define meltcallcount 0L
#endif
- struct frame_meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT_st
+ struct frame_meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -32146,7 +46655,7 @@ meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ getarg");
/*_.MATCTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -32178,7 +46687,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32201,7 +46710,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32211,7 +46720,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32221,7 +46730,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6161;
+ argtab[2].meltbp_long = 6312;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_make_match_normalization_context matctx";
@@ -32241,7 +46750,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -32254,7 +46763,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -32263,7 +46772,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6161:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6312:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -32278,7 +46787,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32301,7 +46810,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -32311,7 +46820,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32321,7 +46830,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6162;
+ argtab[2].meltbp_long = 6313;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_make_match_normalization_context matctyp";
@@ -32342,7 +46851,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -32355,7 +46864,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
@@ -32364,7 +46873,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6162:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6313:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[6] = 0;
@@ -32377,10 +46886,10 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6163:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6314:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6164:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6315:/ quasiblock");
/*^rawallocobj */
@@ -32441,7 +46950,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NAMATCH_FLAGS");
;
/*_.NMATCH__V14*/ meltfptr[10] = /*_.INST__V15*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:6173:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6324:/ apply");
/*apply */
{
/*_.MRSYMB__V16*/ meltfptr[15] =
@@ -32452,7 +46961,7 @@ lab_endgetargs:;
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6174:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6325:/ quasiblock");
/*^rawallocobj */
@@ -32504,7 +47013,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "LETBIND_EXPR");
;
/*_.MRBIND__V17*/ meltfptr[16] = /*_.INST__V18*/ meltfptr[17];;
- MELT_LOCATION ("warmelt-normatch.melt:6179:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6330:/ quasiblock");
/*^rawallocobj */
@@ -32589,7 +47098,7 @@ lab_endgetargs:;
/*_.BODYL__V26*/ meltfptr[25] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[7]))));;
- MELT_LOCATION ("warmelt-normatch.melt:6199:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6350:/ quasiblock");
/*^rawallocobj */
@@ -32623,7 +47132,7 @@ lab_endgetargs:;
(( /*nil */ NULL)), "NMLAB_STEP");
;
/*_.ENDLAB__V27*/ meltfptr[26] = /*_.INST__V28*/ meltfptr[27];;
- MELT_LOCATION ("warmelt-normatch.melt:6204:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6355:/ quasiblock");
/*^rawallocobj */
@@ -32739,7 +47248,7 @@ lab_endgetargs:;
/*_.NMCTXT__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -32762,7 +47271,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -32772,7 +47281,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -32782,7 +47291,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6217;
+ argtab[2].meltbp_long = 6368;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_make_match_normalization_context result nmctxt";
@@ -32803,7 +47312,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
@@ -32816,7 +47325,7 @@ lab_endgetargs:;
/*_.IF___V32*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ quasiblock");
/*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
@@ -32825,7 +47334,7 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6217:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6368:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V32*/ meltfptr[31] = 0;
@@ -32838,16 +47347,16 @@ lab_endgetargs:;
/*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6218:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6369:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.NMCTXT__V29*/ meltfptr[28];;
- MELT_LOCATION ("warmelt-normatch.melt:6218:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6369:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*_.LET___V13*/ meltfptr[6] = /*_.RETURN___V35*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:6163:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6314:/ clear");
/*clear *//*_.NMATCH__V14*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.MRSYMB__V16*/ meltfptr[15] = 0;
@@ -32875,11 +47384,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.RETURN___V35*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[6];;
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -32902,14 +47411,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
+} /*end meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un * meltxargtab_,
@@ -32926,7 +47435,7 @@ meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
#define meltcallcount 0L
#endif
- struct frame_meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT_st
+ struct frame_meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -32965,7 +47474,7 @@ meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ getarg");
/*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -32997,7 +47506,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33020,7 +47529,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33030,7 +47539,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33040,7 +47549,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6224;
+ argtab[2].meltbp_long = 6375;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context mdata";
@@ -33060,7 +47569,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0;
@@ -33073,7 +47582,7 @@ lab_endgetargs:;
/*_.IF___V6*/ meltfptr[5] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ quasiblock");
/*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];;
@@ -33082,7 +47591,7 @@ lab_endgetargs:;
/*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6224:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6375:/ clear");
/*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V6*/ meltfptr[5] = 0;
@@ -33097,7 +47606,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33120,7 +47629,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33130,7 +47639,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33140,7 +47649,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6226;
+ argtab[2].meltbp_long = 6377;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context sloc";
@@ -33161,7 +47670,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0;
@@ -33174,7 +47683,7 @@ lab_endgetargs:;
/*_.IF___V10*/ meltfptr[6] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ quasiblock");
/*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[6];;
@@ -33183,7 +47692,7 @@ lab_endgetargs:;
/*_.IFCPP___V9*/ meltfptr[5] = /*_.PROGN___V12*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6226:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6377:/ clear");
/*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V10*/ meltfptr[6] = 0;
@@ -33198,7 +47707,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33221,7 +47730,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33231,7 +47740,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33241,7 +47750,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6227;
+ argtab[2].meltbp_long = 6378;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context nmctxt";
@@ -33262,7 +47771,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
@@ -33275,7 +47784,7 @@ lab_endgetargs:;
/*_.IF___V14*/ meltfptr[10] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ quasiblock");
/*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[10];;
@@ -33284,7 +47793,7 @@ lab_endgetargs:;
/*_.IFCPP___V13*/ meltfptr[6] = /*_.PROGN___V16*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6227:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6378:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V14*/ meltfptr[10] = 0;
@@ -33299,7 +47808,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6228:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6379:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33307,7 +47816,7 @@ lab_endgetargs:;
/*_#IS_A__L7*/ meltfnum[1] =
melt_is_instance_of ((melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_MATCH_NORMALIZATION_CONTEXT */ meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6228:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6379:/ cond");
/*cond */ if ( /*_#IS_A__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33315,7 +47824,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6228:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6379:/ cond.else");
/*^block */
/*anyblock */
@@ -33329,7 +47838,7 @@ lab_endgetargs:;
melt_assert_failed (("check nmctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6228) ? (6228) : __LINE__, __FUNCTION__);
+ (6379) ? (6379) : __LINE__, __FUNCTION__);
;
}
;
@@ -33344,7 +47853,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[10] = /*_.IFELSE___V18*/ meltfptr[14];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6228:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6379:/ clear");
/*clear *//*_#IS_A__L7*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V18*/ meltfptr[14] = 0;
@@ -33355,7 +47864,7 @@ lab_endgetargs:;
/*_.IFCPP___V17*/ meltfptr[10] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6229:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6380:/ quasiblock");
/*^getslot */
@@ -33366,7 +47875,7 @@ lab_endgetargs:;
meltfptr[19] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6230:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6381:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 6, "MATNORX_MSTEPQUEUE");
@@ -33374,7 +47883,7 @@ lab_endgetargs:;
meltfptr[20] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6231:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6382:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 2, "MATNORX_DATAMAP");
@@ -33382,7 +47891,7 @@ lab_endgetargs:;
meltfptr[21] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6232:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6383:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 4, "MATNORX_STEPMAP");
@@ -33390,7 +47899,7 @@ lab_endgetargs:;
meltfptr[22] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6233:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6384:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V4*/ meltfptr[3]), 7, "MATNORX_BODYLIST");
@@ -33400,7 +47909,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33423,7 +47932,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33433,7 +47942,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33443,7 +47952,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6235;
+ argtab[2].meltbp_long = 6386;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context starting with first mdata";
@@ -33464,7 +47973,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0;
@@ -33477,7 +47986,7 @@ lab_endgetargs:;
/*_.IF___V26*/ meltfptr[25] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ quasiblock");
/*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];;
@@ -33486,7 +47995,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[24] = /*_.PROGN___V28*/ meltfptr[26];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6235:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6386:/ clear");
/*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V26*/ meltfptr[25] = 0;
@@ -33499,7 +48008,7 @@ lab_endgetargs:;
/*_.IFCPP___V25*/ meltfptr[24] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6236:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6387:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -33516,7 +48025,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33539,7 +48048,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33549,7 +48058,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33560,7 +48069,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6237;
+ argtab[2].meltbp_long = 6388;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context initial mdataqueue";
@@ -33581,7 +48090,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0;
@@ -33594,7 +48103,7 @@ lab_endgetargs:;
/*_.IF___V31*/ meltfptr[30] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ quasiblock");
/*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];;
@@ -33603,7 +48112,7 @@ lab_endgetargs:;
/*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6237:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6388:/ clear");
/*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V31*/ meltfptr[30] = 0;
@@ -33618,7 +48127,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33641,7 +48150,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33651,7 +48160,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33662,7 +48171,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6238;
+ argtab[2].meltbp_long = 6389;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context initial datamap";
@@ -33683,7 +48192,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0;
@@ -33696,7 +48205,7 @@ lab_endgetargs:;
/*_.IF___V35*/ meltfptr[31] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ quasiblock");
/*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[31];;
@@ -33705,7 +48214,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = /*_.PROGN___V37*/ meltfptr[35];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6238:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6389:/ clear");
/*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V35*/ meltfptr[31] = 0;
@@ -33718,7 +48227,7 @@ lab_endgetargs:;
/*_.IFCPP___V34*/ meltfptr[30] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6239:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:6390:/ loop");
/*loop */
{
labloop_MATCHDATANORMALIZELOOP_1:;
@@ -33728,7 +48237,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6241:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6392:/ quasiblock");
/*_.FRESHMDATA__V41*/ meltfptr[40] =
@@ -33743,7 +48252,7 @@ lab_endgetargs:;
meltfptr[40]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33766,7 +48275,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33776,7 +48285,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33787,7 +48296,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6244;
+ argtab[2].meltbp_long = 6395;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context freshmdata start loop";
@@ -33809,7 +48318,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0;
@@ -33822,7 +48331,7 @@ lab_endgetargs:;
/*_.IF___V44*/ meltfptr[43] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ quasiblock");
/*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];;
@@ -33831,7 +48340,7 @@ lab_endgetargs:;
/*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6244:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6395:/ clear");
/*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IF___V44*/ meltfptr[43] = 0;
@@ -33846,7 +48355,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33869,7 +48378,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33879,7 +48388,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -33890,7 +48399,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6245;
+ argtab[2].meltbp_long = 6396;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context ndata start loop";
@@ -33912,7 +48421,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
@@ -33925,7 +48434,7 @@ lab_endgetargs:;
/*_.IF___V48*/ meltfptr[44] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ quasiblock");
/*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[44];;
@@ -33934,7 +48443,7 @@ lab_endgetargs:;
/*_.IFCPP___V47*/ meltfptr[43] = /*_.PROGN___V50*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6245:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6396:/ clear");
/*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V48*/ meltfptr[44] = 0;
@@ -33951,7 +48460,7 @@ lab_endgetargs:;
/*_#NULL__L18*/ meltfnum[1] =
(( /*_.FRESHMDATA__V41*/ meltfptr[40]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6246:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6397:/ cond");
/*cond */ if ( /*_#NULL__L18*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -33978,7 +48487,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6247:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6398:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -33988,7 +48497,7 @@ lab_endgetargs:;
( /*_.FRESHMDATA__V41*/ meltfptr[40]),
(melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
meltfrout->tabval[3])));;
- MELT_LOCATION ("warmelt-normatch.melt:6247:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6398:/ cond");
/*cond */ if ( /*_#IS_A__L19*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -33996,7 +48505,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6247:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6398:/ cond.else");
/*^block */
/*anyblock */
@@ -34007,7 +48516,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("altmatch_normalize_match_context check freshmdata"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6247) ? (6247) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("altmatch_normalize_match_context check freshmdata"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6398) ? (6398) : __LINE__, __FUNCTION__);
;
}
;
@@ -34022,7 +48531,7 @@ lab_endgetargs:;
/*_.IFCPP___V51*/ meltfptr[44] = /*_.IFELSE___V52*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6247:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6398:/ clear");
/*clear *//*_#IS_A__L19*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V52*/ meltfptr[48] = 0;
@@ -34035,7 +48544,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6249:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6400:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34045,7 +48554,7 @@ lab_endgetargs:;
( /*_.NDATA__V42*/ meltfptr[41]),
(melt_ptr_t) (( /*!CLASS_NREP_SIMPLE */
meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:6249:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6400:/ cond");
/*cond */ if ( /*_#IS_A__L20*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34053,7 +48562,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6249:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6400:/ cond.else");
/*^block */
/*anyblock */
@@ -34064,7 +48573,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("altmatch_normalize_match_context check ndata"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6249) ? (6249) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("altmatch_normalize_match_context check ndata"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6400) ? (6400) : __LINE__, __FUNCTION__);
;
}
;
@@ -34079,7 +48588,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[48] = /*_.IFELSE___V54*/ meltfptr[53];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6249:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6400:/ clear");
/*clear *//*_#IS_A__L20*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0;
@@ -34090,7 +48599,7 @@ lab_endgetargs:;
/*_.IFCPP___V53*/ meltfptr[48] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6251:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6402:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -34112,7 +48621,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34135,7 +48644,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34145,7 +48654,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34156,7 +48665,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6252;
+ argtab[2].meltbp_long = 6403;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context freshmdata after altmatch_handle_normalized_mdata";
@@ -34178,7 +48687,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0;
@@ -34191,7 +48700,7 @@ lab_endgetargs:;
/*_.IF___V57*/ meltfptr[56] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ quasiblock");
/*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];;
@@ -34200,7 +48709,7 @@ lab_endgetargs:;
/*_.IFCPP___V56*/ meltfptr[55] = /*_.PROGN___V59*/ meltfptr[57];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6252:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6403:/ clear");
/*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V57*/ meltfptr[56] = 0;
@@ -34215,7 +48724,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34238,7 +48747,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -34248,7 +48757,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L24*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34259,7 +48768,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6253;
+ argtab[2].meltbp_long = 6404;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context mstepqueue after altmatch_handle_normalized_mdata";
@@ -34281,7 +48790,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0;
@@ -34294,7 +48803,7 @@ lab_endgetargs:;
/*_.IF___V61*/ meltfptr[57] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ quasiblock");
/*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[57];;
@@ -34303,7 +48812,7 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[56] = /*_.PROGN___V63*/ meltfptr[61];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6253:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6404:/ clear");
/*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.IF___V61*/ meltfptr[57] = 0;
@@ -34316,7 +48825,7 @@ lab_endgetargs:;
/*_.IFCPP___V60*/ meltfptr[56] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6254:/ loop");
+ MELT_LOCATION ("warmelt-normatch.melt:6405:/ loop");
/*loop */
{
labloop_MATCHSTEPNORMALIZELOOP_1:;
@@ -34326,7 +48835,7 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6256:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6407:/ quasiblock");
/*_.FRESHMSTEP__V67*/ meltfptr[66] =
@@ -34341,7 +48850,7 @@ lab_endgetargs:;
meltfptr[66]));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34364,7 +48873,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34374,7 +48883,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L26*/ meltfnum[21] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34385,7 +48894,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6259;
+ argtab[2].meltbp_long = 6410;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context freshmstep";
@@ -34407,7 +48916,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[21] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0;
@@ -34420,7 +48929,7 @@ lab_endgetargs:;
/*_.IF___V70*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ quasiblock");
/*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];;
@@ -34430,7 +48939,7 @@ lab_endgetargs:;
/*_.PROGN___V72*/ meltfptr[70];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6259:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6410:/ clear");
/*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V70*/ meltfptr[69] = 0;
@@ -34447,7 +48956,7 @@ lab_endgetargs:;
/*_#NULL__L27*/ meltfnum[21] =
(( /*_.FRESHMSTEP__V67*/ meltfptr[66]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6260:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6411:/ cond");
/*cond */ if ( /*_#NULL__L27*/ meltfnum[21]) /*then */
{
/*^cond.then */
@@ -34474,7 +48983,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34497,7 +49006,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34507,7 +49016,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L29*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34518,7 +49027,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6261;
+ argtab[2].meltbp_long = 6412;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context freshlab";
@@ -34540,7 +49049,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V75*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V75*/ meltfptr[74] = 0;
@@ -34553,7 +49062,7 @@ lab_endgetargs:;
/*_.IF___V74*/ meltfptr[70] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ quasiblock");
/*_.PROGN___V76*/ meltfptr[74] = /*_.IF___V74*/ meltfptr[70];;
@@ -34563,7 +49072,7 @@ lab_endgetargs:;
/*_.PROGN___V76*/ meltfptr[74];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6261:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6412:/ clear");
/*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V74*/ meltfptr[70] = 0;
@@ -34578,7 +49087,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34601,7 +49110,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -34611,7 +49120,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L31*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34622,7 +49131,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6262;
+ argtab[2].meltbp_long = 6413;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context bodyl before normalize_step";
@@ -34644,7 +49153,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V79*/ meltfptr[78];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V79*/ meltfptr[78] = 0;
@@ -34657,7 +49166,7 @@ lab_endgetargs:;
/*_.IF___V78*/ meltfptr[74] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ quasiblock");
/*_.PROGN___V80*/ meltfptr[78] = /*_.IF___V78*/ meltfptr[74];;
@@ -34667,7 +49176,7 @@ lab_endgetargs:;
/*_.PROGN___V80*/ meltfptr[78];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6262:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6413:/ clear");
/*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V78*/ meltfptr[74] = 0;
@@ -34680,10 +49189,10 @@ lab_endgetargs:;
/*_.IFCPP___V77*/ meltfptr[70] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6263:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6414:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6264:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:6415:/ msend");
/*msend */
{
union meltparam_un argtab[2];
@@ -34705,7 +49214,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6266:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6417:/ locexp");
meltgc_append_list ((melt_ptr_t)
( /*_.BODYL__V24*/ meltfptr[23]),
(melt_ptr_t) ( /*_.FRESHLAB__V68*/
@@ -34714,7 +49223,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34737,7 +49246,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34747,7 +49256,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L33*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34758,7 +49267,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6267;
+ argtab[2].meltbp_long = 6418;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context freshmstep after normalize_step";
@@ -34780,7 +49289,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V85*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V85*/ meltfptr[84] = 0;
@@ -34793,7 +49302,7 @@ lab_endgetargs:;
/*_.IF___V84*/ meltfptr[83] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ quasiblock");
/*_.PROGN___V86*/ meltfptr[84] = /*_.IF___V84*/ meltfptr[83];;
@@ -34803,7 +49312,7 @@ lab_endgetargs:;
/*_.PROGN___V86*/ meltfptr[84];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6267:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6418:/ clear");
/*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V84*/ meltfptr[83] = 0;
@@ -34818,7 +49327,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34841,7 +49350,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -34851,7 +49360,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L35*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34862,7 +49371,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6268;
+ argtab[2].meltbp_long = 6419;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context normstep";
@@ -34884,7 +49393,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V89*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V89*/ meltfptr[88] = 0;
@@ -34897,7 +49406,7 @@ lab_endgetargs:;
/*_.IF___V88*/ meltfptr[84] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ quasiblock");
/*_.PROGN___V90*/ meltfptr[88] = /*_.IF___V88*/ meltfptr[84];;
@@ -34907,7 +49416,7 @@ lab_endgetargs:;
/*_.PROGN___V90*/ meltfptr[88];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6268:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6419:/ clear");
/*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V88*/ meltfptr[84] = 0;
@@ -34922,7 +49431,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -34945,7 +49454,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -34955,7 +49464,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L37*/ meltfnum[28] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -34966,7 +49475,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6269;
+ argtab[2].meltbp_long = 6420;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context bodyl after normalize_step";
@@ -34988,7 +49497,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V93*/ meltfptr[92];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V93*/ meltfptr[92] = 0;
@@ -35001,7 +49510,7 @@ lab_endgetargs:;
/*_.IF___V92*/ meltfptr[88] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ quasiblock");
/*_.PROGN___V94*/ meltfptr[92] = /*_.IF___V92*/ meltfptr[88];;
@@ -35011,7 +49520,7 @@ lab_endgetargs:;
/*_.PROGN___V94*/ meltfptr[92];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6269:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6420:/ clear");
/*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V92*/ meltfptr[88] = 0;
@@ -35024,7 +49533,7 @@ lab_endgetargs:;
/*_.IFCPP___V91*/ meltfptr[84] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6270:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-normatch.melt:6421:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -35047,7 +49556,7 @@ lab_endgetargs:;
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ putclosurout");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ putclosurout");
/*putclosurout#2 */
melt_assertmsg ("putclosrout#2 checkclo",
melt_magic_discr ((melt_ptr_t)
@@ -35097,7 +49606,7 @@ lab_endgetargs:;
/*^touch */
meltgc_touch ( /*_.ADD_NORM_STEP__V96*/ meltfptr[92]);
;
- MELT_LOCATION ("warmelt-normatch.melt:6290:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6441:/ apply");
/*apply */
{
/*_.ADD_NORM_STEP__V97*/ meltfptr[96] =
@@ -35113,7 +49622,7 @@ lab_endgetargs:;
/*_.ADD_NORM_STEP__V97*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6270:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6421:/ clear");
/*clear *//*_.ADD_NORM_STEP__V96*/ meltfptr[92] = 0;
/*^clear */
/*clear *//*_.ADD_NORM_STEP__V96*/ meltfptr[92] = 0;
@@ -35123,7 +49632,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35146,7 +49655,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L38*/ meltfnum[28]) /*then */
{
/*^cond.then */
@@ -35156,7 +49665,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L39*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35167,7 +49676,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6291;
+ argtab[2].meltbp_long = 6442;
/*^apply.arg */
argtab[3].meltbp_cstring =
"altmatch_normalize_match_context final bodyl";
@@ -35189,7 +49698,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V100*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L39*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[99] = 0;
@@ -35202,7 +49711,7 @@ lab_endgetargs:;
/*_.IF___V99*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ quasiblock");
/*_.PROGN___V101*/ meltfptr[99] = /*_.IF___V99*/ meltfptr[96];;
@@ -35212,7 +49721,7 @@ lab_endgetargs:;
/*_.PROGN___V101*/ meltfptr[99];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6291:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6442:/ clear");
/*clear *//*_#MELT_NEED_DBG__L38*/ meltfnum[28] = 0;
/*^clear */
/*clear *//*_.IF___V99*/ meltfptr[96] = 0;
@@ -35229,7 +49738,7 @@ lab_endgetargs:;
/*_.LET___V81*/ meltfptr[74] = /*_.IFCPP___V98*/ meltfptr[92];;
- MELT_LOCATION ("warmelt-normatch.melt:6263:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6414:/ clear");
/*clear *//*_.NORMSTEP__V82*/ meltfptr[78] = 0;
/*^clear */
/*clear *//*_.IFCPP___V83*/ meltfptr[82] = 0;
@@ -35243,7 +49752,7 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V98*/ meltfptr[92] = 0;
/*_.LET___V66*/ meltfptr[65] = /*_.LET___V81*/ meltfptr[74];;
- MELT_LOCATION ("warmelt-normatch.melt:6256:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6407:/ clear");
/*clear *//*_.FRESHMSTEP__V67*/ meltfptr[66] = 0;
/*^clear */
/*clear *//*_.FRESHLAB__V68*/ meltfptr[67] = 0;
@@ -35259,7 +49768,7 @@ lab_endgetargs:;
/*clear *//*_.LET___V81*/ meltfptr[74] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6254:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6405:/ clear");
/*clear *//*_.LET___V66*/ meltfptr[65] = 0;
}
;
@@ -35276,7 +49785,7 @@ lab_endgetargs:;
/*_.LET___V40*/ meltfptr[39] = /*_.FOREVER___V64*/ meltfptr[57];;
- MELT_LOCATION ("warmelt-normatch.melt:6241:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6392:/ clear");
/*clear *//*_.FRESHMDATA__V41*/ meltfptr[40] = 0;
/*^clear */
/*clear *//*_.NDATA__V42*/ meltfptr[41] = 0;
@@ -35301,7 +49810,7 @@ lab_endgetargs:;
/*clear *//*_.FOREVER___V64*/ meltfptr[57] = 0;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6239:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6390:/ clear");
/*clear *//*_.LET___V40*/ meltfptr[39] = 0;
}
;
@@ -35318,7 +49827,7 @@ lab_endgetargs:;
/*_.LET___V19*/ meltfptr[14] = /*_.FOREVER___V38*/ meltfptr[31];;
- MELT_LOCATION ("warmelt-normatch.melt:6229:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6380:/ clear");
/*clear *//*_.MDATAQUEUE__V20*/ meltfptr[19] = 0;
/*^clear */
/*clear *//*_.MSTEPQUEUE__V21*/ meltfptr[20] = 0;
@@ -35338,11 +49847,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V34*/ meltfptr[30] = 0;
/*^clear */
/*clear *//*_.FOREVER___V38*/ meltfptr[31] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[14];;
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -35369,14 +49878,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT */
+} /*end meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -35397,7 +49906,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_123_warmelt_normatch_LAMBDA___28___st
+ struct frame_meltrout_131_warmelt_normatch_LAMBDA___28___st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -35436,7 +49945,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ getarg");
/*_.NS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
;
goto lab_endgetargs;
@@ -35450,7 +49959,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NS__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_NREP_EXPRESSION */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:6273:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6424:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -35462,7 +49971,7 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:6274:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6425:/ locexp");
meltgc_append_list ((melt_ptr_t)
(( /*~BODYL */ meltfclos->tabval[0])),
(melt_ptr_t) ( /*_.NS__V2*/ meltfptr[1]));
@@ -35475,7 +49984,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6273:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6424:/ cond.else");
/*^block */
/*anyblock */
@@ -35484,7 +49993,7 @@ lab_endgetargs:;
/*_#IS_LIST__L2*/ meltfnum[1] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NS__V2*/ meltfptr[1])) ==
MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-normatch.melt:6275:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6426:/ cond");
/*cond */ if ( /*_#IS_LIST__L2*/ meltfnum[1]) /*then */
{
/*^cond.then */
@@ -35506,7 +50015,7 @@ lab_endgetargs:;
melt_pair_head ( /*_.CURPAIR__V5*/ meltfptr[4]);
- MELT_LOCATION ("warmelt-normatch.melt:6279:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6430:/ apply");
/*apply */
{
/*_.ADD_NORM_STEP__V7*/ meltfptr[6] =
@@ -35525,7 +50034,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6276:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6427:/ clear");
/*clear *//*_.CURPAIR__V5*/ meltfptr[4] = 0;
/*^clear */
/*clear *//*_.CURCOMP__V6*/ meltfptr[5] = 0;
@@ -35539,7 +50048,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6275:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6426:/ cond.else");
/*^block */
/*anyblock */
@@ -35548,7 +50057,7 @@ lab_endgetargs:;
/*_#IS_MULTIPLE__L3*/ meltfnum[2] =
(melt_magic_discr ((melt_ptr_t) ( /*_.NS__V2*/ meltfptr[1]))
== MELTOBMAG_MULTIPLE);;
- MELT_LOCATION ("warmelt-normatch.melt:6280:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6431:/ cond");
/*cond */ if ( /*_#IS_MULTIPLE__L3*/ meltfnum[2]) /*then */
{
/*^cond.then */
@@ -35576,7 +50085,7 @@ lab_endgetargs:;
MELT_LOCATION
- ("warmelt-normatch.melt:6284:/ apply");
+ ("warmelt-normatch.melt:6435:/ apply");
/*apply */
{
/*_.ADD_NORM_STEP__V10*/ meltfptr[9] =
@@ -35597,7 +50106,7 @@ lab_endgetargs:;
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6281:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6432:/ clear");
/*clear *//*_.CURCOMP__V9*/ meltfptr[8] = 0;
/*^clear */
/*clear *//*_#IX__L4*/ meltfnum[3] = 0;
@@ -35611,7 +50120,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6280:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6431:/ cond.else");
/*^block */
/*anyblock */
@@ -35620,7 +50129,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:6286:/ cppif.then");
+ ("warmelt-normatch.melt:6437:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35643,7 +50152,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6286:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6437:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[4]) /*then */
{
/*^cond.then */
@@ -35654,7 +50163,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] =
meltcallcount;;
MELT_LOCATION
- ("warmelt-normatch.melt:6286:/ apply");
+ ("warmelt-normatch.melt:6437:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -35666,7 +50175,7 @@ lab_endgetargs:;
argtab[1].meltbp_cstring =
"warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6286;
+ argtab[2].meltbp_long = 6437;
/*^apply.arg */
argtab[3].meltbp_cstring =
"add_norm_step bad ns";
@@ -35691,7 +50200,7 @@ lab_endgetargs:;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:6286:/ clear");
+ ("warmelt-normatch.melt:6437:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L6*/
meltfnum[5] = 0;
/*^clear */
@@ -35707,7 +50216,7 @@ lab_endgetargs:;
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:6286:/ quasiblock");
+ ("warmelt-normatch.melt:6437:/ quasiblock");
/*_.PROGN___V14*/ meltfptr[12] =
@@ -35718,7 +50227,7 @@ lab_endgetargs:;
/*_.PROGN___V14*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6286:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6437:/ clear");
/*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.IF___V12*/ meltfptr[11] = 0;
@@ -35734,7 +50243,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
MELT_LOCATION
- ("warmelt-normatch.melt:6287:/ cppif.then");
+ ("warmelt-normatch.melt:6438:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35749,7 +50258,7 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:6287:/ cond.else");
+ ("warmelt-normatch.melt:6438:/ cond.else");
/*^block */
/*anyblock */
@@ -35760,7 +50269,7 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("add_norm_step invalid argument"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6287) ? (6287) : __LINE__, __FUNCTION__);
+ melt_assert_failed (("add_norm_step invalid argument"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6438) ? (6438) : __LINE__, __FUNCTION__);
;
}
;
@@ -35776,7 +50285,7 @@ lab_endgetargs:;
/*_.IFELSE___V16*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6287:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6438:/ clear");
/*clear *//*_.IFELSE___V16*/ meltfptr[12] = 0;
}
@@ -35786,7 +50295,7 @@ lab_endgetargs:;
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION
- ("warmelt-normatch.melt:6285:/ quasiblock");
+ ("warmelt-normatch.melt:6436:/ quasiblock");
/*_.PROGN___V17*/ meltfptr[12] =
@@ -35797,7 +50306,7 @@ lab_endgetargs:;
/*_.PROGN___V17*/ meltfptr[12];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6280:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6431:/ clear");
/*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0;
/*^clear */
/*clear *//*_.IFCPP___V15*/ meltfptr[11] = 0;
@@ -35811,7 +50320,7 @@ lab_endgetargs:;
/*_.IFELSE___V8*/ meltfptr[7];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6275:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6426:/ clear");
/*clear *//*_#IS_MULTIPLE__L3*/ meltfnum[2] = 0;
/*^clear */
/*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
@@ -35822,7 +50331,7 @@ lab_endgetargs:;
/*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6273:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6424:/ clear");
/*clear *//*_#IS_LIST__L2*/ meltfnum[1] = 0;
/*^clear */
/*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0;
@@ -35830,11 +50339,11 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];;
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -35855,14 +50364,14 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_123_warmelt_normatch_LAMBDA___28__ */
+} /*end meltrout_131_warmelt_normatch_LAMBDA___28__ */
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -35883,7 +50392,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
#define meltcallcount 0L
#endif
- struct frame_meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH_st
+ struct frame_meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH_st
{
int mcfr_nbvar;
#if MELT_HAVE_DEBUG
@@ -35894,10 +50403,10 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
struct meltclosure_st *mcfr_clos;
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 234
- void *mcfr_varptr[234];
-#define MELTFRAM_NBVARNUM 79
- long mcfr_varnum[79];
+#define MELTFRAM_NBVARPTR 230
+ void *mcfr_varptr[230];
+#define MELTFRAM_NBVARNUM 77
+ long mcfr_varnum[77];
/*others*/
long _spare_;
}
@@ -35908,13 +50417,13 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
int ix = 0;
meltframptr_ = (void *) meltfirstargp_;
gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 234; ix++)
+ for (ix = 0; ix < 230; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
return NULL;
} /*end markggc */ ;
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 234;
+ meltfram__.mcfr_nbvar = 230;
meltfram__.mcfr_clos = meltclosp_;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
@@ -35922,7 +50431,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
/*getargs*/
/*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ getarg");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ getarg");
/*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
/*getarg#1 */
@@ -35962,7 +50471,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6300:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6451:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -35971,7 +50480,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]),
(melt_ptr_t) (( /*!CLASS_SOURCE_MATCH */
meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:6300:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6451:/ cond");
/*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -35979,7 +50488,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6300:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6451:/ cond.else");
/*^block */
/*anyblock */
@@ -35993,7 +50502,7 @@ lab_endgetargs:;
melt_assert_failed (("check match recv"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6300) ? (6300) : __LINE__, __FUNCTION__);
+ (6451) ? (6451) : __LINE__, __FUNCTION__);
;
}
;
@@ -36008,7 +50517,7 @@ lab_endgetargs:;
/*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6300:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6451:/ clear");
/*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
@@ -36021,7 +50530,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6301:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6452:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36030,7 +50539,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
(melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6301:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6452:/ cond");
/*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36038,7 +50547,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6301:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6452:/ cond.else");
/*^block */
/*anyblock */
@@ -36052,7 +50561,7 @@ lab_endgetargs:;
melt_assert_failed (("check env"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6301) ? (6301) : __LINE__, __FUNCTION__);
+ (6452) ? (6452) : __LINE__, __FUNCTION__);
;
}
;
@@ -36067,7 +50576,7 @@ lab_endgetargs:;
/*_.IFCPP___V8*/ meltfptr[6] = /*_.IFELSE___V9*/ meltfptr[8];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6301:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6452:/ clear");
/*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0;
@@ -36080,7 +50589,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6302:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6453:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36089,7 +50598,7 @@ lab_endgetargs:;
melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V4*/ meltfptr[3]),
(melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */
meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:6302:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6453:/ cond");
/*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36097,7 +50606,7 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6302:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6453:/ cond.else");
/*^block */
/*anyblock */
@@ -36111,7 +50620,7 @@ lab_endgetargs:;
melt_assert_failed (("check nctxt"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6302) ? (6302) : __LINE__, __FUNCTION__);
+ (6453) ? (6453) : __LINE__, __FUNCTION__);
;
}
;
@@ -36126,7 +50635,7 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[8] = /*_.IFELSE___V11*/ meltfptr[10];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6302:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6453:/ clear");
/*clear *//*_#IS_A__L3*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
@@ -36139,7 +50648,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36162,7 +50671,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36172,7 +50681,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36182,7 +50691,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6303;
+ argtab[2].meltbp_long = 6454;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch recv";
/*^apply.arg */
@@ -36202,7 +50711,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
@@ -36215,7 +50724,7 @@ lab_endgetargs:;
/*_.IF___V13*/ meltfptr[12] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ quasiblock");
/*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
@@ -36224,7 +50733,7 @@ lab_endgetargs:;
/*_.IFCPP___V12*/ meltfptr[10] = /*_.PROGN___V15*/ meltfptr[13];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6303:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6454:/ clear");
/*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V13*/ meltfptr[12] = 0;
@@ -36239,7 +50748,7 @@ lab_endgetargs:;
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6304:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6455:/ locexp");
#if MELT_HAVE_DEBUG
if (melt_flag_debug)
@@ -36248,7 +50757,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6305:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6456:/ quasiblock");
/*^getslot */
@@ -36267,12 +50776,12 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6305:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6456:/ cond.else");
/*_.SLOC__V18*/ meltfptr[17] = /*_.PSLOC__V5*/ meltfptr[4];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6306:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6457:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 2, "SMAT_MATCHEDX");
@@ -36280,7 +50789,7 @@ lab_endgetargs:;
meltfptr[18] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6307:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6458:/ getslot");
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), 3, "SMAT_CASES");
@@ -36296,7 +50805,7 @@ lab_endgetargs:;
/*_.FIRSTSTEP__V21*/ meltfptr[20] = ( /*nil */ NULL);;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36319,7 +50828,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36329,7 +50838,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36339,7 +50848,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6311;
+ argtab[2].meltbp_long = 6462;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch scases";
/*^apply.arg */
@@ -36359,7 +50868,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0;
@@ -36372,7 +50881,7 @@ lab_endgetargs:;
/*_.IF___V23*/ meltfptr[22] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ quasiblock");
/*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];;
@@ -36381,7 +50890,7 @@ lab_endgetargs:;
/*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6311:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6462:/ clear");
/*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V23*/ meltfptr[22] = 0;
@@ -36396,7 +50905,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36419,7 +50928,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -36429,7 +50938,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36440,7 +50949,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6312;
+ argtab[2].meltbp_long = 6463;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch smatsx";
/*^apply.arg */
@@ -36460,7 +50969,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0;
@@ -36473,7 +50982,7 @@ lab_endgetargs:;
/*_.IF___V27*/ meltfptr[23] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ quasiblock");
/*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[23];;
@@ -36482,7 +50991,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = /*_.PROGN___V29*/ meltfptr[27];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6312:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6463:/ clear");
/*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IF___V27*/ meltfptr[23] = 0;
@@ -36495,7 +51004,7 @@ lab_endgetargs:;
/*_.IFCPP___V26*/ meltfptr[22] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6313:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6464:/ quasiblock");
/*^multimsend */
@@ -36524,7 +51033,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36547,7 +51056,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -36557,7 +51066,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36568,7 +51077,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6316;
+ argtab[2].meltbp_long = 6467;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nmatx";
/*^apply.arg */
@@ -36588,7 +51097,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
@@ -36601,7 +51110,7 @@ lab_endgetargs:;
/*_.IF___V34*/ meltfptr[33] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ quasiblock");
/*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
@@ -36610,7 +51119,7 @@ lab_endgetargs:;
/*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6316:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6467:/ clear");
/*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V34*/ meltfptr[33] = 0;
@@ -36625,7 +51134,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -36648,7 +51157,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[7]) /*then */
{
/*^cond.then */
@@ -36658,7 +51167,7 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ apply");
/*apply */
{
union meltparam_un argtab[5];
@@ -36669,7 +51178,7 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6317;
+ argtab[2].meltbp_long = 6468;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nbindmatx";
/*^apply.arg */
@@ -36689,7 +51198,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
@@ -36702,7 +51211,7 @@ lab_endgetargs:;
/*_.IF___V38*/ meltfptr[34] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ quasiblock");
/*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[34];;
@@ -36711,7 +51220,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[33] = /*_.PROGN___V40*/ meltfptr[38];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6317:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6468:/ clear");
/*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.IF___V38*/ meltfptr[34] = 0;
@@ -36724,7 +51233,7 @@ lab_endgetargs:;
/*_.IFCPP___V37*/ meltfptr[33] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6318:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6469:/ quasiblock");
/*^msend */
@@ -36750,8 +51259,13 @@ lab_endgetargs:;
/*_.MSTEPLIST__V44*/ meltfptr[43] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[7]))));;
- MELT_LOCATION ("warmelt-normatch.melt:6321:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMATX__V31*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6472:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMATX__V31*/ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -36769,7 +51283,7 @@ lab_endgetargs:;
/*_.NOCC_SYMB__V45*/ meltfptr[44] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6321:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6472:/ cond");
/*cond */ if ( /*_.NOCC_SYMB__V45*/ meltfptr[44]) /*then */
{
/*^cond.then */
@@ -36777,14 +51291,20 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6321:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6472:/ cond.else");
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6322:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NMATX__V31*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6473:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NMATX__V31*/
+ meltfptr[27]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[10])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -36802,7 +51322,7 @@ lab_endgetargs:;
/*_.NAMED_NAME__V47*/ meltfptr[46] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6322:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6473:/ cond");
/*cond */ if ( /*_.NAMED_NAME__V47*/ meltfptr[46]) /*then */
{
/*^cond.then */
@@ -36811,13 +51331,13 @@ lab_endgetargs:;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6322:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6473:/ cond.else");
/*_.OR___V48*/ meltfptr[47] =
( /*!konst_9_MATCHED_DATA */ meltfrout->tabval[9]);;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6322:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6473:/ apply");
/*apply */
{
/*_.CLONE_SYMBOL__V49*/ meltfptr[48] =
@@ -36832,7 +51352,7 @@ lab_endgetargs:;
/*_.CLONE_SYMBOL__V49*/ meltfptr[48];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6321:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6472:/ clear");
/*clear *//*_.NAMED_NAME__V47*/ meltfptr[46] = 0;
/*^clear */
/*clear *//*_.OR___V48*/ meltfptr[47] = 0;
@@ -36842,7 +51362,7 @@ lab_endgetargs:;
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6324:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6475:/ quasiblock");
/*^rawallocobj */
@@ -36895,7 +51415,7 @@ lab_endgetargs:;
"MDATA_STEPS");
;
/*_.MDATA__V50*/ meltfptr[46] = /*_.INST__V51*/ meltfptr[47];;
- MELT_LOCATION ("warmelt-normatch.melt:6331:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6482:/ quasiblock");
/*^rawallocobj */
@@ -36939,7 +51459,7 @@ lab_endgetargs:;
/*_.MAKE_LIST__V55*/ meltfptr[54] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[7]))));;
- MELT_LOCATION ("warmelt-normatch.melt:6335:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6486:/ quasiblock");
/*^rawallocobj */
@@ -37049,7 +51569,7 @@ lab_endgetargs:;
/*_.MATCTX__V56*/ meltfptr[55] = /*_.INST__V57*/ meltfptr[56];;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37072,7 +51592,7 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ cond");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ cond");
/*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */
{
/*^cond.then */
@@ -37082,10 +51602,10 @@ lab_endgetargs:;
/*_#THE_MELTCALLCOUNT__L16*/ meltfnum[7] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ apply");
/*apply */
{
- union meltparam_un argtab[5];
+ union meltparam_un argtab[9];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
@@ -37093,18 +51613,30 @@ lab_endgetargs:;
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6348;
+ argtab[2].meltbp_long = 6499;
/*^apply.arg */
- argtab[3].meltbp_cstring = "normexp_altmatch matctyp";
+ argtab[3].meltbp_cstring = "normexp_altmatch matctyp=";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.MATCTYP__V42*/ meltfptr[38];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = "\n mdata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V50*/ meltfptr[46];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = "\n matctx=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MATCTX__V56*/ meltfptr[55];
/*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
(MELTBPARSTR_LONG MELTBPARSTR_CSTRING
MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -37113,7 +51645,7 @@ lab_endgetargs:;
/*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ clear");
/*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[7] = 0;
/*^clear */
/*clear *//*_.MELT_DEBUG_FUN__V60*/ meltfptr[59] = 0;
@@ -37126,7 +51658,7 @@ lab_endgetargs:;
/*_.IF___V59*/ meltfptr[58] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ quasiblock");
/*_.PROGN___V61*/ meltfptr[59] = /*_.IF___V59*/ meltfptr[58];;
@@ -37135,7 +51667,7 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[57] = /*_.PROGN___V61*/ meltfptr[59];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6348:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6499:/ clear");
/*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0;
/*^clear */
/*clear *//*_.IF___V59*/ meltfptr[58] = 0;
@@ -37148,126 +51680,25 @@ lab_endgetargs:;
/*_.IFCPP___V58*/ meltfptr[57] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6349:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L17*/ meltfnum[7] =
- /*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-normatch.melt:6349:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6349:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6349;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "normexp_altmatch matctx";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATCTX__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V63*/ meltfptr[59] =
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6349:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V63*/ meltfptr[59] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6349:/ quasiblock");
-
-
- /*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[59];;
- /*^compute */
-
- /*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6349:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.IF___V63*/ meltfptr[59] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V65*/ meltfptr[63] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V62*/ meltfptr[58] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
/*citerblock FOREACH_IN_MULTIPLE */
{
/* start cit1__EACHTUP: */
long cit1__EACHTUP_ln =
melt_multiple_length ((melt_ptr_t) /*_.SCASES__V20*/ meltfptr[19]);
- for ( /*_#CURIX__L19*/ meltfnum[0] = 0;
- ( /*_#CURIX__L19*/ meltfnum[0] >= 0)
- && ( /*_#CURIX__L19*/ meltfnum[0] < cit1__EACHTUP_ln);
- /*_#CURIX__L19*/ meltfnum[0]++)
+ for ( /*_#CURIX__L17*/ meltfnum[7] = 0;
+ ( /*_#CURIX__L17*/ meltfnum[7] >= 0)
+ && ( /*_#CURIX__L17*/ meltfnum[7] < cit1__EACHTUP_ln);
+ /*_#CURIX__L17*/ meltfnum[7]++)
{
- /*_.CURSCAS__V66*/ meltfptr[59] =
+ /*_.CURSCAS__V62*/ meltfptr[58] =
melt_multiple_nth ((melt_ptr_t) ( /*_.SCASES__V20*/ meltfptr[19]),
- /*_#CURIX__L19*/ meltfnum[0]);
+ /*_#CURIX__L17*/ meltfnum[7]);
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37282,7 +51713,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L20*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L18*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -37290,34 +51721,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] =
+ /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20];
+ /*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6354;
+ argtab[2].meltbp_long = 6505;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch curscas";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSCAS__V66*/ meltfptr[59];
- /*_.MELT_DEBUG_FUN__V69*/ meltfptr[68] =
+ (melt_ptr_t *) & /*_.CURSCAS__V62*/ meltfptr[58];
+ /*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -37328,65 +51759,65 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V68*/ meltfptr[67] =
- /*_.MELT_DEBUG_FUN__V69*/ meltfptr[68];;
+ /*_.IF___V64*/ meltfptr[63] =
+ /*_.MELT_DEBUG_FUN__V65*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V69*/ meltfptr[68] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[64] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V68*/ meltfptr[67] = NULL;;
+ /*_.IF___V64*/ meltfptr[63] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ quasiblock");
- /*_.PROGN___V70*/ meltfptr[68] = /*_.IF___V68*/ meltfptr[67];;
+ /*_.PROGN___V66*/ meltfptr[64] = /*_.IF___V64*/ meltfptr[63];;
/*^compute */
- /*_.IFCPP___V67*/ meltfptr[63] = /*_.PROGN___V70*/ meltfptr[68];;
+ /*_.IFCPP___V63*/ meltfptr[59] = /*_.PROGN___V66*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6354:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6505:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V68*/ meltfptr[67] = 0;
+ /*clear *//*_.IF___V64*/ meltfptr[63] = 0;
/*^clear */
- /*clear *//*_.PROGN___V70*/ meltfptr[68] = 0;
+ /*clear *//*_.PROGN___V66*/ meltfptr[64] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V67*/ meltfptr[63] = ( /*nil */ NULL);
+ /*_.IFCPP___V63*/ meltfptr[59] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6355:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6506:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L22*/ meltfnum[20] =
+ /*_#IS_A__L20*/ meltfnum[18] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURSCAS__V66*/ meltfptr[59]),
+ ( /*_.CURSCAS__V62*/ meltfptr[58]),
(melt_ptr_t) (( /*!CLASS_SOURCE_MATCH_CASE */ meltfrout->tabval[15])));;
- MELT_LOCATION ("warmelt-normatch.melt:6355:/ cond");
- /*cond */ if ( /*_#IS_A__L22*/ meltfnum[20]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6506:/ cond");
+ /*cond */ if ( /*_#IS_A__L20*/ meltfnum[18]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V72*/ meltfptr[68] = ( /*nil */ NULL);;
+ /*_.IFELSE___V68*/ meltfptr[64] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6355:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6506:/ cond.else");
/*^block */
/*anyblock */
@@ -37400,12 +51831,12 @@ lab_endgetargs:;
melt_assert_failed (("check curscas"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6355) ? (6355) : __LINE__,
+ __FILE__, (6506) ? (6506) : __LINE__,
__FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V72*/ meltfptr[68] = 0;
+ /*clear *//*_.IFELSE___V68*/ meltfptr[64] = 0;
/*epilog */
}
;
@@ -37413,29 +51844,29 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V71*/ meltfptr[67] = /*_.IFELSE___V72*/ meltfptr[68];;
+ /*_.IFCPP___V67*/ meltfptr[63] = /*_.IFELSE___V68*/ meltfptr[64];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6355:/ clear");
- /*clear *//*_#IS_A__L22*/ meltfnum[20] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6506:/ clear");
+ /*clear *//*_#IS_A__L20*/ meltfnum[18] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V72*/ meltfptr[68] = 0;
+ /*clear *//*_.IFELSE___V68*/ meltfptr[64] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V71*/ meltfptr[67] = ( /*nil */ NULL);
+ /*_.IFCPP___V67*/ meltfptr[63] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6356:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6507:/ quasiblock");
- /*_.MAKE_INTEGERBOX__V73*/ meltfptr[68] =
+ /*_.MAKE_INTEGERBOX__V69*/ meltfptr[64] =
(meltgc_new_int
((meltobject_ptr_t)
(( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[17])),
- ( /*_#CURIX__L19*/ meltfnum[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:6356:/ quasiblock");
+ ( /*_#CURIX__L17*/ meltfnum[7])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6507:/ quasiblock");
/*^rawallocobj */
@@ -37446,7 +51877,7 @@ lab_endgetargs:;
(melt_ptr_t) (( /*!CLASS_MATCH_CASE */
meltfrout->tabval[16])),
(5), "CLASS_MATCH_CASE");
- /*_.INST__V75*/ meltfptr[74] =
+ /*_.INST__V71*/ meltfptr[70] =
newobj;
};
;
@@ -37454,9 +51885,9 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @MCASE_MCTXT",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V75*/ meltfptr[74]))
+ ( /*_.INST__V71*/ meltfptr[70]))
== MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V75*/ meltfptr[74]), (1),
+ melt_putfield_object (( /*_.INST__V71*/ meltfptr[70]), (1),
( /*_.MATCTX__V56*/ meltfptr[55]),
"MCASE_MCTXT");
;
@@ -37464,24 +51895,24 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @MCASE_SOURCE",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V75*/ meltfptr[74]))
+ ( /*_.INST__V71*/ meltfptr[70]))
== MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V75*/ meltfptr[74]), (2),
- ( /*_.CURSCAS__V66*/ meltfptr[59]),
+ melt_putfield_object (( /*_.INST__V71*/ meltfptr[70]), (2),
+ ( /*_.CURSCAS__V62*/ meltfptr[58]),
"MCASE_SOURCE");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @MCASE_INDEX",
melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V75*/ meltfptr[74]))
+ ( /*_.INST__V71*/ meltfptr[70]))
== MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V75*/ meltfptr[74]), (3),
- ( /*_.MAKE_INTEGERBOX__V73*/ meltfptr[68]),
+ melt_putfield_object (( /*_.INST__V71*/ meltfptr[70]), (3),
+ ( /*_.MAKE_INTEGERBOX__V69*/ meltfptr[64]),
"MCASE_INDEX");
;
- /*_.CURMCASE__V74*/ meltfptr[73] = /*_.INST__V75*/ meltfptr[74];;
- MELT_LOCATION ("warmelt-normatch.melt:6364:/ apply");
+ /*_.CURMCASE__V70*/ meltfptr[69] = /*_.INST__V71*/ meltfptr[70];;
+ MELT_LOCATION ("warmelt-normatch.melt:6515:/ apply");
/*apply */
{
union meltparam_un argtab[1];
@@ -37489,50 +51920,50 @@ lab_endgetargs:;
/*^apply.arg */
argtab[0].meltbp_aptr =
(melt_ptr_t *) & /*_.SLOC__V18*/ meltfptr[17];
- /*_.FILL_MATCHCASE__V76*/ meltfptr[75] =
+ /*_.FILL_MATCHCASE__V72*/ meltfptr[71] =
melt_apply ((meltclosure_ptr_t)
(( /*!FILL_MATCHCASE */ meltfrout->tabval[18])),
- (melt_ptr_t) ( /*_.CURMCASE__V74*/ meltfptr[73]),
+ (melt_ptr_t) ( /*_.CURMCASE__V70*/ meltfptr[69]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6365:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6516:/ locexp");
meltgc_multiple_put_nth ((melt_ptr_t)
( /*_.MCASETUP__V43*/ meltfptr[42]),
- ( /*_#CURIX__L19*/ meltfnum[0]),
- (melt_ptr_t) ( /*_.CURMCASE__V74*/
- meltfptr[73]));
+ ( /*_#CURIX__L17*/ meltfnum[7]),
+ (melt_ptr_t) ( /*_.CURMCASE__V70*/
+ meltfptr[69]));
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6356:/ clear");
- /*clear *//*_.MAKE_INTEGERBOX__V73*/ meltfptr[68] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6507:/ clear");
+ /*clear *//*_.MAKE_INTEGERBOX__V69*/ meltfptr[64] = 0;
/*^clear */
- /*clear *//*_.CURMCASE__V74*/ meltfptr[73] = 0;
+ /*clear *//*_.CURMCASE__V70*/ meltfptr[69] = 0;
/*^clear */
- /*clear *//*_.FILL_MATCHCASE__V76*/ meltfptr[75] = 0;
- if ( /*_#CURIX__L19*/ meltfnum[0] < 0)
+ /*clear *//*_.FILL_MATCHCASE__V72*/ meltfptr[71] = 0;
+ if ( /*_#CURIX__L17*/ meltfnum[7] < 0)
break;
} /* end cit1__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6351:/ clear");
- /*clear *//*_.CURSCAS__V66*/ meltfptr[59] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6502:/ clear");
+ /*clear *//*_.CURSCAS__V62*/ meltfptr[58] = 0;
/*^clear */
- /*clear *//*_#CURIX__L19*/ meltfnum[0] = 0;
+ /*clear *//*_#CURIX__L17*/ meltfnum[7] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V67*/ meltfptr[63] = 0;
+ /*clear *//*_.IFCPP___V63*/ meltfptr[59] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V71*/ meltfptr[67] = 0;
+ /*clear *//*_.IFCPP___V67*/ meltfptr[63] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37547,7 +51978,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L23*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L21*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -37555,34 +51986,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20] =
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[18] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20];
+ /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[18];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6367;
+ argtab[2].meltbp_long = 6518;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch mcasetup";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.MCASETUP__V43*/ meltfptr[42];
- /*_.MELT_DEBUG_FUN__V79*/ meltfptr[75] =
+ /*_.MELT_DEBUG_FUN__V75*/ meltfptr[71] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -37592,72 +52023,72 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V78*/ meltfptr[73] =
- /*_.MELT_DEBUG_FUN__V79*/ meltfptr[75];;
+ /*_.IF___V74*/ meltfptr[69] =
+ /*_.MELT_DEBUG_FUN__V75*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[20] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[18] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V79*/ meltfptr[75] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V75*/ meltfptr[71] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V78*/ meltfptr[73] = NULL;;
+ /*_.IF___V74*/ meltfptr[69] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ quasiblock");
- /*_.PROGN___V80*/ meltfptr[75] = /*_.IF___V78*/ meltfptr[73];;
+ /*_.PROGN___V76*/ meltfptr[71] = /*_.IF___V74*/ meltfptr[69];;
/*^compute */
- /*_.IFCPP___V77*/ meltfptr[68] = /*_.PROGN___V80*/ meltfptr[75];;
+ /*_.IFCPP___V73*/ meltfptr[64] = /*_.PROGN___V76*/ meltfptr[71];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6367:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6518:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V78*/ meltfptr[73] = 0;
+ /*clear *//*_.IF___V74*/ meltfptr[69] = 0;
/*^clear */
- /*clear *//*_.PROGN___V80*/ meltfptr[75] = 0;
+ /*clear *//*_.PROGN___V76*/ meltfptr[71] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V77*/ meltfptr[68] = ( /*nil */ NULL);
+ /*_.IFCPP___V73*/ meltfptr[64] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6369:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6520:/ quasiblock");
- /*_.PREVSTEP__V82*/ meltfptr[75] = ( /*nil */ NULL);;
+ /*_.PREVSTEP__V78*/ meltfptr[71] = ( /*nil */ NULL);;
/*^compute */
- /*_.MATRESCTYP__V83*/ meltfptr[82] = ( /*nil */ NULL);;
+ /*_.MATRESCTYP__V79*/ meltfptr[78] = ( /*nil */ NULL);;
/*citerblock FOREACH_IN_MULTIPLE */
{
/* start cit2__EACHTUP: */
long cit2__EACHTUP_ln =
melt_multiple_length ((melt_ptr_t) /*_.MCASETUP__V43*/ meltfptr[42]);
- for ( /*_#MIX__L25*/ meltfnum[20] = 0;
- ( /*_#MIX__L25*/ meltfnum[20] >= 0)
- && ( /*_#MIX__L25*/ meltfnum[20] < cit2__EACHTUP_ln);
- /*_#MIX__L25*/ meltfnum[20]++)
+ for ( /*_#MIX__L23*/ meltfnum[18] = 0;
+ ( /*_#MIX__L23*/ meltfnum[18] >= 0)
+ && ( /*_#MIX__L23*/ meltfnum[18] < cit2__EACHTUP_ln);
+ /*_#MIX__L23*/ meltfnum[18]++)
{
- /*_.CURMCASE__V84*/ meltfptr[83] =
+ /*_.CURMCASE__V80*/ meltfptr[79] =
melt_multiple_nth ((melt_ptr_t)
( /*_.MCASETUP__V43*/ meltfptr[42]),
- /*_#MIX__L25*/ meltfnum[20]);
+ /*_#MIX__L23*/ meltfnum[18]);
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37672,7 +52103,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L26*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L24*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -37680,35 +52111,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] =
+ /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26];
+ /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6375;
+ argtab[2].meltbp_long = 6526;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch before translate_matchcase curmcase";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURMCASE__V84*/ meltfptr[83];
- /*_.MELT_DEBUG_FUN__V87*/ meltfptr[86] =
+ (melt_ptr_t *) & /*_.CURMCASE__V80*/ meltfptr[79];
+ /*_.MELT_DEBUG_FUN__V83*/ meltfptr[82] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -37719,48 +52150,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V86*/ meltfptr[85] =
- /*_.MELT_DEBUG_FUN__V87*/ meltfptr[86];;
+ /*_.IF___V82*/ meltfptr[81] =
+ /*_.MELT_DEBUG_FUN__V83*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V87*/ meltfptr[86] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V83*/ meltfptr[82] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V86*/ meltfptr[85] = NULL;;
+ /*_.IF___V82*/ meltfptr[81] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ quasiblock");
- /*_.PROGN___V88*/ meltfptr[86] = /*_.IF___V86*/ meltfptr[85];;
+ /*_.PROGN___V84*/ meltfptr[82] = /*_.IF___V82*/ meltfptr[81];;
/*^compute */
- /*_.IFCPP___V85*/ meltfptr[84] = /*_.PROGN___V88*/ meltfptr[86];;
+ /*_.IFCPP___V81*/ meltfptr[80] = /*_.PROGN___V84*/ meltfptr[82];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6375:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6526:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V86*/ meltfptr[85] = 0;
+ /*clear *//*_.IF___V82*/ meltfptr[81] = 0;
/*^clear */
- /*clear *//*_.PROGN___V88*/ meltfptr[86] = 0;
+ /*clear *//*_.PROGN___V84*/ meltfptr[82] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V85*/ meltfptr[84] = ( /*nil */ NULL);
+ /*_.IFCPP___V81*/ meltfptr[80] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37775,7 +52206,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L28*/ meltfnum[26] =
+ /*_#MELT_NEED_DBG__L26*/ meltfnum[24] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -37783,35 +52214,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[26]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[7] =
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[7];
+ /*_#THE_MELTCALLCOUNT__L27*/ meltfnum[0];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6376;
+ argtab[2].meltbp_long = 6527;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch before translate_matchcase prevstep";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V82*/ meltfptr[75];
- /*_.MELT_DEBUG_FUN__V91*/ meltfptr[90] =
+ (melt_ptr_t *) & /*_.PREVSTEP__V78*/ meltfptr[71];
+ /*_.MELT_DEBUG_FUN__V87*/ meltfptr[86] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -37822,101 +52253,113 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V90*/ meltfptr[86] =
- /*_.MELT_DEBUG_FUN__V91*/ meltfptr[90];;
+ /*_.IF___V86*/ meltfptr[82] =
+ /*_.MELT_DEBUG_FUN__V87*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[90] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V87*/ meltfptr[86] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V90*/ meltfptr[86] = NULL;;
+ /*_.IF___V86*/ meltfptr[82] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ quasiblock");
- /*_.PROGN___V92*/ meltfptr[90] = /*_.IF___V90*/ meltfptr[86];;
+ /*_.PROGN___V88*/ meltfptr[86] = /*_.IF___V86*/ meltfptr[82];;
/*^compute */
- /*_.IFCPP___V89*/ meltfptr[85] = /*_.PROGN___V92*/ meltfptr[90];;
+ /*_.IFCPP___V85*/ meltfptr[81] = /*_.PROGN___V88*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6376:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6527:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.IF___V90*/ meltfptr[86] = 0;
+ /*clear *//*_.IF___V86*/ meltfptr[82] = 0;
/*^clear */
- /*clear *//*_.PROGN___V92*/ meltfptr[90] = 0;
+ /*clear *//*_.PROGN___V88*/ meltfptr[86] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V89*/ meltfptr[85] = ( /*nil */ NULL);
+ /*_.IFCPP___V85*/ meltfptr[81] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6377:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6528:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURMCASE__V84*/ meltfptr[83]), (melt_ptr_t) (( /*!CLASS_MATCH_CASE */ meltfrout->tabval[16])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURMCASE__V80*/
+ meltfptr[79]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_CASE */ meltfrout->tabval[16])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V84*/ meltfptr[83]), 2, "MCASE_SOURCE");
- /*_.MCASE_SOURCE__V94*/
- meltfptr[90] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURMCASE__V80*/ meltfptr[79]), 2, "MCASE_SOURCE");
+ /*_.MCASE_SOURCE__V90*/
+ meltfptr[86] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.MCASE_SOURCE__V94*/ meltfptr[90] = NULL;;
+ /*_.MCASE_SOURCE__V90*/ meltfptr[86] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6377:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MCASE_SOURCE__V94*/ meltfptr[90]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[19])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6528:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MCASE_SOURCE__V90*/
+ meltfptr[86]),
+ (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout->tabval[19])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE_SOURCE__V94*/ meltfptr[90]), 1, "LOCA_LOCATION");
- /*_.LOCA_LOCATION__V95*/
- meltfptr[94] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCASE_SOURCE__V90*/ meltfptr[86]), 1, "LOCA_LOCATION");
+ /*_.LOCA_LOCATION__V91*/
+ meltfptr[90] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.LOCA_LOCATION__V95*/ meltfptr[94] = NULL;;
+ /*_.LOCA_LOCATION__V91*/ meltfptr[90] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6377:/ cond");
- /*cond */ if ( /*_.LOCA_LOCATION__V95*/ meltfptr[94]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6528:/ cond");
+ /*cond */ if ( /*_.LOCA_LOCATION__V91*/ meltfptr[90]) /*then */
{
/*^cond.then */
- /*_.MCASLOC__V96*/ meltfptr[95] =
- /*_.LOCA_LOCATION__V95*/ meltfptr[94];;
+ /*_.MCASLOC__V92*/ meltfptr[91] =
+ /*_.LOCA_LOCATION__V91*/ meltfptr[90];;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6377:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6528:/ cond.else");
- /*_.MCASLOC__V96*/ meltfptr[95] = /*_.SLOC__V18*/ meltfptr[17];;
+ /*_.MCASLOC__V92*/ meltfptr[91] = /*_.SLOC__V18*/ meltfptr[17];;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6379:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6530:/ quasiblock");
/*^multiapply */
@@ -37928,18 +52371,18 @@ lab_endgetargs:;
memset (&restab, 0, sizeof (restab));
memset (&argtab, 0, sizeof (argtab));
/*^multiapply.arg */
- argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MCASLOC__V96*/ meltfptr[95]; /*^multiapply.arg */
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.MCASLOC__V92*/ meltfptr[91]; /*^multiapply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V82*/ meltfptr[75];
+ (melt_ptr_t *) & /*_.PREVSTEP__V78*/ meltfptr[71];
/*^multiapply.xres */
restab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSTSUCC__V99*/ meltfptr[98];
+ (melt_ptr_t *) & /*_.CURSTSUCC__V95*/ meltfptr[94];
/*^multiapply.appl */
- /*_.CURSTEP__V98*/ meltfptr[97] =
+ /*_.CURSTEP__V94*/ meltfptr[93] =
melt_apply ((meltclosure_ptr_t)
(( /*!TRANSLATE_MATCHCASE */ meltfrout->
tabval[20])),
- (melt_ptr_t) ( /*_.CURMCASE__V84*/ meltfptr[83]),
+ (melt_ptr_t) ( /*_.CURMCASE__V80*/ meltfptr[79]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab,
(MELTBPARSTR_PTR ""), restab);
}
@@ -37949,7 +52392,7 @@ lab_endgetargs:;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -37964,7 +52407,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L30*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L28*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -37972,35 +52415,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26] =
+ /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26];
+ /*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6382;
+ argtab[2].meltbp_long = 6533;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch after translate_matchcase curstep";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSTEP__V98*/ meltfptr[97];
- /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
+ (melt_ptr_t *) & /*_.CURSTEP__V94*/ meltfptr[93];
+ /*_.MELT_DEBUG_FUN__V98*/ meltfptr[97] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -38011,49 +52454,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V101*/ meltfptr[100] =
- /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
+ /*_.IF___V97*/ meltfptr[96] =
+ /*_.MELT_DEBUG_FUN__V98*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V98*/ meltfptr[97] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V101*/ meltfptr[100] = NULL;;
+ /*_.IF___V97*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ quasiblock");
- /*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[100];;
+ /*_.PROGN___V99*/ meltfptr[97] = /*_.IF___V97*/ meltfptr[96];;
/*^compute */
- /*_.IFCPP___V100*/ meltfptr[99] =
- /*_.PROGN___V103*/ meltfptr[101];;
+ /*_.IFCPP___V96*/ meltfptr[95] = /*_.PROGN___V99*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6382:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6533:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V101*/ meltfptr[100] = 0;
+ /*clear *//*_.IF___V97*/ meltfptr[96] = 0;
/*^clear */
- /*clear *//*_.PROGN___V103*/ meltfptr[101] = 0;
+ /*clear *//*_.PROGN___V99*/ meltfptr[97] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V100*/ meltfptr[99] = ( /*nil */ NULL);
+ /*_.IFCPP___V96*/ meltfptr[95] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38068,7 +52510,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L32*/ meltfnum[26] =
+ /*_#MELT_NEED_DBG__L30*/ meltfnum[24] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -38076,35 +52518,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[26]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L30*/ meltfnum[24]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[7] =
+ /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[7];
+ /*_#THE_MELTCALLCOUNT__L31*/ meltfnum[0];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6383;
+ argtab[2].meltbp_long = 6534;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch after translate_matchcase curstsucc";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSTSUCC__V99*/ meltfptr[98];
- /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] =
+ (melt_ptr_t *) & /*_.CURSTSUCC__V95*/ meltfptr[94];
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -38115,66 +52557,66 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V105*/ meltfptr[101] =
- /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105];;
+ /*_.IF___V101*/ meltfptr[97] =
+ /*_.MELT_DEBUG_FUN__V102*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L31*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V102*/ meltfptr[101] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V105*/ meltfptr[101] = NULL;;
+ /*_.IF___V101*/ meltfptr[97] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ quasiblock");
- /*_.PROGN___V107*/ meltfptr[105] = /*_.IF___V105*/ meltfptr[101];;
+ /*_.PROGN___V103*/ meltfptr[101] = /*_.IF___V101*/ meltfptr[97];;
/*^compute */
- /*_.IFCPP___V104*/ meltfptr[100] =
- /*_.PROGN___V107*/ meltfptr[105];;
+ /*_.IFCPP___V100*/ meltfptr[96] =
+ /*_.PROGN___V103*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6383:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6534:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L30*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.IF___V105*/ meltfptr[101] = 0;
+ /*clear *//*_.IF___V101*/ meltfptr[97] = 0;
/*^clear */
- /*clear *//*_.PROGN___V107*/ meltfptr[105] = 0;
+ /*clear *//*_.PROGN___V103*/ meltfptr[101] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V104*/ meltfptr[100] = ( /*nil */ NULL);
+ /*_.IFCPP___V100*/ meltfptr[96] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6384:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6535:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L34*/ meltfnum[7] =
+ /*_#IS_A__L32*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURSTSUCC__V99*/ meltfptr[98]),
+ ( /*_.CURSTSUCC__V95*/ meltfptr[94]),
(melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[21])));;
- MELT_LOCATION ("warmelt-normatch.melt:6384:/ cond");
- /*cond */ if ( /*_#IS_A__L34*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6535:/ cond");
+ /*cond */ if ( /*_#IS_A__L32*/ meltfnum[0]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V109*/ meltfptr[105] = ( /*nil */ NULL);;
+ /*_.IFELSE___V105*/ meltfptr[101] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6384:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6535:/ cond.else");
/*^block */
/*anyblock */
@@ -38188,12 +52630,12 @@ lab_endgetargs:;
melt_assert_failed (("check curstsucc"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6384) ? (6384) : __LINE__,
+ __FILE__, (6535) ? (6535) : __LINE__,
__FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V109*/ meltfptr[105] = 0;
+ /*clear *//*_.IFELSE___V105*/ meltfptr[101] = 0;
/*epilog */
}
;
@@ -38201,50 +52643,50 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V108*/ meltfptr[101] =
- /*_.IFELSE___V109*/ meltfptr[105];;
+ /*_.IFCPP___V104*/ meltfptr[97] =
+ /*_.IFELSE___V105*/ meltfptr[101];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6384:/ clear");
- /*clear *//*_#IS_A__L34*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6535:/ clear");
+ /*clear *//*_#IS_A__L32*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V109*/ meltfptr[105] = 0;
+ /*clear *//*_.IFELSE___V105*/ meltfptr[101] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V108*/ meltfptr[101] = ( /*nil */ NULL);
+ /*_.IFCPP___V104*/ meltfptr[97] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6385:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6536:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6386:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6537:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSTSUCC__V99*/ meltfptr[98]), 5, "MSTEPSUCCESS_BINDS");
- /*_.CURSTBINDTUP__V111*/
- meltfptr[110] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSTSUCC__V95*/ meltfptr[94]), 5, "MSTEPSUCCESS_BINDS");
+ /*_.CURSTBINDTUP__V107*/
+ meltfptr[106] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6388:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6539:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6390:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6541:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSTSUCC__V99*/ meltfptr[98]), 6, "MSTEPSUCCESS_BODY");
- /*_.MSTEPSUCCESS_BODY__V113*/
- meltfptr[112] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURSTSUCC__V95*/ meltfptr[94]), 6, "MSTEPSUCCESS_BODY");
+ /*_.MSTEPSUCCESS_BODY__V109*/
+ meltfptr[108] = slot;
};
;
- /*_.L__V114*/ meltfptr[113] =
+ /*_.L__V110*/ meltfptr[109] =
(melt_multiple_nth
- ((melt_ptr_t) ( /*_.MSTEPSUCCESS_BODY__V113*/ meltfptr[112]),
+ ((melt_ptr_t) ( /*_.MSTEPSUCCESS_BODY__V109*/ meltfptr[108]),
(-1)));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38259,7 +52701,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L35*/ meltfnum[26] =
+ /*_#MELT_NEED_DBG__L33*/ meltfnum[24] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -38267,34 +52709,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[26]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[24]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[7] =
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[0] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L36*/ meltfnum[7];
+ /*_#THE_MELTCALLCOUNT__L34*/ meltfnum[0];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6393;
+ argtab[2].meltbp_long = 6544;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch lastnbody";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.L__V114*/ meltfptr[113];
- /*_.MELT_DEBUG_FUN__V117*/ meltfptr[116] =
+ (melt_ptr_t *) & /*_.L__V110*/ meltfptr[109];
+ /*_.MELT_DEBUG_FUN__V113*/ meltfptr[112] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -38305,87 +52747,87 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V116*/ meltfptr[115] =
- /*_.MELT_DEBUG_FUN__V117*/ meltfptr[116];;
+ /*_.IF___V112*/ meltfptr[111] =
+ /*_.MELT_DEBUG_FUN__V113*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V117*/ meltfptr[116] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V113*/ meltfptr[112] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V116*/ meltfptr[115] = NULL;;
+ /*_.IF___V112*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ quasiblock");
- /*_.PROGN___V118*/ meltfptr[116] = /*_.IF___V116*/ meltfptr[115];;
+ /*_.PROGN___V114*/ meltfptr[112] = /*_.IF___V112*/ meltfptr[111];;
/*^compute */
- /*_.IFCPP___V115*/ meltfptr[114] =
- /*_.PROGN___V118*/ meltfptr[116];;
+ /*_.IFCPP___V111*/ meltfptr[110] =
+ /*_.PROGN___V114*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6393:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6544:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.IF___V116*/ meltfptr[115] = 0;
+ /*clear *//*_.IF___V112*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_.PROGN___V118*/ meltfptr[116] = 0;
+ /*clear *//*_.PROGN___V114*/ meltfptr[112] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V115*/ meltfptr[114] = ( /*nil */ NULL);
+ /*_.IFCPP___V111*/ meltfptr[110] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V112*/ meltfptr[111] = /*_.L__V114*/ meltfptr[113];;
+ /*_.LET___V108*/ meltfptr[107] = /*_.L__V110*/ meltfptr[109];;
- MELT_LOCATION ("warmelt-normatch.melt:6388:/ clear");
- /*clear *//*_.MSTEPSUCCESS_BODY__V113*/ meltfptr[112] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6539:/ clear");
+ /*clear *//*_.MSTEPSUCCESS_BODY__V109*/ meltfptr[108] = 0;
/*^clear */
- /*clear *//*_.L__V114*/ meltfptr[113] = 0;
+ /*clear *//*_.L__V110*/ meltfptr[109] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V115*/ meltfptr[114] = 0;
- /*_.LASTNBODY__V119*/ meltfptr[115] =
- /*_.LET___V112*/ meltfptr[111];;
+ /*clear *//*_.IFCPP___V111*/ meltfptr[110] = 0;
+ /*_.LASTNBODY__V115*/ meltfptr[111] =
+ /*_.LET___V108*/ meltfptr[107];;
/*^compute */
- /*_#IS_A__L37*/ meltfnum[7] =
+ /*_#IS_A__L35*/ meltfnum[0] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.LASTNBODY__V119*/ meltfptr[115]),
+ ( /*_.LASTNBODY__V115*/ meltfptr[111]),
(melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */
meltfrout->tabval[22])));;
- MELT_LOCATION ("warmelt-normatch.melt:6396:/ cond");
- /*cond */ if ( /*_#IS_A__L37*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6547:/ cond");
+ /*cond */ if ( /*_#IS_A__L35*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6397:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6548:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.LASTNBODY__V119*/ meltfptr[115]), 2, "NOCC_CTYP");
- /*_.NOCC_CTYP__V121*/
- meltfptr[112] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.LASTNBODY__V115*/ meltfptr[111]), 2, "NOCC_CTYP");
+ /*_.NOCC_CTYP__V117*/
+ meltfptr[108] = slot;
};
;
- /*_.LASTCTYP__V120*/ meltfptr[116] =
- /*_.NOCC_CTYP__V121*/ meltfptr[112];;
+ /*_.LASTCTYP__V116*/ meltfptr[112] =
+ /*_.NOCC_CTYP__V117*/ meltfptr[108];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6396:/ clear");
- /*clear *//*_.NOCC_CTYP__V121*/ meltfptr[112] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6547:/ clear");
+ /*clear *//*_.NOCC_CTYP__V117*/ meltfptr[108] = 0;
}
;
}
@@ -38396,13 +52838,13 @@ lab_endgetargs:;
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6398:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6549:/ quasiblock");
/*^apply */
/*apply */
{
- /*_.NEWCURENV__V123*/ meltfptr[114] =
+ /*_.NEWCURENV__V119*/ meltfptr[110] =
melt_apply ((meltclosure_ptr_t)
(( /*!FRESH_ENV */ meltfrout->tabval[23])),
(melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
@@ -38415,91 +52857,91 @@ lab_endgetargs:;
/* start cit3__EACHTUP: */
long cit3__EACHTUP_ln =
melt_multiple_length ((melt_ptr_t)
- /*_.CURSTBINDTUP__V111*/
- meltfptr[110]);
- for ( /*_#BIX__L38*/ meltfnum[26] = 0;
- ( /*_#BIX__L38*/ meltfnum[26] >= 0)
- && ( /*_#BIX__L38*/ meltfnum[26] < cit3__EACHTUP_ln);
- /*_#BIX__L38*/ meltfnum[26]++)
+ /*_.CURSTBINDTUP__V107*/
+ meltfptr[106]);
+ for ( /*_#BIX__L36*/ meltfnum[24] = 0;
+ ( /*_#BIX__L36*/ meltfnum[24] >= 0)
+ && ( /*_#BIX__L36*/ meltfnum[24] < cit3__EACHTUP_ln);
+ /*_#BIX__L36*/ meltfnum[24]++)
{
- /*_.CURSTEPBIND__V124*/ meltfptr[112] =
+ /*_.CURSTEPBIND__V120*/ meltfptr[108] =
melt_multiple_nth ((melt_ptr_t)
- ( /*_.CURSTBINDTUP__V111*/
- meltfptr[110]), /*_#BIX__L38*/
- meltfnum[26]);
+ ( /*_.CURSTBINDTUP__V107*/
+ meltfptr[106]), /*_#BIX__L36*/
+ meltfnum[24]);
- MELT_LOCATION ("warmelt-normatch.melt:6403:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6554:/ apply");
/*apply */
{
union meltparam_un argtab[1];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSTEPBIND__V124*/
- meltfptr[112];
- /*_.PUT_ENV__V125*/ meltfptr[124] =
+ (melt_ptr_t *) & /*_.CURSTEPBIND__V120*/
+ meltfptr[108];
+ /*_.PUT_ENV__V121*/ meltfptr[120] =
melt_apply ((meltclosure_ptr_t)
(( /*!PUT_ENV */ meltfrout->
tabval[24])),
- (melt_ptr_t) ( /*_.NEWCURENV__V123*/
- meltfptr[114]),
+ (melt_ptr_t) ( /*_.NEWCURENV__V119*/
+ meltfptr[110]),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- if ( /*_#BIX__L38*/ meltfnum[26] < 0)
+ if ( /*_#BIX__L36*/ meltfnum[24] < 0)
break;
} /* end cit3__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6400:/ clear");
- /*clear *//*_.CURSTEPBIND__V124*/ meltfptr[112] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6551:/ clear");
+ /*clear *//*_.CURSTEPBIND__V120*/ meltfptr[108] = 0;
/*^clear */
- /*clear *//*_#BIX__L38*/ meltfnum[26] = 0;
+ /*clear *//*_#BIX__L36*/ meltfnum[24] = 0;
/*^clear */
- /*clear *//*_.PUT_ENV__V125*/ meltfptr[124] = 0;
+ /*clear *//*_.PUT_ENV__V121*/ meltfptr[120] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
- MELT_LOCATION ("warmelt-normatch.melt:6405:/ msend");
+ MELT_LOCATION ("warmelt-normatch.melt:6556:/ msend");
/*msend */
{
union meltparam_un argtab[1];
memset (&argtab, 0, sizeof (argtab));
/*^ojbmsend.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.NEWCURENV__V123*/ meltfptr[114];
- /*_.GET_CTYPE__V126*/ meltfptr[125] =
+ (melt_ptr_t *) & /*_.NEWCURENV__V119*/ meltfptr[110];
+ /*_.GET_CTYPE__V122*/ meltfptr[121] =
meltgc_send ((melt_ptr_t)
- ( /*_.LASTNBODY__V119*/ meltfptr[115]),
+ ( /*_.LASTNBODY__V115*/ meltfptr[111]),
(melt_ptr_t) (( /*!GET_CTYPE */ meltfrout->
tabval[5])),
(MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.LET___V122*/ meltfptr[113] =
- /*_.GET_CTYPE__V126*/ meltfptr[125];;
+ /*_.LET___V118*/ meltfptr[109] =
+ /*_.GET_CTYPE__V122*/ meltfptr[121];;
- MELT_LOCATION ("warmelt-normatch.melt:6398:/ clear");
- /*clear *//*_.NEWCURENV__V123*/ meltfptr[114] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6549:/ clear");
+ /*clear *//*_.NEWCURENV__V119*/ meltfptr[110] = 0;
/*^clear */
- /*clear *//*_.GET_CTYPE__V126*/ meltfptr[125] = 0;
- /*_.LASTCTYP__V120*/ meltfptr[116] =
- /*_.LET___V122*/ meltfptr[113];;
+ /*clear *//*_.GET_CTYPE__V122*/ meltfptr[121] = 0;
+ /*_.LASTCTYP__V116*/ meltfptr[112] =
+ /*_.LET___V118*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6396:/ clear");
- /*clear *//*_.LET___V122*/ meltfptr[113] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6547:/ clear");
+ /*clear *//*_.LET___V118*/ meltfptr[109] = 0;
}
;
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38514,7 +52956,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L39*/ meltfnum[38] =
+ /*_#MELT_NEED_DBG__L37*/ meltfnum[36] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -38522,34 +52964,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6408;
+ argtab[2].meltbp_long = 6559;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch lastnbody";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LASTNBODY__V119*/ meltfptr[115];
- /*_.MELT_DEBUG_FUN__V129*/ meltfptr[113] =
+ (melt_ptr_t *) & /*_.LASTNBODY__V115*/ meltfptr[111];
+ /*_.MELT_DEBUG_FUN__V125*/ meltfptr[109] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -38560,49 +53002,49 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V128*/ meltfptr[125] =
- /*_.MELT_DEBUG_FUN__V129*/ meltfptr[113];;
+ /*_.IF___V124*/ meltfptr[121] =
+ /*_.MELT_DEBUG_FUN__V125*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V129*/ meltfptr[113] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V125*/ meltfptr[109] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V128*/ meltfptr[125] = NULL;;
+ /*_.IF___V124*/ meltfptr[121] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ quasiblock");
- /*_.PROGN___V130*/ meltfptr[113] = /*_.IF___V128*/ meltfptr[125];;
+ /*_.PROGN___V126*/ meltfptr[109] = /*_.IF___V124*/ meltfptr[121];;
/*^compute */
- /*_.IFCPP___V127*/ meltfptr[114] =
- /*_.PROGN___V130*/ meltfptr[113];;
+ /*_.IFCPP___V123*/ meltfptr[110] =
+ /*_.PROGN___V126*/ meltfptr[109];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6408:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6559:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IF___V128*/ meltfptr[125] = 0;
+ /*clear *//*_.IF___V124*/ meltfptr[121] = 0;
/*^clear */
- /*clear *//*_.PROGN___V130*/ meltfptr[113] = 0;
+ /*clear *//*_.PROGN___V126*/ meltfptr[109] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V127*/ meltfptr[114] = ( /*nil */ NULL);
+ /*_.IFCPP___V123*/ meltfptr[110] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -38617,7 +53059,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L41*/ meltfnum[39] =
+ /*_#MELT_NEED_DBG__L39*/ meltfnum[37] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -38625,34 +53067,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[39]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L39*/ meltfnum[37]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[38] =
+ /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[36] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L42*/ meltfnum[38];
+ /*_#THE_MELTCALLCOUNT__L40*/ meltfnum[36];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6409;
+ argtab[2].meltbp_long = 6560;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch lastctyp";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.LASTCTYP__V120*/ meltfptr[116];
- /*_.MELT_DEBUG_FUN__V133*/ meltfptr[132] =
+ (melt_ptr_t *) & /*_.LASTCTYP__V116*/ meltfptr[112];
+ /*_.MELT_DEBUG_FUN__V129*/ meltfptr[128] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -38663,67 +53105,67 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V132*/ meltfptr[113] =
- /*_.MELT_DEBUG_FUN__V133*/ meltfptr[132];;
+ /*_.IF___V128*/ meltfptr[109] =
+ /*_.MELT_DEBUG_FUN__V129*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L40*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V133*/ meltfptr[132] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V129*/ meltfptr[128] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V132*/ meltfptr[113] = NULL;;
+ /*_.IF___V128*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ quasiblock");
- /*_.PROGN___V134*/ meltfptr[132] = /*_.IF___V132*/ meltfptr[113];;
+ /*_.PROGN___V130*/ meltfptr[128] = /*_.IF___V128*/ meltfptr[109];;
/*^compute */
- /*_.IFCPP___V131*/ meltfptr[125] =
- /*_.PROGN___V134*/ meltfptr[132];;
+ /*_.IFCPP___V127*/ meltfptr[121] =
+ /*_.PROGN___V130*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6409:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6560:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L39*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.IF___V132*/ meltfptr[113] = 0;
+ /*clear *//*_.IF___V128*/ meltfptr[109] = 0;
/*^clear */
- /*clear *//*_.PROGN___V134*/ meltfptr[132] = 0;
+ /*clear *//*_.PROGN___V130*/ meltfptr[128] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V131*/ meltfptr[125] = ( /*nil */ NULL);
+ /*_.IFCPP___V127*/ meltfptr[121] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6410:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6561:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L43*/ meltfnum[38] =
+ /*_#IS_A__L41*/ meltfnum[36] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.LASTCTYP__V120*/ meltfptr[116]),
+ ( /*_.LASTCTYP__V116*/ meltfptr[112]),
(melt_ptr_t) (( /*!CLASS_CTYPE */
meltfrout->tabval[25])));;
- MELT_LOCATION ("warmelt-normatch.melt:6410:/ cond");
- /*cond */ if ( /*_#IS_A__L43*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6561:/ cond");
+ /*cond */ if ( /*_#IS_A__L41*/ meltfnum[36]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V136*/ meltfptr[132] = ( /*nil */ NULL);;
+ /*_.IFELSE___V132*/ meltfptr[128] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6410:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6561:/ cond.else");
/*^block */
/*anyblock */
@@ -38737,12 +53179,12 @@ lab_endgetargs:;
melt_assert_failed (("check lastctyp"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") :
- __FILE__, (6410) ? (6410) : __LINE__,
+ __FILE__, (6561) ? (6561) : __LINE__,
__FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V136*/ meltfptr[132] = 0;
+ /*clear *//*_.IFELSE___V132*/ meltfptr[128] = 0;
/*epilog */
}
;
@@ -38750,43 +53192,43 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V135*/ meltfptr[113] =
- /*_.IFELSE___V136*/ meltfptr[132];;
+ /*_.IFCPP___V131*/ meltfptr[109] =
+ /*_.IFELSE___V132*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6410:/ clear");
- /*clear *//*_#IS_A__L43*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6561:/ clear");
+ /*clear *//*_#IS_A__L41*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V136*/ meltfptr[132] = 0;
+ /*clear *//*_.IFELSE___V132*/ meltfptr[128] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V135*/ meltfptr[113] = ( /*nil */ NULL);
+ /*_.IFCPP___V131*/ meltfptr[109] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_#NULL__L44*/ meltfnum[39] =
- (( /*_.MATRESCTYP__V83*/ meltfptr[82]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6411:/ cond");
- /*cond */ if ( /*_#NULL__L44*/ meltfnum[39]) /*then */
+ /*_#NULL__L42*/ meltfnum[37] =
+ (( /*_.MATRESCTYP__V79*/ meltfptr[78]) == NULL);;
+ MELT_LOCATION ("warmelt-normatch.melt:6562:/ cond");
+ /*cond */ if ( /*_#NULL__L42*/ meltfnum[37]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6412:/ compute");
- /*_.MATRESCTYP__V83*/ meltfptr[82] =
- /*_.SETQ___V138*/ meltfptr[137] =
- /*_.LASTCTYP__V120*/ meltfptr[116];;
- /*_.IFELSE___V137*/ meltfptr[132] =
- /*_.SETQ___V138*/ meltfptr[137];;
+ MELT_LOCATION ("warmelt-normatch.melt:6563:/ compute");
+ /*_.MATRESCTYP__V79*/ meltfptr[78] =
+ /*_.SETQ___V134*/ meltfptr[133] =
+ /*_.LASTCTYP__V116*/ meltfptr[112];;
+ /*_.IFELSE___V133*/ meltfptr[128] =
+ /*_.SETQ___V134*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6411:/ clear");
- /*clear *//*_.SETQ___V138*/ meltfptr[137] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6562:/ clear");
+ /*clear *//*_.SETQ___V134*/ meltfptr[133] = 0;
}
;
}
@@ -38797,11 +53239,11 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#__L45*/ meltfnum[38] =
- (( /*_.MATRESCTYP__V83*/ meltfptr[82]) ==
- ( /*_.LASTCTYP__V120*/ meltfptr[116]));;
- MELT_LOCATION ("warmelt-normatch.melt:6413:/ cond");
- /*cond */ if ( /*_#__L45*/ meltfnum[38]) /*then */
+ /*_#__L43*/ meltfnum[36] =
+ (( /*_.MATRESCTYP__V79*/ meltfptr[78]) ==
+ ( /*_.LASTCTYP__V116*/ meltfptr[112]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6564:/ cond");
+ /*cond */ if ( /*_#__L43*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
@@ -38812,28 +53254,28 @@ lab_endgetargs:;
{
- MELT_LOCATION ("warmelt-normatch.melt:6414:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6565:/ locexp");
/*void */ 0;
}
;
- /*clear *//*_.IFELSE___V139*/ meltfptr[137] = 0;
+ /*clear *//*_.IFELSE___V135*/ meltfptr[133] = 0;
/*epilog */
}
;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6413:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6564:/ cond.else");
/*^block */
/*anyblock */
{
- /*_#__L46*/ meltfnum[45] =
- (( /*_.MATRESCTYP__V83*/ meltfptr[82]) ==
+ /*_#__L44*/ meltfnum[43] =
+ (( /*_.MATRESCTYP__V79*/ meltfptr[78]) ==
(( /*!CTYPE_VOID */ meltfrout->tabval[26])));;
- MELT_LOCATION ("warmelt-normatch.melt:6415:/ cond");
- /*cond */ if ( /*_#__L46*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6566:/ cond");
+ /*cond */ if ( /*_#__L44*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
@@ -38845,11 +53287,11 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:6416:/ locexp");
+ ("warmelt-normatch.melt:6567:/ locexp");
/*void */ 0;
}
;
- /*clear *//*_.IFELSE___V140*/ meltfptr[139] = 0;
+ /*clear *//*_.IFELSE___V136*/ meltfptr[135] = 0;
/*epilog */
}
;
@@ -38857,18 +53299,18 @@ lab_endgetargs:;
else
{
MELT_LOCATION
- ("warmelt-normatch.melt:6415:/ cond.else");
+ ("warmelt-normatch.melt:6566:/ cond.else");
/*^block */
/*anyblock */
{
- /*_#__L47*/ meltfnum[46] =
- (( /*_.LASTCTYP__V120*/ meltfptr[116]) ==
+ /*_#__L45*/ meltfnum[44] =
+ (( /*_.LASTCTYP__V116*/ meltfptr[112]) ==
(( /*!CTYPE_VOID */ meltfrout->tabval[26])));;
MELT_LOCATION
- ("warmelt-normatch.melt:6417:/ cond");
- /*cond */ if ( /*_#__L47*/ meltfnum[46]) /*then */
+ ("warmelt-normatch.melt:6568:/ cond");
+ /*cond */ if ( /*_#__L45*/ meltfnum[44]) /*then */
{
/*^cond.then */
/*^block */
@@ -38876,18 +53318,18 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:6418:/ compute");
- /*_.MATRESCTYP__V83*/ meltfptr[82] =
- /*_.SETQ___V142*/ meltfptr[141] =
+ ("warmelt-normatch.melt:6569:/ compute");
+ /*_.MATRESCTYP__V79*/ meltfptr[78] =
+ /*_.SETQ___V138*/ meltfptr[137] =
( /*!CTYPE_VOID */ meltfrout->
tabval[26]);;
- /*_.IFELSE___V141*/ meltfptr[140] =
- /*_.SETQ___V142*/ meltfptr[141];;
+ /*_.IFELSE___V137*/ meltfptr[136] =
+ /*_.SETQ___V138*/ meltfptr[137];;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:6417:/ clear");
- /*clear *//*_.SETQ___V142*/ meltfptr[141] =
+ ("warmelt-normatch.melt:6568:/ clear");
+ /*clear *//*_.SETQ___V138*/ meltfptr[137] =
0;
}
;
@@ -38902,79 +53344,79 @@ lab_endgetargs:;
{
MELT_LOCATION
- ("warmelt-normatch.melt:6420:/ locexp");
+ ("warmelt-normatch.melt:6571:/ locexp");
melt_warning_str (0,
- (melt_ptr_t) ( /*_.MCASLOC__V96*/ meltfptr[95]), ("MATCH cases with incompatible types so using :VOID"), (melt_ptr_t) 0);
+ (melt_ptr_t) ( /*_.MCASLOC__V92*/ meltfptr[91]), ("MATCH cases with incompatible types so using :VOID"), (melt_ptr_t) 0);
}
;
MELT_LOCATION
- ("warmelt-normatch.melt:6421:/ compute");
- /*_.MATRESCTYP__V83*/ meltfptr[82] =
- /*_.SETQ___V143*/ meltfptr[141] =
+ ("warmelt-normatch.melt:6572:/ compute");
+ /*_.MATRESCTYP__V79*/ meltfptr[78] =
+ /*_.SETQ___V139*/ meltfptr[137] =
( /*!CTYPE_VOID */ meltfrout->
tabval[26]);;
MELT_LOCATION
- ("warmelt-normatch.melt:6419:/ quasiblock");
+ ("warmelt-normatch.melt:6570:/ quasiblock");
- /*_.PROGN___V144*/ meltfptr[143] =
- /*_.SETQ___V143*/ meltfptr[141];;
+ /*_.PROGN___V140*/ meltfptr[139] =
+ /*_.SETQ___V139*/ meltfptr[137];;
/*^compute */
- /*_.IFELSE___V141*/ meltfptr[140] =
- /*_.PROGN___V144*/ meltfptr[143];;
+ /*_.IFELSE___V137*/ meltfptr[136] =
+ /*_.PROGN___V140*/ meltfptr[139];;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:6417:/ clear");
- /*clear *//*_.SETQ___V143*/ meltfptr[141] =
+ ("warmelt-normatch.melt:6568:/ clear");
+ /*clear *//*_.SETQ___V139*/ meltfptr[137] =
0;
/*^clear */
- /*clear *//*_.PROGN___V144*/ meltfptr[143] =
+ /*clear *//*_.PROGN___V140*/ meltfptr[139] =
0;
}
;
}
;
- /*_.IFELSE___V140*/ meltfptr[139] =
- /*_.IFELSE___V141*/ meltfptr[140];;
+ /*_.IFELSE___V136*/ meltfptr[135] =
+ /*_.IFELSE___V137*/ meltfptr[136];;
/*epilog */
MELT_LOCATION
- ("warmelt-normatch.melt:6415:/ clear");
- /*clear *//*_#__L47*/ meltfnum[46] = 0;
+ ("warmelt-normatch.melt:6566:/ clear");
+ /*clear *//*_#__L45*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V141*/ meltfptr[140] = 0;
+ /*clear *//*_.IFELSE___V137*/ meltfptr[136] = 0;
}
;
}
;
- /*_.IFELSE___V139*/ meltfptr[137] =
- /*_.IFELSE___V140*/ meltfptr[139];;
+ /*_.IFELSE___V135*/ meltfptr[133] =
+ /*_.IFELSE___V136*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6413:/ clear");
- /*clear *//*_#__L46*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6564:/ clear");
+ /*clear *//*_#__L44*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V140*/ meltfptr[139] = 0;
+ /*clear *//*_.IFELSE___V136*/ meltfptr[135] = 0;
}
;
}
;
- /*_.IFELSE___V137*/ meltfptr[132] =
- /*_.IFELSE___V139*/ meltfptr[137];;
+ /*_.IFELSE___V133*/ meltfptr[128] =
+ /*_.IFELSE___V135*/ meltfptr[133];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6411:/ clear");
- /*clear *//*_#__L45*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6562:/ clear");
+ /*clear *//*_#__L43*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V139*/ meltfptr[137] = 0;
+ /*clear *//*_.IFELSE___V135*/ meltfptr[133] = 0;
}
;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6422:/ cond");
- /*cond */ if ( /*_.CURSTEP__V98*/ meltfptr[97]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6573:/ cond");
+ /*cond */ if ( /*_.CURSTEP__V94*/ meltfptr[93]) /*then */
{
/*^cond.then */
/*^block */
@@ -38982,101 +53424,101 @@ lab_endgetargs:;
{
/*^compute */
- /*_.PREVSTEP__V82*/ meltfptr[75] =
- /*_.SETQ___V146*/ meltfptr[143] =
- /*_.CURSTEP__V98*/ meltfptr[97];;
- /*_.IF___V145*/ meltfptr[141] =
- /*_.SETQ___V146*/ meltfptr[143];;
+ /*_.PREVSTEP__V78*/ meltfptr[71] =
+ /*_.SETQ___V142*/ meltfptr[139] =
+ /*_.CURSTEP__V94*/ meltfptr[93];;
+ /*_.IF___V141*/ meltfptr[137] =
+ /*_.SETQ___V142*/ meltfptr[139];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6422:/ clear");
- /*clear *//*_.SETQ___V146*/ meltfptr[143] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6573:/ clear");
+ /*clear *//*_.SETQ___V142*/ meltfptr[139] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V145*/ meltfptr[141] = NULL;;
+ /*_.IF___V141*/ meltfptr[137] = NULL;;
}
;
/*^compute */
- /*_#NULL__L48*/ meltfnum[46] =
+ /*_#NULL__L46*/ meltfnum[44] =
(( /*_.FIRSTSTEP__V21*/ meltfptr[20]) == NULL);;
- MELT_LOCATION ("warmelt-normatch.melt:6423:/ cond");
- /*cond */ if ( /*_#NULL__L48*/ meltfnum[46]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6574:/ cond");
+ /*cond */ if ( /*_#NULL__L46*/ meltfnum[44]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6424:/ compute");
+ MELT_LOCATION ("warmelt-normatch.melt:6575:/ compute");
/*_.FIRSTSTEP__V21*/ meltfptr[20] =
- /*_.SETQ___V148*/ meltfptr[139] =
- /*_.CURSTEP__V98*/ meltfptr[97];;
- /*_.IF___V147*/ meltfptr[140] =
- /*_.SETQ___V148*/ meltfptr[139];;
+ /*_.SETQ___V144*/ meltfptr[135] =
+ /*_.CURSTEP__V94*/ meltfptr[93];;
+ /*_.IF___V143*/ meltfptr[136] =
+ /*_.SETQ___V144*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6423:/ clear");
- /*clear *//*_.SETQ___V148*/ meltfptr[139] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6574:/ clear");
+ /*clear *//*_.SETQ___V144*/ meltfptr[135] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V147*/ meltfptr[140] = NULL;;
+ /*_.IF___V143*/ meltfptr[136] = NULL;;
}
;
/*^compute */
- /*_.LET___V110*/ meltfptr[105] = /*_.IF___V147*/ meltfptr[140];;
+ /*_.LET___V106*/ meltfptr[101] = /*_.IF___V143*/ meltfptr[136];;
- MELT_LOCATION ("warmelt-normatch.melt:6385:/ clear");
- /*clear *//*_.CURSTBINDTUP__V111*/ meltfptr[110] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6536:/ clear");
+ /*clear *//*_.CURSTBINDTUP__V107*/ meltfptr[106] = 0;
/*^clear */
- /*clear *//*_.LET___V112*/ meltfptr[111] = 0;
+ /*clear *//*_.LET___V108*/ meltfptr[107] = 0;
/*^clear */
- /*clear *//*_.LASTNBODY__V119*/ meltfptr[115] = 0;
+ /*clear *//*_.LASTNBODY__V115*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_#IS_A__L37*/ meltfnum[7] = 0;
+ /*clear *//*_#IS_A__L35*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.LASTCTYP__V120*/ meltfptr[116] = 0;
+ /*clear *//*_.LASTCTYP__V116*/ meltfptr[112] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V127*/ meltfptr[114] = 0;
+ /*clear *//*_.IFCPP___V123*/ meltfptr[110] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V131*/ meltfptr[125] = 0;
+ /*clear *//*_.IFCPP___V127*/ meltfptr[121] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V135*/ meltfptr[113] = 0;
+ /*clear *//*_.IFCPP___V131*/ meltfptr[109] = 0;
/*^clear */
- /*clear *//*_#NULL__L44*/ meltfnum[39] = 0;
+ /*clear *//*_#NULL__L42*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V137*/ meltfptr[132] = 0;
+ /*clear *//*_.IFELSE___V133*/ meltfptr[128] = 0;
/*^clear */
- /*clear *//*_.IF___V145*/ meltfptr[141] = 0;
+ /*clear *//*_.IF___V141*/ meltfptr[137] = 0;
/*^clear */
- /*clear *//*_#NULL__L48*/ meltfnum[46] = 0;
+ /*clear *//*_#NULL__L46*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.IF___V147*/ meltfptr[140] = 0;
- /*_.MULTI___V97*/ meltfptr[96] = /*_.LET___V110*/ meltfptr[105];;
+ /*clear *//*_.IF___V143*/ meltfptr[136] = 0;
+ /*_.MULTI___V93*/ meltfptr[92] = /*_.LET___V106*/ meltfptr[101];;
- MELT_LOCATION ("warmelt-normatch.melt:6379:/ clear");
- /*clear *//*_.IFCPP___V100*/ meltfptr[99] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6530:/ clear");
+ /*clear *//*_.IFCPP___V96*/ meltfptr[95] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V104*/ meltfptr[100] = 0;
+ /*clear *//*_.IFCPP___V100*/ meltfptr[96] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V108*/ meltfptr[101] = 0;
+ /*clear *//*_.IFCPP___V104*/ meltfptr[97] = 0;
/*^clear */
- /*clear *//*_.LET___V110*/ meltfptr[105] = 0;
+ /*clear *//*_.LET___V106*/ meltfptr[101] = 0;
/*^clear */
- /*clear *//*_.CURSTSUCC__V99*/ meltfptr[98] = 0;
+ /*clear *//*_.CURSTSUCC__V95*/ meltfptr[94] = 0;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39091,7 +53533,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L49*/ meltfnum[45] =
+ /*_#MELT_NEED_DBG__L47*/ meltfnum[43] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39099,35 +53541,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[38] =
+ /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[36] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[38];
+ /*_#THE_MELTCALLCOUNT__L48*/ meltfnum[36];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6426;
+ argtab[2].meltbp_long = 6577;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch updated prevstep";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PREVSTEP__V82*/ meltfptr[75];
- /*_.MELT_DEBUG_FUN__V151*/ meltfptr[139] =
+ (melt_ptr_t *) & /*_.PREVSTEP__V78*/ meltfptr[71];
+ /*_.MELT_DEBUG_FUN__V147*/ meltfptr[135] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -39138,81 +53580,81 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V150*/ meltfptr[143] =
- /*_.MELT_DEBUG_FUN__V151*/ meltfptr[139];;
+ /*_.IF___V146*/ meltfptr[139] =
+ /*_.MELT_DEBUG_FUN__V147*/ meltfptr[135];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L48*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V151*/ meltfptr[139] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V147*/ meltfptr[135] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V150*/ meltfptr[143] = NULL;;
+ /*_.IF___V146*/ meltfptr[139] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ quasiblock");
- /*_.PROGN___V152*/ meltfptr[110] = /*_.IF___V150*/ meltfptr[143];;
+ /*_.PROGN___V148*/ meltfptr[106] = /*_.IF___V146*/ meltfptr[139];;
/*^compute */
- /*_.IFCPP___V149*/ meltfptr[137] =
- /*_.PROGN___V152*/ meltfptr[110];;
+ /*_.IFCPP___V145*/ meltfptr[133] =
+ /*_.PROGN___V148*/ meltfptr[106];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6426:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6577:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IF___V150*/ meltfptr[143] = 0;
+ /*clear *//*_.IF___V146*/ meltfptr[139] = 0;
/*^clear */
- /*clear *//*_.PROGN___V152*/ meltfptr[110] = 0;
+ /*clear *//*_.PROGN___V148*/ meltfptr[106] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V149*/ meltfptr[137] = ( /*nil */ NULL);
+ /*_.IFCPP___V145*/ meltfptr[133] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_.LET___V93*/ meltfptr[86] = /*_.IFCPP___V149*/ meltfptr[137];;
+ /*_.LET___V89*/ meltfptr[82] = /*_.IFCPP___V145*/ meltfptr[133];;
- MELT_LOCATION ("warmelt-normatch.melt:6377:/ clear");
- /*clear *//*_.MCASE_SOURCE__V94*/ meltfptr[90] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6528:/ clear");
+ /*clear *//*_.MCASE_SOURCE__V90*/ meltfptr[86] = 0;
/*^clear */
- /*clear *//*_.LOCA_LOCATION__V95*/ meltfptr[94] = 0;
+ /*clear *//*_.LOCA_LOCATION__V91*/ meltfptr[90] = 0;
/*^clear */
- /*clear *//*_.MCASLOC__V96*/ meltfptr[95] = 0;
+ /*clear *//*_.MCASLOC__V92*/ meltfptr[91] = 0;
/*^clear */
- /*clear *//*_.MULTI___V97*/ meltfptr[96] = 0;
+ /*clear *//*_.MULTI___V93*/ meltfptr[92] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V149*/ meltfptr[137] = 0;
- if ( /*_#MIX__L25*/ meltfnum[20] < 0)
+ /*clear *//*_.IFCPP___V145*/ meltfptr[133] = 0;
+ if ( /*_#MIX__L23*/ meltfnum[18] < 0)
break;
} /* end cit2__EACHTUP */
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6372:/ clear");
- /*clear *//*_.CURMCASE__V84*/ meltfptr[83] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6523:/ clear");
+ /*clear *//*_.CURMCASE__V80*/ meltfptr[79] = 0;
/*^clear */
- /*clear *//*_#MIX__L25*/ meltfnum[20] = 0;
+ /*clear *//*_#MIX__L23*/ meltfnum[18] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V85*/ meltfptr[84] = 0;
+ /*clear *//*_.IFCPP___V81*/ meltfptr[80] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V89*/ meltfptr[85] = 0;
+ /*clear *//*_.IFCPP___V85*/ meltfptr[81] = 0;
/*^clear */
- /*clear *//*_.LET___V93*/ meltfptr[86] = 0;
+ /*clear *//*_.LET___V89*/ meltfptr[82] = 0;
} /*endciterblock FOREACH_IN_MULTIPLE */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39227,7 +53669,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L51*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L49*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39235,34 +53677,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L49*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L50*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6429;
+ argtab[2].meltbp_long = 6580;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch firststep";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.FIRSTSTEP__V21*/ meltfptr[20];
- /*_.MELT_DEBUG_FUN__V155*/ meltfptr[116] =
+ /*_.MELT_DEBUG_FUN__V151*/ meltfptr[112] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -39272,48 +53714,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V154*/ meltfptr[115] =
- /*_.MELT_DEBUG_FUN__V155*/ meltfptr[116];;
+ /*_.IF___V150*/ meltfptr[111] =
+ /*_.MELT_DEBUG_FUN__V151*/ meltfptr[112];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L50*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V155*/ meltfptr[116] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V151*/ meltfptr[112] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V154*/ meltfptr[115] = NULL;;
+ /*_.IF___V150*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ quasiblock");
- /*_.PROGN___V156*/ meltfptr[114] = /*_.IF___V154*/ meltfptr[115];;
+ /*_.PROGN___V152*/ meltfptr[110] = /*_.IF___V150*/ meltfptr[111];;
/*^compute */
- /*_.IFCPP___V153*/ meltfptr[111] = /*_.PROGN___V156*/ meltfptr[114];;
+ /*_.IFCPP___V149*/ meltfptr[107] = /*_.PROGN___V152*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6429:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[7] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6580:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L49*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V154*/ meltfptr[115] = 0;
+ /*clear *//*_.IF___V150*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_.PROGN___V156*/ meltfptr[114] = 0;
+ /*clear *//*_.PROGN___V152*/ meltfptr[110] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V153*/ meltfptr[111] = ( /*nil */ NULL);
+ /*_.IFCPP___V149*/ meltfptr[107] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39328,7 +53770,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L53*/ meltfnum[46] =
+ /*_#MELT_NEED_DBG__L51*/ meltfnum[44] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39336,34 +53778,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[46]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L51*/ meltfnum[44]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[38] =
+ /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[36] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[38];
+ /*_#THE_MELTCALLCOUNT__L52*/ meltfnum[36];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6430;
+ argtab[2].meltbp_long = 6581;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch matresctyp";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATRESCTYP__V83*/ meltfptr[82];
- /*_.MELT_DEBUG_FUN__V159*/ meltfptr[132] =
+ (melt_ptr_t *) & /*_.MATRESCTYP__V79*/ meltfptr[78];
+ /*_.MELT_DEBUG_FUN__V155*/ meltfptr[128] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -39373,48 +53815,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V158*/ meltfptr[113] =
- /*_.MELT_DEBUG_FUN__V159*/ meltfptr[132];;
+ /*_.IF___V154*/ meltfptr[109] =
+ /*_.MELT_DEBUG_FUN__V155*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L52*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V159*/ meltfptr[132] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V155*/ meltfptr[128] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V158*/ meltfptr[113] = NULL;;
+ /*_.IF___V154*/ meltfptr[109] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ quasiblock");
- /*_.PROGN___V160*/ meltfptr[141] = /*_.IF___V158*/ meltfptr[113];;
+ /*_.PROGN___V156*/ meltfptr[137] = /*_.IF___V154*/ meltfptr[109];;
/*^compute */
- /*_.IFCPP___V157*/ meltfptr[125] = /*_.PROGN___V160*/ meltfptr[141];;
+ /*_.IFCPP___V153*/ meltfptr[121] = /*_.PROGN___V156*/ meltfptr[137];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6430:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6581:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L51*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.IF___V158*/ meltfptr[113] = 0;
+ /*clear *//*_.IF___V154*/ meltfptr[109] = 0;
/*^clear */
- /*clear *//*_.PROGN___V160*/ meltfptr[141] = 0;
+ /*clear *//*_.PROGN___V156*/ meltfptr[137] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V157*/ meltfptr[125] = ( /*nil */ NULL);
+ /*_.IFCPP___V153*/ meltfptr[121] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39429,7 +53871,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L55*/ meltfnum[45] =
+ /*_#MELT_NEED_DBG__L53*/ meltfnum[43] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39437,34 +53879,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L53*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L56*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L54*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6432;
+ argtab[2].meltbp_long = 6583;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch updated mdata";
/*^apply.arg */
argtab[4].meltbp_aptr =
(melt_ptr_t *) & /*_.MDATA__V50*/ meltfptr[46];
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[100] =
+ /*_.MELT_DEBUG_FUN__V159*/ meltfptr[96] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -39474,48 +53916,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V162*/ meltfptr[99] =
- /*_.MELT_DEBUG_FUN__V163*/ meltfptr[100];;
+ /*_.IF___V158*/ meltfptr[95] =
+ /*_.MELT_DEBUG_FUN__V159*/ meltfptr[96];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L56*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L54*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V163*/ meltfptr[100] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V159*/ meltfptr[96] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V162*/ meltfptr[99] = NULL;;
+ /*_.IF___V158*/ meltfptr[95] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ quasiblock");
- /*_.PROGN___V164*/ meltfptr[101] = /*_.IF___V162*/ meltfptr[99];;
+ /*_.PROGN___V160*/ meltfptr[97] = /*_.IF___V158*/ meltfptr[95];;
/*^compute */
- /*_.IFCPP___V161*/ meltfptr[140] = /*_.PROGN___V164*/ meltfptr[101];;
+ /*_.IFCPP___V157*/ meltfptr[136] = /*_.PROGN___V160*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6432:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6583:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L53*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IF___V162*/ meltfptr[99] = 0;
+ /*clear *//*_.IF___V158*/ meltfptr[95] = 0;
/*^clear */
- /*clear *//*_.PROGN___V164*/ meltfptr[101] = 0;
+ /*clear *//*_.PROGN___V160*/ meltfptr[97] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V161*/ meltfptr[140] = ( /*nil */ NULL);
+ /*_.IFCPP___V157*/ meltfptr[136] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_#MELT_NEED_DBG__L57*/ meltfnum[7] =
+ /*_#MELT_NEED_DBG__L55*/ meltfnum[0] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 1))
@@ -39523,39 +53965,44 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6433:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L57*/ meltfnum[7]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6584:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L55*/ meltfnum[0]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6434:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6585:/ quasiblock");
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[27])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[27])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[27])), 0, "CONTAINER_VALUE");
- /*_.DOTPREFIX__V167*/
- meltfptr[98] = slot;
+ /*_.DOTPREFIX__V163*/
+ meltfptr[94] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.DOTPREFIX__V167*/ meltfptr[98] = NULL;;
+ /*_.DOTPREFIX__V163*/ meltfptr[94] = NULL;;
}
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39570,7 +54017,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L58*/ meltfnum[38] =
+ /*_#MELT_NEED_DBG__L56*/ meltfnum[36] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39578,40 +54025,40 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L58*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L59*/ meltfnum[46] =
+ /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ apply");
/*apply */
{
union meltparam_un argtab[7];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L59*/ meltfnum[46];
+ /*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6435;
+ argtab[2].meltbp_long = 6586;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch dotprefix=";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DOTPREFIX__V167*/ meltfptr[98];
+ (melt_ptr_t *) & /*_.DOTPREFIX__V163*/ meltfptr[94];
/*^apply.arg */
argtab[5].meltbp_cstring = " match_graphic_dot_prefix=";
/*^apply.arg */
argtab[6].meltbp_aptr =
(melt_ptr_t *) & ( /*!MATCH_GRAPHIC_DOT_PREFIX */
meltfrout->tabval[27]);
- /*_.MELT_DEBUG_FUN__V170*/ meltfptr[110] =
+ /*_.MELT_DEBUG_FUN__V166*/ meltfptr[106] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->
tabval[3])),
@@ -39623,69 +54070,69 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V169*/ meltfptr[143] =
- /*_.MELT_DEBUG_FUN__V170*/ meltfptr[110];;
+ /*_.IF___V165*/ meltfptr[139] =
+ /*_.MELT_DEBUG_FUN__V166*/ meltfptr[106];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L59*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V170*/ meltfptr[110] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V166*/ meltfptr[106] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V169*/ meltfptr[143] = NULL;;
+ /*_.IF___V165*/ meltfptr[139] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ quasiblock");
- /*_.PROGN___V171*/ meltfptr[90] = /*_.IF___V169*/ meltfptr[143];;
+ /*_.PROGN___V167*/ meltfptr[86] = /*_.IF___V165*/ meltfptr[139];;
/*^compute */
- /*_.IFCPP___V168*/ meltfptr[139] =
- /*_.PROGN___V171*/ meltfptr[90];;
+ /*_.IFCPP___V164*/ meltfptr[135] =
+ /*_.PROGN___V167*/ meltfptr[86];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6435:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L58*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6586:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IF___V169*/ meltfptr[143] = 0;
+ /*clear *//*_.IF___V165*/ meltfptr[139] = 0;
/*^clear */
- /*clear *//*_.PROGN___V171*/ meltfptr[90] = 0;
+ /*clear *//*_.PROGN___V167*/ meltfptr[86] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V168*/ meltfptr[139] = ( /*nil */ NULL);
+ /*_.IFCPP___V164*/ meltfptr[135] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*^compute */
- /*_#IS_STRING__L60*/ meltfnum[39] =
+ /*_#IS_STRING__L58*/ meltfnum[37] =
(melt_magic_discr
- ((melt_ptr_t) ( /*_.DOTPREFIX__V167*/ meltfptr[98])) ==
+ ((melt_ptr_t) ( /*_.DOTPREFIX__V163*/ meltfptr[94])) ==
MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:6437:/ cond");
- /*cond */ if ( /*_#IS_STRING__L60*/ meltfnum[39]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6588:/ cond");
+ /*cond */ if ( /*_#IS_STRING__L58*/ meltfnum[37]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- MELT_LOCATION ("warmelt-normatch.melt:6438:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6589:/ apply");
/*apply */
{
union meltparam_un argtab[1];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.DOTPREFIX__V167*/ meltfptr[98];
- /*_.MG_ALTDRAW_GRAPHVIZ__V173*/ meltfptr[95] =
+ (melt_ptr_t *) & /*_.DOTPREFIX__V163*/ meltfptr[94];
+ /*_.MG_ALTDRAW_GRAPHVIZ__V169*/ meltfptr[91] =
melt_apply ((meltclosure_ptr_t)
(( /*!MG_ALTDRAW_GRAPHVIZ */ meltfrout->
tabval[29])),
@@ -39694,48 +54141,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V172*/ meltfptr[94] =
- /*_.MG_ALTDRAW_GRAPHVIZ__V173*/ meltfptr[95];;
+ /*_.IF___V168*/ meltfptr[90] =
+ /*_.MG_ALTDRAW_GRAPHVIZ__V169*/ meltfptr[91];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6437:/ clear");
- /*clear *//*_.MG_ALTDRAW_GRAPHVIZ__V173*/ meltfptr[95] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6588:/ clear");
+ /*clear *//*_.MG_ALTDRAW_GRAPHVIZ__V169*/ meltfptr[91] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V172*/ meltfptr[94] = NULL;;
+ /*_.IF___V168*/ meltfptr[90] = NULL;;
}
;
/*^compute */
- /*_.LET___V166*/ meltfptr[97] = /*_.IF___V172*/ meltfptr[94];;
+ /*_.LET___V162*/ meltfptr[93] = /*_.IF___V168*/ meltfptr[90];;
- MELT_LOCATION ("warmelt-normatch.melt:6434:/ clear");
- /*clear *//*_.DOTPREFIX__V167*/ meltfptr[98] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6585:/ clear");
+ /*clear *//*_.DOTPREFIX__V163*/ meltfptr[94] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V168*/ meltfptr[139] = 0;
+ /*clear *//*_.IFCPP___V164*/ meltfptr[135] = 0;
/*^clear */
- /*clear *//*_#IS_STRING__L60*/ meltfnum[39] = 0;
+ /*clear *//*_#IS_STRING__L58*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.IF___V172*/ meltfptr[94] = 0;
- /*_.IF___V165*/ meltfptr[105] = /*_.LET___V166*/ meltfptr[97];;
+ /*clear *//*_.IF___V168*/ meltfptr[90] = 0;
+ /*_.IF___V161*/ meltfptr[101] = /*_.LET___V162*/ meltfptr[93];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6433:/ clear");
- /*clear *//*_.LET___V166*/ meltfptr[97] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6584:/ clear");
+ /*clear *//*_.LET___V162*/ meltfptr[93] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V165*/ meltfptr[105] = NULL;;
+ /*_.IF___V161*/ meltfptr[101] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6439:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6590:/ quasiblock");
/*^apply */
@@ -39745,10 +54192,10 @@ lab_endgetargs:;
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.MATRESCTYP__V83*/ meltfptr[82];
+ (melt_ptr_t *) & /*_.MATRESCTYP__V79*/ meltfptr[78];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V18*/ meltfptr[17];
- /*_.NMCTXT__V175*/ meltfptr[137] =
+ /*_.NMCTXT__V171*/ meltfptr[133] =
melt_apply ((meltclosure_ptr_t)
(( /*!ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
meltfrout->tabval[30])),
@@ -39759,7 +54206,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39774,7 +54221,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L61*/ meltfnum[45] =
+ /*_#MELT_NEED_DBG__L59*/ meltfnum[43] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39782,35 +54229,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L59*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[46] =
+ /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[46];
+ /*_#THE_MELTCALLCOUNT__L60*/ meltfnum[44];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6441;
+ argtab[2].meltbp_long = 6592;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch before altmatch_normalize_match_context nmctxt";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMCTXT__V175*/ meltfptr[137];
- /*_.MELT_DEBUG_FUN__V178*/ meltfptr[114] =
+ (melt_ptr_t *) & /*_.NMCTXT__V171*/ meltfptr[133];
+ /*_.MELT_DEBUG_FUN__V174*/ meltfptr[110] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -39820,46 +54267,46 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V177*/ meltfptr[115] =
- /*_.MELT_DEBUG_FUN__V178*/ meltfptr[114];;
+ /*_.IF___V173*/ meltfptr[111] =
+ /*_.MELT_DEBUG_FUN__V174*/ meltfptr[110];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L60*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V178*/ meltfptr[114] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V174*/ meltfptr[110] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V177*/ meltfptr[115] = NULL;;
+ /*_.IF___V173*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ quasiblock");
- /*_.PROGN___V179*/ meltfptr[132] = /*_.IF___V177*/ meltfptr[115];;
+ /*_.PROGN___V175*/ meltfptr[128] = /*_.IF___V173*/ meltfptr[111];;
/*^compute */
- /*_.IFCPP___V176*/ meltfptr[116] = /*_.PROGN___V179*/ meltfptr[132];;
+ /*_.IFCPP___V172*/ meltfptr[112] = /*_.PROGN___V175*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6441:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6592:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L59*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IF___V177*/ meltfptr[115] = 0;
+ /*clear *//*_.IF___V173*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_.PROGN___V179*/ meltfptr[132] = 0;
+ /*clear *//*_.PROGN___V175*/ meltfptr[128] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V176*/ meltfptr[116] = ( /*nil */ NULL);
+ /*_.IFCPP___V172*/ meltfptr[112] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6443:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6594:/ apply");
/*apply */
{
union meltparam_un argtab[2];
@@ -39868,8 +54315,8 @@ lab_endgetargs:;
argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.SLOC__V18*/ meltfptr[17];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMCTXT__V175*/ meltfptr[137];
- /*_.ALTMATCH_NORMALIZE_MATCH_CONTEXT__V180*/ meltfptr[113] =
+ (melt_ptr_t *) & /*_.NMCTXT__V171*/ meltfptr[133];
+ /*_.ALTMATCH_NORMALIZE_MATCH_CONTEXT__V176*/ meltfptr[109] =
melt_apply ((meltclosure_ptr_t)
(( /*!ALTMATCH_NORMALIZE_MATCH_CONTEXT */ meltfrout->
tabval[31])),
@@ -39880,7 +54327,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -39895,7 +54342,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L63*/ meltfnum[38] =
+ /*_#MELT_NEED_DBG__L61*/ meltfnum[36] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -39903,35 +54350,35 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L61*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L62*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6444;
+ argtab[2].meltbp_long = 6595;
/*^apply.arg */
argtab[3].meltbp_cstring =
"normexp_altmatch after altmatch_normalize_match_context nmctxt";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NMCTXT__V175*/ meltfptr[137];
- /*_.MELT_DEBUG_FUN__V183*/ meltfptr[99] =
+ (melt_ptr_t *) & /*_.NMCTXT__V171*/ meltfptr[133];
+ /*_.MELT_DEBUG_FUN__V179*/ meltfptr[95] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -39941,115 +54388,120 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V182*/ meltfptr[100] =
- /*_.MELT_DEBUG_FUN__V183*/ meltfptr[99];;
+ /*_.IF___V178*/ meltfptr[96] =
+ /*_.MELT_DEBUG_FUN__V179*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L62*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V183*/ meltfptr[99] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V179*/ meltfptr[95] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V182*/ meltfptr[100] = NULL;;
+ /*_.IF___V178*/ meltfptr[96] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ quasiblock");
- /*_.PROGN___V184*/ meltfptr[101] = /*_.IF___V182*/ meltfptr[100];;
+ /*_.PROGN___V180*/ meltfptr[97] = /*_.IF___V178*/ meltfptr[96];;
/*^compute */
- /*_.IFCPP___V181*/ meltfptr[141] = /*_.PROGN___V184*/ meltfptr[101];;
+ /*_.IFCPP___V177*/ meltfptr[137] = /*_.PROGN___V180*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6444:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6595:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L61*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IF___V182*/ meltfptr[100] = 0;
+ /*clear *//*_.IF___V178*/ meltfptr[96] = 0;
/*^clear */
- /*clear *//*_.PROGN___V184*/ meltfptr[101] = 0;
+ /*clear *//*_.PROGN___V180*/ meltfptr[97] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V181*/ meltfptr[141] = ( /*nil */ NULL);
+ /*_.IFCPP___V177*/ meltfptr[137] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6445:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6596:/ quasiblock");
- MELT_LOCATION ("warmelt-normatch.melt:6446:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6597:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V175*/ meltfptr[137]), 0, "MATNORX_RESLOC");
- /*_.NRESLOC__V186*/
- meltfptr[143] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V171*/ meltfptr[133]), 0, "MATNORX_RESLOC");
+ /*_.NRESLOC__V182*/
+ meltfptr[139] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6447:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6598:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V175*/ meltfptr[137]), 1, "MATNORX_NMATCH");
- /*_.NRESMATCH__V187*/
- meltfptr[90] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V171*/ meltfptr[133]), 1, "MATNORX_NMATCH");
+ /*_.NRESMATCH__V183*/
+ meltfptr[86] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6448:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6599:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V175*/ meltfptr[137]), 7, "MATNORX_BODYLIST");
- /*_.NBODYL__V188*/
- meltfptr[95] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V171*/ meltfptr[133]), 7, "MATNORX_BODYLIST");
+ /*_.NBODYL__V184*/
+ meltfptr[91] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6449:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6600:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V175*/ meltfptr[137]), 3, "MATNORX_FLAGMAP");
- /*_.NFLAGMAP__V189*/
- meltfptr[98] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V171*/ meltfptr[133]), 3, "MATNORX_FLAGMAP");
+ /*_.NFLAGMAP__V185*/
+ meltfptr[94] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6450:/ getslot");
+ MELT_LOCATION ("warmelt-normatch.melt:6601:/ getslot");
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V175*/ meltfptr[137]), 8, "MATNORX_ENDLABEL");
- /*_.NENDLAB__V190*/
- meltfptr[139] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMCTXT__V171*/ meltfptr[133]), 8, "MATNORX_ENDLABEL");
+ /*_.NENDLAB__V186*/
+ meltfptr[135] = slot;
};
;
- MELT_LOCATION ("warmelt-normatch.melt:6451:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRESLOC__V186*/ meltfptr[143]), (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6602:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRESLOC__V182*/ meltfptr[139]),
+ (melt_ptr_t) (( /*!CLASS_NREP_SYMOCC */ meltfrout->tabval[11])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
{
melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRESLOC__V186*/ meltfptr[143]), 3, "NOCC_BIND");
- /*_.NRESBIND__V191*/
- meltfptr[94] = slot;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRESLOC__V182*/ meltfptr[139]), 3, "NOCC_BIND");
+ /*_.NRESBIND__V187*/
+ meltfptr[90] = slot;
};
;
}
else
{ /*^cond.else */
- /*_.NRESBIND__V191*/ meltfptr[94] = NULL;;
+ /*_.NRESBIND__V187*/ meltfptr[90] = NULL;;
}
;
/*^compute */
- /*_.NFLAGSLIST__V192*/ meltfptr[97] =
+ /*_.NFLAGSLIST__V188*/ meltfptr[93] =
(meltgc_new_list
((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[7]))));;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40064,7 +54516,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L65*/ meltfnum[46] =
+ /*_#MELT_NEED_DBG__L63*/ meltfnum[44] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40072,34 +54524,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[46]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L63*/ meltfnum[44]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[45] =
+ /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[45];
+ /*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6454;
+ argtab[2].meltbp_long = 6605;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nresloc";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NRESLOC__V186*/ meltfptr[143];
- /*_.MELT_DEBUG_FUN__V195*/ meltfptr[132] =
+ (melt_ptr_t *) & /*_.NRESLOC__V182*/ meltfptr[139];
+ /*_.MELT_DEBUG_FUN__V191*/ meltfptr[128] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40109,48 +54561,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V194*/ meltfptr[115] =
- /*_.MELT_DEBUG_FUN__V195*/ meltfptr[132];;
+ /*_.IF___V190*/ meltfptr[111] =
+ /*_.MELT_DEBUG_FUN__V191*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L64*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V195*/ meltfptr[132] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V191*/ meltfptr[128] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V194*/ meltfptr[115] = NULL;;
+ /*_.IF___V190*/ meltfptr[111] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ quasiblock");
- /*_.PROGN___V196*/ meltfptr[99] = /*_.IF___V194*/ meltfptr[115];;
+ /*_.PROGN___V192*/ meltfptr[95] = /*_.IF___V190*/ meltfptr[111];;
/*^compute */
- /*_.IFCPP___V193*/ meltfptr[114] = /*_.PROGN___V196*/ meltfptr[99];;
+ /*_.IFCPP___V189*/ meltfptr[110] = /*_.PROGN___V192*/ meltfptr[95];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6454:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6605:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L63*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.IF___V194*/ meltfptr[115] = 0;
+ /*clear *//*_.IF___V190*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_.PROGN___V196*/ meltfptr[99] = 0;
+ /*clear *//*_.PROGN___V192*/ meltfptr[95] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V193*/ meltfptr[114] = ( /*nil */ NULL);
+ /*_.IFCPP___V189*/ meltfptr[110] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40165,7 +54617,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L67*/ meltfnum[39] =
+ /*_#MELT_NEED_DBG__L65*/ meltfnum[37] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40173,34 +54625,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[39]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L65*/ meltfnum[37]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[38] =
+ /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[36] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[38];
+ /*_#THE_MELTCALLCOUNT__L66*/ meltfnum[36];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6455;
+ argtab[2].meltbp_long = 6606;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nbodyl";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NBODYL__V188*/ meltfptr[95];
- /*_.MELT_DEBUG_FUN__V199*/ meltfptr[132] =
+ (melt_ptr_t *) & /*_.NBODYL__V184*/ meltfptr[91];
+ /*_.MELT_DEBUG_FUN__V195*/ meltfptr[128] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40210,48 +54662,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V198*/ meltfptr[101] =
- /*_.MELT_DEBUG_FUN__V199*/ meltfptr[132];;
+ /*_.IF___V194*/ meltfptr[97] =
+ /*_.MELT_DEBUG_FUN__V195*/ meltfptr[128];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L66*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V199*/ meltfptr[132] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V195*/ meltfptr[128] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V198*/ meltfptr[101] = NULL;;
+ /*_.IF___V194*/ meltfptr[97] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ quasiblock");
- /*_.PROGN___V200*/ meltfptr[115] = /*_.IF___V198*/ meltfptr[101];;
+ /*_.PROGN___V196*/ meltfptr[111] = /*_.IF___V194*/ meltfptr[97];;
/*^compute */
- /*_.IFCPP___V197*/ meltfptr[100] = /*_.PROGN___V200*/ meltfptr[115];;
+ /*_.IFCPP___V193*/ meltfptr[96] = /*_.PROGN___V196*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6455:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6606:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L65*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.IF___V198*/ meltfptr[101] = 0;
+ /*clear *//*_.IF___V194*/ meltfptr[97] = 0;
/*^clear */
- /*clear *//*_.PROGN___V200*/ meltfptr[115] = 0;
+ /*clear *//*_.PROGN___V196*/ meltfptr[111] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V197*/ meltfptr[100] = ( /*nil */ NULL);
+ /*_.IFCPP___V193*/ meltfptr[96] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40266,7 +54718,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L69*/ meltfnum[45] =
+ /*_#MELT_NEED_DBG__L67*/ meltfnum[43] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40274,34 +54726,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L69*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L67*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L70*/ meltfnum[46] =
+ /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L70*/ meltfnum[46];
+ /*_#THE_MELTCALLCOUNT__L68*/ meltfnum[44];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6456;
+ argtab[2].meltbp_long = 6607;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nflagmap";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NFLAGMAP__V189*/ meltfptr[98];
- /*_.MELT_DEBUG_FUN__V203*/ meltfptr[101] =
+ (melt_ptr_t *) & /*_.NFLAGMAP__V185*/ meltfptr[94];
+ /*_.MELT_DEBUG_FUN__V199*/ meltfptr[97] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40311,43 +54763,43 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V202*/ meltfptr[132] =
- /*_.MELT_DEBUG_FUN__V203*/ meltfptr[101];;
+ /*_.IF___V198*/ meltfptr[128] =
+ /*_.MELT_DEBUG_FUN__V199*/ meltfptr[97];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L70*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L68*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V203*/ meltfptr[101] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V199*/ meltfptr[97] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V202*/ meltfptr[132] = NULL;;
+ /*_.IF___V198*/ meltfptr[128] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ quasiblock");
- /*_.PROGN___V204*/ meltfptr[115] = /*_.IF___V202*/ meltfptr[132];;
+ /*_.PROGN___V200*/ meltfptr[111] = /*_.IF___V198*/ meltfptr[128];;
/*^compute */
- /*_.IFCPP___V201*/ meltfptr[99] = /*_.PROGN___V204*/ meltfptr[115];;
+ /*_.IFCPP___V197*/ meltfptr[95] = /*_.PROGN___V200*/ meltfptr[111];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6456:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L69*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6607:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L67*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IF___V202*/ meltfptr[132] = 0;
+ /*clear *//*_.IF___V198*/ meltfptr[128] = 0;
/*^clear */
- /*clear *//*_.PROGN___V204*/ meltfptr[115] = 0;
+ /*clear *//*_.PROGN___V200*/ meltfptr[111] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V201*/ meltfptr[99] = ( /*nil */ NULL);
+ /*_.IFCPP___V197*/ meltfptr[95] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
/*citerblock FOREACH_IN_MAPOBJECT */
@@ -40359,55 +54811,55 @@ lab_endgetargs:;
cit4__EACHOBMAP_ix >= 0
&& (cit4__EACHOBMAP_siz =
melt_size_mapobjects ((meltmapobjects_ptr_t)
- /*_.NFLAGMAP__V189*/ meltfptr[98])) > 0
+ /*_.NFLAGMAP__V185*/ meltfptr[94])) > 0
&& cit4__EACHOBMAP_ix < cit4__EACHOBMAP_siz; cit4__EACHOBMAP_ix++)
{
- /*_.CURFLAG__V205*/ meltfptr[101] = NULL;
- /*_.CURNORMFLAG__V206*/ meltfptr[132] = NULL;
- /*_.CURFLAG__V205*/ meltfptr[101] =
- ((meltmapobjects_ptr_t) /*_.NFLAGMAP__V189*/ meltfptr[98])->
+ /*_.CURFLAG__V201*/ meltfptr[97] = NULL;
+ /*_.CURNORMFLAG__V202*/ meltfptr[128] = NULL;
+ /*_.CURFLAG__V201*/ meltfptr[97] =
+ ((meltmapobjects_ptr_t) /*_.NFLAGMAP__V185*/ meltfptr[94])->
entab[cit4__EACHOBMAP_ix].e_at;
- if ( /*_.CURFLAG__V205*/ meltfptr[101] == HTAB_DELETED_ENTRY)
- { /*_.CURFLAG__V205*/
- meltfptr[101] = NULL;
+ if ( /*_.CURFLAG__V201*/ meltfptr[97] == HTAB_DELETED_ENTRY)
+ { /*_.CURFLAG__V201*/
+ meltfptr[97] = NULL;
continue;
};
- if (! /*_.CURFLAG__V205*/ meltfptr[101])
+ if (! /*_.CURFLAG__V201*/ meltfptr[97])
continue;
- /*_.CURNORMFLAG__V206*/ meltfptr[132] =
- ((meltmapobjects_ptr_t) /*_.NFLAGMAP__V189*/ meltfptr[98])->
+ /*_.CURNORMFLAG__V202*/ meltfptr[128] =
+ ((meltmapobjects_ptr_t) /*_.NFLAGMAP__V185*/ meltfptr[94])->
entab[cit4__EACHOBMAP_ix].e_va;
- if (! /*_.CURNORMFLAG__V206*/ meltfptr[132])
+ if (! /*_.CURNORMFLAG__V202*/ meltfptr[128])
continue;
{
- MELT_LOCATION ("warmelt-normatch.melt:6460:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6611:/ locexp");
meltgc_append_list ((melt_ptr_t)
- ( /*_.NFLAGSLIST__V192*/ meltfptr[97]),
- (melt_ptr_t) ( /*_.CURNORMFLAG__V206*/
- meltfptr[132]));
+ ( /*_.NFLAGSLIST__V188*/ meltfptr[93]),
+ (melt_ptr_t) ( /*_.CURNORMFLAG__V202*/
+ meltfptr[128]));
}
;
/* end cit4__EACHOBMAP */
- /*_.CURFLAG__V205*/ meltfptr[101] = NULL;
- /*_.CURNORMFLAG__V206*/ meltfptr[132] = NULL;
+ /*_.CURFLAG__V201*/ meltfptr[97] = NULL;
+ /*_.CURNORMFLAG__V202*/ meltfptr[128] = NULL;
}
/*citerepilog */
- MELT_LOCATION ("warmelt-normatch.melt:6457:/ clear");
- /*clear *//*_.CURFLAG__V205*/ meltfptr[101] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6608:/ clear");
+ /*clear *//*_.CURFLAG__V201*/ meltfptr[97] = 0;
/*^clear */
- /*clear *//*_.CURNORMFLAG__V206*/ meltfptr[132] = 0;
+ /*clear *//*_.CURNORMFLAG__V202*/ meltfptr[128] = 0;
} /*endciterblock FOREACH_IN_MAPOBJECT */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40422,7 +54874,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L71*/ meltfnum[38] =
+ /*_#MELT_NEED_DBG__L69*/ meltfnum[36] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40430,34 +54882,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L71*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L69*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L72*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L70*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L72*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L70*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6461;
+ argtab[2].meltbp_long = 6612;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nflagslist";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NFLAGSLIST__V192*/ meltfptr[97];
- /*_.MELT_DEBUG_FUN__V209*/ meltfptr[208] =
+ (melt_ptr_t *) & /*_.NFLAGSLIST__V188*/ meltfptr[93];
+ /*_.MELT_DEBUG_FUN__V205*/ meltfptr[204] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40467,79 +54919,84 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V208*/ meltfptr[207] =
- /*_.MELT_DEBUG_FUN__V209*/ meltfptr[208];;
+ /*_.IF___V204*/ meltfptr[203] =
+ /*_.MELT_DEBUG_FUN__V205*/ meltfptr[204];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L72*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L70*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V209*/ meltfptr[208] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V205*/ meltfptr[204] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V208*/ meltfptr[207] = NULL;;
+ /*_.IF___V204*/ meltfptr[203] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ quasiblock");
- /*_.PROGN___V210*/ meltfptr[208] = /*_.IF___V208*/ meltfptr[207];;
+ /*_.PROGN___V206*/ meltfptr[204] = /*_.IF___V204*/ meltfptr[203];;
/*^compute */
- /*_.IFCPP___V207*/ meltfptr[115] = /*_.PROGN___V210*/ meltfptr[208];;
+ /*_.IFCPP___V203*/ meltfptr[111] = /*_.PROGN___V206*/ meltfptr[204];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6461:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L71*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6612:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L69*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IF___V208*/ meltfptr[207] = 0;
+ /*clear *//*_.IF___V204*/ meltfptr[203] = 0;
/*^clear */
- /*clear *//*_.PROGN___V210*/ meltfptr[208] = 0;
+ /*clear *//*_.PROGN___V206*/ meltfptr[204] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V207*/ meltfptr[115] = ( /*nil */ NULL);
+ /*_.IFCPP___V203*/ meltfptr[111] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6463:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6614:/ quasiblock");
/*^apply */
/*apply */
{
- /*_.RAWNFLAGSTUP__V212*/ meltfptr[208] =
+ /*_.RAWNFLAGSTUP__V208*/ meltfptr[204] =
melt_apply ((meltclosure_ptr_t)
(( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[32])),
- (melt_ptr_t) ( /*_.NFLAGSLIST__V192*/ meltfptr[97]), (""),
+ (melt_ptr_t) ( /*_.NFLAGSLIST__V188*/ meltfptr[93]), (""),
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ quasiblock");
/*^newclosure */
- /*newclosure *//*_.LAMBDA___V214*/ meltfptr[213] =
+ /*newclosure *//*_.LAMBDA___V210*/ meltfptr[209] =
meltgc_new_closure ((meltobject_ptr_t)
(((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
(meltroutine_ptr_t) (( /*!konst_35 */ meltfrout->
tabval[35])), (0));
;
- /*_.LAMBDA___V213*/ meltfptr[212] = /*_.LAMBDA___V214*/ meltfptr[213];;
+ /*_.LAMBDA___V209*/ meltfptr[208] = /*_.LAMBDA___V210*/ meltfptr[209];;
/*^compute */
- /*_.SORTEDFLAGSTUP__V215*/ meltfptr[214] =
+ /*_.SORTEDFLAGSTUP__V211*/ meltfptr[210] =
meltgc_sort_multiple ((melt_ptr_t)
- ( /*_.RAWNFLAGSTUP__V212*/ meltfptr[208]),
- (melt_ptr_t) ( /*_.LAMBDA___V213*/ meltfptr[212]),
+ ( /*_.RAWNFLAGSTUP__V208*/ meltfptr[204]),
+ (melt_ptr_t) ( /*_.LAMBDA___V209*/ meltfptr[208]),
(melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
tabval[6])));;
- MELT_LOCATION ("warmelt-normatch.melt:6477:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRESBIND__V191*/ meltfptr[94]), (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[36])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6628:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRESBIND__V187*/ meltfptr[90]),
+ (melt_ptr_t) (( /*!CLASS_LET_BINDING */ meltfrout->tabval[36])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -40550,15 +55007,15 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @LETBIND_EXPR",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESBIND__V191*/
- meltfptr[94])) ==
+ ( /*_.NRESBIND__V187*/
+ meltfptr[90])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.NRESBIND__V191*/ meltfptr[94]), (2),
- ( /*_.NRESMATCH__V187*/ meltfptr[90]),
+ melt_putfield_object (( /*_.NRESBIND__V187*/ meltfptr[90]), (2),
+ ( /*_.NRESMATCH__V183*/ meltfptr[86]),
"LETBIND_EXPR");
;
/*^touch */
- meltgc_touch ( /*_.NRESBIND__V191*/ meltfptr[94]);
+ meltgc_touch ( /*_.NRESBIND__V187*/ meltfptr[90]);
;
/*epilog */
}
@@ -40567,25 +55024,25 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6479:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6630:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_A__L73*/ meltfnum[46] =
+ /*_#IS_A__L71*/ meltfnum[44] =
melt_is_instance_of ((melt_ptr_t)
- ( /*_.NRESMATCH__V187*/ meltfptr[90]),
+ ( /*_.NRESMATCH__V183*/ meltfptr[86]),
(melt_ptr_t) (( /*!CLASS_NREP_ALTMATCH */
meltfrout->tabval[37])));;
- MELT_LOCATION ("warmelt-normatch.melt:6479:/ cond");
- /*cond */ if ( /*_#IS_A__L73*/ meltfnum[46]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6630:/ cond");
+ /*cond */ if ( /*_#IS_A__L71*/ meltfnum[44]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V217*/ meltfptr[216] = ( /*nil */ NULL);;
+ /*_.IFELSE___V213*/ meltfptr[212] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-normatch.melt:6479:/ cond.else");
+ MELT_LOCATION ("warmelt-normatch.melt:6630:/ cond.else");
/*^block */
/*anyblock */
@@ -40599,11 +55056,11 @@ lab_endgetargs:;
melt_assert_failed (("check nresmatch"),
("warmelt-normatch.melt")
? ("warmelt-normatch.melt") : __FILE__,
- (6479) ? (6479) : __LINE__, __FUNCTION__);
+ (6630) ? (6630) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V217*/ meltfptr[216] = 0;
+ /*clear *//*_.IFELSE___V213*/ meltfptr[212] = 0;
/*epilog */
}
;
@@ -40611,32 +55068,37 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V216*/ meltfptr[215] = /*_.IFELSE___V217*/ meltfptr[216];;
+ /*_.IFCPP___V212*/ meltfptr[211] = /*_.IFELSE___V213*/ meltfptr[212];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6479:/ clear");
- /*clear *//*_#IS_A__L73*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6630:/ clear");
+ /*clear *//*_#IS_A__L71*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V217*/ meltfptr[216] = 0;
+ /*clear *//*_.IFELSE___V213*/ meltfptr[212] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V216*/ meltfptr[215] = ( /*nil */ NULL);
+ /*_.IFCPP___V212*/ meltfptr[211] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- MELT_LOCATION ("warmelt-normatch.melt:6483:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6634:/ apply");
/*apply */
{
- /*_.LIST_TO_MULTIPLE__V218*/ meltfptr[216] =
+ /*_.LIST_TO_MULTIPLE__V214*/ meltfptr[212] =
melt_apply ((meltclosure_ptr_t)
(( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[32])),
- (melt_ptr_t) ( /*_.NBODYL__V188*/ meltfptr[95]), (""),
+ (melt_ptr_t) ( /*_.NBODYL__V184*/ meltfptr[91]), (""),
(union meltparam_un *) 0, "", (union meltparam_un *) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6480:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRESMATCH__V187*/ meltfptr[90]), (melt_ptr_t) (( /*!CLASS_NREP_ALTMATCH */ meltfrout->tabval[37])))) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6631:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRESMATCH__V183*/ meltfptr[86]),
+ (melt_ptr_t) (( /*!CLASS_NREP_ALTMATCH */ meltfrout->tabval[37])))
+ ) /*then */
{
/*^cond.then */
/*^block */
@@ -40647,10 +55109,10 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NAMATCH_MATCHED",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESMATCH__V187*/
- meltfptr[90])) ==
+ ( /*_.NRESMATCH__V183*/
+ meltfptr[86])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.NRESMATCH__V187*/ meltfptr[90]), (2),
+ melt_putfield_object (( /*_.NRESMATCH__V183*/ meltfptr[86]), (2),
( /*_.NMATX__V31*/ meltfptr[27]),
"NAMATCH_MATCHED");
;
@@ -40658,37 +55120,37 @@ lab_endgetargs:;
/*putslot */
melt_assertmsg ("putslot checkobj @NAMATCH_RESULT",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESMATCH__V187*/
- meltfptr[90])) ==
+ ( /*_.NRESMATCH__V183*/
+ meltfptr[86])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.NRESMATCH__V187*/ meltfptr[90]), (3),
- ( /*_.NRESLOC__V186*/ meltfptr[143]),
+ melt_putfield_object (( /*_.NRESMATCH__V183*/ meltfptr[86]), (3),
+ ( /*_.NRESLOC__V182*/ meltfptr[139]),
"NAMATCH_RESULT");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @NAMATCH_BODY",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESMATCH__V187*/
- meltfptr[90])) ==
+ ( /*_.NRESMATCH__V183*/
+ meltfptr[86])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.NRESMATCH__V187*/ meltfptr[90]), (4),
- ( /*_.LIST_TO_MULTIPLE__V218*/ meltfptr[216]),
+ melt_putfield_object (( /*_.NRESMATCH__V183*/ meltfptr[86]), (4),
+ ( /*_.LIST_TO_MULTIPLE__V214*/ meltfptr[212]),
"NAMATCH_BODY");
;
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj @NAMATCH_FLAGS",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESMATCH__V187*/
- meltfptr[90])) ==
+ ( /*_.NRESMATCH__V183*/
+ meltfptr[86])) ==
MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.NRESMATCH__V187*/ meltfptr[90]), (5),
- ( /*_.SORTEDFLAGSTUP__V215*/ meltfptr[214]),
+ melt_putfield_object (( /*_.NRESMATCH__V183*/ meltfptr[86]), (5),
+ ( /*_.SORTEDFLAGSTUP__V211*/ meltfptr[210]),
"NAMATCH_FLAGS");
;
/*^touch */
- meltgc_touch ( /*_.NRESMATCH__V187*/ meltfptr[90]);
+ meltgc_touch ( /*_.NRESMATCH__V183*/ meltfptr[86]);
;
/*epilog */
}
@@ -40697,7 +55159,7 @@ lab_endgetargs:;
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40712,7 +55174,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L74*/ meltfnum[45] =
+ /*_#MELT_NEED_DBG__L72*/ meltfnum[43] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40720,34 +55182,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L74*/ meltfnum[45]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L72*/ meltfnum[43]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L75*/ meltfnum[39] =
+ /*_#THE_MELTCALLCOUNT__L73*/ meltfnum[37] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L75*/ meltfnum[39];
+ /*_#THE_MELTCALLCOUNT__L73*/ meltfnum[37];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6486;
+ argtab[2].meltbp_long = 6637;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch nresmatch";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NRESMATCH__V187*/ meltfptr[90];
- /*_.MELT_DEBUG_FUN__V221*/ meltfptr[220] =
+ (melt_ptr_t *) & /*_.NRESMATCH__V183*/ meltfptr[86];
+ /*_.MELT_DEBUG_FUN__V217*/ meltfptr[216] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40757,48 +55219,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V220*/ meltfptr[219] =
- /*_.MELT_DEBUG_FUN__V221*/ meltfptr[220];;
+ /*_.IF___V216*/ meltfptr[215] =
+ /*_.MELT_DEBUG_FUN__V217*/ meltfptr[216];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L75*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L73*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V221*/ meltfptr[220] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V217*/ meltfptr[216] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V220*/ meltfptr[219] = NULL;;
+ /*_.IF___V216*/ meltfptr[215] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ quasiblock");
- /*_.PROGN___V222*/ meltfptr[220] = /*_.IF___V220*/ meltfptr[219];;
+ /*_.PROGN___V218*/ meltfptr[216] = /*_.IF___V216*/ meltfptr[215];;
/*^compute */
- /*_.IFCPP___V219*/ meltfptr[218] = /*_.PROGN___V222*/ meltfptr[220];;
+ /*_.IFCPP___V215*/ meltfptr[214] = /*_.PROGN___V218*/ meltfptr[216];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6486:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L74*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6637:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L72*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.IF___V220*/ meltfptr[219] = 0;
+ /*clear *//*_.IF___V216*/ meltfptr[215] = 0;
/*^clear */
- /*clear *//*_.PROGN___V222*/ meltfptr[220] = 0;
+ /*clear *//*_.PROGN___V218*/ meltfptr[216] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V219*/ meltfptr[218] = ( /*nil */ NULL);
+ /*_.IFCPP___V215*/ meltfptr[214] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40813,7 +55275,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L76*/ meltfnum[38] =
+ /*_#MELT_NEED_DBG__L74*/ meltfnum[36] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40821,34 +55283,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L76*/ meltfnum[38]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L74*/ meltfnum[36]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L77*/ meltfnum[46] =
+ /*_#THE_MELTCALLCOUNT__L75*/ meltfnum[44] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L77*/ meltfnum[46];
+ /*_#THE_MELTCALLCOUNT__L75*/ meltfnum[44];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6487;
+ argtab[2].meltbp_long = 6638;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch final nresbind";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NRESBIND__V191*/ meltfptr[94];
- /*_.MELT_DEBUG_FUN__V225*/ meltfptr[224] =
+ (melt_ptr_t *) & /*_.NRESBIND__V187*/ meltfptr[90];
+ /*_.MELT_DEBUG_FUN__V221*/ meltfptr[220] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40858,48 +55320,48 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V224*/ meltfptr[220] =
- /*_.MELT_DEBUG_FUN__V225*/ meltfptr[224];;
+ /*_.IF___V220*/ meltfptr[216] =
+ /*_.MELT_DEBUG_FUN__V221*/ meltfptr[220];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L77*/ meltfnum[46] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L75*/ meltfnum[44] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V225*/ meltfptr[224] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V221*/ meltfptr[220] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V224*/ meltfptr[220] = NULL;;
+ /*_.IF___V220*/ meltfptr[216] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ quasiblock");
- /*_.PROGN___V226*/ meltfptr[224] = /*_.IF___V224*/ meltfptr[220];;
+ /*_.PROGN___V222*/ meltfptr[220] = /*_.IF___V220*/ meltfptr[216];;
/*^compute */
- /*_.IFCPP___V223*/ meltfptr[219] = /*_.PROGN___V226*/ meltfptr[224];;
+ /*_.IFCPP___V219*/ meltfptr[215] = /*_.PROGN___V222*/ meltfptr[220];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6487:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L76*/ meltfnum[38] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6638:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L74*/ meltfnum[36] = 0;
/*^clear */
- /*clear *//*_.IF___V224*/ meltfptr[220] = 0;
+ /*clear *//*_.IF___V220*/ meltfptr[216] = 0;
/*^clear */
- /*clear *//*_.PROGN___V226*/ meltfptr[224] = 0;
+ /*clear *//*_.PROGN___V222*/ meltfptr[220] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V223*/ meltfptr[219] = ( /*nil */ NULL);
+ /*_.IFCPP___V219*/ meltfptr[215] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ cppif.then");
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ cppif.then");
/*^block */
/*anyblock */
{
@@ -40914,7 +55376,7 @@ lab_endgetargs:;
;
}
;
- /*_#MELT_NEED_DBG__L78*/ meltfnum[39] =
+ /*_#MELT_NEED_DBG__L76*/ meltfnum[37] =
/*MELT_NEED_DBG */
#if MELT_HAVE_DEBUG
( /*melt_need_dbg */ melt_need_debug ((int) 0))
@@ -40922,34 +55384,34 @@ lab_endgetargs:;
0 /* no melt_need_dbg */
#endif /*MELT_HAVE_DEBUG */
;;
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L78*/ meltfnum[39]) /*then */
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L76*/ meltfnum[37]) /*then */
{
/*^cond.then */
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L79*/ meltfnum[45] =
+ /*_#THE_MELTCALLCOUNT__L77*/ meltfnum[43] =
meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ apply");
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ apply");
/*apply */
{
union meltparam_un argtab[5];
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L79*/ meltfnum[45];
+ /*_#THE_MELTCALLCOUNT__L77*/ meltfnum[43];
/*^apply.arg */
argtab[1].meltbp_cstring = "warmelt-normatch.melt";
/*^apply.arg */
- argtab[2].meltbp_long = 6488;
+ argtab[2].meltbp_long = 6639;
/*^apply.arg */
argtab[3].meltbp_cstring = "normexp_altmatch final nresloc";
/*^apply.arg */
argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.NRESLOC__V186*/ meltfptr[143];
- /*_.MELT_DEBUG_FUN__V229*/ meltfptr[228] =
+ (melt_ptr_t *) & /*_.NRESLOC__V182*/ meltfptr[139];
+ /*_.MELT_DEBUG_FUN__V225*/ meltfptr[224] =
melt_apply ((meltclosure_ptr_t)
(( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
(melt_ptr_t) (( /*nil */ NULL)),
@@ -40959,53 +55421,53 @@ lab_endgetargs:;
(union meltparam_un *) 0);
}
;
- /*_.IF___V228*/ meltfptr[224] =
- /*_.MELT_DEBUG_FUN__V229*/ meltfptr[228];;
+ /*_.IF___V224*/ meltfptr[220] =
+ /*_.MELT_DEBUG_FUN__V225*/ meltfptr[224];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L79*/ meltfnum[45] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L77*/ meltfnum[43] = 0;
/*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V229*/ meltfptr[228] = 0;
+ /*clear *//*_.MELT_DEBUG_FUN__V225*/ meltfptr[224] = 0;
}
;
}
else
{ /*^cond.else */
- /*_.IF___V228*/ meltfptr[224] = NULL;;
+ /*_.IF___V224*/ meltfptr[220] = NULL;;
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ quasiblock");
- /*_.PROGN___V230*/ meltfptr[228] = /*_.IF___V228*/ meltfptr[224];;
+ /*_.PROGN___V226*/ meltfptr[224] = /*_.IF___V224*/ meltfptr[220];;
/*^compute */
- /*_.IFCPP___V227*/ meltfptr[220] = /*_.PROGN___V230*/ meltfptr[228];;
+ /*_.IFCPP___V223*/ meltfptr[216] = /*_.PROGN___V226*/ meltfptr[224];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6488:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L78*/ meltfnum[39] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6639:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L76*/ meltfnum[37] = 0;
/*^clear */
- /*clear *//*_.IF___V228*/ meltfptr[224] = 0;
+ /*clear *//*_.IF___V224*/ meltfptr[220] = 0;
/*^clear */
- /*clear *//*_.PROGN___V230*/ meltfptr[228] = 0;
+ /*clear *//*_.PROGN___V226*/ meltfptr[224] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V227*/ meltfptr[220] = ( /*nil */ NULL);
+ /*_.IFCPP___V223*/ meltfptr[216] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
{
- MELT_LOCATION ("warmelt-normatch.melt:6489:/ locexp");
+ MELT_LOCATION ("warmelt-normatch.melt:6640:/ locexp");
melt_warning_str (0, (melt_ptr_t) ( /*_.SLOC__V18*/ meltfptr[17]),
("@@??implemented normexp_altmatch"), (melt_ptr_t) 0);
}
;
- MELT_LOCATION ("warmelt-normatch.melt:6491:/ blockmultialloc");
+ MELT_LOCATION ("warmelt-normatch.melt:6642:/ blockmultialloc");
/*multiallocblock */
{
struct meltletrec_1_st
@@ -41019,13 +55481,13 @@ lab_endgetargs:;
meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
/*^blockmultialloc.initfill */
/*inipair rpair_0__NRESBIND_x1 */
- /*_.NRESBIND__V232*/ meltfptr[228] =
+ /*_.NRESBIND__V228*/ meltfptr[224] =
(void *) &meltletrec_1_ptr->rpair_0__NRESBIND_x1;
meltletrec_1_ptr->rpair_0__NRESBIND_x1.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_PAIR))));
/*inilist rlist_1__LIST_ */
- /*_.LIST___V233*/ meltfptr[232] =
+ /*_.LIST___V229*/ meltfptr[228] =
(void *) &meltletrec_1_ptr->rlist_1__LIST_;
meltletrec_1_ptr->rlist_1__LIST_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_LIST))));
@@ -41036,138 +55498,138 @@ lab_endgetargs:;
/*putpairhead */
melt_assertmsg ("putpairhead /6 checkpair",
melt_magic_discr ((melt_ptr_t)
- ( /*_.NRESBIND__V232*/ meltfptr[228]))
+ ( /*_.NRESBIND__V228*/ meltfptr[224]))
== MELTOBMAG_PAIR);
- ((meltpair_ptr_t) ( /*_.NRESBIND__V232*/ meltfptr[228]))->hd =
- (melt_ptr_t) ( /*_.NRESBIND__V191*/ meltfptr[94]);
+ ((meltpair_ptr_t) ( /*_.NRESBIND__V228*/ meltfptr[224]))->hd =
+ (melt_ptr_t) ( /*_.NRESBIND__V187*/ meltfptr[90]);
;
/*^touch */
- meltgc_touch ( /*_.NRESBIND__V232*/ meltfptr[228]);
+ meltgc_touch ( /*_.NRESBIND__V228*/ meltfptr[224]);
;
/*^putlist */
/*putlist */
melt_assertmsg ("putlist checklist",
melt_magic_discr ((melt_ptr_t)
- ( /*_.LIST___V233*/ meltfptr[232])) ==
+ ( /*_.LIST___V229*/ meltfptr[228])) ==
MELTOBMAG_LIST);
- ((meltlist_ptr_t) ( /*_.LIST___V233*/ meltfptr[232]))->first =
- (meltpair_ptr_t) ( /*_.NRESBIND__V232*/ meltfptr[228]);
- ((meltlist_ptr_t) ( /*_.LIST___V233*/ meltfptr[232]))->last =
- (meltpair_ptr_t) ( /*_.NRESBIND__V232*/ meltfptr[228]);
+ ((meltlist_ptr_t) ( /*_.LIST___V229*/ meltfptr[228]))->first =
+ (meltpair_ptr_t) ( /*_.NRESBIND__V228*/ meltfptr[224]);
+ ((meltlist_ptr_t) ( /*_.LIST___V229*/ meltfptr[228]))->last =
+ (meltpair_ptr_t) ( /*_.NRESBIND__V228*/ meltfptr[224]);
;
/*^touch */
- meltgc_touch ( /*_.LIST___V233*/ meltfptr[232]);
+ meltgc_touch ( /*_.LIST___V229*/ meltfptr[228]);
;
- /*_.LIST___V231*/ meltfptr[224] = /*_.LIST___V233*/ meltfptr[232];;
+ /*_.LIST___V227*/ meltfptr[220] = /*_.LIST___V229*/ meltfptr[228];;
/*epilog */
- MELT_LOCATION ("warmelt-normatch.melt:6491:/ clear");
- /*clear *//*_.NRESBIND__V232*/ meltfptr[228] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6642:/ clear");
+ /*clear *//*_.NRESBIND__V228*/ meltfptr[224] = 0;
/*^clear */
- /*clear *//*_.LIST___V233*/ meltfptr[232] = 0;
+ /*clear *//*_.LIST___V229*/ meltfptr[228] = 0;
/*^clear */
- /*clear *//*_.NRESBIND__V232*/ meltfptr[228] = 0;
+ /*clear *//*_.NRESBIND__V228*/ meltfptr[224] = 0;
/*^clear */
- /*clear *//*_.LIST___V233*/ meltfptr[232] = 0;
+ /*clear *//*_.LIST___V229*/ meltfptr[228] = 0;
} /*end multiallocblock */
;
/*^quasiblock */
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NRESLOC__V186*/ meltfptr[143];;
- MELT_LOCATION ("warmelt-normatch.melt:6491:/ putxtraresult");
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NRESLOC__V182*/ meltfptr[139];;
+ MELT_LOCATION ("warmelt-normatch.melt:6642:/ putxtraresult");
if (!meltxrestab_ || !meltxresdescr_)
goto labend_rout;
if (meltxresdescr_[0] != MELTBPAR_PTR)
goto labend_rout;
if (meltxrestab_[0].meltbp_aptr)
*(meltxrestab_[0].meltbp_aptr) =
- (melt_ptr_t) ( /*_.LIST___V231*/ meltfptr[224]);
+ (melt_ptr_t) ( /*_.LIST___V227*/ meltfptr[220]);
;
/*^finalreturn */
;
/*finalret */ goto labend_rout;
- /*_.LET___V211*/ meltfptr[207] = /*_.RETURN___V234*/ meltfptr[228];;
+ /*_.LET___V207*/ meltfptr[203] = /*_.RETURN___V230*/ meltfptr[224];;
- MELT_LOCATION ("warmelt-normatch.melt:6463:/ clear");
- /*clear *//*_.RAWNFLAGSTUP__V212*/ meltfptr[208] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6614:/ clear");
+ /*clear *//*_.RAWNFLAGSTUP__V208*/ meltfptr[204] = 0;
/*^clear */
- /*clear *//*_.LAMBDA___V213*/ meltfptr[212] = 0;
+ /*clear *//*_.LAMBDA___V209*/ meltfptr[208] = 0;
/*^clear */
- /*clear *//*_.SORTEDFLAGSTUP__V215*/ meltfptr[214] = 0;
+ /*clear *//*_.SORTEDFLAGSTUP__V211*/ meltfptr[210] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V216*/ meltfptr[215] = 0;
+ /*clear *//*_.IFCPP___V212*/ meltfptr[211] = 0;
/*^clear */
- /*clear *//*_.LIST_TO_MULTIPLE__V218*/ meltfptr[216] = 0;
+ /*clear *//*_.LIST_TO_MULTIPLE__V214*/ meltfptr[212] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V219*/ meltfptr[218] = 0;
+ /*clear *//*_.IFCPP___V215*/ meltfptr[214] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V223*/ meltfptr[219] = 0;
+ /*clear *//*_.IFCPP___V219*/ meltfptr[215] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V227*/ meltfptr[220] = 0;
+ /*clear *//*_.IFCPP___V223*/ meltfptr[216] = 0;
/*^clear */
- /*clear *//*_.LIST___V231*/ meltfptr[224] = 0;
+ /*clear *//*_.LIST___V227*/ meltfptr[220] = 0;
/*^clear */
- /*clear *//*_.RETURN___V234*/ meltfptr[228] = 0;
- /*_.LET___V185*/ meltfptr[110] = /*_.LET___V211*/ meltfptr[207];;
+ /*clear *//*_.RETURN___V230*/ meltfptr[224] = 0;
+ /*_.LET___V181*/ meltfptr[106] = /*_.LET___V207*/ meltfptr[203];;
- MELT_LOCATION ("warmelt-normatch.melt:6445:/ clear");
- /*clear *//*_.NRESLOC__V186*/ meltfptr[143] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6596:/ clear");
+ /*clear *//*_.NRESLOC__V182*/ meltfptr[139] = 0;
/*^clear */
- /*clear *//*_.NRESMATCH__V187*/ meltfptr[90] = 0;
+ /*clear *//*_.NRESMATCH__V183*/ meltfptr[86] = 0;
/*^clear */
- /*clear *//*_.NBODYL__V188*/ meltfptr[95] = 0;
+ /*clear *//*_.NBODYL__V184*/ meltfptr[91] = 0;
/*^clear */
- /*clear *//*_.NFLAGMAP__V189*/ meltfptr[98] = 0;
+ /*clear *//*_.NFLAGMAP__V185*/ meltfptr[94] = 0;
/*^clear */
- /*clear *//*_.NENDLAB__V190*/ meltfptr[139] = 0;
+ /*clear *//*_.NENDLAB__V186*/ meltfptr[135] = 0;
/*^clear */
- /*clear *//*_.NRESBIND__V191*/ meltfptr[94] = 0;
+ /*clear *//*_.NRESBIND__V187*/ meltfptr[90] = 0;
/*^clear */
- /*clear *//*_.NFLAGSLIST__V192*/ meltfptr[97] = 0;
+ /*clear *//*_.NFLAGSLIST__V188*/ meltfptr[93] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V193*/ meltfptr[114] = 0;
+ /*clear *//*_.IFCPP___V189*/ meltfptr[110] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V197*/ meltfptr[100] = 0;
+ /*clear *//*_.IFCPP___V193*/ meltfptr[96] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V201*/ meltfptr[99] = 0;
+ /*clear *//*_.IFCPP___V197*/ meltfptr[95] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V207*/ meltfptr[115] = 0;
+ /*clear *//*_.IFCPP___V203*/ meltfptr[111] = 0;
/*^clear */
- /*clear *//*_.LET___V211*/ meltfptr[207] = 0;
- /*_.LET___V174*/ meltfptr[96] = /*_.LET___V185*/ meltfptr[110];;
+ /*clear *//*_.LET___V207*/ meltfptr[203] = 0;
+ /*_.LET___V170*/ meltfptr[92] = /*_.LET___V181*/ meltfptr[106];;
- MELT_LOCATION ("warmelt-normatch.melt:6439:/ clear");
- /*clear *//*_.NMCTXT__V175*/ meltfptr[137] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6590:/ clear");
+ /*clear *//*_.NMCTXT__V171*/ meltfptr[133] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V176*/ meltfptr[116] = 0;
+ /*clear *//*_.IFCPP___V172*/ meltfptr[112] = 0;
/*^clear */
- /*clear *//*_.ALTMATCH_NORMALIZE_MATCH_CONTEXT__V180*/ meltfptr[113] = 0;
+ /*clear *//*_.ALTMATCH_NORMALIZE_MATCH_CONTEXT__V176*/ meltfptr[109] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V181*/ meltfptr[141] = 0;
+ /*clear *//*_.IFCPP___V177*/ meltfptr[137] = 0;
/*^clear */
- /*clear *//*_.LET___V185*/ meltfptr[110] = 0;
- /*_.LET___V81*/ meltfptr[73] = /*_.LET___V174*/ meltfptr[96];;
+ /*clear *//*_.LET___V181*/ meltfptr[106] = 0;
+ /*_.LET___V77*/ meltfptr[69] = /*_.LET___V170*/ meltfptr[92];;
- MELT_LOCATION ("warmelt-normatch.melt:6369:/ clear");
- /*clear *//*_.PREVSTEP__V82*/ meltfptr[75] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6520:/ clear");
+ /*clear *//*_.PREVSTEP__V78*/ meltfptr[71] = 0;
/*^clear */
- /*clear *//*_.MATRESCTYP__V83*/ meltfptr[82] = 0;
+ /*clear *//*_.MATRESCTYP__V79*/ meltfptr[78] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V153*/ meltfptr[111] = 0;
+ /*clear *//*_.IFCPP___V149*/ meltfptr[107] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V157*/ meltfptr[125] = 0;
+ /*clear *//*_.IFCPP___V153*/ meltfptr[121] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V161*/ meltfptr[140] = 0;
+ /*clear *//*_.IFCPP___V157*/ meltfptr[136] = 0;
/*^clear */
- /*clear *//*_#MELT_NEED_DBG__L57*/ meltfnum[7] = 0;
+ /*clear *//*_#MELT_NEED_DBG__L55*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IF___V165*/ meltfptr[105] = 0;
+ /*clear *//*_.IF___V161*/ meltfptr[101] = 0;
/*^clear */
- /*clear *//*_.LET___V174*/ meltfptr[96] = 0;
- /*_.LET___V41*/ meltfptr[34] = /*_.LET___V81*/ meltfptr[73];;
+ /*clear *//*_.LET___V170*/ meltfptr[92] = 0;
+ /*_.LET___V41*/ meltfptr[34] = /*_.LET___V77*/ meltfptr[69];;
- MELT_LOCATION ("warmelt-normatch.melt:6318:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6469:/ clear");
/*clear *//*_.MATCTYP__V42*/ meltfptr[38] = 0;
/*^clear */
/*clear *//*_.MCASETUP__V43*/ meltfptr[42] = 0;
@@ -41190,14 +55652,12 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V58*/ meltfptr[57] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V62*/ meltfptr[58] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V77*/ meltfptr[68] = 0;
+ /*clear *//*_.IFCPP___V73*/ meltfptr[64] = 0;
/*^clear */
- /*clear *//*_.LET___V81*/ meltfptr[73] = 0;
+ /*clear *//*_.LET___V77*/ meltfptr[69] = 0;
/*_.MULTI___V30*/ meltfptr[23] = /*_.LET___V41*/ meltfptr[34];;
- MELT_LOCATION ("warmelt-normatch.melt:6313:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6464:/ clear");
/*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0;
/*^clear */
/*clear *//*_.IFCPP___V37*/ meltfptr[33] = 0;
@@ -41208,7 +55668,7 @@ lab_endgetargs:;
/*clear *//*_.NBINDMATX__V32*/ meltfptr[31] = 0;
/*_.LET___V16*/ meltfptr[12] = /*_.MULTI___V30*/ meltfptr[23];;
- MELT_LOCATION ("warmelt-normatch.melt:6305:/ clear");
+ MELT_LOCATION ("warmelt-normatch.melt:6456:/ clear");
/*clear *//*_.LOCA_LOCATION__V17*/ meltfptr[13] = 0;
/*^clear */
/*clear *//*_.SLOC__V18*/ meltfptr[17] = 0;
@@ -41226,11 +55686,11 @@ lab_endgetargs:;
/*clear *//*_.IFCPP___V26*/ meltfptr[22] = 0;
/*^clear */
/*clear *//*_.MULTI___V30*/ meltfptr[23] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ quasiblock");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ quasiblock");
/*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ finalreturn");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ finalreturn");
;
/*finalret */ goto labend_rout;
/*epilog */
@@ -41257,5611 +55717,7 @@ labend_rout:
#undef meltfram__
#undef MELTFRAM_NBVARNUM
#undef MELTFRAM_NBVARPTR
-} /*end meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_125_warmelt_normatch_LAMBDA___29___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 12
- void *mcfr_varptr[12];
-#define MELTFRAM_NBVARNUM 5
- long mcfr_varnum[5];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 12; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 12;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ getarg");
- /*_.NF1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.NF2__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6468:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L1*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NF1__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:6468:/ cond");
- /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6468:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nf1"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (6468) ? (6468) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6468:/ clear");
- /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6469:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L2*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
- meltfrout->tabval[0])));;
- MELT_LOCATION ("warmelt-normatch.melt:6469:/ cond");
- /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6469:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check nf2"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (6469) ? (6469) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6469:/ clear");
- /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6471:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NF1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[0])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NF1__V2*/ meltfptr[1]), 1, "NRPFLA_FLAG");
- /*_.NRPFLA_FLAG__V8*/
- meltfptr[6] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NRPFLA_FLAG__V8*/ meltfptr[6] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6471:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRPFLA_FLAG__V8*/ meltfptr[6]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[2])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRPFLA_FLAG__V8*/ meltfptr[6]), 3, "MFLAG_RANK");
- /*_.MFLAG_RANK__V9*/
- meltfptr[8] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MFLAG_RANK__V9*/ meltfptr[8] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#GET_INT__L3*/ meltfnum[0] =
- (melt_get_int ((melt_ptr_t) ( /*_.MFLAG_RANK__V9*/ meltfptr[8])));;
- MELT_LOCATION ("warmelt-normatch.melt:6472:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[0])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2]), 1, "NRPFLA_FLAG");
- /*_.NRPFLA_FLAG__V10*/
- meltfptr[9] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NRPFLA_FLAG__V10*/ meltfptr[9] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6472:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.NRPFLA_FLAG__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[2])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRPFLA_FLAG__V10*/ meltfptr[9]), 3, "MFLAG_RANK");
- /*_.MFLAG_RANK__V11*/
- meltfptr[10] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.MFLAG_RANK__V11*/ meltfptr[10] = NULL;;
- }
- ;
- /*^compute */
-
- /*_#GET_INT__L4*/ meltfnum[3] =
- (melt_get_int ((melt_ptr_t) ( /*_.MFLAG_RANK__V11*/ meltfptr[10])));;
- /*^compute */
-
- /*_#I__L5*/ meltfnum[4] =
- (( /*_#GET_INT__L3*/ meltfnum[0]) - ( /*_#GET_INT__L4*/ meltfnum[3]));;
- MELT_LOCATION ("warmelt-normatch.melt:6470:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] =
- ( /*!konst_1_TRUE */ meltfrout->tabval[1]);;
- MELT_LOCATION ("warmelt-normatch.melt:6470:/ putxtraresult");
- if (!meltxrestab_ || !meltxresdescr_)
- goto labend_rout;
- if (meltxresdescr_[0] != MELTBPAR_LONG)
- goto labend_rout;
- if (meltxrestab_[0].meltbp_longptr)
- *(meltxrestab_[0].meltbp_longptr) = ( /*_#I__L5*/ meltfnum[4]);
- ;
- /*^finalreturn */
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V12*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.NRPFLA_FLAG__V8*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.MFLAG_RANK__V9*/ meltfptr[8] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L3*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.NRPFLA_FLAG__V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.MFLAG_RANK__V11*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0;
- /*^clear */
- /*clear *//*_#I__L5*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V12*/ meltfptr[11] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_125_warmelt_normatch_LAMBDA___29__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t
- meltfirstargp_,
- const
- melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const
- melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 7
- void *mcfr_varptr[7];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
-/*others*/
- const char *loc_CSTRING__o0;
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 7; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 7;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("ALTERNATE_MATCH_OPTSET", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ getarg");
- /*_.OPTSYMB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_CSTRING)
- goto lab_endgetargs;
- /*_?*/ meltfram__.loc_CSTRING__o0 = meltxargtab_[0].meltbp_cstring;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6495:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:6495:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6495:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6495;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "alternate_match_optset optsymb";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OPTSYMB__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6495:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6495:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6495:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6496:/ locexp");
- inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s", melt_dbgcounter,
- ("enabling alternate matching implementation"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6497:/ apply");
- /*apply */
- {
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & ( /*!NORMAL_EXP */ meltfrout->tabval[3]);
- /*^apply.arg */
- argtab[1].meltbp_aptr =
- (melt_ptr_t *) & ( /*!NORMEXP_ALTMATCH */ meltfrout->tabval[4]);
- /*_.INSTALL_METHOD__V7*/ meltfptr[3] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!INSTALL_METHOD */ meltfrout->tabval[1])),
- (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH */ meltfrout->
- tabval[2])),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.INSTALL_METHOD__V7*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.INSTALL_METHOD__V7*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("ALTERNATE_MATCH_OPTSET", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ_st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 93
- void *mcfr_varptr[93];
-#define MELTFRAM_NBVARNUM 42
- long mcfr_varnum[42];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 93; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 93;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("MG_ALTDRAW_GRAPHVIZ", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ getarg");
- /*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.DOTPREFIX__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.DOTPREFIX__V3*/ meltfptr[2])) !=
- NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6510:/ quasiblock");
-
-
- /*_.MAPDATA__V4*/ meltfptr[3] =
- (meltgc_new_mapobjects
- ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])),
- (43)));;
- /*^compute */
-
- /*_.MAPSTEP__V5*/ meltfptr[4] =
- (meltgc_new_mapobjects
- ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])),
- (43)));;
- /*^compute */
-
- /*_.NODEBUF__V6*/ meltfptr[5] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
- (char *) 0);;
- /*^compute */
-
- /*_.EDGEBUF__V7*/ meltfptr[6] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
- (char *) 0);;
- /*^compute */
-
- /*_.DATACOUNTBOX__V8*/ meltfptr[7] =
- (meltgc_new_int
- ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
- (0)));;
- /*^compute */
-
- /*_#CNT__L1*/ meltfnum[0] = 0;;
- /*^compute */
-
- /*_#MDATAHASH__L2*/ meltfnum[1] =
- (melt_obj_hash ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1])));;
- /*^compute */
-
- /*_.PATHSBUF__V9*/ meltfptr[8] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
- (char *) 0);;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6522:/ locexp");
- /* mg_draw_match_graphviz_file UNIQCNT__2 */
- static long uniqcounter;
- uniqcounter++;
- /*_#CNT__L1*/ meltfnum[0] = uniqcounter;
- ;
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6527:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_STRBUF__L3*/ meltfnum[2] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8])) ==
- MELTOBMAG_STRBUF);;
- MELT_LOCATION ("warmelt-normatch.melt:6527:/ cond");
- /*cond */ if ( /*_#IS_STRBUF__L3*/ meltfnum[2]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6527:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check pathsbuf"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (6527) ? (6527) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6527:/ clear");
- /*clear *//*_#IS_STRBUF__L3*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6528:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
- melt_string_str ((melt_ptr_t)
- ( /*_.DOTPREFIX__V3*/
- meltfptr[2])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6529:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
- ("+"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6530:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
- ( /*_#CNT__L1*/ meltfnum[0]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6531:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
- (".dot"));
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6532:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L4*/ meltfnum[2] =
- /*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-normatch.melt:6532:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[2]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6532:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6532;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_draw_match_graphviz_file pathsbuf";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.PATHSBUF__V9*/ meltfptr[8];
- /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V13*/ meltfptr[12] =
- /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6532:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V13*/ meltfptr[12] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6532:/ quasiblock");
-
-
- /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
- /*^compute */
-
- /*_.IFCPP___V12*/ meltfptr[10] = /*_.PROGN___V15*/ meltfptr[13];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6532:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V12*/ meltfptr[10] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.STRBUF2STRING__V16*/ meltfptr[12] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])),
- melt_strbuf_str ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]))));;
- MELT_LOCATION ("warmelt-normatch.melt:6519:/ quasiblock");
-
-
- /*_.DOTFILENAME__V17*/ meltfptr[13] =
- /*_.STRBUF2STRING__V16*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:6534:/ quasiblock");
-
-
- /*^rawallocobj */
- /*rawallocobj */
- {
- melt_ptr_t newobj = 0;
- melt_raw_object_create (newobj,
- (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
- meltfrout->tabval[5])), (6),
- "CLASS_MATCH_GRAPHIC");
- /*_.INST__V19*/ meltfptr[18] =
- newobj;
- };
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCHGX_FILENAME",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V19*/ meltfptr[18])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (1),
- ( /*_.DOTFILENAME__V17*/ meltfptr[13]),
- "MCHGX_FILENAME");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCHGX_NODOUT",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V19*/ meltfptr[18])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (2),
- ( /*_.NODEBUF__V6*/ meltfptr[5]), "MCHGX_NODOUT");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCHGX_EDGOUT",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V19*/ meltfptr[18])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (3),
- ( /*_.EDGEBUF__V7*/ meltfptr[6]), "MCHGX_EDGOUT");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCHGX_DATANAMEMAP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V19*/ meltfptr[18])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (4),
- ( /*_.MAPDATA__V4*/ meltfptr[3]),
- "MCHGX_DATANAMEMAP");
- ;
- /*^putslot */
- /*putslot */
- melt_assertmsg ("putslot checkobj @MCHGX_STEPNAMEMAP",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.INST__V19*/ meltfptr[18])) ==
- MELTOBMAG_OBJECT);
- melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (5),
- ( /*_.MAPSTEP__V5*/ meltfptr[4]),
- "MCHGX_STEPNAMEMAP");
- ;
- /*_.MG__V18*/ meltfptr[17] = /*_.INST__V19*/ meltfptr[18];;
- MELT_LOCATION ("warmelt-normatch.melt:6545:/ blockmultialloc");
- /*multiallocblock */
- {
- struct meltletrec_1_st
- {
- struct MELT_CLOSURE_STRUCT (3) rclo_0__SCANDATA;
- struct MELT_CLOSURE_STRUCT (4) rclo_1__SCANSTEP;
- struct MELT_CLOSURE_STRUCT (1) rclo_2__SCANFLAG;
- long meltletrec_1_endgap;
- } *meltletrec_1_ptr = 0;
- meltletrec_1_ptr =
- (struct meltletrec_1_st *)
- meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
- /*^blockmultialloc.initfill */
- /*iniclos rclo_0__SCANDATA */
- /*_.SCANDATA__V21*/ meltfptr[20] =
- (void *) &meltletrec_1_ptr->rclo_0__SCANDATA;
- meltletrec_1_ptr->rclo_0__SCANDATA.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- meltletrec_1_ptr->rclo_0__SCANDATA.nbval = 3;
- meltletrec_1_ptr->rclo_0__SCANDATA.rout =
- (meltroutine_ptr_t) (( /*!konst_12 */ meltfrout->tabval[12]));
-
- /*iniclos rclo_1__SCANSTEP */
- /*_.SCANSTEP__V22*/ meltfptr[21] =
- (void *) &meltletrec_1_ptr->rclo_1__SCANSTEP;
- meltletrec_1_ptr->rclo_1__SCANSTEP.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- meltletrec_1_ptr->rclo_1__SCANSTEP.nbval = 4;
- meltletrec_1_ptr->rclo_1__SCANSTEP.rout =
- (meltroutine_ptr_t) (( /*!konst_24 */ meltfrout->tabval[24]));
-
- /*iniclos rclo_2__SCANFLAG */
- /*_.SCANFLAG__V23*/ meltfptr[22] =
- (void *) &meltletrec_1_ptr->rclo_2__SCANFLAG;
- meltletrec_1_ptr->rclo_2__SCANFLAG.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- meltletrec_1_ptr->rclo_2__SCANFLAG.nbval = 1;
- meltletrec_1_ptr->rclo_2__SCANFLAG.rout =
- (meltroutine_ptr_t) (( /*!konst_28 */ meltfrout->tabval[28]));
-
-
-
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ putclosurout");
- /*putclosurout#3 */
- melt_assertmsg ("putclosrout#3 checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/ meltfptr[20]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#3 checkrout",
- melt_magic_discr ((melt_ptr_t)
- (( /*!konst_12 */ meltfrout->
- tabval[12]))) == MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->rout =
- (meltroutine_ptr_t) (( /*!konst_12 */ meltfrout->tabval[12]));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/ meltfptr[20]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/
- meltfptr[20])));
- ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[0] =
- (melt_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/ meltfptr[20]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 1 >= 0
- && 1 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/
- meltfptr[20])));
- ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[1] =
- (melt_ptr_t) ( /*_.DATACOUNTBOX__V8*/ meltfptr[7]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/ meltfptr[20]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 2 >= 0
- && 2 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANDATA__V21*/
- meltfptr[20])));
- ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[2] =
- (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
- ;
- /*^touch */
- meltgc_touch ( /*_.SCANDATA__V21*/ meltfptr[20]);
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ putclosurout");
- /*putclosurout#4 */
- melt_assertmsg ("putclosrout#4 checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/ meltfptr[21]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#4 checkrout",
- melt_magic_discr ((melt_ptr_t)
- (( /*!konst_24 */ meltfrout->
- tabval[24]))) == MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->rout =
- (meltroutine_ptr_t) (( /*!konst_24 */ meltfrout->tabval[24]));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/ meltfptr[21]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/
- meltfptr[21])));
- ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[0] =
- (melt_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/ meltfptr[21]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 1 >= 0
- && 1 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/
- meltfptr[21])));
- ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[1] =
- (melt_ptr_t) ( /*_.SCANDATA__V21*/ meltfptr[20]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/ meltfptr[21]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 2 >= 0
- && 2 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/
- meltfptr[21])));
- ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[2] =
- (melt_ptr_t) ( /*_.SCANFLAG__V23*/ meltfptr[22]);
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/ meltfptr[21]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 3 >= 0
- && 3 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANSTEP__V22*/
- meltfptr[21])));
- ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[3] =
- (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
- ;
- /*^touch */
- meltgc_touch ( /*_.SCANSTEP__V22*/ meltfptr[21]);
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ putclosurout");
- /*putclosurout#5 */
- melt_assertmsg ("putclosrout#5 checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANFLAG__V23*/ meltfptr[22]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#5 checkrout",
- melt_magic_discr ((melt_ptr_t)
- (( /*!konst_28 */ meltfrout->
- tabval[28]))) == MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.SCANFLAG__V23*/ meltfptr[22])->rout =
- (meltroutine_ptr_t) (( /*!konst_28 */ meltfrout->tabval[28]));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.SCANFLAG__V23*/ meltfptr[22]))
- == MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.SCANFLAG__V23*/
- meltfptr[22])));
- ((meltclosure_ptr_t) /*_.SCANFLAG__V23*/ meltfptr[22])->tabval[0] =
- (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
- ;
- /*^touch */
- meltgc_touch ( /*_.SCANFLAG__V23*/ meltfptr[22]);
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6628:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L6*/ meltfnum[4] =
- /*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-normatch.melt:6628:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[4]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6628:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6628;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz before scandata mdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V25*/ meltfptr[24] =
- /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6628:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V25*/ meltfptr[24] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6628:/ quasiblock");
-
-
- /*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
- /*^compute */
-
- /*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6628:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.IF___V25*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V27*/ meltfptr[25] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6629:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L8*/ meltfnum[2] =
- /*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-normatch.melt:6629:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[2]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[4] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6629:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[4];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6629;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz scandata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.SCANDATA__V21*/ meltfptr[20];
- /*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V29*/ meltfptr[25] =
- /*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6629:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V29*/ meltfptr[25] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6629:/ quasiblock");
-
-
- /*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[25];;
- /*^compute */
-
- /*_.IFCPP___V28*/ meltfptr[24] = /*_.PROGN___V31*/ meltfptr[29];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6629:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.IF___V29*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V31*/ meltfptr[29] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V28*/ meltfptr[24] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6630:/ apply");
- /*apply */
- {
- /*_.SCANDATA__V32*/ meltfptr[25] =
- melt_apply ((meltclosure_ptr_t) ( /*_.SCANDATA__V21*/ meltfptr[20]),
- (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), (""),
- (union meltparam_un *) 0, "", (union meltparam_un *) 0);
- }
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6631:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L10*/ meltfnum[4] =
- /*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-normatch.melt:6631:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[4]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[2] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6631:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[2];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6631;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz after scandata mdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V34*/ meltfptr[33] =
- /*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6631:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V34*/ meltfptr[33] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6631:/ quasiblock");
-
-
- /*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];;
- /*^compute */
-
- /*_.IFCPP___V33*/ meltfptr[29] = /*_.PROGN___V36*/ meltfptr[34];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6631:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.IF___V34*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V36*/ meltfptr[34] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V33*/ meltfptr[29] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6632:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L12*/ meltfnum[2] =
- /*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-normatch.melt:6632:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[2]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[4] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6632:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L13*/ meltfnum[4];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6632;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz after scandata mapdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MAPDATA__V4*/ meltfptr[3];
- /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V38*/ meltfptr[34] =
- /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6632:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V38*/ meltfptr[34] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6632:/ quasiblock");
-
-
- /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[34];;
- /*^compute */
-
- /*_.IFCPP___V37*/ meltfptr[33] = /*_.PROGN___V40*/ meltfptr[38];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6632:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.IF___V38*/ meltfptr[34] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V40*/ meltfptr[38] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V37*/ meltfptr[33] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6633:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L14*/ meltfnum[4] =
- /*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-normatch.melt:6633:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[4]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[2] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6633:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L15*/ meltfnum[2];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6633;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz after scandata mapstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MAPSTEP__V5*/ meltfptr[4];
- /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V42*/ meltfptr[38] =
- /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6633:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V42*/ meltfptr[38] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6633:/ quasiblock");
-
-
- /*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[38];;
- /*^compute */
-
- /*_.IFCPP___V41*/ meltfptr[34] = /*_.PROGN___V44*/ meltfptr[42];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6633:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_.IF___V42*/ meltfptr[38] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V44*/ meltfptr[42] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V41*/ meltfptr[34] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*^compute */
-
- /*_.LETREC___V20*/ meltfptr[19] = /*_.IFCPP___V41*/ meltfptr[34];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6545:/ clear");
- /*clear *//*_.SCANDATA__V21*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_.SCANSTEP__V22*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.SCANFLAG__V23*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.SCANDATA__V21*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_.SCANSTEP__V22*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_.SCANFLAG__V23*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V24*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.SCANDATA__V32*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V33*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V37*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V41*/ meltfptr[34] = 0;
- } /*end multiallocblock */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6636:/ quasiblock");
-
-
- /*_#DATACOUNT__L16*/ meltfnum[2] = 0;;
- /*^compute */
-
- /*_#STEPCOUNT__L17*/ meltfnum[4] = 0;;
- /*^compute */
-
- /*_#MAPOBJECT_COUNT__L18*/ meltfnum[17] =
- (melt_count_mapobjects
- ((meltmapobjects_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3])));;
- /*^compute */
-
- /*_.TUPDATA__V45*/ meltfptr[38] =
- (meltgc_new_multiple
- ((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[29])),
- ( /*_#MAPOBJECT_COUNT__L18*/ meltfnum[17])));;
- /*^compute */
-
- /*_#MAPOBJECT_COUNT__L19*/ meltfnum[18] =
- (melt_count_mapobjects
- ((meltmapobjects_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4])));;
- /*^compute */
-
- /*_.TUPSTEP__V46*/ meltfptr[42] =
- (meltgc_new_multiple
- ((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[29])),
- ( /*_#MAPOBJECT_COUNT__L19*/ meltfnum[18])));;
- /*citerblock FOREACH_IN_MAPOBJECT */
- {
- /*cit1__EACHOBMAP : */ int cit1__EACHOBMAP_ix = 0, cit1__EACHOBMAP_siz =
- 0;
- for (cit1__EACHOBMAP_ix = 0;
- /* we retrieve in cit1__EACHOBMAP_siz the size at each iteration since it could change. */
- cit1__EACHOBMAP_ix >= 0
- && (cit1__EACHOBMAP_siz =
- melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/
- meltfptr[3])) > 0
- && cit1__EACHOBMAP_ix < cit1__EACHOBMAP_siz; cit1__EACHOBMAP_ix++)
- {
- /*_.CURDATA__V47*/ meltfptr[20] = NULL;
- /*_.DATANAME__V48*/ meltfptr[21] = NULL;
- /*_.CURDATA__V47*/ meltfptr[20] =
- ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/ meltfptr[3])->
- entab[cit1__EACHOBMAP_ix].e_at;
- if ( /*_.CURDATA__V47*/ meltfptr[20] == HTAB_DELETED_ENTRY)
- { /*_.CURDATA__V47*/
- meltfptr[20] = NULL;
- continue;
- };
- if (! /*_.CURDATA__V47*/ meltfptr[20])
- continue;
- /*_.DATANAME__V48*/ meltfptr[21] =
- ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/ meltfptr[3])->
- entab[cit1__EACHOBMAP_ix].e_va;
- if (! /*_.DATANAME__V48*/ meltfptr[21])
- continue;
-
-
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6645:/ locexp");
- meltgc_multiple_put_nth ((melt_ptr_t)
- ( /*_.TUPDATA__V45*/ meltfptr[38]),
- ( /*_#DATACOUNT__L16*/ meltfnum[2]),
- (melt_ptr_t) ( /*_.CURDATA__V47*/
- meltfptr[20]));
- }
- ;
- /*_#I__L20*/ meltfnum[19] =
- ((1) + ( /*_#DATACOUNT__L16*/ meltfnum[2]));;
- MELT_LOCATION ("warmelt-normatch.melt:6646:/ compute");
- /*_#DATACOUNT__L16*/ meltfnum[2] = /*_#SETQ___L21*/ meltfnum[20] =
- /*_#I__L20*/ meltfnum[19];;
- /* end cit1__EACHOBMAP */
- /*_.CURDATA__V47*/ meltfptr[20] = NULL;
- /*_.DATANAME__V48*/ meltfptr[21] = NULL;
- }
-
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6642:/ clear");
- /*clear *//*_.CURDATA__V47*/ meltfptr[20] = 0;
- /*^clear */
- /*clear *//*_.DATANAME__V48*/ meltfptr[21] = 0;
- /*^clear */
- /*clear *//*_#I__L20*/ meltfnum[19] = 0;
- /*^clear */
- /*clear *//*_#SETQ___L21*/ meltfnum[20] = 0;
- } /*endciterblock FOREACH_IN_MAPOBJECT */
- ;
- /*citerblock FOREACH_IN_MAPOBJECT */
- {
- /*cit2__EACHOBMAP : */ int cit2__EACHOBMAP_ix = 0, cit2__EACHOBMAP_siz =
- 0;
- for (cit2__EACHOBMAP_ix = 0;
- /* we retrieve in cit2__EACHOBMAP_siz the size at each iteration since it could change. */
- cit2__EACHOBMAP_ix >= 0
- && (cit2__EACHOBMAP_siz =
- melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/
- meltfptr[4])) > 0
- && cit2__EACHOBMAP_ix < cit2__EACHOBMAP_siz; cit2__EACHOBMAP_ix++)
- {
- /*_.CURSTEP__V49*/ meltfptr[22] = NULL;
- /*_.STEPNAME__V50*/ meltfptr[23] = NULL;
- /*_.CURSTEP__V49*/ meltfptr[22] =
- ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/ meltfptr[4])->
- entab[cit2__EACHOBMAP_ix].e_at;
- if ( /*_.CURSTEP__V49*/ meltfptr[22] == HTAB_DELETED_ENTRY)
- { /*_.CURSTEP__V49*/
- meltfptr[22] = NULL;
- continue;
- };
- if (! /*_.CURSTEP__V49*/ meltfptr[22])
- continue;
- /*_.STEPNAME__V50*/ meltfptr[23] =
- ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/ meltfptr[4])->
- entab[cit2__EACHOBMAP_ix].e_va;
- if (! /*_.STEPNAME__V50*/ meltfptr[23])
- continue;
-
-
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6651:/ locexp");
- meltgc_multiple_put_nth ((melt_ptr_t)
- ( /*_.TUPSTEP__V46*/ meltfptr[42]),
- ( /*_#STEPCOUNT__L17*/ meltfnum[4]),
- (melt_ptr_t) ( /*_.CURSTEP__V49*/
- meltfptr[22]));
- }
- ;
- /*_#I__L22*/ meltfnum[21] =
- ((1) + ( /*_#STEPCOUNT__L17*/ meltfnum[4]));;
- MELT_LOCATION ("warmelt-normatch.melt:6652:/ compute");
- /*_#STEPCOUNT__L17*/ meltfnum[4] = /*_#SETQ___L23*/ meltfnum[22] =
- /*_#I__L22*/ meltfnum[21];;
- /* end cit2__EACHOBMAP */
- /*_.CURSTEP__V49*/ meltfptr[22] = NULL;
- /*_.STEPNAME__V50*/ meltfptr[23] = NULL;
- }
-
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6648:/ clear");
- /*clear *//*_.CURSTEP__V49*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.STEPNAME__V50*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_#I__L22*/ meltfnum[21] = 0;
- /*^clear */
- /*clear *//*_#SETQ___L23*/ meltfnum[22] = 0;
- } /*endciterblock FOREACH_IN_MAPOBJECT */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6654:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ quasiblock");
-
-
- /*^newclosure */
- /*newclosure *//*_.LAMBDA___V52*/ meltfptr[25] =
- meltgc_new_closure ((meltobject_ptr_t)
- (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
- (meltroutine_ptr_t) (( /*!konst_30 */ meltfrout->
- tabval[30])), (1));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LAMBDA___V52*/ meltfptr[25])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.LAMBDA___V52*/ meltfptr[25])));
- ((meltclosure_ptr_t) /*_.LAMBDA___V52*/ meltfptr[25])->tabval[0] =
- (melt_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3]);
- ;
- /*_.LAMBDA___V51*/ meltfptr[24] = /*_.LAMBDA___V52*/ meltfptr[25];;
- /*^compute */
-
- /*_.SORTUPDATA__V53*/ meltfptr[29] =
- meltgc_sort_multiple ((melt_ptr_t) ( /*_.TUPDATA__V45*/ meltfptr[38]),
- (melt_ptr_t) ( /*_.LAMBDA___V51*/ meltfptr[24]),
- (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
- tabval[29])));;
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ quasiblock");
-
-
- /*^newclosure */
- /*newclosure *//*_.LAMBDA___V55*/ meltfptr[34] =
- meltgc_new_closure ((meltobject_ptr_t)
- (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
- (meltroutine_ptr_t) (( /*!konst_31 */ meltfrout->
- tabval[31])), (1));
- ;
- /*^putclosedv */
- /*putclosv */
- melt_assertmsg ("putclosv checkclo",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.LAMBDA___V55*/ meltfptr[34])) ==
- MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosv checkoff", 0 >= 0
- && 0 <
- melt_closure_size ((melt_ptr_t)
- ( /*_.LAMBDA___V55*/ meltfptr[34])));
- ((meltclosure_ptr_t) /*_.LAMBDA___V55*/ meltfptr[34])->tabval[0] =
- (melt_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4]);
- ;
- /*_.LAMBDA___V54*/ meltfptr[33] = /*_.LAMBDA___V55*/ meltfptr[34];;
- /*^compute */
-
- /*_.SORTUPSTEP__V56*/ meltfptr[55] =
- meltgc_sort_multiple ((melt_ptr_t) ( /*_.TUPSTEP__V46*/ meltfptr[42]),
- (melt_ptr_t) ( /*_.LAMBDA___V54*/ meltfptr[33]),
- (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
- tabval[29])));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6695:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L24*/ meltfnum[23] =
- /*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-normatch.melt:6695:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[23]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6695:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6695;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz sortupdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.SORTUPDATA__V53*/ meltfptr[29];
- /*_.MELT_DEBUG_FUN__V59*/ meltfptr[58] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V58*/ meltfptr[57] =
- /*_.MELT_DEBUG_FUN__V59*/ meltfptr[58];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6695:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V59*/ meltfptr[58] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V58*/ meltfptr[57] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6695:/ quasiblock");
-
-
- /*_.PROGN___V60*/ meltfptr[58] = /*_.IF___V58*/ meltfptr[57];;
- /*^compute */
-
- /*_.IFCPP___V57*/ meltfptr[56] = /*_.PROGN___V60*/ meltfptr[58];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6695:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_.IF___V58*/ meltfptr[57] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V60*/ meltfptr[58] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V57*/ meltfptr[56] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit3__EACHTUP: */
- long cit3__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.SORTUPDATA__V53*/
- meltfptr[29]);
- for ( /*_#DIX__L26*/ meltfnum[24] = 0;
- ( /*_#DIX__L26*/ meltfnum[24] >= 0)
- && ( /*_#DIX__L26*/ meltfnum[24] < cit3__EACHTUP_ln);
- /*_#DIX__L26*/ meltfnum[24]++)
- {
- /*_.CURDATA__V61*/ meltfptr[57] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.SORTUPDATA__V53*/ meltfptr[29]),
- /*_#DIX__L26*/ meltfnum[24]);
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6699:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L27*/ meltfnum[23] =
- /*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-normatch.melt:6699:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L27*/ meltfnum[23]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6699:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6699;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz curdata";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURDATA__V61*/ meltfptr[57];
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V63*/ meltfptr[62] =
- /*_.MELT_DEBUG_FUN__V64*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6699:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L28*/ meltfnum[27] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V64*/ meltfptr[63] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V63*/ meltfptr[62] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6699:/ quasiblock");
-
-
- /*_.PROGN___V65*/ meltfptr[63] = /*_.IF___V63*/ meltfptr[62];;
- /*^compute */
-
- /*_.IFCPP___V62*/ meltfptr[58] = /*_.PROGN___V65*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6699:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L27*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_.IF___V63*/ meltfptr[62] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V65*/ meltfptr[63] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V62*/ meltfptr[58] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6700:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L29*/ meltfnum[27] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURDATA__V61*/ meltfptr[57]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
- meltfrout->tabval[32])));;
- MELT_LOCATION ("warmelt-normatch.melt:6700:/ cond");
- /*cond */ if ( /*_#IS_A__L29*/ meltfnum[27]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V67*/ meltfptr[63] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6700:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("mg_altdraw_graphviz check curdata"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (6700) ? (6700) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V67*/ meltfptr[63] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V66*/ meltfptr[62] = /*_.IFELSE___V67*/ meltfptr[63];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6700:/ clear");
- /*clear *//*_#IS_A__L29*/ meltfnum[27] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V67*/ meltfptr[63] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V66*/ meltfptr[62] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6701:/ quasiblock");
-
-
- /*_.CURDATANAME__V68*/ meltfptr[63] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.MAPDATA__V4*/ meltfptr[3]),
- (meltobject_ptr_t) ( /*_.CURDATA__V61*/
- meltfptr[57]));;
- MELT_LOCATION ("warmelt-normatch.melt:6703:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V61*/ meltfptr[57]), 2, "MDATA_CTYPE");
- /*_.DATACTYPE__V69*/
- meltfptr[68] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6704:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V61*/ meltfptr[57]), 1, "MDATA_SYMB");
- /*_.DATASYMB__V70*/
- meltfptr[69] = slot;
- };
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6705:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V61*/ meltfptr[57]), 4, "MDATA_STEPS");
- /*_.DATASTEPS__V71*/
- meltfptr[70] = slot;
- };
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6707:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6708:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.CURDATANAME__V68*/
- meltfptr[63])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6709:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" [ margin=0, "));
- }
- ;
- /*_#__L30*/ meltfnum[23] =
- (( /*_.CURDATA__V61*/ meltfptr[57]) ==
- ( /*_.MDATA__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6710:/ cond");
- /*cond */ if ( /*_#__L30*/ meltfnum[23]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6711:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" style=\"bold,dashed,filled,rounded\", fillcolor=\"lightyellow\", "));
- }
- ;
- /*epilog */
- }
- ;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6710:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6712:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" style=\"dashed,rounded\", "));
- }
- ;
- /*epilog */
- }
- ;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6713:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("label=<<table border=\"0\" cellborder=\"0\""));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6714:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" cellspacing=\"1\" cellpadding=\"1\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6715:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6716:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("<tr><td><font color=\"green\" face=\"Times-Roman Bold\" point-size=\"7\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6717:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.CURDATANAME__V68*/
- meltfptr[63])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6718:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> <td><font face=\"Courier\" point-size=\"6.5\">#"));
- }
- ;
- /*_#OBJ_HASH__L31*/ meltfnum[27] =
- (melt_obj_hash
- ((melt_ptr_t) ( /*_.CURDATA__V61*/ meltfptr[57])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6719:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ( /*_#OBJ_HASH__L31*/ meltfnum[27]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6720:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6721:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6722:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("<tr><td><font color=\"darkgreen\" face=\"Times-Roman Italic\" point-size=\"7\">"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6723:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DATASYMB__V70*/ meltfptr[69]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[33])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATASYMB__V70*/ meltfptr[69]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V72*/
- meltfptr[71] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NAMED_NAME__V72*/ meltfptr[71] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6723:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V72*/
- meltfptr[71])));
- }
- ;
- /*_#IS_A__L32*/ meltfnum[31] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.DATASYMB__V70*/ meltfptr[69]),
- (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
- meltfrout->tabval[34])));;
- MELT_LOCATION ("warmelt-normatch.melt:6724:/ cond");
- /*cond */ if ( /*_#IS_A__L32*/ meltfnum[31]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6725:/ quasiblock");
-
-
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATASYMB__V70*/ meltfptr[69]), 3, "CSYM_URANK");
- /*_.CSYM_URANK__V73*/
- meltfptr[72] = slot;
- };
- ;
- /*_#CLONUM__L33*/ meltfnum[32] =
- (melt_get_int
- ((melt_ptr_t) ( /*_.CSYM_URANK__V73*/ meltfptr[72])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6727:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("<font point-size=\"6\">$"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6728:/ locexp");
- meltgc_add_out_dec ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ( /*_#CLONUM__L33*/ meltfnum[32]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6729:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font>"));
- }
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:6725:/ clear");
- /*clear *//*_.CSYM_URANK__V73*/ meltfptr[72] = 0;
- /*^clear */
- /*clear *//*_#CLONUM__L33*/ meltfnum[32] = 0;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6731:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> <td><font color=\"brown\" face=\"Helvetica Oblique\" point-size=\"6\">"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6732:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DATACTYPE__V69*/ meltfptr[68]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[35])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATACTYPE__V69*/ meltfptr[68]), 2, "CTYPE_KEYWORD");
- /*_.CTYPE_KEYWORD__V74*/
- meltfptr[72] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.CTYPE_KEYWORD__V74*/ meltfptr[72] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6732:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CTYPE_KEYWORD__V74*/ meltfptr[72]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[33])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYPE_KEYWORD__V74*/ meltfptr[72]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V75*/
- meltfptr[74] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NAMED_NAME__V75*/ meltfptr[74] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6732:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V75*/
- meltfptr[74])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6734:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6735:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</table>> ];"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6736:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
- /*citerblock FOREACH_IN_LIST */
- {
- /* start cit4__EACHLIST */
- for ( /*_.PAIRSTEP__V76*/ meltfptr[75] =
- melt_list_first ( /*_.DATASTEPS__V71*/ meltfptr[70]);
- melt_magic_discr ( /*_.PAIRSTEP__V76*/ meltfptr[75]) ==
- MELTOBMAG_PAIR;
- /*_.PAIRSTEP__V76*/ meltfptr[75] =
- melt_pair_tail ( /*_.PAIRSTEP__V76*/ meltfptr[75]))
- {
- /*_.CURSTEP__V77*/ meltfptr[76] =
- melt_pair_head ( /*_.PAIRSTEP__V76*/ meltfptr[75]);
-
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6741:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.EDGEBUF__V7*/ meltfptr[6]),
- (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6742:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V7*/ meltfptr[6]),
- melt_string_str ((melt_ptr_t)
- ( /*_.CURDATANAME__V68*/
- meltfptr[63])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6743:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V7*/ meltfptr[6]),
- (" /*data*/ -> /*step*/ "));
- }
- ;
- /*_.MAPOBJECT_GET__V78*/ meltfptr[77] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.MAPSTEP__V5*/ meltfptr[4]),
- (meltobject_ptr_t) ( /*_.CURSTEP__V77*/
- meltfptr[76]));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6744:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V7*/ meltfptr[6]),
- melt_string_str ((melt_ptr_t)
- ( /*_.MAPOBJECT_GET__V78*/
- meltfptr[77])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6745:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.EDGEBUF__V7*/ meltfptr[6]),
- (" [ arrowhead=open, color=blueviolet, style=dotted ];"));
- }
- ;
- } /* end cit4__EACHLIST */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6738:/ clear");
- /*clear *//*_.PAIRSTEP__V76*/ meltfptr[75] = 0;
- /*^clear */
- /*clear *//*_.CURSTEP__V77*/ meltfptr[76] = 0;
- /*^clear */
- /*clear *//*_.MAPOBJECT_GET__V78*/ meltfptr[77] = 0;
- } /*endciterblock FOREACH_IN_LIST */
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:6701:/ clear");
- /*clear *//*_.CURDATANAME__V68*/ meltfptr[63] = 0;
- /*^clear */
- /*clear *//*_.DATACTYPE__V69*/ meltfptr[68] = 0;
- /*^clear */
- /*clear *//*_.DATASYMB__V70*/ meltfptr[69] = 0;
- /*^clear */
- /*clear *//*_.DATASTEPS__V71*/ meltfptr[70] = 0;
- /*^clear */
- /*clear *//*_#__L30*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_#OBJ_HASH__L31*/ meltfnum[27] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V72*/ meltfptr[71] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L32*/ meltfnum[31] = 0;
- /*^clear */
- /*clear *//*_.CTYPE_KEYWORD__V74*/ meltfptr[72] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V75*/ meltfptr[74] = 0;
- if ( /*_#DIX__L26*/ meltfnum[24] < 0)
- break;
- } /* end cit3__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6696:/ clear");
- /*clear *//*_.CURDATA__V61*/ meltfptr[57] = 0;
- /*^clear */
- /*clear *//*_#DIX__L26*/ meltfnum[24] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V62*/ meltfptr[58] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V66*/ meltfptr[62] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6750:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L34*/ meltfnum[32] =
- /*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-normatch.melt:6750:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[32]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[23] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6750:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L35*/ meltfnum[23];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6750;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz sortupstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.SORTUPSTEP__V56*/ meltfptr[55];
- /*_.MELT_DEBUG_FUN__V81*/ meltfptr[69] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V80*/ meltfptr[68] =
- /*_.MELT_DEBUG_FUN__V81*/ meltfptr[69];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6750:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V81*/ meltfptr[69] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V80*/ meltfptr[68] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6750:/ quasiblock");
-
-
- /*_.PROGN___V82*/ meltfptr[70] = /*_.IF___V80*/ meltfptr[68];;
- /*^compute */
-
- /*_.IFCPP___V79*/ meltfptr[63] = /*_.PROGN___V82*/ meltfptr[70];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6750:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[32] = 0;
- /*^clear */
- /*clear *//*_.IF___V80*/ meltfptr[68] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V82*/ meltfptr[70] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V79*/ meltfptr[63] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- /*citerblock FOREACH_IN_MULTIPLE */
- {
- /* start cit5__EACHTUP: */
- long cit5__EACHTUP_ln =
- melt_multiple_length ((melt_ptr_t) /*_.SORTUPSTEP__V56*/
- meltfptr[55]);
- for ( /*_#DIX__L36*/ meltfnum[27] = 0;
- ( /*_#DIX__L36*/ meltfnum[27] >= 0)
- && ( /*_#DIX__L36*/ meltfnum[27] < cit5__EACHTUP_ln);
- /*_#DIX__L36*/ meltfnum[27]++)
- {
- /*_.CURSTEP__V83*/ meltfptr[71] =
- melt_multiple_nth ((melt_ptr_t)
- ( /*_.SORTUPSTEP__V56*/ meltfptr[55]),
- /*_#DIX__L36*/ meltfnum[27]);
-
-
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6754:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L37*/ meltfnum[31] =
- /*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-normatch.melt:6754:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[31]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[23] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6754:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L38*/ meltfnum[23];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6754;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz curstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.CURSTEP__V83*/ meltfptr[71];
- /*_.MELT_DEBUG_FUN__V86*/ meltfptr[69] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->
- tabval[3])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V85*/ meltfptr[74] =
- /*_.MELT_DEBUG_FUN__V86*/ meltfptr[69];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6754:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[69] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V85*/ meltfptr[74] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6754:/ quasiblock");
-
-
- /*_.PROGN___V87*/ meltfptr[68] = /*_.IF___V85*/ meltfptr[74];;
- /*^compute */
-
- /*_.IFCPP___V84*/ meltfptr[72] = /*_.PROGN___V87*/ meltfptr[68];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6754:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[31] = 0;
- /*^clear */
- /*clear *//*_.IF___V85*/ meltfptr[74] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V87*/ meltfptr[68] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V84*/ meltfptr[72] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6755:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L39*/ meltfnum[32] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURSTEP__V83*/ meltfptr[71]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
- meltfrout->tabval[36])));;
- MELT_LOCATION ("warmelt-normatch.melt:6755:/ cond");
- /*cond */ if ( /*_#IS_A__L39*/ meltfnum[32]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V89*/ meltfptr[69] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6755:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("mg_altdraw_graphviz check curstep"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (6755) ? (6755) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V89*/ meltfptr[69] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V88*/ meltfptr[70] = /*_.IFELSE___V89*/ meltfptr[69];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6755:/ clear");
- /*clear *//*_#IS_A__L39*/ meltfnum[32] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V89*/ meltfptr[69] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V88*/ meltfptr[70] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6756:/ quasiblock");
-
-
- /*_.CURSTEPNAME__V90*/ meltfptr[74] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- ( /*_.MAPSTEP__V5*/ meltfptr[4]),
- (meltobject_ptr_t) ( /*_.CURSTEP__V83*/
- meltfptr[71]));;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6759:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_STRING__L40*/ meltfnum[23] =
- (melt_magic_discr
- ((melt_ptr_t) ( /*_.CURSTEPNAME__V90*/ meltfptr[74])) ==
- MELTOBMAG_STRING);;
- MELT_LOCATION ("warmelt-normatch.melt:6759:/ cond");
- /*cond */ if ( /*_#IS_STRING__L40*/ meltfnum[23]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V92*/ meltfptr[69] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6759:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("mg_altdraw_graphviz check curstepname"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6759) ? (6759) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V92*/ meltfptr[69] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V91*/ meltfptr[68] = /*_.IFELSE___V92*/ meltfptr[69];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6759:/ clear");
- /*clear *//*_#IS_STRING__L40*/ meltfnum[23] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V92*/ meltfptr[69] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V91*/ meltfptr[68] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6760:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6761:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.CURSTEPNAME__V90*/
- meltfptr[74])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6762:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" [ margin=0, "));
- }
- ;
- /*_#IS_A__L41*/ meltfnum[31] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.CURSTEP__V83*/ meltfptr[71]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[37])));;
- MELT_LOCATION ("warmelt-normatch.melt:6763:/ cond");
- /*cond */ if ( /*_#IS_A__L41*/ meltfnum[31]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6764:/ locexp");
- meltgc_add_out ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" style=\"filled\", bgcolor=\"palegreen\", "));
- }
- ;
- /*epilog */
- }
- ;
- } /*noelse */
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6766:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("label=<<table border=\"1\" cellborder=\"1\""));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6767:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- (" cellspacing=\"1\" cellpadding=\"1\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6768:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6769:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("<tr><td><font color=\"blue\" face=\"Times-Roman Bold\" point-size=\"7\">"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6770:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- melt_string_str ((melt_ptr_t)
- ( /*_.CURSTEPNAME__V90*/
- meltfptr[74])));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6771:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> <td><font face=\"Courier\" point-size=\"6\">#"));
- }
- ;
- /*_#OBJ_HASH__L42*/ meltfnum[32] =
- (melt_obj_hash
- ((melt_ptr_t) ( /*_.CURSTEP__V83*/ meltfptr[71])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6772:/ locexp");
- meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ( /*_#OBJ_HASH__L42*/ meltfnum[32]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6773:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</font></td> </tr>"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6774:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6775:/ msend");
- /*msend */
- {
- union meltparam_un argtab[1];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.MG__V18*/ meltfptr[17];
- /*_.MATCHGRAPHIC_ALTSTEP__V93*/ meltfptr[69] =
- meltgc_send ((melt_ptr_t) ( /*_.CURSTEP__V83*/ meltfptr[71]),
- (melt_ptr_t) (( /*!MATCHGRAPHIC_ALTSTEP */
- meltfrout->tabval[38])),
- (MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6776:/ locexp");
- meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
- ("</table>> ];"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6777:/ locexp");
- meltgc_out_add_indent ((melt_ptr_t)
- ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
- }
- ;
-
- MELT_LOCATION ("warmelt-normatch.melt:6756:/ clear");
- /*clear *//*_.CURSTEPNAME__V90*/ meltfptr[74] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V91*/ meltfptr[68] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L41*/ meltfnum[31] = 0;
- /*^clear */
- /*clear *//*_#OBJ_HASH__L42*/ meltfnum[32] = 0;
- /*^clear */
- /*clear *//*_.MATCHGRAPHIC_ALTSTEP__V93*/ meltfptr[69] = 0;
- if ( /*_#DIX__L36*/ meltfnum[27] < 0)
- break;
- } /* end cit5__EACHTUP */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6751:/ clear");
- /*clear *//*_.CURSTEP__V83*/ meltfptr[71] = 0;
- /*^clear */
- /*clear *//*_#DIX__L36*/ meltfnum[27] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V84*/ meltfptr[72] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V88*/ meltfptr[70] = 0;
- } /*endciterblock FOREACH_IN_MULTIPLE */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6781:/ quasiblock");
-
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6785:/ locexp");
- /* OUTPUTMGFILE__1 start */
- time_t nowt = 0;
- char nowbuf[60];
- FILE *dotfil =
- fopen (melt_string_str
- ((melt_ptr_t) /*_.DOTFILENAME__V17*/ meltfptr[13]), "w");
- if (!dotfil)
- melt_fatal_error ("failed to open matchdot file %s - %m",
- melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
- meltfptr[13]));
- fprintf (dotfil, "// melt matchdot file %s\n",
- melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
- meltfptr[13]));
- time (&nowt);
- memset (nowbuf, 0, sizeof (nowbuf));
- strftime (nowbuf, sizeof (nowbuf) - 1,
- "%Y %b %d %Hh%M", localtime (&nowt));
- fprintf (dotfil, "// generated %s\n", nowbuf);
- fprintf (dotfil, "digraph meltaltmatch_%lx {", /*_#MDATAHASH__L2*/
- meltfnum[1]);
- fprintf (dotfil,
- " graph [ label=<<font color='firebrick' point-size='9' face='Helvetica Bold'>Melt Alt Match %s ** %s</font>>,",
- lbasename (melt_string_str
- ((melt_ptr_t) /*_.DOTFILENAME__V17*/ meltfptr[13])),
- nowbuf);
- fprintf (dotfil, " pad=\"0.5\", margin=\"0.3\" ];\n");
- fprintf (dotfil, " node [ shape=\"box\", fontsize=\"9\" ];\n");
- melt_putstrbuf (dotfil, (melt_ptr_t) /*_.NODEBUF__V6*/ meltfptr[5]);
- fprintf (dotfil, "\n /// edges\n");
- melt_putstrbuf (dotfil, (melt_ptr_t) /*_.EDGEBUF__V7*/ meltfptr[6]);
- fprintf (dotfil, "\n} // eof %s\n",
- melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
- meltfptr[13]));
- fclose (dotfil);
- /* OUTPUTMGFILE__1 end */
- ;
- }
- ;
-
-
- MELT_LOCATION ("warmelt-normatch.melt:6654:/ clear");
- /*clear *//*_.LAMBDA___V51*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.SORTUPDATA__V53*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_.LAMBDA___V54*/ meltfptr[33] = 0;
- /*^clear */
- /*clear *//*_.SORTUPSTEP__V56*/ meltfptr[55] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V57*/ meltfptr[56] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V79*/ meltfptr[63] = 0;
-
- MELT_LOCATION ("warmelt-normatch.melt:6636:/ clear");
- /*clear *//*_#DATACOUNT__L16*/ meltfnum[2] = 0;
- /*^clear */
- /*clear *//*_#STEPCOUNT__L17*/ meltfnum[4] = 0;
- /*^clear */
- /*clear *//*_#MAPOBJECT_COUNT__L18*/ meltfnum[17] = 0;
- /*^clear */
- /*clear *//*_.TUPDATA__V45*/ meltfptr[38] = 0;
- /*^clear */
- /*clear *//*_#MAPOBJECT_COUNT__L19*/ meltfnum[18] = 0;
- /*^clear */
- /*clear *//*_.TUPSTEP__V46*/ meltfptr[42] = 0;
-
- MELT_LOCATION ("warmelt-normatch.melt:6510:/ clear");
- /*clear *//*_.MAPDATA__V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.MAPSTEP__V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.NODEBUF__V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_.EDGEBUF__V7*/ meltfptr[6] = 0;
- /*^clear */
- /*clear *//*_.DATACOUNTBOX__V8*/ meltfptr[7] = 0;
- /*^clear */
- /*clear *//*_#CNT__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_#MDATAHASH__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.PATHSBUF__V9*/ meltfptr[8] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V12*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.STRBUF2STRING__V16*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.DOTFILENAME__V17*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.MG__V18*/ meltfptr[17] = 0;
- /*^clear */
- /*clear *//*_.LETREC___V20*/ meltfptr[19] = 0;
- /*epilog */
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("MG_ALTDRAW_GRAPHVIZ", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*noretval */ NULL);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_128_warmelt_normatch_LAMBDA___30___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 30
- void *mcfr_varptr[30];
-#define MELTFRAM_NBVARNUM 9
- long mcfr_varnum[9];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 30; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 30;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ getarg");
- /*_.DATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6548:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:6548:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6548:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6548;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz/scandata data";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.DATA__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6548:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6548:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6548:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6549:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6549:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6549:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("mg_altdraw_graphviz.scandata check data"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (6549) ? (6549) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6549:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6550:/ quasiblock");
-
-
- /*_.MAPOBJECT_GET__V10*/ meltfptr[9] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPDATA */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6550:/ apply");
- /*apply */
- {
- /*_.OLDNAME__V11*/ meltfptr[10] =
- melt_apply ((meltclosure_ptr_t)
- ( /*_.MAPOBJECT_GET__V10*/ meltfptr[9]),
- (melt_ptr_t) (NULL), (""), (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6552:/ cond");
- /*cond */ if ( /*_.OLDNAME__V11*/ meltfptr[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6554:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
- /*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-normatch.melt:6554:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6554:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6554;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz/scandata found oldname";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OLDNAME__V11*/ meltfptr[10];
- /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] =
- 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);
- }
- ;
- /*_.IF___V14*/ meltfptr[13] =
- /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6554:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V14*/ meltfptr[13] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6554:/ quasiblock");
-
-
- /*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
- /*^compute */
-
- /*_.IFCPP___V13*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[14];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6554:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V14*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V16*/ meltfptr[14] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6555:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V11*/ meltfptr[10];;
- MELT_LOCATION ("warmelt-normatch.melt:6555:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:6553:/ quasiblock");
-
-
- /*_.PROGN___V18*/ meltfptr[14] = /*_.RETURN___V17*/ meltfptr[13];;
- /*^compute */
-
- /*_.IF___V12*/ meltfptr[11] = /*_.PROGN___V18*/ meltfptr[14];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6552:/ clear");
- /*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V17*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V18*/ meltfptr[14] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V12*/ meltfptr[11] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.LET___V9*/ meltfptr[4] = /*_.IF___V12*/ meltfptr[11];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6550:/ clear");
- /*clear *//*_.MAPOBJECT_GET__V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.OLDNAME__V11*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.IF___V12*/ meltfptr[11] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6556:/ quasiblock");
-
-
- /*_.NAMBUF__V20*/ meltfptr[13] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[2])),
- (char *) 0);;
- MELT_LOCATION ("warmelt-normatch.melt:6557:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]), 1, "MDATA_SYMB");
- /*_.MSYMB__V21*/
- meltfptr[14] = slot;
- };
- ;
- /*_#GET_INT__L6*/ meltfnum[1] =
- (melt_get_int
- ((melt_ptr_t) (( /*~DATACOUNTBOX */ meltfclos->tabval[1]))));;
- /*^compute */
-
- /*_#DATACNT__L7*/ meltfnum[0] =
- ((1) + ( /*_#GET_INT__L6*/ meltfnum[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6559:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]), 4, "MDATA_STEPS");
- /*_.MSTEPS__V22*/
- meltfptr[9] = slot;
- };
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6561:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
- ("mdata_"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6562:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
- ( /*_#DATACNT__L7*/ meltfnum[0]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6563:/ locexp");
- melt_put_int ((melt_ptr_t) (( /*~DATACOUNTBOX */ meltfclos->tabval[1])),
- ( /*_#DATACNT__L7*/ meltfnum[0]));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6564:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
- ("_"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6565:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]), 1, "NAMED_NAME");
- /*_.NAMED_NAME__V23*/
- meltfptr[10] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.NAMED_NAME__V23*/ meltfptr[10] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6565:/ locexp");
- meltgc_add_strbuf_cident ((melt_ptr_t)
- ( /*_.NAMBUF__V20*/ meltfptr[13]),
- melt_string_str ((melt_ptr_t)
- ( /*_.NAMED_NAME__V23*/
- meltfptr[10])));
- }
- ;
- /*_#IS_A__L8*/ meltfnum[7] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]),
- (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
- meltfrout->tabval[4])));;
- MELT_LOCATION ("warmelt-normatch.melt:6566:/ cond");
- /*cond */ if ( /*_#IS_A__L8*/ meltfnum[7]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6568:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
- ("__"));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6569:/ getslot");
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]), 3, "CSYM_URANK");
- /*_.CSYM_URANK__V24*/
- meltfptr[11] = slot;
- };
- ;
- /*_#GET_INT__L9*/ meltfnum[8] =
- (melt_get_int
- ((melt_ptr_t) ( /*_.CSYM_URANK__V24*/ meltfptr[11])));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6569:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t)
- ( /*_.NAMBUF__V20*/ meltfptr[13]),
- ( /*_#GET_INT__L9*/ meltfnum[8]));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6567:/ quasiblock");
-
-
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6566:/ clear");
- /*clear *//*_.CSYM_URANK__V24*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L9*/ meltfnum[8] = 0;
- }
- ;
- } /*noelse */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6570:/ quasiblock");
-
-
- /*_.NEWNAME__V26*/ meltfptr[25] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[5])),
- melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]))));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6572:/ locexp");
- meltgc_put_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPDATA */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]),
- (melt_ptr_t) ( /*_.NEWNAME__V26*/ meltfptr[25]));
- }
- ;
- /*citerblock FOREACH_IN_LIST */
- {
- /* start cit1__EACHLIST */
- for ( /*_.CURPAIR__V27*/ meltfptr[26] =
- melt_list_first ( /*_.MSTEPS__V22*/ meltfptr[9]);
- melt_magic_discr ( /*_.CURPAIR__V27*/ meltfptr[26]) ==
- MELTOBMAG_PAIR;
- /*_.CURPAIR__V27*/ meltfptr[26] =
- melt_pair_tail ( /*_.CURPAIR__V27*/ meltfptr[26]))
- {
- /*_.CURSTEP__V28*/ meltfptr[27] =
- melt_pair_head ( /*_.CURPAIR__V27*/ meltfptr[26]);
-
-
- MELT_LOCATION ("warmelt-normatch.melt:6576:/ apply");
- /*apply */
- {
- /*_.SCANSTEP__V29*/ meltfptr[28] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANSTEP */ meltfclos->tabval[2])),
- (melt_ptr_t) ( /*_.CURSTEP__V28*/ meltfptr[27]),
- (""), (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- } /* end cit1__EACHLIST */
-
- /*citerepilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6573:/ clear");
- /*clear *//*_.CURPAIR__V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.CURSTEP__V28*/ meltfptr[27] = 0;
- /*^clear */
- /*clear *//*_.SCANSTEP__V29*/ meltfptr[28] = 0;
- } /*endciterblock FOREACH_IN_LIST */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6577:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWNAME__V26*/ meltfptr[25];;
- MELT_LOCATION ("warmelt-normatch.melt:6577:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*_.LET___V25*/ meltfptr[11] = /*_.RETURN___V30*/ meltfptr[29];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6570:/ clear");
- /*clear *//*_.NEWNAME__V26*/ meltfptr[25] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V30*/ meltfptr[29] = 0;
- /*_.LET___V19*/ meltfptr[12] = /*_.LET___V25*/ meltfptr[11];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6556:/ clear");
- /*clear *//*_.NAMBUF__V20*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.MSYMB__V21*/ meltfptr[14] = 0;
- /*^clear */
- /*clear *//*_#GET_INT__L6*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_#DATACNT__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MSTEPS__V22*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.NAMED_NAME__V23*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_#IS_A__L8*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.LET___V25*/ meltfptr[11] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[12];;
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.LET___V19*/ meltfptr[12] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_128_warmelt_normatch_LAMBDA___30__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_129_warmelt_normatch_LAMBDA___31___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 37
- void *mcfr_varptr[37];
-#define MELTFRAM_NBVARNUM 7
- long mcfr_varnum[7];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 37; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 37;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ getarg");
- /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6582:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:6582:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6582:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6582;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz/scanstep step";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6582:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6582:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6582:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6583:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
- meltfrout->tabval[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6583:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6583:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("mg_altdraw_graphviz.scanstep check step"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") : __FILE__,
- (6583) ? (6583) : __LINE__, __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6583:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6584:/ quasiblock");
-
-
- /*_.OLDNAME__V10*/ meltfptr[9] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPSTEP */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
- MELT_LOCATION ("warmelt-normatch.melt:6586:/ cond");
- /*cond */ if ( /*_.OLDNAME__V10*/ meltfptr[9]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6588:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
- /*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-normatch.melt:6588:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6588:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long =
- /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6588;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz.scanstep found oldname";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.OLDNAME__V10*/ meltfptr[9];
- /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
- 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);
- }
- ;
- /*_.IF___V13*/ meltfptr[12] =
- /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6588:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V13*/ meltfptr[12] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6588:/ quasiblock");
-
-
- /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
- /*^compute */
-
- /*_.IFCPP___V12*/ meltfptr[11] = /*_.PROGN___V15*/ meltfptr[13];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6588:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6589:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V10*/ meltfptr[9];;
- MELT_LOCATION ("warmelt-normatch.melt:6589:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- MELT_LOCATION ("warmelt-normatch.melt:6587:/ quasiblock");
-
-
- /*_.PROGN___V17*/ meltfptr[13] = /*_.RETURN___V16*/ meltfptr[12];;
- /*^compute */
-
- /*_.IF___V11*/ meltfptr[10] = /*_.PROGN___V17*/ meltfptr[13];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6586:/ clear");
- /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.RETURN___V16*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V17*/ meltfptr[13] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V11*/ meltfptr[10] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.LET___V9*/ meltfptr[4] = /*_.IF___V11*/ meltfptr[10];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6584:/ clear");
- /*clear *//*_.OLDNAME__V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6590:/ quasiblock");
-
-
- /*_.NAMBUF__V19*/ meltfptr[12] =
- meltgc_new_strbuf ((meltobject_ptr_t)
- (( /*!DISCR_STRBUF */ meltfrout->tabval[2])),
- (char *) 0);;
- /*^compute */
-
- /*_#MAPCNT__L6*/ meltfnum[1] =
- (melt_count_mapobjects
- ((meltmapobjects_ptr_t) (( /*~MAPSTEP */ meltfclos->tabval[0]))));;
- /*^compute */
-
- /*_.DISCRIM__V20*/ meltfptr[13] =
- (melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
- MELT_LOCATION ("warmelt-normatch.melt:6592:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.DISCRIM__V20*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.DISCRIM__V20*/ meltfptr[13]), 1, "NAMED_NAME");
- /*_.DISNAM__V21*/
- meltfptr[9] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.DISNAM__V21*/ meltfptr[9] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6594:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[4])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
- /*_.SDATA__V22*/
- meltfptr[10] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.SDATA__V22*/ meltfptr[10] = NULL;;
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6597:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) /*_.NAMBUF__V19*/ meltfptr[12],
- melt_string_str ((melt_ptr_t) /*_.DISNAM__V21*/
- meltfptr[9]) + strlen ("CLASS_"));
- }
- ;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6599:/ locexp");
- meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]),
- ("__"));
- }
- ;
- /*_#I__L7*/ meltfnum[0] =
- (( /*_#MAPCNT__L6*/ meltfnum[1]) + (1));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6600:/ locexp");
- meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]),
- ( /*_#I__L7*/ meltfnum[0]));
- }
- ;
- /*_.STRBUF2STRING__V23*/ meltfptr[22] =
- (meltgc_new_stringdup
- ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[5])),
- melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]))));;
-
- {
- MELT_LOCATION ("warmelt-normatch.melt:6601:/ locexp");
- meltgc_put_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPSTEP */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) ( /*_.STRBUF2STRING__V23*/
- meltfptr[22]));
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6602:/ cond");
- /*cond */ if ( /*_.SDATA__V22*/ meltfptr[10]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- /*_.SCANDATA__V25*/ meltfptr[24] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANDATA */ meltfclos->tabval[1])),
- (melt_ptr_t) ( /*_.SDATA__V22*/ meltfptr[10]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V24*/ meltfptr[23] = /*_.SCANDATA__V25*/ meltfptr[24];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6602:/ clear");
- /*clear *//*_.SCANDATA__V25*/ meltfptr[24] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V24*/ meltfptr[23] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6603:/ msend");
- /*msend */
- {
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & ( /*~SCANDATA */ meltfclos->tabval[1]);
- /*^ojbmsend.arg */
- argtab[1].meltbp_aptr = /*nil */ (melt_ptr_t *) NULL;
- /*_.SCAN_STEP_DATA__V26*/ meltfptr[24] =
- meltgc_send ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!SCAN_STEP_DATA */ meltfrout->
- tabval[6])),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6604:/ msend");
- /*msend */
- {
- union meltparam_un argtab[2];
- memset (&argtab, 0, sizeof (argtab));
- /*^ojbmsend.arg */
- argtab[0].meltbp_aptr =
- (melt_ptr_t *) & ( /*~SCANFLAG */ meltfclos->tabval[2]);
- /*^ojbmsend.arg */
- argtab[1].meltbp_aptr = /*nil */ (melt_ptr_t *) NULL;
- /*_.SCAN_STEP_FLAG__V27*/ meltfptr[26] =
- meltgc_send ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
- (melt_ptr_t) (( /*!SCAN_STEP_FLAG */ meltfrout->
- tabval[7])),
- (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6605:/ quasiblock");
-
-
- MELT_LOCATION ("warmelt-normatch.melt:6607:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_THEN */ meltfrout->tabval[8])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
- /*_.STHEN__V29*/
- meltfptr[28] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.STHEN__V29*/ meltfptr[28] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6608:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */ meltfrout->tabval[9])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
- /*_.SELSE__V30*/
- meltfptr[29] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.SELSE__V30*/ meltfptr[29] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6609:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */ meltfrout->tabval[10])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
- /*_.SFLAG__V31*/
- meltfptr[30] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.SFLAG__V31*/ meltfptr[30] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6611:/ cond");
- /*cond */ if ( /*_.STHEN__V29*/ meltfptr[28]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- /*_.SCANSTEP__V33*/ meltfptr[32] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANSTEP */ meltfclos->tabval[3])),
- (melt_ptr_t) ( /*_.STHEN__V29*/ meltfptr[28]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V32*/ meltfptr[31] = /*_.SCANSTEP__V33*/ meltfptr[32];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6611:/ clear");
- /*clear *//*_.SCANSTEP__V33*/ meltfptr[32] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V32*/ meltfptr[31] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6612:/ cond");
- /*cond */ if ( /*_.SELSE__V30*/ meltfptr[29]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- /*_.SCANSTEP__V35*/ meltfptr[34] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANSTEP */ meltfclos->tabval[3])),
- (melt_ptr_t) ( /*_.SELSE__V30*/ meltfptr[29]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V34*/ meltfptr[32] = /*_.SCANSTEP__V35*/ meltfptr[34];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6612:/ clear");
- /*clear *//*_.SCANSTEP__V35*/ meltfptr[34] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V34*/ meltfptr[32] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6613:/ cond");
- /*cond */ if ( /*_.SFLAG__V31*/ meltfptr[30]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^apply */
- /*apply */
- {
- /*_.SCANFLAG__V37*/ meltfptr[36] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANFLAG */ meltfclos->tabval[2])),
- (melt_ptr_t) ( /*_.SFLAG__V31*/ meltfptr[30]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- /*_.IF___V36*/ meltfptr[34] = /*_.SCANFLAG__V37*/ meltfptr[36];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6613:/ clear");
- /*clear *//*_.SCANFLAG__V37*/ meltfptr[36] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V36*/ meltfptr[34] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.LET___V28*/ meltfptr[27] = /*_.IF___V36*/ meltfptr[34];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6605:/ clear");
- /*clear *//*_.STHEN__V29*/ meltfptr[28] = 0;
- /*^clear */
- /*clear *//*_.SELSE__V30*/ meltfptr[29] = 0;
- /*^clear */
- /*clear *//*_.SFLAG__V31*/ meltfptr[30] = 0;
- /*^clear */
- /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
- /*^clear */
- /*clear *//*_.IF___V34*/ meltfptr[32] = 0;
- /*^clear */
- /*clear *//*_.IF___V36*/ meltfptr[34] = 0;
- /*_.LET___V18*/ meltfptr[11] = /*_.LET___V28*/ meltfptr[27];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6590:/ clear");
- /*clear *//*_.NAMBUF__V19*/ meltfptr[12] = 0;
- /*^clear */
- /*clear *//*_#MAPCNT__L6*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.DISCRIM__V20*/ meltfptr[13] = 0;
- /*^clear */
- /*clear *//*_.DISNAM__V21*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.SDATA__V22*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_#I__L7*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.STRBUF2STRING__V23*/ meltfptr[22] = 0;
- /*^clear */
- /*clear *//*_.IF___V24*/ meltfptr[23] = 0;
- /*^clear */
- /*clear *//*_.SCAN_STEP_DATA__V26*/ meltfptr[24] = 0;
- /*^clear */
- /*clear *//*_.SCAN_STEP_FLAG__V27*/ meltfptr[26] = 0;
- /*^clear */
- /*clear *//*_.LET___V28*/ meltfptr[27] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[11];;
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.LET___V18*/ meltfptr[11] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_129_warmelt_normatch_LAMBDA___31__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_130_warmelt_normatch_LAMBDA___32___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 17
- void *mcfr_varptr[17];
-#define MELTFRAM_NBVARNUM 5
- long mcfr_varnum[5];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 17; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 17;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ getarg");
- /*_.FLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6617:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
- /*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-normatch.melt:6617:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6617:/ apply");
- /*apply */
- {
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6617;
- /*^apply.arg */
- argtab[3].meltbp_cstring = "mg_altdraw_graphviz.scanflag flag";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.FLAG__V2*/ meltfptr[1];
- /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
- 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);
- }
- ;
- /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6617:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V4*/ meltfptr[3] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6617:/ quasiblock");
-
-
- /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
- /*^compute */
-
- /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6617:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6618:/ quasiblock");
-
-
- /*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */ meltfrout->tabval[1])))) /*then */
- {
- /*^cond.then */
- /*^getslot */
- {
- melt_ptr_t slot = 0;
- melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]), 5, "MFLAG_SETSTEP");
- /*_.FLSTEP__V8*/
- meltfptr[4] = slot;
- };
- ;
- }
- else
- { /*^cond.else */
-
- /*_.FLSTEP__V8*/ meltfptr[4] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6620:/ cond");
- /*cond */ if ( /*_.FLSTEP__V8*/ meltfptr[4]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6622:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
-
- {
- /*^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-normatch.melt:6622:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
- meltcallcount;;
- MELT_LOCATION ("warmelt-normatch.melt:6622:/ apply");
- /*apply */
- {
- 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-normatch.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 6622;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "mg_altdraw_graphviz.scanflag flstep";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.FLSTEP__V8*/ meltfptr[4];
- /*_.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);
- }
- ;
- /*_.IF___V11*/ meltfptr[10] =
- /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6622:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V11*/ meltfptr[10] = NULL;;
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6622:/ quasiblock");
-
-
- /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
- /*^compute */
-
- /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6622:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
-
-#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-normatch.melt:6623:/ cppif.then");
- /*^block */
- /*anyblock */
- {
-
- /*_#IS_A__L5*/ meltfnum[0] =
- melt_is_instance_of ((melt_ptr_t)
- ( /*_.FLSTEP__V8*/ meltfptr[4]),
- (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
- meltfrout->tabval[2])));;
- MELT_LOCATION ("warmelt-normatch.melt:6623:/ cond");
- /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V15*/ meltfptr[11] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6623:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
-
-
-
- {
- /*^locexp */
- melt_assert_failed (("check flstep"),
- ("warmelt-normatch.melt")
- ? ("warmelt-normatch.melt") :
- __FILE__, (6623) ? (6623) : __LINE__,
- __FUNCTION__);
- ;
- }
- ;
- /*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
- /*epilog */
- }
- ;
- }
- ;
- /*^compute */
-
- /*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6623:/ clear");
- /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
- }
-
-#else /*MELT_HAVE_DEBUG */
- /*^cppif.else */
- /*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL);
-#endif /*MELT_HAVE_DEBUG */
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6624:/ apply");
- /*apply */
- {
- /*_.SCANSTEP__V16*/ meltfptr[11] =
- melt_apply ((meltclosure_ptr_t)
- (( /*~SCANSTEP */ meltfclos->tabval[0])),
- (melt_ptr_t) ( /*_.FLSTEP__V8*/ meltfptr[4]), (""),
- (union meltparam_un *) 0, "",
- (union meltparam_un *) 0);
- }
- ;
- MELT_LOCATION ("warmelt-normatch.melt:6621:/ quasiblock");
-
-
- /*_.PROGN___V17*/ meltfptr[16] = /*_.SCANSTEP__V16*/ meltfptr[11];;
- /*^compute */
-
- /*_.IF___V9*/ meltfptr[8] = /*_.PROGN___V17*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6620:/ clear");
- /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
- /*^clear */
- /*clear *//*_.IFCPP___V14*/ meltfptr[10] = 0;
- /*^clear */
- /*clear *//*_.SCANSTEP__V16*/ meltfptr[11] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V17*/ meltfptr[16] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V9*/ meltfptr[8] = NULL;;
- }
- ;
- /*^compute */
-
- /*_.LET___V7*/ meltfptr[3] = /*_.IF___V9*/ meltfptr[8];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6618:/ clear");
- /*clear *//*_.FLSTEP__V8*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
- /*^clear */
- /*clear *//*_.LET___V7*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_130_warmelt_normatch_LAMBDA___32__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_131_warmelt_normatch_LAMBDA___33___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 9
- void *mcfr_varptr[9];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 9; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 9;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ getarg");
- /*_.D1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.D2__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.D2__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6659:/ quasiblock");
-
-
- /*_.SN1__V5*/ meltfptr[4] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPDATA */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.D1__V2*/ meltfptr[1]));;
- /*^compute */
-
- /*_.SN2__V6*/ meltfptr[5] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPDATA */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.D2__V3*/ meltfptr[2]));;
- /*^compute */
-
- /*_#STRING___L1*/ meltfnum[0] =
- melt_string_less ((melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]),
- (melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]));;
- MELT_LOCATION ("warmelt-normatch.melt:6664:/ cond");
- /*cond */ if ( /*_#STRING___L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] =
- ( /*!konst_0 */ meltfrout->tabval[0]);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6664:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
- /*_#STRING___L2*/ meltfnum[1] =
- melt_string_less ((melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]));;
- MELT_LOCATION ("warmelt-normatch.melt:6666:/ cond");
- /*cond */ if ( /*_#STRING___L2*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[7] =
- ( /*!konst_1 */ meltfrout->tabval[1]);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6666:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6668:/ quasiblock");
-
-
- /*_.PROGN___V9*/ meltfptr[8] =
- ( /*!konst_2 */ meltfrout->tabval[2]);;
- /*^compute */
-
- /*_.IFELSE___V8*/ meltfptr[7] = /*_.PROGN___V9*/ meltfptr[8];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6666:/ clear");
- /*clear *//*_.PROGN___V9*/ meltfptr[8] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6664:/ clear");
- /*clear *//*_#STRING___L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
- }
- ;
- }
- ;
- /*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V7*/ meltfptr[6];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6659:/ clear");
- /*clear *//*_.SN1__V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.SN2__V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_#STRING___L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_131_warmelt_normatch_LAMBDA___33__ */
-
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *
- meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *
- meltxrestab_)
-{
-#if MELT_HAVE_DEBUG
- static long call_counter__;
- long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
-#undef meltcallcount
-#define meltcallcount thiscallcounter__
-#else
-#undef meltcallcount
-#define meltcallcount 0L
-#endif
-
- struct frame_meltrout_132_warmelt_normatch_LAMBDA___34___st
- {
- int mcfr_nbvar;
-#if MELT_HAVE_DEBUG
- const char *mcfr_flocs;
-#else /*!MELT_HAVE_DEBUG */
- const char *mcfr_unusedflocs;
-#endif /*MELT_HAVE_DEBUG */
- struct meltclosure_st *mcfr_clos;
- struct excepth_melt_st *mcfr_exh;
- struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 9
- void *mcfr_varptr[9];
-#define MELTFRAM_NBVARNUM 2
- long mcfr_varnum[2];
-/*others*/
- long _spare_;
- }
- *meltframptr_ = 0, meltfram__;
-#define meltframe meltfram__
- if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
- { /*mark for ggc */
- int ix = 0;
- meltframptr_ = (void *) meltfirstargp_;
- gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
- for (ix = 0; ix < 9; ix++)
- if (meltframptr_->mcfr_varptr[ix])
- gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
- return NULL;
- } /*end markggc */ ;
- memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 9;
- meltfram__.mcfr_clos = meltclosp_;
- meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
- melt_topframe = (struct melt_callframe_st *) &meltfram__;
- melt_trace_start ("LAMBDA_", meltcallcount);
-/*getargs*/
-
- /*getarg#0 */
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ getarg");
- /*_.S1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
-
- /*getarg#1 */
- /*^getarg */
- if (meltxargdescr_[0] != MELTBPAR_PTR)
- goto lab_endgetargs;
- /*_.S2__V3*/ meltfptr[2] =
- (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
- gcc_assert (melt_discr ((melt_ptr_t) ( /*_.S2__V3*/ meltfptr[2])) != NULL);
-
- ;
- goto lab_endgetargs;
-lab_endgetargs:;
-/*body*/
-/*^block*/
-/*anyblock*/
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6678:/ quasiblock");
-
-
- /*_.SN1__V5*/ meltfptr[4] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPSTEP */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.S1__V2*/ meltfptr[1]));;
- /*^compute */
-
- /*_.SN2__V6*/ meltfptr[5] =
- melt_get_mapobjects ((meltmapobjects_ptr_t)
- (( /*~MAPSTEP */ meltfclos->tabval[0])),
- (meltobject_ptr_t) ( /*_.S2__V3*/ meltfptr[2]));;
- /*^compute */
-
- /*_#STRING___L1*/ meltfnum[0] =
- melt_string_less ((melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]),
- (melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]));;
- MELT_LOCATION ("warmelt-normatch.melt:6683:/ cond");
- /*cond */ if ( /*_#STRING___L1*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V7*/ meltfptr[6] =
- ( /*!konst_0 */ meltfrout->tabval[0]);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6683:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
- /*_#STRING___L2*/ meltfnum[1] =
- melt_string_less ((melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]));;
- MELT_LOCATION ("warmelt-normatch.melt:6685:/ cond");
- /*cond */ if ( /*_#STRING___L2*/ meltfnum[1]) /*then */
- {
- /*^cond.then */
- /*_.IFELSE___V8*/ meltfptr[7] =
- ( /*!konst_1 */ meltfrout->tabval[1]);;
- }
- else
- {
- MELT_LOCATION ("warmelt-normatch.melt:6685:/ cond.else");
-
- /*^block */
- /*anyblock */
- {
-
- MELT_LOCATION ("warmelt-normatch.melt:6687:/ quasiblock");
-
-
- /*_.PROGN___V9*/ meltfptr[8] =
- ( /*!konst_2 */ meltfrout->tabval[2]);;
- /*^compute */
-
- /*_.IFELSE___V8*/ meltfptr[7] = /*_.PROGN___V9*/ meltfptr[8];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6685:/ clear");
- /*clear *//*_.PROGN___V9*/ meltfptr[8] = 0;
- }
- ;
- }
- ;
- /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-normatch.melt:6683:/ clear");
- /*clear *//*_#STRING___L2*/ meltfnum[1] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
- }
- ;
- }
- ;
- /*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V7*/ meltfptr[6];;
-
- MELT_LOCATION ("warmelt-normatch.melt:6678:/ clear");
- /*clear *//*_.SN1__V5*/ meltfptr[4] = 0;
- /*^clear */
- /*clear *//*_.SN2__V6*/ meltfptr[5] = 0;
- /*^clear */
- /*clear *//*_#STRING___L1*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ quasiblock");
-
-
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ finalreturn");
- ;
- /*finalret */ goto labend_rout;
- /*epilog */
-
- /*^clear */
- /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
- }
-
- ;
- goto labend_rout;
-labend_rout:
- melt_trace_end ("LAMBDA_", meltcallcount);
- melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
- return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
-#undef meltcallcount
-#undef meltfram__
-#undef MELTFRAM_NBVARNUM
-#undef MELTFRAM_NBVARPTR
-} /*end meltrout_132_warmelt_normatch_LAMBDA___34__ */
+} /*end meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH */
diff --git a/gcc/melt/generated/warmelt-normatch+05.c b/gcc/melt/generated/warmelt-normatch+05.c
new file mode 100644
index 00000000000..a27f68985b7
--- /dev/null
+++ b/gcc/melt/generated/warmelt-normatch+05.c
@@ -0,0 +1,7902 @@
+/* GCC MELT GENERATED FILE warmelt-normatch+05.c - DO NOT EDIT */
+/* secondary MELT generated C file of rank #5 */
+#include "melt-run.h"
+
+
+/* used hash from melt-run.h when compiling this file: */
+const char used_meltrun_md5_melt_f5[] =
+ MELT_RUN_HASHMD5 /* from melt-run.h */ ;
+
+
+/**** warmelt-normatch+05.c declarations ****/
+#define MELT_HAS_INITIAL_ENVIRONMENT 1
+
+struct melt_callframe_st; /*defined in melt-runtime.h */
+
+
+/**!!** ***
+ Copyright 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc.
+ Contributed by Basile Starynkevitch <basile@starynkevitch.net>
+
+ This file is part of GCC.
+
+ GCC is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 3, or (at your option)
+ any later version.
+
+ GCC is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with GCC; see the file COPYING3. If not see
+ <http://www.gnu.org/licenses/>.
+*****!!**/
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_1_warmelt_normatch_SCANPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_5_warmelt_normatch_SCANPAT_SRCPATCONSTANT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_6_warmelt_normatch_SCANPAT_SRCPATCONSTRUCT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_7_warmelt_normatch_SCANPAT_SRCPATOBJECT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_8_warmelt_normatch_SCANPAT_SRCPATCOMPOSITE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_9_warmelt_normatch_SCANPAT_SRCPATOR (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_10_warmelt_normatch_LAMBDA___1__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_11_warmelt_normatch_SCANPAT_SRCPATAND (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_12_warmelt_normatch_REGISTER_NEW_NORMTESTER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_13_warmelt_normatch_PUT_TESTER_THEN (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_14_warmelt_normatch_SET_NEW_TESTER_LAST_THEN (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_15_warmelt_normatch_SET_NEW_TESTER_ALL_ELSES (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_16_warmelt_normatch_NORMPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_17_warmelt_normatch_NORMPAT_ANYPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_18_warmelt_normatch_NORMVARPAT_GENREUSETEST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_19_warmelt_normatch_LAMBDA___2__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_20_warmelt_normatch_NORMPAT_VARIABLEPAT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_21_warmelt_normatch_NORMPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_22_warmelt_normatch_NORMPAT_INSTANCEPAT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_23_warmelt_normatch_LAMBDA___3__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_24_warmelt_normatch_LAMBDA___4__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_25_warmelt_normatch_LAMBDA___5__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_26_warmelt_normatch_NORMPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_27_warmelt_normatch_LAMBDA___6__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_28_warmelt_normatch_LAMBDA___7__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_29_warmelt_normatch_LAMBDA___8__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_30_warmelt_normatch_NORMPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_31_warmelt_normatch_LAMBDA___9__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_32_warmelt_normatch_NORMPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_33_warmelt_normatch_LAMBDA___10__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_34_warmelt_normatch_LAMBDA___11__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_35_warmelt_normatch_LAMBDA___12__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_36_warmelt_normatch_NORMPAT_ANYMATCHPAT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_37_warmelt_normatch_LAMBDA___13__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_38_warmelt_normatch_LAMBDA___14__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_39_warmelt_normatch_LAMBDA___15__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_40_warmelt_normatch_LAMBDA___16__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_41_warmelt_normatch_NORMPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_42_warmelt_normatch_LAMBDA___17__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_43_warmelt_normatch_MATCH_GRAPHIC_OPTSET (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
+union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
+union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
+union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
+union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
+union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
+union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
+union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
+union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+void *start_module_melt (void *);
+
+/* define different names when debugging or not */
+#if MELT_HAVE_DEBUG
+extern const char meltmodule_warmelt_normatch__melt_have_debug_enabled[];
+#define melt_have_debug_string meltmodule_warmelt_normatch__melt_have_debug_enabled
+#else /*!MELT_HAVE_DEBUG */
+extern const char meltmodule_warmelt_normatch__melt_have_debug_disabled[];
+#define melt_have_debug_string meltmodule_warmelt_normatch__melt_have_debug_disabled
+#endif /*!MELT_HAVE_DEBUG */
+
+
+struct frame_start_module_melt_st;
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_0 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_1 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_2 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_3 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_4 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_5 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_6 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_7 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_8 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_9 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_10 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_11 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_12 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_13 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_14 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_15 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_16 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_17 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_18 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_19 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_20 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_21 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_22 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_23 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_24 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_25 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_26 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_27 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_28 (struct
+ frame_start_module_melt_st
+ *, char *);
+void MELT_MODULE_VISIBILITY warmelt_normatch_initialmeltchunk_29 (struct
+ frame_start_module_melt_st
+ *, char *);
+static void forward_or_mark_module_start_frame_warmelt_normatch (struct
+ melt_callframe_st
+ *fp,
+ int marking);
+
+
+/**** warmelt-normatch+05.c implementations ****/
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_133_warmelt_normatch_LAMBDA___29___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 12
+ void *mcfr_varptr[12];
+#define MELTFRAM_NBVARNUM 5
+ long mcfr_varnum[5];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 12; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 12;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ getarg");
+ /*_.NF1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.NF2__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6619:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L1*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NF1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6619:/ cond");
+ /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6619:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nf1"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6619) ? (6619) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6619:/ clear");
+ /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6620:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L2*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */
+ meltfrout->tabval[0])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6620:/ cond");
+ /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6620:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check nf2"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6620) ? (6620) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6620:/ clear");
+ /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6622:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NF1__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[0])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NF1__V2*/ meltfptr[1]), 1, "NRPFLA_FLAG");
+ /*_.NRPFLA_FLAG__V8*/
+ meltfptr[6] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NRPFLA_FLAG__V8*/ meltfptr[6] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6622:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRPFLA_FLAG__V8*/ meltfptr[6]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRPFLA_FLAG__V8*/ meltfptr[6]), 3, "MFLAG_RANK");
+ /*_.MFLAG_RANK__V9*/
+ meltfptr[8] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MFLAG_RANK__V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#GET_INT__L3*/ meltfnum[0] =
+ (melt_get_int ((melt_ptr_t) ( /*_.MFLAG_RANK__V9*/ meltfptr[8])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6623:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NF2__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[0])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NF2__V3*/ meltfptr[2]), 1, "NRPFLA_FLAG");
+ /*_.NRPFLA_FLAG__V10*/
+ meltfptr[9] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NRPFLA_FLAG__V10*/ meltfptr[9] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6623:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.NRPFLA_FLAG__V10*/ meltfptr[9]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[2])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.NRPFLA_FLAG__V10*/ meltfptr[9]), 3, "MFLAG_RANK");
+ /*_.MFLAG_RANK__V11*/
+ meltfptr[10] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.MFLAG_RANK__V11*/ meltfptr[10] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#GET_INT__L4*/ meltfnum[3] =
+ (melt_get_int ((melt_ptr_t) ( /*_.MFLAG_RANK__V11*/ meltfptr[10])));;
+ /*^compute */
+
+ /*_#I__L5*/ meltfnum[4] =
+ (( /*_#GET_INT__L3*/ meltfnum[0]) - ( /*_#GET_INT__L4*/ meltfnum[3]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6621:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] =
+ ( /*!konst_1_TRUE */ meltfrout->tabval[1]);;
+ MELT_LOCATION ("warmelt-normatch.melt:6621:/ putxtraresult");
+ if (!meltxrestab_ || !meltxresdescr_)
+ goto labend_rout;
+ if (meltxresdescr_[0] != MELTBPAR_LONG)
+ goto labend_rout;
+ if (meltxrestab_[0].meltbp_longptr)
+ *(meltxrestab_[0].meltbp_longptr) = ( /*_#I__L5*/ meltfnum[4]);
+ ;
+ /*^finalreturn */
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V12*/ meltfptr[11];;
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.NRPFLA_FLAG__V8*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.MFLAG_RANK__V9*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L3*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.NRPFLA_FLAG__V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.MFLAG_RANK__V11*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0;
+ /*^clear */
+ /*clear *//*_#I__L5*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V12*/ meltfptr[11] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_133_warmelt_normatch_LAMBDA___29__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 7
+ void *mcfr_varptr[7];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ const char *loc_CSTRING__o0;
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 7; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 7;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("ALTERNATE_MATCH_OPTSET", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ getarg");
+ /*_.OPTSYMB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_CSTRING)
+ goto lab_endgetargs;
+ /*_?*/ meltfram__.loc_CSTRING__o0 = meltxargtab_[0].meltbp_cstring;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6646:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:6646:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6646:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6646;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "alternate_match_optset optsymb";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OPTSYMB__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6646:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6646:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6646:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6647:/ locexp");
+ inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s", melt_dbgcounter,
+ ("enabling alternate matching implementation"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6648:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!NORMAL_EXP */ meltfrout->tabval[3]);
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & ( /*!NORMEXP_ALTMATCH */ meltfrout->tabval[4]);
+ /*_.INSTALL_METHOD__V7*/ meltfptr[3] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!INSTALL_METHOD */ meltfrout->tabval[1])),
+ (melt_ptr_t) (( /*!CLASS_SOURCE_MATCH */ meltfrout->
+ tabval[2])),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.INSTALL_METHOD__V7*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V7*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("ALTERNATE_MATCH_OPTSET", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ_st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 86
+ void *mcfr_varptr[86];
+#define MELTFRAM_NBVARNUM 37
+ long mcfr_varnum[37];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 86; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 86;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("MG_ALTDRAW_GRAPHVIZ", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ getarg");
+ /*_.MDATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.DOTPREFIX__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.DOTPREFIX__V3*/ meltfptr[2])) !=
+ NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6661:/ quasiblock");
+
+
+ /*_.MAPDATA__V4*/ meltfptr[3] =
+ (meltgc_new_mapobjects
+ ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])),
+ (43)));;
+ /*^compute */
+
+ /*_.MAPSTEP__V5*/ meltfptr[4] =
+ (meltgc_new_mapobjects
+ ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])),
+ (43)));;
+ /*^compute */
+
+ /*_.NODEBUF__V6*/ meltfptr[5] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
+ (char *) 0);;
+ /*^compute */
+
+ /*_.EDGEBUF__V7*/ meltfptr[6] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
+ (char *) 0);;
+ /*^compute */
+
+ /*_.DATACOUNTBOX__V8*/ meltfptr[7] =
+ (meltgc_new_int
+ ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])),
+ (0)));;
+ /*^compute */
+
+ /*_#CNT__L1*/ meltfnum[0] = 0;;
+ /*^compute */
+
+ /*_#MDATAHASH__L2*/ meltfnum[1] =
+ (melt_obj_hash ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1])));;
+ /*^compute */
+
+ /*_.PATHSBUF__V9*/ meltfptr[8] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[1])),
+ (char *) 0);;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6673:/ locexp");
+ /* mg_draw_match_graphviz_file UNIQCNT__2 */
+ static long uniqcounter;
+ uniqcounter++;
+ /*_#CNT__L1*/ meltfnum[0] = uniqcounter;
+ ;
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6678:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_STRBUF__L3*/ meltfnum[2] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8])) ==
+ MELTOBMAG_STRBUF);;
+ MELT_LOCATION ("warmelt-normatch.melt:6678:/ cond");
+ /*cond */ if ( /*_#IS_STRBUF__L3*/ meltfnum[2]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6678:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check pathsbuf"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6678) ? (6678) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6678:/ clear");
+ /*clear *//*_#IS_STRBUF__L3*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6679:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.DOTPREFIX__V3*/
+ meltfptr[2])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6680:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
+ ("+"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6681:/ locexp");
+ meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
+ ( /*_#CNT__L1*/ meltfnum[0]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6682:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]),
+ (".dot"));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6683:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[2] =
+ /*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-normatch.melt:6683:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[2]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6683:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6683;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_draw_match_graphviz_file pathsbuf";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.PATHSBUF__V9*/ meltfptr[8];
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V13*/ meltfptr[12] =
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6683:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6683:/ quasiblock");
+
+
+ /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[10] = /*_.PROGN___V15*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6683:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[10] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.STRBUF2STRING__V16*/ meltfptr[12] =
+ (meltgc_new_stringdup
+ ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])),
+ melt_strbuf_str ((melt_ptr_t) ( /*_.PATHSBUF__V9*/ meltfptr[8]))));;
+ MELT_LOCATION ("warmelt-normatch.melt:6670:/ quasiblock");
+
+
+ /*_.DOTFILENAME__V17*/ meltfptr[13] =
+ /*_.STRBUF2STRING__V16*/ meltfptr[12];;
+ MELT_LOCATION ("warmelt-normatch.melt:6685:/ quasiblock");
+
+
+ /*^rawallocobj */
+ /*rawallocobj */
+ {
+ melt_ptr_t newobj = 0;
+ melt_raw_object_create (newobj,
+ (melt_ptr_t) (( /*!CLASS_MATCH_GRAPHIC */
+ meltfrout->tabval[5])), (6),
+ "CLASS_MATCH_GRAPHIC");
+ /*_.INST__V19*/ meltfptr[18] =
+ newobj;
+ };
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCHGX_FILENAME",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V19*/ meltfptr[18])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (1),
+ ( /*_.DOTFILENAME__V17*/ meltfptr[13]),
+ "MCHGX_FILENAME");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCHGX_NODOUT",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V19*/ meltfptr[18])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (2),
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), "MCHGX_NODOUT");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCHGX_EDGOUT",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V19*/ meltfptr[18])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (3),
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]), "MCHGX_EDGOUT");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCHGX_DATANAMEMAP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V19*/ meltfptr[18])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (4),
+ ( /*_.MAPDATA__V4*/ meltfptr[3]),
+ "MCHGX_DATANAMEMAP");
+ ;
+ /*^putslot */
+ /*putslot */
+ melt_assertmsg ("putslot checkobj @MCHGX_STEPNAMEMAP",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.INST__V19*/ meltfptr[18])) ==
+ MELTOBMAG_OBJECT);
+ melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (5),
+ ( /*_.MAPSTEP__V5*/ meltfptr[4]),
+ "MCHGX_STEPNAMEMAP");
+ ;
+ /*_.MG__V18*/ meltfptr[17] = /*_.INST__V19*/ meltfptr[18];;
+ MELT_LOCATION ("warmelt-normatch.melt:6696:/ blockmultialloc");
+ /*multiallocblock */
+ {
+ struct meltletrec_1_st
+ {
+ struct MELT_CLOSURE_STRUCT (3) rclo_0__SCANDATA;
+ struct MELT_CLOSURE_STRUCT (4) rclo_1__SCANSTEP;
+ struct MELT_CLOSURE_STRUCT (1) rclo_2__SCANFLAG;
+ long meltletrec_1_endgap;
+ } *meltletrec_1_ptr = 0;
+ meltletrec_1_ptr =
+ (struct meltletrec_1_st *)
+ meltgc_allocate (sizeof (struct meltletrec_1_st), 0);
+ /*^blockmultialloc.initfill */
+ /*iniclos rclo_0__SCANDATA */
+ /*_.SCANDATA__V21*/ meltfptr[20] =
+ (void *) &meltletrec_1_ptr->rclo_0__SCANDATA;
+ meltletrec_1_ptr->rclo_0__SCANDATA.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ meltletrec_1_ptr->rclo_0__SCANDATA.nbval = 3;
+ meltletrec_1_ptr->rclo_0__SCANDATA.rout =
+ (meltroutine_ptr_t) (( /*!konst_13 */ meltfrout->tabval[13]));
+
+ /*iniclos rclo_1__SCANSTEP */
+ /*_.SCANSTEP__V22*/ meltfptr[21] =
+ (void *) &meltletrec_1_ptr->rclo_1__SCANSTEP;
+ meltletrec_1_ptr->rclo_1__SCANSTEP.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ meltletrec_1_ptr->rclo_1__SCANSTEP.nbval = 4;
+ meltletrec_1_ptr->rclo_1__SCANSTEP.rout =
+ (meltroutine_ptr_t) (( /*!konst_25 */ meltfrout->tabval[25]));
+
+ /*iniclos rclo_2__SCANFLAG */
+ /*_.SCANFLAG__V23*/ meltfptr[22] =
+ (void *) &meltletrec_1_ptr->rclo_2__SCANFLAG;
+ meltletrec_1_ptr->rclo_2__SCANFLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ meltletrec_1_ptr->rclo_2__SCANFLAG.nbval = 1;
+ meltletrec_1_ptr->rclo_2__SCANFLAG.rout =
+ (meltroutine_ptr_t) (( /*!konst_29 */ meltfrout->tabval[29]));
+
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ putclosurout");
+ /*putclosurout#3 */
+ melt_assertmsg ("putclosrout#3 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/ meltfptr[20]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#3 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ (( /*!konst_13 */ meltfrout->
+ tabval[13]))) == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->rout =
+ (meltroutine_ptr_t) (( /*!konst_13 */ meltfrout->tabval[13]));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/ meltfptr[20]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/
+ meltfptr[20])));
+ ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[0] =
+ (melt_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/ meltfptr[20]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 1 >= 0
+ && 1 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/
+ meltfptr[20])));
+ ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[1] =
+ (melt_ptr_t) ( /*_.DATACOUNTBOX__V8*/ meltfptr[7]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/ meltfptr[20]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 2 >= 0
+ && 2 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANDATA__V21*/
+ meltfptr[20])));
+ ((meltclosure_ptr_t) /*_.SCANDATA__V21*/ meltfptr[20])->tabval[2] =
+ (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.SCANDATA__V21*/ meltfptr[20]);
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ putclosurout");
+ /*putclosurout#4 */
+ melt_assertmsg ("putclosrout#4 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/ meltfptr[21]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#4 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ (( /*!konst_25 */ meltfrout->
+ tabval[25]))) == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->rout =
+ (meltroutine_ptr_t) (( /*!konst_25 */ meltfrout->tabval[25]));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/ meltfptr[21]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/
+ meltfptr[21])));
+ ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[0] =
+ (melt_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/ meltfptr[21]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 1 >= 0
+ && 1 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/
+ meltfptr[21])));
+ ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[1] =
+ (melt_ptr_t) ( /*_.SCANDATA__V21*/ meltfptr[20]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/ meltfptr[21]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 2 >= 0
+ && 2 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/
+ meltfptr[21])));
+ ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[2] =
+ (melt_ptr_t) ( /*_.SCANFLAG__V23*/ meltfptr[22]);
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/ meltfptr[21]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 3 >= 0
+ && 3 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANSTEP__V22*/
+ meltfptr[21])));
+ ((meltclosure_ptr_t) /*_.SCANSTEP__V22*/ meltfptr[21])->tabval[3] =
+ (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.SCANSTEP__V22*/ meltfptr[21]);
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ putclosurout");
+ /*putclosurout#5 */
+ melt_assertmsg ("putclosrout#5 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANFLAG__V23*/ meltfptr[22]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#5 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ (( /*!konst_29 */ meltfrout->
+ tabval[29]))) == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.SCANFLAG__V23*/ meltfptr[22])->rout =
+ (meltroutine_ptr_t) (( /*!konst_29 */ meltfrout->tabval[29]));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.SCANFLAG__V23*/ meltfptr[22]))
+ == MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.SCANFLAG__V23*/
+ meltfptr[22])));
+ ((meltclosure_ptr_t) /*_.SCANFLAG__V23*/ meltfptr[22])->tabval[0] =
+ (melt_ptr_t) ( /*_.SCANSTEP__V22*/ meltfptr[21]);
+ ;
+ /*^touch */
+ meltgc_touch ( /*_.SCANFLAG__V23*/ meltfptr[22]);
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6779:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L6*/ meltfnum[4] =
+ /*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-normatch.melt:6779:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[4]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6779:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6779;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz before scandata mdata=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " scandata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SCANDATA__V21*/ meltfptr[20];
+ /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V25*/ meltfptr[24] =
+ /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6779:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V25*/ meltfptr[24] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6779:/ quasiblock");
+
+
+ /*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];;
+ /*^compute */
+
+ /*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6779:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V27*/ meltfptr[25] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6780:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L8*/ meltfnum[2] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[30])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6780:/ cond");
+ /*cond */ if ( /*_#IS_A__L8*/ meltfnum[2]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V29*/ meltfptr[25] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6780:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check mdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6780) ? (6780) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V28*/ meltfptr[24] = /*_.IFELSE___V29*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6780:/ clear");
+ /*clear *//*_#IS_A__L8*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V28*/ meltfptr[24] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6781:/ apply");
+ /*apply */
+ {
+ /*_.SCANDATA__V30*/ meltfptr[25] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.SCANDATA__V21*/ meltfptr[20]),
+ (melt_ptr_t) ( /*_.MDATA__V2*/ meltfptr[1]), (""),
+ (union meltparam_un *) 0, "", (union meltparam_un *) 0);
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6782:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L9*/ meltfnum[4] =
+ /*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-normatch.melt:6782:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[4]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[2] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6782:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[9];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L10*/ meltfnum[2];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6782;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz after scandata mdata=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MDATA__V2*/ meltfptr[1];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " mapdata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MAPDATA__V4*/ meltfptr[3];
+ /*^apply.arg */
+ argtab[7].meltbp_cstring = " mapstep=";
+ /*^apply.arg */
+ argtab[8].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MAPSTEP__V5*/ meltfptr[4];
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[31] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6782:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6782:/ quasiblock");
+
+
+ /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
+ /*^compute */
+
+ /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6782:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V34*/ meltfptr[32] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*^compute */
+
+ /*_.LETREC___V20*/ meltfptr[19] = /*_.IFCPP___V31*/ meltfptr[30];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6696:/ clear");
+ /*clear *//*_.SCANDATA__V21*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.SCANSTEP__V22*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.SCANFLAG__V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.SCANDATA__V21*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.SCANSTEP__V22*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_.SCANFLAG__V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.SCANDATA__V30*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V31*/ meltfptr[30] = 0;
+ } /*end multiallocblock */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6785:/ quasiblock");
+
+
+ /*_#DATACOUNT__L11*/ meltfnum[2] = 0;;
+ /*^compute */
+
+ /*_#STEPCOUNT__L12*/ meltfnum[4] = 0;;
+ /*^compute */
+
+ /*_#MAPOBJECT_COUNT__L13*/ meltfnum[12] =
+ (melt_count_mapobjects
+ ((meltmapobjects_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3])));;
+ /*^compute */
+
+ /*_.TUPDATA__V35*/ meltfptr[31] =
+ (meltgc_new_multiple
+ ((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[31])),
+ ( /*_#MAPOBJECT_COUNT__L13*/ meltfnum[12])));;
+ /*^compute */
+
+ /*_#MAPOBJECT_COUNT__L14*/ meltfnum[13] =
+ (melt_count_mapobjects
+ ((meltmapobjects_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4])));;
+ /*^compute */
+
+ /*_.TUPSTEP__V36*/ meltfptr[32] =
+ (meltgc_new_multiple
+ ((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[31])),
+ ( /*_#MAPOBJECT_COUNT__L14*/ meltfnum[13])));;
+ /*citerblock FOREACH_IN_MAPOBJECT */
+ {
+ /*cit1__EACHOBMAP : */ int cit1__EACHOBMAP_ix = 0, cit1__EACHOBMAP_siz =
+ 0;
+ for (cit1__EACHOBMAP_ix = 0;
+ /* we retrieve in cit1__EACHOBMAP_siz the size at each iteration since it could change. */
+ cit1__EACHOBMAP_ix >= 0
+ && (cit1__EACHOBMAP_siz =
+ melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/
+ meltfptr[3])) > 0
+ && cit1__EACHOBMAP_ix < cit1__EACHOBMAP_siz; cit1__EACHOBMAP_ix++)
+ {
+ /*_.CURDATA__V37*/ meltfptr[20] = NULL;
+ /*_.DATANAME__V38*/ meltfptr[21] = NULL;
+ /*_.CURDATA__V37*/ meltfptr[20] =
+ ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/ meltfptr[3])->
+ entab[cit1__EACHOBMAP_ix].e_at;
+ if ( /*_.CURDATA__V37*/ meltfptr[20] == HTAB_DELETED_ENTRY)
+ { /*_.CURDATA__V37*/
+ meltfptr[20] = NULL;
+ continue;
+ };
+ if (! /*_.CURDATA__V37*/ meltfptr[20])
+ continue;
+ /*_.DATANAME__V38*/ meltfptr[21] =
+ ((meltmapobjects_ptr_t) /*_.MAPDATA__V4*/ meltfptr[3])->
+ entab[cit1__EACHOBMAP_ix].e_va;
+ if (! /*_.DATANAME__V38*/ meltfptr[21])
+ continue;
+
+
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6794:/ locexp");
+ meltgc_multiple_put_nth ((melt_ptr_t)
+ ( /*_.TUPDATA__V35*/ meltfptr[31]),
+ ( /*_#DATACOUNT__L11*/ meltfnum[2]),
+ (melt_ptr_t) ( /*_.CURDATA__V37*/
+ meltfptr[20]));
+ }
+ ;
+ /*_#I__L15*/ meltfnum[14] =
+ ((1) + ( /*_#DATACOUNT__L11*/ meltfnum[2]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6795:/ compute");
+ /*_#DATACOUNT__L11*/ meltfnum[2] = /*_#SETQ___L16*/ meltfnum[15] =
+ /*_#I__L15*/ meltfnum[14];;
+ /* end cit1__EACHOBMAP */
+ /*_.CURDATA__V37*/ meltfptr[20] = NULL;
+ /*_.DATANAME__V38*/ meltfptr[21] = NULL;
+ }
+
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6791:/ clear");
+ /*clear *//*_.CURDATA__V37*/ meltfptr[20] = 0;
+ /*^clear */
+ /*clear *//*_.DATANAME__V38*/ meltfptr[21] = 0;
+ /*^clear */
+ /*clear *//*_#I__L15*/ meltfnum[14] = 0;
+ /*^clear */
+ /*clear *//*_#SETQ___L16*/ meltfnum[15] = 0;
+ } /*endciterblock FOREACH_IN_MAPOBJECT */
+ ;
+ /*citerblock FOREACH_IN_MAPOBJECT */
+ {
+ /*cit2__EACHOBMAP : */ int cit2__EACHOBMAP_ix = 0, cit2__EACHOBMAP_siz =
+ 0;
+ for (cit2__EACHOBMAP_ix = 0;
+ /* we retrieve in cit2__EACHOBMAP_siz the size at each iteration since it could change. */
+ cit2__EACHOBMAP_ix >= 0
+ && (cit2__EACHOBMAP_siz =
+ melt_size_mapobjects ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/
+ meltfptr[4])) > 0
+ && cit2__EACHOBMAP_ix < cit2__EACHOBMAP_siz; cit2__EACHOBMAP_ix++)
+ {
+ /*_.CURSTEP__V39*/ meltfptr[22] = NULL;
+ /*_.STEPNAME__V40*/ meltfptr[23] = NULL;
+ /*_.CURSTEP__V39*/ meltfptr[22] =
+ ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/ meltfptr[4])->
+ entab[cit2__EACHOBMAP_ix].e_at;
+ if ( /*_.CURSTEP__V39*/ meltfptr[22] == HTAB_DELETED_ENTRY)
+ { /*_.CURSTEP__V39*/
+ meltfptr[22] = NULL;
+ continue;
+ };
+ if (! /*_.CURSTEP__V39*/ meltfptr[22])
+ continue;
+ /*_.STEPNAME__V40*/ meltfptr[23] =
+ ((meltmapobjects_ptr_t) /*_.MAPSTEP__V5*/ meltfptr[4])->
+ entab[cit2__EACHOBMAP_ix].e_va;
+ if (! /*_.STEPNAME__V40*/ meltfptr[23])
+ continue;
+
+
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6800:/ locexp");
+ meltgc_multiple_put_nth ((melt_ptr_t)
+ ( /*_.TUPSTEP__V36*/ meltfptr[32]),
+ ( /*_#STEPCOUNT__L12*/ meltfnum[4]),
+ (melt_ptr_t) ( /*_.CURSTEP__V39*/
+ meltfptr[22]));
+ }
+ ;
+ /*_#I__L17*/ meltfnum[16] =
+ ((1) + ( /*_#STEPCOUNT__L12*/ meltfnum[4]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6801:/ compute");
+ /*_#STEPCOUNT__L12*/ meltfnum[4] = /*_#SETQ___L18*/ meltfnum[17] =
+ /*_#I__L17*/ meltfnum[16];;
+ /* end cit2__EACHOBMAP */
+ /*_.CURSTEP__V39*/ meltfptr[22] = NULL;
+ /*_.STEPNAME__V40*/ meltfptr[23] = NULL;
+ }
+
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6797:/ clear");
+ /*clear *//*_.CURSTEP__V39*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.STEPNAME__V40*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_#I__L17*/ meltfnum[16] = 0;
+ /*^clear */
+ /*clear *//*_#SETQ___L18*/ meltfnum[17] = 0;
+ } /*endciterblock FOREACH_IN_MAPOBJECT */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6803:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ quasiblock");
+
+
+ /*^newclosure */
+ /*newclosure *//*_.LAMBDA___V42*/ meltfptr[25] =
+ meltgc_new_closure ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
+ (meltroutine_ptr_t) (( /*!konst_32 */ meltfrout->
+ tabval[32])), (1));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LAMBDA___V42*/ meltfptr[25])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.LAMBDA___V42*/ meltfptr[25])));
+ ((meltclosure_ptr_t) /*_.LAMBDA___V42*/ meltfptr[25])->tabval[0] =
+ (melt_ptr_t) ( /*_.MAPDATA__V4*/ meltfptr[3]);
+ ;
+ /*_.LAMBDA___V41*/ meltfptr[24] = /*_.LAMBDA___V42*/ meltfptr[25];;
+ /*^compute */
+
+ /*_.SORTUPDATA__V43*/ meltfptr[30] =
+ meltgc_sort_multiple ((melt_ptr_t) ( /*_.TUPDATA__V35*/ meltfptr[31]),
+ (melt_ptr_t) ( /*_.LAMBDA___V41*/ meltfptr[24]),
+ (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
+ tabval[31])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ quasiblock");
+
+
+ /*^newclosure */
+ /*newclosure *//*_.LAMBDA___V45*/ meltfptr[44] =
+ meltgc_new_closure ((meltobject_ptr_t)
+ (((void *) (MELT_PREDEF (DISCR_CLOSURE)))),
+ (meltroutine_ptr_t) (( /*!konst_33 */ meltfrout->
+ tabval[33])), (1));
+ ;
+ /*^putclosedv */
+ /*putclosv */
+ melt_assertmsg ("putclosv checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.LAMBDA___V45*/ meltfptr[44])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosv checkoff", 0 >= 0
+ && 0 <
+ melt_closure_size ((melt_ptr_t)
+ ( /*_.LAMBDA___V45*/ meltfptr[44])));
+ ((meltclosure_ptr_t) /*_.LAMBDA___V45*/ meltfptr[44])->tabval[0] =
+ (melt_ptr_t) ( /*_.MAPSTEP__V5*/ meltfptr[4]);
+ ;
+ /*_.LAMBDA___V44*/ meltfptr[43] = /*_.LAMBDA___V45*/ meltfptr[44];;
+ /*^compute */
+
+ /*_.SORTUPSTEP__V46*/ meltfptr[45] =
+ meltgc_sort_multiple ((melt_ptr_t) ( /*_.TUPSTEP__V36*/ meltfptr[32]),
+ (melt_ptr_t) ( /*_.LAMBDA___V44*/ meltfptr[43]),
+ (melt_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->
+ tabval[31])));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6844:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L19*/ meltfnum[18] =
+ /*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-normatch.melt:6844:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[18]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[19] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6844:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[19];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6844;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz sortupdata";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SORTUPDATA__V43*/ meltfptr[30];
+ /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V48*/ meltfptr[47] =
+ /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6844:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[19] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V48*/ meltfptr[47] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6844:/ quasiblock");
+
+
+ /*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];;
+ /*^compute */
+
+ /*_.IFCPP___V47*/ meltfptr[46] = /*_.PROGN___V50*/ meltfptr[48];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6844:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V48*/ meltfptr[47] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V50*/ meltfptr[48] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V47*/ meltfptr[46] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit3__EACHTUP: */
+ long cit3__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.SORTUPDATA__V43*/
+ meltfptr[30]);
+ for ( /*_#DIX__L21*/ meltfnum[19] = 0;
+ ( /*_#DIX__L21*/ meltfnum[19] >= 0)
+ && ( /*_#DIX__L21*/ meltfnum[19] < cit3__EACHTUP_ln);
+ /*_#DIX__L21*/ meltfnum[19]++)
+ {
+ /*_.CURDATA__V51*/ meltfptr[47] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.SORTUPDATA__V43*/ meltfptr[30]),
+ /*_#DIX__L21*/ meltfnum[19]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6848:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L22*/ meltfnum[18] =
+ /*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-normatch.melt:6848:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[18]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L23*/ meltfnum[22] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6848:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L23*/ meltfnum[22];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6848;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz curdata";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURDATA__V51*/ meltfptr[47];
+ /*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V53*/ meltfptr[52] =
+ /*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6848:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[22] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V53*/ meltfptr[52] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6848:/ quasiblock");
+
+
+ /*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];;
+ /*^compute */
+
+ /*_.IFCPP___V52*/ meltfptr[48] = /*_.PROGN___V55*/ meltfptr[53];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6848:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V53*/ meltfptr[52] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V55*/ meltfptr[53] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V52*/ meltfptr[48] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6849:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L24*/ meltfnum[22] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURDATA__V51*/ meltfptr[47]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[30])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6849:/ cond");
+ /*cond */ if ( /*_#IS_A__L24*/ meltfnum[22]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V57*/ meltfptr[53] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6849:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("mg_altdraw_graphviz check curdata"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (6849) ? (6849) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V57*/ meltfptr[53] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V56*/ meltfptr[52] = /*_.IFELSE___V57*/ meltfptr[53];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6849:/ clear");
+ /*clear *//*_#IS_A__L24*/ meltfnum[22] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V57*/ meltfptr[53] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V56*/ meltfptr[52] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6850:/ quasiblock");
+
+
+ /*_.CURDATANAME__V58*/ meltfptr[53] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.MAPDATA__V4*/ meltfptr[3]),
+ (meltobject_ptr_t) ( /*_.CURDATA__V51*/
+ meltfptr[47]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6852:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V51*/ meltfptr[47]), 2, "MDATA_CTYPE");
+ /*_.DATACTYPE__V59*/
+ meltfptr[58] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6853:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V51*/ meltfptr[47]), 1, "MDATA_SYMB");
+ /*_.DATASYMB__V60*/
+ meltfptr[59] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6854:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDATA__V51*/ meltfptr[47]), 4, "MDATA_STEPS");
+ /*_.DATASTEPS__V61*/
+ meltfptr[60] = slot;
+ };
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6856:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6857:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.CURDATANAME__V58*/
+ meltfptr[53])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6858:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" [ margin=0, "));
+ }
+ ;
+ /*_#__L25*/ meltfnum[18] =
+ (( /*_.CURDATA__V51*/ meltfptr[47]) ==
+ ( /*_.MDATA__V2*/ meltfptr[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6859:/ cond");
+ /*cond */ if ( /*_#__L25*/ meltfnum[18]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6860:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" style=\"bold,dashed,filled,rounded\", fillcolor=\"lightyellow\", "));
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6859:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6861:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" style=\"dashed,rounded\", "));
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6862:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("label=<<table border=\"0\" cellborder=\"0\""));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6863:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" cellspacing=\"1\" cellpadding=\"1\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6864:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6865:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("<tr><td><font color=\"green\" face=\"Times-Roman Bold\" point-size=\"7\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6866:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.CURDATANAME__V58*/
+ meltfptr[53])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6867:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> <td><font face=\"Courier\" point-size=\"6.5\">#"));
+ }
+ ;
+ /*_#OBJ_HASH__L26*/ meltfnum[22] =
+ (melt_obj_hash
+ ((melt_ptr_t) ( /*_.CURDATA__V51*/ meltfptr[47])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6868:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ( /*_#OBJ_HASH__L26*/ meltfnum[22]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6869:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6870:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6871:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("<tr><td><font color=\"darkgreen\" face=\"Times-Roman Italic\" point-size=\"7\">"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6872:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DATASYMB__V60*/
+ meltfptr[59]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[34])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATASYMB__V60*/ meltfptr[59]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V62*/
+ meltfptr[61] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V62*/ meltfptr[61] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6872:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V62*/
+ meltfptr[61])));
+ }
+ ;
+ /*_#IS_A__L27*/ meltfnum[26] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DATASYMB__V60*/ meltfptr[59]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
+ meltfrout->tabval[35])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6873:/ cond");
+ /*cond */ if ( /*_#IS_A__L27*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6874:/ quasiblock");
+
+
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATASYMB__V60*/ meltfptr[59]), 3, "CSYM_URANK");
+ /*_.CSYM_URANK__V65*/
+ meltfptr[64] = slot;
+ };
+ ;
+ /*_#CLONUM__L28*/ meltfnum[27] =
+ (melt_get_int
+ ((melt_ptr_t) ( /*_.CSYM_URANK__V65*/ meltfptr[64])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6876:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring = "<font point-size=\"6\">";
+ /*^apply.arg */
+ argtab[1].meltbp_long = /*_#CLONUM__L28*/ meltfnum[27];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "</font>";
+ /*_.ADD2OUT__V66*/ meltfptr[65] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ADD2OUT */ meltfrout->tabval[36])),
+ (melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_LONG
+ MELTBPARSTR_CSTRING ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.LET___V64*/ meltfptr[63] =
+ /*_.ADD2OUT__V66*/ meltfptr[65];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6874:/ clear");
+ /*clear *//*_.CSYM_URANK__V65*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_#CLONUM__L28*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V66*/ meltfptr[65] = 0;
+ /*_.IF___V63*/ meltfptr[62] = /*_.LET___V64*/ meltfptr[63];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6873:/ clear");
+ /*clear *//*_.LET___V64*/ meltfptr[63] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V63*/ meltfptr[62] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6878:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> <td><font color=\"brown\" face=\"Helvetica Oblique\" point-size=\"6\">"));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6879:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DATACTYPE__V59*/
+ meltfptr[58]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[37])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATACTYPE__V59*/ meltfptr[58]), 2, "CTYPE_KEYWORD");
+ /*_.CTYPE_KEYWORD__V67*/
+ meltfptr[64] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CTYPE_KEYWORD__V67*/ meltfptr[64] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6879:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CTYPE_KEYWORD__V67*/
+ meltfptr[64]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[34])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYPE_KEYWORD__V67*/ meltfptr[64]), 1, "NAMED_NAME");
+ /*_.NAMED_NAME__V68*/
+ meltfptr[65] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.NAMED_NAME__V68*/ meltfptr[65] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6879:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.NAMED_NAME__V68*/
+ meltfptr[65])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6881:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6882:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</table>> ];"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6883:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+ /*citerblock FOREACH_IN_LIST */
+ {
+ /* start cit4__EACHLIST */
+ for ( /*_.PAIRSTEP__V69*/ meltfptr[63] =
+ melt_list_first ( /*_.DATASTEPS__V61*/ meltfptr[60]);
+ melt_magic_discr ( /*_.PAIRSTEP__V69*/ meltfptr[63]) ==
+ MELTOBMAG_PAIR;
+ /*_.PAIRSTEP__V69*/ meltfptr[63] =
+ melt_pair_tail ( /*_.PAIRSTEP__V69*/ meltfptr[63]))
+ {
+ /*_.CURSTEP__V70*/ meltfptr[69] =
+ melt_pair_head ( /*_.PAIRSTEP__V69*/ meltfptr[63]);
+
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6888:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]),
+ (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6889:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.CURDATANAME__V58*/
+ meltfptr[53])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6890:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]),
+ (" /*data*/ -> /*step*/ "));
+ }
+ ;
+ /*_.MAPOBJECT_GET__V71*/ meltfptr[70] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.MAPSTEP__V5*/ meltfptr[4]),
+ (meltobject_ptr_t) ( /*_.CURSTEP__V70*/
+ meltfptr[69]));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6891:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.MAPOBJECT_GET__V71*/
+ meltfptr[70])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6892:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.EDGEBUF__V7*/ meltfptr[6]),
+ (" [ arrowhead=open, color=blueviolet, style=dotted ];"));
+ }
+ ;
+ } /* end cit4__EACHLIST */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6885:/ clear");
+ /*clear *//*_.PAIRSTEP__V69*/ meltfptr[63] = 0;
+ /*^clear */
+ /*clear *//*_.CURSTEP__V70*/ meltfptr[69] = 0;
+ /*^clear */
+ /*clear *//*_.MAPOBJECT_GET__V71*/ meltfptr[70] = 0;
+ } /*endciterblock FOREACH_IN_LIST */
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6850:/ clear");
+ /*clear *//*_.CURDATANAME__V58*/ meltfptr[53] = 0;
+ /*^clear */
+ /*clear *//*_.DATACTYPE__V59*/ meltfptr[58] = 0;
+ /*^clear */
+ /*clear *//*_.DATASYMB__V60*/ meltfptr[59] = 0;
+ /*^clear */
+ /*clear *//*_.DATASTEPS__V61*/ meltfptr[60] = 0;
+ /*^clear */
+ /*clear *//*_#__L25*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_#OBJ_HASH__L26*/ meltfnum[22] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V62*/ meltfptr[61] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L27*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V63*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_.CTYPE_KEYWORD__V67*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_.NAMED_NAME__V68*/ meltfptr[65] = 0;
+ if ( /*_#DIX__L21*/ meltfnum[19] < 0)
+ break;
+ } /* end cit3__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6845:/ clear");
+ /*clear *//*_.CURDATA__V51*/ meltfptr[47] = 0;
+ /*^clear */
+ /*clear *//*_#DIX__L21*/ meltfnum[19] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V52*/ meltfptr[48] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V56*/ meltfptr[52] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6897:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L29*/ meltfnum[27] =
+ /*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-normatch.melt:6897:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[27]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[18] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6897:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L30*/ meltfnum[18];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6897;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz sortupstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SORTUPSTEP__V46*/ meltfptr[45];
+ /*_.MELT_DEBUG_FUN__V74*/ meltfptr[59] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V73*/ meltfptr[58] =
+ /*_.MELT_DEBUG_FUN__V74*/ meltfptr[59];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6897:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V74*/ meltfptr[59] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V73*/ meltfptr[58] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6897:/ quasiblock");
+
+
+ /*_.PROGN___V75*/ meltfptr[60] = /*_.IF___V73*/ meltfptr[58];;
+ /*^compute */
+
+ /*_.IFCPP___V72*/ meltfptr[53] = /*_.PROGN___V75*/ meltfptr[60];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6897:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V73*/ meltfptr[58] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V75*/ meltfptr[60] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V72*/ meltfptr[53] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_MULTIPLE */
+ {
+ /* start cit5__EACHTUP: */
+ long cit5__EACHTUP_ln =
+ melt_multiple_length ((melt_ptr_t) /*_.SORTUPSTEP__V46*/
+ meltfptr[45]);
+ for ( /*_#DIX__L31*/ meltfnum[22] = 0;
+ ( /*_#DIX__L31*/ meltfnum[22] >= 0)
+ && ( /*_#DIX__L31*/ meltfnum[22] < cit5__EACHTUP_ln);
+ /*_#DIX__L31*/ meltfnum[22]++)
+ {
+ /*_.CURSTEP__V76*/ meltfptr[61] =
+ melt_multiple_nth ((melt_ptr_t)
+ ( /*_.SORTUPSTEP__V46*/ meltfptr[45]),
+ /*_#DIX__L31*/ meltfnum[22]);
+
+
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6901:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L32*/ meltfnum[26] =
+ /*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-normatch.melt:6901:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[18] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6901:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L33*/ meltfnum[18];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6901;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz curstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.CURSTEP__V76*/ meltfptr[61];
+ /*_.MELT_DEBUG_FUN__V79*/ meltfptr[65] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->
+ tabval[3])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V78*/ meltfptr[64] =
+ /*_.MELT_DEBUG_FUN__V79*/ meltfptr[65];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6901:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V79*/ meltfptr[65] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V78*/ meltfptr[64] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6901:/ quasiblock");
+
+
+ /*_.PROGN___V80*/ meltfptr[59] = /*_.IF___V78*/ meltfptr[64];;
+ /*^compute */
+
+ /*_.IFCPP___V77*/ meltfptr[62] = /*_.PROGN___V80*/ meltfptr[59];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6901:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V78*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V80*/ meltfptr[59] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V77*/ meltfptr[62] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6902:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L34*/ meltfnum[27] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSTEP__V76*/ meltfptr[61]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
+ meltfrout->tabval[38])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6902:/ cond");
+ /*cond */ if ( /*_#IS_A__L34*/ meltfnum[27]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V82*/ meltfptr[60] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6902:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("mg_altdraw_graphviz check curstep"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (6902) ? (6902) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V82*/ meltfptr[60] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V81*/ meltfptr[58] = /*_.IFELSE___V82*/ meltfptr[60];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6902:/ clear");
+ /*clear *//*_#IS_A__L34*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V82*/ meltfptr[60] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V81*/ meltfptr[58] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6903:/ quasiblock");
+
+
+ /*_.CURSTEPNAME__V83*/ meltfptr[65] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ ( /*_.MAPSTEP__V5*/ meltfptr[4]),
+ (meltobject_ptr_t) ( /*_.CURSTEP__V76*/
+ meltfptr[61]));;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6906:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_STRING__L35*/ meltfnum[18] =
+ (melt_magic_discr
+ ((melt_ptr_t) ( /*_.CURSTEPNAME__V83*/ meltfptr[65])) ==
+ MELTOBMAG_STRING);;
+ MELT_LOCATION ("warmelt-normatch.melt:6906:/ cond");
+ /*cond */ if ( /*_#IS_STRING__L35*/ meltfnum[18]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V85*/ meltfptr[59] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6906:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("mg_altdraw_graphviz check curstepname"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (6906) ? (6906) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V85*/ meltfptr[59] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V84*/ meltfptr[64] = /*_.IFELSE___V85*/ meltfptr[59];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6906:/ clear");
+ /*clear *//*_#IS_STRING__L35*/ meltfnum[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V85*/ meltfptr[59] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V84*/ meltfptr[64] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6907:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6908:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.CURSTEPNAME__V83*/
+ meltfptr[65])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6909:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" [ margin=0, "));
+ }
+ ;
+ /*_#IS_A__L36*/ meltfnum[26] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURSTEP__V76*/ meltfptr[61]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ meltfrout->tabval[39])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6910:/ cond");
+ /*cond */ if ( /*_#IS_A__L36*/ meltfnum[26]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6911:/ locexp");
+ meltgc_add_out ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" style=\"filled\", bgcolor=\"palegreen\", "));
+ }
+ ;
+ /*epilog */
+ }
+ ;
+ } /*noelse */
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6913:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("label=<<table border=\"1\" cellborder=\"1\""));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6914:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ (" cellspacing=\"1\" cellpadding=\"1\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6915:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6916:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("<tr><td><font color=\"blue\" face=\"Times-Roman Bold\" point-size=\"7\">"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6917:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ melt_string_str ((melt_ptr_t)
+ ( /*_.CURSTEPNAME__V83*/
+ meltfptr[65])));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6918:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> <td><font face=\"Courier\" point-size=\"6\">#"));
+ }
+ ;
+ /*_#OBJ_HASH__L37*/ meltfnum[27] =
+ (melt_obj_hash
+ ((melt_ptr_t) ( /*_.CURSTEP__V76*/ meltfptr[61])));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6919:/ locexp");
+ meltgc_add_out_hex ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ( /*_#OBJ_HASH__L37*/ meltfnum[27]));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6920:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</font></td> </tr>"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6921:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6922:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[1];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MG__V18*/ meltfptr[17];
+ /*_.MATCHGRAPHIC_ALTSTEP__V86*/ meltfptr[60] =
+ meltgc_send ((melt_ptr_t) ( /*_.CURSTEP__V76*/ meltfptr[61]),
+ (melt_ptr_t) (( /*!MATCHGRAPHIC_ALTSTEP */
+ meltfrout->tabval[40])),
+ (MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6923:/ locexp");
+ meltgc_add_out ((melt_ptr_t) ( /*_.NODEBUF__V6*/ meltfptr[5]),
+ ("</table>> ];"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6924:/ locexp");
+ meltgc_out_add_indent ((melt_ptr_t)
+ ( /*_.NODEBUF__V6*/ meltfptr[5]), (0), 0);;
+ }
+ ;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6903:/ clear");
+ /*clear *//*_.CURSTEPNAME__V83*/ meltfptr[65] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V84*/ meltfptr[64] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L36*/ meltfnum[26] = 0;
+ /*^clear */
+ /*clear *//*_#OBJ_HASH__L37*/ meltfnum[27] = 0;
+ /*^clear */
+ /*clear *//*_.MATCHGRAPHIC_ALTSTEP__V86*/ meltfptr[60] = 0;
+ if ( /*_#DIX__L31*/ meltfnum[22] < 0)
+ break;
+ } /* end cit5__EACHTUP */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6898:/ clear");
+ /*clear *//*_.CURSTEP__V76*/ meltfptr[61] = 0;
+ /*^clear */
+ /*clear *//*_#DIX__L31*/ meltfnum[22] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V77*/ meltfptr[62] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V81*/ meltfptr[58] = 0;
+ } /*endciterblock FOREACH_IN_MULTIPLE */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6928:/ quasiblock");
+
+
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6932:/ locexp");
+ /* OUTPUTMGFILE__1 start */
+ time_t nowt = 0;
+ char nowbuf[60];
+ FILE *dotfil =
+ fopen (melt_string_str
+ ((melt_ptr_t) /*_.DOTFILENAME__V17*/ meltfptr[13]), "w");
+ if (!dotfil)
+ melt_fatal_error ("failed to open matchdot file %s - %m",
+ melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
+ meltfptr[13]));
+ fprintf (dotfil, "// melt matchdot file %s\n",
+ melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
+ meltfptr[13]));
+ time (&nowt);
+ memset (nowbuf, 0, sizeof (nowbuf));
+ strftime (nowbuf, sizeof (nowbuf) - 1,
+ "%Y %b %d %Hh%M", localtime (&nowt));
+ fprintf (dotfil, "// generated %s\n", nowbuf);
+ fprintf (dotfil, "digraph meltaltmatch_%lx {", /*_#MDATAHASH__L2*/
+ meltfnum[1]);
+ fprintf (dotfil,
+ " graph [ label=<<font color='firebrick' point-size='9' face='Helvetica Bold'>Melt Alt Match %s ** %s</font>>,",
+ lbasename (melt_string_str
+ ((melt_ptr_t) /*_.DOTFILENAME__V17*/ meltfptr[13])),
+ nowbuf);
+ fprintf (dotfil, " pad=\"0.5\", margin=\"0.3\" ];\n");
+ fprintf (dotfil, " node [ shape=\"box\", fontsize=\"9\" ];\n");
+ melt_putstrbuf (dotfil, (melt_ptr_t) /*_.NODEBUF__V6*/ meltfptr[5]);
+ fprintf (dotfil, "\n /// edges\n");
+ melt_putstrbuf (dotfil, (melt_ptr_t) /*_.EDGEBUF__V7*/ meltfptr[6]);
+ fprintf (dotfil, "\n} // eof %s\n",
+ melt_string_str ((melt_ptr_t) /*_.DOTFILENAME__V17*/
+ meltfptr[13]));
+ fclose (dotfil);
+ /* OUTPUTMGFILE__1 end */
+ ;
+ }
+ ;
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:6803:/ clear");
+ /*clear *//*_.LAMBDA___V41*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.SORTUPDATA__V43*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.LAMBDA___V44*/ meltfptr[43] = 0;
+ /*^clear */
+ /*clear *//*_.SORTUPSTEP__V46*/ meltfptr[45] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V47*/ meltfptr[46] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V72*/ meltfptr[53] = 0;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6785:/ clear");
+ /*clear *//*_#DATACOUNT__L11*/ meltfnum[2] = 0;
+ /*^clear */
+ /*clear *//*_#STEPCOUNT__L12*/ meltfnum[4] = 0;
+ /*^clear */
+ /*clear *//*_#MAPOBJECT_COUNT__L13*/ meltfnum[12] = 0;
+ /*^clear */
+ /*clear *//*_.TUPDATA__V35*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_#MAPOBJECT_COUNT__L14*/ meltfnum[13] = 0;
+ /*^clear */
+ /*clear *//*_.TUPSTEP__V36*/ meltfptr[32] = 0;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6661:/ clear");
+ /*clear *//*_.MAPDATA__V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.MAPSTEP__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.NODEBUF__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_.EDGEBUF__V7*/ meltfptr[6] = 0;
+ /*^clear */
+ /*clear *//*_.DATACOUNTBOX__V8*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_#CNT__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_#MDATAHASH__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.PATHSBUF__V9*/ meltfptr[8] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V12*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.STRBUF2STRING__V16*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.DOTFILENAME__V17*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.MG__V18*/ meltfptr[17] = 0;
+ /*^clear */
+ /*clear *//*_.LETREC___V20*/ meltfptr[19] = 0;
+ /*epilog */
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("MG_ALTDRAW_GRAPHVIZ", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*noretval */ NULL);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_136_warmelt_normatch_LAMBDA___30___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 38
+ void *mcfr_varptr[38];
+#define MELTFRAM_NBVARNUM 11
+ long mcfr_varnum[11];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 38; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 38;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ getarg");
+ /*_.DATA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6699:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:6699:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6699:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6699;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz/scandata data=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.DATA__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6699:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6699:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6699:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6700:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCHED_DATA */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6700:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6700:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("mg_altdraw_graphviz.scandata check data"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6700) ? (6700) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6700:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6701:/ quasiblock");
+
+
+ /*_.MAPOBJECT_GET__V10*/ meltfptr[9] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPDATA */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6701:/ apply");
+ /*apply */
+ {
+ /*_.OLDNAME__V11*/ meltfptr[10] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.MAPOBJECT_GET__V10*/ meltfptr[9]),
+ (melt_ptr_t) (NULL), (""), (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6703:/ cond");
+ /*cond */ if ( /*_.OLDNAME__V11*/ meltfptr[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6705:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:6705:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6705:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6705;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz/scandata found oldname";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OLDNAME__V11*/ meltfptr[10];
+ /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] =
+ 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);
+ }
+ ;
+ /*_.IF___V14*/ meltfptr[13] =
+ /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6705:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V14*/ meltfptr[13] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6705:/ quasiblock");
+
+
+ /*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];;
+ /*^compute */
+
+ /*_.IFCPP___V13*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6705:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V14*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V16*/ meltfptr[14] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6706:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V11*/ meltfptr[10];;
+ MELT_LOCATION ("warmelt-normatch.melt:6706:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:6704:/ quasiblock");
+
+
+ /*_.PROGN___V18*/ meltfptr[14] = /*_.RETURN___V17*/ meltfptr[13];;
+ /*^compute */
+
+ /*_.IF___V12*/ meltfptr[11] = /*_.PROGN___V18*/ meltfptr[14];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6703:/ clear");
+ /*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V17*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V18*/ meltfptr[14] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V12*/ meltfptr[11] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.LET___V9*/ meltfptr[4] = /*_.IF___V12*/ meltfptr[11];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6701:/ clear");
+ /*clear *//*_.MAPOBJECT_GET__V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.OLDNAME__V11*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V12*/ meltfptr[11] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6707:/ quasiblock");
+
+
+ /*_.NAMBUF__V20*/ meltfptr[13] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[2])),
+ (char *) 0);;
+ MELT_LOCATION ("warmelt-normatch.melt:6708:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]), 1, "MDATA_SYMB");
+ /*_.MSYMB__V21*/
+ meltfptr[14] = slot;
+ };
+ ;
+ /*_#GET_INT__L6*/ meltfnum[1] =
+ (melt_get_int
+ ((melt_ptr_t) (( /*~DATACOUNTBOX */ meltfclos->tabval[1]))));;
+ /*^compute */
+
+ /*_#DATACNT__L7*/ meltfnum[0] =
+ ((1) + ( /*_#GET_INT__L6*/ meltfnum[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6710:/ getslot");
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]), 4, "MDATA_STEPS");
+ /*_.MSTEPS__V22*/
+ meltfptr[9] = slot;
+ };
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6711:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MSYMB__V21*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]), 1, "NAMED_NAME");
+ /*_.SYMBNAME__V23*/
+ meltfptr[10] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.SYMBNAME__V23*/ meltfptr[10] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6713:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[4];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring = "mdata_";
+ /*^apply.arg */
+ argtab[1].meltbp_long = /*_#DATACNT__L7*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[2].meltbp_cstring = "_";
+ /*^apply.arg */
+ argtab[3].meltbp_aptr =
+ (melt_ptr_t *) & /*_.SYMBNAME__V23*/ meltfptr[10];
+ /*_.ADD2OUT__V24*/ meltfptr[11] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ADD2OUT */ meltfrout->tabval[4])),
+ (melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6714:/ locexp");
+ melt_put_int ((melt_ptr_t) (( /*~DATACOUNTBOX */ meltfclos->tabval[1])),
+ ( /*_#DATACNT__L7*/ meltfnum[0]));
+ }
+ ;
+ /*_#IS_A__L8*/ meltfnum[7] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */
+ meltfrout->tabval[5])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6715:/ cond");
+ /*cond */ if ( /*_#IS_A__L8*/ meltfnum[7]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6716:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MSYMB__V21*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[5])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.MSYMB__V21*/ meltfptr[14]), 3, "CSYM_URANK");
+ /*_.CSYM_URANK__V27*/
+ meltfptr[26] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.CSYM_URANK__V27*/ meltfptr[26] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_#CLONRK__L9*/ meltfnum[8] =
+ (melt_get_int
+ ((melt_ptr_t) ( /*_.CSYM_URANK__V27*/ meltfptr[26])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6718:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_cstring = "__";
+ /*^apply.arg */
+ argtab[1].meltbp_long = /*_#CLONRK__L9*/ meltfnum[8];
+ /*_.ADD2OUT__V28*/ meltfptr[27] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!ADD2OUT */ meltfrout->tabval[4])),
+ (melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]),
+ (MELTBPARSTR_CSTRING MELTBPARSTR_LONG ""), argtab,
+ "", (union meltparam_un *) 0);
+ }
+ ;
+ /*_.LET___V26*/ meltfptr[25] = /*_.ADD2OUT__V28*/ meltfptr[27];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6716:/ clear");
+ /*clear *//*_.CSYM_URANK__V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_#CLONRK__L9*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V28*/ meltfptr[27] = 0;
+ /*_.IF___V25*/ meltfptr[24] = /*_.LET___V26*/ meltfptr[25];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6715:/ clear");
+ /*clear *//*_.LET___V26*/ meltfptr[25] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V25*/ meltfptr[24] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6719:/ quasiblock");
+
+
+ /*_.NEWNAME__V30*/ meltfptr[27] =
+ (meltgc_new_stringdup
+ ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[6])),
+ melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V20*/ meltfptr[13]))));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6721:/ locexp");
+ meltgc_put_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPDATA */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.DATA__V2*/ meltfptr[1]),
+ (melt_ptr_t) ( /*_.NEWNAME__V30*/ meltfptr[27]));
+ }
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6722:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L10*/ meltfnum[8] =
+ /*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-normatch.melt:6722:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6722:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[7];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6722;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz/scandata newname=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.NEWNAME__V30*/ meltfptr[27];
+ /*^apply.arg */
+ argtab[5].meltbp_cstring = " updated mapdata=";
+ /*^apply.arg */
+ argtab[6].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~MAPDATA */ meltfclos->tabval[0]);
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] =
+ 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 MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[31] =
+ /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6722:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6722:/ quasiblock");
+
+
+ /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];;
+ /*^compute */
+
+ /*_.IFCPP___V31*/ meltfptr[25] = /*_.PROGN___V34*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6722:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V34*/ meltfptr[32] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V31*/ meltfptr[25] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ /*citerblock FOREACH_IN_LIST */
+ {
+ /* start cit1__EACHLIST */
+ for ( /*_.CURPAIR__V35*/ meltfptr[31] =
+ melt_list_first ( /*_.MSTEPS__V22*/ meltfptr[9]);
+ melt_magic_discr ( /*_.CURPAIR__V35*/ meltfptr[31]) ==
+ MELTOBMAG_PAIR;
+ /*_.CURPAIR__V35*/ meltfptr[31] =
+ melt_pair_tail ( /*_.CURPAIR__V35*/ meltfptr[31]))
+ {
+ /*_.CURSTEP__V36*/ meltfptr[32] =
+ melt_pair_head ( /*_.CURPAIR__V35*/ meltfptr[31]);
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:6726:/ apply");
+ /*apply */
+ {
+ /*_.SCANSTEP__V37*/ meltfptr[36] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANSTEP */ meltfclos->tabval[2])),
+ (melt_ptr_t) ( /*_.CURSTEP__V36*/ meltfptr[32]),
+ (""), (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ } /* end cit1__EACHLIST */
+
+ /*citerepilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6723:/ clear");
+ /*clear *//*_.CURPAIR__V35*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.CURSTEP__V36*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_.SCANSTEP__V37*/ meltfptr[36] = 0;
+ } /*endciterblock FOREACH_IN_LIST */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6727:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWNAME__V30*/ meltfptr[27];;
+ MELT_LOCATION ("warmelt-normatch.melt:6727:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*_.LET___V29*/ meltfptr[26] = /*_.RETURN___V38*/ meltfptr[37];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6719:/ clear");
+ /*clear *//*_.NEWNAME__V30*/ meltfptr[27] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V31*/ meltfptr[25] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V38*/ meltfptr[37] = 0;
+ /*_.LET___V19*/ meltfptr[12] = /*_.LET___V29*/ meltfptr[26];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6707:/ clear");
+ /*clear *//*_.NAMBUF__V20*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.MSYMB__V21*/ meltfptr[14] = 0;
+ /*^clear */
+ /*clear *//*_#GET_INT__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_#DATACNT__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MSTEPS__V22*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.SYMBNAME__V23*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.ADD2OUT__V24*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_#IS_A__L8*/ meltfnum[7] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V25*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V29*/ meltfptr[26] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[12];;
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V19*/ meltfptr[12] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_136_warmelt_normatch_LAMBDA___30__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_137_warmelt_normatch_LAMBDA___31___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 37
+ void *mcfr_varptr[37];
+#define MELTFRAM_NBVARNUM 7
+ long mcfr_varnum[7];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 37; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 37;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ getarg");
+ /*_.STEP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6732:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:6732:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6732:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6732;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz/scanstep step=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.STEP__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6732:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6732:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6732:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6733:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L3*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
+ meltfrout->tabval[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6733:/ cond");
+ /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[4] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6733:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("mg_altdraw_graphviz.scanstep check step"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") : __FILE__,
+ (6733) ? (6733) : __LINE__, __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V7*/ meltfptr[3] = /*_.IFELSE___V8*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6733:/ clear");
+ /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V7*/ meltfptr[3] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6734:/ quasiblock");
+
+
+ /*_.OLDNAME__V10*/ meltfptr[9] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPSTEP */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6736:/ cond");
+ /*cond */ if ( /*_.OLDNAME__V10*/ meltfptr[9]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6738:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L4*/ meltfnum[0] =
+ /*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-normatch.melt:6738:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6738:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long =
+ /*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6738;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz.scanstep found oldname";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.OLDNAME__V10*/ meltfptr[9];
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] =
+ 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);
+ }
+ ;
+ /*_.IF___V13*/ meltfptr[12] =
+ /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6738:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V13*/ meltfptr[12] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6738:/ quasiblock");
+
+
+ /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IFCPP___V12*/ meltfptr[11] = /*_.PROGN___V15*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6738:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V13*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V15*/ meltfptr[13] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6739:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V10*/ meltfptr[9];;
+ MELT_LOCATION ("warmelt-normatch.melt:6739:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ MELT_LOCATION ("warmelt-normatch.melt:6737:/ quasiblock");
+
+
+ /*_.PROGN___V17*/ meltfptr[13] = /*_.RETURN___V16*/ meltfptr[12];;
+ /*^compute */
+
+ /*_.IF___V11*/ meltfptr[10] = /*_.PROGN___V17*/ meltfptr[13];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6736:/ clear");
+ /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.RETURN___V16*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V17*/ meltfptr[13] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V11*/ meltfptr[10] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.LET___V9*/ meltfptr[4] = /*_.IF___V11*/ meltfptr[10];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6734:/ clear");
+ /*clear *//*_.OLDNAME__V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6740:/ quasiblock");
+
+
+ /*_.NAMBUF__V19*/ meltfptr[12] =
+ meltgc_new_strbuf ((meltobject_ptr_t)
+ (( /*!DISCR_STRBUF */ meltfrout->tabval[2])),
+ (char *) 0);;
+ /*^compute */
+
+ /*_#MAPCNT__L6*/ meltfnum[1] =
+ (melt_count_mapobjects
+ ((meltmapobjects_ptr_t) (( /*~MAPSTEP */ meltfclos->tabval[0]))));;
+ /*^compute */
+
+ /*_.DISCRIM__V20*/ meltfptr[13] =
+ (melt_discr ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6742:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.DISCRIM__V20*/ meltfptr[13]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.DISCRIM__V20*/ meltfptr[13]), 1, "NAMED_NAME");
+ /*_.DISNAM__V21*/
+ meltfptr[9] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.DISNAM__V21*/ meltfptr[9] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6744:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_DATA */ meltfrout->tabval[4])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_DATA");
+ /*_.SDATA__V22*/
+ meltfptr[10] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.SDATA__V22*/ meltfptr[10] = NULL;;
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6747:/ locexp");
+ /*CHUNKDISNAM__1 */ meltgc_add_strbuf ((melt_ptr_t) /*_.NAMBUF__V19*/
+ meltfptr[12],
+ melt_string_str ((melt_ptr_t)
+ /*_.DISNAM__V21*/
+ meltfptr[9])
+ + strlen ("CLASS_"));
+ }
+ ;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6750:/ locexp");
+ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]),
+ ("__"));
+ }
+ ;
+ /*_#I__L7*/ meltfnum[0] =
+ (( /*_#MAPCNT__L6*/ meltfnum[1]) + (1));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6751:/ locexp");
+ meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]),
+ ( /*_#I__L7*/ meltfnum[0]));
+ }
+ ;
+ /*_.STRBUF2STRING__V23*/ meltfptr[22] =
+ (meltgc_new_stringdup
+ ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[5])),
+ melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V19*/ meltfptr[12]))));;
+
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6752:/ locexp");
+ meltgc_put_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPSTEP */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) ( /*_.STRBUF2STRING__V23*/
+ meltfptr[22]));
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6753:/ cond");
+ /*cond */ if ( /*_.SDATA__V22*/ meltfptr[10]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.SCANDATA__V25*/ meltfptr[24] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANDATA */ meltfclos->tabval[1])),
+ (melt_ptr_t) ( /*_.SDATA__V22*/ meltfptr[10]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V24*/ meltfptr[23] = /*_.SCANDATA__V25*/ meltfptr[24];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6753:/ clear");
+ /*clear *//*_.SCANDATA__V25*/ meltfptr[24] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V24*/ meltfptr[23] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6754:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~SCANDATA */ meltfclos->tabval[1]);
+ /*^ojbmsend.arg */
+ argtab[1].meltbp_aptr = /*nil */ (melt_ptr_t *) NULL;
+ /*_.SCAN_STEP_DATA__V26*/ meltfptr[24] =
+ meltgc_send ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!SCAN_STEP_DATA */ meltfrout->
+ tabval[6])),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6755:/ msend");
+ /*msend */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^ojbmsend.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & ( /*~SCANFLAG */ meltfclos->tabval[2]);
+ /*^ojbmsend.arg */
+ argtab[1].meltbp_aptr = /*nil */ (melt_ptr_t *) NULL;
+ /*_.SCAN_STEP_FLAG__V27*/ meltfptr[26] =
+ meltgc_send ((melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!SCAN_STEP_FLAG */ meltfrout->
+ tabval[7])),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6756:/ quasiblock");
+
+
+ MELT_LOCATION ("warmelt-normatch.melt:6758:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_THEN */ meltfrout->tabval[8])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 2, "MSTEP_THEN");
+ /*_.STHEN__V29*/
+ meltfptr[28] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.STHEN__V29*/ meltfptr[28] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6759:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_TEST */ meltfrout->tabval[9])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 5, "MSTEP_ELSE");
+ /*_.SELSE__V30*/
+ meltfptr[29] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.SELSE__V30*/ meltfptr[29] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6760:/ cond");
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.STEP__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP_WITH_FLAG */ meltfrout->tabval[10])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.STEP__V2*/ meltfptr[1]), 3, "MSTEP_FLAG");
+ /*_.SFLAG__V31*/
+ meltfptr[30] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.SFLAG__V31*/ meltfptr[30] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6762:/ cond");
+ /*cond */ if ( /*_.STHEN__V29*/ meltfptr[28]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.SCANSTEP__V33*/ meltfptr[32] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANSTEP */ meltfclos->tabval[3])),
+ (melt_ptr_t) ( /*_.STHEN__V29*/ meltfptr[28]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V32*/ meltfptr[31] = /*_.SCANSTEP__V33*/ meltfptr[32];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6762:/ clear");
+ /*clear *//*_.SCANSTEP__V33*/ meltfptr[32] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V32*/ meltfptr[31] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6763:/ cond");
+ /*cond */ if ( /*_.SELSE__V30*/ meltfptr[29]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.SCANSTEP__V35*/ meltfptr[34] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANSTEP */ meltfclos->tabval[3])),
+ (melt_ptr_t) ( /*_.SELSE__V30*/ meltfptr[29]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V34*/ meltfptr[32] = /*_.SCANSTEP__V35*/ meltfptr[34];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6763:/ clear");
+ /*clear *//*_.SCANSTEP__V35*/ meltfptr[34] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V34*/ meltfptr[32] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6764:/ cond");
+ /*cond */ if ( /*_.SFLAG__V31*/ meltfptr[30]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ /*_.SCANFLAG__V37*/ meltfptr[36] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANFLAG */ meltfclos->tabval[2])),
+ (melt_ptr_t) ( /*_.SFLAG__V31*/ meltfptr[30]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*_.IF___V36*/ meltfptr[34] = /*_.SCANFLAG__V37*/ meltfptr[36];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6764:/ clear");
+ /*clear *//*_.SCANFLAG__V37*/ meltfptr[36] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V36*/ meltfptr[34] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.LET___V28*/ meltfptr[27] = /*_.IF___V36*/ meltfptr[34];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6756:/ clear");
+ /*clear *//*_.STHEN__V29*/ meltfptr[28] = 0;
+ /*^clear */
+ /*clear *//*_.SELSE__V30*/ meltfptr[29] = 0;
+ /*^clear */
+ /*clear *//*_.SFLAG__V31*/ meltfptr[30] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V32*/ meltfptr[31] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V34*/ meltfptr[32] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V36*/ meltfptr[34] = 0;
+ /*_.LET___V18*/ meltfptr[11] = /*_.LET___V28*/ meltfptr[27];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6740:/ clear");
+ /*clear *//*_.NAMBUF__V19*/ meltfptr[12] = 0;
+ /*^clear */
+ /*clear *//*_#MAPCNT__L6*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.DISCRIM__V20*/ meltfptr[13] = 0;
+ /*^clear */
+ /*clear *//*_.DISNAM__V21*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.SDATA__V22*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_#I__L7*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.STRBUF2STRING__V23*/ meltfptr[22] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V24*/ meltfptr[23] = 0;
+ /*^clear */
+ /*clear *//*_.SCAN_STEP_DATA__V26*/ meltfptr[24] = 0;
+ /*^clear */
+ /*clear *//*_.SCAN_STEP_FLAG__V27*/ meltfptr[26] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V28*/ meltfptr[27] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[11];;
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V7*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V9*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V18*/ meltfptr[11] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_137_warmelt_normatch_LAMBDA___31__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_138_warmelt_normatch_LAMBDA___32___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 17
+ void *mcfr_varptr[17];
+#define MELTFRAM_NBVARNUM 5
+ long mcfr_varnum[5];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 17; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 17;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ getarg");
+ /*_.FLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6768:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L1*/ meltfnum[0] =
+ /*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-normatch.melt:6768:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6768:/ apply");
+ /*apply */
+ {
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6768;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring = "mg_altdraw_graphviz.scanflag flag=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FLAG__V2*/ meltfptr[1];
+ /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] =
+ 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);
+ }
+ ;
+ /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6768:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V4*/ meltfptr[3] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6768:/ quasiblock");
+
+
+ /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];;
+ /*^compute */
+
+ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6768:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V4*/ meltfptr[3] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6769:/ quasiblock");
+
+
+ /*^cond */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLAG__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_FLAG */
+ meltfrout->tabval[1])))
+ ) /*then */
+ {
+ /*^cond.then */
+ /*^getslot */
+ {
+ melt_ptr_t slot = 0;
+ melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLAG__V2*/ meltfptr[1]), 5, "MFLAG_SETSTEP");
+ /*_.FLSTEP__V8*/
+ meltfptr[4] = slot;
+ };
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.FLSTEP__V8*/ meltfptr[4] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6771:/ cond");
+ /*cond */ if ( /*_.FLSTEP__V8*/ meltfptr[4]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6773:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+
+ {
+ /*^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-normatch.melt:6773:/ cond");
+ /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
+ meltcallcount;;
+ MELT_LOCATION ("warmelt-normatch.melt:6773:/ apply");
+ /*apply */
+ {
+ 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-normatch.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 6773;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "mg_altdraw_graphviz.scanflag flstep";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.FLSTEP__V8*/ meltfptr[4];
+ /*_.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);
+ }
+ ;
+ /*_.IF___V11*/ meltfptr[10] =
+ /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6773:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V11*/ meltfptr[10] = NULL;;
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6773:/ quasiblock");
+
+
+ /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];;
+ /*^compute */
+
+ /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6773:/ clear");
+ /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V11*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+
+#if MELT_HAVE_DEBUG
+ MELT_LOCATION ("warmelt-normatch.melt:6774:/ cppif.then");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#IS_A__L5*/ meltfnum[0] =
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLSTEP__V8*/ meltfptr[4]),
+ (melt_ptr_t) (( /*!CLASS_MATCH_STEP */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-normatch.melt:6774:/ cond");
+ /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V15*/ meltfptr[11] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6774:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+
+
+
+ {
+ /*^locexp */
+ melt_assert_failed (("check flstep"),
+ ("warmelt-normatch.melt")
+ ? ("warmelt-normatch.melt") :
+ __FILE__, (6774) ? (6774) : __LINE__,
+ __FUNCTION__);
+ ;
+ }
+ ;
+ /*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
+ /*epilog */
+ }
+ ;
+ }
+ ;
+ /*^compute */
+
+ /*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6774:/ clear");
+ /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0;
+ }
+
+#else /*MELT_HAVE_DEBUG */
+ /*^cppif.else */
+ /*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL);
+#endif /*MELT_HAVE_DEBUG */
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6775:/ apply");
+ /*apply */
+ {
+ /*_.SCANSTEP__V16*/ meltfptr[11] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*~SCANSTEP */ meltfclos->tabval[0])),
+ (melt_ptr_t) ( /*_.FLSTEP__V8*/ meltfptr[4]), (""),
+ (union meltparam_un *) 0, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ MELT_LOCATION ("warmelt-normatch.melt:6772:/ quasiblock");
+
+
+ /*_.PROGN___V17*/ meltfptr[16] = /*_.SCANSTEP__V16*/ meltfptr[11];;
+ /*^compute */
+
+ /*_.IF___V9*/ meltfptr[8] = /*_.PROGN___V17*/ meltfptr[16];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6771:/ clear");
+ /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V14*/ meltfptr[10] = 0;
+ /*^clear */
+ /*clear *//*_.SCANSTEP__V16*/ meltfptr[11] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V17*/ meltfptr[16] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V9*/ meltfptr[8] = NULL;;
+ }
+ ;
+ /*^compute */
+
+ /*_.LET___V7*/ meltfptr[3] = /*_.IF___V9*/ meltfptr[8];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6769:/ clear");
+ /*clear *//*_.FLSTEP__V8*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.IF___V9*/ meltfptr[8] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0;
+ /*^clear */
+ /*clear *//*_.LET___V7*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_138_warmelt_normatch_LAMBDA___32__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_139_warmelt_normatch_LAMBDA___33___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 9
+ void *mcfr_varptr[9];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 9; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 9;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ getarg");
+ /*_.D1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.D2__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.D2__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6808:/ quasiblock");
+
+
+ /*_.SN1__V5*/ meltfptr[4] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPDATA */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.D1__V2*/ meltfptr[1]));;
+ /*^compute */
+
+ /*_.SN2__V6*/ meltfptr[5] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPDATA */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.D2__V3*/ meltfptr[2]));;
+ /*^compute */
+
+ /*_#STRING___L1*/ meltfnum[0] =
+ melt_string_less ((melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]),
+ (melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6813:/ cond");
+ /*cond */ if ( /*_#STRING___L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V7*/ meltfptr[6] =
+ ( /*!konst_0 */ meltfrout->tabval[0]);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6813:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#STRING___L2*/ meltfnum[1] =
+ melt_string_less ((melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6815:/ cond");
+ /*cond */ if ( /*_#STRING___L2*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[7] =
+ ( /*!konst_1 */ meltfrout->tabval[1]);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6815:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6817:/ quasiblock");
+
+
+ /*_.PROGN___V9*/ meltfptr[8] =
+ ( /*!konst_2 */ meltfrout->tabval[2]);;
+ /*^compute */
+
+ /*_.IFELSE___V8*/ meltfptr[7] = /*_.PROGN___V9*/ meltfptr[8];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6815:/ clear");
+ /*clear *//*_.PROGN___V9*/ meltfptr[8] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6813:/ clear");
+ /*clear *//*_#STRING___L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V7*/ meltfptr[6];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6808:/ clear");
+ /*clear *//*_.SN1__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.SN2__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_#STRING___L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_139_warmelt_normatch_LAMBDA___33__ */
+
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *
+ meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *
+ meltxrestab_)
+{
+#if MELT_HAVE_DEBUG
+ static long call_counter__;
+ long thiscallcounter__ ATTRIBUTE_UNUSED = ++call_counter__;
+#undef meltcallcount
+#define meltcallcount thiscallcounter__
+#else
+#undef meltcallcount
+#define meltcallcount 0L
+#endif
+
+ struct frame_meltrout_140_warmelt_normatch_LAMBDA___34___st
+ {
+ int mcfr_nbvar;
+#if MELT_HAVE_DEBUG
+ const char *mcfr_flocs;
+#else /*!MELT_HAVE_DEBUG */
+ const char *mcfr_unusedflocs;
+#endif /*MELT_HAVE_DEBUG */
+ struct meltclosure_st *mcfr_clos;
+ struct excepth_melt_st *mcfr_exh;
+ struct melt_callframe_st *mcfr_prev;
+#define MELTFRAM_NBVARPTR 9
+ void *mcfr_varptr[9];
+#define MELTFRAM_NBVARNUM 2
+ long mcfr_varnum[2];
+/*others*/
+ long _spare_;
+ }
+ *meltframptr_ = 0, meltfram__;
+#define meltframe meltfram__
+ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC))
+ { /*mark for ggc */
+ int ix = 0;
+ meltframptr_ = (void *) meltfirstargp_;
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_clos);
+ for (ix = 0; ix < 9; ix++)
+ if (meltframptr_->mcfr_varptr[ix])
+ gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
+ return NULL;
+ } /*end markggc */ ;
+ memset (&meltfram__, 0, sizeof (meltfram__));
+ meltfram__.mcfr_nbvar = 9;
+ meltfram__.mcfr_clos = meltclosp_;
+ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
+ melt_topframe = (struct melt_callframe_st *) &meltfram__;
+ melt_trace_start ("LAMBDA_", meltcallcount);
+/*getargs*/
+
+ /*getarg#0 */
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ getarg");
+ /*_.S1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_;
+
+ /*getarg#1 */
+ /*^getarg */
+ if (meltxargdescr_[0] != MELTBPAR_PTR)
+ goto lab_endgetargs;
+ /*_.S2__V3*/ meltfptr[2] =
+ (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL;
+ gcc_assert (melt_discr ((melt_ptr_t) ( /*_.S2__V3*/ meltfptr[2])) != NULL);
+
+ ;
+ goto lab_endgetargs;
+lab_endgetargs:;
+/*body*/
+/*^block*/
+/*anyblock*/
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6827:/ quasiblock");
+
+
+ /*_.SN1__V5*/ meltfptr[4] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPSTEP */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.S1__V2*/ meltfptr[1]));;
+ /*^compute */
+
+ /*_.SN2__V6*/ meltfptr[5] =
+ melt_get_mapobjects ((meltmapobjects_ptr_t)
+ (( /*~MAPSTEP */ meltfclos->tabval[0])),
+ (meltobject_ptr_t) ( /*_.S2__V3*/ meltfptr[2]));;
+ /*^compute */
+
+ /*_#STRING___L1*/ meltfnum[0] =
+ melt_string_less ((melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]),
+ (melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6832:/ cond");
+ /*cond */ if ( /*_#STRING___L1*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V7*/ meltfptr[6] =
+ ( /*!konst_0 */ meltfrout->tabval[0]);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6832:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ /*_#STRING___L2*/ meltfnum[1] =
+ melt_string_less ((melt_ptr_t) ( /*_.SN2__V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.SN1__V5*/ meltfptr[4]));;
+ MELT_LOCATION ("warmelt-normatch.melt:6834:/ cond");
+ /*cond */ if ( /*_#STRING___L2*/ meltfnum[1]) /*then */
+ {
+ /*^cond.then */
+ /*_.IFELSE___V8*/ meltfptr[7] =
+ ( /*!konst_1 */ meltfrout->tabval[1]);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-normatch.melt:6834:/ cond.else");
+
+ /*^block */
+ /*anyblock */
+ {
+
+ MELT_LOCATION ("warmelt-normatch.melt:6836:/ quasiblock");
+
+
+ /*_.PROGN___V9*/ meltfptr[8] =
+ ( /*!konst_2 */ meltfrout->tabval[2]);;
+ /*^compute */
+
+ /*_.IFELSE___V8*/ meltfptr[7] = /*_.PROGN___V9*/ meltfptr[8];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6834:/ clear");
+ /*clear *//*_.PROGN___V9*/ meltfptr[8] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-normatch.melt:6832:/ clear");
+ /*clear *//*_#STRING___L2*/ meltfnum[1] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0;
+ }
+ ;
+ }
+ ;
+ /*_.LET___V4*/ meltfptr[3] = /*_.IFELSE___V7*/ meltfptr[6];;
+
+ MELT_LOCATION ("warmelt-normatch.melt:6827:/ clear");
+ /*clear *//*_.SN1__V5*/ meltfptr[4] = 0;
+ /*^clear */
+ /*clear *//*_.SN2__V6*/ meltfptr[5] = 0;
+ /*^clear */
+ /*clear *//*_#STRING___L1*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0;
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ quasiblock");
+
+
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];;
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ finalreturn");
+ ;
+ /*finalret */ goto labend_rout;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.LET___V4*/ meltfptr[3] = 0;
+ }
+
+ ;
+ goto labend_rout;
+labend_rout:
+ melt_trace_end ("LAMBDA_", meltcallcount);
+ melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;
+ return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]);
+#undef meltcallcount
+#undef meltfram__
+#undef MELTFRAM_NBVARNUM
+#undef MELTFRAM_NBVARPTR
+} /*end meltrout_140_warmelt_normatch_LAMBDA___34__ */
+
+
+
+/**** end of warmelt-normatch+05.c ****/
diff --git a/gcc/melt/generated/warmelt-normatch+meltdesc.c b/gcc/melt/generated/warmelt-normatch+meltdesc.c
index ecf1ffe5877..1f9494157ad 100644
--- a/gcc/melt/generated/warmelt-normatch+meltdesc.c
+++ b/gcc/melt/generated/warmelt-normatch+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-normatch */
@@ -12,28 +12,28 @@ const char melt_modulename[]="warmelt-normatch";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-normatch";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="c407b1f03e5420dec4b0ddadb77ffbc1";
+const char melt_primaryhexmd5[]="125c529909791d8996d3ea36fa58bdd7";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+01.c #1 */ "11c24096c527e8f30ed59a611db59d4f",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+02.c #2 */ "018f434f6092c515cfffbba5b3f53d65",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+03.c #3 */ "3e860c6af4a656f8f1733f302b8ecdb8",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+04.c #4 */ "efcd83b88de1497a45f0d1bd3d21ebab",
- /*nosecfile*/ (const char*)0,
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+01.c #1 */ "fef4083f2eaae02948c5cec3ee4d5d11",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+02.c #2 */ "7c5f165312d8a9c8d2d86735ec77f3ba",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+03.c #3 */ "a2ef12aa72163ea57e2f02cb27227d78",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+04.c #4 */ "c54e89e82756691bde5eefa482acb728",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+05.c #5 */ "2af04cb48b9d68aebb48bc9b210d3f31",
/*nosecfile*/ (const char*)0,
(const char*)0 };
/* last index of secondary files */
-const int melt_lastsecfileindex=4;
+const int melt_lastsecfileindex=5;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="48b4771c90ba664f0b6e62c1fb40aea4" ;
+const char melt_cumulated_hexmd5[]="d02c97c9b726de7c1bba051a1bd4402e" ;
/* include the timestamp file */
-#define meltmod_warmelt_normatch_mds__48b4771c90ba664f0b6e62c1fb40aea4 1
+#define meltmod_warmelt_normatch_mds__d02c97c9b726de7c1bba051a1bd4402e 1
#include "warmelt-normatch+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-normatch+melttime.h b/gcc/melt/generated/warmelt-normatch+melttime.h
index 366dba2f766..a09d1005dc2 100644
--- a/gcc/melt/generated/warmelt-normatch+melttime.h
+++ b/gcc/melt/generated/warmelt-normatch+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-normatch+melttime.h is included from warmelt-normatch+meltdesc.c only. */
-#if meltmod_warmelt_normatch_mds__48b4771c90ba664f0b6e62c1fb40aea4
+#if meltmod_warmelt_normatch_mds__d02c97c9b726de7c1bba051a1bd4402e
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-normatch */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:24 2012 CET";
-const long long melt_gen_timenum=1328609124;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:25 2012 CET";
+const long long melt_gen_timenum=1329219205;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_normatch_mds__48b4771c90ba664f0b6e62c1fb40aea4 */
+#else /* ! meltmod_warmelt_normatch_mds__d02c97c9b726de7c1bba051a1bd4402e */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-normatch
-#endif /* meltmod_warmelt_normatch_mds__48b4771c90ba664f0b6e62c1fb40aea4 */
+#endif /* meltmod_warmelt_normatch_mds__d02c97c9b726de7c1bba051a1bd4402e */
diff --git a/gcc/melt/generated/warmelt-normatch.c b/gcc/melt/generated/warmelt-normatch.c
index 72d0ffdb2b9..d0a6c082bd0 100644
--- a/gcc/melt/generated/warmelt-normatch.c
+++ b/gcc/melt/generated/warmelt-normatch.c
@@ -690,7 +690,20 @@ meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
+meltrout_45_warmelt_normatch_MGLABEL_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -705,7 +718,7 @@ meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
+meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -721,7 +734,7 @@ meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
+meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -737,7 +750,7 @@ meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
+meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -752,7 +765,7 @@ meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
+meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -771,7 +784,7 @@ meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
+meltrout_51_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -784,7 +797,7 @@ meltrout_50_warmelt_normatch_NORMEXP_MATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
+meltrout_52_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -797,7 +810,7 @@ meltrout_51_warmelt_normatch_LAMBDA___18__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
+meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -812,7 +825,7 @@ meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
+meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -827,7 +840,7 @@ meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -842,7 +855,39 @@ meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
+meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -857,7 +902,7 @@ meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
+meltrout_59_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -870,7 +915,7 @@ meltrout_56_warmelt_normatch_SCANSUBPAT_OR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
+meltrout_60_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -884,7 +929,7 @@ meltrout_57_warmelt_normatch_SCANSUBPAT_AND (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
+meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -900,7 +945,7 @@ meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
+meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -915,23 +960,7 @@ meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
+meltrout_63_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -945,7 +974,7 @@ meltrout_61_warmelt_normatch_FILL_MATCHCASE (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
+meltrout_64_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -958,7 +987,22 @@ meltrout_62_warmelt_normatch_LAMBDA___19__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
+meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_66_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -971,7 +1015,7 @@ meltrout_63_warmelt_normatch_START_STEP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
+meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -986,7 +1030,7 @@ meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1001,7 +1045,22 @@ meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
+meltrout_69_warmelt_normatch_PUTELSE_MATCHANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1017,7 +1076,7 @@ meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
+meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1032,7 +1091,7 @@ meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1047,7 +1106,7 @@ meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
+meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1063,7 +1122,45 @@ meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
+meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1082,7 +1179,7 @@ meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
+meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1101,7 +1198,7 @@ meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1120,7 +1217,26 @@ meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1135,7 +1251,7 @@ meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
+meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1150,7 +1266,7 @@ meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1165,7 +1281,7 @@ meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
+meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1180,7 +1296,7 @@ meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
+meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1195,7 +1311,7 @@ meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
+meltrout_85_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1208,7 +1324,7 @@ meltrout_78_warmelt_normatch_LAMBDA___20__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
+meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1223,7 +1339,7 @@ meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
+meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1238,7 +1354,7 @@ meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
+meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1253,7 +1369,7 @@ meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
+meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1268,7 +1384,7 @@ meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
+meltrout_90_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1281,7 +1397,7 @@ meltrout_83_warmelt_normatch_LAMBDA___21__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
+meltrout_91_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1294,7 +1410,7 @@ meltrout_84_warmelt_normatch_LAMBDA___22__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
+meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1309,7 +1425,20 @@ meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
+meltrout_93_warmelt_normatch_MGALTSTEP_ANY (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1325,7 +1454,7 @@ meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
+meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1344,7 +1473,7 @@ meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
+meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1363,7 +1492,7 @@ meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
+meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1382,7 +1511,7 @@ meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
+meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1401,7 +1530,7 @@ meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
+meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1417,39 +1546,23 @@ meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
+meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1468,36 +1581,7 @@ meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
- meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_96_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un *meltxrestab_);
-
-
-
-
-melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1516,7 +1600,56 @@ meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
+meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_104_warmelt_normatch_LAMBDA___23__ (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG (meltclosure_ptr_t
+ meltclosp_,
+ melt_ptr_t
+ meltfirstargp_,
+ const
+ melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const
+ melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
+
+
+
+
+melt_ptr_t MELT_MODULE_VISIBILITY
+meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1525,22 +1658,22 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_99_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
- melt_ptr_t meltfirstargp_,
- const melt_argdescr_cell_t
- meltxargdescr_[],
- union meltparam_un
- *meltxargtab_,
- const melt_argdescr_cell_t
- meltxresdescr_[],
- union meltparam_un
- *meltxrestab_);
+meltrout_107_warmelt_normatch_MATCH_STEP_INDEX (meltclosure_ptr_t meltclosp_,
+ melt_ptr_t meltfirstargp_,
+ const melt_argdescr_cell_t
+ meltxargdescr_[],
+ union meltparam_un
+ *meltxargtab_,
+ const melt_argdescr_cell_t
+ meltxresdescr_[],
+ union meltparam_un
+ *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
+meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1559,7 +1692,7 @@ meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
+meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1574,7 +1707,7 @@ meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
+meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1589,7 +1722,7 @@ meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
+meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1605,7 +1738,7 @@ meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
+meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1624,7 +1757,7 @@ meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
+meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1643,7 +1776,7 @@ meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
+meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1658,7 +1791,7 @@ meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
+meltrout_115_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1673,7 +1806,7 @@ meltrout_107_warmelt_normatch_NORMSTEP_MGROUP (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
+meltrout_116_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1687,7 +1820,7 @@ meltrout_108_warmelt_normatch_LAMBDA___24__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
+meltrout_117_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1701,7 +1834,7 @@ meltrout_109_warmelt_normatch_LAMBDA___25__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
+meltrout_118_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1715,7 +1848,7 @@ meltrout_110_warmelt_normatch_LAMBDA___26__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
+meltrout_119_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1729,7 +1862,7 @@ meltrout_111_warmelt_normatch_LAMBDA___27__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
+meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1748,7 +1881,7 @@ meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1767,7 +1900,7 @@ meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
+meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1786,7 +1919,7 @@ meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1805,7 +1938,7 @@ meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
+meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1824,7 +1957,7 @@ meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
+meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1843,7 +1976,7 @@ meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
+meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1862,7 +1995,7 @@ meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
+meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1881,7 +2014,7 @@ meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
+meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1890,7 +2023,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
+meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1899,7 +2032,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
+meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT
(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[],
union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[],
union meltparam_un *meltxrestab_);
@@ -1908,7 +2041,7 @@ union meltparam_un *meltxrestab_);
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
+meltrout_131_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1922,7 +2055,7 @@ meltrout_123_warmelt_normatch_LAMBDA___28__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
+meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1937,7 +2070,7 @@ meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
+meltrout_133_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -1951,7 +2084,7 @@ meltrout_125_warmelt_normatch_LAMBDA___29__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
+meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
meltclosp_,
melt_ptr_t
meltfirstargp_,
@@ -1970,7 +2103,7 @@ meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
+meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
@@ -1986,7 +2119,7 @@ meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ (meltclosure_ptr_t
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
+meltrout_136_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2000,7 +2133,7 @@ meltrout_128_warmelt_normatch_LAMBDA___30__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
+meltrout_137_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2014,7 +2147,7 @@ meltrout_129_warmelt_normatch_LAMBDA___31__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
+meltrout_138_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2028,7 +2161,7 @@ meltrout_130_warmelt_normatch_LAMBDA___32__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
+meltrout_139_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2042,7 +2175,7 @@ meltrout_131_warmelt_normatch_LAMBDA___33__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t MELT_MODULE_VISIBILITY
-meltrout_132_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
+meltrout_140_warmelt_normatch_LAMBDA___34__ (meltclosure_ptr_t meltclosp_,
melt_ptr_t meltfirstargp_,
const melt_argdescr_cell_t
meltxargdescr_[],
@@ -2429,7 +2562,13 @@ lab_endgetargs:;
/*_.MYCLASS__V13*/ meltfptr[12] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-normatch.melt:90:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V13*/ meltfptr[12]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -2871,7 +3010,13 @@ lab_endgetargs:;
/*_.MYCLASS__V15*/ meltfptr[14] =
(melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])));;
MELT_LOCATION ("warmelt-normatch.melt:106:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MYCLASS__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MYCLASS__V15*/ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4298,8 +4443,8 @@ typedef struct frame_start_module_melt_st
void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int);
struct excepth_melt_st *mcfr_exh;
struct melt_callframe_st *mcfr_prev;
-#define MELTFRAM_NBVARPTR 1517
- void *mcfr_varptr[1517];
+#define MELTFRAM_NBVARPTR 1544
+ void *mcfr_varptr[1544];
/*no varnum*/
#define MELTFRAM_NBVARNUM /*none*/0
/*others*/
@@ -4317,7 +4462,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
("start initialize_module_meltdata_warmelt_normatch iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -1446);
+ iniframp__->mcfr_nbvar == /*minihash */ -306);
struct cdata_st
{
@@ -4819,884 +4964,902 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
struct MELT_STRING_STRUCT (18) dstr_493__MATCHGRAPHIC_LAB;
struct MELT_OBJECT_STRUCT (4) dobj_494__MATCHGRAPHIC_LABEL;
struct MELT_STRING_STRUCT (18) dstr_495__MATCHGRAPHIC_LAB;
- struct MELT_ROUTINE_STRUCT (7) drout_496__MGLABEL_ANY_TEST;
- struct MELT_CLOSURE_STRUCT (0) dclo_497__MGLABEL_ANY_TEST;
- struct MELT_OBJECT_STRUCT (3) dsym_498__CLASS_CLONED_SYMBOL;
- struct MELT_STRING_STRUCT (19) dstr_499__CLASS_CLONED_SYM;
- struct MELT_ROUTINE_STRUCT (8) drout_500__MGLABEL_INSTANCE_TEST;
- struct MELT_CLOSURE_STRUCT (0) dclo_501__MGLABEL_INSTANCE_TEST;
- struct MELT_ROUTINE_STRUCT (4) drout_502__MGLABEL_SUCCESS_TEST;
- struct MELT_CLOSURE_STRUCT (0) dclo_503__MGLABEL_SUCCESS_TEST;
- struct MELT_ROUTINE_STRUCT (5) drout_504__MATCHGRAPHIC_TESTS;
- struct MELT_CLOSURE_STRUCT (0) dclo_505__MATCHGRAPHIC_TESTS;
- struct MELT_ROUTINE_STRUCT (5) drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE;
- struct MELT_CLOSURE_STRUCT (0) dclo_507__MG_DRAW_MATCH_GRAPHVIZ_FILE;
- struct MELT_OBJECT_STRUCT (3) dsym_508__DISCR_STRBUF;
- struct MELT_STRING_STRUCT (12) dstr_509__DISCR_STRBUF;
- struct MELT_ROUTINE_STRUCT (39) drout_510__NORMEXP_MATCH;
- struct MELT_CLOSURE_STRUCT (0) dclo_511__NORMEXP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_512__CLASS_SOURCE_MATCH;
- struct MELT_STRING_STRUCT (18) dstr_513__CLASS_SOURCE_MAT;
- struct MELT_OBJECT_STRUCT (3) dsym_514__CLASS_ENVIRONMENT;
- struct MELT_STRING_STRUCT (17) dstr_515__CLASS_ENVIRONMEN;
- struct MELT_OBJECT_STRUCT (3) dsym_516__MATCHED_;
- struct MELT_STRING_STRUCT (9) dstr_517__MATCHED_;
- struct MELT_OBJECT_STRUCT (3) dsym_518__CLASS_SOURCE_MATCH_CASE;
- struct MELT_STRING_STRUCT (23) dstr_519__CLASS_SOURCE_MAT;
- struct MELT_ROUTINE_STRUCT (2) drout_520__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_521__WRAP_NORMAL_LETSEQ;
- struct MELT_STRING_STRUCT (18) dstr_522__WRAP_NORMAL_LETS;
- struct MELT_OBJECT_STRUCT (3) dsym_523__CTYPE_VOID;
- struct MELT_STRING_STRUCT (10) dstr_524__CTYPE_VOID;
- struct MELT_OBJECT_STRUCT (3) dsym_525__MATCHRES_;
- struct MELT_STRING_STRUCT (9) dstr_526__MATCHRES_;
- struct MELT_OBJECT_STRUCT (3) dsym_527__CLASS_MATCHING_CONTEXT;
- struct MELT_STRING_STRUCT (22) dstr_528__CLASS_MATCHING_C;
- struct MELT_OBJECT_STRUCT (8) dobj_529__CLASS_MATCHING_CONTEXT;
+ struct MELT_ROUTINE_STRUCT (2) drout_496__MGLABEL_ANY;
+ struct MELT_CLOSURE_STRUCT (0) dclo_497__MGLABEL_ANY;
+ struct MELT_ROUTINE_STRUCT (7) drout_498__MGLABEL_ANY_TEST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_499__MGLABEL_ANY_TEST;
+ struct MELT_OBJECT_STRUCT (3) dsym_500__CLASS_CLONED_SYMBOL;
+ struct MELT_STRING_STRUCT (19) dstr_501__CLASS_CLONED_SYM;
+ struct MELT_ROUTINE_STRUCT (8) drout_502__MGLABEL_INSTANCE_TEST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_503__MGLABEL_INSTANCE_TEST;
+ struct MELT_ROUTINE_STRUCT (4) drout_504__MGLABEL_SUCCESS_TEST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_505__MGLABEL_SUCCESS_TEST;
+ struct MELT_ROUTINE_STRUCT (5) drout_506__MATCHGRAPHIC_TESTS;
+ struct MELT_CLOSURE_STRUCT (0) dclo_507__MATCHGRAPHIC_TESTS;
+ struct MELT_ROUTINE_STRUCT (5) drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE;
+ struct MELT_OBJECT_STRUCT (3) dsym_510__DISCR_STRBUF;
+ struct MELT_STRING_STRUCT (12) dstr_511__DISCR_STRBUF;
+ struct MELT_ROUTINE_STRUCT (39) drout_512__NORMEXP_MATCH;
+ struct MELT_CLOSURE_STRUCT (0) dclo_513__NORMEXP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_514__CLASS_SOURCE_MATCH;
+ struct MELT_STRING_STRUCT (18) dstr_515__CLASS_SOURCE_MAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_516__CLASS_ENVIRONMENT;
+ struct MELT_STRING_STRUCT (17) dstr_517__CLASS_ENVIRONMEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_518__MATCHED_;
+ struct MELT_STRING_STRUCT (9) dstr_519__MATCHED_;
+ struct MELT_OBJECT_STRUCT (3) dsym_520__CLASS_SOURCE_MATCH_CASE;
+ struct MELT_STRING_STRUCT (23) dstr_521__CLASS_SOURCE_MAT;
+ struct MELT_ROUTINE_STRUCT (2) drout_522__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_523__WRAP_NORMAL_LETSEQ;
+ struct MELT_STRING_STRUCT (18) dstr_524__WRAP_NORMAL_LETS;
+ struct MELT_OBJECT_STRUCT (3) dsym_525__CTYPE_VOID;
+ struct MELT_STRING_STRUCT (10) dstr_526__CTYPE_VOID;
+ struct MELT_OBJECT_STRUCT (3) dsym_527__MATCHRES_;
+ struct MELT_STRING_STRUCT (9) dstr_528__MATCHRES_;
+ struct MELT_OBJECT_STRUCT (3) dsym_529__CLASS_MATCHING_CONTEXT;
struct MELT_STRING_STRUCT (22) dstr_530__CLASS_MATCHING_C;
- struct MELT_MULTIPLE_STRUCT (1) dtup_531__CLASS_MATCHING_CONTEXT;
- struct MELT_MULTIPLE_STRUCT (10) dtup_532__CLASS_MATCHING_CONTEXT;
- struct MELT_OBJECT_STRUCT (3) dsym_533__MCTX_NORMCTXT;
- struct MELT_STRING_STRUCT (13) dstr_534__MCTX_NORMCTXT;
- struct MELT_OBJECT_STRUCT (4) dobj_535__MCTX_NORMCTXT;
+ struct MELT_OBJECT_STRUCT (8) dobj_531__CLASS_MATCHING_CONTEXT;
+ struct MELT_STRING_STRUCT (22) dstr_532__CLASS_MATCHING_C;
+ struct MELT_MULTIPLE_STRUCT (1) dtup_533__CLASS_MATCHING_CONTEXT;
+ struct MELT_MULTIPLE_STRUCT (10) dtup_534__CLASS_MATCHING_CONTEXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_535__MCTX_NORMCTXT;
struct MELT_STRING_STRUCT (13) dstr_536__MCTX_NORMCTXT;
- struct MELT_OBJECT_STRUCT (3) dsym_537__MCTX_SOURCE;
- struct MELT_STRING_STRUCT (11) dstr_538__MCTX_SOURCE;
- struct MELT_OBJECT_STRUCT (4) dobj_539__MCTX_SOURCE;
+ struct MELT_OBJECT_STRUCT (4) dobj_537__MCTX_NORMCTXT;
+ struct MELT_STRING_STRUCT (13) dstr_538__MCTX_NORMCTXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_539__MCTX_SOURCE;
struct MELT_STRING_STRUCT (11) dstr_540__MCTX_SOURCE;
- struct MELT_OBJECT_STRUCT (3) dsym_541__MCTX_NMATCHED;
- struct MELT_STRING_STRUCT (13) dstr_542__MCTX_NMATCHED;
- struct MELT_OBJECT_STRUCT (4) dobj_543__MCTX_NMATCHED;
+ struct MELT_OBJECT_STRUCT (4) dobj_541__MCTX_SOURCE;
+ struct MELT_STRING_STRUCT (11) dstr_542__MCTX_SOURCE;
+ struct MELT_OBJECT_STRUCT (3) dsym_543__MCTX_NMATCHED;
struct MELT_STRING_STRUCT (13) dstr_544__MCTX_NMATCHED;
- struct MELT_OBJECT_STRUCT (3) dsym_545__MCTX_NMATBIND;
- struct MELT_STRING_STRUCT (13) dstr_546__MCTX_NMATBIND;
- struct MELT_OBJECT_STRUCT (4) dobj_547__MCTX_NMATBIND;
+ struct MELT_OBJECT_STRUCT (4) dobj_545__MCTX_NMATCHED;
+ struct MELT_STRING_STRUCT (13) dstr_546__MCTX_NMATCHED;
+ struct MELT_OBJECT_STRUCT (3) dsym_547__MCTX_NMATBIND;
struct MELT_STRING_STRUCT (13) dstr_548__MCTX_NMATBIND;
- struct MELT_OBJECT_STRUCT (3) dsym_549__MCTX_CASES;
- struct MELT_STRING_STRUCT (10) dstr_550__MCTX_CASES;
- struct MELT_OBJECT_STRUCT (4) dobj_551__MCTX_CASES;
+ struct MELT_OBJECT_STRUCT (4) dobj_549__MCTX_NMATBIND;
+ struct MELT_STRING_STRUCT (13) dstr_550__MCTX_NMATBIND;
+ struct MELT_OBJECT_STRUCT (3) dsym_551__MCTX_CASES;
struct MELT_STRING_STRUCT (10) dstr_552__MCTX_CASES;
- struct MELT_OBJECT_STRUCT (3) dsym_553__MCTX_ENV;
- struct MELT_STRING_STRUCT (8) dstr_554__MCTX_ENV;
- struct MELT_OBJECT_STRUCT (4) dobj_555__MCTX_ENV;
+ struct MELT_OBJECT_STRUCT (4) dobj_553__MCTX_CASES;
+ struct MELT_STRING_STRUCT (10) dstr_554__MCTX_CASES;
+ struct MELT_OBJECT_STRUCT (3) dsym_555__MCTX_ENV;
struct MELT_STRING_STRUCT (8) dstr_556__MCTX_ENV;
- struct MELT_OBJECT_STRUCT (3) dsym_557__MCTX_MDATA;
- struct MELT_STRING_STRUCT (10) dstr_558__MCTX_MDATA;
- struct MELT_OBJECT_STRUCT (4) dobj_559__MCTX_MDATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_557__MCTX_ENV;
+ struct MELT_STRING_STRUCT (8) dstr_558__MCTX_ENV;
+ struct MELT_OBJECT_STRUCT (3) dsym_559__MCTX_MDATA;
struct MELT_STRING_STRUCT (10) dstr_560__MCTX_MDATA;
- struct MELT_OBJECT_STRUCT (3) dsym_561__MCTX_VARHANDLERS;
- struct MELT_STRING_STRUCT (16) dstr_562__MCTX_VARHANDLERS;
- struct MELT_OBJECT_STRUCT (4) dobj_563__MCTX_VARHANDLERS;
+ struct MELT_OBJECT_STRUCT (4) dobj_561__MCTX_MDATA;
+ struct MELT_STRING_STRUCT (10) dstr_562__MCTX_MDATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_563__MCTX_VARHANDLERS;
struct MELT_STRING_STRUCT (16) dstr_564__MCTX_VARHANDLERS;
- struct MELT_OBJECT_STRUCT (3) dsym_565__MCTX_FLAGS;
- struct MELT_STRING_STRUCT (10) dstr_566__MCTX_FLAGS;
- struct MELT_OBJECT_STRUCT (4) dobj_567__MCTX_FLAGS;
+ struct MELT_OBJECT_STRUCT (4) dobj_565__MCTX_VARHANDLERS;
+ struct MELT_STRING_STRUCT (16) dstr_566__MCTX_VARHANDLERS;
+ struct MELT_OBJECT_STRUCT (3) dsym_567__MCTX_FLAGS;
struct MELT_STRING_STRUCT (10) dstr_568__MCTX_FLAGS;
- struct MELT_OBJECT_STRUCT (3) dsym_569__MCTX_ENDLABEL;
- struct MELT_STRING_STRUCT (13) dstr_570__MCTX_ENDLABEL;
- struct MELT_OBJECT_STRUCT (4) dobj_571__MCTX_ENDLABEL;
+ struct MELT_OBJECT_STRUCT (4) dobj_569__MCTX_FLAGS;
+ struct MELT_STRING_STRUCT (10) dstr_570__MCTX_FLAGS;
+ struct MELT_OBJECT_STRUCT (3) dsym_571__MCTX_ENDLABEL;
struct MELT_STRING_STRUCT (13) dstr_572__MCTX_ENDLABEL;
- struct MELT_OBJECT_STRUCT (3) dsym_573__CLASS_MATCH_CASE;
- struct MELT_STRING_STRUCT (16) dstr_574__CLASS_MATCH_CASE;
- struct MELT_OBJECT_STRUCT (8) dobj_575__CLASS_MATCH_CASE;
+ struct MELT_OBJECT_STRUCT (4) dobj_573__MCTX_ENDLABEL;
+ struct MELT_STRING_STRUCT (13) dstr_574__MCTX_ENDLABEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_575__CLASS_MATCH_CASE;
struct MELT_STRING_STRUCT (16) dstr_576__CLASS_MATCH_CASE;
- struct MELT_MULTIPLE_STRUCT (2) dtup_577__CLASS_MATCH_CASE;
- struct MELT_MULTIPLE_STRUCT (5) dtup_578__CLASS_MATCH_CASE;
- struct MELT_OBJECT_STRUCT (3) dsym_579__MCASE_MCTXT;
- struct MELT_STRING_STRUCT (11) dstr_580__MCASE_MCTXT;
- struct MELT_OBJECT_STRUCT (4) dobj_581__MCASE_MCTXT;
+ struct MELT_OBJECT_STRUCT (8) dobj_577__CLASS_MATCH_CASE;
+ struct MELT_STRING_STRUCT (16) dstr_578__CLASS_MATCH_CASE;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_579__CLASS_MATCH_CASE;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_580__CLASS_MATCH_CASE;
+ struct MELT_OBJECT_STRUCT (3) dsym_581__MCASE_MCTXT;
struct MELT_STRING_STRUCT (11) dstr_582__MCASE_MCTXT;
- struct MELT_OBJECT_STRUCT (3) dsym_583__MCASE_SOURCE;
- struct MELT_STRING_STRUCT (12) dstr_584__MCASE_SOURCE;
- struct MELT_OBJECT_STRUCT (4) dobj_585__MCASE_SOURCE;
+ struct MELT_OBJECT_STRUCT (4) dobj_583__MCASE_MCTXT;
+ struct MELT_STRING_STRUCT (11) dstr_584__MCASE_MCTXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_585__MCASE_SOURCE;
struct MELT_STRING_STRUCT (12) dstr_586__MCASE_SOURCE;
- struct MELT_OBJECT_STRUCT (3) dsym_587__MCASE_INDEX;
- struct MELT_STRING_STRUCT (11) dstr_588__MCASE_INDEX;
- struct MELT_OBJECT_STRUCT (4) dobj_589__MCASE_INDEX;
+ struct MELT_OBJECT_STRUCT (4) dobj_587__MCASE_SOURCE;
+ struct MELT_STRING_STRUCT (12) dstr_588__MCASE_SOURCE;
+ struct MELT_OBJECT_STRUCT (3) dsym_589__MCASE_INDEX;
struct MELT_STRING_STRUCT (11) dstr_590__MCASE_INDEX;
- struct MELT_OBJECT_STRUCT (3) dsym_591__MCASE_VARMAP;
- struct MELT_STRING_STRUCT (12) dstr_592__MCASE_VARMAP;
- struct MELT_OBJECT_STRUCT (4) dobj_593__MCASE_VARMAP;
+ struct MELT_OBJECT_STRUCT (4) dobj_591__MCASE_INDEX;
+ struct MELT_STRING_STRUCT (11) dstr_592__MCASE_INDEX;
+ struct MELT_OBJECT_STRUCT (3) dsym_593__MCASE_VARMAP;
struct MELT_STRING_STRUCT (12) dstr_594__MCASE_VARMAP;
- struct MELT_OBJECT_STRUCT (3) dsym_595__CLASS_MATCHED_DATA;
- struct MELT_STRING_STRUCT (18) dstr_596__CLASS_MATCHED_DA;
- struct MELT_OBJECT_STRUCT (8) dobj_597__CLASS_MATCHED_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_595__MCASE_VARMAP;
+ struct MELT_STRING_STRUCT (12) dstr_596__MCASE_VARMAP;
+ struct MELT_OBJECT_STRUCT (3) dsym_597__CLASS_MATCHED_DATA;
struct MELT_STRING_STRUCT (18) dstr_598__CLASS_MATCHED_DA;
- struct MELT_MULTIPLE_STRUCT (2) dtup_599__CLASS_MATCHED_DATA;
- struct MELT_MULTIPLE_STRUCT (5) dtup_600__CLASS_MATCHED_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_601__MDATA_SYMB;
- struct MELT_STRING_STRUCT (10) dstr_602__MDATA_SYMB;
- struct MELT_OBJECT_STRUCT (4) dobj_603__MDATA_SYMB;
+ struct MELT_OBJECT_STRUCT (8) dobj_599__CLASS_MATCHED_DATA;
+ struct MELT_STRING_STRUCT (18) dstr_600__CLASS_MATCHED_DA;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_601__CLASS_MATCHED_DATA;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_602__CLASS_MATCHED_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_603__MDATA_SYMB;
struct MELT_STRING_STRUCT (10) dstr_604__MDATA_SYMB;
- struct MELT_OBJECT_STRUCT (3) dsym_605__MDATA_CTYPE;
- struct MELT_STRING_STRUCT (11) dstr_606__MDATA_CTYPE;
- struct MELT_OBJECT_STRUCT (4) dobj_607__MDATA_CTYPE;
+ struct MELT_OBJECT_STRUCT (4) dobj_605__MDATA_SYMB;
+ struct MELT_STRING_STRUCT (10) dstr_606__MDATA_SYMB;
+ struct MELT_OBJECT_STRUCT (3) dsym_607__MDATA_CTYPE;
struct MELT_STRING_STRUCT (11) dstr_608__MDATA_CTYPE;
- struct MELT_OBJECT_STRUCT (3) dsym_609__MDATA_ORIG;
- struct MELT_STRING_STRUCT (10) dstr_610__MDATA_ORIG;
- struct MELT_OBJECT_STRUCT (4) dobj_611__MDATA_ORIG;
+ struct MELT_OBJECT_STRUCT (4) dobj_609__MDATA_CTYPE;
+ struct MELT_STRING_STRUCT (11) dstr_610__MDATA_CTYPE;
+ struct MELT_OBJECT_STRUCT (3) dsym_611__MDATA_ORIG;
struct MELT_STRING_STRUCT (10) dstr_612__MDATA_ORIG;
- struct MELT_OBJECT_STRUCT (3) dsym_613__MDATA_STEPS;
- struct MELT_STRING_STRUCT (11) dstr_614__MDATA_STEPS;
- struct MELT_OBJECT_STRUCT (4) dobj_615__MDATA_STEPS;
+ struct MELT_OBJECT_STRUCT (4) dobj_613__MDATA_ORIG;
+ struct MELT_STRING_STRUCT (10) dstr_614__MDATA_ORIG;
+ struct MELT_OBJECT_STRUCT (3) dsym_615__MDATA_STEPS;
struct MELT_STRING_STRUCT (11) dstr_616__MDATA_STEPS;
- struct MELT_OBJECT_STRUCT (3) dsym_617__CLASS_MATCHED_NORMAL_DATA;
- struct MELT_STRING_STRUCT (25) dstr_618__CLASS_MATCHED_NO;
- struct MELT_OBJECT_STRUCT (8) dobj_619__CLASS_MATCHED_NORMAL_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_617__MDATA_STEPS;
+ struct MELT_STRING_STRUCT (11) dstr_618__MDATA_STEPS;
+ struct MELT_OBJECT_STRUCT (3) dsym_619__CLASS_MATCHED_NORMAL_DATA;
struct MELT_STRING_STRUCT (25) dstr_620__CLASS_MATCHED_NO;
- struct MELT_MULTIPLE_STRUCT (3) dtup_621__CLASS_MATCHED_NORMAL_DATA;
- struct MELT_MULTIPLE_STRUCT (5) dtup_622__CLASS_MATCHED_NORMAL_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_623__CLASS_MATCHED_BINDING;
- struct MELT_STRING_STRUCT (21) dstr_624__CLASS_MATCHED_BI;
- struct MELT_OBJECT_STRUCT (8) dobj_625__CLASS_MATCHED_BINDING;
+ struct MELT_OBJECT_STRUCT (8) dobj_621__CLASS_MATCHED_NORMAL_DATA;
+ struct MELT_STRING_STRUCT (25) dstr_622__CLASS_MATCHED_NO;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_623__CLASS_MATCHED_NORMAL_DATA;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_624__CLASS_MATCHED_NORMAL_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_625__CLASS_MATCHED_BINDING;
struct MELT_STRING_STRUCT (21) dstr_626__CLASS_MATCHED_BI;
- struct MELT_MULTIPLE_STRUCT (2) dtup_627__CLASS_MATCHED_BINDING;
- struct MELT_MULTIPLE_STRUCT (3) dtup_628__CLASS_MATCHED_BINDING;
- struct MELT_OBJECT_STRUCT (3) dsym_629__MATCHBIND_DATA;
- struct MELT_STRING_STRUCT (14) dstr_630__MATCHBIND_DATA;
- struct MELT_OBJECT_STRUCT (4) dobj_631__MATCHBIND_DATA;
+ struct MELT_OBJECT_STRUCT (8) dobj_627__CLASS_MATCHED_BINDING;
+ struct MELT_STRING_STRUCT (21) dstr_628__CLASS_MATCHED_BI;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_629__CLASS_MATCHED_BINDING;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_630__CLASS_MATCHED_BINDING;
+ struct MELT_OBJECT_STRUCT (3) dsym_631__MATCHBIND_DATA;
struct MELT_STRING_STRUCT (14) dstr_632__MATCHBIND_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_633__MATCHBIND_NBOCC;
- struct MELT_STRING_STRUCT (15) dstr_634__MATCHBIND_NBOCC;
- struct MELT_OBJECT_STRUCT (4) dobj_635__MATCHBIND_NBOCC;
+ struct MELT_OBJECT_STRUCT (4) dobj_633__MATCHBIND_DATA;
+ struct MELT_STRING_STRUCT (14) dstr_634__MATCHBIND_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_635__MATCHBIND_NBOCC;
struct MELT_STRING_STRUCT (15) dstr_636__MATCHBIND_NBOCC;
- struct MELT_ROUTINE_STRUCT (5) drout_637__NORMBIND_MATCHBIND;
- struct MELT_CLOSURE_STRUCT (0) dclo_638__NORMBIND_MATCHBIND;
- struct MELT_OBJECT_STRUCT (3) dsym_639__NORMALIZE_BINDING;
- struct MELT_STRING_STRUCT (17) dstr_640__NORMALIZE_BINDIN;
- struct MELT_OBJECT_STRUCT (3) dsym_641__CLASS_MATCH_FLAG;
- struct MELT_STRING_STRUCT (16) dstr_642__CLASS_MATCH_FLAG;
- struct MELT_OBJECT_STRUCT (8) dobj_643__CLASS_MATCH_FLAG;
+ struct MELT_OBJECT_STRUCT (4) dobj_637__MATCHBIND_NBOCC;
+ struct MELT_STRING_STRUCT (15) dstr_638__MATCHBIND_NBOCC;
+ struct MELT_ROUTINE_STRUCT (5) drout_639__NORMBIND_MATCHBIND;
+ struct MELT_CLOSURE_STRUCT (0) dclo_640__NORMBIND_MATCHBIND;
+ struct MELT_OBJECT_STRUCT (3) dsym_641__NORMALIZE_BINDING;
+ struct MELT_STRING_STRUCT (17) dstr_642__NORMALIZE_BINDIN;
+ struct MELT_OBJECT_STRUCT (3) dsym_643__CLASS_MATCH_FLAG;
struct MELT_STRING_STRUCT (16) dstr_644__CLASS_MATCH_FLAG;
- struct MELT_MULTIPLE_STRUCT (3) dtup_645__CLASS_MATCH_FLAG;
- struct MELT_MULTIPLE_STRUCT (6) dtup_646__CLASS_MATCH_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_647__MFLAG_SPAT;
- struct MELT_STRING_STRUCT (10) dstr_648__MFLAG_SPAT;
- struct MELT_OBJECT_STRUCT (4) dobj_649__MFLAG_SPAT;
+ struct MELT_OBJECT_STRUCT (8) dobj_645__CLASS_MATCH_FLAG;
+ struct MELT_STRING_STRUCT (16) dstr_646__CLASS_MATCH_FLAG;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_647__CLASS_MATCH_FLAG;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_648__CLASS_MATCH_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_649__MFLAG_SPAT;
struct MELT_STRING_STRUCT (10) dstr_650__MFLAG_SPAT;
- struct MELT_OBJECT_STRUCT (3) dsym_651__MFLAG_RANK;
- struct MELT_STRING_STRUCT (10) dstr_652__MFLAG_RANK;
- struct MELT_OBJECT_STRUCT (4) dobj_653__MFLAG_RANK;
+ struct MELT_OBJECT_STRUCT (4) dobj_651__MFLAG_SPAT;
+ struct MELT_STRING_STRUCT (10) dstr_652__MFLAG_SPAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_653__MFLAG_RANK;
struct MELT_STRING_STRUCT (10) dstr_654__MFLAG_RANK;
- struct MELT_OBJECT_STRUCT (3) dsym_655__MFLAG_STRING;
- struct MELT_STRING_STRUCT (12) dstr_656__MFLAG_STRING;
- struct MELT_OBJECT_STRUCT (4) dobj_657__MFLAG_STRING;
+ struct MELT_OBJECT_STRUCT (4) dobj_655__MFLAG_RANK;
+ struct MELT_STRING_STRUCT (10) dstr_656__MFLAG_RANK;
+ struct MELT_OBJECT_STRUCT (3) dsym_657__MFLAG_STRING;
struct MELT_STRING_STRUCT (12) dstr_658__MFLAG_STRING;
- struct MELT_OBJECT_STRUCT (3) dsym_659__MFLAG_SETSTEP;
- struct MELT_STRING_STRUCT (13) dstr_660__MFLAG_SETSTEP;
- struct MELT_OBJECT_STRUCT (4) dobj_661__MFLAG_SETSTEP;
+ struct MELT_OBJECT_STRUCT (4) dobj_659__MFLAG_STRING;
+ struct MELT_STRING_STRUCT (12) dstr_660__MFLAG_STRING;
+ struct MELT_OBJECT_STRUCT (3) dsym_661__MFLAG_SETSTEP;
struct MELT_STRING_STRUCT (13) dstr_662__MFLAG_SETSTEP;
- struct MELT_OBJECT_STRUCT (3) dsym_663__CLASS_MATCH_STEP;
- struct MELT_STRING_STRUCT (16) dstr_664__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_665__CLASS_MATCH_STEP;
+ struct MELT_OBJECT_STRUCT (4) dobj_663__MFLAG_SETSTEP;
+ struct MELT_STRING_STRUCT (13) dstr_664__MFLAG_SETSTEP;
+ struct MELT_OBJECT_STRUCT (3) dsym_665__CLASS_MATCH_STEP;
struct MELT_STRING_STRUCT (16) dstr_666__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (3) dtup_667__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (2) dtup_668__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (3) dsym_669__CLASS_MATCH_STEP_THEN;
- struct MELT_STRING_STRUCT (21) dstr_670__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_671__CLASS_MATCH_STEP_THEN;
+ struct MELT_OBJECT_STRUCT (8) dobj_667__CLASS_MATCH_STEP;
+ struct MELT_STRING_STRUCT (16) dstr_668__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_669__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_670__CLASS_MATCH_STEP;
+ struct MELT_OBJECT_STRUCT (3) dsym_671__CLASS_MATCH_STEP_THEN;
struct MELT_STRING_STRUCT (21) dstr_672__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (4) dtup_673__CLASS_MATCH_STEP_THEN;
- struct MELT_MULTIPLE_STRUCT (3) dtup_674__CLASS_MATCH_STEP_THEN;
- struct MELT_OBJECT_STRUCT (3) dsym_675__MSTEP_THEN;
- struct MELT_STRING_STRUCT (10) dstr_676__MSTEP_THEN;
- struct MELT_OBJECT_STRUCT (4) dobj_677__MSTEP_THEN;
+ struct MELT_OBJECT_STRUCT (8) dobj_673__CLASS_MATCH_STEP_THEN;
+ struct MELT_STRING_STRUCT (21) dstr_674__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_675__CLASS_MATCH_STEP_THEN;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_676__CLASS_MATCH_STEP_THEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_677__MSTEP_THEN;
struct MELT_STRING_STRUCT (10) dstr_678__MSTEP_THEN;
- struct MELT_OBJECT_STRUCT (3) dsym_679__CLASS_MATCH_STEP_CLEAR;
- struct MELT_STRING_STRUCT (22) dstr_680__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_681__CLASS_MATCH_STEP_CLEAR;
+ struct MELT_OBJECT_STRUCT (4) dobj_679__MSTEP_THEN;
+ struct MELT_STRING_STRUCT (10) dstr_680__MSTEP_THEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_681__CLASS_MATCH_STEP_CLEAR;
struct MELT_STRING_STRUCT (22) dstr_682__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (5) dtup_683__CLASS_MATCH_STEP_CLEAR;
- struct MELT_MULTIPLE_STRUCT (4) dtup_684__CLASS_MATCH_STEP_CLEAR;
- struct MELT_OBJECT_STRUCT (3) dsym_685__MSTEP_CLEARDATA;
- struct MELT_STRING_STRUCT (15) dstr_686__MSTEP_CLEARDATA;
- struct MELT_OBJECT_STRUCT (4) dobj_687__MSTEP_CLEARDATA;
+ struct MELT_OBJECT_STRUCT (8) dobj_683__CLASS_MATCH_STEP_CLEAR;
+ struct MELT_STRING_STRUCT (22) dstr_684__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_685__CLASS_MATCH_STEP_CLEAR;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_686__CLASS_MATCH_STEP_CLEAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_687__MSTEP_CLEARDATA;
struct MELT_STRING_STRUCT (15) dstr_688__MSTEP_CLEARDATA;
- struct MELT_OBJECT_STRUCT (3) dsym_689__CLASS_MATCH_STEP_WITH_FLAG;
- struct MELT_STRING_STRUCT (26) dstr_690__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_691__CLASS_MATCH_STEP_WITH_FLAG;
+ struct MELT_OBJECT_STRUCT (4) dobj_689__MSTEP_CLEARDATA;
+ struct MELT_STRING_STRUCT (15) dstr_690__MSTEP_CLEARDATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_691__CLASS_MATCH_STEP_WITH_FLAG;
struct MELT_STRING_STRUCT (26) dstr_692__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (5) dtup_693__CLASS_MATCH_STEP_WITH_FLAG;
- struct MELT_MULTIPLE_STRUCT (4) dtup_694__CLASS_MATCH_STEP_WITH_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_695__MSTEP_FLAG;
- struct MELT_STRING_STRUCT (10) dstr_696__MSTEP_FLAG;
- struct MELT_OBJECT_STRUCT (4) dobj_697__MSTEP_FLAG;
+ struct MELT_OBJECT_STRUCT (8) dobj_693__CLASS_MATCH_STEP_WITH_FLAG;
+ struct MELT_STRING_STRUCT (26) dstr_694__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_695__CLASS_MATCH_STEP_WITH_FLAG;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_696__CLASS_MATCH_STEP_WITH_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_697__MSTEP_FLAG;
struct MELT_STRING_STRUCT (10) dstr_698__MSTEP_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_699__CLASS_MATCH_STEP_WITH_DATA;
- struct MELT_STRING_STRUCT (26) dstr_700__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_701__CLASS_MATCH_STEP_WITH_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_699__MSTEP_FLAG;
+ struct MELT_STRING_STRUCT (10) dstr_700__MSTEP_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_701__CLASS_MATCH_STEP_WITH_DATA;
struct MELT_STRING_STRUCT (26) dstr_702__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (5) dtup_703__CLASS_MATCH_STEP_WITH_DATA;
- struct MELT_MULTIPLE_STRUCT (5) dtup_704__CLASS_MATCH_STEP_WITH_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_705__MSTEP_DATA;
- struct MELT_STRING_STRUCT (10) dstr_706__MSTEP_DATA;
- struct MELT_OBJECT_STRUCT (4) dobj_707__MSTEP_DATA;
+ struct MELT_OBJECT_STRUCT (8) dobj_703__CLASS_MATCH_STEP_WITH_DATA;
+ struct MELT_STRING_STRUCT (26) dstr_704__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_705__CLASS_MATCH_STEP_WITH_DATA;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_706__CLASS_MATCH_STEP_WITH_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_707__MSTEP_DATA;
struct MELT_STRING_STRUCT (10) dstr_708__MSTEP_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_709__MSTEP_INDEX;
- struct MELT_STRING_STRUCT (11) dstr_710__MSTEP_INDEX;
- struct MELT_OBJECT_STRUCT (4) dobj_711__MSTEP_INDEX;
+ struct MELT_OBJECT_STRUCT (4) dobj_709__MSTEP_DATA;
+ struct MELT_STRING_STRUCT (10) dstr_710__MSTEP_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_711__MSTEP_INDEX;
struct MELT_STRING_STRUCT (11) dstr_712__MSTEP_INDEX;
- struct MELT_OBJECT_STRUCT (3) dsym_713__CLASS_MATCH_STEP_FLAG_SET;
- struct MELT_STRING_STRUCT (25) dstr_714__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_715__CLASS_MATCH_STEP_FLAG_SET;
+ struct MELT_OBJECT_STRUCT (4) dobj_713__MSTEP_INDEX;
+ struct MELT_STRING_STRUCT (11) dstr_714__MSTEP_INDEX;
+ struct MELT_OBJECT_STRUCT (3) dsym_715__CLASS_MATCH_STEP_FLAG_SET;
struct MELT_STRING_STRUCT (25) dstr_716__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (6) dtup_717__CLASS_MATCH_STEP_FLAG_SET;
- struct MELT_MULTIPLE_STRUCT (4) dtup_718__CLASS_MATCH_STEP_FLAG_SET;
- struct MELT_OBJECT_STRUCT (3) dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION;
- struct MELT_STRING_STRUCT (31) dstr_720__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION;
+ struct MELT_OBJECT_STRUCT (8) dobj_717__CLASS_MATCH_STEP_FLAG_SET;
+ struct MELT_STRING_STRUCT (25) dstr_718__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_719__CLASS_MATCH_STEP_FLAG_SET;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_720__CLASS_MATCH_STEP_FLAG_SET;
+ struct MELT_OBJECT_STRUCT (3) dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION;
struct MELT_STRING_STRUCT (31) dstr_722__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (6) dtup_723__CLASS_MATCH_STEP_FLAG_OPERATION;
- struct MELT_MULTIPLE_STRUCT (5) dtup_724__CLASS_MATCH_STEP_FLAG_OPERATION;
- struct MELT_OBJECT_STRUCT (3) dsym_725__MSTEP_FLAGARGS;
- struct MELT_STRING_STRUCT (14) dstr_726__MSTEP_FLAGARGS;
- struct MELT_OBJECT_STRUCT (4) dobj_727__MSTEP_FLAGARGS;
+ struct MELT_OBJECT_STRUCT (8) dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION;
+ struct MELT_STRING_STRUCT (31) dstr_724__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_725__CLASS_MATCH_STEP_FLAG_OPERATION;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_726__CLASS_MATCH_STEP_FLAG_OPERATION;
+ struct MELT_OBJECT_STRUCT (3) dsym_727__MSTEP_FLAGARGS;
struct MELT_STRING_STRUCT (14) dstr_728__MSTEP_FLAGARGS;
- struct MELT_OBJECT_STRUCT (3) dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
- struct MELT_STRING_STRUCT (33) dstr_730__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ struct MELT_OBJECT_STRUCT (4) dobj_729__MSTEP_FLAGARGS;
+ struct MELT_STRING_STRUCT (14) dstr_730__MSTEP_FLAGARGS;
+ struct MELT_OBJECT_STRUCT (3) dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
struct MELT_STRING_STRUCT (33) dstr_732__CLASS_MATCH_STEP;
+ struct MELT_OBJECT_STRUCT (8) dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ struct MELT_STRING_STRUCT (33) dstr_734__CLASS_MATCH_STEP;
struct MELT_MULTIPLE_STRUCT (7)
- dtup_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ dtup_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
struct MELT_MULTIPLE_STRUCT (5)
- dtup_734__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
- struct MELT_OBJECT_STRUCT (3) dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
- struct MELT_STRING_STRUCT (33) dstr_736__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ dtup_736__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ struct MELT_OBJECT_STRUCT (3) dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
struct MELT_STRING_STRUCT (33) dstr_738__CLASS_MATCH_STEP;
+ struct MELT_OBJECT_STRUCT (8) dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ struct MELT_STRING_STRUCT (33) dstr_740__CLASS_MATCH_STEP;
struct MELT_MULTIPLE_STRUCT (7)
- dtup_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ dtup_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
struct MELT_MULTIPLE_STRUCT (5)
- dtup_740__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ dtup_742__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
struct MELT_OBJECT_STRUCT (3)
- dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
- struct MELT_STRING_STRUCT (34) dstr_742__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8)
- dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
struct MELT_STRING_STRUCT (34) dstr_744__CLASS_MATCH_STEP;
+ struct MELT_OBJECT_STRUCT (8)
+ dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ struct MELT_STRING_STRUCT (34) dstr_746__CLASS_MATCH_STEP;
struct MELT_MULTIPLE_STRUCT (6)
- dtup_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ dtup_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
struct MELT_MULTIPLE_STRUCT (7)
- dtup_746__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_747__MSTEPSUCCESS_VAROCC;
- struct MELT_STRING_STRUCT (19) dstr_748__MSTEPSUCCESS_VAR;
- struct MELT_OBJECT_STRUCT (4) dobj_749__MSTEPSUCCESS_VAROCC;
+ dtup_748__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_749__MSTEPSUCCESS_VAROCC;
struct MELT_STRING_STRUCT (19) dstr_750__MSTEPSUCCESS_VAR;
- struct MELT_OBJECT_STRUCT (3) dsym_751__MSTEPSUCCESS_BINDS;
- struct MELT_STRING_STRUCT (18) dstr_752__MSTEPSUCCESS_BIN;
- struct MELT_OBJECT_STRUCT (4) dobj_753__MSTEPSUCCESS_BINDS;
+ struct MELT_OBJECT_STRUCT (4) dobj_751__MSTEPSUCCESS_VAROCC;
+ struct MELT_STRING_STRUCT (19) dstr_752__MSTEPSUCCESS_VAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_753__MSTEPSUCCESS_BINDS;
struct MELT_STRING_STRUCT (18) dstr_754__MSTEPSUCCESS_BIN;
- struct MELT_OBJECT_STRUCT (3) dsym_755__MSTEPSUCCESS_BODY;
- struct MELT_STRING_STRUCT (17) dstr_756__MSTEPSUCCESS_BOD;
- struct MELT_OBJECT_STRUCT (4) dobj_757__MSTEPSUCCESS_BODY;
+ struct MELT_OBJECT_STRUCT (4) dobj_755__MSTEPSUCCESS_BINDS;
+ struct MELT_STRING_STRUCT (18) dstr_756__MSTEPSUCCESS_BIN;
+ struct MELT_OBJECT_STRUCT (3) dsym_757__MSTEPSUCCESS_BODY;
struct MELT_STRING_STRUCT (17) dstr_758__MSTEPSUCCESS_BOD;
- struct MELT_OBJECT_STRUCT (3) dsym_759__CLASS_MATCH_STEP_TEST;
- struct MELT_STRING_STRUCT (21) dstr_760__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_761__CLASS_MATCH_STEP_TEST;
+ struct MELT_OBJECT_STRUCT (4) dobj_759__MSTEPSUCCESS_BODY;
+ struct MELT_STRING_STRUCT (17) dstr_760__MSTEPSUCCESS_BOD;
+ struct MELT_OBJECT_STRUCT (3) dsym_761__CLASS_MATCH_STEP_TEST;
struct MELT_STRING_STRUCT (21) dstr_762__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (6) dtup_763__CLASS_MATCH_STEP_TEST;
- struct MELT_MULTIPLE_STRUCT (6) dtup_764__CLASS_MATCH_STEP_TEST;
- struct MELT_OBJECT_STRUCT (3) dsym_765__MSTEP_ELSE;
- struct MELT_STRING_STRUCT (10) dstr_766__MSTEP_ELSE;
- struct MELT_OBJECT_STRUCT (4) dobj_767__MSTEP_ELSE;
+ struct MELT_OBJECT_STRUCT (8) dobj_763__CLASS_MATCH_STEP_TEST;
+ struct MELT_STRING_STRUCT (21) dstr_764__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_765__CLASS_MATCH_STEP_TEST;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_766__CLASS_MATCH_STEP_TEST;
+ struct MELT_OBJECT_STRUCT (3) dsym_767__MSTEP_ELSE;
struct MELT_STRING_STRUCT (10) dstr_768__MSTEP_ELSE;
- struct MELT_OBJECT_STRUCT (3) dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE;
- struct MELT_STRING_STRUCT (30) dstr_770__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE;
+ struct MELT_OBJECT_STRUCT (4) dobj_769__MSTEP_ELSE;
+ struct MELT_STRING_STRUCT (10) dstr_770__MSTEP_ELSE;
+ struct MELT_OBJECT_STRUCT (3) dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE;
struct MELT_STRING_STRUCT (30) dstr_772__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_773__CLASS_MATCH_STEP_TEST_VARIABLE;
- struct MELT_MULTIPLE_STRUCT (7) dtup_774__CLASS_MATCH_STEP_TEST_VARIABLE;
- struct MELT_OBJECT_STRUCT (3) dsym_775__MSTEPTESTVAR_DATA;
- struct MELT_STRING_STRUCT (17) dstr_776__MSTEPTESTVAR_DAT;
- struct MELT_OBJECT_STRUCT (4) dobj_777__MSTEPTESTVAR_DATA;
+ struct MELT_OBJECT_STRUCT (8) dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE;
+ struct MELT_STRING_STRUCT (30) dstr_774__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_775__CLASS_MATCH_STEP_TEST_VARIABLE;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_776__CLASS_MATCH_STEP_TEST_VARIABLE;
+ struct MELT_OBJECT_STRUCT (3) dsym_777__MSTEPTESTVAR_DATA;
struct MELT_STRING_STRUCT (17) dstr_778__MSTEPTESTVAR_DAT;
- struct MELT_OBJECT_STRUCT (3) dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT;
- struct MELT_STRING_STRUCT (30) dstr_780__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT;
+ struct MELT_OBJECT_STRUCT (4) dobj_779__MSTEPTESTVAR_DATA;
+ struct MELT_STRING_STRUCT (17) dstr_780__MSTEPTESTVAR_DAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT;
struct MELT_STRING_STRUCT (30) dstr_782__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_783__CLASS_MATCH_STEP_TEST_CONSTANT;
- struct MELT_MULTIPLE_STRUCT (8) dtup_784__CLASS_MATCH_STEP_TEST_CONSTANT;
- struct MELT_OBJECT_STRUCT (3) dsym_785__MSTEPTESTCONST_DATA;
- struct MELT_STRING_STRUCT (19) dstr_786__MSTEPTESTCONST_D;
- struct MELT_OBJECT_STRUCT (4) dobj_787__MSTEPTESTCONST_DATA;
+ struct MELT_OBJECT_STRUCT (8) dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT;
+ struct MELT_STRING_STRUCT (30) dstr_784__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_785__CLASS_MATCH_STEP_TEST_CONSTANT;
+ struct MELT_MULTIPLE_STRUCT (8) dtup_786__CLASS_MATCH_STEP_TEST_CONSTANT;
+ struct MELT_OBJECT_STRUCT (3) dsym_787__MSTEPTESTCONST_DATA;
struct MELT_STRING_STRUCT (19) dstr_788__MSTEPTESTCONST_D;
- struct MELT_OBJECT_STRUCT (3) dsym_789__MSTEPTESTCONST_BIND;
- struct MELT_STRING_STRUCT (19) dstr_790__MSTEPTESTCONST_B;
- struct MELT_OBJECT_STRUCT (4) dobj_791__MSTEPTESTCONST_BIND;
+ struct MELT_OBJECT_STRUCT (4) dobj_789__MSTEPTESTCONST_DATA;
+ struct MELT_STRING_STRUCT (19) dstr_790__MSTEPTESTCONST_D;
+ struct MELT_OBJECT_STRUCT (3) dsym_791__MSTEPTESTCONST_BIND;
struct MELT_STRING_STRUCT (19) dstr_792__MSTEPTESTCONST_B;
- struct MELT_OBJECT_STRUCT (3) dsym_793__CLASS_MATCH_STEP_TEST_GROUP;
- struct MELT_STRING_STRUCT (27) dstr_794__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_795__CLASS_MATCH_STEP_TEST_GROUP;
+ struct MELT_OBJECT_STRUCT (4) dobj_793__MSTEPTESTCONST_BIND;
+ struct MELT_STRING_STRUCT (19) dstr_794__MSTEPTESTCONST_B;
+ struct MELT_OBJECT_STRUCT (3) dsym_795__CLASS_MATCH_STEP_TEST_GROUP;
struct MELT_STRING_STRUCT (27) dstr_796__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_797__CLASS_MATCH_STEP_TEST_GROUP;
- struct MELT_MULTIPLE_STRUCT (9) dtup_798__CLASS_MATCH_STEP_TEST_GROUP;
- struct MELT_OBJECT_STRUCT (3) dsym_799__MSTGROUP_START;
- struct MELT_STRING_STRUCT (14) dstr_800__MSTGROUP_START;
- struct MELT_OBJECT_STRUCT (4) dobj_801__MSTGROUP_START;
+ struct MELT_OBJECT_STRUCT (8) dobj_797__CLASS_MATCH_STEP_TEST_GROUP;
+ struct MELT_STRING_STRUCT (27) dstr_798__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_799__CLASS_MATCH_STEP_TEST_GROUP;
+ struct MELT_MULTIPLE_STRUCT (9) dtup_800__CLASS_MATCH_STEP_TEST_GROUP;
+ struct MELT_OBJECT_STRUCT (3) dsym_801__MSTGROUP_START;
struct MELT_STRING_STRUCT (14) dstr_802__MSTGROUP_START;
- struct MELT_OBJECT_STRUCT (3) dsym_803__MSTGROUP_THEN;
- struct MELT_STRING_STRUCT (13) dstr_804__MSTGROUP_THEN;
- struct MELT_OBJECT_STRUCT (4) dobj_805__MSTGROUP_THEN;
+ struct MELT_OBJECT_STRUCT (4) dobj_803__MSTGROUP_START;
+ struct MELT_STRING_STRUCT (14) dstr_804__MSTGROUP_START;
+ struct MELT_OBJECT_STRUCT (3) dsym_805__MSTGROUP_THEN;
struct MELT_STRING_STRUCT (13) dstr_806__MSTGROUP_THEN;
- struct MELT_OBJECT_STRUCT (3) dsym_807__MSTGROUP_ELSE;
- struct MELT_STRING_STRUCT (13) dstr_808__MSTGROUP_ELSE;
- struct MELT_OBJECT_STRUCT (4) dobj_809__MSTGROUP_ELSE;
+ struct MELT_OBJECT_STRUCT (4) dobj_807__MSTGROUP_THEN;
+ struct MELT_STRING_STRUCT (13) dstr_808__MSTGROUP_THEN;
+ struct MELT_OBJECT_STRUCT (3) dsym_809__MSTGROUP_ELSE;
struct MELT_STRING_STRUCT (13) dstr_810__MSTGROUP_ELSE;
- struct MELT_OBJECT_STRUCT (3) dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE;
- struct MELT_STRING_STRUCT (30) dstr_812__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE;
+ struct MELT_OBJECT_STRUCT (4) dobj_811__MSTGROUP_ELSE;
+ struct MELT_STRING_STRUCT (13) dstr_812__MSTGROUP_ELSE;
+ struct MELT_OBJECT_STRUCT (3) dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE;
struct MELT_STRING_STRUCT (30) dstr_814__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_815__CLASS_MATCH_STEP_TEST_INSTANCE;
- struct MELT_MULTIPLE_STRUCT (8) dtup_816__CLASS_MATCH_STEP_TEST_INSTANCE;
- struct MELT_OBJECT_STRUCT (3) dsym_817__MSTINS_CLASS;
- struct MELT_STRING_STRUCT (12) dstr_818__MSTINS_CLASS;
- struct MELT_OBJECT_STRUCT (4) dobj_819__MSTINS_CLASS;
+ struct MELT_OBJECT_STRUCT (8) dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE;
+ struct MELT_STRING_STRUCT (30) dstr_816__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_817__CLASS_MATCH_STEP_TEST_INSTANCE;
+ struct MELT_MULTIPLE_STRUCT (8) dtup_818__CLASS_MATCH_STEP_TEST_INSTANCE;
+ struct MELT_OBJECT_STRUCT (3) dsym_819__MSTINS_CLASS;
struct MELT_STRING_STRUCT (12) dstr_820__MSTINS_CLASS;
- struct MELT_OBJECT_STRUCT (3) dsym_821__MSTINS_SLOTS;
- struct MELT_STRING_STRUCT (12) dstr_822__MSTINS_SLOTS;
- struct MELT_OBJECT_STRUCT (4) dobj_823__MSTINS_SLOTS;
+ struct MELT_OBJECT_STRUCT (4) dobj_821__MSTINS_CLASS;
+ struct MELT_STRING_STRUCT (12) dstr_822__MSTINS_CLASS;
+ struct MELT_OBJECT_STRUCT (3) dsym_823__MSTINS_SLOTS;
struct MELT_STRING_STRUCT (12) dstr_824__MSTINS_SLOTS;
- struct MELT_OBJECT_STRUCT (3) dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE;
- struct MELT_STRING_STRUCT (30) dstr_826__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ struct MELT_OBJECT_STRUCT (4) dobj_825__MSTINS_SLOTS;
+ struct MELT_STRING_STRUCT (12) dstr_826__MSTINS_SLOTS;
+ struct MELT_OBJECT_STRUCT (3) dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE;
struct MELT_STRING_STRUCT (30) dstr_828__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_829__CLASS_MATCH_STEP_TEST_MULTIPLE;
- struct MELT_MULTIPLE_STRUCT (7) dtup_830__CLASS_MATCH_STEP_TEST_MULTIPLE;
- struct MELT_OBJECT_STRUCT (3) dsym_831__MSTTUP_COMPONENTS;
- struct MELT_STRING_STRUCT (17) dstr_832__MSTTUP_COMPONENT;
- struct MELT_OBJECT_STRUCT (4) dobj_833__MSTTUP_COMPONENTS;
+ struct MELT_OBJECT_STRUCT (8) dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ struct MELT_STRING_STRUCT (30) dstr_830__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_831__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_832__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ struct MELT_OBJECT_STRUCT (3) dsym_833__MSTTUP_COMPONENTS;
struct MELT_STRING_STRUCT (17) dstr_834__MSTTUP_COMPONENT;
- struct MELT_OBJECT_STRUCT (3) dsym_835__CLASS_MATCH_STEP_TEST_MATCHER;
- struct MELT_STRING_STRUCT (29) dstr_836__CLASS_MATCH_STEP;
- struct MELT_OBJECT_STRUCT (8) dobj_837__CLASS_MATCH_STEP_TEST_MATCHER;
+ struct MELT_OBJECT_STRUCT (4) dobj_835__MSTTUP_COMPONENTS;
+ struct MELT_STRING_STRUCT (17) dstr_836__MSTTUP_COMPONENT;
+ struct MELT_OBJECT_STRUCT (3) dsym_837__CLASS_MATCH_STEP_TEST_MATCHER;
struct MELT_STRING_STRUCT (29) dstr_838__CLASS_MATCH_STEP;
- struct MELT_MULTIPLE_STRUCT (7) dtup_839__CLASS_MATCH_STEP_TEST_MATCHER;
- struct MELT_MULTIPLE_STRUCT (10) dtup_840__CLASS_MATCH_STEP_TEST_MATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_841__MSTMA_MATCHER;
- struct MELT_STRING_STRUCT (13) dstr_842__MSTMA_MATCHER;
- struct MELT_OBJECT_STRUCT (4) dobj_843__MSTMA_MATCHER;
+ struct MELT_OBJECT_STRUCT (8) dobj_839__CLASS_MATCH_STEP_TEST_MATCHER;
+ struct MELT_STRING_STRUCT (29) dstr_840__CLASS_MATCH_STEP;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_841__CLASS_MATCH_STEP_TEST_MATCHER;
+ struct MELT_MULTIPLE_STRUCT (10) dtup_842__CLASS_MATCH_STEP_TEST_MATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_843__MSTMA_MATCHER;
struct MELT_STRING_STRUCT (13) dstr_844__MSTMA_MATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_845__MSTMA_BINDS;
- struct MELT_STRING_STRUCT (11) dstr_846__MSTMA_BINDS;
- struct MELT_OBJECT_STRUCT (4) dobj_847__MSTMA_BINDS;
+ struct MELT_OBJECT_STRUCT (4) dobj_845__MSTMA_MATCHER;
+ struct MELT_STRING_STRUCT (13) dstr_846__MSTMA_MATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_847__MSTMA_BINDS;
struct MELT_STRING_STRUCT (11) dstr_848__MSTMA_BINDS;
- struct MELT_OBJECT_STRUCT (3) dsym_849__MSTMA_INS;
- struct MELT_STRING_STRUCT (9) dstr_850__MSTMA_INS;
- struct MELT_OBJECT_STRUCT (4) dobj_851__MSTMA_INS;
+ struct MELT_OBJECT_STRUCT (4) dobj_849__MSTMA_BINDS;
+ struct MELT_STRING_STRUCT (11) dstr_850__MSTMA_BINDS;
+ struct MELT_OBJECT_STRUCT (3) dsym_851__MSTMA_INS;
struct MELT_STRING_STRUCT (9) dstr_852__MSTMA_INS;
- struct MELT_OBJECT_STRUCT (3) dsym_853__MSTMA_OUTS;
- struct MELT_STRING_STRUCT (10) dstr_854__MSTMA_OUTS;
- struct MELT_OBJECT_STRUCT (4) dobj_855__MSTMA_OUTS;
+ struct MELT_OBJECT_STRUCT (4) dobj_853__MSTMA_INS;
+ struct MELT_STRING_STRUCT (9) dstr_854__MSTMA_INS;
+ struct MELT_OBJECT_STRUCT (3) dsym_855__MSTMA_OUTS;
struct MELT_STRING_STRUCT (10) dstr_856__MSTMA_OUTS;
- struct MELT_OBJECT_STRUCT (3) dsym_857__CLASS_NREP_MATCH_FLAG;
- struct MELT_STRING_STRUCT (21) dstr_858__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_859__CLASS_NREP_SIMPLE;
- struct MELT_STRING_STRUCT (17) dstr_860__CLASS_NREP_SIMPL;
- struct MELT_OBJECT_STRUCT (8) dobj_861__CLASS_NREP_MATCH_FLAG;
- struct MELT_STRING_STRUCT (21) dstr_862__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (3) dtup_863__CLASS_NREP_MATCH_FLAG;
- struct MELT_MULTIPLE_STRUCT (3) dtup_864__CLASS_NREP_MATCH_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_865__NRPFLA_FLAG;
- struct MELT_STRING_STRUCT (11) dstr_866__NRPFLA_FLAG;
- struct MELT_OBJECT_STRUCT (4) dobj_867__NRPFLA_FLAG;
+ struct MELT_OBJECT_STRUCT (4) dobj_857__MSTMA_OUTS;
+ struct MELT_STRING_STRUCT (10) dstr_858__MSTMA_OUTS;
+ struct MELT_OBJECT_STRUCT (3) dsym_859__CLASS_NREP_MATCH_FLAG;
+ struct MELT_STRING_STRUCT (21) dstr_860__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_861__CLASS_NREP_SIMPLE;
+ struct MELT_STRING_STRUCT (17) dstr_862__CLASS_NREP_SIMPL;
+ struct MELT_OBJECT_STRUCT (8) dobj_863__CLASS_NREP_MATCH_FLAG;
+ struct MELT_STRING_STRUCT (21) dstr_864__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_865__CLASS_NREP_MATCH_FLAG;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_866__CLASS_NREP_MATCH_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_867__NRPFLA_FLAG;
struct MELT_STRING_STRUCT (11) dstr_868__NRPFLA_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_869__NRPFLA_NMATCH;
- struct MELT_STRING_STRUCT (13) dstr_870__NRPFLA_NMATCH;
- struct MELT_OBJECT_STRUCT (4) dobj_871__NRPFLA_NMATCH;
+ struct MELT_OBJECT_STRUCT (4) dobj_869__NRPFLA_FLAG;
+ struct MELT_STRING_STRUCT (11) dstr_870__NRPFLA_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_871__NRPFLA_NMATCH;
struct MELT_STRING_STRUCT (13) dstr_872__NRPFLA_NMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_873__CLASS_NREP_MATCHED_DATA;
- struct MELT_STRING_STRUCT (23) dstr_874__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_875__CLASS_NREP_MATCHED_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_873__NRPFLA_NMATCH;
+ struct MELT_STRING_STRUCT (13) dstr_874__NRPFLA_NMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_875__CLASS_NREP_MATCHED_DATA;
struct MELT_STRING_STRUCT (23) dstr_876__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (3) dtup_877__CLASS_NREP_MATCHED_DATA;
- struct MELT_MULTIPLE_STRUCT (4) dtup_878__CLASS_NREP_MATCHED_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_879__NRMATD_CTYPE;
- struct MELT_STRING_STRUCT (12) dstr_880__NRMATD_CTYPE;
- struct MELT_OBJECT_STRUCT (4) dobj_881__NRMATD_CTYPE;
+ struct MELT_OBJECT_STRUCT (8) dobj_877__CLASS_NREP_MATCHED_DATA;
+ struct MELT_STRING_STRUCT (23) dstr_878__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_879__CLASS_NREP_MATCHED_DATA;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_880__CLASS_NREP_MATCHED_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_881__NRMATD_CTYPE;
struct MELT_STRING_STRUCT (12) dstr_882__NRMATD_CTYPE;
- struct MELT_OBJECT_STRUCT (3) dsym_883__NRMATD_MDATA;
- struct MELT_STRING_STRUCT (12) dstr_884__NRMATD_MDATA;
- struct MELT_OBJECT_STRUCT (4) dobj_885__NRMATD_MDATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_883__NRMATD_CTYPE;
+ struct MELT_STRING_STRUCT (12) dstr_884__NRMATD_CTYPE;
+ struct MELT_OBJECT_STRUCT (3) dsym_885__NRMATD_MDATA;
struct MELT_STRING_STRUCT (12) dstr_886__NRMATD_MDATA;
- struct MELT_OBJECT_STRUCT (3) dsym_887__NRMATD_RANK;
- struct MELT_STRING_STRUCT (11) dstr_888__NRMATD_RANK;
- struct MELT_OBJECT_STRUCT (4) dobj_889__NRMATD_RANK;
+ struct MELT_OBJECT_STRUCT (4) dobj_887__NRMATD_MDATA;
+ struct MELT_STRING_STRUCT (12) dstr_888__NRMATD_MDATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_889__NRMATD_RANK;
struct MELT_STRING_STRUCT (11) dstr_890__NRMATD_RANK;
- struct MELT_ROUTINE_STRUCT (5) drout_891__MAKE_MATCH_FLAG;
- struct MELT_CLOSURE_STRUCT (0) dclo_892__MAKE_MATCH_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_893__SCAN_SUBPATTERNS;
- struct MELT_STRING_STRUCT (16) dstr_894__SCAN_SUBPATTERNS;
- struct MELT_OBJECT_STRUCT (3) dsym_895__RECV;
- struct MELT_STRING_STRUCT (4) dstr_896__RECV;
- struct MELT_OBJECT_STRUCT (2) dobj_897;
- struct MELT_OBJECT_STRUCT (3) dsym_898__FUN;
- struct MELT_STRING_STRUCT (3) dstr_899__FUN;
- struct MELT_OBJECT_STRUCT (2) dobj_900;
- struct MELT_OBJECT_STRUCT (3) dsym_901__CTX;
- struct MELT_STRING_STRUCT (3) dstr_902__CTX;
- struct MELT_OBJECT_STRUCT (2) dobj_903;
- struct MELT_MULTIPLE_STRUCT (3) dtup_904__SCAN_SUBPATTERNS;
- struct MELT_OBJECT_STRUCT (4) dobj_905__SCAN_SUBPATTERNS;
- struct MELT_STRING_STRUCT (16) dstr_906__SCAN_SUBPATTERNS;
- struct MELT_OBJECT_STRUCT (3) dsym_907__SCAN_STEP_DATA;
- struct MELT_STRING_STRUCT (14) dstr_908__SCAN_STEP_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_909__STEP;
- struct MELT_STRING_STRUCT (4) dstr_910__STEP;
- struct MELT_OBJECT_STRUCT (2) dobj_911;
- struct MELT_OBJECT_STRUCT (2) dobj_912;
+ struct MELT_OBJECT_STRUCT (4) dobj_891__NRMATD_RANK;
+ struct MELT_STRING_STRUCT (11) dstr_892__NRMATD_RANK;
+ struct MELT_ROUTINE_STRUCT (5) drout_893__MAKE_MATCH_FLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_894__MAKE_MATCH_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_895__SCAN_SUBPATTERNS;
+ struct MELT_STRING_STRUCT (16) dstr_896__SCAN_SUBPATTERNS;
+ struct MELT_OBJECT_STRUCT (3) dsym_897__RECV;
+ struct MELT_STRING_STRUCT (4) dstr_898__RECV;
+ struct MELT_OBJECT_STRUCT (2) dobj_899;
+ struct MELT_OBJECT_STRUCT (3) dsym_900__FUN;
+ struct MELT_STRING_STRUCT (3) dstr_901__FUN;
+ struct MELT_OBJECT_STRUCT (2) dobj_902;
+ struct MELT_OBJECT_STRUCT (3) dsym_903__CTX;
+ struct MELT_STRING_STRUCT (3) dstr_904__CTX;
+ struct MELT_OBJECT_STRUCT (2) dobj_905;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_906__SCAN_SUBPATTERNS;
+ struct MELT_OBJECT_STRUCT (4) dobj_907__SCAN_SUBPATTERNS;
+ struct MELT_STRING_STRUCT (16) dstr_908__SCAN_SUBPATTERNS;
+ struct MELT_OBJECT_STRUCT (3) dsym_909__SCAN_STEP_DATA;
+ struct MELT_STRING_STRUCT (14) dstr_910__SCAN_STEP_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_911__STEP;
+ struct MELT_STRING_STRUCT (4) dstr_912__STEP;
struct MELT_OBJECT_STRUCT (2) dobj_913;
- struct MELT_MULTIPLE_STRUCT (3) dtup_914__SCAN_STEP_DATA;
- struct MELT_OBJECT_STRUCT (4) dobj_915__SCAN_STEP_DATA;
- struct MELT_STRING_STRUCT (14) dstr_916__SCAN_STEP_DATA;
- struct MELT_OBJECT_STRUCT (3) dsym_917__SCAN_STEP_FLAG;
- struct MELT_STRING_STRUCT (14) dstr_918__SCAN_STEP_FLAG;
- struct MELT_OBJECT_STRUCT (2) dobj_919;
- struct MELT_OBJECT_STRUCT (2) dobj_920;
+ struct MELT_OBJECT_STRUCT (2) dobj_914;
+ struct MELT_OBJECT_STRUCT (2) dobj_915;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_916__SCAN_STEP_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_917__SCAN_STEP_DATA;
+ struct MELT_STRING_STRUCT (14) dstr_918__SCAN_STEP_DATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_919__SCAN_STEP_FLAG;
+ struct MELT_STRING_STRUCT (14) dstr_920__SCAN_STEP_FLAG;
struct MELT_OBJECT_STRUCT (2) dobj_921;
- struct MELT_MULTIPLE_STRUCT (3) dtup_922__SCAN_STEP_FLAG;
- struct MELT_OBJECT_STRUCT (4) dobj_923__SCAN_STEP_FLAG;
- struct MELT_STRING_STRUCT (14) dstr_924__SCAN_STEP_FLAG;
- struct MELT_ROUTINE_STRUCT (1) drout_925__SCANSUBPAT_ANYRECV;
- struct MELT_CLOSURE_STRUCT (0) dclo_926__SCANSUBPAT_ANYRECV;
- struct MELT_ROUTINE_STRUCT (1) drout_927__SCANSUBPAT_NOOP;
- struct MELT_CLOSURE_STRUCT (0) dclo_928__SCANSUBPAT_NOOP;
- struct MELT_ROUTINE_STRUCT (1) drout_929__SCANSUBPAT_OR;
- struct MELT_CLOSURE_STRUCT (0) dclo_930__SCANSUBPAT_OR;
- struct MELT_ROUTINE_STRUCT (1) drout_931__SCANSUBPAT_AND;
- struct MELT_CLOSURE_STRUCT (0) dclo_932__SCANSUBPAT_AND;
- struct MELT_ROUTINE_STRUCT (1) drout_933__SCANSUBPAT_CONSTRUCT;
- struct MELT_CLOSURE_STRUCT (0) dclo_934__SCANSUBPAT_CONSTRUCT;
- struct MELT_ROUTINE_STRUCT (2) drout_935__SCANSUBPAT_OBJECT;
- struct MELT_CLOSURE_STRUCT (0) dclo_936__SCANSUBPAT_OBJECT;
- struct MELT_ROUTINE_STRUCT (1) drout_937__SCANSUBPAT_CONSTRUCT;
- struct MELT_CLOSURE_STRUCT (0) dclo_938__SCANSUBPAT_CONSTRUCT;
- struct MELT_ROUTINE_STRUCT (8) drout_939__FILL_MATCHCASE;
- struct MELT_CLOSURE_STRUCT (0) dclo_940__FILL_MATCHCASE;
- struct MELT_ROUTINE_STRUCT (3) drout_941__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_942__PUT_THEN_MATCH;
- struct MELT_STRING_STRUCT (14) dstr_943__PUT_THEN_MATCH;
- struct MELT_OBJECT_STRUCT (2) dobj_944;
- struct MELT_OBJECT_STRUCT (3) dsym_945__THENSTEP;
- struct MELT_STRING_STRUCT (8) dstr_946__THENSTEP;
- struct MELT_OBJECT_STRUCT (2) dobj_947;
- struct MELT_MULTIPLE_STRUCT (2) dtup_948__PUT_THEN_MATCH;
- struct MELT_OBJECT_STRUCT (4) dobj_949__PUT_THEN_MATCH;
- struct MELT_STRING_STRUCT (14) dstr_950__PUT_THEN_MATCH;
- struct MELT_ROUTINE_STRUCT (3) drout_951__START_STEP;
- struct MELT_CLOSURE_STRUCT (0) dclo_952__START_STEP;
- struct MELT_ROUTINE_STRUCT (6) drout_953__PUTTHEN_MATCHTHEN;
- struct MELT_CLOSURE_STRUCT (0) dclo_954__PUTTHEN_MATCHTHEN;
- struct MELT_ROUTINE_STRUCT (5) drout_955__PUTTHEN_MATCHGROUP;
- struct MELT_CLOSURE_STRUCT (0) dclo_956__PUTTHEN_MATCHGROUP;
- struct MELT_OBJECT_STRUCT (3) dsym_957__PUT_ELSE_MATCH;
- struct MELT_STRING_STRUCT (14) dstr_958__PUT_ELSE_MATCH;
- struct MELT_OBJECT_STRUCT (2) dobj_959;
- struct MELT_OBJECT_STRUCT (3) dsym_960__ELSESTEP;
- struct MELT_STRING_STRUCT (8) dstr_961__ELSESTEP;
- struct MELT_OBJECT_STRUCT (2) dobj_962;
- struct MELT_MULTIPLE_STRUCT (2) dtup_963__PUT_ELSE_MATCH;
- struct MELT_OBJECT_STRUCT (4) dobj_964__PUT_ELSE_MATCH;
- struct MELT_STRING_STRUCT (14) dstr_965__PUT_ELSE_MATCH;
- struct MELT_ROUTINE_STRUCT (5) drout_966__PUTELSE_MATCHSTEPTHEN;
- struct MELT_CLOSURE_STRUCT (0) dclo_967__PUTELSE_MATCHSTEPTHEN;
- struct MELT_ROUTINE_STRUCT (6) drout_968__PUTELSE_MATCHTEST;
- struct MELT_CLOSURE_STRUCT (0) dclo_969__PUTELSE_MATCHTEST;
- struct MELT_ROUTINE_STRUCT (5) drout_970__PUTELSE_MATCHGROUP;
- struct MELT_CLOSURE_STRUCT (0) dclo_971__PUTELSE_MATCHGROUP;
- struct MELT_ROUTINE_STRUCT (1) drout_972__SCANSTEPDATA_TESTINS;
- struct MELT_CLOSURE_STRUCT (0) dclo_973__SCANSTEPDATA_TESTINS;
- struct MELT_ROUTINE_STRUCT (1) drout_974__SCANSTEPDATA_TESTMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_975__SCANSTEPDATA_TESTMATCHER;
- struct MELT_ROUTINE_STRUCT (1) drout_976__SCANSTEPFLAG_STEPWITHFLAG;
- struct MELT_CLOSURE_STRUCT (0) dclo_977__SCANSTEPFLAG_STEPWITHFLAG;
- struct MELT_ROUTINE_STRUCT (1) drout_978__SCANSTEPFLAG_STEPFLAGOPER;
- struct MELT_CLOSURE_STRUCT (0) dclo_979__SCANSTEPFLAG_STEPFLAGOPER;
- struct MELT_OBJECT_STRUCT (3) dsym_980__TRANSLATE_PATTERN;
- struct MELT_STRING_STRUCT (17) dstr_981__TRANSLATE_PATTER;
- struct MELT_OBJECT_STRUCT (2) dobj_982;
- struct MELT_OBJECT_STRUCT (3) dsym_983__MDATA;
- struct MELT_STRING_STRUCT (5) dstr_984__MDATA;
- struct MELT_OBJECT_STRUCT (2) dobj_985;
- struct MELT_OBJECT_STRUCT (3) dsym_986__MCASE;
- struct MELT_STRING_STRUCT (5) dstr_987__MCASE;
- struct MELT_OBJECT_STRUCT (2) dobj_988;
- struct MELT_OBJECT_STRUCT (3) dsym_989__VARMAP;
- struct MELT_STRING_STRUCT (6) dstr_990__VARMAP;
- struct MELT_OBJECT_STRUCT (2) dobj_991;
- struct MELT_OBJECT_STRUCT (3) dsym_992__SLOC;
- struct MELT_STRING_STRUCT (4) dstr_993__SLOC;
- struct MELT_OBJECT_STRUCT (2) dobj_994;
- struct MELT_MULTIPLE_STRUCT (5) dtup_995__TRANSLATE_PATTERN;
- struct MELT_OBJECT_STRUCT (4) dobj_996__TRANSLATE_PATTERN;
- struct MELT_STRING_STRUCT (17) dstr_997__TRANSLATE_PATTER;
- struct MELT_ROUTINE_STRUCT (1) drout_998__TRANSLPAT_ANYRECV;
- struct MELT_CLOSURE_STRUCT (0) dclo_999__TRANSLPAT_ANYRECV;
- struct MELT_ROUTINE_STRUCT (2) drout_1000__TRANSLPAT_JOKERPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1001__TRANSLPAT_JOKERPAT;
- struct MELT_ROUTINE_STRUCT (13) drout_1002__TRANSLPAT_CONSTPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1003__TRANSLPAT_CONSTPAT;
- struct MELT_STRING_STRUCT (16) dstr_1004__constant_pattern;
- struct MELT_ROUTINE_STRUCT (2) drout_1005__TRANSLPAT_LISTPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1006__TRANSLPAT_LISTPAT;
- struct MELT_OBJECT_STRUCT (3) dsym_1007__CLASS_SOURCE_PATTERN_LIST;
- struct MELT_STRING_STRUCT (25) dstr_1008__CLASS_SOURCE_PAT;
- struct MELT_ROUTINE_STRUCT (28) drout_1009__TRANSLPAT_TUPLEPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1010__TRANSLPAT_TUPLEPAT;
- struct MELT_ROUTINE_STRUCT (5) drout_1011__LAMBDA_;
- struct meltint_st dint_1012__;
- struct meltint_st dint_1013__;
- struct meltint_st dint_1014__;
- struct MELT_OBJECT_STRUCT (3) dsym_1015__PATUPLECOMP;
- struct MELT_STRING_STRUCT (11) dstr_1016__PATUPLECOMP;
- struct MELT_STRING_STRUCT (5) dstr_1017__tuple;
- struct MELT_ROUTINE_STRUCT (24) drout_1018__TRANSLPAT_INSPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1019__TRANSLPAT_INSPAT;
- struct MELT_ROUTINE_STRUCT (13) drout_1020__TRANSLPAT_VARPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1021__TRANSLPAT_VARPAT;
- struct MELT_ROUTINE_STRUCT (15) drout_1022__TRANSLPAT_ANDPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1023__TRANSLPAT_ANDPAT;
- struct MELT_STRING_STRUCT (3) dstr_1024__and;
- struct MELT_ROUTINE_STRUCT (26) drout_1025__TRANSLPAT_ORPAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1026__TRANSLPAT_ORPAT;
- struct MELT_STRING_STRUCT (2) dstr_1027__or;
- struct MELT_ROUTINE_STRUCT (3) drout_1028__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (0) drout_1029__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (29) drout_1030__TRANSLPAT_PATMAT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1031__TRANSLPAT_PATMAT;
- struct MELT_OBJECT_STRUCT (3) dsym_1032__MATCHGRAPHIC_ALTSTEP;
- struct MELT_STRING_STRUCT (20) dstr_1033__MATCHGRAPHIC_ALT;
- struct MELT_OBJECT_STRUCT (4) dobj_1034__MATCHGRAPHIC_ALTSTEP;
- struct MELT_STRING_STRUCT (20) dstr_1035__MATCHGRAPHIC_ALT;
- struct MELT_ROUTINE_STRUCT (6) drout_1036__MGALTSTEP_STEPTESTVAR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1037__MGALTSTEP_STEPTESTVAR;
- struct MELT_ROUTINE_STRUCT (8) drout_1038__MGALTSTEP_STEPTESTINST;
- struct MELT_CLOSURE_STRUCT (0) dclo_1039__MGALTSTEP_STEPTESTINST;
- struct MELT_OBJECT_STRUCT (3) dsym_1040__ADD2OUT;
- struct MELT_STRING_STRUCT (7) dstr_1041__ADD2OUT;
- struct MELT_ROUTINE_STRUCT (6) drout_1042__MGALTSTEP_STEPTESTMULT;
- struct MELT_CLOSURE_STRUCT (0) dclo_1043__MGALTSTEP_STEPTESTMULT;
- struct MELT_ROUTINE_STRUCT (5) drout_1044__MGALTSTEP_STEPTESTGROUP;
- struct MELT_CLOSURE_STRUCT (0) dclo_1045__MGALTSTEP_STEPTESTGROUP;
- struct MELT_ROUTINE_STRUCT (8) drout_1046__MGALTSTEP_STEPTESTMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1047__MGALTSTEP_STEPTESTMATCHER;
- struct MELT_ROUTINE_STRUCT (7) drout_1048__MGALTSTEP_STEPSUCCESS;
- struct MELT_CLOSURE_STRUCT (0) dclo_1049__MGALTSTEP_STEPSUCCESS;
- struct MELT_ROUTINE_STRUCT (4) drout_1050__MGALTSTEP_STEPCLEAR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1051__MGALTSTEP_STEPCLEAR;
- struct MELT_ROUTINE_STRUCT (6) drout_1052__MGALTSTEP_STEPFLAGSET;
- struct MELT_CLOSURE_STRUCT (0) dclo_1053__MGALTSTEP_STEPFLAGSET;
- struct MELT_ROUTINE_STRUCT (7) drout_1054__MGALTSTEP_STEPFLAGOPER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1055__MGALTSTEP_STEPFLAGOPER;
- struct MELT_ROUTINE_STRUCT (25) drout_1056__TRANSLATE_MATCHCASE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1057__TRANSLATE_MATCHCASE;
- struct MELT_OBJECT_STRUCT (3) dsym_1058__DISCR_INTEGER;
- struct MELT_STRING_STRUCT (13) dstr_1059__DISCR_INTEGER;
- struct MELT_ROUTINE_STRUCT (2) drout_1060__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1061__COMPARE_NAMED_ALPHA;
- struct MELT_STRING_STRUCT (19) dstr_1062__COMPARE_NAMED_AL;
- struct MELT_OBJECT_STRUCT (3) dsym_1063__CLASS_NREP_ALTMATCH;
- struct MELT_STRING_STRUCT (19) dstr_1064__CLASS_NREP_ALTMA;
- struct MELT_OBJECT_STRUCT (8) dobj_1065__CLASS_NREP_ALTMATCH;
- struct MELT_STRING_STRUCT (19) dstr_1066__CLASS_NREP_ALTMA;
- struct MELT_MULTIPLE_STRUCT (4) dtup_1067__CLASS_NREP_ALTMATCH;
- struct MELT_MULTIPLE_STRUCT (6) dtup_1068__CLASS_NREP_ALTMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1069__NAMATCH_MATCHED;
- struct MELT_STRING_STRUCT (15) dstr_1070__NAMATCH_MATCHED;
- struct MELT_OBJECT_STRUCT (4) dobj_1071__NAMATCH_MATCHED;
- struct MELT_STRING_STRUCT (15) dstr_1072__NAMATCH_MATCHED;
- struct MELT_OBJECT_STRUCT (3) dsym_1073__NAMATCH_RESULT;
- struct MELT_STRING_STRUCT (14) dstr_1074__NAMATCH_RESULT;
- struct MELT_OBJECT_STRUCT (4) dobj_1075__NAMATCH_RESULT;
- struct MELT_STRING_STRUCT (14) dstr_1076__NAMATCH_RESULT;
- struct MELT_OBJECT_STRUCT (3) dsym_1077__NAMATCH_BODY;
- struct MELT_STRING_STRUCT (12) dstr_1078__NAMATCH_BODY;
- struct MELT_OBJECT_STRUCT (4) dobj_1079__NAMATCH_BODY;
- struct MELT_STRING_STRUCT (12) dstr_1080__NAMATCH_BODY;
- struct MELT_OBJECT_STRUCT (3) dsym_1081__NAMATCH_FLAGS;
- struct MELT_STRING_STRUCT (13) dstr_1082__NAMATCH_FLAGS;
- struct MELT_OBJECT_STRUCT (4) dobj_1083__NAMATCH_FLAGS;
- struct MELT_STRING_STRUCT (13) dstr_1084__NAMATCH_FLAGS;
- struct MELT_OBJECT_STRUCT (3) dsym_1085__CLASS_NREP_MATCH_LABEL;
- struct MELT_STRING_STRUCT (22) dstr_1086__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1087__CLASS_NREP_MATCH_LABEL;
- struct MELT_STRING_STRUCT (22) dstr_1088__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (3) dtup_1089__CLASS_NREP_MATCH_LABEL;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1090__CLASS_NREP_MATCH_LABEL;
- struct MELT_OBJECT_STRUCT (3) dsym_1091__NMLAB_STEP;
- struct MELT_STRING_STRUCT (10) dstr_1092__NMLAB_STEP;
- struct MELT_OBJECT_STRUCT (4) dobj_1093__NMLAB_STEP;
- struct MELT_STRING_STRUCT (10) dstr_1094__NMLAB_STEP;
- struct MELT_OBJECT_STRUCT (3) dsym_1095__CLASS_NREP_MATCH_LABEL_END;
- struct MELT_STRING_STRUCT (26) dstr_1096__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1097__CLASS_NREP_MATCH_LABEL_END;
- struct MELT_STRING_STRUCT (26) dstr_1098__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (4) dtup_1099__CLASS_NREP_MATCH_LABEL_END;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1100__CLASS_NREP_MATCH_LABEL_END;
- struct MELT_OBJECT_STRUCT (3) dsym_1101__CLASS_NREP_MATCH_JUMP;
- struct MELT_STRING_STRUCT (21) dstr_1102__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1103__CLASS_NREP_MATCH_JUMP;
- struct MELT_STRING_STRUCT (21) dstr_1104__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (3) dtup_1105__CLASS_NREP_MATCH_JUMP;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1106__CLASS_NREP_MATCH_JUMP;
- struct MELT_OBJECT_STRUCT (3) dsym_1107__NMJMP_LABEL;
- struct MELT_STRING_STRUCT (11) dstr_1108__NMJMP_LABEL;
- struct MELT_OBJECT_STRUCT (4) dobj_1109__NMJMP_LABEL;
- struct MELT_STRING_STRUCT (11) dstr_1110__NMJMP_LABEL;
- struct MELT_OBJECT_STRUCT (3) dsym_1111__CLASS_NREP_MATCH_DATA_ACTION;
- struct MELT_STRING_STRUCT (28) dstr_1112__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1113__CLASS_NREP_MATCH_DATA_ACTION;
- struct MELT_STRING_STRUCT (28) dstr_1114__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (3) dtup_1115__CLASS_NREP_MATCH_DATA_ACTION;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1116__CLASS_NREP_MATCH_DATA_ACTION;
- struct MELT_OBJECT_STRUCT (3) dsym_1117__NMDAC_DATA;
- struct MELT_STRING_STRUCT (10) dstr_1118__NMDAC_DATA;
- struct MELT_OBJECT_STRUCT (4) dobj_1119__NMDAC_DATA;
- struct MELT_STRING_STRUCT (10) dstr_1120__NMDAC_DATA;
+ struct MELT_OBJECT_STRUCT (2) dobj_922;
+ struct MELT_OBJECT_STRUCT (2) dobj_923;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_924__SCAN_STEP_FLAG;
+ struct MELT_OBJECT_STRUCT (4) dobj_925__SCAN_STEP_FLAG;
+ struct MELT_STRING_STRUCT (14) dstr_926__SCAN_STEP_FLAG;
+ struct MELT_ROUTINE_STRUCT (1) drout_927__SCANSUBPAT_ANYRECV;
+ struct MELT_CLOSURE_STRUCT (0) dclo_928__SCANSUBPAT_ANYRECV;
+ struct MELT_ROUTINE_STRUCT (1) drout_929__SCANSTEPDATA_ANYRECV;
+ struct MELT_CLOSURE_STRUCT (0) dclo_930__SCANSTEPDATA_ANYRECV;
+ struct MELT_ROUTINE_STRUCT (1) drout_931__SCANSTEPFLAG_ANYRECV;
+ struct MELT_CLOSURE_STRUCT (0) dclo_932__SCANSTEPFLAG_ANYRECV;
+ struct MELT_ROUTINE_STRUCT (1) drout_933__SCANSUBPAT_NOOP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_934__SCANSUBPAT_NOOP;
+ struct MELT_ROUTINE_STRUCT (1) drout_935__SCANSUBPAT_OR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_936__SCANSUBPAT_OR;
+ struct MELT_ROUTINE_STRUCT (1) drout_937__SCANSUBPAT_AND;
+ struct MELT_CLOSURE_STRUCT (0) dclo_938__SCANSUBPAT_AND;
+ struct MELT_ROUTINE_STRUCT (2) drout_939__SCANSUBPAT_CONSTRUCT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_940__SCANSUBPAT_CONSTRUCT;
+ struct MELT_ROUTINE_STRUCT (2) drout_941__SCANSUBPAT_OBJECT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_942__SCANSUBPAT_OBJECT;
+ struct MELT_ROUTINE_STRUCT (8) drout_943__FILL_MATCHCASE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_944__FILL_MATCHCASE;
+ struct MELT_ROUTINE_STRUCT (4) drout_945__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_946__PUT_THEN_MATCH;
+ struct MELT_STRING_STRUCT (14) dstr_947__PUT_THEN_MATCH;
+ struct MELT_OBJECT_STRUCT (2) dobj_948;
+ struct MELT_OBJECT_STRUCT (3) dsym_949__THENSTEP;
+ struct MELT_STRING_STRUCT (8) dstr_950__THENSTEP;
+ struct MELT_OBJECT_STRUCT (2) dobj_951;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_952__PUT_THEN_MATCH;
+ struct MELT_OBJECT_STRUCT (4) dobj_953__PUT_THEN_MATCH;
+ struct MELT_STRING_STRUCT (14) dstr_954__PUT_THEN_MATCH;
+ struct MELT_ROUTINE_STRUCT (2) drout_955__PUTTHEN_MATCHANY;
+ struct MELT_CLOSURE_STRUCT (0) dclo_956__PUTTHEN_MATCHANY;
+ struct MELT_ROUTINE_STRUCT (3) drout_957__START_STEP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_958__START_STEP;
+ struct MELT_ROUTINE_STRUCT (6) drout_959__PUTTHEN_MATCHTHEN;
+ struct MELT_CLOSURE_STRUCT (0) dclo_960__PUTTHEN_MATCHTHEN;
+ struct MELT_ROUTINE_STRUCT (5) drout_961__PUTTHEN_MATCHGROUP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_962__PUTTHEN_MATCHGROUP;
+ struct MELT_OBJECT_STRUCT (3) dsym_963__PUT_ELSE_MATCH;
+ struct MELT_STRING_STRUCT (14) dstr_964__PUT_ELSE_MATCH;
+ struct MELT_OBJECT_STRUCT (2) dobj_965;
+ struct MELT_OBJECT_STRUCT (3) dsym_966__ELSESTEP;
+ struct MELT_STRING_STRUCT (8) dstr_967__ELSESTEP;
+ struct MELT_OBJECT_STRUCT (2) dobj_968;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_969__PUT_ELSE_MATCH;
+ struct MELT_OBJECT_STRUCT (4) dobj_970__PUT_ELSE_MATCH;
+ struct MELT_STRING_STRUCT (14) dstr_971__PUT_ELSE_MATCH;
+ struct MELT_ROUTINE_STRUCT (2) drout_972__PUTELSE_MATCHANY;
+ struct MELT_CLOSURE_STRUCT (0) dclo_973__PUTELSE_MATCHANY;
+ struct MELT_ROUTINE_STRUCT (5) drout_974__PUTELSE_MATCHSTEPTHEN;
+ struct MELT_CLOSURE_STRUCT (0) dclo_975__PUTELSE_MATCHSTEPTHEN;
+ struct MELT_ROUTINE_STRUCT (6) drout_976__PUTELSE_MATCHTEST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_977__PUTELSE_MATCHTEST;
+ struct MELT_ROUTINE_STRUCT (5) drout_978__PUTELSE_MATCHGROUP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_979__PUTELSE_MATCHGROUP;
+ struct MELT_ROUTINE_STRUCT (2) drout_980__SCANSTEPDATA_TESTINS;
+ struct MELT_CLOSURE_STRUCT (0) dclo_981__SCANSTEPDATA_TESTINS;
+ struct MELT_ROUTINE_STRUCT (2) drout_982__SCANSTEPDATA_TESTTUPLE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_983__SCANSTEPDATA_TESTTUPLE;
+ struct MELT_ROUTINE_STRUCT (1) drout_984__SCANSTEPDATA_TESTWITHFLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_985__SCANSTEPDATA_TESTWITHFLAG;
+ struct MELT_ROUTINE_STRUCT (1) drout_986__SCANSTEPDATA_TESTMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_987__SCANSTEPDATA_TESTMATCHER;
+ struct MELT_ROUTINE_STRUCT (1) drout_988__SCANSTEPFLAG_STEPWITHFLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_989__SCANSTEPFLAG_STEPWITHFLAG;
+ struct MELT_ROUTINE_STRUCT (1) drout_990__SCANSTEPFLAG_STEPFLAGOPER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_991__SCANSTEPFLAG_STEPFLAGOPER;
+ struct MELT_ROUTINE_STRUCT (2) drout_992__SCANSTEPFLAG_STEPWITHDATA;
+ struct MELT_CLOSURE_STRUCT (0) dclo_993__SCANSTEPFLAG_STEPWITHDATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_994__TRANSLATE_PATTERN;
+ struct MELT_STRING_STRUCT (17) dstr_995__TRANSLATE_PATTER;
+ struct MELT_OBJECT_STRUCT (2) dobj_996;
+ struct MELT_OBJECT_STRUCT (3) dsym_997__MDATA;
+ struct MELT_STRING_STRUCT (5) dstr_998__MDATA;
+ struct MELT_OBJECT_STRUCT (2) dobj_999;
+ struct MELT_OBJECT_STRUCT (3) dsym_1000__MCASE;
+ struct MELT_STRING_STRUCT (5) dstr_1001__MCASE;
+ struct MELT_OBJECT_STRUCT (2) dobj_1002;
+ struct MELT_OBJECT_STRUCT (3) dsym_1003__VARMAP;
+ struct MELT_STRING_STRUCT (6) dstr_1004__VARMAP;
+ struct MELT_OBJECT_STRUCT (2) dobj_1005;
+ struct MELT_OBJECT_STRUCT (3) dsym_1006__SLOC;
+ struct MELT_STRING_STRUCT (4) dstr_1007__SLOC;
+ struct MELT_OBJECT_STRUCT (2) dobj_1008;
+ struct MELT_MULTIPLE_STRUCT (5) dtup_1009__TRANSLATE_PATTERN;
+ struct MELT_OBJECT_STRUCT (4) dobj_1010__TRANSLATE_PATTERN;
+ struct MELT_STRING_STRUCT (17) dstr_1011__TRANSLATE_PATTER;
+ struct MELT_ROUTINE_STRUCT (1) drout_1012__TRANSLPAT_ANYRECV;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1013__TRANSLPAT_ANYRECV;
+ struct MELT_ROUTINE_STRUCT (2) drout_1014__TRANSLPAT_JOKERPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1015__TRANSLPAT_JOKERPAT;
+ struct MELT_ROUTINE_STRUCT (13) drout_1016__TRANSLPAT_CONSTPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1017__TRANSLPAT_CONSTPAT;
+ struct MELT_STRING_STRUCT (16) dstr_1018__constant_pattern;
+ struct MELT_ROUTINE_STRUCT (2) drout_1019__TRANSLPAT_LISTPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1020__TRANSLPAT_LISTPAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1021__CLASS_SOURCE_PATTERN_LIST;
+ struct MELT_STRING_STRUCT (25) dstr_1022__CLASS_SOURCE_PAT;
+ struct MELT_ROUTINE_STRUCT (28) drout_1023__TRANSLPAT_TUPLEPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1024__TRANSLPAT_TUPLEPAT;
+ struct MELT_ROUTINE_STRUCT (5) drout_1025__LAMBDA_;
+ struct meltint_st dint_1026__;
+ struct meltint_st dint_1027__;
+ struct meltint_st dint_1028__;
+ struct MELT_OBJECT_STRUCT (3) dsym_1029__PATUPLECOMP;
+ struct MELT_STRING_STRUCT (11) dstr_1030__PATUPLECOMP;
+ struct MELT_STRING_STRUCT (5) dstr_1031__tuple;
+ struct MELT_ROUTINE_STRUCT (24) drout_1032__TRANSLPAT_INSPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1033__TRANSLPAT_INSPAT;
+ struct MELT_ROUTINE_STRUCT (13) drout_1034__TRANSLPAT_VARPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1035__TRANSLPAT_VARPAT;
+ struct MELT_ROUTINE_STRUCT (15) drout_1036__TRANSLPAT_ANDPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1037__TRANSLPAT_ANDPAT;
+ struct MELT_STRING_STRUCT (3) dstr_1038__and;
+ struct MELT_ROUTINE_STRUCT (26) drout_1039__TRANSLPAT_ORPAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1040__TRANSLPAT_ORPAT;
+ struct MELT_STRING_STRUCT (2) dstr_1041__or;
+ struct MELT_ROUTINE_STRUCT (3) drout_1042__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (0) drout_1043__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (29) drout_1044__TRANSLPAT_PATMAT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1045__TRANSLPAT_PATMAT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1046__MATCHGRAPHIC_ALTSTEP;
+ struct MELT_STRING_STRUCT (20) dstr_1047__MATCHGRAPHIC_ALT;
+ struct MELT_OBJECT_STRUCT (4) dobj_1048__MATCHGRAPHIC_ALTSTEP;
+ struct MELT_STRING_STRUCT (20) dstr_1049__MATCHGRAPHIC_ALT;
+ struct MELT_ROUTINE_STRUCT (2) drout_1050__MGALTSTEP_ANY;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1051__MGALTSTEP_ANY;
+ struct MELT_ROUTINE_STRUCT (6) drout_1052__MGALTSTEP_STEPTESTVAR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1053__MGALTSTEP_STEPTESTVAR;
+ struct MELT_ROUTINE_STRUCT (8) drout_1054__MGALTSTEP_STEPTESTINST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1055__MGALTSTEP_STEPTESTINST;
+ struct MELT_OBJECT_STRUCT (3) dsym_1056__ADD2OUT;
+ struct MELT_STRING_STRUCT (7) dstr_1057__ADD2OUT;
+ struct MELT_ROUTINE_STRUCT (6) drout_1058__MGALTSTEP_STEPTESTMULT;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1059__MGALTSTEP_STEPTESTMULT;
+ struct MELT_ROUTINE_STRUCT (5) drout_1060__MGALTSTEP_STEPTESTGROUP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1061__MGALTSTEP_STEPTESTGROUP;
+ struct MELT_ROUTINE_STRUCT (8) drout_1062__MGALTSTEP_STEPTESTMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1063__MGALTSTEP_STEPTESTMATCHER;
+ struct MELT_ROUTINE_STRUCT (7) drout_1064__MGALTSTEP_STEPSUCCESS;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1065__MGALTSTEP_STEPSUCCESS;
+ struct MELT_ROUTINE_STRUCT (4) drout_1066__MGALTSTEP_STEPCLEAR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1067__MGALTSTEP_STEPCLEAR;
+ struct MELT_ROUTINE_STRUCT (6) drout_1068__MGALTSTEP_STEPFLAGSET;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1069__MGALTSTEP_STEPFLAGSET;
+ struct MELT_ROUTINE_STRUCT (7) drout_1070__MGALTSTEP_STEPFLAGOPER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1071__MGALTSTEP_STEPFLAGOPER;
+ struct MELT_ROUTINE_STRUCT (25) drout_1072__TRANSLATE_MATCHCASE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1073__TRANSLATE_MATCHCASE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1074__DISCR_INTEGER;
+ struct MELT_STRING_STRUCT (13) dstr_1075__DISCR_INTEGER;
+ struct MELT_ROUTINE_STRUCT (2) drout_1076__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1077__COMPARE_NAMED_ALPHA;
+ struct MELT_STRING_STRUCT (19) dstr_1078__COMPARE_NAMED_AL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1079__CLASS_NREP_ALTMATCH;
+ struct MELT_STRING_STRUCT (19) dstr_1080__CLASS_NREP_ALTMA;
+ struct MELT_OBJECT_STRUCT (8) dobj_1081__CLASS_NREP_ALTMATCH;
+ struct MELT_STRING_STRUCT (19) dstr_1082__CLASS_NREP_ALTMA;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_1083__CLASS_NREP_ALTMATCH;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_1084__CLASS_NREP_ALTMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1085__NAMATCH_MATCHED;
+ struct MELT_STRING_STRUCT (15) dstr_1086__NAMATCH_MATCHED;
+ struct MELT_OBJECT_STRUCT (4) dobj_1087__NAMATCH_MATCHED;
+ struct MELT_STRING_STRUCT (15) dstr_1088__NAMATCH_MATCHED;
+ struct MELT_OBJECT_STRUCT (3) dsym_1089__NAMATCH_RESULT;
+ struct MELT_STRING_STRUCT (14) dstr_1090__NAMATCH_RESULT;
+ struct MELT_OBJECT_STRUCT (4) dobj_1091__NAMATCH_RESULT;
+ struct MELT_STRING_STRUCT (14) dstr_1092__NAMATCH_RESULT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1093__NAMATCH_BODY;
+ struct MELT_STRING_STRUCT (12) dstr_1094__NAMATCH_BODY;
+ struct MELT_OBJECT_STRUCT (4) dobj_1095__NAMATCH_BODY;
+ struct MELT_STRING_STRUCT (12) dstr_1096__NAMATCH_BODY;
+ struct MELT_OBJECT_STRUCT (3) dsym_1097__NAMATCH_FLAGS;
+ struct MELT_STRING_STRUCT (13) dstr_1098__NAMATCH_FLAGS;
+ struct MELT_OBJECT_STRUCT (4) dobj_1099__NAMATCH_FLAGS;
+ struct MELT_STRING_STRUCT (13) dstr_1100__NAMATCH_FLAGS;
+ struct MELT_OBJECT_STRUCT (3) dsym_1101__CLASS_NREP_MATCH_LABEL;
+ struct MELT_STRING_STRUCT (22) dstr_1102__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1103__CLASS_NREP_MATCH_LABEL;
+ struct MELT_STRING_STRUCT (22) dstr_1104__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_1105__CLASS_NREP_MATCH_LABEL;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1106__CLASS_NREP_MATCH_LABEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1107__NMLAB_STEP;
+ struct MELT_STRING_STRUCT (10) dstr_1108__NMLAB_STEP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1109__NMLAB_STEP;
+ struct MELT_STRING_STRUCT (10) dstr_1110__NMLAB_STEP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1111__CLASS_NREP_MATCH_LABEL_END;
+ struct MELT_STRING_STRUCT (26) dstr_1112__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1113__CLASS_NREP_MATCH_LABEL_END;
+ struct MELT_STRING_STRUCT (26) dstr_1114__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_1115__CLASS_NREP_MATCH_LABEL_END;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1116__CLASS_NREP_MATCH_LABEL_END;
+ struct MELT_OBJECT_STRUCT (3) dsym_1117__CLASS_NREP_MATCH_JUMP;
+ struct MELT_STRING_STRUCT (21) dstr_1118__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1119__CLASS_NREP_MATCH_JUMP;
+ struct MELT_STRING_STRUCT (21) dstr_1120__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_1121__CLASS_NREP_MATCH_JUMP;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1122__CLASS_NREP_MATCH_JUMP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1123__NMJMP_LABEL;
+ struct MELT_STRING_STRUCT (11) dstr_1124__NMJMP_LABEL;
+ struct MELT_OBJECT_STRUCT (4) dobj_1125__NMJMP_LABEL;
+ struct MELT_STRING_STRUCT (11) dstr_1126__NMJMP_LABEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1127__CLASS_NREP_MATCH_DATA_ACTION;
+ struct MELT_STRING_STRUCT (28) dstr_1128__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1129__CLASS_NREP_MATCH_DATA_ACTION;
+ struct MELT_STRING_STRUCT (28) dstr_1130__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_1131__CLASS_NREP_MATCH_DATA_ACTION;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1132__CLASS_NREP_MATCH_DATA_ACTION;
+ struct MELT_OBJECT_STRUCT (3) dsym_1133__NMDAC_DATA;
+ struct MELT_STRING_STRUCT (10) dstr_1134__NMDAC_DATA;
+ struct MELT_OBJECT_STRUCT (4) dobj_1135__NMDAC_DATA;
+ struct MELT_STRING_STRUCT (10) dstr_1136__NMDAC_DATA;
struct MELT_OBJECT_STRUCT (3)
- dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER;
- struct MELT_STRING_STRUCT (33) dstr_1122__CLASS_NREP_MATCH;
+ dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ struct MELT_STRING_STRUCT (33) dstr_1138__CLASS_NREP_MATCH;
struct MELT_OBJECT_STRUCT (8)
- dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER;
- struct MELT_STRING_STRUCT (33) dstr_1124__CLASS_NREP_MATCH;
+ dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ struct MELT_STRING_STRUCT (33) dstr_1140__CLASS_NREP_MATCH;
struct MELT_MULTIPLE_STRUCT (4)
- dtup_1125__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ dtup_1141__CLASS_NREP_MATCH_DATA_INITIALIZER;
struct MELT_MULTIPLE_STRUCT (2)
- dtup_1126__CLASS_NREP_MATCH_DATA_INITIALIZER;
- struct MELT_OBJECT_STRUCT (3) dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR;
- struct MELT_STRING_STRUCT (27) dstr_1128__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR;
- struct MELT_STRING_STRUCT (27) dstr_1130__CLASS_NREP_MATCH;
- struct MELT_MULTIPLE_STRUCT (4) dtup_1131__CLASS_NREP_MATCH_DATA_CLEAR;
- struct MELT_MULTIPLE_STRUCT (2) dtup_1132__CLASS_NREP_MATCH_DATA_CLEAR;
- struct MELT_OBJECT_STRUCT (3) dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER;
- struct MELT_STRING_STRUCT (31) dstr_1134__CLASS_NREP_MATCH;
- struct MELT_OBJECT_STRUCT (8) dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER;
- struct MELT_STRING_STRUCT (31) dstr_1136__CLASS_NREP_MATCH;
+ dtup_1142__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR;
+ struct MELT_STRING_STRUCT (27) dstr_1144__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR;
+ struct MELT_STRING_STRUCT (27) dstr_1146__CLASS_NREP_MATCH;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_1147__CLASS_NREP_MATCH_DATA_CLEAR;
+ struct MELT_MULTIPLE_STRUCT (2) dtup_1148__CLASS_NREP_MATCH_DATA_CLEAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER;
+ struct MELT_STRING_STRUCT (31) dstr_1150__CLASS_NREP_MATCH;
+ struct MELT_OBJECT_STRUCT (8) dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER;
+ struct MELT_STRING_STRUCT (31) dstr_1152__CLASS_NREP_MATCH;
struct MELT_MULTIPLE_STRUCT (4)
- dtup_1137__CLASS_NREP_MATCH_DATA_FINALIZER;
+ dtup_1153__CLASS_NREP_MATCH_DATA_FINALIZER;
struct MELT_MULTIPLE_STRUCT (2)
- dtup_1138__CLASS_NREP_MATCH_DATA_FINALIZER;
- struct MELT_OBJECT_STRUCT (3) dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A;
- struct MELT_STRING_STRUCT (25) dstr_1140__CLASS_NREP_JUMP_;
- struct MELT_OBJECT_STRUCT (8) dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A;
- struct MELT_STRING_STRUCT (25) dstr_1142__CLASS_NREP_JUMP_;
- struct MELT_MULTIPLE_STRUCT (3) dtup_1143__CLASS_NREP_JUMP_WHEN_IS_A;
- struct MELT_MULTIPLE_STRUCT (4) dtup_1144__CLASS_NREP_JUMP_WHEN_IS_A;
- struct MELT_OBJECT_STRUCT (3) dsym_1145__NTESTISA_VALUE;
- struct MELT_STRING_STRUCT (14) dstr_1146__NTESTISA_VALUE;
- struct MELT_OBJECT_STRUCT (4) dobj_1147__NTESTISA_VALUE;
- struct MELT_STRING_STRUCT (14) dstr_1148__NTESTISA_VALUE;
- struct MELT_OBJECT_STRUCT (3) dsym_1149__NTESTISA_CLASS;
- struct MELT_STRING_STRUCT (14) dstr_1150__NTESTISA_CLASS;
- struct MELT_OBJECT_STRUCT (4) dobj_1151__NTESTISA_CLASS;
- struct MELT_STRING_STRUCT (14) dstr_1152__NTESTISA_CLASS;
- struct MELT_OBJECT_STRUCT (3) dsym_1153__NTESTISA_JUMP;
- struct MELT_STRING_STRUCT (13) dstr_1154__NTESTISA_JUMP;
- struct MELT_OBJECT_STRUCT (4) dobj_1155__NTESTISA_JUMP;
- struct MELT_STRING_STRUCT (13) dstr_1156__NTESTISA_JUMP;
+ dtup_1154__CLASS_NREP_MATCH_DATA_FINALIZER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A;
+ struct MELT_STRING_STRUCT (25) dstr_1156__CLASS_NREP_JUMP_;
+ struct MELT_OBJECT_STRUCT (8) dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A;
+ struct MELT_STRING_STRUCT (25) dstr_1158__CLASS_NREP_JUMP_;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_1159__CLASS_NREP_JUMP_WHEN_IS_A;
+ struct MELT_MULTIPLE_STRUCT (4) dtup_1160__CLASS_NREP_JUMP_WHEN_IS_A;
+ struct MELT_OBJECT_STRUCT (3) dsym_1161__NTESTISA_VALUE;
+ struct MELT_STRING_STRUCT (14) dstr_1162__NTESTISA_VALUE;
+ struct MELT_OBJECT_STRUCT (4) dobj_1163__NTESTISA_VALUE;
+ struct MELT_STRING_STRUCT (14) dstr_1164__NTESTISA_VALUE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1165__NTESTISA_CLASS;
+ struct MELT_STRING_STRUCT (14) dstr_1166__NTESTISA_CLASS;
+ struct MELT_OBJECT_STRUCT (4) dobj_1167__NTESTISA_CLASS;
+ struct MELT_STRING_STRUCT (14) dstr_1168__NTESTISA_CLASS;
+ struct MELT_OBJECT_STRUCT (3) dsym_1169__NTESTISA_JUMP;
+ struct MELT_STRING_STRUCT (13) dstr_1170__NTESTISA_JUMP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1171__NTESTISA_JUMP;
+ struct MELT_STRING_STRUCT (13) dstr_1172__NTESTISA_JUMP;
struct MELT_OBJECT_STRUCT (3)
- dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT;
- struct MELT_STRING_STRUCT (33) dstr_1158__CLASS_MATCH_NORM;
+ dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ struct MELT_STRING_STRUCT (33) dstr_1174__CLASS_MATCH_NORM;
struct MELT_OBJECT_STRUCT (8)
- dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT;
- struct MELT_STRING_STRUCT (33) dstr_1160__CLASS_MATCH_NORM;
+ dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ struct MELT_STRING_STRUCT (33) dstr_1176__CLASS_MATCH_NORM;
struct MELT_MULTIPLE_STRUCT (1)
- dtup_1161__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ dtup_1177__CLASS_MATCH_NORMALIZATION_CONTEXT;
struct MELT_MULTIPLE_STRUCT (10)
- dtup_1162__CLASS_MATCH_NORMALIZATION_CONTEXT;
- struct MELT_OBJECT_STRUCT (3) dsym_1163__MATNORX_RESLOC;
- struct MELT_STRING_STRUCT (14) dstr_1164__MATNORX_RESLOC;
- struct MELT_OBJECT_STRUCT (4) dobj_1165__MATNORX_RESLOC;
- struct MELT_STRING_STRUCT (14) dstr_1166__MATNORX_RESLOC;
- struct MELT_OBJECT_STRUCT (3) dsym_1167__MATNORX_NMATCH;
- struct MELT_STRING_STRUCT (14) dstr_1168__MATNORX_NMATCH;
- struct MELT_OBJECT_STRUCT (4) dobj_1169__MATNORX_NMATCH;
- struct MELT_STRING_STRUCT (14) dstr_1170__MATNORX_NMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1171__MATNORX_DATAMAP;
- struct MELT_STRING_STRUCT (15) dstr_1172__MATNORX_DATAMAP;
- struct MELT_OBJECT_STRUCT (4) dobj_1173__MATNORX_DATAMAP;
- struct MELT_STRING_STRUCT (15) dstr_1174__MATNORX_DATAMAP;
- struct MELT_OBJECT_STRUCT (3) dsym_1175__MATNORX_FLAGMAP;
- struct MELT_STRING_STRUCT (15) dstr_1176__MATNORX_FLAGMAP;
- struct MELT_OBJECT_STRUCT (4) dobj_1177__MATNORX_FLAGMAP;
- struct MELT_STRING_STRUCT (15) dstr_1178__MATNORX_FLAGMAP;
- struct MELT_OBJECT_STRUCT (3) dsym_1179__MATNORX_STEPMAP;
- struct MELT_STRING_STRUCT (15) dstr_1180__MATNORX_STEPMAP;
- struct MELT_OBJECT_STRUCT (4) dobj_1181__MATNORX_STEPMAP;
- struct MELT_STRING_STRUCT (15) dstr_1182__MATNORX_STEPMAP;
- struct MELT_OBJECT_STRUCT (3) dsym_1183__MATNORX_MDATAQUEUE;
- struct MELT_STRING_STRUCT (18) dstr_1184__MATNORX_MDATAQUE;
- struct MELT_OBJECT_STRUCT (4) dobj_1185__MATNORX_MDATAQUEUE;
- struct MELT_STRING_STRUCT (18) dstr_1186__MATNORX_MDATAQUE;
- struct MELT_OBJECT_STRUCT (3) dsym_1187__MATNORX_MSTEPQUEUE;
- struct MELT_STRING_STRUCT (18) dstr_1188__MATNORX_MSTEPQUE;
- struct MELT_OBJECT_STRUCT (4) dobj_1189__MATNORX_MSTEPQUEUE;
- struct MELT_STRING_STRUCT (18) dstr_1190__MATNORX_MSTEPQUE;
- struct MELT_OBJECT_STRUCT (3) dsym_1191__MATNORX_BODYLIST;
- struct MELT_STRING_STRUCT (16) dstr_1192__MATNORX_BODYLIST;
- struct MELT_OBJECT_STRUCT (4) dobj_1193__MATNORX_BODYLIST;
- struct MELT_STRING_STRUCT (16) dstr_1194__MATNORX_BODYLIST;
- struct MELT_OBJECT_STRUCT (3) dsym_1195__MATNORX_ENDLABEL;
- struct MELT_STRING_STRUCT (16) dstr_1196__MATNORX_ENDLABEL;
- struct MELT_OBJECT_STRUCT (4) dobj_1197__MATNORX_ENDLABEL;
- struct MELT_STRING_STRUCT (16) dstr_1198__MATNORX_ENDLABEL;
- struct MELT_OBJECT_STRUCT (3) dsym_1199__MATNORX_MATCHCTXT;
- struct MELT_STRING_STRUCT (17) dstr_1200__MATNORX_MATCHCTX;
- struct MELT_OBJECT_STRUCT (4) dobj_1201__MATNORX_MATCHCTXT;
- struct MELT_STRING_STRUCT (17) dstr_1202__MATNORX_MATCHCTX;
- struct MELT_ROUTINE_STRUCT (4) drout_1203__ALTMATCH_NORMALIZE_FLAG;
- struct MELT_CLOSURE_STRUCT (0) dclo_1204__ALTMATCH_NORMALIZE_FLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_1205__NORMALIZE_STEP;
- struct MELT_STRING_STRUCT (14) dstr_1206__NORMALIZE_STEP;
- struct MELT_OBJECT_STRUCT (2) dobj_1207;
- struct MELT_OBJECT_STRUCT (3) dsym_1208__NMCTXT;
- struct MELT_STRING_STRUCT (6) dstr_1209__NMCTXT;
- struct MELT_OBJECT_STRUCT (2) dobj_1210;
- struct MELT_OBJECT_STRUCT (2) dobj_1211;
- struct MELT_MULTIPLE_STRUCT (3) dtup_1212__NORMALIZE_STEP;
- struct MELT_OBJECT_STRUCT (4) dobj_1213__NORMALIZE_STEP;
- struct MELT_STRING_STRUCT (14) dstr_1214__NORMALIZE_STEP;
+ dtup_1178__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1179__MATNORX_RESLOC;
+ struct MELT_STRING_STRUCT (14) dstr_1180__MATNORX_RESLOC;
+ struct MELT_OBJECT_STRUCT (4) dobj_1181__MATNORX_RESLOC;
+ struct MELT_STRING_STRUCT (14) dstr_1182__MATNORX_RESLOC;
+ struct MELT_OBJECT_STRUCT (3) dsym_1183__MATNORX_NMATCH;
+ struct MELT_STRING_STRUCT (14) dstr_1184__MATNORX_NMATCH;
+ struct MELT_OBJECT_STRUCT (4) dobj_1185__MATNORX_NMATCH;
+ struct MELT_STRING_STRUCT (14) dstr_1186__MATNORX_NMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1187__MATNORX_DATAMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1188__MATNORX_DATAMAP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1189__MATNORX_DATAMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1190__MATNORX_DATAMAP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1191__MATNORX_FLAGMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1192__MATNORX_FLAGMAP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1193__MATNORX_FLAGMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1194__MATNORX_FLAGMAP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1195__MATNORX_STEPMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1196__MATNORX_STEPMAP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1197__MATNORX_STEPMAP;
+ struct MELT_STRING_STRUCT (15) dstr_1198__MATNORX_STEPMAP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1199__MATNORX_MDATAQUEUE;
+ struct MELT_STRING_STRUCT (18) dstr_1200__MATNORX_MDATAQUE;
+ struct MELT_OBJECT_STRUCT (4) dobj_1201__MATNORX_MDATAQUEUE;
+ struct MELT_STRING_STRUCT (18) dstr_1202__MATNORX_MDATAQUE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1203__MATNORX_MSTEPQUEUE;
+ struct MELT_STRING_STRUCT (18) dstr_1204__MATNORX_MSTEPQUE;
+ struct MELT_OBJECT_STRUCT (4) dobj_1205__MATNORX_MSTEPQUEUE;
+ struct MELT_STRING_STRUCT (18) dstr_1206__MATNORX_MSTEPQUE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1207__MATNORX_BODYLIST;
+ struct MELT_STRING_STRUCT (16) dstr_1208__MATNORX_BODYLIST;
+ struct MELT_OBJECT_STRUCT (4) dobj_1209__MATNORX_BODYLIST;
+ struct MELT_STRING_STRUCT (16) dstr_1210__MATNORX_BODYLIST;
+ struct MELT_OBJECT_STRUCT (3) dsym_1211__MATNORX_ENDLABEL;
+ struct MELT_STRING_STRUCT (16) dstr_1212__MATNORX_ENDLABEL;
+ struct MELT_OBJECT_STRUCT (4) dobj_1213__MATNORX_ENDLABEL;
+ struct MELT_STRING_STRUCT (16) dstr_1214__MATNORX_ENDLABEL;
+ struct MELT_OBJECT_STRUCT (3) dsym_1215__MATNORX_MATCHCTXT;
+ struct MELT_STRING_STRUCT (17) dstr_1216__MATNORX_MATCHCTX;
+ struct MELT_OBJECT_STRUCT (4) dobj_1217__MATNORX_MATCHCTXT;
+ struct MELT_STRING_STRUCT (17) dstr_1218__MATNORX_MATCHCTX;
+ struct MELT_ROUTINE_STRUCT (4) drout_1219__ALTMATCH_NORMALIZE_FLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1220__ALTMATCH_NORMALIZE_FLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_1221__NORMALIZE_STEP;
+ struct MELT_STRING_STRUCT (14) dstr_1222__NORMALIZE_STEP;
+ struct MELT_OBJECT_STRUCT (2) dobj_1223;
+ struct MELT_OBJECT_STRUCT (3) dsym_1224__NMCTXT;
+ struct MELT_STRING_STRUCT (6) dstr_1225__NMCTXT;
+ struct MELT_OBJECT_STRUCT (2) dobj_1226;
+ struct MELT_OBJECT_STRUCT (2) dobj_1227;
+ struct MELT_MULTIPLE_STRUCT (3) dtup_1228__NORMALIZE_STEP;
+ struct MELT_OBJECT_STRUCT (4) dobj_1229__NORMALIZE_STEP;
+ struct MELT_STRING_STRUCT (14) dstr_1230__NORMALIZE_STEP;
struct MELT_ROUTINE_STRUCT (5)
- drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
+ drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1216__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
- struct MELT_ROUTINE_STRUCT (4) drout_1217__MATCH_STEP_INDEX;
- struct MELT_CLOSURE_STRUCT (0) dclo_1218__MATCH_STEP_INDEX;
- struct MELT_ROUTINE_STRUCT (13) drout_1219__COMPLETE_NORMSTEP_IF_LAST;
- struct MELT_CLOSURE_STRUCT (0) dclo_1220__COMPLETE_NORMSTEP_IF_LAST;
- struct MELT_ROUTINE_STRUCT (3) drout_1221__NORMSTEP_ANYRECV;
- struct MELT_CLOSURE_STRUCT (0) dclo_1222__NORMSTEP_ANYRECV;
- struct MELT_ROUTINE_STRUCT (9) drout_1223__NORMSTEP_MFLAGSET;
- struct MELT_CLOSURE_STRUCT (0) dclo_1224__NORMSTEP_MFLAGSET;
- struct MELT_OBJECT_STRUCT (3) dsym_1225__CLASS_NREP_SETQ;
- struct MELT_STRING_STRUCT (15) dstr_1226__CLASS_NREP_SETQ;
- struct meltint_st dint_1227__;
- struct MELT_ROUTINE_STRUCT (15) drout_1228__NORMSTEP_MFLAGCONJ;
- struct MELT_CLOSURE_STRUCT (0) dclo_1229__NORMSTEP_MFLAGCONJ;
- struct meltint_st dint_1230__;
- struct MELT_OBJECT_STRUCT (3) dsym_1231__CLASS_NREP_CHUNK;
- struct MELT_STRING_STRUCT (16) dstr_1232__CLASS_NREP_CHUNK;
- struct MELT_OBJECT_STRUCT (3) dsym_1233__AND_MATCH_FLAGS;
- struct MELT_STRING_STRUCT (15) dstr_1234__AND_MATCH_FLAGS;
- struct MELT_OBJECT_STRUCT (3) dsym_1235__CTYPE_LONG;
- struct MELT_STRING_STRUCT (10) dstr_1236__CTYPE_LONG;
- struct MELT_OBJECT_STRUCT (3) dsym_1237__DISCR_VERBATIM_STRING;
- struct MELT_STRING_STRUCT (21) dstr_1238__DISCR_VERBATIM_S;
- struct MELT_ROUTINE_STRUCT (21) drout_1239__NORMSTEP_MTESTINSTANCE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1240__NORMSTEP_MTESTINSTANCE;
- struct MELT_OBJECT_STRUCT (3) dsym_1241__CLASS_NREP_IFISA;
- struct MELT_STRING_STRUCT (16) dstr_1242__CLASS_NREP_IFISA;
- struct MELT_OBJECT_STRUCT (3) dsym_1243__CLASS_NREP_PROGN;
- struct MELT_STRING_STRUCT (16) dstr_1244__CLASS_NREP_PROGN;
- struct MELT_ROUTINE_STRUCT (15) drout_1245__NORMSTEP_MTESTMULTIPLE;
- struct MELT_CLOSURE_STRUCT (0) dclo_1246__NORMSTEP_MTESTMULTIPLE;
- struct MELT_OBJECT_STRUCT (3) dsym_1247__CLASS_NREP_IFTUPLESIZED;
- struct MELT_STRING_STRUCT (23) dstr_1248__CLASS_NREP_IFTUP;
- struct MELT_ROUTINE_STRUCT (9) drout_1249__NORMSTEP_MTESTVAR;
- struct MELT_CLOSURE_STRUCT (0) dclo_1250__NORMSTEP_MTESTVAR;
- struct MELT_OBJECT_STRUCT (3) dsym_1251__CLASS_NREP_IFSAME;
- struct MELT_STRING_STRUCT (17) dstr_1252__CLASS_NREP_IFSAM;
- struct MELT_ROUTINE_STRUCT (15) drout_1253__NORMSTEP_MGROUP;
- struct MELT_CLOSURE_STRUCT (0) dclo_1254__NORMSTEP_MGROUP;
- struct MELT_OBJECT_STRUCT (3) dsym_1255__LIST_MAP;
- struct MELT_STRING_STRUCT (8) dstr_1256__LIST_MAP;
- struct MELT_ROUTINE_STRUCT (1) drout_1257__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1258__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1259__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (1) drout_1260__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (12) drout_1261__NORMSTEP_MSUCCWHENFLAG;
- struct MELT_CLOSURE_STRUCT (0) dclo_1262__NORMSTEP_MSUCCWHENFLAG;
- struct MELT_OBJECT_STRUCT (3) dsym_1263__CLASS_NREP_IF;
- struct MELT_STRING_STRUCT (13) dstr_1264__CLASS_NREP_IF;
- struct MELT_OBJECT_STRUCT (3) dsym_1265__NORMALIZE_TEST_MATCHER;
- struct MELT_STRING_STRUCT (22) dstr_1266__NORMALIZE_TEST_M;
- struct MELT_OBJECT_STRUCT (2) dobj_1267;
- struct MELT_OBJECT_STRUCT (2) dobj_1268;
- struct MELT_OBJECT_STRUCT (3) dsym_1269__NDATA;
- struct MELT_STRING_STRUCT (5) dstr_1270__NDATA;
- struct MELT_OBJECT_STRUCT (2) dobj_1271;
- struct MELT_OBJECT_STRUCT (3) dsym_1272__BINDLIST;
- struct MELT_STRING_STRUCT (8) dstr_1273__BINDLIST;
- struct MELT_OBJECT_STRUCT (2) dobj_1274;
- struct MELT_OBJECT_STRUCT (2) dobj_1275;
- struct MELT_OBJECT_STRUCT (3) dsym_1276__NJELSE;
- struct MELT_STRING_STRUCT (6) dstr_1277__NJELSE;
- struct MELT_OBJECT_STRUCT (2) dobj_1278;
- struct MELT_MULTIPLE_STRUCT (6) dtup_1279__NORMALIZE_TEST_MATCHER;
- struct MELT_OBJECT_STRUCT (4) dobj_1280__NORMALIZE_TEST_MATCHER;
- struct MELT_STRING_STRUCT (22) dstr_1281__NORMALIZE_TEST_M;
- struct MELT_OBJECT_STRUCT (3) dsym_1282__NORMALIZE_FILL_MATCHER;
- struct MELT_STRING_STRUCT (22) dstr_1283__NORMALIZE_FILL_M;
- struct MELT_OBJECT_STRUCT (2) dobj_1284;
+ dclo_1232__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
+ struct MELT_ROUTINE_STRUCT (4) drout_1233__MATCH_STEP_INDEX;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1234__MATCH_STEP_INDEX;
+ struct MELT_ROUTINE_STRUCT (13) drout_1235__COMPLETE_NORMSTEP_IF_LAST;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1236__COMPLETE_NORMSTEP_IF_LAST;
+ struct MELT_ROUTINE_STRUCT (3) drout_1237__NORMSTEP_ANYRECV;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1238__NORMSTEP_ANYRECV;
+ struct MELT_ROUTINE_STRUCT (9) drout_1239__NORMSTEP_MFLAGSET;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1240__NORMSTEP_MFLAGSET;
+ struct MELT_OBJECT_STRUCT (3) dsym_1241__CLASS_NREP_SETQ;
+ struct MELT_STRING_STRUCT (15) dstr_1242__CLASS_NREP_SETQ;
+ struct meltint_st dint_1243__;
+ struct MELT_ROUTINE_STRUCT (15) drout_1244__NORMSTEP_MFLAGCONJ;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1245__NORMSTEP_MFLAGCONJ;
+ struct meltint_st dint_1246__;
+ struct MELT_OBJECT_STRUCT (3) dsym_1247__CLASS_NREP_CHUNK;
+ struct MELT_STRING_STRUCT (16) dstr_1248__CLASS_NREP_CHUNK;
+ struct MELT_OBJECT_STRUCT (3) dsym_1249__AND_MATCH_FLAGS;
+ struct MELT_STRING_STRUCT (15) dstr_1250__AND_MATCH_FLAGS;
+ struct MELT_OBJECT_STRUCT (3) dsym_1251__CTYPE_LONG;
+ struct MELT_STRING_STRUCT (10) dstr_1252__CTYPE_LONG;
+ struct MELT_OBJECT_STRUCT (3) dsym_1253__DISCR_VERBATIM_STRING;
+ struct MELT_STRING_STRUCT (21) dstr_1254__DISCR_VERBATIM_S;
+ struct MELT_ROUTINE_STRUCT (21) drout_1255__NORMSTEP_MTESTINSTANCE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1256__NORMSTEP_MTESTINSTANCE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1257__CLASS_NREP_IFISA;
+ struct MELT_STRING_STRUCT (16) dstr_1258__CLASS_NREP_IFISA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1259__CLASS_NREP_PROGN;
+ struct MELT_STRING_STRUCT (16) dstr_1260__CLASS_NREP_PROGN;
+ struct MELT_ROUTINE_STRUCT (20) drout_1261__NORMSTEP_MTESTMULTIPLE;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1262__NORMSTEP_MTESTMULTIPLE;
+ struct MELT_OBJECT_STRUCT (3) dsym_1263__CLASS_NREP_IFTUPLESIZED;
+ struct MELT_STRING_STRUCT (23) dstr_1264__CLASS_NREP_IFTUP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1265__CLASS_NREP_IFCOMMON;
+ struct MELT_STRING_STRUCT (19) dstr_1266__CLASS_NREP_IFCOM;
+ struct MELT_ROUTINE_STRUCT (9) drout_1267__NORMSTEP_MTESTVAR;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1268__NORMSTEP_MTESTVAR;
+ struct MELT_OBJECT_STRUCT (3) dsym_1269__CLASS_NREP_IFSAME;
+ struct MELT_STRING_STRUCT (17) dstr_1270__CLASS_NREP_IFSAM;
+ struct MELT_ROUTINE_STRUCT (15) drout_1271__NORMSTEP_MGROUP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1272__NORMSTEP_MGROUP;
+ struct MELT_OBJECT_STRUCT (3) dsym_1273__LIST_MAP;
+ struct MELT_STRING_STRUCT (8) dstr_1274__LIST_MAP;
+ struct MELT_ROUTINE_STRUCT (1) drout_1275__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1276__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1277__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (1) drout_1278__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (12) drout_1279__NORMSTEP_MSUCCWHENFLAG;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1280__NORMSTEP_MSUCCWHENFLAG;
+ struct MELT_OBJECT_STRUCT (3) dsym_1281__CLASS_NREP_IF;
+ struct MELT_STRING_STRUCT (13) dstr_1282__CLASS_NREP_IF;
+ struct MELT_OBJECT_STRUCT (3) dsym_1283__NORMALIZE_TEST_MATCHER;
+ struct MELT_STRING_STRUCT (22) dstr_1284__NORMALIZE_TEST_M;
struct MELT_OBJECT_STRUCT (2) dobj_1285;
struct MELT_OBJECT_STRUCT (2) dobj_1286;
- struct MELT_OBJECT_STRUCT (2) dobj_1287;
- struct MELT_OBJECT_STRUCT (3) dsym_1288__NOUTS;
- struct MELT_STRING_STRUCT (5) dstr_1289__NOUTS;
- struct MELT_OBJECT_STRUCT (2) dobj_1290;
- struct MELT_OBJECT_STRUCT (2) dobj_1291;
- struct MELT_OBJECT_STRUCT (3) dsym_1292__TESTDATA;
- struct MELT_STRING_STRUCT (8) dstr_1293__TESTDATA;
- struct MELT_OBJECT_STRUCT (2) dobj_1294;
- struct MELT_MULTIPLE_STRUCT (7) dtup_1295__NORMALIZE_FILL_MATCHER;
- struct MELT_OBJECT_STRUCT (4) dobj_1296__NORMALIZE_FILL_MATCHER;
- struct MELT_STRING_STRUCT (22) dstr_1297__NORMALIZE_FILL_M;
- struct MELT_ROUTINE_STRUCT (2) drout_1298__NORMTESTMATCH_CATCHALL;
- struct MELT_CLOSURE_STRUCT (0) dclo_1299__NORMTESTMATCH_CATCHALL;
- struct MELT_ROUTINE_STRUCT (2) drout_1300__NORMFILLMATCH_CATCHALL;
- struct MELT_CLOSURE_STRUCT (0) dclo_1301__NORMFILLMATCH_CATCHALL;
- struct MELT_ROUTINE_STRUCT (19) drout_1302__NORMTESTMATCH_CMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1303__NORMTESTMATCH_CMATCHER;
- struct MELT_OBJECT_STRUCT (3) dsym_1304__CLASS_CMATCHER;
- struct MELT_STRING_STRUCT (14) dstr_1305__CLASS_CMATCHER;
- struct MELT_ROUTINE_STRUCT (8) drout_1306__NORMFILLMATCH_CMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1307__NORMFILLMATCH_CMATCHER;
- struct MELT_ROUTINE_STRUCT (23) drout_1308__NORMSTEP_MTESTMATCHER;
- struct MELT_CLOSURE_STRUCT (0) dclo_1309__NORMSTEP_MTESTMATCHER;
- struct MELT_ROUTINE_STRUCT (5) drout_1310__ALTMATCH_NORMALIZE_STEP;
- struct MELT_CLOSURE_STRUCT (0) dclo_1311__ALTMATCH_NORMALIZE_STEP;
- struct MELT_ROUTINE_STRUCT (8) drout_1312__ALTMATCH_NORMALIZE_MDATA;
- struct MELT_CLOSURE_STRUCT (0) dclo_1313__ALTMATCH_NORMALIZE_MDATA;
+ struct MELT_OBJECT_STRUCT (3) dsym_1287__NDATA;
+ struct MELT_STRING_STRUCT (5) dstr_1288__NDATA;
+ struct MELT_OBJECT_STRUCT (2) dobj_1289;
+ struct MELT_OBJECT_STRUCT (3) dsym_1290__BINDLIST;
+ struct MELT_STRING_STRUCT (8) dstr_1291__BINDLIST;
+ struct MELT_OBJECT_STRUCT (2) dobj_1292;
+ struct MELT_OBJECT_STRUCT (2) dobj_1293;
+ struct MELT_OBJECT_STRUCT (3) dsym_1294__NJELSE;
+ struct MELT_STRING_STRUCT (6) dstr_1295__NJELSE;
+ struct MELT_OBJECT_STRUCT (2) dobj_1296;
+ struct MELT_MULTIPLE_STRUCT (6) dtup_1297__NORMALIZE_TEST_MATCHER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1298__NORMALIZE_TEST_MATCHER;
+ struct MELT_STRING_STRUCT (22) dstr_1299__NORMALIZE_TEST_M;
+ struct MELT_OBJECT_STRUCT (3) dsym_1300__NORMALIZE_FILL_MATCHER;
+ struct MELT_STRING_STRUCT (22) dstr_1301__NORMALIZE_FILL_M;
+ struct MELT_OBJECT_STRUCT (2) dobj_1302;
+ struct MELT_OBJECT_STRUCT (2) dobj_1303;
+ struct MELT_OBJECT_STRUCT (2) dobj_1304;
+ struct MELT_OBJECT_STRUCT (2) dobj_1305;
+ struct MELT_OBJECT_STRUCT (3) dsym_1306__NOUTS;
+ struct MELT_STRING_STRUCT (5) dstr_1307__NOUTS;
+ struct MELT_OBJECT_STRUCT (2) dobj_1308;
+ struct MELT_OBJECT_STRUCT (2) dobj_1309;
+ struct MELT_OBJECT_STRUCT (3) dsym_1310__TESTDATA;
+ struct MELT_STRING_STRUCT (8) dstr_1311__TESTDATA;
+ struct MELT_OBJECT_STRUCT (2) dobj_1312;
+ struct MELT_MULTIPLE_STRUCT (7) dtup_1313__NORMALIZE_FILL_MATCHER;
+ struct MELT_OBJECT_STRUCT (4) dobj_1314__NORMALIZE_FILL_MATCHER;
+ struct MELT_STRING_STRUCT (22) dstr_1315__NORMALIZE_FILL_M;
+ struct MELT_ROUTINE_STRUCT (2) drout_1316__NORMTESTMATCH_CATCHALL;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1317__NORMTESTMATCH_CATCHALL;
+ struct MELT_ROUTINE_STRUCT (2) drout_1318__NORMFILLMATCH_CATCHALL;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1319__NORMFILLMATCH_CATCHALL;
+ struct MELT_ROUTINE_STRUCT (19) drout_1320__NORMTESTMATCH_CMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1321__NORMTESTMATCH_CMATCHER;
+ struct MELT_OBJECT_STRUCT (3) dsym_1322__CLASS_CMATCHER;
+ struct MELT_STRING_STRUCT (14) dstr_1323__CLASS_CMATCHER;
+ struct MELT_ROUTINE_STRUCT (8) drout_1324__NORMFILLMATCH_CMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1325__NORMFILLMATCH_CMATCHER;
+ struct MELT_ROUTINE_STRUCT (23) drout_1326__NORMSTEP_MTESTMATCHER;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1327__NORMSTEP_MTESTMATCHER;
+ struct MELT_ROUTINE_STRUCT (5) drout_1328__ALTMATCH_NORMALIZE_STEP;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1329__ALTMATCH_NORMALIZE_STEP;
+ struct MELT_ROUTINE_STRUCT (8) drout_1330__ALTMATCH_NORMALIZE_MDATA;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1331__ALTMATCH_NORMALIZE_MDATA;
struct MELT_ROUTINE_STRUCT (6)
- drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA;
+ drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1315__ALTMATCH_HANDLE_NORMALIZED_MDATA;
+ dclo_1333__ALTMATCH_HANDLE_NORMALIZED_MDATA;
struct MELT_ROUTINE_STRUCT (10)
- drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
+ drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1317__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
- struct MELT_OBJECT_STRUCT (3) dsym_1318__MATCHRES;
- struct MELT_STRING_STRUCT (9) dstr_1319__MATCHRES;
+ dclo_1335__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
+ struct MELT_OBJECT_STRUCT (3) dsym_1336__MATCHRES;
+ struct MELT_STRING_STRUCT (9) dstr_1337__MATCHRES;
struct MELT_ROUTINE_STRUCT (10)
- drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
+ drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
struct MELT_CLOSURE_STRUCT (0)
- dclo_1321__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
- struct MELT_ROUTINE_STRUCT (2) drout_1322__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (38) drout_1323__NORMEXP_ALTMATCH;
- struct MELT_CLOSURE_STRUCT (0) dclo_1324__NORMEXP_ALTMATCH;
- struct MELT_OBJECT_STRUCT (3) dsym_1325__MATCHED_DATA;
- struct MELT_STRING_STRUCT (13) dstr_1326__MATCHED_DATA;
- struct MELT_ROUTINE_STRUCT (3) drout_1327__LAMBDA_;
- struct MELT_OBJECT_STRUCT (3) dsym_1328__TRUE;
- struct MELT_STRING_STRUCT (4) dstr_1329__TRUE;
- struct MELT_ROUTINE_STRUCT (5) drout_1330__ALTERNATE_MATCH_OPTSET;
- struct MELT_CLOSURE_STRUCT (0) dclo_1331__ALTERNATE_MATCH_OPTSET;
- struct MELT_OBJECT_STRUCT (3) dsym_1332__ALTERNATE_MATCH;
- struct MELT_STRING_STRUCT (15) dstr_1333__ALTERNATE_MATCH;
- struct MELT_STRING_STRUCT (48) dstr_1334__Enable_alternate;
- struct MELT_ROUTINE_STRUCT (39) drout_1335__MG_ALTDRAW_GRAPHVIZ;
- struct MELT_CLOSURE_STRUCT (0) dclo_1336__MG_ALTDRAW_GRAPHVIZ;
- struct MELT_ROUTINE_STRUCT (6) drout_1337__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (11) drout_1338__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (3) drout_1339__LAMBDA_;
- struct MELT_ROUTINE_STRUCT (3) drout_1340__LAMBDA_;
- struct meltint_st dint_1341__;
- struct meltint_st dint_1342__;
- struct meltint_st dint_1343__;
- struct MELT_ROUTINE_STRUCT (3) drout_1344__LAMBDA_;
- struct meltint_st dint_1345__;
- struct meltint_st dint_1346__;
- struct meltint_st dint_1347__;
+ dclo_1339__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
+ struct MELT_ROUTINE_STRUCT (2) drout_1340__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (38) drout_1341__NORMEXP_ALTMATCH;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1342__NORMEXP_ALTMATCH;
+ struct MELT_OBJECT_STRUCT (3) dsym_1343__MATCHED_DATA;
+ struct MELT_STRING_STRUCT (13) dstr_1344__MATCHED_DATA;
+ struct MELT_ROUTINE_STRUCT (3) drout_1345__LAMBDA_;
+ struct MELT_OBJECT_STRUCT (3) dsym_1346__TRUE;
+ struct MELT_STRING_STRUCT (4) dstr_1347__TRUE;
+ struct MELT_ROUTINE_STRUCT (5) drout_1348__ALTERNATE_MATCH_OPTSET;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1349__ALTERNATE_MATCH_OPTSET;
+ struct MELT_OBJECT_STRUCT (3) dsym_1350__ALTERNATE_MATCH;
+ struct MELT_STRING_STRUCT (15) dstr_1351__ALTERNATE_MATCH;
+ struct MELT_STRING_STRUCT (48) dstr_1352__Enable_alternate;
+ struct MELT_ROUTINE_STRUCT (41) drout_1353__MG_ALTDRAW_GRAPHVIZ;
+ struct MELT_CLOSURE_STRUCT (0) dclo_1354__MG_ALTDRAW_GRAPHVIZ;
+ struct MELT_ROUTINE_STRUCT (7) drout_1355__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (11) drout_1356__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (3) drout_1357__LAMBDA_;
+ struct MELT_ROUTINE_STRUCT (3) drout_1358__LAMBDA_;
+ struct meltint_st dint_1359__;
+ struct meltint_st dint_1360__;
+ struct meltint_st dint_1361__;
+ struct MELT_ROUTINE_STRUCT (3) drout_1362__LAMBDA_;
+ struct meltint_st dint_1363__;
+ struct meltint_st dint_1364__;
+ struct meltint_st dint_1365__;
long spare_;
} *cdat = NULL;
cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0);
@@ -5706,9 +5869,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_1__CLASS_PATTERN_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V90*/ meltfptr[89])
- /*_.VALDATA___V90*/
- meltfptr[89] = (void *) &cdat->dsym_1__CLASS_PATTERN_CONTEXT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V91*/ meltfptr[90])
+ /*_.VALDATA___V91*/
+ meltfptr[90] = (void *) &cdat->dsym_1__CLASS_PATTERN_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_1__CLASS_PATTERN_CONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5725,7 +5888,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_2__CLASS_PATTERN_CO*/
- /*_.VALSTR___V91*/ meltfptr[90] = (void *) &cdat->dstr_2__CLASS_PATTERN_CO;
+ /*_.VALSTR___V92*/ meltfptr[91] = (void *) &cdat->dstr_2__CLASS_PATTERN_CO;
cdat->dstr_2__CLASS_PATTERN_CO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_2__CLASS_PATTERN_CO.val,
@@ -5734,9 +5897,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_3__CLASS_ROOT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V92*/ meltfptr[91])
- /*_.VALDATA___V92*/
- meltfptr[91] = (void *) &cdat->dsym_3__CLASS_ROOT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V93*/ meltfptr[92])
+ /*_.VALDATA___V93*/
+ meltfptr[92] = (void *) &cdat->dsym_3__CLASS_ROOT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_3__CLASS_ROOT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5753,7 +5916,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_4__CLASS_ROOT*/
- /*_.VALSTR___V93*/ meltfptr[92] = (void *) &cdat->dstr_4__CLASS_ROOT;
+ /*_.VALSTR___V94*/ meltfptr[93] = (void *) &cdat->dstr_4__CLASS_ROOT;
cdat->dstr_4__CLASS_ROOT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_4__CLASS_ROOT.val, "CLASS_ROOT",
@@ -5761,7 +5924,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-normatch.melt:34:/ iniobj");
/*iniobj dobj_5__CLASS_PATTERN_CONTEXT*/
-/*_.VALDATA___V94*/ meltfptr[93] =
+/*_.VALDATA___V95*/ meltfptr[94] =
(void *) &cdat->dobj_5__CLASS_PATTERN_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_5__CLASS_PATTERN_CONTEXT",
@@ -5775,12 +5938,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_5__CLASS_PATTERN_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_hash = 677263533;
+ cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_hash = 1027799924;
cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_len = 8;
/*inistring dstr_6__CLASS_PATTERN_CO*/
- /*_.VALSTR___V95*/ meltfptr[94] = (void *) &cdat->dstr_6__CLASS_PATTERN_CO;
+ /*_.VALSTR___V96*/ meltfptr[95] = (void *) &cdat->dstr_6__CLASS_PATTERN_CO;
cdat->dstr_6__CLASS_PATTERN_CO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_6__CLASS_PATTERN_CO.val,
@@ -5788,22 +5951,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_6__CLASS_PATTERN_CO.val) -
1);
/*inimult dtup_7__CLASS_PATTERN_CONTEXT */
- /*_.VALTUP___V96*/ meltfptr[95] =
+ /*_.VALTUP___V97*/ meltfptr[96] =
(void *) &cdat->dtup_7__CLASS_PATTERN_CONTEXT;
cdat->dtup_7__CLASS_PATTERN_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_7__CLASS_PATTERN_CONTEXT.nbval = 1;
/*inimult dtup_8__CLASS_PATTERN_CONTEXT */
- /*_.VALTUP___V119*/ meltfptr[118] =
+ /*_.VALTUP___V120*/ meltfptr[119] =
(void *) &cdat->dtup_8__CLASS_PATTERN_CONTEXT;
cdat->dtup_8__CLASS_PATTERN_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_8__CLASS_PATTERN_CONTEXT.nbval = 11;
/*iniobj dsym_9__PCTN_NORMCTXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V120*/ meltfptr[119])
- /*_.VALDATA___V120*/
- meltfptr[119] = (void *) &cdat->dsym_9__PCTN_NORMCTXT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V121*/ meltfptr[120])
+ /*_.VALDATA___V121*/
+ meltfptr[120] = (void *) &cdat->dsym_9__PCTN_NORMCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_9__PCTN_NORMCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5820,7 +5983,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_10__PCTN_NORMCTXT*/
- /*_.VALSTR___V121*/ meltfptr[120] = (void *) &cdat->dstr_10__PCTN_NORMCTXT;
+ /*_.VALSTR___V122*/ meltfptr[121] = (void *) &cdat->dstr_10__PCTN_NORMCTXT;
cdat->dstr_10__PCTN_NORMCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_10__PCTN_NORMCTXT.val,
@@ -5830,7 +5993,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_11__PCTN_NORMCTXT*/
-/*_.VALDATA___V97*/ meltfptr[96] = (void *) &cdat->dobj_11__PCTN_NORMCTXT;
+/*_.VALDATA___V98*/ meltfptr[97] = (void *) &cdat->dobj_11__PCTN_NORMCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_11__PCTN_NORMCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -5843,12 +6006,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_11__PCTN_NORMCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_11__PCTN_NORMCTXT.obj_num = 0;
- cdat->dobj_11__PCTN_NORMCTXT.obj_hash = 1056558919;
+ cdat->dobj_11__PCTN_NORMCTXT.obj_hash = 185808308;
cdat->dobj_11__PCTN_NORMCTXT.obj_len = 4;
/*inistring dstr_12__PCTN_NORMCTXT*/
- /*_.VALSTR___V98*/ meltfptr[97] = (void *) &cdat->dstr_12__PCTN_NORMCTXT;
+ /*_.VALSTR___V99*/ meltfptr[98] = (void *) &cdat->dstr_12__PCTN_NORMCTXT;
cdat->dstr_12__PCTN_NORMCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_12__PCTN_NORMCTXT.val,
@@ -5857,9 +6020,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_13__PCTN_SRC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V122*/ meltfptr[121])
- /*_.VALDATA___V122*/
- meltfptr[121] = (void *) &cdat->dsym_13__PCTN_SRC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V123*/ meltfptr[122])
+ /*_.VALDATA___V123*/
+ meltfptr[122] = (void *) &cdat->dsym_13__PCTN_SRC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_13__PCTN_SRC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5876,7 +6039,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_14__PCTN_SRC*/
- /*_.VALSTR___V123*/ meltfptr[122] = (void *) &cdat->dstr_14__PCTN_SRC;
+ /*_.VALSTR___V124*/ meltfptr[123] = (void *) &cdat->dstr_14__PCTN_SRC;
cdat->dstr_14__PCTN_SRC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_14__PCTN_SRC.val, "PCTN_SRC",
@@ -5884,7 +6047,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_15__PCTN_SRC*/
-/*_.VALDATA___V99*/ meltfptr[98] = (void *) &cdat->dobj_15__PCTN_SRC;
+/*_.VALDATA___V100*/ meltfptr[99] = (void *) &cdat->dobj_15__PCTN_SRC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_15__PCTN_SRC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -5897,21 +6060,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_15__PCTN_SRC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_15__PCTN_SRC.obj_num = 1;
- cdat->dobj_15__PCTN_SRC.obj_hash = 756592260;
+ cdat->dobj_15__PCTN_SRC.obj_hash = 445059858;
cdat->dobj_15__PCTN_SRC.obj_len = 4;
/*inistring dstr_16__PCTN_SRC*/
- /*_.VALSTR___V100*/ meltfptr[99] = (void *) &cdat->dstr_16__PCTN_SRC;
+ /*_.VALSTR___V101*/ meltfptr[100] = (void *) &cdat->dstr_16__PCTN_SRC;
cdat->dstr_16__PCTN_SRC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_16__PCTN_SRC.val, "PCTN_SRC",
sizeof (cdat->dstr_16__PCTN_SRC.val) - 1);
/*iniobj dsym_17__PCTN_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V124*/ meltfptr[123])
- /*_.VALDATA___V124*/
- meltfptr[123] = (void *) &cdat->dsym_17__PCTN_ENV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V125*/ meltfptr[124])
+ /*_.VALDATA___V125*/
+ meltfptr[124] = (void *) &cdat->dsym_17__PCTN_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_17__PCTN_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5928,7 +6091,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_18__PCTN_ENV*/
- /*_.VALSTR___V125*/ meltfptr[124] = (void *) &cdat->dstr_18__PCTN_ENV;
+ /*_.VALSTR___V126*/ meltfptr[125] = (void *) &cdat->dstr_18__PCTN_ENV;
cdat->dstr_18__PCTN_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_18__PCTN_ENV.val, "PCTN_ENV",
@@ -5936,7 +6099,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_19__PCTN_ENV*/
-/*_.VALDATA___V101*/ meltfptr[100] = (void *) &cdat->dobj_19__PCTN_ENV;
+/*_.VALDATA___V102*/ meltfptr[101] = (void *) &cdat->dobj_19__PCTN_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_19__PCTN_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -5949,21 +6112,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_19__PCTN_ENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_19__PCTN_ENV.obj_num = 2;
- cdat->dobj_19__PCTN_ENV.obj_hash = 964052591;
+ cdat->dobj_19__PCTN_ENV.obj_hash = 623601358;
cdat->dobj_19__PCTN_ENV.obj_len = 4;
/*inistring dstr_20__PCTN_ENV*/
- /*_.VALSTR___V102*/ meltfptr[101] = (void *) &cdat->dstr_20__PCTN_ENV;
+ /*_.VALSTR___V103*/ meltfptr[102] = (void *) &cdat->dstr_20__PCTN_ENV;
cdat->dstr_20__PCTN_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_20__PCTN_ENV.val, "PCTN_ENV",
sizeof (cdat->dstr_20__PCTN_ENV.val) - 1);
/*iniobj dsym_21__PCTN_MAPATVAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V126*/ meltfptr[125])
- /*_.VALDATA___V126*/
- meltfptr[125] = (void *) &cdat->dsym_21__PCTN_MAPATVAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V127*/ meltfptr[126])
+ /*_.VALDATA___V127*/
+ meltfptr[126] = (void *) &cdat->dsym_21__PCTN_MAPATVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_21__PCTN_MAPATVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -5980,7 +6143,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_22__PCTN_MAPATVAR*/
- /*_.VALSTR___V127*/ meltfptr[126] = (void *) &cdat->dstr_22__PCTN_MAPATVAR;
+ /*_.VALSTR___V128*/ meltfptr[127] = (void *) &cdat->dstr_22__PCTN_MAPATVAR;
cdat->dstr_22__PCTN_MAPATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_22__PCTN_MAPATVAR.val,
@@ -5990,7 +6153,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_23__PCTN_MAPATVAR*/
-/*_.VALDATA___V103*/ meltfptr[102] = (void *) &cdat->dobj_23__PCTN_MAPATVAR;
+/*_.VALDATA___V104*/ meltfptr[103] = (void *) &cdat->dobj_23__PCTN_MAPATVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_23__PCTN_MAPATVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6003,12 +6166,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_23__PCTN_MAPATVAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_23__PCTN_MAPATVAR.obj_num = 3;
- cdat->dobj_23__PCTN_MAPATVAR.obj_hash = 800655497;
+ cdat->dobj_23__PCTN_MAPATVAR.obj_hash = 18142056;
cdat->dobj_23__PCTN_MAPATVAR.obj_len = 4;
/*inistring dstr_24__PCTN_MAPATVAR*/
- /*_.VALSTR___V104*/ meltfptr[103] = (void *) &cdat->dstr_24__PCTN_MAPATVAR;
+ /*_.VALSTR___V105*/ meltfptr[104] = (void *) &cdat->dstr_24__PCTN_MAPATVAR;
cdat->dstr_24__PCTN_MAPATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_24__PCTN_MAPATVAR.val,
@@ -6017,9 +6180,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_25__PCTN_MAPATCST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V128*/ meltfptr[127])
- /*_.VALDATA___V128*/
- meltfptr[127] = (void *) &cdat->dsym_25__PCTN_MAPATCST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V129*/ meltfptr[128])
+ /*_.VALDATA___V129*/
+ meltfptr[128] = (void *) &cdat->dsym_25__PCTN_MAPATCST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_25__PCTN_MAPATCST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6036,7 +6199,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_26__PCTN_MAPATCST*/
- /*_.VALSTR___V129*/ meltfptr[128] = (void *) &cdat->dstr_26__PCTN_MAPATCST;
+ /*_.VALSTR___V130*/ meltfptr[129] = (void *) &cdat->dstr_26__PCTN_MAPATCST;
cdat->dstr_26__PCTN_MAPATCST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_26__PCTN_MAPATCST.val,
@@ -6046,7 +6209,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_27__PCTN_MAPATCST*/
-/*_.VALDATA___V105*/ meltfptr[104] = (void *) &cdat->dobj_27__PCTN_MAPATCST;
+/*_.VALDATA___V106*/ meltfptr[105] = (void *) &cdat->dobj_27__PCTN_MAPATCST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_27__PCTN_MAPATCST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6059,12 +6222,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_27__PCTN_MAPATCST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_27__PCTN_MAPATCST.obj_num = 4;
- cdat->dobj_27__PCTN_MAPATCST.obj_hash = 414069621;
+ cdat->dobj_27__PCTN_MAPATCST.obj_hash = 871188258;
cdat->dobj_27__PCTN_MAPATCST.obj_len = 4;
/*inistring dstr_28__PCTN_MAPATCST*/
- /*_.VALSTR___V106*/ meltfptr[105] = (void *) &cdat->dstr_28__PCTN_MAPATCST;
+ /*_.VALSTR___V107*/ meltfptr[106] = (void *) &cdat->dstr_28__PCTN_MAPATCST;
cdat->dstr_28__PCTN_MAPATCST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_28__PCTN_MAPATCST.val,
@@ -6073,9 +6236,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_29__PCTN_MAPOR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V130*/ meltfptr[129])
- /*_.VALDATA___V130*/
- meltfptr[129] = (void *) &cdat->dsym_29__PCTN_MAPOR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V131*/ meltfptr[130])
+ /*_.VALDATA___V131*/
+ meltfptr[130] = (void *) &cdat->dsym_29__PCTN_MAPOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_29__PCTN_MAPOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6092,7 +6255,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_30__PCTN_MAPOR*/
- /*_.VALSTR___V131*/ meltfptr[130] = (void *) &cdat->dstr_30__PCTN_MAPOR;
+ /*_.VALSTR___V132*/ meltfptr[131] = (void *) &cdat->dstr_30__PCTN_MAPOR;
cdat->dstr_30__PCTN_MAPOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_30__PCTN_MAPOR.val, "PCTN_MAPOR",
@@ -6100,7 +6263,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_31__PCTN_MAPOR*/
-/*_.VALDATA___V107*/ meltfptr[106] = (void *) &cdat->dobj_31__PCTN_MAPOR;
+/*_.VALDATA___V108*/ meltfptr[107] = (void *) &cdat->dobj_31__PCTN_MAPOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_31__PCTN_MAPOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6113,21 +6276,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_31__PCTN_MAPOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_31__PCTN_MAPOR.obj_num = 5;
- cdat->dobj_31__PCTN_MAPOR.obj_hash = 162746632;
+ cdat->dobj_31__PCTN_MAPOR.obj_hash = 996600648;
cdat->dobj_31__PCTN_MAPOR.obj_len = 4;
/*inistring dstr_32__PCTN_MAPOR*/
- /*_.VALSTR___V108*/ meltfptr[107] = (void *) &cdat->dstr_32__PCTN_MAPOR;
+ /*_.VALSTR___V109*/ meltfptr[108] = (void *) &cdat->dstr_32__PCTN_MAPOR;
cdat->dstr_32__PCTN_MAPOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_32__PCTN_MAPOR.val, "PCTN_MAPOR",
sizeof (cdat->dstr_32__PCTN_MAPOR.val) - 1);
/*iniobj dsym_33__PCTN_BINDLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V132*/ meltfptr[131])
- /*_.VALDATA___V132*/
- meltfptr[131] = (void *) &cdat->dsym_33__PCTN_BINDLIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V133*/ meltfptr[132])
+ /*_.VALDATA___V133*/
+ meltfptr[132] = (void *) &cdat->dsym_33__PCTN_BINDLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_33__PCTN_BINDLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6144,7 +6307,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_34__PCTN_BINDLIST*/
- /*_.VALSTR___V133*/ meltfptr[132] = (void *) &cdat->dstr_34__PCTN_BINDLIST;
+ /*_.VALSTR___V134*/ meltfptr[133] = (void *) &cdat->dstr_34__PCTN_BINDLIST;
cdat->dstr_34__PCTN_BINDLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_34__PCTN_BINDLIST.val,
@@ -6154,7 +6317,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_35__PCTN_BINDLIST*/
-/*_.VALDATA___V109*/ meltfptr[108] = (void *) &cdat->dobj_35__PCTN_BINDLIST;
+/*_.VALDATA___V110*/ meltfptr[109] = (void *) &cdat->dobj_35__PCTN_BINDLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_35__PCTN_BINDLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6167,12 +6330,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_35__PCTN_BINDLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_35__PCTN_BINDLIST.obj_num = 6;
- cdat->dobj_35__PCTN_BINDLIST.obj_hash = 730167625;
+ cdat->dobj_35__PCTN_BINDLIST.obj_hash = 746027443;
cdat->dobj_35__PCTN_BINDLIST.obj_len = 4;
/*inistring dstr_36__PCTN_BINDLIST*/
- /*_.VALSTR___V110*/ meltfptr[109] = (void *) &cdat->dstr_36__PCTN_BINDLIST;
+ /*_.VALSTR___V111*/ meltfptr[110] = (void *) &cdat->dstr_36__PCTN_BINDLIST;
cdat->dstr_36__PCTN_BINDLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_36__PCTN_BINDLIST.val,
@@ -6181,9 +6344,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_37__PCTN_STUFFMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V134*/ meltfptr[133])
- /*_.VALDATA___V134*/
- meltfptr[133] = (void *) &cdat->dsym_37__PCTN_STUFFMAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V135*/ meltfptr[134])
+ /*_.VALDATA___V135*/
+ meltfptr[134] = (void *) &cdat->dsym_37__PCTN_STUFFMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_37__PCTN_STUFFMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6200,7 +6363,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_38__PCTN_STUFFMAP*/
- /*_.VALSTR___V135*/ meltfptr[134] = (void *) &cdat->dstr_38__PCTN_STUFFMAP;
+ /*_.VALSTR___V136*/ meltfptr[135] = (void *) &cdat->dstr_38__PCTN_STUFFMAP;
cdat->dstr_38__PCTN_STUFFMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_38__PCTN_STUFFMAP.val,
@@ -6210,7 +6373,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_39__PCTN_STUFFMAP*/
-/*_.VALDATA___V111*/ meltfptr[110] = (void *) &cdat->dobj_39__PCTN_STUFFMAP;
+/*_.VALDATA___V112*/ meltfptr[111] = (void *) &cdat->dobj_39__PCTN_STUFFMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_39__PCTN_STUFFMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6223,12 +6386,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_39__PCTN_STUFFMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_39__PCTN_STUFFMAP.obj_num = 7;
- cdat->dobj_39__PCTN_STUFFMAP.obj_hash = 665829651;
+ cdat->dobj_39__PCTN_STUFFMAP.obj_hash = 133369305;
cdat->dobj_39__PCTN_STUFFMAP.obj_len = 4;
/*inistring dstr_40__PCTN_STUFFMAP*/
- /*_.VALSTR___V112*/ meltfptr[111] = (void *) &cdat->dstr_40__PCTN_STUFFMAP;
+ /*_.VALSTR___V113*/ meltfptr[112] = (void *) &cdat->dstr_40__PCTN_STUFFMAP;
cdat->dstr_40__PCTN_STUFFMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_40__PCTN_STUFFMAP.val,
@@ -6237,9 +6400,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_41__PCTN_PVARLOCMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V136*/ meltfptr[135])
- /*_.VALDATA___V136*/
- meltfptr[135] = (void *) &cdat->dsym_41__PCTN_PVARLOCMAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V137*/ meltfptr[136])
+ /*_.VALDATA___V137*/
+ meltfptr[136] = (void *) &cdat->dsym_41__PCTN_PVARLOCMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_41__PCTN_PVARLOCMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6256,7 +6419,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_42__PCTN_PVARLOCMAP*/
- /*_.VALSTR___V137*/ meltfptr[136] =
+ /*_.VALSTR___V138*/ meltfptr[137] =
(void *) &cdat->dstr_42__PCTN_PVARLOCMAP;
cdat->dstr_42__PCTN_PVARLOCMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6267,7 +6430,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_43__PCTN_PVARLOCMAP*/
-/*_.VALDATA___V113*/ meltfptr[112] =
+/*_.VALDATA___V114*/ meltfptr[113] =
(void *) &cdat->dobj_43__PCTN_PVARLOCMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_43__PCTN_PVARLOCMAP",
@@ -6281,12 +6444,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_43__PCTN_PVARLOCMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_43__PCTN_PVARLOCMAP.obj_num = 8;
- cdat->dobj_43__PCTN_PVARLOCMAP.obj_hash = 749141041;
+ cdat->dobj_43__PCTN_PVARLOCMAP.obj_hash = 315934231;
cdat->dobj_43__PCTN_PVARLOCMAP.obj_len = 4;
/*inistring dstr_44__PCTN_PVARLOCMAP*/
- /*_.VALSTR___V114*/ meltfptr[113] =
+ /*_.VALSTR___V115*/ meltfptr[114] =
(void *) &cdat->dstr_44__PCTN_PVARLOCMAP;
cdat->dstr_44__PCTN_PVARLOCMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6296,9 +6459,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_45__PCTN_TESTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V138*/ meltfptr[137])
- /*_.VALDATA___V138*/
- meltfptr[137] = (void *) &cdat->dsym_45__PCTN_TESTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V139*/ meltfptr[138])
+ /*_.VALDATA___V139*/
+ meltfptr[138] = (void *) &cdat->dsym_45__PCTN_TESTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_45__PCTN_TESTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6315,7 +6478,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_46__PCTN_TESTS*/
- /*_.VALSTR___V139*/ meltfptr[138] = (void *) &cdat->dstr_46__PCTN_TESTS;
+ /*_.VALSTR___V140*/ meltfptr[139] = (void *) &cdat->dstr_46__PCTN_TESTS;
cdat->dstr_46__PCTN_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_46__PCTN_TESTS.val, "PCTN_TESTS",
@@ -6323,7 +6486,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_47__PCTN_TESTS*/
-/*_.VALDATA___V115*/ meltfptr[114] = (void *) &cdat->dobj_47__PCTN_TESTS;
+/*_.VALDATA___V116*/ meltfptr[115] = (void *) &cdat->dobj_47__PCTN_TESTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_47__PCTN_TESTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -6336,21 +6499,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_47__PCTN_TESTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_47__PCTN_TESTS.obj_num = 9;
- cdat->dobj_47__PCTN_TESTS.obj_hash = 191852775;
+ cdat->dobj_47__PCTN_TESTS.obj_hash = 656649691;
cdat->dobj_47__PCTN_TESTS.obj_len = 4;
/*inistring dstr_48__PCTN_TESTS*/
- /*_.VALSTR___V116*/ meltfptr[115] = (void *) &cdat->dstr_48__PCTN_TESTS;
+ /*_.VALSTR___V117*/ meltfptr[116] = (void *) &cdat->dstr_48__PCTN_TESTS;
cdat->dstr_48__PCTN_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_48__PCTN_TESTS.val, "PCTN_TESTS",
sizeof (cdat->dstr_48__PCTN_TESTS.val) - 1);
/*iniobj dsym_49__PCTN_VARHANDLERS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V140*/ meltfptr[139])
- /*_.VALDATA___V140*/
- meltfptr[139] = (void *) &cdat->dsym_49__PCTN_VARHANDLERS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V141*/ meltfptr[140])
+ /*_.VALDATA___V141*/
+ meltfptr[140] = (void *) &cdat->dsym_49__PCTN_VARHANDLERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_49__PCTN_VARHANDLERS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6367,7 +6530,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_50__PCTN_VARHANDLERS*/
- /*_.VALSTR___V141*/ meltfptr[140] =
+ /*_.VALSTR___V142*/ meltfptr[141] =
(void *) &cdat->dstr_50__PCTN_VARHANDLERS;
cdat->dstr_50__PCTN_VARHANDLERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6378,7 +6541,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_51__PCTN_VARHANDLERS*/
-/*_.VALDATA___V117*/ meltfptr[116] =
+/*_.VALDATA___V118*/ meltfptr[117] =
(void *) &cdat->dobj_51__PCTN_VARHANDLERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_51__PCTN_VARHANDLERS",
@@ -6392,12 +6555,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_51__PCTN_VARHANDLERS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_51__PCTN_VARHANDLERS.obj_num = 10;
- cdat->dobj_51__PCTN_VARHANDLERS.obj_hash = 83152378;
+ cdat->dobj_51__PCTN_VARHANDLERS.obj_hash = 393902729;
cdat->dobj_51__PCTN_VARHANDLERS.obj_len = 4;
/*inistring dstr_52__PCTN_VARHANDLERS*/
- /*_.VALSTR___V118*/ meltfptr[117] =
+ /*_.VALSTR___V119*/ meltfptr[118] =
(void *) &cdat->dstr_52__PCTN_VARHANDLERS;
cdat->dstr_52__PCTN_VARHANDLERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6407,9 +6570,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_53__SCAN_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V142*/ meltfptr[141])
- /*_.VALDATA___V142*/
- meltfptr[141] = (void *) &cdat->dsym_53__SCAN_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V143*/ meltfptr[142])
+ /*_.VALDATA___V143*/
+ meltfptr[142] = (void *) &cdat->dsym_53__SCAN_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_53__SCAN_PATTERN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6426,7 +6589,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_54__SCAN_PATTERN*/
- /*_.VALSTR___V143*/ meltfptr[142] = (void *) &cdat->dstr_54__SCAN_PATTERN;
+ /*_.VALSTR___V144*/ meltfptr[143] = (void *) &cdat->dstr_54__SCAN_PATTERN;
cdat->dstr_54__SCAN_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_54__SCAN_PATTERN.val,
@@ -6434,9 +6597,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_54__SCAN_PATTERN.val) - 1);
/*iniobj dsym_55__CLASS_SELECTOR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V144*/ meltfptr[143])
- /*_.VALDATA___V144*/
- meltfptr[143] = (void *) &cdat->dsym_55__CLASS_SELECTOR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V145*/ meltfptr[144])
+ /*_.VALDATA___V145*/
+ meltfptr[144] = (void *) &cdat->dsym_55__CLASS_SELECTOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_55__CLASS_SELECTOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6453,7 +6616,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_56__CLASS_SELECTOR*/
- /*_.VALSTR___V145*/ meltfptr[144] = (void *) &cdat->dstr_56__CLASS_SELECTOR;
+ /*_.VALSTR___V146*/ meltfptr[145] = (void *) &cdat->dstr_56__CLASS_SELECTOR;
cdat->dstr_56__CLASS_SELECTOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_56__CLASS_SELECTOR.val,
@@ -6463,7 +6626,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
MELT_LOCATION ("warmelt-normatch.melt:78:/ iniobj");
/*iniobj dobj_57__SCAN_PATTERN*/
-/*_.VALDATA___V146*/ meltfptr[145] = (void *) &cdat->dobj_57__SCAN_PATTERN;
+/*_.VALDATA___V147*/ meltfptr[146] = (void *) &cdat->dobj_57__SCAN_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_57__SCAN_PATTERN",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
@@ -6475,19 +6638,19 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_57__SCAN_PATTERN.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_57__SCAN_PATTERN.obj_hash = 769590733;
+ cdat->dobj_57__SCAN_PATTERN.obj_hash = 1071204604;
cdat->dobj_57__SCAN_PATTERN.obj_len = 4;
/*inistring dstr_58__SCAN_PATTERN*/
- /*_.VALSTR___V147*/ meltfptr[146] = (void *) &cdat->dstr_58__SCAN_PATTERN;
+ /*_.VALSTR___V148*/ meltfptr[147] = (void *) &cdat->dstr_58__SCAN_PATTERN;
cdat->dstr_58__SCAN_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_58__SCAN_PATTERN.val,
"SCAN_PATTERN",
sizeof (cdat->dstr_58__SCAN_PATTERN.val) - 1);
/*inirout drout_59__SCANPAT_ANYRECV */
- /*_.VALROUT___V148*/ meltfptr[147] =
+ /*_.VALROUT___V149*/ meltfptr[148] =
(void *) &cdat->drout_59__SCANPAT_ANYRECV;
cdat->drout_59__SCANPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6499,7 +6662,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_1_warmelt_normatch_SCANPAT_ANYRECV);
/*iniclos dclo_60__SCANPAT_ANYRECV */
- /*_.VALCLO___V149*/ meltfptr[148] =
+ /*_.VALCLO___V150*/ meltfptr[149] =
(void *) &cdat->dclo_60__SCANPAT_ANYRECV;
cdat->dclo_60__SCANPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6507,9 +6670,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_61__MELT_DEBUG_FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V150*/ meltfptr[149])
- /*_.VALDATA___V150*/
- meltfptr[149] = (void *) &cdat->dsym_61__MELT_DEBUG_FUN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V151*/ meltfptr[150])
+ /*_.VALDATA___V151*/
+ meltfptr[150] = (void *) &cdat->dsym_61__MELT_DEBUG_FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_61__MELT_DEBUG_FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6526,7 +6689,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_62__MELT_DEBUG_FUN*/
- /*_.VALSTR___V151*/ meltfptr[150] = (void *) &cdat->dstr_62__MELT_DEBUG_FUN;
+ /*_.VALSTR___V152*/ meltfptr[151] = (void *) &cdat->dstr_62__MELT_DEBUG_FUN;
cdat->dstr_62__MELT_DEBUG_FUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_62__MELT_DEBUG_FUN.val,
@@ -6535,9 +6698,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_63__CLASS_NAMED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V152*/ meltfptr[151])
- /*_.VALDATA___V152*/
- meltfptr[151] = (void *) &cdat->dsym_63__CLASS_NAMED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V153*/ meltfptr[152])
+ /*_.VALDATA___V153*/
+ meltfptr[152] = (void *) &cdat->dsym_63__CLASS_NAMED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_63__CLASS_NAMED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6554,16 +6717,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_64__CLASS_NAMED*/
- /*_.VALSTR___V153*/ meltfptr[152] = (void *) &cdat->dstr_64__CLASS_NAMED;
+ /*_.VALSTR___V154*/ meltfptr[153] = (void *) &cdat->dstr_64__CLASS_NAMED;
cdat->dstr_64__CLASS_NAMED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_64__CLASS_NAMED.val, "CLASS_NAMED",
sizeof (cdat->dstr_64__CLASS_NAMED.val) - 1);
/*iniobj dsym_65__INSTALL_METHOD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V154*/ meltfptr[153])
- /*_.VALDATA___V154*/
- meltfptr[153] = (void *) &cdat->dsym_65__INSTALL_METHOD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V155*/ meltfptr[154])
+ /*_.VALDATA___V155*/
+ meltfptr[154] = (void *) &cdat->dsym_65__INSTALL_METHOD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_65__INSTALL_METHOD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6580,7 +6743,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_66__INSTALL_METHOD*/
- /*_.VALSTR___V155*/ meltfptr[154] = (void *) &cdat->dstr_66__INSTALL_METHOD;
+ /*_.VALSTR___V156*/ meltfptr[155] = (void *) &cdat->dstr_66__INSTALL_METHOD;
cdat->dstr_66__INSTALL_METHOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_66__INSTALL_METHOD.val,
@@ -6589,9 +6752,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_67__DISCR_ANY_RECEIVER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V156*/ meltfptr[155])
- /*_.VALDATA___V156*/
- meltfptr[155] = (void *) &cdat->dsym_67__DISCR_ANY_RECEIVER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V157*/ meltfptr[156])
+ /*_.VALDATA___V157*/
+ meltfptr[156] = (void *) &cdat->dsym_67__DISCR_ANY_RECEIVER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_67__DISCR_ANY_RECEIVER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6608,7 +6771,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_68__DISCR_ANY_RECEIV*/
- /*_.VALSTR___V157*/ meltfptr[156] =
+ /*_.VALSTR___V158*/ meltfptr[157] =
(void *) &cdat->dstr_68__DISCR_ANY_RECEIV;
cdat->dstr_68__DISCR_ANY_RECEIV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6617,7 +6780,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_68__DISCR_ANY_RECEIV.val) -
1);
/*inirout drout_69__SCANPAT_ANYPATTERN */
- /*_.VALROUT___V158*/ meltfptr[157] =
+ /*_.VALROUT___V159*/ meltfptr[158] =
(void *) &cdat->drout_69__SCANPAT_ANYPATTERN;
cdat->drout_69__SCANPAT_ANYPATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6629,7 +6792,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN);
/*iniclos dclo_70__SCANPAT_ANYPATTERN */
- /*_.VALCLO___V159*/ meltfptr[158] =
+ /*_.VALCLO___V160*/ meltfptr[159] =
(void *) &cdat->dclo_70__SCANPAT_ANYPATTERN;
cdat->dclo_70__SCANPAT_ANYPATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6637,9 +6800,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_71__CLASS_SOURCE_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V160*/ meltfptr[159])
- /*_.VALDATA___V160*/
- meltfptr[159] = (void *) &cdat->dsym_71__CLASS_SOURCE_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V161*/ meltfptr[160])
+ /*_.VALDATA___V161*/
+ meltfptr[160] = (void *) &cdat->dsym_71__CLASS_SOURCE_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_71__CLASS_SOURCE_PATTERN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6656,7 +6819,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_72__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V161*/ meltfptr[160] =
+ /*_.VALSTR___V162*/ meltfptr[161] =
(void *) &cdat->dstr_72__CLASS_SOURCE_PAT;
cdat->dstr_72__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6665,7 +6828,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_72__CLASS_SOURCE_PAT.val) -
1);
/*inirout drout_73__SCANPAT_SRCPATVAR */
- /*_.VALROUT___V162*/ meltfptr[161] =
+ /*_.VALROUT___V163*/ meltfptr[162] =
(void *) &cdat->drout_73__SCANPAT_SRCPATVAR;
cdat->drout_73__SCANPAT_SRCPATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6677,7 +6840,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR);
/*iniclos dclo_74__SCANPAT_SRCPATVAR */
- /*_.VALCLO___V163*/ meltfptr[162] =
+ /*_.VALCLO___V164*/ meltfptr[163] =
(void *) &cdat->dclo_74__SCANPAT_SRCPATVAR;
cdat->dclo_74__SCANPAT_SRCPATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6685,9 +6848,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_75__CLASS_SOURCE_PATTERN_VARIABLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V164*/ meltfptr[163])
- /*_.VALDATA___V164*/
- meltfptr[163] = (void *) &cdat->dsym_75__CLASS_SOURCE_PATTERN_VARIABLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V165*/ meltfptr[164])
+ /*_.VALDATA___V165*/
+ meltfptr[164] = (void *) &cdat->dsym_75__CLASS_SOURCE_PATTERN_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_75__CLASS_SOURCE_PATTERN_VARIABLE",
@@ -6705,7 +6868,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_76__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V165*/ meltfptr[164] =
+ /*_.VALSTR___V166*/ meltfptr[165] =
(void *) &cdat->dstr_76__CLASS_SOURCE_PAT;
cdat->dstr_76__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6714,7 +6877,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_76__CLASS_SOURCE_PAT.val) -
1);
/*inirout drout_77__SCANPAT_SRCPATJOKER */
- /*_.VALROUT___V166*/ meltfptr[165] =
+ /*_.VALROUT___V167*/ meltfptr[166] =
(void *) &cdat->drout_77__SCANPAT_SRCPATJOKER;
cdat->drout_77__SCANPAT_SRCPATJOKER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6726,7 +6889,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER);
/*iniclos dclo_78__SCANPAT_SRCPATJOKER */
- /*_.VALCLO___V167*/ meltfptr[166] =
+ /*_.VALCLO___V168*/ meltfptr[167] =
(void *) &cdat->dclo_78__SCANPAT_SRCPATJOKER;
cdat->dclo_78__SCANPAT_SRCPATJOKER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6734,9 +6897,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V168*/ meltfptr[167])
- /*_.VALDATA___V168*/
- meltfptr[167] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V169*/ meltfptr[168])
+ /*_.VALDATA___V169*/
+ meltfptr[168] =
(void *) &cdat->dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -6755,7 +6918,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_80__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V169*/ meltfptr[168] =
+ /*_.VALSTR___V170*/ meltfptr[169] =
(void *) &cdat->dstr_80__CLASS_SOURCE_PAT;
cdat->dstr_80__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6764,7 +6927,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_80__CLASS_SOURCE_PAT.val) -
1);
/*inirout drout_81__SCANPAT_SRCPATCONSTANT */
- /*_.VALROUT___V170*/ meltfptr[169] =
+ /*_.VALROUT___V171*/ meltfptr[170] =
(void *) &cdat->drout_81__SCANPAT_SRCPATCONSTANT;
cdat->drout_81__SCANPAT_SRCPATCONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6776,7 +6939,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_5_warmelt_normatch_SCANPAT_SRCPATCONSTANT);
/*iniclos dclo_82__SCANPAT_SRCPATCONSTANT */
- /*_.VALCLO___V171*/ meltfptr[170] =
+ /*_.VALCLO___V172*/ meltfptr[171] =
(void *) &cdat->dclo_82__SCANPAT_SRCPATCONSTANT;
cdat->dclo_82__SCANPAT_SRCPATCONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6784,9 +6947,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_83__CLASS_SOURCE_PATTERN_CONSTANT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V172*/ meltfptr[171])
- /*_.VALDATA___V172*/
- meltfptr[171] = (void *) &cdat->dsym_83__CLASS_SOURCE_PATTERN_CONSTANT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V173*/ meltfptr[172])
+ /*_.VALDATA___V173*/
+ meltfptr[172] = (void *) &cdat->dsym_83__CLASS_SOURCE_PATTERN_CONSTANT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_83__CLASS_SOURCE_PATTERN_CONSTANT",
@@ -6804,7 +6967,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_84__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V173*/ meltfptr[172] =
+ /*_.VALSTR___V174*/ meltfptr[173] =
(void *) &cdat->dstr_84__CLASS_SOURCE_PAT;
cdat->dstr_84__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6814,9 +6977,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_85__NORMAL_EXP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V174*/ meltfptr[173])
- /*_.VALDATA___V174*/
- meltfptr[173] = (void *) &cdat->dsym_85__NORMAL_EXP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V175*/ meltfptr[174])
+ /*_.VALDATA___V175*/
+ meltfptr[174] = (void *) &cdat->dsym_85__NORMAL_EXP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_85__NORMAL_EXP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6833,16 +6996,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_86__NORMAL_EXP*/
- /*_.VALSTR___V175*/ meltfptr[174] = (void *) &cdat->dstr_86__NORMAL_EXP;
+ /*_.VALSTR___V176*/ meltfptr[175] = (void *) &cdat->dstr_86__NORMAL_EXP;
cdat->dstr_86__NORMAL_EXP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_86__NORMAL_EXP.val, "NORMAL_EXP",
sizeof (cdat->dstr_86__NORMAL_EXP.val) - 1);
/*iniobj dsym_87__LIST_APPEND2LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V176*/ meltfptr[175])
- /*_.VALDATA___V176*/
- meltfptr[175] = (void *) &cdat->dsym_87__LIST_APPEND2LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V177*/ meltfptr[176])
+ /*_.VALDATA___V177*/
+ meltfptr[176] = (void *) &cdat->dsym_87__LIST_APPEND2LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_87__LIST_APPEND2LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6859,7 +7022,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_88__LIST_APPEND2LIST*/
- /*_.VALSTR___V177*/ meltfptr[176] =
+ /*_.VALSTR___V178*/ meltfptr[177] =
(void *) &cdat->dstr_88__LIST_APPEND2LIST;
cdat->dstr_88__LIST_APPEND2LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6869,9 +7032,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_89__GET_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V178*/ meltfptr[177])
- /*_.VALDATA___V178*/
- meltfptr[177] = (void *) &cdat->dsym_89__GET_CTYPE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V179*/ meltfptr[178])
+ /*_.VALDATA___V179*/
+ meltfptr[178] = (void *) &cdat->dsym_89__GET_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_89__GET_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6888,16 +7051,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_90__GET_CTYPE*/
- /*_.VALSTR___V179*/ meltfptr[178] = (void *) &cdat->dstr_90__GET_CTYPE;
+ /*_.VALSTR___V180*/ meltfptr[179] = (void *) &cdat->dstr_90__GET_CTYPE;
cdat->dstr_90__GET_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_90__GET_CTYPE.val, "GET_CTYPE",
sizeof (cdat->dstr_90__GET_CTYPE.val) - 1);
/*iniobj dsym_91__CLASS_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V180*/ meltfptr[179])
- /*_.VALDATA___V180*/
- meltfptr[179] = (void *) &cdat->dsym_91__CLASS_CTYPE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V181*/ meltfptr[180])
+ /*_.VALDATA___V181*/
+ meltfptr[180] = (void *) &cdat->dsym_91__CLASS_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_91__CLASS_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6914,16 +7077,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_92__CLASS_CTYPE*/
- /*_.VALSTR___V181*/ meltfptr[180] = (void *) &cdat->dstr_92__CLASS_CTYPE;
+ /*_.VALSTR___V182*/ meltfptr[181] = (void *) &cdat->dstr_92__CLASS_CTYPE;
cdat->dstr_92__CLASS_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_92__CLASS_CTYPE.val, "CLASS_CTYPE",
sizeof (cdat->dstr_92__CLASS_CTYPE.val) - 1);
/*iniobj dsym_93__CLASS_LOCATED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V182*/ meltfptr[181])
- /*_.VALDATA___V182*/
- meltfptr[181] = (void *) &cdat->dsym_93__CLASS_LOCATED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V183*/ meltfptr[182])
+ /*_.VALDATA___V183*/
+ meltfptr[182] = (void *) &cdat->dsym_93__CLASS_LOCATED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_93__CLASS_LOCATED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -6940,7 +7103,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_94__CLASS_LOCATED*/
- /*_.VALSTR___V183*/ meltfptr[182] = (void *) &cdat->dstr_94__CLASS_LOCATED;
+ /*_.VALSTR___V184*/ meltfptr[183] = (void *) &cdat->dstr_94__CLASS_LOCATED;
cdat->dstr_94__CLASS_LOCATED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_94__CLASS_LOCATED.val,
@@ -6948,7 +7111,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_94__CLASS_LOCATED.val) -
1);
/*inirout drout_95__SCANPAT_SRCPATCONSTRUCT */
- /*_.VALROUT___V184*/ meltfptr[183] =
+ /*_.VALROUT___V185*/ meltfptr[184] =
(void *) &cdat->drout_95__SCANPAT_SRCPATCONSTRUCT;
cdat->drout_95__SCANPAT_SRCPATCONSTRUCT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
@@ -6960,7 +7123,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltrout_6_warmelt_normatch_SCANPAT_SRCPATCONSTRUCT);
/*iniclos dclo_96__SCANPAT_SRCPATCONSTRUCT */
- /*_.VALCLO___V185*/ meltfptr[184] =
+ /*_.VALCLO___V186*/ meltfptr[185] =
(void *) &cdat->dclo_96__SCANPAT_SRCPATCONSTRUCT;
cdat->dclo_96__SCANPAT_SRCPATCONSTRUCT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -6968,9 +7131,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V186*/ meltfptr[185])
- /*_.VALDATA___V186*/
- meltfptr[185] = (void *) &cdat->dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V187*/ meltfptr[186])
+ /*_.VALDATA___V187*/
+ meltfptr[186] = (void *) &cdat->dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT",
@@ -6988,7 +7151,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_98__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V187*/ meltfptr[186] =
+ /*_.VALSTR___V188*/ meltfptr[187] =
(void *) &cdat->dstr_98__CLASS_SOURCE_PAT;
cdat->dstr_98__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -6998,9 +7161,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_99__CTYPE_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V188*/ meltfptr[187])
- /*_.VALDATA___V188*/
- meltfptr[187] = (void *) &cdat->dsym_99__CTYPE_VALUE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V189*/ meltfptr[188])
+ /*_.VALDATA___V189*/
+ meltfptr[188] = (void *) &cdat->dsym_99__CTYPE_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_99__CTYPE_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7017,26 +7180,26 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_100__CTYPE_VALUE*/
- /*_.VALSTR___V189*/ meltfptr[188] = (void *) &cdat->dstr_100__CTYPE_VALUE;
+ /*_.VALSTR___V190*/ meltfptr[189] = (void *) &cdat->dstr_100__CTYPE_VALUE;
cdat->dstr_100__CTYPE_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_100__CTYPE_VALUE.val,
"CTYPE_VALUE",
sizeof (cdat->dstr_100__CTYPE_VALUE.val) - 1);
/*inirout drout_101__SCANPAT_SRCPATOBJECT */
- /*_.VALROUT___V190*/ meltfptr[189] =
+ /*_.VALROUT___V191*/ meltfptr[190] =
(void *) &cdat->drout_101__SCANPAT_SRCPATOBJECT;
cdat->drout_101__SCANPAT_SRCPATOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_101__SCANPAT_SRCPATOBJECT.routdescr,
- "SCANPAT_SRCPATOBJECT @warmelt-normatch.melt:241",
+ "SCANPAT_SRCPATOBJECT @warmelt-normatch.melt:242",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_101__SCANPAT_SRCPATOBJECT.nbval = 9;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_101__SCANPAT_SRCPATOBJECT,
meltrout_7_warmelt_normatch_SCANPAT_SRCPATOBJECT);
/*iniclos dclo_102__SCANPAT_SRCPATOBJECT */
- /*_.VALCLO___V191*/ meltfptr[190] =
+ /*_.VALCLO___V192*/ meltfptr[191] =
(void *) &cdat->dclo_102__SCANPAT_SRCPATOBJECT;
cdat->dclo_102__SCANPAT_SRCPATOBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -7044,9 +7207,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_103__CLASS_SOURCE_PATTERN_OBJECT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V192*/ meltfptr[191])
- /*_.VALDATA___V192*/
- meltfptr[191] = (void *) &cdat->dsym_103__CLASS_SOURCE_PATTERN_OBJECT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V193*/ meltfptr[192])
+ /*_.VALDATA___V193*/
+ meltfptr[192] = (void *) &cdat->dsym_103__CLASS_SOURCE_PATTERN_OBJECT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_103__CLASS_SOURCE_PATTERN_OBJECT",
@@ -7064,7 +7227,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_104__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V193*/ meltfptr[192] =
+ /*_.VALSTR___V194*/ meltfptr[193] =
(void *) &cdat->dstr_104__CLASS_SOURCE_PAT;
cdat->dstr_104__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7074,9 +7237,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_105__CLASS_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V194*/ meltfptr[193])
- /*_.VALDATA___V194*/
- meltfptr[193] = (void *) &cdat->dsym_105__CLASS_CLASS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V195*/ meltfptr[194])
+ /*_.VALDATA___V195*/
+ meltfptr[194] = (void *) &cdat->dsym_105__CLASS_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_105__CLASS_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7093,7 +7256,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_106__CLASS_CLASS*/
- /*_.VALSTR___V195*/ meltfptr[194] = (void *) &cdat->dstr_106__CLASS_CLASS;
+ /*_.VALSTR___V196*/ meltfptr[195] = (void *) &cdat->dstr_106__CLASS_CLASS;
cdat->dstr_106__CLASS_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_106__CLASS_CLASS.val,
@@ -7101,9 +7264,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_106__CLASS_CLASS.val) - 1);
/*iniobj dsym_107__CLASS_SOURCE_FIELD_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V196*/ meltfptr[195])
- /*_.VALDATA___V196*/
- meltfptr[195] = (void *) &cdat->dsym_107__CLASS_SOURCE_FIELD_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V197*/ meltfptr[196])
+ /*_.VALDATA___V197*/
+ meltfptr[196] = (void *) &cdat->dsym_107__CLASS_SOURCE_FIELD_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_107__CLASS_SOURCE_FIELD_PATTERN",
@@ -7121,7 +7284,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_108__CLASS_SOURCE_FIE*/
- /*_.VALSTR___V197*/ meltfptr[196] =
+ /*_.VALSTR___V198*/ meltfptr[197] =
(void *) &cdat->dstr_108__CLASS_SOURCE_FIE;
cdat->dstr_108__CLASS_SOURCE_FIE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7131,9 +7294,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_109__CLASS_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V198*/ meltfptr[197])
- /*_.VALDATA___V198*/
- meltfptr[197] = (void *) &cdat->dsym_109__CLASS_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V199*/ meltfptr[198])
+ /*_.VALDATA___V199*/
+ meltfptr[198] = (void *) &cdat->dsym_109__CLASS_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_109__CLASS_FIELD",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7150,26 +7313,26 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_110__CLASS_FIELD*/
- /*_.VALSTR___V199*/ meltfptr[198] = (void *) &cdat->dstr_110__CLASS_FIELD;
+ /*_.VALSTR___V200*/ meltfptr[199] = (void *) &cdat->dstr_110__CLASS_FIELD;
cdat->dstr_110__CLASS_FIELD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_110__CLASS_FIELD.val,
"CLASS_FIELD",
sizeof (cdat->dstr_110__CLASS_FIELD.val) - 1);
/*inirout drout_111__SCANPAT_SRCPATCOMPOSITE */
- /*_.VALROUT___V200*/ meltfptr[199] =
+ /*_.VALROUT___V201*/ meltfptr[200] =
(void *) &cdat->drout_111__SCANPAT_SRCPATCOMPOSITE;
cdat->drout_111__SCANPAT_SRCPATCOMPOSITE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_111__SCANPAT_SRCPATCOMPOSITE.routdescr,
- "SCANPAT_SRCPATCOMPOSITE @warmelt-normatch.melt:279",
+ "SCANPAT_SRCPATCOMPOSITE @warmelt-normatch.melt:280",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_111__SCANPAT_SRCPATCOMPOSITE.nbval = 9;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_111__SCANPAT_SRCPATCOMPOSITE,
meltrout_8_warmelt_normatch_SCANPAT_SRCPATCOMPOSITE);
/*iniclos dclo_112__SCANPAT_SRCPATCOMPOSITE */
- /*_.VALCLO___V201*/ meltfptr[200] =
+ /*_.VALCLO___V202*/ meltfptr[201] =
(void *) &cdat->dclo_112__SCANPAT_SRCPATCOMPOSITE;
cdat->dclo_112__SCANPAT_SRCPATCOMPOSITE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -7177,9 +7340,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V202*/ meltfptr[201])
- /*_.VALDATA___V202*/
- meltfptr[201] = (void *) &cdat->dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V203*/ meltfptr[202])
+ /*_.VALDATA___V203*/
+ meltfptr[202] = (void *) &cdat->dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE",
@@ -7197,7 +7360,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_114__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V203*/ meltfptr[202] =
+ /*_.VALSTR___V204*/ meltfptr[203] =
(void *) &cdat->dstr_114__CLASS_SOURCE_PAT;
cdat->dstr_114__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7207,9 +7370,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_115__CLASS_ANY_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V204*/ meltfptr[203])
- /*_.VALDATA___V204*/
- meltfptr[203] = (void *) &cdat->dsym_115__CLASS_ANY_MATCHER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V205*/ meltfptr[204])
+ /*_.VALDATA___V205*/
+ meltfptr[204] = (void *) &cdat->dsym_115__CLASS_ANY_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_115__CLASS_ANY_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7226,7 +7389,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_116__CLASS_ANY_MATCHE*/
- /*_.VALSTR___V205*/ meltfptr[204] =
+ /*_.VALSTR___V206*/ meltfptr[205] =
(void *) &cdat->dstr_116__CLASS_ANY_MATCHE;
cdat->dstr_116__CLASS_ANY_MATCHE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7236,9 +7399,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_117__CLASS_FORMAL_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V206*/ meltfptr[205])
- /*_.VALDATA___V206*/
- meltfptr[205] = (void *) &cdat->dsym_117__CLASS_FORMAL_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V207*/ meltfptr[206])
+ /*_.VALDATA___V207*/
+ meltfptr[206] = (void *) &cdat->dsym_117__CLASS_FORMAL_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_117__CLASS_FORMAL_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7255,7 +7418,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_118__CLASS_FORMAL_BIN*/
- /*_.VALSTR___V207*/ meltfptr[206] =
+ /*_.VALSTR___V208*/ meltfptr[207] =
(void *) &cdat->dstr_118__CLASS_FORMAL_BIN;
cdat->dstr_118__CLASS_FORMAL_BIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7265,9 +7428,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_119__NORMALIZE_TUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V208*/ meltfptr[207])
- /*_.VALDATA___V208*/
- meltfptr[207] = (void *) &cdat->dsym_119__NORMALIZE_TUPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V209*/ meltfptr[208])
+ /*_.VALDATA___V209*/
+ meltfptr[208] = (void *) &cdat->dsym_119__NORMALIZE_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_119__NORMALIZE_TUPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7284,7 +7447,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_120__NORMALIZE_TUPLE*/
- /*_.VALSTR___V209*/ meltfptr[208] =
+ /*_.VALSTR___V210*/ meltfptr[209] =
(void *) &cdat->dstr_120__NORMALIZE_TUPLE;
cdat->dstr_120__NORMALIZE_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7293,19 +7456,19 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_120__NORMALIZE_TUPLE.val) -
1);
/*inirout drout_121__SCANPAT_SRCPATOR */
- /*_.VALROUT___V210*/ meltfptr[209] =
+ /*_.VALROUT___V211*/ meltfptr[210] =
(void *) &cdat->drout_121__SCANPAT_SRCPATOR;
cdat->drout_121__SCANPAT_SRCPATOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_121__SCANPAT_SRCPATOR.routdescr,
- "SCANPAT_SRCPATOR @warmelt-normatch.melt:341",
+ "SCANPAT_SRCPATOR @warmelt-normatch.melt:342",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_121__SCANPAT_SRCPATOR.nbval = 10;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_121__SCANPAT_SRCPATOR,
meltrout_9_warmelt_normatch_SCANPAT_SRCPATOR);
/*iniclos dclo_122__SCANPAT_SRCPATOR */
- /*_.VALCLO___V212*/ meltfptr[211] =
+ /*_.VALCLO___V213*/ meltfptr[212] =
(void *) &cdat->dclo_122__SCANPAT_SRCPATOR;
cdat->dclo_122__SCANPAT_SRCPATOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -7313,9 +7476,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_123__CLASS_SOURCE_PATTERN_OR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V213*/ meltfptr[212])
- /*_.VALDATA___V213*/
- meltfptr[212] = (void *) &cdat->dsym_123__CLASS_SOURCE_PATTERN_OR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V214*/ meltfptr[213])
+ /*_.VALDATA___V214*/
+ meltfptr[213] = (void *) &cdat->dsym_123__CLASS_SOURCE_PATTERN_OR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_123__CLASS_SOURCE_PATTERN_OR",
@@ -7333,7 +7496,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_124__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V214*/ meltfptr[213] =
+ /*_.VALSTR___V215*/ meltfptr[214] =
(void *) &cdat->dstr_124__CLASS_SOURCE_PAT;
cdat->dstr_124__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7343,9 +7506,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_125__DISCR_MAP_OBJECTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V215*/ meltfptr[214])
- /*_.VALDATA___V215*/
- meltfptr[214] = (void *) &cdat->dsym_125__DISCR_MAP_OBJECTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V216*/ meltfptr[215])
+ /*_.VALDATA___V216*/
+ meltfptr[215] = (void *) &cdat->dsym_125__DISCR_MAP_OBJECTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_125__DISCR_MAP_OBJECTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7362,7 +7525,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_126__DISCR_MAP_OBJECT*/
- /*_.VALSTR___V216*/ meltfptr[215] =
+ /*_.VALSTR___V217*/ meltfptr[216] =
(void *) &cdat->dstr_126__DISCR_MAP_OBJECT;
cdat->dstr_126__DISCR_MAP_OBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7371,20 +7534,20 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_126__DISCR_MAP_OBJECT.
val) - 1);
/*inirout drout_127__LAMBDA_ */
- /*_.VALROUT___V211*/ meltfptr[210] = (void *) &cdat->drout_127__LAMBDA_;
+ /*_.VALROUT___V212*/ meltfptr[211] = (void *) &cdat->drout_127__LAMBDA_;
cdat->drout_127__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_127__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:353", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:354", MELT_ROUTDESCR_LEN - 1);
cdat->drout_127__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_127__LAMBDA_,
meltrout_10_warmelt_normatch_LAMBDA___1__);
/*iniobj dsym_128__CLASS_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V217*/ meltfptr[216])
- /*_.VALDATA___V217*/
- meltfptr[216] = (void *) &cdat->dsym_128__CLASS_SYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217])
+ /*_.VALDATA___V218*/
+ meltfptr[217] = (void *) &cdat->dsym_128__CLASS_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_128__CLASS_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7401,7 +7564,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_129__CLASS_SYMBOL*/
- /*_.VALSTR___V218*/ meltfptr[217] = (void *) &cdat->dstr_129__CLASS_SYMBOL;
+ /*_.VALSTR___V219*/ meltfptr[218] = (void *) &cdat->dstr_129__CLASS_SYMBOL;
cdat->dstr_129__CLASS_SYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_129__CLASS_SYMBOL.val,
@@ -7409,19 +7572,19 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_129__CLASS_SYMBOL.val) -
1);
/*inirout drout_130__SCANPAT_SRCPATAND */
- /*_.VALROUT___V219*/ meltfptr[218] =
+ /*_.VALROUT___V220*/ meltfptr[219] =
(void *) &cdat->drout_130__SCANPAT_SRCPATAND;
cdat->drout_130__SCANPAT_SRCPATAND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_130__SCANPAT_SRCPATAND.routdescr,
- "SCANPAT_SRCPATAND @warmelt-normatch.melt:415",
+ "SCANPAT_SRCPATAND @warmelt-normatch.melt:416",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_130__SCANPAT_SRCPATAND.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_130__SCANPAT_SRCPATAND,
meltrout_11_warmelt_normatch_SCANPAT_SRCPATAND);
/*iniclos dclo_131__SCANPAT_SRCPATAND */
- /*_.VALCLO___V220*/ meltfptr[219] =
+ /*_.VALCLO___V221*/ meltfptr[220] =
(void *) &cdat->dclo_131__SCANPAT_SRCPATAND;
cdat->dclo_131__SCANPAT_SRCPATAND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -7429,9 +7592,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_132__CLASS_SOURCE_PATTERN_AND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V221*/ meltfptr[220])
- /*_.VALDATA___V221*/
- meltfptr[220] = (void *) &cdat->dsym_132__CLASS_SOURCE_PATTERN_AND;
+ /*uniqueobj*/ if (! /*_.VALDATA___V222*/ meltfptr[221])
+ /*_.VALDATA___V222*/
+ meltfptr[221] = (void *) &cdat->dsym_132__CLASS_SOURCE_PATTERN_AND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_132__CLASS_SOURCE_PATTERN_AND",
@@ -7449,7 +7612,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_133__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V222*/ meltfptr[221] =
+ /*_.VALSTR___V223*/ meltfptr[222] =
(void *) &cdat->dstr_133__CLASS_SOURCE_PAT;
cdat->dstr_133__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7459,9 +7622,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_134__NORMAL_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V223*/ meltfptr[222])
- /*_.VALDATA___V223*/
- meltfptr[222] = (void *) &cdat->dsym_134__NORMAL_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V224*/ meltfptr[223])
+ /*_.VALDATA___V224*/
+ meltfptr[223] = (void *) &cdat->dsym_134__NORMAL_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_134__NORMAL_PATTERN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7478,7 +7641,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_135__NORMAL_PATTERN*/
- /*_.VALSTR___V224*/ meltfptr[223] =
+ /*_.VALSTR___V225*/ meltfptr[224] =
(void *) &cdat->dstr_135__NORMAL_PATTERN;
cdat->dstr_135__NORMAL_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7486,10 +7649,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"NORMAL_PATTERN",
sizeof (cdat->dstr_135__NORMAL_PATTERN.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:442:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:443:/ iniobj");
/*iniobj dobj_136__NORMAL_PATTERN*/
-/*_.VALDATA___V225*/ meltfptr[224] =
+/*_.VALDATA___V226*/ meltfptr[225] =
(void *) &cdat->dobj_136__NORMAL_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_136__NORMAL_PATTERN",
@@ -7502,12 +7665,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_136__NORMAL_PATTERN.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_136__NORMAL_PATTERN.obj_hash = 988910870;
+ cdat->dobj_136__NORMAL_PATTERN.obj_hash = 47766591;
cdat->dobj_136__NORMAL_PATTERN.obj_len = 4;
/*inistring dstr_137__NORMAL_PATTERN*/
- /*_.VALSTR___V226*/ meltfptr[225] =
+ /*_.VALSTR___V227*/ meltfptr[226] =
(void *) &cdat->dstr_137__NORMAL_PATTERN;
cdat->dstr_137__NORMAL_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7517,9 +7680,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_138__CLASS_NORMAL_OR_VARIABLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V227*/ meltfptr[226])
- /*_.VALDATA___V227*/
- meltfptr[226] = (void *) &cdat->dsym_138__CLASS_NORMAL_OR_VARIABLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V228*/ meltfptr[227])
+ /*_.VALDATA___V228*/
+ meltfptr[227] = (void *) &cdat->dsym_138__CLASS_NORMAL_OR_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_138__CLASS_NORMAL_OR_VARIABLE",
@@ -7537,7 +7700,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_139__CLASS_NORMAL_OR_*/
- /*_.VALSTR___V228*/ meltfptr[227] =
+ /*_.VALSTR___V229*/ meltfptr[228] =
(void *) &cdat->dstr_139__CLASS_NORMAL_OR_;
cdat->dstr_139__CLASS_NORMAL_OR_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7545,10 +7708,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMAL_OR_VARIABLE",
sizeof (cdat->dstr_139__CLASS_NORMAL_OR_.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ iniobj");
/*iniobj dobj_140__CLASS_NORMAL_OR_VARIABLE*/
-/*_.VALDATA___V229*/ meltfptr[228] =
+/*_.VALDATA___V230*/ meltfptr[229] =
(void *) &cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -7563,12 +7726,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_hash = 158423099;
+ cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_hash = 1065607062;
cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_len = 8;
/*inistring dstr_141__CLASS_NORMAL_OR_*/
- /*_.VALSTR___V230*/ meltfptr[229] =
+ /*_.VALSTR___V231*/ meltfptr[230] =
(void *) &cdat->dstr_141__CLASS_NORMAL_OR_;
cdat->dstr_141__CLASS_NORMAL_OR_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7577,22 +7740,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_141__CLASS_NORMAL_OR_.
val) - 1);
/*inimult dtup_142__CLASS_NORMAL_OR_VARIABLE */
- /*_.VALTUP___V231*/ meltfptr[230] =
+ /*_.VALTUP___V232*/ meltfptr[231] =
(void *) &cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE;
cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE.nbval = 1;
/*inimult dtup_143__CLASS_NORMAL_OR_VARIABLE */
- /*_.VALTUP___V240*/ meltfptr[239] =
+ /*_.VALTUP___V241*/ meltfptr[240] =
(void *) &cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE;
cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE.nbval = 4;
/*iniobj dsym_144__NORVAR_NOREXP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V241*/ meltfptr[240])
- /*_.VALDATA___V241*/
- meltfptr[240] = (void *) &cdat->dsym_144__NORVAR_NOREXP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V242*/ meltfptr[241])
+ /*_.VALDATA___V242*/
+ meltfptr[241] = (void *) &cdat->dsym_144__NORVAR_NOREXP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_144__NORVAR_NOREXP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7609,7 +7772,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_145__NORVAR_NOREXP*/
- /*_.VALSTR___V242*/ meltfptr[241] = (void *) &cdat->dstr_145__NORVAR_NOREXP;
+ /*_.VALSTR___V243*/ meltfptr[242] = (void *) &cdat->dstr_145__NORVAR_NOREXP;
cdat->dstr_145__NORVAR_NOREXP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_145__NORVAR_NOREXP.val,
@@ -7619,7 +7782,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_146__NORVAR_NOREXP*/
-/*_.VALDATA___V232*/ meltfptr[231] =
+/*_.VALDATA___V233*/ meltfptr[232] =
(void *) &cdat->dobj_146__NORVAR_NOREXP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_146__NORVAR_NOREXP",
@@ -7633,12 +7796,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_146__NORVAR_NOREXP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_146__NORVAR_NOREXP.obj_num = 0;
- cdat->dobj_146__NORVAR_NOREXP.obj_hash = 909118171;
+ cdat->dobj_146__NORVAR_NOREXP.obj_hash = 730263787;
cdat->dobj_146__NORVAR_NOREXP.obj_len = 4;
/*inistring dstr_147__NORVAR_NOREXP*/
- /*_.VALSTR___V233*/ meltfptr[232] = (void *) &cdat->dstr_147__NORVAR_NOREXP;
+ /*_.VALSTR___V234*/ meltfptr[233] = (void *) &cdat->dstr_147__NORVAR_NOREXP;
cdat->dstr_147__NORVAR_NOREXP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_147__NORVAR_NOREXP.val,
@@ -7647,9 +7810,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_148__NORVAR_LOCSYM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V243*/ meltfptr[242])
- /*_.VALDATA___V243*/
- meltfptr[242] = (void *) &cdat->dsym_148__NORVAR_LOCSYM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V244*/ meltfptr[243])
+ /*_.VALDATA___V244*/
+ meltfptr[243] = (void *) &cdat->dsym_148__NORVAR_LOCSYM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_148__NORVAR_LOCSYM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7666,7 +7829,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_149__NORVAR_LOCSYM*/
- /*_.VALSTR___V244*/ meltfptr[243] = (void *) &cdat->dstr_149__NORVAR_LOCSYM;
+ /*_.VALSTR___V245*/ meltfptr[244] = (void *) &cdat->dstr_149__NORVAR_LOCSYM;
cdat->dstr_149__NORVAR_LOCSYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_149__NORVAR_LOCSYM.val,
@@ -7676,7 +7839,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_150__NORVAR_LOCSYM*/
-/*_.VALDATA___V234*/ meltfptr[233] =
+/*_.VALDATA___V235*/ meltfptr[234] =
(void *) &cdat->dobj_150__NORVAR_LOCSYM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_150__NORVAR_LOCSYM",
@@ -7690,12 +7853,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_150__NORVAR_LOCSYM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_150__NORVAR_LOCSYM.obj_num = 1;
- cdat->dobj_150__NORVAR_LOCSYM.obj_hash = 521733294;
+ cdat->dobj_150__NORVAR_LOCSYM.obj_hash = 986971239;
cdat->dobj_150__NORVAR_LOCSYM.obj_len = 4;
/*inistring dstr_151__NORVAR_LOCSYM*/
- /*_.VALSTR___V235*/ meltfptr[234] = (void *) &cdat->dstr_151__NORVAR_LOCSYM;
+ /*_.VALSTR___V236*/ meltfptr[235] = (void *) &cdat->dstr_151__NORVAR_LOCSYM;
cdat->dstr_151__NORVAR_LOCSYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_151__NORVAR_LOCSYM.val,
@@ -7704,9 +7867,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_152__NORVAR_PATVAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V245*/ meltfptr[244])
- /*_.VALDATA___V245*/
- meltfptr[244] = (void *) &cdat->dsym_152__NORVAR_PATVAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V246*/ meltfptr[245])
+ /*_.VALDATA___V246*/
+ meltfptr[245] = (void *) &cdat->dsym_152__NORVAR_PATVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_152__NORVAR_PATVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7723,7 +7886,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_153__NORVAR_PATVAR*/
- /*_.VALSTR___V246*/ meltfptr[245] = (void *) &cdat->dstr_153__NORVAR_PATVAR;
+ /*_.VALSTR___V247*/ meltfptr[246] = (void *) &cdat->dstr_153__NORVAR_PATVAR;
cdat->dstr_153__NORVAR_PATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_153__NORVAR_PATVAR.val,
@@ -7733,7 +7896,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_154__NORVAR_PATVAR*/
-/*_.VALDATA___V236*/ meltfptr[235] =
+/*_.VALDATA___V237*/ meltfptr[236] =
(void *) &cdat->dobj_154__NORVAR_PATVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_154__NORVAR_PATVAR",
@@ -7747,12 +7910,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_154__NORVAR_PATVAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_154__NORVAR_PATVAR.obj_num = 2;
- cdat->dobj_154__NORVAR_PATVAR.obj_hash = 223570712;
+ cdat->dobj_154__NORVAR_PATVAR.obj_hash = 19409056;
cdat->dobj_154__NORVAR_PATVAR.obj_len = 4;
/*inistring dstr_155__NORVAR_PATVAR*/
- /*_.VALSTR___V237*/ meltfptr[236] = (void *) &cdat->dstr_155__NORVAR_PATVAR;
+ /*_.VALSTR___V238*/ meltfptr[237] = (void *) &cdat->dstr_155__NORVAR_PATVAR;
cdat->dstr_155__NORVAR_PATVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_155__NORVAR_PATVAR.val,
@@ -7761,9 +7924,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_156__NORVAR_NREPOR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V247*/ meltfptr[246])
- /*_.VALDATA___V247*/
- meltfptr[246] = (void *) &cdat->dsym_156__NORVAR_NREPOR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V248*/ meltfptr[247])
+ /*_.VALDATA___V248*/
+ meltfptr[247] = (void *) &cdat->dsym_156__NORVAR_NREPOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_156__NORVAR_NREPOR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7780,7 +7943,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_157__NORVAR_NREPOR*/
- /*_.VALSTR___V248*/ meltfptr[247] = (void *) &cdat->dstr_157__NORVAR_NREPOR;
+ /*_.VALSTR___V249*/ meltfptr[248] = (void *) &cdat->dstr_157__NORVAR_NREPOR;
cdat->dstr_157__NORVAR_NREPOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_157__NORVAR_NREPOR.val,
@@ -7790,7 +7953,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_158__NORVAR_NREPOR*/
-/*_.VALDATA___V238*/ meltfptr[237] =
+/*_.VALDATA___V239*/ meltfptr[238] =
(void *) &cdat->dobj_158__NORVAR_NREPOR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_158__NORVAR_NREPOR",
@@ -7804,12 +7967,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_158__NORVAR_NREPOR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_158__NORVAR_NREPOR.obj_num = 3;
- cdat->dobj_158__NORVAR_NREPOR.obj_hash = 474161736;
+ cdat->dobj_158__NORVAR_NREPOR.obj_hash = 102542118;
cdat->dobj_158__NORVAR_NREPOR.obj_len = 4;
/*inistring dstr_159__NORVAR_NREPOR*/
- /*_.VALSTR___V239*/ meltfptr[238] = (void *) &cdat->dstr_159__NORVAR_NREPOR;
+ /*_.VALSTR___V240*/ meltfptr[239] = (void *) &cdat->dstr_159__NORVAR_NREPOR;
cdat->dstr_159__NORVAR_NREPOR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_159__NORVAR_NREPOR.val,
@@ -7818,9 +7981,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_160__CLASS_NORMTESTER_ANY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V249*/ meltfptr[248])
- /*_.VALDATA___V249*/
- meltfptr[248] = (void *) &cdat->dsym_160__CLASS_NORMTESTER_ANY;
+ /*uniqueobj*/ if (! /*_.VALDATA___V250*/ meltfptr[249])
+ /*_.VALDATA___V250*/
+ meltfptr[249] = (void *) &cdat->dsym_160__CLASS_NORMTESTER_ANY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_160__CLASS_NORMTESTER_ANY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7837,7 +8000,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_161__CLASS_NORMTESTER*/
- /*_.VALSTR___V250*/ meltfptr[249] =
+ /*_.VALSTR___V251*/ meltfptr[250] =
(void *) &cdat->dstr_161__CLASS_NORMTESTER;
cdat->dstr_161__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7847,9 +8010,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_162__CLASS_NREP_EXPRESSION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V251*/ meltfptr[250])
- /*_.VALDATA___V251*/
- meltfptr[250] = (void *) &cdat->dsym_162__CLASS_NREP_EXPRESSION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V252*/ meltfptr[251])
+ /*_.VALDATA___V252*/
+ meltfptr[251] = (void *) &cdat->dsym_162__CLASS_NREP_EXPRESSION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_162__CLASS_NREP_EXPRESSION",
@@ -7867,7 +8030,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_163__CLASS_NREP_EXPRE*/
- /*_.VALSTR___V252*/ meltfptr[251] =
+ /*_.VALSTR___V253*/ meltfptr[252] =
(void *) &cdat->dstr_163__CLASS_NREP_EXPRE;
cdat->dstr_163__CLASS_NREP_EXPRE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7875,10 +8038,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NREP_EXPRESSION",
sizeof (cdat->dstr_163__CLASS_NREP_EXPRE.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ iniobj");
/*iniobj dobj_164__CLASS_NORMTESTER_ANY*/
-/*_.VALDATA___V253*/ meltfptr[252] =
+/*_.VALDATA___V254*/ meltfptr[253] =
(void *) &cdat->dobj_164__CLASS_NORMTESTER_ANY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_164__CLASS_NORMTESTER_ANY",
@@ -7892,12 +8055,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_164__CLASS_NORMTESTER_ANY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_hash = 551331362;
+ cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_hash = 100167843;
cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_len = 8;
/*inistring dstr_165__CLASS_NORMTESTER*/
- /*_.VALSTR___V254*/ meltfptr[253] =
+ /*_.VALSTR___V255*/ meltfptr[254] =
(void *) &cdat->dstr_165__CLASS_NORMTESTER;
cdat->dstr_165__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -7906,22 +8069,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_165__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_166__CLASS_NORMTESTER_ANY */
- /*_.VALTUP___V255*/ meltfptr[254] =
+ /*_.VALTUP___V256*/ meltfptr[255] =
(void *) &cdat->dtup_166__CLASS_NORMTESTER_ANY;
cdat->dtup_166__CLASS_NORMTESTER_ANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_166__CLASS_NORMTESTER_ANY.nbval = 3;
/*inimult dtup_167__CLASS_NORMTESTER_ANY */
- /*_.VALTUP___V268*/ meltfptr[267] =
+ /*_.VALTUP___V269*/ meltfptr[268] =
(void *) &cdat->dtup_167__CLASS_NORMTESTER_ANY;
cdat->dtup_167__CLASS_NORMTESTER_ANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_167__CLASS_NORMTESTER_ANY.nbval = 7;
/*iniobj dsym_168__NTEST_MATCHED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V269*/ meltfptr[268])
- /*_.VALDATA___V269*/
- meltfptr[268] = (void *) &cdat->dsym_168__NTEST_MATCHED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V270*/ meltfptr[269])
+ /*_.VALDATA___V270*/
+ meltfptr[269] = (void *) &cdat->dsym_168__NTEST_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_168__NTEST_MATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7938,7 +8101,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_169__NTEST_MATCHED*/
- /*_.VALSTR___V270*/ meltfptr[269] = (void *) &cdat->dstr_169__NTEST_MATCHED;
+ /*_.VALSTR___V271*/ meltfptr[270] = (void *) &cdat->dstr_169__NTEST_MATCHED;
cdat->dstr_169__NTEST_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_169__NTEST_MATCHED.val,
@@ -7948,7 +8111,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_170__NTEST_MATCHED*/
-/*_.VALDATA___V256*/ meltfptr[255] =
+/*_.VALDATA___V257*/ meltfptr[256] =
(void *) &cdat->dobj_170__NTEST_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_170__NTEST_MATCHED",
@@ -7962,12 +8125,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_170__NTEST_MATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_170__NTEST_MATCHED.obj_num = 1;
- cdat->dobj_170__NTEST_MATCHED.obj_hash = 146402377;
+ cdat->dobj_170__NTEST_MATCHED.obj_hash = 904598068;
cdat->dobj_170__NTEST_MATCHED.obj_len = 4;
/*inistring dstr_171__NTEST_MATCHED*/
- /*_.VALSTR___V257*/ meltfptr[256] = (void *) &cdat->dstr_171__NTEST_MATCHED;
+ /*_.VALSTR___V258*/ meltfptr[257] = (void *) &cdat->dstr_171__NTEST_MATCHED;
cdat->dstr_171__NTEST_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_171__NTEST_MATCHED.val,
@@ -7976,9 +8139,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_172__NTEST_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V271*/ meltfptr[270])
- /*_.VALDATA___V271*/
- meltfptr[270] = (void *) &cdat->dsym_172__NTEST_THEN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V272*/ meltfptr[271])
+ /*_.VALDATA___V272*/
+ meltfptr[271] = (void *) &cdat->dsym_172__NTEST_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_172__NTEST_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -7995,7 +8158,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_173__NTEST_THEN*/
- /*_.VALSTR___V272*/ meltfptr[271] = (void *) &cdat->dstr_173__NTEST_THEN;
+ /*_.VALSTR___V273*/ meltfptr[272] = (void *) &cdat->dstr_173__NTEST_THEN;
cdat->dstr_173__NTEST_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_173__NTEST_THEN.val, "NTEST_THEN",
@@ -8003,7 +8166,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_174__NTEST_THEN*/
-/*_.VALDATA___V258*/ meltfptr[257] = (void *) &cdat->dobj_174__NTEST_THEN;
+/*_.VALDATA___V259*/ meltfptr[258] = (void *) &cdat->dobj_174__NTEST_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_174__NTEST_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8016,21 +8179,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_174__NTEST_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_174__NTEST_THEN.obj_num = 2;
- cdat->dobj_174__NTEST_THEN.obj_hash = 242753212;
+ cdat->dobj_174__NTEST_THEN.obj_hash = 209934608;
cdat->dobj_174__NTEST_THEN.obj_len = 4;
/*inistring dstr_175__NTEST_THEN*/
- /*_.VALSTR___V259*/ meltfptr[258] = (void *) &cdat->dstr_175__NTEST_THEN;
+ /*_.VALSTR___V260*/ meltfptr[259] = (void *) &cdat->dstr_175__NTEST_THEN;
cdat->dstr_175__NTEST_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_175__NTEST_THEN.val, "NTEST_THEN",
sizeof (cdat->dstr_175__NTEST_THEN.val) - 1);
/*iniobj dsym_176__NTEST_ELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V273*/ meltfptr[272])
- /*_.VALDATA___V273*/
- meltfptr[272] = (void *) &cdat->dsym_176__NTEST_ELSE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V274*/ meltfptr[273])
+ /*_.VALDATA___V274*/
+ meltfptr[273] = (void *) &cdat->dsym_176__NTEST_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_176__NTEST_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8047,7 +8210,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_177__NTEST_ELSE*/
- /*_.VALSTR___V274*/ meltfptr[273] = (void *) &cdat->dstr_177__NTEST_ELSE;
+ /*_.VALSTR___V275*/ meltfptr[274] = (void *) &cdat->dstr_177__NTEST_ELSE;
cdat->dstr_177__NTEST_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_177__NTEST_ELSE.val, "NTEST_ELSE",
@@ -8055,7 +8218,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_178__NTEST_ELSE*/
-/*_.VALDATA___V260*/ meltfptr[259] = (void *) &cdat->dobj_178__NTEST_ELSE;
+/*_.VALDATA___V261*/ meltfptr[260] = (void *) &cdat->dobj_178__NTEST_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_178__NTEST_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8068,21 +8231,21 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_178__NTEST_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_178__NTEST_ELSE.obj_num = 3;
- cdat->dobj_178__NTEST_ELSE.obj_hash = 421206908;
+ cdat->dobj_178__NTEST_ELSE.obj_hash = 1018759809;
cdat->dobj_178__NTEST_ELSE.obj_len = 4;
/*inistring dstr_179__NTEST_ELSE*/
- /*_.VALSTR___V261*/ meltfptr[260] = (void *) &cdat->dstr_179__NTEST_ELSE;
+ /*_.VALSTR___V262*/ meltfptr[261] = (void *) &cdat->dstr_179__NTEST_ELSE;
cdat->dstr_179__NTEST_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_179__NTEST_ELSE.val, "NTEST_ELSE",
sizeof (cdat->dstr_179__NTEST_ELSE.val) - 1);
/*iniobj dsym_180__NTEST_NORMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V275*/ meltfptr[274])
- /*_.VALDATA___V275*/
- meltfptr[274] = (void *) &cdat->dsym_180__NTEST_NORMATCH;
+ /*uniqueobj*/ if (! /*_.VALDATA___V276*/ meltfptr[275])
+ /*_.VALDATA___V276*/
+ meltfptr[275] = (void *) &cdat->dsym_180__NTEST_NORMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_180__NTEST_NORMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8099,7 +8262,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_181__NTEST_NORMATCH*/
- /*_.VALSTR___V276*/ meltfptr[275] =
+ /*_.VALSTR___V277*/ meltfptr[276] =
(void *) &cdat->dstr_181__NTEST_NORMATCH;
cdat->dstr_181__NTEST_NORMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8110,7 +8273,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_182__NTEST_NORMATCH*/
-/*_.VALDATA___V262*/ meltfptr[261] =
+/*_.VALDATA___V263*/ meltfptr[262] =
(void *) &cdat->dobj_182__NTEST_NORMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_182__NTEST_NORMATCH",
@@ -8124,12 +8287,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_182__NTEST_NORMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_182__NTEST_NORMATCH.obj_num = 4;
- cdat->dobj_182__NTEST_NORMATCH.obj_hash = 62026828;
+ cdat->dobj_182__NTEST_NORMATCH.obj_hash = 386054771;
cdat->dobj_182__NTEST_NORMATCH.obj_len = 4;
/*inistring dstr_183__NTEST_NORMATCH*/
- /*_.VALSTR___V263*/ meltfptr[262] =
+ /*_.VALSTR___V264*/ meltfptr[263] =
(void *) &cdat->dstr_183__NTEST_NORMATCH;
cdat->dstr_183__NTEST_NORMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8139,9 +8302,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_184__NTEST_LOCCLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V277*/ meltfptr[276])
- /*_.VALDATA___V277*/
- meltfptr[276] = (void *) &cdat->dsym_184__NTEST_LOCCLIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277])
+ /*_.VALDATA___V278*/
+ meltfptr[277] = (void *) &cdat->dsym_184__NTEST_LOCCLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_184__NTEST_LOCCLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8158,7 +8321,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_185__NTEST_LOCCLIST*/
- /*_.VALSTR___V278*/ meltfptr[277] =
+ /*_.VALSTR___V279*/ meltfptr[278] =
(void *) &cdat->dstr_185__NTEST_LOCCLIST;
cdat->dstr_185__NTEST_LOCCLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8169,7 +8332,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_186__NTEST_LOCCLIST*/
-/*_.VALDATA___V264*/ meltfptr[263] =
+/*_.VALDATA___V265*/ meltfptr[264] =
(void *) &cdat->dobj_186__NTEST_LOCCLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_186__NTEST_LOCCLIST",
@@ -8183,12 +8346,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_186__NTEST_LOCCLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_186__NTEST_LOCCLIST.obj_num = 5;
- cdat->dobj_186__NTEST_LOCCLIST.obj_hash = 155765141;
+ cdat->dobj_186__NTEST_LOCCLIST.obj_hash = 287042149;
cdat->dobj_186__NTEST_LOCCLIST.obj_len = 4;
/*inistring dstr_187__NTEST_LOCCLIST*/
- /*_.VALSTR___V265*/ meltfptr[264] =
+ /*_.VALSTR___V266*/ meltfptr[265] =
(void *) &cdat->dstr_187__NTEST_LOCCLIST;
cdat->dstr_187__NTEST_LOCCLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8198,9 +8361,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_188__NTEST_COMEFROM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V279*/ meltfptr[278])
- /*_.VALDATA___V279*/
- meltfptr[278] = (void *) &cdat->dsym_188__NTEST_COMEFROM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V280*/ meltfptr[279])
+ /*_.VALDATA___V280*/
+ meltfptr[279] = (void *) &cdat->dsym_188__NTEST_COMEFROM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_188__NTEST_COMEFROM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8217,7 +8380,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_189__NTEST_COMEFROM*/
- /*_.VALSTR___V280*/ meltfptr[279] =
+ /*_.VALSTR___V281*/ meltfptr[280] =
(void *) &cdat->dstr_189__NTEST_COMEFROM;
cdat->dstr_189__NTEST_COMEFROM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8228,7 +8391,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_190__NTEST_COMEFROM*/
-/*_.VALDATA___V266*/ meltfptr[265] =
+/*_.VALDATA___V267*/ meltfptr[266] =
(void *) &cdat->dobj_190__NTEST_COMEFROM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_190__NTEST_COMEFROM",
@@ -8242,12 +8405,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_190__NTEST_COMEFROM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_190__NTEST_COMEFROM.obj_num = 6;
- cdat->dobj_190__NTEST_COMEFROM.obj_hash = 464192099;
+ cdat->dobj_190__NTEST_COMEFROM.obj_hash = 610471961;
cdat->dobj_190__NTEST_COMEFROM.obj_len = 4;
/*inistring dstr_191__NTEST_COMEFROM*/
- /*_.VALSTR___V267*/ meltfptr[266] =
+ /*_.VALSTR___V268*/ meltfptr[267] =
(void *) &cdat->dstr_191__NTEST_COMEFROM;
cdat->dstr_191__NTEST_COMEFROM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8257,9 +8420,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_192__CLASS_NORMTESTER_SUCCESS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V281*/ meltfptr[280])
- /*_.VALDATA___V281*/
- meltfptr[280] = (void *) &cdat->dsym_192__CLASS_NORMTESTER_SUCCESS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V282*/ meltfptr[281])
+ /*_.VALDATA___V282*/
+ meltfptr[281] = (void *) &cdat->dsym_192__CLASS_NORMTESTER_SUCCESS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_192__CLASS_NORMTESTER_SUCCESS",
@@ -8277,7 +8440,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_193__CLASS_NORMTESTER*/
- /*_.VALSTR___V282*/ meltfptr[281] =
+ /*_.VALSTR___V283*/ meltfptr[282] =
(void *) &cdat->dstr_193__CLASS_NORMTESTER;
cdat->dstr_193__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8285,10 +8448,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_SUCCESS",
sizeof (cdat->dstr_193__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ iniobj");
/*iniobj dobj_194__CLASS_NORMTESTER_SUCCESS*/
-/*_.VALDATA___V283*/ meltfptr[282] =
+/*_.VALDATA___V284*/ meltfptr[283] =
(void *) &cdat->dobj_194__CLASS_NORMTESTER_SUCCESS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8303,12 +8466,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_hash = 963631445;
+ cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_hash = 551255805;
cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_len = 8;
/*inistring dstr_195__CLASS_NORMTESTER*/
- /*_.VALSTR___V284*/ meltfptr[283] =
+ /*_.VALSTR___V285*/ meltfptr[284] =
(void *) &cdat->dstr_195__CLASS_NORMTESTER;
cdat->dstr_195__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8317,22 +8480,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_195__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_196__CLASS_NORMTESTER_SUCCESS */
- /*_.VALTUP___V285*/ meltfptr[284] =
+ /*_.VALTUP___V286*/ meltfptr[285] =
(void *) &cdat->dtup_196__CLASS_NORMTESTER_SUCCESS;
cdat->dtup_196__CLASS_NORMTESTER_SUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_196__CLASS_NORMTESTER_SUCCESS.nbval = 4;
/*inimult dtup_197__CLASS_NORMTESTER_SUCCESS */
- /*_.VALTUP___V288*/ meltfptr[287] =
+ /*_.VALTUP___V289*/ meltfptr[288] =
(void *) &cdat->dtup_197__CLASS_NORMTESTER_SUCCESS;
cdat->dtup_197__CLASS_NORMTESTER_SUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_197__CLASS_NORMTESTER_SUCCESS.nbval = 8;
/*iniobj dsym_198__NTSUCCESS_DO*/
- /*uniqueobj*/ if (! /*_.VALDATA___V289*/ meltfptr[288])
- /*_.VALDATA___V289*/
- meltfptr[288] = (void *) &cdat->dsym_198__NTSUCCESS_DO;
+ /*uniqueobj*/ if (! /*_.VALDATA___V290*/ meltfptr[289])
+ /*_.VALDATA___V290*/
+ meltfptr[289] = (void *) &cdat->dsym_198__NTSUCCESS_DO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_198__NTSUCCESS_DO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8349,7 +8512,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_199__NTSUCCESS_DO*/
- /*_.VALSTR___V290*/ meltfptr[289] = (void *) &cdat->dstr_199__NTSUCCESS_DO;
+ /*_.VALSTR___V291*/ meltfptr[290] = (void *) &cdat->dstr_199__NTSUCCESS_DO;
cdat->dstr_199__NTSUCCESS_DO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_199__NTSUCCESS_DO.val,
@@ -8359,7 +8522,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_200__NTSUCCESS_DO*/
-/*_.VALDATA___V286*/ meltfptr[285] = (void *) &cdat->dobj_200__NTSUCCESS_DO;
+/*_.VALDATA___V287*/ meltfptr[286] = (void *) &cdat->dobj_200__NTSUCCESS_DO;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_200__NTSUCCESS_DO",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8372,12 +8535,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_200__NTSUCCESS_DO.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_200__NTSUCCESS_DO.obj_num = 7;
- cdat->dobj_200__NTSUCCESS_DO.obj_hash = 569593296;
+ cdat->dobj_200__NTSUCCESS_DO.obj_hash = 286110706;
cdat->dobj_200__NTSUCCESS_DO.obj_len = 4;
/*inistring dstr_201__NTSUCCESS_DO*/
- /*_.VALSTR___V287*/ meltfptr[286] = (void *) &cdat->dstr_201__NTSUCCESS_DO;
+ /*_.VALSTR___V288*/ meltfptr[287] = (void *) &cdat->dstr_201__NTSUCCESS_DO;
cdat->dstr_201__NTSUCCESS_DO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_201__NTSUCCESS_DO.val,
@@ -8386,9 +8549,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_202__CLASS_NORMTESTER_OR_CLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V291*/ meltfptr[290])
- /*_.VALDATA___V291*/
- meltfptr[290] = (void *) &cdat->dsym_202__CLASS_NORMTESTER_OR_CLEAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V292*/ meltfptr[291])
+ /*_.VALDATA___V292*/
+ meltfptr[291] = (void *) &cdat->dsym_202__CLASS_NORMTESTER_OR_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_202__CLASS_NORMTESTER_OR_CLEAR",
@@ -8406,7 +8569,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_203__CLASS_NORMTESTER*/
- /*_.VALSTR___V292*/ meltfptr[291] =
+ /*_.VALSTR___V293*/ meltfptr[292] =
(void *) &cdat->dstr_203__CLASS_NORMTESTER;
cdat->dstr_203__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8414,10 +8577,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_OR_CLEAR",
sizeof (cdat->dstr_203__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ iniobj");
/*iniobj dobj_204__CLASS_NORMTESTER_OR_CLEAR*/
-/*_.VALDATA___V293*/ meltfptr[292] =
+/*_.VALDATA___V294*/ meltfptr[293] =
(void *) &cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8432,12 +8595,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 280149938;
+ cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 66872814;
cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_len = 8;
/*inistring dstr_205__CLASS_NORMTESTER*/
- /*_.VALSTR___V294*/ meltfptr[293] =
+ /*_.VALSTR___V295*/ meltfptr[294] =
(void *) &cdat->dstr_205__CLASS_NORMTESTER;
cdat->dstr_205__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8446,22 +8609,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_205__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_206__CLASS_NORMTESTER_OR_CLEAR */
- /*_.VALTUP___V295*/ meltfptr[294] =
+ /*_.VALTUP___V296*/ meltfptr[295] =
(void *) &cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR;
cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR.nbval = 4;
/*inimult dtup_207__CLASS_NORMTESTER_OR_CLEAR */
- /*_.VALTUP___V298*/ meltfptr[297] =
+ /*_.VALTUP___V299*/ meltfptr[298] =
(void *) &cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR;
cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR.nbval = 8;
/*iniobj dsym_208__NTORCLEAR_LOCSYM*/
- /*uniqueobj*/ if (! /*_.VALDATA___V299*/ meltfptr[298])
- /*_.VALDATA___V299*/
- meltfptr[298] = (void *) &cdat->dsym_208__NTORCLEAR_LOCSYM;
+ /*uniqueobj*/ if (! /*_.VALDATA___V300*/ meltfptr[299])
+ /*_.VALDATA___V300*/
+ meltfptr[299] = (void *) &cdat->dsym_208__NTORCLEAR_LOCSYM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_208__NTORCLEAR_LOCSYM",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8478,7 +8641,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_209__NTORCLEAR_LOCSYM*/
- /*_.VALSTR___V300*/ meltfptr[299] =
+ /*_.VALSTR___V301*/ meltfptr[300] =
(void *) &cdat->dstr_209__NTORCLEAR_LOCSYM;
cdat->dstr_209__NTORCLEAR_LOCSYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8489,7 +8652,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_210__NTORCLEAR_LOCSYM*/
-/*_.VALDATA___V296*/ meltfptr[295] =
+/*_.VALDATA___V297*/ meltfptr[296] =
(void *) &cdat->dobj_210__NTORCLEAR_LOCSYM;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_210__NTORCLEAR_LOCSYM",
@@ -8503,12 +8666,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_210__NTORCLEAR_LOCSYM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_210__NTORCLEAR_LOCSYM.obj_num = 7;
- cdat->dobj_210__NTORCLEAR_LOCSYM.obj_hash = 257290426;
+ cdat->dobj_210__NTORCLEAR_LOCSYM.obj_hash = 853814495;
cdat->dobj_210__NTORCLEAR_LOCSYM.obj_len = 4;
/*inistring dstr_211__NTORCLEAR_LOCSYM*/
- /*_.VALSTR___V297*/ meltfptr[296] =
+ /*_.VALSTR___V298*/ meltfptr[297] =
(void *) &cdat->dstr_211__NTORCLEAR_LOCSYM;
cdat->dstr_211__NTORCLEAR_LOCSYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8518,9 +8681,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V301*/ meltfptr[300])
- /*_.VALDATA___V301*/
- meltfptr[300] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V302*/ meltfptr[301])
+ /*_.VALDATA___V302*/
+ meltfptr[301] =
(void *) &cdat->dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8539,7 +8702,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_213__CLASS_NORMTESTER*/
- /*_.VALSTR___V302*/ meltfptr[301] =
+ /*_.VALSTR___V303*/ meltfptr[302] =
(void *) &cdat->dstr_213__CLASS_NORMTESTER;
cdat->dstr_213__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8547,10 +8710,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_OR_INITIAL_CLEAR",
sizeof (cdat->dstr_213__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ iniobj");
/*iniobj dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR*/
-/*_.VALDATA___V303*/ meltfptr[302] =
+/*_.VALDATA___V304*/ meltfptr[303] =
(void *) &cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8566,12 +8729,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_hash = 179427513;
+ cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_hash = 637286562;
cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_len = 8;
/*inistring dstr_215__CLASS_NORMTESTER*/
- /*_.VALSTR___V304*/ meltfptr[303] =
+ /*_.VALSTR___V305*/ meltfptr[304] =
(void *) &cdat->dstr_215__CLASS_NORMTESTER;
cdat->dstr_215__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8580,22 +8743,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_215__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR */
- /*_.VALTUP___V305*/ meltfptr[304] =
+ /*_.VALTUP___V306*/ meltfptr[305] =
(void *) &cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR;
cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR.nbval = 5;
/*inimult dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR */
- /*_.VALTUP___V306*/ meltfptr[305] =
+ /*_.VALTUP___V307*/ meltfptr[306] =
(void *) &cdat->dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR;
cdat->dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR.nbval = 8;
/*iniobj dsym_218__CLASS_NORMTESTER_OR_TRANSMIT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V307*/ meltfptr[306])
- /*_.VALDATA___V307*/
- meltfptr[306] = (void *) &cdat->dsym_218__CLASS_NORMTESTER_OR_TRANSMIT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V308*/ meltfptr[307])
+ /*_.VALDATA___V308*/
+ meltfptr[307] = (void *) &cdat->dsym_218__CLASS_NORMTESTER_OR_TRANSMIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_218__CLASS_NORMTESTER_OR_TRANSMIT",
@@ -8613,7 +8776,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_219__CLASS_NORMTESTER*/
- /*_.VALSTR___V308*/ meltfptr[307] =
+ /*_.VALSTR___V309*/ meltfptr[308] =
(void *) &cdat->dstr_219__CLASS_NORMTESTER;
cdat->dstr_219__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8621,10 +8784,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_OR_TRANSMIT",
sizeof (cdat->dstr_219__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ iniobj");
/*iniobj dobj_220__CLASS_NORMTESTER_OR_TRANSMIT*/
-/*_.VALDATA___V309*/ meltfptr[308] =
+/*_.VALDATA___V310*/ meltfptr[309] =
(void *) &cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8639,12 +8802,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 322516156;
+ cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 465823925;
cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 8;
/*inistring dstr_221__CLASS_NORMTESTER*/
- /*_.VALSTR___V310*/ meltfptr[309] =
+ /*_.VALSTR___V311*/ meltfptr[310] =
(void *) &cdat->dstr_221__CLASS_NORMTESTER;
cdat->dstr_221__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8653,22 +8816,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_221__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_222__CLASS_NORMTESTER_OR_TRANSMIT */
- /*_.VALTUP___V311*/ meltfptr[310] =
+ /*_.VALTUP___V312*/ meltfptr[311] =
(void *) &cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT;
cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT.nbval = 4;
/*inimult dtup_223__CLASS_NORMTESTER_OR_TRANSMIT */
- /*_.VALTUP___V316*/ meltfptr[315] =
+ /*_.VALTUP___V317*/ meltfptr[316] =
(void *) &cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT;
cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT.nbval = 9;
/*iniobj dsym_224__NTORTRANSMIT_DST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V317*/ meltfptr[316])
- /*_.VALDATA___V317*/
- meltfptr[316] = (void *) &cdat->dsym_224__NTORTRANSMIT_DST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V318*/ meltfptr[317])
+ /*_.VALDATA___V318*/
+ meltfptr[317] = (void *) &cdat->dsym_224__NTORTRANSMIT_DST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_224__NTORTRANSMIT_DST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8685,7 +8848,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_225__NTORTRANSMIT_DST*/
- /*_.VALSTR___V318*/ meltfptr[317] =
+ /*_.VALSTR___V319*/ meltfptr[318] =
(void *) &cdat->dstr_225__NTORTRANSMIT_DST;
cdat->dstr_225__NTORTRANSMIT_DST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8696,7 +8859,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_226__NTORTRANSMIT_DST*/
-/*_.VALDATA___V312*/ meltfptr[311] =
+/*_.VALDATA___V313*/ meltfptr[312] =
(void *) &cdat->dobj_226__NTORTRANSMIT_DST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_226__NTORTRANSMIT_DST",
@@ -8710,12 +8873,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_226__NTORTRANSMIT_DST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_226__NTORTRANSMIT_DST.obj_num = 7;
- cdat->dobj_226__NTORTRANSMIT_DST.obj_hash = 159891622;
+ cdat->dobj_226__NTORTRANSMIT_DST.obj_hash = 619060847;
cdat->dobj_226__NTORTRANSMIT_DST.obj_len = 4;
/*inistring dstr_227__NTORTRANSMIT_DST*/
- /*_.VALSTR___V313*/ meltfptr[312] =
+ /*_.VALSTR___V314*/ meltfptr[313] =
(void *) &cdat->dstr_227__NTORTRANSMIT_DST;
cdat->dstr_227__NTORTRANSMIT_DST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8725,9 +8888,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_228__NTORTRANSMIT_SRC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V319*/ meltfptr[318])
- /*_.VALDATA___V319*/
- meltfptr[318] = (void *) &cdat->dsym_228__NTORTRANSMIT_SRC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V320*/ meltfptr[319])
+ /*_.VALDATA___V320*/
+ meltfptr[319] = (void *) &cdat->dsym_228__NTORTRANSMIT_SRC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_228__NTORTRANSMIT_SRC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8744,7 +8907,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_229__NTORTRANSMIT_SRC*/
- /*_.VALSTR___V320*/ meltfptr[319] =
+ /*_.VALSTR___V321*/ meltfptr[320] =
(void *) &cdat->dstr_229__NTORTRANSMIT_SRC;
cdat->dstr_229__NTORTRANSMIT_SRC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8755,7 +8918,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_230__NTORTRANSMIT_SRC*/
-/*_.VALDATA___V314*/ meltfptr[313] =
+/*_.VALDATA___V315*/ meltfptr[314] =
(void *) &cdat->dobj_230__NTORTRANSMIT_SRC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_230__NTORTRANSMIT_SRC",
@@ -8769,12 +8932,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_230__NTORTRANSMIT_SRC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_230__NTORTRANSMIT_SRC.obj_num = 8;
- cdat->dobj_230__NTORTRANSMIT_SRC.obj_hash = 701148587;
+ cdat->dobj_230__NTORTRANSMIT_SRC.obj_hash = 796502669;
cdat->dobj_230__NTORTRANSMIT_SRC.obj_len = 4;
/*inistring dstr_231__NTORTRANSMIT_SRC*/
- /*_.VALSTR___V315*/ meltfptr[314] =
+ /*_.VALSTR___V316*/ meltfptr[315] =
(void *) &cdat->dstr_231__NTORTRANSMIT_SRC;
cdat->dstr_231__NTORTRANSMIT_SRC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8784,9 +8947,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_232__CLASS_NORMTESTER_ANYTESTER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V321*/ meltfptr[320])
- /*_.VALDATA___V321*/
- meltfptr[320] = (void *) &cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V322*/ meltfptr[321])
+ /*_.VALDATA___V322*/
+ meltfptr[321] = (void *) &cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_232__CLASS_NORMTESTER_ANYTESTER",
@@ -8804,7 +8967,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_233__CLASS_NORMTESTER*/
- /*_.VALSTR___V322*/ meltfptr[321] =
+ /*_.VALSTR___V323*/ meltfptr[322] =
(void *) &cdat->dstr_233__CLASS_NORMTESTER;
cdat->dstr_233__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8812,10 +8975,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_ANYTESTER",
sizeof (cdat->dstr_233__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ iniobj");
/*iniobj dobj_234__CLASS_NORMTESTER_ANYTESTER*/
-/*_.VALDATA___V323*/ meltfptr[322] =
+/*_.VALDATA___V324*/ meltfptr[323] =
(void *) &cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8830,12 +8993,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_hash = 523008696;
+ cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_hash = 893998789;
cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_len = 8;
/*inistring dstr_235__CLASS_NORMTESTER*/
- /*_.VALSTR___V324*/ meltfptr[323] =
+ /*_.VALSTR___V325*/ meltfptr[324] =
(void *) &cdat->dstr_235__CLASS_NORMTESTER;
cdat->dstr_235__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8844,22 +9007,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_235__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_236__CLASS_NORMTESTER_ANYTESTER */
- /*_.VALTUP___V325*/ meltfptr[324] =
+ /*_.VALTUP___V326*/ meltfptr[325] =
(void *) &cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER;
cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER.nbval = 4;
/*inimult dtup_237__CLASS_NORMTESTER_ANYTESTER */
- /*_.VALTUP___V326*/ meltfptr[325] =
+ /*_.VALTUP___V327*/ meltfptr[326] =
(void *) &cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER;
cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER.nbval = 7;
/*iniobj dsym_238__CLASS_NORMTESTER_DISJUNCTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V327*/ meltfptr[326])
- /*_.VALDATA___V327*/
- meltfptr[326] = (void *) &cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V328*/ meltfptr[327])
+ /*_.VALDATA___V328*/
+ meltfptr[327] = (void *) &cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_238__CLASS_NORMTESTER_DISJUNCTION",
@@ -8877,7 +9040,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_239__CLASS_NORMTESTER*/
- /*_.VALSTR___V328*/ meltfptr[327] =
+ /*_.VALSTR___V329*/ meltfptr[328] =
(void *) &cdat->dstr_239__CLASS_NORMTESTER;
cdat->dstr_239__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8885,10 +9048,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_DISJUNCTION",
sizeof (cdat->dstr_239__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ iniobj");
/*iniobj dobj_240__CLASS_NORMTESTER_DISJUNCTION*/
-/*_.VALDATA___V329*/ meltfptr[328] =
+/*_.VALDATA___V330*/ meltfptr[329] =
(void *) &cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -8903,12 +9066,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 1059662214;
+ cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 574384385;
cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_len = 8;
/*inistring dstr_241__CLASS_NORMTESTER*/
- /*_.VALSTR___V330*/ meltfptr[329] =
+ /*_.VALSTR___V331*/ meltfptr[330] =
(void *) &cdat->dstr_241__CLASS_NORMTESTER;
cdat->dstr_241__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -8917,22 +9080,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_241__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_242__CLASS_NORMTESTER_DISJUNCTION */
- /*_.VALTUP___V331*/ meltfptr[330] =
+ /*_.VALTUP___V332*/ meltfptr[331] =
(void *) &cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION;
cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION.nbval = 5;
/*inimult dtup_243__CLASS_NORMTESTER_DISJUNCTION */
- /*_.VALTUP___V338*/ meltfptr[337] =
+ /*_.VALTUP___V339*/ meltfptr[338] =
(void *) &cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION;
cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION.nbval = 10;
/*iniobj dsym_244__NTDISJUNCTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V339*/ meltfptr[338])
- /*_.VALDATA___V339*/
- meltfptr[338] = (void *) &cdat->dsym_244__NTDISJUNCTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V340*/ meltfptr[339])
+ /*_.VALDATA___V340*/
+ meltfptr[339] = (void *) &cdat->dsym_244__NTDISJUNCTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_244__NTDISJUNCTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -8949,7 +9112,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_245__NTDISJUNCTS*/
- /*_.VALSTR___V340*/ meltfptr[339] = (void *) &cdat->dstr_245__NTDISJUNCTS;
+ /*_.VALSTR___V341*/ meltfptr[340] = (void *) &cdat->dstr_245__NTDISJUNCTS;
cdat->dstr_245__NTDISJUNCTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_245__NTDISJUNCTS.val,
@@ -8958,7 +9121,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_246__NTDISJUNCTS*/
-/*_.VALDATA___V332*/ meltfptr[331] = (void *) &cdat->dobj_246__NTDISJUNCTS;
+/*_.VALDATA___V333*/ meltfptr[332] = (void *) &cdat->dobj_246__NTDISJUNCTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_246__NTDISJUNCTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -8971,12 +9134,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_246__NTDISJUNCTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_246__NTDISJUNCTS.obj_num = 7;
- cdat->dobj_246__NTDISJUNCTS.obj_hash = 1034250183;
+ cdat->dobj_246__NTDISJUNCTS.obj_hash = 23577968;
cdat->dobj_246__NTDISJUNCTS.obj_len = 4;
/*inistring dstr_247__NTDISJUNCTS*/
- /*_.VALSTR___V333*/ meltfptr[332] = (void *) &cdat->dstr_247__NTDISJUNCTS;
+ /*_.VALSTR___V334*/ meltfptr[333] = (void *) &cdat->dstr_247__NTDISJUNCTS;
cdat->dstr_247__NTDISJUNCTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_247__NTDISJUNCTS.val,
@@ -8984,9 +9147,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_247__NTDISJUNCTS.val) - 1);
/*iniobj dsym_248__NTDISJ_FRESHORVAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V341*/ meltfptr[340])
- /*_.VALDATA___V341*/
- meltfptr[340] = (void *) &cdat->dsym_248__NTDISJ_FRESHORVAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V342*/ meltfptr[341])
+ /*_.VALDATA___V342*/
+ meltfptr[341] = (void *) &cdat->dsym_248__NTDISJ_FRESHORVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_248__NTDISJ_FRESHORVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9003,7 +9166,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_249__NTDISJ_FRESHORVA*/
- /*_.VALSTR___V342*/ meltfptr[341] =
+ /*_.VALSTR___V343*/ meltfptr[342] =
(void *) &cdat->dstr_249__NTDISJ_FRESHORVA;
cdat->dstr_249__NTDISJ_FRESHORVA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9014,7 +9177,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_250__NTDISJ_FRESHORVAR*/
-/*_.VALDATA___V334*/ meltfptr[333] =
+/*_.VALDATA___V335*/ meltfptr[334] =
(void *) &cdat->dobj_250__NTDISJ_FRESHORVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_250__NTDISJ_FRESHORVAR",
@@ -9028,12 +9191,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_250__NTDISJ_FRESHORVAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_250__NTDISJ_FRESHORVAR.obj_num = 8;
- cdat->dobj_250__NTDISJ_FRESHORVAR.obj_hash = 961821749;
+ cdat->dobj_250__NTDISJ_FRESHORVAR.obj_hash = 789793722;
cdat->dobj_250__NTDISJ_FRESHORVAR.obj_len = 4;
/*inistring dstr_251__NTDISJ_FRESHORVA*/
- /*_.VALSTR___V335*/ meltfptr[334] =
+ /*_.VALSTR___V336*/ meltfptr[335] =
(void *) &cdat->dstr_251__NTDISJ_FRESHORVA;
cdat->dstr_251__NTDISJ_FRESHORVA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9043,9 +9206,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_252__NTDISJ_SETORVAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V343*/ meltfptr[342])
- /*_.VALDATA___V343*/
- meltfptr[342] = (void *) &cdat->dsym_252__NTDISJ_SETORVAR;
+ /*uniqueobj*/ if (! /*_.VALDATA___V344*/ meltfptr[343])
+ /*_.VALDATA___V344*/
+ meltfptr[343] = (void *) &cdat->dsym_252__NTDISJ_SETORVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_252__NTDISJ_SETORVAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9062,7 +9225,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_253__NTDISJ_SETORVAR*/
- /*_.VALSTR___V344*/ meltfptr[343] =
+ /*_.VALSTR___V345*/ meltfptr[344] =
(void *) &cdat->dstr_253__NTDISJ_SETORVAR;
cdat->dstr_253__NTDISJ_SETORVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9073,7 +9236,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_254__NTDISJ_SETORVAR*/
-/*_.VALDATA___V336*/ meltfptr[335] =
+/*_.VALDATA___V337*/ meltfptr[336] =
(void *) &cdat->dobj_254__NTDISJ_SETORVAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_254__NTDISJ_SETORVAR",
@@ -9087,12 +9250,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_254__NTDISJ_SETORVAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_254__NTDISJ_SETORVAR.obj_num = 9;
- cdat->dobj_254__NTDISJ_SETORVAR.obj_hash = 913144558;
+ cdat->dobj_254__NTDISJ_SETORVAR.obj_hash = 409160706;
cdat->dobj_254__NTDISJ_SETORVAR.obj_len = 4;
/*inistring dstr_255__NTDISJ_SETORVAR*/
- /*_.VALSTR___V337*/ meltfptr[336] =
+ /*_.VALSTR___V338*/ meltfptr[337] =
(void *) &cdat->dstr_255__NTDISJ_SETORVAR;
cdat->dstr_255__NTDISJ_SETORVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9102,9 +9265,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_256__CLASS_NORMTESTER_SAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V345*/ meltfptr[344])
- /*_.VALDATA___V345*/
- meltfptr[344] = (void *) &cdat->dsym_256__CLASS_NORMTESTER_SAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V346*/ meltfptr[345])
+ /*_.VALDATA___V346*/
+ meltfptr[345] = (void *) &cdat->dsym_256__CLASS_NORMTESTER_SAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_256__CLASS_NORMTESTER_SAME",
@@ -9122,7 +9285,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_257__CLASS_NORMTESTER*/
- /*_.VALSTR___V346*/ meltfptr[345] =
+ /*_.VALSTR___V347*/ meltfptr[346] =
(void *) &cdat->dstr_257__CLASS_NORMTESTER;
cdat->dstr_257__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9130,10 +9293,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_SAME",
sizeof (cdat->dstr_257__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ iniobj");
/*iniobj dobj_258__CLASS_NORMTESTER_SAME*/
-/*_.VALDATA___V347*/ meltfptr[346] =
+/*_.VALDATA___V348*/ meltfptr[347] =
(void *) &cdat->dobj_258__CLASS_NORMTESTER_SAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9148,12 +9311,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_258__CLASS_NORMTESTER_SAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_hash = 742556826;
+ cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_hash = 834378580;
cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_len = 8;
/*inistring dstr_259__CLASS_NORMTESTER*/
- /*_.VALSTR___V348*/ meltfptr[347] =
+ /*_.VALSTR___V349*/ meltfptr[348] =
(void *) &cdat->dstr_259__CLASS_NORMTESTER;
cdat->dstr_259__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9162,22 +9325,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_259__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_260__CLASS_NORMTESTER_SAME */
- /*_.VALTUP___V349*/ meltfptr[348] =
+ /*_.VALTUP___V350*/ meltfptr[349] =
(void *) &cdat->dtup_260__CLASS_NORMTESTER_SAME;
cdat->dtup_260__CLASS_NORMTESTER_SAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_260__CLASS_NORMTESTER_SAME.nbval = 5;
/*inimult dtup_261__CLASS_NORMTESTER_SAME */
- /*_.VALTUP___V352*/ meltfptr[351] =
+ /*_.VALTUP___V353*/ meltfptr[352] =
(void *) &cdat->dtup_261__CLASS_NORMTESTER_SAME;
cdat->dtup_261__CLASS_NORMTESTER_SAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_261__CLASS_NORMTESTER_SAME.nbval = 8;
/*iniobj dsym_262__NTSAME_IDENTICAL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V353*/ meltfptr[352])
- /*_.VALDATA___V353*/
- meltfptr[352] = (void *) &cdat->dsym_262__NTSAME_IDENTICAL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V354*/ meltfptr[353])
+ /*_.VALDATA___V354*/
+ meltfptr[353] = (void *) &cdat->dsym_262__NTSAME_IDENTICAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_262__NTSAME_IDENTICAL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9194,7 +9357,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_263__NTSAME_IDENTICAL*/
- /*_.VALSTR___V354*/ meltfptr[353] =
+ /*_.VALSTR___V355*/ meltfptr[354] =
(void *) &cdat->dstr_263__NTSAME_IDENTICAL;
cdat->dstr_263__NTSAME_IDENTICAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9205,7 +9368,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_264__NTSAME_IDENTICAL*/
-/*_.VALDATA___V350*/ meltfptr[349] =
+/*_.VALDATA___V351*/ meltfptr[350] =
(void *) &cdat->dobj_264__NTSAME_IDENTICAL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_264__NTSAME_IDENTICAL",
@@ -9219,12 +9382,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_264__NTSAME_IDENTICAL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_264__NTSAME_IDENTICAL.obj_num = 7;
- cdat->dobj_264__NTSAME_IDENTICAL.obj_hash = 777239654;
+ cdat->dobj_264__NTSAME_IDENTICAL.obj_hash = 428742697;
cdat->dobj_264__NTSAME_IDENTICAL.obj_len = 4;
/*inistring dstr_265__NTSAME_IDENTICAL*/
- /*_.VALSTR___V351*/ meltfptr[350] =
+ /*_.VALSTR___V352*/ meltfptr[351] =
(void *) &cdat->dstr_265__NTSAME_IDENTICAL;
cdat->dstr_265__NTSAME_IDENTICAL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9234,9 +9397,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_266__CLASS_NORMTESTER_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V355*/ meltfptr[354])
- /*_.VALDATA___V355*/
- meltfptr[354] = (void *) &cdat->dsym_266__CLASS_NORMTESTER_MATCHER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V356*/ meltfptr[355])
+ /*_.VALDATA___V356*/
+ meltfptr[355] = (void *) &cdat->dsym_266__CLASS_NORMTESTER_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_266__CLASS_NORMTESTER_MATCHER",
@@ -9254,7 +9417,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_267__CLASS_NORMTESTER*/
- /*_.VALSTR___V356*/ meltfptr[355] =
+ /*_.VALSTR___V357*/ meltfptr[356] =
(void *) &cdat->dstr_267__CLASS_NORMTESTER;
cdat->dstr_267__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9262,10 +9425,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_MATCHER",
sizeof (cdat->dstr_267__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ iniobj");
/*iniobj dobj_268__CLASS_NORMTESTER_MATCHER*/
-/*_.VALDATA___V357*/ meltfptr[356] =
+/*_.VALDATA___V358*/ meltfptr[357] =
(void *) &cdat->dobj_268__CLASS_NORMTESTER_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9280,12 +9443,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_268__CLASS_NORMTESTER_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_hash = 681894956;
+ cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_hash = 374386064;
cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_len = 8;
/*inistring dstr_269__CLASS_NORMTESTER*/
- /*_.VALSTR___V358*/ meltfptr[357] =
+ /*_.VALSTR___V359*/ meltfptr[358] =
(void *) &cdat->dstr_269__CLASS_NORMTESTER;
cdat->dstr_269__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9294,22 +9457,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_269__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_270__CLASS_NORMTESTER_MATCHER */
- /*_.VALTUP___V359*/ meltfptr[358] =
+ /*_.VALTUP___V360*/ meltfptr[359] =
(void *) &cdat->dtup_270__CLASS_NORMTESTER_MATCHER;
cdat->dtup_270__CLASS_NORMTESTER_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_270__CLASS_NORMTESTER_MATCHER.nbval = 5;
/*inimult dtup_271__CLASS_NORMTESTER_MATCHER */
- /*_.VALTUP___V368*/ meltfptr[367] =
+ /*_.VALTUP___V369*/ meltfptr[368] =
(void *) &cdat->dtup_271__CLASS_NORMTESTER_MATCHER;
cdat->dtup_271__CLASS_NORMTESTER_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_271__CLASS_NORMTESTER_MATCHER.nbval = 11;
/*iniobj dsym_272__NTMATCH_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V369*/ meltfptr[368])
- /*_.VALDATA___V369*/
- meltfptr[368] = (void *) &cdat->dsym_272__NTMATCH_MATCHER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V370*/ meltfptr[369])
+ /*_.VALDATA___V370*/
+ meltfptr[369] = (void *) &cdat->dsym_272__NTMATCH_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_272__NTMATCH_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9326,7 +9489,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_273__NTMATCH_MATCHER*/
- /*_.VALSTR___V370*/ meltfptr[369] =
+ /*_.VALSTR___V371*/ meltfptr[370] =
(void *) &cdat->dstr_273__NTMATCH_MATCHER;
cdat->dstr_273__NTMATCH_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9337,7 +9500,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_274__NTMATCH_MATCHER*/
-/*_.VALDATA___V360*/ meltfptr[359] =
+/*_.VALDATA___V361*/ meltfptr[360] =
(void *) &cdat->dobj_274__NTMATCH_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_274__NTMATCH_MATCHER",
@@ -9351,12 +9514,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_274__NTMATCH_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_274__NTMATCH_MATCHER.obj_num = 7;
- cdat->dobj_274__NTMATCH_MATCHER.obj_hash = 279434585;
+ cdat->dobj_274__NTMATCH_MATCHER.obj_hash = 908746419;
cdat->dobj_274__NTMATCH_MATCHER.obj_len = 4;
/*inistring dstr_275__NTMATCH_MATCHER*/
- /*_.VALSTR___V361*/ meltfptr[360] =
+ /*_.VALSTR___V362*/ meltfptr[361] =
(void *) &cdat->dstr_275__NTMATCH_MATCHER;
cdat->dstr_275__NTMATCH_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9366,9 +9529,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_276__NTMATCH_MATNDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V371*/ meltfptr[370])
- /*_.VALDATA___V371*/
- meltfptr[370] = (void *) &cdat->dsym_276__NTMATCH_MATNDATA;
+ /*uniqueobj*/ if (! /*_.VALDATA___V372*/ meltfptr[371])
+ /*_.VALDATA___V372*/
+ meltfptr[371] = (void *) &cdat->dsym_276__NTMATCH_MATNDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_276__NTMATCH_MATNDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9385,7 +9548,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_277__NTMATCH_MATNDATA*/
- /*_.VALSTR___V372*/ meltfptr[371] =
+ /*_.VALSTR___V373*/ meltfptr[372] =
(void *) &cdat->dstr_277__NTMATCH_MATNDATA;
cdat->dstr_277__NTMATCH_MATNDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9396,7 +9559,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_278__NTMATCH_MATNDATA*/
-/*_.VALDATA___V362*/ meltfptr[361] =
+/*_.VALDATA___V363*/ meltfptr[362] =
(void *) &cdat->dobj_278__NTMATCH_MATNDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_278__NTMATCH_MATNDATA",
@@ -9410,12 +9573,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_278__NTMATCH_MATNDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_278__NTMATCH_MATNDATA.obj_num = 8;
- cdat->dobj_278__NTMATCH_MATNDATA.obj_hash = 875976138;
+ cdat->dobj_278__NTMATCH_MATNDATA.obj_hash = 266264057;
cdat->dobj_278__NTMATCH_MATNDATA.obj_len = 4;
/*inistring dstr_279__NTMATCH_MATNDATA*/
- /*_.VALSTR___V363*/ meltfptr[362] =
+ /*_.VALSTR___V364*/ meltfptr[363] =
(void *) &cdat->dstr_279__NTMATCH_MATNDATA;
cdat->dstr_279__NTMATCH_MATNDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9425,9 +9588,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_280__NTMATCH_INARGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V373*/ meltfptr[372])
- /*_.VALDATA___V373*/
- meltfptr[372] = (void *) &cdat->dsym_280__NTMATCH_INARGS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V374*/ meltfptr[373])
+ /*_.VALDATA___V374*/
+ meltfptr[373] = (void *) &cdat->dsym_280__NTMATCH_INARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_280__NTMATCH_INARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9444,7 +9607,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_281__NTMATCH_INARGS*/
- /*_.VALSTR___V374*/ meltfptr[373] =
+ /*_.VALSTR___V375*/ meltfptr[374] =
(void *) &cdat->dstr_281__NTMATCH_INARGS;
cdat->dstr_281__NTMATCH_INARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9455,7 +9618,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_282__NTMATCH_INARGS*/
-/*_.VALDATA___V364*/ meltfptr[363] =
+/*_.VALDATA___V365*/ meltfptr[364] =
(void *) &cdat->dobj_282__NTMATCH_INARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_282__NTMATCH_INARGS",
@@ -9469,12 +9632,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_282__NTMATCH_INARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_282__NTMATCH_INARGS.obj_num = 9;
- cdat->dobj_282__NTMATCH_INARGS.obj_hash = 111445307;
+ cdat->dobj_282__NTMATCH_INARGS.obj_hash = 852251413;
cdat->dobj_282__NTMATCH_INARGS.obj_len = 4;
/*inistring dstr_283__NTMATCH_INARGS*/
- /*_.VALSTR___V365*/ meltfptr[364] =
+ /*_.VALSTR___V366*/ meltfptr[365] =
(void *) &cdat->dstr_283__NTMATCH_INARGS;
cdat->dstr_283__NTMATCH_INARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9484,9 +9647,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_284__NTMATCH_OUTLOCS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V375*/ meltfptr[374])
- /*_.VALDATA___V375*/
- meltfptr[374] = (void *) &cdat->dsym_284__NTMATCH_OUTLOCS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V376*/ meltfptr[375])
+ /*_.VALDATA___V376*/
+ meltfptr[375] = (void *) &cdat->dsym_284__NTMATCH_OUTLOCS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_284__NTMATCH_OUTLOCS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9503,7 +9666,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_285__NTMATCH_OUTLOCS*/
- /*_.VALSTR___V376*/ meltfptr[375] =
+ /*_.VALSTR___V377*/ meltfptr[376] =
(void *) &cdat->dstr_285__NTMATCH_OUTLOCS;
cdat->dstr_285__NTMATCH_OUTLOCS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9514,7 +9677,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_286__NTMATCH_OUTLOCS*/
-/*_.VALDATA___V366*/ meltfptr[365] =
+/*_.VALDATA___V367*/ meltfptr[366] =
(void *) &cdat->dobj_286__NTMATCH_OUTLOCS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_286__NTMATCH_OUTLOCS",
@@ -9528,12 +9691,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_286__NTMATCH_OUTLOCS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_286__NTMATCH_OUTLOCS.obj_num = 10;
- cdat->dobj_286__NTMATCH_OUTLOCS.obj_hash = 921195450;
+ cdat->dobj_286__NTMATCH_OUTLOCS.obj_hash = 953710660;
cdat->dobj_286__NTMATCH_OUTLOCS.obj_len = 4;
/*inistring dstr_287__NTMATCH_OUTLOCS*/
- /*_.VALSTR___V367*/ meltfptr[366] =
+ /*_.VALSTR___V368*/ meltfptr[367] =
(void *) &cdat->dstr_287__NTMATCH_OUTLOCS;
cdat->dstr_287__NTMATCH_OUTLOCS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9543,9 +9706,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_288__CLASS_NORMTESTER_INSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V377*/ meltfptr[376])
- /*_.VALDATA___V377*/
- meltfptr[376] = (void *) &cdat->dsym_288__CLASS_NORMTESTER_INSTANCE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V378*/ meltfptr[377])
+ /*_.VALDATA___V378*/
+ meltfptr[377] = (void *) &cdat->dsym_288__CLASS_NORMTESTER_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_288__CLASS_NORMTESTER_INSTANCE",
@@ -9563,7 +9726,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_289__CLASS_NORMTESTER*/
- /*_.VALSTR___V378*/ meltfptr[377] =
+ /*_.VALSTR___V379*/ meltfptr[378] =
(void *) &cdat->dstr_289__CLASS_NORMTESTER;
cdat->dstr_289__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9571,10 +9734,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_INSTANCE",
sizeof (cdat->dstr_289__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ iniobj");
/*iniobj dobj_290__CLASS_NORMTESTER_INSTANCE*/
-/*_.VALDATA___V379*/ meltfptr[378] =
+/*_.VALDATA___V380*/ meltfptr[379] =
(void *) &cdat->dobj_290__CLASS_NORMTESTER_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9589,12 +9752,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_hash = 649645132;
+ cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_hash = 777902682;
cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_len = 8;
/*inistring dstr_291__CLASS_NORMTESTER*/
- /*_.VALSTR___V380*/ meltfptr[379] =
+ /*_.VALSTR___V381*/ meltfptr[380] =
(void *) &cdat->dstr_291__CLASS_NORMTESTER;
cdat->dstr_291__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9603,22 +9766,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_291__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_292__CLASS_NORMTESTER_INSTANCE */
- /*_.VALTUP___V381*/ meltfptr[380] =
+ /*_.VALTUP___V382*/ meltfptr[381] =
(void *) &cdat->dtup_292__CLASS_NORMTESTER_INSTANCE;
cdat->dtup_292__CLASS_NORMTESTER_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_292__CLASS_NORMTESTER_INSTANCE.nbval = 5;
/*inimult dtup_293__CLASS_NORMTESTER_INSTANCE */
- /*_.VALTUP___V386*/ meltfptr[385] =
+ /*_.VALTUP___V387*/ meltfptr[386] =
(void *) &cdat->dtup_293__CLASS_NORMTESTER_INSTANCE;
cdat->dtup_293__CLASS_NORMTESTER_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_293__CLASS_NORMTESTER_INSTANCE.nbval = 9;
/*iniobj dsym_294__NTINST_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V387*/ meltfptr[386])
- /*_.VALDATA___V387*/
- meltfptr[386] = (void *) &cdat->dsym_294__NTINST_CLASS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V388*/ meltfptr[387])
+ /*_.VALDATA___V388*/
+ meltfptr[387] = (void *) &cdat->dsym_294__NTINST_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_294__NTINST_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9635,7 +9798,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_295__NTINST_CLASS*/
- /*_.VALSTR___V388*/ meltfptr[387] = (void *) &cdat->dstr_295__NTINST_CLASS;
+ /*_.VALSTR___V389*/ meltfptr[388] = (void *) &cdat->dstr_295__NTINST_CLASS;
cdat->dstr_295__NTINST_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_295__NTINST_CLASS.val,
@@ -9645,7 +9808,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_296__NTINST_CLASS*/
-/*_.VALDATA___V382*/ meltfptr[381] = (void *) &cdat->dobj_296__NTINST_CLASS;
+/*_.VALDATA___V383*/ meltfptr[382] = (void *) &cdat->dobj_296__NTINST_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_296__NTINST_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -9658,12 +9821,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_296__NTINST_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_296__NTINST_CLASS.obj_num = 7;
- cdat->dobj_296__NTINST_CLASS.obj_hash = 695590928;
+ cdat->dobj_296__NTINST_CLASS.obj_hash = 735981776;
cdat->dobj_296__NTINST_CLASS.obj_len = 4;
/*inistring dstr_297__NTINST_CLASS*/
- /*_.VALSTR___V383*/ meltfptr[382] = (void *) &cdat->dstr_297__NTINST_CLASS;
+ /*_.VALSTR___V384*/ meltfptr[383] = (void *) &cdat->dstr_297__NTINST_CLASS;
cdat->dstr_297__NTINST_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_297__NTINST_CLASS.val,
@@ -9672,9 +9835,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_298__NTINST_FIELDLOCS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V389*/ meltfptr[388])
- /*_.VALDATA___V389*/
- meltfptr[388] = (void *) &cdat->dsym_298__NTINST_FIELDLOCS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V390*/ meltfptr[389])
+ /*_.VALDATA___V390*/
+ meltfptr[389] = (void *) &cdat->dsym_298__NTINST_FIELDLOCS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_298__NTINST_FIELDLOCS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9691,7 +9854,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_299__NTINST_FIELDLOCS*/
- /*_.VALSTR___V390*/ meltfptr[389] =
+ /*_.VALSTR___V391*/ meltfptr[390] =
(void *) &cdat->dstr_299__NTINST_FIELDLOCS;
cdat->dstr_299__NTINST_FIELDLOCS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9702,7 +9865,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_300__NTINST_FIELDLOCS*/
-/*_.VALDATA___V384*/ meltfptr[383] =
+/*_.VALDATA___V385*/ meltfptr[384] =
(void *) &cdat->dobj_300__NTINST_FIELDLOCS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_300__NTINST_FIELDLOCS",
@@ -9716,12 +9879,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_300__NTINST_FIELDLOCS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_300__NTINST_FIELDLOCS.obj_num = 8;
- cdat->dobj_300__NTINST_FIELDLOCS.obj_hash = 676685698;
+ cdat->dobj_300__NTINST_FIELDLOCS.obj_hash = 572916679;
cdat->dobj_300__NTINST_FIELDLOCS.obj_len = 4;
/*inistring dstr_301__NTINST_FIELDLOCS*/
- /*_.VALSTR___V385*/ meltfptr[384] =
+ /*_.VALSTR___V386*/ meltfptr[385] =
(void *) &cdat->dstr_301__NTINST_FIELDLOCS;
cdat->dstr_301__NTINST_FIELDLOCS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9731,9 +9894,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_302__CLASS_NORMTESTER_TUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V391*/ meltfptr[390])
- /*_.VALDATA___V391*/
- meltfptr[390] = (void *) &cdat->dsym_302__CLASS_NORMTESTER_TUPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391])
+ /*_.VALDATA___V392*/
+ meltfptr[391] = (void *) &cdat->dsym_302__CLASS_NORMTESTER_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_302__CLASS_NORMTESTER_TUPLE",
@@ -9751,7 +9914,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_303__CLASS_NORMTESTER*/
- /*_.VALSTR___V392*/ meltfptr[391] =
+ /*_.VALSTR___V393*/ meltfptr[392] =
(void *) &cdat->dstr_303__CLASS_NORMTESTER;
cdat->dstr_303__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9759,10 +9922,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NORMTESTER_TUPLE",
sizeof (cdat->dstr_303__CLASS_NORMTESTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ iniobj");
/*iniobj dobj_304__CLASS_NORMTESTER_TUPLE*/
-/*_.VALDATA___V393*/ meltfptr[392] =
+/*_.VALDATA___V394*/ meltfptr[393] =
(void *) &cdat->dobj_304__CLASS_NORMTESTER_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -9777,12 +9940,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_304__CLASS_NORMTESTER_TUPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_hash = 296103150;
+ cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_hash = 516575117;
cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_len = 8;
/*inistring dstr_305__CLASS_NORMTESTER*/
- /*_.VALSTR___V394*/ meltfptr[393] =
+ /*_.VALSTR___V395*/ meltfptr[394] =
(void *) &cdat->dstr_305__CLASS_NORMTESTER;
cdat->dstr_305__CLASS_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9791,22 +9954,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_305__CLASS_NORMTESTER.
val) - 1);
/*inimult dtup_306__CLASS_NORMTESTER_TUPLE */
- /*_.VALTUP___V395*/ meltfptr[394] =
+ /*_.VALTUP___V396*/ meltfptr[395] =
(void *) &cdat->dtup_306__CLASS_NORMTESTER_TUPLE;
cdat->dtup_306__CLASS_NORMTESTER_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_306__CLASS_NORMTESTER_TUPLE.nbval = 5;
/*inimult dtup_307__CLASS_NORMTESTER_TUPLE */
- /*_.VALTUP___V398*/ meltfptr[397] =
+ /*_.VALTUP___V399*/ meltfptr[398] =
(void *) &cdat->dtup_307__CLASS_NORMTESTER_TUPLE;
cdat->dtup_307__CLASS_NORMTESTER_TUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_307__CLASS_NORMTESTER_TUPLE.nbval = 8;
/*iniobj dsym_308__NTTUPLE_COMPONENTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V399*/ meltfptr[398])
- /*_.VALDATA___V399*/
- meltfptr[398] = (void *) &cdat->dsym_308__NTTUPLE_COMPONENTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V400*/ meltfptr[399])
+ /*_.VALDATA___V400*/
+ meltfptr[399] = (void *) &cdat->dsym_308__NTTUPLE_COMPONENTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_308__NTTUPLE_COMPONENTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9823,7 +9986,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_309__NTTUPLE_COMPONEN*/
- /*_.VALSTR___V400*/ meltfptr[399] =
+ /*_.VALSTR___V401*/ meltfptr[400] =
(void *) &cdat->dstr_309__NTTUPLE_COMPONEN;
cdat->dstr_309__NTTUPLE_COMPONEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9834,7 +9997,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_310__NTTUPLE_COMPONENTS*/
-/*_.VALDATA___V396*/ meltfptr[395] =
+/*_.VALDATA___V397*/ meltfptr[396] =
(void *) &cdat->dobj_310__NTTUPLE_COMPONENTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_310__NTTUPLE_COMPONENTS",
@@ -9848,12 +10011,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_310__NTTUPLE_COMPONENTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_310__NTTUPLE_COMPONENTS.obj_num = 7;
- cdat->dobj_310__NTTUPLE_COMPONENTS.obj_hash = 349573115;
+ cdat->dobj_310__NTTUPLE_COMPONENTS.obj_hash = 84168666;
cdat->dobj_310__NTTUPLE_COMPONENTS.obj_len = 4;
/*inistring dstr_311__NTTUPLE_COMPONEN*/
- /*_.VALSTR___V397*/ meltfptr[396] =
+ /*_.VALSTR___V398*/ meltfptr[397] =
(void *) &cdat->dstr_311__NTTUPLE_COMPONEN;
cdat->dstr_311__NTTUPLE_COMPONEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9863,9 +10026,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_312__CLASS_NREP_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V401*/ meltfptr[400])
- /*_.VALDATA___V401*/
- meltfptr[400] = (void *) &cdat->dsym_312__CLASS_NREP_MATCH;
+ /*uniqueobj*/ if (! /*_.VALDATA___V402*/ meltfptr[401])
+ /*_.VALDATA___V402*/
+ meltfptr[401] = (void *) &cdat->dsym_312__CLASS_NREP_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_312__CLASS_NREP_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9882,7 +10045,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_313__CLASS_NREP_MATCH*/
- /*_.VALSTR___V402*/ meltfptr[401] =
+ /*_.VALSTR___V403*/ meltfptr[402] =
(void *) &cdat->dstr_313__CLASS_NREP_MATCH;
cdat->dstr_313__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9892,9 +10055,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_314__CLASS_NREP_TYPED_EXPRESSION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V403*/ meltfptr[402])
- /*_.VALDATA___V403*/
- meltfptr[402] = (void *) &cdat->dsym_314__CLASS_NREP_TYPED_EXPRESSION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V404*/ meltfptr[403])
+ /*_.VALDATA___V404*/
+ meltfptr[403] = (void *) &cdat->dsym_314__CLASS_NREP_TYPED_EXPRESSION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_314__CLASS_NREP_TYPED_EXPRESSION",
@@ -9912,7 +10075,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_315__CLASS_NREP_TYPED*/
- /*_.VALSTR___V404*/ meltfptr[403] =
+ /*_.VALSTR___V405*/ meltfptr[404] =
(void *) &cdat->dstr_315__CLASS_NREP_TYPED;
cdat->dstr_315__CLASS_NREP_TYPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9920,10 +10083,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_NREP_TYPED_EXPRESSION",
sizeof (cdat->dstr_315__CLASS_NREP_TYPED.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ iniobj");
/*iniobj dobj_316__CLASS_NREP_MATCH*/
-/*_.VALDATA___V405*/ meltfptr[404] =
+/*_.VALDATA___V406*/ meltfptr[405] =
(void *) &cdat->dobj_316__CLASS_NREP_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_316__CLASS_NREP_MATCH",
@@ -9937,12 +10100,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_316__CLASS_NREP_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_316__CLASS_NREP_MATCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_316__CLASS_NREP_MATCH.obj_hash = 937204326;
+ cdat->dobj_316__CLASS_NREP_MATCH.obj_hash = 506921525;
cdat->dobj_316__CLASS_NREP_MATCH.obj_len = 8;
/*inistring dstr_317__CLASS_NREP_MATCH*/
- /*_.VALSTR___V406*/ meltfptr[405] =
+ /*_.VALSTR___V407*/ meltfptr[406] =
(void *) &cdat->dstr_317__CLASS_NREP_MATCH;
cdat->dstr_317__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -9951,22 +10114,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_317__CLASS_NREP_MATCH.
val) - 1);
/*inimult dtup_318__CLASS_NREP_MATCH */
- /*_.VALTUP___V407*/ meltfptr[406] =
+ /*_.VALTUP___V408*/ meltfptr[407] =
(void *) &cdat->dtup_318__CLASS_NREP_MATCH;
cdat->dtup_318__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_318__CLASS_NREP_MATCH.nbval = 4;
/*inimult dtup_319__CLASS_NREP_MATCH */
- /*_.VALTUP___V414*/ meltfptr[413] =
+ /*_.VALTUP___V415*/ meltfptr[414] =
(void *) &cdat->dtup_319__CLASS_NREP_MATCH;
cdat->dtup_319__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_319__CLASS_NREP_MATCH.nbval = 5;
/*iniobj dsym_320__NMATCH_TESTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V415*/ meltfptr[414])
- /*_.VALDATA___V415*/
- meltfptr[414] = (void *) &cdat->dsym_320__NMATCH_TESTS;
+ /*uniqueobj*/ if (! /*_.VALDATA___V416*/ meltfptr[415])
+ /*_.VALDATA___V416*/
+ meltfptr[415] = (void *) &cdat->dsym_320__NMATCH_TESTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_320__NMATCH_TESTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -9983,7 +10146,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_321__NMATCH_TESTS*/
- /*_.VALSTR___V416*/ meltfptr[415] = (void *) &cdat->dstr_321__NMATCH_TESTS;
+ /*_.VALSTR___V417*/ meltfptr[416] = (void *) &cdat->dstr_321__NMATCH_TESTS;
cdat->dstr_321__NMATCH_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_321__NMATCH_TESTS.val,
@@ -9993,7 +10156,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_322__NMATCH_TESTS*/
-/*_.VALDATA___V408*/ meltfptr[407] = (void *) &cdat->dobj_322__NMATCH_TESTS;
+/*_.VALDATA___V409*/ meltfptr[408] = (void *) &cdat->dobj_322__NMATCH_TESTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_322__NMATCH_TESTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10006,12 +10169,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_322__NMATCH_TESTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_322__NMATCH_TESTS.obj_num = 2;
- cdat->dobj_322__NMATCH_TESTS.obj_hash = 914778581;
+ cdat->dobj_322__NMATCH_TESTS.obj_hash = 2971592;
cdat->dobj_322__NMATCH_TESTS.obj_len = 4;
/*inistring dstr_323__NMATCH_TESTS*/
- /*_.VALSTR___V409*/ meltfptr[408] = (void *) &cdat->dstr_323__NMATCH_TESTS;
+ /*_.VALSTR___V410*/ meltfptr[409] = (void *) &cdat->dstr_323__NMATCH_TESTS;
cdat->dstr_323__NMATCH_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_323__NMATCH_TESTS.val,
@@ -10020,9 +10183,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_324__NMATCH_STUFFMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V417*/ meltfptr[416])
- /*_.VALDATA___V417*/
- meltfptr[416] = (void *) &cdat->dsym_324__NMATCH_STUFFMAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V418*/ meltfptr[417])
+ /*_.VALDATA___V418*/
+ meltfptr[417] = (void *) &cdat->dsym_324__NMATCH_STUFFMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_324__NMATCH_STUFFMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10039,7 +10202,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_325__NMATCH_STUFFMAP*/
- /*_.VALSTR___V418*/ meltfptr[417] =
+ /*_.VALSTR___V419*/ meltfptr[418] =
(void *) &cdat->dstr_325__NMATCH_STUFFMAP;
cdat->dstr_325__NMATCH_STUFFMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10050,7 +10213,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_326__NMATCH_STUFFMAP*/
-/*_.VALDATA___V410*/ meltfptr[409] =
+/*_.VALDATA___V411*/ meltfptr[410] =
(void *) &cdat->dobj_326__NMATCH_STUFFMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_326__NMATCH_STUFFMAP",
@@ -10064,12 +10227,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_326__NMATCH_STUFFMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_326__NMATCH_STUFFMAP.obj_num = 3;
- cdat->dobj_326__NMATCH_STUFFMAP.obj_hash = 579740260;
+ cdat->dobj_326__NMATCH_STUFFMAP.obj_hash = 508722477;
cdat->dobj_326__NMATCH_STUFFMAP.obj_len = 4;
/*inistring dstr_327__NMATCH_STUFFMAP*/
- /*_.VALSTR___V411*/ meltfptr[410] =
+ /*_.VALSTR___V412*/ meltfptr[411] =
(void *) &cdat->dstr_327__NMATCH_STUFFMAP;
cdat->dstr_327__NMATCH_STUFFMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10079,9 +10242,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_328__NMATCH_MATCHED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V419*/ meltfptr[418])
- /*_.VALDATA___V419*/
- meltfptr[418] = (void *) &cdat->dsym_328__NMATCH_MATCHED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V420*/ meltfptr[419])
+ /*_.VALDATA___V420*/
+ meltfptr[419] = (void *) &cdat->dsym_328__NMATCH_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_328__NMATCH_MATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10098,7 +10261,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_329__NMATCH_MATCHED*/
- /*_.VALSTR___V420*/ meltfptr[419] =
+ /*_.VALSTR___V421*/ meltfptr[420] =
(void *) &cdat->dstr_329__NMATCH_MATCHED;
cdat->dstr_329__NMATCH_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10109,7 +10272,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_330__NMATCH_MATCHED*/
-/*_.VALDATA___V412*/ meltfptr[411] =
+/*_.VALDATA___V413*/ meltfptr[412] =
(void *) &cdat->dobj_330__NMATCH_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_330__NMATCH_MATCHED",
@@ -10123,12 +10286,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_330__NMATCH_MATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_330__NMATCH_MATCHED.obj_num = 4;
- cdat->dobj_330__NMATCH_MATCHED.obj_hash = 1059959310;
+ cdat->dobj_330__NMATCH_MATCHED.obj_hash = 510590685;
cdat->dobj_330__NMATCH_MATCHED.obj_len = 4;
/*inistring dstr_331__NMATCH_MATCHED*/
- /*_.VALSTR___V413*/ meltfptr[412] =
+ /*_.VALSTR___V414*/ meltfptr[413] =
(void *) &cdat->dstr_331__NMATCH_MATCHED;
cdat->dstr_331__NMATCH_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10137,19 +10300,19 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_331__NMATCH_MATCHED.val) -
1);
/*inirout drout_332__REGISTER_NEW_NORMTESTER */
- /*_.VALROUT___V421*/ meltfptr[420] =
+ /*_.VALROUT___V422*/ meltfptr[421] =
(void *) &cdat->drout_332__REGISTER_NEW_NORMTESTER;
cdat->drout_332__REGISTER_NEW_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_332__REGISTER_NEW_NORMTESTER.routdescr,
- "REGISTER_NEW_NORMTESTER @warmelt-normatch.melt:567",
+ "REGISTER_NEW_NORMTESTER @warmelt-normatch.melt:568",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_332__REGISTER_NEW_NORMTESTER.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_332__REGISTER_NEW_NORMTESTER,
meltrout_12_warmelt_normatch_REGISTER_NEW_NORMTESTER);
/*iniclos dclo_333__REGISTER_NEW_NORMTESTER */
- /*_.VALCLO___V422*/ meltfptr[421] =
+ /*_.VALCLO___V423*/ meltfptr[422] =
(void *) &cdat->dclo_333__REGISTER_NEW_NORMTESTER;
cdat->dclo_333__REGISTER_NEW_NORMTESTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10157,9 +10320,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_334__DISCR_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V423*/ meltfptr[422])
- /*_.VALDATA___V423*/
- meltfptr[422] = (void *) &cdat->dsym_334__DISCR_LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V424*/ meltfptr[423])
+ /*_.VALDATA___V424*/
+ meltfptr[423] = (void *) &cdat->dsym_334__DISCR_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_334__DISCR_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10176,25 +10339,25 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_335__DISCR_LIST*/
- /*_.VALSTR___V424*/ meltfptr[423] = (void *) &cdat->dstr_335__DISCR_LIST;
+ /*_.VALSTR___V425*/ meltfptr[424] = (void *) &cdat->dstr_335__DISCR_LIST;
cdat->dstr_335__DISCR_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_335__DISCR_LIST.val, "DISCR_LIST",
sizeof (cdat->dstr_335__DISCR_LIST.val) - 1);
/*inirout drout_336__PUT_TESTER_THEN */
- /*_.VALROUT___V425*/ meltfptr[424] =
+ /*_.VALROUT___V426*/ meltfptr[425] =
(void *) &cdat->drout_336__PUT_TESTER_THEN;
cdat->drout_336__PUT_TESTER_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_336__PUT_TESTER_THEN.routdescr,
- "PUT_TESTER_THEN @warmelt-normatch.melt:597",
+ "PUT_TESTER_THEN @warmelt-normatch.melt:598",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_336__PUT_TESTER_THEN.nbval = 6;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_336__PUT_TESTER_THEN,
meltrout_13_warmelt_normatch_PUT_TESTER_THEN);
/*iniclos dclo_337__PUT_TESTER_THEN */
- /*_.VALCLO___V428*/ meltfptr[427] =
+ /*_.VALCLO___V429*/ meltfptr[428] =
(void *) &cdat->dclo_337__PUT_TESTER_THEN;
cdat->dclo_337__PUT_TESTER_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10202,9 +10365,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_338__CLASS_CONTAINER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V429*/ meltfptr[428])
- /*_.VALDATA___V429*/
- meltfptr[428] = (void *) &cdat->dsym_338__CLASS_CONTAINER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V430*/ meltfptr[429])
+ /*_.VALDATA___V430*/
+ meltfptr[429] = (void *) &cdat->dsym_338__CLASS_CONTAINER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_338__CLASS_CONTAINER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10221,7 +10384,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_339__CLASS_CONTAINER*/
- /*_.VALSTR___V430*/ meltfptr[429] =
+ /*_.VALSTR___V431*/ meltfptr[430] =
(void *) &cdat->dstr_339__CLASS_CONTAINER;
cdat->dstr_339__CLASS_CONTAINER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10230,95 +10393,95 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_339__CLASS_CONTAINER.val) -
1);
/*inirout drout_340__SET_NEW_TESTER_LAST_THEN */
- /*_.VALROUT___V427*/ meltfptr[426] =
+ /*_.VALROUT___V428*/ meltfptr[427] =
(void *) &cdat->drout_340__SET_NEW_TESTER_LAST_THEN;
cdat->drout_340__SET_NEW_TESTER_LAST_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_340__SET_NEW_TESTER_LAST_THEN.routdescr,
- "SET_NEW_TESTER_LAST_THEN @warmelt-normatch.melt:627",
+ "SET_NEW_TESTER_LAST_THEN @warmelt-normatch.melt:628",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_340__SET_NEW_TESTER_LAST_THEN.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_340__SET_NEW_TESTER_LAST_THEN,
meltrout_14_warmelt_normatch_SET_NEW_TESTER_LAST_THEN);
/*iniclos dclo_341__SET_NEW_TESTER_LAST_THEN */
- /*_.VALCLO___V426*/ meltfptr[425] =
+ /*_.VALCLO___V427*/ meltfptr[426] =
(void *) &cdat->dclo_341__SET_NEW_TESTER_LAST_THEN;
cdat->dclo_341__SET_NEW_TESTER_LAST_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_341__SET_NEW_TESTER_LAST_THEN.nbval = 0;
/*inirout drout_342__SET_NEW_TESTER_ALL_ELSES */
- /*_.VALROUT___V431*/ meltfptr[430] =
+ /*_.VALROUT___V432*/ meltfptr[431] =
(void *) &cdat->drout_342__SET_NEW_TESTER_ALL_ELSES;
cdat->drout_342__SET_NEW_TESTER_ALL_ELSES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_342__SET_NEW_TESTER_ALL_ELSES.routdescr,
- "SET_NEW_TESTER_ALL_ELSES @warmelt-normatch.melt:652",
+ "SET_NEW_TESTER_ALL_ELSES @warmelt-normatch.melt:653",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_342__SET_NEW_TESTER_ALL_ELSES.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_342__SET_NEW_TESTER_ALL_ELSES,
meltrout_15_warmelt_normatch_SET_NEW_TESTER_ALL_ELSES);
/*iniclos dclo_343__SET_NEW_TESTER_ALL_ELSES */
- /*_.VALCLO___V432*/ meltfptr[431] =
+ /*_.VALCLO___V433*/ meltfptr[432] =
(void *) &cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES;
cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES.nbval = 0;
/*inirout drout_344__NORMPAT_ANYRECV */
- /*_.VALROUT___V433*/ meltfptr[432] =
+ /*_.VALROUT___V434*/ meltfptr[433] =
(void *) &cdat->drout_344__NORMPAT_ANYRECV;
cdat->drout_344__NORMPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_344__NORMPAT_ANYRECV.routdescr,
- "NORMPAT_ANYRECV @warmelt-normatch.melt:716",
+ "NORMPAT_ANYRECV @warmelt-normatch.melt:717",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_344__NORMPAT_ANYRECV.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_344__NORMPAT_ANYRECV,
meltrout_16_warmelt_normatch_NORMPAT_ANYRECV);
/*iniclos dclo_345__NORMPAT_ANYRECV */
- /*_.VALCLO___V434*/ meltfptr[433] =
+ /*_.VALCLO___V435*/ meltfptr[434] =
(void *) &cdat->dclo_345__NORMPAT_ANYRECV;
cdat->dclo_345__NORMPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_345__NORMPAT_ANYRECV.nbval = 0;
/*inirout drout_346__NORMPAT_ANYPAT */
- /*_.VALROUT___V435*/ meltfptr[434] =
+ /*_.VALROUT___V436*/ meltfptr[435] =
(void *) &cdat->drout_346__NORMPAT_ANYPAT;
cdat->drout_346__NORMPAT_ANYPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_346__NORMPAT_ANYPAT.routdescr,
- "NORMPAT_ANYPAT @warmelt-normatch.melt:732",
+ "NORMPAT_ANYPAT @warmelt-normatch.melt:733",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_346__NORMPAT_ANYPAT.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_346__NORMPAT_ANYPAT,
meltrout_17_warmelt_normatch_NORMPAT_ANYPAT);
/*iniclos dclo_347__NORMPAT_ANYPAT */
- /*_.VALCLO___V436*/ meltfptr[435] =
+ /*_.VALCLO___V437*/ meltfptr[436] =
(void *) &cdat->dclo_347__NORMPAT_ANYPAT;
cdat->dclo_347__NORMPAT_ANYPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_347__NORMPAT_ANYPAT.nbval = 0;
/*inirout drout_348__NORMVARPAT_GENREUSETEST */
- /*_.VALROUT___V437*/ meltfptr[436] =
+ /*_.VALROUT___V438*/ meltfptr[437] =
(void *) &cdat->drout_348__NORMVARPAT_GENREUSETEST;
cdat->drout_348__NORMVARPAT_GENREUSETEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_348__NORMVARPAT_GENREUSETEST.routdescr,
- "NORMVARPAT_GENREUSETEST @warmelt-normatch.melt:752",
+ "NORMVARPAT_GENREUSETEST @warmelt-normatch.melt:753",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_348__NORMVARPAT_GENREUSETEST.nbval = 10;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_348__NORMVARPAT_GENREUSETEST,
meltrout_18_warmelt_normatch_NORMVARPAT_GENREUSETEST);
/*iniclos dclo_349__NORMVARPAT_GENREUSETEST */
- /*_.VALCLO___V439*/ meltfptr[438] =
+ /*_.VALCLO___V440*/ meltfptr[439] =
(void *) &cdat->dclo_349__NORMVARPAT_GENREUSETEST;
cdat->dclo_349__NORMVARPAT_GENREUSETEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10326,9 +10489,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_350__CLASS_NREP_LOCSYMOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V440*/ meltfptr[439])
- /*_.VALDATA___V440*/
- meltfptr[439] = (void *) &cdat->dsym_350__CLASS_NREP_LOCSYMOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V441*/ meltfptr[440])
+ /*_.VALDATA___V441*/
+ meltfptr[440] = (void *) &cdat->dsym_350__CLASS_NREP_LOCSYMOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_350__CLASS_NREP_LOCSYMOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10345,7 +10508,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_351__CLASS_NREP_LOCSY*/
- /*_.VALSTR___V441*/ meltfptr[440] =
+ /*_.VALSTR___V442*/ meltfptr[441] =
(void *) &cdat->dstr_351__CLASS_NREP_LOCSY;
cdat->dstr_351__CLASS_NREP_LOCSY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10354,29 +10517,29 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_351__CLASS_NREP_LOCSY.
val) - 1);
/*inirout drout_352__LAMBDA_ */
- /*_.VALROUT___V438*/ meltfptr[437] = (void *) &cdat->drout_352__LAMBDA_;
+ /*_.VALROUT___V439*/ meltfptr[438] = (void *) &cdat->drout_352__LAMBDA_;
cdat->drout_352__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_352__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:770", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:771", MELT_ROUTDESCR_LEN - 1);
cdat->drout_352__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_352__LAMBDA_,
meltrout_19_warmelt_normatch_LAMBDA___2__);
/*inirout drout_353__NORMPAT_VARIABLEPAT */
- /*_.VALROUT___V442*/ meltfptr[441] =
+ /*_.VALROUT___V443*/ meltfptr[442] =
(void *) &cdat->drout_353__NORMPAT_VARIABLEPAT;
cdat->drout_353__NORMPAT_VARIABLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_353__NORMPAT_VARIABLEPAT.routdescr,
- "NORMPAT_VARIABLEPAT @warmelt-normatch.melt:804",
+ "NORMPAT_VARIABLEPAT @warmelt-normatch.melt:805",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_353__NORMPAT_VARIABLEPAT.nbval = 13;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_353__NORMPAT_VARIABLEPAT,
meltrout_20_warmelt_normatch_NORMPAT_VARIABLEPAT);
/*iniclos dclo_354__NORMPAT_VARIABLEPAT */
- /*_.VALCLO___V443*/ meltfptr[442] =
+ /*_.VALCLO___V444*/ meltfptr[443] =
(void *) &cdat->dclo_354__NORMPAT_VARIABLEPAT;
cdat->dclo_354__NORMPAT_VARIABLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10384,9 +10547,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_355__CLASS_NORMAL_LET_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V444*/ meltfptr[443])
- /*_.VALDATA___V444*/
- meltfptr[443] = (void *) &cdat->dsym_355__CLASS_NORMAL_LET_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V445*/ meltfptr[444])
+ /*_.VALDATA___V445*/
+ meltfptr[444] = (void *) &cdat->dsym_355__CLASS_NORMAL_LET_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_355__CLASS_NORMAL_LET_BINDING",
@@ -10404,7 +10567,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_356__CLASS_NORMAL_LET*/
- /*_.VALSTR___V445*/ meltfptr[444] =
+ /*_.VALSTR___V446*/ meltfptr[445] =
(void *) &cdat->dstr_356__CLASS_NORMAL_LET;
cdat->dstr_356__CLASS_NORMAL_LET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10414,9 +10577,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_357__CLASS_NORMALIZATION_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V446*/ meltfptr[445])
- /*_.VALDATA___V446*/
- meltfptr[445] = (void *) &cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V447*/ meltfptr[446])
+ /*_.VALDATA___V447*/
+ meltfptr[446] = (void *) &cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_357__CLASS_NORMALIZATION_CONTEXT",
@@ -10434,7 +10597,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_358__CLASS_NORMALIZAT*/
- /*_.VALSTR___V447*/ meltfptr[446] =
+ /*_.VALSTR___V448*/ meltfptr[447] =
(void *) &cdat->dstr_358__CLASS_NORMALIZAT;
cdat->dstr_358__CLASS_NORMALIZAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10443,38 +10606,38 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_358__CLASS_NORMALIZAT.
val) - 1);
/*inirout drout_359__NORMPAT_JOKERPAT */
- /*_.VALROUT___V448*/ meltfptr[447] =
+ /*_.VALROUT___V449*/ meltfptr[448] =
(void *) &cdat->drout_359__NORMPAT_JOKERPAT;
cdat->drout_359__NORMPAT_JOKERPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_359__NORMPAT_JOKERPAT.routdescr,
- "NORMPAT_JOKERPAT @warmelt-normatch.melt:948",
+ "NORMPAT_JOKERPAT @warmelt-normatch.melt:949",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_359__NORMPAT_JOKERPAT.nbval = 3;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_359__NORMPAT_JOKERPAT,
meltrout_21_warmelt_normatch_NORMPAT_JOKERPAT);
/*iniclos dclo_360__NORMPAT_JOKERPAT */
- /*_.VALCLO___V449*/ meltfptr[448] =
+ /*_.VALCLO___V450*/ meltfptr[449] =
(void *) &cdat->dclo_360__NORMPAT_JOKERPAT;
cdat->dclo_360__NORMPAT_JOKERPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_360__NORMPAT_JOKERPAT.nbval = 0;
/*inirout drout_361__NORMPAT_INSTANCEPAT */
- /*_.VALROUT___V450*/ meltfptr[449] =
+ /*_.VALROUT___V451*/ meltfptr[450] =
(void *) &cdat->drout_361__NORMPAT_INSTANCEPAT;
cdat->drout_361__NORMPAT_INSTANCEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_361__NORMPAT_INSTANCEPAT.routdescr,
- "NORMPAT_INSTANCEPAT @warmelt-normatch.melt:962",
+ "NORMPAT_INSTANCEPAT @warmelt-normatch.melt:963",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_361__NORMPAT_INSTANCEPAT.nbval = 36;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_361__NORMPAT_INSTANCEPAT,
meltrout_22_warmelt_normatch_NORMPAT_INSTANCEPAT);
/*iniclos dclo_362__NORMPAT_INSTANCEPAT */
- /*_.VALCLO___V457*/ meltfptr[456] =
+ /*_.VALCLO___V458*/ meltfptr[457] =
(void *) &cdat->dclo_362__NORMPAT_INSTANCEPAT;
cdat->dclo_362__NORMPAT_INSTANCEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10482,9 +10645,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_363__CLASS_SOURCE_PATTERN_INSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V458*/ meltfptr[457])
- /*_.VALDATA___V458*/
- meltfptr[457] = (void *) &cdat->dsym_363__CLASS_SOURCE_PATTERN_INSTANCE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V459*/ meltfptr[458])
+ /*_.VALDATA___V459*/
+ meltfptr[458] = (void *) &cdat->dsym_363__CLASS_SOURCE_PATTERN_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_363__CLASS_SOURCE_PATTERN_INSTANCE",
@@ -10502,7 +10665,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_364__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V459*/ meltfptr[458] =
+ /*_.VALSTR___V460*/ meltfptr[459] =
(void *) &cdat->dstr_364__CLASS_SOURCE_PAT;
cdat->dstr_364__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10511,20 +10674,20 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_364__CLASS_SOURCE_PAT.
val) - 1);
/*inirout drout_365__LAMBDA_ */
- /*_.VALROUT___V451*/ meltfptr[450] = (void *) &cdat->drout_365__LAMBDA_;
+ /*_.VALROUT___V452*/ meltfptr[451] = (void *) &cdat->drout_365__LAMBDA_;
cdat->drout_365__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_365__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:996", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:997", MELT_ROUTDESCR_LEN - 1);
cdat->drout_365__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_365__LAMBDA_,
meltrout_23_warmelt_normatch_LAMBDA___3__);
/*iniobj dsym_366__DISCR_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V460*/ meltfptr[459])
- /*_.VALDATA___V460*/
- meltfptr[459] = (void *) &cdat->dsym_366__DISCR_MULTIPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V461*/ meltfptr[460])
+ /*_.VALDATA___V461*/
+ meltfptr[460] = (void *) &cdat->dsym_366__DISCR_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_366__DISCR_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10541,7 +10704,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_367__DISCR_MULTIPLE*/
- /*_.VALSTR___V461*/ meltfptr[460] =
+ /*_.VALSTR___V462*/ meltfptr[461] =
(void *) &cdat->dstr_367__DISCR_MULTIPLE;
cdat->dstr_367__DISCR_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10550,48 +10713,48 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_367__DISCR_MULTIPLE.val) -
1);
/*inirout drout_368__LAMBDA_ */
- /*_.VALROUT___V452*/ meltfptr[451] = (void *) &cdat->drout_368__LAMBDA_;
+ /*_.VALROUT___V453*/ meltfptr[452] = (void *) &cdat->drout_368__LAMBDA_;
cdat->drout_368__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_368__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1041", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1042", MELT_ROUTDESCR_LEN - 1);
cdat->drout_368__LAMBDA_.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_368__LAMBDA_,
meltrout_24_warmelt_normatch_LAMBDA___4__);
/*iniboxint dint_369__ */
- /*_.VALBXINT___V453*/ meltfptr[452] = (void *) &cdat->dint_369__;
+ /*_.VALBXINT___V454*/ meltfptr[453] = (void *) &cdat->dint_369__;
cdat->dint_369__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_369__.val = 0;
/*iniboxint dint_370__ */
- /*_.VALBXINT___V454*/ meltfptr[453] = (void *) &cdat->dint_370__;
+ /*_.VALBXINT___V455*/ meltfptr[454] = (void *) &cdat->dint_370__;
cdat->dint_370__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_370__.val = 1;
/*iniboxint dint_371__ */
- /*_.VALBXINT___V455*/ meltfptr[454] = (void *) &cdat->dint_371__;
+ /*_.VALBXINT___V456*/ meltfptr[455] = (void *) &cdat->dint_371__;
cdat->dint_371__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_371__.val = -1;
/*inirout drout_372__LAMBDA_ */
- /*_.VALROUT___V456*/ meltfptr[455] = (void *) &cdat->drout_372__LAMBDA_;
+ /*_.VALROUT___V457*/ meltfptr[456] = (void *) &cdat->drout_372__LAMBDA_;
cdat->drout_372__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_372__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1068", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1069", MELT_ROUTDESCR_LEN - 1);
cdat->drout_372__LAMBDA_.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_372__LAMBDA_,
meltrout_25_warmelt_normatch_LAMBDA___5__);
/*iniobj dsym_373__CLASS_NREP_SYMOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V462*/ meltfptr[461])
- /*_.VALDATA___V462*/
- meltfptr[461] = (void *) &cdat->dsym_373__CLASS_NREP_SYMOCC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V463*/ meltfptr[462])
+ /*_.VALDATA___V463*/
+ meltfptr[462] = (void *) &cdat->dsym_373__CLASS_NREP_SYMOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_373__CLASS_NREP_SYMOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10608,7 +10771,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_374__CLASS_NREP_SYMOC*/
- /*_.VALSTR___V463*/ meltfptr[462] =
+ /*_.VALSTR___V464*/ meltfptr[463] =
(void *) &cdat->dstr_374__CLASS_NREP_SYMOC;
cdat->dstr_374__CLASS_NREP_SYMOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10618,9 +10781,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_375__CLASS_LET_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V464*/ meltfptr[463])
- /*_.VALDATA___V464*/
- meltfptr[463] = (void *) &cdat->dsym_375__CLASS_LET_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V465*/ meltfptr[464])
+ /*_.VALDATA___V465*/
+ meltfptr[464] = (void *) &cdat->dsym_375__CLASS_LET_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_375__CLASS_LET_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10637,7 +10800,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_376__CLASS_LET_BINDIN*/
- /*_.VALSTR___V465*/ meltfptr[464] =
+ /*_.VALSTR___V466*/ meltfptr[465] =
(void *) &cdat->dstr_376__CLASS_LET_BINDIN;
cdat->dstr_376__CLASS_LET_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10647,9 +10810,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_377__CLASS_NREP_UNSAFE_GET_FIELD*/
- /*uniqueobj*/ if (! /*_.VALDATA___V466*/ meltfptr[465])
- /*_.VALDATA___V466*/
- meltfptr[465] = (void *) &cdat->dsym_377__CLASS_NREP_UNSAFE_GET_FIELD;
+ /*uniqueobj*/ if (! /*_.VALDATA___V467*/ meltfptr[466])
+ /*_.VALDATA___V467*/
+ meltfptr[466] = (void *) &cdat->dsym_377__CLASS_NREP_UNSAFE_GET_FIELD;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_377__CLASS_NREP_UNSAFE_GET_FIELD",
@@ -10667,7 +10830,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_378__CLASS_NREP_UNSAF*/
- /*_.VALSTR___V467*/ meltfptr[466] =
+ /*_.VALSTR___V468*/ meltfptr[467] =
(void *) &cdat->dstr_378__CLASS_NREP_UNSAF;
cdat->dstr_378__CLASS_NREP_UNSAF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10677,9 +10840,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_379__CLONE_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V468*/ meltfptr[467])
- /*_.VALDATA___V468*/
- meltfptr[467] = (void *) &cdat->dsym_379__CLONE_SYMBOL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V469*/ meltfptr[468])
+ /*_.VALDATA___V469*/
+ meltfptr[468] = (void *) &cdat->dsym_379__CLONE_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_379__CLONE_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10696,7 +10859,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_380__CLONE_SYMBOL*/
- /*_.VALSTR___V469*/ meltfptr[468] = (void *) &cdat->dstr_380__CLONE_SYMBOL;
+ /*_.VALSTR___V470*/ meltfptr[469] = (void *) &cdat->dstr_380__CLONE_SYMBOL;
cdat->dstr_380__CLONE_SYMBOL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_380__CLONE_SYMBOL.val,
@@ -10705,9 +10868,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_381__CLASS_TUPLE_COMPONENT_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V470*/ meltfptr[469])
- /*_.VALDATA___V470*/
- meltfptr[469] = (void *) &cdat->dsym_381__CLASS_TUPLE_COMPONENT_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V471*/ meltfptr[470])
+ /*_.VALDATA___V471*/
+ meltfptr[470] = (void *) &cdat->dsym_381__CLASS_TUPLE_COMPONENT_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_381__CLASS_TUPLE_COMPONENT_PATTERN",
@@ -10725,7 +10888,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_382__CLASS_TUPLE_COMP*/
- /*_.VALSTR___V471*/ meltfptr[470] =
+ /*_.VALSTR___V472*/ meltfptr[471] =
(void *) &cdat->dstr_382__CLASS_TUPLE_COMP;
cdat->dstr_382__CLASS_TUPLE_COMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10733,10 +10896,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"CLASS_TUPLE_COMPONENT_PATTERN",
sizeof (cdat->dstr_382__CLASS_TUPLE_COMP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ iniobj");
/*iniobj dobj_383__CLASS_TUPLE_COMPONENT_PATTERN*/
-/*_.VALDATA___V472*/ meltfptr[471] =
+/*_.VALDATA___V473*/ meltfptr[472] =
(void *) &cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -10751,12 +10914,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_hash = 141218101;
+ cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_hash = 745800261;
cdat->dobj_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_len = 8;
/*inistring dstr_384__CLASS_TUPLE_COMP*/
- /*_.VALSTR___V473*/ meltfptr[472] =
+ /*_.VALSTR___V474*/ meltfptr[473] =
(void *) &cdat->dstr_384__CLASS_TUPLE_COMP;
cdat->dstr_384__CLASS_TUPLE_COMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10765,22 +10928,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_384__CLASS_TUPLE_COMP.
val) - 1);
/*inimult dtup_385__CLASS_TUPLE_COMPONENT_PATTERN */
- /*_.VALTUP___V474*/ meltfptr[473] =
+ /*_.VALTUP___V475*/ meltfptr[474] =
(void *) &cdat->dtup_385__CLASS_TUPLE_COMPONENT_PATTERN;
cdat->dtup_385__CLASS_TUPLE_COMPONENT_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_385__CLASS_TUPLE_COMPONENT_PATTERN.nbval = 1;
/*inimult dtup_386__CLASS_TUPLE_COMPONENT_PATTERN */
- /*_.VALTUP___V479*/ meltfptr[478] =
+ /*_.VALTUP___V480*/ meltfptr[479] =
(void *) &cdat->dtup_386__CLASS_TUPLE_COMPONENT_PATTERN;
cdat->dtup_386__CLASS_TUPLE_COMPONENT_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_386__CLASS_TUPLE_COMPONENT_PATTERN.nbval = 2;
/*iniobj dsym_387__TUPCP_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V480*/ meltfptr[479])
- /*_.VALDATA___V480*/
- meltfptr[479] = (void *) &cdat->dsym_387__TUPCP_PATTERN;
+ /*uniqueobj*/ if (! /*_.VALDATA___V481*/ meltfptr[480])
+ /*_.VALDATA___V481*/
+ meltfptr[480] = (void *) &cdat->dsym_387__TUPCP_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_387__TUPCP_PATTERN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10797,7 +10960,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_388__TUPCP_PATTERN*/
- /*_.VALSTR___V481*/ meltfptr[480] = (void *) &cdat->dstr_388__TUPCP_PATTERN;
+ /*_.VALSTR___V482*/ meltfptr[481] = (void *) &cdat->dstr_388__TUPCP_PATTERN;
cdat->dstr_388__TUPCP_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_388__TUPCP_PATTERN.val,
@@ -10807,7 +10970,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_389__TUPCP_PATTERN*/
-/*_.VALDATA___V475*/ meltfptr[474] =
+/*_.VALDATA___V476*/ meltfptr[475] =
(void *) &cdat->dobj_389__TUPCP_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_389__TUPCP_PATTERN",
@@ -10821,12 +10984,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_389__TUPCP_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_389__TUPCP_PATTERN.obj_num = 0;
- cdat->dobj_389__TUPCP_PATTERN.obj_hash = 652606330;
+ cdat->dobj_389__TUPCP_PATTERN.obj_hash = 1039025208;
cdat->dobj_389__TUPCP_PATTERN.obj_len = 4;
/*inistring dstr_390__TUPCP_PATTERN*/
- /*_.VALSTR___V476*/ meltfptr[475] = (void *) &cdat->dstr_390__TUPCP_PATTERN;
+ /*_.VALSTR___V477*/ meltfptr[476] = (void *) &cdat->dstr_390__TUPCP_PATTERN;
cdat->dstr_390__TUPCP_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_390__TUPCP_PATTERN.val,
@@ -10835,9 +10998,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_391__TUPCP_INDEX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V482*/ meltfptr[481])
- /*_.VALDATA___V482*/
- meltfptr[481] = (void *) &cdat->dsym_391__TUPCP_INDEX;
+ /*uniqueobj*/ if (! /*_.VALDATA___V483*/ meltfptr[482])
+ /*_.VALDATA___V483*/
+ meltfptr[482] = (void *) &cdat->dsym_391__TUPCP_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_391__TUPCP_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10854,7 +11017,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_392__TUPCP_INDEX*/
- /*_.VALSTR___V483*/ meltfptr[482] = (void *) &cdat->dstr_392__TUPCP_INDEX;
+ /*_.VALSTR___V484*/ meltfptr[483] = (void *) &cdat->dstr_392__TUPCP_INDEX;
cdat->dstr_392__TUPCP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_392__TUPCP_INDEX.val,
@@ -10863,7 +11026,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_393__TUPCP_INDEX*/
-/*_.VALDATA___V477*/ meltfptr[476] = (void *) &cdat->dobj_393__TUPCP_INDEX;
+/*_.VALDATA___V478*/ meltfptr[477] = (void *) &cdat->dobj_393__TUPCP_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_393__TUPCP_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -10876,31 +11039,31 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_393__TUPCP_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_393__TUPCP_INDEX.obj_num = 1;
- cdat->dobj_393__TUPCP_INDEX.obj_hash = 627761313;
+ cdat->dobj_393__TUPCP_INDEX.obj_hash = 157711760;
cdat->dobj_393__TUPCP_INDEX.obj_len = 4;
/*inistring dstr_394__TUPCP_INDEX*/
- /*_.VALSTR___V478*/ meltfptr[477] = (void *) &cdat->dstr_394__TUPCP_INDEX;
+ /*_.VALSTR___V479*/ meltfptr[478] = (void *) &cdat->dstr_394__TUPCP_INDEX;
cdat->dstr_394__TUPCP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_394__TUPCP_INDEX.val,
"TUPCP_INDEX",
sizeof (cdat->dstr_394__TUPCP_INDEX.val) - 1);
/*inirout drout_395__NORMPAT_TUPLEPAT */
- /*_.VALROUT___V484*/ meltfptr[483] =
+ /*_.VALROUT___V485*/ meltfptr[484] =
(void *) &cdat->drout_395__NORMPAT_TUPLEPAT;
cdat->drout_395__NORMPAT_TUPLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_395__NORMPAT_TUPLEPAT.routdescr,
- "NORMPAT_TUPLEPAT @warmelt-normatch.melt:1153",
+ "NORMPAT_TUPLEPAT @warmelt-normatch.melt:1154",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_395__NORMPAT_TUPLEPAT.nbval = 36;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_395__NORMPAT_TUPLEPAT,
meltrout_26_warmelt_normatch_NORMPAT_TUPLEPAT);
/*iniclos dclo_396__NORMPAT_TUPLEPAT */
- /*_.VALCLO___V493*/ meltfptr[492] =
+ /*_.VALCLO___V494*/ meltfptr[493] =
(void *) &cdat->dclo_396__NORMPAT_TUPLEPAT;
cdat->dclo_396__NORMPAT_TUPLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -10908,9 +11071,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_397__CLASS_SOURCE_PATTERN_TUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V494*/ meltfptr[493])
- /*_.VALDATA___V494*/
- meltfptr[493] = (void *) &cdat->dsym_397__CLASS_SOURCE_PATTERN_TUPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V495*/ meltfptr[494])
+ /*_.VALDATA___V495*/
+ meltfptr[494] = (void *) &cdat->dsym_397__CLASS_SOURCE_PATTERN_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_397__CLASS_SOURCE_PATTERN_TUPLE",
@@ -10928,7 +11091,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_398__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V495*/ meltfptr[494] =
+ /*_.VALSTR___V496*/ meltfptr[495] =
(void *) &cdat->dstr_398__CLASS_SOURCE_PAT;
cdat->dstr_398__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10937,20 +11100,20 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_398__CLASS_SOURCE_PAT.
val) - 1);
/*inirout drout_399__LAMBDA_ */
- /*_.VALROUT___V485*/ meltfptr[484] = (void *) &cdat->drout_399__LAMBDA_;
+ /*_.VALROUT___V486*/ meltfptr[485] = (void *) &cdat->drout_399__LAMBDA_;
cdat->drout_399__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_399__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1184", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1185", MELT_ROUTDESCR_LEN - 1);
cdat->drout_399__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_399__LAMBDA_,
meltrout_27_warmelt_normatch_LAMBDA___6__);
/*iniobj dsym_400__DISCR_CONSTANT_INTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V496*/ meltfptr[495])
- /*_.VALDATA___V496*/
- meltfptr[495] = (void *) &cdat->dsym_400__DISCR_CONSTANT_INTEGER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V497*/ meltfptr[496])
+ /*_.VALDATA___V497*/
+ meltfptr[496] = (void *) &cdat->dsym_400__DISCR_CONSTANT_INTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_400__DISCR_CONSTANT_INTEGER",
@@ -10968,7 +11131,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_401__DISCR_CONSTANT_I*/
- /*_.VALSTR___V497*/ meltfptr[496] =
+ /*_.VALSTR___V498*/ meltfptr[497] =
(void *) &cdat->dstr_401__DISCR_CONSTANT_I;
cdat->dstr_401__DISCR_CONSTANT_I.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -10978,9 +11141,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_402__LIST_TO_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V498*/ meltfptr[497])
- /*_.VALDATA___V498*/
- meltfptr[497] = (void *) &cdat->dsym_402__LIST_TO_MULTIPLE;
+ /*uniqueobj*/ if (! /*_.VALDATA___V499*/ meltfptr[498])
+ /*_.VALDATA___V499*/
+ meltfptr[498] = (void *) &cdat->dsym_402__LIST_TO_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_402__LIST_TO_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -10997,7 +11160,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_403__LIST_TO_MULTIPLE*/
- /*_.VALSTR___V499*/ meltfptr[498] =
+ /*_.VALSTR___V500*/ meltfptr[499] =
(void *) &cdat->dstr_403__LIST_TO_MULTIPLE;
cdat->dstr_403__LIST_TO_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11006,48 +11169,48 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_403__LIST_TO_MULTIPLE.
val) - 1);
/*inirout drout_404__LAMBDA_ */
- /*_.VALROUT___V486*/ meltfptr[485] = (void *) &cdat->drout_404__LAMBDA_;
+ /*_.VALROUT___V487*/ meltfptr[486] = (void *) &cdat->drout_404__LAMBDA_;
cdat->drout_404__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_404__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1243", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1244", MELT_ROUTDESCR_LEN - 1);
cdat->drout_404__LAMBDA_.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_404__LAMBDA_,
meltrout_28_warmelt_normatch_LAMBDA___7__);
/*iniboxint dint_405__ */
- /*_.VALBXINT___V487*/ meltfptr[486] = (void *) &cdat->dint_405__;
+ /*_.VALBXINT___V488*/ meltfptr[487] = (void *) &cdat->dint_405__;
cdat->dint_405__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_405__.val = 0;
/*iniboxint dint_406__ */
- /*_.VALBXINT___V488*/ meltfptr[487] = (void *) &cdat->dint_406__;
+ /*_.VALBXINT___V489*/ meltfptr[488] = (void *) &cdat->dint_406__;
cdat->dint_406__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_406__.val = 1;
/*iniboxint dint_407__ */
- /*_.VALBXINT___V489*/ meltfptr[488] = (void *) &cdat->dint_407__;
+ /*_.VALBXINT___V490*/ meltfptr[489] = (void *) &cdat->dint_407__;
cdat->dint_407__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
cdat->dint_407__.val = -1;
/*inirout drout_408__LAMBDA_ */
- /*_.VALROUT___V490*/ meltfptr[489] = (void *) &cdat->drout_408__LAMBDA_;
+ /*_.VALROUT___V491*/ meltfptr[490] = (void *) &cdat->drout_408__LAMBDA_;
cdat->drout_408__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_408__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1264", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1265", MELT_ROUTDESCR_LEN - 1);
cdat->drout_408__LAMBDA_.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_408__LAMBDA_,
meltrout_29_warmelt_normatch_LAMBDA___8__);
/*iniobj dsym_409__CLASS_NREP_UNSAFE_NTH_COMPONENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V500*/ meltfptr[499])
- /*_.VALDATA___V500*/
- meltfptr[499] = (void *) &cdat->dsym_409__CLASS_NREP_UNSAFE_NTH_COMPONENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V501*/ meltfptr[500])
+ /*_.VALDATA___V501*/
+ meltfptr[500] = (void *) &cdat->dsym_409__CLASS_NREP_UNSAFE_NTH_COMPONENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_409__CLASS_NREP_UNSAFE_NTH_COMPONENT",
@@ -11065,7 +11228,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_410__CLASS_NREP_UNSAF*/
- /*_.VALSTR___V501*/ meltfptr[500] =
+ /*_.VALSTR___V502*/ meltfptr[501] =
(void *) &cdat->dstr_410__CLASS_NREP_UNSAF;
cdat->dstr_410__CLASS_NREP_UNSAF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11075,9 +11238,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_411__NTHCOMP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V491*/ meltfptr[490])
- /*_.VALDATA___V491*/
- meltfptr[490] = (void *) &cdat->dsym_411__NTHCOMP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V492*/ meltfptr[491])
+ /*_.VALDATA___V492*/
+ meltfptr[491] = (void *) &cdat->dsym_411__NTHCOMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_411__NTHCOMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11094,63 +11257,63 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_412__NTHCOMP*/
- /*_.VALSTR___V492*/ meltfptr[491] = (void *) &cdat->dstr_412__NTHCOMP;
+ /*_.VALSTR___V493*/ meltfptr[492] = (void *) &cdat->dstr_412__NTHCOMP;
cdat->dstr_412__NTHCOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_412__NTHCOMP.val, "NTHCOMP",
sizeof (cdat->dstr_412__NTHCOMP.val) - 1);
/*inirout drout_413__NORMPAT_ANDPAT */
- /*_.VALROUT___V502*/ meltfptr[501] =
+ /*_.VALROUT___V503*/ meltfptr[502] =
(void *) &cdat->drout_413__NORMPAT_ANDPAT;
cdat->drout_413__NORMPAT_ANDPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_413__NORMPAT_ANDPAT.routdescr,
- "NORMPAT_ANDPAT @warmelt-normatch.melt:1339",
+ "NORMPAT_ANDPAT @warmelt-normatch.melt:1340",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_413__NORMPAT_ANDPAT.nbval = 11;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_413__NORMPAT_ANDPAT,
meltrout_30_warmelt_normatch_NORMPAT_ANDPAT);
/*iniclos dclo_414__NORMPAT_ANDPAT */
- /*_.VALCLO___V504*/ meltfptr[503] =
+ /*_.VALCLO___V505*/ meltfptr[504] =
(void *) &cdat->dclo_414__NORMPAT_ANDPAT;
cdat->dclo_414__NORMPAT_ANDPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_414__NORMPAT_ANDPAT.nbval = 0;
/*inirout drout_415__LAMBDA_ */
- /*_.VALROUT___V503*/ meltfptr[502] = (void *) &cdat->drout_415__LAMBDA_;
+ /*_.VALROUT___V504*/ meltfptr[503] = (void *) &cdat->drout_415__LAMBDA_;
cdat->drout_415__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_415__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1348", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1349", MELT_ROUTDESCR_LEN - 1);
cdat->drout_415__LAMBDA_.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_415__LAMBDA_,
meltrout_31_warmelt_normatch_LAMBDA___9__);
/*inirout drout_416__NORMPAT_ORPAT */
- /*_.VALROUT___V505*/ meltfptr[504] =
+ /*_.VALROUT___V506*/ meltfptr[505] =
(void *) &cdat->drout_416__NORMPAT_ORPAT;
cdat->drout_416__NORMPAT_ORPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_416__NORMPAT_ORPAT.routdescr,
- "NORMPAT_ORPAT @warmelt-normatch.melt:1388",
+ "NORMPAT_ORPAT @warmelt-normatch.melt:1389",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_416__NORMPAT_ORPAT.nbval = 34;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_416__NORMPAT_ORPAT,
meltrout_32_warmelt_normatch_NORMPAT_ORPAT);
/*iniclos dclo_417__NORMPAT_ORPAT */
- /*_.VALCLO___V509*/ meltfptr[508] = (void *) &cdat->dclo_417__NORMPAT_ORPAT;
+ /*_.VALCLO___V510*/ meltfptr[509] = (void *) &cdat->dclo_417__NORMPAT_ORPAT;
cdat->dclo_417__NORMPAT_ORPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_417__NORMPAT_ORPAT.nbval = 0;
/*iniobj dsym_418__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V510*/ meltfptr[509])
- /*_.VALDATA___V510*/
- meltfptr[509] =
+ /*uniqueobj*/ if (! /*_.VALDATA___V511*/ meltfptr[510])
+ /*_.VALDATA___V511*/
+ meltfptr[510] =
(void *) &cdat->dsym_418__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -11169,7 +11332,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_419__MAPOBJECT_SORTED*/
- /*_.VALSTR___V511*/ meltfptr[510] =
+ /*_.VALSTR___V512*/ meltfptr[511] =
(void *) &cdat->dstr_419__MAPOBJECT_SORTED;
cdat->dstr_419__MAPOBJECT_SORTED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11179,9 +11342,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_420__MULTIPLE_MAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V512*/ meltfptr[511])
- /*_.VALDATA___V512*/
- meltfptr[511] = (void *) &cdat->dsym_420__MULTIPLE_MAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V513*/ meltfptr[512])
+ /*_.VALDATA___V513*/
+ meltfptr[512] = (void *) &cdat->dsym_420__MULTIPLE_MAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_420__MULTIPLE_MAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11198,7 +11361,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_421__MULTIPLE_MAP*/
- /*_.VALSTR___V513*/ meltfptr[512] = (void *) &cdat->dstr_421__MULTIPLE_MAP;
+ /*_.VALSTR___V514*/ meltfptr[513] = (void *) &cdat->dstr_421__MULTIPLE_MAP;
cdat->dstr_421__MULTIPLE_MAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_421__MULTIPLE_MAP.val,
@@ -11206,20 +11369,20 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_421__MULTIPLE_MAP.val) -
1);
/*inirout drout_422__LAMBDA_ */
- /*_.VALROUT___V506*/ meltfptr[505] = (void *) &cdat->drout_422__LAMBDA_;
+ /*_.VALROUT___V507*/ meltfptr[506] = (void *) &cdat->drout_422__LAMBDA_;
cdat->drout_422__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_422__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1417", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1418", MELT_ROUTDESCR_LEN - 1);
cdat->drout_422__LAMBDA_.nbval = 3;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_422__LAMBDA_,
meltrout_33_warmelt_normatch_LAMBDA___10__);
/*iniobj dsym_423__CLASS_NREP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V514*/ meltfptr[513])
- /*_.VALDATA___V514*/
- meltfptr[513] = (void *) &cdat->dsym_423__CLASS_NREP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V515*/ meltfptr[514])
+ /*_.VALDATA___V515*/
+ meltfptr[514] = (void *) &cdat->dsym_423__CLASS_NREP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_423__CLASS_NREP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11236,26 +11399,26 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_424__CLASS_NREP*/
- /*_.VALSTR___V515*/ meltfptr[514] = (void *) &cdat->dstr_424__CLASS_NREP;
+ /*_.VALSTR___V516*/ meltfptr[515] = (void *) &cdat->dstr_424__CLASS_NREP;
cdat->dstr_424__CLASS_NREP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_424__CLASS_NREP.val, "CLASS_NREP",
sizeof (cdat->dstr_424__CLASS_NREP.val) - 1);
/*inirout drout_425__LAMBDA_ */
- /*_.VALROUT___V507*/ meltfptr[506] = (void *) &cdat->drout_425__LAMBDA_;
+ /*_.VALROUT___V508*/ meltfptr[507] = (void *) &cdat->drout_425__LAMBDA_;
cdat->drout_425__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_425__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1497", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1498", MELT_ROUTDESCR_LEN - 1);
cdat->drout_425__LAMBDA_.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_425__LAMBDA_,
meltrout_34_warmelt_normatch_LAMBDA___11__);
/*iniobj dsym_426__SET_CONTENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V516*/ meltfptr[515])
- /*_.VALDATA___V516*/
- meltfptr[515] = (void *) &cdat->dsym_426__SET_CONTENT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V517*/ meltfptr[516])
+ /*_.VALDATA___V517*/
+ meltfptr[516] = (void *) &cdat->dsym_426__SET_CONTENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_426__SET_CONTENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11272,36 +11435,36 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_427__SET_CONTENT*/
- /*_.VALSTR___V517*/ meltfptr[516] = (void *) &cdat->dstr_427__SET_CONTENT;
+ /*_.VALSTR___V518*/ meltfptr[517] = (void *) &cdat->dstr_427__SET_CONTENT;
cdat->dstr_427__SET_CONTENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_427__SET_CONTENT.val,
"SET_CONTENT",
sizeof (cdat->dstr_427__SET_CONTENT.val) - 1);
/*inirout drout_428__LAMBDA_ */
- /*_.VALROUT___V508*/ meltfptr[507] = (void *) &cdat->drout_428__LAMBDA_;
+ /*_.VALROUT___V509*/ meltfptr[508] = (void *) &cdat->drout_428__LAMBDA_;
cdat->drout_428__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_428__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1551", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1552", MELT_ROUTDESCR_LEN - 1);
cdat->drout_428__LAMBDA_.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_428__LAMBDA_,
meltrout_35_warmelt_normatch_LAMBDA___12__);
/*inirout drout_429__NORMPAT_ANYMATCHPAT */
- /*_.VALROUT___V518*/ meltfptr[517] =
+ /*_.VALROUT___V519*/ meltfptr[518] =
(void *) &cdat->drout_429__NORMPAT_ANYMATCHPAT;
cdat->drout_429__NORMPAT_ANYMATCHPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_429__NORMPAT_ANYMATCHPAT.routdescr,
- "NORMPAT_ANYMATCHPAT @warmelt-normatch.melt:1584",
+ "NORMPAT_ANYMATCHPAT @warmelt-normatch.melt:1585",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_429__NORMPAT_ANYMATCHPAT.nbval = 42;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_429__NORMPAT_ANYMATCHPAT,
meltrout_36_warmelt_normatch_NORMPAT_ANYMATCHPAT);
/*iniclos dclo_430__NORMPAT_ANYMATCHPAT */
- /*_.VALCLO___V523*/ meltfptr[522] =
+ /*_.VALCLO___V524*/ meltfptr[523] =
(void *) &cdat->dclo_430__NORMPAT_ANYMATCHPAT;
cdat->dclo_430__NORMPAT_ANYMATCHPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -11309,9 +11472,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_431__CLASS_SOURCE_PATTERN_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V524*/ meltfptr[523])
- /*_.VALDATA___V524*/
- meltfptr[523] = (void *) &cdat->dsym_431__CLASS_SOURCE_PATTERN_MATCHER;
+ /*uniqueobj*/ if (! /*_.VALDATA___V525*/ meltfptr[524])
+ /*_.VALDATA___V525*/
+ meltfptr[524] = (void *) &cdat->dsym_431__CLASS_SOURCE_PATTERN_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_431__CLASS_SOURCE_PATTERN_MATCHER",
@@ -11329,7 +11492,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_432__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V525*/ meltfptr[524] =
+ /*_.VALSTR___V526*/ meltfptr[525] =
(void *) &cdat->dstr_432__CLASS_SOURCE_PAT;
cdat->dstr_432__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11339,9 +11502,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_433__CLASS_ANY_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V526*/ meltfptr[525])
- /*_.VALDATA___V526*/
- meltfptr[525] = (void *) &cdat->dsym_433__CLASS_ANY_BINDING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V527*/ meltfptr[526])
+ /*_.VALDATA___V527*/
+ meltfptr[526] = (void *) &cdat->dsym_433__CLASS_ANY_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_433__CLASS_ANY_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11358,7 +11521,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_434__CLASS_ANY_BINDIN*/
- /*_.VALSTR___V527*/ meltfptr[526] =
+ /*_.VALSTR___V528*/ meltfptr[527] =
(void *) &cdat->dstr_434__CLASS_ANY_BINDIN;
cdat->dstr_434__CLASS_ANY_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11368,9 +11531,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_435__FIND_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V528*/ meltfptr[527])
- /*_.VALDATA___V528*/
- meltfptr[527] = (void *) &cdat->dsym_435__FIND_ENV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V529*/ meltfptr[528])
+ /*_.VALDATA___V529*/
+ meltfptr[528] = (void *) &cdat->dsym_435__FIND_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_435__FIND_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11387,16 +11550,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_436__FIND_ENV*/
- /*_.VALSTR___V529*/ meltfptr[528] = (void *) &cdat->dstr_436__FIND_ENV;
+ /*_.VALSTR___V530*/ meltfptr[529] = (void *) &cdat->dstr_436__FIND_ENV;
cdat->dstr_436__FIND_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_436__FIND_ENV.val, "FIND_ENV",
sizeof (cdat->dstr_436__FIND_ENV.val) - 1);
/*iniobj dsym_437__FRESH_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V530*/ meltfptr[529])
- /*_.VALDATA___V530*/
- meltfptr[529] = (void *) &cdat->dsym_437__FRESH_ENV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V531*/ meltfptr[530])
+ /*_.VALDATA___V531*/
+ meltfptr[530] = (void *) &cdat->dsym_437__FRESH_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_437__FRESH_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11413,16 +11576,16 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_438__FRESH_ENV*/
- /*_.VALSTR___V531*/ meltfptr[530] = (void *) &cdat->dstr_438__FRESH_ENV;
+ /*_.VALSTR___V532*/ meltfptr[531] = (void *) &cdat->dstr_438__FRESH_ENV;
cdat->dstr_438__FRESH_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_438__FRESH_ENV.val, "FRESH_ENV",
sizeof (cdat->dstr_438__FRESH_ENV.val) - 1);
/*iniobj dsym_439__PUT_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V532*/ meltfptr[531])
- /*_.VALDATA___V532*/
- meltfptr[531] = (void *) &cdat->dsym_439__PUT_ENV;
+ /*uniqueobj*/ if (! /*_.VALDATA___V533*/ meltfptr[532])
+ /*_.VALDATA___V533*/
+ meltfptr[532] = (void *) &cdat->dsym_439__PUT_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_439__PUT_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11439,46 +11602,46 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_440__PUT_ENV*/
- /*_.VALSTR___V533*/ meltfptr[532] = (void *) &cdat->dstr_440__PUT_ENV;
+ /*_.VALSTR___V534*/ meltfptr[533] = (void *) &cdat->dstr_440__PUT_ENV;
cdat->dstr_440__PUT_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_440__PUT_ENV.val, "PUT_ENV",
sizeof (cdat->dstr_440__PUT_ENV.val) - 1);
/*inirout drout_441__LAMBDA_ */
- /*_.VALROUT___V519*/ meltfptr[518] = (void *) &cdat->drout_441__LAMBDA_;
+ /*_.VALROUT___V520*/ meltfptr[519] = (void *) &cdat->drout_441__LAMBDA_;
cdat->drout_441__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_441__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1722", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1723", MELT_ROUTDESCR_LEN - 1);
cdat->drout_441__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_441__LAMBDA_,
meltrout_37_warmelt_normatch_LAMBDA___13__);
/*inirout drout_442__LAMBDA_ */
- /*_.VALROUT___V520*/ meltfptr[519] = (void *) &cdat->drout_442__LAMBDA_;
+ /*_.VALROUT___V521*/ meltfptr[520] = (void *) &cdat->drout_442__LAMBDA_;
cdat->drout_442__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_442__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1735", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1736", MELT_ROUTDESCR_LEN - 1);
cdat->drout_442__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_442__LAMBDA_,
meltrout_38_warmelt_normatch_LAMBDA___14__);
/*inirout drout_443__LAMBDA_ */
- /*_.VALROUT___V521*/ meltfptr[520] = (void *) &cdat->drout_443__LAMBDA_;
+ /*_.VALROUT___V522*/ meltfptr[521] = (void *) &cdat->drout_443__LAMBDA_;
cdat->drout_443__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_443__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1747", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1748", MELT_ROUTDESCR_LEN - 1);
cdat->drout_443__LAMBDA_.nbval = 7;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_443__LAMBDA_,
meltrout_39_warmelt_normatch_LAMBDA___15__);
/*iniobj dsym_444__MULTIPLE_TO_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V534*/ meltfptr[533])
- /*_.VALDATA___V534*/
- meltfptr[533] = (void *) &cdat->dsym_444__MULTIPLE_TO_LIST;
+ /*uniqueobj*/ if (! /*_.VALDATA___V535*/ meltfptr[534])
+ /*_.VALDATA___V535*/
+ meltfptr[534] = (void *) &cdat->dsym_444__MULTIPLE_TO_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_444__MULTIPLE_TO_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11495,7 +11658,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_445__MULTIPLE_TO_LIST*/
- /*_.VALSTR___V535*/ meltfptr[534] =
+ /*_.VALSTR___V536*/ meltfptr[535] =
(void *) &cdat->dstr_445__MULTIPLE_TO_LIST;
cdat->dstr_445__MULTIPLE_TO_LIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11504,49 +11667,49 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_445__MULTIPLE_TO_LIST.
val) - 1);
/*inirout drout_446__LAMBDA_ */
- /*_.VALROUT___V522*/ meltfptr[521] = (void *) &cdat->drout_446__LAMBDA_;
+ /*_.VALROUT___V523*/ meltfptr[522] = (void *) &cdat->drout_446__LAMBDA_;
cdat->drout_446__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_446__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1817", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1818", MELT_ROUTDESCR_LEN - 1);
cdat->drout_446__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_446__LAMBDA_,
meltrout_40_warmelt_normatch_LAMBDA___16__);
/*inirout drout_447__NORMPAT_CONSTPAT */
- /*_.VALROUT___V536*/ meltfptr[535] =
+ /*_.VALROUT___V537*/ meltfptr[536] =
(void *) &cdat->drout_447__NORMPAT_CONSTPAT;
cdat->drout_447__NORMPAT_CONSTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_447__NORMPAT_CONSTPAT.routdescr,
- "NORMPAT_CONSTPAT @warmelt-normatch.melt:1843",
+ "NORMPAT_CONSTPAT @warmelt-normatch.melt:1844",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_447__NORMPAT_CONSTPAT.nbval = 11;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_447__NORMPAT_CONSTPAT,
meltrout_41_warmelt_normatch_NORMPAT_CONSTPAT);
/*iniclos dclo_448__NORMPAT_CONSTPAT */
- /*_.VALCLO___V538*/ meltfptr[537] =
+ /*_.VALCLO___V539*/ meltfptr[538] =
(void *) &cdat->dclo_448__NORMPAT_CONSTPAT;
cdat->dclo_448__NORMPAT_CONSTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
cdat->dclo_448__NORMPAT_CONSTPAT.nbval = 0;
/*inirout drout_449__LAMBDA_ */
- /*_.VALROUT___V537*/ meltfptr[536] = (void *) &cdat->drout_449__LAMBDA_;
+ /*_.VALROUT___V538*/ meltfptr[537] = (void *) &cdat->drout_449__LAMBDA_;
cdat->drout_449__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_449__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:1877", MELT_ROUTDESCR_LEN - 1);
+ "LAMBDA_ @warmelt-normatch.melt:1878", MELT_ROUTDESCR_LEN - 1);
cdat->drout_449__LAMBDA_.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_449__LAMBDA_,
meltrout_42_warmelt_normatch_LAMBDA___17__);
/*iniobj dsym_450__MATCH_GRAPHIC_DOT_PREFIX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V539*/ meltfptr[538])
- /*_.VALDATA___V539*/
- meltfptr[538] = (void *) &cdat->dsym_450__MATCH_GRAPHIC_DOT_PREFIX;
+ /*uniqueobj*/ if (! /*_.VALDATA___V540*/ meltfptr[539])
+ /*_.VALDATA___V540*/
+ meltfptr[539] = (void *) &cdat->dsym_450__MATCH_GRAPHIC_DOT_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
("iniobj check.discr isobj dsym_450__MATCH_GRAPHIC_DOT_PREFIX",
@@ -11564,7 +11727,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_451__MATCH_GRAPHIC_DO*/
- /*_.VALSTR___V540*/ meltfptr[539] =
+ /*_.VALSTR___V541*/ meltfptr[540] =
(void *) &cdat->dstr_451__MATCH_GRAPHIC_DO;
cdat->dstr_451__MATCH_GRAPHIC_DO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11572,10 +11735,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"MATCH_GRAPHIC_DOT_PREFIX",
sizeof (cdat->dstr_451__MATCH_GRAPHIC_DO.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:1919:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:1920:/ iniobj");
/*iniobj dobj_452__MATCH_GRAPHIC_DOT_PREFIX*/
-/*_.VALDATA___V541*/ meltfptr[540] =
+/*_.VALDATA___V542*/ meltfptr[541] =
(void *) &cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
@@ -11589,23 +11752,23 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.obj_hash = 370498486;
+ cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.obj_hash = 760352939;
cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.obj_len = 1;
/*inirout drout_453__MATCH_GRAPHIC_OPTSET */
- /*_.VALROUT___V542*/ meltfptr[541] =
+ /*_.VALROUT___V543*/ meltfptr[542] =
(void *) &cdat->drout_453__MATCH_GRAPHIC_OPTSET;
cdat->drout_453__MATCH_GRAPHIC_OPTSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_453__MATCH_GRAPHIC_OPTSET.routdescr,
- "MATCH_GRAPHIC_OPTSET @warmelt-normatch.melt:1922",
+ "MATCH_GRAPHIC_OPTSET @warmelt-normatch.melt:1923",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_453__MATCH_GRAPHIC_OPTSET.nbval = 4;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_453__MATCH_GRAPHIC_OPTSET,
meltrout_43_warmelt_normatch_MATCH_GRAPHIC_OPTSET);
/*iniclos dclo_454__MATCH_GRAPHIC_OPTSET */
- /*_.VALCLO___V543*/ meltfptr[542] =
+ /*_.VALCLO___V544*/ meltfptr[543] =
(void *) &cdat->dclo_454__MATCH_GRAPHIC_OPTSET;
cdat->dclo_454__MATCH_GRAPHIC_OPTSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -11613,9 +11776,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_455__DISCR_STRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V544*/ meltfptr[543])
- /*_.VALDATA___V544*/
- meltfptr[543] = (void *) &cdat->dsym_455__DISCR_STRING;
+ /*uniqueobj*/ if (! /*_.VALDATA___V545*/ meltfptr[544])
+ /*_.VALDATA___V545*/
+ meltfptr[544] = (void *) &cdat->dsym_455__DISCR_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_455__DISCR_STRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11632,7 +11795,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_456__DISCR_STRING*/
- /*_.VALSTR___V545*/ meltfptr[544] = (void *) &cdat->dstr_456__DISCR_STRING;
+ /*_.VALSTR___V546*/ meltfptr[545] = (void *) &cdat->dstr_456__DISCR_STRING;
cdat->dstr_456__DISCR_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_456__DISCR_STRING.val,
@@ -11641,9 +11804,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_457__REGISTER_OPTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V546*/ meltfptr[545])
- /*_.VALDATA___V546*/
- meltfptr[545] = (void *) &cdat->dsym_457__REGISTER_OPTION;
+ /*uniqueobj*/ if (! /*_.VALDATA___V547*/ meltfptr[546])
+ /*_.VALDATA___V547*/
+ meltfptr[546] = (void *) &cdat->dsym_457__REGISTER_OPTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_457__REGISTER_OPTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11660,7 +11823,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_458__REGISTER_OPTION*/
- /*_.VALSTR___V547*/ meltfptr[546] =
+ /*_.VALSTR___V548*/ meltfptr[547] =
(void *) &cdat->dstr_458__REGISTER_OPTION;
cdat->dstr_458__REGISTER_OPTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11670,9 +11833,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_459__MATCH_GRAPHIC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V548*/ meltfptr[547])
- /*_.VALDATA___V548*/
- meltfptr[547] = (void *) &cdat->dsym_459__MATCH_GRAPHIC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V549*/ meltfptr[548])
+ /*_.VALDATA___V549*/
+ meltfptr[548] = (void *) &cdat->dsym_459__MATCH_GRAPHIC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_459__MATCH_GRAPHIC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11689,7 +11852,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_460__MATCH_GRAPHIC*/
- /*_.VALSTR___V549*/ meltfptr[548] = (void *) &cdat->dstr_460__MATCH_GRAPHIC;
+ /*_.VALSTR___V550*/ meltfptr[549] = (void *) &cdat->dstr_460__MATCH_GRAPHIC;
cdat->dstr_460__MATCH_GRAPHIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_460__MATCH_GRAPHIC.val,
@@ -11698,7 +11861,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*inistring dstr_461__Prefix_for_Graph*/
- /*_.VALSTR___V550*/ meltfptr[549] =
+ /*_.VALSTR___V551*/ meltfptr[550] =
(void *) &cdat->dstr_461__Prefix_for_Graph;
cdat->dstr_461__Prefix_for_Graph.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11708,9 +11871,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_462__CLASS_MATCH_GRAPHIC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V551*/ meltfptr[550])
- /*_.VALDATA___V551*/
- meltfptr[550] = (void *) &cdat->dsym_462__CLASS_MATCH_GRAPHIC;
+ /*uniqueobj*/ if (! /*_.VALDATA___V552*/ meltfptr[551])
+ /*_.VALDATA___V552*/
+ meltfptr[551] = (void *) &cdat->dsym_462__CLASS_MATCH_GRAPHIC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_462__CLASS_MATCH_GRAPHIC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11727,7 +11890,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_463__CLASS_MATCH_GRAP*/
- /*_.VALSTR___V552*/ meltfptr[551] =
+ /*_.VALSTR___V553*/ meltfptr[552] =
(void *) &cdat->dstr_463__CLASS_MATCH_GRAP;
cdat->dstr_463__CLASS_MATCH_GRAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11737,9 +11900,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_464__CLASS_PROPED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V553*/ meltfptr[552])
- /*_.VALDATA___V553*/
- meltfptr[552] = (void *) &cdat->dsym_464__CLASS_PROPED;
+ /*uniqueobj*/ if (! /*_.VALDATA___V554*/ meltfptr[553])
+ /*_.VALDATA___V554*/
+ meltfptr[553] = (void *) &cdat->dsym_464__CLASS_PROPED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_464__CLASS_PROPED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11756,17 +11919,17 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_465__CLASS_PROPED*/
- /*_.VALSTR___V554*/ meltfptr[553] = (void *) &cdat->dstr_465__CLASS_PROPED;
+ /*_.VALSTR___V555*/ meltfptr[554] = (void *) &cdat->dstr_465__CLASS_PROPED;
cdat->dstr_465__CLASS_PROPED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_465__CLASS_PROPED.val,
"CLASS_PROPED",
sizeof (cdat->dstr_465__CLASS_PROPED.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ iniobj");
/*iniobj dobj_466__CLASS_MATCH_GRAPHIC*/
-/*_.VALDATA___V555*/ meltfptr[554] =
+/*_.VALDATA___V556*/ meltfptr[555] =
(void *) &cdat->dobj_466__CLASS_MATCH_GRAPHIC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_466__CLASS_MATCH_GRAPHIC",
@@ -11780,12 +11943,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_466__CLASS_MATCH_GRAPHIC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_hash = 223534532;
+ cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_hash = 204697462;
cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_len = 8;
/*inistring dstr_467__CLASS_MATCH_GRAP*/
- /*_.VALSTR___V556*/ meltfptr[555] =
+ /*_.VALSTR___V557*/ meltfptr[556] =
(void *) &cdat->dstr_467__CLASS_MATCH_GRAP;
cdat->dstr_467__CLASS_MATCH_GRAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11794,22 +11957,22 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_467__CLASS_MATCH_GRAP.
val) - 1);
/*inimult dtup_468__CLASS_MATCH_GRAPHIC */
- /*_.VALTUP___V557*/ meltfptr[556] =
+ /*_.VALTUP___V558*/ meltfptr[557] =
(void *) &cdat->dtup_468__CLASS_MATCH_GRAPHIC;
cdat->dtup_468__CLASS_MATCH_GRAPHIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
cdat->dtup_468__CLASS_MATCH_GRAPHIC.nbval = 2;
/*inimult dtup_469__CLASS_MATCH_GRAPHIC */
- /*_.VALTUP___V568*/ meltfptr[567] =
+ /*_.VALTUP___V569*/ meltfptr[568] =
(void *) &cdat->dtup_469__CLASS_MATCH_GRAPHIC;
cdat->dtup_469__CLASS_MATCH_GRAPHIC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
cdat->dtup_469__CLASS_MATCH_GRAPHIC.nbval = 6;
/*iniobj dsym_470__MCHGX_FILENAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V569*/ meltfptr[568])
- /*_.VALDATA___V569*/
- meltfptr[568] = (void *) &cdat->dsym_470__MCHGX_FILENAME;
+ /*uniqueobj*/ if (! /*_.VALDATA___V570*/ meltfptr[569])
+ /*_.VALDATA___V570*/
+ meltfptr[569] = (void *) &cdat->dsym_470__MCHGX_FILENAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_470__MCHGX_FILENAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11826,7 +11989,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_471__MCHGX_FILENAME*/
- /*_.VALSTR___V570*/ meltfptr[569] =
+ /*_.VALSTR___V571*/ meltfptr[570] =
(void *) &cdat->dstr_471__MCHGX_FILENAME;
cdat->dstr_471__MCHGX_FILENAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11837,7 +12000,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_472__MCHGX_FILENAME*/
-/*_.VALDATA___V558*/ meltfptr[557] =
+/*_.VALDATA___V559*/ meltfptr[558] =
(void *) &cdat->dobj_472__MCHGX_FILENAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_472__MCHGX_FILENAME",
@@ -11851,12 +12014,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_472__MCHGX_FILENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_472__MCHGX_FILENAME.obj_num = 1;
- cdat->dobj_472__MCHGX_FILENAME.obj_hash = 1033723377;
+ cdat->dobj_472__MCHGX_FILENAME.obj_hash = 98952872;
cdat->dobj_472__MCHGX_FILENAME.obj_len = 4;
/*inistring dstr_473__MCHGX_FILENAME*/
- /*_.VALSTR___V559*/ meltfptr[558] =
+ /*_.VALSTR___V560*/ meltfptr[559] =
(void *) &cdat->dstr_473__MCHGX_FILENAME;
cdat->dstr_473__MCHGX_FILENAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -11866,9 +12029,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_474__MCHGX_NODOUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V571*/ meltfptr[570])
- /*_.VALDATA___V571*/
- meltfptr[570] = (void *) &cdat->dsym_474__MCHGX_NODOUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V572*/ meltfptr[571])
+ /*_.VALDATA___V572*/
+ meltfptr[571] = (void *) &cdat->dsym_474__MCHGX_NODOUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_474__MCHGX_NODOUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11885,7 +12048,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_475__MCHGX_NODOUT*/
- /*_.VALSTR___V572*/ meltfptr[571] = (void *) &cdat->dstr_475__MCHGX_NODOUT;
+ /*_.VALSTR___V573*/ meltfptr[572] = (void *) &cdat->dstr_475__MCHGX_NODOUT;
cdat->dstr_475__MCHGX_NODOUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_475__MCHGX_NODOUT.val,
@@ -11895,7 +12058,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_476__MCHGX_NODOUT*/
-/*_.VALDATA___V560*/ meltfptr[559] = (void *) &cdat->dobj_476__MCHGX_NODOUT;
+/*_.VALDATA___V561*/ meltfptr[560] = (void *) &cdat->dobj_476__MCHGX_NODOUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_476__MCHGX_NODOUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11908,12 +12071,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_476__MCHGX_NODOUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_476__MCHGX_NODOUT.obj_num = 2;
- cdat->dobj_476__MCHGX_NODOUT.obj_hash = 149754961;
+ cdat->dobj_476__MCHGX_NODOUT.obj_hash = 654192505;
cdat->dobj_476__MCHGX_NODOUT.obj_len = 4;
/*inistring dstr_477__MCHGX_NODOUT*/
- /*_.VALSTR___V561*/ meltfptr[560] = (void *) &cdat->dstr_477__MCHGX_NODOUT;
+ /*_.VALSTR___V562*/ meltfptr[561] = (void *) &cdat->dstr_477__MCHGX_NODOUT;
cdat->dstr_477__MCHGX_NODOUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_477__MCHGX_NODOUT.val,
@@ -11922,9 +12085,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_478__MCHGX_EDGOUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V573*/ meltfptr[572])
- /*_.VALDATA___V573*/
- meltfptr[572] = (void *) &cdat->dsym_478__MCHGX_EDGOUT;
+ /*uniqueobj*/ if (! /*_.VALDATA___V574*/ meltfptr[573])
+ /*_.VALDATA___V574*/
+ meltfptr[573] = (void *) &cdat->dsym_478__MCHGX_EDGOUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_478__MCHGX_EDGOUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11941,7 +12104,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_479__MCHGX_EDGOUT*/
- /*_.VALSTR___V574*/ meltfptr[573] = (void *) &cdat->dstr_479__MCHGX_EDGOUT;
+ /*_.VALSTR___V575*/ meltfptr[574] = (void *) &cdat->dstr_479__MCHGX_EDGOUT;
cdat->dstr_479__MCHGX_EDGOUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_479__MCHGX_EDGOUT.val,
@@ -11951,7 +12114,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_480__MCHGX_EDGOUT*/
-/*_.VALDATA___V562*/ meltfptr[561] = (void *) &cdat->dobj_480__MCHGX_EDGOUT;
+/*_.VALDATA___V563*/ meltfptr[562] = (void *) &cdat->dobj_480__MCHGX_EDGOUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_480__MCHGX_EDGOUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
@@ -11964,12 +12127,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_480__MCHGX_EDGOUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_480__MCHGX_EDGOUT.obj_num = 3;
- cdat->dobj_480__MCHGX_EDGOUT.obj_hash = 555754251;
+ cdat->dobj_480__MCHGX_EDGOUT.obj_hash = 779949562;
cdat->dobj_480__MCHGX_EDGOUT.obj_len = 4;
/*inistring dstr_481__MCHGX_EDGOUT*/
- /*_.VALSTR___V563*/ meltfptr[562] = (void *) &cdat->dstr_481__MCHGX_EDGOUT;
+ /*_.VALSTR___V564*/ meltfptr[563] = (void *) &cdat->dstr_481__MCHGX_EDGOUT;
cdat->dstr_481__MCHGX_EDGOUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
/*small inistring */ strncpy (cdat->dstr_481__MCHGX_EDGOUT.val,
@@ -11978,9 +12141,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
1);
/*iniobj dsym_482__MCHGX_DATANAMEMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V575*/ meltfptr[574])
- /*_.VALDATA___V575*/
- meltfptr[574] = (void *) &cdat->dsym_482__MCHGX_DATANAMEMAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V576*/ meltfptr[575])
+ /*_.VALDATA___V576*/
+ meltfptr[575] = (void *) &cdat->dsym_482__MCHGX_DATANAMEMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_482__MCHGX_DATANAMEMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -11997,7 +12160,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_483__MCHGX_DATANAMEMA*/
- /*_.VALSTR___V576*/ meltfptr[575] =
+ /*_.VALSTR___V577*/ meltfptr[576] =
(void *) &cdat->dstr_483__MCHGX_DATANAMEMA;
cdat->dstr_483__MCHGX_DATANAMEMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12008,7 +12171,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_484__MCHGX_DATANAMEMAP*/
-/*_.VALDATA___V564*/ meltfptr[563] =
+/*_.VALDATA___V565*/ meltfptr[564] =
(void *) &cdat->dobj_484__MCHGX_DATANAMEMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_484__MCHGX_DATANAMEMAP",
@@ -12022,12 +12185,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_484__MCHGX_DATANAMEMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_484__MCHGX_DATANAMEMAP.obj_num = 4;
- cdat->dobj_484__MCHGX_DATANAMEMAP.obj_hash = 381331709;
+ cdat->dobj_484__MCHGX_DATANAMEMAP.obj_hash = 79718908;
cdat->dobj_484__MCHGX_DATANAMEMAP.obj_len = 4;
/*inistring dstr_485__MCHGX_DATANAMEMA*/
- /*_.VALSTR___V565*/ meltfptr[564] =
+ /*_.VALSTR___V566*/ meltfptr[565] =
(void *) &cdat->dstr_485__MCHGX_DATANAMEMA;
cdat->dstr_485__MCHGX_DATANAMEMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12037,9 +12200,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
val) - 1);
/*iniobj dsym_486__MCHGX_STEPNAMEMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V577*/ meltfptr[576])
- /*_.VALDATA___V577*/
- meltfptr[576] = (void *) &cdat->dsym_486__MCHGX_STEPNAMEMAP;
+ /*uniqueobj*/ if (! /*_.VALDATA___V578*/ meltfptr[577])
+ /*_.VALDATA___V578*/
+ meltfptr[577] = (void *) &cdat->dsym_486__MCHGX_STEPNAMEMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_486__MCHGX_STEPNAMEMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12056,7 +12219,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_487__MCHGX_STEPNAMEMA*/
- /*_.VALSTR___V578*/ meltfptr[577] =
+ /*_.VALSTR___V579*/ meltfptr[578] =
(void *) &cdat->dstr_487__MCHGX_STEPNAMEMA;
cdat->dstr_487__MCHGX_STEPNAMEMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12067,7 +12230,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*^iniobj */
/*iniobj dobj_488__MCHGX_STEPNAMEMAP*/
-/*_.VALDATA___V566*/ meltfptr[565] =
+/*_.VALDATA___V567*/ meltfptr[566] =
(void *) &cdat->dobj_488__MCHGX_STEPNAMEMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_488__MCHGX_STEPNAMEMAP",
@@ -12081,12 +12244,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
cdat->dobj_488__MCHGX_STEPNAMEMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_num = 5;
- cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_hash = 565335152;
+ cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_hash = 154849167;
cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_len = 4;
/*inistring dstr_489__MCHGX_STEPNAMEMA*/
- /*_.VALSTR___V567*/ meltfptr[566] =
+ /*_.VALSTR___V568*/ meltfptr[567] =
(void *) &cdat->dstr_489__MCHGX_STEPNAMEMA;
cdat->dstr_489__MCHGX_STEPNAMEMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12095,19 +12258,19 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
sizeof (cdat->dstr_489__MCHGX_STEPNAMEMA.
val) - 1);
/*inirout drout_490__MG_OUT_NODE_NAME */
- /*_.VALROUT___V579*/ meltfptr[578] =
+ /*_.VALROUT___V580*/ meltfptr[579] =
(void *) &cdat->drout_490__MG_OUT_NODE_NAME;
cdat->drout_490__MG_OUT_NODE_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
strncpy (cdat->drout_490__MG_OUT_NODE_NAME.routdescr,
- "MG_OUT_NODE_NAME @warmelt-normatch.melt:1951",
+ "MG_OUT_NODE_NAME @warmelt-normatch.melt:1952",
MELT_ROUTDESCR_LEN - 1);
cdat->drout_490__MG_OUT_NODE_NAME.nbval = 2;
MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_490__MG_OUT_NODE_NAME,
meltrout_44_warmelt_normatch_MG_OUT_NODE_NAME);
/*iniclos dclo_491__MG_OUT_NODE_NAME */
- /*_.VALCLO___V580*/ meltfptr[579] =
+ /*_.VALCLO___V581*/ meltfptr[580] =
(void *) &cdat->dclo_491__MG_OUT_NODE_NAME;
cdat->dclo_491__MG_OUT_NODE_NAME.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
@@ -12115,9 +12278,9 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*iniobj dsym_492__MATCHGRAPHIC_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V581*/ meltfptr[580])
- /*_.VALDATA___V581*/
- meltfptr[580] = (void *) &cdat->dsym_492__MATCHGRAPHIC_LABEL;
+ /*uniqueobj*/ if (! /*_.VALDATA___V582*/ meltfptr[581])
+ /*_.VALDATA___V582*/
+ meltfptr[581] = (void *) &cdat->dsym_492__MATCHGRAPHIC_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dsym_492__MATCHGRAPHIC_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
@@ -12134,7 +12297,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
/*inistring dstr_493__MATCHGRAPHIC_LAB*/
- /*_.VALSTR___V582*/ meltfptr[581] =
+ /*_.VALSTR___V583*/ meltfptr[582] =
(void *) &cdat->dstr_493__MATCHGRAPHIC_LAB;
cdat->dstr_493__MATCHGRAPHIC_LAB.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12142,10 +12305,10 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"MATCHGRAPHIC_LABEL",
sizeof (cdat->dstr_493__MATCHGRAPHIC_LAB.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:1974:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:1976:/ iniobj");
/*iniobj dobj_494__MATCHGRAPHIC_LABEL*/
-/*_.VALDATA___V583*/ meltfptr[582] =
+/*_.VALDATA___V584*/ meltfptr[583] =
(void *) &cdat->dobj_494__MATCHGRAPHIC_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg ("iniobj check.discr isobj dobj_494__MATCHGRAPHIC_LABEL",
@@ -12158,12 +12321,12 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_494__MATCHGRAPHIC_LABEL.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_494__MATCHGRAPHIC_LABEL.obj_hash = 532821861;
+ cdat->dobj_494__MATCHGRAPHIC_LABEL.obj_hash = 841046413;
cdat->dobj_494__MATCHGRAPHIC_LABEL.obj_len = 4;
/*inistring dstr_495__MATCHGRAPHIC_LAB*/
- /*_.VALSTR___V584*/ meltfptr[583] =
+ /*_.VALSTR___V585*/ meltfptr[584] =
(void *) &cdat->dstr_495__MATCHGRAPHIC_LAB;
cdat->dstr_495__MATCHGRAPHIC_LAB.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
@@ -12171,10921 +12334,11099 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__,
"MATCHGRAPHIC_LABEL",
sizeof (cdat->dstr_495__MATCHGRAPHIC_LAB.
val) - 1);
- /*inirout drout_496__MGLABEL_ANY_TEST */
- /*_.VALROUT___V585*/ meltfptr[584] =
- (void *) &cdat->drout_496__MGLABEL_ANY_TEST;
- cdat->drout_496__MGLABEL_ANY_TEST.discr =
+ /*inirout drout_496__MGLABEL_ANY */
+ /*_.VALROUT___V586*/ meltfptr[585] = (void *) &cdat->drout_496__MGLABEL_ANY;
+ cdat->drout_496__MGLABEL_ANY.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_496__MGLABEL_ANY.routdescr,
+ "MGLABEL_ANY @warmelt-normatch.melt:1978", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_496__MGLABEL_ANY.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_496__MGLABEL_ANY,
+ meltrout_45_warmelt_normatch_MGLABEL_ANY);
+
+ /*iniclos dclo_497__MGLABEL_ANY */
+ /*_.VALCLO___V587*/ meltfptr[586] = (void *) &cdat->dclo_497__MGLABEL_ANY;
+ cdat->dclo_497__MGLABEL_ANY.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_497__MGLABEL_ANY.nbval = 0;
+
+ /*inirout drout_498__MGLABEL_ANY_TEST */
+ /*_.VALROUT___V588*/ meltfptr[587] =
+ (void *) &cdat->drout_498__MGLABEL_ANY_TEST;
+ cdat->drout_498__MGLABEL_ANY_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_496__MGLABEL_ANY_TEST.routdescr,
- "MGLABEL_ANY_TEST @warmelt-normatch.melt:1977",
+ strncpy (cdat->drout_498__MGLABEL_ANY_TEST.routdescr,
+ "MGLABEL_ANY_TEST @warmelt-normatch.melt:1988",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_496__MGLABEL_ANY_TEST.nbval = 7;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_496__MGLABEL_ANY_TEST,
- meltrout_45_warmelt_normatch_MGLABEL_ANY_TEST);
-
- /*iniclos dclo_497__MGLABEL_ANY_TEST */
- /*_.VALCLO___V586*/ meltfptr[585] =
- (void *) &cdat->dclo_497__MGLABEL_ANY_TEST;
- cdat->dclo_497__MGLABEL_ANY_TEST.discr =
+ cdat->drout_498__MGLABEL_ANY_TEST.nbval = 7;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_498__MGLABEL_ANY_TEST,
+ meltrout_46_warmelt_normatch_MGLABEL_ANY_TEST);
+
+ /*iniclos dclo_499__MGLABEL_ANY_TEST */
+ /*_.VALCLO___V589*/ meltfptr[588] =
+ (void *) &cdat->dclo_499__MGLABEL_ANY_TEST;
+ cdat->dclo_499__MGLABEL_ANY_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_497__MGLABEL_ANY_TEST.nbval = 0;
+ cdat->dclo_499__MGLABEL_ANY_TEST.nbval = 0;
-/*iniobj dsym_498__CLASS_CLONED_SYMBOL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V587*/ meltfptr[586])
- /*_.VALDATA___V587*/
- meltfptr[586] = (void *) &cdat->dsym_498__CLASS_CLONED_SYMBOL;
+/*iniobj dsym_500__CLASS_CLONED_SYMBOL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V590*/ meltfptr[589])
+ /*_.VALDATA___V590*/
+ meltfptr[589] = (void *) &cdat->dsym_500__CLASS_CLONED_SYMBOL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_498__CLASS_CLONED_SYMBOL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_500__CLASS_CLONED_SYMBOL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_498__CLASS_CLONED_SYMBOL",
+ ("iniobj check.discr objmagic dsym_500__CLASS_CLONED_SYMBOL",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_498__CLASS_CLONED_SYMBOL.meltobj_class =
+ cdat->dsym_500__CLASS_CLONED_SYMBOL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_498__CLASS_CLONED_SYMBOL.obj_hash = 933549728;
- cdat->dsym_498__CLASS_CLONED_SYMBOL.obj_len = 3;
+ cdat->dsym_500__CLASS_CLONED_SYMBOL.obj_hash = 933549728;
+ cdat->dsym_500__CLASS_CLONED_SYMBOL.obj_len = 3;
-/*inistring dstr_499__CLASS_CLONED_SYM*/
- /*_.VALSTR___V588*/ meltfptr[587] =
- (void *) &cdat->dstr_499__CLASS_CLONED_SYM;
- cdat->dstr_499__CLASS_CLONED_SYM.discr =
+/*inistring dstr_501__CLASS_CLONED_SYM*/
+ /*_.VALSTR___V591*/ meltfptr[590] =
+ (void *) &cdat->dstr_501__CLASS_CLONED_SYM;
+ cdat->dstr_501__CLASS_CLONED_SYM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_499__CLASS_CLONED_SYM.val,
+ /*small inistring */ strncpy (cdat->dstr_501__CLASS_CLONED_SYM.val,
"CLASS_CLONED_SYMBOL",
- sizeof (cdat->dstr_499__CLASS_CLONED_SYM.
+ sizeof (cdat->dstr_501__CLASS_CLONED_SYM.
val) - 1);
- /*inirout drout_500__MGLABEL_INSTANCE_TEST */
- /*_.VALROUT___V589*/ meltfptr[588] =
- (void *) &cdat->drout_500__MGLABEL_INSTANCE_TEST;
- cdat->drout_500__MGLABEL_INSTANCE_TEST.discr =
+ /*inirout drout_502__MGLABEL_INSTANCE_TEST */
+ /*_.VALROUT___V592*/ meltfptr[591] =
+ (void *) &cdat->drout_502__MGLABEL_INSTANCE_TEST;
+ cdat->drout_502__MGLABEL_INSTANCE_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_500__MGLABEL_INSTANCE_TEST.routdescr,
- "MGLABEL_INSTANCE_TEST @warmelt-normatch.melt:2037",
+ strncpy (cdat->drout_502__MGLABEL_INSTANCE_TEST.routdescr,
+ "MGLABEL_INSTANCE_TEST @warmelt-normatch.melt:2048",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_500__MGLABEL_INSTANCE_TEST.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_500__MGLABEL_INSTANCE_TEST,
- meltrout_46_warmelt_normatch_MGLABEL_INSTANCE_TEST);
-
- /*iniclos dclo_501__MGLABEL_INSTANCE_TEST */
- /*_.VALCLO___V590*/ meltfptr[589] =
- (void *) &cdat->dclo_501__MGLABEL_INSTANCE_TEST;
- cdat->dclo_501__MGLABEL_INSTANCE_TEST.discr =
+ cdat->drout_502__MGLABEL_INSTANCE_TEST.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_502__MGLABEL_INSTANCE_TEST,
+ meltrout_47_warmelt_normatch_MGLABEL_INSTANCE_TEST);
+
+ /*iniclos dclo_503__MGLABEL_INSTANCE_TEST */
+ /*_.VALCLO___V593*/ meltfptr[592] =
+ (void *) &cdat->dclo_503__MGLABEL_INSTANCE_TEST;
+ cdat->dclo_503__MGLABEL_INSTANCE_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_501__MGLABEL_INSTANCE_TEST.nbval = 0;
+ cdat->dclo_503__MGLABEL_INSTANCE_TEST.nbval = 0;
- /*inirout drout_502__MGLABEL_SUCCESS_TEST */
- /*_.VALROUT___V591*/ meltfptr[590] =
- (void *) &cdat->drout_502__MGLABEL_SUCCESS_TEST;
- cdat->drout_502__MGLABEL_SUCCESS_TEST.discr =
+ /*inirout drout_504__MGLABEL_SUCCESS_TEST */
+ /*_.VALROUT___V594*/ meltfptr[593] =
+ (void *) &cdat->drout_504__MGLABEL_SUCCESS_TEST;
+ cdat->drout_504__MGLABEL_SUCCESS_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_502__MGLABEL_SUCCESS_TEST.routdescr,
- "MGLABEL_SUCCESS_TEST @warmelt-normatch.melt:2102",
+ strncpy (cdat->drout_504__MGLABEL_SUCCESS_TEST.routdescr,
+ "MGLABEL_SUCCESS_TEST @warmelt-normatch.melt:2113",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_502__MGLABEL_SUCCESS_TEST.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_502__MGLABEL_SUCCESS_TEST,
- meltrout_47_warmelt_normatch_MGLABEL_SUCCESS_TEST);
-
- /*iniclos dclo_503__MGLABEL_SUCCESS_TEST */
- /*_.VALCLO___V592*/ meltfptr[591] =
- (void *) &cdat->dclo_503__MGLABEL_SUCCESS_TEST;
- cdat->dclo_503__MGLABEL_SUCCESS_TEST.discr =
+ cdat->drout_504__MGLABEL_SUCCESS_TEST.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_504__MGLABEL_SUCCESS_TEST,
+ meltrout_48_warmelt_normatch_MGLABEL_SUCCESS_TEST);
+
+ /*iniclos dclo_505__MGLABEL_SUCCESS_TEST */
+ /*_.VALCLO___V595*/ meltfptr[594] =
+ (void *) &cdat->dclo_505__MGLABEL_SUCCESS_TEST;
+ cdat->dclo_505__MGLABEL_SUCCESS_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_503__MGLABEL_SUCCESS_TEST.nbval = 0;
+ cdat->dclo_505__MGLABEL_SUCCESS_TEST.nbval = 0;
- /*inirout drout_504__MATCHGRAPHIC_TESTS */
- /*_.VALROUT___V593*/ meltfptr[592] =
- (void *) &cdat->drout_504__MATCHGRAPHIC_TESTS;
- cdat->drout_504__MATCHGRAPHIC_TESTS.discr =
+ /*inirout drout_506__MATCHGRAPHIC_TESTS */
+ /*_.VALROUT___V596*/ meltfptr[595] =
+ (void *) &cdat->drout_506__MATCHGRAPHIC_TESTS;
+ cdat->drout_506__MATCHGRAPHIC_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_504__MATCHGRAPHIC_TESTS.routdescr,
- "MATCHGRAPHIC_TESTS @warmelt-normatch.melt:2142",
+ strncpy (cdat->drout_506__MATCHGRAPHIC_TESTS.routdescr,
+ "MATCHGRAPHIC_TESTS @warmelt-normatch.melt:2153",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_504__MATCHGRAPHIC_TESTS.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_504__MATCHGRAPHIC_TESTS,
- meltrout_48_warmelt_normatch_MATCHGRAPHIC_TESTS);
-
- /*iniclos dclo_505__MATCHGRAPHIC_TESTS */
- /*_.VALCLO___V594*/ meltfptr[593] =
- (void *) &cdat->dclo_505__MATCHGRAPHIC_TESTS;
- cdat->dclo_505__MATCHGRAPHIC_TESTS.discr =
+ cdat->drout_506__MATCHGRAPHIC_TESTS.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_506__MATCHGRAPHIC_TESTS,
+ meltrout_49_warmelt_normatch_MATCHGRAPHIC_TESTS);
+
+ /*iniclos dclo_507__MATCHGRAPHIC_TESTS */
+ /*_.VALCLO___V597*/ meltfptr[596] =
+ (void *) &cdat->dclo_507__MATCHGRAPHIC_TESTS;
+ cdat->dclo_507__MATCHGRAPHIC_TESTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_505__MATCHGRAPHIC_TESTS.nbval = 0;
+ cdat->dclo_507__MATCHGRAPHIC_TESTS.nbval = 0;
- /*inirout drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE */
- /*_.VALROUT___V595*/ meltfptr[594] =
- (void *) &cdat->drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE;
- cdat->drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr =
+ /*inirout drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE */
+ /*_.VALROUT___V598*/ meltfptr[597] =
+ (void *) &cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE;
+ cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE.routdescr,
- "MG_DRAW_MATCH_GRAPHVIZ_FILE @warmelt-normatch.melt:2195",
+ strncpy (cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE.routdescr,
+ "MG_DRAW_MATCH_GRAPHVIZ_FILE @warmelt-normatch.melt:2206",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE,
- meltrout_49_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE);
-
- /*iniclos dclo_507__MG_DRAW_MATCH_GRAPHVIZ_FILE */
- /*_.VALCLO___V596*/ meltfptr[595] =
- (void *) &cdat->dclo_507__MG_DRAW_MATCH_GRAPHVIZ_FILE;
- cdat->dclo_507__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr =
+ cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE,
+ meltrout_50_warmelt_normatch_MG_DRAW_MATCH_GRAPHVIZ_FILE);
+
+ /*iniclos dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE */
+ /*_.VALCLO___V599*/ meltfptr[598] =
+ (void *) &cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE;
+ cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_507__MG_DRAW_MATCH_GRAPHVIZ_FILE.nbval = 0;
+ cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE.nbval = 0;
-/*iniobj dsym_508__DISCR_STRBUF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V597*/ meltfptr[596])
- /*_.VALDATA___V597*/
- meltfptr[596] = (void *) &cdat->dsym_508__DISCR_STRBUF;
+/*iniobj dsym_510__DISCR_STRBUF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V600*/ meltfptr[599])
+ /*_.VALDATA___V600*/
+ meltfptr[599] = (void *) &cdat->dsym_510__DISCR_STRBUF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_508__DISCR_STRBUF",
+ melt_assertmsg ("iniobj check.discr isobj dsym_510__DISCR_STRBUF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_508__DISCR_STRBUF",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_510__DISCR_STRBUF",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_508__DISCR_STRBUF.meltobj_class =
+ cdat->dsym_510__DISCR_STRBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_508__DISCR_STRBUF.obj_hash = 492035674;
- cdat->dsym_508__DISCR_STRBUF.obj_len = 3;
+ cdat->dsym_510__DISCR_STRBUF.obj_hash = 492035674;
+ cdat->dsym_510__DISCR_STRBUF.obj_len = 3;
-/*inistring dstr_509__DISCR_STRBUF*/
- /*_.VALSTR___V598*/ meltfptr[597] = (void *) &cdat->dstr_509__DISCR_STRBUF;
- cdat->dstr_509__DISCR_STRBUF.discr =
+/*inistring dstr_511__DISCR_STRBUF*/
+ /*_.VALSTR___V601*/ meltfptr[600] = (void *) &cdat->dstr_511__DISCR_STRBUF;
+ cdat->dstr_511__DISCR_STRBUF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_509__DISCR_STRBUF.val,
+ /*small inistring */ strncpy (cdat->dstr_511__DISCR_STRBUF.val,
"DISCR_STRBUF",
- sizeof (cdat->dstr_509__DISCR_STRBUF.val) -
+ sizeof (cdat->dstr_511__DISCR_STRBUF.val) -
1);
- /*inirout drout_510__NORMEXP_MATCH */
- /*_.VALROUT___V599*/ meltfptr[598] =
- (void *) &cdat->drout_510__NORMEXP_MATCH;
- cdat->drout_510__NORMEXP_MATCH.discr =
+ /*inirout drout_512__NORMEXP_MATCH */
+ /*_.VALROUT___V602*/ meltfptr[601] =
+ (void *) &cdat->drout_512__NORMEXP_MATCH;
+ cdat->drout_512__NORMEXP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_510__NORMEXP_MATCH.routdescr,
- "NORMEXP_MATCH @warmelt-normatch.melt:2263",
+ strncpy (cdat->drout_512__NORMEXP_MATCH.routdescr,
+ "NORMEXP_MATCH @warmelt-normatch.melt:2274",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_510__NORMEXP_MATCH.nbval = 39;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_510__NORMEXP_MATCH,
- meltrout_50_warmelt_normatch_NORMEXP_MATCH);
+ cdat->drout_512__NORMEXP_MATCH.nbval = 39;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_512__NORMEXP_MATCH,
+ meltrout_51_warmelt_normatch_NORMEXP_MATCH);
- /*iniclos dclo_511__NORMEXP_MATCH */
- /*_.VALCLO___V605*/ meltfptr[604] = (void *) &cdat->dclo_511__NORMEXP_MATCH;
- cdat->dclo_511__NORMEXP_MATCH.discr =
+ /*iniclos dclo_513__NORMEXP_MATCH */
+ /*_.VALCLO___V608*/ meltfptr[607] = (void *) &cdat->dclo_513__NORMEXP_MATCH;
+ cdat->dclo_513__NORMEXP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_511__NORMEXP_MATCH.nbval = 0;
+ cdat->dclo_513__NORMEXP_MATCH.nbval = 0;
-/*iniobj dsym_512__CLASS_SOURCE_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V606*/ meltfptr[605])
- /*_.VALDATA___V606*/
- meltfptr[605] = (void *) &cdat->dsym_512__CLASS_SOURCE_MATCH;
+/*iniobj dsym_514__CLASS_SOURCE_MATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V609*/ meltfptr[608])
+ /*_.VALDATA___V609*/
+ meltfptr[608] = (void *) &cdat->dsym_514__CLASS_SOURCE_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_512__CLASS_SOURCE_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_514__CLASS_SOURCE_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_512__CLASS_SOURCE_MATCH",
+ ("iniobj check.discr objmagic dsym_514__CLASS_SOURCE_MATCH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_512__CLASS_SOURCE_MATCH.meltobj_class =
+ cdat->dsym_514__CLASS_SOURCE_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_512__CLASS_SOURCE_MATCH.obj_hash = 977016819;
- cdat->dsym_512__CLASS_SOURCE_MATCH.obj_len = 3;
+ cdat->dsym_514__CLASS_SOURCE_MATCH.obj_hash = 977016819;
+ cdat->dsym_514__CLASS_SOURCE_MATCH.obj_len = 3;
-/*inistring dstr_513__CLASS_SOURCE_MAT*/
- /*_.VALSTR___V607*/ meltfptr[606] =
- (void *) &cdat->dstr_513__CLASS_SOURCE_MAT;
- cdat->dstr_513__CLASS_SOURCE_MAT.discr =
+/*inistring dstr_515__CLASS_SOURCE_MAT*/
+ /*_.VALSTR___V610*/ meltfptr[609] =
+ (void *) &cdat->dstr_515__CLASS_SOURCE_MAT;
+ cdat->dstr_515__CLASS_SOURCE_MAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_513__CLASS_SOURCE_MAT.val,
+ /*small inistring */ strncpy (cdat->dstr_515__CLASS_SOURCE_MAT.val,
"CLASS_SOURCE_MATCH",
- sizeof (cdat->dstr_513__CLASS_SOURCE_MAT.
+ sizeof (cdat->dstr_515__CLASS_SOURCE_MAT.
val) - 1);
-/*iniobj dsym_514__CLASS_ENVIRONMENT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V608*/ meltfptr[607])
- /*_.VALDATA___V608*/
- meltfptr[607] = (void *) &cdat->dsym_514__CLASS_ENVIRONMENT;
+/*iniobj dsym_516__CLASS_ENVIRONMENT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V611*/ meltfptr[610])
+ /*_.VALDATA___V611*/
+ meltfptr[610] = (void *) &cdat->dsym_516__CLASS_ENVIRONMENT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_514__CLASS_ENVIRONMENT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_516__CLASS_ENVIRONMENT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_514__CLASS_ENVIRONMENT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_516__CLASS_ENVIRONMENT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_514__CLASS_ENVIRONMENT.meltobj_class =
+ cdat->dsym_516__CLASS_ENVIRONMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_514__CLASS_ENVIRONMENT.obj_hash = 59212821;
- cdat->dsym_514__CLASS_ENVIRONMENT.obj_len = 3;
+ cdat->dsym_516__CLASS_ENVIRONMENT.obj_hash = 59212821;
+ cdat->dsym_516__CLASS_ENVIRONMENT.obj_len = 3;
-/*inistring dstr_515__CLASS_ENVIRONMEN*/
- /*_.VALSTR___V609*/ meltfptr[608] =
- (void *) &cdat->dstr_515__CLASS_ENVIRONMEN;
- cdat->dstr_515__CLASS_ENVIRONMEN.discr =
+/*inistring dstr_517__CLASS_ENVIRONMEN*/
+ /*_.VALSTR___V612*/ meltfptr[611] =
+ (void *) &cdat->dstr_517__CLASS_ENVIRONMEN;
+ cdat->dstr_517__CLASS_ENVIRONMEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_515__CLASS_ENVIRONMEN.val,
+ /*small inistring */ strncpy (cdat->dstr_517__CLASS_ENVIRONMEN.val,
"CLASS_ENVIRONMENT",
- sizeof (cdat->dstr_515__CLASS_ENVIRONMEN.
+ sizeof (cdat->dstr_517__CLASS_ENVIRONMEN.
val) - 1);
-/*iniobj dsym_516__MATCHED_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V600*/ meltfptr[599])
- /*_.VALDATA___V600*/
- meltfptr[599] = (void *) &cdat->dsym_516__MATCHED_;
+/*iniobj dsym_518__MATCHED_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V603*/ meltfptr[602])
+ /*_.VALDATA___V603*/
+ meltfptr[602] = (void *) &cdat->dsym_518__MATCHED_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_516__MATCHED_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_518__MATCHED_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_516__MATCHED_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_518__MATCHED_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_516__MATCHED_.meltobj_class =
+ cdat->dsym_518__MATCHED_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_516__MATCHED_.obj_hash = 240251760;
- cdat->dsym_516__MATCHED_.obj_len = 3;
+ cdat->dsym_518__MATCHED_.obj_hash = 240251760;
+ cdat->dsym_518__MATCHED_.obj_len = 3;
-/*inistring dstr_517__MATCHED_*/
- /*_.VALSTR___V601*/ meltfptr[600] = (void *) &cdat->dstr_517__MATCHED_;
- cdat->dstr_517__MATCHED_.discr =
+/*inistring dstr_519__MATCHED_*/
+ /*_.VALSTR___V604*/ meltfptr[603] = (void *) &cdat->dstr_519__MATCHED_;
+ cdat->dstr_519__MATCHED_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_517__MATCHED_.val, "_MATCHED_",
- sizeof (cdat->dstr_517__MATCHED_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_519__MATCHED_.val, "_MATCHED_",
+ sizeof (cdat->dstr_519__MATCHED_.val) - 1);
-/*iniobj dsym_518__CLASS_SOURCE_MATCH_CASE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V610*/ meltfptr[609])
- /*_.VALDATA___V610*/
- meltfptr[609] = (void *) &cdat->dsym_518__CLASS_SOURCE_MATCH_CASE;
+/*iniobj dsym_520__CLASS_SOURCE_MATCH_CASE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V613*/ meltfptr[612])
+ /*_.VALDATA___V613*/
+ meltfptr[612] = (void *) &cdat->dsym_520__CLASS_SOURCE_MATCH_CASE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_518__CLASS_SOURCE_MATCH_CASE",
+ ("iniobj check.discr isobj dsym_520__CLASS_SOURCE_MATCH_CASE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_518__CLASS_SOURCE_MATCH_CASE",
+ ("iniobj check.discr objmagic dsym_520__CLASS_SOURCE_MATCH_CASE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_518__CLASS_SOURCE_MATCH_CASE.meltobj_class =
+ cdat->dsym_520__CLASS_SOURCE_MATCH_CASE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_518__CLASS_SOURCE_MATCH_CASE.obj_hash = 625198266;
- cdat->dsym_518__CLASS_SOURCE_MATCH_CASE.obj_len = 3;
+ cdat->dsym_520__CLASS_SOURCE_MATCH_CASE.obj_hash = 625198266;
+ cdat->dsym_520__CLASS_SOURCE_MATCH_CASE.obj_len = 3;
-/*inistring dstr_519__CLASS_SOURCE_MAT*/
- /*_.VALSTR___V611*/ meltfptr[610] =
- (void *) &cdat->dstr_519__CLASS_SOURCE_MAT;
- cdat->dstr_519__CLASS_SOURCE_MAT.discr =
+/*inistring dstr_521__CLASS_SOURCE_MAT*/
+ /*_.VALSTR___V614*/ meltfptr[613] =
+ (void *) &cdat->dstr_521__CLASS_SOURCE_MAT;
+ cdat->dstr_521__CLASS_SOURCE_MAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_519__CLASS_SOURCE_MAT.val,
+ /*small inistring */ strncpy (cdat->dstr_521__CLASS_SOURCE_MAT.val,
"CLASS_SOURCE_MATCH_CASE",
- sizeof (cdat->dstr_519__CLASS_SOURCE_MAT.
+ sizeof (cdat->dstr_521__CLASS_SOURCE_MAT.
val) - 1);
- /*inirout drout_520__LAMBDA_ */
- /*_.VALROUT___V602*/ meltfptr[601] = (void *) &cdat->drout_520__LAMBDA_;
- cdat->drout_520__LAMBDA_.discr =
+ /*inirout drout_522__LAMBDA_ */
+ /*_.VALROUT___V605*/ meltfptr[604] = (void *) &cdat->drout_522__LAMBDA_;
+ cdat->drout_522__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_520__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:2360", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_520__LAMBDA_.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_520__LAMBDA_,
- meltrout_51_warmelt_normatch_LAMBDA___18__);
+ strncpy (cdat->drout_522__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:2371", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_522__LAMBDA_.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_522__LAMBDA_,
+ meltrout_52_warmelt_normatch_LAMBDA___18__);
-/*iniobj dsym_521__WRAP_NORMAL_LETSEQ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V612*/ meltfptr[611])
- /*_.VALDATA___V612*/
- meltfptr[611] = (void *) &cdat->dsym_521__WRAP_NORMAL_LETSEQ;
+/*iniobj dsym_523__WRAP_NORMAL_LETSEQ*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V615*/ meltfptr[614])
+ /*_.VALDATA___V615*/
+ meltfptr[614] = (void *) &cdat->dsym_523__WRAP_NORMAL_LETSEQ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_521__WRAP_NORMAL_LETSEQ",
+ melt_assertmsg ("iniobj check.discr isobj dsym_523__WRAP_NORMAL_LETSEQ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_521__WRAP_NORMAL_LETSEQ",
+ ("iniobj check.discr objmagic dsym_523__WRAP_NORMAL_LETSEQ",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_521__WRAP_NORMAL_LETSEQ.meltobj_class =
+ cdat->dsym_523__WRAP_NORMAL_LETSEQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_521__WRAP_NORMAL_LETSEQ.obj_hash = 638564573;
- cdat->dsym_521__WRAP_NORMAL_LETSEQ.obj_len = 3;
+ cdat->dsym_523__WRAP_NORMAL_LETSEQ.obj_hash = 638564573;
+ cdat->dsym_523__WRAP_NORMAL_LETSEQ.obj_len = 3;
-/*inistring dstr_522__WRAP_NORMAL_LETS*/
- /*_.VALSTR___V613*/ meltfptr[612] =
- (void *) &cdat->dstr_522__WRAP_NORMAL_LETS;
- cdat->dstr_522__WRAP_NORMAL_LETS.discr =
+/*inistring dstr_524__WRAP_NORMAL_LETS*/
+ /*_.VALSTR___V616*/ meltfptr[615] =
+ (void *) &cdat->dstr_524__WRAP_NORMAL_LETS;
+ cdat->dstr_524__WRAP_NORMAL_LETS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_522__WRAP_NORMAL_LETS.val,
+ /*small inistring */ strncpy (cdat->dstr_524__WRAP_NORMAL_LETS.val,
"WRAP_NORMAL_LETSEQ",
- sizeof (cdat->dstr_522__WRAP_NORMAL_LETS.
+ sizeof (cdat->dstr_524__WRAP_NORMAL_LETS.
val) - 1);
-/*iniobj dsym_523__CTYPE_VOID*/
- /*uniqueobj*/ if (! /*_.VALDATA___V614*/ meltfptr[613])
- /*_.VALDATA___V614*/
- meltfptr[613] = (void *) &cdat->dsym_523__CTYPE_VOID;
+/*iniobj dsym_525__CTYPE_VOID*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V617*/ meltfptr[616])
+ /*_.VALDATA___V617*/
+ meltfptr[616] = (void *) &cdat->dsym_525__CTYPE_VOID;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_523__CTYPE_VOID",
+ melt_assertmsg ("iniobj check.discr isobj dsym_525__CTYPE_VOID",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_523__CTYPE_VOID",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_525__CTYPE_VOID",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_523__CTYPE_VOID.meltobj_class =
+ cdat->dsym_525__CTYPE_VOID.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_523__CTYPE_VOID.obj_hash = 94242002;
- cdat->dsym_523__CTYPE_VOID.obj_len = 3;
+ cdat->dsym_525__CTYPE_VOID.obj_hash = 94242002;
+ cdat->dsym_525__CTYPE_VOID.obj_len = 3;
-/*inistring dstr_524__CTYPE_VOID*/
- /*_.VALSTR___V615*/ meltfptr[614] = (void *) &cdat->dstr_524__CTYPE_VOID;
- cdat->dstr_524__CTYPE_VOID.discr =
+/*inistring dstr_526__CTYPE_VOID*/
+ /*_.VALSTR___V618*/ meltfptr[617] = (void *) &cdat->dstr_526__CTYPE_VOID;
+ cdat->dstr_526__CTYPE_VOID.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_524__CTYPE_VOID.val, "CTYPE_VOID",
- sizeof (cdat->dstr_524__CTYPE_VOID.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_526__CTYPE_VOID.val, "CTYPE_VOID",
+ sizeof (cdat->dstr_526__CTYPE_VOID.val) - 1);
-/*iniobj dsym_525__MATCHRES_*/
- /*uniqueobj*/ if (! /*_.VALDATA___V603*/ meltfptr[602])
- /*_.VALDATA___V603*/
- meltfptr[602] = (void *) &cdat->dsym_525__MATCHRES_;
+/*iniobj dsym_527__MATCHRES_*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V606*/ meltfptr[605])
+ /*_.VALDATA___V606*/
+ meltfptr[605] = (void *) &cdat->dsym_527__MATCHRES_;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_525__MATCHRES_",
+ melt_assertmsg ("iniobj check.discr isobj dsym_527__MATCHRES_",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_525__MATCHRES_",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_527__MATCHRES_",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_525__MATCHRES_.meltobj_class =
+ cdat->dsym_527__MATCHRES_.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_525__MATCHRES_.obj_hash = 279601250;
- cdat->dsym_525__MATCHRES_.obj_len = 3;
+ cdat->dsym_527__MATCHRES_.obj_hash = 279601250;
+ cdat->dsym_527__MATCHRES_.obj_len = 3;
-/*inistring dstr_526__MATCHRES_*/
- /*_.VALSTR___V604*/ meltfptr[603] = (void *) &cdat->dstr_526__MATCHRES_;
- cdat->dstr_526__MATCHRES_.discr =
+/*inistring dstr_528__MATCHRES_*/
+ /*_.VALSTR___V607*/ meltfptr[606] = (void *) &cdat->dstr_528__MATCHRES_;
+ cdat->dstr_528__MATCHRES_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_526__MATCHRES_.val, "MATCHRES_",
- sizeof (cdat->dstr_526__MATCHRES_.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_528__MATCHRES_.val, "MATCHRES_",
+ sizeof (cdat->dstr_528__MATCHRES_.val) - 1);
-/*iniobj dsym_527__CLASS_MATCHING_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V616*/ meltfptr[615])
- /*_.VALDATA___V616*/
- meltfptr[615] = (void *) &cdat->dsym_527__CLASS_MATCHING_CONTEXT;
+/*iniobj dsym_529__CLASS_MATCHING_CONTEXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V619*/ meltfptr[618])
+ /*_.VALDATA___V619*/
+ meltfptr[618] = (void *) &cdat->dsym_529__CLASS_MATCHING_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_527__CLASS_MATCHING_CONTEXT",
+ ("iniobj check.discr isobj dsym_529__CLASS_MATCHING_CONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_527__CLASS_MATCHING_CONTEXT",
+ ("iniobj check.discr objmagic dsym_529__CLASS_MATCHING_CONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_527__CLASS_MATCHING_CONTEXT.meltobj_class =
+ cdat->dsym_529__CLASS_MATCHING_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_527__CLASS_MATCHING_CONTEXT.obj_hash = 304738766;
- cdat->dsym_527__CLASS_MATCHING_CONTEXT.obj_len = 3;
+ cdat->dsym_529__CLASS_MATCHING_CONTEXT.obj_hash = 304738766;
+ cdat->dsym_529__CLASS_MATCHING_CONTEXT.obj_len = 3;
-/*inistring dstr_528__CLASS_MATCHING_C*/
- /*_.VALSTR___V617*/ meltfptr[616] =
- (void *) &cdat->dstr_528__CLASS_MATCHING_C;
- cdat->dstr_528__CLASS_MATCHING_C.discr =
+/*inistring dstr_530__CLASS_MATCHING_C*/
+ /*_.VALSTR___V620*/ meltfptr[619] =
+ (void *) &cdat->dstr_530__CLASS_MATCHING_C;
+ cdat->dstr_530__CLASS_MATCHING_C.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_528__CLASS_MATCHING_C.val,
+ /*small inistring */ strncpy (cdat->dstr_530__CLASS_MATCHING_C.val,
"CLASS_MATCHING_CONTEXT",
- sizeof (cdat->dstr_528__CLASS_MATCHING_C.
+ sizeof (cdat->dstr_530__CLASS_MATCHING_C.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ iniobj");
-/*iniobj dobj_529__CLASS_MATCHING_CONTEXT*/
-/*_.VALDATA___V618*/ meltfptr[617] =
- (void *) &cdat->dobj_529__CLASS_MATCHING_CONTEXT;
+/*iniobj dobj_531__CLASS_MATCHING_CONTEXT*/
+/*_.VALDATA___V621*/ meltfptr[620] =
+ (void *) &cdat->dobj_531__CLASS_MATCHING_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_529__CLASS_MATCHING_CONTEXT",
+ ("iniobj check.discr isobj dobj_531__CLASS_MATCHING_CONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_529__CLASS_MATCHING_CONTEXT",
+ ("iniobj check.discr objmagic dobj_531__CLASS_MATCHING_CONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_529__CLASS_MATCHING_CONTEXT.meltobj_class =
+ cdat->dobj_531__CLASS_MATCHING_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_529__CLASS_MATCHING_CONTEXT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_529__CLASS_MATCHING_CONTEXT.obj_hash = 495132096;
- cdat->dobj_529__CLASS_MATCHING_CONTEXT.obj_len = 8;
+ cdat->dobj_531__CLASS_MATCHING_CONTEXT.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_531__CLASS_MATCHING_CONTEXT.obj_hash = 202643720;
+ cdat->dobj_531__CLASS_MATCHING_CONTEXT.obj_len = 8;
-/*inistring dstr_530__CLASS_MATCHING_C*/
- /*_.VALSTR___V619*/ meltfptr[618] =
- (void *) &cdat->dstr_530__CLASS_MATCHING_C;
- cdat->dstr_530__CLASS_MATCHING_C.discr =
+/*inistring dstr_532__CLASS_MATCHING_C*/
+ /*_.VALSTR___V622*/ meltfptr[621] =
+ (void *) &cdat->dstr_532__CLASS_MATCHING_C;
+ cdat->dstr_532__CLASS_MATCHING_C.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_530__CLASS_MATCHING_C.val,
+ /*small inistring */ strncpy (cdat->dstr_532__CLASS_MATCHING_C.val,
"CLASS_MATCHING_CONTEXT",
- sizeof (cdat->dstr_530__CLASS_MATCHING_C.
+ sizeof (cdat->dstr_532__CLASS_MATCHING_C.
val) - 1);
- /*inimult dtup_531__CLASS_MATCHING_CONTEXT */
- /*_.VALTUP___V620*/ meltfptr[619] =
- (void *) &cdat->dtup_531__CLASS_MATCHING_CONTEXT;
- cdat->dtup_531__CLASS_MATCHING_CONTEXT.discr =
+ /*inimult dtup_533__CLASS_MATCHING_CONTEXT */
+ /*_.VALTUP___V623*/ meltfptr[622] =
+ (void *) &cdat->dtup_533__CLASS_MATCHING_CONTEXT;
+ cdat->dtup_533__CLASS_MATCHING_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_531__CLASS_MATCHING_CONTEXT.nbval = 1;
- /*inimult dtup_532__CLASS_MATCHING_CONTEXT */
- /*_.VALTUP___V641*/ meltfptr[640] =
- (void *) &cdat->dtup_532__CLASS_MATCHING_CONTEXT;
- cdat->dtup_532__CLASS_MATCHING_CONTEXT.discr =
+ cdat->dtup_533__CLASS_MATCHING_CONTEXT.nbval = 1;
+ /*inimult dtup_534__CLASS_MATCHING_CONTEXT */
+ /*_.VALTUP___V644*/ meltfptr[643] =
+ (void *) &cdat->dtup_534__CLASS_MATCHING_CONTEXT;
+ cdat->dtup_534__CLASS_MATCHING_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_532__CLASS_MATCHING_CONTEXT.nbval = 10;
+ cdat->dtup_534__CLASS_MATCHING_CONTEXT.nbval = 10;
-/*iniobj dsym_533__MCTX_NORMCTXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V642*/ meltfptr[641])
- /*_.VALDATA___V642*/
- meltfptr[641] = (void *) &cdat->dsym_533__MCTX_NORMCTXT;
+/*iniobj dsym_535__MCTX_NORMCTXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V645*/ meltfptr[644])
+ /*_.VALDATA___V645*/
+ meltfptr[644] = (void *) &cdat->dsym_535__MCTX_NORMCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_533__MCTX_NORMCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_535__MCTX_NORMCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_533__MCTX_NORMCTXT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_535__MCTX_NORMCTXT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_533__MCTX_NORMCTXT.meltobj_class =
+ cdat->dsym_535__MCTX_NORMCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_533__MCTX_NORMCTXT.obj_hash = 652151548;
- cdat->dsym_533__MCTX_NORMCTXT.obj_len = 3;
+ cdat->dsym_535__MCTX_NORMCTXT.obj_hash = 652151548;
+ cdat->dsym_535__MCTX_NORMCTXT.obj_len = 3;
-/*inistring dstr_534__MCTX_NORMCTXT*/
- /*_.VALSTR___V643*/ meltfptr[642] = (void *) &cdat->dstr_534__MCTX_NORMCTXT;
- cdat->dstr_534__MCTX_NORMCTXT.discr =
+/*inistring dstr_536__MCTX_NORMCTXT*/
+ /*_.VALSTR___V646*/ meltfptr[645] = (void *) &cdat->dstr_536__MCTX_NORMCTXT;
+ cdat->dstr_536__MCTX_NORMCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_534__MCTX_NORMCTXT.val,
+ /*small inistring */ strncpy (cdat->dstr_536__MCTX_NORMCTXT.val,
"MCTX_NORMCTXT",
- sizeof (cdat->dstr_534__MCTX_NORMCTXT.val) -
+ sizeof (cdat->dstr_536__MCTX_NORMCTXT.val) -
1);
/*^iniobj */
-/*iniobj dobj_535__MCTX_NORMCTXT*/
-/*_.VALDATA___V621*/ meltfptr[620] =
- (void *) &cdat->dobj_535__MCTX_NORMCTXT;
+/*iniobj dobj_537__MCTX_NORMCTXT*/
+/*_.VALDATA___V624*/ meltfptr[623] =
+ (void *) &cdat->dobj_537__MCTX_NORMCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_535__MCTX_NORMCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dobj_537__MCTX_NORMCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_535__MCTX_NORMCTXT",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_537__MCTX_NORMCTXT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_535__MCTX_NORMCTXT.meltobj_class =
+ cdat->dobj_537__MCTX_NORMCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_535__MCTX_NORMCTXT.obj_num = 0;
- cdat->dobj_535__MCTX_NORMCTXT.obj_hash = 877145909;
- cdat->dobj_535__MCTX_NORMCTXT.obj_len = 4;
+ cdat->dobj_537__MCTX_NORMCTXT.obj_num = 0;
+ cdat->dobj_537__MCTX_NORMCTXT.obj_hash = 14319488;
+ cdat->dobj_537__MCTX_NORMCTXT.obj_len = 4;
-/*inistring dstr_536__MCTX_NORMCTXT*/
- /*_.VALSTR___V622*/ meltfptr[621] = (void *) &cdat->dstr_536__MCTX_NORMCTXT;
- cdat->dstr_536__MCTX_NORMCTXT.discr =
+/*inistring dstr_538__MCTX_NORMCTXT*/
+ /*_.VALSTR___V625*/ meltfptr[624] = (void *) &cdat->dstr_538__MCTX_NORMCTXT;
+ cdat->dstr_538__MCTX_NORMCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_536__MCTX_NORMCTXT.val,
+ /*small inistring */ strncpy (cdat->dstr_538__MCTX_NORMCTXT.val,
"MCTX_NORMCTXT",
- sizeof (cdat->dstr_536__MCTX_NORMCTXT.val) -
+ sizeof (cdat->dstr_538__MCTX_NORMCTXT.val) -
1);
-/*iniobj dsym_537__MCTX_SOURCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V644*/ meltfptr[643])
- /*_.VALDATA___V644*/
- meltfptr[643] = (void *) &cdat->dsym_537__MCTX_SOURCE;
+/*iniobj dsym_539__MCTX_SOURCE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V647*/ meltfptr[646])
+ /*_.VALDATA___V647*/
+ meltfptr[646] = (void *) &cdat->dsym_539__MCTX_SOURCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_537__MCTX_SOURCE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_539__MCTX_SOURCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_537__MCTX_SOURCE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_539__MCTX_SOURCE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_537__MCTX_SOURCE.meltobj_class =
+ cdat->dsym_539__MCTX_SOURCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_537__MCTX_SOURCE.obj_hash = 818664043;
- cdat->dsym_537__MCTX_SOURCE.obj_len = 3;
+ cdat->dsym_539__MCTX_SOURCE.obj_hash = 818664043;
+ cdat->dsym_539__MCTX_SOURCE.obj_len = 3;
-/*inistring dstr_538__MCTX_SOURCE*/
- /*_.VALSTR___V645*/ meltfptr[644] = (void *) &cdat->dstr_538__MCTX_SOURCE;
- cdat->dstr_538__MCTX_SOURCE.discr =
+/*inistring dstr_540__MCTX_SOURCE*/
+ /*_.VALSTR___V648*/ meltfptr[647] = (void *) &cdat->dstr_540__MCTX_SOURCE;
+ cdat->dstr_540__MCTX_SOURCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_538__MCTX_SOURCE.val,
+ /*small inistring */ strncpy (cdat->dstr_540__MCTX_SOURCE.val,
"MCTX_SOURCE",
- sizeof (cdat->dstr_538__MCTX_SOURCE.val) - 1);
+ sizeof (cdat->dstr_540__MCTX_SOURCE.val) - 1);
/*^iniobj */
-/*iniobj dobj_539__MCTX_SOURCE*/
-/*_.VALDATA___V623*/ meltfptr[622] = (void *) &cdat->dobj_539__MCTX_SOURCE;
+/*iniobj dobj_541__MCTX_SOURCE*/
+/*_.VALDATA___V626*/ meltfptr[625] = (void *) &cdat->dobj_541__MCTX_SOURCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_539__MCTX_SOURCE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_541__MCTX_SOURCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_539__MCTX_SOURCE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_541__MCTX_SOURCE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_539__MCTX_SOURCE.meltobj_class =
+ cdat->dobj_541__MCTX_SOURCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_539__MCTX_SOURCE.obj_num = 1;
- cdat->dobj_539__MCTX_SOURCE.obj_hash = 808706190;
- cdat->dobj_539__MCTX_SOURCE.obj_len = 4;
+ cdat->dobj_541__MCTX_SOURCE.obj_num = 1;
+ cdat->dobj_541__MCTX_SOURCE.obj_hash = 758638857;
+ cdat->dobj_541__MCTX_SOURCE.obj_len = 4;
-/*inistring dstr_540__MCTX_SOURCE*/
- /*_.VALSTR___V624*/ meltfptr[623] = (void *) &cdat->dstr_540__MCTX_SOURCE;
- cdat->dstr_540__MCTX_SOURCE.discr =
+/*inistring dstr_542__MCTX_SOURCE*/
+ /*_.VALSTR___V627*/ meltfptr[626] = (void *) &cdat->dstr_542__MCTX_SOURCE;
+ cdat->dstr_542__MCTX_SOURCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_540__MCTX_SOURCE.val,
+ /*small inistring */ strncpy (cdat->dstr_542__MCTX_SOURCE.val,
"MCTX_SOURCE",
- sizeof (cdat->dstr_540__MCTX_SOURCE.val) - 1);
+ sizeof (cdat->dstr_542__MCTX_SOURCE.val) - 1);
-/*iniobj dsym_541__MCTX_NMATCHED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V646*/ meltfptr[645])
- /*_.VALDATA___V646*/
- meltfptr[645] = (void *) &cdat->dsym_541__MCTX_NMATCHED;
+/*iniobj dsym_543__MCTX_NMATCHED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V649*/ meltfptr[648])
+ /*_.VALDATA___V649*/
+ meltfptr[648] = (void *) &cdat->dsym_543__MCTX_NMATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_541__MCTX_NMATCHED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_543__MCTX_NMATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_541__MCTX_NMATCHED",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_543__MCTX_NMATCHED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_541__MCTX_NMATCHED.meltobj_class =
+ cdat->dsym_543__MCTX_NMATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_541__MCTX_NMATCHED.obj_hash = 251741466;
- cdat->dsym_541__MCTX_NMATCHED.obj_len = 3;
+ cdat->dsym_543__MCTX_NMATCHED.obj_hash = 251741466;
+ cdat->dsym_543__MCTX_NMATCHED.obj_len = 3;
-/*inistring dstr_542__MCTX_NMATCHED*/
- /*_.VALSTR___V647*/ meltfptr[646] = (void *) &cdat->dstr_542__MCTX_NMATCHED;
- cdat->dstr_542__MCTX_NMATCHED.discr =
+/*inistring dstr_544__MCTX_NMATCHED*/
+ /*_.VALSTR___V650*/ meltfptr[649] = (void *) &cdat->dstr_544__MCTX_NMATCHED;
+ cdat->dstr_544__MCTX_NMATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_542__MCTX_NMATCHED.val,
+ /*small inistring */ strncpy (cdat->dstr_544__MCTX_NMATCHED.val,
"MCTX_NMATCHED",
- sizeof (cdat->dstr_542__MCTX_NMATCHED.val) -
+ sizeof (cdat->dstr_544__MCTX_NMATCHED.val) -
1);
/*^iniobj */
-/*iniobj dobj_543__MCTX_NMATCHED*/
-/*_.VALDATA___V625*/ meltfptr[624] =
- (void *) &cdat->dobj_543__MCTX_NMATCHED;
+/*iniobj dobj_545__MCTX_NMATCHED*/
+/*_.VALDATA___V628*/ meltfptr[627] =
+ (void *) &cdat->dobj_545__MCTX_NMATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_543__MCTX_NMATCHED",
+ melt_assertmsg ("iniobj check.discr isobj dobj_545__MCTX_NMATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_543__MCTX_NMATCHED",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_545__MCTX_NMATCHED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_543__MCTX_NMATCHED.meltobj_class =
+ cdat->dobj_545__MCTX_NMATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_543__MCTX_NMATCHED.obj_num = 2;
- cdat->dobj_543__MCTX_NMATCHED.obj_hash = 59002778;
- cdat->dobj_543__MCTX_NMATCHED.obj_len = 4;
+ cdat->dobj_545__MCTX_NMATCHED.obj_num = 2;
+ cdat->dobj_545__MCTX_NMATCHED.obj_hash = 912844897;
+ cdat->dobj_545__MCTX_NMATCHED.obj_len = 4;
-/*inistring dstr_544__MCTX_NMATCHED*/
- /*_.VALSTR___V626*/ meltfptr[625] = (void *) &cdat->dstr_544__MCTX_NMATCHED;
- cdat->dstr_544__MCTX_NMATCHED.discr =
+/*inistring dstr_546__MCTX_NMATCHED*/
+ /*_.VALSTR___V629*/ meltfptr[628] = (void *) &cdat->dstr_546__MCTX_NMATCHED;
+ cdat->dstr_546__MCTX_NMATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_544__MCTX_NMATCHED.val,
+ /*small inistring */ strncpy (cdat->dstr_546__MCTX_NMATCHED.val,
"MCTX_NMATCHED",
- sizeof (cdat->dstr_544__MCTX_NMATCHED.val) -
+ sizeof (cdat->dstr_546__MCTX_NMATCHED.val) -
1);
-/*iniobj dsym_545__MCTX_NMATBIND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V648*/ meltfptr[647])
- /*_.VALDATA___V648*/
- meltfptr[647] = (void *) &cdat->dsym_545__MCTX_NMATBIND;
+/*iniobj dsym_547__MCTX_NMATBIND*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V651*/ meltfptr[650])
+ /*_.VALDATA___V651*/
+ meltfptr[650] = (void *) &cdat->dsym_547__MCTX_NMATBIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_545__MCTX_NMATBIND",
+ melt_assertmsg ("iniobj check.discr isobj dsym_547__MCTX_NMATBIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_545__MCTX_NMATBIND",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_547__MCTX_NMATBIND",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_545__MCTX_NMATBIND.meltobj_class =
+ cdat->dsym_547__MCTX_NMATBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_545__MCTX_NMATBIND.obj_hash = 318013264;
- cdat->dsym_545__MCTX_NMATBIND.obj_len = 3;
+ cdat->dsym_547__MCTX_NMATBIND.obj_hash = 318013264;
+ cdat->dsym_547__MCTX_NMATBIND.obj_len = 3;
-/*inistring dstr_546__MCTX_NMATBIND*/
- /*_.VALSTR___V649*/ meltfptr[648] = (void *) &cdat->dstr_546__MCTX_NMATBIND;
- cdat->dstr_546__MCTX_NMATBIND.discr =
+/*inistring dstr_548__MCTX_NMATBIND*/
+ /*_.VALSTR___V652*/ meltfptr[651] = (void *) &cdat->dstr_548__MCTX_NMATBIND;
+ cdat->dstr_548__MCTX_NMATBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_546__MCTX_NMATBIND.val,
+ /*small inistring */ strncpy (cdat->dstr_548__MCTX_NMATBIND.val,
"MCTX_NMATBIND",
- sizeof (cdat->dstr_546__MCTX_NMATBIND.val) -
+ sizeof (cdat->dstr_548__MCTX_NMATBIND.val) -
1);
/*^iniobj */
-/*iniobj dobj_547__MCTX_NMATBIND*/
-/*_.VALDATA___V627*/ meltfptr[626] =
- (void *) &cdat->dobj_547__MCTX_NMATBIND;
+/*iniobj dobj_549__MCTX_NMATBIND*/
+/*_.VALDATA___V630*/ meltfptr[629] =
+ (void *) &cdat->dobj_549__MCTX_NMATBIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_547__MCTX_NMATBIND",
+ melt_assertmsg ("iniobj check.discr isobj dobj_549__MCTX_NMATBIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_547__MCTX_NMATBIND",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_549__MCTX_NMATBIND",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_547__MCTX_NMATBIND.meltobj_class =
+ cdat->dobj_549__MCTX_NMATBIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_547__MCTX_NMATBIND.obj_num = 3;
- cdat->dobj_547__MCTX_NMATBIND.obj_hash = 85810582;
- cdat->dobj_547__MCTX_NMATBIND.obj_len = 4;
+ cdat->dobj_549__MCTX_NMATBIND.obj_num = 3;
+ cdat->dobj_549__MCTX_NMATBIND.obj_hash = 104940191;
+ cdat->dobj_549__MCTX_NMATBIND.obj_len = 4;
-/*inistring dstr_548__MCTX_NMATBIND*/
- /*_.VALSTR___V628*/ meltfptr[627] = (void *) &cdat->dstr_548__MCTX_NMATBIND;
- cdat->dstr_548__MCTX_NMATBIND.discr =
+/*inistring dstr_550__MCTX_NMATBIND*/
+ /*_.VALSTR___V631*/ meltfptr[630] = (void *) &cdat->dstr_550__MCTX_NMATBIND;
+ cdat->dstr_550__MCTX_NMATBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_548__MCTX_NMATBIND.val,
+ /*small inistring */ strncpy (cdat->dstr_550__MCTX_NMATBIND.val,
"MCTX_NMATBIND",
- sizeof (cdat->dstr_548__MCTX_NMATBIND.val) -
+ sizeof (cdat->dstr_550__MCTX_NMATBIND.val) -
1);
-/*iniobj dsym_549__MCTX_CASES*/
- /*uniqueobj*/ if (! /*_.VALDATA___V650*/ meltfptr[649])
- /*_.VALDATA___V650*/
- meltfptr[649] = (void *) &cdat->dsym_549__MCTX_CASES;
+/*iniobj dsym_551__MCTX_CASES*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V653*/ meltfptr[652])
+ /*_.VALDATA___V653*/
+ meltfptr[652] = (void *) &cdat->dsym_551__MCTX_CASES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_549__MCTX_CASES",
+ melt_assertmsg ("iniobj check.discr isobj dsym_551__MCTX_CASES",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_549__MCTX_CASES",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_551__MCTX_CASES",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_549__MCTX_CASES.meltobj_class =
+ cdat->dsym_551__MCTX_CASES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_549__MCTX_CASES.obj_hash = 1359414;
- cdat->dsym_549__MCTX_CASES.obj_len = 3;
+ cdat->dsym_551__MCTX_CASES.obj_hash = 1359414;
+ cdat->dsym_551__MCTX_CASES.obj_len = 3;
-/*inistring dstr_550__MCTX_CASES*/
- /*_.VALSTR___V651*/ meltfptr[650] = (void *) &cdat->dstr_550__MCTX_CASES;
- cdat->dstr_550__MCTX_CASES.discr =
+/*inistring dstr_552__MCTX_CASES*/
+ /*_.VALSTR___V654*/ meltfptr[653] = (void *) &cdat->dstr_552__MCTX_CASES;
+ cdat->dstr_552__MCTX_CASES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_550__MCTX_CASES.val, "MCTX_CASES",
- sizeof (cdat->dstr_550__MCTX_CASES.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_552__MCTX_CASES.val, "MCTX_CASES",
+ sizeof (cdat->dstr_552__MCTX_CASES.val) - 1);
/*^iniobj */
-/*iniobj dobj_551__MCTX_CASES*/
-/*_.VALDATA___V629*/ meltfptr[628] = (void *) &cdat->dobj_551__MCTX_CASES;
+/*iniobj dobj_553__MCTX_CASES*/
+/*_.VALDATA___V632*/ meltfptr[631] = (void *) &cdat->dobj_553__MCTX_CASES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_551__MCTX_CASES",
+ melt_assertmsg ("iniobj check.discr isobj dobj_553__MCTX_CASES",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_551__MCTX_CASES",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_553__MCTX_CASES",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_551__MCTX_CASES.meltobj_class =
+ cdat->dobj_553__MCTX_CASES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_551__MCTX_CASES.obj_num = 4;
- cdat->dobj_551__MCTX_CASES.obj_hash = 323499124;
- cdat->dobj_551__MCTX_CASES.obj_len = 4;
+ cdat->dobj_553__MCTX_CASES.obj_num = 4;
+ cdat->dobj_553__MCTX_CASES.obj_hash = 483835888;
+ cdat->dobj_553__MCTX_CASES.obj_len = 4;
-/*inistring dstr_552__MCTX_CASES*/
- /*_.VALSTR___V630*/ meltfptr[629] = (void *) &cdat->dstr_552__MCTX_CASES;
- cdat->dstr_552__MCTX_CASES.discr =
+/*inistring dstr_554__MCTX_CASES*/
+ /*_.VALSTR___V633*/ meltfptr[632] = (void *) &cdat->dstr_554__MCTX_CASES;
+ cdat->dstr_554__MCTX_CASES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_552__MCTX_CASES.val, "MCTX_CASES",
- sizeof (cdat->dstr_552__MCTX_CASES.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_554__MCTX_CASES.val, "MCTX_CASES",
+ sizeof (cdat->dstr_554__MCTX_CASES.val) - 1);
-/*iniobj dsym_553__MCTX_ENV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V652*/ meltfptr[651])
- /*_.VALDATA___V652*/
- meltfptr[651] = (void *) &cdat->dsym_553__MCTX_ENV;
+/*iniobj dsym_555__MCTX_ENV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V655*/ meltfptr[654])
+ /*_.VALDATA___V655*/
+ meltfptr[654] = (void *) &cdat->dsym_555__MCTX_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_553__MCTX_ENV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_555__MCTX_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_553__MCTX_ENV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_555__MCTX_ENV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_553__MCTX_ENV.meltobj_class =
+ cdat->dsym_555__MCTX_ENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_553__MCTX_ENV.obj_hash = 845670588;
- cdat->dsym_553__MCTX_ENV.obj_len = 3;
+ cdat->dsym_555__MCTX_ENV.obj_hash = 845670588;
+ cdat->dsym_555__MCTX_ENV.obj_len = 3;
-/*inistring dstr_554__MCTX_ENV*/
- /*_.VALSTR___V653*/ meltfptr[652] = (void *) &cdat->dstr_554__MCTX_ENV;
- cdat->dstr_554__MCTX_ENV.discr =
+/*inistring dstr_556__MCTX_ENV*/
+ /*_.VALSTR___V656*/ meltfptr[655] = (void *) &cdat->dstr_556__MCTX_ENV;
+ cdat->dstr_556__MCTX_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_554__MCTX_ENV.val, "MCTX_ENV",
- sizeof (cdat->dstr_554__MCTX_ENV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_556__MCTX_ENV.val, "MCTX_ENV",
+ sizeof (cdat->dstr_556__MCTX_ENV.val) - 1);
/*^iniobj */
-/*iniobj dobj_555__MCTX_ENV*/
-/*_.VALDATA___V631*/ meltfptr[630] = (void *) &cdat->dobj_555__MCTX_ENV;
+/*iniobj dobj_557__MCTX_ENV*/
+/*_.VALDATA___V634*/ meltfptr[633] = (void *) &cdat->dobj_557__MCTX_ENV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_555__MCTX_ENV",
+ melt_assertmsg ("iniobj check.discr isobj dobj_557__MCTX_ENV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_555__MCTX_ENV",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_557__MCTX_ENV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_555__MCTX_ENV.meltobj_class =
+ cdat->dobj_557__MCTX_ENV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_555__MCTX_ENV.obj_num = 5;
- cdat->dobj_555__MCTX_ENV.obj_hash = 558595671;
- cdat->dobj_555__MCTX_ENV.obj_len = 4;
+ cdat->dobj_557__MCTX_ENV.obj_num = 5;
+ cdat->dobj_557__MCTX_ENV.obj_hash = 1005968140;
+ cdat->dobj_557__MCTX_ENV.obj_len = 4;
-/*inistring dstr_556__MCTX_ENV*/
- /*_.VALSTR___V632*/ meltfptr[631] = (void *) &cdat->dstr_556__MCTX_ENV;
- cdat->dstr_556__MCTX_ENV.discr =
+/*inistring dstr_558__MCTX_ENV*/
+ /*_.VALSTR___V635*/ meltfptr[634] = (void *) &cdat->dstr_558__MCTX_ENV;
+ cdat->dstr_558__MCTX_ENV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_556__MCTX_ENV.val, "MCTX_ENV",
- sizeof (cdat->dstr_556__MCTX_ENV.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_558__MCTX_ENV.val, "MCTX_ENV",
+ sizeof (cdat->dstr_558__MCTX_ENV.val) - 1);
-/*iniobj dsym_557__MCTX_MDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V654*/ meltfptr[653])
- /*_.VALDATA___V654*/
- meltfptr[653] = (void *) &cdat->dsym_557__MCTX_MDATA;
+/*iniobj dsym_559__MCTX_MDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V657*/ meltfptr[656])
+ /*_.VALDATA___V657*/
+ meltfptr[656] = (void *) &cdat->dsym_559__MCTX_MDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_557__MCTX_MDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_559__MCTX_MDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_557__MCTX_MDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_559__MCTX_MDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_557__MCTX_MDATA.meltobj_class =
+ cdat->dsym_559__MCTX_MDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_557__MCTX_MDATA.obj_hash = 370736409;
- cdat->dsym_557__MCTX_MDATA.obj_len = 3;
+ cdat->dsym_559__MCTX_MDATA.obj_hash = 370736409;
+ cdat->dsym_559__MCTX_MDATA.obj_len = 3;
-/*inistring dstr_558__MCTX_MDATA*/
- /*_.VALSTR___V655*/ meltfptr[654] = (void *) &cdat->dstr_558__MCTX_MDATA;
- cdat->dstr_558__MCTX_MDATA.discr =
+/*inistring dstr_560__MCTX_MDATA*/
+ /*_.VALSTR___V658*/ meltfptr[657] = (void *) &cdat->dstr_560__MCTX_MDATA;
+ cdat->dstr_560__MCTX_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_558__MCTX_MDATA.val, "MCTX_MDATA",
- sizeof (cdat->dstr_558__MCTX_MDATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_560__MCTX_MDATA.val, "MCTX_MDATA",
+ sizeof (cdat->dstr_560__MCTX_MDATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_559__MCTX_MDATA*/
-/*_.VALDATA___V633*/ meltfptr[632] = (void *) &cdat->dobj_559__MCTX_MDATA;
+/*iniobj dobj_561__MCTX_MDATA*/
+/*_.VALDATA___V636*/ meltfptr[635] = (void *) &cdat->dobj_561__MCTX_MDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_559__MCTX_MDATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_561__MCTX_MDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_559__MCTX_MDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_561__MCTX_MDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_559__MCTX_MDATA.meltobj_class =
+ cdat->dobj_561__MCTX_MDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_559__MCTX_MDATA.obj_num = 6;
- cdat->dobj_559__MCTX_MDATA.obj_hash = 701191015;
- cdat->dobj_559__MCTX_MDATA.obj_len = 4;
+ cdat->dobj_561__MCTX_MDATA.obj_num = 6;
+ cdat->dobj_561__MCTX_MDATA.obj_hash = 239511031;
+ cdat->dobj_561__MCTX_MDATA.obj_len = 4;
-/*inistring dstr_560__MCTX_MDATA*/
- /*_.VALSTR___V634*/ meltfptr[633] = (void *) &cdat->dstr_560__MCTX_MDATA;
- cdat->dstr_560__MCTX_MDATA.discr =
+/*inistring dstr_562__MCTX_MDATA*/
+ /*_.VALSTR___V637*/ meltfptr[636] = (void *) &cdat->dstr_562__MCTX_MDATA;
+ cdat->dstr_562__MCTX_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_560__MCTX_MDATA.val, "MCTX_MDATA",
- sizeof (cdat->dstr_560__MCTX_MDATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_562__MCTX_MDATA.val, "MCTX_MDATA",
+ sizeof (cdat->dstr_562__MCTX_MDATA.val) - 1);
-/*iniobj dsym_561__MCTX_VARHANDLERS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V656*/ meltfptr[655])
- /*_.VALDATA___V656*/
- meltfptr[655] = (void *) &cdat->dsym_561__MCTX_VARHANDLERS;
+/*iniobj dsym_563__MCTX_VARHANDLERS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V659*/ meltfptr[658])
+ /*_.VALDATA___V659*/
+ meltfptr[658] = (void *) &cdat->dsym_563__MCTX_VARHANDLERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_561__MCTX_VARHANDLERS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_563__MCTX_VARHANDLERS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_561__MCTX_VARHANDLERS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_563__MCTX_VARHANDLERS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_561__MCTX_VARHANDLERS.meltobj_class =
+ cdat->dsym_563__MCTX_VARHANDLERS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_561__MCTX_VARHANDLERS.obj_hash = 854846232;
- cdat->dsym_561__MCTX_VARHANDLERS.obj_len = 3;
+ cdat->dsym_563__MCTX_VARHANDLERS.obj_hash = 854846232;
+ cdat->dsym_563__MCTX_VARHANDLERS.obj_len = 3;
-/*inistring dstr_562__MCTX_VARHANDLERS*/
- /*_.VALSTR___V657*/ meltfptr[656] =
- (void *) &cdat->dstr_562__MCTX_VARHANDLERS;
- cdat->dstr_562__MCTX_VARHANDLERS.discr =
+/*inistring dstr_564__MCTX_VARHANDLERS*/
+ /*_.VALSTR___V660*/ meltfptr[659] =
+ (void *) &cdat->dstr_564__MCTX_VARHANDLERS;
+ cdat->dstr_564__MCTX_VARHANDLERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_562__MCTX_VARHANDLERS.val,
+ /*small inistring */ strncpy (cdat->dstr_564__MCTX_VARHANDLERS.val,
"MCTX_VARHANDLERS",
- sizeof (cdat->dstr_562__MCTX_VARHANDLERS.
+ sizeof (cdat->dstr_564__MCTX_VARHANDLERS.
val) - 1);
/*^iniobj */
-/*iniobj dobj_563__MCTX_VARHANDLERS*/
-/*_.VALDATA___V635*/ meltfptr[634] =
- (void *) &cdat->dobj_563__MCTX_VARHANDLERS;
+/*iniobj dobj_565__MCTX_VARHANDLERS*/
+/*_.VALDATA___V638*/ meltfptr[637] =
+ (void *) &cdat->dobj_565__MCTX_VARHANDLERS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_563__MCTX_VARHANDLERS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_565__MCTX_VARHANDLERS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_563__MCTX_VARHANDLERS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_565__MCTX_VARHANDLERS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_563__MCTX_VARHANDLERS.meltobj_class =
+ cdat->dobj_565__MCTX_VARHANDLERS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_563__MCTX_VARHANDLERS.obj_num = 7;
- cdat->dobj_563__MCTX_VARHANDLERS.obj_hash = 815901565;
- cdat->dobj_563__MCTX_VARHANDLERS.obj_len = 4;
+ cdat->dobj_565__MCTX_VARHANDLERS.obj_num = 7;
+ cdat->dobj_565__MCTX_VARHANDLERS.obj_hash = 746316170;
+ cdat->dobj_565__MCTX_VARHANDLERS.obj_len = 4;
-/*inistring dstr_564__MCTX_VARHANDLERS*/
- /*_.VALSTR___V636*/ meltfptr[635] =
- (void *) &cdat->dstr_564__MCTX_VARHANDLERS;
- cdat->dstr_564__MCTX_VARHANDLERS.discr =
+/*inistring dstr_566__MCTX_VARHANDLERS*/
+ /*_.VALSTR___V639*/ meltfptr[638] =
+ (void *) &cdat->dstr_566__MCTX_VARHANDLERS;
+ cdat->dstr_566__MCTX_VARHANDLERS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_564__MCTX_VARHANDLERS.val,
+ /*small inistring */ strncpy (cdat->dstr_566__MCTX_VARHANDLERS.val,
"MCTX_VARHANDLERS",
- sizeof (cdat->dstr_564__MCTX_VARHANDLERS.
+ sizeof (cdat->dstr_566__MCTX_VARHANDLERS.
val) - 1);
-/*iniobj dsym_565__MCTX_FLAGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V658*/ meltfptr[657])
- /*_.VALDATA___V658*/
- meltfptr[657] = (void *) &cdat->dsym_565__MCTX_FLAGS;
+/*iniobj dsym_567__MCTX_FLAGS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V661*/ meltfptr[660])
+ /*_.VALDATA___V661*/
+ meltfptr[660] = (void *) &cdat->dsym_567__MCTX_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_565__MCTX_FLAGS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_567__MCTX_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_565__MCTX_FLAGS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_567__MCTX_FLAGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_565__MCTX_FLAGS.meltobj_class =
+ cdat->dsym_567__MCTX_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_565__MCTX_FLAGS.obj_hash = 829770953;
- cdat->dsym_565__MCTX_FLAGS.obj_len = 3;
+ cdat->dsym_567__MCTX_FLAGS.obj_hash = 829770953;
+ cdat->dsym_567__MCTX_FLAGS.obj_len = 3;
-/*inistring dstr_566__MCTX_FLAGS*/
- /*_.VALSTR___V659*/ meltfptr[658] = (void *) &cdat->dstr_566__MCTX_FLAGS;
- cdat->dstr_566__MCTX_FLAGS.discr =
+/*inistring dstr_568__MCTX_FLAGS*/
+ /*_.VALSTR___V662*/ meltfptr[661] = (void *) &cdat->dstr_568__MCTX_FLAGS;
+ cdat->dstr_568__MCTX_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_566__MCTX_FLAGS.val, "MCTX_FLAGS",
- sizeof (cdat->dstr_566__MCTX_FLAGS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_568__MCTX_FLAGS.val, "MCTX_FLAGS",
+ sizeof (cdat->dstr_568__MCTX_FLAGS.val) - 1);
/*^iniobj */
-/*iniobj dobj_567__MCTX_FLAGS*/
-/*_.VALDATA___V637*/ meltfptr[636] = (void *) &cdat->dobj_567__MCTX_FLAGS;
+/*iniobj dobj_569__MCTX_FLAGS*/
+/*_.VALDATA___V640*/ meltfptr[639] = (void *) &cdat->dobj_569__MCTX_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_567__MCTX_FLAGS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_569__MCTX_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_567__MCTX_FLAGS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_569__MCTX_FLAGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_567__MCTX_FLAGS.meltobj_class =
+ cdat->dobj_569__MCTX_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_567__MCTX_FLAGS.obj_num = 8;
- cdat->dobj_567__MCTX_FLAGS.obj_hash = 742134798;
- cdat->dobj_567__MCTX_FLAGS.obj_len = 4;
+ cdat->dobj_569__MCTX_FLAGS.obj_num = 8;
+ cdat->dobj_569__MCTX_FLAGS.obj_hash = 48042369;
+ cdat->dobj_569__MCTX_FLAGS.obj_len = 4;
-/*inistring dstr_568__MCTX_FLAGS*/
- /*_.VALSTR___V638*/ meltfptr[637] = (void *) &cdat->dstr_568__MCTX_FLAGS;
- cdat->dstr_568__MCTX_FLAGS.discr =
+/*inistring dstr_570__MCTX_FLAGS*/
+ /*_.VALSTR___V641*/ meltfptr[640] = (void *) &cdat->dstr_570__MCTX_FLAGS;
+ cdat->dstr_570__MCTX_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_568__MCTX_FLAGS.val, "MCTX_FLAGS",
- sizeof (cdat->dstr_568__MCTX_FLAGS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_570__MCTX_FLAGS.val, "MCTX_FLAGS",
+ sizeof (cdat->dstr_570__MCTX_FLAGS.val) - 1);
-/*iniobj dsym_569__MCTX_ENDLABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V660*/ meltfptr[659])
- /*_.VALDATA___V660*/
- meltfptr[659] = (void *) &cdat->dsym_569__MCTX_ENDLABEL;
+/*iniobj dsym_571__MCTX_ENDLABEL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V663*/ meltfptr[662])
+ /*_.VALDATA___V663*/
+ meltfptr[662] = (void *) &cdat->dsym_571__MCTX_ENDLABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_569__MCTX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_571__MCTX_ENDLABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_569__MCTX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_571__MCTX_ENDLABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_569__MCTX_ENDLABEL.meltobj_class =
+ cdat->dsym_571__MCTX_ENDLABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_569__MCTX_ENDLABEL.obj_hash = 400133793;
- cdat->dsym_569__MCTX_ENDLABEL.obj_len = 3;
+ cdat->dsym_571__MCTX_ENDLABEL.obj_hash = 400133793;
+ cdat->dsym_571__MCTX_ENDLABEL.obj_len = 3;
-/*inistring dstr_570__MCTX_ENDLABEL*/
- /*_.VALSTR___V661*/ meltfptr[660] = (void *) &cdat->dstr_570__MCTX_ENDLABEL;
- cdat->dstr_570__MCTX_ENDLABEL.discr =
+/*inistring dstr_572__MCTX_ENDLABEL*/
+ /*_.VALSTR___V664*/ meltfptr[663] = (void *) &cdat->dstr_572__MCTX_ENDLABEL;
+ cdat->dstr_572__MCTX_ENDLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_570__MCTX_ENDLABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_572__MCTX_ENDLABEL.val,
"MCTX_ENDLABEL",
- sizeof (cdat->dstr_570__MCTX_ENDLABEL.val) -
+ sizeof (cdat->dstr_572__MCTX_ENDLABEL.val) -
1);
/*^iniobj */
-/*iniobj dobj_571__MCTX_ENDLABEL*/
-/*_.VALDATA___V639*/ meltfptr[638] =
- (void *) &cdat->dobj_571__MCTX_ENDLABEL;
+/*iniobj dobj_573__MCTX_ENDLABEL*/
+/*_.VALDATA___V642*/ meltfptr[641] =
+ (void *) &cdat->dobj_573__MCTX_ENDLABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_571__MCTX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr isobj dobj_573__MCTX_ENDLABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_571__MCTX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_573__MCTX_ENDLABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_571__MCTX_ENDLABEL.meltobj_class =
+ cdat->dobj_573__MCTX_ENDLABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_571__MCTX_ENDLABEL.obj_num = 9;
- cdat->dobj_571__MCTX_ENDLABEL.obj_hash = 482094620;
- cdat->dobj_571__MCTX_ENDLABEL.obj_len = 4;
+ cdat->dobj_573__MCTX_ENDLABEL.obj_num = 9;
+ cdat->dobj_573__MCTX_ENDLABEL.obj_hash = 632246243;
+ cdat->dobj_573__MCTX_ENDLABEL.obj_len = 4;
-/*inistring dstr_572__MCTX_ENDLABEL*/
- /*_.VALSTR___V640*/ meltfptr[639] = (void *) &cdat->dstr_572__MCTX_ENDLABEL;
- cdat->dstr_572__MCTX_ENDLABEL.discr =
+/*inistring dstr_574__MCTX_ENDLABEL*/
+ /*_.VALSTR___V643*/ meltfptr[642] = (void *) &cdat->dstr_574__MCTX_ENDLABEL;
+ cdat->dstr_574__MCTX_ENDLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_572__MCTX_ENDLABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_574__MCTX_ENDLABEL.val,
"MCTX_ENDLABEL",
- sizeof (cdat->dstr_572__MCTX_ENDLABEL.val) -
+ sizeof (cdat->dstr_574__MCTX_ENDLABEL.val) -
1);
-/*iniobj dsym_573__CLASS_MATCH_CASE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V662*/ meltfptr[661])
- /*_.VALDATA___V662*/
- meltfptr[661] = (void *) &cdat->dsym_573__CLASS_MATCH_CASE;
+/*iniobj dsym_575__CLASS_MATCH_CASE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V665*/ meltfptr[664])
+ /*_.VALDATA___V665*/
+ meltfptr[664] = (void *) &cdat->dsym_575__CLASS_MATCH_CASE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_573__CLASS_MATCH_CASE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_575__CLASS_MATCH_CASE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_573__CLASS_MATCH_CASE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_575__CLASS_MATCH_CASE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_573__CLASS_MATCH_CASE.meltobj_class =
+ cdat->dsym_575__CLASS_MATCH_CASE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_573__CLASS_MATCH_CASE.obj_hash = 949216192;
- cdat->dsym_573__CLASS_MATCH_CASE.obj_len = 3;
+ cdat->dsym_575__CLASS_MATCH_CASE.obj_hash = 949216192;
+ cdat->dsym_575__CLASS_MATCH_CASE.obj_len = 3;
-/*inistring dstr_574__CLASS_MATCH_CASE*/
- /*_.VALSTR___V663*/ meltfptr[662] =
- (void *) &cdat->dstr_574__CLASS_MATCH_CASE;
- cdat->dstr_574__CLASS_MATCH_CASE.discr =
+/*inistring dstr_576__CLASS_MATCH_CASE*/
+ /*_.VALSTR___V666*/ meltfptr[665] =
+ (void *) &cdat->dstr_576__CLASS_MATCH_CASE;
+ cdat->dstr_576__CLASS_MATCH_CASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_574__CLASS_MATCH_CASE.val,
+ /*small inistring */ strncpy (cdat->dstr_576__CLASS_MATCH_CASE.val,
"CLASS_MATCH_CASE",
- sizeof (cdat->dstr_574__CLASS_MATCH_CASE.
+ sizeof (cdat->dstr_576__CLASS_MATCH_CASE.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ iniobj");
-/*iniobj dobj_575__CLASS_MATCH_CASE*/
-/*_.VALDATA___V664*/ meltfptr[663] =
- (void *) &cdat->dobj_575__CLASS_MATCH_CASE;
+/*iniobj dobj_577__CLASS_MATCH_CASE*/
+/*_.VALDATA___V667*/ meltfptr[666] =
+ (void *) &cdat->dobj_577__CLASS_MATCH_CASE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_575__CLASS_MATCH_CASE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_577__CLASS_MATCH_CASE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_575__CLASS_MATCH_CASE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_577__CLASS_MATCH_CASE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_575__CLASS_MATCH_CASE.meltobj_class =
+ cdat->dobj_577__CLASS_MATCH_CASE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_575__CLASS_MATCH_CASE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_575__CLASS_MATCH_CASE.obj_hash = 411123715;
- cdat->dobj_575__CLASS_MATCH_CASE.obj_len = 8;
+ cdat->dobj_577__CLASS_MATCH_CASE.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_577__CLASS_MATCH_CASE.obj_hash = 426341283;
+ cdat->dobj_577__CLASS_MATCH_CASE.obj_len = 8;
-/*inistring dstr_576__CLASS_MATCH_CASE*/
- /*_.VALSTR___V665*/ meltfptr[664] =
- (void *) &cdat->dstr_576__CLASS_MATCH_CASE;
- cdat->dstr_576__CLASS_MATCH_CASE.discr =
+/*inistring dstr_578__CLASS_MATCH_CASE*/
+ /*_.VALSTR___V668*/ meltfptr[667] =
+ (void *) &cdat->dstr_578__CLASS_MATCH_CASE;
+ cdat->dstr_578__CLASS_MATCH_CASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_576__CLASS_MATCH_CASE.val,
+ /*small inistring */ strncpy (cdat->dstr_578__CLASS_MATCH_CASE.val,
"CLASS_MATCH_CASE",
- sizeof (cdat->dstr_576__CLASS_MATCH_CASE.
+ sizeof (cdat->dstr_578__CLASS_MATCH_CASE.
val) - 1);
- /*inimult dtup_577__CLASS_MATCH_CASE */
- /*_.VALTUP___V666*/ meltfptr[665] =
- (void *) &cdat->dtup_577__CLASS_MATCH_CASE;
- cdat->dtup_577__CLASS_MATCH_CASE.discr =
+ /*inimult dtup_579__CLASS_MATCH_CASE */
+ /*_.VALTUP___V669*/ meltfptr[668] =
+ (void *) &cdat->dtup_579__CLASS_MATCH_CASE;
+ cdat->dtup_579__CLASS_MATCH_CASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_577__CLASS_MATCH_CASE.nbval = 2;
- /*inimult dtup_578__CLASS_MATCH_CASE */
- /*_.VALTUP___V675*/ meltfptr[674] =
- (void *) &cdat->dtup_578__CLASS_MATCH_CASE;
- cdat->dtup_578__CLASS_MATCH_CASE.discr =
+ cdat->dtup_579__CLASS_MATCH_CASE.nbval = 2;
+ /*inimult dtup_580__CLASS_MATCH_CASE */
+ /*_.VALTUP___V678*/ meltfptr[677] =
+ (void *) &cdat->dtup_580__CLASS_MATCH_CASE;
+ cdat->dtup_580__CLASS_MATCH_CASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_578__CLASS_MATCH_CASE.nbval = 5;
+ cdat->dtup_580__CLASS_MATCH_CASE.nbval = 5;
-/*iniobj dsym_579__MCASE_MCTXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V676*/ meltfptr[675])
- /*_.VALDATA___V676*/
- meltfptr[675] = (void *) &cdat->dsym_579__MCASE_MCTXT;
+/*iniobj dsym_581__MCASE_MCTXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V679*/ meltfptr[678])
+ /*_.VALDATA___V679*/
+ meltfptr[678] = (void *) &cdat->dsym_581__MCASE_MCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_579__MCASE_MCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_581__MCASE_MCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_579__MCASE_MCTXT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_581__MCASE_MCTXT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_579__MCASE_MCTXT.meltobj_class =
+ cdat->dsym_581__MCASE_MCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_579__MCASE_MCTXT.obj_hash = 149622940;
- cdat->dsym_579__MCASE_MCTXT.obj_len = 3;
+ cdat->dsym_581__MCASE_MCTXT.obj_hash = 149622940;
+ cdat->dsym_581__MCASE_MCTXT.obj_len = 3;
-/*inistring dstr_580__MCASE_MCTXT*/
- /*_.VALSTR___V677*/ meltfptr[676] = (void *) &cdat->dstr_580__MCASE_MCTXT;
- cdat->dstr_580__MCASE_MCTXT.discr =
+/*inistring dstr_582__MCASE_MCTXT*/
+ /*_.VALSTR___V680*/ meltfptr[679] = (void *) &cdat->dstr_582__MCASE_MCTXT;
+ cdat->dstr_582__MCASE_MCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_580__MCASE_MCTXT.val,
+ /*small inistring */ strncpy (cdat->dstr_582__MCASE_MCTXT.val,
"MCASE_MCTXT",
- sizeof (cdat->dstr_580__MCASE_MCTXT.val) - 1);
+ sizeof (cdat->dstr_582__MCASE_MCTXT.val) - 1);
/*^iniobj */
-/*iniobj dobj_581__MCASE_MCTXT*/
-/*_.VALDATA___V667*/ meltfptr[666] = (void *) &cdat->dobj_581__MCASE_MCTXT;
+/*iniobj dobj_583__MCASE_MCTXT*/
+/*_.VALDATA___V670*/ meltfptr[669] = (void *) &cdat->dobj_583__MCASE_MCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_581__MCASE_MCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dobj_583__MCASE_MCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_581__MCASE_MCTXT",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_583__MCASE_MCTXT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_581__MCASE_MCTXT.meltobj_class =
+ cdat->dobj_583__MCASE_MCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_581__MCASE_MCTXT.obj_num = 1;
- cdat->dobj_581__MCASE_MCTXT.obj_hash = 337786338;
- cdat->dobj_581__MCASE_MCTXT.obj_len = 4;
+ cdat->dobj_583__MCASE_MCTXT.obj_num = 1;
+ cdat->dobj_583__MCASE_MCTXT.obj_hash = 465433565;
+ cdat->dobj_583__MCASE_MCTXT.obj_len = 4;
-/*inistring dstr_582__MCASE_MCTXT*/
- /*_.VALSTR___V668*/ meltfptr[667] = (void *) &cdat->dstr_582__MCASE_MCTXT;
- cdat->dstr_582__MCASE_MCTXT.discr =
+/*inistring dstr_584__MCASE_MCTXT*/
+ /*_.VALSTR___V671*/ meltfptr[670] = (void *) &cdat->dstr_584__MCASE_MCTXT;
+ cdat->dstr_584__MCASE_MCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_582__MCASE_MCTXT.val,
+ /*small inistring */ strncpy (cdat->dstr_584__MCASE_MCTXT.val,
"MCASE_MCTXT",
- sizeof (cdat->dstr_582__MCASE_MCTXT.val) - 1);
+ sizeof (cdat->dstr_584__MCASE_MCTXT.val) - 1);
-/*iniobj dsym_583__MCASE_SOURCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V678*/ meltfptr[677])
- /*_.VALDATA___V678*/
- meltfptr[677] = (void *) &cdat->dsym_583__MCASE_SOURCE;
+/*iniobj dsym_585__MCASE_SOURCE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V681*/ meltfptr[680])
+ /*_.VALDATA___V681*/
+ meltfptr[680] = (void *) &cdat->dsym_585__MCASE_SOURCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_583__MCASE_SOURCE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_585__MCASE_SOURCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_583__MCASE_SOURCE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_585__MCASE_SOURCE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_583__MCASE_SOURCE.meltobj_class =
+ cdat->dsym_585__MCASE_SOURCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_583__MCASE_SOURCE.obj_hash = 903506654;
- cdat->dsym_583__MCASE_SOURCE.obj_len = 3;
+ cdat->dsym_585__MCASE_SOURCE.obj_hash = 903506654;
+ cdat->dsym_585__MCASE_SOURCE.obj_len = 3;
-/*inistring dstr_584__MCASE_SOURCE*/
- /*_.VALSTR___V679*/ meltfptr[678] = (void *) &cdat->dstr_584__MCASE_SOURCE;
- cdat->dstr_584__MCASE_SOURCE.discr =
+/*inistring dstr_586__MCASE_SOURCE*/
+ /*_.VALSTR___V682*/ meltfptr[681] = (void *) &cdat->dstr_586__MCASE_SOURCE;
+ cdat->dstr_586__MCASE_SOURCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_584__MCASE_SOURCE.val,
+ /*small inistring */ strncpy (cdat->dstr_586__MCASE_SOURCE.val,
"MCASE_SOURCE",
- sizeof (cdat->dstr_584__MCASE_SOURCE.val) -
+ sizeof (cdat->dstr_586__MCASE_SOURCE.val) -
1);
/*^iniobj */
-/*iniobj dobj_585__MCASE_SOURCE*/
-/*_.VALDATA___V669*/ meltfptr[668] = (void *) &cdat->dobj_585__MCASE_SOURCE;
+/*iniobj dobj_587__MCASE_SOURCE*/
+/*_.VALDATA___V672*/ meltfptr[671] = (void *) &cdat->dobj_587__MCASE_SOURCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_585__MCASE_SOURCE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_587__MCASE_SOURCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_585__MCASE_SOURCE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_587__MCASE_SOURCE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_585__MCASE_SOURCE.meltobj_class =
+ cdat->dobj_587__MCASE_SOURCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_585__MCASE_SOURCE.obj_num = 2;
- cdat->dobj_585__MCASE_SOURCE.obj_hash = 905492030;
- cdat->dobj_585__MCASE_SOURCE.obj_len = 4;
+ cdat->dobj_587__MCASE_SOURCE.obj_num = 2;
+ cdat->dobj_587__MCASE_SOURCE.obj_hash = 443095714;
+ cdat->dobj_587__MCASE_SOURCE.obj_len = 4;
-/*inistring dstr_586__MCASE_SOURCE*/
- /*_.VALSTR___V670*/ meltfptr[669] = (void *) &cdat->dstr_586__MCASE_SOURCE;
- cdat->dstr_586__MCASE_SOURCE.discr =
+/*inistring dstr_588__MCASE_SOURCE*/
+ /*_.VALSTR___V673*/ meltfptr[672] = (void *) &cdat->dstr_588__MCASE_SOURCE;
+ cdat->dstr_588__MCASE_SOURCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_586__MCASE_SOURCE.val,
+ /*small inistring */ strncpy (cdat->dstr_588__MCASE_SOURCE.val,
"MCASE_SOURCE",
- sizeof (cdat->dstr_586__MCASE_SOURCE.val) -
+ sizeof (cdat->dstr_588__MCASE_SOURCE.val) -
1);
-/*iniobj dsym_587__MCASE_INDEX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V680*/ meltfptr[679])
- /*_.VALDATA___V680*/
- meltfptr[679] = (void *) &cdat->dsym_587__MCASE_INDEX;
+/*iniobj dsym_589__MCASE_INDEX*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V683*/ meltfptr[682])
+ /*_.VALDATA___V683*/
+ meltfptr[682] = (void *) &cdat->dsym_589__MCASE_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_587__MCASE_INDEX",
+ melt_assertmsg ("iniobj check.discr isobj dsym_589__MCASE_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_587__MCASE_INDEX",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_589__MCASE_INDEX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_587__MCASE_INDEX.meltobj_class =
+ cdat->dsym_589__MCASE_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_587__MCASE_INDEX.obj_hash = 411250735;
- cdat->dsym_587__MCASE_INDEX.obj_len = 3;
+ cdat->dsym_589__MCASE_INDEX.obj_hash = 411250735;
+ cdat->dsym_589__MCASE_INDEX.obj_len = 3;
-/*inistring dstr_588__MCASE_INDEX*/
- /*_.VALSTR___V681*/ meltfptr[680] = (void *) &cdat->dstr_588__MCASE_INDEX;
- cdat->dstr_588__MCASE_INDEX.discr =
+/*inistring dstr_590__MCASE_INDEX*/
+ /*_.VALSTR___V684*/ meltfptr[683] = (void *) &cdat->dstr_590__MCASE_INDEX;
+ cdat->dstr_590__MCASE_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_588__MCASE_INDEX.val,
+ /*small inistring */ strncpy (cdat->dstr_590__MCASE_INDEX.val,
"MCASE_INDEX",
- sizeof (cdat->dstr_588__MCASE_INDEX.val) - 1);
+ sizeof (cdat->dstr_590__MCASE_INDEX.val) - 1);
/*^iniobj */
-/*iniobj dobj_589__MCASE_INDEX*/
-/*_.VALDATA___V671*/ meltfptr[670] = (void *) &cdat->dobj_589__MCASE_INDEX;
+/*iniobj dobj_591__MCASE_INDEX*/
+/*_.VALDATA___V674*/ meltfptr[673] = (void *) &cdat->dobj_591__MCASE_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_589__MCASE_INDEX",
+ melt_assertmsg ("iniobj check.discr isobj dobj_591__MCASE_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_589__MCASE_INDEX",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_591__MCASE_INDEX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_589__MCASE_INDEX.meltobj_class =
+ cdat->dobj_591__MCASE_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_589__MCASE_INDEX.obj_num = 3;
- cdat->dobj_589__MCASE_INDEX.obj_hash = 582933151;
- cdat->dobj_589__MCASE_INDEX.obj_len = 4;
+ cdat->dobj_591__MCASE_INDEX.obj_num = 3;
+ cdat->dobj_591__MCASE_INDEX.obj_hash = 166848505;
+ cdat->dobj_591__MCASE_INDEX.obj_len = 4;
-/*inistring dstr_590__MCASE_INDEX*/
- /*_.VALSTR___V672*/ meltfptr[671] = (void *) &cdat->dstr_590__MCASE_INDEX;
- cdat->dstr_590__MCASE_INDEX.discr =
+/*inistring dstr_592__MCASE_INDEX*/
+ /*_.VALSTR___V675*/ meltfptr[674] = (void *) &cdat->dstr_592__MCASE_INDEX;
+ cdat->dstr_592__MCASE_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_590__MCASE_INDEX.val,
+ /*small inistring */ strncpy (cdat->dstr_592__MCASE_INDEX.val,
"MCASE_INDEX",
- sizeof (cdat->dstr_590__MCASE_INDEX.val) - 1);
+ sizeof (cdat->dstr_592__MCASE_INDEX.val) - 1);
-/*iniobj dsym_591__MCASE_VARMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V682*/ meltfptr[681])
- /*_.VALDATA___V682*/
- meltfptr[681] = (void *) &cdat->dsym_591__MCASE_VARMAP;
+/*iniobj dsym_593__MCASE_VARMAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V685*/ meltfptr[684])
+ /*_.VALDATA___V685*/
+ meltfptr[684] = (void *) &cdat->dsym_593__MCASE_VARMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_591__MCASE_VARMAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_593__MCASE_VARMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_591__MCASE_VARMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_593__MCASE_VARMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_591__MCASE_VARMAP.meltobj_class =
+ cdat->dsym_593__MCASE_VARMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_591__MCASE_VARMAP.obj_hash = 75227449;
- cdat->dsym_591__MCASE_VARMAP.obj_len = 3;
+ cdat->dsym_593__MCASE_VARMAP.obj_hash = 75227449;
+ cdat->dsym_593__MCASE_VARMAP.obj_len = 3;
-/*inistring dstr_592__MCASE_VARMAP*/
- /*_.VALSTR___V683*/ meltfptr[682] = (void *) &cdat->dstr_592__MCASE_VARMAP;
- cdat->dstr_592__MCASE_VARMAP.discr =
+/*inistring dstr_594__MCASE_VARMAP*/
+ /*_.VALSTR___V686*/ meltfptr[685] = (void *) &cdat->dstr_594__MCASE_VARMAP;
+ cdat->dstr_594__MCASE_VARMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_592__MCASE_VARMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_594__MCASE_VARMAP.val,
"MCASE_VARMAP",
- sizeof (cdat->dstr_592__MCASE_VARMAP.val) -
+ sizeof (cdat->dstr_594__MCASE_VARMAP.val) -
1);
/*^iniobj */
-/*iniobj dobj_593__MCASE_VARMAP*/
-/*_.VALDATA___V673*/ meltfptr[672] = (void *) &cdat->dobj_593__MCASE_VARMAP;
+/*iniobj dobj_595__MCASE_VARMAP*/
+/*_.VALDATA___V676*/ meltfptr[675] = (void *) &cdat->dobj_595__MCASE_VARMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_593__MCASE_VARMAP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_595__MCASE_VARMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_593__MCASE_VARMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_595__MCASE_VARMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_593__MCASE_VARMAP.meltobj_class =
+ cdat->dobj_595__MCASE_VARMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_593__MCASE_VARMAP.obj_num = 4;
- cdat->dobj_593__MCASE_VARMAP.obj_hash = 209479575;
- cdat->dobj_593__MCASE_VARMAP.obj_len = 4;
+ cdat->dobj_595__MCASE_VARMAP.obj_num = 4;
+ cdat->dobj_595__MCASE_VARMAP.obj_hash = 341229239;
+ cdat->dobj_595__MCASE_VARMAP.obj_len = 4;
-/*inistring dstr_594__MCASE_VARMAP*/
- /*_.VALSTR___V674*/ meltfptr[673] = (void *) &cdat->dstr_594__MCASE_VARMAP;
- cdat->dstr_594__MCASE_VARMAP.discr =
+/*inistring dstr_596__MCASE_VARMAP*/
+ /*_.VALSTR___V677*/ meltfptr[676] = (void *) &cdat->dstr_596__MCASE_VARMAP;
+ cdat->dstr_596__MCASE_VARMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_594__MCASE_VARMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_596__MCASE_VARMAP.val,
"MCASE_VARMAP",
- sizeof (cdat->dstr_594__MCASE_VARMAP.val) -
+ sizeof (cdat->dstr_596__MCASE_VARMAP.val) -
1);
-/*iniobj dsym_595__CLASS_MATCHED_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V684*/ meltfptr[683])
- /*_.VALDATA___V684*/
- meltfptr[683] = (void *) &cdat->dsym_595__CLASS_MATCHED_DATA;
+/*iniobj dsym_597__CLASS_MATCHED_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V687*/ meltfptr[686])
+ /*_.VALDATA___V687*/
+ meltfptr[686] = (void *) &cdat->dsym_597__CLASS_MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_595__CLASS_MATCHED_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_597__CLASS_MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_595__CLASS_MATCHED_DATA",
+ ("iniobj check.discr objmagic dsym_597__CLASS_MATCHED_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_595__CLASS_MATCHED_DATA.meltobj_class =
+ cdat->dsym_597__CLASS_MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_595__CLASS_MATCHED_DATA.obj_hash = 1016753218;
- cdat->dsym_595__CLASS_MATCHED_DATA.obj_len = 3;
+ cdat->dsym_597__CLASS_MATCHED_DATA.obj_hash = 1016753218;
+ cdat->dsym_597__CLASS_MATCHED_DATA.obj_len = 3;
-/*inistring dstr_596__CLASS_MATCHED_DA*/
- /*_.VALSTR___V685*/ meltfptr[684] =
- (void *) &cdat->dstr_596__CLASS_MATCHED_DA;
- cdat->dstr_596__CLASS_MATCHED_DA.discr =
+/*inistring dstr_598__CLASS_MATCHED_DA*/
+ /*_.VALSTR___V688*/ meltfptr[687] =
+ (void *) &cdat->dstr_598__CLASS_MATCHED_DA;
+ cdat->dstr_598__CLASS_MATCHED_DA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_596__CLASS_MATCHED_DA.val,
+ /*small inistring */ strncpy (cdat->dstr_598__CLASS_MATCHED_DA.val,
"CLASS_MATCHED_DATA",
- sizeof (cdat->dstr_596__CLASS_MATCHED_DA.
+ sizeof (cdat->dstr_598__CLASS_MATCHED_DA.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ iniobj");
-/*iniobj dobj_597__CLASS_MATCHED_DATA*/
-/*_.VALDATA___V686*/ meltfptr[685] =
- (void *) &cdat->dobj_597__CLASS_MATCHED_DATA;
+/*iniobj dobj_599__CLASS_MATCHED_DATA*/
+/*_.VALDATA___V689*/ meltfptr[688] =
+ (void *) &cdat->dobj_599__CLASS_MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_597__CLASS_MATCHED_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_599__CLASS_MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_597__CLASS_MATCHED_DATA",
+ ("iniobj check.discr objmagic dobj_599__CLASS_MATCHED_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_597__CLASS_MATCHED_DATA.meltobj_class =
+ cdat->dobj_599__CLASS_MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_597__CLASS_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_597__CLASS_MATCHED_DATA.obj_hash = 921229870;
- cdat->dobj_597__CLASS_MATCHED_DATA.obj_len = 8;
+ cdat->dobj_599__CLASS_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_599__CLASS_MATCHED_DATA.obj_hash = 276885059;
+ cdat->dobj_599__CLASS_MATCHED_DATA.obj_len = 8;
-/*inistring dstr_598__CLASS_MATCHED_DA*/
- /*_.VALSTR___V687*/ meltfptr[686] =
- (void *) &cdat->dstr_598__CLASS_MATCHED_DA;
- cdat->dstr_598__CLASS_MATCHED_DA.discr =
+/*inistring dstr_600__CLASS_MATCHED_DA*/
+ /*_.VALSTR___V690*/ meltfptr[689] =
+ (void *) &cdat->dstr_600__CLASS_MATCHED_DA;
+ cdat->dstr_600__CLASS_MATCHED_DA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_598__CLASS_MATCHED_DA.val,
+ /*small inistring */ strncpy (cdat->dstr_600__CLASS_MATCHED_DA.val,
"CLASS_MATCHED_DATA",
- sizeof (cdat->dstr_598__CLASS_MATCHED_DA.
+ sizeof (cdat->dstr_600__CLASS_MATCHED_DA.
val) - 1);
- /*inimult dtup_599__CLASS_MATCHED_DATA */
- /*_.VALTUP___V688*/ meltfptr[687] =
- (void *) &cdat->dtup_599__CLASS_MATCHED_DATA;
- cdat->dtup_599__CLASS_MATCHED_DATA.discr =
+ /*inimult dtup_601__CLASS_MATCHED_DATA */
+ /*_.VALTUP___V691*/ meltfptr[690] =
+ (void *) &cdat->dtup_601__CLASS_MATCHED_DATA;
+ cdat->dtup_601__CLASS_MATCHED_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_599__CLASS_MATCHED_DATA.nbval = 2;
- /*inimult dtup_600__CLASS_MATCHED_DATA */
- /*_.VALTUP___V697*/ meltfptr[696] =
- (void *) &cdat->dtup_600__CLASS_MATCHED_DATA;
- cdat->dtup_600__CLASS_MATCHED_DATA.discr =
+ cdat->dtup_601__CLASS_MATCHED_DATA.nbval = 2;
+ /*inimult dtup_602__CLASS_MATCHED_DATA */
+ /*_.VALTUP___V700*/ meltfptr[699] =
+ (void *) &cdat->dtup_602__CLASS_MATCHED_DATA;
+ cdat->dtup_602__CLASS_MATCHED_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_600__CLASS_MATCHED_DATA.nbval = 5;
+ cdat->dtup_602__CLASS_MATCHED_DATA.nbval = 5;
-/*iniobj dsym_601__MDATA_SYMB*/
- /*uniqueobj*/ if (! /*_.VALDATA___V698*/ meltfptr[697])
- /*_.VALDATA___V698*/
- meltfptr[697] = (void *) &cdat->dsym_601__MDATA_SYMB;
+/*iniobj dsym_603__MDATA_SYMB*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V701*/ meltfptr[700])
+ /*_.VALDATA___V701*/
+ meltfptr[700] = (void *) &cdat->dsym_603__MDATA_SYMB;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_601__MDATA_SYMB",
+ melt_assertmsg ("iniobj check.discr isobj dsym_603__MDATA_SYMB",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_601__MDATA_SYMB",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_603__MDATA_SYMB",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_601__MDATA_SYMB.meltobj_class =
+ cdat->dsym_603__MDATA_SYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_601__MDATA_SYMB.obj_hash = 627287042;
- cdat->dsym_601__MDATA_SYMB.obj_len = 3;
+ cdat->dsym_603__MDATA_SYMB.obj_hash = 627287042;
+ cdat->dsym_603__MDATA_SYMB.obj_len = 3;
-/*inistring dstr_602__MDATA_SYMB*/
- /*_.VALSTR___V699*/ meltfptr[698] = (void *) &cdat->dstr_602__MDATA_SYMB;
- cdat->dstr_602__MDATA_SYMB.discr =
+/*inistring dstr_604__MDATA_SYMB*/
+ /*_.VALSTR___V702*/ meltfptr[701] = (void *) &cdat->dstr_604__MDATA_SYMB;
+ cdat->dstr_604__MDATA_SYMB.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_602__MDATA_SYMB.val, "MDATA_SYMB",
- sizeof (cdat->dstr_602__MDATA_SYMB.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_604__MDATA_SYMB.val, "MDATA_SYMB",
+ sizeof (cdat->dstr_604__MDATA_SYMB.val) - 1);
/*^iniobj */
-/*iniobj dobj_603__MDATA_SYMB*/
-/*_.VALDATA___V689*/ meltfptr[688] = (void *) &cdat->dobj_603__MDATA_SYMB;
+/*iniobj dobj_605__MDATA_SYMB*/
+/*_.VALDATA___V692*/ meltfptr[691] = (void *) &cdat->dobj_605__MDATA_SYMB;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_603__MDATA_SYMB",
+ melt_assertmsg ("iniobj check.discr isobj dobj_605__MDATA_SYMB",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_603__MDATA_SYMB",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_605__MDATA_SYMB",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_603__MDATA_SYMB.meltobj_class =
+ cdat->dobj_605__MDATA_SYMB.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_603__MDATA_SYMB.obj_num = 1;
- cdat->dobj_603__MDATA_SYMB.obj_hash = 496068656;
- cdat->dobj_603__MDATA_SYMB.obj_len = 4;
+ cdat->dobj_605__MDATA_SYMB.obj_num = 1;
+ cdat->dobj_605__MDATA_SYMB.obj_hash = 76458825;
+ cdat->dobj_605__MDATA_SYMB.obj_len = 4;
-/*inistring dstr_604__MDATA_SYMB*/
- /*_.VALSTR___V690*/ meltfptr[689] = (void *) &cdat->dstr_604__MDATA_SYMB;
- cdat->dstr_604__MDATA_SYMB.discr =
+/*inistring dstr_606__MDATA_SYMB*/
+ /*_.VALSTR___V693*/ meltfptr[692] = (void *) &cdat->dstr_606__MDATA_SYMB;
+ cdat->dstr_606__MDATA_SYMB.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_604__MDATA_SYMB.val, "MDATA_SYMB",
- sizeof (cdat->dstr_604__MDATA_SYMB.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_606__MDATA_SYMB.val, "MDATA_SYMB",
+ sizeof (cdat->dstr_606__MDATA_SYMB.val) - 1);
-/*iniobj dsym_605__MDATA_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V700*/ meltfptr[699])
- /*_.VALDATA___V700*/
- meltfptr[699] = (void *) &cdat->dsym_605__MDATA_CTYPE;
+/*iniobj dsym_607__MDATA_CTYPE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V703*/ meltfptr[702])
+ /*_.VALDATA___V703*/
+ meltfptr[702] = (void *) &cdat->dsym_607__MDATA_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_605__MDATA_CTYPE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_607__MDATA_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_605__MDATA_CTYPE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_607__MDATA_CTYPE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_605__MDATA_CTYPE.meltobj_class =
+ cdat->dsym_607__MDATA_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_605__MDATA_CTYPE.obj_hash = 952349489;
- cdat->dsym_605__MDATA_CTYPE.obj_len = 3;
+ cdat->dsym_607__MDATA_CTYPE.obj_hash = 952349489;
+ cdat->dsym_607__MDATA_CTYPE.obj_len = 3;
-/*inistring dstr_606__MDATA_CTYPE*/
- /*_.VALSTR___V701*/ meltfptr[700] = (void *) &cdat->dstr_606__MDATA_CTYPE;
- cdat->dstr_606__MDATA_CTYPE.discr =
+/*inistring dstr_608__MDATA_CTYPE*/
+ /*_.VALSTR___V704*/ meltfptr[703] = (void *) &cdat->dstr_608__MDATA_CTYPE;
+ cdat->dstr_608__MDATA_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_606__MDATA_CTYPE.val,
+ /*small inistring */ strncpy (cdat->dstr_608__MDATA_CTYPE.val,
"MDATA_CTYPE",
- sizeof (cdat->dstr_606__MDATA_CTYPE.val) - 1);
+ sizeof (cdat->dstr_608__MDATA_CTYPE.val) - 1);
/*^iniobj */
-/*iniobj dobj_607__MDATA_CTYPE*/
-/*_.VALDATA___V691*/ meltfptr[690] = (void *) &cdat->dobj_607__MDATA_CTYPE;
+/*iniobj dobj_609__MDATA_CTYPE*/
+/*_.VALDATA___V694*/ meltfptr[693] = (void *) &cdat->dobj_609__MDATA_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_607__MDATA_CTYPE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_609__MDATA_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_607__MDATA_CTYPE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_609__MDATA_CTYPE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_607__MDATA_CTYPE.meltobj_class =
+ cdat->dobj_609__MDATA_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_607__MDATA_CTYPE.obj_num = 2;
- cdat->dobj_607__MDATA_CTYPE.obj_hash = 464626780;
- cdat->dobj_607__MDATA_CTYPE.obj_len = 4;
+ cdat->dobj_609__MDATA_CTYPE.obj_num = 2;
+ cdat->dobj_609__MDATA_CTYPE.obj_hash = 458404740;
+ cdat->dobj_609__MDATA_CTYPE.obj_len = 4;
-/*inistring dstr_608__MDATA_CTYPE*/
- /*_.VALSTR___V692*/ meltfptr[691] = (void *) &cdat->dstr_608__MDATA_CTYPE;
- cdat->dstr_608__MDATA_CTYPE.discr =
+/*inistring dstr_610__MDATA_CTYPE*/
+ /*_.VALSTR___V695*/ meltfptr[694] = (void *) &cdat->dstr_610__MDATA_CTYPE;
+ cdat->dstr_610__MDATA_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_608__MDATA_CTYPE.val,
+ /*small inistring */ strncpy (cdat->dstr_610__MDATA_CTYPE.val,
"MDATA_CTYPE",
- sizeof (cdat->dstr_608__MDATA_CTYPE.val) - 1);
+ sizeof (cdat->dstr_610__MDATA_CTYPE.val) - 1);
-/*iniobj dsym_609__MDATA_ORIG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V702*/ meltfptr[701])
- /*_.VALDATA___V702*/
- meltfptr[701] = (void *) &cdat->dsym_609__MDATA_ORIG;
+/*iniobj dsym_611__MDATA_ORIG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V705*/ meltfptr[704])
+ /*_.VALDATA___V705*/
+ meltfptr[704] = (void *) &cdat->dsym_611__MDATA_ORIG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_609__MDATA_ORIG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_611__MDATA_ORIG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_609__MDATA_ORIG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_611__MDATA_ORIG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_609__MDATA_ORIG.meltobj_class =
+ cdat->dsym_611__MDATA_ORIG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_609__MDATA_ORIG.obj_hash = 608857395;
- cdat->dsym_609__MDATA_ORIG.obj_len = 3;
+ cdat->dsym_611__MDATA_ORIG.obj_hash = 608857395;
+ cdat->dsym_611__MDATA_ORIG.obj_len = 3;
-/*inistring dstr_610__MDATA_ORIG*/
- /*_.VALSTR___V703*/ meltfptr[702] = (void *) &cdat->dstr_610__MDATA_ORIG;
- cdat->dstr_610__MDATA_ORIG.discr =
+/*inistring dstr_612__MDATA_ORIG*/
+ /*_.VALSTR___V706*/ meltfptr[705] = (void *) &cdat->dstr_612__MDATA_ORIG;
+ cdat->dstr_612__MDATA_ORIG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_610__MDATA_ORIG.val, "MDATA_ORIG",
- sizeof (cdat->dstr_610__MDATA_ORIG.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_612__MDATA_ORIG.val, "MDATA_ORIG",
+ sizeof (cdat->dstr_612__MDATA_ORIG.val) - 1);
/*^iniobj */
-/*iniobj dobj_611__MDATA_ORIG*/
-/*_.VALDATA___V693*/ meltfptr[692] = (void *) &cdat->dobj_611__MDATA_ORIG;
+/*iniobj dobj_613__MDATA_ORIG*/
+/*_.VALDATA___V696*/ meltfptr[695] = (void *) &cdat->dobj_613__MDATA_ORIG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_611__MDATA_ORIG",
+ melt_assertmsg ("iniobj check.discr isobj dobj_613__MDATA_ORIG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_611__MDATA_ORIG",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_613__MDATA_ORIG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_611__MDATA_ORIG.meltobj_class =
+ cdat->dobj_613__MDATA_ORIG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_611__MDATA_ORIG.obj_num = 3;
- cdat->dobj_611__MDATA_ORIG.obj_hash = 872105752;
- cdat->dobj_611__MDATA_ORIG.obj_len = 4;
+ cdat->dobj_613__MDATA_ORIG.obj_num = 3;
+ cdat->dobj_613__MDATA_ORIG.obj_hash = 542770857;
+ cdat->dobj_613__MDATA_ORIG.obj_len = 4;
-/*inistring dstr_612__MDATA_ORIG*/
- /*_.VALSTR___V694*/ meltfptr[693] = (void *) &cdat->dstr_612__MDATA_ORIG;
- cdat->dstr_612__MDATA_ORIG.discr =
+/*inistring dstr_614__MDATA_ORIG*/
+ /*_.VALSTR___V697*/ meltfptr[696] = (void *) &cdat->dstr_614__MDATA_ORIG;
+ cdat->dstr_614__MDATA_ORIG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_612__MDATA_ORIG.val, "MDATA_ORIG",
- sizeof (cdat->dstr_612__MDATA_ORIG.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_614__MDATA_ORIG.val, "MDATA_ORIG",
+ sizeof (cdat->dstr_614__MDATA_ORIG.val) - 1);
-/*iniobj dsym_613__MDATA_STEPS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V704*/ meltfptr[703])
- /*_.VALDATA___V704*/
- meltfptr[703] = (void *) &cdat->dsym_613__MDATA_STEPS;
+/*iniobj dsym_615__MDATA_STEPS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V707*/ meltfptr[706])
+ /*_.VALDATA___V707*/
+ meltfptr[706] = (void *) &cdat->dsym_615__MDATA_STEPS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_613__MDATA_STEPS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_615__MDATA_STEPS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_613__MDATA_STEPS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_615__MDATA_STEPS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_613__MDATA_STEPS.meltobj_class =
+ cdat->dsym_615__MDATA_STEPS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_613__MDATA_STEPS.obj_hash = 383135857;
- cdat->dsym_613__MDATA_STEPS.obj_len = 3;
+ cdat->dsym_615__MDATA_STEPS.obj_hash = 383135857;
+ cdat->dsym_615__MDATA_STEPS.obj_len = 3;
-/*inistring dstr_614__MDATA_STEPS*/
- /*_.VALSTR___V705*/ meltfptr[704] = (void *) &cdat->dstr_614__MDATA_STEPS;
- cdat->dstr_614__MDATA_STEPS.discr =
+/*inistring dstr_616__MDATA_STEPS*/
+ /*_.VALSTR___V708*/ meltfptr[707] = (void *) &cdat->dstr_616__MDATA_STEPS;
+ cdat->dstr_616__MDATA_STEPS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_614__MDATA_STEPS.val,
+ /*small inistring */ strncpy (cdat->dstr_616__MDATA_STEPS.val,
"MDATA_STEPS",
- sizeof (cdat->dstr_614__MDATA_STEPS.val) - 1);
+ sizeof (cdat->dstr_616__MDATA_STEPS.val) - 1);
/*^iniobj */
-/*iniobj dobj_615__MDATA_STEPS*/
-/*_.VALDATA___V695*/ meltfptr[694] = (void *) &cdat->dobj_615__MDATA_STEPS;
+/*iniobj dobj_617__MDATA_STEPS*/
+/*_.VALDATA___V698*/ meltfptr[697] = (void *) &cdat->dobj_617__MDATA_STEPS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_615__MDATA_STEPS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_617__MDATA_STEPS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_615__MDATA_STEPS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_617__MDATA_STEPS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_615__MDATA_STEPS.meltobj_class =
+ cdat->dobj_617__MDATA_STEPS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_615__MDATA_STEPS.obj_num = 4;
- cdat->dobj_615__MDATA_STEPS.obj_hash = 739789577;
- cdat->dobj_615__MDATA_STEPS.obj_len = 4;
+ cdat->dobj_617__MDATA_STEPS.obj_num = 4;
+ cdat->dobj_617__MDATA_STEPS.obj_hash = 198806263;
+ cdat->dobj_617__MDATA_STEPS.obj_len = 4;
-/*inistring dstr_616__MDATA_STEPS*/
- /*_.VALSTR___V696*/ meltfptr[695] = (void *) &cdat->dstr_616__MDATA_STEPS;
- cdat->dstr_616__MDATA_STEPS.discr =
+/*inistring dstr_618__MDATA_STEPS*/
+ /*_.VALSTR___V699*/ meltfptr[698] = (void *) &cdat->dstr_618__MDATA_STEPS;
+ cdat->dstr_618__MDATA_STEPS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_616__MDATA_STEPS.val,
+ /*small inistring */ strncpy (cdat->dstr_618__MDATA_STEPS.val,
"MDATA_STEPS",
- sizeof (cdat->dstr_616__MDATA_STEPS.val) - 1);
+ sizeof (cdat->dstr_618__MDATA_STEPS.val) - 1);
-/*iniobj dsym_617__CLASS_MATCHED_NORMAL_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V706*/ meltfptr[705])
- /*_.VALDATA___V706*/
- meltfptr[705] = (void *) &cdat->dsym_617__CLASS_MATCHED_NORMAL_DATA;
+/*iniobj dsym_619__CLASS_MATCHED_NORMAL_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V709*/ meltfptr[708])
+ /*_.VALDATA___V709*/
+ meltfptr[708] = (void *) &cdat->dsym_619__CLASS_MATCHED_NORMAL_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_617__CLASS_MATCHED_NORMAL_DATA",
+ ("iniobj check.discr isobj dsym_619__CLASS_MATCHED_NORMAL_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_617__CLASS_MATCHED_NORMAL_DATA",
+ ("iniobj check.discr objmagic dsym_619__CLASS_MATCHED_NORMAL_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_617__CLASS_MATCHED_NORMAL_DATA.meltobj_class =
+ cdat->dsym_619__CLASS_MATCHED_NORMAL_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_617__CLASS_MATCHED_NORMAL_DATA.obj_hash = 609456222;
- cdat->dsym_617__CLASS_MATCHED_NORMAL_DATA.obj_len = 3;
+ cdat->dsym_619__CLASS_MATCHED_NORMAL_DATA.obj_hash = 609456222;
+ cdat->dsym_619__CLASS_MATCHED_NORMAL_DATA.obj_len = 3;
-/*inistring dstr_618__CLASS_MATCHED_NO*/
- /*_.VALSTR___V707*/ meltfptr[706] =
- (void *) &cdat->dstr_618__CLASS_MATCHED_NO;
- cdat->dstr_618__CLASS_MATCHED_NO.discr =
+/*inistring dstr_620__CLASS_MATCHED_NO*/
+ /*_.VALSTR___V710*/ meltfptr[709] =
+ (void *) &cdat->dstr_620__CLASS_MATCHED_NO;
+ cdat->dstr_620__CLASS_MATCHED_NO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_618__CLASS_MATCHED_NO.val,
+ /*small inistring */ strncpy (cdat->dstr_620__CLASS_MATCHED_NO.val,
"CLASS_MATCHED_NORMAL_DATA",
- sizeof (cdat->dstr_618__CLASS_MATCHED_NO.
+ sizeof (cdat->dstr_620__CLASS_MATCHED_NO.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ iniobj");
-/*iniobj dobj_619__CLASS_MATCHED_NORMAL_DATA*/
-/*_.VALDATA___V708*/ meltfptr[707] =
- (void *) &cdat->dobj_619__CLASS_MATCHED_NORMAL_DATA;
+/*iniobj dobj_621__CLASS_MATCHED_NORMAL_DATA*/
+/*_.VALDATA___V711*/ meltfptr[710] =
+ (void *) &cdat->dobj_621__CLASS_MATCHED_NORMAL_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_619__CLASS_MATCHED_NORMAL_DATA",
+ ("iniobj check.discr isobj dobj_621__CLASS_MATCHED_NORMAL_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_619__CLASS_MATCHED_NORMAL_DATA",
+ ("iniobj check.discr objmagic dobj_621__CLASS_MATCHED_NORMAL_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_619__CLASS_MATCHED_NORMAL_DATA.meltobj_class =
+ cdat->dobj_621__CLASS_MATCHED_NORMAL_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_619__CLASS_MATCHED_NORMAL_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_619__CLASS_MATCHED_NORMAL_DATA.obj_hash = 1069281574;
- cdat->dobj_619__CLASS_MATCHED_NORMAL_DATA.obj_len = 8;
+ cdat->dobj_621__CLASS_MATCHED_NORMAL_DATA.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_621__CLASS_MATCHED_NORMAL_DATA.obj_hash = 381934553;
+ cdat->dobj_621__CLASS_MATCHED_NORMAL_DATA.obj_len = 8;
-/*inistring dstr_620__CLASS_MATCHED_NO*/
- /*_.VALSTR___V709*/ meltfptr[708] =
- (void *) &cdat->dstr_620__CLASS_MATCHED_NO;
- cdat->dstr_620__CLASS_MATCHED_NO.discr =
+/*inistring dstr_622__CLASS_MATCHED_NO*/
+ /*_.VALSTR___V712*/ meltfptr[711] =
+ (void *) &cdat->dstr_622__CLASS_MATCHED_NO;
+ cdat->dstr_622__CLASS_MATCHED_NO.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_620__CLASS_MATCHED_NO.val,
+ /*small inistring */ strncpy (cdat->dstr_622__CLASS_MATCHED_NO.val,
"CLASS_MATCHED_NORMAL_DATA",
- sizeof (cdat->dstr_620__CLASS_MATCHED_NO.
+ sizeof (cdat->dstr_622__CLASS_MATCHED_NO.
val) - 1);
- /*inimult dtup_621__CLASS_MATCHED_NORMAL_DATA */
- /*_.VALTUP___V710*/ meltfptr[709] =
- (void *) &cdat->dtup_621__CLASS_MATCHED_NORMAL_DATA;
- cdat->dtup_621__CLASS_MATCHED_NORMAL_DATA.discr =
+ /*inimult dtup_623__CLASS_MATCHED_NORMAL_DATA */
+ /*_.VALTUP___V713*/ meltfptr[712] =
+ (void *) &cdat->dtup_623__CLASS_MATCHED_NORMAL_DATA;
+ cdat->dtup_623__CLASS_MATCHED_NORMAL_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_621__CLASS_MATCHED_NORMAL_DATA.nbval = 3;
- /*inimult dtup_622__CLASS_MATCHED_NORMAL_DATA */
- /*_.VALTUP___V711*/ meltfptr[710] =
- (void *) &cdat->dtup_622__CLASS_MATCHED_NORMAL_DATA;
- cdat->dtup_622__CLASS_MATCHED_NORMAL_DATA.discr =
+ cdat->dtup_623__CLASS_MATCHED_NORMAL_DATA.nbval = 3;
+ /*inimult dtup_624__CLASS_MATCHED_NORMAL_DATA */
+ /*_.VALTUP___V714*/ meltfptr[713] =
+ (void *) &cdat->dtup_624__CLASS_MATCHED_NORMAL_DATA;
+ cdat->dtup_624__CLASS_MATCHED_NORMAL_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_622__CLASS_MATCHED_NORMAL_DATA.nbval = 5;
+ cdat->dtup_624__CLASS_MATCHED_NORMAL_DATA.nbval = 5;
-/*iniobj dsym_623__CLASS_MATCHED_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V712*/ meltfptr[711])
- /*_.VALDATA___V712*/
- meltfptr[711] = (void *) &cdat->dsym_623__CLASS_MATCHED_BINDING;
+/*iniobj dsym_625__CLASS_MATCHED_BINDING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V715*/ meltfptr[714])
+ /*_.VALDATA___V715*/
+ meltfptr[714] = (void *) &cdat->dsym_625__CLASS_MATCHED_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_623__CLASS_MATCHED_BINDING",
+ ("iniobj check.discr isobj dsym_625__CLASS_MATCHED_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_623__CLASS_MATCHED_BINDING",
+ ("iniobj check.discr objmagic dsym_625__CLASS_MATCHED_BINDING",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_623__CLASS_MATCHED_BINDING.meltobj_class =
+ cdat->dsym_625__CLASS_MATCHED_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_623__CLASS_MATCHED_BINDING.obj_hash = 747450906;
- cdat->dsym_623__CLASS_MATCHED_BINDING.obj_len = 3;
+ cdat->dsym_625__CLASS_MATCHED_BINDING.obj_hash = 747450906;
+ cdat->dsym_625__CLASS_MATCHED_BINDING.obj_len = 3;
-/*inistring dstr_624__CLASS_MATCHED_BI*/
- /*_.VALSTR___V713*/ meltfptr[712] =
- (void *) &cdat->dstr_624__CLASS_MATCHED_BI;
- cdat->dstr_624__CLASS_MATCHED_BI.discr =
+/*inistring dstr_626__CLASS_MATCHED_BI*/
+ /*_.VALSTR___V716*/ meltfptr[715] =
+ (void *) &cdat->dstr_626__CLASS_MATCHED_BI;
+ cdat->dstr_626__CLASS_MATCHED_BI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_624__CLASS_MATCHED_BI.val,
+ /*small inistring */ strncpy (cdat->dstr_626__CLASS_MATCHED_BI.val,
"CLASS_MATCHED_BINDING",
- sizeof (cdat->dstr_624__CLASS_MATCHED_BI.
+ sizeof (cdat->dstr_626__CLASS_MATCHED_BI.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ iniobj");
-/*iniobj dobj_625__CLASS_MATCHED_BINDING*/
-/*_.VALDATA___V714*/ meltfptr[713] =
- (void *) &cdat->dobj_625__CLASS_MATCHED_BINDING;
+/*iniobj dobj_627__CLASS_MATCHED_BINDING*/
+/*_.VALDATA___V717*/ meltfptr[716] =
+ (void *) &cdat->dobj_627__CLASS_MATCHED_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_625__CLASS_MATCHED_BINDING",
+ ("iniobj check.discr isobj dobj_627__CLASS_MATCHED_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_625__CLASS_MATCHED_BINDING",
+ ("iniobj check.discr objmagic dobj_627__CLASS_MATCHED_BINDING",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_625__CLASS_MATCHED_BINDING.meltobj_class =
+ cdat->dobj_627__CLASS_MATCHED_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_625__CLASS_MATCHED_BINDING.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_625__CLASS_MATCHED_BINDING.obj_hash = 17100102;
- cdat->dobj_625__CLASS_MATCHED_BINDING.obj_len = 8;
+ cdat->dobj_627__CLASS_MATCHED_BINDING.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_627__CLASS_MATCHED_BINDING.obj_hash = 792706310;
+ cdat->dobj_627__CLASS_MATCHED_BINDING.obj_len = 8;
-/*inistring dstr_626__CLASS_MATCHED_BI*/
- /*_.VALSTR___V715*/ meltfptr[714] =
- (void *) &cdat->dstr_626__CLASS_MATCHED_BI;
- cdat->dstr_626__CLASS_MATCHED_BI.discr =
+/*inistring dstr_628__CLASS_MATCHED_BI*/
+ /*_.VALSTR___V718*/ meltfptr[717] =
+ (void *) &cdat->dstr_628__CLASS_MATCHED_BI;
+ cdat->dstr_628__CLASS_MATCHED_BI.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_626__CLASS_MATCHED_BI.val,
+ /*small inistring */ strncpy (cdat->dstr_628__CLASS_MATCHED_BI.val,
"CLASS_MATCHED_BINDING",
- sizeof (cdat->dstr_626__CLASS_MATCHED_BI.
+ sizeof (cdat->dstr_628__CLASS_MATCHED_BI.
val) - 1);
- /*inimult dtup_627__CLASS_MATCHED_BINDING */
- /*_.VALTUP___V716*/ meltfptr[715] =
- (void *) &cdat->dtup_627__CLASS_MATCHED_BINDING;
- cdat->dtup_627__CLASS_MATCHED_BINDING.discr =
+ /*inimult dtup_629__CLASS_MATCHED_BINDING */
+ /*_.VALTUP___V719*/ meltfptr[718] =
+ (void *) &cdat->dtup_629__CLASS_MATCHED_BINDING;
+ cdat->dtup_629__CLASS_MATCHED_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_627__CLASS_MATCHED_BINDING.nbval = 2;
- /*inimult dtup_628__CLASS_MATCHED_BINDING */
- /*_.VALTUP___V721*/ meltfptr[720] =
- (void *) &cdat->dtup_628__CLASS_MATCHED_BINDING;
- cdat->dtup_628__CLASS_MATCHED_BINDING.discr =
+ cdat->dtup_629__CLASS_MATCHED_BINDING.nbval = 2;
+ /*inimult dtup_630__CLASS_MATCHED_BINDING */
+ /*_.VALTUP___V724*/ meltfptr[723] =
+ (void *) &cdat->dtup_630__CLASS_MATCHED_BINDING;
+ cdat->dtup_630__CLASS_MATCHED_BINDING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_628__CLASS_MATCHED_BINDING.nbval = 3;
+ cdat->dtup_630__CLASS_MATCHED_BINDING.nbval = 3;
-/*iniobj dsym_629__MATCHBIND_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V722*/ meltfptr[721])
- /*_.VALDATA___V722*/
- meltfptr[721] = (void *) &cdat->dsym_629__MATCHBIND_DATA;
+/*iniobj dsym_631__MATCHBIND_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V725*/ meltfptr[724])
+ /*_.VALDATA___V725*/
+ meltfptr[724] = (void *) &cdat->dsym_631__MATCHBIND_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_629__MATCHBIND_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_631__MATCHBIND_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_629__MATCHBIND_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_631__MATCHBIND_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_629__MATCHBIND_DATA.meltobj_class =
+ cdat->dsym_631__MATCHBIND_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_629__MATCHBIND_DATA.obj_hash = 644146834;
- cdat->dsym_629__MATCHBIND_DATA.obj_len = 3;
+ cdat->dsym_631__MATCHBIND_DATA.obj_hash = 644146834;
+ cdat->dsym_631__MATCHBIND_DATA.obj_len = 3;
-/*inistring dstr_630__MATCHBIND_DATA*/
- /*_.VALSTR___V723*/ meltfptr[722] =
- (void *) &cdat->dstr_630__MATCHBIND_DATA;
- cdat->dstr_630__MATCHBIND_DATA.discr =
+/*inistring dstr_632__MATCHBIND_DATA*/
+ /*_.VALSTR___V726*/ meltfptr[725] =
+ (void *) &cdat->dstr_632__MATCHBIND_DATA;
+ cdat->dstr_632__MATCHBIND_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_630__MATCHBIND_DATA.val,
+ /*small inistring */ strncpy (cdat->dstr_632__MATCHBIND_DATA.val,
"MATCHBIND_DATA",
- sizeof (cdat->dstr_630__MATCHBIND_DATA.val) -
+ sizeof (cdat->dstr_632__MATCHBIND_DATA.val) -
1);
/*^iniobj */
-/*iniobj dobj_631__MATCHBIND_DATA*/
-/*_.VALDATA___V717*/ meltfptr[716] =
- (void *) &cdat->dobj_631__MATCHBIND_DATA;
+/*iniobj dobj_633__MATCHBIND_DATA*/
+/*_.VALDATA___V720*/ meltfptr[719] =
+ (void *) &cdat->dobj_633__MATCHBIND_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_631__MATCHBIND_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_633__MATCHBIND_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_631__MATCHBIND_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_633__MATCHBIND_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_631__MATCHBIND_DATA.meltobj_class =
+ cdat->dobj_633__MATCHBIND_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_631__MATCHBIND_DATA.obj_num = 1;
- cdat->dobj_631__MATCHBIND_DATA.obj_hash = 3795308;
- cdat->dobj_631__MATCHBIND_DATA.obj_len = 4;
+ cdat->dobj_633__MATCHBIND_DATA.obj_num = 1;
+ cdat->dobj_633__MATCHBIND_DATA.obj_hash = 619819091;
+ cdat->dobj_633__MATCHBIND_DATA.obj_len = 4;
-/*inistring dstr_632__MATCHBIND_DATA*/
- /*_.VALSTR___V718*/ meltfptr[717] =
- (void *) &cdat->dstr_632__MATCHBIND_DATA;
- cdat->dstr_632__MATCHBIND_DATA.discr =
+/*inistring dstr_634__MATCHBIND_DATA*/
+ /*_.VALSTR___V721*/ meltfptr[720] =
+ (void *) &cdat->dstr_634__MATCHBIND_DATA;
+ cdat->dstr_634__MATCHBIND_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_632__MATCHBIND_DATA.val,
+ /*small inistring */ strncpy (cdat->dstr_634__MATCHBIND_DATA.val,
"MATCHBIND_DATA",
- sizeof (cdat->dstr_632__MATCHBIND_DATA.val) -
+ sizeof (cdat->dstr_634__MATCHBIND_DATA.val) -
1);
-/*iniobj dsym_633__MATCHBIND_NBOCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V724*/ meltfptr[723])
- /*_.VALDATA___V724*/
- meltfptr[723] = (void *) &cdat->dsym_633__MATCHBIND_NBOCC;
+/*iniobj dsym_635__MATCHBIND_NBOCC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V727*/ meltfptr[726])
+ /*_.VALDATA___V727*/
+ meltfptr[726] = (void *) &cdat->dsym_635__MATCHBIND_NBOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_633__MATCHBIND_NBOCC",
+ melt_assertmsg ("iniobj check.discr isobj dsym_635__MATCHBIND_NBOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_633__MATCHBIND_NBOCC",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_635__MATCHBIND_NBOCC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_633__MATCHBIND_NBOCC.meltobj_class =
+ cdat->dsym_635__MATCHBIND_NBOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_633__MATCHBIND_NBOCC.obj_hash = 159965387;
- cdat->dsym_633__MATCHBIND_NBOCC.obj_len = 3;
+ cdat->dsym_635__MATCHBIND_NBOCC.obj_hash = 159965387;
+ cdat->dsym_635__MATCHBIND_NBOCC.obj_len = 3;
-/*inistring dstr_634__MATCHBIND_NBOCC*/
- /*_.VALSTR___V725*/ meltfptr[724] =
- (void *) &cdat->dstr_634__MATCHBIND_NBOCC;
- cdat->dstr_634__MATCHBIND_NBOCC.discr =
+/*inistring dstr_636__MATCHBIND_NBOCC*/
+ /*_.VALSTR___V728*/ meltfptr[727] =
+ (void *) &cdat->dstr_636__MATCHBIND_NBOCC;
+ cdat->dstr_636__MATCHBIND_NBOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_634__MATCHBIND_NBOCC.val,
+ /*small inistring */ strncpy (cdat->dstr_636__MATCHBIND_NBOCC.val,
"MATCHBIND_NBOCC",
- sizeof (cdat->dstr_634__MATCHBIND_NBOCC.val) -
+ sizeof (cdat->dstr_636__MATCHBIND_NBOCC.val) -
1);
/*^iniobj */
-/*iniobj dobj_635__MATCHBIND_NBOCC*/
-/*_.VALDATA___V719*/ meltfptr[718] =
- (void *) &cdat->dobj_635__MATCHBIND_NBOCC;
+/*iniobj dobj_637__MATCHBIND_NBOCC*/
+/*_.VALDATA___V722*/ meltfptr[721] =
+ (void *) &cdat->dobj_637__MATCHBIND_NBOCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_635__MATCHBIND_NBOCC",
+ melt_assertmsg ("iniobj check.discr isobj dobj_637__MATCHBIND_NBOCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_635__MATCHBIND_NBOCC",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_637__MATCHBIND_NBOCC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_635__MATCHBIND_NBOCC.meltobj_class =
+ cdat->dobj_637__MATCHBIND_NBOCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_635__MATCHBIND_NBOCC.obj_num = 2;
- cdat->dobj_635__MATCHBIND_NBOCC.obj_hash = 717194951;
- cdat->dobj_635__MATCHBIND_NBOCC.obj_len = 4;
+ cdat->dobj_637__MATCHBIND_NBOCC.obj_num = 2;
+ cdat->dobj_637__MATCHBIND_NBOCC.obj_hash = 24239065;
+ cdat->dobj_637__MATCHBIND_NBOCC.obj_len = 4;
-/*inistring dstr_636__MATCHBIND_NBOCC*/
- /*_.VALSTR___V720*/ meltfptr[719] =
- (void *) &cdat->dstr_636__MATCHBIND_NBOCC;
- cdat->dstr_636__MATCHBIND_NBOCC.discr =
+/*inistring dstr_638__MATCHBIND_NBOCC*/
+ /*_.VALSTR___V723*/ meltfptr[722] =
+ (void *) &cdat->dstr_638__MATCHBIND_NBOCC;
+ cdat->dstr_638__MATCHBIND_NBOCC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_636__MATCHBIND_NBOCC.val,
+ /*small inistring */ strncpy (cdat->dstr_638__MATCHBIND_NBOCC.val,
"MATCHBIND_NBOCC",
- sizeof (cdat->dstr_636__MATCHBIND_NBOCC.val) -
+ sizeof (cdat->dstr_638__MATCHBIND_NBOCC.val) -
1);
- /*inirout drout_637__NORMBIND_MATCHBIND */
- /*_.VALROUT___V726*/ meltfptr[725] =
- (void *) &cdat->drout_637__NORMBIND_MATCHBIND;
- cdat->drout_637__NORMBIND_MATCHBIND.discr =
+ /*inirout drout_639__NORMBIND_MATCHBIND */
+ /*_.VALROUT___V729*/ meltfptr[728] =
+ (void *) &cdat->drout_639__NORMBIND_MATCHBIND;
+ cdat->drout_639__NORMBIND_MATCHBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_637__NORMBIND_MATCHBIND.routdescr,
- "NORMBIND_MATCHBIND @warmelt-normatch.melt:2659",
+ strncpy (cdat->drout_639__NORMBIND_MATCHBIND.routdescr,
+ "NORMBIND_MATCHBIND @warmelt-normatch.melt:2670",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_637__NORMBIND_MATCHBIND.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_637__NORMBIND_MATCHBIND,
- meltrout_52_warmelt_normatch_NORMBIND_MATCHBIND);
-
- /*iniclos dclo_638__NORMBIND_MATCHBIND */
- /*_.VALCLO___V727*/ meltfptr[726] =
- (void *) &cdat->dclo_638__NORMBIND_MATCHBIND;
- cdat->dclo_638__NORMBIND_MATCHBIND.discr =
+ cdat->drout_639__NORMBIND_MATCHBIND.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_639__NORMBIND_MATCHBIND,
+ meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND);
+
+ /*iniclos dclo_640__NORMBIND_MATCHBIND */
+ /*_.VALCLO___V730*/ meltfptr[729] =
+ (void *) &cdat->dclo_640__NORMBIND_MATCHBIND;
+ cdat->dclo_640__NORMBIND_MATCHBIND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_638__NORMBIND_MATCHBIND.nbval = 0;
+ cdat->dclo_640__NORMBIND_MATCHBIND.nbval = 0;
-/*iniobj dsym_639__NORMALIZE_BINDING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V728*/ meltfptr[727])
- /*_.VALDATA___V728*/
- meltfptr[727] = (void *) &cdat->dsym_639__NORMALIZE_BINDING;
+/*iniobj dsym_641__NORMALIZE_BINDING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V731*/ meltfptr[730])
+ /*_.VALDATA___V731*/
+ meltfptr[730] = (void *) &cdat->dsym_641__NORMALIZE_BINDING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_639__NORMALIZE_BINDING",
+ melt_assertmsg ("iniobj check.discr isobj dsym_641__NORMALIZE_BINDING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_639__NORMALIZE_BINDING",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_641__NORMALIZE_BINDING",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_639__NORMALIZE_BINDING.meltobj_class =
+ cdat->dsym_641__NORMALIZE_BINDING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_639__NORMALIZE_BINDING.obj_hash = 689313377;
- cdat->dsym_639__NORMALIZE_BINDING.obj_len = 3;
+ cdat->dsym_641__NORMALIZE_BINDING.obj_hash = 689313377;
+ cdat->dsym_641__NORMALIZE_BINDING.obj_len = 3;
-/*inistring dstr_640__NORMALIZE_BINDIN*/
- /*_.VALSTR___V729*/ meltfptr[728] =
- (void *) &cdat->dstr_640__NORMALIZE_BINDIN;
- cdat->dstr_640__NORMALIZE_BINDIN.discr =
+/*inistring dstr_642__NORMALIZE_BINDIN*/
+ /*_.VALSTR___V732*/ meltfptr[731] =
+ (void *) &cdat->dstr_642__NORMALIZE_BINDIN;
+ cdat->dstr_642__NORMALIZE_BINDIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_640__NORMALIZE_BINDIN.val,
+ /*small inistring */ strncpy (cdat->dstr_642__NORMALIZE_BINDIN.val,
"NORMALIZE_BINDING",
- sizeof (cdat->dstr_640__NORMALIZE_BINDIN.
+ sizeof (cdat->dstr_642__NORMALIZE_BINDIN.
val) - 1);
-/*iniobj dsym_641__CLASS_MATCH_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V730*/ meltfptr[729])
- /*_.VALDATA___V730*/
- meltfptr[729] = (void *) &cdat->dsym_641__CLASS_MATCH_FLAG;
+/*iniobj dsym_643__CLASS_MATCH_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V733*/ meltfptr[732])
+ /*_.VALDATA___V733*/
+ meltfptr[732] = (void *) &cdat->dsym_643__CLASS_MATCH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_641__CLASS_MATCH_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_643__CLASS_MATCH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_641__CLASS_MATCH_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_643__CLASS_MATCH_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_641__CLASS_MATCH_FLAG.meltobj_class =
+ cdat->dsym_643__CLASS_MATCH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_641__CLASS_MATCH_FLAG.obj_hash = 1656306;
- cdat->dsym_641__CLASS_MATCH_FLAG.obj_len = 3;
+ cdat->dsym_643__CLASS_MATCH_FLAG.obj_hash = 1656306;
+ cdat->dsym_643__CLASS_MATCH_FLAG.obj_len = 3;
-/*inistring dstr_642__CLASS_MATCH_FLAG*/
- /*_.VALSTR___V731*/ meltfptr[730] =
- (void *) &cdat->dstr_642__CLASS_MATCH_FLAG;
- cdat->dstr_642__CLASS_MATCH_FLAG.discr =
+/*inistring dstr_644__CLASS_MATCH_FLAG*/
+ /*_.VALSTR___V734*/ meltfptr[733] =
+ (void *) &cdat->dstr_644__CLASS_MATCH_FLAG;
+ cdat->dstr_644__CLASS_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_642__CLASS_MATCH_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_644__CLASS_MATCH_FLAG.val,
"CLASS_MATCH_FLAG",
- sizeof (cdat->dstr_642__CLASS_MATCH_FLAG.
+ sizeof (cdat->dstr_644__CLASS_MATCH_FLAG.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ iniobj");
-/*iniobj dobj_643__CLASS_MATCH_FLAG*/
-/*_.VALDATA___V732*/ meltfptr[731] =
- (void *) &cdat->dobj_643__CLASS_MATCH_FLAG;
+/*iniobj dobj_645__CLASS_MATCH_FLAG*/
+/*_.VALDATA___V735*/ meltfptr[734] =
+ (void *) &cdat->dobj_645__CLASS_MATCH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_643__CLASS_MATCH_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dobj_645__CLASS_MATCH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_643__CLASS_MATCH_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_645__CLASS_MATCH_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_643__CLASS_MATCH_FLAG.meltobj_class =
+ cdat->dobj_645__CLASS_MATCH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_643__CLASS_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_643__CLASS_MATCH_FLAG.obj_hash = 904566211;
- cdat->dobj_643__CLASS_MATCH_FLAG.obj_len = 8;
+ cdat->dobj_645__CLASS_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_645__CLASS_MATCH_FLAG.obj_hash = 879120376;
+ cdat->dobj_645__CLASS_MATCH_FLAG.obj_len = 8;
-/*inistring dstr_644__CLASS_MATCH_FLAG*/
- /*_.VALSTR___V733*/ meltfptr[732] =
- (void *) &cdat->dstr_644__CLASS_MATCH_FLAG;
- cdat->dstr_644__CLASS_MATCH_FLAG.discr =
+/*inistring dstr_646__CLASS_MATCH_FLAG*/
+ /*_.VALSTR___V736*/ meltfptr[735] =
+ (void *) &cdat->dstr_646__CLASS_MATCH_FLAG;
+ cdat->dstr_646__CLASS_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_644__CLASS_MATCH_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_646__CLASS_MATCH_FLAG.val,
"CLASS_MATCH_FLAG",
- sizeof (cdat->dstr_644__CLASS_MATCH_FLAG.
+ sizeof (cdat->dstr_646__CLASS_MATCH_FLAG.
val) - 1);
- /*inimult dtup_645__CLASS_MATCH_FLAG */
- /*_.VALTUP___V734*/ meltfptr[733] =
- (void *) &cdat->dtup_645__CLASS_MATCH_FLAG;
- cdat->dtup_645__CLASS_MATCH_FLAG.discr =
+ /*inimult dtup_647__CLASS_MATCH_FLAG */
+ /*_.VALTUP___V737*/ meltfptr[736] =
+ (void *) &cdat->dtup_647__CLASS_MATCH_FLAG;
+ cdat->dtup_647__CLASS_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_645__CLASS_MATCH_FLAG.nbval = 3;
- /*inimult dtup_646__CLASS_MATCH_FLAG */
- /*_.VALTUP___V743*/ meltfptr[742] =
- (void *) &cdat->dtup_646__CLASS_MATCH_FLAG;
- cdat->dtup_646__CLASS_MATCH_FLAG.discr =
+ cdat->dtup_647__CLASS_MATCH_FLAG.nbval = 3;
+ /*inimult dtup_648__CLASS_MATCH_FLAG */
+ /*_.VALTUP___V746*/ meltfptr[745] =
+ (void *) &cdat->dtup_648__CLASS_MATCH_FLAG;
+ cdat->dtup_648__CLASS_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_646__CLASS_MATCH_FLAG.nbval = 6;
+ cdat->dtup_648__CLASS_MATCH_FLAG.nbval = 6;
-/*iniobj dsym_647__MFLAG_SPAT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V744*/ meltfptr[743])
- /*_.VALDATA___V744*/
- meltfptr[743] = (void *) &cdat->dsym_647__MFLAG_SPAT;
+/*iniobj dsym_649__MFLAG_SPAT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V747*/ meltfptr[746])
+ /*_.VALDATA___V747*/
+ meltfptr[746] = (void *) &cdat->dsym_649__MFLAG_SPAT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_647__MFLAG_SPAT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_649__MFLAG_SPAT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_647__MFLAG_SPAT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_649__MFLAG_SPAT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_647__MFLAG_SPAT.meltobj_class =
+ cdat->dsym_649__MFLAG_SPAT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_647__MFLAG_SPAT.obj_hash = 62636525;
- cdat->dsym_647__MFLAG_SPAT.obj_len = 3;
+ cdat->dsym_649__MFLAG_SPAT.obj_hash = 62636525;
+ cdat->dsym_649__MFLAG_SPAT.obj_len = 3;
-/*inistring dstr_648__MFLAG_SPAT*/
- /*_.VALSTR___V745*/ meltfptr[744] = (void *) &cdat->dstr_648__MFLAG_SPAT;
- cdat->dstr_648__MFLAG_SPAT.discr =
+/*inistring dstr_650__MFLAG_SPAT*/
+ /*_.VALSTR___V748*/ meltfptr[747] = (void *) &cdat->dstr_650__MFLAG_SPAT;
+ cdat->dstr_650__MFLAG_SPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_648__MFLAG_SPAT.val, "MFLAG_SPAT",
- sizeof (cdat->dstr_648__MFLAG_SPAT.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_650__MFLAG_SPAT.val, "MFLAG_SPAT",
+ sizeof (cdat->dstr_650__MFLAG_SPAT.val) - 1);
/*^iniobj */
-/*iniobj dobj_649__MFLAG_SPAT*/
-/*_.VALDATA___V735*/ meltfptr[734] = (void *) &cdat->dobj_649__MFLAG_SPAT;
+/*iniobj dobj_651__MFLAG_SPAT*/
+/*_.VALDATA___V738*/ meltfptr[737] = (void *) &cdat->dobj_651__MFLAG_SPAT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_649__MFLAG_SPAT",
+ melt_assertmsg ("iniobj check.discr isobj dobj_651__MFLAG_SPAT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_649__MFLAG_SPAT",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_651__MFLAG_SPAT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_649__MFLAG_SPAT.meltobj_class =
+ cdat->dobj_651__MFLAG_SPAT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_649__MFLAG_SPAT.obj_num = 2;
- cdat->dobj_649__MFLAG_SPAT.obj_hash = 552265303;
- cdat->dobj_649__MFLAG_SPAT.obj_len = 4;
+ cdat->dobj_651__MFLAG_SPAT.obj_num = 2;
+ cdat->dobj_651__MFLAG_SPAT.obj_hash = 510709577;
+ cdat->dobj_651__MFLAG_SPAT.obj_len = 4;
-/*inistring dstr_650__MFLAG_SPAT*/
- /*_.VALSTR___V736*/ meltfptr[735] = (void *) &cdat->dstr_650__MFLAG_SPAT;
- cdat->dstr_650__MFLAG_SPAT.discr =
+/*inistring dstr_652__MFLAG_SPAT*/
+ /*_.VALSTR___V739*/ meltfptr[738] = (void *) &cdat->dstr_652__MFLAG_SPAT;
+ cdat->dstr_652__MFLAG_SPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_650__MFLAG_SPAT.val, "MFLAG_SPAT",
- sizeof (cdat->dstr_650__MFLAG_SPAT.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_652__MFLAG_SPAT.val, "MFLAG_SPAT",
+ sizeof (cdat->dstr_652__MFLAG_SPAT.val) - 1);
-/*iniobj dsym_651__MFLAG_RANK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V746*/ meltfptr[745])
- /*_.VALDATA___V746*/
- meltfptr[745] = (void *) &cdat->dsym_651__MFLAG_RANK;
+/*iniobj dsym_653__MFLAG_RANK*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V749*/ meltfptr[748])
+ /*_.VALDATA___V749*/
+ meltfptr[748] = (void *) &cdat->dsym_653__MFLAG_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_651__MFLAG_RANK",
+ melt_assertmsg ("iniobj check.discr isobj dsym_653__MFLAG_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_651__MFLAG_RANK",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_653__MFLAG_RANK",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_651__MFLAG_RANK.meltobj_class =
+ cdat->dsym_653__MFLAG_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_651__MFLAG_RANK.obj_hash = 707610330;
- cdat->dsym_651__MFLAG_RANK.obj_len = 3;
+ cdat->dsym_653__MFLAG_RANK.obj_hash = 707610330;
+ cdat->dsym_653__MFLAG_RANK.obj_len = 3;
-/*inistring dstr_652__MFLAG_RANK*/
- /*_.VALSTR___V747*/ meltfptr[746] = (void *) &cdat->dstr_652__MFLAG_RANK;
- cdat->dstr_652__MFLAG_RANK.discr =
+/*inistring dstr_654__MFLAG_RANK*/
+ /*_.VALSTR___V750*/ meltfptr[749] = (void *) &cdat->dstr_654__MFLAG_RANK;
+ cdat->dstr_654__MFLAG_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_652__MFLAG_RANK.val, "MFLAG_RANK",
- sizeof (cdat->dstr_652__MFLAG_RANK.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_654__MFLAG_RANK.val, "MFLAG_RANK",
+ sizeof (cdat->dstr_654__MFLAG_RANK.val) - 1);
/*^iniobj */
-/*iniobj dobj_653__MFLAG_RANK*/
-/*_.VALDATA___V737*/ meltfptr[736] = (void *) &cdat->dobj_653__MFLAG_RANK;
+/*iniobj dobj_655__MFLAG_RANK*/
+/*_.VALDATA___V740*/ meltfptr[739] = (void *) &cdat->dobj_655__MFLAG_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_653__MFLAG_RANK",
+ melt_assertmsg ("iniobj check.discr isobj dobj_655__MFLAG_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_653__MFLAG_RANK",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_655__MFLAG_RANK",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_653__MFLAG_RANK.meltobj_class =
+ cdat->dobj_655__MFLAG_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_653__MFLAG_RANK.obj_num = 3;
- cdat->dobj_653__MFLAG_RANK.obj_hash = 609375161;
- cdat->dobj_653__MFLAG_RANK.obj_len = 4;
+ cdat->dobj_655__MFLAG_RANK.obj_num = 3;
+ cdat->dobj_655__MFLAG_RANK.obj_hash = 29491552;
+ cdat->dobj_655__MFLAG_RANK.obj_len = 4;
-/*inistring dstr_654__MFLAG_RANK*/
- /*_.VALSTR___V738*/ meltfptr[737] = (void *) &cdat->dstr_654__MFLAG_RANK;
- cdat->dstr_654__MFLAG_RANK.discr =
+/*inistring dstr_656__MFLAG_RANK*/
+ /*_.VALSTR___V741*/ meltfptr[740] = (void *) &cdat->dstr_656__MFLAG_RANK;
+ cdat->dstr_656__MFLAG_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_654__MFLAG_RANK.val, "MFLAG_RANK",
- sizeof (cdat->dstr_654__MFLAG_RANK.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_656__MFLAG_RANK.val, "MFLAG_RANK",
+ sizeof (cdat->dstr_656__MFLAG_RANK.val) - 1);
-/*iniobj dsym_655__MFLAG_STRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V748*/ meltfptr[747])
- /*_.VALDATA___V748*/
- meltfptr[747] = (void *) &cdat->dsym_655__MFLAG_STRING;
+/*iniobj dsym_657__MFLAG_STRING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V751*/ meltfptr[750])
+ /*_.VALDATA___V751*/
+ meltfptr[750] = (void *) &cdat->dsym_657__MFLAG_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_655__MFLAG_STRING",
+ melt_assertmsg ("iniobj check.discr isobj dsym_657__MFLAG_STRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_655__MFLAG_STRING",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_657__MFLAG_STRING",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_655__MFLAG_STRING.meltobj_class =
+ cdat->dsym_657__MFLAG_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_655__MFLAG_STRING.obj_hash = 984613516;
- cdat->dsym_655__MFLAG_STRING.obj_len = 3;
+ cdat->dsym_657__MFLAG_STRING.obj_hash = 984613516;
+ cdat->dsym_657__MFLAG_STRING.obj_len = 3;
-/*inistring dstr_656__MFLAG_STRING*/
- /*_.VALSTR___V749*/ meltfptr[748] = (void *) &cdat->dstr_656__MFLAG_STRING;
- cdat->dstr_656__MFLAG_STRING.discr =
+/*inistring dstr_658__MFLAG_STRING*/
+ /*_.VALSTR___V752*/ meltfptr[751] = (void *) &cdat->dstr_658__MFLAG_STRING;
+ cdat->dstr_658__MFLAG_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_656__MFLAG_STRING.val,
+ /*small inistring */ strncpy (cdat->dstr_658__MFLAG_STRING.val,
"MFLAG_STRING",
- sizeof (cdat->dstr_656__MFLAG_STRING.val) -
+ sizeof (cdat->dstr_658__MFLAG_STRING.val) -
1);
/*^iniobj */
-/*iniobj dobj_657__MFLAG_STRING*/
-/*_.VALDATA___V739*/ meltfptr[738] = (void *) &cdat->dobj_657__MFLAG_STRING;
+/*iniobj dobj_659__MFLAG_STRING*/
+/*_.VALDATA___V742*/ meltfptr[741] = (void *) &cdat->dobj_659__MFLAG_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_657__MFLAG_STRING",
+ melt_assertmsg ("iniobj check.discr isobj dobj_659__MFLAG_STRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_657__MFLAG_STRING",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_659__MFLAG_STRING",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_657__MFLAG_STRING.meltobj_class =
+ cdat->dobj_659__MFLAG_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_657__MFLAG_STRING.obj_num = 4;
- cdat->dobj_657__MFLAG_STRING.obj_hash = 9406714;
- cdat->dobj_657__MFLAG_STRING.obj_len = 4;
+ cdat->dobj_659__MFLAG_STRING.obj_num = 4;
+ cdat->dobj_659__MFLAG_STRING.obj_hash = 272857797;
+ cdat->dobj_659__MFLAG_STRING.obj_len = 4;
-/*inistring dstr_658__MFLAG_STRING*/
- /*_.VALSTR___V740*/ meltfptr[739] = (void *) &cdat->dstr_658__MFLAG_STRING;
- cdat->dstr_658__MFLAG_STRING.discr =
+/*inistring dstr_660__MFLAG_STRING*/
+ /*_.VALSTR___V743*/ meltfptr[742] = (void *) &cdat->dstr_660__MFLAG_STRING;
+ cdat->dstr_660__MFLAG_STRING.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_658__MFLAG_STRING.val,
+ /*small inistring */ strncpy (cdat->dstr_660__MFLAG_STRING.val,
"MFLAG_STRING",
- sizeof (cdat->dstr_658__MFLAG_STRING.val) -
+ sizeof (cdat->dstr_660__MFLAG_STRING.val) -
1);
-/*iniobj dsym_659__MFLAG_SETSTEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V750*/ meltfptr[749])
- /*_.VALDATA___V750*/
- meltfptr[749] = (void *) &cdat->dsym_659__MFLAG_SETSTEP;
+/*iniobj dsym_661__MFLAG_SETSTEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V753*/ meltfptr[752])
+ /*_.VALDATA___V753*/
+ meltfptr[752] = (void *) &cdat->dsym_661__MFLAG_SETSTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_659__MFLAG_SETSTEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_661__MFLAG_SETSTEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_659__MFLAG_SETSTEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_661__MFLAG_SETSTEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_659__MFLAG_SETSTEP.meltobj_class =
+ cdat->dsym_661__MFLAG_SETSTEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_659__MFLAG_SETSTEP.obj_hash = 135121117;
- cdat->dsym_659__MFLAG_SETSTEP.obj_len = 3;
+ cdat->dsym_661__MFLAG_SETSTEP.obj_hash = 135121117;
+ cdat->dsym_661__MFLAG_SETSTEP.obj_len = 3;
-/*inistring dstr_660__MFLAG_SETSTEP*/
- /*_.VALSTR___V751*/ meltfptr[750] = (void *) &cdat->dstr_660__MFLAG_SETSTEP;
- cdat->dstr_660__MFLAG_SETSTEP.discr =
+/*inistring dstr_662__MFLAG_SETSTEP*/
+ /*_.VALSTR___V754*/ meltfptr[753] = (void *) &cdat->dstr_662__MFLAG_SETSTEP;
+ cdat->dstr_662__MFLAG_SETSTEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_660__MFLAG_SETSTEP.val,
+ /*small inistring */ strncpy (cdat->dstr_662__MFLAG_SETSTEP.val,
"MFLAG_SETSTEP",
- sizeof (cdat->dstr_660__MFLAG_SETSTEP.val) -
+ sizeof (cdat->dstr_662__MFLAG_SETSTEP.val) -
1);
/*^iniobj */
-/*iniobj dobj_661__MFLAG_SETSTEP*/
-/*_.VALDATA___V741*/ meltfptr[740] =
- (void *) &cdat->dobj_661__MFLAG_SETSTEP;
+/*iniobj dobj_663__MFLAG_SETSTEP*/
+/*_.VALDATA___V744*/ meltfptr[743] =
+ (void *) &cdat->dobj_663__MFLAG_SETSTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_661__MFLAG_SETSTEP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_663__MFLAG_SETSTEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_661__MFLAG_SETSTEP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_663__MFLAG_SETSTEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_661__MFLAG_SETSTEP.meltobj_class =
+ cdat->dobj_663__MFLAG_SETSTEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_661__MFLAG_SETSTEP.obj_num = 5;
- cdat->dobj_661__MFLAG_SETSTEP.obj_hash = 100632524;
- cdat->dobj_661__MFLAG_SETSTEP.obj_len = 4;
+ cdat->dobj_663__MFLAG_SETSTEP.obj_num = 5;
+ cdat->dobj_663__MFLAG_SETSTEP.obj_hash = 1012191021;
+ cdat->dobj_663__MFLAG_SETSTEP.obj_len = 4;
-/*inistring dstr_662__MFLAG_SETSTEP*/
- /*_.VALSTR___V742*/ meltfptr[741] = (void *) &cdat->dstr_662__MFLAG_SETSTEP;
- cdat->dstr_662__MFLAG_SETSTEP.discr =
+/*inistring dstr_664__MFLAG_SETSTEP*/
+ /*_.VALSTR___V745*/ meltfptr[744] = (void *) &cdat->dstr_664__MFLAG_SETSTEP;
+ cdat->dstr_664__MFLAG_SETSTEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_662__MFLAG_SETSTEP.val,
+ /*small inistring */ strncpy (cdat->dstr_664__MFLAG_SETSTEP.val,
"MFLAG_SETSTEP",
- sizeof (cdat->dstr_662__MFLAG_SETSTEP.val) -
+ sizeof (cdat->dstr_664__MFLAG_SETSTEP.val) -
1);
-/*iniobj dsym_663__CLASS_MATCH_STEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V752*/ meltfptr[751])
- /*_.VALDATA___V752*/
- meltfptr[751] = (void *) &cdat->dsym_663__CLASS_MATCH_STEP;
+/*iniobj dsym_665__CLASS_MATCH_STEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V755*/ meltfptr[754])
+ /*_.VALDATA___V755*/
+ meltfptr[754] = (void *) &cdat->dsym_665__CLASS_MATCH_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_663__CLASS_MATCH_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_665__CLASS_MATCH_STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_663__CLASS_MATCH_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_665__CLASS_MATCH_STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_663__CLASS_MATCH_STEP.meltobj_class =
+ cdat->dsym_665__CLASS_MATCH_STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_663__CLASS_MATCH_STEP.obj_hash = 881977963;
- cdat->dsym_663__CLASS_MATCH_STEP.obj_len = 3;
+ cdat->dsym_665__CLASS_MATCH_STEP.obj_hash = 881977963;
+ cdat->dsym_665__CLASS_MATCH_STEP.obj_len = 3;
-/*inistring dstr_664__CLASS_MATCH_STEP*/
- /*_.VALSTR___V753*/ meltfptr[752] =
- (void *) &cdat->dstr_664__CLASS_MATCH_STEP;
- cdat->dstr_664__CLASS_MATCH_STEP.discr =
+/*inistring dstr_666__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V756*/ meltfptr[755] =
+ (void *) &cdat->dstr_666__CLASS_MATCH_STEP;
+ cdat->dstr_666__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_664__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_666__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP",
- sizeof (cdat->dstr_664__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_666__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ iniobj");
-/*iniobj dobj_665__CLASS_MATCH_STEP*/
-/*_.VALDATA___V754*/ meltfptr[753] =
- (void *) &cdat->dobj_665__CLASS_MATCH_STEP;
+/*iniobj dobj_667__CLASS_MATCH_STEP*/
+/*_.VALDATA___V757*/ meltfptr[756] =
+ (void *) &cdat->dobj_667__CLASS_MATCH_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_665__CLASS_MATCH_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_667__CLASS_MATCH_STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_665__CLASS_MATCH_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_667__CLASS_MATCH_STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_665__CLASS_MATCH_STEP.meltobj_class =
+ cdat->dobj_667__CLASS_MATCH_STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_665__CLASS_MATCH_STEP.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_665__CLASS_MATCH_STEP.obj_hash = 816943310;
- cdat->dobj_665__CLASS_MATCH_STEP.obj_len = 8;
+ cdat->dobj_667__CLASS_MATCH_STEP.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_667__CLASS_MATCH_STEP.obj_hash = 422259127;
+ cdat->dobj_667__CLASS_MATCH_STEP.obj_len = 8;
-/*inistring dstr_666__CLASS_MATCH_STEP*/
- /*_.VALSTR___V755*/ meltfptr[754] =
- (void *) &cdat->dstr_666__CLASS_MATCH_STEP;
- cdat->dstr_666__CLASS_MATCH_STEP.discr =
+/*inistring dstr_668__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V758*/ meltfptr[757] =
+ (void *) &cdat->dstr_668__CLASS_MATCH_STEP;
+ cdat->dstr_668__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_666__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_668__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP",
- sizeof (cdat->dstr_666__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_668__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_667__CLASS_MATCH_STEP */
- /*_.VALTUP___V756*/ meltfptr[755] =
- (void *) &cdat->dtup_667__CLASS_MATCH_STEP;
- cdat->dtup_667__CLASS_MATCH_STEP.discr =
+ /*inimult dtup_669__CLASS_MATCH_STEP */
+ /*_.VALTUP___V759*/ meltfptr[758] =
+ (void *) &cdat->dtup_669__CLASS_MATCH_STEP;
+ cdat->dtup_669__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_667__CLASS_MATCH_STEP.nbval = 3;
- /*inimult dtup_668__CLASS_MATCH_STEP */
- /*_.VALTUP___V757*/ meltfptr[756] =
- (void *) &cdat->dtup_668__CLASS_MATCH_STEP;
- cdat->dtup_668__CLASS_MATCH_STEP.discr =
+ cdat->dtup_669__CLASS_MATCH_STEP.nbval = 3;
+ /*inimult dtup_670__CLASS_MATCH_STEP */
+ /*_.VALTUP___V760*/ meltfptr[759] =
+ (void *) &cdat->dtup_670__CLASS_MATCH_STEP;
+ cdat->dtup_670__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_668__CLASS_MATCH_STEP.nbval = 2;
+ cdat->dtup_670__CLASS_MATCH_STEP.nbval = 2;
-/*iniobj dsym_669__CLASS_MATCH_STEP_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V758*/ meltfptr[757])
- /*_.VALDATA___V758*/
- meltfptr[757] = (void *) &cdat->dsym_669__CLASS_MATCH_STEP_THEN;
+/*iniobj dsym_671__CLASS_MATCH_STEP_THEN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V761*/ meltfptr[760])
+ /*_.VALDATA___V761*/
+ meltfptr[760] = (void *) &cdat->dsym_671__CLASS_MATCH_STEP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_669__CLASS_MATCH_STEP_THEN",
+ ("iniobj check.discr isobj dsym_671__CLASS_MATCH_STEP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_669__CLASS_MATCH_STEP_THEN",
+ ("iniobj check.discr objmagic dsym_671__CLASS_MATCH_STEP_THEN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_669__CLASS_MATCH_STEP_THEN.meltobj_class =
+ cdat->dsym_671__CLASS_MATCH_STEP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_669__CLASS_MATCH_STEP_THEN.obj_hash = 406042424;
- cdat->dsym_669__CLASS_MATCH_STEP_THEN.obj_len = 3;
+ cdat->dsym_671__CLASS_MATCH_STEP_THEN.obj_hash = 406042424;
+ cdat->dsym_671__CLASS_MATCH_STEP_THEN.obj_len = 3;
-/*inistring dstr_670__CLASS_MATCH_STEP*/
- /*_.VALSTR___V759*/ meltfptr[758] =
- (void *) &cdat->dstr_670__CLASS_MATCH_STEP;
- cdat->dstr_670__CLASS_MATCH_STEP.discr =
+/*inistring dstr_672__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V762*/ meltfptr[761] =
+ (void *) &cdat->dstr_672__CLASS_MATCH_STEP;
+ cdat->dstr_672__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_670__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_672__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_THEN",
- sizeof (cdat->dstr_670__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_672__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ iniobj");
-/*iniobj dobj_671__CLASS_MATCH_STEP_THEN*/
-/*_.VALDATA___V760*/ meltfptr[759] =
- (void *) &cdat->dobj_671__CLASS_MATCH_STEP_THEN;
+/*iniobj dobj_673__CLASS_MATCH_STEP_THEN*/
+/*_.VALDATA___V763*/ meltfptr[762] =
+ (void *) &cdat->dobj_673__CLASS_MATCH_STEP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_671__CLASS_MATCH_STEP_THEN",
+ ("iniobj check.discr isobj dobj_673__CLASS_MATCH_STEP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_671__CLASS_MATCH_STEP_THEN",
+ ("iniobj check.discr objmagic dobj_673__CLASS_MATCH_STEP_THEN",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_671__CLASS_MATCH_STEP_THEN.meltobj_class =
+ cdat->dobj_673__CLASS_MATCH_STEP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_671__CLASS_MATCH_STEP_THEN.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_671__CLASS_MATCH_STEP_THEN.obj_hash = 723821678;
- cdat->dobj_671__CLASS_MATCH_STEP_THEN.obj_len = 8;
+ cdat->dobj_673__CLASS_MATCH_STEP_THEN.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_673__CLASS_MATCH_STEP_THEN.obj_hash = 53675169;
+ cdat->dobj_673__CLASS_MATCH_STEP_THEN.obj_len = 8;
-/*inistring dstr_672__CLASS_MATCH_STEP*/
- /*_.VALSTR___V761*/ meltfptr[760] =
- (void *) &cdat->dstr_672__CLASS_MATCH_STEP;
- cdat->dstr_672__CLASS_MATCH_STEP.discr =
+/*inistring dstr_674__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V764*/ meltfptr[763] =
+ (void *) &cdat->dstr_674__CLASS_MATCH_STEP;
+ cdat->dstr_674__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_672__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_674__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_THEN",
- sizeof (cdat->dstr_672__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_674__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_673__CLASS_MATCH_STEP_THEN */
- /*_.VALTUP___V762*/ meltfptr[761] =
- (void *) &cdat->dtup_673__CLASS_MATCH_STEP_THEN;
- cdat->dtup_673__CLASS_MATCH_STEP_THEN.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_673__CLASS_MATCH_STEP_THEN.nbval = 4;
- /*inimult dtup_674__CLASS_MATCH_STEP_THEN */
+ /*inimult dtup_675__CLASS_MATCH_STEP_THEN */
/*_.VALTUP___V765*/ meltfptr[764] =
- (void *) &cdat->dtup_674__CLASS_MATCH_STEP_THEN;
- cdat->dtup_674__CLASS_MATCH_STEP_THEN.discr =
+ (void *) &cdat->dtup_675__CLASS_MATCH_STEP_THEN;
+ cdat->dtup_675__CLASS_MATCH_STEP_THEN.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_675__CLASS_MATCH_STEP_THEN.nbval = 4;
+ /*inimult dtup_676__CLASS_MATCH_STEP_THEN */
+ /*_.VALTUP___V768*/ meltfptr[767] =
+ (void *) &cdat->dtup_676__CLASS_MATCH_STEP_THEN;
+ cdat->dtup_676__CLASS_MATCH_STEP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_674__CLASS_MATCH_STEP_THEN.nbval = 3;
+ cdat->dtup_676__CLASS_MATCH_STEP_THEN.nbval = 3;
-/*iniobj dsym_675__MSTEP_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V766*/ meltfptr[765])
- /*_.VALDATA___V766*/
- meltfptr[765] = (void *) &cdat->dsym_675__MSTEP_THEN;
+/*iniobj dsym_677__MSTEP_THEN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V769*/ meltfptr[768])
+ /*_.VALDATA___V769*/
+ meltfptr[768] = (void *) &cdat->dsym_677__MSTEP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_675__MSTEP_THEN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_677__MSTEP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_675__MSTEP_THEN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_677__MSTEP_THEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_675__MSTEP_THEN.meltobj_class =
+ cdat->dsym_677__MSTEP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_675__MSTEP_THEN.obj_hash = 328175727;
- cdat->dsym_675__MSTEP_THEN.obj_len = 3;
+ cdat->dsym_677__MSTEP_THEN.obj_hash = 328175727;
+ cdat->dsym_677__MSTEP_THEN.obj_len = 3;
-/*inistring dstr_676__MSTEP_THEN*/
- /*_.VALSTR___V767*/ meltfptr[766] = (void *) &cdat->dstr_676__MSTEP_THEN;
- cdat->dstr_676__MSTEP_THEN.discr =
+/*inistring dstr_678__MSTEP_THEN*/
+ /*_.VALSTR___V770*/ meltfptr[769] = (void *) &cdat->dstr_678__MSTEP_THEN;
+ cdat->dstr_678__MSTEP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_676__MSTEP_THEN.val, "MSTEP_THEN",
- sizeof (cdat->dstr_676__MSTEP_THEN.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_678__MSTEP_THEN.val, "MSTEP_THEN",
+ sizeof (cdat->dstr_678__MSTEP_THEN.val) - 1);
/*^iniobj */
-/*iniobj dobj_677__MSTEP_THEN*/
-/*_.VALDATA___V763*/ meltfptr[762] = (void *) &cdat->dobj_677__MSTEP_THEN;
+/*iniobj dobj_679__MSTEP_THEN*/
+/*_.VALDATA___V766*/ meltfptr[765] = (void *) &cdat->dobj_679__MSTEP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_677__MSTEP_THEN",
+ melt_assertmsg ("iniobj check.discr isobj dobj_679__MSTEP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_677__MSTEP_THEN",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_679__MSTEP_THEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_677__MSTEP_THEN.meltobj_class =
+ cdat->dobj_679__MSTEP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_677__MSTEP_THEN.obj_num = 2;
- cdat->dobj_677__MSTEP_THEN.obj_hash = 90074293;
- cdat->dobj_677__MSTEP_THEN.obj_len = 4;
+ cdat->dobj_679__MSTEP_THEN.obj_num = 2;
+ cdat->dobj_679__MSTEP_THEN.obj_hash = 328272695;
+ cdat->dobj_679__MSTEP_THEN.obj_len = 4;
-/*inistring dstr_678__MSTEP_THEN*/
- /*_.VALSTR___V764*/ meltfptr[763] = (void *) &cdat->dstr_678__MSTEP_THEN;
- cdat->dstr_678__MSTEP_THEN.discr =
+/*inistring dstr_680__MSTEP_THEN*/
+ /*_.VALSTR___V767*/ meltfptr[766] = (void *) &cdat->dstr_680__MSTEP_THEN;
+ cdat->dstr_680__MSTEP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_678__MSTEP_THEN.val, "MSTEP_THEN",
- sizeof (cdat->dstr_678__MSTEP_THEN.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_680__MSTEP_THEN.val, "MSTEP_THEN",
+ sizeof (cdat->dstr_680__MSTEP_THEN.val) - 1);
-/*iniobj dsym_679__CLASS_MATCH_STEP_CLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V768*/ meltfptr[767])
- /*_.VALDATA___V768*/
- meltfptr[767] = (void *) &cdat->dsym_679__CLASS_MATCH_STEP_CLEAR;
+/*iniobj dsym_681__CLASS_MATCH_STEP_CLEAR*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V771*/ meltfptr[770])
+ /*_.VALDATA___V771*/
+ meltfptr[770] = (void *) &cdat->dsym_681__CLASS_MATCH_STEP_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_679__CLASS_MATCH_STEP_CLEAR",
+ ("iniobj check.discr isobj dsym_681__CLASS_MATCH_STEP_CLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_679__CLASS_MATCH_STEP_CLEAR",
+ ("iniobj check.discr objmagic dsym_681__CLASS_MATCH_STEP_CLEAR",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_679__CLASS_MATCH_STEP_CLEAR.meltobj_class =
+ cdat->dsym_681__CLASS_MATCH_STEP_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_679__CLASS_MATCH_STEP_CLEAR.obj_hash = 970042959;
- cdat->dsym_679__CLASS_MATCH_STEP_CLEAR.obj_len = 3;
+ cdat->dsym_681__CLASS_MATCH_STEP_CLEAR.obj_hash = 970042959;
+ cdat->dsym_681__CLASS_MATCH_STEP_CLEAR.obj_len = 3;
-/*inistring dstr_680__CLASS_MATCH_STEP*/
- /*_.VALSTR___V769*/ meltfptr[768] =
- (void *) &cdat->dstr_680__CLASS_MATCH_STEP;
- cdat->dstr_680__CLASS_MATCH_STEP.discr =
+/*inistring dstr_682__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V772*/ meltfptr[771] =
+ (void *) &cdat->dstr_682__CLASS_MATCH_STEP;
+ cdat->dstr_682__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_680__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_682__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_CLEAR",
- sizeof (cdat->dstr_680__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_682__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ iniobj");
-/*iniobj dobj_681__CLASS_MATCH_STEP_CLEAR*/
-/*_.VALDATA___V770*/ meltfptr[769] =
- (void *) &cdat->dobj_681__CLASS_MATCH_STEP_CLEAR;
+/*iniobj dobj_683__CLASS_MATCH_STEP_CLEAR*/
+/*_.VALDATA___V773*/ meltfptr[772] =
+ (void *) &cdat->dobj_683__CLASS_MATCH_STEP_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_681__CLASS_MATCH_STEP_CLEAR",
+ ("iniobj check.discr isobj dobj_683__CLASS_MATCH_STEP_CLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_681__CLASS_MATCH_STEP_CLEAR",
+ ("iniobj check.discr objmagic dobj_683__CLASS_MATCH_STEP_CLEAR",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_681__CLASS_MATCH_STEP_CLEAR.meltobj_class =
+ cdat->dobj_683__CLASS_MATCH_STEP_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_681__CLASS_MATCH_STEP_CLEAR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_681__CLASS_MATCH_STEP_CLEAR.obj_hash = 968070655;
- cdat->dobj_681__CLASS_MATCH_STEP_CLEAR.obj_len = 8;
+ cdat->dobj_683__CLASS_MATCH_STEP_CLEAR.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_683__CLASS_MATCH_STEP_CLEAR.obj_hash = 38993581;
+ cdat->dobj_683__CLASS_MATCH_STEP_CLEAR.obj_len = 8;
-/*inistring dstr_682__CLASS_MATCH_STEP*/
- /*_.VALSTR___V771*/ meltfptr[770] =
- (void *) &cdat->dstr_682__CLASS_MATCH_STEP;
- cdat->dstr_682__CLASS_MATCH_STEP.discr =
+/*inistring dstr_684__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V774*/ meltfptr[773] =
+ (void *) &cdat->dstr_684__CLASS_MATCH_STEP;
+ cdat->dstr_684__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_682__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_684__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_CLEAR",
- sizeof (cdat->dstr_682__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_684__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_683__CLASS_MATCH_STEP_CLEAR */
- /*_.VALTUP___V772*/ meltfptr[771] =
- (void *) &cdat->dtup_683__CLASS_MATCH_STEP_CLEAR;
- cdat->dtup_683__CLASS_MATCH_STEP_CLEAR.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_683__CLASS_MATCH_STEP_CLEAR.nbval = 5;
- /*inimult dtup_684__CLASS_MATCH_STEP_CLEAR */
+ /*inimult dtup_685__CLASS_MATCH_STEP_CLEAR */
/*_.VALTUP___V775*/ meltfptr[774] =
- (void *) &cdat->dtup_684__CLASS_MATCH_STEP_CLEAR;
- cdat->dtup_684__CLASS_MATCH_STEP_CLEAR.discr =
+ (void *) &cdat->dtup_685__CLASS_MATCH_STEP_CLEAR;
+ cdat->dtup_685__CLASS_MATCH_STEP_CLEAR.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_685__CLASS_MATCH_STEP_CLEAR.nbval = 5;
+ /*inimult dtup_686__CLASS_MATCH_STEP_CLEAR */
+ /*_.VALTUP___V778*/ meltfptr[777] =
+ (void *) &cdat->dtup_686__CLASS_MATCH_STEP_CLEAR;
+ cdat->dtup_686__CLASS_MATCH_STEP_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_684__CLASS_MATCH_STEP_CLEAR.nbval = 4;
+ cdat->dtup_686__CLASS_MATCH_STEP_CLEAR.nbval = 4;
-/*iniobj dsym_685__MSTEP_CLEARDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V776*/ meltfptr[775])
- /*_.VALDATA___V776*/
- meltfptr[775] = (void *) &cdat->dsym_685__MSTEP_CLEARDATA;
+/*iniobj dsym_687__MSTEP_CLEARDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V779*/ meltfptr[778])
+ /*_.VALDATA___V779*/
+ meltfptr[778] = (void *) &cdat->dsym_687__MSTEP_CLEARDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_685__MSTEP_CLEARDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_687__MSTEP_CLEARDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_685__MSTEP_CLEARDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_687__MSTEP_CLEARDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_685__MSTEP_CLEARDATA.meltobj_class =
+ cdat->dsym_687__MSTEP_CLEARDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_685__MSTEP_CLEARDATA.obj_hash = 393837036;
- cdat->dsym_685__MSTEP_CLEARDATA.obj_len = 3;
+ cdat->dsym_687__MSTEP_CLEARDATA.obj_hash = 393837036;
+ cdat->dsym_687__MSTEP_CLEARDATA.obj_len = 3;
-/*inistring dstr_686__MSTEP_CLEARDATA*/
- /*_.VALSTR___V777*/ meltfptr[776] =
- (void *) &cdat->dstr_686__MSTEP_CLEARDATA;
- cdat->dstr_686__MSTEP_CLEARDATA.discr =
+/*inistring dstr_688__MSTEP_CLEARDATA*/
+ /*_.VALSTR___V780*/ meltfptr[779] =
+ (void *) &cdat->dstr_688__MSTEP_CLEARDATA;
+ cdat->dstr_688__MSTEP_CLEARDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_686__MSTEP_CLEARDATA.val,
+ /*small inistring */ strncpy (cdat->dstr_688__MSTEP_CLEARDATA.val,
"MSTEP_CLEARDATA",
- sizeof (cdat->dstr_686__MSTEP_CLEARDATA.val) -
+ sizeof (cdat->dstr_688__MSTEP_CLEARDATA.val) -
1);
/*^iniobj */
-/*iniobj dobj_687__MSTEP_CLEARDATA*/
-/*_.VALDATA___V773*/ meltfptr[772] =
- (void *) &cdat->dobj_687__MSTEP_CLEARDATA;
+/*iniobj dobj_689__MSTEP_CLEARDATA*/
+/*_.VALDATA___V776*/ meltfptr[775] =
+ (void *) &cdat->dobj_689__MSTEP_CLEARDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_687__MSTEP_CLEARDATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_689__MSTEP_CLEARDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_687__MSTEP_CLEARDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_689__MSTEP_CLEARDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_687__MSTEP_CLEARDATA.meltobj_class =
+ cdat->dobj_689__MSTEP_CLEARDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_687__MSTEP_CLEARDATA.obj_num = 3;
- cdat->dobj_687__MSTEP_CLEARDATA.obj_hash = 30402670;
- cdat->dobj_687__MSTEP_CLEARDATA.obj_len = 4;
+ cdat->dobj_689__MSTEP_CLEARDATA.obj_num = 3;
+ cdat->dobj_689__MSTEP_CLEARDATA.obj_hash = 25050147;
+ cdat->dobj_689__MSTEP_CLEARDATA.obj_len = 4;
-/*inistring dstr_688__MSTEP_CLEARDATA*/
- /*_.VALSTR___V774*/ meltfptr[773] =
- (void *) &cdat->dstr_688__MSTEP_CLEARDATA;
- cdat->dstr_688__MSTEP_CLEARDATA.discr =
+/*inistring dstr_690__MSTEP_CLEARDATA*/
+ /*_.VALSTR___V777*/ meltfptr[776] =
+ (void *) &cdat->dstr_690__MSTEP_CLEARDATA;
+ cdat->dstr_690__MSTEP_CLEARDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_688__MSTEP_CLEARDATA.val,
+ /*small inistring */ strncpy (cdat->dstr_690__MSTEP_CLEARDATA.val,
"MSTEP_CLEARDATA",
- sizeof (cdat->dstr_688__MSTEP_CLEARDATA.val) -
+ sizeof (cdat->dstr_690__MSTEP_CLEARDATA.val) -
1);
-/*iniobj dsym_689__CLASS_MATCH_STEP_WITH_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V778*/ meltfptr[777])
- /*_.VALDATA___V778*/
- meltfptr[777] = (void *) &cdat->dsym_689__CLASS_MATCH_STEP_WITH_FLAG;
+/*iniobj dsym_691__CLASS_MATCH_STEP_WITH_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V781*/ meltfptr[780])
+ /*_.VALDATA___V781*/
+ meltfptr[780] = (void *) &cdat->dsym_691__CLASS_MATCH_STEP_WITH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_689__CLASS_MATCH_STEP_WITH_FLAG",
+ ("iniobj check.discr isobj dsym_691__CLASS_MATCH_STEP_WITH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_689__CLASS_MATCH_STEP_WITH_FLAG",
+ ("iniobj check.discr objmagic dsym_691__CLASS_MATCH_STEP_WITH_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_689__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class =
+ cdat->dsym_691__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_689__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 726680601;
- cdat->dsym_689__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 3;
+ cdat->dsym_691__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 726680601;
+ cdat->dsym_691__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 3;
-/*inistring dstr_690__CLASS_MATCH_STEP*/
- /*_.VALSTR___V779*/ meltfptr[778] =
- (void *) &cdat->dstr_690__CLASS_MATCH_STEP;
- cdat->dstr_690__CLASS_MATCH_STEP.discr =
+/*inistring dstr_692__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V782*/ meltfptr[781] =
+ (void *) &cdat->dstr_692__CLASS_MATCH_STEP;
+ cdat->dstr_692__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_690__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_692__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_WITH_FLAG",
- sizeof (cdat->dstr_690__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_692__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ iniobj");
-/*iniobj dobj_691__CLASS_MATCH_STEP_WITH_FLAG*/
-/*_.VALDATA___V780*/ meltfptr[779] =
- (void *) &cdat->dobj_691__CLASS_MATCH_STEP_WITH_FLAG;
+/*iniobj dobj_693__CLASS_MATCH_STEP_WITH_FLAG*/
+/*_.VALDATA___V783*/ meltfptr[782] =
+ (void *) &cdat->dobj_693__CLASS_MATCH_STEP_WITH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_691__CLASS_MATCH_STEP_WITH_FLAG",
+ ("iniobj check.discr isobj dobj_693__CLASS_MATCH_STEP_WITH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_691__CLASS_MATCH_STEP_WITH_FLAG",
+ ("iniobj check.discr objmagic dobj_693__CLASS_MATCH_STEP_WITH_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_691__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class =
+ cdat->dobj_693__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_691__CLASS_MATCH_STEP_WITH_FLAG.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_691__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 61284644;
- cdat->dobj_691__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 8;
+ cdat->dobj_693__CLASS_MATCH_STEP_WITH_FLAG.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_693__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 668923956;
+ cdat->dobj_693__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 8;
-/*inistring dstr_692__CLASS_MATCH_STEP*/
- /*_.VALSTR___V781*/ meltfptr[780] =
- (void *) &cdat->dstr_692__CLASS_MATCH_STEP;
- cdat->dstr_692__CLASS_MATCH_STEP.discr =
+/*inistring dstr_694__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V784*/ meltfptr[783] =
+ (void *) &cdat->dstr_694__CLASS_MATCH_STEP;
+ cdat->dstr_694__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_692__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_694__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_WITH_FLAG",
- sizeof (cdat->dstr_692__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_694__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_693__CLASS_MATCH_STEP_WITH_FLAG */
- /*_.VALTUP___V782*/ meltfptr[781] =
- (void *) &cdat->dtup_693__CLASS_MATCH_STEP_WITH_FLAG;
- cdat->dtup_693__CLASS_MATCH_STEP_WITH_FLAG.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_693__CLASS_MATCH_STEP_WITH_FLAG.nbval = 5;
- /*inimult dtup_694__CLASS_MATCH_STEP_WITH_FLAG */
+ /*inimult dtup_695__CLASS_MATCH_STEP_WITH_FLAG */
/*_.VALTUP___V785*/ meltfptr[784] =
- (void *) &cdat->dtup_694__CLASS_MATCH_STEP_WITH_FLAG;
- cdat->dtup_694__CLASS_MATCH_STEP_WITH_FLAG.discr =
+ (void *) &cdat->dtup_695__CLASS_MATCH_STEP_WITH_FLAG;
+ cdat->dtup_695__CLASS_MATCH_STEP_WITH_FLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_695__CLASS_MATCH_STEP_WITH_FLAG.nbval = 5;
+ /*inimult dtup_696__CLASS_MATCH_STEP_WITH_FLAG */
+ /*_.VALTUP___V788*/ meltfptr[787] =
+ (void *) &cdat->dtup_696__CLASS_MATCH_STEP_WITH_FLAG;
+ cdat->dtup_696__CLASS_MATCH_STEP_WITH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_694__CLASS_MATCH_STEP_WITH_FLAG.nbval = 4;
+ cdat->dtup_696__CLASS_MATCH_STEP_WITH_FLAG.nbval = 4;
-/*iniobj dsym_695__MSTEP_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V786*/ meltfptr[785])
- /*_.VALDATA___V786*/
- meltfptr[785] = (void *) &cdat->dsym_695__MSTEP_FLAG;
+/*iniobj dsym_697__MSTEP_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V789*/ meltfptr[788])
+ /*_.VALDATA___V789*/
+ meltfptr[788] = (void *) &cdat->dsym_697__MSTEP_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_695__MSTEP_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_697__MSTEP_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_695__MSTEP_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_697__MSTEP_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_695__MSTEP_FLAG.meltobj_class =
+ cdat->dsym_697__MSTEP_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_695__MSTEP_FLAG.obj_hash = 748215355;
- cdat->dsym_695__MSTEP_FLAG.obj_len = 3;
+ cdat->dsym_697__MSTEP_FLAG.obj_hash = 748215355;
+ cdat->dsym_697__MSTEP_FLAG.obj_len = 3;
-/*inistring dstr_696__MSTEP_FLAG*/
- /*_.VALSTR___V787*/ meltfptr[786] = (void *) &cdat->dstr_696__MSTEP_FLAG;
- cdat->dstr_696__MSTEP_FLAG.discr =
+/*inistring dstr_698__MSTEP_FLAG*/
+ /*_.VALSTR___V790*/ meltfptr[789] = (void *) &cdat->dstr_698__MSTEP_FLAG;
+ cdat->dstr_698__MSTEP_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_696__MSTEP_FLAG.val, "MSTEP_FLAG",
- sizeof (cdat->dstr_696__MSTEP_FLAG.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_698__MSTEP_FLAG.val, "MSTEP_FLAG",
+ sizeof (cdat->dstr_698__MSTEP_FLAG.val) - 1);
/*^iniobj */
-/*iniobj dobj_697__MSTEP_FLAG*/
-/*_.VALDATA___V783*/ meltfptr[782] = (void *) &cdat->dobj_697__MSTEP_FLAG;
+/*iniobj dobj_699__MSTEP_FLAG*/
+/*_.VALDATA___V786*/ meltfptr[785] = (void *) &cdat->dobj_699__MSTEP_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_697__MSTEP_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dobj_699__MSTEP_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_697__MSTEP_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_699__MSTEP_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_697__MSTEP_FLAG.meltobj_class =
+ cdat->dobj_699__MSTEP_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_697__MSTEP_FLAG.obj_num = 3;
- cdat->dobj_697__MSTEP_FLAG.obj_hash = 140321328;
- cdat->dobj_697__MSTEP_FLAG.obj_len = 4;
+ cdat->dobj_699__MSTEP_FLAG.obj_num = 3;
+ cdat->dobj_699__MSTEP_FLAG.obj_hash = 1011486340;
+ cdat->dobj_699__MSTEP_FLAG.obj_len = 4;
-/*inistring dstr_698__MSTEP_FLAG*/
- /*_.VALSTR___V784*/ meltfptr[783] = (void *) &cdat->dstr_698__MSTEP_FLAG;
- cdat->dstr_698__MSTEP_FLAG.discr =
+/*inistring dstr_700__MSTEP_FLAG*/
+ /*_.VALSTR___V787*/ meltfptr[786] = (void *) &cdat->dstr_700__MSTEP_FLAG;
+ cdat->dstr_700__MSTEP_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_698__MSTEP_FLAG.val, "MSTEP_FLAG",
- sizeof (cdat->dstr_698__MSTEP_FLAG.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_700__MSTEP_FLAG.val, "MSTEP_FLAG",
+ sizeof (cdat->dstr_700__MSTEP_FLAG.val) - 1);
-/*iniobj dsym_699__CLASS_MATCH_STEP_WITH_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V788*/ meltfptr[787])
- /*_.VALDATA___V788*/
- meltfptr[787] = (void *) &cdat->dsym_699__CLASS_MATCH_STEP_WITH_DATA;
+/*iniobj dsym_701__CLASS_MATCH_STEP_WITH_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V791*/ meltfptr[790])
+ /*_.VALDATA___V791*/
+ meltfptr[790] = (void *) &cdat->dsym_701__CLASS_MATCH_STEP_WITH_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_699__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr isobj dsym_701__CLASS_MATCH_STEP_WITH_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_699__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr objmagic dsym_701__CLASS_MATCH_STEP_WITH_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_699__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
+ cdat->dsym_701__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_699__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757;
- cdat->dsym_699__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3;
+ cdat->dsym_701__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757;
+ cdat->dsym_701__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3;
-/*inistring dstr_700__CLASS_MATCH_STEP*/
- /*_.VALSTR___V789*/ meltfptr[788] =
- (void *) &cdat->dstr_700__CLASS_MATCH_STEP;
- cdat->dstr_700__CLASS_MATCH_STEP.discr =
+/*inistring dstr_702__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V792*/ meltfptr[791] =
+ (void *) &cdat->dstr_702__CLASS_MATCH_STEP;
+ cdat->dstr_702__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_700__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_702__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_WITH_DATA",
- sizeof (cdat->dstr_700__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_702__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ iniobj");
-/*iniobj dobj_701__CLASS_MATCH_STEP_WITH_DATA*/
-/*_.VALDATA___V790*/ meltfptr[789] =
- (void *) &cdat->dobj_701__CLASS_MATCH_STEP_WITH_DATA;
+/*iniobj dobj_703__CLASS_MATCH_STEP_WITH_DATA*/
+/*_.VALDATA___V793*/ meltfptr[792] =
+ (void *) &cdat->dobj_703__CLASS_MATCH_STEP_WITH_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_701__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr isobj dobj_703__CLASS_MATCH_STEP_WITH_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_701__CLASS_MATCH_STEP_WITH_DATA",
+ ("iniobj check.discr objmagic dobj_703__CLASS_MATCH_STEP_WITH_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_701__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
+ cdat->dobj_703__CLASS_MATCH_STEP_WITH_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_701__CLASS_MATCH_STEP_WITH_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_701__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 734902221;
- cdat->dobj_701__CLASS_MATCH_STEP_WITH_DATA.obj_len = 8;
+ cdat->dobj_703__CLASS_MATCH_STEP_WITH_DATA.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_703__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 886241114;
+ cdat->dobj_703__CLASS_MATCH_STEP_WITH_DATA.obj_len = 8;
-/*inistring dstr_702__CLASS_MATCH_STEP*/
- /*_.VALSTR___V791*/ meltfptr[790] =
- (void *) &cdat->dstr_702__CLASS_MATCH_STEP;
- cdat->dstr_702__CLASS_MATCH_STEP.discr =
+/*inistring dstr_704__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V794*/ meltfptr[793] =
+ (void *) &cdat->dstr_704__CLASS_MATCH_STEP;
+ cdat->dstr_704__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_702__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_704__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_WITH_DATA",
- sizeof (cdat->dstr_702__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_704__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_703__CLASS_MATCH_STEP_WITH_DATA */
- /*_.VALTUP___V792*/ meltfptr[791] =
- (void *) &cdat->dtup_703__CLASS_MATCH_STEP_WITH_DATA;
- cdat->dtup_703__CLASS_MATCH_STEP_WITH_DATA.discr =
+ /*inimult dtup_705__CLASS_MATCH_STEP_WITH_DATA */
+ /*_.VALTUP___V795*/ meltfptr[794] =
+ (void *) &cdat->dtup_705__CLASS_MATCH_STEP_WITH_DATA;
+ cdat->dtup_705__CLASS_MATCH_STEP_WITH_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_703__CLASS_MATCH_STEP_WITH_DATA.nbval = 5;
- /*inimult dtup_704__CLASS_MATCH_STEP_WITH_DATA */
- /*_.VALTUP___V797*/ meltfptr[796] =
- (void *) &cdat->dtup_704__CLASS_MATCH_STEP_WITH_DATA;
- cdat->dtup_704__CLASS_MATCH_STEP_WITH_DATA.discr =
+ cdat->dtup_705__CLASS_MATCH_STEP_WITH_DATA.nbval = 5;
+ /*inimult dtup_706__CLASS_MATCH_STEP_WITH_DATA */
+ /*_.VALTUP___V800*/ meltfptr[799] =
+ (void *) &cdat->dtup_706__CLASS_MATCH_STEP_WITH_DATA;
+ cdat->dtup_706__CLASS_MATCH_STEP_WITH_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_704__CLASS_MATCH_STEP_WITH_DATA.nbval = 5;
+ cdat->dtup_706__CLASS_MATCH_STEP_WITH_DATA.nbval = 5;
-/*iniobj dsym_705__MSTEP_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V798*/ meltfptr[797])
- /*_.VALDATA___V798*/
- meltfptr[797] = (void *) &cdat->dsym_705__MSTEP_DATA;
+/*iniobj dsym_707__MSTEP_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V801*/ meltfptr[800])
+ /*_.VALDATA___V801*/
+ meltfptr[800] = (void *) &cdat->dsym_707__MSTEP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_705__MSTEP_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_707__MSTEP_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_705__MSTEP_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_707__MSTEP_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_705__MSTEP_DATA.meltobj_class =
+ cdat->dsym_707__MSTEP_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_705__MSTEP_DATA.obj_hash = 153671690;
- cdat->dsym_705__MSTEP_DATA.obj_len = 3;
+ cdat->dsym_707__MSTEP_DATA.obj_hash = 153671690;
+ cdat->dsym_707__MSTEP_DATA.obj_len = 3;
-/*inistring dstr_706__MSTEP_DATA*/
- /*_.VALSTR___V799*/ meltfptr[798] = (void *) &cdat->dstr_706__MSTEP_DATA;
- cdat->dstr_706__MSTEP_DATA.discr =
+/*inistring dstr_708__MSTEP_DATA*/
+ /*_.VALSTR___V802*/ meltfptr[801] = (void *) &cdat->dstr_708__MSTEP_DATA;
+ cdat->dstr_708__MSTEP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_706__MSTEP_DATA.val, "MSTEP_DATA",
- sizeof (cdat->dstr_706__MSTEP_DATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_708__MSTEP_DATA.val, "MSTEP_DATA",
+ sizeof (cdat->dstr_708__MSTEP_DATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_707__MSTEP_DATA*/
-/*_.VALDATA___V793*/ meltfptr[792] = (void *) &cdat->dobj_707__MSTEP_DATA;
+/*iniobj dobj_709__MSTEP_DATA*/
+/*_.VALDATA___V796*/ meltfptr[795] = (void *) &cdat->dobj_709__MSTEP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_707__MSTEP_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_709__MSTEP_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_707__MSTEP_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_709__MSTEP_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_707__MSTEP_DATA.meltobj_class =
+ cdat->dobj_709__MSTEP_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_707__MSTEP_DATA.obj_num = 3;
- cdat->dobj_707__MSTEP_DATA.obj_hash = 760189963;
- cdat->dobj_707__MSTEP_DATA.obj_len = 4;
+ cdat->dobj_709__MSTEP_DATA.obj_num = 3;
+ cdat->dobj_709__MSTEP_DATA.obj_hash = 1044813022;
+ cdat->dobj_709__MSTEP_DATA.obj_len = 4;
-/*inistring dstr_708__MSTEP_DATA*/
- /*_.VALSTR___V794*/ meltfptr[793] = (void *) &cdat->dstr_708__MSTEP_DATA;
- cdat->dstr_708__MSTEP_DATA.discr =
+/*inistring dstr_710__MSTEP_DATA*/
+ /*_.VALSTR___V797*/ meltfptr[796] = (void *) &cdat->dstr_710__MSTEP_DATA;
+ cdat->dstr_710__MSTEP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_708__MSTEP_DATA.val, "MSTEP_DATA",
- sizeof (cdat->dstr_708__MSTEP_DATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_710__MSTEP_DATA.val, "MSTEP_DATA",
+ sizeof (cdat->dstr_710__MSTEP_DATA.val) - 1);
-/*iniobj dsym_709__MSTEP_INDEX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V800*/ meltfptr[799])
- /*_.VALDATA___V800*/
- meltfptr[799] = (void *) &cdat->dsym_709__MSTEP_INDEX;
+/*iniobj dsym_711__MSTEP_INDEX*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V803*/ meltfptr[802])
+ /*_.VALDATA___V803*/
+ meltfptr[802] = (void *) &cdat->dsym_711__MSTEP_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_709__MSTEP_INDEX",
+ melt_assertmsg ("iniobj check.discr isobj dsym_711__MSTEP_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_709__MSTEP_INDEX",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_711__MSTEP_INDEX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_709__MSTEP_INDEX.meltobj_class =
+ cdat->dsym_711__MSTEP_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_709__MSTEP_INDEX.obj_hash = 858381181;
- cdat->dsym_709__MSTEP_INDEX.obj_len = 3;
+ cdat->dsym_711__MSTEP_INDEX.obj_hash = 858381181;
+ cdat->dsym_711__MSTEP_INDEX.obj_len = 3;
-/*inistring dstr_710__MSTEP_INDEX*/
- /*_.VALSTR___V801*/ meltfptr[800] = (void *) &cdat->dstr_710__MSTEP_INDEX;
- cdat->dstr_710__MSTEP_INDEX.discr =
+/*inistring dstr_712__MSTEP_INDEX*/
+ /*_.VALSTR___V804*/ meltfptr[803] = (void *) &cdat->dstr_712__MSTEP_INDEX;
+ cdat->dstr_712__MSTEP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_710__MSTEP_INDEX.val,
+ /*small inistring */ strncpy (cdat->dstr_712__MSTEP_INDEX.val,
"MSTEP_INDEX",
- sizeof (cdat->dstr_710__MSTEP_INDEX.val) - 1);
+ sizeof (cdat->dstr_712__MSTEP_INDEX.val) - 1);
/*^iniobj */
-/*iniobj dobj_711__MSTEP_INDEX*/
-/*_.VALDATA___V795*/ meltfptr[794] = (void *) &cdat->dobj_711__MSTEP_INDEX;
+/*iniobj dobj_713__MSTEP_INDEX*/
+/*_.VALDATA___V798*/ meltfptr[797] = (void *) &cdat->dobj_713__MSTEP_INDEX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_711__MSTEP_INDEX",
+ melt_assertmsg ("iniobj check.discr isobj dobj_713__MSTEP_INDEX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_711__MSTEP_INDEX",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_713__MSTEP_INDEX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_711__MSTEP_INDEX.meltobj_class =
+ cdat->dobj_713__MSTEP_INDEX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_711__MSTEP_INDEX.obj_num = 4;
- cdat->dobj_711__MSTEP_INDEX.obj_hash = 8632488;
- cdat->dobj_711__MSTEP_INDEX.obj_len = 4;
+ cdat->dobj_713__MSTEP_INDEX.obj_num = 4;
+ cdat->dobj_713__MSTEP_INDEX.obj_hash = 836283276;
+ cdat->dobj_713__MSTEP_INDEX.obj_len = 4;
-/*inistring dstr_712__MSTEP_INDEX*/
- /*_.VALSTR___V796*/ meltfptr[795] = (void *) &cdat->dstr_712__MSTEP_INDEX;
- cdat->dstr_712__MSTEP_INDEX.discr =
+/*inistring dstr_714__MSTEP_INDEX*/
+ /*_.VALSTR___V799*/ meltfptr[798] = (void *) &cdat->dstr_714__MSTEP_INDEX;
+ cdat->dstr_714__MSTEP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_712__MSTEP_INDEX.val,
+ /*small inistring */ strncpy (cdat->dstr_714__MSTEP_INDEX.val,
"MSTEP_INDEX",
- sizeof (cdat->dstr_712__MSTEP_INDEX.val) - 1);
+ sizeof (cdat->dstr_714__MSTEP_INDEX.val) - 1);
-/*iniobj dsym_713__CLASS_MATCH_STEP_FLAG_SET*/
- /*uniqueobj*/ if (! /*_.VALDATA___V802*/ meltfptr[801])
- /*_.VALDATA___V802*/
- meltfptr[801] = (void *) &cdat->dsym_713__CLASS_MATCH_STEP_FLAG_SET;
+/*iniobj dsym_715__CLASS_MATCH_STEP_FLAG_SET*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V805*/ meltfptr[804])
+ /*_.VALDATA___V805*/
+ meltfptr[804] = (void *) &cdat->dsym_715__CLASS_MATCH_STEP_FLAG_SET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_713__CLASS_MATCH_STEP_FLAG_SET",
+ ("iniobj check.discr isobj dsym_715__CLASS_MATCH_STEP_FLAG_SET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_713__CLASS_MATCH_STEP_FLAG_SET",
+ ("iniobj check.discr objmagic dsym_715__CLASS_MATCH_STEP_FLAG_SET",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_713__CLASS_MATCH_STEP_FLAG_SET.meltobj_class =
+ cdat->dsym_715__CLASS_MATCH_STEP_FLAG_SET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_713__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 285733198;
- cdat->dsym_713__CLASS_MATCH_STEP_FLAG_SET.obj_len = 3;
+ cdat->dsym_715__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 285733198;
+ cdat->dsym_715__CLASS_MATCH_STEP_FLAG_SET.obj_len = 3;
-/*inistring dstr_714__CLASS_MATCH_STEP*/
- /*_.VALSTR___V803*/ meltfptr[802] =
- (void *) &cdat->dstr_714__CLASS_MATCH_STEP;
- cdat->dstr_714__CLASS_MATCH_STEP.discr =
+/*inistring dstr_716__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V806*/ meltfptr[805] =
+ (void *) &cdat->dstr_716__CLASS_MATCH_STEP;
+ cdat->dstr_716__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_714__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_716__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_SET",
- sizeof (cdat->dstr_714__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_716__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ iniobj");
-/*iniobj dobj_715__CLASS_MATCH_STEP_FLAG_SET*/
-/*_.VALDATA___V804*/ meltfptr[803] =
- (void *) &cdat->dobj_715__CLASS_MATCH_STEP_FLAG_SET;
+/*iniobj dobj_717__CLASS_MATCH_STEP_FLAG_SET*/
+/*_.VALDATA___V807*/ meltfptr[806] =
+ (void *) &cdat->dobj_717__CLASS_MATCH_STEP_FLAG_SET;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_715__CLASS_MATCH_STEP_FLAG_SET",
+ ("iniobj check.discr isobj dobj_717__CLASS_MATCH_STEP_FLAG_SET",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_715__CLASS_MATCH_STEP_FLAG_SET",
+ ("iniobj check.discr objmagic dobj_717__CLASS_MATCH_STEP_FLAG_SET",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_715__CLASS_MATCH_STEP_FLAG_SET.meltobj_class =
+ cdat->dobj_717__CLASS_MATCH_STEP_FLAG_SET.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_715__CLASS_MATCH_STEP_FLAG_SET.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_715__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 1069460055;
- cdat->dobj_715__CLASS_MATCH_STEP_FLAG_SET.obj_len = 8;
+ cdat->dobj_717__CLASS_MATCH_STEP_FLAG_SET.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_717__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 792508058;
+ cdat->dobj_717__CLASS_MATCH_STEP_FLAG_SET.obj_len = 8;
-/*inistring dstr_716__CLASS_MATCH_STEP*/
- /*_.VALSTR___V805*/ meltfptr[804] =
- (void *) &cdat->dstr_716__CLASS_MATCH_STEP;
- cdat->dstr_716__CLASS_MATCH_STEP.discr =
+/*inistring dstr_718__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V808*/ meltfptr[807] =
+ (void *) &cdat->dstr_718__CLASS_MATCH_STEP;
+ cdat->dstr_718__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_716__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_718__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_SET",
- sizeof (cdat->dstr_716__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_718__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_717__CLASS_MATCH_STEP_FLAG_SET */
- /*_.VALTUP___V806*/ meltfptr[805] =
- (void *) &cdat->dtup_717__CLASS_MATCH_STEP_FLAG_SET;
- cdat->dtup_717__CLASS_MATCH_STEP_FLAG_SET.discr =
+ /*inimult dtup_719__CLASS_MATCH_STEP_FLAG_SET */
+ /*_.VALTUP___V809*/ meltfptr[808] =
+ (void *) &cdat->dtup_719__CLASS_MATCH_STEP_FLAG_SET;
+ cdat->dtup_719__CLASS_MATCH_STEP_FLAG_SET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_717__CLASS_MATCH_STEP_FLAG_SET.nbval = 6;
- /*inimult dtup_718__CLASS_MATCH_STEP_FLAG_SET */
- /*_.VALTUP___V807*/ meltfptr[806] =
- (void *) &cdat->dtup_718__CLASS_MATCH_STEP_FLAG_SET;
- cdat->dtup_718__CLASS_MATCH_STEP_FLAG_SET.discr =
+ cdat->dtup_719__CLASS_MATCH_STEP_FLAG_SET.nbval = 6;
+ /*inimult dtup_720__CLASS_MATCH_STEP_FLAG_SET */
+ /*_.VALTUP___V810*/ meltfptr[809] =
+ (void *) &cdat->dtup_720__CLASS_MATCH_STEP_FLAG_SET;
+ cdat->dtup_720__CLASS_MATCH_STEP_FLAG_SET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_718__CLASS_MATCH_STEP_FLAG_SET.nbval = 4;
+ cdat->dtup_720__CLASS_MATCH_STEP_FLAG_SET.nbval = 4;
-/*iniobj dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V808*/ meltfptr[807])
- /*_.VALDATA___V808*/
- meltfptr[807] = (void *) &cdat->dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION;
+/*iniobj dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V811*/ meltfptr[810])
+ /*_.VALDATA___V811*/
+ meltfptr[810] = (void *) &cdat->dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION",
+ ("iniobj check.discr isobj dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION",
+ ("iniobj check.discr objmagic dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class =
+ cdat->dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 541209628;
- cdat->dsym_719__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 3;
+ cdat->dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 541209628;
+ cdat->dsym_721__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 3;
-/*inistring dstr_720__CLASS_MATCH_STEP*/
- /*_.VALSTR___V809*/ meltfptr[808] =
- (void *) &cdat->dstr_720__CLASS_MATCH_STEP;
- cdat->dstr_720__CLASS_MATCH_STEP.discr =
+/*inistring dstr_722__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V812*/ meltfptr[811] =
+ (void *) &cdat->dstr_722__CLASS_MATCH_STEP;
+ cdat->dstr_722__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_720__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_722__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_OPERATION",
- sizeof (cdat->dstr_720__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_722__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ iniobj");
-/*iniobj dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION*/
-/*_.VALDATA___V810*/ meltfptr[809] =
- (void *) &cdat->dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION;
+/*iniobj dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION*/
+/*_.VALDATA___V813*/ meltfptr[812] =
+ (void *) &cdat->dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION",
+ ("iniobj check.discr isobj dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION",
+ ("iniobj check.discr objmagic dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class =
+ cdat->dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 598398073;
- cdat->dobj_721__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 8;
+ cdat->dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 911166633;
+ cdat->dobj_723__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 8;
-/*inistring dstr_722__CLASS_MATCH_STEP*/
- /*_.VALSTR___V811*/ meltfptr[810] =
- (void *) &cdat->dstr_722__CLASS_MATCH_STEP;
- cdat->dstr_722__CLASS_MATCH_STEP.discr =
+/*inistring dstr_724__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V814*/ meltfptr[813] =
+ (void *) &cdat->dstr_724__CLASS_MATCH_STEP;
+ cdat->dstr_724__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_722__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_724__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_OPERATION",
- sizeof (cdat->dstr_722__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_724__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_723__CLASS_MATCH_STEP_FLAG_OPERATION */
- /*_.VALTUP___V812*/ meltfptr[811] =
- (void *) &cdat->dtup_723__CLASS_MATCH_STEP_FLAG_OPERATION;
- cdat->dtup_723__CLASS_MATCH_STEP_FLAG_OPERATION.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_723__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 6;
- /*inimult dtup_724__CLASS_MATCH_STEP_FLAG_OPERATION */
+ /*inimult dtup_725__CLASS_MATCH_STEP_FLAG_OPERATION */
/*_.VALTUP___V815*/ meltfptr[814] =
- (void *) &cdat->dtup_724__CLASS_MATCH_STEP_FLAG_OPERATION;
- cdat->dtup_724__CLASS_MATCH_STEP_FLAG_OPERATION.discr =
+ (void *) &cdat->dtup_725__CLASS_MATCH_STEP_FLAG_OPERATION;
+ cdat->dtup_725__CLASS_MATCH_STEP_FLAG_OPERATION.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_725__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 6;
+ /*inimult dtup_726__CLASS_MATCH_STEP_FLAG_OPERATION */
+ /*_.VALTUP___V818*/ meltfptr[817] =
+ (void *) &cdat->dtup_726__CLASS_MATCH_STEP_FLAG_OPERATION;
+ cdat->dtup_726__CLASS_MATCH_STEP_FLAG_OPERATION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_724__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 5;
+ cdat->dtup_726__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 5;
-/*iniobj dsym_725__MSTEP_FLAGARGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V816*/ meltfptr[815])
- /*_.VALDATA___V816*/
- meltfptr[815] = (void *) &cdat->dsym_725__MSTEP_FLAGARGS;
+/*iniobj dsym_727__MSTEP_FLAGARGS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V819*/ meltfptr[818])
+ /*_.VALDATA___V819*/
+ meltfptr[818] = (void *) &cdat->dsym_727__MSTEP_FLAGARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_725__MSTEP_FLAGARGS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_727__MSTEP_FLAGARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_725__MSTEP_FLAGARGS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_727__MSTEP_FLAGARGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_725__MSTEP_FLAGARGS.meltobj_class =
+ cdat->dsym_727__MSTEP_FLAGARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_725__MSTEP_FLAGARGS.obj_hash = 645209889;
- cdat->dsym_725__MSTEP_FLAGARGS.obj_len = 3;
+ cdat->dsym_727__MSTEP_FLAGARGS.obj_hash = 645209889;
+ cdat->dsym_727__MSTEP_FLAGARGS.obj_len = 3;
-/*inistring dstr_726__MSTEP_FLAGARGS*/
- /*_.VALSTR___V817*/ meltfptr[816] =
- (void *) &cdat->dstr_726__MSTEP_FLAGARGS;
- cdat->dstr_726__MSTEP_FLAGARGS.discr =
+/*inistring dstr_728__MSTEP_FLAGARGS*/
+ /*_.VALSTR___V820*/ meltfptr[819] =
+ (void *) &cdat->dstr_728__MSTEP_FLAGARGS;
+ cdat->dstr_728__MSTEP_FLAGARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_726__MSTEP_FLAGARGS.val,
+ /*small inistring */ strncpy (cdat->dstr_728__MSTEP_FLAGARGS.val,
"MSTEP_FLAGARGS",
- sizeof (cdat->dstr_726__MSTEP_FLAGARGS.val) -
+ sizeof (cdat->dstr_728__MSTEP_FLAGARGS.val) -
1);
/*^iniobj */
-/*iniobj dobj_727__MSTEP_FLAGARGS*/
-/*_.VALDATA___V813*/ meltfptr[812] =
- (void *) &cdat->dobj_727__MSTEP_FLAGARGS;
+/*iniobj dobj_729__MSTEP_FLAGARGS*/
+/*_.VALDATA___V816*/ meltfptr[815] =
+ (void *) &cdat->dobj_729__MSTEP_FLAGARGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_727__MSTEP_FLAGARGS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_729__MSTEP_FLAGARGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_727__MSTEP_FLAGARGS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_729__MSTEP_FLAGARGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_727__MSTEP_FLAGARGS.meltobj_class =
+ cdat->dobj_729__MSTEP_FLAGARGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_727__MSTEP_FLAGARGS.obj_num = 4;
- cdat->dobj_727__MSTEP_FLAGARGS.obj_hash = 774394565;
- cdat->dobj_727__MSTEP_FLAGARGS.obj_len = 4;
+ cdat->dobj_729__MSTEP_FLAGARGS.obj_num = 4;
+ cdat->dobj_729__MSTEP_FLAGARGS.obj_hash = 305204455;
+ cdat->dobj_729__MSTEP_FLAGARGS.obj_len = 4;
-/*inistring dstr_728__MSTEP_FLAGARGS*/
- /*_.VALSTR___V814*/ meltfptr[813] =
- (void *) &cdat->dstr_728__MSTEP_FLAGARGS;
- cdat->dstr_728__MSTEP_FLAGARGS.discr =
+/*inistring dstr_730__MSTEP_FLAGARGS*/
+ /*_.VALSTR___V817*/ meltfptr[816] =
+ (void *) &cdat->dstr_730__MSTEP_FLAGARGS;
+ cdat->dstr_730__MSTEP_FLAGARGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_728__MSTEP_FLAGARGS.val,
+ /*small inistring */ strncpy (cdat->dstr_730__MSTEP_FLAGARGS.val,
"MSTEP_FLAGARGS",
- sizeof (cdat->dstr_728__MSTEP_FLAGARGS.val) -
+ sizeof (cdat->dstr_730__MSTEP_FLAGARGS.val) -
1);
-/*iniobj dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V818*/ meltfptr[817])
- /*_.VALDATA___V818*/
- meltfptr[817] =
- (void *) &cdat->dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+/*iniobj dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V821*/ meltfptr[820])
+ /*_.VALDATA___V821*/
+ meltfptr[820] =
+ (void *) &cdat->dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
+ ("iniobj check.discr isobj dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
+ ("iniobj check.discr objmagic dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class =
+ cdat->dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 932930679;
- cdat->dsym_729__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 3;
+ cdat->dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 932930679;
+ cdat->dsym_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 3;
-/*inistring dstr_730__CLASS_MATCH_STEP*/
- /*_.VALSTR___V819*/ meltfptr[818] =
- (void *) &cdat->dstr_730__CLASS_MATCH_STEP;
- cdat->dstr_730__CLASS_MATCH_STEP.discr =
+/*inistring dstr_732__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V822*/ meltfptr[821] =
+ (void *) &cdat->dstr_732__CLASS_MATCH_STEP;
+ cdat->dstr_732__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_730__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_732__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_CONJUNCTION",
- sizeof (cdat->dstr_730__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_732__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ iniobj");
-/*iniobj dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/
-/*_.VALDATA___V820*/ meltfptr[819] =
- (void *) &cdat->dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+/*iniobj dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/
+/*_.VALDATA___V823*/ meltfptr[822] =
+ (void *) &cdat->dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
+ ("iniobj check.discr isobj dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
+ ("iniobj check.discr objmagic dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class =
+ cdat->dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_num =
+ cdat->dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 322052713;
- cdat->dobj_731__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 8;
+ cdat->dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 431879262;
+ cdat->dobj_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 8;
-/*inistring dstr_732__CLASS_MATCH_STEP*/
- /*_.VALSTR___V821*/ meltfptr[820] =
- (void *) &cdat->dstr_732__CLASS_MATCH_STEP;
- cdat->dstr_732__CLASS_MATCH_STEP.discr =
+/*inistring dstr_734__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V824*/ meltfptr[823] =
+ (void *) &cdat->dstr_734__CLASS_MATCH_STEP;
+ cdat->dstr_734__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_732__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_734__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_CONJUNCTION",
- sizeof (cdat->dstr_732__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_734__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION */
- /*_.VALTUP___V822*/ meltfptr[821] =
- (void *) &cdat->dtup_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
- cdat->dtup_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr =
+ /*inimult dtup_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION */
+ /*_.VALTUP___V825*/ meltfptr[824] =
+ (void *) &cdat->dtup_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ cdat->dtup_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_733__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 7;
- /*inimult dtup_734__CLASS_MATCH_STEP_FLAG_CONJUNCTION */
- /*_.VALTUP___V823*/ meltfptr[822] =
- (void *) &cdat->dtup_734__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
- cdat->dtup_734__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr =
+ cdat->dtup_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 7;
+ /*inimult dtup_736__CLASS_MATCH_STEP_FLAG_CONJUNCTION */
+ /*_.VALTUP___V826*/ meltfptr[825] =
+ (void *) &cdat->dtup_736__CLASS_MATCH_STEP_FLAG_CONJUNCTION;
+ cdat->dtup_736__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_734__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 5;
+ cdat->dtup_736__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 5;
-/*iniobj dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V824*/ meltfptr[823])
- /*_.VALDATA___V824*/
- meltfptr[823] =
- (void *) &cdat->dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+/*iniobj dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V827*/ meltfptr[826])
+ /*_.VALDATA___V827*/
+ meltfptr[826] =
+ (void *) &cdat->dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
+ ("iniobj check.discr isobj dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
+ ("iniobj check.discr objmagic dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class =
+ cdat->dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 379854200;
- cdat->dsym_735__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 3;
+ cdat->dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 379854200;
+ cdat->dsym_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 3;
-/*inistring dstr_736__CLASS_MATCH_STEP*/
- /*_.VALSTR___V825*/ meltfptr[824] =
- (void *) &cdat->dstr_736__CLASS_MATCH_STEP;
- cdat->dstr_736__CLASS_MATCH_STEP.discr =
+/*inistring dstr_738__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V828*/ meltfptr[827] =
+ (void *) &cdat->dstr_738__CLASS_MATCH_STEP;
+ cdat->dstr_738__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_736__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_738__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_DISJUNCTION",
- sizeof (cdat->dstr_736__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_738__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ iniobj");
-/*iniobj dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/
-/*_.VALDATA___V826*/ meltfptr[825] =
- (void *) &cdat->dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+/*iniobj dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/
+/*_.VALDATA___V829*/ meltfptr[828] =
+ (void *) &cdat->dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
+ ("iniobj check.discr isobj dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
+ ("iniobj check.discr objmagic dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class =
+ cdat->dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_num =
+ cdat->dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 182290992;
- cdat->dobj_737__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 8;
+ cdat->dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 1037571891;
+ cdat->dobj_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 8;
-/*inistring dstr_738__CLASS_MATCH_STEP*/
- /*_.VALSTR___V827*/ meltfptr[826] =
- (void *) &cdat->dstr_738__CLASS_MATCH_STEP;
- cdat->dstr_738__CLASS_MATCH_STEP.discr =
+/*inistring dstr_740__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V830*/ meltfptr[829] =
+ (void *) &cdat->dstr_740__CLASS_MATCH_STEP;
+ cdat->dstr_740__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_738__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_740__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_FLAG_DISJUNCTION",
- sizeof (cdat->dstr_738__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_740__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION */
- /*_.VALTUP___V828*/ meltfptr[827] =
- (void *) &cdat->dtup_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
- cdat->dtup_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr =
+ /*inimult dtup_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION */
+ /*_.VALTUP___V831*/ meltfptr[830] =
+ (void *) &cdat->dtup_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ cdat->dtup_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_739__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 7;
- /*inimult dtup_740__CLASS_MATCH_STEP_FLAG_DISJUNCTION */
- /*_.VALTUP___V829*/ meltfptr[828] =
- (void *) &cdat->dtup_740__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
- cdat->dtup_740__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr =
+ cdat->dtup_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 7;
+ /*inimult dtup_742__CLASS_MATCH_STEP_FLAG_DISJUNCTION */
+ /*_.VALTUP___V832*/ meltfptr[831] =
+ (void *) &cdat->dtup_742__CLASS_MATCH_STEP_FLAG_DISJUNCTION;
+ cdat->dtup_742__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_740__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 5;
+ cdat->dtup_742__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 5;
-/*iniobj dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V830*/ meltfptr[829])
- /*_.VALDATA___V830*/
- meltfptr[829] =
- (void *) &cdat->dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+/*iniobj dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V833*/ meltfptr[832])
+ /*_.VALDATA___V833*/
+ meltfptr[832] =
+ (void *) &cdat->dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
+ ("iniobj check.discr isobj dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
+ ("iniobj check.discr objmagic dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class =
+ cdat->dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 82828474;
- cdat->dsym_741__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 3;
+ cdat->dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 82828474;
+ cdat->dsym_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 3;
-/*inistring dstr_742__CLASS_MATCH_STEP*/
- /*_.VALSTR___V831*/ meltfptr[830] =
- (void *) &cdat->dstr_742__CLASS_MATCH_STEP;
- cdat->dstr_742__CLASS_MATCH_STEP.discr =
+/*inistring dstr_744__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V834*/ meltfptr[833] =
+ (void *) &cdat->dstr_744__CLASS_MATCH_STEP;
+ cdat->dstr_744__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_742__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_744__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
- sizeof (cdat->dstr_742__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_744__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ iniobj");
-/*iniobj dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/
-/*_.VALDATA___V832*/ meltfptr[831] =
- (void *) &cdat->dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+/*iniobj dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/
+/*_.VALDATA___V835*/ meltfptr[834] =
+ (void *) &cdat->dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
+ ("iniobj check.discr isobj dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
+ ("iniobj check.discr objmagic dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class =
+ cdat->dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_num =
+ cdat->dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 103403055;
- cdat->dobj_743__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 8;
+ cdat->dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 507723413;
+ cdat->dobj_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 8;
-/*inistring dstr_744__CLASS_MATCH_STEP*/
- /*_.VALSTR___V833*/ meltfptr[832] =
- (void *) &cdat->dstr_744__CLASS_MATCH_STEP;
- cdat->dstr_744__CLASS_MATCH_STEP.discr =
+/*inistring dstr_746__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V836*/ meltfptr[835] =
+ (void *) &cdat->dstr_746__CLASS_MATCH_STEP;
+ cdat->dstr_746__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_744__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_746__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG",
- sizeof (cdat->dstr_744__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_746__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
- /*_.VALTUP___V834*/ meltfptr[833] =
- (void *) &cdat->dtup_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
- cdat->dtup_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr =
+ /*inimult dtup_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
+ /*_.VALTUP___V837*/ meltfptr[836] =
+ (void *) &cdat->dtup_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ cdat->dtup_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_745__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 6;
- /*inimult dtup_746__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
- /*_.VALTUP___V841*/ meltfptr[840] =
- (void *) &cdat->dtup_746__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
- cdat->dtup_746__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr =
+ cdat->dtup_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 6;
+ /*inimult dtup_748__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
+ /*_.VALTUP___V844*/ meltfptr[843] =
+ (void *) &cdat->dtup_748__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
+ cdat->dtup_748__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_746__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 7;
+ cdat->dtup_748__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 7;
-/*iniobj dsym_747__MSTEPSUCCESS_VAROCC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V842*/ meltfptr[841])
- /*_.VALDATA___V842*/
- meltfptr[841] = (void *) &cdat->dsym_747__MSTEPSUCCESS_VAROCC;
+/*iniobj dsym_749__MSTEPSUCCESS_VAROCC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V845*/ meltfptr[844])
+ /*_.VALDATA___V845*/
+ meltfptr[844] = (void *) &cdat->dsym_749__MSTEPSUCCESS_VAROCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_747__MSTEPSUCCESS_VAROCC",
+ melt_assertmsg ("iniobj check.discr isobj dsym_749__MSTEPSUCCESS_VAROCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_747__MSTEPSUCCESS_VAROCC",
+ ("iniobj check.discr objmagic dsym_749__MSTEPSUCCESS_VAROCC",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_747__MSTEPSUCCESS_VAROCC.meltobj_class =
+ cdat->dsym_749__MSTEPSUCCESS_VAROCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_747__MSTEPSUCCESS_VAROCC.obj_hash = 502553316;
- cdat->dsym_747__MSTEPSUCCESS_VAROCC.obj_len = 3;
+ cdat->dsym_749__MSTEPSUCCESS_VAROCC.obj_hash = 502553316;
+ cdat->dsym_749__MSTEPSUCCESS_VAROCC.obj_len = 3;
-/*inistring dstr_748__MSTEPSUCCESS_VAR*/
- /*_.VALSTR___V843*/ meltfptr[842] =
- (void *) &cdat->dstr_748__MSTEPSUCCESS_VAR;
- cdat->dstr_748__MSTEPSUCCESS_VAR.discr =
+/*inistring dstr_750__MSTEPSUCCESS_VAR*/
+ /*_.VALSTR___V846*/ meltfptr[845] =
+ (void *) &cdat->dstr_750__MSTEPSUCCESS_VAR;
+ cdat->dstr_750__MSTEPSUCCESS_VAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_748__MSTEPSUCCESS_VAR.val,
+ /*small inistring */ strncpy (cdat->dstr_750__MSTEPSUCCESS_VAR.val,
"MSTEPSUCCESS_VAROCC",
- sizeof (cdat->dstr_748__MSTEPSUCCESS_VAR.
+ sizeof (cdat->dstr_750__MSTEPSUCCESS_VAR.
val) - 1);
/*^iniobj */
-/*iniobj dobj_749__MSTEPSUCCESS_VAROCC*/
-/*_.VALDATA___V835*/ meltfptr[834] =
- (void *) &cdat->dobj_749__MSTEPSUCCESS_VAROCC;
+/*iniobj dobj_751__MSTEPSUCCESS_VAROCC*/
+/*_.VALDATA___V838*/ meltfptr[837] =
+ (void *) &cdat->dobj_751__MSTEPSUCCESS_VAROCC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_749__MSTEPSUCCESS_VAROCC",
+ melt_assertmsg ("iniobj check.discr isobj dobj_751__MSTEPSUCCESS_VAROCC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_749__MSTEPSUCCESS_VAROCC",
+ ("iniobj check.discr objmagic dobj_751__MSTEPSUCCESS_VAROCC",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_749__MSTEPSUCCESS_VAROCC.meltobj_class =
+ cdat->dobj_751__MSTEPSUCCESS_VAROCC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_749__MSTEPSUCCESS_VAROCC.obj_num = 4;
- cdat->dobj_749__MSTEPSUCCESS_VAROCC.obj_hash = 447042580;
- cdat->dobj_749__MSTEPSUCCESS_VAROCC.obj_len = 4;
+ cdat->dobj_751__MSTEPSUCCESS_VAROCC.obj_num = 4;
+ cdat->dobj_751__MSTEPSUCCESS_VAROCC.obj_hash = 1063448467;
+ cdat->dobj_751__MSTEPSUCCESS_VAROCC.obj_len = 4;
-/*inistring dstr_750__MSTEPSUCCESS_VAR*/
- /*_.VALSTR___V836*/ meltfptr[835] =
- (void *) &cdat->dstr_750__MSTEPSUCCESS_VAR;
- cdat->dstr_750__MSTEPSUCCESS_VAR.discr =
+/*inistring dstr_752__MSTEPSUCCESS_VAR*/
+ /*_.VALSTR___V839*/ meltfptr[838] =
+ (void *) &cdat->dstr_752__MSTEPSUCCESS_VAR;
+ cdat->dstr_752__MSTEPSUCCESS_VAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_750__MSTEPSUCCESS_VAR.val,
+ /*small inistring */ strncpy (cdat->dstr_752__MSTEPSUCCESS_VAR.val,
"MSTEPSUCCESS_VAROCC",
- sizeof (cdat->dstr_750__MSTEPSUCCESS_VAR.
+ sizeof (cdat->dstr_752__MSTEPSUCCESS_VAR.
val) - 1);
-/*iniobj dsym_751__MSTEPSUCCESS_BINDS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V844*/ meltfptr[843])
- /*_.VALDATA___V844*/
- meltfptr[843] = (void *) &cdat->dsym_751__MSTEPSUCCESS_BINDS;
+/*iniobj dsym_753__MSTEPSUCCESS_BINDS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V847*/ meltfptr[846])
+ /*_.VALDATA___V847*/
+ meltfptr[846] = (void *) &cdat->dsym_753__MSTEPSUCCESS_BINDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_751__MSTEPSUCCESS_BINDS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_753__MSTEPSUCCESS_BINDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_751__MSTEPSUCCESS_BINDS",
+ ("iniobj check.discr objmagic dsym_753__MSTEPSUCCESS_BINDS",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_751__MSTEPSUCCESS_BINDS.meltobj_class =
+ cdat->dsym_753__MSTEPSUCCESS_BINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_751__MSTEPSUCCESS_BINDS.obj_hash = 862501677;
- cdat->dsym_751__MSTEPSUCCESS_BINDS.obj_len = 3;
+ cdat->dsym_753__MSTEPSUCCESS_BINDS.obj_hash = 862501677;
+ cdat->dsym_753__MSTEPSUCCESS_BINDS.obj_len = 3;
-/*inistring dstr_752__MSTEPSUCCESS_BIN*/
- /*_.VALSTR___V845*/ meltfptr[844] =
- (void *) &cdat->dstr_752__MSTEPSUCCESS_BIN;
- cdat->dstr_752__MSTEPSUCCESS_BIN.discr =
+/*inistring dstr_754__MSTEPSUCCESS_BIN*/
+ /*_.VALSTR___V848*/ meltfptr[847] =
+ (void *) &cdat->dstr_754__MSTEPSUCCESS_BIN;
+ cdat->dstr_754__MSTEPSUCCESS_BIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_752__MSTEPSUCCESS_BIN.val,
+ /*small inistring */ strncpy (cdat->dstr_754__MSTEPSUCCESS_BIN.val,
"MSTEPSUCCESS_BINDS",
- sizeof (cdat->dstr_752__MSTEPSUCCESS_BIN.
+ sizeof (cdat->dstr_754__MSTEPSUCCESS_BIN.
val) - 1);
/*^iniobj */
-/*iniobj dobj_753__MSTEPSUCCESS_BINDS*/
-/*_.VALDATA___V837*/ meltfptr[836] =
- (void *) &cdat->dobj_753__MSTEPSUCCESS_BINDS;
+/*iniobj dobj_755__MSTEPSUCCESS_BINDS*/
+/*_.VALDATA___V840*/ meltfptr[839] =
+ (void *) &cdat->dobj_755__MSTEPSUCCESS_BINDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_753__MSTEPSUCCESS_BINDS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_755__MSTEPSUCCESS_BINDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_753__MSTEPSUCCESS_BINDS",
+ ("iniobj check.discr objmagic dobj_755__MSTEPSUCCESS_BINDS",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_753__MSTEPSUCCESS_BINDS.meltobj_class =
+ cdat->dobj_755__MSTEPSUCCESS_BINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_753__MSTEPSUCCESS_BINDS.obj_num = 5;
- cdat->dobj_753__MSTEPSUCCESS_BINDS.obj_hash = 201691729;
- cdat->dobj_753__MSTEPSUCCESS_BINDS.obj_len = 4;
+ cdat->dobj_755__MSTEPSUCCESS_BINDS.obj_num = 5;
+ cdat->dobj_755__MSTEPSUCCESS_BINDS.obj_hash = 141345560;
+ cdat->dobj_755__MSTEPSUCCESS_BINDS.obj_len = 4;
-/*inistring dstr_754__MSTEPSUCCESS_BIN*/
- /*_.VALSTR___V838*/ meltfptr[837] =
- (void *) &cdat->dstr_754__MSTEPSUCCESS_BIN;
- cdat->dstr_754__MSTEPSUCCESS_BIN.discr =
+/*inistring dstr_756__MSTEPSUCCESS_BIN*/
+ /*_.VALSTR___V841*/ meltfptr[840] =
+ (void *) &cdat->dstr_756__MSTEPSUCCESS_BIN;
+ cdat->dstr_756__MSTEPSUCCESS_BIN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_754__MSTEPSUCCESS_BIN.val,
+ /*small inistring */ strncpy (cdat->dstr_756__MSTEPSUCCESS_BIN.val,
"MSTEPSUCCESS_BINDS",
- sizeof (cdat->dstr_754__MSTEPSUCCESS_BIN.
+ sizeof (cdat->dstr_756__MSTEPSUCCESS_BIN.
val) - 1);
-/*iniobj dsym_755__MSTEPSUCCESS_BODY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V846*/ meltfptr[845])
- /*_.VALDATA___V846*/
- meltfptr[845] = (void *) &cdat->dsym_755__MSTEPSUCCESS_BODY;
+/*iniobj dsym_757__MSTEPSUCCESS_BODY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V849*/ meltfptr[848])
+ /*_.VALDATA___V849*/
+ meltfptr[848] = (void *) &cdat->dsym_757__MSTEPSUCCESS_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_755__MSTEPSUCCESS_BODY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_757__MSTEPSUCCESS_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_755__MSTEPSUCCESS_BODY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_757__MSTEPSUCCESS_BODY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_755__MSTEPSUCCESS_BODY.meltobj_class =
+ cdat->dsym_757__MSTEPSUCCESS_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_755__MSTEPSUCCESS_BODY.obj_hash = 270381222;
- cdat->dsym_755__MSTEPSUCCESS_BODY.obj_len = 3;
+ cdat->dsym_757__MSTEPSUCCESS_BODY.obj_hash = 270381222;
+ cdat->dsym_757__MSTEPSUCCESS_BODY.obj_len = 3;
-/*inistring dstr_756__MSTEPSUCCESS_BOD*/
- /*_.VALSTR___V847*/ meltfptr[846] =
- (void *) &cdat->dstr_756__MSTEPSUCCESS_BOD;
- cdat->dstr_756__MSTEPSUCCESS_BOD.discr =
+/*inistring dstr_758__MSTEPSUCCESS_BOD*/
+ /*_.VALSTR___V850*/ meltfptr[849] =
+ (void *) &cdat->dstr_758__MSTEPSUCCESS_BOD;
+ cdat->dstr_758__MSTEPSUCCESS_BOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_756__MSTEPSUCCESS_BOD.val,
+ /*small inistring */ strncpy (cdat->dstr_758__MSTEPSUCCESS_BOD.val,
"MSTEPSUCCESS_BODY",
- sizeof (cdat->dstr_756__MSTEPSUCCESS_BOD.
+ sizeof (cdat->dstr_758__MSTEPSUCCESS_BOD.
val) - 1);
/*^iniobj */
-/*iniobj dobj_757__MSTEPSUCCESS_BODY*/
-/*_.VALDATA___V839*/ meltfptr[838] =
- (void *) &cdat->dobj_757__MSTEPSUCCESS_BODY;
+/*iniobj dobj_759__MSTEPSUCCESS_BODY*/
+/*_.VALDATA___V842*/ meltfptr[841] =
+ (void *) &cdat->dobj_759__MSTEPSUCCESS_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_757__MSTEPSUCCESS_BODY",
+ melt_assertmsg ("iniobj check.discr isobj dobj_759__MSTEPSUCCESS_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_757__MSTEPSUCCESS_BODY",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_759__MSTEPSUCCESS_BODY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_757__MSTEPSUCCESS_BODY.meltobj_class =
+ cdat->dobj_759__MSTEPSUCCESS_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_757__MSTEPSUCCESS_BODY.obj_num = 6;
- cdat->dobj_757__MSTEPSUCCESS_BODY.obj_hash = 916734388;
- cdat->dobj_757__MSTEPSUCCESS_BODY.obj_len = 4;
+ cdat->dobj_759__MSTEPSUCCESS_BODY.obj_num = 6;
+ cdat->dobj_759__MSTEPSUCCESS_BODY.obj_hash = 438753582;
+ cdat->dobj_759__MSTEPSUCCESS_BODY.obj_len = 4;
-/*inistring dstr_758__MSTEPSUCCESS_BOD*/
- /*_.VALSTR___V840*/ meltfptr[839] =
- (void *) &cdat->dstr_758__MSTEPSUCCESS_BOD;
- cdat->dstr_758__MSTEPSUCCESS_BOD.discr =
+/*inistring dstr_760__MSTEPSUCCESS_BOD*/
+ /*_.VALSTR___V843*/ meltfptr[842] =
+ (void *) &cdat->dstr_760__MSTEPSUCCESS_BOD;
+ cdat->dstr_760__MSTEPSUCCESS_BOD.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_758__MSTEPSUCCESS_BOD.val,
+ /*small inistring */ strncpy (cdat->dstr_760__MSTEPSUCCESS_BOD.val,
"MSTEPSUCCESS_BODY",
- sizeof (cdat->dstr_758__MSTEPSUCCESS_BOD.
+ sizeof (cdat->dstr_760__MSTEPSUCCESS_BOD.
val) - 1);
-/*iniobj dsym_759__CLASS_MATCH_STEP_TEST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V848*/ meltfptr[847])
- /*_.VALDATA___V848*/
- meltfptr[847] = (void *) &cdat->dsym_759__CLASS_MATCH_STEP_TEST;
+/*iniobj dsym_761__CLASS_MATCH_STEP_TEST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V851*/ meltfptr[850])
+ /*_.VALDATA___V851*/
+ meltfptr[850] = (void *) &cdat->dsym_761__CLASS_MATCH_STEP_TEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_759__CLASS_MATCH_STEP_TEST",
+ ("iniobj check.discr isobj dsym_761__CLASS_MATCH_STEP_TEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_759__CLASS_MATCH_STEP_TEST",
+ ("iniobj check.discr objmagic dsym_761__CLASS_MATCH_STEP_TEST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_759__CLASS_MATCH_STEP_TEST.meltobj_class =
+ cdat->dsym_761__CLASS_MATCH_STEP_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_759__CLASS_MATCH_STEP_TEST.obj_hash = 899758560;
- cdat->dsym_759__CLASS_MATCH_STEP_TEST.obj_len = 3;
+ cdat->dsym_761__CLASS_MATCH_STEP_TEST.obj_hash = 899758560;
+ cdat->dsym_761__CLASS_MATCH_STEP_TEST.obj_len = 3;
-/*inistring dstr_760__CLASS_MATCH_STEP*/
- /*_.VALSTR___V849*/ meltfptr[848] =
- (void *) &cdat->dstr_760__CLASS_MATCH_STEP;
- cdat->dstr_760__CLASS_MATCH_STEP.discr =
+/*inistring dstr_762__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V852*/ meltfptr[851] =
+ (void *) &cdat->dstr_762__CLASS_MATCH_STEP;
+ cdat->dstr_762__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_760__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_762__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST",
- sizeof (cdat->dstr_760__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_762__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ iniobj");
-/*iniobj dobj_761__CLASS_MATCH_STEP_TEST*/
-/*_.VALDATA___V850*/ meltfptr[849] =
- (void *) &cdat->dobj_761__CLASS_MATCH_STEP_TEST;
+/*iniobj dobj_763__CLASS_MATCH_STEP_TEST*/
+/*_.VALDATA___V853*/ meltfptr[852] =
+ (void *) &cdat->dobj_763__CLASS_MATCH_STEP_TEST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_761__CLASS_MATCH_STEP_TEST",
+ ("iniobj check.discr isobj dobj_763__CLASS_MATCH_STEP_TEST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_761__CLASS_MATCH_STEP_TEST",
+ ("iniobj check.discr objmagic dobj_763__CLASS_MATCH_STEP_TEST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_761__CLASS_MATCH_STEP_TEST.meltobj_class =
+ cdat->dobj_763__CLASS_MATCH_STEP_TEST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_761__CLASS_MATCH_STEP_TEST.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_761__CLASS_MATCH_STEP_TEST.obj_hash = 290329433;
- cdat->dobj_761__CLASS_MATCH_STEP_TEST.obj_len = 8;
+ cdat->dobj_763__CLASS_MATCH_STEP_TEST.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_763__CLASS_MATCH_STEP_TEST.obj_hash = 109167437;
+ cdat->dobj_763__CLASS_MATCH_STEP_TEST.obj_len = 8;
-/*inistring dstr_762__CLASS_MATCH_STEP*/
- /*_.VALSTR___V851*/ meltfptr[850] =
- (void *) &cdat->dstr_762__CLASS_MATCH_STEP;
- cdat->dstr_762__CLASS_MATCH_STEP.discr =
+/*inistring dstr_764__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V854*/ meltfptr[853] =
+ (void *) &cdat->dstr_764__CLASS_MATCH_STEP;
+ cdat->dstr_764__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_762__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_764__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST",
- sizeof (cdat->dstr_762__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_764__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_763__CLASS_MATCH_STEP_TEST */
- /*_.VALTUP___V852*/ meltfptr[851] =
- (void *) &cdat->dtup_763__CLASS_MATCH_STEP_TEST;
- cdat->dtup_763__CLASS_MATCH_STEP_TEST.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_763__CLASS_MATCH_STEP_TEST.nbval = 6;
- /*inimult dtup_764__CLASS_MATCH_STEP_TEST */
+ /*inimult dtup_765__CLASS_MATCH_STEP_TEST */
/*_.VALTUP___V855*/ meltfptr[854] =
- (void *) &cdat->dtup_764__CLASS_MATCH_STEP_TEST;
- cdat->dtup_764__CLASS_MATCH_STEP_TEST.discr =
+ (void *) &cdat->dtup_765__CLASS_MATCH_STEP_TEST;
+ cdat->dtup_765__CLASS_MATCH_STEP_TEST.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_765__CLASS_MATCH_STEP_TEST.nbval = 6;
+ /*inimult dtup_766__CLASS_MATCH_STEP_TEST */
+ /*_.VALTUP___V858*/ meltfptr[857] =
+ (void *) &cdat->dtup_766__CLASS_MATCH_STEP_TEST;
+ cdat->dtup_766__CLASS_MATCH_STEP_TEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_764__CLASS_MATCH_STEP_TEST.nbval = 6;
+ cdat->dtup_766__CLASS_MATCH_STEP_TEST.nbval = 6;
-/*iniobj dsym_765__MSTEP_ELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V856*/ meltfptr[855])
- /*_.VALDATA___V856*/
- meltfptr[855] = (void *) &cdat->dsym_765__MSTEP_ELSE;
+/*iniobj dsym_767__MSTEP_ELSE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V859*/ meltfptr[858])
+ /*_.VALDATA___V859*/
+ meltfptr[858] = (void *) &cdat->dsym_767__MSTEP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_765__MSTEP_ELSE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_767__MSTEP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_765__MSTEP_ELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_767__MSTEP_ELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_765__MSTEP_ELSE.meltobj_class =
+ cdat->dsym_767__MSTEP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_765__MSTEP_ELSE.obj_hash = 307203514;
- cdat->dsym_765__MSTEP_ELSE.obj_len = 3;
+ cdat->dsym_767__MSTEP_ELSE.obj_hash = 307203514;
+ cdat->dsym_767__MSTEP_ELSE.obj_len = 3;
-/*inistring dstr_766__MSTEP_ELSE*/
- /*_.VALSTR___V857*/ meltfptr[856] = (void *) &cdat->dstr_766__MSTEP_ELSE;
- cdat->dstr_766__MSTEP_ELSE.discr =
+/*inistring dstr_768__MSTEP_ELSE*/
+ /*_.VALSTR___V860*/ meltfptr[859] = (void *) &cdat->dstr_768__MSTEP_ELSE;
+ cdat->dstr_768__MSTEP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_766__MSTEP_ELSE.val, "MSTEP_ELSE",
- sizeof (cdat->dstr_766__MSTEP_ELSE.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_768__MSTEP_ELSE.val, "MSTEP_ELSE",
+ sizeof (cdat->dstr_768__MSTEP_ELSE.val) - 1);
/*^iniobj */
-/*iniobj dobj_767__MSTEP_ELSE*/
-/*_.VALDATA___V853*/ meltfptr[852] = (void *) &cdat->dobj_767__MSTEP_ELSE;
+/*iniobj dobj_769__MSTEP_ELSE*/
+/*_.VALDATA___V856*/ meltfptr[855] = (void *) &cdat->dobj_769__MSTEP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_767__MSTEP_ELSE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_769__MSTEP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_767__MSTEP_ELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_769__MSTEP_ELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_767__MSTEP_ELSE.meltobj_class =
+ cdat->dobj_769__MSTEP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_767__MSTEP_ELSE.obj_num = 5;
- cdat->dobj_767__MSTEP_ELSE.obj_hash = 912231783;
- cdat->dobj_767__MSTEP_ELSE.obj_len = 4;
+ cdat->dobj_769__MSTEP_ELSE.obj_num = 5;
+ cdat->dobj_769__MSTEP_ELSE.obj_hash = 639265591;
+ cdat->dobj_769__MSTEP_ELSE.obj_len = 4;
-/*inistring dstr_768__MSTEP_ELSE*/
- /*_.VALSTR___V854*/ meltfptr[853] = (void *) &cdat->dstr_768__MSTEP_ELSE;
- cdat->dstr_768__MSTEP_ELSE.discr =
+/*inistring dstr_770__MSTEP_ELSE*/
+ /*_.VALSTR___V857*/ meltfptr[856] = (void *) &cdat->dstr_770__MSTEP_ELSE;
+ cdat->dstr_770__MSTEP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_768__MSTEP_ELSE.val, "MSTEP_ELSE",
- sizeof (cdat->dstr_768__MSTEP_ELSE.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_770__MSTEP_ELSE.val, "MSTEP_ELSE",
+ sizeof (cdat->dstr_770__MSTEP_ELSE.val) - 1);
-/*iniobj dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V858*/ meltfptr[857])
- /*_.VALDATA___V858*/
- meltfptr[857] = (void *) &cdat->dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE;
+/*iniobj dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V861*/ meltfptr[860])
+ /*_.VALDATA___V861*/
+ meltfptr[860] = (void *) &cdat->dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE",
+ ("iniobj check.discr isobj dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE",
+ ("iniobj check.discr objmagic dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class =
+ cdat->dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 368352993;
- cdat->dsym_769__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 3;
+ cdat->dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 368352993;
+ cdat->dsym_771__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 3;
-/*inistring dstr_770__CLASS_MATCH_STEP*/
- /*_.VALSTR___V859*/ meltfptr[858] =
- (void *) &cdat->dstr_770__CLASS_MATCH_STEP;
- cdat->dstr_770__CLASS_MATCH_STEP.discr =
+/*inistring dstr_772__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V862*/ meltfptr[861] =
+ (void *) &cdat->dstr_772__CLASS_MATCH_STEP;
+ cdat->dstr_772__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_770__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_772__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_VARIABLE",
- sizeof (cdat->dstr_770__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_772__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ iniobj");
-/*iniobj dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE*/
-/*_.VALDATA___V860*/ meltfptr[859] =
- (void *) &cdat->dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE;
+/*iniobj dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE*/
+/*_.VALDATA___V863*/ meltfptr[862] =
+ (void *) &cdat->dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE",
+ ("iniobj check.discr isobj dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE",
+ ("iniobj check.discr objmagic dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class =
+ cdat->dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 603218862;
- cdat->dobj_771__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 8;
+ cdat->dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 1060206435;
+ cdat->dobj_773__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 8;
-/*inistring dstr_772__CLASS_MATCH_STEP*/
- /*_.VALSTR___V861*/ meltfptr[860] =
- (void *) &cdat->dstr_772__CLASS_MATCH_STEP;
- cdat->dstr_772__CLASS_MATCH_STEP.discr =
+/*inistring dstr_774__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V864*/ meltfptr[863] =
+ (void *) &cdat->dstr_774__CLASS_MATCH_STEP;
+ cdat->dstr_774__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_772__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_774__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_VARIABLE",
- sizeof (cdat->dstr_772__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_774__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_773__CLASS_MATCH_STEP_TEST_VARIABLE */
- /*_.VALTUP___V862*/ meltfptr[861] =
- (void *) &cdat->dtup_773__CLASS_MATCH_STEP_TEST_VARIABLE;
- cdat->dtup_773__CLASS_MATCH_STEP_TEST_VARIABLE.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_773__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7;
- /*inimult dtup_774__CLASS_MATCH_STEP_TEST_VARIABLE */
+ /*inimult dtup_775__CLASS_MATCH_STEP_TEST_VARIABLE */
/*_.VALTUP___V865*/ meltfptr[864] =
- (void *) &cdat->dtup_774__CLASS_MATCH_STEP_TEST_VARIABLE;
- cdat->dtup_774__CLASS_MATCH_STEP_TEST_VARIABLE.discr =
+ (void *) &cdat->dtup_775__CLASS_MATCH_STEP_TEST_VARIABLE;
+ cdat->dtup_775__CLASS_MATCH_STEP_TEST_VARIABLE.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_775__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7;
+ /*inimult dtup_776__CLASS_MATCH_STEP_TEST_VARIABLE */
+ /*_.VALTUP___V868*/ meltfptr[867] =
+ (void *) &cdat->dtup_776__CLASS_MATCH_STEP_TEST_VARIABLE;
+ cdat->dtup_776__CLASS_MATCH_STEP_TEST_VARIABLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_774__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7;
+ cdat->dtup_776__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7;
-/*iniobj dsym_775__MSTEPTESTVAR_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V866*/ meltfptr[865])
- /*_.VALDATA___V866*/
- meltfptr[865] = (void *) &cdat->dsym_775__MSTEPTESTVAR_DATA;
+/*iniobj dsym_777__MSTEPTESTVAR_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V869*/ meltfptr[868])
+ /*_.VALDATA___V869*/
+ meltfptr[868] = (void *) &cdat->dsym_777__MSTEPTESTVAR_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_775__MSTEPTESTVAR_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_777__MSTEPTESTVAR_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_775__MSTEPTESTVAR_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_777__MSTEPTESTVAR_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_775__MSTEPTESTVAR_DATA.meltobj_class =
+ cdat->dsym_777__MSTEPTESTVAR_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_775__MSTEPTESTVAR_DATA.obj_hash = 627308015;
- cdat->dsym_775__MSTEPTESTVAR_DATA.obj_len = 3;
+ cdat->dsym_777__MSTEPTESTVAR_DATA.obj_hash = 627308015;
+ cdat->dsym_777__MSTEPTESTVAR_DATA.obj_len = 3;
-/*inistring dstr_776__MSTEPTESTVAR_DAT*/
- /*_.VALSTR___V867*/ meltfptr[866] =
- (void *) &cdat->dstr_776__MSTEPTESTVAR_DAT;
- cdat->dstr_776__MSTEPTESTVAR_DAT.discr =
+/*inistring dstr_778__MSTEPTESTVAR_DAT*/
+ /*_.VALSTR___V870*/ meltfptr[869] =
+ (void *) &cdat->dstr_778__MSTEPTESTVAR_DAT;
+ cdat->dstr_778__MSTEPTESTVAR_DAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_776__MSTEPTESTVAR_DAT.val,
+ /*small inistring */ strncpy (cdat->dstr_778__MSTEPTESTVAR_DAT.val,
"MSTEPTESTVAR_DATA",
- sizeof (cdat->dstr_776__MSTEPTESTVAR_DAT.
+ sizeof (cdat->dstr_778__MSTEPTESTVAR_DAT.
val) - 1);
/*^iniobj */
-/*iniobj dobj_777__MSTEPTESTVAR_DATA*/
-/*_.VALDATA___V863*/ meltfptr[862] =
- (void *) &cdat->dobj_777__MSTEPTESTVAR_DATA;
+/*iniobj dobj_779__MSTEPTESTVAR_DATA*/
+/*_.VALDATA___V866*/ meltfptr[865] =
+ (void *) &cdat->dobj_779__MSTEPTESTVAR_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_777__MSTEPTESTVAR_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_779__MSTEPTESTVAR_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_777__MSTEPTESTVAR_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_779__MSTEPTESTVAR_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_777__MSTEPTESTVAR_DATA.meltobj_class =
+ cdat->dobj_779__MSTEPTESTVAR_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_777__MSTEPTESTVAR_DATA.obj_num = 6;
- cdat->dobj_777__MSTEPTESTVAR_DATA.obj_hash = 965611988;
- cdat->dobj_777__MSTEPTESTVAR_DATA.obj_len = 4;
+ cdat->dobj_779__MSTEPTESTVAR_DATA.obj_num = 6;
+ cdat->dobj_779__MSTEPTESTVAR_DATA.obj_hash = 936248901;
+ cdat->dobj_779__MSTEPTESTVAR_DATA.obj_len = 4;
-/*inistring dstr_778__MSTEPTESTVAR_DAT*/
- /*_.VALSTR___V864*/ meltfptr[863] =
- (void *) &cdat->dstr_778__MSTEPTESTVAR_DAT;
- cdat->dstr_778__MSTEPTESTVAR_DAT.discr =
+/*inistring dstr_780__MSTEPTESTVAR_DAT*/
+ /*_.VALSTR___V867*/ meltfptr[866] =
+ (void *) &cdat->dstr_780__MSTEPTESTVAR_DAT;
+ cdat->dstr_780__MSTEPTESTVAR_DAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_778__MSTEPTESTVAR_DAT.val,
+ /*small inistring */ strncpy (cdat->dstr_780__MSTEPTESTVAR_DAT.val,
"MSTEPTESTVAR_DATA",
- sizeof (cdat->dstr_778__MSTEPTESTVAR_DAT.
+ sizeof (cdat->dstr_780__MSTEPTESTVAR_DAT.
val) - 1);
-/*iniobj dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V868*/ meltfptr[867])
- /*_.VALDATA___V868*/
- meltfptr[867] = (void *) &cdat->dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT;
+/*iniobj dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V871*/ meltfptr[870])
+ /*_.VALDATA___V871*/
+ meltfptr[870] = (void *) &cdat->dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT",
+ ("iniobj check.discr isobj dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT",
+ ("iniobj check.discr objmagic dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class =
+ cdat->dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 79165585;
- cdat->dsym_779__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 3;
+ cdat->dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 79165585;
+ cdat->dsym_781__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 3;
-/*inistring dstr_780__CLASS_MATCH_STEP*/
- /*_.VALSTR___V869*/ meltfptr[868] =
- (void *) &cdat->dstr_780__CLASS_MATCH_STEP;
- cdat->dstr_780__CLASS_MATCH_STEP.discr =
+/*inistring dstr_782__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V872*/ meltfptr[871] =
+ (void *) &cdat->dstr_782__CLASS_MATCH_STEP;
+ cdat->dstr_782__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_780__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_782__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_CONSTANT",
- sizeof (cdat->dstr_780__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_782__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ iniobj");
-/*iniobj dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT*/
-/*_.VALDATA___V870*/ meltfptr[869] =
- (void *) &cdat->dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT;
+/*iniobj dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT*/
+/*_.VALDATA___V873*/ meltfptr[872] =
+ (void *) &cdat->dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT",
+ ("iniobj check.discr isobj dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT",
+ ("iniobj check.discr objmagic dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class =
+ cdat->dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 498707019;
- cdat->dobj_781__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 8;
+ cdat->dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 618455767;
+ cdat->dobj_783__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 8;
-/*inistring dstr_782__CLASS_MATCH_STEP*/
- /*_.VALSTR___V871*/ meltfptr[870] =
- (void *) &cdat->dstr_782__CLASS_MATCH_STEP;
- cdat->dstr_782__CLASS_MATCH_STEP.discr =
+/*inistring dstr_784__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V874*/ meltfptr[873] =
+ (void *) &cdat->dstr_784__CLASS_MATCH_STEP;
+ cdat->dstr_784__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_782__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_784__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_CONSTANT",
- sizeof (cdat->dstr_782__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_784__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_783__CLASS_MATCH_STEP_TEST_CONSTANT */
- /*_.VALTUP___V872*/ meltfptr[871] =
- (void *) &cdat->dtup_783__CLASS_MATCH_STEP_TEST_CONSTANT;
- cdat->dtup_783__CLASS_MATCH_STEP_TEST_CONSTANT.discr =
+ /*inimult dtup_785__CLASS_MATCH_STEP_TEST_CONSTANT */
+ /*_.VALTUP___V875*/ meltfptr[874] =
+ (void *) &cdat->dtup_785__CLASS_MATCH_STEP_TEST_CONSTANT;
+ cdat->dtup_785__CLASS_MATCH_STEP_TEST_CONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_783__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 7;
- /*inimult dtup_784__CLASS_MATCH_STEP_TEST_CONSTANT */
- /*_.VALTUP___V877*/ meltfptr[876] =
- (void *) &cdat->dtup_784__CLASS_MATCH_STEP_TEST_CONSTANT;
- cdat->dtup_784__CLASS_MATCH_STEP_TEST_CONSTANT.discr =
+ cdat->dtup_785__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 7;
+ /*inimult dtup_786__CLASS_MATCH_STEP_TEST_CONSTANT */
+ /*_.VALTUP___V880*/ meltfptr[879] =
+ (void *) &cdat->dtup_786__CLASS_MATCH_STEP_TEST_CONSTANT;
+ cdat->dtup_786__CLASS_MATCH_STEP_TEST_CONSTANT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_784__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 8;
+ cdat->dtup_786__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 8;
-/*iniobj dsym_785__MSTEPTESTCONST_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V878*/ meltfptr[877])
- /*_.VALDATA___V878*/
- meltfptr[877] = (void *) &cdat->dsym_785__MSTEPTESTCONST_DATA;
+/*iniobj dsym_787__MSTEPTESTCONST_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V881*/ meltfptr[880])
+ /*_.VALDATA___V881*/
+ meltfptr[880] = (void *) &cdat->dsym_787__MSTEPTESTCONST_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_785__MSTEPTESTCONST_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_787__MSTEPTESTCONST_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_785__MSTEPTESTCONST_DATA",
+ ("iniobj check.discr objmagic dsym_787__MSTEPTESTCONST_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_785__MSTEPTESTCONST_DATA.meltobj_class =
+ cdat->dsym_787__MSTEPTESTCONST_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_785__MSTEPTESTCONST_DATA.obj_hash = 930515628;
- cdat->dsym_785__MSTEPTESTCONST_DATA.obj_len = 3;
+ cdat->dsym_787__MSTEPTESTCONST_DATA.obj_hash = 930515628;
+ cdat->dsym_787__MSTEPTESTCONST_DATA.obj_len = 3;
-/*inistring dstr_786__MSTEPTESTCONST_D*/
- /*_.VALSTR___V879*/ meltfptr[878] =
- (void *) &cdat->dstr_786__MSTEPTESTCONST_D;
- cdat->dstr_786__MSTEPTESTCONST_D.discr =
+/*inistring dstr_788__MSTEPTESTCONST_D*/
+ /*_.VALSTR___V882*/ meltfptr[881] =
+ (void *) &cdat->dstr_788__MSTEPTESTCONST_D;
+ cdat->dstr_788__MSTEPTESTCONST_D.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_786__MSTEPTESTCONST_D.val,
+ /*small inistring */ strncpy (cdat->dstr_788__MSTEPTESTCONST_D.val,
"MSTEPTESTCONST_DATA",
- sizeof (cdat->dstr_786__MSTEPTESTCONST_D.
+ sizeof (cdat->dstr_788__MSTEPTESTCONST_D.
val) - 1);
/*^iniobj */
-/*iniobj dobj_787__MSTEPTESTCONST_DATA*/
-/*_.VALDATA___V873*/ meltfptr[872] =
- (void *) &cdat->dobj_787__MSTEPTESTCONST_DATA;
+/*iniobj dobj_789__MSTEPTESTCONST_DATA*/
+/*_.VALDATA___V876*/ meltfptr[875] =
+ (void *) &cdat->dobj_789__MSTEPTESTCONST_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_787__MSTEPTESTCONST_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_789__MSTEPTESTCONST_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_787__MSTEPTESTCONST_DATA",
+ ("iniobj check.discr objmagic dobj_789__MSTEPTESTCONST_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_787__MSTEPTESTCONST_DATA.meltobj_class =
+ cdat->dobj_789__MSTEPTESTCONST_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_787__MSTEPTESTCONST_DATA.obj_num = 6;
- cdat->dobj_787__MSTEPTESTCONST_DATA.obj_hash = 80287582;
- cdat->dobj_787__MSTEPTESTCONST_DATA.obj_len = 4;
+ cdat->dobj_789__MSTEPTESTCONST_DATA.obj_num = 6;
+ cdat->dobj_789__MSTEPTESTCONST_DATA.obj_hash = 142973174;
+ cdat->dobj_789__MSTEPTESTCONST_DATA.obj_len = 4;
-/*inistring dstr_788__MSTEPTESTCONST_D*/
- /*_.VALSTR___V874*/ meltfptr[873] =
- (void *) &cdat->dstr_788__MSTEPTESTCONST_D;
- cdat->dstr_788__MSTEPTESTCONST_D.discr =
+/*inistring dstr_790__MSTEPTESTCONST_D*/
+ /*_.VALSTR___V877*/ meltfptr[876] =
+ (void *) &cdat->dstr_790__MSTEPTESTCONST_D;
+ cdat->dstr_790__MSTEPTESTCONST_D.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_788__MSTEPTESTCONST_D.val,
+ /*small inistring */ strncpy (cdat->dstr_790__MSTEPTESTCONST_D.val,
"MSTEPTESTCONST_DATA",
- sizeof (cdat->dstr_788__MSTEPTESTCONST_D.
+ sizeof (cdat->dstr_790__MSTEPTESTCONST_D.
val) - 1);
-/*iniobj dsym_789__MSTEPTESTCONST_BIND*/
- /*uniqueobj*/ if (! /*_.VALDATA___V880*/ meltfptr[879])
- /*_.VALDATA___V880*/
- meltfptr[879] = (void *) &cdat->dsym_789__MSTEPTESTCONST_BIND;
+/*iniobj dsym_791__MSTEPTESTCONST_BIND*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V883*/ meltfptr[882])
+ /*_.VALDATA___V883*/
+ meltfptr[882] = (void *) &cdat->dsym_791__MSTEPTESTCONST_BIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_789__MSTEPTESTCONST_BIND",
+ melt_assertmsg ("iniobj check.discr isobj dsym_791__MSTEPTESTCONST_BIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_789__MSTEPTESTCONST_BIND",
+ ("iniobj check.discr objmagic dsym_791__MSTEPTESTCONST_BIND",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_789__MSTEPTESTCONST_BIND.meltobj_class =
+ cdat->dsym_791__MSTEPTESTCONST_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_789__MSTEPTESTCONST_BIND.obj_hash = 693178480;
- cdat->dsym_789__MSTEPTESTCONST_BIND.obj_len = 3;
+ cdat->dsym_791__MSTEPTESTCONST_BIND.obj_hash = 693178480;
+ cdat->dsym_791__MSTEPTESTCONST_BIND.obj_len = 3;
-/*inistring dstr_790__MSTEPTESTCONST_B*/
- /*_.VALSTR___V881*/ meltfptr[880] =
- (void *) &cdat->dstr_790__MSTEPTESTCONST_B;
- cdat->dstr_790__MSTEPTESTCONST_B.discr =
+/*inistring dstr_792__MSTEPTESTCONST_B*/
+ /*_.VALSTR___V884*/ meltfptr[883] =
+ (void *) &cdat->dstr_792__MSTEPTESTCONST_B;
+ cdat->dstr_792__MSTEPTESTCONST_B.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_790__MSTEPTESTCONST_B.val,
+ /*small inistring */ strncpy (cdat->dstr_792__MSTEPTESTCONST_B.val,
"MSTEPTESTCONST_BIND",
- sizeof (cdat->dstr_790__MSTEPTESTCONST_B.
+ sizeof (cdat->dstr_792__MSTEPTESTCONST_B.
val) - 1);
/*^iniobj */
-/*iniobj dobj_791__MSTEPTESTCONST_BIND*/
-/*_.VALDATA___V875*/ meltfptr[874] =
- (void *) &cdat->dobj_791__MSTEPTESTCONST_BIND;
+/*iniobj dobj_793__MSTEPTESTCONST_BIND*/
+/*_.VALDATA___V878*/ meltfptr[877] =
+ (void *) &cdat->dobj_793__MSTEPTESTCONST_BIND;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_791__MSTEPTESTCONST_BIND",
+ melt_assertmsg ("iniobj check.discr isobj dobj_793__MSTEPTESTCONST_BIND",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_791__MSTEPTESTCONST_BIND",
+ ("iniobj check.discr objmagic dobj_793__MSTEPTESTCONST_BIND",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_791__MSTEPTESTCONST_BIND.meltobj_class =
+ cdat->dobj_793__MSTEPTESTCONST_BIND.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_791__MSTEPTESTCONST_BIND.obj_num = 7;
- cdat->dobj_791__MSTEPTESTCONST_BIND.obj_hash = 597855492;
- cdat->dobj_791__MSTEPTESTCONST_BIND.obj_len = 4;
+ cdat->dobj_793__MSTEPTESTCONST_BIND.obj_num = 7;
+ cdat->dobj_793__MSTEPTESTCONST_BIND.obj_hash = 504397501;
+ cdat->dobj_793__MSTEPTESTCONST_BIND.obj_len = 4;
-/*inistring dstr_792__MSTEPTESTCONST_B*/
- /*_.VALSTR___V876*/ meltfptr[875] =
- (void *) &cdat->dstr_792__MSTEPTESTCONST_B;
- cdat->dstr_792__MSTEPTESTCONST_B.discr =
+/*inistring dstr_794__MSTEPTESTCONST_B*/
+ /*_.VALSTR___V879*/ meltfptr[878] =
+ (void *) &cdat->dstr_794__MSTEPTESTCONST_B;
+ cdat->dstr_794__MSTEPTESTCONST_B.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_792__MSTEPTESTCONST_B.val,
+ /*small inistring */ strncpy (cdat->dstr_794__MSTEPTESTCONST_B.val,
"MSTEPTESTCONST_BIND",
- sizeof (cdat->dstr_792__MSTEPTESTCONST_B.
+ sizeof (cdat->dstr_794__MSTEPTESTCONST_B.
val) - 1);
-/*iniobj dsym_793__CLASS_MATCH_STEP_TEST_GROUP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V882*/ meltfptr[881])
- /*_.VALDATA___V882*/
- meltfptr[881] = (void *) &cdat->dsym_793__CLASS_MATCH_STEP_TEST_GROUP;
+/*iniobj dsym_795__CLASS_MATCH_STEP_TEST_GROUP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V885*/ meltfptr[884])
+ /*_.VALDATA___V885*/
+ meltfptr[884] = (void *) &cdat->dsym_795__CLASS_MATCH_STEP_TEST_GROUP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_793__CLASS_MATCH_STEP_TEST_GROUP",
+ ("iniobj check.discr isobj dsym_795__CLASS_MATCH_STEP_TEST_GROUP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_793__CLASS_MATCH_STEP_TEST_GROUP",
+ ("iniobj check.discr objmagic dsym_795__CLASS_MATCH_STEP_TEST_GROUP",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_793__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class =
+ cdat->dsym_795__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_793__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 536919857;
- cdat->dsym_793__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 3;
+ cdat->dsym_795__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 536919857;
+ cdat->dsym_795__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 3;
-/*inistring dstr_794__CLASS_MATCH_STEP*/
- /*_.VALSTR___V883*/ meltfptr[882] =
- (void *) &cdat->dstr_794__CLASS_MATCH_STEP;
- cdat->dstr_794__CLASS_MATCH_STEP.discr =
+/*inistring dstr_796__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V886*/ meltfptr[885] =
+ (void *) &cdat->dstr_796__CLASS_MATCH_STEP;
+ cdat->dstr_796__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_794__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_796__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_GROUP",
- sizeof (cdat->dstr_794__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_796__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ iniobj");
-/*iniobj dobj_795__CLASS_MATCH_STEP_TEST_GROUP*/
-/*_.VALDATA___V884*/ meltfptr[883] =
- (void *) &cdat->dobj_795__CLASS_MATCH_STEP_TEST_GROUP;
+/*iniobj dobj_797__CLASS_MATCH_STEP_TEST_GROUP*/
+/*_.VALDATA___V887*/ meltfptr[886] =
+ (void *) &cdat->dobj_797__CLASS_MATCH_STEP_TEST_GROUP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_795__CLASS_MATCH_STEP_TEST_GROUP",
+ ("iniobj check.discr isobj dobj_797__CLASS_MATCH_STEP_TEST_GROUP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_795__CLASS_MATCH_STEP_TEST_GROUP",
+ ("iniobj check.discr objmagic dobj_797__CLASS_MATCH_STEP_TEST_GROUP",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_795__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class =
+ cdat->dobj_797__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_795__CLASS_MATCH_STEP_TEST_GROUP.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_795__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 1011305445;
- cdat->dobj_795__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 8;
+ cdat->dobj_797__CLASS_MATCH_STEP_TEST_GROUP.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_797__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 576634633;
+ cdat->dobj_797__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 8;
-/*inistring dstr_796__CLASS_MATCH_STEP*/
- /*_.VALSTR___V885*/ meltfptr[884] =
- (void *) &cdat->dstr_796__CLASS_MATCH_STEP;
- cdat->dstr_796__CLASS_MATCH_STEP.discr =
+/*inistring dstr_798__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V888*/ meltfptr[887] =
+ (void *) &cdat->dstr_798__CLASS_MATCH_STEP;
+ cdat->dstr_798__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_796__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_798__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_GROUP",
- sizeof (cdat->dstr_796__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_798__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_797__CLASS_MATCH_STEP_TEST_GROUP */
- /*_.VALTUP___V886*/ meltfptr[885] =
- (void *) &cdat->dtup_797__CLASS_MATCH_STEP_TEST_GROUP;
- cdat->dtup_797__CLASS_MATCH_STEP_TEST_GROUP.discr =
+ /*inimult dtup_799__CLASS_MATCH_STEP_TEST_GROUP */
+ /*_.VALTUP___V889*/ meltfptr[888] =
+ (void *) &cdat->dtup_799__CLASS_MATCH_STEP_TEST_GROUP;
+ cdat->dtup_799__CLASS_MATCH_STEP_TEST_GROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_797__CLASS_MATCH_STEP_TEST_GROUP.nbval = 7;
- /*inimult dtup_798__CLASS_MATCH_STEP_TEST_GROUP */
- /*_.VALTUP___V893*/ meltfptr[892] =
- (void *) &cdat->dtup_798__CLASS_MATCH_STEP_TEST_GROUP;
- cdat->dtup_798__CLASS_MATCH_STEP_TEST_GROUP.discr =
+ cdat->dtup_799__CLASS_MATCH_STEP_TEST_GROUP.nbval = 7;
+ /*inimult dtup_800__CLASS_MATCH_STEP_TEST_GROUP */
+ /*_.VALTUP___V896*/ meltfptr[895] =
+ (void *) &cdat->dtup_800__CLASS_MATCH_STEP_TEST_GROUP;
+ cdat->dtup_800__CLASS_MATCH_STEP_TEST_GROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_798__CLASS_MATCH_STEP_TEST_GROUP.nbval = 9;
+ cdat->dtup_800__CLASS_MATCH_STEP_TEST_GROUP.nbval = 9;
-/*iniobj dsym_799__MSTGROUP_START*/
- /*uniqueobj*/ if (! /*_.VALDATA___V894*/ meltfptr[893])
- /*_.VALDATA___V894*/
- meltfptr[893] = (void *) &cdat->dsym_799__MSTGROUP_START;
+/*iniobj dsym_801__MSTGROUP_START*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V897*/ meltfptr[896])
+ /*_.VALDATA___V897*/
+ meltfptr[896] = (void *) &cdat->dsym_801__MSTGROUP_START;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_799__MSTGROUP_START",
+ melt_assertmsg ("iniobj check.discr isobj dsym_801__MSTGROUP_START",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_799__MSTGROUP_START",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_801__MSTGROUP_START",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_799__MSTGROUP_START.meltobj_class =
+ cdat->dsym_801__MSTGROUP_START.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_799__MSTGROUP_START.obj_hash = 989000551;
- cdat->dsym_799__MSTGROUP_START.obj_len = 3;
+ cdat->dsym_801__MSTGROUP_START.obj_hash = 989000551;
+ cdat->dsym_801__MSTGROUP_START.obj_len = 3;
-/*inistring dstr_800__MSTGROUP_START*/
- /*_.VALSTR___V895*/ meltfptr[894] =
- (void *) &cdat->dstr_800__MSTGROUP_START;
- cdat->dstr_800__MSTGROUP_START.discr =
+/*inistring dstr_802__MSTGROUP_START*/
+ /*_.VALSTR___V898*/ meltfptr[897] =
+ (void *) &cdat->dstr_802__MSTGROUP_START;
+ cdat->dstr_802__MSTGROUP_START.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_800__MSTGROUP_START.val,
+ /*small inistring */ strncpy (cdat->dstr_802__MSTGROUP_START.val,
"MSTGROUP_START",
- sizeof (cdat->dstr_800__MSTGROUP_START.val) -
+ sizeof (cdat->dstr_802__MSTGROUP_START.val) -
1);
/*^iniobj */
-/*iniobj dobj_801__MSTGROUP_START*/
-/*_.VALDATA___V887*/ meltfptr[886] =
- (void *) &cdat->dobj_801__MSTGROUP_START;
+/*iniobj dobj_803__MSTGROUP_START*/
+/*_.VALDATA___V890*/ meltfptr[889] =
+ (void *) &cdat->dobj_803__MSTGROUP_START;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_801__MSTGROUP_START",
+ melt_assertmsg ("iniobj check.discr isobj dobj_803__MSTGROUP_START",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_801__MSTGROUP_START",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_803__MSTGROUP_START",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_801__MSTGROUP_START.meltobj_class =
+ cdat->dobj_803__MSTGROUP_START.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_801__MSTGROUP_START.obj_num = 6;
- cdat->dobj_801__MSTGROUP_START.obj_hash = 745035521;
- cdat->dobj_801__MSTGROUP_START.obj_len = 4;
+ cdat->dobj_803__MSTGROUP_START.obj_num = 6;
+ cdat->dobj_803__MSTGROUP_START.obj_hash = 724723252;
+ cdat->dobj_803__MSTGROUP_START.obj_len = 4;
-/*inistring dstr_802__MSTGROUP_START*/
- /*_.VALSTR___V888*/ meltfptr[887] =
- (void *) &cdat->dstr_802__MSTGROUP_START;
- cdat->dstr_802__MSTGROUP_START.discr =
+/*inistring dstr_804__MSTGROUP_START*/
+ /*_.VALSTR___V891*/ meltfptr[890] =
+ (void *) &cdat->dstr_804__MSTGROUP_START;
+ cdat->dstr_804__MSTGROUP_START.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_802__MSTGROUP_START.val,
+ /*small inistring */ strncpy (cdat->dstr_804__MSTGROUP_START.val,
"MSTGROUP_START",
- sizeof (cdat->dstr_802__MSTGROUP_START.val) -
+ sizeof (cdat->dstr_804__MSTGROUP_START.val) -
1);
-/*iniobj dsym_803__MSTGROUP_THEN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V896*/ meltfptr[895])
- /*_.VALDATA___V896*/
- meltfptr[895] = (void *) &cdat->dsym_803__MSTGROUP_THEN;
+/*iniobj dsym_805__MSTGROUP_THEN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V899*/ meltfptr[898])
+ /*_.VALDATA___V899*/
+ meltfptr[898] = (void *) &cdat->dsym_805__MSTGROUP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_803__MSTGROUP_THEN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_805__MSTGROUP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_803__MSTGROUP_THEN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_805__MSTGROUP_THEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_803__MSTGROUP_THEN.meltobj_class =
+ cdat->dsym_805__MSTGROUP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_803__MSTGROUP_THEN.obj_hash = 156200532;
- cdat->dsym_803__MSTGROUP_THEN.obj_len = 3;
+ cdat->dsym_805__MSTGROUP_THEN.obj_hash = 156200532;
+ cdat->dsym_805__MSTGROUP_THEN.obj_len = 3;
-/*inistring dstr_804__MSTGROUP_THEN*/
- /*_.VALSTR___V897*/ meltfptr[896] = (void *) &cdat->dstr_804__MSTGROUP_THEN;
- cdat->dstr_804__MSTGROUP_THEN.discr =
+/*inistring dstr_806__MSTGROUP_THEN*/
+ /*_.VALSTR___V900*/ meltfptr[899] = (void *) &cdat->dstr_806__MSTGROUP_THEN;
+ cdat->dstr_806__MSTGROUP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_804__MSTGROUP_THEN.val,
+ /*small inistring */ strncpy (cdat->dstr_806__MSTGROUP_THEN.val,
"MSTGROUP_THEN",
- sizeof (cdat->dstr_804__MSTGROUP_THEN.val) -
+ sizeof (cdat->dstr_806__MSTGROUP_THEN.val) -
1);
/*^iniobj */
-/*iniobj dobj_805__MSTGROUP_THEN*/
-/*_.VALDATA___V889*/ meltfptr[888] =
- (void *) &cdat->dobj_805__MSTGROUP_THEN;
+/*iniobj dobj_807__MSTGROUP_THEN*/
+/*_.VALDATA___V892*/ meltfptr[891] =
+ (void *) &cdat->dobj_807__MSTGROUP_THEN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_805__MSTGROUP_THEN",
+ melt_assertmsg ("iniobj check.discr isobj dobj_807__MSTGROUP_THEN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_805__MSTGROUP_THEN",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_807__MSTGROUP_THEN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_805__MSTGROUP_THEN.meltobj_class =
+ cdat->dobj_807__MSTGROUP_THEN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_805__MSTGROUP_THEN.obj_num = 7;
- cdat->dobj_805__MSTGROUP_THEN.obj_hash = 202643720;
- cdat->dobj_805__MSTGROUP_THEN.obj_len = 4;
+ cdat->dobj_807__MSTGROUP_THEN.obj_num = 7;
+ cdat->dobj_807__MSTGROUP_THEN.obj_hash = 916736087;
+ cdat->dobj_807__MSTGROUP_THEN.obj_len = 4;
-/*inistring dstr_806__MSTGROUP_THEN*/
- /*_.VALSTR___V890*/ meltfptr[889] = (void *) &cdat->dstr_806__MSTGROUP_THEN;
- cdat->dstr_806__MSTGROUP_THEN.discr =
+/*inistring dstr_808__MSTGROUP_THEN*/
+ /*_.VALSTR___V893*/ meltfptr[892] = (void *) &cdat->dstr_808__MSTGROUP_THEN;
+ cdat->dstr_808__MSTGROUP_THEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_806__MSTGROUP_THEN.val,
+ /*small inistring */ strncpy (cdat->dstr_808__MSTGROUP_THEN.val,
"MSTGROUP_THEN",
- sizeof (cdat->dstr_806__MSTGROUP_THEN.val) -
+ sizeof (cdat->dstr_808__MSTGROUP_THEN.val) -
1);
-/*iniobj dsym_807__MSTGROUP_ELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V898*/ meltfptr[897])
- /*_.VALDATA___V898*/
- meltfptr[897] = (void *) &cdat->dsym_807__MSTGROUP_ELSE;
+/*iniobj dsym_809__MSTGROUP_ELSE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V901*/ meltfptr[900])
+ /*_.VALDATA___V901*/
+ meltfptr[900] = (void *) &cdat->dsym_809__MSTGROUP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_807__MSTGROUP_ELSE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_809__MSTGROUP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_807__MSTGROUP_ELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_809__MSTGROUP_ELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_807__MSTGROUP_ELSE.meltobj_class =
+ cdat->dsym_809__MSTGROUP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_807__MSTGROUP_ELSE.obj_hash = 854928951;
- cdat->dsym_807__MSTGROUP_ELSE.obj_len = 3;
+ cdat->dsym_809__MSTGROUP_ELSE.obj_hash = 854928951;
+ cdat->dsym_809__MSTGROUP_ELSE.obj_len = 3;
-/*inistring dstr_808__MSTGROUP_ELSE*/
- /*_.VALSTR___V899*/ meltfptr[898] = (void *) &cdat->dstr_808__MSTGROUP_ELSE;
- cdat->dstr_808__MSTGROUP_ELSE.discr =
+/*inistring dstr_810__MSTGROUP_ELSE*/
+ /*_.VALSTR___V902*/ meltfptr[901] = (void *) &cdat->dstr_810__MSTGROUP_ELSE;
+ cdat->dstr_810__MSTGROUP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_808__MSTGROUP_ELSE.val,
+ /*small inistring */ strncpy (cdat->dstr_810__MSTGROUP_ELSE.val,
"MSTGROUP_ELSE",
- sizeof (cdat->dstr_808__MSTGROUP_ELSE.val) -
+ sizeof (cdat->dstr_810__MSTGROUP_ELSE.val) -
1);
/*^iniobj */
-/*iniobj dobj_809__MSTGROUP_ELSE*/
-/*_.VALDATA___V891*/ meltfptr[890] =
- (void *) &cdat->dobj_809__MSTGROUP_ELSE;
+/*iniobj dobj_811__MSTGROUP_ELSE*/
+/*_.VALDATA___V894*/ meltfptr[893] =
+ (void *) &cdat->dobj_811__MSTGROUP_ELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_809__MSTGROUP_ELSE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_811__MSTGROUP_ELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_809__MSTGROUP_ELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_811__MSTGROUP_ELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_809__MSTGROUP_ELSE.meltobj_class =
+ cdat->dobj_811__MSTGROUP_ELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_809__MSTGROUP_ELSE.obj_num = 8;
- cdat->dobj_809__MSTGROUP_ELSE.obj_hash = 14319488;
- cdat->dobj_809__MSTGROUP_ELSE.obj_len = 4;
+ cdat->dobj_811__MSTGROUP_ELSE.obj_num = 8;
+ cdat->dobj_811__MSTGROUP_ELSE.obj_hash = 1015583842;
+ cdat->dobj_811__MSTGROUP_ELSE.obj_len = 4;
-/*inistring dstr_810__MSTGROUP_ELSE*/
- /*_.VALSTR___V892*/ meltfptr[891] = (void *) &cdat->dstr_810__MSTGROUP_ELSE;
- cdat->dstr_810__MSTGROUP_ELSE.discr =
+/*inistring dstr_812__MSTGROUP_ELSE*/
+ /*_.VALSTR___V895*/ meltfptr[894] = (void *) &cdat->dstr_812__MSTGROUP_ELSE;
+ cdat->dstr_812__MSTGROUP_ELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_810__MSTGROUP_ELSE.val,
+ /*small inistring */ strncpy (cdat->dstr_812__MSTGROUP_ELSE.val,
"MSTGROUP_ELSE",
- sizeof (cdat->dstr_810__MSTGROUP_ELSE.val) -
+ sizeof (cdat->dstr_812__MSTGROUP_ELSE.val) -
1);
-/*iniobj dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V900*/ meltfptr[899])
- /*_.VALDATA___V900*/
- meltfptr[899] = (void *) &cdat->dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE;
+/*iniobj dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V903*/ meltfptr[902])
+ /*_.VALDATA___V903*/
+ meltfptr[902] = (void *) &cdat->dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE",
+ ("iniobj check.discr isobj dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE",
+ ("iniobj check.discr objmagic dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class =
+ cdat->dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 601675634;
- cdat->dsym_811__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 3;
+ cdat->dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 601675634;
+ cdat->dsym_813__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 3;
-/*inistring dstr_812__CLASS_MATCH_STEP*/
- /*_.VALSTR___V901*/ meltfptr[900] =
- (void *) &cdat->dstr_812__CLASS_MATCH_STEP;
- cdat->dstr_812__CLASS_MATCH_STEP.discr =
+/*inistring dstr_814__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V904*/ meltfptr[903] =
+ (void *) &cdat->dstr_814__CLASS_MATCH_STEP;
+ cdat->dstr_814__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_812__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_814__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_INSTANCE",
- sizeof (cdat->dstr_812__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_814__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ iniobj");
-/*iniobj dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE*/
-/*_.VALDATA___V902*/ meltfptr[901] =
- (void *) &cdat->dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE;
+/*iniobj dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE*/
+/*_.VALDATA___V905*/ meltfptr[904] =
+ (void *) &cdat->dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE",
+ ("iniobj check.discr isobj dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE",
+ ("iniobj check.discr objmagic dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class =
+ cdat->dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 360410471;
- cdat->dobj_813__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 8;
+ cdat->dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 480047092;
+ cdat->dobj_815__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 8;
-/*inistring dstr_814__CLASS_MATCH_STEP*/
- /*_.VALSTR___V903*/ meltfptr[902] =
- (void *) &cdat->dstr_814__CLASS_MATCH_STEP;
- cdat->dstr_814__CLASS_MATCH_STEP.discr =
+/*inistring dstr_816__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V906*/ meltfptr[905] =
+ (void *) &cdat->dstr_816__CLASS_MATCH_STEP;
+ cdat->dstr_816__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_814__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_816__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_INSTANCE",
- sizeof (cdat->dstr_814__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_816__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_815__CLASS_MATCH_STEP_TEST_INSTANCE */
- /*_.VALTUP___V904*/ meltfptr[903] =
- (void *) &cdat->dtup_815__CLASS_MATCH_STEP_TEST_INSTANCE;
- cdat->dtup_815__CLASS_MATCH_STEP_TEST_INSTANCE.discr =
+ /*inimult dtup_817__CLASS_MATCH_STEP_TEST_INSTANCE */
+ /*_.VALTUP___V907*/ meltfptr[906] =
+ (void *) &cdat->dtup_817__CLASS_MATCH_STEP_TEST_INSTANCE;
+ cdat->dtup_817__CLASS_MATCH_STEP_TEST_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_815__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 7;
- /*inimult dtup_816__CLASS_MATCH_STEP_TEST_INSTANCE */
- /*_.VALTUP___V909*/ meltfptr[908] =
- (void *) &cdat->dtup_816__CLASS_MATCH_STEP_TEST_INSTANCE;
- cdat->dtup_816__CLASS_MATCH_STEP_TEST_INSTANCE.discr =
+ cdat->dtup_817__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 7;
+ /*inimult dtup_818__CLASS_MATCH_STEP_TEST_INSTANCE */
+ /*_.VALTUP___V912*/ meltfptr[911] =
+ (void *) &cdat->dtup_818__CLASS_MATCH_STEP_TEST_INSTANCE;
+ cdat->dtup_818__CLASS_MATCH_STEP_TEST_INSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_816__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 8;
+ cdat->dtup_818__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 8;
-/*iniobj dsym_817__MSTINS_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V910*/ meltfptr[909])
- /*_.VALDATA___V910*/
- meltfptr[909] = (void *) &cdat->dsym_817__MSTINS_CLASS;
+/*iniobj dsym_819__MSTINS_CLASS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V913*/ meltfptr[912])
+ /*_.VALDATA___V913*/
+ meltfptr[912] = (void *) &cdat->dsym_819__MSTINS_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_817__MSTINS_CLASS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_819__MSTINS_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_817__MSTINS_CLASS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_819__MSTINS_CLASS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_817__MSTINS_CLASS.meltobj_class =
+ cdat->dsym_819__MSTINS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_817__MSTINS_CLASS.obj_hash = 992180192;
- cdat->dsym_817__MSTINS_CLASS.obj_len = 3;
+ cdat->dsym_819__MSTINS_CLASS.obj_hash = 992180192;
+ cdat->dsym_819__MSTINS_CLASS.obj_len = 3;
-/*inistring dstr_818__MSTINS_CLASS*/
- /*_.VALSTR___V911*/ meltfptr[910] = (void *) &cdat->dstr_818__MSTINS_CLASS;
- cdat->dstr_818__MSTINS_CLASS.discr =
+/*inistring dstr_820__MSTINS_CLASS*/
+ /*_.VALSTR___V914*/ meltfptr[913] = (void *) &cdat->dstr_820__MSTINS_CLASS;
+ cdat->dstr_820__MSTINS_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_818__MSTINS_CLASS.val,
+ /*small inistring */ strncpy (cdat->dstr_820__MSTINS_CLASS.val,
"MSTINS_CLASS",
- sizeof (cdat->dstr_818__MSTINS_CLASS.val) -
+ sizeof (cdat->dstr_820__MSTINS_CLASS.val) -
1);
/*^iniobj */
-/*iniobj dobj_819__MSTINS_CLASS*/
-/*_.VALDATA___V905*/ meltfptr[904] = (void *) &cdat->dobj_819__MSTINS_CLASS;
+/*iniobj dobj_821__MSTINS_CLASS*/
+/*_.VALDATA___V908*/ meltfptr[907] = (void *) &cdat->dobj_821__MSTINS_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_819__MSTINS_CLASS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_821__MSTINS_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_819__MSTINS_CLASS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_821__MSTINS_CLASS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_819__MSTINS_CLASS.meltobj_class =
+ cdat->dobj_821__MSTINS_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_819__MSTINS_CLASS.obj_num = 6;
- cdat->dobj_819__MSTINS_CLASS.obj_hash = 266431403;
- cdat->dobj_819__MSTINS_CLASS.obj_len = 4;
+ cdat->dobj_821__MSTINS_CLASS.obj_num = 6;
+ cdat->dobj_821__MSTINS_CLASS.obj_hash = 100128228;
+ cdat->dobj_821__MSTINS_CLASS.obj_len = 4;
-/*inistring dstr_820__MSTINS_CLASS*/
- /*_.VALSTR___V906*/ meltfptr[905] = (void *) &cdat->dstr_820__MSTINS_CLASS;
- cdat->dstr_820__MSTINS_CLASS.discr =
+/*inistring dstr_822__MSTINS_CLASS*/
+ /*_.VALSTR___V909*/ meltfptr[908] = (void *) &cdat->dstr_822__MSTINS_CLASS;
+ cdat->dstr_822__MSTINS_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_820__MSTINS_CLASS.val,
+ /*small inistring */ strncpy (cdat->dstr_822__MSTINS_CLASS.val,
"MSTINS_CLASS",
- sizeof (cdat->dstr_820__MSTINS_CLASS.val) -
+ sizeof (cdat->dstr_822__MSTINS_CLASS.val) -
1);
-/*iniobj dsym_821__MSTINS_SLOTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V912*/ meltfptr[911])
- /*_.VALDATA___V912*/
- meltfptr[911] = (void *) &cdat->dsym_821__MSTINS_SLOTS;
+/*iniobj dsym_823__MSTINS_SLOTS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V915*/ meltfptr[914])
+ /*_.VALDATA___V915*/
+ meltfptr[914] = (void *) &cdat->dsym_823__MSTINS_SLOTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_821__MSTINS_SLOTS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_823__MSTINS_SLOTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_821__MSTINS_SLOTS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_823__MSTINS_SLOTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_821__MSTINS_SLOTS.meltobj_class =
+ cdat->dsym_823__MSTINS_SLOTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_821__MSTINS_SLOTS.obj_hash = 625280432;
- cdat->dsym_821__MSTINS_SLOTS.obj_len = 3;
+ cdat->dsym_823__MSTINS_SLOTS.obj_hash = 625280432;
+ cdat->dsym_823__MSTINS_SLOTS.obj_len = 3;
-/*inistring dstr_822__MSTINS_SLOTS*/
- /*_.VALSTR___V913*/ meltfptr[912] = (void *) &cdat->dstr_822__MSTINS_SLOTS;
- cdat->dstr_822__MSTINS_SLOTS.discr =
+/*inistring dstr_824__MSTINS_SLOTS*/
+ /*_.VALSTR___V916*/ meltfptr[915] = (void *) &cdat->dstr_824__MSTINS_SLOTS;
+ cdat->dstr_824__MSTINS_SLOTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_822__MSTINS_SLOTS.val,
+ /*small inistring */ strncpy (cdat->dstr_824__MSTINS_SLOTS.val,
"MSTINS_SLOTS",
- sizeof (cdat->dstr_822__MSTINS_SLOTS.val) -
+ sizeof (cdat->dstr_824__MSTINS_SLOTS.val) -
1);
/*^iniobj */
-/*iniobj dobj_823__MSTINS_SLOTS*/
-/*_.VALDATA___V907*/ meltfptr[906] = (void *) &cdat->dobj_823__MSTINS_SLOTS;
+/*iniobj dobj_825__MSTINS_SLOTS*/
+/*_.VALDATA___V910*/ meltfptr[909] = (void *) &cdat->dobj_825__MSTINS_SLOTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_823__MSTINS_SLOTS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_825__MSTINS_SLOTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_823__MSTINS_SLOTS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_825__MSTINS_SLOTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_823__MSTINS_SLOTS.meltobj_class =
+ cdat->dobj_825__MSTINS_SLOTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_823__MSTINS_SLOTS.obj_num = 7;
- cdat->dobj_823__MSTINS_SLOTS.obj_hash = 421835506;
- cdat->dobj_823__MSTINS_SLOTS.obj_len = 4;
+ cdat->dobj_825__MSTINS_SLOTS.obj_num = 7;
+ cdat->dobj_825__MSTINS_SLOTS.obj_hash = 297303099;
+ cdat->dobj_825__MSTINS_SLOTS.obj_len = 4;
-/*inistring dstr_824__MSTINS_SLOTS*/
- /*_.VALSTR___V908*/ meltfptr[907] = (void *) &cdat->dstr_824__MSTINS_SLOTS;
- cdat->dstr_824__MSTINS_SLOTS.discr =
+/*inistring dstr_826__MSTINS_SLOTS*/
+ /*_.VALSTR___V911*/ meltfptr[910] = (void *) &cdat->dstr_826__MSTINS_SLOTS;
+ cdat->dstr_826__MSTINS_SLOTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_824__MSTINS_SLOTS.val,
+ /*small inistring */ strncpy (cdat->dstr_826__MSTINS_SLOTS.val,
"MSTINS_SLOTS",
- sizeof (cdat->dstr_824__MSTINS_SLOTS.val) -
+ sizeof (cdat->dstr_826__MSTINS_SLOTS.val) -
1);
-/*iniobj dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V914*/ meltfptr[913])
- /*_.VALDATA___V914*/
- meltfptr[913] = (void *) &cdat->dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE;
+/*iniobj dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V917*/ meltfptr[916])
+ /*_.VALDATA___V917*/
+ meltfptr[916] = (void *) &cdat->dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE",
+ ("iniobj check.discr isobj dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE",
+ ("iniobj check.discr objmagic dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class =
+ cdat->dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 389135485;
- cdat->dsym_825__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 3;
+ cdat->dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 389135485;
+ cdat->dsym_827__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 3;
-/*inistring dstr_826__CLASS_MATCH_STEP*/
- /*_.VALSTR___V915*/ meltfptr[914] =
- (void *) &cdat->dstr_826__CLASS_MATCH_STEP;
- cdat->dstr_826__CLASS_MATCH_STEP.discr =
+/*inistring dstr_828__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V918*/ meltfptr[917] =
+ (void *) &cdat->dstr_828__CLASS_MATCH_STEP;
+ cdat->dstr_828__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_826__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_828__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_MULTIPLE",
- sizeof (cdat->dstr_826__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_828__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ iniobj");
-/*iniobj dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE*/
-/*_.VALDATA___V916*/ meltfptr[915] =
- (void *) &cdat->dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE;
+/*iniobj dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE*/
+/*_.VALDATA___V919*/ meltfptr[918] =
+ (void *) &cdat->dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE",
+ ("iniobj check.discr isobj dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE",
+ ("iniobj check.discr objmagic dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class =
+ cdat->dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 1005968140;
- cdat->dobj_827__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 8;
+ cdat->dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 84845874;
+ cdat->dobj_829__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 8;
-/*inistring dstr_828__CLASS_MATCH_STEP*/
- /*_.VALSTR___V917*/ meltfptr[916] =
- (void *) &cdat->dstr_828__CLASS_MATCH_STEP;
- cdat->dstr_828__CLASS_MATCH_STEP.discr =
+/*inistring dstr_830__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V920*/ meltfptr[919] =
+ (void *) &cdat->dstr_830__CLASS_MATCH_STEP;
+ cdat->dstr_830__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_828__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_830__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_MULTIPLE",
- sizeof (cdat->dstr_828__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_830__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_829__CLASS_MATCH_STEP_TEST_MULTIPLE */
- /*_.VALTUP___V918*/ meltfptr[917] =
- (void *) &cdat->dtup_829__CLASS_MATCH_STEP_TEST_MULTIPLE;
- cdat->dtup_829__CLASS_MATCH_STEP_TEST_MULTIPLE.discr =
- (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_829__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7;
- /*inimult dtup_830__CLASS_MATCH_STEP_TEST_MULTIPLE */
+ /*inimult dtup_831__CLASS_MATCH_STEP_TEST_MULTIPLE */
/*_.VALTUP___V921*/ meltfptr[920] =
- (void *) &cdat->dtup_830__CLASS_MATCH_STEP_TEST_MULTIPLE;
- cdat->dtup_830__CLASS_MATCH_STEP_TEST_MULTIPLE.discr =
+ (void *) &cdat->dtup_831__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ cdat->dtup_831__CLASS_MATCH_STEP_TEST_MULTIPLE.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
+ cdat->dtup_831__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7;
+ /*inimult dtup_832__CLASS_MATCH_STEP_TEST_MULTIPLE */
+ /*_.VALTUP___V924*/ meltfptr[923] =
+ (void *) &cdat->dtup_832__CLASS_MATCH_STEP_TEST_MULTIPLE;
+ cdat->dtup_832__CLASS_MATCH_STEP_TEST_MULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_830__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7;
+ cdat->dtup_832__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7;
-/*iniobj dsym_831__MSTTUP_COMPONENTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V922*/ meltfptr[921])
- /*_.VALDATA___V922*/
- meltfptr[921] = (void *) &cdat->dsym_831__MSTTUP_COMPONENTS;
+/*iniobj dsym_833__MSTTUP_COMPONENTS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V925*/ meltfptr[924])
+ /*_.VALDATA___V925*/
+ meltfptr[924] = (void *) &cdat->dsym_833__MSTTUP_COMPONENTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_831__MSTTUP_COMPONENTS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_833__MSTTUP_COMPONENTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_831__MSTTUP_COMPONENTS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_833__MSTTUP_COMPONENTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_831__MSTTUP_COMPONENTS.meltobj_class =
+ cdat->dsym_833__MSTTUP_COMPONENTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_831__MSTTUP_COMPONENTS.obj_hash = 590722293;
- cdat->dsym_831__MSTTUP_COMPONENTS.obj_len = 3;
+ cdat->dsym_833__MSTTUP_COMPONENTS.obj_hash = 590722293;
+ cdat->dsym_833__MSTTUP_COMPONENTS.obj_len = 3;
-/*inistring dstr_832__MSTTUP_COMPONENT*/
- /*_.VALSTR___V923*/ meltfptr[922] =
- (void *) &cdat->dstr_832__MSTTUP_COMPONENT;
- cdat->dstr_832__MSTTUP_COMPONENT.discr =
+/*inistring dstr_834__MSTTUP_COMPONENT*/
+ /*_.VALSTR___V926*/ meltfptr[925] =
+ (void *) &cdat->dstr_834__MSTTUP_COMPONENT;
+ cdat->dstr_834__MSTTUP_COMPONENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_832__MSTTUP_COMPONENT.val,
+ /*small inistring */ strncpy (cdat->dstr_834__MSTTUP_COMPONENT.val,
"MSTTUP_COMPONENTS",
- sizeof (cdat->dstr_832__MSTTUP_COMPONENT.
+ sizeof (cdat->dstr_834__MSTTUP_COMPONENT.
val) - 1);
/*^iniobj */
-/*iniobj dobj_833__MSTTUP_COMPONENTS*/
-/*_.VALDATA___V919*/ meltfptr[918] =
- (void *) &cdat->dobj_833__MSTTUP_COMPONENTS;
+/*iniobj dobj_835__MSTTUP_COMPONENTS*/
+/*_.VALDATA___V922*/ meltfptr[921] =
+ (void *) &cdat->dobj_835__MSTTUP_COMPONENTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_833__MSTTUP_COMPONENTS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_835__MSTTUP_COMPONENTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_833__MSTTUP_COMPONENTS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_835__MSTTUP_COMPONENTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_833__MSTTUP_COMPONENTS.meltobj_class =
+ cdat->dobj_835__MSTTUP_COMPONENTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_833__MSTTUP_COMPONENTS.obj_num = 6;
- cdat->dobj_833__MSTTUP_COMPONENTS.obj_hash = 239511031;
- cdat->dobj_833__MSTTUP_COMPONENTS.obj_len = 4;
+ cdat->dobj_835__MSTTUP_COMPONENTS.obj_num = 6;
+ cdat->dobj_835__MSTTUP_COMPONENTS.obj_hash = 608112480;
+ cdat->dobj_835__MSTTUP_COMPONENTS.obj_len = 4;
-/*inistring dstr_834__MSTTUP_COMPONENT*/
- /*_.VALSTR___V920*/ meltfptr[919] =
- (void *) &cdat->dstr_834__MSTTUP_COMPONENT;
- cdat->dstr_834__MSTTUP_COMPONENT.discr =
+/*inistring dstr_836__MSTTUP_COMPONENT*/
+ /*_.VALSTR___V923*/ meltfptr[922] =
+ (void *) &cdat->dstr_836__MSTTUP_COMPONENT;
+ cdat->dstr_836__MSTTUP_COMPONENT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_834__MSTTUP_COMPONENT.val,
+ /*small inistring */ strncpy (cdat->dstr_836__MSTTUP_COMPONENT.val,
"MSTTUP_COMPONENTS",
- sizeof (cdat->dstr_834__MSTTUP_COMPONENT.
+ sizeof (cdat->dstr_836__MSTTUP_COMPONENT.
val) - 1);
-/*iniobj dsym_835__CLASS_MATCH_STEP_TEST_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V924*/ meltfptr[923])
- /*_.VALDATA___V924*/
- meltfptr[923] = (void *) &cdat->dsym_835__CLASS_MATCH_STEP_TEST_MATCHER;
+/*iniobj dsym_837__CLASS_MATCH_STEP_TEST_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V927*/ meltfptr[926])
+ /*_.VALDATA___V927*/
+ meltfptr[926] = (void *) &cdat->dsym_837__CLASS_MATCH_STEP_TEST_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_835__CLASS_MATCH_STEP_TEST_MATCHER",
+ ("iniobj check.discr isobj dsym_837__CLASS_MATCH_STEP_TEST_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_835__CLASS_MATCH_STEP_TEST_MATCHER",
+ ("iniobj check.discr objmagic dsym_837__CLASS_MATCH_STEP_TEST_MATCHER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_835__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class =
+ cdat->dsym_837__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_835__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 930369137;
- cdat->dsym_835__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 3;
+ cdat->dsym_837__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 930369137;
+ cdat->dsym_837__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 3;
-/*inistring dstr_836__CLASS_MATCH_STEP*/
- /*_.VALSTR___V925*/ meltfptr[924] =
- (void *) &cdat->dstr_836__CLASS_MATCH_STEP;
- cdat->dstr_836__CLASS_MATCH_STEP.discr =
+/*inistring dstr_838__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V928*/ meltfptr[927] =
+ (void *) &cdat->dstr_838__CLASS_MATCH_STEP;
+ cdat->dstr_838__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_836__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_838__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_MATCHER",
- sizeof (cdat->dstr_836__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_838__CLASS_MATCH_STEP.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ iniobj");
-/*iniobj dobj_837__CLASS_MATCH_STEP_TEST_MATCHER*/
-/*_.VALDATA___V926*/ meltfptr[925] =
- (void *) &cdat->dobj_837__CLASS_MATCH_STEP_TEST_MATCHER;
+/*iniobj dobj_839__CLASS_MATCH_STEP_TEST_MATCHER*/
+/*_.VALDATA___V929*/ meltfptr[928] =
+ (void *) &cdat->dobj_839__CLASS_MATCH_STEP_TEST_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_837__CLASS_MATCH_STEP_TEST_MATCHER",
+ ("iniobj check.discr isobj dobj_839__CLASS_MATCH_STEP_TEST_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_837__CLASS_MATCH_STEP_TEST_MATCHER",
+ ("iniobj check.discr objmagic dobj_839__CLASS_MATCH_STEP_TEST_MATCHER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_837__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class =
+ cdat->dobj_839__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_837__CLASS_MATCH_STEP_TEST_MATCHER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_837__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 634857490;
- cdat->dobj_837__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 8;
+ cdat->dobj_839__CLASS_MATCH_STEP_TEST_MATCHER.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_839__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 413164207;
+ cdat->dobj_839__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 8;
-/*inistring dstr_838__CLASS_MATCH_STEP*/
- /*_.VALSTR___V927*/ meltfptr[926] =
- (void *) &cdat->dstr_838__CLASS_MATCH_STEP;
- cdat->dstr_838__CLASS_MATCH_STEP.discr =
+/*inistring dstr_840__CLASS_MATCH_STEP*/
+ /*_.VALSTR___V930*/ meltfptr[929] =
+ (void *) &cdat->dstr_840__CLASS_MATCH_STEP;
+ cdat->dstr_840__CLASS_MATCH_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_838__CLASS_MATCH_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_840__CLASS_MATCH_STEP.val,
"CLASS_MATCH_STEP_TEST_MATCHER",
- sizeof (cdat->dstr_838__CLASS_MATCH_STEP.
+ sizeof (cdat->dstr_840__CLASS_MATCH_STEP.
val) - 1);
- /*inimult dtup_839__CLASS_MATCH_STEP_TEST_MATCHER */
- /*_.VALTUP___V928*/ meltfptr[927] =
- (void *) &cdat->dtup_839__CLASS_MATCH_STEP_TEST_MATCHER;
- cdat->dtup_839__CLASS_MATCH_STEP_TEST_MATCHER.discr =
+ /*inimult dtup_841__CLASS_MATCH_STEP_TEST_MATCHER */
+ /*_.VALTUP___V931*/ meltfptr[930] =
+ (void *) &cdat->dtup_841__CLASS_MATCH_STEP_TEST_MATCHER;
+ cdat->dtup_841__CLASS_MATCH_STEP_TEST_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_839__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 7;
- /*inimult dtup_840__CLASS_MATCH_STEP_TEST_MATCHER */
- /*_.VALTUP___V937*/ meltfptr[936] =
- (void *) &cdat->dtup_840__CLASS_MATCH_STEP_TEST_MATCHER;
- cdat->dtup_840__CLASS_MATCH_STEP_TEST_MATCHER.discr =
+ cdat->dtup_841__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 7;
+ /*inimult dtup_842__CLASS_MATCH_STEP_TEST_MATCHER */
+ /*_.VALTUP___V940*/ meltfptr[939] =
+ (void *) &cdat->dtup_842__CLASS_MATCH_STEP_TEST_MATCHER;
+ cdat->dtup_842__CLASS_MATCH_STEP_TEST_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_840__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 10;
+ cdat->dtup_842__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 10;
-/*iniobj dsym_841__MSTMA_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V938*/ meltfptr[937])
- /*_.VALDATA___V938*/
- meltfptr[937] = (void *) &cdat->dsym_841__MSTMA_MATCHER;
+/*iniobj dsym_843__MSTMA_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V941*/ meltfptr[940])
+ /*_.VALDATA___V941*/
+ meltfptr[940] = (void *) &cdat->dsym_843__MSTMA_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_841__MSTMA_MATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_843__MSTMA_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_841__MSTMA_MATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_843__MSTMA_MATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_841__MSTMA_MATCHER.meltobj_class =
+ cdat->dsym_843__MSTMA_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_841__MSTMA_MATCHER.obj_hash = 562919191;
- cdat->dsym_841__MSTMA_MATCHER.obj_len = 3;
+ cdat->dsym_843__MSTMA_MATCHER.obj_hash = 562919191;
+ cdat->dsym_843__MSTMA_MATCHER.obj_len = 3;
-/*inistring dstr_842__MSTMA_MATCHER*/
- /*_.VALSTR___V939*/ meltfptr[938] = (void *) &cdat->dstr_842__MSTMA_MATCHER;
- cdat->dstr_842__MSTMA_MATCHER.discr =
+/*inistring dstr_844__MSTMA_MATCHER*/
+ /*_.VALSTR___V942*/ meltfptr[941] = (void *) &cdat->dstr_844__MSTMA_MATCHER;
+ cdat->dstr_844__MSTMA_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_842__MSTMA_MATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_844__MSTMA_MATCHER.val,
"MSTMA_MATCHER",
- sizeof (cdat->dstr_842__MSTMA_MATCHER.val) -
+ sizeof (cdat->dstr_844__MSTMA_MATCHER.val) -
1);
/*^iniobj */
-/*iniobj dobj_843__MSTMA_MATCHER*/
-/*_.VALDATA___V929*/ meltfptr[928] =
- (void *) &cdat->dobj_843__MSTMA_MATCHER;
+/*iniobj dobj_845__MSTMA_MATCHER*/
+/*_.VALDATA___V932*/ meltfptr[931] =
+ (void *) &cdat->dobj_845__MSTMA_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_843__MSTMA_MATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dobj_845__MSTMA_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_843__MSTMA_MATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_845__MSTMA_MATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_843__MSTMA_MATCHER.meltobj_class =
+ cdat->dobj_845__MSTMA_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_843__MSTMA_MATCHER.obj_num = 6;
- cdat->dobj_843__MSTMA_MATCHER.obj_hash = 609838601;
- cdat->dobj_843__MSTMA_MATCHER.obj_len = 4;
+ cdat->dobj_845__MSTMA_MATCHER.obj_num = 6;
+ cdat->dobj_845__MSTMA_MATCHER.obj_hash = 513899792;
+ cdat->dobj_845__MSTMA_MATCHER.obj_len = 4;
-/*inistring dstr_844__MSTMA_MATCHER*/
- /*_.VALSTR___V930*/ meltfptr[929] = (void *) &cdat->dstr_844__MSTMA_MATCHER;
- cdat->dstr_844__MSTMA_MATCHER.discr =
+/*inistring dstr_846__MSTMA_MATCHER*/
+ /*_.VALSTR___V933*/ meltfptr[932] = (void *) &cdat->dstr_846__MSTMA_MATCHER;
+ cdat->dstr_846__MSTMA_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_844__MSTMA_MATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_846__MSTMA_MATCHER.val,
"MSTMA_MATCHER",
- sizeof (cdat->dstr_844__MSTMA_MATCHER.val) -
+ sizeof (cdat->dstr_846__MSTMA_MATCHER.val) -
1);
-/*iniobj dsym_845__MSTMA_BINDS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V940*/ meltfptr[939])
- /*_.VALDATA___V940*/
- meltfptr[939] = (void *) &cdat->dsym_845__MSTMA_BINDS;
+/*iniobj dsym_847__MSTMA_BINDS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V943*/ meltfptr[942])
+ /*_.VALDATA___V943*/
+ meltfptr[942] = (void *) &cdat->dsym_847__MSTMA_BINDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_845__MSTMA_BINDS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_847__MSTMA_BINDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_845__MSTMA_BINDS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_847__MSTMA_BINDS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_845__MSTMA_BINDS.meltobj_class =
+ cdat->dsym_847__MSTMA_BINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_845__MSTMA_BINDS.obj_hash = 713095099;
- cdat->dsym_845__MSTMA_BINDS.obj_len = 3;
+ cdat->dsym_847__MSTMA_BINDS.obj_hash = 713095099;
+ cdat->dsym_847__MSTMA_BINDS.obj_len = 3;
-/*inistring dstr_846__MSTMA_BINDS*/
- /*_.VALSTR___V941*/ meltfptr[940] = (void *) &cdat->dstr_846__MSTMA_BINDS;
- cdat->dstr_846__MSTMA_BINDS.discr =
+/*inistring dstr_848__MSTMA_BINDS*/
+ /*_.VALSTR___V944*/ meltfptr[943] = (void *) &cdat->dstr_848__MSTMA_BINDS;
+ cdat->dstr_848__MSTMA_BINDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_846__MSTMA_BINDS.val,
+ /*small inistring */ strncpy (cdat->dstr_848__MSTMA_BINDS.val,
"MSTMA_BINDS",
- sizeof (cdat->dstr_846__MSTMA_BINDS.val) - 1);
+ sizeof (cdat->dstr_848__MSTMA_BINDS.val) - 1);
/*^iniobj */
-/*iniobj dobj_847__MSTMA_BINDS*/
-/*_.VALDATA___V931*/ meltfptr[930] = (void *) &cdat->dobj_847__MSTMA_BINDS;
+/*iniobj dobj_849__MSTMA_BINDS*/
+/*_.VALDATA___V934*/ meltfptr[933] = (void *) &cdat->dobj_849__MSTMA_BINDS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_847__MSTMA_BINDS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_849__MSTMA_BINDS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_847__MSTMA_BINDS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_849__MSTMA_BINDS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_847__MSTMA_BINDS.meltobj_class =
+ cdat->dobj_849__MSTMA_BINDS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_847__MSTMA_BINDS.obj_num = 7;
- cdat->dobj_847__MSTMA_BINDS.obj_hash = 448659554;
- cdat->dobj_847__MSTMA_BINDS.obj_len = 4;
+ cdat->dobj_849__MSTMA_BINDS.obj_num = 7;
+ cdat->dobj_849__MSTMA_BINDS.obj_hash = 993967804;
+ cdat->dobj_849__MSTMA_BINDS.obj_len = 4;
-/*inistring dstr_848__MSTMA_BINDS*/
- /*_.VALSTR___V932*/ meltfptr[931] = (void *) &cdat->dstr_848__MSTMA_BINDS;
- cdat->dstr_848__MSTMA_BINDS.discr =
+/*inistring dstr_850__MSTMA_BINDS*/
+ /*_.VALSTR___V935*/ meltfptr[934] = (void *) &cdat->dstr_850__MSTMA_BINDS;
+ cdat->dstr_850__MSTMA_BINDS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_848__MSTMA_BINDS.val,
+ /*small inistring */ strncpy (cdat->dstr_850__MSTMA_BINDS.val,
"MSTMA_BINDS",
- sizeof (cdat->dstr_848__MSTMA_BINDS.val) - 1);
+ sizeof (cdat->dstr_850__MSTMA_BINDS.val) - 1);
-/*iniobj dsym_849__MSTMA_INS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V942*/ meltfptr[941])
- /*_.VALDATA___V942*/
- meltfptr[941] = (void *) &cdat->dsym_849__MSTMA_INS;
+/*iniobj dsym_851__MSTMA_INS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V945*/ meltfptr[944])
+ /*_.VALDATA___V945*/
+ meltfptr[944] = (void *) &cdat->dsym_851__MSTMA_INS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_849__MSTMA_INS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_851__MSTMA_INS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_849__MSTMA_INS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_851__MSTMA_INS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_849__MSTMA_INS.meltobj_class =
+ cdat->dsym_851__MSTMA_INS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_849__MSTMA_INS.obj_hash = 508289260;
- cdat->dsym_849__MSTMA_INS.obj_len = 3;
+ cdat->dsym_851__MSTMA_INS.obj_hash = 508289260;
+ cdat->dsym_851__MSTMA_INS.obj_len = 3;
-/*inistring dstr_850__MSTMA_INS*/
- /*_.VALSTR___V943*/ meltfptr[942] = (void *) &cdat->dstr_850__MSTMA_INS;
- cdat->dstr_850__MSTMA_INS.discr =
+/*inistring dstr_852__MSTMA_INS*/
+ /*_.VALSTR___V946*/ meltfptr[945] = (void *) &cdat->dstr_852__MSTMA_INS;
+ cdat->dstr_852__MSTMA_INS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_850__MSTMA_INS.val, "MSTMA_INS",
- sizeof (cdat->dstr_850__MSTMA_INS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_852__MSTMA_INS.val, "MSTMA_INS",
+ sizeof (cdat->dstr_852__MSTMA_INS.val) - 1);
/*^iniobj */
-/*iniobj dobj_851__MSTMA_INS*/
-/*_.VALDATA___V933*/ meltfptr[932] = (void *) &cdat->dobj_851__MSTMA_INS;
+/*iniobj dobj_853__MSTMA_INS*/
+/*_.VALDATA___V936*/ meltfptr[935] = (void *) &cdat->dobj_853__MSTMA_INS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_851__MSTMA_INS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_853__MSTMA_INS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_851__MSTMA_INS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_853__MSTMA_INS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_851__MSTMA_INS.meltobj_class =
+ cdat->dobj_853__MSTMA_INS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_851__MSTMA_INS.obj_num = 8;
- cdat->dobj_851__MSTMA_INS.obj_hash = 426341283;
- cdat->dobj_851__MSTMA_INS.obj_len = 4;
+ cdat->dobj_853__MSTMA_INS.obj_num = 8;
+ cdat->dobj_853__MSTMA_INS.obj_hash = 561507362;
+ cdat->dobj_853__MSTMA_INS.obj_len = 4;
-/*inistring dstr_852__MSTMA_INS*/
- /*_.VALSTR___V934*/ meltfptr[933] = (void *) &cdat->dstr_852__MSTMA_INS;
- cdat->dstr_852__MSTMA_INS.discr =
+/*inistring dstr_854__MSTMA_INS*/
+ /*_.VALSTR___V937*/ meltfptr[936] = (void *) &cdat->dstr_854__MSTMA_INS;
+ cdat->dstr_854__MSTMA_INS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_852__MSTMA_INS.val, "MSTMA_INS",
- sizeof (cdat->dstr_852__MSTMA_INS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_854__MSTMA_INS.val, "MSTMA_INS",
+ sizeof (cdat->dstr_854__MSTMA_INS.val) - 1);
-/*iniobj dsym_853__MSTMA_OUTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V944*/ meltfptr[943])
- /*_.VALDATA___V944*/
- meltfptr[943] = (void *) &cdat->dsym_853__MSTMA_OUTS;
+/*iniobj dsym_855__MSTMA_OUTS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V947*/ meltfptr[946])
+ /*_.VALDATA___V947*/
+ meltfptr[946] = (void *) &cdat->dsym_855__MSTMA_OUTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_853__MSTMA_OUTS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_855__MSTMA_OUTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_853__MSTMA_OUTS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_855__MSTMA_OUTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_853__MSTMA_OUTS.meltobj_class =
+ cdat->dsym_855__MSTMA_OUTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_853__MSTMA_OUTS.obj_hash = 970930840;
- cdat->dsym_853__MSTMA_OUTS.obj_len = 3;
+ cdat->dsym_855__MSTMA_OUTS.obj_hash = 970930840;
+ cdat->dsym_855__MSTMA_OUTS.obj_len = 3;
-/*inistring dstr_854__MSTMA_OUTS*/
- /*_.VALSTR___V945*/ meltfptr[944] = (void *) &cdat->dstr_854__MSTMA_OUTS;
- cdat->dstr_854__MSTMA_OUTS.discr =
+/*inistring dstr_856__MSTMA_OUTS*/
+ /*_.VALSTR___V948*/ meltfptr[947] = (void *) &cdat->dstr_856__MSTMA_OUTS;
+ cdat->dstr_856__MSTMA_OUTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_854__MSTMA_OUTS.val, "MSTMA_OUTS",
- sizeof (cdat->dstr_854__MSTMA_OUTS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_856__MSTMA_OUTS.val, "MSTMA_OUTS",
+ sizeof (cdat->dstr_856__MSTMA_OUTS.val) - 1);
/*^iniobj */
-/*iniobj dobj_855__MSTMA_OUTS*/
-/*_.VALDATA___V935*/ meltfptr[934] = (void *) &cdat->dobj_855__MSTMA_OUTS;
+/*iniobj dobj_857__MSTMA_OUTS*/
+/*_.VALDATA___V938*/ meltfptr[937] = (void *) &cdat->dobj_857__MSTMA_OUTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_855__MSTMA_OUTS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_857__MSTMA_OUTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_855__MSTMA_OUTS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_857__MSTMA_OUTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_855__MSTMA_OUTS.meltobj_class =
+ cdat->dobj_857__MSTMA_OUTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_855__MSTMA_OUTS.obj_num = 9;
- cdat->dobj_855__MSTMA_OUTS.obj_hash = 465433565;
- cdat->dobj_855__MSTMA_OUTS.obj_len = 4;
+ cdat->dobj_857__MSTMA_OUTS.obj_num = 9;
+ cdat->dobj_857__MSTMA_OUTS.obj_hash = 836665388;
+ cdat->dobj_857__MSTMA_OUTS.obj_len = 4;
-/*inistring dstr_856__MSTMA_OUTS*/
- /*_.VALSTR___V936*/ meltfptr[935] = (void *) &cdat->dstr_856__MSTMA_OUTS;
- cdat->dstr_856__MSTMA_OUTS.discr =
+/*inistring dstr_858__MSTMA_OUTS*/
+ /*_.VALSTR___V939*/ meltfptr[938] = (void *) &cdat->dstr_858__MSTMA_OUTS;
+ cdat->dstr_858__MSTMA_OUTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_856__MSTMA_OUTS.val, "MSTMA_OUTS",
- sizeof (cdat->dstr_856__MSTMA_OUTS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_858__MSTMA_OUTS.val, "MSTMA_OUTS",
+ sizeof (cdat->dstr_858__MSTMA_OUTS.val) - 1);
-/*iniobj dsym_857__CLASS_NREP_MATCH_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V946*/ meltfptr[945])
- /*_.VALDATA___V946*/
- meltfptr[945] = (void *) &cdat->dsym_857__CLASS_NREP_MATCH_FLAG;
+/*iniobj dsym_859__CLASS_NREP_MATCH_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V949*/ meltfptr[948])
+ /*_.VALDATA___V949*/
+ meltfptr[948] = (void *) &cdat->dsym_859__CLASS_NREP_MATCH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_857__CLASS_NREP_MATCH_FLAG",
+ ("iniobj check.discr isobj dsym_859__CLASS_NREP_MATCH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_857__CLASS_NREP_MATCH_FLAG",
+ ("iniobj check.discr objmagic dsym_859__CLASS_NREP_MATCH_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_857__CLASS_NREP_MATCH_FLAG.meltobj_class =
+ cdat->dsym_859__CLASS_NREP_MATCH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_857__CLASS_NREP_MATCH_FLAG.obj_hash = 479563009;
- cdat->dsym_857__CLASS_NREP_MATCH_FLAG.obj_len = 3;
+ cdat->dsym_859__CLASS_NREP_MATCH_FLAG.obj_hash = 479563009;
+ cdat->dsym_859__CLASS_NREP_MATCH_FLAG.obj_len = 3;
-/*inistring dstr_858__CLASS_NREP_MATCH*/
- /*_.VALSTR___V947*/ meltfptr[946] =
- (void *) &cdat->dstr_858__CLASS_NREP_MATCH;
- cdat->dstr_858__CLASS_NREP_MATCH.discr =
+/*inistring dstr_860__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V950*/ meltfptr[949] =
+ (void *) &cdat->dstr_860__CLASS_NREP_MATCH;
+ cdat->dstr_860__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_858__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_860__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_FLAG",
- sizeof (cdat->dstr_858__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_860__CLASS_NREP_MATCH.
val) - 1);
-/*iniobj dsym_859__CLASS_NREP_SIMPLE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V948*/ meltfptr[947])
- /*_.VALDATA___V948*/
- meltfptr[947] = (void *) &cdat->dsym_859__CLASS_NREP_SIMPLE;
+/*iniobj dsym_861__CLASS_NREP_SIMPLE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V951*/ meltfptr[950])
+ /*_.VALDATA___V951*/
+ meltfptr[950] = (void *) &cdat->dsym_861__CLASS_NREP_SIMPLE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_859__CLASS_NREP_SIMPLE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_861__CLASS_NREP_SIMPLE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_859__CLASS_NREP_SIMPLE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_861__CLASS_NREP_SIMPLE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_859__CLASS_NREP_SIMPLE.meltobj_class =
+ cdat->dsym_861__CLASS_NREP_SIMPLE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_859__CLASS_NREP_SIMPLE.obj_hash = 945537669;
- cdat->dsym_859__CLASS_NREP_SIMPLE.obj_len = 3;
+ cdat->dsym_861__CLASS_NREP_SIMPLE.obj_hash = 945537669;
+ cdat->dsym_861__CLASS_NREP_SIMPLE.obj_len = 3;
-/*inistring dstr_860__CLASS_NREP_SIMPL*/
- /*_.VALSTR___V949*/ meltfptr[948] =
- (void *) &cdat->dstr_860__CLASS_NREP_SIMPL;
- cdat->dstr_860__CLASS_NREP_SIMPL.discr =
+/*inistring dstr_862__CLASS_NREP_SIMPL*/
+ /*_.VALSTR___V952*/ meltfptr[951] =
+ (void *) &cdat->dstr_862__CLASS_NREP_SIMPL;
+ cdat->dstr_862__CLASS_NREP_SIMPL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_860__CLASS_NREP_SIMPL.val,
+ /*small inistring */ strncpy (cdat->dstr_862__CLASS_NREP_SIMPL.val,
"CLASS_NREP_SIMPLE",
- sizeof (cdat->dstr_860__CLASS_NREP_SIMPL.
+ sizeof (cdat->dstr_862__CLASS_NREP_SIMPL.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ iniobj");
-/*iniobj dobj_861__CLASS_NREP_MATCH_FLAG*/
-/*_.VALDATA___V950*/ meltfptr[949] =
- (void *) &cdat->dobj_861__CLASS_NREP_MATCH_FLAG;
+/*iniobj dobj_863__CLASS_NREP_MATCH_FLAG*/
+/*_.VALDATA___V953*/ meltfptr[952] =
+ (void *) &cdat->dobj_863__CLASS_NREP_MATCH_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_861__CLASS_NREP_MATCH_FLAG",
+ ("iniobj check.discr isobj dobj_863__CLASS_NREP_MATCH_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_861__CLASS_NREP_MATCH_FLAG",
+ ("iniobj check.discr objmagic dobj_863__CLASS_NREP_MATCH_FLAG",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_861__CLASS_NREP_MATCH_FLAG.meltobj_class =
+ cdat->dobj_863__CLASS_NREP_MATCH_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_861__CLASS_NREP_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_861__CLASS_NREP_MATCH_FLAG.obj_hash = 327808857;
- cdat->dobj_861__CLASS_NREP_MATCH_FLAG.obj_len = 8;
+ cdat->dobj_863__CLASS_NREP_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_863__CLASS_NREP_MATCH_FLAG.obj_hash = 58624774;
+ cdat->dobj_863__CLASS_NREP_MATCH_FLAG.obj_len = 8;
-/*inistring dstr_862__CLASS_NREP_MATCH*/
- /*_.VALSTR___V951*/ meltfptr[950] =
- (void *) &cdat->dstr_862__CLASS_NREP_MATCH;
- cdat->dstr_862__CLASS_NREP_MATCH.discr =
+/*inistring dstr_864__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V954*/ meltfptr[953] =
+ (void *) &cdat->dstr_864__CLASS_NREP_MATCH;
+ cdat->dstr_864__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_862__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_864__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_FLAG",
- sizeof (cdat->dstr_862__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_864__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_863__CLASS_NREP_MATCH_FLAG */
- /*_.VALTUP___V952*/ meltfptr[951] =
- (void *) &cdat->dtup_863__CLASS_NREP_MATCH_FLAG;
- cdat->dtup_863__CLASS_NREP_MATCH_FLAG.discr =
+ /*inimult dtup_865__CLASS_NREP_MATCH_FLAG */
+ /*_.VALTUP___V955*/ meltfptr[954] =
+ (void *) &cdat->dtup_865__CLASS_NREP_MATCH_FLAG;
+ cdat->dtup_865__CLASS_NREP_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_863__CLASS_NREP_MATCH_FLAG.nbval = 3;
- /*inimult dtup_864__CLASS_NREP_MATCH_FLAG */
- /*_.VALTUP___V957*/ meltfptr[956] =
- (void *) &cdat->dtup_864__CLASS_NREP_MATCH_FLAG;
- cdat->dtup_864__CLASS_NREP_MATCH_FLAG.discr =
+ cdat->dtup_865__CLASS_NREP_MATCH_FLAG.nbval = 3;
+ /*inimult dtup_866__CLASS_NREP_MATCH_FLAG */
+ /*_.VALTUP___V960*/ meltfptr[959] =
+ (void *) &cdat->dtup_866__CLASS_NREP_MATCH_FLAG;
+ cdat->dtup_866__CLASS_NREP_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_864__CLASS_NREP_MATCH_FLAG.nbval = 3;
+ cdat->dtup_866__CLASS_NREP_MATCH_FLAG.nbval = 3;
-/*iniobj dsym_865__NRPFLA_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V958*/ meltfptr[957])
- /*_.VALDATA___V958*/
- meltfptr[957] = (void *) &cdat->dsym_865__NRPFLA_FLAG;
+/*iniobj dsym_867__NRPFLA_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V961*/ meltfptr[960])
+ /*_.VALDATA___V961*/
+ meltfptr[960] = (void *) &cdat->dsym_867__NRPFLA_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_865__NRPFLA_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_867__NRPFLA_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_865__NRPFLA_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_867__NRPFLA_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_865__NRPFLA_FLAG.meltobj_class =
+ cdat->dsym_867__NRPFLA_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_865__NRPFLA_FLAG.obj_hash = 846944133;
- cdat->dsym_865__NRPFLA_FLAG.obj_len = 3;
+ cdat->dsym_867__NRPFLA_FLAG.obj_hash = 846944133;
+ cdat->dsym_867__NRPFLA_FLAG.obj_len = 3;
-/*inistring dstr_866__NRPFLA_FLAG*/
- /*_.VALSTR___V959*/ meltfptr[958] = (void *) &cdat->dstr_866__NRPFLA_FLAG;
- cdat->dstr_866__NRPFLA_FLAG.discr =
+/*inistring dstr_868__NRPFLA_FLAG*/
+ /*_.VALSTR___V962*/ meltfptr[961] = (void *) &cdat->dstr_868__NRPFLA_FLAG;
+ cdat->dstr_868__NRPFLA_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_866__NRPFLA_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_868__NRPFLA_FLAG.val,
"NRPFLA_FLAG",
- sizeof (cdat->dstr_866__NRPFLA_FLAG.val) - 1);
+ sizeof (cdat->dstr_868__NRPFLA_FLAG.val) - 1);
/*^iniobj */
-/*iniobj dobj_867__NRPFLA_FLAG*/
-/*_.VALDATA___V953*/ meltfptr[952] = (void *) &cdat->dobj_867__NRPFLA_FLAG;
+/*iniobj dobj_869__NRPFLA_FLAG*/
+/*_.VALDATA___V956*/ meltfptr[955] = (void *) &cdat->dobj_869__NRPFLA_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_867__NRPFLA_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dobj_869__NRPFLA_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_867__NRPFLA_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_869__NRPFLA_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_867__NRPFLA_FLAG.meltobj_class =
+ cdat->dobj_869__NRPFLA_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_867__NRPFLA_FLAG.obj_num = 1;
- cdat->dobj_867__NRPFLA_FLAG.obj_hash = 410655936;
- cdat->dobj_867__NRPFLA_FLAG.obj_len = 4;
+ cdat->dobj_869__NRPFLA_FLAG.obj_num = 1;
+ cdat->dobj_869__NRPFLA_FLAG.obj_hash = 952108389;
+ cdat->dobj_869__NRPFLA_FLAG.obj_len = 4;
-/*inistring dstr_868__NRPFLA_FLAG*/
- /*_.VALSTR___V954*/ meltfptr[953] = (void *) &cdat->dstr_868__NRPFLA_FLAG;
- cdat->dstr_868__NRPFLA_FLAG.discr =
+/*inistring dstr_870__NRPFLA_FLAG*/
+ /*_.VALSTR___V957*/ meltfptr[956] = (void *) &cdat->dstr_870__NRPFLA_FLAG;
+ cdat->dstr_870__NRPFLA_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_868__NRPFLA_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_870__NRPFLA_FLAG.val,
"NRPFLA_FLAG",
- sizeof (cdat->dstr_868__NRPFLA_FLAG.val) - 1);
+ sizeof (cdat->dstr_870__NRPFLA_FLAG.val) - 1);
-/*iniobj dsym_869__NRPFLA_NMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V960*/ meltfptr[959])
- /*_.VALDATA___V960*/
- meltfptr[959] = (void *) &cdat->dsym_869__NRPFLA_NMATCH;
+/*iniobj dsym_871__NRPFLA_NMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V963*/ meltfptr[962])
+ /*_.VALDATA___V963*/
+ meltfptr[962] = (void *) &cdat->dsym_871__NRPFLA_NMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_869__NRPFLA_NMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_871__NRPFLA_NMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_869__NRPFLA_NMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_871__NRPFLA_NMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_869__NRPFLA_NMATCH.meltobj_class =
+ cdat->dsym_871__NRPFLA_NMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_869__NRPFLA_NMATCH.obj_hash = 863088082;
- cdat->dsym_869__NRPFLA_NMATCH.obj_len = 3;
+ cdat->dsym_871__NRPFLA_NMATCH.obj_hash = 863088082;
+ cdat->dsym_871__NRPFLA_NMATCH.obj_len = 3;
-/*inistring dstr_870__NRPFLA_NMATCH*/
- /*_.VALSTR___V961*/ meltfptr[960] = (void *) &cdat->dstr_870__NRPFLA_NMATCH;
- cdat->dstr_870__NRPFLA_NMATCH.discr =
+/*inistring dstr_872__NRPFLA_NMATCH*/
+ /*_.VALSTR___V964*/ meltfptr[963] = (void *) &cdat->dstr_872__NRPFLA_NMATCH;
+ cdat->dstr_872__NRPFLA_NMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_870__NRPFLA_NMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_872__NRPFLA_NMATCH.val,
"NRPFLA_NMATCH",
- sizeof (cdat->dstr_870__NRPFLA_NMATCH.val) -
+ sizeof (cdat->dstr_872__NRPFLA_NMATCH.val) -
1);
/*^iniobj */
-/*iniobj dobj_871__NRPFLA_NMATCH*/
-/*_.VALDATA___V955*/ meltfptr[954] =
- (void *) &cdat->dobj_871__NRPFLA_NMATCH;
+/*iniobj dobj_873__NRPFLA_NMATCH*/
+/*_.VALDATA___V958*/ meltfptr[957] =
+ (void *) &cdat->dobj_873__NRPFLA_NMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_871__NRPFLA_NMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_873__NRPFLA_NMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_871__NRPFLA_NMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_873__NRPFLA_NMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_871__NRPFLA_NMATCH.meltobj_class =
+ cdat->dobj_873__NRPFLA_NMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_871__NRPFLA_NMATCH.obj_num = 2;
- cdat->dobj_871__NRPFLA_NMATCH.obj_hash = 937950636;
- cdat->dobj_871__NRPFLA_NMATCH.obj_len = 4;
+ cdat->dobj_873__NRPFLA_NMATCH.obj_num = 2;
+ cdat->dobj_873__NRPFLA_NMATCH.obj_hash = 377963340;
+ cdat->dobj_873__NRPFLA_NMATCH.obj_len = 4;
-/*inistring dstr_872__NRPFLA_NMATCH*/
- /*_.VALSTR___V956*/ meltfptr[955] = (void *) &cdat->dstr_872__NRPFLA_NMATCH;
- cdat->dstr_872__NRPFLA_NMATCH.discr =
+/*inistring dstr_874__NRPFLA_NMATCH*/
+ /*_.VALSTR___V959*/ meltfptr[958] = (void *) &cdat->dstr_874__NRPFLA_NMATCH;
+ cdat->dstr_874__NRPFLA_NMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_872__NRPFLA_NMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_874__NRPFLA_NMATCH.val,
"NRPFLA_NMATCH",
- sizeof (cdat->dstr_872__NRPFLA_NMATCH.val) -
+ sizeof (cdat->dstr_874__NRPFLA_NMATCH.val) -
1);
-/*iniobj dsym_873__CLASS_NREP_MATCHED_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V962*/ meltfptr[961])
- /*_.VALDATA___V962*/
- meltfptr[961] = (void *) &cdat->dsym_873__CLASS_NREP_MATCHED_DATA;
+/*iniobj dsym_875__CLASS_NREP_MATCHED_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V965*/ meltfptr[964])
+ /*_.VALDATA___V965*/
+ meltfptr[964] = (void *) &cdat->dsym_875__CLASS_NREP_MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_873__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr isobj dsym_875__CLASS_NREP_MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_873__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr objmagic dsym_875__CLASS_NREP_MATCHED_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_873__CLASS_NREP_MATCHED_DATA.meltobj_class =
+ cdat->dsym_875__CLASS_NREP_MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_873__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645;
- cdat->dsym_873__CLASS_NREP_MATCHED_DATA.obj_len = 3;
+ cdat->dsym_875__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645;
+ cdat->dsym_875__CLASS_NREP_MATCHED_DATA.obj_len = 3;
-/*inistring dstr_874__CLASS_NREP_MATCH*/
- /*_.VALSTR___V963*/ meltfptr[962] =
- (void *) &cdat->dstr_874__CLASS_NREP_MATCH;
- cdat->dstr_874__CLASS_NREP_MATCH.discr =
+/*inistring dstr_876__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V966*/ meltfptr[965] =
+ (void *) &cdat->dstr_876__CLASS_NREP_MATCH;
+ cdat->dstr_876__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_874__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_876__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCHED_DATA",
- sizeof (cdat->dstr_874__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_876__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ iniobj");
-/*iniobj dobj_875__CLASS_NREP_MATCHED_DATA*/
-/*_.VALDATA___V964*/ meltfptr[963] =
- (void *) &cdat->dobj_875__CLASS_NREP_MATCHED_DATA;
+/*iniobj dobj_877__CLASS_NREP_MATCHED_DATA*/
+/*_.VALDATA___V967*/ meltfptr[966] =
+ (void *) &cdat->dobj_877__CLASS_NREP_MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_875__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr isobj dobj_877__CLASS_NREP_MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_875__CLASS_NREP_MATCHED_DATA",
+ ("iniobj check.discr objmagic dobj_877__CLASS_NREP_MATCHED_DATA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_875__CLASS_NREP_MATCHED_DATA.meltobj_class =
+ cdat->dobj_877__CLASS_NREP_MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_875__CLASS_NREP_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_875__CLASS_NREP_MATCHED_DATA.obj_hash = 559801668;
- cdat->dobj_875__CLASS_NREP_MATCHED_DATA.obj_len = 8;
+ cdat->dobj_877__CLASS_NREP_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_877__CLASS_NREP_MATCHED_DATA.obj_hash = 510391015;
+ cdat->dobj_877__CLASS_NREP_MATCHED_DATA.obj_len = 8;
-/*inistring dstr_876__CLASS_NREP_MATCH*/
- /*_.VALSTR___V965*/ meltfptr[964] =
- (void *) &cdat->dstr_876__CLASS_NREP_MATCH;
- cdat->dstr_876__CLASS_NREP_MATCH.discr =
+/*inistring dstr_878__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V968*/ meltfptr[967] =
+ (void *) &cdat->dstr_878__CLASS_NREP_MATCH;
+ cdat->dstr_878__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_876__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_878__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCHED_DATA",
- sizeof (cdat->dstr_876__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_878__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_877__CLASS_NREP_MATCHED_DATA */
- /*_.VALTUP___V966*/ meltfptr[965] =
- (void *) &cdat->dtup_877__CLASS_NREP_MATCHED_DATA;
- cdat->dtup_877__CLASS_NREP_MATCHED_DATA.discr =
+ /*inimult dtup_879__CLASS_NREP_MATCHED_DATA */
+ /*_.VALTUP___V969*/ meltfptr[968] =
+ (void *) &cdat->dtup_879__CLASS_NREP_MATCHED_DATA;
+ cdat->dtup_879__CLASS_NREP_MATCHED_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_877__CLASS_NREP_MATCHED_DATA.nbval = 3;
- /*inimult dtup_878__CLASS_NREP_MATCHED_DATA */
- /*_.VALTUP___V973*/ meltfptr[972] =
- (void *) &cdat->dtup_878__CLASS_NREP_MATCHED_DATA;
- cdat->dtup_878__CLASS_NREP_MATCHED_DATA.discr =
+ cdat->dtup_879__CLASS_NREP_MATCHED_DATA.nbval = 3;
+ /*inimult dtup_880__CLASS_NREP_MATCHED_DATA */
+ /*_.VALTUP___V976*/ meltfptr[975] =
+ (void *) &cdat->dtup_880__CLASS_NREP_MATCHED_DATA;
+ cdat->dtup_880__CLASS_NREP_MATCHED_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_878__CLASS_NREP_MATCHED_DATA.nbval = 4;
+ cdat->dtup_880__CLASS_NREP_MATCHED_DATA.nbval = 4;
-/*iniobj dsym_879__NRMATD_CTYPE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V974*/ meltfptr[973])
- /*_.VALDATA___V974*/
- meltfptr[973] = (void *) &cdat->dsym_879__NRMATD_CTYPE;
+/*iniobj dsym_881__NRMATD_CTYPE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V977*/ meltfptr[976])
+ /*_.VALDATA___V977*/
+ meltfptr[976] = (void *) &cdat->dsym_881__NRMATD_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_879__NRMATD_CTYPE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_881__NRMATD_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_879__NRMATD_CTYPE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_881__NRMATD_CTYPE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_879__NRMATD_CTYPE.meltobj_class =
+ cdat->dsym_881__NRMATD_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_879__NRMATD_CTYPE.obj_hash = 366839624;
- cdat->dsym_879__NRMATD_CTYPE.obj_len = 3;
+ cdat->dsym_881__NRMATD_CTYPE.obj_hash = 366839624;
+ cdat->dsym_881__NRMATD_CTYPE.obj_len = 3;
-/*inistring dstr_880__NRMATD_CTYPE*/
- /*_.VALSTR___V975*/ meltfptr[974] = (void *) &cdat->dstr_880__NRMATD_CTYPE;
- cdat->dstr_880__NRMATD_CTYPE.discr =
+/*inistring dstr_882__NRMATD_CTYPE*/
+ /*_.VALSTR___V978*/ meltfptr[977] = (void *) &cdat->dstr_882__NRMATD_CTYPE;
+ cdat->dstr_882__NRMATD_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_880__NRMATD_CTYPE.val,
+ /*small inistring */ strncpy (cdat->dstr_882__NRMATD_CTYPE.val,
"NRMATD_CTYPE",
- sizeof (cdat->dstr_880__NRMATD_CTYPE.val) -
+ sizeof (cdat->dstr_882__NRMATD_CTYPE.val) -
1);
/*^iniobj */
-/*iniobj dobj_881__NRMATD_CTYPE*/
-/*_.VALDATA___V967*/ meltfptr[966] = (void *) &cdat->dobj_881__NRMATD_CTYPE;
+/*iniobj dobj_883__NRMATD_CTYPE*/
+/*_.VALDATA___V970*/ meltfptr[969] = (void *) &cdat->dobj_883__NRMATD_CTYPE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_881__NRMATD_CTYPE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_883__NRMATD_CTYPE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_881__NRMATD_CTYPE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_883__NRMATD_CTYPE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_881__NRMATD_CTYPE.meltobj_class =
+ cdat->dobj_883__NRMATD_CTYPE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_881__NRMATD_CTYPE.obj_num = 1;
- cdat->dobj_881__NRMATD_CTYPE.obj_hash = 132882417;
- cdat->dobj_881__NRMATD_CTYPE.obj_len = 4;
+ cdat->dobj_883__NRMATD_CTYPE.obj_num = 1;
+ cdat->dobj_883__NRMATD_CTYPE.obj_hash = 1053259546;
+ cdat->dobj_883__NRMATD_CTYPE.obj_len = 4;
-/*inistring dstr_882__NRMATD_CTYPE*/
- /*_.VALSTR___V968*/ meltfptr[967] = (void *) &cdat->dstr_882__NRMATD_CTYPE;
- cdat->dstr_882__NRMATD_CTYPE.discr =
+/*inistring dstr_884__NRMATD_CTYPE*/
+ /*_.VALSTR___V971*/ meltfptr[970] = (void *) &cdat->dstr_884__NRMATD_CTYPE;
+ cdat->dstr_884__NRMATD_CTYPE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_882__NRMATD_CTYPE.val,
+ /*small inistring */ strncpy (cdat->dstr_884__NRMATD_CTYPE.val,
"NRMATD_CTYPE",
- sizeof (cdat->dstr_882__NRMATD_CTYPE.val) -
+ sizeof (cdat->dstr_884__NRMATD_CTYPE.val) -
1);
-/*iniobj dsym_883__NRMATD_MDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V976*/ meltfptr[975])
- /*_.VALDATA___V976*/
- meltfptr[975] = (void *) &cdat->dsym_883__NRMATD_MDATA;
+/*iniobj dsym_885__NRMATD_MDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V979*/ meltfptr[978])
+ /*_.VALDATA___V979*/
+ meltfptr[978] = (void *) &cdat->dsym_885__NRMATD_MDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_883__NRMATD_MDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_885__NRMATD_MDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_883__NRMATD_MDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_885__NRMATD_MDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_883__NRMATD_MDATA.meltobj_class =
+ cdat->dsym_885__NRMATD_MDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_883__NRMATD_MDATA.obj_hash = 224112162;
- cdat->dsym_883__NRMATD_MDATA.obj_len = 3;
+ cdat->dsym_885__NRMATD_MDATA.obj_hash = 224112162;
+ cdat->dsym_885__NRMATD_MDATA.obj_len = 3;
-/*inistring dstr_884__NRMATD_MDATA*/
- /*_.VALSTR___V977*/ meltfptr[976] = (void *) &cdat->dstr_884__NRMATD_MDATA;
- cdat->dstr_884__NRMATD_MDATA.discr =
+/*inistring dstr_886__NRMATD_MDATA*/
+ /*_.VALSTR___V980*/ meltfptr[979] = (void *) &cdat->dstr_886__NRMATD_MDATA;
+ cdat->dstr_886__NRMATD_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_884__NRMATD_MDATA.val,
+ /*small inistring */ strncpy (cdat->dstr_886__NRMATD_MDATA.val,
"NRMATD_MDATA",
- sizeof (cdat->dstr_884__NRMATD_MDATA.val) -
+ sizeof (cdat->dstr_886__NRMATD_MDATA.val) -
1);
/*^iniobj */
-/*iniobj dobj_885__NRMATD_MDATA*/
-/*_.VALDATA___V969*/ meltfptr[968] = (void *) &cdat->dobj_885__NRMATD_MDATA;
+/*iniobj dobj_887__NRMATD_MDATA*/
+/*_.VALDATA___V972*/ meltfptr[971] = (void *) &cdat->dobj_887__NRMATD_MDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_885__NRMATD_MDATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_887__NRMATD_MDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_885__NRMATD_MDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_887__NRMATD_MDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_885__NRMATD_MDATA.meltobj_class =
+ cdat->dobj_887__NRMATD_MDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_885__NRMATD_MDATA.obj_num = 2;
- cdat->dobj_885__NRMATD_MDATA.obj_hash = 868431648;
- cdat->dobj_885__NRMATD_MDATA.obj_len = 4;
+ cdat->dobj_887__NRMATD_MDATA.obj_num = 2;
+ cdat->dobj_887__NRMATD_MDATA.obj_hash = 23230642;
+ cdat->dobj_887__NRMATD_MDATA.obj_len = 4;
-/*inistring dstr_886__NRMATD_MDATA*/
- /*_.VALSTR___V970*/ meltfptr[969] = (void *) &cdat->dstr_886__NRMATD_MDATA;
- cdat->dstr_886__NRMATD_MDATA.discr =
+/*inistring dstr_888__NRMATD_MDATA*/
+ /*_.VALSTR___V973*/ meltfptr[972] = (void *) &cdat->dstr_888__NRMATD_MDATA;
+ cdat->dstr_888__NRMATD_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_886__NRMATD_MDATA.val,
+ /*small inistring */ strncpy (cdat->dstr_888__NRMATD_MDATA.val,
"NRMATD_MDATA",
- sizeof (cdat->dstr_886__NRMATD_MDATA.val) -
+ sizeof (cdat->dstr_888__NRMATD_MDATA.val) -
1);
-/*iniobj dsym_887__NRMATD_RANK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V978*/ meltfptr[977])
- /*_.VALDATA___V978*/
- meltfptr[977] = (void *) &cdat->dsym_887__NRMATD_RANK;
+/*iniobj dsym_889__NRMATD_RANK*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V981*/ meltfptr[980])
+ /*_.VALDATA___V981*/
+ meltfptr[980] = (void *) &cdat->dsym_889__NRMATD_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_887__NRMATD_RANK",
+ melt_assertmsg ("iniobj check.discr isobj dsym_889__NRMATD_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_887__NRMATD_RANK",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_889__NRMATD_RANK",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_887__NRMATD_RANK.meltobj_class =
+ cdat->dsym_889__NRMATD_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_887__NRMATD_RANK.obj_hash = 159591483;
- cdat->dsym_887__NRMATD_RANK.obj_len = 3;
+ cdat->dsym_889__NRMATD_RANK.obj_hash = 159591483;
+ cdat->dsym_889__NRMATD_RANK.obj_len = 3;
-/*inistring dstr_888__NRMATD_RANK*/
- /*_.VALSTR___V979*/ meltfptr[978] = (void *) &cdat->dstr_888__NRMATD_RANK;
- cdat->dstr_888__NRMATD_RANK.discr =
+/*inistring dstr_890__NRMATD_RANK*/
+ /*_.VALSTR___V982*/ meltfptr[981] = (void *) &cdat->dstr_890__NRMATD_RANK;
+ cdat->dstr_890__NRMATD_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_888__NRMATD_RANK.val,
+ /*small inistring */ strncpy (cdat->dstr_890__NRMATD_RANK.val,
"NRMATD_RANK",
- sizeof (cdat->dstr_888__NRMATD_RANK.val) - 1);
+ sizeof (cdat->dstr_890__NRMATD_RANK.val) - 1);
/*^iniobj */
-/*iniobj dobj_889__NRMATD_RANK*/
-/*_.VALDATA___V971*/ meltfptr[970] = (void *) &cdat->dobj_889__NRMATD_RANK;
+/*iniobj dobj_891__NRMATD_RANK*/
+/*_.VALDATA___V974*/ meltfptr[973] = (void *) &cdat->dobj_891__NRMATD_RANK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_889__NRMATD_RANK",
+ melt_assertmsg ("iniobj check.discr isobj dobj_891__NRMATD_RANK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_889__NRMATD_RANK",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_891__NRMATD_RANK",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_889__NRMATD_RANK.meltobj_class =
+ cdat->dobj_891__NRMATD_RANK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_889__NRMATD_RANK.obj_num = 3;
- cdat->dobj_889__NRMATD_RANK.obj_hash = 501354852;
- cdat->dobj_889__NRMATD_RANK.obj_len = 4;
+ cdat->dobj_891__NRMATD_RANK.obj_num = 3;
+ cdat->dobj_891__NRMATD_RANK.obj_hash = 315684037;
+ cdat->dobj_891__NRMATD_RANK.obj_len = 4;
-/*inistring dstr_890__NRMATD_RANK*/
- /*_.VALSTR___V972*/ meltfptr[971] = (void *) &cdat->dstr_890__NRMATD_RANK;
- cdat->dstr_890__NRMATD_RANK.discr =
+/*inistring dstr_892__NRMATD_RANK*/
+ /*_.VALSTR___V975*/ meltfptr[974] = (void *) &cdat->dstr_892__NRMATD_RANK;
+ cdat->dstr_892__NRMATD_RANK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_890__NRMATD_RANK.val,
+ /*small inistring */ strncpy (cdat->dstr_892__NRMATD_RANK.val,
"NRMATD_RANK",
- sizeof (cdat->dstr_890__NRMATD_RANK.val) - 1);
- /*inirout drout_891__MAKE_MATCH_FLAG */
- /*_.VALROUT___V980*/ meltfptr[979] =
- (void *) &cdat->drout_891__MAKE_MATCH_FLAG;
- cdat->drout_891__MAKE_MATCH_FLAG.discr =
+ sizeof (cdat->dstr_892__NRMATD_RANK.val) - 1);
+ /*inirout drout_893__MAKE_MATCH_FLAG */
+ /*_.VALROUT___V983*/ meltfptr[982] =
+ (void *) &cdat->drout_893__MAKE_MATCH_FLAG;
+ cdat->drout_893__MAKE_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_891__MAKE_MATCH_FLAG.routdescr,
- "MAKE_MATCH_FLAG @warmelt-normatch.melt:2856",
+ strncpy (cdat->drout_893__MAKE_MATCH_FLAG.routdescr,
+ "MAKE_MATCH_FLAG @warmelt-normatch.melt:2867",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_891__MAKE_MATCH_FLAG.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_891__MAKE_MATCH_FLAG,
- meltrout_53_warmelt_normatch_MAKE_MATCH_FLAG);
-
- /*iniclos dclo_892__MAKE_MATCH_FLAG */
- /*_.VALCLO___V981*/ meltfptr[980] =
- (void *) &cdat->dclo_892__MAKE_MATCH_FLAG;
- cdat->dclo_892__MAKE_MATCH_FLAG.discr =
+ cdat->drout_893__MAKE_MATCH_FLAG.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_893__MAKE_MATCH_FLAG,
+ meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG);
+
+ /*iniclos dclo_894__MAKE_MATCH_FLAG */
+ /*_.VALCLO___V984*/ meltfptr[983] =
+ (void *) &cdat->dclo_894__MAKE_MATCH_FLAG;
+ cdat->dclo_894__MAKE_MATCH_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_892__MAKE_MATCH_FLAG.nbval = 0;
+ cdat->dclo_894__MAKE_MATCH_FLAG.nbval = 0;
-/*iniobj dsym_893__SCAN_SUBPATTERNS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V982*/ meltfptr[981])
- /*_.VALDATA___V982*/
- meltfptr[981] = (void *) &cdat->dsym_893__SCAN_SUBPATTERNS;
+/*iniobj dsym_895__SCAN_SUBPATTERNS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V985*/ meltfptr[984])
+ /*_.VALDATA___V985*/
+ meltfptr[984] = (void *) &cdat->dsym_895__SCAN_SUBPATTERNS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_893__SCAN_SUBPATTERNS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_895__SCAN_SUBPATTERNS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_893__SCAN_SUBPATTERNS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_895__SCAN_SUBPATTERNS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_893__SCAN_SUBPATTERNS.meltobj_class =
+ cdat->dsym_895__SCAN_SUBPATTERNS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_893__SCAN_SUBPATTERNS.obj_hash = 648386917;
- cdat->dsym_893__SCAN_SUBPATTERNS.obj_len = 3;
+ cdat->dsym_895__SCAN_SUBPATTERNS.obj_hash = 648386917;
+ cdat->dsym_895__SCAN_SUBPATTERNS.obj_len = 3;
-/*inistring dstr_894__SCAN_SUBPATTERNS*/
- /*_.VALSTR___V983*/ meltfptr[982] =
- (void *) &cdat->dstr_894__SCAN_SUBPATTERNS;
- cdat->dstr_894__SCAN_SUBPATTERNS.discr =
+/*inistring dstr_896__SCAN_SUBPATTERNS*/
+ /*_.VALSTR___V986*/ meltfptr[985] =
+ (void *) &cdat->dstr_896__SCAN_SUBPATTERNS;
+ cdat->dstr_896__SCAN_SUBPATTERNS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_894__SCAN_SUBPATTERNS.val,
+ /*small inistring */ strncpy (cdat->dstr_896__SCAN_SUBPATTERNS.val,
"SCAN_SUBPATTERNS",
- sizeof (cdat->dstr_894__SCAN_SUBPATTERNS.
+ sizeof (cdat->dstr_896__SCAN_SUBPATTERNS.
val) - 1);
-/*iniobj dsym_895__RECV*/
- /*uniqueobj*/ if (! /*_.VALDATA___V984*/ meltfptr[983])
- /*_.VALDATA___V984*/
- meltfptr[983] = (void *) &cdat->dsym_895__RECV;
+/*iniobj dsym_897__RECV*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V987*/ meltfptr[986])
+ /*_.VALDATA___V987*/
+ meltfptr[986] = (void *) &cdat->dsym_897__RECV;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_895__RECV",
+ melt_assertmsg ("iniobj check.discr isobj dsym_897__RECV",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_895__RECV",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_897__RECV",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_895__RECV.meltobj_class =
+ cdat->dsym_897__RECV.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_895__RECV.obj_hash = 10842790;
- cdat->dsym_895__RECV.obj_len = 3;
+ cdat->dsym_897__RECV.obj_hash = 10842790;
+ cdat->dsym_897__RECV.obj_len = 3;
-/*inistring dstr_896__RECV*/
- /*_.VALSTR___V985*/ meltfptr[984] = (void *) &cdat->dstr_896__RECV;
- cdat->dstr_896__RECV.discr =
+/*inistring dstr_898__RECV*/
+ /*_.VALSTR___V988*/ meltfptr[987] = (void *) &cdat->dstr_898__RECV;
+ cdat->dstr_898__RECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_896__RECV.val, "RECV",
- sizeof (cdat->dstr_896__RECV.val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ iniobj");
+ /*small inistring */ strncpy (cdat->dstr_898__RECV.val, "RECV",
+ sizeof (cdat->dstr_898__RECV.val) - 1);
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ iniobj");
-/*iniobj dobj_897*/
-/*_.VALDATA___V986*/ meltfptr[985] = (void *) &cdat->dobj_897;
+/*iniobj dobj_899*/
+/*_.VALDATA___V989*/ meltfptr[988] = (void *) &cdat->dobj_899;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_897",
+ melt_assertmsg ("iniobj check.discr isobj dobj_899",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_897",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_899",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_897.meltobj_class =
+ cdat->dobj_899.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_897.obj_num = 0;
- cdat->dobj_897.obj_hash = 659758731;
- cdat->dobj_897.obj_len = 2;
+ cdat->dobj_899.obj_num = 0;
+ cdat->dobj_899.obj_hash = 421084740;
+ cdat->dobj_899.obj_len = 2;
-/*iniobj dsym_898__FUN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V987*/ meltfptr[986])
- /*_.VALDATA___V987*/
- meltfptr[986] = (void *) &cdat->dsym_898__FUN;
+/*iniobj dsym_900__FUN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V990*/ meltfptr[989])
+ /*_.VALDATA___V990*/
+ meltfptr[989] = (void *) &cdat->dsym_900__FUN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_898__FUN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_900__FUN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_898__FUN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_900__FUN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_898__FUN.meltobj_class =
+ cdat->dsym_900__FUN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_898__FUN.obj_hash = 46511649;
- cdat->dsym_898__FUN.obj_len = 3;
+ cdat->dsym_900__FUN.obj_hash = 46511649;
+ cdat->dsym_900__FUN.obj_len = 3;
-/*inistring dstr_899__FUN*/
- /*_.VALSTR___V988*/ meltfptr[987] = (void *) &cdat->dstr_899__FUN;
- cdat->dstr_899__FUN.discr =
+/*inistring dstr_901__FUN*/
+ /*_.VALSTR___V991*/ meltfptr[990] = (void *) &cdat->dstr_901__FUN;
+ cdat->dstr_901__FUN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_899__FUN.val, "FUN",
- sizeof (cdat->dstr_899__FUN.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_901__FUN.val, "FUN",
+ sizeof (cdat->dstr_901__FUN.val) - 1);
/*^iniobj */
-/*iniobj dobj_900*/
-/*_.VALDATA___V989*/ meltfptr[988] = (void *) &cdat->dobj_900;
+/*iniobj dobj_902*/
+/*_.VALDATA___V992*/ meltfptr[991] = (void *) &cdat->dobj_902;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_900",
+ melt_assertmsg ("iniobj check.discr isobj dobj_902",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_900",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_902",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_900.meltobj_class =
+ cdat->dobj_902.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_900.obj_num = 1;
- cdat->dobj_900.obj_hash = 1361698;
- cdat->dobj_900.obj_len = 2;
+ cdat->dobj_902.obj_num = 1;
+ cdat->dobj_902.obj_hash = 144124343;
+ cdat->dobj_902.obj_len = 2;
-/*iniobj dsym_901__CTX*/
- /*uniqueobj*/ if (! /*_.VALDATA___V990*/ meltfptr[989])
- /*_.VALDATA___V990*/
- meltfptr[989] = (void *) &cdat->dsym_901__CTX;
+/*iniobj dsym_903__CTX*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V993*/ meltfptr[992])
+ /*_.VALDATA___V993*/
+ meltfptr[992] = (void *) &cdat->dsym_903__CTX;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_901__CTX",
+ melt_assertmsg ("iniobj check.discr isobj dsym_903__CTX",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_901__CTX",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_903__CTX",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_901__CTX.meltobj_class =
+ cdat->dsym_903__CTX.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_901__CTX.obj_hash = 80453264;
- cdat->dsym_901__CTX.obj_len = 3;
+ cdat->dsym_903__CTX.obj_hash = 80453264;
+ cdat->dsym_903__CTX.obj_len = 3;
-/*inistring dstr_902__CTX*/
- /*_.VALSTR___V991*/ meltfptr[990] = (void *) &cdat->dstr_902__CTX;
- cdat->dstr_902__CTX.discr =
+/*inistring dstr_904__CTX*/
+ /*_.VALSTR___V994*/ meltfptr[993] = (void *) &cdat->dstr_904__CTX;
+ cdat->dstr_904__CTX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_902__CTX.val, "CTX",
- sizeof (cdat->dstr_902__CTX.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_904__CTX.val, "CTX",
+ sizeof (cdat->dstr_904__CTX.val) - 1);
/*^iniobj */
-/*iniobj dobj_903*/
-/*_.VALDATA___V992*/ meltfptr[991] = (void *) &cdat->dobj_903;
+/*iniobj dobj_905*/
+/*_.VALDATA___V995*/ meltfptr[994] = (void *) &cdat->dobj_905;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_903",
+ melt_assertmsg ("iniobj check.discr isobj dobj_905",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_903",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_905",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_903.meltobj_class =
+ cdat->dobj_905.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_903.obj_num = 2;
- cdat->dobj_903.obj_hash = 865627889;
- cdat->dobj_903.obj_len = 2;
-
- /*inimult dtup_904__SCAN_SUBPATTERNS */
- /*_.VALTUP___V993*/ meltfptr[992] =
- (void *) &cdat->dtup_904__SCAN_SUBPATTERNS;
- cdat->dtup_904__SCAN_SUBPATTERNS.discr =
+ cdat->dobj_905.obj_num = 2;
+ cdat->dobj_905.obj_hash = 29589461;
+ cdat->dobj_905.obj_len = 2;
+
+ /*inimult dtup_906__SCAN_SUBPATTERNS */
+ /*_.VALTUP___V996*/ meltfptr[995] =
+ (void *) &cdat->dtup_906__SCAN_SUBPATTERNS;
+ cdat->dtup_906__SCAN_SUBPATTERNS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_904__SCAN_SUBPATTERNS.nbval = 3;
+ cdat->dtup_906__SCAN_SUBPATTERNS.nbval = 3;
/*^iniobj */
-/*iniobj dobj_905__SCAN_SUBPATTERNS*/
-/*_.VALDATA___V994*/ meltfptr[993] =
- (void *) &cdat->dobj_905__SCAN_SUBPATTERNS;
+/*iniobj dobj_907__SCAN_SUBPATTERNS*/
+/*_.VALDATA___V997*/ meltfptr[996] =
+ (void *) &cdat->dobj_907__SCAN_SUBPATTERNS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_905__SCAN_SUBPATTERNS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_907__SCAN_SUBPATTERNS",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_905__SCAN_SUBPATTERNS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_907__SCAN_SUBPATTERNS",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_905__SCAN_SUBPATTERNS.meltobj_class =
+ cdat->dobj_907__SCAN_SUBPATTERNS.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_905__SCAN_SUBPATTERNS.obj_hash = 848557226;
- cdat->dobj_905__SCAN_SUBPATTERNS.obj_len = 4;
+ cdat->dobj_907__SCAN_SUBPATTERNS.obj_hash = 1020785079;
+ cdat->dobj_907__SCAN_SUBPATTERNS.obj_len = 4;
-/*inistring dstr_906__SCAN_SUBPATTERNS*/
- /*_.VALSTR___V995*/ meltfptr[994] =
- (void *) &cdat->dstr_906__SCAN_SUBPATTERNS;
- cdat->dstr_906__SCAN_SUBPATTERNS.discr =
+/*inistring dstr_908__SCAN_SUBPATTERNS*/
+ /*_.VALSTR___V998*/ meltfptr[997] =
+ (void *) &cdat->dstr_908__SCAN_SUBPATTERNS;
+ cdat->dstr_908__SCAN_SUBPATTERNS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_906__SCAN_SUBPATTERNS.val,
+ /*small inistring */ strncpy (cdat->dstr_908__SCAN_SUBPATTERNS.val,
"SCAN_SUBPATTERNS",
- sizeof (cdat->dstr_906__SCAN_SUBPATTERNS.
+ sizeof (cdat->dstr_908__SCAN_SUBPATTERNS.
val) - 1);
-/*iniobj dsym_907__SCAN_STEP_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V996*/ meltfptr[995])
- /*_.VALDATA___V996*/
- meltfptr[995] = (void *) &cdat->dsym_907__SCAN_STEP_DATA;
+/*iniobj dsym_909__SCAN_STEP_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V999*/ meltfptr[998])
+ /*_.VALDATA___V999*/
+ meltfptr[998] = (void *) &cdat->dsym_909__SCAN_STEP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_907__SCAN_STEP_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_909__SCAN_STEP_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_907__SCAN_STEP_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_909__SCAN_STEP_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_907__SCAN_STEP_DATA.meltobj_class =
+ cdat->dsym_909__SCAN_STEP_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_907__SCAN_STEP_DATA.obj_hash = 131373921;
- cdat->dsym_907__SCAN_STEP_DATA.obj_len = 3;
+ cdat->dsym_909__SCAN_STEP_DATA.obj_hash = 131373921;
+ cdat->dsym_909__SCAN_STEP_DATA.obj_len = 3;
-/*inistring dstr_908__SCAN_STEP_DATA*/
- /*_.VALSTR___V997*/ meltfptr[996] =
- (void *) &cdat->dstr_908__SCAN_STEP_DATA;
- cdat->dstr_908__SCAN_STEP_DATA.discr =
+/*inistring dstr_910__SCAN_STEP_DATA*/
+ /*_.VALSTR___V1000*/ meltfptr[999] =
+ (void *) &cdat->dstr_910__SCAN_STEP_DATA;
+ cdat->dstr_910__SCAN_STEP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_908__SCAN_STEP_DATA.val,
+ /*small inistring */ strncpy (cdat->dstr_910__SCAN_STEP_DATA.val,
"SCAN_STEP_DATA",
- sizeof (cdat->dstr_908__SCAN_STEP_DATA.val) -
+ sizeof (cdat->dstr_910__SCAN_STEP_DATA.val) -
1);
-/*iniobj dsym_909__STEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V998*/ meltfptr[997])
- /*_.VALDATA___V998*/
- meltfptr[997] = (void *) &cdat->dsym_909__STEP;
+/*iniobj dsym_911__STEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1001*/ meltfptr[1000])
+ /*_.VALDATA___V1001*/
+ meltfptr[1000] = (void *) &cdat->dsym_911__STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_909__STEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_911__STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_909__STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_911__STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_909__STEP.meltobj_class =
+ cdat->dsym_911__STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_909__STEP.obj_hash = 449825866;
- cdat->dsym_909__STEP.obj_len = 3;
+ cdat->dsym_911__STEP.obj_hash = 449825866;
+ cdat->dsym_911__STEP.obj_len = 3;
-/*inistring dstr_910__STEP*/
- /*_.VALSTR___V999*/ meltfptr[998] = (void *) &cdat->dstr_910__STEP;
- cdat->dstr_910__STEP.discr =
+/*inistring dstr_912__STEP*/
+ /*_.VALSTR___V1002*/ meltfptr[1001] = (void *) &cdat->dstr_912__STEP;
+ cdat->dstr_912__STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_910__STEP.val, "STEP",
- sizeof (cdat->dstr_910__STEP.val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ iniobj");
+ /*small inistring */ strncpy (cdat->dstr_912__STEP.val, "STEP",
+ sizeof (cdat->dstr_912__STEP.val) - 1);
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ iniobj");
-/*iniobj dobj_911*/
-/*_.VALDATA___V1000*/ meltfptr[999] = (void *) &cdat->dobj_911;
+/*iniobj dobj_913*/
+/*_.VALDATA___V1003*/ meltfptr[1002] = (void *) &cdat->dobj_913;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_911",
+ melt_assertmsg ("iniobj check.discr isobj dobj_913",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_911",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_913",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_911.meltobj_class =
+ cdat->dobj_913.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_911.obj_num = 0;
- cdat->dobj_911.obj_hash = 428913324;
- cdat->dobj_911.obj_len = 2;
+ cdat->dobj_913.obj_num = 0;
+ cdat->dobj_913.obj_hash = 397275159;
+ cdat->dobj_913.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_912*/
-/*_.VALDATA___V1001*/ meltfptr[1000] = (void *) &cdat->dobj_912;
+/*iniobj dobj_914*/
+/*_.VALDATA___V1004*/ meltfptr[1003] = (void *) &cdat->dobj_914;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_912",
+ melt_assertmsg ("iniobj check.discr isobj dobj_914",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_912",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_914",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_912.meltobj_class =
+ cdat->dobj_914.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_912.obj_num = 1;
- cdat->dobj_912.obj_hash = 400521507;
- cdat->dobj_912.obj_len = 2;
+ cdat->dobj_914.obj_num = 1;
+ cdat->dobj_914.obj_hash = 974729257;
+ cdat->dobj_914.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_913*/
-/*_.VALDATA___V1002*/ meltfptr[1001] = (void *) &cdat->dobj_913;
+/*iniobj dobj_915*/
+/*_.VALDATA___V1005*/ meltfptr[1004] = (void *) &cdat->dobj_915;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_913",
+ melt_assertmsg ("iniobj check.discr isobj dobj_915",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_913",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_915",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_913.meltobj_class =
+ cdat->dobj_915.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_913.obj_num = 2;
- cdat->dobj_913.obj_hash = 966113148;
- cdat->dobj_913.obj_len = 2;
-
- /*inimult dtup_914__SCAN_STEP_DATA */
- /*_.VALTUP___V1003*/ meltfptr[1002] =
- (void *) &cdat->dtup_914__SCAN_STEP_DATA;
- cdat->dtup_914__SCAN_STEP_DATA.discr =
+ cdat->dobj_915.obj_num = 2;
+ cdat->dobj_915.obj_hash = 632358260;
+ cdat->dobj_915.obj_len = 2;
+
+ /*inimult dtup_916__SCAN_STEP_DATA */
+ /*_.VALTUP___V1006*/ meltfptr[1005] =
+ (void *) &cdat->dtup_916__SCAN_STEP_DATA;
+ cdat->dtup_916__SCAN_STEP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_914__SCAN_STEP_DATA.nbval = 3;
+ cdat->dtup_916__SCAN_STEP_DATA.nbval = 3;
/*^iniobj */
-/*iniobj dobj_915__SCAN_STEP_DATA*/
-/*_.VALDATA___V1004*/ meltfptr[1003] =
- (void *) &cdat->dobj_915__SCAN_STEP_DATA;
+/*iniobj dobj_917__SCAN_STEP_DATA*/
+/*_.VALDATA___V1007*/ meltfptr[1006] =
+ (void *) &cdat->dobj_917__SCAN_STEP_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_915__SCAN_STEP_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_917__SCAN_STEP_DATA",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_915__SCAN_STEP_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_917__SCAN_STEP_DATA",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_915__SCAN_STEP_DATA.meltobj_class =
+ cdat->dobj_917__SCAN_STEP_DATA.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_915__SCAN_STEP_DATA.obj_hash = 939339602;
- cdat->dobj_915__SCAN_STEP_DATA.obj_len = 4;
+ cdat->dobj_917__SCAN_STEP_DATA.obj_hash = 879219895;
+ cdat->dobj_917__SCAN_STEP_DATA.obj_len = 4;
-/*inistring dstr_916__SCAN_STEP_DATA*/
- /*_.VALSTR___V1005*/ meltfptr[1004] =
- (void *) &cdat->dstr_916__SCAN_STEP_DATA;
- cdat->dstr_916__SCAN_STEP_DATA.discr =
+/*inistring dstr_918__SCAN_STEP_DATA*/
+ /*_.VALSTR___V1008*/ meltfptr[1007] =
+ (void *) &cdat->dstr_918__SCAN_STEP_DATA;
+ cdat->dstr_918__SCAN_STEP_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_916__SCAN_STEP_DATA.val,
+ /*small inistring */ strncpy (cdat->dstr_918__SCAN_STEP_DATA.val,
"SCAN_STEP_DATA",
- sizeof (cdat->dstr_916__SCAN_STEP_DATA.val) -
+ sizeof (cdat->dstr_918__SCAN_STEP_DATA.val) -
1);
-/*iniobj dsym_917__SCAN_STEP_FLAG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1006*/ meltfptr[1005])
- /*_.VALDATA___V1006*/
- meltfptr[1005] = (void *) &cdat->dsym_917__SCAN_STEP_FLAG;
+/*iniobj dsym_919__SCAN_STEP_FLAG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1009*/ meltfptr[1008])
+ /*_.VALDATA___V1009*/
+ meltfptr[1008] = (void *) &cdat->dsym_919__SCAN_STEP_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_917__SCAN_STEP_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_919__SCAN_STEP_FLAG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_917__SCAN_STEP_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_919__SCAN_STEP_FLAG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_917__SCAN_STEP_FLAG.meltobj_class =
+ cdat->dsym_919__SCAN_STEP_FLAG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_917__SCAN_STEP_FLAG.obj_hash = 630186923;
- cdat->dsym_917__SCAN_STEP_FLAG.obj_len = 3;
+ cdat->dsym_919__SCAN_STEP_FLAG.obj_hash = 630186923;
+ cdat->dsym_919__SCAN_STEP_FLAG.obj_len = 3;
-/*inistring dstr_918__SCAN_STEP_FLAG*/
- /*_.VALSTR___V1007*/ meltfptr[1006] =
- (void *) &cdat->dstr_918__SCAN_STEP_FLAG;
- cdat->dstr_918__SCAN_STEP_FLAG.discr =
+/*inistring dstr_920__SCAN_STEP_FLAG*/
+ /*_.VALSTR___V1010*/ meltfptr[1009] =
+ (void *) &cdat->dstr_920__SCAN_STEP_FLAG;
+ cdat->dstr_920__SCAN_STEP_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_918__SCAN_STEP_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_920__SCAN_STEP_FLAG.val,
"SCAN_STEP_FLAG",
- sizeof (cdat->dstr_918__SCAN_STEP_FLAG.val) -
+ sizeof (cdat->dstr_920__SCAN_STEP_FLAG.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ iniobj");
-/*iniobj dobj_919*/
-/*_.VALDATA___V1008*/ meltfptr[1007] = (void *) &cdat->dobj_919;
+/*iniobj dobj_921*/
+/*_.VALDATA___V1011*/ meltfptr[1010] = (void *) &cdat->dobj_921;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_919",
+ melt_assertmsg ("iniobj check.discr isobj dobj_921",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_919",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_921",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_919.meltobj_class =
+ cdat->dobj_921.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_919.obj_num = 0;
- cdat->dobj_919.obj_hash = 264009642;
- cdat->dobj_919.obj_len = 2;
+ cdat->dobj_921.obj_num = 0;
+ cdat->dobj_921.obj_hash = 910466788;
+ cdat->dobj_921.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_920*/
-/*_.VALDATA___V1009*/ meltfptr[1008] = (void *) &cdat->dobj_920;
+/*iniobj dobj_922*/
+/*_.VALDATA___V1012*/ meltfptr[1011] = (void *) &cdat->dobj_922;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_920",
+ melt_assertmsg ("iniobj check.discr isobj dobj_922",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_920",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_922",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_920.meltobj_class =
+ cdat->dobj_922.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_920.obj_num = 1;
- cdat->dobj_920.obj_hash = 434697756;
- cdat->dobj_920.obj_len = 2;
+ cdat->dobj_922.obj_num = 1;
+ cdat->dobj_922.obj_hash = 386197555;
+ cdat->dobj_922.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_921*/
-/*_.VALDATA___V1010*/ meltfptr[1009] = (void *) &cdat->dobj_921;
+/*iniobj dobj_923*/
+/*_.VALDATA___V1013*/ meltfptr[1012] = (void *) &cdat->dobj_923;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_921",
+ melt_assertmsg ("iniobj check.discr isobj dobj_923",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_921",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_923",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_921.meltobj_class =
+ cdat->dobj_923.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_921.obj_num = 2;
- cdat->dobj_921.obj_hash = 201228368;
- cdat->dobj_921.obj_len = 2;
-
- /*inimult dtup_922__SCAN_STEP_FLAG */
- /*_.VALTUP___V1011*/ meltfptr[1010] =
- (void *) &cdat->dtup_922__SCAN_STEP_FLAG;
- cdat->dtup_922__SCAN_STEP_FLAG.discr =
+ cdat->dobj_923.obj_num = 2;
+ cdat->dobj_923.obj_hash = 421980741;
+ cdat->dobj_923.obj_len = 2;
+
+ /*inimult dtup_924__SCAN_STEP_FLAG */
+ /*_.VALTUP___V1014*/ meltfptr[1013] =
+ (void *) &cdat->dtup_924__SCAN_STEP_FLAG;
+ cdat->dtup_924__SCAN_STEP_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_922__SCAN_STEP_FLAG.nbval = 3;
+ cdat->dtup_924__SCAN_STEP_FLAG.nbval = 3;
/*^iniobj */
-/*iniobj dobj_923__SCAN_STEP_FLAG*/
-/*_.VALDATA___V1012*/ meltfptr[1011] =
- (void *) &cdat->dobj_923__SCAN_STEP_FLAG;
+/*iniobj dobj_925__SCAN_STEP_FLAG*/
+/*_.VALDATA___V1015*/ meltfptr[1014] =
+ (void *) &cdat->dobj_925__SCAN_STEP_FLAG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_923__SCAN_STEP_FLAG",
+ melt_assertmsg ("iniobj check.discr isobj dobj_925__SCAN_STEP_FLAG",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_923__SCAN_STEP_FLAG",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_925__SCAN_STEP_FLAG",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_923__SCAN_STEP_FLAG.meltobj_class =
+ cdat->dobj_925__SCAN_STEP_FLAG.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_923__SCAN_STEP_FLAG.obj_hash = 533718197;
- cdat->dobj_923__SCAN_STEP_FLAG.obj_len = 4;
+ cdat->dobj_925__SCAN_STEP_FLAG.obj_hash = 337195608;
+ cdat->dobj_925__SCAN_STEP_FLAG.obj_len = 4;
-/*inistring dstr_924__SCAN_STEP_FLAG*/
- /*_.VALSTR___V1013*/ meltfptr[1012] =
- (void *) &cdat->dstr_924__SCAN_STEP_FLAG;
- cdat->dstr_924__SCAN_STEP_FLAG.discr =
+/*inistring dstr_926__SCAN_STEP_FLAG*/
+ /*_.VALSTR___V1016*/ meltfptr[1015] =
+ (void *) &cdat->dstr_926__SCAN_STEP_FLAG;
+ cdat->dstr_926__SCAN_STEP_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_924__SCAN_STEP_FLAG.val,
+ /*small inistring */ strncpy (cdat->dstr_926__SCAN_STEP_FLAG.val,
"SCAN_STEP_FLAG",
- sizeof (cdat->dstr_924__SCAN_STEP_FLAG.val) -
+ sizeof (cdat->dstr_926__SCAN_STEP_FLAG.val) -
1);
- /*inirout drout_925__SCANSUBPAT_ANYRECV */
- /*_.VALROUT___V1014*/ meltfptr[1013] =
- (void *) &cdat->drout_925__SCANSUBPAT_ANYRECV;
- cdat->drout_925__SCANSUBPAT_ANYRECV.discr =
+ /*inirout drout_927__SCANSUBPAT_ANYRECV */
+ /*_.VALROUT___V1017*/ meltfptr[1016] =
+ (void *) &cdat->drout_927__SCANSUBPAT_ANYRECV;
+ cdat->drout_927__SCANSUBPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_925__SCANSUBPAT_ANYRECV.routdescr,
- "SCANSUBPAT_ANYRECV @warmelt-normatch.melt:2901",
+ strncpy (cdat->drout_927__SCANSUBPAT_ANYRECV.routdescr,
+ "SCANSUBPAT_ANYRECV @warmelt-normatch.melt:2912",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_925__SCANSUBPAT_ANYRECV.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_925__SCANSUBPAT_ANYRECV,
- meltrout_54_warmelt_normatch_SCANSUBPAT_ANYRECV);
-
- /*iniclos dclo_926__SCANSUBPAT_ANYRECV */
- /*_.VALCLO___V1015*/ meltfptr[1014] =
- (void *) &cdat->dclo_926__SCANSUBPAT_ANYRECV;
- cdat->dclo_926__SCANSUBPAT_ANYRECV.discr =
+ cdat->drout_927__SCANSUBPAT_ANYRECV.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_927__SCANSUBPAT_ANYRECV,
+ meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV);
+
+ /*iniclos dclo_928__SCANSUBPAT_ANYRECV */
+ /*_.VALCLO___V1018*/ meltfptr[1017] =
+ (void *) &cdat->dclo_928__SCANSUBPAT_ANYRECV;
+ cdat->dclo_928__SCANSUBPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_926__SCANSUBPAT_ANYRECV.nbval = 0;
+ cdat->dclo_928__SCANSUBPAT_ANYRECV.nbval = 0;
- /*inirout drout_927__SCANSUBPAT_NOOP */
- /*_.VALROUT___V1016*/ meltfptr[1015] =
- (void *) &cdat->drout_927__SCANSUBPAT_NOOP;
- cdat->drout_927__SCANSUBPAT_NOOP.discr =
+ /*inirout drout_929__SCANSTEPDATA_ANYRECV */
+ /*_.VALROUT___V1019*/ meltfptr[1018] =
+ (void *) &cdat->drout_929__SCANSTEPDATA_ANYRECV;
+ cdat->drout_929__SCANSTEPDATA_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_927__SCANSUBPAT_NOOP.routdescr,
- "SCANSUBPAT_NOOP @warmelt-normatch.melt:2909",
+ strncpy (cdat->drout_929__SCANSTEPDATA_ANYRECV.routdescr,
+ "SCANSTEPDATA_ANYRECV @warmelt-normatch.melt:2920",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_927__SCANSUBPAT_NOOP.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_927__SCANSUBPAT_NOOP,
- meltrout_55_warmelt_normatch_SCANSUBPAT_NOOP);
-
- /*iniclos dclo_928__SCANSUBPAT_NOOP */
- /*_.VALCLO___V1017*/ meltfptr[1016] =
- (void *) &cdat->dclo_928__SCANSUBPAT_NOOP;
- cdat->dclo_928__SCANSUBPAT_NOOP.discr =
+ cdat->drout_929__SCANSTEPDATA_ANYRECV.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_929__SCANSTEPDATA_ANYRECV,
+ meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV);
+
+ /*iniclos dclo_930__SCANSTEPDATA_ANYRECV */
+ /*_.VALCLO___V1020*/ meltfptr[1019] =
+ (void *) &cdat->dclo_930__SCANSTEPDATA_ANYRECV;
+ cdat->dclo_930__SCANSTEPDATA_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_928__SCANSUBPAT_NOOP.nbval = 0;
+ cdat->dclo_930__SCANSTEPDATA_ANYRECV.nbval = 0;
- /*inirout drout_929__SCANSUBPAT_OR */
- /*_.VALROUT___V1018*/ meltfptr[1017] =
- (void *) &cdat->drout_929__SCANSUBPAT_OR;
- cdat->drout_929__SCANSUBPAT_OR.discr =
+ /*inirout drout_931__SCANSTEPFLAG_ANYRECV */
+ /*_.VALROUT___V1021*/ meltfptr[1020] =
+ (void *) &cdat->drout_931__SCANSTEPFLAG_ANYRECV;
+ cdat->drout_931__SCANSTEPFLAG_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_929__SCANSUBPAT_OR.routdescr,
- "SCANSUBPAT_OR @warmelt-normatch.melt:2916",
+ strncpy (cdat->drout_931__SCANSTEPFLAG_ANYRECV.routdescr,
+ "SCANSTEPFLAG_ANYRECV @warmelt-normatch.melt:2928",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_929__SCANSUBPAT_OR.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_929__SCANSUBPAT_OR,
- meltrout_56_warmelt_normatch_SCANSUBPAT_OR);
-
- /*iniclos dclo_930__SCANSUBPAT_OR */
- /*_.VALCLO___V1019*/ meltfptr[1018] =
- (void *) &cdat->dclo_930__SCANSUBPAT_OR;
- cdat->dclo_930__SCANSUBPAT_OR.discr =
+ cdat->drout_931__SCANSTEPFLAG_ANYRECV.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_931__SCANSTEPFLAG_ANYRECV,
+ meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV);
+
+ /*iniclos dclo_932__SCANSTEPFLAG_ANYRECV */
+ /*_.VALCLO___V1022*/ meltfptr[1021] =
+ (void *) &cdat->dclo_932__SCANSTEPFLAG_ANYRECV;
+ cdat->dclo_932__SCANSTEPFLAG_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_930__SCANSUBPAT_OR.nbval = 0;
+ cdat->dclo_932__SCANSTEPFLAG_ANYRECV.nbval = 0;
- /*inirout drout_931__SCANSUBPAT_AND */
- /*_.VALROUT___V1020*/ meltfptr[1019] =
- (void *) &cdat->drout_931__SCANSUBPAT_AND;
- cdat->drout_931__SCANSUBPAT_AND.discr =
+ /*inirout drout_933__SCANSUBPAT_NOOP */
+ /*_.VALROUT___V1023*/ meltfptr[1022] =
+ (void *) &cdat->drout_933__SCANSUBPAT_NOOP;
+ cdat->drout_933__SCANSUBPAT_NOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_931__SCANSUBPAT_AND.routdescr,
- "SCANSUBPAT_AND @warmelt-normatch.melt:2925",
+ strncpy (cdat->drout_933__SCANSUBPAT_NOOP.routdescr,
+ "SCANSUBPAT_NOOP @warmelt-normatch.melt:2936",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_931__SCANSUBPAT_AND.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_931__SCANSUBPAT_AND,
- meltrout_57_warmelt_normatch_SCANSUBPAT_AND);
-
- /*iniclos dclo_932__SCANSUBPAT_AND */
- /*_.VALCLO___V1021*/ meltfptr[1020] =
- (void *) &cdat->dclo_932__SCANSUBPAT_AND;
- cdat->dclo_932__SCANSUBPAT_AND.discr =
+ cdat->drout_933__SCANSUBPAT_NOOP.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_933__SCANSUBPAT_NOOP,
+ meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP);
+
+ /*iniclos dclo_934__SCANSUBPAT_NOOP */
+ /*_.VALCLO___V1024*/ meltfptr[1023] =
+ (void *) &cdat->dclo_934__SCANSUBPAT_NOOP;
+ cdat->dclo_934__SCANSUBPAT_NOOP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_932__SCANSUBPAT_AND.nbval = 0;
+ cdat->dclo_934__SCANSUBPAT_NOOP.nbval = 0;
- /*inirout drout_933__SCANSUBPAT_CONSTRUCT */
- /*_.VALROUT___V1022*/ meltfptr[1021] =
- (void *) &cdat->drout_933__SCANSUBPAT_CONSTRUCT;
- cdat->drout_933__SCANSUBPAT_CONSTRUCT.discr =
+ /*inirout drout_935__SCANSUBPAT_OR */
+ /*_.VALROUT___V1025*/ meltfptr[1024] =
+ (void *) &cdat->drout_935__SCANSUBPAT_OR;
+ cdat->drout_935__SCANSUBPAT_OR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_933__SCANSUBPAT_CONSTRUCT.routdescr,
- "SCANSUBPAT_CONSTRUCT @warmelt-normatch.melt:2935",
+ strncpy (cdat->drout_935__SCANSUBPAT_OR.routdescr,
+ "SCANSUBPAT_OR @warmelt-normatch.melt:2943",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_933__SCANSUBPAT_CONSTRUCT.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_933__SCANSUBPAT_CONSTRUCT,
- meltrout_58_warmelt_normatch_SCANSUBPAT_CONSTRUCT);
-
- /*iniclos dclo_934__SCANSUBPAT_CONSTRUCT */
- /*_.VALCLO___V1023*/ meltfptr[1022] =
- (void *) &cdat->dclo_934__SCANSUBPAT_CONSTRUCT;
- cdat->dclo_934__SCANSUBPAT_CONSTRUCT.discr =
+ cdat->drout_935__SCANSUBPAT_OR.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_935__SCANSUBPAT_OR,
+ meltrout_59_warmelt_normatch_SCANSUBPAT_OR);
+
+ /*iniclos dclo_936__SCANSUBPAT_OR */
+ /*_.VALCLO___V1026*/ meltfptr[1025] =
+ (void *) &cdat->dclo_936__SCANSUBPAT_OR;
+ cdat->dclo_936__SCANSUBPAT_OR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_934__SCANSUBPAT_CONSTRUCT.nbval = 0;
+ cdat->dclo_936__SCANSUBPAT_OR.nbval = 0;
- /*inirout drout_935__SCANSUBPAT_OBJECT */
- /*_.VALROUT___V1024*/ meltfptr[1023] =
- (void *) &cdat->drout_935__SCANSUBPAT_OBJECT;
- cdat->drout_935__SCANSUBPAT_OBJECT.discr =
+ /*inirout drout_937__SCANSUBPAT_AND */
+ /*_.VALROUT___V1027*/ meltfptr[1026] =
+ (void *) &cdat->drout_937__SCANSUBPAT_AND;
+ cdat->drout_937__SCANSUBPAT_AND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_935__SCANSUBPAT_OBJECT.routdescr,
- "SCANSUBPAT_OBJECT @warmelt-normatch.melt:2944",
+ strncpy (cdat->drout_937__SCANSUBPAT_AND.routdescr,
+ "SCANSUBPAT_AND @warmelt-normatch.melt:2952",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_935__SCANSUBPAT_OBJECT.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_935__SCANSUBPAT_OBJECT,
- meltrout_59_warmelt_normatch_SCANSUBPAT_OBJECT);
-
- /*iniclos dclo_936__SCANSUBPAT_OBJECT */
- /*_.VALCLO___V1025*/ meltfptr[1024] =
- (void *) &cdat->dclo_936__SCANSUBPAT_OBJECT;
- cdat->dclo_936__SCANSUBPAT_OBJECT.discr =
+ cdat->drout_937__SCANSUBPAT_AND.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_937__SCANSUBPAT_AND,
+ meltrout_60_warmelt_normatch_SCANSUBPAT_AND);
+
+ /*iniclos dclo_938__SCANSUBPAT_AND */
+ /*_.VALCLO___V1028*/ meltfptr[1027] =
+ (void *) &cdat->dclo_938__SCANSUBPAT_AND;
+ cdat->dclo_938__SCANSUBPAT_AND.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_936__SCANSUBPAT_OBJECT.nbval = 0;
+ cdat->dclo_938__SCANSUBPAT_AND.nbval = 0;
- /*inirout drout_937__SCANSUBPAT_CONSTRUCT */
- /*_.VALROUT___V1026*/ meltfptr[1025] =
- (void *) &cdat->drout_937__SCANSUBPAT_CONSTRUCT;
- cdat->drout_937__SCANSUBPAT_CONSTRUCT.discr =
+ /*inirout drout_939__SCANSUBPAT_CONSTRUCT */
+ /*_.VALROUT___V1029*/ meltfptr[1028] =
+ (void *) &cdat->drout_939__SCANSUBPAT_CONSTRUCT;
+ cdat->drout_939__SCANSUBPAT_CONSTRUCT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_937__SCANSUBPAT_CONSTRUCT.routdescr,
- "SCANSUBPAT_CONSTRUCT @warmelt-normatch.melt:2954",
+ strncpy (cdat->drout_939__SCANSUBPAT_CONSTRUCT.routdescr,
+ "SCANSUBPAT_CONSTRUCT @warmelt-normatch.melt:2963",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_937__SCANSUBPAT_CONSTRUCT.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_937__SCANSUBPAT_CONSTRUCT,
- meltrout_60_warmelt_normatch_SCANSUBPAT_CONSTRUCT);
-
- /*iniclos dclo_938__SCANSUBPAT_CONSTRUCT */
- /*_.VALCLO___V1027*/ meltfptr[1026] =
- (void *) &cdat->dclo_938__SCANSUBPAT_CONSTRUCT;
- cdat->dclo_938__SCANSUBPAT_CONSTRUCT.discr =
+ cdat->drout_939__SCANSUBPAT_CONSTRUCT.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_939__SCANSUBPAT_CONSTRUCT,
+ meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT);
+
+ /*iniclos dclo_940__SCANSUBPAT_CONSTRUCT */
+ /*_.VALCLO___V1030*/ meltfptr[1029] =
+ (void *) &cdat->dclo_940__SCANSUBPAT_CONSTRUCT;
+ cdat->dclo_940__SCANSUBPAT_CONSTRUCT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_938__SCANSUBPAT_CONSTRUCT.nbval = 0;
+ cdat->dclo_940__SCANSUBPAT_CONSTRUCT.nbval = 0;
- /*inirout drout_939__FILL_MATCHCASE */
- /*_.VALROUT___V1028*/ meltfptr[1027] =
- (void *) &cdat->drout_939__FILL_MATCHCASE;
- cdat->drout_939__FILL_MATCHCASE.discr =
+ /*inirout drout_941__SCANSUBPAT_OBJECT */
+ /*_.VALROUT___V1031*/ meltfptr[1030] =
+ (void *) &cdat->drout_941__SCANSUBPAT_OBJECT;
+ cdat->drout_941__SCANSUBPAT_OBJECT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_939__FILL_MATCHCASE.routdescr,
- "FILL_MATCHCASE @warmelt-normatch.melt:2964",
+ strncpy (cdat->drout_941__SCANSUBPAT_OBJECT.routdescr,
+ "SCANSUBPAT_OBJECT @warmelt-normatch.melt:2978",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_939__FILL_MATCHCASE.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_939__FILL_MATCHCASE,
- meltrout_61_warmelt_normatch_FILL_MATCHCASE);
+ cdat->drout_941__SCANSUBPAT_OBJECT.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_941__SCANSUBPAT_OBJECT,
+ meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT);
+
+ /*iniclos dclo_942__SCANSUBPAT_OBJECT */
+ /*_.VALCLO___V1032*/ meltfptr[1031] =
+ (void *) &cdat->dclo_942__SCANSUBPAT_OBJECT;
+ cdat->dclo_942__SCANSUBPAT_OBJECT.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_942__SCANSUBPAT_OBJECT.nbval = 0;
- /*iniclos dclo_940__FILL_MATCHCASE */
- /*_.VALCLO___V1030*/ meltfptr[1029] =
- (void *) &cdat->dclo_940__FILL_MATCHCASE;
- cdat->dclo_940__FILL_MATCHCASE.discr =
+ /*inirout drout_943__FILL_MATCHCASE */
+ /*_.VALROUT___V1033*/ meltfptr[1032] =
+ (void *) &cdat->drout_943__FILL_MATCHCASE;
+ cdat->drout_943__FILL_MATCHCASE.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_943__FILL_MATCHCASE.routdescr,
+ "FILL_MATCHCASE @warmelt-normatch.melt:2989",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_943__FILL_MATCHCASE.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_943__FILL_MATCHCASE,
+ meltrout_63_warmelt_normatch_FILL_MATCHCASE);
+
+ /*iniclos dclo_944__FILL_MATCHCASE */
+ /*_.VALCLO___V1035*/ meltfptr[1034] =
+ (void *) &cdat->dclo_944__FILL_MATCHCASE;
+ cdat->dclo_944__FILL_MATCHCASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_940__FILL_MATCHCASE.nbval = 0;
+ cdat->dclo_944__FILL_MATCHCASE.nbval = 0;
- /*inirout drout_941__LAMBDA_ */
- /*_.VALROUT___V1029*/ meltfptr[1028] = (void *) &cdat->drout_941__LAMBDA_;
- cdat->drout_941__LAMBDA_.discr =
+ /*inirout drout_945__LAMBDA_ */
+ /*_.VALROUT___V1034*/ meltfptr[1033] = (void *) &cdat->drout_945__LAMBDA_;
+ cdat->drout_945__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_941__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:2974", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_941__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_941__LAMBDA_,
- meltrout_62_warmelt_normatch_LAMBDA___19__);
+ strncpy (cdat->drout_945__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:3000", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_945__LAMBDA_.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_945__LAMBDA_,
+ meltrout_64_warmelt_normatch_LAMBDA___19__);
-/*iniobj dsym_942__PUT_THEN_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1031*/ meltfptr[1030])
- /*_.VALDATA___V1031*/
- meltfptr[1030] = (void *) &cdat->dsym_942__PUT_THEN_MATCH;
+/*iniobj dsym_946__PUT_THEN_MATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1036*/ meltfptr[1035])
+ /*_.VALDATA___V1036*/
+ meltfptr[1035] = (void *) &cdat->dsym_946__PUT_THEN_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_942__PUT_THEN_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_946__PUT_THEN_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_942__PUT_THEN_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_946__PUT_THEN_MATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_942__PUT_THEN_MATCH.meltobj_class =
+ cdat->dsym_946__PUT_THEN_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_942__PUT_THEN_MATCH.obj_hash = 135654960;
- cdat->dsym_942__PUT_THEN_MATCH.obj_len = 3;
+ cdat->dsym_946__PUT_THEN_MATCH.obj_hash = 135654960;
+ cdat->dsym_946__PUT_THEN_MATCH.obj_len = 3;
-/*inistring dstr_943__PUT_THEN_MATCH*/
- /*_.VALSTR___V1032*/ meltfptr[1031] =
- (void *) &cdat->dstr_943__PUT_THEN_MATCH;
- cdat->dstr_943__PUT_THEN_MATCH.discr =
+/*inistring dstr_947__PUT_THEN_MATCH*/
+ /*_.VALSTR___V1037*/ meltfptr[1036] =
+ (void *) &cdat->dstr_947__PUT_THEN_MATCH;
+ cdat->dstr_947__PUT_THEN_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_943__PUT_THEN_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_947__PUT_THEN_MATCH.val,
"PUT_THEN_MATCH",
- sizeof (cdat->dstr_943__PUT_THEN_MATCH.val) -
+ sizeof (cdat->dstr_947__PUT_THEN_MATCH.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ iniobj");
-/*iniobj dobj_944*/
-/*_.VALDATA___V1033*/ meltfptr[1032] = (void *) &cdat->dobj_944;
+/*iniobj dobj_948*/
+/*_.VALDATA___V1038*/ meltfptr[1037] = (void *) &cdat->dobj_948;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_944",
+ melt_assertmsg ("iniobj check.discr isobj dobj_948",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_944",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_948",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_944.meltobj_class =
+ cdat->dobj_948.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_944.obj_num = 0;
- cdat->dobj_944.obj_hash = 816464846;
- cdat->dobj_944.obj_len = 2;
+ cdat->dobj_948.obj_num = 0;
+ cdat->dobj_948.obj_hash = 845037158;
+ cdat->dobj_948.obj_len = 2;
-/*iniobj dsym_945__THENSTEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1034*/ meltfptr[1033])
- /*_.VALDATA___V1034*/
- meltfptr[1033] = (void *) &cdat->dsym_945__THENSTEP;
+/*iniobj dsym_949__THENSTEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1039*/ meltfptr[1038])
+ /*_.VALDATA___V1039*/
+ meltfptr[1038] = (void *) &cdat->dsym_949__THENSTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_945__THENSTEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_949__THENSTEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_945__THENSTEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_949__THENSTEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_945__THENSTEP.meltobj_class =
+ cdat->dsym_949__THENSTEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_945__THENSTEP.obj_hash = 296323356;
- cdat->dsym_945__THENSTEP.obj_len = 3;
+ cdat->dsym_949__THENSTEP.obj_hash = 296323356;
+ cdat->dsym_949__THENSTEP.obj_len = 3;
-/*inistring dstr_946__THENSTEP*/
- /*_.VALSTR___V1035*/ meltfptr[1034] = (void *) &cdat->dstr_946__THENSTEP;
- cdat->dstr_946__THENSTEP.discr =
+/*inistring dstr_950__THENSTEP*/
+ /*_.VALSTR___V1040*/ meltfptr[1039] = (void *) &cdat->dstr_950__THENSTEP;
+ cdat->dstr_950__THENSTEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_946__THENSTEP.val, "THENSTEP",
- sizeof (cdat->dstr_946__THENSTEP.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_950__THENSTEP.val, "THENSTEP",
+ sizeof (cdat->dstr_950__THENSTEP.val) - 1);
/*^iniobj */
-/*iniobj dobj_947*/
-/*_.VALDATA___V1036*/ meltfptr[1035] = (void *) &cdat->dobj_947;
+/*iniobj dobj_951*/
+/*_.VALDATA___V1041*/ meltfptr[1040] = (void *) &cdat->dobj_951;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_947",
+ melt_assertmsg ("iniobj check.discr isobj dobj_951",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_947",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_951",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_947.meltobj_class =
+ cdat->dobj_951.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_947.obj_num = 1;
- cdat->dobj_947.obj_hash = 655727446;
- cdat->dobj_947.obj_len = 2;
-
- /*inimult dtup_948__PUT_THEN_MATCH */
- /*_.VALTUP___V1037*/ meltfptr[1036] =
- (void *) &cdat->dtup_948__PUT_THEN_MATCH;
- cdat->dtup_948__PUT_THEN_MATCH.discr =
+ cdat->dobj_951.obj_num = 1;
+ cdat->dobj_951.obj_hash = 557927457;
+ cdat->dobj_951.obj_len = 2;
+
+ /*inimult dtup_952__PUT_THEN_MATCH */
+ /*_.VALTUP___V1042*/ meltfptr[1041] =
+ (void *) &cdat->dtup_952__PUT_THEN_MATCH;
+ cdat->dtup_952__PUT_THEN_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_948__PUT_THEN_MATCH.nbval = 2;
+ cdat->dtup_952__PUT_THEN_MATCH.nbval = 2;
/*^iniobj */
-/*iniobj dobj_949__PUT_THEN_MATCH*/
-/*_.VALDATA___V1038*/ meltfptr[1037] =
- (void *) &cdat->dobj_949__PUT_THEN_MATCH;
+/*iniobj dobj_953__PUT_THEN_MATCH*/
+/*_.VALDATA___V1043*/ meltfptr[1042] =
+ (void *) &cdat->dobj_953__PUT_THEN_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_949__PUT_THEN_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_953__PUT_THEN_MATCH",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_949__PUT_THEN_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_953__PUT_THEN_MATCH",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_949__PUT_THEN_MATCH.meltobj_class =
+ cdat->dobj_953__PUT_THEN_MATCH.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_949__PUT_THEN_MATCH.obj_hash = 191018721;
- cdat->dobj_949__PUT_THEN_MATCH.obj_len = 4;
+ cdat->dobj_953__PUT_THEN_MATCH.obj_hash = 324113576;
+ cdat->dobj_953__PUT_THEN_MATCH.obj_len = 4;
-/*inistring dstr_950__PUT_THEN_MATCH*/
- /*_.VALSTR___V1039*/ meltfptr[1038] =
- (void *) &cdat->dstr_950__PUT_THEN_MATCH;
- cdat->dstr_950__PUT_THEN_MATCH.discr =
+/*inistring dstr_954__PUT_THEN_MATCH*/
+ /*_.VALSTR___V1044*/ meltfptr[1043] =
+ (void *) &cdat->dstr_954__PUT_THEN_MATCH;
+ cdat->dstr_954__PUT_THEN_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_950__PUT_THEN_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_954__PUT_THEN_MATCH.val,
"PUT_THEN_MATCH",
- sizeof (cdat->dstr_950__PUT_THEN_MATCH.val) -
+ sizeof (cdat->dstr_954__PUT_THEN_MATCH.val) -
1);
- /*inirout drout_951__START_STEP */
- /*_.VALROUT___V1040*/ meltfptr[1039] =
- (void *) &cdat->drout_951__START_STEP;
- cdat->drout_951__START_STEP.discr =
+ /*inirout drout_955__PUTTHEN_MATCHANY */
+ /*_.VALROUT___V1045*/ meltfptr[1044] =
+ (void *) &cdat->drout_955__PUTTHEN_MATCHANY;
+ cdat->drout_955__PUTTHEN_MATCHANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_951__START_STEP.routdescr,
- "START_STEP @warmelt-normatch.melt:3004", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_951__START_STEP.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_951__START_STEP,
- meltrout_63_warmelt_normatch_START_STEP);
-
- /*iniclos dclo_952__START_STEP */
- /*_.VALCLO___V1041*/ meltfptr[1040] = (void *) &cdat->dclo_952__START_STEP;
- cdat->dclo_952__START_STEP.discr =
+ strncpy (cdat->drout_955__PUTTHEN_MATCHANY.routdescr,
+ "PUTTHEN_MATCHANY @warmelt-normatch.melt:3044",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_955__PUTTHEN_MATCHANY.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_955__PUTTHEN_MATCHANY,
+ meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY);
+
+ /*iniclos dclo_956__PUTTHEN_MATCHANY */
+ /*_.VALCLO___V1046*/ meltfptr[1045] =
+ (void *) &cdat->dclo_956__PUTTHEN_MATCHANY;
+ cdat->dclo_956__PUTTHEN_MATCHANY.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_956__PUTTHEN_MATCHANY.nbval = 0;
+
+ /*inirout drout_957__START_STEP */
+ /*_.VALROUT___V1047*/ meltfptr[1046] =
+ (void *) &cdat->drout_957__START_STEP;
+ cdat->drout_957__START_STEP.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_957__START_STEP.routdescr,
+ "START_STEP @warmelt-normatch.melt:3053", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_957__START_STEP.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_957__START_STEP,
+ meltrout_66_warmelt_normatch_START_STEP);
+
+ /*iniclos dclo_958__START_STEP */
+ /*_.VALCLO___V1048*/ meltfptr[1047] = (void *) &cdat->dclo_958__START_STEP;
+ cdat->dclo_958__START_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_952__START_STEP.nbval = 0;
+ cdat->dclo_958__START_STEP.nbval = 0;
- /*inirout drout_953__PUTTHEN_MATCHTHEN */
- /*_.VALROUT___V1042*/ meltfptr[1041] =
- (void *) &cdat->drout_953__PUTTHEN_MATCHTHEN;
- cdat->drout_953__PUTTHEN_MATCHTHEN.discr =
+ /*inirout drout_959__PUTTHEN_MATCHTHEN */
+ /*_.VALROUT___V1049*/ meltfptr[1048] =
+ (void *) &cdat->drout_959__PUTTHEN_MATCHTHEN;
+ cdat->drout_959__PUTTHEN_MATCHTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_953__PUTTHEN_MATCHTHEN.routdescr,
- "PUTTHEN_MATCHTHEN @warmelt-normatch.melt:3023",
+ strncpy (cdat->drout_959__PUTTHEN_MATCHTHEN.routdescr,
+ "PUTTHEN_MATCHTHEN @warmelt-normatch.melt:3072",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_953__PUTTHEN_MATCHTHEN.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_953__PUTTHEN_MATCHTHEN,
- meltrout_64_warmelt_normatch_PUTTHEN_MATCHTHEN);
-
- /*iniclos dclo_954__PUTTHEN_MATCHTHEN */
- /*_.VALCLO___V1043*/ meltfptr[1042] =
- (void *) &cdat->dclo_954__PUTTHEN_MATCHTHEN;
- cdat->dclo_954__PUTTHEN_MATCHTHEN.discr =
+ cdat->drout_959__PUTTHEN_MATCHTHEN.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_959__PUTTHEN_MATCHTHEN,
+ meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN);
+
+ /*iniclos dclo_960__PUTTHEN_MATCHTHEN */
+ /*_.VALCLO___V1050*/ meltfptr[1049] =
+ (void *) &cdat->dclo_960__PUTTHEN_MATCHTHEN;
+ cdat->dclo_960__PUTTHEN_MATCHTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_954__PUTTHEN_MATCHTHEN.nbval = 0;
+ cdat->dclo_960__PUTTHEN_MATCHTHEN.nbval = 0;
- /*inirout drout_955__PUTTHEN_MATCHGROUP */
- /*_.VALROUT___V1044*/ meltfptr[1043] =
- (void *) &cdat->drout_955__PUTTHEN_MATCHGROUP;
- cdat->drout_955__PUTTHEN_MATCHGROUP.discr =
+ /*inirout drout_961__PUTTHEN_MATCHGROUP */
+ /*_.VALROUT___V1051*/ meltfptr[1050] =
+ (void *) &cdat->drout_961__PUTTHEN_MATCHGROUP;
+ cdat->drout_961__PUTTHEN_MATCHGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_955__PUTTHEN_MATCHGROUP.routdescr,
- "PUTTHEN_MATCHGROUP @warmelt-normatch.melt:3062",
+ strncpy (cdat->drout_961__PUTTHEN_MATCHGROUP.routdescr,
+ "PUTTHEN_MATCHGROUP @warmelt-normatch.melt:3111",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_955__PUTTHEN_MATCHGROUP.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_955__PUTTHEN_MATCHGROUP,
- meltrout_65_warmelt_normatch_PUTTHEN_MATCHGROUP);
-
- /*iniclos dclo_956__PUTTHEN_MATCHGROUP */
- /*_.VALCLO___V1045*/ meltfptr[1044] =
- (void *) &cdat->dclo_956__PUTTHEN_MATCHGROUP;
- cdat->dclo_956__PUTTHEN_MATCHGROUP.discr =
+ cdat->drout_961__PUTTHEN_MATCHGROUP.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_961__PUTTHEN_MATCHGROUP,
+ meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP);
+
+ /*iniclos dclo_962__PUTTHEN_MATCHGROUP */
+ /*_.VALCLO___V1052*/ meltfptr[1051] =
+ (void *) &cdat->dclo_962__PUTTHEN_MATCHGROUP;
+ cdat->dclo_962__PUTTHEN_MATCHGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_956__PUTTHEN_MATCHGROUP.nbval = 0;
+ cdat->dclo_962__PUTTHEN_MATCHGROUP.nbval = 0;
-/*iniobj dsym_957__PUT_ELSE_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1046*/ meltfptr[1045])
- /*_.VALDATA___V1046*/
- meltfptr[1045] = (void *) &cdat->dsym_957__PUT_ELSE_MATCH;
+/*iniobj dsym_963__PUT_ELSE_MATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1053*/ meltfptr[1052])
+ /*_.VALDATA___V1053*/
+ meltfptr[1052] = (void *) &cdat->dsym_963__PUT_ELSE_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_957__PUT_ELSE_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_963__PUT_ELSE_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_957__PUT_ELSE_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_963__PUT_ELSE_MATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_957__PUT_ELSE_MATCH.meltobj_class =
+ cdat->dsym_963__PUT_ELSE_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_957__PUT_ELSE_MATCH.obj_hash = 868738368;
- cdat->dsym_957__PUT_ELSE_MATCH.obj_len = 3;
+ cdat->dsym_963__PUT_ELSE_MATCH.obj_hash = 868738368;
+ cdat->dsym_963__PUT_ELSE_MATCH.obj_len = 3;
-/*inistring dstr_958__PUT_ELSE_MATCH*/
- /*_.VALSTR___V1047*/ meltfptr[1046] =
- (void *) &cdat->dstr_958__PUT_ELSE_MATCH;
- cdat->dstr_958__PUT_ELSE_MATCH.discr =
+/*inistring dstr_964__PUT_ELSE_MATCH*/
+ /*_.VALSTR___V1054*/ meltfptr[1053] =
+ (void *) &cdat->dstr_964__PUT_ELSE_MATCH;
+ cdat->dstr_964__PUT_ELSE_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_958__PUT_ELSE_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_964__PUT_ELSE_MATCH.val,
"PUT_ELSE_MATCH",
- sizeof (cdat->dstr_958__PUT_ELSE_MATCH.val) -
+ sizeof (cdat->dstr_964__PUT_ELSE_MATCH.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ iniobj");
-/*iniobj dobj_959*/
-/*_.VALDATA___V1048*/ meltfptr[1047] = (void *) &cdat->dobj_959;
+/*iniobj dobj_965*/
+/*_.VALDATA___V1055*/ meltfptr[1054] = (void *) &cdat->dobj_965;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_959",
+ melt_assertmsg ("iniobj check.discr isobj dobj_965",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_959",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_965",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_959.meltobj_class =
+ cdat->dobj_965.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_959.obj_num = 0;
- cdat->dobj_959.obj_hash = 406293059;
- cdat->dobj_959.obj_len = 2;
+ cdat->dobj_965.obj_num = 0;
+ cdat->dobj_965.obj_hash = 863401309;
+ cdat->dobj_965.obj_len = 2;
-/*iniobj dsym_960__ELSESTEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1049*/ meltfptr[1048])
- /*_.VALDATA___V1049*/
- meltfptr[1048] = (void *) &cdat->dsym_960__ELSESTEP;
+/*iniobj dsym_966__ELSESTEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1056*/ meltfptr[1055])
+ /*_.VALDATA___V1056*/
+ meltfptr[1055] = (void *) &cdat->dsym_966__ELSESTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_960__ELSESTEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_966__ELSESTEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_960__ELSESTEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_966__ELSESTEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_960__ELSESTEP.meltobj_class =
+ cdat->dsym_966__ELSESTEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_960__ELSESTEP.obj_hash = 680058237;
- cdat->dsym_960__ELSESTEP.obj_len = 3;
+ cdat->dsym_966__ELSESTEP.obj_hash = 680058237;
+ cdat->dsym_966__ELSESTEP.obj_len = 3;
-/*inistring dstr_961__ELSESTEP*/
- /*_.VALSTR___V1050*/ meltfptr[1049] = (void *) &cdat->dstr_961__ELSESTEP;
- cdat->dstr_961__ELSESTEP.discr =
+/*inistring dstr_967__ELSESTEP*/
+ /*_.VALSTR___V1057*/ meltfptr[1056] = (void *) &cdat->dstr_967__ELSESTEP;
+ cdat->dstr_967__ELSESTEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_961__ELSESTEP.val, "ELSESTEP",
- sizeof (cdat->dstr_961__ELSESTEP.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_967__ELSESTEP.val, "ELSESTEP",
+ sizeof (cdat->dstr_967__ELSESTEP.val) - 1);
/*^iniobj */
-/*iniobj dobj_962*/
-/*_.VALDATA___V1051*/ meltfptr[1050] = (void *) &cdat->dobj_962;
+/*iniobj dobj_968*/
+/*_.VALDATA___V1058*/ meltfptr[1057] = (void *) &cdat->dobj_968;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_962",
+ melt_assertmsg ("iniobj check.discr isobj dobj_968",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_962",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_968",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_962.meltobj_class =
+ cdat->dobj_968.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_962.obj_num = 1;
- cdat->dobj_962.obj_hash = 78583645;
- cdat->dobj_962.obj_len = 2;
-
- /*inimult dtup_963__PUT_ELSE_MATCH */
- /*_.VALTUP___V1052*/ meltfptr[1051] =
- (void *) &cdat->dtup_963__PUT_ELSE_MATCH;
- cdat->dtup_963__PUT_ELSE_MATCH.discr =
+ cdat->dobj_968.obj_num = 1;
+ cdat->dobj_968.obj_hash = 886926468;
+ cdat->dobj_968.obj_len = 2;
+
+ /*inimult dtup_969__PUT_ELSE_MATCH */
+ /*_.VALTUP___V1059*/ meltfptr[1058] =
+ (void *) &cdat->dtup_969__PUT_ELSE_MATCH;
+ cdat->dtup_969__PUT_ELSE_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_963__PUT_ELSE_MATCH.nbval = 2;
+ cdat->dtup_969__PUT_ELSE_MATCH.nbval = 2;
/*^iniobj */
-/*iniobj dobj_964__PUT_ELSE_MATCH*/
-/*_.VALDATA___V1053*/ meltfptr[1052] =
- (void *) &cdat->dobj_964__PUT_ELSE_MATCH;
+/*iniobj dobj_970__PUT_ELSE_MATCH*/
+/*_.VALDATA___V1060*/ meltfptr[1059] =
+ (void *) &cdat->dobj_970__PUT_ELSE_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_964__PUT_ELSE_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_970__PUT_ELSE_MATCH",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_964__PUT_ELSE_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_970__PUT_ELSE_MATCH",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_964__PUT_ELSE_MATCH.meltobj_class =
+ cdat->dobj_970__PUT_ELSE_MATCH.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_964__PUT_ELSE_MATCH.obj_hash = 983187811;
- cdat->dobj_964__PUT_ELSE_MATCH.obj_len = 4;
+ cdat->dobj_970__PUT_ELSE_MATCH.obj_hash = 970421071;
+ cdat->dobj_970__PUT_ELSE_MATCH.obj_len = 4;
-/*inistring dstr_965__PUT_ELSE_MATCH*/
- /*_.VALSTR___V1054*/ meltfptr[1053] =
- (void *) &cdat->dstr_965__PUT_ELSE_MATCH;
- cdat->dstr_965__PUT_ELSE_MATCH.discr =
+/*inistring dstr_971__PUT_ELSE_MATCH*/
+ /*_.VALSTR___V1061*/ meltfptr[1060] =
+ (void *) &cdat->dstr_971__PUT_ELSE_MATCH;
+ cdat->dstr_971__PUT_ELSE_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_965__PUT_ELSE_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_971__PUT_ELSE_MATCH.val,
"PUT_ELSE_MATCH",
- sizeof (cdat->dstr_965__PUT_ELSE_MATCH.val) -
+ sizeof (cdat->dstr_971__PUT_ELSE_MATCH.val) -
1);
- /*inirout drout_966__PUTELSE_MATCHSTEPTHEN */
- /*_.VALROUT___V1055*/ meltfptr[1054] =
- (void *) &cdat->drout_966__PUTELSE_MATCHSTEPTHEN;
- cdat->drout_966__PUTELSE_MATCHSTEPTHEN.discr =
+ /*inirout drout_972__PUTELSE_MATCHANY */
+ /*_.VALROUT___V1062*/ meltfptr[1061] =
+ (void *) &cdat->drout_972__PUTELSE_MATCHANY;
+ cdat->drout_972__PUTELSE_MATCHANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_966__PUTELSE_MATCHSTEPTHEN.routdescr,
- "PUTELSE_MATCHSTEPTHEN @warmelt-normatch.melt:3096",
+ strncpy (cdat->drout_972__PUTELSE_MATCHANY.routdescr,
+ "PUTELSE_MATCHANY @warmelt-normatch.melt:3146",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_966__PUTELSE_MATCHSTEPTHEN.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_966__PUTELSE_MATCHSTEPTHEN,
- meltrout_66_warmelt_normatch_PUTELSE_MATCHSTEPTHEN);
-
- /*iniclos dclo_967__PUTELSE_MATCHSTEPTHEN */
- /*_.VALCLO___V1056*/ meltfptr[1055] =
- (void *) &cdat->dclo_967__PUTELSE_MATCHSTEPTHEN;
- cdat->dclo_967__PUTELSE_MATCHSTEPTHEN.discr =
+ cdat->drout_972__PUTELSE_MATCHANY.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_972__PUTELSE_MATCHANY,
+ meltrout_69_warmelt_normatch_PUTELSE_MATCHANY);
+
+ /*iniclos dclo_973__PUTELSE_MATCHANY */
+ /*_.VALCLO___V1063*/ meltfptr[1062] =
+ (void *) &cdat->dclo_973__PUTELSE_MATCHANY;
+ cdat->dclo_973__PUTELSE_MATCHANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_967__PUTELSE_MATCHSTEPTHEN.nbval = 0;
+ cdat->dclo_973__PUTELSE_MATCHANY.nbval = 0;
- /*inirout drout_968__PUTELSE_MATCHTEST */
- /*_.VALROUT___V1057*/ meltfptr[1056] =
- (void *) &cdat->drout_968__PUTELSE_MATCHTEST;
- cdat->drout_968__PUTELSE_MATCHTEST.discr =
+ /*inirout drout_974__PUTELSE_MATCHSTEPTHEN */
+ /*_.VALROUT___V1064*/ meltfptr[1063] =
+ (void *) &cdat->drout_974__PUTELSE_MATCHSTEPTHEN;
+ cdat->drout_974__PUTELSE_MATCHSTEPTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_968__PUTELSE_MATCHTEST.routdescr,
- "PUTELSE_MATCHTEST @warmelt-normatch.melt:3131",
+ strncpy (cdat->drout_974__PUTELSE_MATCHSTEPTHEN.routdescr,
+ "PUTELSE_MATCHSTEPTHEN @warmelt-normatch.melt:3156",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_968__PUTELSE_MATCHTEST.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_968__PUTELSE_MATCHTEST,
- meltrout_67_warmelt_normatch_PUTELSE_MATCHTEST);
-
- /*iniclos dclo_969__PUTELSE_MATCHTEST */
- /*_.VALCLO___V1058*/ meltfptr[1057] =
- (void *) &cdat->dclo_969__PUTELSE_MATCHTEST;
- cdat->dclo_969__PUTELSE_MATCHTEST.discr =
+ cdat->drout_974__PUTELSE_MATCHSTEPTHEN.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_974__PUTELSE_MATCHSTEPTHEN,
+ meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN);
+
+ /*iniclos dclo_975__PUTELSE_MATCHSTEPTHEN */
+ /*_.VALCLO___V1065*/ meltfptr[1064] =
+ (void *) &cdat->dclo_975__PUTELSE_MATCHSTEPTHEN;
+ cdat->dclo_975__PUTELSE_MATCHSTEPTHEN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_969__PUTELSE_MATCHTEST.nbval = 0;
+ cdat->dclo_975__PUTELSE_MATCHSTEPTHEN.nbval = 0;
- /*inirout drout_970__PUTELSE_MATCHGROUP */
- /*_.VALROUT___V1059*/ meltfptr[1058] =
- (void *) &cdat->drout_970__PUTELSE_MATCHGROUP;
- cdat->drout_970__PUTELSE_MATCHGROUP.discr =
+ /*inirout drout_976__PUTELSE_MATCHTEST */
+ /*_.VALROUT___V1066*/ meltfptr[1065] =
+ (void *) &cdat->drout_976__PUTELSE_MATCHTEST;
+ cdat->drout_976__PUTELSE_MATCHTEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_970__PUTELSE_MATCHGROUP.routdescr,
- "PUTELSE_MATCHGROUP @warmelt-normatch.melt:3185",
+ strncpy (cdat->drout_976__PUTELSE_MATCHTEST.routdescr,
+ "PUTELSE_MATCHTEST @warmelt-normatch.melt:3191",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_970__PUTELSE_MATCHGROUP.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_970__PUTELSE_MATCHGROUP,
- meltrout_68_warmelt_normatch_PUTELSE_MATCHGROUP);
-
- /*iniclos dclo_971__PUTELSE_MATCHGROUP */
- /*_.VALCLO___V1060*/ meltfptr[1059] =
- (void *) &cdat->dclo_971__PUTELSE_MATCHGROUP;
- cdat->dclo_971__PUTELSE_MATCHGROUP.discr =
+ cdat->drout_976__PUTELSE_MATCHTEST.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_976__PUTELSE_MATCHTEST,
+ meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST);
+
+ /*iniclos dclo_977__PUTELSE_MATCHTEST */
+ /*_.VALCLO___V1067*/ meltfptr[1066] =
+ (void *) &cdat->dclo_977__PUTELSE_MATCHTEST;
+ cdat->dclo_977__PUTELSE_MATCHTEST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_971__PUTELSE_MATCHGROUP.nbval = 0;
+ cdat->dclo_977__PUTELSE_MATCHTEST.nbval = 0;
- /*inirout drout_972__SCANSTEPDATA_TESTINS */
- /*_.VALROUT___V1061*/ meltfptr[1060] =
- (void *) &cdat->drout_972__SCANSTEPDATA_TESTINS;
- cdat->drout_972__SCANSTEPDATA_TESTINS.discr =
+ /*inirout drout_978__PUTELSE_MATCHGROUP */
+ /*_.VALROUT___V1068*/ meltfptr[1067] =
+ (void *) &cdat->drout_978__PUTELSE_MATCHGROUP;
+ cdat->drout_978__PUTELSE_MATCHGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_972__SCANSTEPDATA_TESTINS.routdescr,
- "SCANSTEPDATA_TESTINS @warmelt-normatch.melt:3228",
+ strncpy (cdat->drout_978__PUTELSE_MATCHGROUP.routdescr,
+ "PUTELSE_MATCHGROUP @warmelt-normatch.melt:3245",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_972__SCANSTEPDATA_TESTINS.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_972__SCANSTEPDATA_TESTINS,
- meltrout_69_warmelt_normatch_SCANSTEPDATA_TESTINS);
-
- /*iniclos dclo_973__SCANSTEPDATA_TESTINS */
- /*_.VALCLO___V1062*/ meltfptr[1061] =
- (void *) &cdat->dclo_973__SCANSTEPDATA_TESTINS;
- cdat->dclo_973__SCANSTEPDATA_TESTINS.discr =
+ cdat->drout_978__PUTELSE_MATCHGROUP.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_978__PUTELSE_MATCHGROUP,
+ meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP);
+
+ /*iniclos dclo_979__PUTELSE_MATCHGROUP */
+ /*_.VALCLO___V1069*/ meltfptr[1068] =
+ (void *) &cdat->dclo_979__PUTELSE_MATCHGROUP;
+ cdat->dclo_979__PUTELSE_MATCHGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_973__SCANSTEPDATA_TESTINS.nbval = 0;
+ cdat->dclo_979__PUTELSE_MATCHGROUP.nbval = 0;
- /*inirout drout_974__SCANSTEPDATA_TESTMATCHER */
- /*_.VALROUT___V1063*/ meltfptr[1062] =
- (void *) &cdat->drout_974__SCANSTEPDATA_TESTMATCHER;
- cdat->drout_974__SCANSTEPDATA_TESTMATCHER.discr =
+ /*inirout drout_980__SCANSTEPDATA_TESTINS */
+ /*_.VALROUT___V1070*/ meltfptr[1069] =
+ (void *) &cdat->drout_980__SCANSTEPDATA_TESTINS;
+ cdat->drout_980__SCANSTEPDATA_TESTINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_974__SCANSTEPDATA_TESTMATCHER.routdescr,
- "SCANSTEPDATA_TESTMATCHER @warmelt-normatch.melt:3239",
+ strncpy (cdat->drout_980__SCANSTEPDATA_TESTINS.routdescr,
+ "SCANSTEPDATA_TESTINS @warmelt-normatch.melt:3288",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_974__SCANSTEPDATA_TESTMATCHER.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_974__SCANSTEPDATA_TESTMATCHER,
- meltrout_70_warmelt_normatch_SCANSTEPDATA_TESTMATCHER);
-
- /*iniclos dclo_975__SCANSTEPDATA_TESTMATCHER */
- /*_.VALCLO___V1064*/ meltfptr[1063] =
- (void *) &cdat->dclo_975__SCANSTEPDATA_TESTMATCHER;
- cdat->dclo_975__SCANSTEPDATA_TESTMATCHER.discr =
+ cdat->drout_980__SCANSTEPDATA_TESTINS.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_980__SCANSTEPDATA_TESTINS,
+ meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS);
+
+ /*iniclos dclo_981__SCANSTEPDATA_TESTINS */
+ /*_.VALCLO___V1071*/ meltfptr[1070] =
+ (void *) &cdat->dclo_981__SCANSTEPDATA_TESTINS;
+ cdat->dclo_981__SCANSTEPDATA_TESTINS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_975__SCANSTEPDATA_TESTMATCHER.nbval = 0;
+ cdat->dclo_981__SCANSTEPDATA_TESTINS.nbval = 0;
- /*inirout drout_976__SCANSTEPFLAG_STEPWITHFLAG */
- /*_.VALROUT___V1065*/ meltfptr[1064] =
- (void *) &cdat->drout_976__SCANSTEPFLAG_STEPWITHFLAG;
- cdat->drout_976__SCANSTEPFLAG_STEPWITHFLAG.discr =
+ /*inirout drout_982__SCANSTEPDATA_TESTTUPLE */
+ /*_.VALROUT___V1072*/ meltfptr[1071] =
+ (void *) &cdat->drout_982__SCANSTEPDATA_TESTTUPLE;
+ cdat->drout_982__SCANSTEPDATA_TESTTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_976__SCANSTEPFLAG_STEPWITHFLAG.routdescr,
- "SCANSTEPFLAG_STEPWITHFLAG @warmelt-normatch.melt:3250",
+ strncpy (cdat->drout_982__SCANSTEPDATA_TESTTUPLE.routdescr,
+ "SCANSTEPDATA_TESTTUPLE @warmelt-normatch.melt:3300",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_976__SCANSTEPFLAG_STEPWITHFLAG.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_976__SCANSTEPFLAG_STEPWITHFLAG,
- meltrout_71_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG);
-
- /*iniclos dclo_977__SCANSTEPFLAG_STEPWITHFLAG */
- /*_.VALCLO___V1066*/ meltfptr[1065] =
- (void *) &cdat->dclo_977__SCANSTEPFLAG_STEPWITHFLAG;
- cdat->dclo_977__SCANSTEPFLAG_STEPWITHFLAG.discr =
+ cdat->drout_982__SCANSTEPDATA_TESTTUPLE.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_982__SCANSTEPDATA_TESTTUPLE,
+ meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE);
+
+ /*iniclos dclo_983__SCANSTEPDATA_TESTTUPLE */
+ /*_.VALCLO___V1073*/ meltfptr[1072] =
+ (void *) &cdat->dclo_983__SCANSTEPDATA_TESTTUPLE;
+ cdat->dclo_983__SCANSTEPDATA_TESTTUPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_977__SCANSTEPFLAG_STEPWITHFLAG.nbval = 0;
+ cdat->dclo_983__SCANSTEPDATA_TESTTUPLE.nbval = 0;
- /*inirout drout_978__SCANSTEPFLAG_STEPFLAGOPER */
- /*_.VALROUT___V1067*/ meltfptr[1066] =
- (void *) &cdat->drout_978__SCANSTEPFLAG_STEPFLAGOPER;
- cdat->drout_978__SCANSTEPFLAG_STEPFLAGOPER.discr =
+ /*inirout drout_984__SCANSTEPDATA_TESTWITHFLAG */
+ /*_.VALROUT___V1074*/ meltfptr[1073] =
+ (void *) &cdat->drout_984__SCANSTEPDATA_TESTWITHFLAG;
+ cdat->drout_984__SCANSTEPDATA_TESTWITHFLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_978__SCANSTEPFLAG_STEPFLAGOPER.routdescr,
- "SCANSTEPFLAG_STEPFLAGOPER @warmelt-normatch.melt:3259",
+ strncpy (cdat->drout_984__SCANSTEPDATA_TESTWITHFLAG.routdescr,
+ "SCANSTEPDATA_TESTWITHFLAG @warmelt-normatch.melt:3317",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_978__SCANSTEPFLAG_STEPFLAGOPER.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_978__SCANSTEPFLAG_STEPFLAGOPER,
- meltrout_72_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER);
-
- /*iniclos dclo_979__SCANSTEPFLAG_STEPFLAGOPER */
- /*_.VALCLO___V1068*/ meltfptr[1067] =
- (void *) &cdat->dclo_979__SCANSTEPFLAG_STEPFLAGOPER;
- cdat->dclo_979__SCANSTEPFLAG_STEPFLAGOPER.discr =
+ cdat->drout_984__SCANSTEPDATA_TESTWITHFLAG.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_984__SCANSTEPDATA_TESTWITHFLAG,
+ meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG);
+
+ /*iniclos dclo_985__SCANSTEPDATA_TESTWITHFLAG */
+ /*_.VALCLO___V1075*/ meltfptr[1074] =
+ (void *) &cdat->dclo_985__SCANSTEPDATA_TESTWITHFLAG;
+ cdat->dclo_985__SCANSTEPDATA_TESTWITHFLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_979__SCANSTEPFLAG_STEPFLAGOPER.nbval = 0;
+ cdat->dclo_985__SCANSTEPDATA_TESTWITHFLAG.nbval = 0;
+ /*inirout drout_986__SCANSTEPDATA_TESTMATCHER */
+ /*_.VALROUT___V1076*/ meltfptr[1075] =
+ (void *) &cdat->drout_986__SCANSTEPDATA_TESTMATCHER;
+ cdat->drout_986__SCANSTEPDATA_TESTMATCHER.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_986__SCANSTEPDATA_TESTMATCHER.routdescr,
+ "SCANSTEPDATA_TESTMATCHER @warmelt-normatch.melt:3323",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_986__SCANSTEPDATA_TESTMATCHER.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_986__SCANSTEPDATA_TESTMATCHER,
+ meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER);
+
+ /*iniclos dclo_987__SCANSTEPDATA_TESTMATCHER */
+ /*_.VALCLO___V1077*/ meltfptr[1076] =
+ (void *) &cdat->dclo_987__SCANSTEPDATA_TESTMATCHER;
+ cdat->dclo_987__SCANSTEPDATA_TESTMATCHER.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_987__SCANSTEPDATA_TESTMATCHER.nbval = 0;
-/*iniobj dsym_980__TRANSLATE_PATTERN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1069*/ meltfptr[1068])
- /*_.VALDATA___V1069*/
- meltfptr[1068] = (void *) &cdat->dsym_980__TRANSLATE_PATTERN;
+ /*inirout drout_988__SCANSTEPFLAG_STEPWITHFLAG */
+ /*_.VALROUT___V1078*/ meltfptr[1077] =
+ (void *) &cdat->drout_988__SCANSTEPFLAG_STEPWITHFLAG;
+ cdat->drout_988__SCANSTEPFLAG_STEPWITHFLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_988__SCANSTEPFLAG_STEPWITHFLAG.routdescr,
+ "SCANSTEPFLAG_STEPWITHFLAG @warmelt-normatch.melt:3334",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_988__SCANSTEPFLAG_STEPWITHFLAG.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_988__SCANSTEPFLAG_STEPWITHFLAG,
+ meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG);
+
+ /*iniclos dclo_989__SCANSTEPFLAG_STEPWITHFLAG */
+ /*_.VALCLO___V1079*/ meltfptr[1078] =
+ (void *) &cdat->dclo_989__SCANSTEPFLAG_STEPWITHFLAG;
+ cdat->dclo_989__SCANSTEPFLAG_STEPWITHFLAG.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_989__SCANSTEPFLAG_STEPWITHFLAG.nbval = 0;
+
+ /*inirout drout_990__SCANSTEPFLAG_STEPFLAGOPER */
+ /*_.VALROUT___V1080*/ meltfptr[1079] =
+ (void *) &cdat->drout_990__SCANSTEPFLAG_STEPFLAGOPER;
+ cdat->drout_990__SCANSTEPFLAG_STEPFLAGOPER.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_990__SCANSTEPFLAG_STEPFLAGOPER.routdescr,
+ "SCANSTEPFLAG_STEPFLAGOPER @warmelt-normatch.melt:3343",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_990__SCANSTEPFLAG_STEPFLAGOPER.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_990__SCANSTEPFLAG_STEPFLAGOPER,
+ meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER);
+
+ /*iniclos dclo_991__SCANSTEPFLAG_STEPFLAGOPER */
+ /*_.VALCLO___V1081*/ meltfptr[1080] =
+ (void *) &cdat->dclo_991__SCANSTEPFLAG_STEPFLAGOPER;
+ cdat->dclo_991__SCANSTEPFLAG_STEPFLAGOPER.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_991__SCANSTEPFLAG_STEPFLAGOPER.nbval = 0;
+
+ /*inirout drout_992__SCANSTEPFLAG_STEPWITHDATA */
+ /*_.VALROUT___V1082*/ meltfptr[1081] =
+ (void *) &cdat->drout_992__SCANSTEPFLAG_STEPWITHDATA;
+ cdat->drout_992__SCANSTEPFLAG_STEPWITHDATA.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_992__SCANSTEPFLAG_STEPWITHDATA.routdescr,
+ "SCANSTEPFLAG_STEPWITHDATA @warmelt-normatch.melt:3361",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_992__SCANSTEPFLAG_STEPWITHDATA.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_992__SCANSTEPFLAG_STEPWITHDATA,
+ meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA);
+
+ /*iniclos dclo_993__SCANSTEPFLAG_STEPWITHDATA */
+ /*_.VALCLO___V1083*/ meltfptr[1082] =
+ (void *) &cdat->dclo_993__SCANSTEPFLAG_STEPWITHDATA;
+ cdat->dclo_993__SCANSTEPFLAG_STEPWITHDATA.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_993__SCANSTEPFLAG_STEPWITHDATA.nbval = 0;
+
+
+/*iniobj dsym_994__TRANSLATE_PATTERN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1084*/ meltfptr[1083])
+ /*_.VALDATA___V1084*/
+ meltfptr[1083] = (void *) &cdat->dsym_994__TRANSLATE_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_980__TRANSLATE_PATTERN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_994__TRANSLATE_PATTERN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_980__TRANSLATE_PATTERN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_994__TRANSLATE_PATTERN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_980__TRANSLATE_PATTERN.meltobj_class =
+ cdat->dsym_994__TRANSLATE_PATTERN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_980__TRANSLATE_PATTERN.obj_hash = 698900025;
- cdat->dsym_980__TRANSLATE_PATTERN.obj_len = 3;
+ cdat->dsym_994__TRANSLATE_PATTERN.obj_hash = 698900025;
+ cdat->dsym_994__TRANSLATE_PATTERN.obj_len = 3;
-/*inistring dstr_981__TRANSLATE_PATTER*/
- /*_.VALSTR___V1070*/ meltfptr[1069] =
- (void *) &cdat->dstr_981__TRANSLATE_PATTER;
- cdat->dstr_981__TRANSLATE_PATTER.discr =
+/*inistring dstr_995__TRANSLATE_PATTER*/
+ /*_.VALSTR___V1085*/ meltfptr[1084] =
+ (void *) &cdat->dstr_995__TRANSLATE_PATTER;
+ cdat->dstr_995__TRANSLATE_PATTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_981__TRANSLATE_PATTER.val,
+ /*small inistring */ strncpy (cdat->dstr_995__TRANSLATE_PATTER.val,
"TRANSLATE_PATTERN",
- sizeof (cdat->dstr_981__TRANSLATE_PATTER.
+ sizeof (cdat->dstr_995__TRANSLATE_PATTER.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ iniobj");
-/*iniobj dobj_982*/
-/*_.VALDATA___V1071*/ meltfptr[1070] = (void *) &cdat->dobj_982;
+/*iniobj dobj_996*/
+/*_.VALDATA___V1086*/ meltfptr[1085] = (void *) &cdat->dobj_996;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_982",
+ melt_assertmsg ("iniobj check.discr isobj dobj_996",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_982",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_996",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_982.meltobj_class =
+ cdat->dobj_996.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_982.obj_num = 0;
- cdat->dobj_982.obj_hash = 859409889;
- cdat->dobj_982.obj_len = 2;
+ cdat->dobj_996.obj_num = 0;
+ cdat->dobj_996.obj_hash = 223615127;
+ cdat->dobj_996.obj_len = 2;
-/*iniobj dsym_983__MDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1072*/ meltfptr[1071])
- /*_.VALDATA___V1072*/
- meltfptr[1071] = (void *) &cdat->dsym_983__MDATA;
+/*iniobj dsym_997__MDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1087*/ meltfptr[1086])
+ /*_.VALDATA___V1087*/
+ meltfptr[1086] = (void *) &cdat->dsym_997__MDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_983__MDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_997__MDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_983__MDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_997__MDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_983__MDATA.meltobj_class =
+ cdat->dsym_997__MDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_983__MDATA.obj_hash = 823479688;
- cdat->dsym_983__MDATA.obj_len = 3;
+ cdat->dsym_997__MDATA.obj_hash = 823479688;
+ cdat->dsym_997__MDATA.obj_len = 3;
-/*inistring dstr_984__MDATA*/
- /*_.VALSTR___V1073*/ meltfptr[1072] = (void *) &cdat->dstr_984__MDATA;
- cdat->dstr_984__MDATA.discr =
+/*inistring dstr_998__MDATA*/
+ /*_.VALSTR___V1088*/ meltfptr[1087] = (void *) &cdat->dstr_998__MDATA;
+ cdat->dstr_998__MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_984__MDATA.val, "MDATA",
- sizeof (cdat->dstr_984__MDATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_998__MDATA.val, "MDATA",
+ sizeof (cdat->dstr_998__MDATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_985*/
-/*_.VALDATA___V1074*/ meltfptr[1073] = (void *) &cdat->dobj_985;
+/*iniobj dobj_999*/
+/*_.VALDATA___V1089*/ meltfptr[1088] = (void *) &cdat->dobj_999;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_985",
+ melt_assertmsg ("iniobj check.discr isobj dobj_999",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_985",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_999",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_985.meltobj_class =
+ cdat->dobj_999.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_985.obj_num = 1;
- cdat->dobj_985.obj_hash = 487087159;
- cdat->dobj_985.obj_len = 2;
+ cdat->dobj_999.obj_num = 1;
+ cdat->dobj_999.obj_hash = 880780821;
+ cdat->dobj_999.obj_len = 2;
-/*iniobj dsym_986__MCASE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1075*/ meltfptr[1074])
- /*_.VALDATA___V1075*/
- meltfptr[1074] = (void *) &cdat->dsym_986__MCASE;
+/*iniobj dsym_1000__MCASE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1090*/ meltfptr[1089])
+ /*_.VALDATA___V1090*/
+ meltfptr[1089] = (void *) &cdat->dsym_1000__MCASE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_986__MCASE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1000__MCASE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_986__MCASE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1000__MCASE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_986__MCASE.meltobj_class =
+ cdat->dsym_1000__MCASE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_986__MCASE.obj_hash = 178696645;
- cdat->dsym_986__MCASE.obj_len = 3;
+ cdat->dsym_1000__MCASE.obj_hash = 178696645;
+ cdat->dsym_1000__MCASE.obj_len = 3;
-/*inistring dstr_987__MCASE*/
- /*_.VALSTR___V1076*/ meltfptr[1075] = (void *) &cdat->dstr_987__MCASE;
- cdat->dstr_987__MCASE.discr =
+/*inistring dstr_1001__MCASE*/
+ /*_.VALSTR___V1091*/ meltfptr[1090] = (void *) &cdat->dstr_1001__MCASE;
+ cdat->dstr_1001__MCASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_987__MCASE.val, "MCASE",
- sizeof (cdat->dstr_987__MCASE.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1001__MCASE.val, "MCASE",
+ sizeof (cdat->dstr_1001__MCASE.val) - 1);
/*^iniobj */
-/*iniobj dobj_988*/
-/*_.VALDATA___V1077*/ meltfptr[1076] = (void *) &cdat->dobj_988;
+/*iniobj dobj_1002*/
+/*_.VALDATA___V1092*/ meltfptr[1091] = (void *) &cdat->dobj_1002;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_988",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1002",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_988",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1002",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_988.meltobj_class =
+ cdat->dobj_1002.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_988.obj_num = 2;
- cdat->dobj_988.obj_hash = 764874092;
- cdat->dobj_988.obj_len = 2;
+ cdat->dobj_1002.obj_num = 2;
+ cdat->dobj_1002.obj_hash = 18869510;
+ cdat->dobj_1002.obj_len = 2;
-/*iniobj dsym_989__VARMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1078*/ meltfptr[1077])
- /*_.VALDATA___V1078*/
- meltfptr[1077] = (void *) &cdat->dsym_989__VARMAP;
+/*iniobj dsym_1003__VARMAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1093*/ meltfptr[1092])
+ /*_.VALDATA___V1093*/
+ meltfptr[1092] = (void *) &cdat->dsym_1003__VARMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_989__VARMAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1003__VARMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_989__VARMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1003__VARMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_989__VARMAP.meltobj_class =
+ cdat->dsym_1003__VARMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_989__VARMAP.obj_hash = 698215800;
- cdat->dsym_989__VARMAP.obj_len = 3;
+ cdat->dsym_1003__VARMAP.obj_hash = 698215800;
+ cdat->dsym_1003__VARMAP.obj_len = 3;
-/*inistring dstr_990__VARMAP*/
- /*_.VALSTR___V1079*/ meltfptr[1078] = (void *) &cdat->dstr_990__VARMAP;
- cdat->dstr_990__VARMAP.discr =
+/*inistring dstr_1004__VARMAP*/
+ /*_.VALSTR___V1094*/ meltfptr[1093] = (void *) &cdat->dstr_1004__VARMAP;
+ cdat->dstr_1004__VARMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_990__VARMAP.val, "VARMAP",
- sizeof (cdat->dstr_990__VARMAP.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1004__VARMAP.val, "VARMAP",
+ sizeof (cdat->dstr_1004__VARMAP.val) - 1);
/*^iniobj */
-/*iniobj dobj_991*/
-/*_.VALDATA___V1080*/ meltfptr[1079] = (void *) &cdat->dobj_991;
+/*iniobj dobj_1005*/
+/*_.VALDATA___V1095*/ meltfptr[1094] = (void *) &cdat->dobj_1005;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_991",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1005",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_991",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1005",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_991.meltobj_class =
+ cdat->dobj_1005.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_991.obj_num = 3;
- cdat->dobj_991.obj_hash = 903597293;
- cdat->dobj_991.obj_len = 2;
+ cdat->dobj_1005.obj_num = 3;
+ cdat->dobj_1005.obj_hash = 618502538;
+ cdat->dobj_1005.obj_len = 2;
-/*iniobj dsym_992__SLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1081*/ meltfptr[1080])
- /*_.VALDATA___V1081*/
- meltfptr[1080] = (void *) &cdat->dsym_992__SLOC;
+/*iniobj dsym_1006__SLOC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1096*/ meltfptr[1095])
+ /*_.VALDATA___V1096*/
+ meltfptr[1095] = (void *) &cdat->dsym_1006__SLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_992__SLOC",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1006__SLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_992__SLOC",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1006__SLOC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_992__SLOC.meltobj_class =
+ cdat->dsym_1006__SLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_992__SLOC.obj_hash = 214022047;
- cdat->dsym_992__SLOC.obj_len = 3;
+ cdat->dsym_1006__SLOC.obj_hash = 214022047;
+ cdat->dsym_1006__SLOC.obj_len = 3;
-/*inistring dstr_993__SLOC*/
- /*_.VALSTR___V1082*/ meltfptr[1081] = (void *) &cdat->dstr_993__SLOC;
- cdat->dstr_993__SLOC.discr =
+/*inistring dstr_1007__SLOC*/
+ /*_.VALSTR___V1097*/ meltfptr[1096] = (void *) &cdat->dstr_1007__SLOC;
+ cdat->dstr_1007__SLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_993__SLOC.val, "SLOC",
- sizeof (cdat->dstr_993__SLOC.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1007__SLOC.val, "SLOC",
+ sizeof (cdat->dstr_1007__SLOC.val) - 1);
/*^iniobj */
-/*iniobj dobj_994*/
-/*_.VALDATA___V1083*/ meltfptr[1082] = (void *) &cdat->dobj_994;
+/*iniobj dobj_1008*/
+/*_.VALDATA___V1098*/ meltfptr[1097] = (void *) &cdat->dobj_1008;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_994",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1008",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_994",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1008",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_994.meltobj_class =
+ cdat->dobj_1008.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_994.obj_num = 4;
- cdat->dobj_994.obj_hash = 49996609;
- cdat->dobj_994.obj_len = 2;
-
- /*inimult dtup_995__TRANSLATE_PATTERN */
- /*_.VALTUP___V1084*/ meltfptr[1083] =
- (void *) &cdat->dtup_995__TRANSLATE_PATTERN;
- cdat->dtup_995__TRANSLATE_PATTERN.discr =
+ cdat->dobj_1008.obj_num = 4;
+ cdat->dobj_1008.obj_hash = 687814595;
+ cdat->dobj_1008.obj_len = 2;
+
+ /*inimult dtup_1009__TRANSLATE_PATTERN */
+ /*_.VALTUP___V1099*/ meltfptr[1098] =
+ (void *) &cdat->dtup_1009__TRANSLATE_PATTERN;
+ cdat->dtup_1009__TRANSLATE_PATTERN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_995__TRANSLATE_PATTERN.nbval = 5;
+ cdat->dtup_1009__TRANSLATE_PATTERN.nbval = 5;
/*^iniobj */
-/*iniobj dobj_996__TRANSLATE_PATTERN*/
-/*_.VALDATA___V1085*/ meltfptr[1084] =
- (void *) &cdat->dobj_996__TRANSLATE_PATTERN;
+/*iniobj dobj_1010__TRANSLATE_PATTERN*/
+/*_.VALDATA___V1100*/ meltfptr[1099] =
+ (void *) &cdat->dobj_1010__TRANSLATE_PATTERN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_996__TRANSLATE_PATTERN",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1010__TRANSLATE_PATTERN",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_996__TRANSLATE_PATTERN",
- ((meltobject_ptr_t)
- ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
- meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_996__TRANSLATE_PATTERN.meltobj_class =
+ melt_assertmsg
+ ("iniobj check.discr objmagic dobj_1010__TRANSLATE_PATTERN",
+ ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dobj_1010__TRANSLATE_PATTERN.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_996__TRANSLATE_PATTERN.obj_hash = 690492762;
- cdat->dobj_996__TRANSLATE_PATTERN.obj_len = 4;
+ cdat->dobj_1010__TRANSLATE_PATTERN.obj_hash = 746667139;
+ cdat->dobj_1010__TRANSLATE_PATTERN.obj_len = 4;
-/*inistring dstr_997__TRANSLATE_PATTER*/
- /*_.VALSTR___V1086*/ meltfptr[1085] =
- (void *) &cdat->dstr_997__TRANSLATE_PATTER;
- cdat->dstr_997__TRANSLATE_PATTER.discr =
+/*inistring dstr_1011__TRANSLATE_PATTER*/
+ /*_.VALSTR___V1101*/ meltfptr[1100] =
+ (void *) &cdat->dstr_1011__TRANSLATE_PATTER;
+ cdat->dstr_1011__TRANSLATE_PATTER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_997__TRANSLATE_PATTER.val,
+ /*small inistring */ strncpy (cdat->dstr_1011__TRANSLATE_PATTER.val,
"TRANSLATE_PATTERN",
- sizeof (cdat->dstr_997__TRANSLATE_PATTER.
+ sizeof (cdat->dstr_1011__TRANSLATE_PATTER.
val) - 1);
- /*inirout drout_998__TRANSLPAT_ANYRECV */
- /*_.VALROUT___V1087*/ meltfptr[1086] =
- (void *) &cdat->drout_998__TRANSLPAT_ANYRECV;
- cdat->drout_998__TRANSLPAT_ANYRECV.discr =
+ /*inirout drout_1012__TRANSLPAT_ANYRECV */
+ /*_.VALROUT___V1102*/ meltfptr[1101] =
+ (void *) &cdat->drout_1012__TRANSLPAT_ANYRECV;
+ cdat->drout_1012__TRANSLPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_998__TRANSLPAT_ANYRECV.routdescr,
- "TRANSLPAT_ANYRECV @warmelt-normatch.melt:3284",
+ strncpy (cdat->drout_1012__TRANSLPAT_ANYRECV.routdescr,
+ "TRANSLPAT_ANYRECV @warmelt-normatch.melt:3377",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_998__TRANSLPAT_ANYRECV.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_998__TRANSLPAT_ANYRECV,
- meltrout_73_warmelt_normatch_TRANSLPAT_ANYRECV);
-
- /*iniclos dclo_999__TRANSLPAT_ANYRECV */
- /*_.VALCLO___V1088*/ meltfptr[1087] =
- (void *) &cdat->dclo_999__TRANSLPAT_ANYRECV;
- cdat->dclo_999__TRANSLPAT_ANYRECV.discr =
+ cdat->drout_1012__TRANSLPAT_ANYRECV.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1012__TRANSLPAT_ANYRECV,
+ meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV);
+
+ /*iniclos dclo_1013__TRANSLPAT_ANYRECV */
+ /*_.VALCLO___V1103*/ meltfptr[1102] =
+ (void *) &cdat->dclo_1013__TRANSLPAT_ANYRECV;
+ cdat->dclo_1013__TRANSLPAT_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_999__TRANSLPAT_ANYRECV.nbval = 0;
+ cdat->dclo_1013__TRANSLPAT_ANYRECV.nbval = 0;
- /*inirout drout_1000__TRANSLPAT_JOKERPAT */
- /*_.VALROUT___V1089*/ meltfptr[1088] =
- (void *) &cdat->drout_1000__TRANSLPAT_JOKERPAT;
- cdat->drout_1000__TRANSLPAT_JOKERPAT.discr =
+ /*inirout drout_1014__TRANSLPAT_JOKERPAT */
+ /*_.VALROUT___V1104*/ meltfptr[1103] =
+ (void *) &cdat->drout_1014__TRANSLPAT_JOKERPAT;
+ cdat->drout_1014__TRANSLPAT_JOKERPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1000__TRANSLPAT_JOKERPAT.routdescr,
- "TRANSLPAT_JOKERPAT @warmelt-normatch.melt:3294",
+ strncpy (cdat->drout_1014__TRANSLPAT_JOKERPAT.routdescr,
+ "TRANSLPAT_JOKERPAT @warmelt-normatch.melt:3387",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1000__TRANSLPAT_JOKERPAT.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1000__TRANSLPAT_JOKERPAT,
- meltrout_74_warmelt_normatch_TRANSLPAT_JOKERPAT);
-
- /*iniclos dclo_1001__TRANSLPAT_JOKERPAT */
- /*_.VALCLO___V1090*/ meltfptr[1089] =
- (void *) &cdat->dclo_1001__TRANSLPAT_JOKERPAT;
- cdat->dclo_1001__TRANSLPAT_JOKERPAT.discr =
+ cdat->drout_1014__TRANSLPAT_JOKERPAT.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1014__TRANSLPAT_JOKERPAT,
+ meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT);
+
+ /*iniclos dclo_1015__TRANSLPAT_JOKERPAT */
+ /*_.VALCLO___V1105*/ meltfptr[1104] =
+ (void *) &cdat->dclo_1015__TRANSLPAT_JOKERPAT;
+ cdat->dclo_1015__TRANSLPAT_JOKERPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1001__TRANSLPAT_JOKERPAT.nbval = 0;
+ cdat->dclo_1015__TRANSLPAT_JOKERPAT.nbval = 0;
- /*inirout drout_1002__TRANSLPAT_CONSTPAT */
- /*_.VALROUT___V1091*/ meltfptr[1090] =
- (void *) &cdat->drout_1002__TRANSLPAT_CONSTPAT;
- cdat->drout_1002__TRANSLPAT_CONSTPAT.discr =
+ /*inirout drout_1016__TRANSLPAT_CONSTPAT */
+ /*_.VALROUT___V1106*/ meltfptr[1105] =
+ (void *) &cdat->drout_1016__TRANSLPAT_CONSTPAT;
+ cdat->drout_1016__TRANSLPAT_CONSTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1002__TRANSLPAT_CONSTPAT.routdescr,
- "TRANSLPAT_CONSTPAT @warmelt-normatch.melt:3302",
+ strncpy (cdat->drout_1016__TRANSLPAT_CONSTPAT.routdescr,
+ "TRANSLPAT_CONSTPAT @warmelt-normatch.melt:3395",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1002__TRANSLPAT_CONSTPAT.nbval = 13;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1002__TRANSLPAT_CONSTPAT,
- meltrout_75_warmelt_normatch_TRANSLPAT_CONSTPAT);
-
- /*iniclos dclo_1003__TRANSLPAT_CONSTPAT */
- /*_.VALCLO___V1093*/ meltfptr[1092] =
- (void *) &cdat->dclo_1003__TRANSLPAT_CONSTPAT;
- cdat->dclo_1003__TRANSLPAT_CONSTPAT.discr =
+ cdat->drout_1016__TRANSLPAT_CONSTPAT.nbval = 13;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1016__TRANSLPAT_CONSTPAT,
+ meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT);
+
+ /*iniclos dclo_1017__TRANSLPAT_CONSTPAT */
+ /*_.VALCLO___V1108*/ meltfptr[1107] =
+ (void *) &cdat->dclo_1017__TRANSLPAT_CONSTPAT;
+ cdat->dclo_1017__TRANSLPAT_CONSTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1003__TRANSLPAT_CONSTPAT.nbval = 0;
+ cdat->dclo_1017__TRANSLPAT_CONSTPAT.nbval = 0;
-/*inistring dstr_1004__constant_pattern*/
- /*_.VALSTR___V1092*/ meltfptr[1091] =
- (void *) &cdat->dstr_1004__constant_pattern;
- cdat->dstr_1004__constant_pattern.discr =
+/*inistring dstr_1018__constant_pattern*/
+ /*_.VALSTR___V1107*/ meltfptr[1106] =
+ (void *) &cdat->dstr_1018__constant_pattern;
+ cdat->dstr_1018__constant_pattern.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1004__constant_pattern.val,
+ /*small inistring */ strncpy (cdat->dstr_1018__constant_pattern.val,
"constant_pattern",
- sizeof (cdat->dstr_1004__constant_pattern.
+ sizeof (cdat->dstr_1018__constant_pattern.
val) - 1);
- /*inirout drout_1005__TRANSLPAT_LISTPAT */
- /*_.VALROUT___V1094*/ meltfptr[1093] =
- (void *) &cdat->drout_1005__TRANSLPAT_LISTPAT;
- cdat->drout_1005__TRANSLPAT_LISTPAT.discr =
+ /*inirout drout_1019__TRANSLPAT_LISTPAT */
+ /*_.VALROUT___V1109*/ meltfptr[1108] =
+ (void *) &cdat->drout_1019__TRANSLPAT_LISTPAT;
+ cdat->drout_1019__TRANSLPAT_LISTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1005__TRANSLPAT_LISTPAT.routdescr,
- "TRANSLPAT_LISTPAT @warmelt-normatch.melt:3355",
+ strncpy (cdat->drout_1019__TRANSLPAT_LISTPAT.routdescr,
+ "TRANSLPAT_LISTPAT @warmelt-normatch.melt:3448",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1005__TRANSLPAT_LISTPAT.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1005__TRANSLPAT_LISTPAT,
- meltrout_76_warmelt_normatch_TRANSLPAT_LISTPAT);
-
- /*iniclos dclo_1006__TRANSLPAT_LISTPAT */
- /*_.VALCLO___V1095*/ meltfptr[1094] =
- (void *) &cdat->dclo_1006__TRANSLPAT_LISTPAT;
- cdat->dclo_1006__TRANSLPAT_LISTPAT.discr =
+ cdat->drout_1019__TRANSLPAT_LISTPAT.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1019__TRANSLPAT_LISTPAT,
+ meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT);
+
+ /*iniclos dclo_1020__TRANSLPAT_LISTPAT */
+ /*_.VALCLO___V1110*/ meltfptr[1109] =
+ (void *) &cdat->dclo_1020__TRANSLPAT_LISTPAT;
+ cdat->dclo_1020__TRANSLPAT_LISTPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1006__TRANSLPAT_LISTPAT.nbval = 0;
+ cdat->dclo_1020__TRANSLPAT_LISTPAT.nbval = 0;
-/*iniobj dsym_1007__CLASS_SOURCE_PATTERN_LIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1096*/ meltfptr[1095])
- /*_.VALDATA___V1096*/
- meltfptr[1095] = (void *) &cdat->dsym_1007__CLASS_SOURCE_PATTERN_LIST;
+/*iniobj dsym_1021__CLASS_SOURCE_PATTERN_LIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1111*/ meltfptr[1110])
+ /*_.VALDATA___V1111*/
+ meltfptr[1110] = (void *) &cdat->dsym_1021__CLASS_SOURCE_PATTERN_LIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1007__CLASS_SOURCE_PATTERN_LIST",
+ ("iniobj check.discr isobj dsym_1021__CLASS_SOURCE_PATTERN_LIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1007__CLASS_SOURCE_PATTERN_LIST",
+ ("iniobj check.discr objmagic dsym_1021__CLASS_SOURCE_PATTERN_LIST",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1007__CLASS_SOURCE_PATTERN_LIST.meltobj_class =
+ cdat->dsym_1021__CLASS_SOURCE_PATTERN_LIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1007__CLASS_SOURCE_PATTERN_LIST.obj_hash = 725656977;
- cdat->dsym_1007__CLASS_SOURCE_PATTERN_LIST.obj_len = 3;
+ cdat->dsym_1021__CLASS_SOURCE_PATTERN_LIST.obj_hash = 725656977;
+ cdat->dsym_1021__CLASS_SOURCE_PATTERN_LIST.obj_len = 3;
-/*inistring dstr_1008__CLASS_SOURCE_PAT*/
- /*_.VALSTR___V1097*/ meltfptr[1096] =
- (void *) &cdat->dstr_1008__CLASS_SOURCE_PAT;
- cdat->dstr_1008__CLASS_SOURCE_PAT.discr =
+/*inistring dstr_1022__CLASS_SOURCE_PAT*/
+ /*_.VALSTR___V1112*/ meltfptr[1111] =
+ (void *) &cdat->dstr_1022__CLASS_SOURCE_PAT;
+ cdat->dstr_1022__CLASS_SOURCE_PAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1008__CLASS_SOURCE_PAT.val,
+ /*small inistring */ strncpy (cdat->dstr_1022__CLASS_SOURCE_PAT.val,
"CLASS_SOURCE_PATTERN_LIST",
- sizeof (cdat->dstr_1008__CLASS_SOURCE_PAT.
+ sizeof (cdat->dstr_1022__CLASS_SOURCE_PAT.
val) - 1);
- /*inirout drout_1009__TRANSLPAT_TUPLEPAT */
- /*_.VALROUT___V1098*/ meltfptr[1097] =
- (void *) &cdat->drout_1009__TRANSLPAT_TUPLEPAT;
- cdat->drout_1009__TRANSLPAT_TUPLEPAT.discr =
+ /*inirout drout_1023__TRANSLPAT_TUPLEPAT */
+ /*_.VALROUT___V1113*/ meltfptr[1112] =
+ (void *) &cdat->drout_1023__TRANSLPAT_TUPLEPAT;
+ cdat->drout_1023__TRANSLPAT_TUPLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1009__TRANSLPAT_TUPLEPAT.routdescr,
- "TRANSLPAT_TUPLEPAT @warmelt-normatch.melt:3366",
+ strncpy (cdat->drout_1023__TRANSLPAT_TUPLEPAT.routdescr,
+ "TRANSLPAT_TUPLEPAT @warmelt-normatch.melt:3459",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1009__TRANSLPAT_TUPLEPAT.nbval = 28;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1009__TRANSLPAT_TUPLEPAT,
- meltrout_77_warmelt_normatch_TRANSLPAT_TUPLEPAT);
-
- /*iniclos dclo_1010__TRANSLPAT_TUPLEPAT */
- /*_.VALCLO___V1106*/ meltfptr[1105] =
- (void *) &cdat->dclo_1010__TRANSLPAT_TUPLEPAT;
- cdat->dclo_1010__TRANSLPAT_TUPLEPAT.discr =
+ cdat->drout_1023__TRANSLPAT_TUPLEPAT.nbval = 28;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1023__TRANSLPAT_TUPLEPAT,
+ meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT);
+
+ /*iniclos dclo_1024__TRANSLPAT_TUPLEPAT */
+ /*_.VALCLO___V1121*/ meltfptr[1120] =
+ (void *) &cdat->dclo_1024__TRANSLPAT_TUPLEPAT;
+ cdat->dclo_1024__TRANSLPAT_TUPLEPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1010__TRANSLPAT_TUPLEPAT.nbval = 0;
+ cdat->dclo_1024__TRANSLPAT_TUPLEPAT.nbval = 0;
- /*inirout drout_1011__LAMBDA_ */
- /*_.VALROUT___V1099*/ meltfptr[1098] = (void *) &cdat->drout_1011__LAMBDA_;
- cdat->drout_1011__LAMBDA_.discr =
+ /*inirout drout_1025__LAMBDA_ */
+ /*_.VALROUT___V1114*/ meltfptr[1113] = (void *) &cdat->drout_1025__LAMBDA_;
+ cdat->drout_1025__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1011__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:3395", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1011__LAMBDA_.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1011__LAMBDA_,
- meltrout_78_warmelt_normatch_LAMBDA___20__);
-
- /*iniboxint dint_1012__ */
- /*_.VALBXINT___V1100*/ meltfptr[1099] = (void *) &cdat->dint_1012__;
- cdat->dint_1012__.discr =
+ strncpy (cdat->drout_1025__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:3488", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1025__LAMBDA_.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1025__LAMBDA_,
+ meltrout_85_warmelt_normatch_LAMBDA___20__);
+
+ /*iniboxint dint_1026__ */
+ /*_.VALBXINT___V1115*/ meltfptr[1114] = (void *) &cdat->dint_1026__;
+ cdat->dint_1026__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1012__.val = 0;
+ cdat->dint_1026__.val = 0;
- /*iniboxint dint_1013__ */
- /*_.VALBXINT___V1101*/ meltfptr[1100] = (void *) &cdat->dint_1013__;
- cdat->dint_1013__.discr =
+ /*iniboxint dint_1027__ */
+ /*_.VALBXINT___V1116*/ meltfptr[1115] = (void *) &cdat->dint_1027__;
+ cdat->dint_1027__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1013__.val = 1;
+ cdat->dint_1027__.val = 1;
- /*iniboxint dint_1014__ */
- /*_.VALBXINT___V1102*/ meltfptr[1101] = (void *) &cdat->dint_1014__;
- cdat->dint_1014__.discr =
+ /*iniboxint dint_1028__ */
+ /*_.VALBXINT___V1117*/ meltfptr[1116] = (void *) &cdat->dint_1028__;
+ cdat->dint_1028__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1014__.val = -1;
+ cdat->dint_1028__.val = -1;
-/*iniobj dsym_1015__PATUPLECOMP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1103*/ meltfptr[1102])
- /*_.VALDATA___V1103*/
- meltfptr[1102] = (void *) &cdat->dsym_1015__PATUPLECOMP;
+/*iniobj dsym_1029__PATUPLECOMP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1118*/ meltfptr[1117])
+ /*_.VALDATA___V1118*/
+ meltfptr[1117] = (void *) &cdat->dsym_1029__PATUPLECOMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1015__PATUPLECOMP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1029__PATUPLECOMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1015__PATUPLECOMP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1029__PATUPLECOMP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1015__PATUPLECOMP.meltobj_class =
+ cdat->dsym_1029__PATUPLECOMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1015__PATUPLECOMP.obj_hash = 804526572;
- cdat->dsym_1015__PATUPLECOMP.obj_len = 3;
+ cdat->dsym_1029__PATUPLECOMP.obj_hash = 804526572;
+ cdat->dsym_1029__PATUPLECOMP.obj_len = 3;
-/*inistring dstr_1016__PATUPLECOMP*/
- /*_.VALSTR___V1104*/ meltfptr[1103] =
- (void *) &cdat->dstr_1016__PATUPLECOMP;
- cdat->dstr_1016__PATUPLECOMP.discr =
+/*inistring dstr_1030__PATUPLECOMP*/
+ /*_.VALSTR___V1119*/ meltfptr[1118] =
+ (void *) &cdat->dstr_1030__PATUPLECOMP;
+ cdat->dstr_1030__PATUPLECOMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1016__PATUPLECOMP.val,
+ /*small inistring */ strncpy (cdat->dstr_1030__PATUPLECOMP.val,
"PATUPLECOMP",
- sizeof (cdat->dstr_1016__PATUPLECOMP.val) -
+ sizeof (cdat->dstr_1030__PATUPLECOMP.val) -
1);
-/*inistring dstr_1017__tuple*/
- /*_.VALSTR___V1105*/ meltfptr[1104] = (void *) &cdat->dstr_1017__tuple;
- cdat->dstr_1017__tuple.discr =
+/*inistring dstr_1031__tuple*/
+ /*_.VALSTR___V1120*/ meltfptr[1119] = (void *) &cdat->dstr_1031__tuple;
+ cdat->dstr_1031__tuple.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1017__tuple.val, "tuple",
- sizeof (cdat->dstr_1017__tuple.val) - 1);
- /*inirout drout_1018__TRANSLPAT_INSPAT */
- /*_.VALROUT___V1107*/ meltfptr[1106] =
- (void *) &cdat->drout_1018__TRANSLPAT_INSPAT;
- cdat->drout_1018__TRANSLPAT_INSPAT.discr =
+ /*small inistring */ strncpy (cdat->dstr_1031__tuple.val, "tuple",
+ sizeof (cdat->dstr_1031__tuple.val) - 1);
+ /*inirout drout_1032__TRANSLPAT_INSPAT */
+ /*_.VALROUT___V1122*/ meltfptr[1121] =
+ (void *) &cdat->drout_1032__TRANSLPAT_INSPAT;
+ cdat->drout_1032__TRANSLPAT_INSPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1018__TRANSLPAT_INSPAT.routdescr,
- "TRANSLPAT_INSPAT @warmelt-normatch.melt:3532",
+ strncpy (cdat->drout_1032__TRANSLPAT_INSPAT.routdescr,
+ "TRANSLPAT_INSPAT @warmelt-normatch.melt:3627",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1018__TRANSLPAT_INSPAT.nbval = 24;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1018__TRANSLPAT_INSPAT,
- meltrout_79_warmelt_normatch_TRANSLPAT_INSPAT);
-
- /*iniclos dclo_1019__TRANSLPAT_INSPAT */
- /*_.VALCLO___V1108*/ meltfptr[1107] =
- (void *) &cdat->dclo_1019__TRANSLPAT_INSPAT;
- cdat->dclo_1019__TRANSLPAT_INSPAT.discr =
+ cdat->drout_1032__TRANSLPAT_INSPAT.nbval = 24;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1032__TRANSLPAT_INSPAT,
+ meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT);
+
+ /*iniclos dclo_1033__TRANSLPAT_INSPAT */
+ /*_.VALCLO___V1123*/ meltfptr[1122] =
+ (void *) &cdat->dclo_1033__TRANSLPAT_INSPAT;
+ cdat->dclo_1033__TRANSLPAT_INSPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1019__TRANSLPAT_INSPAT.nbval = 0;
+ cdat->dclo_1033__TRANSLPAT_INSPAT.nbval = 0;
- /*inirout drout_1020__TRANSLPAT_VARPAT */
- /*_.VALROUT___V1109*/ meltfptr[1108] =
- (void *) &cdat->drout_1020__TRANSLPAT_VARPAT;
- cdat->drout_1020__TRANSLPAT_VARPAT.discr =
+ /*inirout drout_1034__TRANSLPAT_VARPAT */
+ /*_.VALROUT___V1124*/ meltfptr[1123] =
+ (void *) &cdat->drout_1034__TRANSLPAT_VARPAT;
+ cdat->drout_1034__TRANSLPAT_VARPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1020__TRANSLPAT_VARPAT.routdescr,
- "TRANSLPAT_VARPAT @warmelt-normatch.melt:3689",
+ strncpy (cdat->drout_1034__TRANSLPAT_VARPAT.routdescr,
+ "TRANSLPAT_VARPAT @warmelt-normatch.melt:3785",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1020__TRANSLPAT_VARPAT.nbval = 13;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1020__TRANSLPAT_VARPAT,
- meltrout_80_warmelt_normatch_TRANSLPAT_VARPAT);
-
- /*iniclos dclo_1021__TRANSLPAT_VARPAT */
- /*_.VALCLO___V1110*/ meltfptr[1109] =
- (void *) &cdat->dclo_1021__TRANSLPAT_VARPAT;
- cdat->dclo_1021__TRANSLPAT_VARPAT.discr =
+ cdat->drout_1034__TRANSLPAT_VARPAT.nbval = 13;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1034__TRANSLPAT_VARPAT,
+ meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT);
+
+ /*iniclos dclo_1035__TRANSLPAT_VARPAT */
+ /*_.VALCLO___V1125*/ meltfptr[1124] =
+ (void *) &cdat->dclo_1035__TRANSLPAT_VARPAT;
+ cdat->dclo_1035__TRANSLPAT_VARPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1021__TRANSLPAT_VARPAT.nbval = 0;
+ cdat->dclo_1035__TRANSLPAT_VARPAT.nbval = 0;
- /*inirout drout_1022__TRANSLPAT_ANDPAT */
- /*_.VALROUT___V1111*/ meltfptr[1110] =
- (void *) &cdat->drout_1022__TRANSLPAT_ANDPAT;
- cdat->drout_1022__TRANSLPAT_ANDPAT.discr =
+ /*inirout drout_1036__TRANSLPAT_ANDPAT */
+ /*_.VALROUT___V1126*/ meltfptr[1125] =
+ (void *) &cdat->drout_1036__TRANSLPAT_ANDPAT;
+ cdat->drout_1036__TRANSLPAT_ANDPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1022__TRANSLPAT_ANDPAT.routdescr,
- "TRANSLPAT_ANDPAT @warmelt-normatch.melt:3781",
+ strncpy (cdat->drout_1036__TRANSLPAT_ANDPAT.routdescr,
+ "TRANSLPAT_ANDPAT @warmelt-normatch.melt:3877",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1022__TRANSLPAT_ANDPAT.nbval = 15;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1022__TRANSLPAT_ANDPAT,
- meltrout_81_warmelt_normatch_TRANSLPAT_ANDPAT);
-
- /*iniclos dclo_1023__TRANSLPAT_ANDPAT */
- /*_.VALCLO___V1113*/ meltfptr[1112] =
- (void *) &cdat->dclo_1023__TRANSLPAT_ANDPAT;
- cdat->dclo_1023__TRANSLPAT_ANDPAT.discr =
+ cdat->drout_1036__TRANSLPAT_ANDPAT.nbval = 15;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1036__TRANSLPAT_ANDPAT,
+ meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT);
+
+ /*iniclos dclo_1037__TRANSLPAT_ANDPAT */
+ /*_.VALCLO___V1128*/ meltfptr[1127] =
+ (void *) &cdat->dclo_1037__TRANSLPAT_ANDPAT;
+ cdat->dclo_1037__TRANSLPAT_ANDPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1023__TRANSLPAT_ANDPAT.nbval = 0;
+ cdat->dclo_1037__TRANSLPAT_ANDPAT.nbval = 0;
-/*inistring dstr_1024__and*/
- /*_.VALSTR___V1112*/ meltfptr[1111] = (void *) &cdat->dstr_1024__and;
- cdat->dstr_1024__and.discr =
+/*inistring dstr_1038__and*/
+ /*_.VALSTR___V1127*/ meltfptr[1126] = (void *) &cdat->dstr_1038__and;
+ cdat->dstr_1038__and.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1024__and.val, "and",
- sizeof (cdat->dstr_1024__and.val) - 1);
- /*inirout drout_1025__TRANSLPAT_ORPAT */
- /*_.VALROUT___V1114*/ meltfptr[1113] =
- (void *) &cdat->drout_1025__TRANSLPAT_ORPAT;
- cdat->drout_1025__TRANSLPAT_ORPAT.discr =
+ /*small inistring */ strncpy (cdat->dstr_1038__and.val, "and",
+ sizeof (cdat->dstr_1038__and.val) - 1);
+ /*inirout drout_1039__TRANSLPAT_ORPAT */
+ /*_.VALROUT___V1129*/ meltfptr[1128] =
+ (void *) &cdat->drout_1039__TRANSLPAT_ORPAT;
+ cdat->drout_1039__TRANSLPAT_ORPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1025__TRANSLPAT_ORPAT.routdescr,
- "TRANSLPAT_ORPAT @warmelt-normatch.melt:3865",
+ strncpy (cdat->drout_1039__TRANSLPAT_ORPAT.routdescr,
+ "TRANSLPAT_ORPAT @warmelt-normatch.melt:3961",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1025__TRANSLPAT_ORPAT.nbval = 26;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1025__TRANSLPAT_ORPAT,
- meltrout_82_warmelt_normatch_TRANSLPAT_ORPAT);
-
- /*iniclos dclo_1026__TRANSLPAT_ORPAT */
- /*_.VALCLO___V1118*/ meltfptr[1117] =
- (void *) &cdat->dclo_1026__TRANSLPAT_ORPAT;
- cdat->dclo_1026__TRANSLPAT_ORPAT.discr =
+ cdat->drout_1039__TRANSLPAT_ORPAT.nbval = 26;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1039__TRANSLPAT_ORPAT,
+ meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT);
+
+ /*iniclos dclo_1040__TRANSLPAT_ORPAT */
+ /*_.VALCLO___V1133*/ meltfptr[1132] =
+ (void *) &cdat->dclo_1040__TRANSLPAT_ORPAT;
+ cdat->dclo_1040__TRANSLPAT_ORPAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1026__TRANSLPAT_ORPAT.nbval = 0;
+ cdat->dclo_1040__TRANSLPAT_ORPAT.nbval = 0;
-/*inistring dstr_1027__or*/
- /*_.VALSTR___V1115*/ meltfptr[1114] = (void *) &cdat->dstr_1027__or;
- cdat->dstr_1027__or.discr =
+/*inistring dstr_1041__or*/
+ /*_.VALSTR___V1130*/ meltfptr[1129] = (void *) &cdat->dstr_1041__or;
+ cdat->dstr_1041__or.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1027__or.val, "or",
- sizeof (cdat->dstr_1027__or.val) - 1);
- /*inirout drout_1028__LAMBDA_ */
- /*_.VALROUT___V1116*/ meltfptr[1115] = (void *) &cdat->drout_1028__LAMBDA_;
- cdat->drout_1028__LAMBDA_.discr =
+ /*small inistring */ strncpy (cdat->dstr_1041__or.val, "or",
+ sizeof (cdat->dstr_1041__or.val) - 1);
+ /*inirout drout_1042__LAMBDA_ */
+ /*_.VALROUT___V1131*/ meltfptr[1130] = (void *) &cdat->drout_1042__LAMBDA_;
+ cdat->drout_1042__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1028__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:3904", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1028__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1028__LAMBDA_,
- meltrout_83_warmelt_normatch_LAMBDA___21__);
-
- /*inirout drout_1029__LAMBDA_ */
- /*_.VALROUT___V1117*/ meltfptr[1116] = (void *) &cdat->drout_1029__LAMBDA_;
- cdat->drout_1029__LAMBDA_.discr =
+ strncpy (cdat->drout_1042__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:4000", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1042__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1042__LAMBDA_,
+ meltrout_90_warmelt_normatch_LAMBDA___21__);
+
+ /*inirout drout_1043__LAMBDA_ */
+ /*_.VALROUT___V1132*/ meltfptr[1131] = (void *) &cdat->drout_1043__LAMBDA_;
+ cdat->drout_1043__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1029__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:3942", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1029__LAMBDA_.nbval = 0;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1029__LAMBDA_,
- meltrout_84_warmelt_normatch_LAMBDA___22__);
-
- /*inirout drout_1030__TRANSLPAT_PATMAT */
- /*_.VALROUT___V1119*/ meltfptr[1118] =
- (void *) &cdat->drout_1030__TRANSLPAT_PATMAT;
- cdat->drout_1030__TRANSLPAT_PATMAT.discr =
+ strncpy (cdat->drout_1043__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:4038", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1043__LAMBDA_.nbval = 0;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1043__LAMBDA_,
+ meltrout_91_warmelt_normatch_LAMBDA___22__);
+
+ /*inirout drout_1044__TRANSLPAT_PATMAT */
+ /*_.VALROUT___V1134*/ meltfptr[1133] =
+ (void *) &cdat->drout_1044__TRANSLPAT_PATMAT;
+ cdat->drout_1044__TRANSLPAT_PATMAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1030__TRANSLPAT_PATMAT.routdescr,
- "TRANSLPAT_PATMAT @warmelt-normatch.melt:3989",
+ strncpy (cdat->drout_1044__TRANSLPAT_PATMAT.routdescr,
+ "TRANSLPAT_PATMAT @warmelt-normatch.melt:4085",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1030__TRANSLPAT_PATMAT.nbval = 29;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1030__TRANSLPAT_PATMAT,
- meltrout_85_warmelt_normatch_TRANSLPAT_PATMAT);
-
- /*iniclos dclo_1031__TRANSLPAT_PATMAT */
- /*_.VALCLO___V1120*/ meltfptr[1119] =
- (void *) &cdat->dclo_1031__TRANSLPAT_PATMAT;
- cdat->dclo_1031__TRANSLPAT_PATMAT.discr =
+ cdat->drout_1044__TRANSLPAT_PATMAT.nbval = 29;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1044__TRANSLPAT_PATMAT,
+ meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT);
+
+ /*iniclos dclo_1045__TRANSLPAT_PATMAT */
+ /*_.VALCLO___V1135*/ meltfptr[1134] =
+ (void *) &cdat->dclo_1045__TRANSLPAT_PATMAT;
+ cdat->dclo_1045__TRANSLPAT_PATMAT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1031__TRANSLPAT_PATMAT.nbval = 0;
+ cdat->dclo_1045__TRANSLPAT_PATMAT.nbval = 0;
-/*iniobj dsym_1032__MATCHGRAPHIC_ALTSTEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1121*/ meltfptr[1120])
- /*_.VALDATA___V1121*/
- meltfptr[1120] = (void *) &cdat->dsym_1032__MATCHGRAPHIC_ALTSTEP;
+/*iniobj dsym_1046__MATCHGRAPHIC_ALTSTEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1136*/ meltfptr[1135])
+ /*_.VALDATA___V1136*/
+ meltfptr[1135] = (void *) &cdat->dsym_1046__MATCHGRAPHIC_ALTSTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1032__MATCHGRAPHIC_ALTSTEP",
+ ("iniobj check.discr isobj dsym_1046__MATCHGRAPHIC_ALTSTEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1032__MATCHGRAPHIC_ALTSTEP",
+ ("iniobj check.discr objmagic dsym_1046__MATCHGRAPHIC_ALTSTEP",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1032__MATCHGRAPHIC_ALTSTEP.meltobj_class =
+ cdat->dsym_1046__MATCHGRAPHIC_ALTSTEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1032__MATCHGRAPHIC_ALTSTEP.obj_hash = 562594089;
- cdat->dsym_1032__MATCHGRAPHIC_ALTSTEP.obj_len = 3;
+ cdat->dsym_1046__MATCHGRAPHIC_ALTSTEP.obj_hash = 562594089;
+ cdat->dsym_1046__MATCHGRAPHIC_ALTSTEP.obj_len = 3;
-/*inistring dstr_1033__MATCHGRAPHIC_ALT*/
- /*_.VALSTR___V1122*/ meltfptr[1121] =
- (void *) &cdat->dstr_1033__MATCHGRAPHIC_ALT;
- cdat->dstr_1033__MATCHGRAPHIC_ALT.discr =
+/*inistring dstr_1047__MATCHGRAPHIC_ALT*/
+ /*_.VALSTR___V1137*/ meltfptr[1136] =
+ (void *) &cdat->dstr_1047__MATCHGRAPHIC_ALT;
+ cdat->dstr_1047__MATCHGRAPHIC_ALT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1033__MATCHGRAPHIC_ALT.val,
+ /*small inistring */ strncpy (cdat->dstr_1047__MATCHGRAPHIC_ALT.val,
"MATCHGRAPHIC_ALTSTEP",
- sizeof (cdat->dstr_1033__MATCHGRAPHIC_ALT.
+ sizeof (cdat->dstr_1047__MATCHGRAPHIC_ALT.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4211:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:4307:/ iniobj");
-/*iniobj dobj_1034__MATCHGRAPHIC_ALTSTEP*/
-/*_.VALDATA___V1123*/ meltfptr[1122] =
- (void *) &cdat->dobj_1034__MATCHGRAPHIC_ALTSTEP;
+/*iniobj dobj_1048__MATCHGRAPHIC_ALTSTEP*/
+/*_.VALDATA___V1138*/ meltfptr[1137] =
+ (void *) &cdat->dobj_1048__MATCHGRAPHIC_ALTSTEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1034__MATCHGRAPHIC_ALTSTEP",
+ ("iniobj check.discr isobj dobj_1048__MATCHGRAPHIC_ALTSTEP",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1034__MATCHGRAPHIC_ALTSTEP",
+ ("iniobj check.discr objmagic dobj_1048__MATCHGRAPHIC_ALTSTEP",
((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1034__MATCHGRAPHIC_ALTSTEP.meltobj_class =
+ cdat->dobj_1048__MATCHGRAPHIC_ALTSTEP.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_1034__MATCHGRAPHIC_ALTSTEP.obj_hash = 286114006;
- cdat->dobj_1034__MATCHGRAPHIC_ALTSTEP.obj_len = 4;
+ cdat->dobj_1048__MATCHGRAPHIC_ALTSTEP.obj_hash = 97166295;
+ cdat->dobj_1048__MATCHGRAPHIC_ALTSTEP.obj_len = 4;
-/*inistring dstr_1035__MATCHGRAPHIC_ALT*/
- /*_.VALSTR___V1124*/ meltfptr[1123] =
- (void *) &cdat->dstr_1035__MATCHGRAPHIC_ALT;
- cdat->dstr_1035__MATCHGRAPHIC_ALT.discr =
+/*inistring dstr_1049__MATCHGRAPHIC_ALT*/
+ /*_.VALSTR___V1139*/ meltfptr[1138] =
+ (void *) &cdat->dstr_1049__MATCHGRAPHIC_ALT;
+ cdat->dstr_1049__MATCHGRAPHIC_ALT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1035__MATCHGRAPHIC_ALT.val,
+ /*small inistring */ strncpy (cdat->dstr_1049__MATCHGRAPHIC_ALT.val,
"MATCHGRAPHIC_ALTSTEP",
- sizeof (cdat->dstr_1035__MATCHGRAPHIC_ALT.
+ sizeof (cdat->dstr_1049__MATCHGRAPHIC_ALT.
val) - 1);
- /*inirout drout_1036__MGALTSTEP_STEPTESTVAR */
- /*_.VALROUT___V1125*/ meltfptr[1124] =
- (void *) &cdat->drout_1036__MGALTSTEP_STEPTESTVAR;
- cdat->drout_1036__MGALTSTEP_STEPTESTVAR.discr =
+ /*inirout drout_1050__MGALTSTEP_ANY */
+ /*_.VALROUT___V1140*/ meltfptr[1139] =
+ (void *) &cdat->drout_1050__MGALTSTEP_ANY;
+ cdat->drout_1050__MGALTSTEP_ANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1036__MGALTSTEP_STEPTESTVAR.routdescr,
- "MGALTSTEP_STEPTESTVAR @warmelt-normatch.melt:4218",
+ strncpy (cdat->drout_1050__MGALTSTEP_ANY.routdescr,
+ "MGALTSTEP_ANY @warmelt-normatch.melt:4311",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1036__MGALTSTEP_STEPTESTVAR.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1036__MGALTSTEP_STEPTESTVAR,
- meltrout_86_warmelt_normatch_MGALTSTEP_STEPTESTVAR);
-
- /*iniclos dclo_1037__MGALTSTEP_STEPTESTVAR */
- /*_.VALCLO___V1126*/ meltfptr[1125] =
- (void *) &cdat->dclo_1037__MGALTSTEP_STEPTESTVAR;
- cdat->dclo_1037__MGALTSTEP_STEPTESTVAR.discr =
+ cdat->drout_1050__MGALTSTEP_ANY.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1050__MGALTSTEP_ANY,
+ meltrout_93_warmelt_normatch_MGALTSTEP_ANY);
+
+ /*iniclos dclo_1051__MGALTSTEP_ANY */
+ /*_.VALCLO___V1141*/ meltfptr[1140] =
+ (void *) &cdat->dclo_1051__MGALTSTEP_ANY;
+ cdat->dclo_1051__MGALTSTEP_ANY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1037__MGALTSTEP_STEPTESTVAR.nbval = 0;
+ cdat->dclo_1051__MGALTSTEP_ANY.nbval = 0;
- /*inirout drout_1038__MGALTSTEP_STEPTESTINST */
- /*_.VALROUT___V1127*/ meltfptr[1126] =
- (void *) &cdat->drout_1038__MGALTSTEP_STEPTESTINST;
- cdat->drout_1038__MGALTSTEP_STEPTESTINST.discr =
+ /*inirout drout_1052__MGALTSTEP_STEPTESTVAR */
+ /*_.VALROUT___V1142*/ meltfptr[1141] =
+ (void *) &cdat->drout_1052__MGALTSTEP_STEPTESTVAR;
+ cdat->drout_1052__MGALTSTEP_STEPTESTVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1038__MGALTSTEP_STEPTESTINST.routdescr,
- "MGALTSTEP_STEPTESTINST @warmelt-normatch.melt:4284",
+ strncpy (cdat->drout_1052__MGALTSTEP_STEPTESTVAR.routdescr,
+ "MGALTSTEP_STEPTESTVAR @warmelt-normatch.melt:4322",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1038__MGALTSTEP_STEPTESTINST.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1038__MGALTSTEP_STEPTESTINST,
- meltrout_87_warmelt_normatch_MGALTSTEP_STEPTESTINST);
+ cdat->drout_1052__MGALTSTEP_STEPTESTVAR.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1052__MGALTSTEP_STEPTESTVAR,
+ meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR);
+
+ /*iniclos dclo_1053__MGALTSTEP_STEPTESTVAR */
+ /*_.VALCLO___V1143*/ meltfptr[1142] =
+ (void *) &cdat->dclo_1053__MGALTSTEP_STEPTESTVAR;
+ cdat->dclo_1053__MGALTSTEP_STEPTESTVAR.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
+ cdat->dclo_1053__MGALTSTEP_STEPTESTVAR.nbval = 0;
- /*iniclos dclo_1039__MGALTSTEP_STEPTESTINST */
- /*_.VALCLO___V1128*/ meltfptr[1127] =
- (void *) &cdat->dclo_1039__MGALTSTEP_STEPTESTINST;
- cdat->dclo_1039__MGALTSTEP_STEPTESTINST.discr =
+ /*inirout drout_1054__MGALTSTEP_STEPTESTINST */
+ /*_.VALROUT___V1144*/ meltfptr[1143] =
+ (void *) &cdat->drout_1054__MGALTSTEP_STEPTESTINST;
+ cdat->drout_1054__MGALTSTEP_STEPTESTINST.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
+ strncpy (cdat->drout_1054__MGALTSTEP_STEPTESTINST.routdescr,
+ "MGALTSTEP_STEPTESTINST @warmelt-normatch.melt:4388",
+ MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1054__MGALTSTEP_STEPTESTINST.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1054__MGALTSTEP_STEPTESTINST,
+ meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST);
+
+ /*iniclos dclo_1055__MGALTSTEP_STEPTESTINST */
+ /*_.VALCLO___V1145*/ meltfptr[1144] =
+ (void *) &cdat->dclo_1055__MGALTSTEP_STEPTESTINST;
+ cdat->dclo_1055__MGALTSTEP_STEPTESTINST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1039__MGALTSTEP_STEPTESTINST.nbval = 0;
+ cdat->dclo_1055__MGALTSTEP_STEPTESTINST.nbval = 0;
-/*iniobj dsym_1040__ADD2OUT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1129*/ meltfptr[1128])
- /*_.VALDATA___V1129*/
- meltfptr[1128] = (void *) &cdat->dsym_1040__ADD2OUT;
+/*iniobj dsym_1056__ADD2OUT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1146*/ meltfptr[1145])
+ /*_.VALDATA___V1146*/
+ meltfptr[1145] = (void *) &cdat->dsym_1056__ADD2OUT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1040__ADD2OUT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1056__ADD2OUT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1040__ADD2OUT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1056__ADD2OUT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1040__ADD2OUT.meltobj_class =
+ cdat->dsym_1056__ADD2OUT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1040__ADD2OUT.obj_hash = 901325062;
- cdat->dsym_1040__ADD2OUT.obj_len = 3;
+ cdat->dsym_1056__ADD2OUT.obj_hash = 901325062;
+ cdat->dsym_1056__ADD2OUT.obj_len = 3;
-/*inistring dstr_1041__ADD2OUT*/
- /*_.VALSTR___V1130*/ meltfptr[1129] = (void *) &cdat->dstr_1041__ADD2OUT;
- cdat->dstr_1041__ADD2OUT.discr =
+/*inistring dstr_1057__ADD2OUT*/
+ /*_.VALSTR___V1147*/ meltfptr[1146] = (void *) &cdat->dstr_1057__ADD2OUT;
+ cdat->dstr_1057__ADD2OUT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1041__ADD2OUT.val, "ADD2OUT",
- sizeof (cdat->dstr_1041__ADD2OUT.val) - 1);
- /*inirout drout_1042__MGALTSTEP_STEPTESTMULT */
- /*_.VALROUT___V1131*/ meltfptr[1130] =
- (void *) &cdat->drout_1042__MGALTSTEP_STEPTESTMULT;
- cdat->drout_1042__MGALTSTEP_STEPTESTMULT.discr =
+ /*small inistring */ strncpy (cdat->dstr_1057__ADD2OUT.val, "ADD2OUT",
+ sizeof (cdat->dstr_1057__ADD2OUT.val) - 1);
+ /*inirout drout_1058__MGALTSTEP_STEPTESTMULT */
+ /*_.VALROUT___V1148*/ meltfptr[1147] =
+ (void *) &cdat->drout_1058__MGALTSTEP_STEPTESTMULT;
+ cdat->drout_1058__MGALTSTEP_STEPTESTMULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1042__MGALTSTEP_STEPTESTMULT.routdescr,
- "MGALTSTEP_STEPTESTMULT @warmelt-normatch.melt:4355",
+ strncpy (cdat->drout_1058__MGALTSTEP_STEPTESTMULT.routdescr,
+ "MGALTSTEP_STEPTESTMULT @warmelt-normatch.melt:4459",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1042__MGALTSTEP_STEPTESTMULT.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1042__MGALTSTEP_STEPTESTMULT,
- meltrout_88_warmelt_normatch_MGALTSTEP_STEPTESTMULT);
-
- /*iniclos dclo_1043__MGALTSTEP_STEPTESTMULT */
- /*_.VALCLO___V1132*/ meltfptr[1131] =
- (void *) &cdat->dclo_1043__MGALTSTEP_STEPTESTMULT;
- cdat->dclo_1043__MGALTSTEP_STEPTESTMULT.discr =
+ cdat->drout_1058__MGALTSTEP_STEPTESTMULT.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1058__MGALTSTEP_STEPTESTMULT,
+ meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT);
+
+ /*iniclos dclo_1059__MGALTSTEP_STEPTESTMULT */
+ /*_.VALCLO___V1149*/ meltfptr[1148] =
+ (void *) &cdat->dclo_1059__MGALTSTEP_STEPTESTMULT;
+ cdat->dclo_1059__MGALTSTEP_STEPTESTMULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1043__MGALTSTEP_STEPTESTMULT.nbval = 0;
+ cdat->dclo_1059__MGALTSTEP_STEPTESTMULT.nbval = 0;
- /*inirout drout_1044__MGALTSTEP_STEPTESTGROUP */
- /*_.VALROUT___V1133*/ meltfptr[1132] =
- (void *) &cdat->drout_1044__MGALTSTEP_STEPTESTGROUP;
- cdat->drout_1044__MGALTSTEP_STEPTESTGROUP.discr =
+ /*inirout drout_1060__MGALTSTEP_STEPTESTGROUP */
+ /*_.VALROUT___V1150*/ meltfptr[1149] =
+ (void *) &cdat->drout_1060__MGALTSTEP_STEPTESTGROUP;
+ cdat->drout_1060__MGALTSTEP_STEPTESTGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1044__MGALTSTEP_STEPTESTGROUP.routdescr,
- "MGALTSTEP_STEPTESTGROUP @warmelt-normatch.melt:4420",
+ strncpy (cdat->drout_1060__MGALTSTEP_STEPTESTGROUP.routdescr,
+ "MGALTSTEP_STEPTESTGROUP @warmelt-normatch.melt:4529",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1044__MGALTSTEP_STEPTESTGROUP.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1044__MGALTSTEP_STEPTESTGROUP,
- meltrout_89_warmelt_normatch_MGALTSTEP_STEPTESTGROUP);
-
- /*iniclos dclo_1045__MGALTSTEP_STEPTESTGROUP */
- /*_.VALCLO___V1134*/ meltfptr[1133] =
- (void *) &cdat->dclo_1045__MGALTSTEP_STEPTESTGROUP;
- cdat->dclo_1045__MGALTSTEP_STEPTESTGROUP.discr =
+ cdat->drout_1060__MGALTSTEP_STEPTESTGROUP.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1060__MGALTSTEP_STEPTESTGROUP,
+ meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP);
+
+ /*iniclos dclo_1061__MGALTSTEP_STEPTESTGROUP */
+ /*_.VALCLO___V1151*/ meltfptr[1150] =
+ (void *) &cdat->dclo_1061__MGALTSTEP_STEPTESTGROUP;
+ cdat->dclo_1061__MGALTSTEP_STEPTESTGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1045__MGALTSTEP_STEPTESTGROUP.nbval = 0;
+ cdat->dclo_1061__MGALTSTEP_STEPTESTGROUP.nbval = 0;
- /*inirout drout_1046__MGALTSTEP_STEPTESTMATCHER */
- /*_.VALROUT___V1135*/ meltfptr[1134] =
- (void *) &cdat->drout_1046__MGALTSTEP_STEPTESTMATCHER;
- cdat->drout_1046__MGALTSTEP_STEPTESTMATCHER.discr =
+ /*inirout drout_1062__MGALTSTEP_STEPTESTMATCHER */
+ /*_.VALROUT___V1152*/ meltfptr[1151] =
+ (void *) &cdat->drout_1062__MGALTSTEP_STEPTESTMATCHER;
+ cdat->drout_1062__MGALTSTEP_STEPTESTMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1046__MGALTSTEP_STEPTESTMATCHER.routdescr,
- "MGALTSTEP_STEPTESTMATCHER @warmelt-normatch.melt:4464",
+ strncpy (cdat->drout_1062__MGALTSTEP_STEPTESTMATCHER.routdescr,
+ "MGALTSTEP_STEPTESTMATCHER @warmelt-normatch.melt:4573",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1046__MGALTSTEP_STEPTESTMATCHER.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1046__MGALTSTEP_STEPTESTMATCHER,
- meltrout_90_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER);
-
- /*iniclos dclo_1047__MGALTSTEP_STEPTESTMATCHER */
- /*_.VALCLO___V1136*/ meltfptr[1135] =
- (void *) &cdat->dclo_1047__MGALTSTEP_STEPTESTMATCHER;
- cdat->dclo_1047__MGALTSTEP_STEPTESTMATCHER.discr =
+ cdat->drout_1062__MGALTSTEP_STEPTESTMATCHER.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1062__MGALTSTEP_STEPTESTMATCHER,
+ meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER);
+
+ /*iniclos dclo_1063__MGALTSTEP_STEPTESTMATCHER */
+ /*_.VALCLO___V1153*/ meltfptr[1152] =
+ (void *) &cdat->dclo_1063__MGALTSTEP_STEPTESTMATCHER;
+ cdat->dclo_1063__MGALTSTEP_STEPTESTMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1047__MGALTSTEP_STEPTESTMATCHER.nbval = 0;
+ cdat->dclo_1063__MGALTSTEP_STEPTESTMATCHER.nbval = 0;
- /*inirout drout_1048__MGALTSTEP_STEPSUCCESS */
- /*_.VALROUT___V1137*/ meltfptr[1136] =
- (void *) &cdat->drout_1048__MGALTSTEP_STEPSUCCESS;
- cdat->drout_1048__MGALTSTEP_STEPSUCCESS.discr =
+ /*inirout drout_1064__MGALTSTEP_STEPSUCCESS */
+ /*_.VALROUT___V1154*/ meltfptr[1153] =
+ (void *) &cdat->drout_1064__MGALTSTEP_STEPSUCCESS;
+ cdat->drout_1064__MGALTSTEP_STEPSUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1048__MGALTSTEP_STEPSUCCESS.routdescr,
- "MGALTSTEP_STEPSUCCESS @warmelt-normatch.melt:4541",
+ strncpy (cdat->drout_1064__MGALTSTEP_STEPSUCCESS.routdescr,
+ "MGALTSTEP_STEPSUCCESS @warmelt-normatch.melt:4650",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1048__MGALTSTEP_STEPSUCCESS.nbval = 7;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1048__MGALTSTEP_STEPSUCCESS,
- meltrout_91_warmelt_normatch_MGALTSTEP_STEPSUCCESS);
-
- /*iniclos dclo_1049__MGALTSTEP_STEPSUCCESS */
- /*_.VALCLO___V1138*/ meltfptr[1137] =
- (void *) &cdat->dclo_1049__MGALTSTEP_STEPSUCCESS;
- cdat->dclo_1049__MGALTSTEP_STEPSUCCESS.discr =
+ cdat->drout_1064__MGALTSTEP_STEPSUCCESS.nbval = 7;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1064__MGALTSTEP_STEPSUCCESS,
+ meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS);
+
+ /*iniclos dclo_1065__MGALTSTEP_STEPSUCCESS */
+ /*_.VALCLO___V1155*/ meltfptr[1154] =
+ (void *) &cdat->dclo_1065__MGALTSTEP_STEPSUCCESS;
+ cdat->dclo_1065__MGALTSTEP_STEPSUCCESS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1049__MGALTSTEP_STEPSUCCESS.nbval = 0;
+ cdat->dclo_1065__MGALTSTEP_STEPSUCCESS.nbval = 0;
- /*inirout drout_1050__MGALTSTEP_STEPCLEAR */
- /*_.VALROUT___V1139*/ meltfptr[1138] =
- (void *) &cdat->drout_1050__MGALTSTEP_STEPCLEAR;
- cdat->drout_1050__MGALTSTEP_STEPCLEAR.discr =
+ /*inirout drout_1066__MGALTSTEP_STEPCLEAR */
+ /*_.VALROUT___V1156*/ meltfptr[1155] =
+ (void *) &cdat->drout_1066__MGALTSTEP_STEPCLEAR;
+ cdat->drout_1066__MGALTSTEP_STEPCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1050__MGALTSTEP_STEPCLEAR.routdescr,
- "MGALTSTEP_STEPCLEAR @warmelt-normatch.melt:4610",
+ strncpy (cdat->drout_1066__MGALTSTEP_STEPCLEAR.routdescr,
+ "MGALTSTEP_STEPCLEAR @warmelt-normatch.melt:4719",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1050__MGALTSTEP_STEPCLEAR.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1050__MGALTSTEP_STEPCLEAR,
- meltrout_92_warmelt_normatch_MGALTSTEP_STEPCLEAR);
-
- /*iniclos dclo_1051__MGALTSTEP_STEPCLEAR */
- /*_.VALCLO___V1140*/ meltfptr[1139] =
- (void *) &cdat->dclo_1051__MGALTSTEP_STEPCLEAR;
- cdat->dclo_1051__MGALTSTEP_STEPCLEAR.discr =
+ cdat->drout_1066__MGALTSTEP_STEPCLEAR.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1066__MGALTSTEP_STEPCLEAR,
+ meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR);
+
+ /*iniclos dclo_1067__MGALTSTEP_STEPCLEAR */
+ /*_.VALCLO___V1157*/ meltfptr[1156] =
+ (void *) &cdat->dclo_1067__MGALTSTEP_STEPCLEAR;
+ cdat->dclo_1067__MGALTSTEP_STEPCLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1051__MGALTSTEP_STEPCLEAR.nbval = 0;
+ cdat->dclo_1067__MGALTSTEP_STEPCLEAR.nbval = 0;
- /*inirout drout_1052__MGALTSTEP_STEPFLAGSET */
- /*_.VALROUT___V1141*/ meltfptr[1140] =
- (void *) &cdat->drout_1052__MGALTSTEP_STEPFLAGSET;
- cdat->drout_1052__MGALTSTEP_STEPFLAGSET.discr =
+ /*inirout drout_1068__MGALTSTEP_STEPFLAGSET */
+ /*_.VALROUT___V1158*/ meltfptr[1157] =
+ (void *) &cdat->drout_1068__MGALTSTEP_STEPFLAGSET;
+ cdat->drout_1068__MGALTSTEP_STEPFLAGSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1052__MGALTSTEP_STEPFLAGSET.routdescr,
- "MGALTSTEP_STEPFLAGSET @warmelt-normatch.melt:4667",
+ strncpy (cdat->drout_1068__MGALTSTEP_STEPFLAGSET.routdescr,
+ "MGALTSTEP_STEPFLAGSET @warmelt-normatch.melt:4776",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1052__MGALTSTEP_STEPFLAGSET.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1052__MGALTSTEP_STEPFLAGSET,
- meltrout_93_warmelt_normatch_MGALTSTEP_STEPFLAGSET);
-
- /*iniclos dclo_1053__MGALTSTEP_STEPFLAGSET */
- /*_.VALCLO___V1142*/ meltfptr[1141] =
- (void *) &cdat->dclo_1053__MGALTSTEP_STEPFLAGSET;
- cdat->dclo_1053__MGALTSTEP_STEPFLAGSET.discr =
+ cdat->drout_1068__MGALTSTEP_STEPFLAGSET.nbval = 6;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1068__MGALTSTEP_STEPFLAGSET,
+ meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET);
+
+ /*iniclos dclo_1069__MGALTSTEP_STEPFLAGSET */
+ /*_.VALCLO___V1159*/ meltfptr[1158] =
+ (void *) &cdat->dclo_1069__MGALTSTEP_STEPFLAGSET;
+ cdat->dclo_1069__MGALTSTEP_STEPFLAGSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1053__MGALTSTEP_STEPFLAGSET.nbval = 0;
+ cdat->dclo_1069__MGALTSTEP_STEPFLAGSET.nbval = 0;
- /*inirout drout_1054__MGALTSTEP_STEPFLAGOPER */
- /*_.VALROUT___V1143*/ meltfptr[1142] =
- (void *) &cdat->drout_1054__MGALTSTEP_STEPFLAGOPER;
- cdat->drout_1054__MGALTSTEP_STEPFLAGOPER.discr =
+ /*inirout drout_1070__MGALTSTEP_STEPFLAGOPER */
+ /*_.VALROUT___V1160*/ meltfptr[1159] =
+ (void *) &cdat->drout_1070__MGALTSTEP_STEPFLAGOPER;
+ cdat->drout_1070__MGALTSTEP_STEPFLAGOPER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1054__MGALTSTEP_STEPFLAGOPER.routdescr,
- "MGALTSTEP_STEPFLAGOPER @warmelt-normatch.melt:4719",
+ strncpy (cdat->drout_1070__MGALTSTEP_STEPFLAGOPER.routdescr,
+ "MGALTSTEP_STEPFLAGOPER @warmelt-normatch.melt:4828",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1054__MGALTSTEP_STEPFLAGOPER.nbval = 7;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1054__MGALTSTEP_STEPFLAGOPER,
- meltrout_94_warmelt_normatch_MGALTSTEP_STEPFLAGOPER);
-
- /*iniclos dclo_1055__MGALTSTEP_STEPFLAGOPER */
- /*_.VALCLO___V1144*/ meltfptr[1143] =
- (void *) &cdat->dclo_1055__MGALTSTEP_STEPFLAGOPER;
- cdat->dclo_1055__MGALTSTEP_STEPFLAGOPER.discr =
+ cdat->drout_1070__MGALTSTEP_STEPFLAGOPER.nbval = 7;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1070__MGALTSTEP_STEPFLAGOPER,
+ meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER);
+
+ /*iniclos dclo_1071__MGALTSTEP_STEPFLAGOPER */
+ /*_.VALCLO___V1161*/ meltfptr[1160] =
+ (void *) &cdat->dclo_1071__MGALTSTEP_STEPFLAGOPER;
+ cdat->dclo_1071__MGALTSTEP_STEPFLAGOPER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1055__MGALTSTEP_STEPFLAGOPER.nbval = 0;
+ cdat->dclo_1071__MGALTSTEP_STEPFLAGOPER.nbval = 0;
- /*inirout drout_1056__TRANSLATE_MATCHCASE */
- /*_.VALROUT___V1145*/ meltfptr[1144] =
- (void *) &cdat->drout_1056__TRANSLATE_MATCHCASE;
- cdat->drout_1056__TRANSLATE_MATCHCASE.discr =
+ /*inirout drout_1072__TRANSLATE_MATCHCASE */
+ /*_.VALROUT___V1162*/ meltfptr[1161] =
+ (void *) &cdat->drout_1072__TRANSLATE_MATCHCASE;
+ cdat->drout_1072__TRANSLATE_MATCHCASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1056__TRANSLATE_MATCHCASE.routdescr,
- "TRANSLATE_MATCHCASE @warmelt-normatch.melt:4814",
+ strncpy (cdat->drout_1072__TRANSLATE_MATCHCASE.routdescr,
+ "TRANSLATE_MATCHCASE @warmelt-normatch.melt:4923",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1056__TRANSLATE_MATCHCASE.nbval = 25;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1056__TRANSLATE_MATCHCASE,
- meltrout_95_warmelt_normatch_TRANSLATE_MATCHCASE);
-
- /*iniclos dclo_1057__TRANSLATE_MATCHCASE */
- /*_.VALCLO___V1147*/ meltfptr[1146] =
- (void *) &cdat->dclo_1057__TRANSLATE_MATCHCASE;
- cdat->dclo_1057__TRANSLATE_MATCHCASE.discr =
+ cdat->drout_1072__TRANSLATE_MATCHCASE.nbval = 25;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1072__TRANSLATE_MATCHCASE,
+ meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE);
+
+ /*iniclos dclo_1073__TRANSLATE_MATCHCASE */
+ /*_.VALCLO___V1164*/ meltfptr[1163] =
+ (void *) &cdat->dclo_1073__TRANSLATE_MATCHCASE;
+ cdat->dclo_1073__TRANSLATE_MATCHCASE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1057__TRANSLATE_MATCHCASE.nbval = 0;
+ cdat->dclo_1073__TRANSLATE_MATCHCASE.nbval = 0;
-/*iniobj dsym_1058__DISCR_INTEGER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1148*/ meltfptr[1147])
- /*_.VALDATA___V1148*/
- meltfptr[1147] = (void *) &cdat->dsym_1058__DISCR_INTEGER;
+/*iniobj dsym_1074__DISCR_INTEGER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1165*/ meltfptr[1164])
+ /*_.VALDATA___V1165*/
+ meltfptr[1164] = (void *) &cdat->dsym_1074__DISCR_INTEGER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1058__DISCR_INTEGER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1074__DISCR_INTEGER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1058__DISCR_INTEGER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1074__DISCR_INTEGER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1058__DISCR_INTEGER.meltobj_class =
+ cdat->dsym_1074__DISCR_INTEGER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1058__DISCR_INTEGER.obj_hash = 119182103;
- cdat->dsym_1058__DISCR_INTEGER.obj_len = 3;
+ cdat->dsym_1074__DISCR_INTEGER.obj_hash = 119182103;
+ cdat->dsym_1074__DISCR_INTEGER.obj_len = 3;
-/*inistring dstr_1059__DISCR_INTEGER*/
- /*_.VALSTR___V1149*/ meltfptr[1148] =
- (void *) &cdat->dstr_1059__DISCR_INTEGER;
- cdat->dstr_1059__DISCR_INTEGER.discr =
+/*inistring dstr_1075__DISCR_INTEGER*/
+ /*_.VALSTR___V1166*/ meltfptr[1165] =
+ (void *) &cdat->dstr_1075__DISCR_INTEGER;
+ cdat->dstr_1075__DISCR_INTEGER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1059__DISCR_INTEGER.val,
+ /*small inistring */ strncpy (cdat->dstr_1075__DISCR_INTEGER.val,
"DISCR_INTEGER",
- sizeof (cdat->dstr_1059__DISCR_INTEGER.val) -
+ sizeof (cdat->dstr_1075__DISCR_INTEGER.val) -
1);
- /*inirout drout_1060__LAMBDA_ */
- /*_.VALROUT___V1146*/ meltfptr[1145] = (void *) &cdat->drout_1060__LAMBDA_;
- cdat->drout_1060__LAMBDA_.discr =
+ /*inirout drout_1076__LAMBDA_ */
+ /*_.VALROUT___V1163*/ meltfptr[1162] = (void *) &cdat->drout_1076__LAMBDA_;
+ cdat->drout_1076__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1060__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:4901", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1060__LAMBDA_.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1060__LAMBDA_,
- meltrout_96_warmelt_normatch_LAMBDA___23__);
+ strncpy (cdat->drout_1076__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:5010", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1076__LAMBDA_.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1076__LAMBDA_,
+ meltrout_104_warmelt_normatch_LAMBDA___23__);
-/*iniobj dsym_1061__COMPARE_NAMED_ALPHA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1150*/ meltfptr[1149])
- /*_.VALDATA___V1150*/
- meltfptr[1149] = (void *) &cdat->dsym_1061__COMPARE_NAMED_ALPHA;
+/*iniobj dsym_1077__COMPARE_NAMED_ALPHA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1167*/ meltfptr[1166])
+ /*_.VALDATA___V1167*/
+ meltfptr[1166] = (void *) &cdat->dsym_1077__COMPARE_NAMED_ALPHA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1061__COMPARE_NAMED_ALPHA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1077__COMPARE_NAMED_ALPHA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1061__COMPARE_NAMED_ALPHA",
+ ("iniobj check.discr objmagic dsym_1077__COMPARE_NAMED_ALPHA",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1061__COMPARE_NAMED_ALPHA.meltobj_class =
+ cdat->dsym_1077__COMPARE_NAMED_ALPHA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1061__COMPARE_NAMED_ALPHA.obj_hash = 155514911;
- cdat->dsym_1061__COMPARE_NAMED_ALPHA.obj_len = 3;
+ cdat->dsym_1077__COMPARE_NAMED_ALPHA.obj_hash = 155514911;
+ cdat->dsym_1077__COMPARE_NAMED_ALPHA.obj_len = 3;
-/*inistring dstr_1062__COMPARE_NAMED_AL*/
- /*_.VALSTR___V1151*/ meltfptr[1150] =
- (void *) &cdat->dstr_1062__COMPARE_NAMED_AL;
- cdat->dstr_1062__COMPARE_NAMED_AL.discr =
+/*inistring dstr_1078__COMPARE_NAMED_AL*/
+ /*_.VALSTR___V1168*/ meltfptr[1167] =
+ (void *) &cdat->dstr_1078__COMPARE_NAMED_AL;
+ cdat->dstr_1078__COMPARE_NAMED_AL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1062__COMPARE_NAMED_AL.val,
+ /*small inistring */ strncpy (cdat->dstr_1078__COMPARE_NAMED_AL.val,
"COMPARE_NAMED_ALPHA",
- sizeof (cdat->dstr_1062__COMPARE_NAMED_AL.
+ sizeof (cdat->dstr_1078__COMPARE_NAMED_AL.
val) - 1);
-/*iniobj dsym_1063__CLASS_NREP_ALTMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1152*/ meltfptr[1151])
- /*_.VALDATA___V1152*/
- meltfptr[1151] = (void *) &cdat->dsym_1063__CLASS_NREP_ALTMATCH;
+/*iniobj dsym_1079__CLASS_NREP_ALTMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1169*/ meltfptr[1168])
+ /*_.VALDATA___V1169*/
+ meltfptr[1168] = (void *) &cdat->dsym_1079__CLASS_NREP_ALTMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1063__CLASS_NREP_ALTMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1079__CLASS_NREP_ALTMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1063__CLASS_NREP_ALTMATCH",
+ ("iniobj check.discr objmagic dsym_1079__CLASS_NREP_ALTMATCH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1063__CLASS_NREP_ALTMATCH.meltobj_class =
+ cdat->dsym_1079__CLASS_NREP_ALTMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1063__CLASS_NREP_ALTMATCH.obj_hash = 373164524;
- cdat->dsym_1063__CLASS_NREP_ALTMATCH.obj_len = 3;
+ cdat->dsym_1079__CLASS_NREP_ALTMATCH.obj_hash = 373164524;
+ cdat->dsym_1079__CLASS_NREP_ALTMATCH.obj_len = 3;
-/*inistring dstr_1064__CLASS_NREP_ALTMA*/
- /*_.VALSTR___V1153*/ meltfptr[1152] =
- (void *) &cdat->dstr_1064__CLASS_NREP_ALTMA;
- cdat->dstr_1064__CLASS_NREP_ALTMA.discr =
+/*inistring dstr_1080__CLASS_NREP_ALTMA*/
+ /*_.VALSTR___V1170*/ meltfptr[1169] =
+ (void *) &cdat->dstr_1080__CLASS_NREP_ALTMA;
+ cdat->dstr_1080__CLASS_NREP_ALTMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1064__CLASS_NREP_ALTMA.val,
+ /*small inistring */ strncpy (cdat->dstr_1080__CLASS_NREP_ALTMA.val,
"CLASS_NREP_ALTMATCH",
- sizeof (cdat->dstr_1064__CLASS_NREP_ALTMA.
+ sizeof (cdat->dstr_1080__CLASS_NREP_ALTMA.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ iniobj");
-/*iniobj dobj_1065__CLASS_NREP_ALTMATCH*/
-/*_.VALDATA___V1154*/ meltfptr[1153] =
- (void *) &cdat->dobj_1065__CLASS_NREP_ALTMATCH;
+/*iniobj dobj_1081__CLASS_NREP_ALTMATCH*/
+/*_.VALDATA___V1171*/ meltfptr[1170] =
+ (void *) &cdat->dobj_1081__CLASS_NREP_ALTMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1065__CLASS_NREP_ALTMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1081__CLASS_NREP_ALTMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1065__CLASS_NREP_ALTMATCH",
+ ("iniobj check.discr objmagic dobj_1081__CLASS_NREP_ALTMATCH",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1065__CLASS_NREP_ALTMATCH.meltobj_class =
+ cdat->dobj_1081__CLASS_NREP_ALTMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1065__CLASS_NREP_ALTMATCH.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1065__CLASS_NREP_ALTMATCH.obj_hash = 1019167433;
- cdat->dobj_1065__CLASS_NREP_ALTMATCH.obj_len = 8;
+ cdat->dobj_1081__CLASS_NREP_ALTMATCH.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1081__CLASS_NREP_ALTMATCH.obj_hash = 409027362;
+ cdat->dobj_1081__CLASS_NREP_ALTMATCH.obj_len = 8;
-/*inistring dstr_1066__CLASS_NREP_ALTMA*/
- /*_.VALSTR___V1155*/ meltfptr[1154] =
- (void *) &cdat->dstr_1066__CLASS_NREP_ALTMA;
- cdat->dstr_1066__CLASS_NREP_ALTMA.discr =
+/*inistring dstr_1082__CLASS_NREP_ALTMA*/
+ /*_.VALSTR___V1172*/ meltfptr[1171] =
+ (void *) &cdat->dstr_1082__CLASS_NREP_ALTMA;
+ cdat->dstr_1082__CLASS_NREP_ALTMA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1066__CLASS_NREP_ALTMA.val,
+ /*small inistring */ strncpy (cdat->dstr_1082__CLASS_NREP_ALTMA.val,
"CLASS_NREP_ALTMATCH",
- sizeof (cdat->dstr_1066__CLASS_NREP_ALTMA.
+ sizeof (cdat->dstr_1082__CLASS_NREP_ALTMA.
val) - 1);
- /*inimult dtup_1067__CLASS_NREP_ALTMATCH */
- /*_.VALTUP___V1156*/ meltfptr[1155] =
- (void *) &cdat->dtup_1067__CLASS_NREP_ALTMATCH;
- cdat->dtup_1067__CLASS_NREP_ALTMATCH.discr =
+ /*inimult dtup_1083__CLASS_NREP_ALTMATCH */
+ /*_.VALTUP___V1173*/ meltfptr[1172] =
+ (void *) &cdat->dtup_1083__CLASS_NREP_ALTMATCH;
+ cdat->dtup_1083__CLASS_NREP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1067__CLASS_NREP_ALTMATCH.nbval = 4;
- /*inimult dtup_1068__CLASS_NREP_ALTMATCH */
- /*_.VALTUP___V1165*/ meltfptr[1164] =
- (void *) &cdat->dtup_1068__CLASS_NREP_ALTMATCH;
- cdat->dtup_1068__CLASS_NREP_ALTMATCH.discr =
+ cdat->dtup_1083__CLASS_NREP_ALTMATCH.nbval = 4;
+ /*inimult dtup_1084__CLASS_NREP_ALTMATCH */
+ /*_.VALTUP___V1182*/ meltfptr[1181] =
+ (void *) &cdat->dtup_1084__CLASS_NREP_ALTMATCH;
+ cdat->dtup_1084__CLASS_NREP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1068__CLASS_NREP_ALTMATCH.nbval = 6;
+ cdat->dtup_1084__CLASS_NREP_ALTMATCH.nbval = 6;
-/*iniobj dsym_1069__NAMATCH_MATCHED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1166*/ meltfptr[1165])
- /*_.VALDATA___V1166*/
- meltfptr[1165] = (void *) &cdat->dsym_1069__NAMATCH_MATCHED;
+/*iniobj dsym_1085__NAMATCH_MATCHED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1183*/ meltfptr[1182])
+ /*_.VALDATA___V1183*/
+ meltfptr[1182] = (void *) &cdat->dsym_1085__NAMATCH_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1069__NAMATCH_MATCHED",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1085__NAMATCH_MATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1069__NAMATCH_MATCHED",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1085__NAMATCH_MATCHED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1069__NAMATCH_MATCHED.meltobj_class =
+ cdat->dsym_1085__NAMATCH_MATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1069__NAMATCH_MATCHED.obj_hash = 262472514;
- cdat->dsym_1069__NAMATCH_MATCHED.obj_len = 3;
+ cdat->dsym_1085__NAMATCH_MATCHED.obj_hash = 262472514;
+ cdat->dsym_1085__NAMATCH_MATCHED.obj_len = 3;
-/*inistring dstr_1070__NAMATCH_MATCHED*/
- /*_.VALSTR___V1167*/ meltfptr[1166] =
- (void *) &cdat->dstr_1070__NAMATCH_MATCHED;
- cdat->dstr_1070__NAMATCH_MATCHED.discr =
+/*inistring dstr_1086__NAMATCH_MATCHED*/
+ /*_.VALSTR___V1184*/ meltfptr[1183] =
+ (void *) &cdat->dstr_1086__NAMATCH_MATCHED;
+ cdat->dstr_1086__NAMATCH_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1070__NAMATCH_MATCHED.val,
+ /*small inistring */ strncpy (cdat->dstr_1086__NAMATCH_MATCHED.val,
"NAMATCH_MATCHED",
- sizeof (cdat->dstr_1070__NAMATCH_MATCHED.
+ sizeof (cdat->dstr_1086__NAMATCH_MATCHED.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1071__NAMATCH_MATCHED*/
-/*_.VALDATA___V1157*/ meltfptr[1156] =
- (void *) &cdat->dobj_1071__NAMATCH_MATCHED;
+/*iniobj dobj_1087__NAMATCH_MATCHED*/
+/*_.VALDATA___V1174*/ meltfptr[1173] =
+ (void *) &cdat->dobj_1087__NAMATCH_MATCHED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1071__NAMATCH_MATCHED",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1087__NAMATCH_MATCHED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1071__NAMATCH_MATCHED",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1087__NAMATCH_MATCHED",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1071__NAMATCH_MATCHED.meltobj_class =
+ cdat->dobj_1087__NAMATCH_MATCHED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1071__NAMATCH_MATCHED.obj_num = 2;
- cdat->dobj_1071__NAMATCH_MATCHED.obj_hash = 678063176;
- cdat->dobj_1071__NAMATCH_MATCHED.obj_len = 4;
+ cdat->dobj_1087__NAMATCH_MATCHED.obj_num = 2;
+ cdat->dobj_1087__NAMATCH_MATCHED.obj_hash = 672973358;
+ cdat->dobj_1087__NAMATCH_MATCHED.obj_len = 4;
-/*inistring dstr_1072__NAMATCH_MATCHED*/
- /*_.VALSTR___V1158*/ meltfptr[1157] =
- (void *) &cdat->dstr_1072__NAMATCH_MATCHED;
- cdat->dstr_1072__NAMATCH_MATCHED.discr =
+/*inistring dstr_1088__NAMATCH_MATCHED*/
+ /*_.VALSTR___V1175*/ meltfptr[1174] =
+ (void *) &cdat->dstr_1088__NAMATCH_MATCHED;
+ cdat->dstr_1088__NAMATCH_MATCHED.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1072__NAMATCH_MATCHED.val,
+ /*small inistring */ strncpy (cdat->dstr_1088__NAMATCH_MATCHED.val,
"NAMATCH_MATCHED",
- sizeof (cdat->dstr_1072__NAMATCH_MATCHED.
+ sizeof (cdat->dstr_1088__NAMATCH_MATCHED.
val) - 1);
-/*iniobj dsym_1073__NAMATCH_RESULT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1168*/ meltfptr[1167])
- /*_.VALDATA___V1168*/
- meltfptr[1167] = (void *) &cdat->dsym_1073__NAMATCH_RESULT;
+/*iniobj dsym_1089__NAMATCH_RESULT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1185*/ meltfptr[1184])
+ /*_.VALDATA___V1185*/
+ meltfptr[1184] = (void *) &cdat->dsym_1089__NAMATCH_RESULT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1073__NAMATCH_RESULT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1089__NAMATCH_RESULT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1073__NAMATCH_RESULT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1089__NAMATCH_RESULT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1073__NAMATCH_RESULT.meltobj_class =
+ cdat->dsym_1089__NAMATCH_RESULT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1073__NAMATCH_RESULT.obj_hash = 132418351;
- cdat->dsym_1073__NAMATCH_RESULT.obj_len = 3;
+ cdat->dsym_1089__NAMATCH_RESULT.obj_hash = 132418351;
+ cdat->dsym_1089__NAMATCH_RESULT.obj_len = 3;
-/*inistring dstr_1074__NAMATCH_RESULT*/
- /*_.VALSTR___V1169*/ meltfptr[1168] =
- (void *) &cdat->dstr_1074__NAMATCH_RESULT;
- cdat->dstr_1074__NAMATCH_RESULT.discr =
+/*inistring dstr_1090__NAMATCH_RESULT*/
+ /*_.VALSTR___V1186*/ meltfptr[1185] =
+ (void *) &cdat->dstr_1090__NAMATCH_RESULT;
+ cdat->dstr_1090__NAMATCH_RESULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1074__NAMATCH_RESULT.val,
+ /*small inistring */ strncpy (cdat->dstr_1090__NAMATCH_RESULT.val,
"NAMATCH_RESULT",
- sizeof (cdat->dstr_1074__NAMATCH_RESULT.val) -
+ sizeof (cdat->dstr_1090__NAMATCH_RESULT.val) -
1);
/*^iniobj */
-/*iniobj dobj_1075__NAMATCH_RESULT*/
-/*_.VALDATA___V1159*/ meltfptr[1158] =
- (void *) &cdat->dobj_1075__NAMATCH_RESULT;
+/*iniobj dobj_1091__NAMATCH_RESULT*/
+/*_.VALDATA___V1176*/ meltfptr[1175] =
+ (void *) &cdat->dobj_1091__NAMATCH_RESULT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1075__NAMATCH_RESULT",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1091__NAMATCH_RESULT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1075__NAMATCH_RESULT",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1091__NAMATCH_RESULT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1075__NAMATCH_RESULT.meltobj_class =
+ cdat->dobj_1091__NAMATCH_RESULT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1075__NAMATCH_RESULT.obj_num = 3;
- cdat->dobj_1075__NAMATCH_RESULT.obj_hash = 177571904;
- cdat->dobj_1075__NAMATCH_RESULT.obj_len = 4;
+ cdat->dobj_1091__NAMATCH_RESULT.obj_num = 3;
+ cdat->dobj_1091__NAMATCH_RESULT.obj_hash = 541199007;
+ cdat->dobj_1091__NAMATCH_RESULT.obj_len = 4;
-/*inistring dstr_1076__NAMATCH_RESULT*/
- /*_.VALSTR___V1160*/ meltfptr[1159] =
- (void *) &cdat->dstr_1076__NAMATCH_RESULT;
- cdat->dstr_1076__NAMATCH_RESULT.discr =
+/*inistring dstr_1092__NAMATCH_RESULT*/
+ /*_.VALSTR___V1177*/ meltfptr[1176] =
+ (void *) &cdat->dstr_1092__NAMATCH_RESULT;
+ cdat->dstr_1092__NAMATCH_RESULT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1076__NAMATCH_RESULT.val,
+ /*small inistring */ strncpy (cdat->dstr_1092__NAMATCH_RESULT.val,
"NAMATCH_RESULT",
- sizeof (cdat->dstr_1076__NAMATCH_RESULT.val) -
+ sizeof (cdat->dstr_1092__NAMATCH_RESULT.val) -
1);
-/*iniobj dsym_1077__NAMATCH_BODY*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1170*/ meltfptr[1169])
- /*_.VALDATA___V1170*/
- meltfptr[1169] = (void *) &cdat->dsym_1077__NAMATCH_BODY;
+/*iniobj dsym_1093__NAMATCH_BODY*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1187*/ meltfptr[1186])
+ /*_.VALDATA___V1187*/
+ meltfptr[1186] = (void *) &cdat->dsym_1093__NAMATCH_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1077__NAMATCH_BODY",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1093__NAMATCH_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1077__NAMATCH_BODY",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1093__NAMATCH_BODY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1077__NAMATCH_BODY.meltobj_class =
+ cdat->dsym_1093__NAMATCH_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1077__NAMATCH_BODY.obj_hash = 620561017;
- cdat->dsym_1077__NAMATCH_BODY.obj_len = 3;
+ cdat->dsym_1093__NAMATCH_BODY.obj_hash = 620561017;
+ cdat->dsym_1093__NAMATCH_BODY.obj_len = 3;
-/*inistring dstr_1078__NAMATCH_BODY*/
- /*_.VALSTR___V1171*/ meltfptr[1170] =
- (void *) &cdat->dstr_1078__NAMATCH_BODY;
- cdat->dstr_1078__NAMATCH_BODY.discr =
+/*inistring dstr_1094__NAMATCH_BODY*/
+ /*_.VALSTR___V1188*/ meltfptr[1187] =
+ (void *) &cdat->dstr_1094__NAMATCH_BODY;
+ cdat->dstr_1094__NAMATCH_BODY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1078__NAMATCH_BODY.val,
+ /*small inistring */ strncpy (cdat->dstr_1094__NAMATCH_BODY.val,
"NAMATCH_BODY",
- sizeof (cdat->dstr_1078__NAMATCH_BODY.val) -
+ sizeof (cdat->dstr_1094__NAMATCH_BODY.val) -
1);
/*^iniobj */
-/*iniobj dobj_1079__NAMATCH_BODY*/
-/*_.VALDATA___V1161*/ meltfptr[1160] =
- (void *) &cdat->dobj_1079__NAMATCH_BODY;
+/*iniobj dobj_1095__NAMATCH_BODY*/
+/*_.VALDATA___V1178*/ meltfptr[1177] =
+ (void *) &cdat->dobj_1095__NAMATCH_BODY;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1079__NAMATCH_BODY",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1095__NAMATCH_BODY",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1079__NAMATCH_BODY",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1095__NAMATCH_BODY",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1079__NAMATCH_BODY.meltobj_class =
+ cdat->dobj_1095__NAMATCH_BODY.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1079__NAMATCH_BODY.obj_num = 4;
- cdat->dobj_1079__NAMATCH_BODY.obj_hash = 938027248;
- cdat->dobj_1079__NAMATCH_BODY.obj_len = 4;
+ cdat->dobj_1095__NAMATCH_BODY.obj_num = 4;
+ cdat->dobj_1095__NAMATCH_BODY.obj_hash = 332443624;
+ cdat->dobj_1095__NAMATCH_BODY.obj_len = 4;
-/*inistring dstr_1080__NAMATCH_BODY*/
- /*_.VALSTR___V1162*/ meltfptr[1161] =
- (void *) &cdat->dstr_1080__NAMATCH_BODY;
- cdat->dstr_1080__NAMATCH_BODY.discr =
+/*inistring dstr_1096__NAMATCH_BODY*/
+ /*_.VALSTR___V1179*/ meltfptr[1178] =
+ (void *) &cdat->dstr_1096__NAMATCH_BODY;
+ cdat->dstr_1096__NAMATCH_BODY.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1080__NAMATCH_BODY.val,
+ /*small inistring */ strncpy (cdat->dstr_1096__NAMATCH_BODY.val,
"NAMATCH_BODY",
- sizeof (cdat->dstr_1080__NAMATCH_BODY.val) -
+ sizeof (cdat->dstr_1096__NAMATCH_BODY.val) -
1);
-/*iniobj dsym_1081__NAMATCH_FLAGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1172*/ meltfptr[1171])
- /*_.VALDATA___V1172*/
- meltfptr[1171] = (void *) &cdat->dsym_1081__NAMATCH_FLAGS;
+/*iniobj dsym_1097__NAMATCH_FLAGS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1189*/ meltfptr[1188])
+ /*_.VALDATA___V1189*/
+ meltfptr[1188] = (void *) &cdat->dsym_1097__NAMATCH_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1081__NAMATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1097__NAMATCH_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1081__NAMATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1097__NAMATCH_FLAGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1081__NAMATCH_FLAGS.meltobj_class =
+ cdat->dsym_1097__NAMATCH_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1081__NAMATCH_FLAGS.obj_hash = 162798795;
- cdat->dsym_1081__NAMATCH_FLAGS.obj_len = 3;
+ cdat->dsym_1097__NAMATCH_FLAGS.obj_hash = 162798795;
+ cdat->dsym_1097__NAMATCH_FLAGS.obj_len = 3;
-/*inistring dstr_1082__NAMATCH_FLAGS*/
- /*_.VALSTR___V1173*/ meltfptr[1172] =
- (void *) &cdat->dstr_1082__NAMATCH_FLAGS;
- cdat->dstr_1082__NAMATCH_FLAGS.discr =
+/*inistring dstr_1098__NAMATCH_FLAGS*/
+ /*_.VALSTR___V1190*/ meltfptr[1189] =
+ (void *) &cdat->dstr_1098__NAMATCH_FLAGS;
+ cdat->dstr_1098__NAMATCH_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1082__NAMATCH_FLAGS.val,
+ /*small inistring */ strncpy (cdat->dstr_1098__NAMATCH_FLAGS.val,
"NAMATCH_FLAGS",
- sizeof (cdat->dstr_1082__NAMATCH_FLAGS.val) -
+ sizeof (cdat->dstr_1098__NAMATCH_FLAGS.val) -
1);
/*^iniobj */
-/*iniobj dobj_1083__NAMATCH_FLAGS*/
-/*_.VALDATA___V1163*/ meltfptr[1162] =
- (void *) &cdat->dobj_1083__NAMATCH_FLAGS;
+/*iniobj dobj_1099__NAMATCH_FLAGS*/
+/*_.VALDATA___V1180*/ meltfptr[1179] =
+ (void *) &cdat->dobj_1099__NAMATCH_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1083__NAMATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1099__NAMATCH_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1083__NAMATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1099__NAMATCH_FLAGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1083__NAMATCH_FLAGS.meltobj_class =
+ cdat->dobj_1099__NAMATCH_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1083__NAMATCH_FLAGS.obj_num = 5;
- cdat->dobj_1083__NAMATCH_FLAGS.obj_hash = 841445213;
- cdat->dobj_1083__NAMATCH_FLAGS.obj_len = 4;
+ cdat->dobj_1099__NAMATCH_FLAGS.obj_num = 5;
+ cdat->dobj_1099__NAMATCH_FLAGS.obj_hash = 936011700;
+ cdat->dobj_1099__NAMATCH_FLAGS.obj_len = 4;
-/*inistring dstr_1084__NAMATCH_FLAGS*/
- /*_.VALSTR___V1164*/ meltfptr[1163] =
- (void *) &cdat->dstr_1084__NAMATCH_FLAGS;
- cdat->dstr_1084__NAMATCH_FLAGS.discr =
+/*inistring dstr_1100__NAMATCH_FLAGS*/
+ /*_.VALSTR___V1181*/ meltfptr[1180] =
+ (void *) &cdat->dstr_1100__NAMATCH_FLAGS;
+ cdat->dstr_1100__NAMATCH_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1084__NAMATCH_FLAGS.val,
+ /*small inistring */ strncpy (cdat->dstr_1100__NAMATCH_FLAGS.val,
"NAMATCH_FLAGS",
- sizeof (cdat->dstr_1084__NAMATCH_FLAGS.val) -
+ sizeof (cdat->dstr_1100__NAMATCH_FLAGS.val) -
1);
-/*iniobj dsym_1085__CLASS_NREP_MATCH_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1174*/ meltfptr[1173])
- /*_.VALDATA___V1174*/
- meltfptr[1173] = (void *) &cdat->dsym_1085__CLASS_NREP_MATCH_LABEL;
+/*iniobj dsym_1101__CLASS_NREP_MATCH_LABEL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1191*/ meltfptr[1190])
+ /*_.VALDATA___V1191*/
+ meltfptr[1190] = (void *) &cdat->dsym_1101__CLASS_NREP_MATCH_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1085__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr isobj dsym_1101__CLASS_NREP_MATCH_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1085__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr objmagic dsym_1101__CLASS_NREP_MATCH_LABEL",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1085__CLASS_NREP_MATCH_LABEL.meltobj_class =
+ cdat->dsym_1101__CLASS_NREP_MATCH_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1085__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698;
- cdat->dsym_1085__CLASS_NREP_MATCH_LABEL.obj_len = 3;
+ cdat->dsym_1101__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698;
+ cdat->dsym_1101__CLASS_NREP_MATCH_LABEL.obj_len = 3;
-/*inistring dstr_1086__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1175*/ meltfptr[1174] =
- (void *) &cdat->dstr_1086__CLASS_NREP_MATCH;
- cdat->dstr_1086__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1102__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1192*/ meltfptr[1191] =
+ (void *) &cdat->dstr_1102__CLASS_NREP_MATCH;
+ cdat->dstr_1102__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1086__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1102__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_LABEL",
- sizeof (cdat->dstr_1086__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1102__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ iniobj");
-/*iniobj dobj_1087__CLASS_NREP_MATCH_LABEL*/
-/*_.VALDATA___V1176*/ meltfptr[1175] =
- (void *) &cdat->dobj_1087__CLASS_NREP_MATCH_LABEL;
+/*iniobj dobj_1103__CLASS_NREP_MATCH_LABEL*/
+/*_.VALDATA___V1193*/ meltfptr[1192] =
+ (void *) &cdat->dobj_1103__CLASS_NREP_MATCH_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1087__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr isobj dobj_1103__CLASS_NREP_MATCH_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1087__CLASS_NREP_MATCH_LABEL",
+ ("iniobj check.discr objmagic dobj_1103__CLASS_NREP_MATCH_LABEL",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1087__CLASS_NREP_MATCH_LABEL.meltobj_class =
+ cdat->dobj_1103__CLASS_NREP_MATCH_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1087__CLASS_NREP_MATCH_LABEL.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1087__CLASS_NREP_MATCH_LABEL.obj_hash = 797533902;
- cdat->dobj_1087__CLASS_NREP_MATCH_LABEL.obj_len = 8;
+ cdat->dobj_1103__CLASS_NREP_MATCH_LABEL.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1103__CLASS_NREP_MATCH_LABEL.obj_hash = 30649657;
+ cdat->dobj_1103__CLASS_NREP_MATCH_LABEL.obj_len = 8;
-/*inistring dstr_1088__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1177*/ meltfptr[1176] =
- (void *) &cdat->dstr_1088__CLASS_NREP_MATCH;
- cdat->dstr_1088__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1104__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1194*/ meltfptr[1193] =
+ (void *) &cdat->dstr_1104__CLASS_NREP_MATCH;
+ cdat->dstr_1104__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1088__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1104__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_LABEL",
- sizeof (cdat->dstr_1088__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1104__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1089__CLASS_NREP_MATCH_LABEL */
- /*_.VALTUP___V1178*/ meltfptr[1177] =
- (void *) &cdat->dtup_1089__CLASS_NREP_MATCH_LABEL;
- cdat->dtup_1089__CLASS_NREP_MATCH_LABEL.discr =
+ /*inimult dtup_1105__CLASS_NREP_MATCH_LABEL */
+ /*_.VALTUP___V1195*/ meltfptr[1194] =
+ (void *) &cdat->dtup_1105__CLASS_NREP_MATCH_LABEL;
+ cdat->dtup_1105__CLASS_NREP_MATCH_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1089__CLASS_NREP_MATCH_LABEL.nbval = 3;
- /*inimult dtup_1090__CLASS_NREP_MATCH_LABEL */
- /*_.VALTUP___V1181*/ meltfptr[1180] =
- (void *) &cdat->dtup_1090__CLASS_NREP_MATCH_LABEL;
- cdat->dtup_1090__CLASS_NREP_MATCH_LABEL.discr =
+ cdat->dtup_1105__CLASS_NREP_MATCH_LABEL.nbval = 3;
+ /*inimult dtup_1106__CLASS_NREP_MATCH_LABEL */
+ /*_.VALTUP___V1198*/ meltfptr[1197] =
+ (void *) &cdat->dtup_1106__CLASS_NREP_MATCH_LABEL;
+ cdat->dtup_1106__CLASS_NREP_MATCH_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1090__CLASS_NREP_MATCH_LABEL.nbval = 2;
+ cdat->dtup_1106__CLASS_NREP_MATCH_LABEL.nbval = 2;
-/*iniobj dsym_1091__NMLAB_STEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1182*/ meltfptr[1181])
- /*_.VALDATA___V1182*/
- meltfptr[1181] = (void *) &cdat->dsym_1091__NMLAB_STEP;
+/*iniobj dsym_1107__NMLAB_STEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1199*/ meltfptr[1198])
+ /*_.VALDATA___V1199*/
+ meltfptr[1198] = (void *) &cdat->dsym_1107__NMLAB_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1091__NMLAB_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1107__NMLAB_STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1091__NMLAB_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1107__NMLAB_STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1091__NMLAB_STEP.meltobj_class =
+ cdat->dsym_1107__NMLAB_STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1091__NMLAB_STEP.obj_hash = 818074580;
- cdat->dsym_1091__NMLAB_STEP.obj_len = 3;
+ cdat->dsym_1107__NMLAB_STEP.obj_hash = 818074580;
+ cdat->dsym_1107__NMLAB_STEP.obj_len = 3;
-/*inistring dstr_1092__NMLAB_STEP*/
- /*_.VALSTR___V1183*/ meltfptr[1182] = (void *) &cdat->dstr_1092__NMLAB_STEP;
- cdat->dstr_1092__NMLAB_STEP.discr =
+/*inistring dstr_1108__NMLAB_STEP*/
+ /*_.VALSTR___V1200*/ meltfptr[1199] = (void *) &cdat->dstr_1108__NMLAB_STEP;
+ cdat->dstr_1108__NMLAB_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1092__NMLAB_STEP.val, "NMLAB_STEP",
- sizeof (cdat->dstr_1092__NMLAB_STEP.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1108__NMLAB_STEP.val, "NMLAB_STEP",
+ sizeof (cdat->dstr_1108__NMLAB_STEP.val) - 1);
/*^iniobj */
-/*iniobj dobj_1093__NMLAB_STEP*/
-/*_.VALDATA___V1179*/ meltfptr[1178] =
- (void *) &cdat->dobj_1093__NMLAB_STEP;
+/*iniobj dobj_1109__NMLAB_STEP*/
+/*_.VALDATA___V1196*/ meltfptr[1195] =
+ (void *) &cdat->dobj_1109__NMLAB_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1093__NMLAB_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1109__NMLAB_STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1093__NMLAB_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1109__NMLAB_STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1093__NMLAB_STEP.meltobj_class =
+ cdat->dobj_1109__NMLAB_STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1093__NMLAB_STEP.obj_num = 1;
- cdat->dobj_1093__NMLAB_STEP.obj_hash = 813428478;
- cdat->dobj_1093__NMLAB_STEP.obj_len = 4;
+ cdat->dobj_1109__NMLAB_STEP.obj_num = 1;
+ cdat->dobj_1109__NMLAB_STEP.obj_hash = 565757073;
+ cdat->dobj_1109__NMLAB_STEP.obj_len = 4;
-/*inistring dstr_1094__NMLAB_STEP*/
- /*_.VALSTR___V1180*/ meltfptr[1179] = (void *) &cdat->dstr_1094__NMLAB_STEP;
- cdat->dstr_1094__NMLAB_STEP.discr =
+/*inistring dstr_1110__NMLAB_STEP*/
+ /*_.VALSTR___V1197*/ meltfptr[1196] = (void *) &cdat->dstr_1110__NMLAB_STEP;
+ cdat->dstr_1110__NMLAB_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1094__NMLAB_STEP.val, "NMLAB_STEP",
- sizeof (cdat->dstr_1094__NMLAB_STEP.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1110__NMLAB_STEP.val, "NMLAB_STEP",
+ sizeof (cdat->dstr_1110__NMLAB_STEP.val) - 1);
-/*iniobj dsym_1095__CLASS_NREP_MATCH_LABEL_END*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1184*/ meltfptr[1183])
- /*_.VALDATA___V1184*/
- meltfptr[1183] = (void *) &cdat->dsym_1095__CLASS_NREP_MATCH_LABEL_END;
+/*iniobj dsym_1111__CLASS_NREP_MATCH_LABEL_END*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1201*/ meltfptr[1200])
+ /*_.VALDATA___V1201*/
+ meltfptr[1200] = (void *) &cdat->dsym_1111__CLASS_NREP_MATCH_LABEL_END;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1095__CLASS_NREP_MATCH_LABEL_END",
+ ("iniobj check.discr isobj dsym_1111__CLASS_NREP_MATCH_LABEL_END",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1095__CLASS_NREP_MATCH_LABEL_END",
+ ("iniobj check.discr objmagic dsym_1111__CLASS_NREP_MATCH_LABEL_END",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1095__CLASS_NREP_MATCH_LABEL_END.meltobj_class =
+ cdat->dsym_1111__CLASS_NREP_MATCH_LABEL_END.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1095__CLASS_NREP_MATCH_LABEL_END.obj_hash = 47829039;
- cdat->dsym_1095__CLASS_NREP_MATCH_LABEL_END.obj_len = 3;
+ cdat->dsym_1111__CLASS_NREP_MATCH_LABEL_END.obj_hash = 47829039;
+ cdat->dsym_1111__CLASS_NREP_MATCH_LABEL_END.obj_len = 3;
-/*inistring dstr_1096__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1185*/ meltfptr[1184] =
- (void *) &cdat->dstr_1096__CLASS_NREP_MATCH;
- cdat->dstr_1096__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1112__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1202*/ meltfptr[1201] =
+ (void *) &cdat->dstr_1112__CLASS_NREP_MATCH;
+ cdat->dstr_1112__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1096__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1112__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_LABEL_END",
- sizeof (cdat->dstr_1096__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1112__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ iniobj");
-/*iniobj dobj_1097__CLASS_NREP_MATCH_LABEL_END*/
-/*_.VALDATA___V1186*/ meltfptr[1185] =
- (void *) &cdat->dobj_1097__CLASS_NREP_MATCH_LABEL_END;
+/*iniobj dobj_1113__CLASS_NREP_MATCH_LABEL_END*/
+/*_.VALDATA___V1203*/ meltfptr[1202] =
+ (void *) &cdat->dobj_1113__CLASS_NREP_MATCH_LABEL_END;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1097__CLASS_NREP_MATCH_LABEL_END",
+ ("iniobj check.discr isobj dobj_1113__CLASS_NREP_MATCH_LABEL_END",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1097__CLASS_NREP_MATCH_LABEL_END",
+ ("iniobj check.discr objmagic dobj_1113__CLASS_NREP_MATCH_LABEL_END",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1097__CLASS_NREP_MATCH_LABEL_END.meltobj_class =
+ cdat->dobj_1113__CLASS_NREP_MATCH_LABEL_END.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1097__CLASS_NREP_MATCH_LABEL_END.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1097__CLASS_NREP_MATCH_LABEL_END.obj_hash = 549585533;
- cdat->dobj_1097__CLASS_NREP_MATCH_LABEL_END.obj_len = 8;
+ cdat->dobj_1113__CLASS_NREP_MATCH_LABEL_END.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1113__CLASS_NREP_MATCH_LABEL_END.obj_hash = 1022739270;
+ cdat->dobj_1113__CLASS_NREP_MATCH_LABEL_END.obj_len = 8;
-/*inistring dstr_1098__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1187*/ meltfptr[1186] =
- (void *) &cdat->dstr_1098__CLASS_NREP_MATCH;
- cdat->dstr_1098__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1114__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1204*/ meltfptr[1203] =
+ (void *) &cdat->dstr_1114__CLASS_NREP_MATCH;
+ cdat->dstr_1114__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1098__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1114__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_LABEL_END",
- sizeof (cdat->dstr_1098__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1114__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1099__CLASS_NREP_MATCH_LABEL_END */
- /*_.VALTUP___V1188*/ meltfptr[1187] =
- (void *) &cdat->dtup_1099__CLASS_NREP_MATCH_LABEL_END;
- cdat->dtup_1099__CLASS_NREP_MATCH_LABEL_END.discr =
+ /*inimult dtup_1115__CLASS_NREP_MATCH_LABEL_END */
+ /*_.VALTUP___V1205*/ meltfptr[1204] =
+ (void *) &cdat->dtup_1115__CLASS_NREP_MATCH_LABEL_END;
+ cdat->dtup_1115__CLASS_NREP_MATCH_LABEL_END.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1099__CLASS_NREP_MATCH_LABEL_END.nbval = 4;
- /*inimult dtup_1100__CLASS_NREP_MATCH_LABEL_END */
- /*_.VALTUP___V1189*/ meltfptr[1188] =
- (void *) &cdat->dtup_1100__CLASS_NREP_MATCH_LABEL_END;
- cdat->dtup_1100__CLASS_NREP_MATCH_LABEL_END.discr =
+ cdat->dtup_1115__CLASS_NREP_MATCH_LABEL_END.nbval = 4;
+ /*inimult dtup_1116__CLASS_NREP_MATCH_LABEL_END */
+ /*_.VALTUP___V1206*/ meltfptr[1205] =
+ (void *) &cdat->dtup_1116__CLASS_NREP_MATCH_LABEL_END;
+ cdat->dtup_1116__CLASS_NREP_MATCH_LABEL_END.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1100__CLASS_NREP_MATCH_LABEL_END.nbval = 2;
+ cdat->dtup_1116__CLASS_NREP_MATCH_LABEL_END.nbval = 2;
-/*iniobj dsym_1101__CLASS_NREP_MATCH_JUMP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1190*/ meltfptr[1189])
- /*_.VALDATA___V1190*/
- meltfptr[1189] = (void *) &cdat->dsym_1101__CLASS_NREP_MATCH_JUMP;
+/*iniobj dsym_1117__CLASS_NREP_MATCH_JUMP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1207*/ meltfptr[1206])
+ /*_.VALDATA___V1207*/
+ meltfptr[1206] = (void *) &cdat->dsym_1117__CLASS_NREP_MATCH_JUMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1101__CLASS_NREP_MATCH_JUMP",
+ ("iniobj check.discr isobj dsym_1117__CLASS_NREP_MATCH_JUMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1101__CLASS_NREP_MATCH_JUMP",
+ ("iniobj check.discr objmagic dsym_1117__CLASS_NREP_MATCH_JUMP",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1101__CLASS_NREP_MATCH_JUMP.meltobj_class =
+ cdat->dsym_1117__CLASS_NREP_MATCH_JUMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1101__CLASS_NREP_MATCH_JUMP.obj_hash = 677633544;
- cdat->dsym_1101__CLASS_NREP_MATCH_JUMP.obj_len = 3;
+ cdat->dsym_1117__CLASS_NREP_MATCH_JUMP.obj_hash = 677633544;
+ cdat->dsym_1117__CLASS_NREP_MATCH_JUMP.obj_len = 3;
-/*inistring dstr_1102__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1191*/ meltfptr[1190] =
- (void *) &cdat->dstr_1102__CLASS_NREP_MATCH;
- cdat->dstr_1102__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1118__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1208*/ meltfptr[1207] =
+ (void *) &cdat->dstr_1118__CLASS_NREP_MATCH;
+ cdat->dstr_1118__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1102__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1118__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_JUMP",
- sizeof (cdat->dstr_1102__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1118__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ iniobj");
-/*iniobj dobj_1103__CLASS_NREP_MATCH_JUMP*/
-/*_.VALDATA___V1192*/ meltfptr[1191] =
- (void *) &cdat->dobj_1103__CLASS_NREP_MATCH_JUMP;
+/*iniobj dobj_1119__CLASS_NREP_MATCH_JUMP*/
+/*_.VALDATA___V1209*/ meltfptr[1208] =
+ (void *) &cdat->dobj_1119__CLASS_NREP_MATCH_JUMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1103__CLASS_NREP_MATCH_JUMP",
+ ("iniobj check.discr isobj dobj_1119__CLASS_NREP_MATCH_JUMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1103__CLASS_NREP_MATCH_JUMP",
+ ("iniobj check.discr objmagic dobj_1119__CLASS_NREP_MATCH_JUMP",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1103__CLASS_NREP_MATCH_JUMP.meltobj_class =
+ cdat->dobj_1119__CLASS_NREP_MATCH_JUMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1103__CLASS_NREP_MATCH_JUMP.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1103__CLASS_NREP_MATCH_JUMP.obj_hash = 839353120;
- cdat->dobj_1103__CLASS_NREP_MATCH_JUMP.obj_len = 8;
+ cdat->dobj_1119__CLASS_NREP_MATCH_JUMP.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1119__CLASS_NREP_MATCH_JUMP.obj_hash = 1001303994;
+ cdat->dobj_1119__CLASS_NREP_MATCH_JUMP.obj_len = 8;
-/*inistring dstr_1104__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1193*/ meltfptr[1192] =
- (void *) &cdat->dstr_1104__CLASS_NREP_MATCH;
- cdat->dstr_1104__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1120__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1210*/ meltfptr[1209] =
+ (void *) &cdat->dstr_1120__CLASS_NREP_MATCH;
+ cdat->dstr_1120__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1104__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1120__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_JUMP",
- sizeof (cdat->dstr_1104__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1120__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1105__CLASS_NREP_MATCH_JUMP */
- /*_.VALTUP___V1194*/ meltfptr[1193] =
- (void *) &cdat->dtup_1105__CLASS_NREP_MATCH_JUMP;
- cdat->dtup_1105__CLASS_NREP_MATCH_JUMP.discr =
+ /*inimult dtup_1121__CLASS_NREP_MATCH_JUMP */
+ /*_.VALTUP___V1211*/ meltfptr[1210] =
+ (void *) &cdat->dtup_1121__CLASS_NREP_MATCH_JUMP;
+ cdat->dtup_1121__CLASS_NREP_MATCH_JUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1105__CLASS_NREP_MATCH_JUMP.nbval = 3;
- /*inimult dtup_1106__CLASS_NREP_MATCH_JUMP */
- /*_.VALTUP___V1197*/ meltfptr[1196] =
- (void *) &cdat->dtup_1106__CLASS_NREP_MATCH_JUMP;
- cdat->dtup_1106__CLASS_NREP_MATCH_JUMP.discr =
+ cdat->dtup_1121__CLASS_NREP_MATCH_JUMP.nbval = 3;
+ /*inimult dtup_1122__CLASS_NREP_MATCH_JUMP */
+ /*_.VALTUP___V1214*/ meltfptr[1213] =
+ (void *) &cdat->dtup_1122__CLASS_NREP_MATCH_JUMP;
+ cdat->dtup_1122__CLASS_NREP_MATCH_JUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1106__CLASS_NREP_MATCH_JUMP.nbval = 2;
+ cdat->dtup_1122__CLASS_NREP_MATCH_JUMP.nbval = 2;
-/*iniobj dsym_1107__NMJMP_LABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1198*/ meltfptr[1197])
- /*_.VALDATA___V1198*/
- meltfptr[1197] = (void *) &cdat->dsym_1107__NMJMP_LABEL;
+/*iniobj dsym_1123__NMJMP_LABEL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1215*/ meltfptr[1214])
+ /*_.VALDATA___V1215*/
+ meltfptr[1214] = (void *) &cdat->dsym_1123__NMJMP_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1107__NMJMP_LABEL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1123__NMJMP_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1107__NMJMP_LABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1123__NMJMP_LABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1107__NMJMP_LABEL.meltobj_class =
+ cdat->dsym_1123__NMJMP_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1107__NMJMP_LABEL.obj_hash = 589800906;
- cdat->dsym_1107__NMJMP_LABEL.obj_len = 3;
+ cdat->dsym_1123__NMJMP_LABEL.obj_hash = 589800906;
+ cdat->dsym_1123__NMJMP_LABEL.obj_len = 3;
-/*inistring dstr_1108__NMJMP_LABEL*/
- /*_.VALSTR___V1199*/ meltfptr[1198] =
- (void *) &cdat->dstr_1108__NMJMP_LABEL;
- cdat->dstr_1108__NMJMP_LABEL.discr =
+/*inistring dstr_1124__NMJMP_LABEL*/
+ /*_.VALSTR___V1216*/ meltfptr[1215] =
+ (void *) &cdat->dstr_1124__NMJMP_LABEL;
+ cdat->dstr_1124__NMJMP_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1108__NMJMP_LABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_1124__NMJMP_LABEL.val,
"NMJMP_LABEL",
- sizeof (cdat->dstr_1108__NMJMP_LABEL.val) -
+ sizeof (cdat->dstr_1124__NMJMP_LABEL.val) -
1);
/*^iniobj */
-/*iniobj dobj_1109__NMJMP_LABEL*/
-/*_.VALDATA___V1195*/ meltfptr[1194] =
- (void *) &cdat->dobj_1109__NMJMP_LABEL;
+/*iniobj dobj_1125__NMJMP_LABEL*/
+/*_.VALDATA___V1212*/ meltfptr[1211] =
+ (void *) &cdat->dobj_1125__NMJMP_LABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1109__NMJMP_LABEL",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1125__NMJMP_LABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1109__NMJMP_LABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1125__NMJMP_LABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1109__NMJMP_LABEL.meltobj_class =
+ cdat->dobj_1125__NMJMP_LABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1109__NMJMP_LABEL.obj_num = 1;
- cdat->dobj_1109__NMJMP_LABEL.obj_hash = 1019143538;
- cdat->dobj_1109__NMJMP_LABEL.obj_len = 4;
+ cdat->dobj_1125__NMJMP_LABEL.obj_num = 1;
+ cdat->dobj_1125__NMJMP_LABEL.obj_hash = 575288995;
+ cdat->dobj_1125__NMJMP_LABEL.obj_len = 4;
-/*inistring dstr_1110__NMJMP_LABEL*/
- /*_.VALSTR___V1196*/ meltfptr[1195] =
- (void *) &cdat->dstr_1110__NMJMP_LABEL;
- cdat->dstr_1110__NMJMP_LABEL.discr =
+/*inistring dstr_1126__NMJMP_LABEL*/
+ /*_.VALSTR___V1213*/ meltfptr[1212] =
+ (void *) &cdat->dstr_1126__NMJMP_LABEL;
+ cdat->dstr_1126__NMJMP_LABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1110__NMJMP_LABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_1126__NMJMP_LABEL.val,
"NMJMP_LABEL",
- sizeof (cdat->dstr_1110__NMJMP_LABEL.val) -
+ sizeof (cdat->dstr_1126__NMJMP_LABEL.val) -
1);
-/*iniobj dsym_1111__CLASS_NREP_MATCH_DATA_ACTION*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1200*/ meltfptr[1199])
- /*_.VALDATA___V1200*/
- meltfptr[1199] = (void *) &cdat->dsym_1111__CLASS_NREP_MATCH_DATA_ACTION;
+/*iniobj dsym_1127__CLASS_NREP_MATCH_DATA_ACTION*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1217*/ meltfptr[1216])
+ /*_.VALDATA___V1217*/
+ meltfptr[1216] = (void *) &cdat->dsym_1127__CLASS_NREP_MATCH_DATA_ACTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1111__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr isobj dsym_1127__CLASS_NREP_MATCH_DATA_ACTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1111__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr objmagic dsym_1127__CLASS_NREP_MATCH_DATA_ACTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1111__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
+ cdat->dsym_1127__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1111__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196;
- cdat->dsym_1111__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3;
+ cdat->dsym_1127__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196;
+ cdat->dsym_1127__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3;
-/*inistring dstr_1112__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1201*/ meltfptr[1200] =
- (void *) &cdat->dstr_1112__CLASS_NREP_MATCH;
- cdat->dstr_1112__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1128__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1218*/ meltfptr[1217] =
+ (void *) &cdat->dstr_1128__CLASS_NREP_MATCH;
+ cdat->dstr_1128__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1112__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1128__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_ACTION",
- sizeof (cdat->dstr_1112__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1128__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ iniobj");
-/*iniobj dobj_1113__CLASS_NREP_MATCH_DATA_ACTION*/
-/*_.VALDATA___V1202*/ meltfptr[1201] =
- (void *) &cdat->dobj_1113__CLASS_NREP_MATCH_DATA_ACTION;
+/*iniobj dobj_1129__CLASS_NREP_MATCH_DATA_ACTION*/
+/*_.VALDATA___V1219*/ meltfptr[1218] =
+ (void *) &cdat->dobj_1129__CLASS_NREP_MATCH_DATA_ACTION;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1113__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr isobj dobj_1129__CLASS_NREP_MATCH_DATA_ACTION",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1113__CLASS_NREP_MATCH_DATA_ACTION",
+ ("iniobj check.discr objmagic dobj_1129__CLASS_NREP_MATCH_DATA_ACTION",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1113__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
+ cdat->dobj_1129__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1113__CLASS_NREP_MATCH_DATA_ACTION.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1113__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 722900089;
- cdat->dobj_1113__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 8;
+ cdat->dobj_1129__CLASS_NREP_MATCH_DATA_ACTION.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1129__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 869769439;
+ cdat->dobj_1129__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 8;
-/*inistring dstr_1114__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1203*/ meltfptr[1202] =
- (void *) &cdat->dstr_1114__CLASS_NREP_MATCH;
- cdat->dstr_1114__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1130__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1220*/ meltfptr[1219] =
+ (void *) &cdat->dstr_1130__CLASS_NREP_MATCH;
+ cdat->dstr_1130__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1114__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1130__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_ACTION",
- sizeof (cdat->dstr_1114__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1130__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1115__CLASS_NREP_MATCH_DATA_ACTION */
- /*_.VALTUP___V1204*/ meltfptr[1203] =
- (void *) &cdat->dtup_1115__CLASS_NREP_MATCH_DATA_ACTION;
- cdat->dtup_1115__CLASS_NREP_MATCH_DATA_ACTION.discr =
+ /*inimult dtup_1131__CLASS_NREP_MATCH_DATA_ACTION */
+ /*_.VALTUP___V1221*/ meltfptr[1220] =
+ (void *) &cdat->dtup_1131__CLASS_NREP_MATCH_DATA_ACTION;
+ cdat->dtup_1131__CLASS_NREP_MATCH_DATA_ACTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1115__CLASS_NREP_MATCH_DATA_ACTION.nbval = 3;
- /*inimult dtup_1116__CLASS_NREP_MATCH_DATA_ACTION */
- /*_.VALTUP___V1207*/ meltfptr[1206] =
- (void *) &cdat->dtup_1116__CLASS_NREP_MATCH_DATA_ACTION;
- cdat->dtup_1116__CLASS_NREP_MATCH_DATA_ACTION.discr =
+ cdat->dtup_1131__CLASS_NREP_MATCH_DATA_ACTION.nbval = 3;
+ /*inimult dtup_1132__CLASS_NREP_MATCH_DATA_ACTION */
+ /*_.VALTUP___V1224*/ meltfptr[1223] =
+ (void *) &cdat->dtup_1132__CLASS_NREP_MATCH_DATA_ACTION;
+ cdat->dtup_1132__CLASS_NREP_MATCH_DATA_ACTION.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1116__CLASS_NREP_MATCH_DATA_ACTION.nbval = 2;
+ cdat->dtup_1132__CLASS_NREP_MATCH_DATA_ACTION.nbval = 2;
-/*iniobj dsym_1117__NMDAC_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1208*/ meltfptr[1207])
- /*_.VALDATA___V1208*/
- meltfptr[1207] = (void *) &cdat->dsym_1117__NMDAC_DATA;
+/*iniobj dsym_1133__NMDAC_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1225*/ meltfptr[1224])
+ /*_.VALDATA___V1225*/
+ meltfptr[1224] = (void *) &cdat->dsym_1133__NMDAC_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1117__NMDAC_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1133__NMDAC_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1117__NMDAC_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1133__NMDAC_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1117__NMDAC_DATA.meltobj_class =
+ cdat->dsym_1133__NMDAC_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1117__NMDAC_DATA.obj_hash = 309058146;
- cdat->dsym_1117__NMDAC_DATA.obj_len = 3;
+ cdat->dsym_1133__NMDAC_DATA.obj_hash = 309058146;
+ cdat->dsym_1133__NMDAC_DATA.obj_len = 3;
-/*inistring dstr_1118__NMDAC_DATA*/
- /*_.VALSTR___V1209*/ meltfptr[1208] = (void *) &cdat->dstr_1118__NMDAC_DATA;
- cdat->dstr_1118__NMDAC_DATA.discr =
+/*inistring dstr_1134__NMDAC_DATA*/
+ /*_.VALSTR___V1226*/ meltfptr[1225] = (void *) &cdat->dstr_1134__NMDAC_DATA;
+ cdat->dstr_1134__NMDAC_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1118__NMDAC_DATA.val, "NMDAC_DATA",
- sizeof (cdat->dstr_1118__NMDAC_DATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1134__NMDAC_DATA.val, "NMDAC_DATA",
+ sizeof (cdat->dstr_1134__NMDAC_DATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_1119__NMDAC_DATA*/
-/*_.VALDATA___V1205*/ meltfptr[1204] =
- (void *) &cdat->dobj_1119__NMDAC_DATA;
+/*iniobj dobj_1135__NMDAC_DATA*/
+/*_.VALDATA___V1222*/ meltfptr[1221] =
+ (void *) &cdat->dobj_1135__NMDAC_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1119__NMDAC_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1135__NMDAC_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1119__NMDAC_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1135__NMDAC_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1119__NMDAC_DATA.meltobj_class =
+ cdat->dobj_1135__NMDAC_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1119__NMDAC_DATA.obj_num = 1;
- cdat->dobj_1119__NMDAC_DATA.obj_hash = 293618501;
- cdat->dobj_1119__NMDAC_DATA.obj_len = 4;
+ cdat->dobj_1135__NMDAC_DATA.obj_num = 1;
+ cdat->dobj_1135__NMDAC_DATA.obj_hash = 1022808272;
+ cdat->dobj_1135__NMDAC_DATA.obj_len = 4;
-/*inistring dstr_1120__NMDAC_DATA*/
- /*_.VALSTR___V1206*/ meltfptr[1205] = (void *) &cdat->dstr_1120__NMDAC_DATA;
- cdat->dstr_1120__NMDAC_DATA.discr =
+/*inistring dstr_1136__NMDAC_DATA*/
+ /*_.VALSTR___V1223*/ meltfptr[1222] = (void *) &cdat->dstr_1136__NMDAC_DATA;
+ cdat->dstr_1136__NMDAC_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1120__NMDAC_DATA.val, "NMDAC_DATA",
- sizeof (cdat->dstr_1120__NMDAC_DATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1136__NMDAC_DATA.val, "NMDAC_DATA",
+ sizeof (cdat->dstr_1136__NMDAC_DATA.val) - 1);
-/*iniobj dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1210*/ meltfptr[1209])
- /*_.VALDATA___V1210*/
- meltfptr[1209] =
- (void *) &cdat->dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER;
+/*iniobj dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1227*/ meltfptr[1226])
+ /*_.VALDATA___V1227*/
+ meltfptr[1226] =
+ (void *) &cdat->dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr isobj dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr objmagic dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
+ cdat->dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553;
- cdat->dsym_1121__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3;
+ cdat->dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553;
+ cdat->dsym_1137__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3;
-/*inistring dstr_1122__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1211*/ meltfptr[1210] =
- (void *) &cdat->dstr_1122__CLASS_NREP_MATCH;
- cdat->dstr_1122__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1138__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1228*/ meltfptr[1227] =
+ (void *) &cdat->dstr_1138__CLASS_NREP_MATCH;
+ cdat->dstr_1138__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1122__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1138__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_INITIALIZER",
- sizeof (cdat->dstr_1122__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1138__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ iniobj");
-/*iniobj dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER*/
-/*_.VALDATA___V1212*/ meltfptr[1211] =
- (void *) &cdat->dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER;
+/*iniobj dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER*/
+/*_.VALDATA___V1229*/ meltfptr[1228] =
+ (void *) &cdat->dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr isobj dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER",
+ ("iniobj check.discr objmagic dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
+ cdat->dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_num =
+ cdat->dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 310119504;
- cdat->dobj_1123__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 8;
+ cdat->dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 846178956;
+ cdat->dobj_1139__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 8;
-/*inistring dstr_1124__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1213*/ meltfptr[1212] =
- (void *) &cdat->dstr_1124__CLASS_NREP_MATCH;
- cdat->dstr_1124__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1140__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1230*/ meltfptr[1229] =
+ (void *) &cdat->dstr_1140__CLASS_NREP_MATCH;
+ cdat->dstr_1140__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1124__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1140__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_INITIALIZER",
- sizeof (cdat->dstr_1124__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1140__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1125__CLASS_NREP_MATCH_DATA_INITIALIZER */
- /*_.VALTUP___V1214*/ meltfptr[1213] =
- (void *) &cdat->dtup_1125__CLASS_NREP_MATCH_DATA_INITIALIZER;
- cdat->dtup_1125__CLASS_NREP_MATCH_DATA_INITIALIZER.discr =
+ /*inimult dtup_1141__CLASS_NREP_MATCH_DATA_INITIALIZER */
+ /*_.VALTUP___V1231*/ meltfptr[1230] =
+ (void *) &cdat->dtup_1141__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ cdat->dtup_1141__CLASS_NREP_MATCH_DATA_INITIALIZER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1125__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 4;
- /*inimult dtup_1126__CLASS_NREP_MATCH_DATA_INITIALIZER */
- /*_.VALTUP___V1215*/ meltfptr[1214] =
- (void *) &cdat->dtup_1126__CLASS_NREP_MATCH_DATA_INITIALIZER;
- cdat->dtup_1126__CLASS_NREP_MATCH_DATA_INITIALIZER.discr =
+ cdat->dtup_1141__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 4;
+ /*inimult dtup_1142__CLASS_NREP_MATCH_DATA_INITIALIZER */
+ /*_.VALTUP___V1232*/ meltfptr[1231] =
+ (void *) &cdat->dtup_1142__CLASS_NREP_MATCH_DATA_INITIALIZER;
+ cdat->dtup_1142__CLASS_NREP_MATCH_DATA_INITIALIZER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1126__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 2;
+ cdat->dtup_1142__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 2;
-/*iniobj dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1216*/ meltfptr[1215])
- /*_.VALDATA___V1216*/
- meltfptr[1215] = (void *) &cdat->dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR;
+/*iniobj dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1233*/ meltfptr[1232])
+ /*_.VALDATA___V1233*/
+ meltfptr[1232] = (void *) &cdat->dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR",
+ ("iniobj check.discr isobj dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR",
+ ("iniobj check.discr objmagic dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class =
+ cdat->dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 569100648;
- cdat->dsym_1127__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 3;
+ cdat->dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 569100648;
+ cdat->dsym_1143__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 3;
-/*inistring dstr_1128__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1217*/ meltfptr[1216] =
- (void *) &cdat->dstr_1128__CLASS_NREP_MATCH;
- cdat->dstr_1128__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1144__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1234*/ meltfptr[1233] =
+ (void *) &cdat->dstr_1144__CLASS_NREP_MATCH;
+ cdat->dstr_1144__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1128__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1144__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_CLEAR",
- sizeof (cdat->dstr_1128__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1144__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ iniobj");
-/*iniobj dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR*/
-/*_.VALDATA___V1218*/ meltfptr[1217] =
- (void *) &cdat->dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR;
+/*iniobj dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR*/
+/*_.VALDATA___V1235*/ meltfptr[1234] =
+ (void *) &cdat->dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR",
+ ("iniobj check.discr isobj dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR",
+ ("iniobj check.discr objmagic dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class =
+ cdat->dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 417427637;
- cdat->dobj_1129__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 8;
+ cdat->dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 449289628;
+ cdat->dobj_1145__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 8;
-/*inistring dstr_1130__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1219*/ meltfptr[1218] =
- (void *) &cdat->dstr_1130__CLASS_NREP_MATCH;
- cdat->dstr_1130__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1146__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1236*/ meltfptr[1235] =
+ (void *) &cdat->dstr_1146__CLASS_NREP_MATCH;
+ cdat->dstr_1146__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1130__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1146__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_CLEAR",
- sizeof (cdat->dstr_1130__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1146__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1131__CLASS_NREP_MATCH_DATA_CLEAR */
- /*_.VALTUP___V1220*/ meltfptr[1219] =
- (void *) &cdat->dtup_1131__CLASS_NREP_MATCH_DATA_CLEAR;
- cdat->dtup_1131__CLASS_NREP_MATCH_DATA_CLEAR.discr =
+ /*inimult dtup_1147__CLASS_NREP_MATCH_DATA_CLEAR */
+ /*_.VALTUP___V1237*/ meltfptr[1236] =
+ (void *) &cdat->dtup_1147__CLASS_NREP_MATCH_DATA_CLEAR;
+ cdat->dtup_1147__CLASS_NREP_MATCH_DATA_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1131__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 4;
- /*inimult dtup_1132__CLASS_NREP_MATCH_DATA_CLEAR */
- /*_.VALTUP___V1221*/ meltfptr[1220] =
- (void *) &cdat->dtup_1132__CLASS_NREP_MATCH_DATA_CLEAR;
- cdat->dtup_1132__CLASS_NREP_MATCH_DATA_CLEAR.discr =
+ cdat->dtup_1147__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 4;
+ /*inimult dtup_1148__CLASS_NREP_MATCH_DATA_CLEAR */
+ /*_.VALTUP___V1238*/ meltfptr[1237] =
+ (void *) &cdat->dtup_1148__CLASS_NREP_MATCH_DATA_CLEAR;
+ cdat->dtup_1148__CLASS_NREP_MATCH_DATA_CLEAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1132__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 2;
+ cdat->dtup_1148__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 2;
-/*iniobj dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1222*/ meltfptr[1221])
- /*_.VALDATA___V1222*/
- meltfptr[1221] =
- (void *) &cdat->dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER;
+/*iniobj dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1239*/ meltfptr[1238])
+ /*_.VALDATA___V1239*/
+ meltfptr[1238] =
+ (void *) &cdat->dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER",
+ ("iniobj check.discr isobj dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER",
+ ("iniobj check.discr objmagic dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class =
+ cdat->dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 1028831781;
- cdat->dsym_1133__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 3;
+ cdat->dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 1028831781;
+ cdat->dsym_1149__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 3;
-/*inistring dstr_1134__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1223*/ meltfptr[1222] =
- (void *) &cdat->dstr_1134__CLASS_NREP_MATCH;
- cdat->dstr_1134__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1150__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1240*/ meltfptr[1239] =
+ (void *) &cdat->dstr_1150__CLASS_NREP_MATCH;
+ cdat->dstr_1150__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1134__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1150__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_FINALIZER",
- sizeof (cdat->dstr_1134__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1150__CLASS_NREP_MATCH.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ iniobj");
-/*iniobj dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER*/
-/*_.VALDATA___V1224*/ meltfptr[1223] =
- (void *) &cdat->dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER;
+/*iniobj dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER*/
+/*_.VALDATA___V1241*/ meltfptr[1240] =
+ (void *) &cdat->dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER",
+ ("iniobj check.discr isobj dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER",
+ ("iniobj check.discr objmagic dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class =
+ cdat->dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 738696114;
- cdat->dobj_1135__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 8;
+ cdat->dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 423457421;
+ cdat->dobj_1151__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 8;
-/*inistring dstr_1136__CLASS_NREP_MATCH*/
- /*_.VALSTR___V1225*/ meltfptr[1224] =
- (void *) &cdat->dstr_1136__CLASS_NREP_MATCH;
- cdat->dstr_1136__CLASS_NREP_MATCH.discr =
+/*inistring dstr_1152__CLASS_NREP_MATCH*/
+ /*_.VALSTR___V1242*/ meltfptr[1241] =
+ (void *) &cdat->dstr_1152__CLASS_NREP_MATCH;
+ cdat->dstr_1152__CLASS_NREP_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1136__CLASS_NREP_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1152__CLASS_NREP_MATCH.val,
"CLASS_NREP_MATCH_DATA_FINALIZER",
- sizeof (cdat->dstr_1136__CLASS_NREP_MATCH.
+ sizeof (cdat->dstr_1152__CLASS_NREP_MATCH.
val) - 1);
- /*inimult dtup_1137__CLASS_NREP_MATCH_DATA_FINALIZER */
- /*_.VALTUP___V1226*/ meltfptr[1225] =
- (void *) &cdat->dtup_1137__CLASS_NREP_MATCH_DATA_FINALIZER;
- cdat->dtup_1137__CLASS_NREP_MATCH_DATA_FINALIZER.discr =
+ /*inimult dtup_1153__CLASS_NREP_MATCH_DATA_FINALIZER */
+ /*_.VALTUP___V1243*/ meltfptr[1242] =
+ (void *) &cdat->dtup_1153__CLASS_NREP_MATCH_DATA_FINALIZER;
+ cdat->dtup_1153__CLASS_NREP_MATCH_DATA_FINALIZER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1137__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 4;
- /*inimult dtup_1138__CLASS_NREP_MATCH_DATA_FINALIZER */
- /*_.VALTUP___V1227*/ meltfptr[1226] =
- (void *) &cdat->dtup_1138__CLASS_NREP_MATCH_DATA_FINALIZER;
- cdat->dtup_1138__CLASS_NREP_MATCH_DATA_FINALIZER.discr =
+ cdat->dtup_1153__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 4;
+ /*inimult dtup_1154__CLASS_NREP_MATCH_DATA_FINALIZER */
+ /*_.VALTUP___V1244*/ meltfptr[1243] =
+ (void *) &cdat->dtup_1154__CLASS_NREP_MATCH_DATA_FINALIZER;
+ cdat->dtup_1154__CLASS_NREP_MATCH_DATA_FINALIZER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1138__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 2;
+ cdat->dtup_1154__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 2;
-/*iniobj dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1228*/ meltfptr[1227])
- /*_.VALDATA___V1228*/
- meltfptr[1227] = (void *) &cdat->dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A;
+/*iniobj dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1245*/ meltfptr[1244])
+ /*_.VALDATA___V1245*/
+ meltfptr[1244] = (void *) &cdat->dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A",
+ ("iniobj check.discr isobj dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A",
+ ("iniobj check.discr objmagic dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class =
+ cdat->dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 92344462;
- cdat->dsym_1139__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 3;
+ cdat->dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 92344462;
+ cdat->dsym_1155__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 3;
-/*inistring dstr_1140__CLASS_NREP_JUMP_*/
- /*_.VALSTR___V1229*/ meltfptr[1228] =
- (void *) &cdat->dstr_1140__CLASS_NREP_JUMP_;
- cdat->dstr_1140__CLASS_NREP_JUMP_.discr =
+/*inistring dstr_1156__CLASS_NREP_JUMP_*/
+ /*_.VALSTR___V1246*/ meltfptr[1245] =
+ (void *) &cdat->dstr_1156__CLASS_NREP_JUMP_;
+ cdat->dstr_1156__CLASS_NREP_JUMP_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1140__CLASS_NREP_JUMP_.val,
+ /*small inistring */ strncpy (cdat->dstr_1156__CLASS_NREP_JUMP_.val,
"CLASS_NREP_JUMP_WHEN_IS_A",
- sizeof (cdat->dstr_1140__CLASS_NREP_JUMP_.
+ sizeof (cdat->dstr_1156__CLASS_NREP_JUMP_.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ iniobj");
-/*iniobj dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A*/
-/*_.VALDATA___V1230*/ meltfptr[1229] =
- (void *) &cdat->dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A;
+/*iniobj dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A*/
+/*_.VALDATA___V1247*/ meltfptr[1246] =
+ (void *) &cdat->dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A",
+ ("iniobj check.discr isobj dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A",
+ ("iniobj check.discr objmagic dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class =
+ cdat->dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 24118143;
- cdat->dobj_1141__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 8;
+ cdat->dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A.obj_num = MELTOBMAG_OBJECT;
+ cdat->dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 888304464;
+ cdat->dobj_1157__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 8;
-/*inistring dstr_1142__CLASS_NREP_JUMP_*/
- /*_.VALSTR___V1231*/ meltfptr[1230] =
- (void *) &cdat->dstr_1142__CLASS_NREP_JUMP_;
- cdat->dstr_1142__CLASS_NREP_JUMP_.discr =
+/*inistring dstr_1158__CLASS_NREP_JUMP_*/
+ /*_.VALSTR___V1248*/ meltfptr[1247] =
+ (void *) &cdat->dstr_1158__CLASS_NREP_JUMP_;
+ cdat->dstr_1158__CLASS_NREP_JUMP_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1142__CLASS_NREP_JUMP_.val,
+ /*small inistring */ strncpy (cdat->dstr_1158__CLASS_NREP_JUMP_.val,
"CLASS_NREP_JUMP_WHEN_IS_A",
- sizeof (cdat->dstr_1142__CLASS_NREP_JUMP_.
+ sizeof (cdat->dstr_1158__CLASS_NREP_JUMP_.
val) - 1);
- /*inimult dtup_1143__CLASS_NREP_JUMP_WHEN_IS_A */
- /*_.VALTUP___V1232*/ meltfptr[1231] =
- (void *) &cdat->dtup_1143__CLASS_NREP_JUMP_WHEN_IS_A;
- cdat->dtup_1143__CLASS_NREP_JUMP_WHEN_IS_A.discr =
+ /*inimult dtup_1159__CLASS_NREP_JUMP_WHEN_IS_A */
+ /*_.VALTUP___V1249*/ meltfptr[1248] =
+ (void *) &cdat->dtup_1159__CLASS_NREP_JUMP_WHEN_IS_A;
+ cdat->dtup_1159__CLASS_NREP_JUMP_WHEN_IS_A.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1143__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 3;
- /*inimult dtup_1144__CLASS_NREP_JUMP_WHEN_IS_A */
- /*_.VALTUP___V1239*/ meltfptr[1238] =
- (void *) &cdat->dtup_1144__CLASS_NREP_JUMP_WHEN_IS_A;
- cdat->dtup_1144__CLASS_NREP_JUMP_WHEN_IS_A.discr =
+ cdat->dtup_1159__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 3;
+ /*inimult dtup_1160__CLASS_NREP_JUMP_WHEN_IS_A */
+ /*_.VALTUP___V1256*/ meltfptr[1255] =
+ (void *) &cdat->dtup_1160__CLASS_NREP_JUMP_WHEN_IS_A;
+ cdat->dtup_1160__CLASS_NREP_JUMP_WHEN_IS_A.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1144__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 4;
+ cdat->dtup_1160__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 4;
-/*iniobj dsym_1145__NTESTISA_VALUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1240*/ meltfptr[1239])
- /*_.VALDATA___V1240*/
- meltfptr[1239] = (void *) &cdat->dsym_1145__NTESTISA_VALUE;
+/*iniobj dsym_1161__NTESTISA_VALUE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1257*/ meltfptr[1256])
+ /*_.VALDATA___V1257*/
+ meltfptr[1256] = (void *) &cdat->dsym_1161__NTESTISA_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1145__NTESTISA_VALUE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1161__NTESTISA_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1145__NTESTISA_VALUE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1161__NTESTISA_VALUE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1145__NTESTISA_VALUE.meltobj_class =
+ cdat->dsym_1161__NTESTISA_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1145__NTESTISA_VALUE.obj_hash = 935519465;
- cdat->dsym_1145__NTESTISA_VALUE.obj_len = 3;
+ cdat->dsym_1161__NTESTISA_VALUE.obj_hash = 935519465;
+ cdat->dsym_1161__NTESTISA_VALUE.obj_len = 3;
-/*inistring dstr_1146__NTESTISA_VALUE*/
- /*_.VALSTR___V1241*/ meltfptr[1240] =
- (void *) &cdat->dstr_1146__NTESTISA_VALUE;
- cdat->dstr_1146__NTESTISA_VALUE.discr =
+/*inistring dstr_1162__NTESTISA_VALUE*/
+ /*_.VALSTR___V1258*/ meltfptr[1257] =
+ (void *) &cdat->dstr_1162__NTESTISA_VALUE;
+ cdat->dstr_1162__NTESTISA_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1146__NTESTISA_VALUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1162__NTESTISA_VALUE.val,
"NTESTISA_VALUE",
- sizeof (cdat->dstr_1146__NTESTISA_VALUE.val) -
+ sizeof (cdat->dstr_1162__NTESTISA_VALUE.val) -
1);
/*^iniobj */
-/*iniobj dobj_1147__NTESTISA_VALUE*/
-/*_.VALDATA___V1233*/ meltfptr[1232] =
- (void *) &cdat->dobj_1147__NTESTISA_VALUE;
+/*iniobj dobj_1163__NTESTISA_VALUE*/
+/*_.VALDATA___V1250*/ meltfptr[1249] =
+ (void *) &cdat->dobj_1163__NTESTISA_VALUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1147__NTESTISA_VALUE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1163__NTESTISA_VALUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1147__NTESTISA_VALUE",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1163__NTESTISA_VALUE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1147__NTESTISA_VALUE.meltobj_class =
+ cdat->dobj_1163__NTESTISA_VALUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1147__NTESTISA_VALUE.obj_num = 1;
- cdat->dobj_1147__NTESTISA_VALUE.obj_hash = 142353893;
- cdat->dobj_1147__NTESTISA_VALUE.obj_len = 4;
+ cdat->dobj_1163__NTESTISA_VALUE.obj_num = 1;
+ cdat->dobj_1163__NTESTISA_VALUE.obj_hash = 696129770;
+ cdat->dobj_1163__NTESTISA_VALUE.obj_len = 4;
-/*inistring dstr_1148__NTESTISA_VALUE*/
- /*_.VALSTR___V1234*/ meltfptr[1233] =
- (void *) &cdat->dstr_1148__NTESTISA_VALUE;
- cdat->dstr_1148__NTESTISA_VALUE.discr =
+/*inistring dstr_1164__NTESTISA_VALUE*/
+ /*_.VALSTR___V1251*/ meltfptr[1250] =
+ (void *) &cdat->dstr_1164__NTESTISA_VALUE;
+ cdat->dstr_1164__NTESTISA_VALUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1148__NTESTISA_VALUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1164__NTESTISA_VALUE.val,
"NTESTISA_VALUE",
- sizeof (cdat->dstr_1148__NTESTISA_VALUE.val) -
+ sizeof (cdat->dstr_1164__NTESTISA_VALUE.val) -
1);
-/*iniobj dsym_1149__NTESTISA_CLASS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1242*/ meltfptr[1241])
- /*_.VALDATA___V1242*/
- meltfptr[1241] = (void *) &cdat->dsym_1149__NTESTISA_CLASS;
+/*iniobj dsym_1165__NTESTISA_CLASS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1259*/ meltfptr[1258])
+ /*_.VALDATA___V1259*/
+ meltfptr[1258] = (void *) &cdat->dsym_1165__NTESTISA_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1149__NTESTISA_CLASS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1165__NTESTISA_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1149__NTESTISA_CLASS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1165__NTESTISA_CLASS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1149__NTESTISA_CLASS.meltobj_class =
+ cdat->dsym_1165__NTESTISA_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1149__NTESTISA_CLASS.obj_hash = 446855945;
- cdat->dsym_1149__NTESTISA_CLASS.obj_len = 3;
+ cdat->dsym_1165__NTESTISA_CLASS.obj_hash = 446855945;
+ cdat->dsym_1165__NTESTISA_CLASS.obj_len = 3;
-/*inistring dstr_1150__NTESTISA_CLASS*/
- /*_.VALSTR___V1243*/ meltfptr[1242] =
- (void *) &cdat->dstr_1150__NTESTISA_CLASS;
- cdat->dstr_1150__NTESTISA_CLASS.discr =
+/*inistring dstr_1166__NTESTISA_CLASS*/
+ /*_.VALSTR___V1260*/ meltfptr[1259] =
+ (void *) &cdat->dstr_1166__NTESTISA_CLASS;
+ cdat->dstr_1166__NTESTISA_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1150__NTESTISA_CLASS.val,
+ /*small inistring */ strncpy (cdat->dstr_1166__NTESTISA_CLASS.val,
"NTESTISA_CLASS",
- sizeof (cdat->dstr_1150__NTESTISA_CLASS.val) -
+ sizeof (cdat->dstr_1166__NTESTISA_CLASS.val) -
1);
/*^iniobj */
-/*iniobj dobj_1151__NTESTISA_CLASS*/
-/*_.VALDATA___V1235*/ meltfptr[1234] =
- (void *) &cdat->dobj_1151__NTESTISA_CLASS;
+/*iniobj dobj_1167__NTESTISA_CLASS*/
+/*_.VALDATA___V1252*/ meltfptr[1251] =
+ (void *) &cdat->dobj_1167__NTESTISA_CLASS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1151__NTESTISA_CLASS",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1167__NTESTISA_CLASS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1151__NTESTISA_CLASS",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1167__NTESTISA_CLASS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1151__NTESTISA_CLASS.meltobj_class =
+ cdat->dobj_1167__NTESTISA_CLASS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1151__NTESTISA_CLASS.obj_num = 2;
- cdat->dobj_1151__NTESTISA_CLASS.obj_hash = 60044329;
- cdat->dobj_1151__NTESTISA_CLASS.obj_len = 4;
+ cdat->dobj_1167__NTESTISA_CLASS.obj_num = 2;
+ cdat->dobj_1167__NTESTISA_CLASS.obj_hash = 1052641343;
+ cdat->dobj_1167__NTESTISA_CLASS.obj_len = 4;
-/*inistring dstr_1152__NTESTISA_CLASS*/
- /*_.VALSTR___V1236*/ meltfptr[1235] =
- (void *) &cdat->dstr_1152__NTESTISA_CLASS;
- cdat->dstr_1152__NTESTISA_CLASS.discr =
+/*inistring dstr_1168__NTESTISA_CLASS*/
+ /*_.VALSTR___V1253*/ meltfptr[1252] =
+ (void *) &cdat->dstr_1168__NTESTISA_CLASS;
+ cdat->dstr_1168__NTESTISA_CLASS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1152__NTESTISA_CLASS.val,
+ /*small inistring */ strncpy (cdat->dstr_1168__NTESTISA_CLASS.val,
"NTESTISA_CLASS",
- sizeof (cdat->dstr_1152__NTESTISA_CLASS.val) -
+ sizeof (cdat->dstr_1168__NTESTISA_CLASS.val) -
1);
-/*iniobj dsym_1153__NTESTISA_JUMP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1244*/ meltfptr[1243])
- /*_.VALDATA___V1244*/
- meltfptr[1243] = (void *) &cdat->dsym_1153__NTESTISA_JUMP;
+/*iniobj dsym_1169__NTESTISA_JUMP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1261*/ meltfptr[1260])
+ /*_.VALDATA___V1261*/
+ meltfptr[1260] = (void *) &cdat->dsym_1169__NTESTISA_JUMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1153__NTESTISA_JUMP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1169__NTESTISA_JUMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1153__NTESTISA_JUMP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1169__NTESTISA_JUMP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1153__NTESTISA_JUMP.meltobj_class =
+ cdat->dsym_1169__NTESTISA_JUMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1153__NTESTISA_JUMP.obj_hash = 36616436;
- cdat->dsym_1153__NTESTISA_JUMP.obj_len = 3;
+ cdat->dsym_1169__NTESTISA_JUMP.obj_hash = 36616436;
+ cdat->dsym_1169__NTESTISA_JUMP.obj_len = 3;
-/*inistring dstr_1154__NTESTISA_JUMP*/
- /*_.VALSTR___V1245*/ meltfptr[1244] =
- (void *) &cdat->dstr_1154__NTESTISA_JUMP;
- cdat->dstr_1154__NTESTISA_JUMP.discr =
+/*inistring dstr_1170__NTESTISA_JUMP*/
+ /*_.VALSTR___V1262*/ meltfptr[1261] =
+ (void *) &cdat->dstr_1170__NTESTISA_JUMP;
+ cdat->dstr_1170__NTESTISA_JUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1154__NTESTISA_JUMP.val,
+ /*small inistring */ strncpy (cdat->dstr_1170__NTESTISA_JUMP.val,
"NTESTISA_JUMP",
- sizeof (cdat->dstr_1154__NTESTISA_JUMP.val) -
+ sizeof (cdat->dstr_1170__NTESTISA_JUMP.val) -
1);
/*^iniobj */
-/*iniobj dobj_1155__NTESTISA_JUMP*/
-/*_.VALDATA___V1237*/ meltfptr[1236] =
- (void *) &cdat->dobj_1155__NTESTISA_JUMP;
+/*iniobj dobj_1171__NTESTISA_JUMP*/
+/*_.VALDATA___V1254*/ meltfptr[1253] =
+ (void *) &cdat->dobj_1171__NTESTISA_JUMP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1155__NTESTISA_JUMP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1171__NTESTISA_JUMP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1155__NTESTISA_JUMP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1171__NTESTISA_JUMP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1155__NTESTISA_JUMP.meltobj_class =
+ cdat->dobj_1171__NTESTISA_JUMP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1155__NTESTISA_JUMP.obj_num = 3;
- cdat->dobj_1155__NTESTISA_JUMP.obj_hash = 918740952;
- cdat->dobj_1155__NTESTISA_JUMP.obj_len = 4;
+ cdat->dobj_1171__NTESTISA_JUMP.obj_num = 3;
+ cdat->dobj_1171__NTESTISA_JUMP.obj_hash = 325862937;
+ cdat->dobj_1171__NTESTISA_JUMP.obj_len = 4;
-/*inistring dstr_1156__NTESTISA_JUMP*/
- /*_.VALSTR___V1238*/ meltfptr[1237] =
- (void *) &cdat->dstr_1156__NTESTISA_JUMP;
- cdat->dstr_1156__NTESTISA_JUMP.discr =
+/*inistring dstr_1172__NTESTISA_JUMP*/
+ /*_.VALSTR___V1255*/ meltfptr[1254] =
+ (void *) &cdat->dstr_1172__NTESTISA_JUMP;
+ cdat->dstr_1172__NTESTISA_JUMP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1156__NTESTISA_JUMP.val,
+ /*small inistring */ strncpy (cdat->dstr_1172__NTESTISA_JUMP.val,
"NTESTISA_JUMP",
- sizeof (cdat->dstr_1156__NTESTISA_JUMP.val) -
+ sizeof (cdat->dstr_1172__NTESTISA_JUMP.val) -
1);
-/*iniobj dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1246*/ meltfptr[1245])
- /*_.VALDATA___V1246*/
- meltfptr[1245] =
- (void *) &cdat->dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT;
+/*iniobj dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1263*/ meltfptr[1262])
+ /*_.VALDATA___V1263*/
+ meltfptr[1262] =
+ (void *) &cdat->dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT",
+ ("iniobj check.discr isobj dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT",
+ ("iniobj check.discr objmagic dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class =
+ cdat->dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 153403683;
- cdat->dsym_1157__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 3;
+ cdat->dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 153403683;
+ cdat->dsym_1173__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 3;
-/*inistring dstr_1158__CLASS_MATCH_NORM*/
- /*_.VALSTR___V1247*/ meltfptr[1246] =
- (void *) &cdat->dstr_1158__CLASS_MATCH_NORM;
- cdat->dstr_1158__CLASS_MATCH_NORM.discr =
+/*inistring dstr_1174__CLASS_MATCH_NORM*/
+ /*_.VALSTR___V1264*/ meltfptr[1263] =
+ (void *) &cdat->dstr_1174__CLASS_MATCH_NORM;
+ cdat->dstr_1174__CLASS_MATCH_NORM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1158__CLASS_MATCH_NORM.val,
+ /*small inistring */ strncpy (cdat->dstr_1174__CLASS_MATCH_NORM.val,
"CLASS_MATCH_NORMALIZATION_CONTEXT",
- sizeof (cdat->dstr_1158__CLASS_MATCH_NORM.
+ sizeof (cdat->dstr_1174__CLASS_MATCH_NORM.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ iniobj");
-/*iniobj dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT*/
-/*_.VALDATA___V1248*/ meltfptr[1247] =
- (void *) &cdat->dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT;
+/*iniobj dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT*/
+/*_.VALDATA___V1265*/ meltfptr[1264] =
+ (void *) &cdat->dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT",
+ ("iniobj check.discr isobj dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_CLASS)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT",
+ ("iniobj check.discr objmagic dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class =
+ cdat->dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
- cdat->dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_num =
+ cdat->dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_num =
MELTOBMAG_OBJECT;
- cdat->dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 586444274;
- cdat->dobj_1159__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 8;
+ cdat->dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 987903687;
+ cdat->dobj_1175__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 8;
-/*inistring dstr_1160__CLASS_MATCH_NORM*/
- /*_.VALSTR___V1249*/ meltfptr[1248] =
- (void *) &cdat->dstr_1160__CLASS_MATCH_NORM;
- cdat->dstr_1160__CLASS_MATCH_NORM.discr =
+/*inistring dstr_1176__CLASS_MATCH_NORM*/
+ /*_.VALSTR___V1266*/ meltfptr[1265] =
+ (void *) &cdat->dstr_1176__CLASS_MATCH_NORM;
+ cdat->dstr_1176__CLASS_MATCH_NORM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1160__CLASS_MATCH_NORM.val,
+ /*small inistring */ strncpy (cdat->dstr_1176__CLASS_MATCH_NORM.val,
"CLASS_MATCH_NORMALIZATION_CONTEXT",
- sizeof (cdat->dstr_1160__CLASS_MATCH_NORM.
+ sizeof (cdat->dstr_1176__CLASS_MATCH_NORM.
val) - 1);
- /*inimult dtup_1161__CLASS_MATCH_NORMALIZATION_CONTEXT */
- /*_.VALTUP___V1250*/ meltfptr[1249] =
- (void *) &cdat->dtup_1161__CLASS_MATCH_NORMALIZATION_CONTEXT;
- cdat->dtup_1161__CLASS_MATCH_NORMALIZATION_CONTEXT.discr =
+ /*inimult dtup_1177__CLASS_MATCH_NORMALIZATION_CONTEXT */
+ /*_.VALTUP___V1267*/ meltfptr[1266] =
+ (void *) &cdat->dtup_1177__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ cdat->dtup_1177__CLASS_MATCH_NORMALIZATION_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLASS_SEQUENCE))));
- cdat->dtup_1161__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 1;
- /*inimult dtup_1162__CLASS_MATCH_NORMALIZATION_CONTEXT */
- /*_.VALTUP___V1271*/ meltfptr[1270] =
- (void *) &cdat->dtup_1162__CLASS_MATCH_NORMALIZATION_CONTEXT;
- cdat->dtup_1162__CLASS_MATCH_NORMALIZATION_CONTEXT.discr =
+ cdat->dtup_1177__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 1;
+ /*inimult dtup_1178__CLASS_MATCH_NORMALIZATION_CONTEXT */
+ /*_.VALTUP___V1288*/ meltfptr[1287] =
+ (void *) &cdat->dtup_1178__CLASS_MATCH_NORMALIZATION_CONTEXT;
+ cdat->dtup_1178__CLASS_MATCH_NORMALIZATION_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_FIELD_SEQUENCE))));
- cdat->dtup_1162__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 10;
+ cdat->dtup_1178__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 10;
-/*iniobj dsym_1163__MATNORX_RESLOC*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1272*/ meltfptr[1271])
- /*_.VALDATA___V1272*/
- meltfptr[1271] = (void *) &cdat->dsym_1163__MATNORX_RESLOC;
+/*iniobj dsym_1179__MATNORX_RESLOC*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1289*/ meltfptr[1288])
+ /*_.VALDATA___V1289*/
+ meltfptr[1288] = (void *) &cdat->dsym_1179__MATNORX_RESLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1163__MATNORX_RESLOC",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1179__MATNORX_RESLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1163__MATNORX_RESLOC",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1179__MATNORX_RESLOC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1163__MATNORX_RESLOC.meltobj_class =
+ cdat->dsym_1179__MATNORX_RESLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1163__MATNORX_RESLOC.obj_hash = 570941571;
- cdat->dsym_1163__MATNORX_RESLOC.obj_len = 3;
+ cdat->dsym_1179__MATNORX_RESLOC.obj_hash = 570941571;
+ cdat->dsym_1179__MATNORX_RESLOC.obj_len = 3;
-/*inistring dstr_1164__MATNORX_RESLOC*/
- /*_.VALSTR___V1273*/ meltfptr[1272] =
- (void *) &cdat->dstr_1164__MATNORX_RESLOC;
- cdat->dstr_1164__MATNORX_RESLOC.discr =
+/*inistring dstr_1180__MATNORX_RESLOC*/
+ /*_.VALSTR___V1290*/ meltfptr[1289] =
+ (void *) &cdat->dstr_1180__MATNORX_RESLOC;
+ cdat->dstr_1180__MATNORX_RESLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1164__MATNORX_RESLOC.val,
+ /*small inistring */ strncpy (cdat->dstr_1180__MATNORX_RESLOC.val,
"MATNORX_RESLOC",
- sizeof (cdat->dstr_1164__MATNORX_RESLOC.val) -
+ sizeof (cdat->dstr_1180__MATNORX_RESLOC.val) -
1);
/*^iniobj */
-/*iniobj dobj_1165__MATNORX_RESLOC*/
-/*_.VALDATA___V1251*/ meltfptr[1250] =
- (void *) &cdat->dobj_1165__MATNORX_RESLOC;
+/*iniobj dobj_1181__MATNORX_RESLOC*/
+/*_.VALDATA___V1268*/ meltfptr[1267] =
+ (void *) &cdat->dobj_1181__MATNORX_RESLOC;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1165__MATNORX_RESLOC",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1181__MATNORX_RESLOC",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1165__MATNORX_RESLOC",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1181__MATNORX_RESLOC",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1165__MATNORX_RESLOC.meltobj_class =
+ cdat->dobj_1181__MATNORX_RESLOC.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1165__MATNORX_RESLOC.obj_num = 0;
- cdat->dobj_1165__MATNORX_RESLOC.obj_hash = 139798726;
- cdat->dobj_1165__MATNORX_RESLOC.obj_len = 4;
+ cdat->dobj_1181__MATNORX_RESLOC.obj_num = 0;
+ cdat->dobj_1181__MATNORX_RESLOC.obj_hash = 799914853;
+ cdat->dobj_1181__MATNORX_RESLOC.obj_len = 4;
-/*inistring dstr_1166__MATNORX_RESLOC*/
- /*_.VALSTR___V1252*/ meltfptr[1251] =
- (void *) &cdat->dstr_1166__MATNORX_RESLOC;
- cdat->dstr_1166__MATNORX_RESLOC.discr =
+/*inistring dstr_1182__MATNORX_RESLOC*/
+ /*_.VALSTR___V1269*/ meltfptr[1268] =
+ (void *) &cdat->dstr_1182__MATNORX_RESLOC;
+ cdat->dstr_1182__MATNORX_RESLOC.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1166__MATNORX_RESLOC.val,
+ /*small inistring */ strncpy (cdat->dstr_1182__MATNORX_RESLOC.val,
"MATNORX_RESLOC",
- sizeof (cdat->dstr_1166__MATNORX_RESLOC.val) -
+ sizeof (cdat->dstr_1182__MATNORX_RESLOC.val) -
1);
-/*iniobj dsym_1167__MATNORX_NMATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1274*/ meltfptr[1273])
- /*_.VALDATA___V1274*/
- meltfptr[1273] = (void *) &cdat->dsym_1167__MATNORX_NMATCH;
+/*iniobj dsym_1183__MATNORX_NMATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1291*/ meltfptr[1290])
+ /*_.VALDATA___V1291*/
+ meltfptr[1290] = (void *) &cdat->dsym_1183__MATNORX_NMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1167__MATNORX_NMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1183__MATNORX_NMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1167__MATNORX_NMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1183__MATNORX_NMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1167__MATNORX_NMATCH.meltobj_class =
+ cdat->dsym_1183__MATNORX_NMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1167__MATNORX_NMATCH.obj_hash = 653687349;
- cdat->dsym_1167__MATNORX_NMATCH.obj_len = 3;
+ cdat->dsym_1183__MATNORX_NMATCH.obj_hash = 653687349;
+ cdat->dsym_1183__MATNORX_NMATCH.obj_len = 3;
-/*inistring dstr_1168__MATNORX_NMATCH*/
- /*_.VALSTR___V1275*/ meltfptr[1274] =
- (void *) &cdat->dstr_1168__MATNORX_NMATCH;
- cdat->dstr_1168__MATNORX_NMATCH.discr =
+/*inistring dstr_1184__MATNORX_NMATCH*/
+ /*_.VALSTR___V1292*/ meltfptr[1291] =
+ (void *) &cdat->dstr_1184__MATNORX_NMATCH;
+ cdat->dstr_1184__MATNORX_NMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1168__MATNORX_NMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1184__MATNORX_NMATCH.val,
"MATNORX_NMATCH",
- sizeof (cdat->dstr_1168__MATNORX_NMATCH.val) -
+ sizeof (cdat->dstr_1184__MATNORX_NMATCH.val) -
1);
/*^iniobj */
-/*iniobj dobj_1169__MATNORX_NMATCH*/
-/*_.VALDATA___V1253*/ meltfptr[1252] =
- (void *) &cdat->dobj_1169__MATNORX_NMATCH;
+/*iniobj dobj_1185__MATNORX_NMATCH*/
+/*_.VALDATA___V1270*/ meltfptr[1269] =
+ (void *) &cdat->dobj_1185__MATNORX_NMATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1169__MATNORX_NMATCH",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1185__MATNORX_NMATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1169__MATNORX_NMATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1185__MATNORX_NMATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1169__MATNORX_NMATCH.meltobj_class =
+ cdat->dobj_1185__MATNORX_NMATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1169__MATNORX_NMATCH.obj_num = 1;
- cdat->dobj_1169__MATNORX_NMATCH.obj_hash = 132227472;
- cdat->dobj_1169__MATNORX_NMATCH.obj_len = 4;
+ cdat->dobj_1185__MATNORX_NMATCH.obj_num = 1;
+ cdat->dobj_1185__MATNORX_NMATCH.obj_hash = 735618600;
+ cdat->dobj_1185__MATNORX_NMATCH.obj_len = 4;
-/*inistring dstr_1170__MATNORX_NMATCH*/
- /*_.VALSTR___V1254*/ meltfptr[1253] =
- (void *) &cdat->dstr_1170__MATNORX_NMATCH;
- cdat->dstr_1170__MATNORX_NMATCH.discr =
+/*inistring dstr_1186__MATNORX_NMATCH*/
+ /*_.VALSTR___V1271*/ meltfptr[1270] =
+ (void *) &cdat->dstr_1186__MATNORX_NMATCH;
+ cdat->dstr_1186__MATNORX_NMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1170__MATNORX_NMATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1186__MATNORX_NMATCH.val,
"MATNORX_NMATCH",
- sizeof (cdat->dstr_1170__MATNORX_NMATCH.val) -
+ sizeof (cdat->dstr_1186__MATNORX_NMATCH.val) -
1);
-/*iniobj dsym_1171__MATNORX_DATAMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1276*/ meltfptr[1275])
- /*_.VALDATA___V1276*/
- meltfptr[1275] = (void *) &cdat->dsym_1171__MATNORX_DATAMAP;
+/*iniobj dsym_1187__MATNORX_DATAMAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1293*/ meltfptr[1292])
+ /*_.VALDATA___V1293*/
+ meltfptr[1292] = (void *) &cdat->dsym_1187__MATNORX_DATAMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1171__MATNORX_DATAMAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1187__MATNORX_DATAMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1171__MATNORX_DATAMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1187__MATNORX_DATAMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1171__MATNORX_DATAMAP.meltobj_class =
+ cdat->dsym_1187__MATNORX_DATAMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1171__MATNORX_DATAMAP.obj_hash = 268079278;
- cdat->dsym_1171__MATNORX_DATAMAP.obj_len = 3;
+ cdat->dsym_1187__MATNORX_DATAMAP.obj_hash = 268079278;
+ cdat->dsym_1187__MATNORX_DATAMAP.obj_len = 3;
-/*inistring dstr_1172__MATNORX_DATAMAP*/
- /*_.VALSTR___V1277*/ meltfptr[1276] =
- (void *) &cdat->dstr_1172__MATNORX_DATAMAP;
- cdat->dstr_1172__MATNORX_DATAMAP.discr =
+/*inistring dstr_1188__MATNORX_DATAMAP*/
+ /*_.VALSTR___V1294*/ meltfptr[1293] =
+ (void *) &cdat->dstr_1188__MATNORX_DATAMAP;
+ cdat->dstr_1188__MATNORX_DATAMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1172__MATNORX_DATAMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1188__MATNORX_DATAMAP.val,
"MATNORX_DATAMAP",
- sizeof (cdat->dstr_1172__MATNORX_DATAMAP.
+ sizeof (cdat->dstr_1188__MATNORX_DATAMAP.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1173__MATNORX_DATAMAP*/
-/*_.VALDATA___V1255*/ meltfptr[1254] =
- (void *) &cdat->dobj_1173__MATNORX_DATAMAP;
+/*iniobj dobj_1189__MATNORX_DATAMAP*/
+/*_.VALDATA___V1272*/ meltfptr[1271] =
+ (void *) &cdat->dobj_1189__MATNORX_DATAMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1173__MATNORX_DATAMAP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1189__MATNORX_DATAMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1173__MATNORX_DATAMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1189__MATNORX_DATAMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1173__MATNORX_DATAMAP.meltobj_class =
+ cdat->dobj_1189__MATNORX_DATAMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1173__MATNORX_DATAMAP.obj_num = 2;
- cdat->dobj_1173__MATNORX_DATAMAP.obj_hash = 878090593;
- cdat->dobj_1173__MATNORX_DATAMAP.obj_len = 4;
+ cdat->dobj_1189__MATNORX_DATAMAP.obj_num = 2;
+ cdat->dobj_1189__MATNORX_DATAMAP.obj_hash = 725249722;
+ cdat->dobj_1189__MATNORX_DATAMAP.obj_len = 4;
-/*inistring dstr_1174__MATNORX_DATAMAP*/
- /*_.VALSTR___V1256*/ meltfptr[1255] =
- (void *) &cdat->dstr_1174__MATNORX_DATAMAP;
- cdat->dstr_1174__MATNORX_DATAMAP.discr =
+/*inistring dstr_1190__MATNORX_DATAMAP*/
+ /*_.VALSTR___V1273*/ meltfptr[1272] =
+ (void *) &cdat->dstr_1190__MATNORX_DATAMAP;
+ cdat->dstr_1190__MATNORX_DATAMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1174__MATNORX_DATAMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1190__MATNORX_DATAMAP.val,
"MATNORX_DATAMAP",
- sizeof (cdat->dstr_1174__MATNORX_DATAMAP.
+ sizeof (cdat->dstr_1190__MATNORX_DATAMAP.
val) - 1);
-/*iniobj dsym_1175__MATNORX_FLAGMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1278*/ meltfptr[1277])
- /*_.VALDATA___V1278*/
- meltfptr[1277] = (void *) &cdat->dsym_1175__MATNORX_FLAGMAP;
+/*iniobj dsym_1191__MATNORX_FLAGMAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1295*/ meltfptr[1294])
+ /*_.VALDATA___V1295*/
+ meltfptr[1294] = (void *) &cdat->dsym_1191__MATNORX_FLAGMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1175__MATNORX_FLAGMAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1191__MATNORX_FLAGMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1175__MATNORX_FLAGMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1191__MATNORX_FLAGMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1175__MATNORX_FLAGMAP.meltobj_class =
+ cdat->dsym_1191__MATNORX_FLAGMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1175__MATNORX_FLAGMAP.obj_hash = 841099985;
- cdat->dsym_1175__MATNORX_FLAGMAP.obj_len = 3;
+ cdat->dsym_1191__MATNORX_FLAGMAP.obj_hash = 841099985;
+ cdat->dsym_1191__MATNORX_FLAGMAP.obj_len = 3;
-/*inistring dstr_1176__MATNORX_FLAGMAP*/
- /*_.VALSTR___V1279*/ meltfptr[1278] =
- (void *) &cdat->dstr_1176__MATNORX_FLAGMAP;
- cdat->dstr_1176__MATNORX_FLAGMAP.discr =
+/*inistring dstr_1192__MATNORX_FLAGMAP*/
+ /*_.VALSTR___V1296*/ meltfptr[1295] =
+ (void *) &cdat->dstr_1192__MATNORX_FLAGMAP;
+ cdat->dstr_1192__MATNORX_FLAGMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1176__MATNORX_FLAGMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1192__MATNORX_FLAGMAP.val,
"MATNORX_FLAGMAP",
- sizeof (cdat->dstr_1176__MATNORX_FLAGMAP.
+ sizeof (cdat->dstr_1192__MATNORX_FLAGMAP.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1177__MATNORX_FLAGMAP*/
-/*_.VALDATA___V1257*/ meltfptr[1256] =
- (void *) &cdat->dobj_1177__MATNORX_FLAGMAP;
+/*iniobj dobj_1193__MATNORX_FLAGMAP*/
+/*_.VALDATA___V1274*/ meltfptr[1273] =
+ (void *) &cdat->dobj_1193__MATNORX_FLAGMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1177__MATNORX_FLAGMAP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1193__MATNORX_FLAGMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1177__MATNORX_FLAGMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1193__MATNORX_FLAGMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1177__MATNORX_FLAGMAP.meltobj_class =
+ cdat->dobj_1193__MATNORX_FLAGMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1177__MATNORX_FLAGMAP.obj_num = 3;
- cdat->dobj_1177__MATNORX_FLAGMAP.obj_hash = 629115853;
- cdat->dobj_1177__MATNORX_FLAGMAP.obj_len = 4;
+ cdat->dobj_1193__MATNORX_FLAGMAP.obj_num = 3;
+ cdat->dobj_1193__MATNORX_FLAGMAP.obj_hash = 986274128;
+ cdat->dobj_1193__MATNORX_FLAGMAP.obj_len = 4;
-/*inistring dstr_1178__MATNORX_FLAGMAP*/
- /*_.VALSTR___V1258*/ meltfptr[1257] =
- (void *) &cdat->dstr_1178__MATNORX_FLAGMAP;
- cdat->dstr_1178__MATNORX_FLAGMAP.discr =
+/*inistring dstr_1194__MATNORX_FLAGMAP*/
+ /*_.VALSTR___V1275*/ meltfptr[1274] =
+ (void *) &cdat->dstr_1194__MATNORX_FLAGMAP;
+ cdat->dstr_1194__MATNORX_FLAGMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1178__MATNORX_FLAGMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1194__MATNORX_FLAGMAP.val,
"MATNORX_FLAGMAP",
- sizeof (cdat->dstr_1178__MATNORX_FLAGMAP.
+ sizeof (cdat->dstr_1194__MATNORX_FLAGMAP.
val) - 1);
-/*iniobj dsym_1179__MATNORX_STEPMAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1280*/ meltfptr[1279])
- /*_.VALDATA___V1280*/
- meltfptr[1279] = (void *) &cdat->dsym_1179__MATNORX_STEPMAP;
+/*iniobj dsym_1195__MATNORX_STEPMAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1297*/ meltfptr[1296])
+ /*_.VALDATA___V1297*/
+ meltfptr[1296] = (void *) &cdat->dsym_1195__MATNORX_STEPMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1179__MATNORX_STEPMAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1195__MATNORX_STEPMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1179__MATNORX_STEPMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1195__MATNORX_STEPMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1179__MATNORX_STEPMAP.meltobj_class =
+ cdat->dsym_1195__MATNORX_STEPMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1179__MATNORX_STEPMAP.obj_hash = 10097940;
- cdat->dsym_1179__MATNORX_STEPMAP.obj_len = 3;
+ cdat->dsym_1195__MATNORX_STEPMAP.obj_hash = 10097940;
+ cdat->dsym_1195__MATNORX_STEPMAP.obj_len = 3;
-/*inistring dstr_1180__MATNORX_STEPMAP*/
- /*_.VALSTR___V1281*/ meltfptr[1280] =
- (void *) &cdat->dstr_1180__MATNORX_STEPMAP;
- cdat->dstr_1180__MATNORX_STEPMAP.discr =
+/*inistring dstr_1196__MATNORX_STEPMAP*/
+ /*_.VALSTR___V1298*/ meltfptr[1297] =
+ (void *) &cdat->dstr_1196__MATNORX_STEPMAP;
+ cdat->dstr_1196__MATNORX_STEPMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1180__MATNORX_STEPMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1196__MATNORX_STEPMAP.val,
"MATNORX_STEPMAP",
- sizeof (cdat->dstr_1180__MATNORX_STEPMAP.
+ sizeof (cdat->dstr_1196__MATNORX_STEPMAP.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1181__MATNORX_STEPMAP*/
-/*_.VALDATA___V1259*/ meltfptr[1258] =
- (void *) &cdat->dobj_1181__MATNORX_STEPMAP;
+/*iniobj dobj_1197__MATNORX_STEPMAP*/
+/*_.VALDATA___V1276*/ meltfptr[1275] =
+ (void *) &cdat->dobj_1197__MATNORX_STEPMAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1181__MATNORX_STEPMAP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1197__MATNORX_STEPMAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1181__MATNORX_STEPMAP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1197__MATNORX_STEPMAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1181__MATNORX_STEPMAP.meltobj_class =
+ cdat->dobj_1197__MATNORX_STEPMAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1181__MATNORX_STEPMAP.obj_num = 4;
- cdat->dobj_1181__MATNORX_STEPMAP.obj_hash = 137448626;
- cdat->dobj_1181__MATNORX_STEPMAP.obj_len = 4;
+ cdat->dobj_1197__MATNORX_STEPMAP.obj_num = 4;
+ cdat->dobj_1197__MATNORX_STEPMAP.obj_hash = 267441901;
+ cdat->dobj_1197__MATNORX_STEPMAP.obj_len = 4;
-/*inistring dstr_1182__MATNORX_STEPMAP*/
- /*_.VALSTR___V1260*/ meltfptr[1259] =
- (void *) &cdat->dstr_1182__MATNORX_STEPMAP;
- cdat->dstr_1182__MATNORX_STEPMAP.discr =
+/*inistring dstr_1198__MATNORX_STEPMAP*/
+ /*_.VALSTR___V1277*/ meltfptr[1276] =
+ (void *) &cdat->dstr_1198__MATNORX_STEPMAP;
+ cdat->dstr_1198__MATNORX_STEPMAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1182__MATNORX_STEPMAP.val,
+ /*small inistring */ strncpy (cdat->dstr_1198__MATNORX_STEPMAP.val,
"MATNORX_STEPMAP",
- sizeof (cdat->dstr_1182__MATNORX_STEPMAP.
+ sizeof (cdat->dstr_1198__MATNORX_STEPMAP.
val) - 1);
-/*iniobj dsym_1183__MATNORX_MDATAQUEUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1282*/ meltfptr[1281])
- /*_.VALDATA___V1282*/
- meltfptr[1281] = (void *) &cdat->dsym_1183__MATNORX_MDATAQUEUE;
+/*iniobj dsym_1199__MATNORX_MDATAQUEUE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1299*/ meltfptr[1298])
+ /*_.VALDATA___V1299*/
+ meltfptr[1298] = (void *) &cdat->dsym_1199__MATNORX_MDATAQUEUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1183__MATNORX_MDATAQUEUE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1199__MATNORX_MDATAQUEUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1183__MATNORX_MDATAQUEUE",
+ ("iniobj check.discr objmagic dsym_1199__MATNORX_MDATAQUEUE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1183__MATNORX_MDATAQUEUE.meltobj_class =
+ cdat->dsym_1199__MATNORX_MDATAQUEUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1183__MATNORX_MDATAQUEUE.obj_hash = 210790519;
- cdat->dsym_1183__MATNORX_MDATAQUEUE.obj_len = 3;
+ cdat->dsym_1199__MATNORX_MDATAQUEUE.obj_hash = 210790519;
+ cdat->dsym_1199__MATNORX_MDATAQUEUE.obj_len = 3;
-/*inistring dstr_1184__MATNORX_MDATAQUE*/
- /*_.VALSTR___V1283*/ meltfptr[1282] =
- (void *) &cdat->dstr_1184__MATNORX_MDATAQUE;
- cdat->dstr_1184__MATNORX_MDATAQUE.discr =
+/*inistring dstr_1200__MATNORX_MDATAQUE*/
+ /*_.VALSTR___V1300*/ meltfptr[1299] =
+ (void *) &cdat->dstr_1200__MATNORX_MDATAQUE;
+ cdat->dstr_1200__MATNORX_MDATAQUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1184__MATNORX_MDATAQUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1200__MATNORX_MDATAQUE.val,
"MATNORX_MDATAQUEUE",
- sizeof (cdat->dstr_1184__MATNORX_MDATAQUE.
+ sizeof (cdat->dstr_1200__MATNORX_MDATAQUE.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1185__MATNORX_MDATAQUEUE*/
-/*_.VALDATA___V1261*/ meltfptr[1260] =
- (void *) &cdat->dobj_1185__MATNORX_MDATAQUEUE;
+/*iniobj dobj_1201__MATNORX_MDATAQUEUE*/
+/*_.VALDATA___V1278*/ meltfptr[1277] =
+ (void *) &cdat->dobj_1201__MATNORX_MDATAQUEUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1185__MATNORX_MDATAQUEUE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1201__MATNORX_MDATAQUEUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1185__MATNORX_MDATAQUEUE",
+ ("iniobj check.discr objmagic dobj_1201__MATNORX_MDATAQUEUE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1185__MATNORX_MDATAQUEUE.meltobj_class =
+ cdat->dobj_1201__MATNORX_MDATAQUEUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1185__MATNORX_MDATAQUEUE.obj_num = 5;
- cdat->dobj_1185__MATNORX_MDATAQUEUE.obj_hash = 160724444;
- cdat->dobj_1185__MATNORX_MDATAQUEUE.obj_len = 4;
+ cdat->dobj_1201__MATNORX_MDATAQUEUE.obj_num = 5;
+ cdat->dobj_1201__MATNORX_MDATAQUEUE.obj_hash = 454518332;
+ cdat->dobj_1201__MATNORX_MDATAQUEUE.obj_len = 4;
-/*inistring dstr_1186__MATNORX_MDATAQUE*/
- /*_.VALSTR___V1262*/ meltfptr[1261] =
- (void *) &cdat->dstr_1186__MATNORX_MDATAQUE;
- cdat->dstr_1186__MATNORX_MDATAQUE.discr =
+/*inistring dstr_1202__MATNORX_MDATAQUE*/
+ /*_.VALSTR___V1279*/ meltfptr[1278] =
+ (void *) &cdat->dstr_1202__MATNORX_MDATAQUE;
+ cdat->dstr_1202__MATNORX_MDATAQUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1186__MATNORX_MDATAQUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1202__MATNORX_MDATAQUE.val,
"MATNORX_MDATAQUEUE",
- sizeof (cdat->dstr_1186__MATNORX_MDATAQUE.
+ sizeof (cdat->dstr_1202__MATNORX_MDATAQUE.
val) - 1);
-/*iniobj dsym_1187__MATNORX_MSTEPQUEUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1284*/ meltfptr[1283])
- /*_.VALDATA___V1284*/
- meltfptr[1283] = (void *) &cdat->dsym_1187__MATNORX_MSTEPQUEUE;
+/*iniobj dsym_1203__MATNORX_MSTEPQUEUE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1301*/ meltfptr[1300])
+ /*_.VALDATA___V1301*/
+ meltfptr[1300] = (void *) &cdat->dsym_1203__MATNORX_MSTEPQUEUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1187__MATNORX_MSTEPQUEUE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1203__MATNORX_MSTEPQUEUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1187__MATNORX_MSTEPQUEUE",
+ ("iniobj check.discr objmagic dsym_1203__MATNORX_MSTEPQUEUE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1187__MATNORX_MSTEPQUEUE.meltobj_class =
+ cdat->dsym_1203__MATNORX_MSTEPQUEUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1187__MATNORX_MSTEPQUEUE.obj_hash = 826146579;
- cdat->dsym_1187__MATNORX_MSTEPQUEUE.obj_len = 3;
+ cdat->dsym_1203__MATNORX_MSTEPQUEUE.obj_hash = 826146579;
+ cdat->dsym_1203__MATNORX_MSTEPQUEUE.obj_len = 3;
-/*inistring dstr_1188__MATNORX_MSTEPQUE*/
- /*_.VALSTR___V1285*/ meltfptr[1284] =
- (void *) &cdat->dstr_1188__MATNORX_MSTEPQUE;
- cdat->dstr_1188__MATNORX_MSTEPQUE.discr =
+/*inistring dstr_1204__MATNORX_MSTEPQUE*/
+ /*_.VALSTR___V1302*/ meltfptr[1301] =
+ (void *) &cdat->dstr_1204__MATNORX_MSTEPQUE;
+ cdat->dstr_1204__MATNORX_MSTEPQUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1188__MATNORX_MSTEPQUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1204__MATNORX_MSTEPQUE.val,
"MATNORX_MSTEPQUEUE",
- sizeof (cdat->dstr_1188__MATNORX_MSTEPQUE.
+ sizeof (cdat->dstr_1204__MATNORX_MSTEPQUE.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1189__MATNORX_MSTEPQUEUE*/
-/*_.VALDATA___V1263*/ meltfptr[1262] =
- (void *) &cdat->dobj_1189__MATNORX_MSTEPQUEUE;
+/*iniobj dobj_1205__MATNORX_MSTEPQUEUE*/
+/*_.VALDATA___V1280*/ meltfptr[1279] =
+ (void *) &cdat->dobj_1205__MATNORX_MSTEPQUEUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1189__MATNORX_MSTEPQUEUE",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1205__MATNORX_MSTEPQUEUE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1189__MATNORX_MSTEPQUEUE",
+ ("iniobj check.discr objmagic dobj_1205__MATNORX_MSTEPQUEUE",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1189__MATNORX_MSTEPQUEUE.meltobj_class =
+ cdat->dobj_1205__MATNORX_MSTEPQUEUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1189__MATNORX_MSTEPQUEUE.obj_num = 6;
- cdat->dobj_1189__MATNORX_MSTEPQUEUE.obj_hash = 188412309;
- cdat->dobj_1189__MATNORX_MSTEPQUEUE.obj_len = 4;
+ cdat->dobj_1205__MATNORX_MSTEPQUEUE.obj_num = 6;
+ cdat->dobj_1205__MATNORX_MSTEPQUEUE.obj_hash = 982945820;
+ cdat->dobj_1205__MATNORX_MSTEPQUEUE.obj_len = 4;
-/*inistring dstr_1190__MATNORX_MSTEPQUE*/
- /*_.VALSTR___V1264*/ meltfptr[1263] =
- (void *) &cdat->dstr_1190__MATNORX_MSTEPQUE;
- cdat->dstr_1190__MATNORX_MSTEPQUE.discr =
+/*inistring dstr_1206__MATNORX_MSTEPQUE*/
+ /*_.VALSTR___V1281*/ meltfptr[1280] =
+ (void *) &cdat->dstr_1206__MATNORX_MSTEPQUE;
+ cdat->dstr_1206__MATNORX_MSTEPQUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1190__MATNORX_MSTEPQUE.val,
+ /*small inistring */ strncpy (cdat->dstr_1206__MATNORX_MSTEPQUE.val,
"MATNORX_MSTEPQUEUE",
- sizeof (cdat->dstr_1190__MATNORX_MSTEPQUE.
+ sizeof (cdat->dstr_1206__MATNORX_MSTEPQUE.
val) - 1);
-/*iniobj dsym_1191__MATNORX_BODYLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1286*/ meltfptr[1285])
- /*_.VALDATA___V1286*/
- meltfptr[1285] = (void *) &cdat->dsym_1191__MATNORX_BODYLIST;
+/*iniobj dsym_1207__MATNORX_BODYLIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1303*/ meltfptr[1302])
+ /*_.VALDATA___V1303*/
+ meltfptr[1302] = (void *) &cdat->dsym_1207__MATNORX_BODYLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1191__MATNORX_BODYLIST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1207__MATNORX_BODYLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1191__MATNORX_BODYLIST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1207__MATNORX_BODYLIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1191__MATNORX_BODYLIST.meltobj_class =
+ cdat->dsym_1207__MATNORX_BODYLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1191__MATNORX_BODYLIST.obj_hash = 620183979;
- cdat->dsym_1191__MATNORX_BODYLIST.obj_len = 3;
+ cdat->dsym_1207__MATNORX_BODYLIST.obj_hash = 620183979;
+ cdat->dsym_1207__MATNORX_BODYLIST.obj_len = 3;
-/*inistring dstr_1192__MATNORX_BODYLIST*/
- /*_.VALSTR___V1287*/ meltfptr[1286] =
- (void *) &cdat->dstr_1192__MATNORX_BODYLIST;
- cdat->dstr_1192__MATNORX_BODYLIST.discr =
+/*inistring dstr_1208__MATNORX_BODYLIST*/
+ /*_.VALSTR___V1304*/ meltfptr[1303] =
+ (void *) &cdat->dstr_1208__MATNORX_BODYLIST;
+ cdat->dstr_1208__MATNORX_BODYLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1192__MATNORX_BODYLIST.val,
+ /*small inistring */ strncpy (cdat->dstr_1208__MATNORX_BODYLIST.val,
"MATNORX_BODYLIST",
- sizeof (cdat->dstr_1192__MATNORX_BODYLIST.
+ sizeof (cdat->dstr_1208__MATNORX_BODYLIST.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1193__MATNORX_BODYLIST*/
-/*_.VALDATA___V1265*/ meltfptr[1264] =
- (void *) &cdat->dobj_1193__MATNORX_BODYLIST;
+/*iniobj dobj_1209__MATNORX_BODYLIST*/
+/*_.VALDATA___V1282*/ meltfptr[1281] =
+ (void *) &cdat->dobj_1209__MATNORX_BODYLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1193__MATNORX_BODYLIST",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1209__MATNORX_BODYLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1193__MATNORX_BODYLIST",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1209__MATNORX_BODYLIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1193__MATNORX_BODYLIST.meltobj_class =
+ cdat->dobj_1209__MATNORX_BODYLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1193__MATNORX_BODYLIST.obj_num = 7;
- cdat->dobj_1193__MATNORX_BODYLIST.obj_hash = 169173185;
- cdat->dobj_1193__MATNORX_BODYLIST.obj_len = 4;
+ cdat->dobj_1209__MATNORX_BODYLIST.obj_num = 7;
+ cdat->dobj_1209__MATNORX_BODYLIST.obj_hash = 570735725;
+ cdat->dobj_1209__MATNORX_BODYLIST.obj_len = 4;
-/*inistring dstr_1194__MATNORX_BODYLIST*/
- /*_.VALSTR___V1266*/ meltfptr[1265] =
- (void *) &cdat->dstr_1194__MATNORX_BODYLIST;
- cdat->dstr_1194__MATNORX_BODYLIST.discr =
+/*inistring dstr_1210__MATNORX_BODYLIST*/
+ /*_.VALSTR___V1283*/ meltfptr[1282] =
+ (void *) &cdat->dstr_1210__MATNORX_BODYLIST;
+ cdat->dstr_1210__MATNORX_BODYLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1194__MATNORX_BODYLIST.val,
+ /*small inistring */ strncpy (cdat->dstr_1210__MATNORX_BODYLIST.val,
"MATNORX_BODYLIST",
- sizeof (cdat->dstr_1194__MATNORX_BODYLIST.
+ sizeof (cdat->dstr_1210__MATNORX_BODYLIST.
val) - 1);
-/*iniobj dsym_1195__MATNORX_ENDLABEL*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1288*/ meltfptr[1287])
- /*_.VALDATA___V1288*/
- meltfptr[1287] = (void *) &cdat->dsym_1195__MATNORX_ENDLABEL;
+/*iniobj dsym_1211__MATNORX_ENDLABEL*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1305*/ meltfptr[1304])
+ /*_.VALDATA___V1305*/
+ meltfptr[1304] = (void *) &cdat->dsym_1211__MATNORX_ENDLABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1195__MATNORX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1211__MATNORX_ENDLABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1195__MATNORX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1211__MATNORX_ENDLABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1195__MATNORX_ENDLABEL.meltobj_class =
+ cdat->dsym_1211__MATNORX_ENDLABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1195__MATNORX_ENDLABEL.obj_hash = 492054617;
- cdat->dsym_1195__MATNORX_ENDLABEL.obj_len = 3;
+ cdat->dsym_1211__MATNORX_ENDLABEL.obj_hash = 492054617;
+ cdat->dsym_1211__MATNORX_ENDLABEL.obj_len = 3;
-/*inistring dstr_1196__MATNORX_ENDLABEL*/
- /*_.VALSTR___V1289*/ meltfptr[1288] =
- (void *) &cdat->dstr_1196__MATNORX_ENDLABEL;
- cdat->dstr_1196__MATNORX_ENDLABEL.discr =
+/*inistring dstr_1212__MATNORX_ENDLABEL*/
+ /*_.VALSTR___V1306*/ meltfptr[1305] =
+ (void *) &cdat->dstr_1212__MATNORX_ENDLABEL;
+ cdat->dstr_1212__MATNORX_ENDLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1196__MATNORX_ENDLABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_1212__MATNORX_ENDLABEL.val,
"MATNORX_ENDLABEL",
- sizeof (cdat->dstr_1196__MATNORX_ENDLABEL.
+ sizeof (cdat->dstr_1212__MATNORX_ENDLABEL.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1197__MATNORX_ENDLABEL*/
-/*_.VALDATA___V1267*/ meltfptr[1266] =
- (void *) &cdat->dobj_1197__MATNORX_ENDLABEL;
+/*iniobj dobj_1213__MATNORX_ENDLABEL*/
+/*_.VALDATA___V1284*/ meltfptr[1283] =
+ (void *) &cdat->dobj_1213__MATNORX_ENDLABEL;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1197__MATNORX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1213__MATNORX_ENDLABEL",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1197__MATNORX_ENDLABEL",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1213__MATNORX_ENDLABEL",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1197__MATNORX_ENDLABEL.meltobj_class =
+ cdat->dobj_1213__MATNORX_ENDLABEL.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1197__MATNORX_ENDLABEL.obj_num = 8;
- cdat->dobj_1197__MATNORX_ENDLABEL.obj_hash = 398259651;
- cdat->dobj_1197__MATNORX_ENDLABEL.obj_len = 4;
+ cdat->dobj_1213__MATNORX_ENDLABEL.obj_num = 8;
+ cdat->dobj_1213__MATNORX_ENDLABEL.obj_hash = 661890675;
+ cdat->dobj_1213__MATNORX_ENDLABEL.obj_len = 4;
-/*inistring dstr_1198__MATNORX_ENDLABEL*/
- /*_.VALSTR___V1268*/ meltfptr[1267] =
- (void *) &cdat->dstr_1198__MATNORX_ENDLABEL;
- cdat->dstr_1198__MATNORX_ENDLABEL.discr =
+/*inistring dstr_1214__MATNORX_ENDLABEL*/
+ /*_.VALSTR___V1285*/ meltfptr[1284] =
+ (void *) &cdat->dstr_1214__MATNORX_ENDLABEL;
+ cdat->dstr_1214__MATNORX_ENDLABEL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1198__MATNORX_ENDLABEL.val,
+ /*small inistring */ strncpy (cdat->dstr_1214__MATNORX_ENDLABEL.val,
"MATNORX_ENDLABEL",
- sizeof (cdat->dstr_1198__MATNORX_ENDLABEL.
+ sizeof (cdat->dstr_1214__MATNORX_ENDLABEL.
val) - 1);
-/*iniobj dsym_1199__MATNORX_MATCHCTXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1290*/ meltfptr[1289])
- /*_.VALDATA___V1290*/
- meltfptr[1289] = (void *) &cdat->dsym_1199__MATNORX_MATCHCTXT;
+/*iniobj dsym_1215__MATNORX_MATCHCTXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1307*/ meltfptr[1306])
+ /*_.VALDATA___V1307*/
+ meltfptr[1306] = (void *) &cdat->dsym_1215__MATNORX_MATCHCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1199__MATNORX_MATCHCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1215__MATNORX_MATCHCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1199__MATNORX_MATCHCTXT",
+ ("iniobj check.discr objmagic dsym_1215__MATNORX_MATCHCTXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1199__MATNORX_MATCHCTXT.meltobj_class =
+ cdat->dsym_1215__MATNORX_MATCHCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1199__MATNORX_MATCHCTXT.obj_hash = 28112038;
- cdat->dsym_1199__MATNORX_MATCHCTXT.obj_len = 3;
+ cdat->dsym_1215__MATNORX_MATCHCTXT.obj_hash = 28112038;
+ cdat->dsym_1215__MATNORX_MATCHCTXT.obj_len = 3;
-/*inistring dstr_1200__MATNORX_MATCHCTX*/
- /*_.VALSTR___V1291*/ meltfptr[1290] =
- (void *) &cdat->dstr_1200__MATNORX_MATCHCTX;
- cdat->dstr_1200__MATNORX_MATCHCTX.discr =
+/*inistring dstr_1216__MATNORX_MATCHCTX*/
+ /*_.VALSTR___V1308*/ meltfptr[1307] =
+ (void *) &cdat->dstr_1216__MATNORX_MATCHCTX;
+ cdat->dstr_1216__MATNORX_MATCHCTX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1200__MATNORX_MATCHCTX.val,
+ /*small inistring */ strncpy (cdat->dstr_1216__MATNORX_MATCHCTX.val,
"MATNORX_MATCHCTXT",
- sizeof (cdat->dstr_1200__MATNORX_MATCHCTX.
+ sizeof (cdat->dstr_1216__MATNORX_MATCHCTX.
val) - 1);
/*^iniobj */
-/*iniobj dobj_1201__MATNORX_MATCHCTXT*/
-/*_.VALDATA___V1269*/ meltfptr[1268] =
- (void *) &cdat->dobj_1201__MATNORX_MATCHCTXT;
+/*iniobj dobj_1217__MATNORX_MATCHCTXT*/
+/*_.VALDATA___V1286*/ meltfptr[1285] =
+ (void *) &cdat->dobj_1217__MATNORX_MATCHCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1201__MATNORX_MATCHCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1217__MATNORX_MATCHCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_FIELD))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1201__MATNORX_MATCHCTXT",
+ ("iniobj check.discr objmagic dobj_1217__MATNORX_MATCHCTXT",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1201__MATNORX_MATCHCTXT.meltobj_class =
+ cdat->dobj_1217__MATNORX_MATCHCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
- cdat->dobj_1201__MATNORX_MATCHCTXT.obj_num = 9;
- cdat->dobj_1201__MATNORX_MATCHCTXT.obj_hash = 610355477;
- cdat->dobj_1201__MATNORX_MATCHCTXT.obj_len = 4;
+ cdat->dobj_1217__MATNORX_MATCHCTXT.obj_num = 9;
+ cdat->dobj_1217__MATNORX_MATCHCTXT.obj_hash = 934269861;
+ cdat->dobj_1217__MATNORX_MATCHCTXT.obj_len = 4;
-/*inistring dstr_1202__MATNORX_MATCHCTX*/
- /*_.VALSTR___V1270*/ meltfptr[1269] =
- (void *) &cdat->dstr_1202__MATNORX_MATCHCTX;
- cdat->dstr_1202__MATNORX_MATCHCTX.discr =
+/*inistring dstr_1218__MATNORX_MATCHCTX*/
+ /*_.VALSTR___V1287*/ meltfptr[1286] =
+ (void *) &cdat->dstr_1218__MATNORX_MATCHCTX;
+ cdat->dstr_1218__MATNORX_MATCHCTX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1202__MATNORX_MATCHCTX.val,
+ /*small inistring */ strncpy (cdat->dstr_1218__MATNORX_MATCHCTX.val,
"MATNORX_MATCHCTXT",
- sizeof (cdat->dstr_1202__MATNORX_MATCHCTX.
+ sizeof (cdat->dstr_1218__MATNORX_MATCHCTX.
val) - 1);
- /*inirout drout_1203__ALTMATCH_NORMALIZE_FLAG */
- /*_.VALROUT___V1292*/ meltfptr[1291] =
- (void *) &cdat->drout_1203__ALTMATCH_NORMALIZE_FLAG;
- cdat->drout_1203__ALTMATCH_NORMALIZE_FLAG.discr =
+ /*inirout drout_1219__ALTMATCH_NORMALIZE_FLAG */
+ /*_.VALROUT___V1309*/ meltfptr[1308] =
+ (void *) &cdat->drout_1219__ALTMATCH_NORMALIZE_FLAG;
+ cdat->drout_1219__ALTMATCH_NORMALIZE_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1203__ALTMATCH_NORMALIZE_FLAG.routdescr,
- "ALTMATCH_NORMALIZE_FLAG @warmelt-normatch.melt:5029",
+ strncpy (cdat->drout_1219__ALTMATCH_NORMALIZE_FLAG.routdescr,
+ "ALTMATCH_NORMALIZE_FLAG @warmelt-normatch.melt:5138",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1203__ALTMATCH_NORMALIZE_FLAG.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1203__ALTMATCH_NORMALIZE_FLAG,
- meltrout_97_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG);
-
- /*iniclos dclo_1204__ALTMATCH_NORMALIZE_FLAG */
- /*_.VALCLO___V1293*/ meltfptr[1292] =
- (void *) &cdat->dclo_1204__ALTMATCH_NORMALIZE_FLAG;
- cdat->dclo_1204__ALTMATCH_NORMALIZE_FLAG.discr =
+ cdat->drout_1219__ALTMATCH_NORMALIZE_FLAG.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1219__ALTMATCH_NORMALIZE_FLAG,
+ meltrout_105_warmelt_normatch_ALTMATCH_NORMALIZE_FLAG);
+
+ /*iniclos dclo_1220__ALTMATCH_NORMALIZE_FLAG */
+ /*_.VALCLO___V1310*/ meltfptr[1309] =
+ (void *) &cdat->dclo_1220__ALTMATCH_NORMALIZE_FLAG;
+ cdat->dclo_1220__ALTMATCH_NORMALIZE_FLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1204__ALTMATCH_NORMALIZE_FLAG.nbval = 0;
+ cdat->dclo_1220__ALTMATCH_NORMALIZE_FLAG.nbval = 0;
-/*iniobj dsym_1205__NORMALIZE_STEP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1294*/ meltfptr[1293])
- /*_.VALDATA___V1294*/
- meltfptr[1293] = (void *) &cdat->dsym_1205__NORMALIZE_STEP;
+/*iniobj dsym_1221__NORMALIZE_STEP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1311*/ meltfptr[1310])
+ /*_.VALDATA___V1311*/
+ meltfptr[1310] = (void *) &cdat->dsym_1221__NORMALIZE_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1205__NORMALIZE_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1221__NORMALIZE_STEP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1205__NORMALIZE_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1221__NORMALIZE_STEP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1205__NORMALIZE_STEP.meltobj_class =
+ cdat->dsym_1221__NORMALIZE_STEP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1205__NORMALIZE_STEP.obj_hash = 652642247;
- cdat->dsym_1205__NORMALIZE_STEP.obj_len = 3;
+ cdat->dsym_1221__NORMALIZE_STEP.obj_hash = 652642247;
+ cdat->dsym_1221__NORMALIZE_STEP.obj_len = 3;
-/*inistring dstr_1206__NORMALIZE_STEP*/
- /*_.VALSTR___V1295*/ meltfptr[1294] =
- (void *) &cdat->dstr_1206__NORMALIZE_STEP;
- cdat->dstr_1206__NORMALIZE_STEP.discr =
+/*inistring dstr_1222__NORMALIZE_STEP*/
+ /*_.VALSTR___V1312*/ meltfptr[1311] =
+ (void *) &cdat->dstr_1222__NORMALIZE_STEP;
+ cdat->dstr_1222__NORMALIZE_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1206__NORMALIZE_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_1222__NORMALIZE_STEP.val,
"NORMALIZE_STEP",
- sizeof (cdat->dstr_1206__NORMALIZE_STEP.val) -
+ sizeof (cdat->dstr_1222__NORMALIZE_STEP.val) -
1);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ iniobj");
-/*iniobj dobj_1207*/
-/*_.VALDATA___V1296*/ meltfptr[1295] = (void *) &cdat->dobj_1207;
+/*iniobj dobj_1223*/
+/*_.VALDATA___V1313*/ meltfptr[1312] = (void *) &cdat->dobj_1223;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1207",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1223",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1207",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1223",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1207.meltobj_class =
+ cdat->dobj_1223.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1207.obj_num = 0;
- cdat->dobj_1207.obj_hash = 755371871;
- cdat->dobj_1207.obj_len = 2;
+ cdat->dobj_1223.obj_num = 0;
+ cdat->dobj_1223.obj_hash = 872930685;
+ cdat->dobj_1223.obj_len = 2;
-/*iniobj dsym_1208__NMCTXT*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1297*/ meltfptr[1296])
- /*_.VALDATA___V1297*/
- meltfptr[1296] = (void *) &cdat->dsym_1208__NMCTXT;
+/*iniobj dsym_1224__NMCTXT*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1314*/ meltfptr[1313])
+ /*_.VALDATA___V1314*/
+ meltfptr[1313] = (void *) &cdat->dsym_1224__NMCTXT;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1208__NMCTXT",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1224__NMCTXT",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1208__NMCTXT",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1224__NMCTXT",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1208__NMCTXT.meltobj_class =
+ cdat->dsym_1224__NMCTXT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1208__NMCTXT.obj_hash = 286565616;
- cdat->dsym_1208__NMCTXT.obj_len = 3;
+ cdat->dsym_1224__NMCTXT.obj_hash = 286565616;
+ cdat->dsym_1224__NMCTXT.obj_len = 3;
-/*inistring dstr_1209__NMCTXT*/
- /*_.VALSTR___V1298*/ meltfptr[1297] = (void *) &cdat->dstr_1209__NMCTXT;
- cdat->dstr_1209__NMCTXT.discr =
+/*inistring dstr_1225__NMCTXT*/
+ /*_.VALSTR___V1315*/ meltfptr[1314] = (void *) &cdat->dstr_1225__NMCTXT;
+ cdat->dstr_1225__NMCTXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1209__NMCTXT.val, "NMCTXT",
- sizeof (cdat->dstr_1209__NMCTXT.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1225__NMCTXT.val, "NMCTXT",
+ sizeof (cdat->dstr_1225__NMCTXT.val) - 1);
/*^iniobj */
-/*iniobj dobj_1210*/
-/*_.VALDATA___V1299*/ meltfptr[1298] = (void *) &cdat->dobj_1210;
+/*iniobj dobj_1226*/
+/*_.VALDATA___V1316*/ meltfptr[1315] = (void *) &cdat->dobj_1226;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1210",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1226",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1210",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1226",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1210.meltobj_class =
+ cdat->dobj_1226.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1210.obj_num = 1;
- cdat->dobj_1210.obj_hash = 451900163;
- cdat->dobj_1210.obj_len = 2;
+ cdat->dobj_1226.obj_num = 1;
+ cdat->dobj_1226.obj_hash = 240016002;
+ cdat->dobj_1226.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1211*/
-/*_.VALDATA___V1300*/ meltfptr[1299] = (void *) &cdat->dobj_1211;
+/*iniobj dobj_1227*/
+/*_.VALDATA___V1317*/ meltfptr[1316] = (void *) &cdat->dobj_1227;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1211",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1227",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1211",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1227",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1211.meltobj_class =
+ cdat->dobj_1227.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1211.obj_num = 2;
- cdat->dobj_1211.obj_hash = 216427108;
- cdat->dobj_1211.obj_len = 2;
-
- /*inimult dtup_1212__NORMALIZE_STEP */
- /*_.VALTUP___V1301*/ meltfptr[1300] =
- (void *) &cdat->dtup_1212__NORMALIZE_STEP;
- cdat->dtup_1212__NORMALIZE_STEP.discr =
+ cdat->dobj_1227.obj_num = 2;
+ cdat->dobj_1227.obj_hash = 525092339;
+ cdat->dobj_1227.obj_len = 2;
+
+ /*inimult dtup_1228__NORMALIZE_STEP */
+ /*_.VALTUP___V1318*/ meltfptr[1317] =
+ (void *) &cdat->dtup_1228__NORMALIZE_STEP;
+ cdat->dtup_1228__NORMALIZE_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_1212__NORMALIZE_STEP.nbval = 3;
+ cdat->dtup_1228__NORMALIZE_STEP.nbval = 3;
/*^iniobj */
-/*iniobj dobj_1213__NORMALIZE_STEP*/
-/*_.VALDATA___V1302*/ meltfptr[1301] =
- (void *) &cdat->dobj_1213__NORMALIZE_STEP;
+/*iniobj dobj_1229__NORMALIZE_STEP*/
+/*_.VALDATA___V1319*/ meltfptr[1318] =
+ (void *) &cdat->dobj_1229__NORMALIZE_STEP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1213__NORMALIZE_STEP",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1229__NORMALIZE_STEP",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1213__NORMALIZE_STEP",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1229__NORMALIZE_STEP",
((meltobject_ptr_t)
( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1213__NORMALIZE_STEP.meltobj_class =
+ cdat->dobj_1229__NORMALIZE_STEP.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_1213__NORMALIZE_STEP.obj_hash = 55610999;
- cdat->dobj_1213__NORMALIZE_STEP.obj_len = 4;
+ cdat->dobj_1229__NORMALIZE_STEP.obj_hash = 328013959;
+ cdat->dobj_1229__NORMALIZE_STEP.obj_len = 4;
-/*inistring dstr_1214__NORMALIZE_STEP*/
- /*_.VALSTR___V1303*/ meltfptr[1302] =
- (void *) &cdat->dstr_1214__NORMALIZE_STEP;
- cdat->dstr_1214__NORMALIZE_STEP.discr =
+/*inistring dstr_1230__NORMALIZE_STEP*/
+ /*_.VALSTR___V1320*/ meltfptr[1319] =
+ (void *) &cdat->dstr_1230__NORMALIZE_STEP;
+ cdat->dstr_1230__NORMALIZE_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1214__NORMALIZE_STEP.val,
+ /*small inistring */ strncpy (cdat->dstr_1230__NORMALIZE_STEP.val,
"NORMALIZE_STEP",
- sizeof (cdat->dstr_1214__NORMALIZE_STEP.val) -
+ sizeof (cdat->dstr_1230__NORMALIZE_STEP.val) -
1);
- /*inirout drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
- /*_.VALROUT___V1304*/ meltfptr[1303] =
- (void *) &cdat->drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
- cdat->drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr =
+ /*inirout drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
+ /*_.VALROUT___V1321*/ meltfptr[1320] =
+ (void *) &cdat->drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
+ cdat->drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.routdescr,
- "MATCH_DATA_UPDATE_DATA_STEPS_INDEX @warmelt-normatch.melt:5061",
+ strncpy (cdat->drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.routdescr,
+ "MATCH_DATA_UPDATE_DATA_STEPS_INDEX @warmelt-normatch.melt:5170",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 5;
+ cdat->drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 5;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX,
- meltrout_98_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX);
+ drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX,
+ meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX);
- /*iniclos dclo_1216__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
- /*_.VALCLO___V1305*/ meltfptr[1304] =
- (void *) &cdat->dclo_1216__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
- cdat->dclo_1216__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr =
+ /*iniclos dclo_1232__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */
+ /*_.VALCLO___V1322*/ meltfptr[1321] =
+ (void *) &cdat->dclo_1232__MATCH_DATA_UPDATE_DATA_STEPS_INDEX;
+ cdat->dclo_1232__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1216__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 0;
+ cdat->dclo_1232__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 0;
- /*inirout drout_1217__MATCH_STEP_INDEX */
- /*_.VALROUT___V1306*/ meltfptr[1305] =
- (void *) &cdat->drout_1217__MATCH_STEP_INDEX;
- cdat->drout_1217__MATCH_STEP_INDEX.discr =
+ /*inirout drout_1233__MATCH_STEP_INDEX */
+ /*_.VALROUT___V1323*/ meltfptr[1322] =
+ (void *) &cdat->drout_1233__MATCH_STEP_INDEX;
+ cdat->drout_1233__MATCH_STEP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1217__MATCH_STEP_INDEX.routdescr,
- "MATCH_STEP_INDEX @warmelt-normatch.melt:5095",
+ strncpy (cdat->drout_1233__MATCH_STEP_INDEX.routdescr,
+ "MATCH_STEP_INDEX @warmelt-normatch.melt:5204",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1217__MATCH_STEP_INDEX.nbval = 4;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1217__MATCH_STEP_INDEX,
- meltrout_99_warmelt_normatch_MATCH_STEP_INDEX);
-
- /*iniclos dclo_1218__MATCH_STEP_INDEX */
- /*_.VALCLO___V1307*/ meltfptr[1306] =
- (void *) &cdat->dclo_1218__MATCH_STEP_INDEX;
- cdat->dclo_1218__MATCH_STEP_INDEX.discr =
+ cdat->drout_1233__MATCH_STEP_INDEX.nbval = 4;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1233__MATCH_STEP_INDEX,
+ meltrout_107_warmelt_normatch_MATCH_STEP_INDEX);
+
+ /*iniclos dclo_1234__MATCH_STEP_INDEX */
+ /*_.VALCLO___V1324*/ meltfptr[1323] =
+ (void *) &cdat->dclo_1234__MATCH_STEP_INDEX;
+ cdat->dclo_1234__MATCH_STEP_INDEX.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1218__MATCH_STEP_INDEX.nbval = 0;
+ cdat->dclo_1234__MATCH_STEP_INDEX.nbval = 0;
- /*inirout drout_1219__COMPLETE_NORMSTEP_IF_LAST */
- /*_.VALROUT___V1308*/ meltfptr[1307] =
- (void *) &cdat->drout_1219__COMPLETE_NORMSTEP_IF_LAST;
- cdat->drout_1219__COMPLETE_NORMSTEP_IF_LAST.discr =
+ /*inirout drout_1235__COMPLETE_NORMSTEP_IF_LAST */
+ /*_.VALROUT___V1325*/ meltfptr[1324] =
+ (void *) &cdat->drout_1235__COMPLETE_NORMSTEP_IF_LAST;
+ cdat->drout_1235__COMPLETE_NORMSTEP_IF_LAST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1219__COMPLETE_NORMSTEP_IF_LAST.routdescr,
- "COMPLETE_NORMSTEP_IF_LAST @warmelt-normatch.melt:5121",
+ strncpy (cdat->drout_1235__COMPLETE_NORMSTEP_IF_LAST.routdescr,
+ "COMPLETE_NORMSTEP_IF_LAST @warmelt-normatch.melt:5230",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1219__COMPLETE_NORMSTEP_IF_LAST.nbval = 13;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1219__COMPLETE_NORMSTEP_IF_LAST,
- meltrout_100_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST);
-
- /*iniclos dclo_1220__COMPLETE_NORMSTEP_IF_LAST */
- /*_.VALCLO___V1309*/ meltfptr[1308] =
- (void *) &cdat->dclo_1220__COMPLETE_NORMSTEP_IF_LAST;
- cdat->dclo_1220__COMPLETE_NORMSTEP_IF_LAST.discr =
+ cdat->drout_1235__COMPLETE_NORMSTEP_IF_LAST.nbval = 13;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1235__COMPLETE_NORMSTEP_IF_LAST,
+ meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST);
+
+ /*iniclos dclo_1236__COMPLETE_NORMSTEP_IF_LAST */
+ /*_.VALCLO___V1326*/ meltfptr[1325] =
+ (void *) &cdat->dclo_1236__COMPLETE_NORMSTEP_IF_LAST;
+ cdat->dclo_1236__COMPLETE_NORMSTEP_IF_LAST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1220__COMPLETE_NORMSTEP_IF_LAST.nbval = 0;
+ cdat->dclo_1236__COMPLETE_NORMSTEP_IF_LAST.nbval = 0;
- /*inirout drout_1221__NORMSTEP_ANYRECV */
- /*_.VALROUT___V1310*/ meltfptr[1309] =
- (void *) &cdat->drout_1221__NORMSTEP_ANYRECV;
- cdat->drout_1221__NORMSTEP_ANYRECV.discr =
+ /*inirout drout_1237__NORMSTEP_ANYRECV */
+ /*_.VALROUT___V1327*/ meltfptr[1326] =
+ (void *) &cdat->drout_1237__NORMSTEP_ANYRECV;
+ cdat->drout_1237__NORMSTEP_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1221__NORMSTEP_ANYRECV.routdescr,
- "NORMSTEP_ANYRECV @warmelt-normatch.melt:5200",
+ strncpy (cdat->drout_1237__NORMSTEP_ANYRECV.routdescr,
+ "NORMSTEP_ANYRECV @warmelt-normatch.melt:5309",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1221__NORMSTEP_ANYRECV.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1221__NORMSTEP_ANYRECV,
- meltrout_101_warmelt_normatch_NORMSTEP_ANYRECV);
-
- /*iniclos dclo_1222__NORMSTEP_ANYRECV */
- /*_.VALCLO___V1311*/ meltfptr[1310] =
- (void *) &cdat->dclo_1222__NORMSTEP_ANYRECV;
- cdat->dclo_1222__NORMSTEP_ANYRECV.discr =
+ cdat->drout_1237__NORMSTEP_ANYRECV.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1237__NORMSTEP_ANYRECV,
+ meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV);
+
+ /*iniclos dclo_1238__NORMSTEP_ANYRECV */
+ /*_.VALCLO___V1328*/ meltfptr[1327] =
+ (void *) &cdat->dclo_1238__NORMSTEP_ANYRECV;
+ cdat->dclo_1238__NORMSTEP_ANYRECV.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1222__NORMSTEP_ANYRECV.nbval = 0;
+ cdat->dclo_1238__NORMSTEP_ANYRECV.nbval = 0;
- /*inirout drout_1223__NORMSTEP_MFLAGSET */
- /*_.VALROUT___V1312*/ meltfptr[1311] =
- (void *) &cdat->drout_1223__NORMSTEP_MFLAGSET;
- cdat->drout_1223__NORMSTEP_MFLAGSET.discr =
+ /*inirout drout_1239__NORMSTEP_MFLAGSET */
+ /*_.VALROUT___V1329*/ meltfptr[1328] =
+ (void *) &cdat->drout_1239__NORMSTEP_MFLAGSET;
+ cdat->drout_1239__NORMSTEP_MFLAGSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1223__NORMSTEP_MFLAGSET.routdescr,
- "NORMSTEP_MFLAGSET @warmelt-normatch.melt:5213",
+ strncpy (cdat->drout_1239__NORMSTEP_MFLAGSET.routdescr,
+ "NORMSTEP_MFLAGSET @warmelt-normatch.melt:5322",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1223__NORMSTEP_MFLAGSET.nbval = 9;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1223__NORMSTEP_MFLAGSET,
- meltrout_102_warmelt_normatch_NORMSTEP_MFLAGSET);
-
- /*iniclos dclo_1224__NORMSTEP_MFLAGSET */
- /*_.VALCLO___V1316*/ meltfptr[1315] =
- (void *) &cdat->dclo_1224__NORMSTEP_MFLAGSET;
- cdat->dclo_1224__NORMSTEP_MFLAGSET.discr =
+ cdat->drout_1239__NORMSTEP_MFLAGSET.nbval = 9;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1239__NORMSTEP_MFLAGSET,
+ meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET);
+
+ /*iniclos dclo_1240__NORMSTEP_MFLAGSET */
+ /*_.VALCLO___V1333*/ meltfptr[1332] =
+ (void *) &cdat->dclo_1240__NORMSTEP_MFLAGSET;
+ cdat->dclo_1240__NORMSTEP_MFLAGSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1224__NORMSTEP_MFLAGSET.nbval = 0;
+ cdat->dclo_1240__NORMSTEP_MFLAGSET.nbval = 0;
-/*iniobj dsym_1225__CLASS_NREP_SETQ*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1317*/ meltfptr[1316])
- /*_.VALDATA___V1317*/
- meltfptr[1316] = (void *) &cdat->dsym_1225__CLASS_NREP_SETQ;
+/*iniobj dsym_1241__CLASS_NREP_SETQ*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1334*/ meltfptr[1333])
+ /*_.VALDATA___V1334*/
+ meltfptr[1333] = (void *) &cdat->dsym_1241__CLASS_NREP_SETQ;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1225__CLASS_NREP_SETQ",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1241__CLASS_NREP_SETQ",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1225__CLASS_NREP_SETQ",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1241__CLASS_NREP_SETQ",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1225__CLASS_NREP_SETQ.meltobj_class =
+ cdat->dsym_1241__CLASS_NREP_SETQ.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1225__CLASS_NREP_SETQ.obj_hash = 314084823;
- cdat->dsym_1225__CLASS_NREP_SETQ.obj_len = 3;
+ cdat->dsym_1241__CLASS_NREP_SETQ.obj_hash = 314084823;
+ cdat->dsym_1241__CLASS_NREP_SETQ.obj_len = 3;
-/*inistring dstr_1226__CLASS_NREP_SETQ*/
- /*_.VALSTR___V1318*/ meltfptr[1317] =
- (void *) &cdat->dstr_1226__CLASS_NREP_SETQ;
- cdat->dstr_1226__CLASS_NREP_SETQ.discr =
+/*inistring dstr_1242__CLASS_NREP_SETQ*/
+ /*_.VALSTR___V1335*/ meltfptr[1334] =
+ (void *) &cdat->dstr_1242__CLASS_NREP_SETQ;
+ cdat->dstr_1242__CLASS_NREP_SETQ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1226__CLASS_NREP_SETQ.val,
+ /*small inistring */ strncpy (cdat->dstr_1242__CLASS_NREP_SETQ.val,
"CLASS_NREP_SETQ",
- sizeof (cdat->dstr_1226__CLASS_NREP_SETQ.
+ sizeof (cdat->dstr_1242__CLASS_NREP_SETQ.
val) - 1);
- /*iniboxint dint_1227__ */
- /*_.VALBXINT___V1315*/ meltfptr[1314] = (void *) &cdat->dint_1227__;
- cdat->dint_1227__.discr =
+ /*iniboxint dint_1243__ */
+ /*_.VALBXINT___V1332*/ meltfptr[1331] = (void *) &cdat->dint_1243__;
+ cdat->dint_1243__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1227__.val = 1;
+ cdat->dint_1243__.val = 1;
- /*inirout drout_1228__NORMSTEP_MFLAGCONJ */
- /*_.VALROUT___V1319*/ meltfptr[1318] =
- (void *) &cdat->drout_1228__NORMSTEP_MFLAGCONJ;
- cdat->drout_1228__NORMSTEP_MFLAGCONJ.discr =
+ /*inirout drout_1244__NORMSTEP_MFLAGCONJ */
+ /*_.VALROUT___V1336*/ meltfptr[1335] =
+ (void *) &cdat->drout_1244__NORMSTEP_MFLAGCONJ;
+ cdat->drout_1244__NORMSTEP_MFLAGCONJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1228__NORMSTEP_MFLAGCONJ.routdescr,
- "NORMSTEP_MFLAGCONJ @warmelt-normatch.melt:5237",
+ strncpy (cdat->drout_1244__NORMSTEP_MFLAGCONJ.routdescr,
+ "NORMSTEP_MFLAGCONJ @warmelt-normatch.melt:5346",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1228__NORMSTEP_MFLAGCONJ.nbval = 15;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1228__NORMSTEP_MFLAGCONJ,
- meltrout_103_warmelt_normatch_NORMSTEP_MFLAGCONJ);
-
- /*iniclos dclo_1229__NORMSTEP_MFLAGCONJ */
- /*_.VALCLO___V1323*/ meltfptr[1322] =
- (void *) &cdat->dclo_1229__NORMSTEP_MFLAGCONJ;
- cdat->dclo_1229__NORMSTEP_MFLAGCONJ.discr =
+ cdat->drout_1244__NORMSTEP_MFLAGCONJ.nbval = 15;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1244__NORMSTEP_MFLAGCONJ,
+ meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ);
+
+ /*iniclos dclo_1245__NORMSTEP_MFLAGCONJ */
+ /*_.VALCLO___V1340*/ meltfptr[1339] =
+ (void *) &cdat->dclo_1245__NORMSTEP_MFLAGCONJ;
+ cdat->dclo_1245__NORMSTEP_MFLAGCONJ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1229__NORMSTEP_MFLAGCONJ.nbval = 0;
+ cdat->dclo_1245__NORMSTEP_MFLAGCONJ.nbval = 0;
- /*iniboxint dint_1230__ */
- /*_.VALBXINT___V1320*/ meltfptr[1319] = (void *) &cdat->dint_1230__;
- cdat->dint_1230__.discr =
+ /*iniboxint dint_1246__ */
+ /*_.VALBXINT___V1337*/ meltfptr[1336] = (void *) &cdat->dint_1246__;
+ cdat->dint_1246__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1230__.val = 0;
+ cdat->dint_1246__.val = 0;
-/*iniobj dsym_1231__CLASS_NREP_CHUNK*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1324*/ meltfptr[1323])
- /*_.VALDATA___V1324*/
- meltfptr[1323] = (void *) &cdat->dsym_1231__CLASS_NREP_CHUNK;
+/*iniobj dsym_1247__CLASS_NREP_CHUNK*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1341*/ meltfptr[1340])
+ /*_.VALDATA___V1341*/
+ meltfptr[1340] = (void *) &cdat->dsym_1247__CLASS_NREP_CHUNK;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1231__CLASS_NREP_CHUNK",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1247__CLASS_NREP_CHUNK",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1231__CLASS_NREP_CHUNK",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1247__CLASS_NREP_CHUNK",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1231__CLASS_NREP_CHUNK.meltobj_class =
+ cdat->dsym_1247__CLASS_NREP_CHUNK.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1231__CLASS_NREP_CHUNK.obj_hash = 877025959;
- cdat->dsym_1231__CLASS_NREP_CHUNK.obj_len = 3;
+ cdat->dsym_1247__CLASS_NREP_CHUNK.obj_hash = 877025959;
+ cdat->dsym_1247__CLASS_NREP_CHUNK.obj_len = 3;
-/*inistring dstr_1232__CLASS_NREP_CHUNK*/
- /*_.VALSTR___V1325*/ meltfptr[1324] =
- (void *) &cdat->dstr_1232__CLASS_NREP_CHUNK;
- cdat->dstr_1232__CLASS_NREP_CHUNK.discr =
+/*inistring dstr_1248__CLASS_NREP_CHUNK*/
+ /*_.VALSTR___V1342*/ meltfptr[1341] =
+ (void *) &cdat->dstr_1248__CLASS_NREP_CHUNK;
+ cdat->dstr_1248__CLASS_NREP_CHUNK.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1232__CLASS_NREP_CHUNK.val,
+ /*small inistring */ strncpy (cdat->dstr_1248__CLASS_NREP_CHUNK.val,
"CLASS_NREP_CHUNK",
- sizeof (cdat->dstr_1232__CLASS_NREP_CHUNK.
+ sizeof (cdat->dstr_1248__CLASS_NREP_CHUNK.
val) - 1);
-/*iniobj dsym_1233__AND_MATCH_FLAGS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1321*/ meltfptr[1320])
- /*_.VALDATA___V1321*/
- meltfptr[1320] = (void *) &cdat->dsym_1233__AND_MATCH_FLAGS;
+/*iniobj dsym_1249__AND_MATCH_FLAGS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1338*/ meltfptr[1337])
+ /*_.VALDATA___V1338*/
+ meltfptr[1337] = (void *) &cdat->dsym_1249__AND_MATCH_FLAGS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1233__AND_MATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1249__AND_MATCH_FLAGS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1233__AND_MATCH_FLAGS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1249__AND_MATCH_FLAGS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1233__AND_MATCH_FLAGS.meltobj_class =
+ cdat->dsym_1249__AND_MATCH_FLAGS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1233__AND_MATCH_FLAGS.obj_hash = 812433766;
- cdat->dsym_1233__AND_MATCH_FLAGS.obj_len = 3;
+ cdat->dsym_1249__AND_MATCH_FLAGS.obj_hash = 812433766;
+ cdat->dsym_1249__AND_MATCH_FLAGS.obj_len = 3;
-/*inistring dstr_1234__AND_MATCH_FLAGS*/
- /*_.VALSTR___V1322*/ meltfptr[1321] =
- (void *) &cdat->dstr_1234__AND_MATCH_FLAGS;
- cdat->dstr_1234__AND_MATCH_FLAGS.discr =
+/*inistring dstr_1250__AND_MATCH_FLAGS*/
+ /*_.VALSTR___V1339*/ meltfptr[1338] =
+ (void *) &cdat->dstr_1250__AND_MATCH_FLAGS;
+ cdat->dstr_1250__AND_MATCH_FLAGS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1234__AND_MATCH_FLAGS.val,
+ /*small inistring */ strncpy (cdat->dstr_1250__AND_MATCH_FLAGS.val,
"AND_MATCH_FLAGS",
- sizeof (cdat->dstr_1234__AND_MATCH_FLAGS.
+ sizeof (cdat->dstr_1250__AND_MATCH_FLAGS.
val) - 1);
-/*iniobj dsym_1235__CTYPE_LONG*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1326*/ meltfptr[1325])
- /*_.VALDATA___V1326*/
- meltfptr[1325] = (void *) &cdat->dsym_1235__CTYPE_LONG;
+/*iniobj dsym_1251__CTYPE_LONG*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1343*/ meltfptr[1342])
+ /*_.VALDATA___V1343*/
+ meltfptr[1342] = (void *) &cdat->dsym_1251__CTYPE_LONG;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1235__CTYPE_LONG",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1251__CTYPE_LONG",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1235__CTYPE_LONG",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1251__CTYPE_LONG",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1235__CTYPE_LONG.meltobj_class =
+ cdat->dsym_1251__CTYPE_LONG.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1235__CTYPE_LONG.obj_hash = 64180850;
- cdat->dsym_1235__CTYPE_LONG.obj_len = 3;
+ cdat->dsym_1251__CTYPE_LONG.obj_hash = 64180850;
+ cdat->dsym_1251__CTYPE_LONG.obj_len = 3;
-/*inistring dstr_1236__CTYPE_LONG*/
- /*_.VALSTR___V1327*/ meltfptr[1326] = (void *) &cdat->dstr_1236__CTYPE_LONG;
- cdat->dstr_1236__CTYPE_LONG.discr =
+/*inistring dstr_1252__CTYPE_LONG*/
+ /*_.VALSTR___V1344*/ meltfptr[1343] = (void *) &cdat->dstr_1252__CTYPE_LONG;
+ cdat->dstr_1252__CTYPE_LONG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1236__CTYPE_LONG.val, "CTYPE_LONG",
- sizeof (cdat->dstr_1236__CTYPE_LONG.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1252__CTYPE_LONG.val, "CTYPE_LONG",
+ sizeof (cdat->dstr_1252__CTYPE_LONG.val) - 1);
-/*iniobj dsym_1237__DISCR_VERBATIM_STRING*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1328*/ meltfptr[1327])
- /*_.VALDATA___V1328*/
- meltfptr[1327] = (void *) &cdat->dsym_1237__DISCR_VERBATIM_STRING;
+/*iniobj dsym_1253__DISCR_VERBATIM_STRING*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1345*/ meltfptr[1344])
+ /*_.VALDATA___V1345*/
+ meltfptr[1344] = (void *) &cdat->dsym_1253__DISCR_VERBATIM_STRING;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1237__DISCR_VERBATIM_STRING",
+ ("iniobj check.discr isobj dsym_1253__DISCR_VERBATIM_STRING",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1237__DISCR_VERBATIM_STRING",
+ ("iniobj check.discr objmagic dsym_1253__DISCR_VERBATIM_STRING",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1237__DISCR_VERBATIM_STRING.meltobj_class =
+ cdat->dsym_1253__DISCR_VERBATIM_STRING.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1237__DISCR_VERBATIM_STRING.obj_hash = 258402049;
- cdat->dsym_1237__DISCR_VERBATIM_STRING.obj_len = 3;
+ cdat->dsym_1253__DISCR_VERBATIM_STRING.obj_hash = 258402049;
+ cdat->dsym_1253__DISCR_VERBATIM_STRING.obj_len = 3;
-/*inistring dstr_1238__DISCR_VERBATIM_S*/
- /*_.VALSTR___V1329*/ meltfptr[1328] =
- (void *) &cdat->dstr_1238__DISCR_VERBATIM_S;
- cdat->dstr_1238__DISCR_VERBATIM_S.discr =
+/*inistring dstr_1254__DISCR_VERBATIM_S*/
+ /*_.VALSTR___V1346*/ meltfptr[1345] =
+ (void *) &cdat->dstr_1254__DISCR_VERBATIM_S;
+ cdat->dstr_1254__DISCR_VERBATIM_S.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1238__DISCR_VERBATIM_S.val,
+ /*small inistring */ strncpy (cdat->dstr_1254__DISCR_VERBATIM_S.val,
"DISCR_VERBATIM_STRING",
- sizeof (cdat->dstr_1238__DISCR_VERBATIM_S.
+ sizeof (cdat->dstr_1254__DISCR_VERBATIM_S.
val) - 1);
- /*inirout drout_1239__NORMSTEP_MTESTINSTANCE */
- /*_.VALROUT___V1330*/ meltfptr[1329] =
- (void *) &cdat->drout_1239__NORMSTEP_MTESTINSTANCE;
- cdat->drout_1239__NORMSTEP_MTESTINSTANCE.discr =
+ /*inirout drout_1255__NORMSTEP_MTESTINSTANCE */
+ /*_.VALROUT___V1347*/ meltfptr[1346] =
+ (void *) &cdat->drout_1255__NORMSTEP_MTESTINSTANCE;
+ cdat->drout_1255__NORMSTEP_MTESTINSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1239__NORMSTEP_MTESTINSTANCE.routdescr,
- "NORMSTEP_MTESTINSTANCE @warmelt-normatch.melt:5300",
+ strncpy (cdat->drout_1255__NORMSTEP_MTESTINSTANCE.routdescr,
+ "NORMSTEP_MTESTINSTANCE @warmelt-normatch.melt:5409",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1239__NORMSTEP_MTESTINSTANCE.nbval = 21;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1239__NORMSTEP_MTESTINSTANCE,
- meltrout_104_warmelt_normatch_NORMSTEP_MTESTINSTANCE);
-
- /*iniclos dclo_1240__NORMSTEP_MTESTINSTANCE */
- /*_.VALCLO___V1333*/ meltfptr[1332] =
- (void *) &cdat->dclo_1240__NORMSTEP_MTESTINSTANCE;
- cdat->dclo_1240__NORMSTEP_MTESTINSTANCE.discr =
+ cdat->drout_1255__NORMSTEP_MTESTINSTANCE.nbval = 21;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1255__NORMSTEP_MTESTINSTANCE,
+ meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE);
+
+ /*iniclos dclo_1256__NORMSTEP_MTESTINSTANCE */
+ /*_.VALCLO___V1350*/ meltfptr[1349] =
+ (void *) &cdat->dclo_1256__NORMSTEP_MTESTINSTANCE;
+ cdat->dclo_1256__NORMSTEP_MTESTINSTANCE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1240__NORMSTEP_MTESTINSTANCE.nbval = 0;
+ cdat->dclo_1256__NORMSTEP_MTESTINSTANCE.nbval = 0;
-/*iniobj dsym_1241__CLASS_NREP_IFISA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1334*/ meltfptr[1333])
- /*_.VALDATA___V1334*/
- meltfptr[1333] = (void *) &cdat->dsym_1241__CLASS_NREP_IFISA;
+/*iniobj dsym_1257__CLASS_NREP_IFISA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1351*/ meltfptr[1350])
+ /*_.VALDATA___V1351*/
+ meltfptr[1350] = (void *) &cdat->dsym_1257__CLASS_NREP_IFISA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1241__CLASS_NREP_IFISA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1257__CLASS_NREP_IFISA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1241__CLASS_NREP_IFISA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1257__CLASS_NREP_IFISA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1241__CLASS_NREP_IFISA.meltobj_class =
+ cdat->dsym_1257__CLASS_NREP_IFISA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1241__CLASS_NREP_IFISA.obj_hash = 974189077;
- cdat->dsym_1241__CLASS_NREP_IFISA.obj_len = 3;
+ cdat->dsym_1257__CLASS_NREP_IFISA.obj_hash = 974189077;
+ cdat->dsym_1257__CLASS_NREP_IFISA.obj_len = 3;
-/*inistring dstr_1242__CLASS_NREP_IFISA*/
- /*_.VALSTR___V1335*/ meltfptr[1334] =
- (void *) &cdat->dstr_1242__CLASS_NREP_IFISA;
- cdat->dstr_1242__CLASS_NREP_IFISA.discr =
+/*inistring dstr_1258__CLASS_NREP_IFISA*/
+ /*_.VALSTR___V1352*/ meltfptr[1351] =
+ (void *) &cdat->dstr_1258__CLASS_NREP_IFISA;
+ cdat->dstr_1258__CLASS_NREP_IFISA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1242__CLASS_NREP_IFISA.val,
+ /*small inistring */ strncpy (cdat->dstr_1258__CLASS_NREP_IFISA.val,
"CLASS_NREP_IFISA",
- sizeof (cdat->dstr_1242__CLASS_NREP_IFISA.
+ sizeof (cdat->dstr_1258__CLASS_NREP_IFISA.
val) - 1);
-/*iniobj dsym_1243__CLASS_NREP_PROGN*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1336*/ meltfptr[1335])
- /*_.VALDATA___V1336*/
- meltfptr[1335] = (void *) &cdat->dsym_1243__CLASS_NREP_PROGN;
+/*iniobj dsym_1259__CLASS_NREP_PROGN*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1353*/ meltfptr[1352])
+ /*_.VALDATA___V1353*/
+ meltfptr[1352] = (void *) &cdat->dsym_1259__CLASS_NREP_PROGN;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1243__CLASS_NREP_PROGN",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1259__CLASS_NREP_PROGN",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1243__CLASS_NREP_PROGN",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1259__CLASS_NREP_PROGN",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1243__CLASS_NREP_PROGN.meltobj_class =
+ cdat->dsym_1259__CLASS_NREP_PROGN.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1243__CLASS_NREP_PROGN.obj_hash = 378668026;
- cdat->dsym_1243__CLASS_NREP_PROGN.obj_len = 3;
+ cdat->dsym_1259__CLASS_NREP_PROGN.obj_hash = 378668026;
+ cdat->dsym_1259__CLASS_NREP_PROGN.obj_len = 3;
-/*inistring dstr_1244__CLASS_NREP_PROGN*/
- /*_.VALSTR___V1337*/ meltfptr[1336] =
- (void *) &cdat->dstr_1244__CLASS_NREP_PROGN;
- cdat->dstr_1244__CLASS_NREP_PROGN.discr =
+/*inistring dstr_1260__CLASS_NREP_PROGN*/
+ /*_.VALSTR___V1354*/ meltfptr[1353] =
+ (void *) &cdat->dstr_1260__CLASS_NREP_PROGN;
+ cdat->dstr_1260__CLASS_NREP_PROGN.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1244__CLASS_NREP_PROGN.val,
+ /*small inistring */ strncpy (cdat->dstr_1260__CLASS_NREP_PROGN.val,
"CLASS_NREP_PROGN",
- sizeof (cdat->dstr_1244__CLASS_NREP_PROGN.
+ sizeof (cdat->dstr_1260__CLASS_NREP_PROGN.
val) - 1);
- /*inirout drout_1245__NORMSTEP_MTESTMULTIPLE */
- /*_.VALROUT___V1338*/ meltfptr[1337] =
- (void *) &cdat->drout_1245__NORMSTEP_MTESTMULTIPLE;
- cdat->drout_1245__NORMSTEP_MTESTMULTIPLE.discr =
+ /*inirout drout_1261__NORMSTEP_MTESTMULTIPLE */
+ /*_.VALROUT___V1355*/ meltfptr[1354] =
+ (void *) &cdat->drout_1261__NORMSTEP_MTESTMULTIPLE;
+ cdat->drout_1261__NORMSTEP_MTESTMULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1245__NORMSTEP_MTESTMULTIPLE.routdescr,
- "NORMSTEP_MTESTMULTIPLE @warmelt-normatch.melt:5411",
+ strncpy (cdat->drout_1261__NORMSTEP_MTESTMULTIPLE.routdescr,
+ "NORMSTEP_MTESTMULTIPLE @warmelt-normatch.melt:5520",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1245__NORMSTEP_MTESTMULTIPLE.nbval = 15;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1245__NORMSTEP_MTESTMULTIPLE,
- meltrout_105_warmelt_normatch_NORMSTEP_MTESTMULTIPLE);
-
- /*iniclos dclo_1246__NORMSTEP_MTESTMULTIPLE */
- /*_.VALCLO___V1339*/ meltfptr[1338] =
- (void *) &cdat->dclo_1246__NORMSTEP_MTESTMULTIPLE;
- cdat->dclo_1246__NORMSTEP_MTESTMULTIPLE.discr =
+ cdat->drout_1261__NORMSTEP_MTESTMULTIPLE.nbval = 20;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1261__NORMSTEP_MTESTMULTIPLE,
+ meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE);
+
+ /*iniclos dclo_1262__NORMSTEP_MTESTMULTIPLE */
+ /*_.VALCLO___V1356*/ meltfptr[1355] =
+ (void *) &cdat->dclo_1262__NORMSTEP_MTESTMULTIPLE;
+ cdat->dclo_1262__NORMSTEP_MTESTMULTIPLE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1246__NORMSTEP_MTESTMULTIPLE.nbval = 0;
+ cdat->dclo_1262__NORMSTEP_MTESTMULTIPLE.nbval = 0;
-/*iniobj dsym_1247__CLASS_NREP_IFTUPLESIZED*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1340*/ meltfptr[1339])
- /*_.VALDATA___V1340*/
- meltfptr[1339] = (void *) &cdat->dsym_1247__CLASS_NREP_IFTUPLESIZED;
+/*iniobj dsym_1263__CLASS_NREP_IFTUPLESIZED*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1357*/ meltfptr[1356])
+ /*_.VALDATA___V1357*/
+ meltfptr[1356] = (void *) &cdat->dsym_1263__CLASS_NREP_IFTUPLESIZED;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1247__CLASS_NREP_IFTUPLESIZED",
+ ("iniobj check.discr isobj dsym_1263__CLASS_NREP_IFTUPLESIZED",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1247__CLASS_NREP_IFTUPLESIZED",
+ ("iniobj check.discr objmagic dsym_1263__CLASS_NREP_IFTUPLESIZED",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1247__CLASS_NREP_IFTUPLESIZED.meltobj_class =
+ cdat->dsym_1263__CLASS_NREP_IFTUPLESIZED.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1247__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499;
- cdat->dsym_1247__CLASS_NREP_IFTUPLESIZED.obj_len = 3;
+ cdat->dsym_1263__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499;
+ cdat->dsym_1263__CLASS_NREP_IFTUPLESIZED.obj_len = 3;
-/*inistring dstr_1248__CLASS_NREP_IFTUP*/
- /*_.VALSTR___V1341*/ meltfptr[1340] =
- (void *) &cdat->dstr_1248__CLASS_NREP_IFTUP;
- cdat->dstr_1248__CLASS_NREP_IFTUP.discr =
+/*inistring dstr_1264__CLASS_NREP_IFTUP*/
+ /*_.VALSTR___V1358*/ meltfptr[1357] =
+ (void *) &cdat->dstr_1264__CLASS_NREP_IFTUP;
+ cdat->dstr_1264__CLASS_NREP_IFTUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1248__CLASS_NREP_IFTUP.val,
+ /*small inistring */ strncpy (cdat->dstr_1264__CLASS_NREP_IFTUP.val,
"CLASS_NREP_IFTUPLESIZED",
- sizeof (cdat->dstr_1248__CLASS_NREP_IFTUP.
+ sizeof (cdat->dstr_1264__CLASS_NREP_IFTUP.
+ val) - 1);
+
+/*iniobj dsym_1265__CLASS_NREP_IFCOMMON*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1359*/ meltfptr[1358])
+ /*_.VALDATA___V1359*/
+ meltfptr[1358] = (void *) &cdat->dsym_1265__CLASS_NREP_IFCOMMON;
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg ("iniobj check.discr isobj dsym_1265__CLASS_NREP_IFCOMMON",
+ melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
+ == MELTOBMAG_OBJECT);
+ if (MELT_LIKELY (!melt_prohibit_garbcoll))
+ melt_assertmsg
+ ("iniobj check.discr objmagic dsym_1265__CLASS_NREP_IFCOMMON",
+ ((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
+ meltobj_magic == MELTOBMAG_OBJECT);
+ cdat->dsym_1265__CLASS_NREP_IFCOMMON.meltobj_class =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
+ cdat->dsym_1265__CLASS_NREP_IFCOMMON.obj_hash = 334041360;
+ cdat->dsym_1265__CLASS_NREP_IFCOMMON.obj_len = 3;
+
+
+/*inistring dstr_1266__CLASS_NREP_IFCOM*/
+ /*_.VALSTR___V1360*/ meltfptr[1359] =
+ (void *) &cdat->dstr_1266__CLASS_NREP_IFCOM;
+ cdat->dstr_1266__CLASS_NREP_IFCOM.discr =
+ (meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
+ /*small inistring */ strncpy (cdat->dstr_1266__CLASS_NREP_IFCOM.val,
+ "CLASS_NREP_IFCOMMON",
+ sizeof (cdat->dstr_1266__CLASS_NREP_IFCOM.
val) - 1);
- /*inirout drout_1249__NORMSTEP_MTESTVAR */
- /*_.VALROUT___V1342*/ meltfptr[1341] =
- (void *) &cdat->drout_1249__NORMSTEP_MTESTVAR;
- cdat->drout_1249__NORMSTEP_MTESTVAR.discr =
+ /*inirout drout_1267__NORMSTEP_MTESTVAR */
+ /*_.VALROUT___V1361*/ meltfptr[1360] =
+ (void *) &cdat->drout_1267__NORMSTEP_MTESTVAR;
+ cdat->drout_1267__NORMSTEP_MTESTVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1249__NORMSTEP_MTESTVAR.routdescr,
- "NORMSTEP_MTESTVAR @warmelt-normatch.melt:5478",
+ strncpy (cdat->drout_1267__NORMSTEP_MTESTVAR.routdescr,
+ "NORMSTEP_MTESTVAR @warmelt-normatch.melt:5629",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1249__NORMSTEP_MTESTVAR.nbval = 9;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1249__NORMSTEP_MTESTVAR,
- meltrout_106_warmelt_normatch_NORMSTEP_MTESTVAR);
-
- /*iniclos dclo_1250__NORMSTEP_MTESTVAR */
- /*_.VALCLO___V1343*/ meltfptr[1342] =
- (void *) &cdat->dclo_1250__NORMSTEP_MTESTVAR;
- cdat->dclo_1250__NORMSTEP_MTESTVAR.discr =
+ cdat->drout_1267__NORMSTEP_MTESTVAR.nbval = 9;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1267__NORMSTEP_MTESTVAR,
+ meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR);
+
+ /*iniclos dclo_1268__NORMSTEP_MTESTVAR */
+ /*_.VALCLO___V1362*/ meltfptr[1361] =
+ (void *) &cdat->dclo_1268__NORMSTEP_MTESTVAR;
+ cdat->dclo_1268__NORMSTEP_MTESTVAR.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1250__NORMSTEP_MTESTVAR.nbval = 0;
+ cdat->dclo_1268__NORMSTEP_MTESTVAR.nbval = 0;
-/*iniobj dsym_1251__CLASS_NREP_IFSAME*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1344*/ meltfptr[1343])
- /*_.VALDATA___V1344*/
- meltfptr[1343] = (void *) &cdat->dsym_1251__CLASS_NREP_IFSAME;
+/*iniobj dsym_1269__CLASS_NREP_IFSAME*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1363*/ meltfptr[1362])
+ /*_.VALDATA___V1363*/
+ meltfptr[1362] = (void *) &cdat->dsym_1269__CLASS_NREP_IFSAME;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1251__CLASS_NREP_IFSAME",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1269__CLASS_NREP_IFSAME",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1251__CLASS_NREP_IFSAME",
+ ("iniobj check.discr objmagic dsym_1269__CLASS_NREP_IFSAME",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1251__CLASS_NREP_IFSAME.meltobj_class =
+ cdat->dsym_1269__CLASS_NREP_IFSAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1251__CLASS_NREP_IFSAME.obj_hash = 280475710;
- cdat->dsym_1251__CLASS_NREP_IFSAME.obj_len = 3;
+ cdat->dsym_1269__CLASS_NREP_IFSAME.obj_hash = 280475710;
+ cdat->dsym_1269__CLASS_NREP_IFSAME.obj_len = 3;
-/*inistring dstr_1252__CLASS_NREP_IFSAM*/
- /*_.VALSTR___V1345*/ meltfptr[1344] =
- (void *) &cdat->dstr_1252__CLASS_NREP_IFSAM;
- cdat->dstr_1252__CLASS_NREP_IFSAM.discr =
+/*inistring dstr_1270__CLASS_NREP_IFSAM*/
+ /*_.VALSTR___V1364*/ meltfptr[1363] =
+ (void *) &cdat->dstr_1270__CLASS_NREP_IFSAM;
+ cdat->dstr_1270__CLASS_NREP_IFSAM.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1252__CLASS_NREP_IFSAM.val,
+ /*small inistring */ strncpy (cdat->dstr_1270__CLASS_NREP_IFSAM.val,
"CLASS_NREP_IFSAME",
- sizeof (cdat->dstr_1252__CLASS_NREP_IFSAM.
+ sizeof (cdat->dstr_1270__CLASS_NREP_IFSAM.
val) - 1);
- /*inirout drout_1253__NORMSTEP_MGROUP */
- /*_.VALROUT___V1346*/ meltfptr[1345] =
- (void *) &cdat->drout_1253__NORMSTEP_MGROUP;
- cdat->drout_1253__NORMSTEP_MGROUP.discr =
+ /*inirout drout_1271__NORMSTEP_MGROUP */
+ /*_.VALROUT___V1365*/ meltfptr[1364] =
+ (void *) &cdat->drout_1271__NORMSTEP_MGROUP;
+ cdat->drout_1271__NORMSTEP_MGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1253__NORMSTEP_MGROUP.routdescr,
- "NORMSTEP_MGROUP @warmelt-normatch.melt:5555",
+ strncpy (cdat->drout_1271__NORMSTEP_MGROUP.routdescr,
+ "NORMSTEP_MGROUP @warmelt-normatch.melt:5706",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1253__NORMSTEP_MGROUP.nbval = 15;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1253__NORMSTEP_MGROUP,
- meltrout_107_warmelt_normatch_NORMSTEP_MGROUP);
-
- /*iniclos dclo_1254__NORMSTEP_MGROUP */
- /*_.VALCLO___V1351*/ meltfptr[1350] =
- (void *) &cdat->dclo_1254__NORMSTEP_MGROUP;
- cdat->dclo_1254__NORMSTEP_MGROUP.discr =
+ cdat->drout_1271__NORMSTEP_MGROUP.nbval = 15;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1271__NORMSTEP_MGROUP,
+ meltrout_115_warmelt_normatch_NORMSTEP_MGROUP);
+
+ /*iniclos dclo_1272__NORMSTEP_MGROUP */
+ /*_.VALCLO___V1370*/ meltfptr[1369] =
+ (void *) &cdat->dclo_1272__NORMSTEP_MGROUP;
+ cdat->dclo_1272__NORMSTEP_MGROUP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1254__NORMSTEP_MGROUP.nbval = 0;
+ cdat->dclo_1272__NORMSTEP_MGROUP.nbval = 0;
-/*iniobj dsym_1255__LIST_MAP*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1352*/ meltfptr[1351])
- /*_.VALDATA___V1352*/
- meltfptr[1351] = (void *) &cdat->dsym_1255__LIST_MAP;
+/*iniobj dsym_1273__LIST_MAP*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1371*/ meltfptr[1370])
+ /*_.VALDATA___V1371*/
+ meltfptr[1370] = (void *) &cdat->dsym_1273__LIST_MAP;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1255__LIST_MAP",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1273__LIST_MAP",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1255__LIST_MAP",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1273__LIST_MAP",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1255__LIST_MAP.meltobj_class =
+ cdat->dsym_1273__LIST_MAP.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1255__LIST_MAP.obj_hash = 941133477;
- cdat->dsym_1255__LIST_MAP.obj_len = 3;
+ cdat->dsym_1273__LIST_MAP.obj_hash = 941133477;
+ cdat->dsym_1273__LIST_MAP.obj_len = 3;
-/*inistring dstr_1256__LIST_MAP*/
- /*_.VALSTR___V1353*/ meltfptr[1352] = (void *) &cdat->dstr_1256__LIST_MAP;
- cdat->dstr_1256__LIST_MAP.discr =
+/*inistring dstr_1274__LIST_MAP*/
+ /*_.VALSTR___V1372*/ meltfptr[1371] = (void *) &cdat->dstr_1274__LIST_MAP;
+ cdat->dstr_1274__LIST_MAP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1256__LIST_MAP.val, "LIST_MAP",
- sizeof (cdat->dstr_1256__LIST_MAP.val) - 1);
- /*inirout drout_1257__LAMBDA_ */
- /*_.VALROUT___V1347*/ meltfptr[1346] = (void *) &cdat->drout_1257__LAMBDA_;
- cdat->drout_1257__LAMBDA_.discr =
+ /*small inistring */ strncpy (cdat->dstr_1274__LIST_MAP.val, "LIST_MAP",
+ sizeof (cdat->dstr_1274__LIST_MAP.val) - 1);
+ /*inirout drout_1275__LAMBDA_ */
+ /*_.VALROUT___V1366*/ meltfptr[1365] = (void *) &cdat->drout_1275__LAMBDA_;
+ cdat->drout_1275__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1257__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:5578", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1257__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1257__LAMBDA_,
- meltrout_108_warmelt_normatch_LAMBDA___24__);
-
- /*inirout drout_1258__LAMBDA_ */
- /*_.VALROUT___V1348*/ meltfptr[1347] = (void *) &cdat->drout_1258__LAMBDA_;
- cdat->drout_1258__LAMBDA_.discr =
+ strncpy (cdat->drout_1275__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:5729", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1275__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1275__LAMBDA_,
+ meltrout_116_warmelt_normatch_LAMBDA___24__);
+
+ /*inirout drout_1276__LAMBDA_ */
+ /*_.VALROUT___V1367*/ meltfptr[1366] = (void *) &cdat->drout_1276__LAMBDA_;
+ cdat->drout_1276__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1258__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:5581", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1258__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1258__LAMBDA_,
- meltrout_109_warmelt_normatch_LAMBDA___25__);
-
- /*inirout drout_1259__LAMBDA_ */
- /*_.VALROUT___V1349*/ meltfptr[1348] = (void *) &cdat->drout_1259__LAMBDA_;
- cdat->drout_1259__LAMBDA_.discr =
+ strncpy (cdat->drout_1276__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:5732", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1276__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1276__LAMBDA_,
+ meltrout_117_warmelt_normatch_LAMBDA___25__);
+
+ /*inirout drout_1277__LAMBDA_ */
+ /*_.VALROUT___V1368*/ meltfptr[1367] = (void *) &cdat->drout_1277__LAMBDA_;
+ cdat->drout_1277__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1259__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:5594", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1259__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1259__LAMBDA_,
- meltrout_110_warmelt_normatch_LAMBDA___26__);
-
- /*inirout drout_1260__LAMBDA_ */
- /*_.VALROUT___V1350*/ meltfptr[1349] = (void *) &cdat->drout_1260__LAMBDA_;
- cdat->drout_1260__LAMBDA_.discr =
+ strncpy (cdat->drout_1277__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:5745", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1277__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1277__LAMBDA_,
+ meltrout_118_warmelt_normatch_LAMBDA___26__);
+
+ /*inirout drout_1278__LAMBDA_ */
+ /*_.VALROUT___V1369*/ meltfptr[1368] = (void *) &cdat->drout_1278__LAMBDA_;
+ cdat->drout_1278__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1260__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:5597", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1260__LAMBDA_.nbval = 1;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1260__LAMBDA_,
- meltrout_111_warmelt_normatch_LAMBDA___27__);
-
- /*inirout drout_1261__NORMSTEP_MSUCCWHENFLAG */
- /*_.VALROUT___V1354*/ meltfptr[1353] =
- (void *) &cdat->drout_1261__NORMSTEP_MSUCCWHENFLAG;
- cdat->drout_1261__NORMSTEP_MSUCCWHENFLAG.discr =
+ strncpy (cdat->drout_1278__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:5748", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1278__LAMBDA_.nbval = 1;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1278__LAMBDA_,
+ meltrout_119_warmelt_normatch_LAMBDA___27__);
+
+ /*inirout drout_1279__NORMSTEP_MSUCCWHENFLAG */
+ /*_.VALROUT___V1373*/ meltfptr[1372] =
+ (void *) &cdat->drout_1279__NORMSTEP_MSUCCWHENFLAG;
+ cdat->drout_1279__NORMSTEP_MSUCCWHENFLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1261__NORMSTEP_MSUCCWHENFLAG.routdescr,
- "NORMSTEP_MSUCCWHENFLAG @warmelt-normatch.melt:5623",
+ strncpy (cdat->drout_1279__NORMSTEP_MSUCCWHENFLAG.routdescr,
+ "NORMSTEP_MSUCCWHENFLAG @warmelt-normatch.melt:5774",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1261__NORMSTEP_MSUCCWHENFLAG.nbval = 12;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1261__NORMSTEP_MSUCCWHENFLAG,
- meltrout_112_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG);
-
- /*iniclos dclo_1262__NORMSTEP_MSUCCWHENFLAG */
- /*_.VALCLO___V1355*/ meltfptr[1354] =
- (void *) &cdat->dclo_1262__NORMSTEP_MSUCCWHENFLAG;
- cdat->dclo_1262__NORMSTEP_MSUCCWHENFLAG.discr =
+ cdat->drout_1279__NORMSTEP_MSUCCWHENFLAG.nbval = 12;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1279__NORMSTEP_MSUCCWHENFLAG,
+ meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG);
+
+ /*iniclos dclo_1280__NORMSTEP_MSUCCWHENFLAG */
+ /*_.VALCLO___V1374*/ meltfptr[1373] =
+ (void *) &cdat->dclo_1280__NORMSTEP_MSUCCWHENFLAG;
+ cdat->dclo_1280__NORMSTEP_MSUCCWHENFLAG.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1262__NORMSTEP_MSUCCWHENFLAG.nbval = 0;
+ cdat->dclo_1280__NORMSTEP_MSUCCWHENFLAG.nbval = 0;
-/*iniobj dsym_1263__CLASS_NREP_IF*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1356*/ meltfptr[1355])
- /*_.VALDATA___V1356*/
- meltfptr[1355] = (void *) &cdat->dsym_1263__CLASS_NREP_IF;
+/*iniobj dsym_1281__CLASS_NREP_IF*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1375*/ meltfptr[1374])
+ /*_.VALDATA___V1375*/
+ meltfptr[1374] = (void *) &cdat->dsym_1281__CLASS_NREP_IF;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1263__CLASS_NREP_IF",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1281__CLASS_NREP_IF",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1263__CLASS_NREP_IF",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1281__CLASS_NREP_IF",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1263__CLASS_NREP_IF.meltobj_class =
+ cdat->dsym_1281__CLASS_NREP_IF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1263__CLASS_NREP_IF.obj_hash = 942597626;
- cdat->dsym_1263__CLASS_NREP_IF.obj_len = 3;
+ cdat->dsym_1281__CLASS_NREP_IF.obj_hash = 942597626;
+ cdat->dsym_1281__CLASS_NREP_IF.obj_len = 3;
-/*inistring dstr_1264__CLASS_NREP_IF*/
- /*_.VALSTR___V1357*/ meltfptr[1356] =
- (void *) &cdat->dstr_1264__CLASS_NREP_IF;
- cdat->dstr_1264__CLASS_NREP_IF.discr =
+/*inistring dstr_1282__CLASS_NREP_IF*/
+ /*_.VALSTR___V1376*/ meltfptr[1375] =
+ (void *) &cdat->dstr_1282__CLASS_NREP_IF;
+ cdat->dstr_1282__CLASS_NREP_IF.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1264__CLASS_NREP_IF.val,
+ /*small inistring */ strncpy (cdat->dstr_1282__CLASS_NREP_IF.val,
"CLASS_NREP_IF",
- sizeof (cdat->dstr_1264__CLASS_NREP_IF.val) -
+ sizeof (cdat->dstr_1282__CLASS_NREP_IF.val) -
1);
-/*iniobj dsym_1265__NORMALIZE_TEST_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1358*/ meltfptr[1357])
- /*_.VALDATA___V1358*/
- meltfptr[1357] = (void *) &cdat->dsym_1265__NORMALIZE_TEST_MATCHER;
+/*iniobj dsym_1283__NORMALIZE_TEST_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1377*/ meltfptr[1376])
+ /*_.VALDATA___V1377*/
+ meltfptr[1376] = (void *) &cdat->dsym_1283__NORMALIZE_TEST_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1265__NORMALIZE_TEST_MATCHER",
+ ("iniobj check.discr isobj dsym_1283__NORMALIZE_TEST_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1265__NORMALIZE_TEST_MATCHER",
+ ("iniobj check.discr objmagic dsym_1283__NORMALIZE_TEST_MATCHER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1265__NORMALIZE_TEST_MATCHER.meltobj_class =
+ cdat->dsym_1283__NORMALIZE_TEST_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1265__NORMALIZE_TEST_MATCHER.obj_hash = 542434886;
- cdat->dsym_1265__NORMALIZE_TEST_MATCHER.obj_len = 3;
+ cdat->dsym_1283__NORMALIZE_TEST_MATCHER.obj_hash = 542434886;
+ cdat->dsym_1283__NORMALIZE_TEST_MATCHER.obj_len = 3;
-/*inistring dstr_1266__NORMALIZE_TEST_M*/
- /*_.VALSTR___V1359*/ meltfptr[1358] =
- (void *) &cdat->dstr_1266__NORMALIZE_TEST_M;
- cdat->dstr_1266__NORMALIZE_TEST_M.discr =
+/*inistring dstr_1284__NORMALIZE_TEST_M*/
+ /*_.VALSTR___V1378*/ meltfptr[1377] =
+ (void *) &cdat->dstr_1284__NORMALIZE_TEST_M;
+ cdat->dstr_1284__NORMALIZE_TEST_M.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1266__NORMALIZE_TEST_M.val,
+ /*small inistring */ strncpy (cdat->dstr_1284__NORMALIZE_TEST_M.val,
"NORMALIZE_TEST_MATCHER",
- sizeof (cdat->dstr_1266__NORMALIZE_TEST_M.
+ sizeof (cdat->dstr_1284__NORMALIZE_TEST_M.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ iniobj");
-/*iniobj dobj_1267*/
-/*_.VALDATA___V1360*/ meltfptr[1359] = (void *) &cdat->dobj_1267;
+/*iniobj dobj_1285*/
+/*_.VALDATA___V1379*/ meltfptr[1378] = (void *) &cdat->dobj_1285;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1267",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1285",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1267",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1285",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1267.meltobj_class =
+ cdat->dobj_1285.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1267.obj_num = 0;
- cdat->dobj_1267.obj_hash = 943699623;
- cdat->dobj_1267.obj_len = 2;
+ cdat->dobj_1285.obj_num = 0;
+ cdat->dobj_1285.obj_hash = 1055460603;
+ cdat->dobj_1285.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1268*/
-/*_.VALDATA___V1361*/ meltfptr[1360] = (void *) &cdat->dobj_1268;
+/*iniobj dobj_1286*/
+/*_.VALDATA___V1380*/ meltfptr[1379] = (void *) &cdat->dobj_1286;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1268",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1286",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1268",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1286",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1268.meltobj_class =
+ cdat->dobj_1286.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1268.obj_num = 1;
- cdat->dobj_1268.obj_hash = 1068172550;
- cdat->dobj_1268.obj_len = 2;
+ cdat->dobj_1286.obj_num = 1;
+ cdat->dobj_1286.obj_hash = 526643725;
+ cdat->dobj_1286.obj_len = 2;
-/*iniobj dsym_1269__NDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1362*/ meltfptr[1361])
- /*_.VALDATA___V1362*/
- meltfptr[1361] = (void *) &cdat->dsym_1269__NDATA;
+/*iniobj dsym_1287__NDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1381*/ meltfptr[1380])
+ /*_.VALDATA___V1381*/
+ meltfptr[1380] = (void *) &cdat->dsym_1287__NDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1269__NDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1287__NDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1269__NDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1287__NDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1269__NDATA.meltobj_class =
+ cdat->dsym_1287__NDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1269__NDATA.obj_hash = 755248787;
- cdat->dsym_1269__NDATA.obj_len = 3;
+ cdat->dsym_1287__NDATA.obj_hash = 755248787;
+ cdat->dsym_1287__NDATA.obj_len = 3;
-/*inistring dstr_1270__NDATA*/
- /*_.VALSTR___V1363*/ meltfptr[1362] = (void *) &cdat->dstr_1270__NDATA;
- cdat->dstr_1270__NDATA.discr =
+/*inistring dstr_1288__NDATA*/
+ /*_.VALSTR___V1382*/ meltfptr[1381] = (void *) &cdat->dstr_1288__NDATA;
+ cdat->dstr_1288__NDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1270__NDATA.val, "NDATA",
- sizeof (cdat->dstr_1270__NDATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1288__NDATA.val, "NDATA",
+ sizeof (cdat->dstr_1288__NDATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_1271*/
-/*_.VALDATA___V1364*/ meltfptr[1363] = (void *) &cdat->dobj_1271;
+/*iniobj dobj_1289*/
+/*_.VALDATA___V1383*/ meltfptr[1382] = (void *) &cdat->dobj_1289;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1271",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1289",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1271",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1289",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1271.meltobj_class =
+ cdat->dobj_1289.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1271.obj_num = 2;
- cdat->dobj_1271.obj_hash = 851757990;
- cdat->dobj_1271.obj_len = 2;
+ cdat->dobj_1289.obj_num = 2;
+ cdat->dobj_1289.obj_hash = 563991420;
+ cdat->dobj_1289.obj_len = 2;
-/*iniobj dsym_1272__BINDLIST*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1365*/ meltfptr[1364])
- /*_.VALDATA___V1365*/
- meltfptr[1364] = (void *) &cdat->dsym_1272__BINDLIST;
+/*iniobj dsym_1290__BINDLIST*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1384*/ meltfptr[1383])
+ /*_.VALDATA___V1384*/
+ meltfptr[1383] = (void *) &cdat->dsym_1290__BINDLIST;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1272__BINDLIST",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1290__BINDLIST",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1272__BINDLIST",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1290__BINDLIST",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1272__BINDLIST.meltobj_class =
+ cdat->dsym_1290__BINDLIST.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1272__BINDLIST.obj_hash = 32425359;
- cdat->dsym_1272__BINDLIST.obj_len = 3;
+ cdat->dsym_1290__BINDLIST.obj_hash = 32425359;
+ cdat->dsym_1290__BINDLIST.obj_len = 3;
-/*inistring dstr_1273__BINDLIST*/
- /*_.VALSTR___V1366*/ meltfptr[1365] = (void *) &cdat->dstr_1273__BINDLIST;
- cdat->dstr_1273__BINDLIST.discr =
+/*inistring dstr_1291__BINDLIST*/
+ /*_.VALSTR___V1385*/ meltfptr[1384] = (void *) &cdat->dstr_1291__BINDLIST;
+ cdat->dstr_1291__BINDLIST.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1273__BINDLIST.val, "BINDLIST",
- sizeof (cdat->dstr_1273__BINDLIST.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1291__BINDLIST.val, "BINDLIST",
+ sizeof (cdat->dstr_1291__BINDLIST.val) - 1);
/*^iniobj */
-/*iniobj dobj_1274*/
-/*_.VALDATA___V1367*/ meltfptr[1366] = (void *) &cdat->dobj_1274;
+/*iniobj dobj_1292*/
+/*_.VALDATA___V1386*/ meltfptr[1385] = (void *) &cdat->dobj_1292;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1274",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1292",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1274",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1292",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1274.meltobj_class =
+ cdat->dobj_1292.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1274.obj_num = 3;
- cdat->dobj_1274.obj_hash = 780515660;
- cdat->dobj_1274.obj_len = 2;
+ cdat->dobj_1292.obj_num = 3;
+ cdat->dobj_1292.obj_hash = 708682724;
+ cdat->dobj_1292.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1275*/
-/*_.VALDATA___V1368*/ meltfptr[1367] = (void *) &cdat->dobj_1275;
+/*iniobj dobj_1293*/
+/*_.VALDATA___V1387*/ meltfptr[1386] = (void *) &cdat->dobj_1293;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1275",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1293",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1275",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1293",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1275.meltobj_class =
+ cdat->dobj_1293.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1275.obj_num = 4;
- cdat->dobj_1275.obj_hash = 549385483;
- cdat->dobj_1275.obj_len = 2;
+ cdat->dobj_1293.obj_num = 4;
+ cdat->dobj_1293.obj_hash = 108505688;
+ cdat->dobj_1293.obj_len = 2;
-/*iniobj dsym_1276__NJELSE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1369*/ meltfptr[1368])
- /*_.VALDATA___V1369*/
- meltfptr[1368] = (void *) &cdat->dsym_1276__NJELSE;
+/*iniobj dsym_1294__NJELSE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1388*/ meltfptr[1387])
+ /*_.VALDATA___V1388*/
+ meltfptr[1387] = (void *) &cdat->dsym_1294__NJELSE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1276__NJELSE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1294__NJELSE",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1276__NJELSE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1294__NJELSE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1276__NJELSE.meltobj_class =
+ cdat->dsym_1294__NJELSE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1276__NJELSE.obj_hash = 11456410;
- cdat->dsym_1276__NJELSE.obj_len = 3;
+ cdat->dsym_1294__NJELSE.obj_hash = 11456410;
+ cdat->dsym_1294__NJELSE.obj_len = 3;
-/*inistring dstr_1277__NJELSE*/
- /*_.VALSTR___V1370*/ meltfptr[1369] = (void *) &cdat->dstr_1277__NJELSE;
- cdat->dstr_1277__NJELSE.discr =
+/*inistring dstr_1295__NJELSE*/
+ /*_.VALSTR___V1389*/ meltfptr[1388] = (void *) &cdat->dstr_1295__NJELSE;
+ cdat->dstr_1295__NJELSE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1277__NJELSE.val, "NJELSE",
- sizeof (cdat->dstr_1277__NJELSE.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1295__NJELSE.val, "NJELSE",
+ sizeof (cdat->dstr_1295__NJELSE.val) - 1);
/*^iniobj */
-/*iniobj dobj_1278*/
-/*_.VALDATA___V1371*/ meltfptr[1370] = (void *) &cdat->dobj_1278;
+/*iniobj dobj_1296*/
+/*_.VALDATA___V1390*/ meltfptr[1389] = (void *) &cdat->dobj_1296;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1278",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1296",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1278",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1296",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1278.meltobj_class =
+ cdat->dobj_1296.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1278.obj_num = 5;
- cdat->dobj_1278.obj_hash = 105756884;
- cdat->dobj_1278.obj_len = 2;
-
- /*inimult dtup_1279__NORMALIZE_TEST_MATCHER */
- /*_.VALTUP___V1372*/ meltfptr[1371] =
- (void *) &cdat->dtup_1279__NORMALIZE_TEST_MATCHER;
- cdat->dtup_1279__NORMALIZE_TEST_MATCHER.discr =
+ cdat->dobj_1296.obj_num = 5;
+ cdat->dobj_1296.obj_hash = 1028696386;
+ cdat->dobj_1296.obj_len = 2;
+
+ /*inimult dtup_1297__NORMALIZE_TEST_MATCHER */
+ /*_.VALTUP___V1391*/ meltfptr[1390] =
+ (void *) &cdat->dtup_1297__NORMALIZE_TEST_MATCHER;
+ cdat->dtup_1297__NORMALIZE_TEST_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_1279__NORMALIZE_TEST_MATCHER.nbval = 6;
+ cdat->dtup_1297__NORMALIZE_TEST_MATCHER.nbval = 6;
/*^iniobj */
-/*iniobj dobj_1280__NORMALIZE_TEST_MATCHER*/
-/*_.VALDATA___V1373*/ meltfptr[1372] =
- (void *) &cdat->dobj_1280__NORMALIZE_TEST_MATCHER;
+/*iniobj dobj_1298__NORMALIZE_TEST_MATCHER*/
+/*_.VALDATA___V1392*/ meltfptr[1391] =
+ (void *) &cdat->dobj_1298__NORMALIZE_TEST_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1280__NORMALIZE_TEST_MATCHER",
+ ("iniobj check.discr isobj dobj_1298__NORMALIZE_TEST_MATCHER",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1280__NORMALIZE_TEST_MATCHER",
+ ("iniobj check.discr objmagic dobj_1298__NORMALIZE_TEST_MATCHER",
((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1280__NORMALIZE_TEST_MATCHER.meltobj_class =
+ cdat->dobj_1298__NORMALIZE_TEST_MATCHER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_1280__NORMALIZE_TEST_MATCHER.obj_hash = 811188266;
- cdat->dobj_1280__NORMALIZE_TEST_MATCHER.obj_len = 4;
+ cdat->dobj_1298__NORMALIZE_TEST_MATCHER.obj_hash = 564232218;
+ cdat->dobj_1298__NORMALIZE_TEST_MATCHER.obj_len = 4;
-/*inistring dstr_1281__NORMALIZE_TEST_M*/
- /*_.VALSTR___V1374*/ meltfptr[1373] =
- (void *) &cdat->dstr_1281__NORMALIZE_TEST_M;
- cdat->dstr_1281__NORMALIZE_TEST_M.discr =
+/*inistring dstr_1299__NORMALIZE_TEST_M*/
+ /*_.VALSTR___V1393*/ meltfptr[1392] =
+ (void *) &cdat->dstr_1299__NORMALIZE_TEST_M;
+ cdat->dstr_1299__NORMALIZE_TEST_M.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1281__NORMALIZE_TEST_M.val,
+ /*small inistring */ strncpy (cdat->dstr_1299__NORMALIZE_TEST_M.val,
"NORMALIZE_TEST_MATCHER",
- sizeof (cdat->dstr_1281__NORMALIZE_TEST_M.
+ sizeof (cdat->dstr_1299__NORMALIZE_TEST_M.
val) - 1);
-/*iniobj dsym_1282__NORMALIZE_FILL_MATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1375*/ meltfptr[1374])
- /*_.VALDATA___V1375*/
- meltfptr[1374] = (void *) &cdat->dsym_1282__NORMALIZE_FILL_MATCHER;
+/*iniobj dsym_1300__NORMALIZE_FILL_MATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1394*/ meltfptr[1393])
+ /*_.VALDATA___V1394*/
+ meltfptr[1393] = (void *) &cdat->dsym_1300__NORMALIZE_FILL_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dsym_1282__NORMALIZE_FILL_MATCHER",
+ ("iniobj check.discr isobj dsym_1300__NORMALIZE_FILL_MATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dsym_1282__NORMALIZE_FILL_MATCHER",
+ ("iniobj check.discr objmagic dsym_1300__NORMALIZE_FILL_MATCHER",
((meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1282__NORMALIZE_FILL_MATCHER.meltobj_class =
+ cdat->dsym_1300__NORMALIZE_FILL_MATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1282__NORMALIZE_FILL_MATCHER.obj_hash = 989223923;
- cdat->dsym_1282__NORMALIZE_FILL_MATCHER.obj_len = 3;
+ cdat->dsym_1300__NORMALIZE_FILL_MATCHER.obj_hash = 989223923;
+ cdat->dsym_1300__NORMALIZE_FILL_MATCHER.obj_len = 3;
-/*inistring dstr_1283__NORMALIZE_FILL_M*/
- /*_.VALSTR___V1376*/ meltfptr[1375] =
- (void *) &cdat->dstr_1283__NORMALIZE_FILL_M;
- cdat->dstr_1283__NORMALIZE_FILL_M.discr =
+/*inistring dstr_1301__NORMALIZE_FILL_M*/
+ /*_.VALSTR___V1395*/ meltfptr[1394] =
+ (void *) &cdat->dstr_1301__NORMALIZE_FILL_M;
+ cdat->dstr_1301__NORMALIZE_FILL_M.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1283__NORMALIZE_FILL_M.val,
+ /*small inistring */ strncpy (cdat->dstr_1301__NORMALIZE_FILL_M.val,
"NORMALIZE_FILL_MATCHER",
- sizeof (cdat->dstr_1283__NORMALIZE_FILL_M.
+ sizeof (cdat->dstr_1301__NORMALIZE_FILL_M.
val) - 1);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ iniobj");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ iniobj");
-/*iniobj dobj_1284*/
-/*_.VALDATA___V1377*/ meltfptr[1376] = (void *) &cdat->dobj_1284;
+/*iniobj dobj_1302*/
+/*_.VALDATA___V1396*/ meltfptr[1395] = (void *) &cdat->dobj_1302;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1284",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1302",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1284",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1302",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1284.meltobj_class =
+ cdat->dobj_1302.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1284.obj_num = 0;
- cdat->dobj_1284.obj_hash = 771335970;
- cdat->dobj_1284.obj_len = 2;
+ cdat->dobj_1302.obj_num = 0;
+ cdat->dobj_1302.obj_hash = 710068791;
+ cdat->dobj_1302.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1285*/
-/*_.VALDATA___V1378*/ meltfptr[1377] = (void *) &cdat->dobj_1285;
+/*iniobj dobj_1303*/
+/*_.VALDATA___V1397*/ meltfptr[1396] = (void *) &cdat->dobj_1303;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1285",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1303",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1285",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1303",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1285.meltobj_class =
+ cdat->dobj_1303.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1285.obj_num = 1;
- cdat->dobj_1285.obj_hash = 36512510;
- cdat->dobj_1285.obj_len = 2;
+ cdat->dobj_1303.obj_num = 1;
+ cdat->dobj_1303.obj_hash = 88871130;
+ cdat->dobj_1303.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1286*/
-/*_.VALDATA___V1379*/ meltfptr[1378] = (void *) &cdat->dobj_1286;
+/*iniobj dobj_1304*/
+/*_.VALDATA___V1398*/ meltfptr[1397] = (void *) &cdat->dobj_1304;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1286",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1304",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1286",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1304",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1286.meltobj_class =
+ cdat->dobj_1304.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1286.obj_num = 2;
- cdat->dobj_1286.obj_hash = 291359787;
- cdat->dobj_1286.obj_len = 2;
+ cdat->dobj_1304.obj_num = 2;
+ cdat->dobj_1304.obj_hash = 153808228;
+ cdat->dobj_1304.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1287*/
-/*_.VALDATA___V1380*/ meltfptr[1379] = (void *) &cdat->dobj_1287;
+/*iniobj dobj_1305*/
+/*_.VALDATA___V1399*/ meltfptr[1398] = (void *) &cdat->dobj_1305;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1287",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1305",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1287",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1305",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1287.meltobj_class =
+ cdat->dobj_1305.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1287.obj_num = 3;
- cdat->dobj_1287.obj_hash = 687256485;
- cdat->dobj_1287.obj_len = 2;
+ cdat->dobj_1305.obj_num = 3;
+ cdat->dobj_1305.obj_hash = 560527870;
+ cdat->dobj_1305.obj_len = 2;
-/*iniobj dsym_1288__NOUTS*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1381*/ meltfptr[1380])
- /*_.VALDATA___V1381*/
- meltfptr[1380] = (void *) &cdat->dsym_1288__NOUTS;
+/*iniobj dsym_1306__NOUTS*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1400*/ meltfptr[1399])
+ /*_.VALDATA___V1400*/
+ meltfptr[1399] = (void *) &cdat->dsym_1306__NOUTS;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1288__NOUTS",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1306__NOUTS",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1288__NOUTS",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1306__NOUTS",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1288__NOUTS.meltobj_class =
+ cdat->dsym_1306__NOUTS.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1288__NOUTS.obj_hash = 270932121;
- cdat->dsym_1288__NOUTS.obj_len = 3;
+ cdat->dsym_1306__NOUTS.obj_hash = 270932121;
+ cdat->dsym_1306__NOUTS.obj_len = 3;
-/*inistring dstr_1289__NOUTS*/
- /*_.VALSTR___V1382*/ meltfptr[1381] = (void *) &cdat->dstr_1289__NOUTS;
- cdat->dstr_1289__NOUTS.discr =
+/*inistring dstr_1307__NOUTS*/
+ /*_.VALSTR___V1401*/ meltfptr[1400] = (void *) &cdat->dstr_1307__NOUTS;
+ cdat->dstr_1307__NOUTS.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1289__NOUTS.val, "NOUTS",
- sizeof (cdat->dstr_1289__NOUTS.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1307__NOUTS.val, "NOUTS",
+ sizeof (cdat->dstr_1307__NOUTS.val) - 1);
/*^iniobj */
-/*iniobj dobj_1290*/
-/*_.VALDATA___V1383*/ meltfptr[1382] = (void *) &cdat->dobj_1290;
+/*iniobj dobj_1308*/
+/*_.VALDATA___V1402*/ meltfptr[1401] = (void *) &cdat->dobj_1308;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1290",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1308",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1290",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1308",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1290.meltobj_class =
+ cdat->dobj_1308.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1290.obj_num = 4;
- cdat->dobj_1290.obj_hash = 858577614;
- cdat->dobj_1290.obj_len = 2;
+ cdat->dobj_1308.obj_num = 4;
+ cdat->dobj_1308.obj_hash = 406291579;
+ cdat->dobj_1308.obj_len = 2;
/*^iniobj */
-/*iniobj dobj_1291*/
-/*_.VALDATA___V1384*/ meltfptr[1383] = (void *) &cdat->dobj_1291;
+/*iniobj dobj_1309*/
+/*_.VALDATA___V1403*/ meltfptr[1402] = (void *) &cdat->dobj_1309;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1291",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1309",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1291",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1309",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1291.meltobj_class =
+ cdat->dobj_1309.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1291.obj_num = 5;
- cdat->dobj_1291.obj_hash = 626784526;
- cdat->dobj_1291.obj_len = 2;
+ cdat->dobj_1309.obj_num = 5;
+ cdat->dobj_1309.obj_hash = 773972613;
+ cdat->dobj_1309.obj_len = 2;
-/*iniobj dsym_1292__TESTDATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1385*/ meltfptr[1384])
- /*_.VALDATA___V1385*/
- meltfptr[1384] = (void *) &cdat->dsym_1292__TESTDATA;
+/*iniobj dsym_1310__TESTDATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1404*/ meltfptr[1403])
+ /*_.VALDATA___V1404*/
+ meltfptr[1403] = (void *) &cdat->dsym_1310__TESTDATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1292__TESTDATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1310__TESTDATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1292__TESTDATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1310__TESTDATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1292__TESTDATA.meltobj_class =
+ cdat->dsym_1310__TESTDATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1292__TESTDATA.obj_hash = 419943850;
- cdat->dsym_1292__TESTDATA.obj_len = 3;
+ cdat->dsym_1310__TESTDATA.obj_hash = 419943850;
+ cdat->dsym_1310__TESTDATA.obj_len = 3;
-/*inistring dstr_1293__TESTDATA*/
- /*_.VALSTR___V1386*/ meltfptr[1385] = (void *) &cdat->dstr_1293__TESTDATA;
- cdat->dstr_1293__TESTDATA.discr =
+/*inistring dstr_1311__TESTDATA*/
+ /*_.VALSTR___V1405*/ meltfptr[1404] = (void *) &cdat->dstr_1311__TESTDATA;
+ cdat->dstr_1311__TESTDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1293__TESTDATA.val, "TESTDATA",
- sizeof (cdat->dstr_1293__TESTDATA.val) - 1);
+ /*small inistring */ strncpy (cdat->dstr_1311__TESTDATA.val, "TESTDATA",
+ sizeof (cdat->dstr_1311__TESTDATA.val) - 1);
/*^iniobj */
-/*iniobj dobj_1294*/
-/*_.VALDATA___V1387*/ meltfptr[1386] = (void *) &cdat->dobj_1294;
+/*iniobj dobj_1312*/
+/*_.VALDATA___V1406*/ meltfptr[1405] = (void *) &cdat->dobj_1312;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dobj_1294",
+ melt_assertmsg ("iniobj check.discr isobj dobj_1312",
melt_magic_discr (((void
*) (MELT_PREDEF
(CLASS_FORMAL_BINDING)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dobj_1294",
+ melt_assertmsg ("iniobj check.discr objmagic dobj_1312",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1294.meltobj_class =
+ cdat->dobj_1312.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
- cdat->dobj_1294.obj_num = 6;
- cdat->dobj_1294.obj_hash = 1032529444;
- cdat->dobj_1294.obj_len = 2;
-
- /*inimult dtup_1295__NORMALIZE_FILL_MATCHER */
- /*_.VALTUP___V1388*/ meltfptr[1387] =
- (void *) &cdat->dtup_1295__NORMALIZE_FILL_MATCHER;
- cdat->dtup_1295__NORMALIZE_FILL_MATCHER.discr =
+ cdat->dobj_1312.obj_num = 6;
+ cdat->dobj_1312.obj_hash = 462301350;
+ cdat->dobj_1312.obj_len = 2;
+
+ /*inimult dtup_1313__NORMALIZE_FILL_MATCHER */
+ /*_.VALTUP___V1407*/ meltfptr[1406] =
+ (void *) &cdat->dtup_1313__NORMALIZE_FILL_MATCHER;
+ cdat->dtup_1313__NORMALIZE_FILL_MATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_MULTIPLE))));
- cdat->dtup_1295__NORMALIZE_FILL_MATCHER.nbval = 7;
+ cdat->dtup_1313__NORMALIZE_FILL_MATCHER.nbval = 7;
/*^iniobj */
-/*iniobj dobj_1296__NORMALIZE_FILL_MATCHER*/
-/*_.VALDATA___V1389*/ meltfptr[1388] =
- (void *) &cdat->dobj_1296__NORMALIZE_FILL_MATCHER;
+/*iniobj dobj_1314__NORMALIZE_FILL_MATCHER*/
+/*_.VALDATA___V1408*/ meltfptr[1407] =
+ (void *) &cdat->dobj_1314__NORMALIZE_FILL_MATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr isobj dobj_1296__NORMALIZE_FILL_MATCHER",
+ ("iniobj check.discr isobj dobj_1314__NORMALIZE_FILL_MATCHER",
melt_magic_discr ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
melt_assertmsg
- ("iniobj check.discr objmagic dobj_1296__NORMALIZE_FILL_MATCHER",
+ ("iniobj check.discr objmagic dobj_1314__NORMALIZE_FILL_MATCHER",
((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dobj_1296__NORMALIZE_FILL_MATCHER.meltobj_class =
+ cdat->dobj_1314__NORMALIZE_FILL_MATCHER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]);
- cdat->dobj_1296__NORMALIZE_FILL_MATCHER.obj_hash = 78365353;
- cdat->dobj_1296__NORMALIZE_FILL_MATCHER.obj_len = 4;
+ cdat->dobj_1314__NORMALIZE_FILL_MATCHER.obj_hash = 534574879;
+ cdat->dobj_1314__NORMALIZE_FILL_MATCHER.obj_len = 4;
-/*inistring dstr_1297__NORMALIZE_FILL_M*/
- /*_.VALSTR___V1390*/ meltfptr[1389] =
- (void *) &cdat->dstr_1297__NORMALIZE_FILL_M;
- cdat->dstr_1297__NORMALIZE_FILL_M.discr =
+/*inistring dstr_1315__NORMALIZE_FILL_M*/
+ /*_.VALSTR___V1409*/ meltfptr[1408] =
+ (void *) &cdat->dstr_1315__NORMALIZE_FILL_M;
+ cdat->dstr_1315__NORMALIZE_FILL_M.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1297__NORMALIZE_FILL_M.val,
+ /*small inistring */ strncpy (cdat->dstr_1315__NORMALIZE_FILL_M.val,
"NORMALIZE_FILL_MATCHER",
- sizeof (cdat->dstr_1297__NORMALIZE_FILL_M.
+ sizeof (cdat->dstr_1315__NORMALIZE_FILL_M.
val) - 1);
- /*inirout drout_1298__NORMTESTMATCH_CATCHALL */
- /*_.VALROUT___V1391*/ meltfptr[1390] =
- (void *) &cdat->drout_1298__NORMTESTMATCH_CATCHALL;
- cdat->drout_1298__NORMTESTMATCH_CATCHALL.discr =
+ /*inirout drout_1316__NORMTESTMATCH_CATCHALL */
+ /*_.VALROUT___V1410*/ meltfptr[1409] =
+ (void *) &cdat->drout_1316__NORMTESTMATCH_CATCHALL;
+ cdat->drout_1316__NORMTESTMATCH_CATCHALL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1298__NORMTESTMATCH_CATCHALL.routdescr,
- "NORMTESTMATCH_CATCHALL @warmelt-normatch.melt:5698",
+ strncpy (cdat->drout_1316__NORMTESTMATCH_CATCHALL.routdescr,
+ "NORMTESTMATCH_CATCHALL @warmelt-normatch.melt:5849",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1298__NORMTESTMATCH_CATCHALL.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1298__NORMTESTMATCH_CATCHALL,
- meltrout_113_warmelt_normatch_NORMTESTMATCH_CATCHALL);
-
- /*iniclos dclo_1299__NORMTESTMATCH_CATCHALL */
- /*_.VALCLO___V1392*/ meltfptr[1391] =
- (void *) &cdat->dclo_1299__NORMTESTMATCH_CATCHALL;
- cdat->dclo_1299__NORMTESTMATCH_CATCHALL.discr =
+ cdat->drout_1316__NORMTESTMATCH_CATCHALL.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1316__NORMTESTMATCH_CATCHALL,
+ meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL);
+
+ /*iniclos dclo_1317__NORMTESTMATCH_CATCHALL */
+ /*_.VALCLO___V1411*/ meltfptr[1410] =
+ (void *) &cdat->dclo_1317__NORMTESTMATCH_CATCHALL;
+ cdat->dclo_1317__NORMTESTMATCH_CATCHALL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1299__NORMTESTMATCH_CATCHALL.nbval = 0;
+ cdat->dclo_1317__NORMTESTMATCH_CATCHALL.nbval = 0;
- /*inirout drout_1300__NORMFILLMATCH_CATCHALL */
- /*_.VALROUT___V1393*/ meltfptr[1392] =
- (void *) &cdat->drout_1300__NORMFILLMATCH_CATCHALL;
- cdat->drout_1300__NORMFILLMATCH_CATCHALL.discr =
+ /*inirout drout_1318__NORMFILLMATCH_CATCHALL */
+ /*_.VALROUT___V1412*/ meltfptr[1411] =
+ (void *) &cdat->drout_1318__NORMFILLMATCH_CATCHALL;
+ cdat->drout_1318__NORMFILLMATCH_CATCHALL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1300__NORMFILLMATCH_CATCHALL.routdescr,
- "NORMFILLMATCH_CATCHALL @warmelt-normatch.melt:5712",
+ strncpy (cdat->drout_1318__NORMFILLMATCH_CATCHALL.routdescr,
+ "NORMFILLMATCH_CATCHALL @warmelt-normatch.melt:5863",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1300__NORMFILLMATCH_CATCHALL.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1300__NORMFILLMATCH_CATCHALL,
- meltrout_114_warmelt_normatch_NORMFILLMATCH_CATCHALL);
-
- /*iniclos dclo_1301__NORMFILLMATCH_CATCHALL */
- /*_.VALCLO___V1394*/ meltfptr[1393] =
- (void *) &cdat->dclo_1301__NORMFILLMATCH_CATCHALL;
- cdat->dclo_1301__NORMFILLMATCH_CATCHALL.discr =
+ cdat->drout_1318__NORMFILLMATCH_CATCHALL.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1318__NORMFILLMATCH_CATCHALL,
+ meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL);
+
+ /*iniclos dclo_1319__NORMFILLMATCH_CATCHALL */
+ /*_.VALCLO___V1413*/ meltfptr[1412] =
+ (void *) &cdat->dclo_1319__NORMFILLMATCH_CATCHALL;
+ cdat->dclo_1319__NORMFILLMATCH_CATCHALL.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1301__NORMFILLMATCH_CATCHALL.nbval = 0;
+ cdat->dclo_1319__NORMFILLMATCH_CATCHALL.nbval = 0;
- /*inirout drout_1302__NORMTESTMATCH_CMATCHER */
- /*_.VALROUT___V1395*/ meltfptr[1394] =
- (void *) &cdat->drout_1302__NORMTESTMATCH_CMATCHER;
- cdat->drout_1302__NORMTESTMATCH_CMATCHER.discr =
+ /*inirout drout_1320__NORMTESTMATCH_CMATCHER */
+ /*_.VALROUT___V1414*/ meltfptr[1413] =
+ (void *) &cdat->drout_1320__NORMTESTMATCH_CMATCHER;
+ cdat->drout_1320__NORMTESTMATCH_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1302__NORMTESTMATCH_CMATCHER.routdescr,
- "NORMTESTMATCH_CMATCHER @warmelt-normatch.melt:5724",
+ strncpy (cdat->drout_1320__NORMTESTMATCH_CMATCHER.routdescr,
+ "NORMTESTMATCH_CMATCHER @warmelt-normatch.melt:5875",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1302__NORMTESTMATCH_CMATCHER.nbval = 19;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1302__NORMTESTMATCH_CMATCHER,
- meltrout_115_warmelt_normatch_NORMTESTMATCH_CMATCHER);
-
- /*iniclos dclo_1303__NORMTESTMATCH_CMATCHER */
- /*_.VALCLO___V1396*/ meltfptr[1395] =
- (void *) &cdat->dclo_1303__NORMTESTMATCH_CMATCHER;
- cdat->dclo_1303__NORMTESTMATCH_CMATCHER.discr =
+ cdat->drout_1320__NORMTESTMATCH_CMATCHER.nbval = 19;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1320__NORMTESTMATCH_CMATCHER,
+ meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER);
+
+ /*iniclos dclo_1321__NORMTESTMATCH_CMATCHER */
+ /*_.VALCLO___V1415*/ meltfptr[1414] =
+ (void *) &cdat->dclo_1321__NORMTESTMATCH_CMATCHER;
+ cdat->dclo_1321__NORMTESTMATCH_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1303__NORMTESTMATCH_CMATCHER.nbval = 0;
+ cdat->dclo_1321__NORMTESTMATCH_CMATCHER.nbval = 0;
-/*iniobj dsym_1304__CLASS_CMATCHER*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1397*/ meltfptr[1396])
- /*_.VALDATA___V1397*/
- meltfptr[1396] = (void *) &cdat->dsym_1304__CLASS_CMATCHER;
+/*iniobj dsym_1322__CLASS_CMATCHER*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1416*/ meltfptr[1415])
+ /*_.VALDATA___V1416*/
+ meltfptr[1415] = (void *) &cdat->dsym_1322__CLASS_CMATCHER;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1304__CLASS_CMATCHER",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1322__CLASS_CMATCHER",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1304__CLASS_CMATCHER",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1322__CLASS_CMATCHER",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1304__CLASS_CMATCHER.meltobj_class =
+ cdat->dsym_1322__CLASS_CMATCHER.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1304__CLASS_CMATCHER.obj_hash = 544975672;
- cdat->dsym_1304__CLASS_CMATCHER.obj_len = 3;
+ cdat->dsym_1322__CLASS_CMATCHER.obj_hash = 544975672;
+ cdat->dsym_1322__CLASS_CMATCHER.obj_len = 3;
-/*inistring dstr_1305__CLASS_CMATCHER*/
- /*_.VALSTR___V1398*/ meltfptr[1397] =
- (void *) &cdat->dstr_1305__CLASS_CMATCHER;
- cdat->dstr_1305__CLASS_CMATCHER.discr =
+/*inistring dstr_1323__CLASS_CMATCHER*/
+ /*_.VALSTR___V1417*/ meltfptr[1416] =
+ (void *) &cdat->dstr_1323__CLASS_CMATCHER;
+ cdat->dstr_1323__CLASS_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1305__CLASS_CMATCHER.val,
+ /*small inistring */ strncpy (cdat->dstr_1323__CLASS_CMATCHER.val,
"CLASS_CMATCHER",
- sizeof (cdat->dstr_1305__CLASS_CMATCHER.val) -
+ sizeof (cdat->dstr_1323__CLASS_CMATCHER.val) -
1);
- /*inirout drout_1306__NORMFILLMATCH_CMATCHER */
- /*_.VALROUT___V1399*/ meltfptr[1398] =
- (void *) &cdat->drout_1306__NORMFILLMATCH_CMATCHER;
- cdat->drout_1306__NORMFILLMATCH_CMATCHER.discr =
+ /*inirout drout_1324__NORMFILLMATCH_CMATCHER */
+ /*_.VALROUT___V1418*/ meltfptr[1417] =
+ (void *) &cdat->drout_1324__NORMFILLMATCH_CMATCHER;
+ cdat->drout_1324__NORMFILLMATCH_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1306__NORMFILLMATCH_CMATCHER.routdescr,
- "NORMFILLMATCH_CMATCHER @warmelt-normatch.melt:5809",
+ strncpy (cdat->drout_1324__NORMFILLMATCH_CMATCHER.routdescr,
+ "NORMFILLMATCH_CMATCHER @warmelt-normatch.melt:5960",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1306__NORMFILLMATCH_CMATCHER.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1306__NORMFILLMATCH_CMATCHER,
- meltrout_116_warmelt_normatch_NORMFILLMATCH_CMATCHER);
-
- /*iniclos dclo_1307__NORMFILLMATCH_CMATCHER */
- /*_.VALCLO___V1400*/ meltfptr[1399] =
- (void *) &cdat->dclo_1307__NORMFILLMATCH_CMATCHER;
- cdat->dclo_1307__NORMFILLMATCH_CMATCHER.discr =
+ cdat->drout_1324__NORMFILLMATCH_CMATCHER.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1324__NORMFILLMATCH_CMATCHER,
+ meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER);
+
+ /*iniclos dclo_1325__NORMFILLMATCH_CMATCHER */
+ /*_.VALCLO___V1419*/ meltfptr[1418] =
+ (void *) &cdat->dclo_1325__NORMFILLMATCH_CMATCHER;
+ cdat->dclo_1325__NORMFILLMATCH_CMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1307__NORMFILLMATCH_CMATCHER.nbval = 0;
+ cdat->dclo_1325__NORMFILLMATCH_CMATCHER.nbval = 0;
- /*inirout drout_1308__NORMSTEP_MTESTMATCHER */
- /*_.VALROUT___V1401*/ meltfptr[1400] =
- (void *) &cdat->drout_1308__NORMSTEP_MTESTMATCHER;
- cdat->drout_1308__NORMSTEP_MTESTMATCHER.discr =
+ /*inirout drout_1326__NORMSTEP_MTESTMATCHER */
+ /*_.VALROUT___V1420*/ meltfptr[1419] =
+ (void *) &cdat->drout_1326__NORMSTEP_MTESTMATCHER;
+ cdat->drout_1326__NORMSTEP_MTESTMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1308__NORMSTEP_MTESTMATCHER.routdescr,
- "NORMSTEP_MTESTMATCHER @warmelt-normatch.melt:5885",
+ strncpy (cdat->drout_1326__NORMSTEP_MTESTMATCHER.routdescr,
+ "NORMSTEP_MTESTMATCHER @warmelt-normatch.melt:6036",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1308__NORMSTEP_MTESTMATCHER.nbval = 23;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1308__NORMSTEP_MTESTMATCHER,
- meltrout_117_warmelt_normatch_NORMSTEP_MTESTMATCHER);
-
- /*iniclos dclo_1309__NORMSTEP_MTESTMATCHER */
- /*_.VALCLO___V1402*/ meltfptr[1401] =
- (void *) &cdat->dclo_1309__NORMSTEP_MTESTMATCHER;
- cdat->dclo_1309__NORMSTEP_MTESTMATCHER.discr =
+ cdat->drout_1326__NORMSTEP_MTESTMATCHER.nbval = 23;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1326__NORMSTEP_MTESTMATCHER,
+ meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER);
+
+ /*iniclos dclo_1327__NORMSTEP_MTESTMATCHER */
+ /*_.VALCLO___V1421*/ meltfptr[1420] =
+ (void *) &cdat->dclo_1327__NORMSTEP_MTESTMATCHER;
+ cdat->dclo_1327__NORMSTEP_MTESTMATCHER.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1309__NORMSTEP_MTESTMATCHER.nbval = 0;
+ cdat->dclo_1327__NORMSTEP_MTESTMATCHER.nbval = 0;
- /*inirout drout_1310__ALTMATCH_NORMALIZE_STEP */
- /*_.VALROUT___V1314*/ meltfptr[1313] =
- (void *) &cdat->drout_1310__ALTMATCH_NORMALIZE_STEP;
- cdat->drout_1310__ALTMATCH_NORMALIZE_STEP.discr =
+ /*inirout drout_1328__ALTMATCH_NORMALIZE_STEP */
+ /*_.VALROUT___V1331*/ meltfptr[1330] =
+ (void *) &cdat->drout_1328__ALTMATCH_NORMALIZE_STEP;
+ cdat->drout_1328__ALTMATCH_NORMALIZE_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1310__ALTMATCH_NORMALIZE_STEP.routdescr,
- "ALTMATCH_NORMALIZE_STEP @warmelt-normatch.melt:6045",
+ strncpy (cdat->drout_1328__ALTMATCH_NORMALIZE_STEP.routdescr,
+ "ALTMATCH_NORMALIZE_STEP @warmelt-normatch.melt:6196",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1310__ALTMATCH_NORMALIZE_STEP.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1310__ALTMATCH_NORMALIZE_STEP,
- meltrout_118_warmelt_normatch_ALTMATCH_NORMALIZE_STEP);
-
- /*iniclos dclo_1311__ALTMATCH_NORMALIZE_STEP */
- /*_.VALCLO___V1313*/ meltfptr[1312] =
- (void *) &cdat->dclo_1311__ALTMATCH_NORMALIZE_STEP;
- cdat->dclo_1311__ALTMATCH_NORMALIZE_STEP.discr =
+ cdat->drout_1328__ALTMATCH_NORMALIZE_STEP.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1328__ALTMATCH_NORMALIZE_STEP,
+ meltrout_126_warmelt_normatch_ALTMATCH_NORMALIZE_STEP);
+
+ /*iniclos dclo_1329__ALTMATCH_NORMALIZE_STEP */
+ /*_.VALCLO___V1330*/ meltfptr[1329] =
+ (void *) &cdat->dclo_1329__ALTMATCH_NORMALIZE_STEP;
+ cdat->dclo_1329__ALTMATCH_NORMALIZE_STEP.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1311__ALTMATCH_NORMALIZE_STEP.nbval = 0;
+ cdat->dclo_1329__ALTMATCH_NORMALIZE_STEP.nbval = 0;
- /*inirout drout_1312__ALTMATCH_NORMALIZE_MDATA */
- /*_.VALROUT___V1332*/ meltfptr[1331] =
- (void *) &cdat->drout_1312__ALTMATCH_NORMALIZE_MDATA;
- cdat->drout_1312__ALTMATCH_NORMALIZE_MDATA.discr =
+ /*inirout drout_1330__ALTMATCH_NORMALIZE_MDATA */
+ /*_.VALROUT___V1349*/ meltfptr[1348] =
+ (void *) &cdat->drout_1330__ALTMATCH_NORMALIZE_MDATA;
+ cdat->drout_1330__ALTMATCH_NORMALIZE_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1312__ALTMATCH_NORMALIZE_MDATA.routdescr,
- "ALTMATCH_NORMALIZE_MDATA @warmelt-normatch.melt:6078",
+ strncpy (cdat->drout_1330__ALTMATCH_NORMALIZE_MDATA.routdescr,
+ "ALTMATCH_NORMALIZE_MDATA @warmelt-normatch.melt:6229",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1312__ALTMATCH_NORMALIZE_MDATA.nbval = 8;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1312__ALTMATCH_NORMALIZE_MDATA,
- meltrout_119_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA);
-
- /*iniclos dclo_1313__ALTMATCH_NORMALIZE_MDATA */
- /*_.VALCLO___V1331*/ meltfptr[1330] =
- (void *) &cdat->dclo_1313__ALTMATCH_NORMALIZE_MDATA;
- cdat->dclo_1313__ALTMATCH_NORMALIZE_MDATA.discr =
+ cdat->drout_1330__ALTMATCH_NORMALIZE_MDATA.nbval = 8;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1330__ALTMATCH_NORMALIZE_MDATA,
+ meltrout_127_warmelt_normatch_ALTMATCH_NORMALIZE_MDATA);
+
+ /*iniclos dclo_1331__ALTMATCH_NORMALIZE_MDATA */
+ /*_.VALCLO___V1348*/ meltfptr[1347] =
+ (void *) &cdat->dclo_1331__ALTMATCH_NORMALIZE_MDATA;
+ cdat->dclo_1331__ALTMATCH_NORMALIZE_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1313__ALTMATCH_NORMALIZE_MDATA.nbval = 0;
+ cdat->dclo_1331__ALTMATCH_NORMALIZE_MDATA.nbval = 0;
- /*inirout drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA */
- /*_.VALROUT___V1403*/ meltfptr[1402] =
- (void *) &cdat->drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA;
- cdat->drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA.discr =
+ /*inirout drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA */
+ /*_.VALROUT___V1422*/ meltfptr[1421] =
+ (void *) &cdat->drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA;
+ cdat->drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA.routdescr,
- "ALTMATCH_HANDLE_NORMALIZED_MDATA @warmelt-normatch.melt:6122",
+ strncpy (cdat->drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA.routdescr,
+ "ALTMATCH_HANDLE_NORMALIZED_MDATA @warmelt-normatch.melt:6273",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA.nbval = 6;
+ cdat->drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA.nbval = 6;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA,
- meltrout_120_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA);
+ drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA,
+ meltrout_128_warmelt_normatch_ALTMATCH_HANDLE_NORMALIZED_MDATA);
- /*iniclos dclo_1315__ALTMATCH_HANDLE_NORMALIZED_MDATA */
- /*_.VALCLO___V1404*/ meltfptr[1403] =
- (void *) &cdat->dclo_1315__ALTMATCH_HANDLE_NORMALIZED_MDATA;
- cdat->dclo_1315__ALTMATCH_HANDLE_NORMALIZED_MDATA.discr =
+ /*iniclos dclo_1333__ALTMATCH_HANDLE_NORMALIZED_MDATA */
+ /*_.VALCLO___V1423*/ meltfptr[1422] =
+ (void *) &cdat->dclo_1333__ALTMATCH_HANDLE_NORMALIZED_MDATA;
+ cdat->dclo_1333__ALTMATCH_HANDLE_NORMALIZED_MDATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1315__ALTMATCH_HANDLE_NORMALIZED_MDATA.nbval = 0;
+ cdat->dclo_1333__ALTMATCH_HANDLE_NORMALIZED_MDATA.nbval = 0;
- /*inirout drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
- /*_.VALROUT___V1405*/ meltfptr[1404] =
- (void *) &cdat->drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
- cdat->drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.discr =
+ /*inirout drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
+ /*_.VALROUT___V1424*/ meltfptr[1423] =
+ (void *) &cdat->drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
+ cdat->drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.
+ strncpy (cdat->drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.
routdescr,
- "ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT @warmelt-normatch.melt:6160",
+ "ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT @warmelt-normatch.melt:6311",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 10;
+ cdat->drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 10;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT,
- meltrout_121_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT);
+ drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT,
+ meltrout_129_warmelt_normatch_ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT);
- /*iniclos dclo_1317__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
- /*_.VALCLO___V1408*/ meltfptr[1407] =
- (void *) &cdat->dclo_1317__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
- cdat->dclo_1317__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.discr =
+ /*iniclos dclo_1335__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT */
+ /*_.VALCLO___V1427*/ meltfptr[1426] =
+ (void *) &cdat->dclo_1335__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT;
+ cdat->dclo_1335__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1317__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 0;
+ cdat->dclo_1335__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 0;
-/*iniobj dsym_1318__MATCHRES*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1406*/ meltfptr[1405])
- /*_.VALDATA___V1406*/
- meltfptr[1405] = (void *) &cdat->dsym_1318__MATCHRES;
+/*iniobj dsym_1336__MATCHRES*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1425*/ meltfptr[1424])
+ /*_.VALDATA___V1425*/
+ meltfptr[1424] = (void *) &cdat->dsym_1336__MATCHRES;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1318__MATCHRES",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1336__MATCHRES",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1318__MATCHRES",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1336__MATCHRES",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1318__MATCHRES.meltobj_class =
+ cdat->dsym_1336__MATCHRES.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1318__MATCHRES.obj_hash = 204120466;
- cdat->dsym_1318__MATCHRES.obj_len = 3;
+ cdat->dsym_1336__MATCHRES.obj_hash = 204120466;
+ cdat->dsym_1336__MATCHRES.obj_len = 3;
-/*inistring dstr_1319__MATCHRES*/
- /*_.VALSTR___V1407*/ meltfptr[1406] = (void *) &cdat->dstr_1319__MATCHRES;
- cdat->dstr_1319__MATCHRES.discr =
+/*inistring dstr_1337__MATCHRES*/
+ /*_.VALSTR___V1426*/ meltfptr[1425] = (void *) &cdat->dstr_1337__MATCHRES;
+ cdat->dstr_1337__MATCHRES.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1319__MATCHRES.val, "_MATCHRES",
- sizeof (cdat->dstr_1319__MATCHRES.val) - 1);
- /*inirout drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT */
- /*_.VALROUT___V1409*/ meltfptr[1408] =
- (void *) &cdat->drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
- cdat->drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT.discr =
+ /*small inistring */ strncpy (cdat->dstr_1337__MATCHRES.val, "_MATCHRES",
+ sizeof (cdat->dstr_1337__MATCHRES.val) - 1);
+ /*inirout drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT */
+ /*_.VALROUT___V1428*/ meltfptr[1427] =
+ (void *) &cdat->drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
+ cdat->drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT.routdescr,
- "ALTMATCH_NORMALIZE_MATCH_CONTEXT @warmelt-normatch.melt:6223",
+ strncpy (cdat->drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT.routdescr,
+ "ALTMATCH_NORMALIZE_MATCH_CONTEXT @warmelt-normatch.melt:6374",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT.nbval = 10;
+ cdat->drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT.nbval = 10;
MELT_ROUTINE_SET_ROUTCODE (&cdat->
- drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT,
- meltrout_122_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT);
+ drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT,
+ meltrout_130_warmelt_normatch_ALTMATCH_NORMALIZE_MATCH_CONTEXT);
- /*iniclos dclo_1321__ALTMATCH_NORMALIZE_MATCH_CONTEXT */
- /*_.VALCLO___V1411*/ meltfptr[1410] =
- (void *) &cdat->dclo_1321__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
- cdat->dclo_1321__ALTMATCH_NORMALIZE_MATCH_CONTEXT.discr =
+ /*iniclos dclo_1339__ALTMATCH_NORMALIZE_MATCH_CONTEXT */
+ /*_.VALCLO___V1430*/ meltfptr[1429] =
+ (void *) &cdat->dclo_1339__ALTMATCH_NORMALIZE_MATCH_CONTEXT;
+ cdat->dclo_1339__ALTMATCH_NORMALIZE_MATCH_CONTEXT.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1321__ALTMATCH_NORMALIZE_MATCH_CONTEXT.nbval = 0;
+ cdat->dclo_1339__ALTMATCH_NORMALIZE_MATCH_CONTEXT.nbval = 0;
- /*inirout drout_1322__LAMBDA_ */
- /*_.VALROUT___V1410*/ meltfptr[1409] = (void *) &cdat->drout_1322__LAMBDA_;
- cdat->drout_1322__LAMBDA_.discr =
+ /*inirout drout_1340__LAMBDA_ */
+ /*_.VALROUT___V1429*/ meltfptr[1428] = (void *) &cdat->drout_1340__LAMBDA_;
+ cdat->drout_1340__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1322__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6271", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1322__LAMBDA_.nbval = 2;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1322__LAMBDA_,
- meltrout_123_warmelt_normatch_LAMBDA___28__);
+ strncpy (cdat->drout_1340__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6422", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1340__LAMBDA_.nbval = 2;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1340__LAMBDA_,
+ meltrout_131_warmelt_normatch_LAMBDA___28__);
- /*inirout drout_1323__NORMEXP_ALTMATCH */
- /*_.VALROUT___V1412*/ meltfptr[1411] =
- (void *) &cdat->drout_1323__NORMEXP_ALTMATCH;
- cdat->drout_1323__NORMEXP_ALTMATCH.discr =
+ /*inirout drout_1341__NORMEXP_ALTMATCH */
+ /*_.VALROUT___V1431*/ meltfptr[1430] =
+ (void *) &cdat->drout_1341__NORMEXP_ALTMATCH;
+ cdat->drout_1341__NORMEXP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1323__NORMEXP_ALTMATCH.routdescr,
- "NORMEXP_ALTMATCH @warmelt-normatch.melt:6299",
+ strncpy (cdat->drout_1341__NORMEXP_ALTMATCH.routdescr,
+ "NORMEXP_ALTMATCH @warmelt-normatch.melt:6450",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1323__NORMEXP_ALTMATCH.nbval = 38;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1323__NORMEXP_ALTMATCH,
- meltrout_124_warmelt_normatch_NORMEXP_ALTMATCH);
-
- /*iniclos dclo_1324__NORMEXP_ALTMATCH */
- /*_.VALCLO___V1431*/ meltfptr[1430] =
- (void *) &cdat->dclo_1324__NORMEXP_ALTMATCH;
- cdat->dclo_1324__NORMEXP_ALTMATCH.discr =
+ cdat->drout_1341__NORMEXP_ALTMATCH.nbval = 38;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1341__NORMEXP_ALTMATCH,
+ meltrout_132_warmelt_normatch_NORMEXP_ALTMATCH);
+
+ /*iniclos dclo_1342__NORMEXP_ALTMATCH */
+ /*_.VALCLO___V1450*/ meltfptr[1449] =
+ (void *) &cdat->dclo_1342__NORMEXP_ALTMATCH;
+ cdat->dclo_1342__NORMEXP_ALTMATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1324__NORMEXP_ALTMATCH.nbval = 0;
+ cdat->dclo_1342__NORMEXP_ALTMATCH.nbval = 0;
-/*iniobj dsym_1325__MATCHED_DATA*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1413*/ meltfptr[1412])
- /*_.VALDATA___V1413*/
- meltfptr[1412] = (void *) &cdat->dsym_1325__MATCHED_DATA;
+/*iniobj dsym_1343__MATCHED_DATA*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1432*/ meltfptr[1431])
+ /*_.VALDATA___V1432*/
+ meltfptr[1431] = (void *) &cdat->dsym_1343__MATCHED_DATA;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1325__MATCHED_DATA",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1343__MATCHED_DATA",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1325__MATCHED_DATA",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1343__MATCHED_DATA",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1325__MATCHED_DATA.meltobj_class =
+ cdat->dsym_1343__MATCHED_DATA.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1325__MATCHED_DATA.obj_hash = 689390853;
- cdat->dsym_1325__MATCHED_DATA.obj_len = 3;
+ cdat->dsym_1343__MATCHED_DATA.obj_hash = 689390853;
+ cdat->dsym_1343__MATCHED_DATA.obj_len = 3;
-/*inistring dstr_1326__MATCHED_DATA*/
- /*_.VALSTR___V1414*/ meltfptr[1413] =
- (void *) &cdat->dstr_1326__MATCHED_DATA;
- cdat->dstr_1326__MATCHED_DATA.discr =
+/*inistring dstr_1344__MATCHED_DATA*/
+ /*_.VALSTR___V1433*/ meltfptr[1432] =
+ (void *) &cdat->dstr_1344__MATCHED_DATA;
+ cdat->dstr_1344__MATCHED_DATA.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1326__MATCHED_DATA.val,
+ /*small inistring */ strncpy (cdat->dstr_1344__MATCHED_DATA.val,
"_MATCHED_DATA",
- sizeof (cdat->dstr_1326__MATCHED_DATA.val) -
+ sizeof (cdat->dstr_1344__MATCHED_DATA.val) -
1);
- /*inirout drout_1327__LAMBDA_ */
- /*_.VALROUT___V1428*/ meltfptr[1427] = (void *) &cdat->drout_1327__LAMBDA_;
- cdat->drout_1327__LAMBDA_.discr =
+ /*inirout drout_1345__LAMBDA_ */
+ /*_.VALROUT___V1447*/ meltfptr[1446] = (void *) &cdat->drout_1345__LAMBDA_;
+ cdat->drout_1345__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1327__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6467", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1327__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1327__LAMBDA_,
- meltrout_125_warmelt_normatch_LAMBDA___29__);
+ strncpy (cdat->drout_1345__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6618", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1345__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1345__LAMBDA_,
+ meltrout_133_warmelt_normatch_LAMBDA___29__);
-/*iniobj dsym_1328__TRUE*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1429*/ meltfptr[1428])
- /*_.VALDATA___V1429*/
- meltfptr[1428] = (void *) &cdat->dsym_1328__TRUE;
+/*iniobj dsym_1346__TRUE*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1448*/ meltfptr[1447])
+ /*_.VALDATA___V1448*/
+ meltfptr[1447] = (void *) &cdat->dsym_1346__TRUE;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1328__TRUE",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1346__TRUE",
melt_magic_discr (((void
*) (MELT_PREDEF (CLASS_KEYWORD)))) ==
MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1328__TRUE",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1346__TRUE",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_KEYWORD)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1328__TRUE.meltobj_class =
+ cdat->dsym_1346__TRUE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_KEYWORD))));
- cdat->dsym_1328__TRUE.obj_hash = 576485513;
- cdat->dsym_1328__TRUE.obj_len = 3;
+ cdat->dsym_1346__TRUE.obj_hash = 576485513;
+ cdat->dsym_1346__TRUE.obj_len = 3;
-/*inistring dstr_1329__TRUE*/
- /*_.VALSTR___V1430*/ meltfptr[1429] = (void *) &cdat->dstr_1329__TRUE;
- cdat->dstr_1329__TRUE.discr =
+/*inistring dstr_1347__TRUE*/
+ /*_.VALSTR___V1449*/ meltfptr[1448] = (void *) &cdat->dstr_1347__TRUE;
+ cdat->dstr_1347__TRUE.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1329__TRUE.val, "TRUE",
- sizeof (cdat->dstr_1329__TRUE.val) - 1);
- /*inirout drout_1330__ALTERNATE_MATCH_OPTSET */
- /*_.VALROUT___V1432*/ meltfptr[1431] =
- (void *) &cdat->drout_1330__ALTERNATE_MATCH_OPTSET;
- cdat->drout_1330__ALTERNATE_MATCH_OPTSET.discr =
+ /*small inistring */ strncpy (cdat->dstr_1347__TRUE.val, "TRUE",
+ sizeof (cdat->dstr_1347__TRUE.val) - 1);
+ /*inirout drout_1348__ALTERNATE_MATCH_OPTSET */
+ /*_.VALROUT___V1451*/ meltfptr[1450] =
+ (void *) &cdat->drout_1348__ALTERNATE_MATCH_OPTSET;
+ cdat->drout_1348__ALTERNATE_MATCH_OPTSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1330__ALTERNATE_MATCH_OPTSET.routdescr,
- "ALTERNATE_MATCH_OPTSET @warmelt-normatch.melt:6494",
+ strncpy (cdat->drout_1348__ALTERNATE_MATCH_OPTSET.routdescr,
+ "ALTERNATE_MATCH_OPTSET @warmelt-normatch.melt:6645",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1330__ALTERNATE_MATCH_OPTSET.nbval = 5;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1330__ALTERNATE_MATCH_OPTSET,
- meltrout_126_warmelt_normatch_ALTERNATE_MATCH_OPTSET);
-
- /*iniclos dclo_1331__ALTERNATE_MATCH_OPTSET */
- /*_.VALCLO___V1433*/ meltfptr[1432] =
- (void *) &cdat->dclo_1331__ALTERNATE_MATCH_OPTSET;
- cdat->dclo_1331__ALTERNATE_MATCH_OPTSET.discr =
+ cdat->drout_1348__ALTERNATE_MATCH_OPTSET.nbval = 5;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1348__ALTERNATE_MATCH_OPTSET,
+ meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET);
+
+ /*iniclos dclo_1349__ALTERNATE_MATCH_OPTSET */
+ /*_.VALCLO___V1452*/ meltfptr[1451] =
+ (void *) &cdat->dclo_1349__ALTERNATE_MATCH_OPTSET;
+ cdat->dclo_1349__ALTERNATE_MATCH_OPTSET.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1331__ALTERNATE_MATCH_OPTSET.nbval = 0;
+ cdat->dclo_1349__ALTERNATE_MATCH_OPTSET.nbval = 0;
-/*iniobj dsym_1332__ALTERNATE_MATCH*/
- /*uniqueobj*/ if (! /*_.VALDATA___V1434*/ meltfptr[1433])
- /*_.VALDATA___V1434*/
- meltfptr[1433] = (void *) &cdat->dsym_1332__ALTERNATE_MATCH;
+/*iniobj dsym_1350__ALTERNATE_MATCH*/
+ /*uniqueobj*/ if (! /*_.VALDATA___V1453*/ meltfptr[1452])
+ /*_.VALDATA___V1453*/
+ meltfptr[1452] = (void *) &cdat->dsym_1350__ALTERNATE_MATCH;
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr isobj dsym_1332__ALTERNATE_MATCH",
+ melt_assertmsg ("iniobj check.discr isobj dsym_1350__ALTERNATE_MATCH",
melt_magic_discr (((void *) (MELT_PREDEF (CLASS_SYMBOL))))
== MELTOBMAG_OBJECT);
if (MELT_LIKELY (!melt_prohibit_garbcoll))
- melt_assertmsg ("iniobj check.discr objmagic dsym_1332__ALTERNATE_MATCH",
+ melt_assertmsg ("iniobj check.discr objmagic dsym_1350__ALTERNATE_MATCH",
((meltobject_ptr_t)
(((void *) (MELT_PREDEF (CLASS_SYMBOL)))))->
meltobj_magic == MELTOBMAG_OBJECT);
- cdat->dsym_1332__ALTERNATE_MATCH.meltobj_class =
+ cdat->dsym_1350__ALTERNATE_MATCH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_SYMBOL))));
- cdat->dsym_1332__ALTERNATE_MATCH.obj_hash = 241789071;
- cdat->dsym_1332__ALTERNATE_MATCH.obj_len = 3;
+ cdat->dsym_1350__ALTERNATE_MATCH.obj_hash = 241789071;
+ cdat->dsym_1350__ALTERNATE_MATCH.obj_len = 3;
-/*inistring dstr_1333__ALTERNATE_MATCH*/
- /*_.VALSTR___V1435*/ meltfptr[1434] =
- (void *) &cdat->dstr_1333__ALTERNATE_MATCH;
- cdat->dstr_1333__ALTERNATE_MATCH.discr =
+/*inistring dstr_1351__ALTERNATE_MATCH*/
+ /*_.VALSTR___V1454*/ meltfptr[1453] =
+ (void *) &cdat->dstr_1351__ALTERNATE_MATCH;
+ cdat->dstr_1351__ALTERNATE_MATCH.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1333__ALTERNATE_MATCH.val,
+ /*small inistring */ strncpy (cdat->dstr_1351__ALTERNATE_MATCH.val,
"ALTERNATE_MATCH",
- sizeof (cdat->dstr_1333__ALTERNATE_MATCH.
+ sizeof (cdat->dstr_1351__ALTERNATE_MATCH.
val) - 1);
-/*inistring dstr_1334__Enable_alternate*/
- /*_.VALSTR___V1436*/ meltfptr[1435] =
- (void *) &cdat->dstr_1334__Enable_alternate;
- cdat->dstr_1334__Enable_alternate.discr =
+/*inistring dstr_1352__Enable_alternate*/
+ /*_.VALSTR___V1455*/ meltfptr[1454] =
+ (void *) &cdat->dstr_1352__Enable_alternate;
+ cdat->dstr_1352__Enable_alternate.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_STRING))));
- /*small inistring */ strncpy (cdat->dstr_1334__Enable_alternate.val,
+ /*small inistring */ strncpy (cdat->dstr_1352__Enable_alternate.val,
"Enable alternate pattern-matching implementation",
- sizeof (cdat->dstr_1334__Enable_alternate.
+ sizeof (cdat->dstr_1352__Enable_alternate.
val) - 1);
- /*inirout drout_1335__MG_ALTDRAW_GRAPHVIZ */
- /*_.VALROUT___V1416*/ meltfptr[1415] =
- (void *) &cdat->drout_1335__MG_ALTDRAW_GRAPHVIZ;
- cdat->drout_1335__MG_ALTDRAW_GRAPHVIZ.discr =
+ /*inirout drout_1353__MG_ALTDRAW_GRAPHVIZ */
+ /*_.VALROUT___V1435*/ meltfptr[1434] =
+ (void *) &cdat->drout_1353__MG_ALTDRAW_GRAPHVIZ;
+ cdat->drout_1353__MG_ALTDRAW_GRAPHVIZ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1335__MG_ALTDRAW_GRAPHVIZ.routdescr,
- "MG_ALTDRAW_GRAPHVIZ @warmelt-normatch.melt:6509",
+ strncpy (cdat->drout_1353__MG_ALTDRAW_GRAPHVIZ.routdescr,
+ "MG_ALTDRAW_GRAPHVIZ @warmelt-normatch.melt:6660",
MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1335__MG_ALTDRAW_GRAPHVIZ.nbval = 39;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1335__MG_ALTDRAW_GRAPHVIZ,
- meltrout_127_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ);
-
- /*iniclos dclo_1336__MG_ALTDRAW_GRAPHVIZ */
- /*_.VALCLO___V1415*/ meltfptr[1414] =
- (void *) &cdat->dclo_1336__MG_ALTDRAW_GRAPHVIZ;
- cdat->dclo_1336__MG_ALTDRAW_GRAPHVIZ.discr =
+ cdat->drout_1353__MG_ALTDRAW_GRAPHVIZ.nbval = 41;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1353__MG_ALTDRAW_GRAPHVIZ,
+ meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ);
+
+ /*iniclos dclo_1354__MG_ALTDRAW_GRAPHVIZ */
+ /*_.VALCLO___V1434*/ meltfptr[1433] =
+ (void *) &cdat->dclo_1354__MG_ALTDRAW_GRAPHVIZ;
+ cdat->dclo_1354__MG_ALTDRAW_GRAPHVIZ.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CLOSURE))));
- cdat->dclo_1336__MG_ALTDRAW_GRAPHVIZ.nbval = 0;
+ cdat->dclo_1354__MG_ALTDRAW_GRAPHVIZ.nbval = 0;
- /*inirout drout_1337__LAMBDA_ */
- /*_.VALROUT___V1417*/ meltfptr[1416] = (void *) &cdat->drout_1337__LAMBDA_;
- cdat->drout_1337__LAMBDA_.discr =
+ /*inirout drout_1355__LAMBDA_ */
+ /*_.VALROUT___V1436*/ meltfptr[1435] = (void *) &cdat->drout_1355__LAMBDA_;
+ cdat->drout_1355__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1337__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6547", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1337__LAMBDA_.nbval = 6;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1337__LAMBDA_,
- meltrout_128_warmelt_normatch_LAMBDA___30__);
-
- /*inirout drout_1338__LAMBDA_ */
- /*_.VALROUT___V1418*/ meltfptr[1417] = (void *) &cdat->drout_1338__LAMBDA_;
- cdat->drout_1338__LAMBDA_.discr =
+ strncpy (cdat->drout_1355__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6698", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1355__LAMBDA_.nbval = 7;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1355__LAMBDA_,
+ meltrout_136_warmelt_normatch_LAMBDA___30__);
+
+ /*inirout drout_1356__LAMBDA_ */
+ /*_.VALROUT___V1437*/ meltfptr[1436] = (void *) &cdat->drout_1356__LAMBDA_;
+ cdat->drout_1356__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1338__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6581", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1338__LAMBDA_.nbval = 11;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1338__LAMBDA_,
- meltrout_129_warmelt_normatch_LAMBDA___31__);
-
- /*inirout drout_1339__LAMBDA_ */
- /*_.VALROUT___V1419*/ meltfptr[1418] = (void *) &cdat->drout_1339__LAMBDA_;
- cdat->drout_1339__LAMBDA_.discr =
+ strncpy (cdat->drout_1356__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6731", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1356__LAMBDA_.nbval = 11;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1356__LAMBDA_,
+ meltrout_137_warmelt_normatch_LAMBDA___31__);
+
+ /*inirout drout_1357__LAMBDA_ */
+ /*_.VALROUT___V1438*/ meltfptr[1437] = (void *) &cdat->drout_1357__LAMBDA_;
+ cdat->drout_1357__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1339__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6616", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1339__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1339__LAMBDA_,
- meltrout_130_warmelt_normatch_LAMBDA___32__);
-
- /*inirout drout_1340__LAMBDA_ */
- /*_.VALROUT___V1420*/ meltfptr[1419] = (void *) &cdat->drout_1340__LAMBDA_;
- cdat->drout_1340__LAMBDA_.discr =
+ strncpy (cdat->drout_1357__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6767", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1357__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1357__LAMBDA_,
+ meltrout_138_warmelt_normatch_LAMBDA___32__);
+
+ /*inirout drout_1358__LAMBDA_ */
+ /*_.VALROUT___V1439*/ meltfptr[1438] = (void *) &cdat->drout_1358__LAMBDA_;
+ cdat->drout_1358__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1340__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6658", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1340__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1340__LAMBDA_,
- meltrout_131_warmelt_normatch_LAMBDA___33__);
-
- /*iniboxint dint_1341__ */
- /*_.VALBXINT___V1421*/ meltfptr[1420] = (void *) &cdat->dint_1341__;
- cdat->dint_1341__.discr =
+ strncpy (cdat->drout_1358__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6807", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1358__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1358__LAMBDA_,
+ meltrout_139_warmelt_normatch_LAMBDA___33__);
+
+ /*iniboxint dint_1359__ */
+ /*_.VALBXINT___V1440*/ meltfptr[1439] = (void *) &cdat->dint_1359__;
+ cdat->dint_1359__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1341__.val = -1;
+ cdat->dint_1359__.val = -1;
- /*iniboxint dint_1342__ */
- /*_.VALBXINT___V1422*/ meltfptr[1421] = (void *) &cdat->dint_1342__;
- cdat->dint_1342__.discr =
+ /*iniboxint dint_1360__ */
+ /*_.VALBXINT___V1441*/ meltfptr[1440] = (void *) &cdat->dint_1360__;
+ cdat->dint_1360__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1342__.val = 1;
+ cdat->dint_1360__.val = 1;
- /*iniboxint dint_1343__ */
- /*_.VALBXINT___V1423*/ meltfptr[1422] = (void *) &cdat->dint_1343__;
- cdat->dint_1343__.discr =
+ /*iniboxint dint_1361__ */
+ /*_.VALBXINT___V1442*/ meltfptr[1441] = (void *) &cdat->dint_1361__;
+ cdat->dint_1361__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1343__.val = 0;
+ cdat->dint_1361__.val = 0;
- /*inirout drout_1344__LAMBDA_ */
- /*_.VALROUT___V1424*/ meltfptr[1423] = (void *) &cdat->drout_1344__LAMBDA_;
- cdat->drout_1344__LAMBDA_.discr =
+ /*inirout drout_1362__LAMBDA_ */
+ /*_.VALROUT___V1443*/ meltfptr[1442] = (void *) &cdat->drout_1362__LAMBDA_;
+ cdat->drout_1362__LAMBDA_.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_ROUTINE))));
- strncpy (cdat->drout_1344__LAMBDA_.routdescr,
- "LAMBDA_ @warmelt-normatch.melt:6677", MELT_ROUTDESCR_LEN - 1);
- cdat->drout_1344__LAMBDA_.nbval = 3;
- MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1344__LAMBDA_,
- meltrout_132_warmelt_normatch_LAMBDA___34__);
-
- /*iniboxint dint_1345__ */
- /*_.VALBXINT___V1425*/ meltfptr[1424] = (void *) &cdat->dint_1345__;
- cdat->dint_1345__.discr =
+ strncpy (cdat->drout_1362__LAMBDA_.routdescr,
+ "LAMBDA_ @warmelt-normatch.melt:6826", MELT_ROUTDESCR_LEN - 1);
+ cdat->drout_1362__LAMBDA_.nbval = 3;
+ MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1362__LAMBDA_,
+ meltrout_140_warmelt_normatch_LAMBDA___34__);
+
+ /*iniboxint dint_1363__ */
+ /*_.VALBXINT___V1444*/ meltfptr[1443] = (void *) &cdat->dint_1363__;
+ cdat->dint_1363__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1345__.val = -1;
+ cdat->dint_1363__.val = -1;
- /*iniboxint dint_1346__ */
- /*_.VALBXINT___V1426*/ meltfptr[1425] = (void *) &cdat->dint_1346__;
- cdat->dint_1346__.discr =
+ /*iniboxint dint_1364__ */
+ /*_.VALBXINT___V1445*/ meltfptr[1444] = (void *) &cdat->dint_1364__;
+ cdat->dint_1364__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1346__.val = 1;
+ cdat->dint_1364__.val = 1;
- /*iniboxint dint_1347__ */
- /*_.VALBXINT___V1427*/ meltfptr[1426] = (void *) &cdat->dint_1347__;
- cdat->dint_1347__.discr =
+ /*iniboxint dint_1365__ */
+ /*_.VALBXINT___V1446*/ meltfptr[1445] = (void *) &cdat->dint_1365__;
+ cdat->dint_1365__.discr =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (DISCR_CONSTANT_INTEGER))));
- cdat->dint_1347__.val = 0;
+ cdat->dint_1365__.val = 0;
cdat = NULL;
melt_prohibit_garbcoll = FALSE;
@@ -23121,13 +23462,12 @@ start_module_melt (void *modargp_)
initial_frame_st meltfram__;
#define meltframe meltfram__
memset (&meltfram__, 0, sizeof (meltfram__));
- meltfram__.mcfr_nbvar = 1517;
+ meltfram__.mcfr_nbvar = 1544;
meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
- /*minihash */ -1446;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -306;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_normatch;
/**COMMENT: get previous environment **/ ;
@@ -23203,8 +23543,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_PATTERN_CONTEXT =
meltgc_named_symbol ("CLASS_PATTERN_CONTEXT", MELT_GET);
- if (sy_CLASS_PATTERN_CONTEXT && NULL == /*_.VALDATA___V90*/ meltfptr[89])
- /*_.VALDATA___V90*/ meltfptr[89] = (void *) sy_CLASS_PATTERN_CONTEXT;
+ if (sy_CLASS_PATTERN_CONTEXT && NULL == /*_.VALDATA___V91*/ meltfptr[90])
+ /*_.VALDATA___V91*/ meltfptr[90] = (void *) sy_CLASS_PATTERN_CONTEXT;
}
/*^getnamedsymbol */
@@ -23212,8 +23552,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_ROOT */
{
melt_ptr_t sy_CLASS_ROOT = meltgc_named_symbol ("CLASS_ROOT", MELT_GET);
- if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V92*/ meltfptr[91])
- /*_.VALDATA___V92*/ meltfptr[91] = (void *) sy_CLASS_ROOT;
+ if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V93*/ meltfptr[92])
+ /*_.VALDATA___V93*/ meltfptr[92] = (void *) sy_CLASS_ROOT;
}
/*^getnamedsymbol */
@@ -23222,8 +23562,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_NORMCTXT =
meltgc_named_symbol ("PCTN_NORMCTXT", MELT_GET);
- if (sy_PCTN_NORMCTXT && NULL == /*_.VALDATA___V120*/ meltfptr[119])
- /*_.VALDATA___V120*/ meltfptr[119] = (void *) sy_PCTN_NORMCTXT;
+ if (sy_PCTN_NORMCTXT && NULL == /*_.VALDATA___V121*/ meltfptr[120])
+ /*_.VALDATA___V121*/ meltfptr[120] = (void *) sy_PCTN_NORMCTXT;
}
/*^getnamedsymbol */
@@ -23231,8 +23571,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PCTN_SRC */
{
melt_ptr_t sy_PCTN_SRC = meltgc_named_symbol ("PCTN_SRC", MELT_GET);
- if (sy_PCTN_SRC && NULL == /*_.VALDATA___V122*/ meltfptr[121])
- /*_.VALDATA___V122*/ meltfptr[121] = (void *) sy_PCTN_SRC;
+ if (sy_PCTN_SRC && NULL == /*_.VALDATA___V123*/ meltfptr[122])
+ /*_.VALDATA___V123*/ meltfptr[122] = (void *) sy_PCTN_SRC;
}
/*^getnamedsymbol */
@@ -23240,8 +23580,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PCTN_ENV */
{
melt_ptr_t sy_PCTN_ENV = meltgc_named_symbol ("PCTN_ENV", MELT_GET);
- if (sy_PCTN_ENV && NULL == /*_.VALDATA___V124*/ meltfptr[123])
- /*_.VALDATA___V124*/ meltfptr[123] = (void *) sy_PCTN_ENV;
+ if (sy_PCTN_ENV && NULL == /*_.VALDATA___V125*/ meltfptr[124])
+ /*_.VALDATA___V125*/ meltfptr[124] = (void *) sy_PCTN_ENV;
}
/*^getnamedsymbol */
@@ -23250,8 +23590,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_MAPATVAR =
meltgc_named_symbol ("PCTN_MAPATVAR", MELT_GET);
- if (sy_PCTN_MAPATVAR && NULL == /*_.VALDATA___V126*/ meltfptr[125])
- /*_.VALDATA___V126*/ meltfptr[125] = (void *) sy_PCTN_MAPATVAR;
+ if (sy_PCTN_MAPATVAR && NULL == /*_.VALDATA___V127*/ meltfptr[126])
+ /*_.VALDATA___V127*/ meltfptr[126] = (void *) sy_PCTN_MAPATVAR;
}
/*^getnamedsymbol */
@@ -23260,8 +23600,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_MAPATCST =
meltgc_named_symbol ("PCTN_MAPATCST", MELT_GET);
- if (sy_PCTN_MAPATCST && NULL == /*_.VALDATA___V128*/ meltfptr[127])
- /*_.VALDATA___V128*/ meltfptr[127] = (void *) sy_PCTN_MAPATCST;
+ if (sy_PCTN_MAPATCST && NULL == /*_.VALDATA___V129*/ meltfptr[128])
+ /*_.VALDATA___V129*/ meltfptr[128] = (void *) sy_PCTN_MAPATCST;
}
/*^getnamedsymbol */
@@ -23269,8 +23609,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PCTN_MAPOR */
{
melt_ptr_t sy_PCTN_MAPOR = meltgc_named_symbol ("PCTN_MAPOR", MELT_GET);
- if (sy_PCTN_MAPOR && NULL == /*_.VALDATA___V130*/ meltfptr[129])
- /*_.VALDATA___V130*/ meltfptr[129] = (void *) sy_PCTN_MAPOR;
+ if (sy_PCTN_MAPOR && NULL == /*_.VALDATA___V131*/ meltfptr[130])
+ /*_.VALDATA___V131*/ meltfptr[130] = (void *) sy_PCTN_MAPOR;
}
/*^getnamedsymbol */
@@ -23279,8 +23619,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_BINDLIST =
meltgc_named_symbol ("PCTN_BINDLIST", MELT_GET);
- if (sy_PCTN_BINDLIST && NULL == /*_.VALDATA___V132*/ meltfptr[131])
- /*_.VALDATA___V132*/ meltfptr[131] = (void *) sy_PCTN_BINDLIST;
+ if (sy_PCTN_BINDLIST && NULL == /*_.VALDATA___V133*/ meltfptr[132])
+ /*_.VALDATA___V133*/ meltfptr[132] = (void *) sy_PCTN_BINDLIST;
}
/*^getnamedsymbol */
@@ -23289,8 +23629,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_STUFFMAP =
meltgc_named_symbol ("PCTN_STUFFMAP", MELT_GET);
- if (sy_PCTN_STUFFMAP && NULL == /*_.VALDATA___V134*/ meltfptr[133])
- /*_.VALDATA___V134*/ meltfptr[133] = (void *) sy_PCTN_STUFFMAP;
+ if (sy_PCTN_STUFFMAP && NULL == /*_.VALDATA___V135*/ meltfptr[134])
+ /*_.VALDATA___V135*/ meltfptr[134] = (void *) sy_PCTN_STUFFMAP;
}
/*^getnamedsymbol */
@@ -23299,8 +23639,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_PVARLOCMAP =
meltgc_named_symbol ("PCTN_PVARLOCMAP", MELT_GET);
- if (sy_PCTN_PVARLOCMAP && NULL == /*_.VALDATA___V136*/ meltfptr[135])
- /*_.VALDATA___V136*/ meltfptr[135] = (void *) sy_PCTN_PVARLOCMAP;
+ if (sy_PCTN_PVARLOCMAP && NULL == /*_.VALDATA___V137*/ meltfptr[136])
+ /*_.VALDATA___V137*/ meltfptr[136] = (void *) sy_PCTN_PVARLOCMAP;
}
/*^getnamedsymbol */
@@ -23308,8 +23648,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PCTN_TESTS */
{
melt_ptr_t sy_PCTN_TESTS = meltgc_named_symbol ("PCTN_TESTS", MELT_GET);
- if (sy_PCTN_TESTS && NULL == /*_.VALDATA___V138*/ meltfptr[137])
- /*_.VALDATA___V138*/ meltfptr[137] = (void *) sy_PCTN_TESTS;
+ if (sy_PCTN_TESTS && NULL == /*_.VALDATA___V139*/ meltfptr[138])
+ /*_.VALDATA___V139*/ meltfptr[138] = (void *) sy_PCTN_TESTS;
}
/*^getnamedsymbol */
@@ -23318,8 +23658,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PCTN_VARHANDLERS =
meltgc_named_symbol ("PCTN_VARHANDLERS", MELT_GET);
- if (sy_PCTN_VARHANDLERS && NULL == /*_.VALDATA___V140*/ meltfptr[139])
- /*_.VALDATA___V140*/ meltfptr[139] = (void *) sy_PCTN_VARHANDLERS;
+ if (sy_PCTN_VARHANDLERS && NULL == /*_.VALDATA___V141*/ meltfptr[140])
+ /*_.VALDATA___V141*/ meltfptr[140] = (void *) sy_PCTN_VARHANDLERS;
}
/*^getnamedsymbol */
@@ -23328,8 +23668,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_SCAN_PATTERN =
meltgc_named_symbol ("SCAN_PATTERN", MELT_GET);
- if (sy_SCAN_PATTERN && NULL == /*_.VALDATA___V142*/ meltfptr[141])
- /*_.VALDATA___V142*/ meltfptr[141] = (void *) sy_SCAN_PATTERN;
+ if (sy_SCAN_PATTERN && NULL == /*_.VALDATA___V143*/ meltfptr[142])
+ /*_.VALDATA___V143*/ meltfptr[142] = (void *) sy_SCAN_PATTERN;
}
/*^getnamedsymbol */
@@ -23338,8 +23678,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SELECTOR =
meltgc_named_symbol ("CLASS_SELECTOR", MELT_GET);
- if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V144*/ meltfptr[143])
- /*_.VALDATA___V144*/ meltfptr[143] = (void *) sy_CLASS_SELECTOR;
+ if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V145*/ meltfptr[144])
+ /*_.VALDATA___V145*/ meltfptr[144] = (void *) sy_CLASS_SELECTOR;
}
/*^getnamedsymbol */
@@ -23348,8 +23688,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MELT_DEBUG_FUN =
meltgc_named_symbol ("MELT_DEBUG_FUN", MELT_GET);
- if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V150*/ meltfptr[149])
- /*_.VALDATA___V150*/ meltfptr[149] = (void *) sy_MELT_DEBUG_FUN;
+ if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V151*/ meltfptr[150])
+ /*_.VALDATA___V151*/ meltfptr[150] = (void *) sy_MELT_DEBUG_FUN;
}
/*^getnamedsymbol */
@@ -23357,8 +23697,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_NAMED */
{
melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol ("CLASS_NAMED", MELT_GET);
- if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V152*/ meltfptr[151])
- /*_.VALDATA___V152*/ meltfptr[151] = (void *) sy_CLASS_NAMED;
+ if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V153*/ meltfptr[152])
+ /*_.VALDATA___V153*/ meltfptr[152] = (void *) sy_CLASS_NAMED;
}
/*^getnamedsymbol */
@@ -23367,8 +23707,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_INSTALL_METHOD =
meltgc_named_symbol ("INSTALL_METHOD", MELT_GET);
- if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V154*/ meltfptr[153])
- /*_.VALDATA___V154*/ meltfptr[153] = (void *) sy_INSTALL_METHOD;
+ if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V155*/ meltfptr[154])
+ /*_.VALDATA___V155*/ meltfptr[154] = (void *) sy_INSTALL_METHOD;
}
/*^getnamedsymbol */
@@ -23377,8 +23717,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_ANY_RECEIVER =
meltgc_named_symbol ("DISCR_ANY_RECEIVER", MELT_GET);
- if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V156*/ meltfptr[155])
- /*_.VALDATA___V156*/ meltfptr[155] = (void *) sy_DISCR_ANY_RECEIVER;
+ if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V157*/ meltfptr[156])
+ /*_.VALDATA___V157*/ meltfptr[156] = (void *) sy_DISCR_ANY_RECEIVER;
}
/*^getnamedsymbol */
@@ -23387,8 +23727,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SOURCE_PATTERN =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN", MELT_GET);
- if (sy_CLASS_SOURCE_PATTERN && NULL == /*_.VALDATA___V160*/ meltfptr[159])
- /*_.VALDATA___V160*/ meltfptr[159] = (void *) sy_CLASS_SOURCE_PATTERN;
+ if (sy_CLASS_SOURCE_PATTERN && NULL == /*_.VALDATA___V161*/ meltfptr[160])
+ /*_.VALDATA___V161*/ meltfptr[160] = (void *) sy_CLASS_SOURCE_PATTERN;
}
/*^getnamedsymbol */
@@ -23398,8 +23738,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_VARIABLE =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_VARIABLE", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_VARIABLE
- && NULL == /*_.VALDATA___V164*/ meltfptr[163])
- /*_.VALDATA___V164*/ meltfptr[163] =
+ && NULL == /*_.VALDATA___V165*/ meltfptr[164])
+ /*_.VALDATA___V165*/ meltfptr[164] =
(void *) sy_CLASS_SOURCE_PATTERN_VARIABLE;
}
@@ -23410,8 +23750,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_JOKER_VARIABLE =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_JOKER_VARIABLE", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_JOKER_VARIABLE
- && NULL == /*_.VALDATA___V168*/ meltfptr[167])
- /*_.VALDATA___V168*/ meltfptr[167] =
+ && NULL == /*_.VALDATA___V169*/ meltfptr[168])
+ /*_.VALDATA___V169*/ meltfptr[168] =
(void *) sy_CLASS_SOURCE_PATTERN_JOKER_VARIABLE;
}
@@ -23422,8 +23762,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_CONSTANT =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_CONSTANT", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_CONSTANT
- && NULL == /*_.VALDATA___V172*/ meltfptr[171])
- /*_.VALDATA___V172*/ meltfptr[171] =
+ && NULL == /*_.VALDATA___V173*/ meltfptr[172])
+ /*_.VALDATA___V173*/ meltfptr[172] =
(void *) sy_CLASS_SOURCE_PATTERN_CONSTANT;
}
@@ -23432,8 +23772,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NORMAL_EXP */
{
melt_ptr_t sy_NORMAL_EXP = meltgc_named_symbol ("NORMAL_EXP", MELT_GET);
- if (sy_NORMAL_EXP && NULL == /*_.VALDATA___V174*/ meltfptr[173])
- /*_.VALDATA___V174*/ meltfptr[173] = (void *) sy_NORMAL_EXP;
+ if (sy_NORMAL_EXP && NULL == /*_.VALDATA___V175*/ meltfptr[174])
+ /*_.VALDATA___V175*/ meltfptr[174] = (void *) sy_NORMAL_EXP;
}
/*^getnamedsymbol */
@@ -23442,8 +23782,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_LIST_APPEND2LIST =
meltgc_named_symbol ("LIST_APPEND2LIST", MELT_GET);
- if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V176*/ meltfptr[175])
- /*_.VALDATA___V176*/ meltfptr[175] = (void *) sy_LIST_APPEND2LIST;
+ if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V177*/ meltfptr[176])
+ /*_.VALDATA___V177*/ meltfptr[176] = (void *) sy_LIST_APPEND2LIST;
}
/*^getnamedsymbol */
@@ -23451,8 +23791,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:GET_CTYPE */
{
melt_ptr_t sy_GET_CTYPE = meltgc_named_symbol ("GET_CTYPE", MELT_GET);
- if (sy_GET_CTYPE && NULL == /*_.VALDATA___V178*/ meltfptr[177])
- /*_.VALDATA___V178*/ meltfptr[177] = (void *) sy_GET_CTYPE;
+ if (sy_GET_CTYPE && NULL == /*_.VALDATA___V179*/ meltfptr[178])
+ /*_.VALDATA___V179*/ meltfptr[178] = (void *) sy_GET_CTYPE;
}
/*^getnamedsymbol */
@@ -23460,8 +23800,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_CTYPE */
{
melt_ptr_t sy_CLASS_CTYPE = meltgc_named_symbol ("CLASS_CTYPE", MELT_GET);
- if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V180*/ meltfptr[179])
- /*_.VALDATA___V180*/ meltfptr[179] = (void *) sy_CLASS_CTYPE;
+ if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V181*/ meltfptr[180])
+ /*_.VALDATA___V181*/ meltfptr[180] = (void *) sy_CLASS_CTYPE;
}
/*^getnamedsymbol */
@@ -23470,8 +23810,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_LOCATED =
meltgc_named_symbol ("CLASS_LOCATED", MELT_GET);
- if (sy_CLASS_LOCATED && NULL == /*_.VALDATA___V182*/ meltfptr[181])
- /*_.VALDATA___V182*/ meltfptr[181] = (void *) sy_CLASS_LOCATED;
+ if (sy_CLASS_LOCATED && NULL == /*_.VALDATA___V183*/ meltfptr[182])
+ /*_.VALDATA___V183*/ meltfptr[182] = (void *) sy_CLASS_LOCATED;
}
/*^getnamedsymbol */
@@ -23481,8 +23821,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_CONSTRUCT =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_CONSTRUCT", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_CONSTRUCT
- && NULL == /*_.VALDATA___V186*/ meltfptr[185])
- /*_.VALDATA___V186*/ meltfptr[185] =
+ && NULL == /*_.VALDATA___V187*/ meltfptr[186])
+ /*_.VALDATA___V187*/ meltfptr[186] =
(void *) sy_CLASS_SOURCE_PATTERN_CONSTRUCT;
}
@@ -23491,8 +23831,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_VALUE */
{
melt_ptr_t sy_CTYPE_VALUE = meltgc_named_symbol ("CTYPE_VALUE", MELT_GET);
- if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V188*/ meltfptr[187])
- /*_.VALDATA___V188*/ meltfptr[187] = (void *) sy_CTYPE_VALUE;
+ if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V189*/ meltfptr[188])
+ /*_.VALDATA___V189*/ meltfptr[188] = (void *) sy_CTYPE_VALUE;
}
/*^getnamedsymbol */
@@ -23502,8 +23842,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_OBJECT =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_OBJECT", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_OBJECT
- && NULL == /*_.VALDATA___V192*/ meltfptr[191])
- /*_.VALDATA___V192*/ meltfptr[191] =
+ && NULL == /*_.VALDATA___V193*/ meltfptr[192])
+ /*_.VALDATA___V193*/ meltfptr[192] =
(void *) sy_CLASS_SOURCE_PATTERN_OBJECT;
}
@@ -23512,8 +23852,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_CLASS */
{
melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET);
- if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V194*/ meltfptr[193])
- /*_.VALDATA___V194*/ meltfptr[193] = (void *) sy_CLASS_CLASS;
+ if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V195*/ meltfptr[194])
+ /*_.VALDATA___V195*/ meltfptr[194] = (void *) sy_CLASS_CLASS;
}
/*^getnamedsymbol */
@@ -23523,8 +23863,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_FIELD_PATTERN =
meltgc_named_symbol ("CLASS_SOURCE_FIELD_PATTERN", MELT_GET);
if (sy_CLASS_SOURCE_FIELD_PATTERN
- && NULL == /*_.VALDATA___V196*/ meltfptr[195])
- /*_.VALDATA___V196*/ meltfptr[195] =
+ && NULL == /*_.VALDATA___V197*/ meltfptr[196])
+ /*_.VALDATA___V197*/ meltfptr[196] =
(void *) sy_CLASS_SOURCE_FIELD_PATTERN;
}
@@ -23533,8 +23873,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_FIELD */
{
melt_ptr_t sy_CLASS_FIELD = meltgc_named_symbol ("CLASS_FIELD", MELT_GET);
- if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V198*/ meltfptr[197])
- /*_.VALDATA___V198*/ meltfptr[197] = (void *) sy_CLASS_FIELD;
+ if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V199*/ meltfptr[198])
+ /*_.VALDATA___V199*/ meltfptr[198] = (void *) sy_CLASS_FIELD;
}
/*^getnamedsymbol */
@@ -23544,8 +23884,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_COMPOSITE =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_COMPOSITE", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_COMPOSITE
- && NULL == /*_.VALDATA___V202*/ meltfptr[201])
- /*_.VALDATA___V202*/ meltfptr[201] =
+ && NULL == /*_.VALDATA___V203*/ meltfptr[202])
+ /*_.VALDATA___V203*/ meltfptr[202] =
(void *) sy_CLASS_SOURCE_PATTERN_COMPOSITE;
}
@@ -23555,8 +23895,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ANY_MATCHER =
meltgc_named_symbol ("CLASS_ANY_MATCHER", MELT_GET);
- if (sy_CLASS_ANY_MATCHER && NULL == /*_.VALDATA___V204*/ meltfptr[203])
- /*_.VALDATA___V204*/ meltfptr[203] = (void *) sy_CLASS_ANY_MATCHER;
+ if (sy_CLASS_ANY_MATCHER && NULL == /*_.VALDATA___V205*/ meltfptr[204])
+ /*_.VALDATA___V205*/ meltfptr[204] = (void *) sy_CLASS_ANY_MATCHER;
}
/*^getnamedsymbol */
@@ -23565,8 +23905,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_FORMAL_BINDING =
meltgc_named_symbol ("CLASS_FORMAL_BINDING", MELT_GET);
- if (sy_CLASS_FORMAL_BINDING && NULL == /*_.VALDATA___V206*/ meltfptr[205])
- /*_.VALDATA___V206*/ meltfptr[205] = (void *) sy_CLASS_FORMAL_BINDING;
+ if (sy_CLASS_FORMAL_BINDING && NULL == /*_.VALDATA___V207*/ meltfptr[206])
+ /*_.VALDATA___V207*/ meltfptr[206] = (void *) sy_CLASS_FORMAL_BINDING;
}
/*^getnamedsymbol */
@@ -23575,8 +23915,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORMALIZE_TUPLE =
meltgc_named_symbol ("NORMALIZE_TUPLE", MELT_GET);
- if (sy_NORMALIZE_TUPLE && NULL == /*_.VALDATA___V208*/ meltfptr[207])
- /*_.VALDATA___V208*/ meltfptr[207] = (void *) sy_NORMALIZE_TUPLE;
+ if (sy_NORMALIZE_TUPLE && NULL == /*_.VALDATA___V209*/ meltfptr[208])
+ /*_.VALDATA___V209*/ meltfptr[208] = (void *) sy_NORMALIZE_TUPLE;
}
/*^getnamedsymbol */
@@ -23586,8 +23926,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_OR =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_OR", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_OR
- && NULL == /*_.VALDATA___V213*/ meltfptr[212])
- /*_.VALDATA___V213*/ meltfptr[212] =
+ && NULL == /*_.VALDATA___V214*/ meltfptr[213])
+ /*_.VALDATA___V214*/ meltfptr[213] =
(void *) sy_CLASS_SOURCE_PATTERN_OR;
}
@@ -23597,8 +23937,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MAP_OBJECTS =
meltgc_named_symbol ("DISCR_MAP_OBJECTS", MELT_GET);
- if (sy_DISCR_MAP_OBJECTS && NULL == /*_.VALDATA___V215*/ meltfptr[214])
- /*_.VALDATA___V215*/ meltfptr[214] = (void *) sy_DISCR_MAP_OBJECTS;
+ if (sy_DISCR_MAP_OBJECTS && NULL == /*_.VALDATA___V216*/ meltfptr[215])
+ /*_.VALDATA___V216*/ meltfptr[215] = (void *) sy_DISCR_MAP_OBJECTS;
}
/*^getnamedsymbol */
@@ -23607,8 +23947,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SYMBOL =
meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET);
- if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V217*/ meltfptr[216])
- /*_.VALDATA___V217*/ meltfptr[216] = (void *) sy_CLASS_SYMBOL;
+ if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V218*/ meltfptr[217])
+ /*_.VALDATA___V218*/ meltfptr[217] = (void *) sy_CLASS_SYMBOL;
}
/*^getnamedsymbol */
@@ -23618,8 +23958,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_AND =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_AND", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_AND
- && NULL == /*_.VALDATA___V221*/ meltfptr[220])
- /*_.VALDATA___V221*/ meltfptr[220] =
+ && NULL == /*_.VALDATA___V222*/ meltfptr[221])
+ /*_.VALDATA___V222*/ meltfptr[221] =
(void *) sy_CLASS_SOURCE_PATTERN_AND;
}
@@ -23629,8 +23969,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORMAL_PATTERN =
meltgc_named_symbol ("NORMAL_PATTERN", MELT_GET);
- if (sy_NORMAL_PATTERN && NULL == /*_.VALDATA___V223*/ meltfptr[222])
- /*_.VALDATA___V223*/ meltfptr[222] = (void *) sy_NORMAL_PATTERN;
+ if (sy_NORMAL_PATTERN && NULL == /*_.VALDATA___V224*/ meltfptr[223])
+ /*_.VALDATA___V224*/ meltfptr[223] = (void *) sy_NORMAL_PATTERN;
}
/*^getnamedsymbol */
@@ -23640,8 +23980,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_OR_VARIABLE =
meltgc_named_symbol ("CLASS_NORMAL_OR_VARIABLE", MELT_GET);
if (sy_CLASS_NORMAL_OR_VARIABLE
- && NULL == /*_.VALDATA___V227*/ meltfptr[226])
- /*_.VALDATA___V227*/ meltfptr[226] =
+ && NULL == /*_.VALDATA___V228*/ meltfptr[227])
+ /*_.VALDATA___V228*/ meltfptr[227] =
(void *) sy_CLASS_NORMAL_OR_VARIABLE;
}
@@ -23651,8 +23991,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORVAR_NOREXP =
meltgc_named_symbol ("NORVAR_NOREXP", MELT_GET);
- if (sy_NORVAR_NOREXP && NULL == /*_.VALDATA___V241*/ meltfptr[240])
- /*_.VALDATA___V241*/ meltfptr[240] = (void *) sy_NORVAR_NOREXP;
+ if (sy_NORVAR_NOREXP && NULL == /*_.VALDATA___V242*/ meltfptr[241])
+ /*_.VALDATA___V242*/ meltfptr[241] = (void *) sy_NORVAR_NOREXP;
}
/*^getnamedsymbol */
@@ -23661,8 +24001,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORVAR_LOCSYM =
meltgc_named_symbol ("NORVAR_LOCSYM", MELT_GET);
- if (sy_NORVAR_LOCSYM && NULL == /*_.VALDATA___V243*/ meltfptr[242])
- /*_.VALDATA___V243*/ meltfptr[242] = (void *) sy_NORVAR_LOCSYM;
+ if (sy_NORVAR_LOCSYM && NULL == /*_.VALDATA___V244*/ meltfptr[243])
+ /*_.VALDATA___V244*/ meltfptr[243] = (void *) sy_NORVAR_LOCSYM;
}
/*^getnamedsymbol */
@@ -23671,8 +24011,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORVAR_PATVAR =
meltgc_named_symbol ("NORVAR_PATVAR", MELT_GET);
- if (sy_NORVAR_PATVAR && NULL == /*_.VALDATA___V245*/ meltfptr[244])
- /*_.VALDATA___V245*/ meltfptr[244] = (void *) sy_NORVAR_PATVAR;
+ if (sy_NORVAR_PATVAR && NULL == /*_.VALDATA___V246*/ meltfptr[245])
+ /*_.VALDATA___V246*/ meltfptr[245] = (void *) sy_NORVAR_PATVAR;
}
/*^getnamedsymbol */
@@ -23681,8 +24021,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORVAR_NREPOR =
meltgc_named_symbol ("NORVAR_NREPOR", MELT_GET);
- if (sy_NORVAR_NREPOR && NULL == /*_.VALDATA___V247*/ meltfptr[246])
- /*_.VALDATA___V247*/ meltfptr[246] = (void *) sy_NORVAR_NREPOR;
+ if (sy_NORVAR_NREPOR && NULL == /*_.VALDATA___V248*/ meltfptr[247])
+ /*_.VALDATA___V248*/ meltfptr[247] = (void *) sy_NORVAR_NREPOR;
}
/*^getnamedsymbol */
@@ -23691,8 +24031,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NORMTESTER_ANY =
meltgc_named_symbol ("CLASS_NORMTESTER_ANY", MELT_GET);
- if (sy_CLASS_NORMTESTER_ANY && NULL == /*_.VALDATA___V249*/ meltfptr[248])
- /*_.VALDATA___V249*/ meltfptr[248] = (void *) sy_CLASS_NORMTESTER_ANY;
+ if (sy_CLASS_NORMTESTER_ANY && NULL == /*_.VALDATA___V250*/ meltfptr[249])
+ /*_.VALDATA___V250*/ meltfptr[249] = (void *) sy_CLASS_NORMTESTER_ANY;
}
/*^getnamedsymbol */
@@ -23702,8 +24042,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_EXPRESSION =
meltgc_named_symbol ("CLASS_NREP_EXPRESSION", MELT_GET);
if (sy_CLASS_NREP_EXPRESSION
- && NULL == /*_.VALDATA___V251*/ meltfptr[250])
- /*_.VALDATA___V251*/ meltfptr[250] = (void *) sy_CLASS_NREP_EXPRESSION;
+ && NULL == /*_.VALDATA___V252*/ meltfptr[251])
+ /*_.VALDATA___V252*/ meltfptr[251] = (void *) sy_CLASS_NREP_EXPRESSION;
}
/*^getnamedsymbol */
@@ -23712,8 +24052,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTEST_MATCHED =
meltgc_named_symbol ("NTEST_MATCHED", MELT_GET);
- if (sy_NTEST_MATCHED && NULL == /*_.VALDATA___V269*/ meltfptr[268])
- /*_.VALDATA___V269*/ meltfptr[268] = (void *) sy_NTEST_MATCHED;
+ if (sy_NTEST_MATCHED && NULL == /*_.VALDATA___V270*/ meltfptr[269])
+ /*_.VALDATA___V270*/ meltfptr[269] = (void *) sy_NTEST_MATCHED;
}
/*^getnamedsymbol */
@@ -23721,8 +24061,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NTEST_THEN */
{
melt_ptr_t sy_NTEST_THEN = meltgc_named_symbol ("NTEST_THEN", MELT_GET);
- if (sy_NTEST_THEN && NULL == /*_.VALDATA___V271*/ meltfptr[270])
- /*_.VALDATA___V271*/ meltfptr[270] = (void *) sy_NTEST_THEN;
+ if (sy_NTEST_THEN && NULL == /*_.VALDATA___V272*/ meltfptr[271])
+ /*_.VALDATA___V272*/ meltfptr[271] = (void *) sy_NTEST_THEN;
}
/*^getnamedsymbol */
@@ -23730,8 +24070,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NTEST_ELSE */
{
melt_ptr_t sy_NTEST_ELSE = meltgc_named_symbol ("NTEST_ELSE", MELT_GET);
- if (sy_NTEST_ELSE && NULL == /*_.VALDATA___V273*/ meltfptr[272])
- /*_.VALDATA___V273*/ meltfptr[272] = (void *) sy_NTEST_ELSE;
+ if (sy_NTEST_ELSE && NULL == /*_.VALDATA___V274*/ meltfptr[273])
+ /*_.VALDATA___V274*/ meltfptr[273] = (void *) sy_NTEST_ELSE;
}
/*^getnamedsymbol */
@@ -23740,8 +24080,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTEST_NORMATCH =
meltgc_named_symbol ("NTEST_NORMATCH", MELT_GET);
- if (sy_NTEST_NORMATCH && NULL == /*_.VALDATA___V275*/ meltfptr[274])
- /*_.VALDATA___V275*/ meltfptr[274] = (void *) sy_NTEST_NORMATCH;
+ if (sy_NTEST_NORMATCH && NULL == /*_.VALDATA___V276*/ meltfptr[275])
+ /*_.VALDATA___V276*/ meltfptr[275] = (void *) sy_NTEST_NORMATCH;
}
/*^getnamedsymbol */
@@ -23750,8 +24090,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTEST_LOCCLIST =
meltgc_named_symbol ("NTEST_LOCCLIST", MELT_GET);
- if (sy_NTEST_LOCCLIST && NULL == /*_.VALDATA___V277*/ meltfptr[276])
- /*_.VALDATA___V277*/ meltfptr[276] = (void *) sy_NTEST_LOCCLIST;
+ if (sy_NTEST_LOCCLIST && NULL == /*_.VALDATA___V278*/ meltfptr[277])
+ /*_.VALDATA___V278*/ meltfptr[277] = (void *) sy_NTEST_LOCCLIST;
}
/*^getnamedsymbol */
@@ -23760,8 +24100,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTEST_COMEFROM =
meltgc_named_symbol ("NTEST_COMEFROM", MELT_GET);
- if (sy_NTEST_COMEFROM && NULL == /*_.VALDATA___V279*/ meltfptr[278])
- /*_.VALDATA___V279*/ meltfptr[278] = (void *) sy_NTEST_COMEFROM;
+ if (sy_NTEST_COMEFROM && NULL == /*_.VALDATA___V280*/ meltfptr[279])
+ /*_.VALDATA___V280*/ meltfptr[279] = (void *) sy_NTEST_COMEFROM;
}
/*^getnamedsymbol */
@@ -23771,8 +24111,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_SUCCESS =
meltgc_named_symbol ("CLASS_NORMTESTER_SUCCESS", MELT_GET);
if (sy_CLASS_NORMTESTER_SUCCESS
- && NULL == /*_.VALDATA___V281*/ meltfptr[280])
- /*_.VALDATA___V281*/ meltfptr[280] =
+ && NULL == /*_.VALDATA___V282*/ meltfptr[281])
+ /*_.VALDATA___V282*/ meltfptr[281] =
(void *) sy_CLASS_NORMTESTER_SUCCESS;
}
@@ -23782,8 +24122,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTSUCCESS_DO =
meltgc_named_symbol ("NTSUCCESS_DO", MELT_GET);
- if (sy_NTSUCCESS_DO && NULL == /*_.VALDATA___V289*/ meltfptr[288])
- /*_.VALDATA___V289*/ meltfptr[288] = (void *) sy_NTSUCCESS_DO;
+ if (sy_NTSUCCESS_DO && NULL == /*_.VALDATA___V290*/ meltfptr[289])
+ /*_.VALDATA___V290*/ meltfptr[289] = (void *) sy_NTSUCCESS_DO;
}
/*^getnamedsymbol */
@@ -23793,8 +24133,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_OR_CLEAR =
meltgc_named_symbol ("CLASS_NORMTESTER_OR_CLEAR", MELT_GET);
if (sy_CLASS_NORMTESTER_OR_CLEAR
- && NULL == /*_.VALDATA___V291*/ meltfptr[290])
- /*_.VALDATA___V291*/ meltfptr[290] =
+ && NULL == /*_.VALDATA___V292*/ meltfptr[291])
+ /*_.VALDATA___V292*/ meltfptr[291] =
(void *) sy_CLASS_NORMTESTER_OR_CLEAR;
}
@@ -23804,8 +24144,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTORCLEAR_LOCSYM =
meltgc_named_symbol ("NTORCLEAR_LOCSYM", MELT_GET);
- if (sy_NTORCLEAR_LOCSYM && NULL == /*_.VALDATA___V299*/ meltfptr[298])
- /*_.VALDATA___V299*/ meltfptr[298] = (void *) sy_NTORCLEAR_LOCSYM;
+ if (sy_NTORCLEAR_LOCSYM && NULL == /*_.VALDATA___V300*/ meltfptr[299])
+ /*_.VALDATA___V300*/ meltfptr[299] = (void *) sy_NTORCLEAR_LOCSYM;
}
/*^getnamedsymbol */
@@ -23815,8 +24155,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_OR_INITIAL_CLEAR =
meltgc_named_symbol ("CLASS_NORMTESTER_OR_INITIAL_CLEAR", MELT_GET);
if (sy_CLASS_NORMTESTER_OR_INITIAL_CLEAR
- && NULL == /*_.VALDATA___V301*/ meltfptr[300])
- /*_.VALDATA___V301*/ meltfptr[300] =
+ && NULL == /*_.VALDATA___V302*/ meltfptr[301])
+ /*_.VALDATA___V302*/ meltfptr[301] =
(void *) sy_CLASS_NORMTESTER_OR_INITIAL_CLEAR;
}
@@ -23827,8 +24167,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_OR_TRANSMIT =
meltgc_named_symbol ("CLASS_NORMTESTER_OR_TRANSMIT", MELT_GET);
if (sy_CLASS_NORMTESTER_OR_TRANSMIT
- && NULL == /*_.VALDATA___V307*/ meltfptr[306])
- /*_.VALDATA___V307*/ meltfptr[306] =
+ && NULL == /*_.VALDATA___V308*/ meltfptr[307])
+ /*_.VALDATA___V308*/ meltfptr[307] =
(void *) sy_CLASS_NORMTESTER_OR_TRANSMIT;
}
@@ -23838,8 +24178,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTORTRANSMIT_DST =
meltgc_named_symbol ("NTORTRANSMIT_DST", MELT_GET);
- if (sy_NTORTRANSMIT_DST && NULL == /*_.VALDATA___V317*/ meltfptr[316])
- /*_.VALDATA___V317*/ meltfptr[316] = (void *) sy_NTORTRANSMIT_DST;
+ if (sy_NTORTRANSMIT_DST && NULL == /*_.VALDATA___V318*/ meltfptr[317])
+ /*_.VALDATA___V318*/ meltfptr[317] = (void *) sy_NTORTRANSMIT_DST;
}
/*^getnamedsymbol */
@@ -23848,8 +24188,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTORTRANSMIT_SRC =
meltgc_named_symbol ("NTORTRANSMIT_SRC", MELT_GET);
- if (sy_NTORTRANSMIT_SRC && NULL == /*_.VALDATA___V319*/ meltfptr[318])
- /*_.VALDATA___V319*/ meltfptr[318] = (void *) sy_NTORTRANSMIT_SRC;
+ if (sy_NTORTRANSMIT_SRC && NULL == /*_.VALDATA___V320*/ meltfptr[319])
+ /*_.VALDATA___V320*/ meltfptr[319] = (void *) sy_NTORTRANSMIT_SRC;
}
/*^getnamedsymbol */
@@ -23859,8 +24199,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_ANYTESTER =
meltgc_named_symbol ("CLASS_NORMTESTER_ANYTESTER", MELT_GET);
if (sy_CLASS_NORMTESTER_ANYTESTER
- && NULL == /*_.VALDATA___V321*/ meltfptr[320])
- /*_.VALDATA___V321*/ meltfptr[320] =
+ && NULL == /*_.VALDATA___V322*/ meltfptr[321])
+ /*_.VALDATA___V322*/ meltfptr[321] =
(void *) sy_CLASS_NORMTESTER_ANYTESTER;
}
@@ -23871,8 +24211,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_DISJUNCTION =
meltgc_named_symbol ("CLASS_NORMTESTER_DISJUNCTION", MELT_GET);
if (sy_CLASS_NORMTESTER_DISJUNCTION
- && NULL == /*_.VALDATA___V327*/ meltfptr[326])
- /*_.VALDATA___V327*/ meltfptr[326] =
+ && NULL == /*_.VALDATA___V328*/ meltfptr[327])
+ /*_.VALDATA___V328*/ meltfptr[327] =
(void *) sy_CLASS_NORMTESTER_DISJUNCTION;
}
@@ -23881,8 +24221,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NTDISJUNCTS */
{
melt_ptr_t sy_NTDISJUNCTS = meltgc_named_symbol ("NTDISJUNCTS", MELT_GET);
- if (sy_NTDISJUNCTS && NULL == /*_.VALDATA___V339*/ meltfptr[338])
- /*_.VALDATA___V339*/ meltfptr[338] = (void *) sy_NTDISJUNCTS;
+ if (sy_NTDISJUNCTS && NULL == /*_.VALDATA___V340*/ meltfptr[339])
+ /*_.VALDATA___V340*/ meltfptr[339] = (void *) sy_NTDISJUNCTS;
}
/*^getnamedsymbol */
@@ -23891,8 +24231,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTDISJ_FRESHORVAR =
meltgc_named_symbol ("NTDISJ_FRESHORVAR", MELT_GET);
- if (sy_NTDISJ_FRESHORVAR && NULL == /*_.VALDATA___V341*/ meltfptr[340])
- /*_.VALDATA___V341*/ meltfptr[340] = (void *) sy_NTDISJ_FRESHORVAR;
+ if (sy_NTDISJ_FRESHORVAR && NULL == /*_.VALDATA___V342*/ meltfptr[341])
+ /*_.VALDATA___V342*/ meltfptr[341] = (void *) sy_NTDISJ_FRESHORVAR;
}
/*^getnamedsymbol */
@@ -23901,8 +24241,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTDISJ_SETORVAR =
meltgc_named_symbol ("NTDISJ_SETORVAR", MELT_GET);
- if (sy_NTDISJ_SETORVAR && NULL == /*_.VALDATA___V343*/ meltfptr[342])
- /*_.VALDATA___V343*/ meltfptr[342] = (void *) sy_NTDISJ_SETORVAR;
+ if (sy_NTDISJ_SETORVAR && NULL == /*_.VALDATA___V344*/ meltfptr[343])
+ /*_.VALDATA___V344*/ meltfptr[343] = (void *) sy_NTDISJ_SETORVAR;
}
/*^getnamedsymbol */
@@ -23912,8 +24252,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_SAME =
meltgc_named_symbol ("CLASS_NORMTESTER_SAME", MELT_GET);
if (sy_CLASS_NORMTESTER_SAME
- && NULL == /*_.VALDATA___V345*/ meltfptr[344])
- /*_.VALDATA___V345*/ meltfptr[344] = (void *) sy_CLASS_NORMTESTER_SAME;
+ && NULL == /*_.VALDATA___V346*/ meltfptr[345])
+ /*_.VALDATA___V346*/ meltfptr[345] = (void *) sy_CLASS_NORMTESTER_SAME;
}
/*^getnamedsymbol */
@@ -23922,8 +24262,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTSAME_IDENTICAL =
meltgc_named_symbol ("NTSAME_IDENTICAL", MELT_GET);
- if (sy_NTSAME_IDENTICAL && NULL == /*_.VALDATA___V353*/ meltfptr[352])
- /*_.VALDATA___V353*/ meltfptr[352] = (void *) sy_NTSAME_IDENTICAL;
+ if (sy_NTSAME_IDENTICAL && NULL == /*_.VALDATA___V354*/ meltfptr[353])
+ /*_.VALDATA___V354*/ meltfptr[353] = (void *) sy_NTSAME_IDENTICAL;
}
/*^getnamedsymbol */
@@ -23933,8 +24273,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_MATCHER =
meltgc_named_symbol ("CLASS_NORMTESTER_MATCHER", MELT_GET);
if (sy_CLASS_NORMTESTER_MATCHER
- && NULL == /*_.VALDATA___V355*/ meltfptr[354])
- /*_.VALDATA___V355*/ meltfptr[354] =
+ && NULL == /*_.VALDATA___V356*/ meltfptr[355])
+ /*_.VALDATA___V356*/ meltfptr[355] =
(void *) sy_CLASS_NORMTESTER_MATCHER;
}
@@ -23944,8 +24284,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTMATCH_MATCHER =
meltgc_named_symbol ("NTMATCH_MATCHER", MELT_GET);
- if (sy_NTMATCH_MATCHER && NULL == /*_.VALDATA___V369*/ meltfptr[368])
- /*_.VALDATA___V369*/ meltfptr[368] = (void *) sy_NTMATCH_MATCHER;
+ if (sy_NTMATCH_MATCHER && NULL == /*_.VALDATA___V370*/ meltfptr[369])
+ /*_.VALDATA___V370*/ meltfptr[369] = (void *) sy_NTMATCH_MATCHER;
}
/*^getnamedsymbol */
@@ -23954,8 +24294,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTMATCH_MATNDATA =
meltgc_named_symbol ("NTMATCH_MATNDATA", MELT_GET);
- if (sy_NTMATCH_MATNDATA && NULL == /*_.VALDATA___V371*/ meltfptr[370])
- /*_.VALDATA___V371*/ meltfptr[370] = (void *) sy_NTMATCH_MATNDATA;
+ if (sy_NTMATCH_MATNDATA && NULL == /*_.VALDATA___V372*/ meltfptr[371])
+ /*_.VALDATA___V372*/ meltfptr[371] = (void *) sy_NTMATCH_MATNDATA;
}
/*^getnamedsymbol */
@@ -23964,8 +24304,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTMATCH_INARGS =
meltgc_named_symbol ("NTMATCH_INARGS", MELT_GET);
- if (sy_NTMATCH_INARGS && NULL == /*_.VALDATA___V373*/ meltfptr[372])
- /*_.VALDATA___V373*/ meltfptr[372] = (void *) sy_NTMATCH_INARGS;
+ if (sy_NTMATCH_INARGS && NULL == /*_.VALDATA___V374*/ meltfptr[373])
+ /*_.VALDATA___V374*/ meltfptr[373] = (void *) sy_NTMATCH_INARGS;
}
/*^getnamedsymbol */
@@ -23974,8 +24314,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTMATCH_OUTLOCS =
meltgc_named_symbol ("NTMATCH_OUTLOCS", MELT_GET);
- if (sy_NTMATCH_OUTLOCS && NULL == /*_.VALDATA___V375*/ meltfptr[374])
- /*_.VALDATA___V375*/ meltfptr[374] = (void *) sy_NTMATCH_OUTLOCS;
+ if (sy_NTMATCH_OUTLOCS && NULL == /*_.VALDATA___V376*/ meltfptr[375])
+ /*_.VALDATA___V376*/ meltfptr[375] = (void *) sy_NTMATCH_OUTLOCS;
}
/*^getnamedsymbol */
@@ -23985,8 +24325,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_INSTANCE =
meltgc_named_symbol ("CLASS_NORMTESTER_INSTANCE", MELT_GET);
if (sy_CLASS_NORMTESTER_INSTANCE
- && NULL == /*_.VALDATA___V377*/ meltfptr[376])
- /*_.VALDATA___V377*/ meltfptr[376] =
+ && NULL == /*_.VALDATA___V378*/ meltfptr[377])
+ /*_.VALDATA___V378*/ meltfptr[377] =
(void *) sy_CLASS_NORMTESTER_INSTANCE;
}
@@ -23996,8 +24336,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTINST_CLASS =
meltgc_named_symbol ("NTINST_CLASS", MELT_GET);
- if (sy_NTINST_CLASS && NULL == /*_.VALDATA___V387*/ meltfptr[386])
- /*_.VALDATA___V387*/ meltfptr[386] = (void *) sy_NTINST_CLASS;
+ if (sy_NTINST_CLASS && NULL == /*_.VALDATA___V388*/ meltfptr[387])
+ /*_.VALDATA___V388*/ meltfptr[387] = (void *) sy_NTINST_CLASS;
}
/*^getnamedsymbol */
@@ -24006,8 +24346,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTINST_FIELDLOCS =
meltgc_named_symbol ("NTINST_FIELDLOCS", MELT_GET);
- if (sy_NTINST_FIELDLOCS && NULL == /*_.VALDATA___V389*/ meltfptr[388])
- /*_.VALDATA___V389*/ meltfptr[388] = (void *) sy_NTINST_FIELDLOCS;
+ if (sy_NTINST_FIELDLOCS && NULL == /*_.VALDATA___V390*/ meltfptr[389])
+ /*_.VALDATA___V390*/ meltfptr[389] = (void *) sy_NTINST_FIELDLOCS;
}
/*^getnamedsymbol */
@@ -24017,8 +24357,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMTESTER_TUPLE =
meltgc_named_symbol ("CLASS_NORMTESTER_TUPLE", MELT_GET);
if (sy_CLASS_NORMTESTER_TUPLE
- && NULL == /*_.VALDATA___V391*/ meltfptr[390])
- /*_.VALDATA___V391*/ meltfptr[390] = (void *) sy_CLASS_NORMTESTER_TUPLE;
+ && NULL == /*_.VALDATA___V392*/ meltfptr[391])
+ /*_.VALDATA___V392*/ meltfptr[391] = (void *) sy_CLASS_NORMTESTER_TUPLE;
}
/*^getnamedsymbol */
@@ -24027,8 +24367,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTTUPLE_COMPONENTS =
meltgc_named_symbol ("NTTUPLE_COMPONENTS", MELT_GET);
- if (sy_NTTUPLE_COMPONENTS && NULL == /*_.VALDATA___V399*/ meltfptr[398])
- /*_.VALDATA___V399*/ meltfptr[398] = (void *) sy_NTTUPLE_COMPONENTS;
+ if (sy_NTTUPLE_COMPONENTS && NULL == /*_.VALDATA___V400*/ meltfptr[399])
+ /*_.VALDATA___V400*/ meltfptr[399] = (void *) sy_NTTUPLE_COMPONENTS;
}
/*^getnamedsymbol */
@@ -24037,8 +24377,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_MATCH =
meltgc_named_symbol ("CLASS_NREP_MATCH", MELT_GET);
- if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V401*/ meltfptr[400])
- /*_.VALDATA___V401*/ meltfptr[400] = (void *) sy_CLASS_NREP_MATCH;
+ if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V402*/ meltfptr[401])
+ /*_.VALDATA___V402*/ meltfptr[401] = (void *) sy_CLASS_NREP_MATCH;
}
/*^getnamedsymbol */
@@ -24048,8 +24388,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_TYPED_EXPRESSION =
meltgc_named_symbol ("CLASS_NREP_TYPED_EXPRESSION", MELT_GET);
if (sy_CLASS_NREP_TYPED_EXPRESSION
- && NULL == /*_.VALDATA___V403*/ meltfptr[402])
- /*_.VALDATA___V403*/ meltfptr[402] =
+ && NULL == /*_.VALDATA___V404*/ meltfptr[403])
+ /*_.VALDATA___V404*/ meltfptr[403] =
(void *) sy_CLASS_NREP_TYPED_EXPRESSION;
}
@@ -24059,8 +24399,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NMATCH_TESTS =
meltgc_named_symbol ("NMATCH_TESTS", MELT_GET);
- if (sy_NMATCH_TESTS && NULL == /*_.VALDATA___V415*/ meltfptr[414])
- /*_.VALDATA___V415*/ meltfptr[414] = (void *) sy_NMATCH_TESTS;
+ if (sy_NMATCH_TESTS && NULL == /*_.VALDATA___V416*/ meltfptr[415])
+ /*_.VALDATA___V416*/ meltfptr[415] = (void *) sy_NMATCH_TESTS;
}
/*^getnamedsymbol */
@@ -24069,8 +24409,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NMATCH_STUFFMAP =
meltgc_named_symbol ("NMATCH_STUFFMAP", MELT_GET);
- if (sy_NMATCH_STUFFMAP && NULL == /*_.VALDATA___V417*/ meltfptr[416])
- /*_.VALDATA___V417*/ meltfptr[416] = (void *) sy_NMATCH_STUFFMAP;
+ if (sy_NMATCH_STUFFMAP && NULL == /*_.VALDATA___V418*/ meltfptr[417])
+ /*_.VALDATA___V418*/ meltfptr[417] = (void *) sy_NMATCH_STUFFMAP;
}
/*^getnamedsymbol */
@@ -24079,8 +24419,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NMATCH_MATCHED =
meltgc_named_symbol ("NMATCH_MATCHED", MELT_GET);
- if (sy_NMATCH_MATCHED && NULL == /*_.VALDATA___V419*/ meltfptr[418])
- /*_.VALDATA___V419*/ meltfptr[418] = (void *) sy_NMATCH_MATCHED;
+ if (sy_NMATCH_MATCHED && NULL == /*_.VALDATA___V420*/ meltfptr[419])
+ /*_.VALDATA___V420*/ meltfptr[419] = (void *) sy_NMATCH_MATCHED;
}
/*^getnamedsymbol */
@@ -24088,8 +24428,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:DISCR_LIST */
{
melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET);
- if (sy_DISCR_LIST && NULL == /*_.VALDATA___V423*/ meltfptr[422])
- /*_.VALDATA___V423*/ meltfptr[422] = (void *) sy_DISCR_LIST;
+ if (sy_DISCR_LIST && NULL == /*_.VALDATA___V424*/ meltfptr[423])
+ /*_.VALDATA___V424*/ meltfptr[423] = (void *) sy_DISCR_LIST;
}
/*^getnamedsymbol */
@@ -24098,8 +24438,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CONTAINER =
meltgc_named_symbol ("CLASS_CONTAINER", MELT_GET);
- if (sy_CLASS_CONTAINER && NULL == /*_.VALDATA___V429*/ meltfptr[428])
- /*_.VALDATA___V429*/ meltfptr[428] = (void *) sy_CLASS_CONTAINER;
+ if (sy_CLASS_CONTAINER && NULL == /*_.VALDATA___V430*/ meltfptr[429])
+ /*_.VALDATA___V430*/ meltfptr[429] = (void *) sy_CLASS_CONTAINER;
}
/*^getnamedsymbol */
@@ -24108,8 +24448,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_LOCSYMOCC =
meltgc_named_symbol ("CLASS_NREP_LOCSYMOCC", MELT_GET);
- if (sy_CLASS_NREP_LOCSYMOCC && NULL == /*_.VALDATA___V440*/ meltfptr[439])
- /*_.VALDATA___V440*/ meltfptr[439] = (void *) sy_CLASS_NREP_LOCSYMOCC;
+ if (sy_CLASS_NREP_LOCSYMOCC && NULL == /*_.VALDATA___V441*/ meltfptr[440])
+ /*_.VALDATA___V441*/ meltfptr[440] = (void *) sy_CLASS_NREP_LOCSYMOCC;
}
/*^getnamedsymbol */
@@ -24119,8 +24459,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMAL_LET_BINDING =
meltgc_named_symbol ("CLASS_NORMAL_LET_BINDING", MELT_GET);
if (sy_CLASS_NORMAL_LET_BINDING
- && NULL == /*_.VALDATA___V444*/ meltfptr[443])
- /*_.VALDATA___V444*/ meltfptr[443] =
+ && NULL == /*_.VALDATA___V445*/ meltfptr[444])
+ /*_.VALDATA___V445*/ meltfptr[444] =
(void *) sy_CLASS_NORMAL_LET_BINDING;
}
@@ -24131,8 +24471,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NORMALIZATION_CONTEXT =
meltgc_named_symbol ("CLASS_NORMALIZATION_CONTEXT", MELT_GET);
if (sy_CLASS_NORMALIZATION_CONTEXT
- && NULL == /*_.VALDATA___V446*/ meltfptr[445])
- /*_.VALDATA___V446*/ meltfptr[445] =
+ && NULL == /*_.VALDATA___V447*/ meltfptr[446])
+ /*_.VALDATA___V447*/ meltfptr[446] =
(void *) sy_CLASS_NORMALIZATION_CONTEXT;
}
@@ -24143,8 +24483,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_INSTANCE =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_INSTANCE", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_INSTANCE
- && NULL == /*_.VALDATA___V458*/ meltfptr[457])
- /*_.VALDATA___V458*/ meltfptr[457] =
+ && NULL == /*_.VALDATA___V459*/ meltfptr[458])
+ /*_.VALDATA___V459*/ meltfptr[458] =
(void *) sy_CLASS_SOURCE_PATTERN_INSTANCE;
}
@@ -24154,8 +24494,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_MULTIPLE =
meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET);
- if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V460*/ meltfptr[459])
- /*_.VALDATA___V460*/ meltfptr[459] = (void *) sy_DISCR_MULTIPLE;
+ if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V461*/ meltfptr[460])
+ /*_.VALDATA___V461*/ meltfptr[460] = (void *) sy_DISCR_MULTIPLE;
}
/*^getnamedsymbol */
@@ -24164,8 +24504,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SYMOCC =
meltgc_named_symbol ("CLASS_NREP_SYMOCC", MELT_GET);
- if (sy_CLASS_NREP_SYMOCC && NULL == /*_.VALDATA___V462*/ meltfptr[461])
- /*_.VALDATA___V462*/ meltfptr[461] = (void *) sy_CLASS_NREP_SYMOCC;
+ if (sy_CLASS_NREP_SYMOCC && NULL == /*_.VALDATA___V463*/ meltfptr[462])
+ /*_.VALDATA___V463*/ meltfptr[462] = (void *) sy_CLASS_NREP_SYMOCC;
}
/*^getnamedsymbol */
@@ -24174,8 +24514,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_LET_BINDING =
meltgc_named_symbol ("CLASS_LET_BINDING", MELT_GET);
- if (sy_CLASS_LET_BINDING && NULL == /*_.VALDATA___V464*/ meltfptr[463])
- /*_.VALDATA___V464*/ meltfptr[463] = (void *) sy_CLASS_LET_BINDING;
+ if (sy_CLASS_LET_BINDING && NULL == /*_.VALDATA___V465*/ meltfptr[464])
+ /*_.VALDATA___V465*/ meltfptr[464] = (void *) sy_CLASS_LET_BINDING;
}
/*^getnamedsymbol */
@@ -24185,8 +24525,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_UNSAFE_GET_FIELD =
meltgc_named_symbol ("CLASS_NREP_UNSAFE_GET_FIELD", MELT_GET);
if (sy_CLASS_NREP_UNSAFE_GET_FIELD
- && NULL == /*_.VALDATA___V466*/ meltfptr[465])
- /*_.VALDATA___V466*/ meltfptr[465] =
+ && NULL == /*_.VALDATA___V467*/ meltfptr[466])
+ /*_.VALDATA___V467*/ meltfptr[466] =
(void *) sy_CLASS_NREP_UNSAFE_GET_FIELD;
}
@@ -24196,8 +24536,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLONE_SYMBOL =
meltgc_named_symbol ("CLONE_SYMBOL", MELT_GET);
- if (sy_CLONE_SYMBOL && NULL == /*_.VALDATA___V468*/ meltfptr[467])
- /*_.VALDATA___V468*/ meltfptr[467] = (void *) sy_CLONE_SYMBOL;
+ if (sy_CLONE_SYMBOL && NULL == /*_.VALDATA___V469*/ meltfptr[468])
+ /*_.VALDATA___V469*/ meltfptr[468] = (void *) sy_CLONE_SYMBOL;
}
/*^getnamedsymbol */
@@ -24207,8 +24547,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_TUPLE_COMPONENT_PATTERN =
meltgc_named_symbol ("CLASS_TUPLE_COMPONENT_PATTERN", MELT_GET);
if (sy_CLASS_TUPLE_COMPONENT_PATTERN
- && NULL == /*_.VALDATA___V470*/ meltfptr[469])
- /*_.VALDATA___V470*/ meltfptr[469] =
+ && NULL == /*_.VALDATA___V471*/ meltfptr[470])
+ /*_.VALDATA___V471*/ meltfptr[470] =
(void *) sy_CLASS_TUPLE_COMPONENT_PATTERN;
}
@@ -24218,8 +24558,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_TUPCP_PATTERN =
meltgc_named_symbol ("TUPCP_PATTERN", MELT_GET);
- if (sy_TUPCP_PATTERN && NULL == /*_.VALDATA___V480*/ meltfptr[479])
- /*_.VALDATA___V480*/ meltfptr[479] = (void *) sy_TUPCP_PATTERN;
+ if (sy_TUPCP_PATTERN && NULL == /*_.VALDATA___V481*/ meltfptr[480])
+ /*_.VALDATA___V481*/ meltfptr[480] = (void *) sy_TUPCP_PATTERN;
}
/*^getnamedsymbol */
@@ -24227,8 +24567,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TUPCP_INDEX */
{
melt_ptr_t sy_TUPCP_INDEX = meltgc_named_symbol ("TUPCP_INDEX", MELT_GET);
- if (sy_TUPCP_INDEX && NULL == /*_.VALDATA___V482*/ meltfptr[481])
- /*_.VALDATA___V482*/ meltfptr[481] = (void *) sy_TUPCP_INDEX;
+ if (sy_TUPCP_INDEX && NULL == /*_.VALDATA___V483*/ meltfptr[482])
+ /*_.VALDATA___V483*/ meltfptr[482] = (void *) sy_TUPCP_INDEX;
}
/*^getnamedsymbol */
@@ -24238,8 +24578,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_TUPLE =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_TUPLE", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_TUPLE
- && NULL == /*_.VALDATA___V494*/ meltfptr[493])
- /*_.VALDATA___V494*/ meltfptr[493] =
+ && NULL == /*_.VALDATA___V495*/ meltfptr[494])
+ /*_.VALDATA___V495*/ meltfptr[494] =
(void *) sy_CLASS_SOURCE_PATTERN_TUPLE;
}
@@ -24250,8 +24590,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_CONSTANT_INTEGER =
meltgc_named_symbol ("DISCR_CONSTANT_INTEGER", MELT_GET);
if (sy_DISCR_CONSTANT_INTEGER
- && NULL == /*_.VALDATA___V496*/ meltfptr[495])
- /*_.VALDATA___V496*/ meltfptr[495] = (void *) sy_DISCR_CONSTANT_INTEGER;
+ && NULL == /*_.VALDATA___V497*/ meltfptr[496])
+ /*_.VALDATA___V497*/ meltfptr[496] = (void *) sy_DISCR_CONSTANT_INTEGER;
}
/*^getnamedsymbol */
@@ -24260,8 +24600,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_LIST_TO_MULTIPLE =
meltgc_named_symbol ("LIST_TO_MULTIPLE", MELT_GET);
- if (sy_LIST_TO_MULTIPLE && NULL == /*_.VALDATA___V498*/ meltfptr[497])
- /*_.VALDATA___V498*/ meltfptr[497] = (void *) sy_LIST_TO_MULTIPLE;
+ if (sy_LIST_TO_MULTIPLE && NULL == /*_.VALDATA___V499*/ meltfptr[498])
+ /*_.VALDATA___V499*/ meltfptr[498] = (void *) sy_LIST_TO_MULTIPLE;
}
/*^getnamedsymbol */
@@ -24271,8 +24611,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_UNSAFE_NTH_COMPONENT =
meltgc_named_symbol ("CLASS_NREP_UNSAFE_NTH_COMPONENT", MELT_GET);
if (sy_CLASS_NREP_UNSAFE_NTH_COMPONENT
- && NULL == /*_.VALDATA___V500*/ meltfptr[499])
- /*_.VALDATA___V500*/ meltfptr[499] =
+ && NULL == /*_.VALDATA___V501*/ meltfptr[500])
+ /*_.VALDATA___V501*/ meltfptr[500] =
(void *) sy_CLASS_NREP_UNSAFE_NTH_COMPONENT;
}
@@ -24281,8 +24621,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NTHCOMP */
{
melt_ptr_t sy_NTHCOMP = meltgc_named_symbol ("NTHCOMP", MELT_GET);
- if (sy_NTHCOMP && NULL == /*_.VALDATA___V491*/ meltfptr[490])
- /*_.VALDATA___V491*/ meltfptr[490] = (void *) sy_NTHCOMP;
+ if (sy_NTHCOMP && NULL == /*_.VALDATA___V492*/ meltfptr[491])
+ /*_.VALDATA___V492*/ meltfptr[491] = (void *) sy_NTHCOMP;
}
/*^getnamedsymbol */
@@ -24292,8 +24632,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MAPOBJECT_SORTED_ATTRIBUTE_TUPLE =
meltgc_named_symbol ("MAPOBJECT_SORTED_ATTRIBUTE_TUPLE", MELT_GET);
if (sy_MAPOBJECT_SORTED_ATTRIBUTE_TUPLE
- && NULL == /*_.VALDATA___V510*/ meltfptr[509])
- /*_.VALDATA___V510*/ meltfptr[509] =
+ && NULL == /*_.VALDATA___V511*/ meltfptr[510])
+ /*_.VALDATA___V511*/ meltfptr[510] =
(void *) sy_MAPOBJECT_SORTED_ATTRIBUTE_TUPLE;
}
@@ -24303,8 +24643,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_MAP =
meltgc_named_symbol ("MULTIPLE_MAP", MELT_GET);
- if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V512*/ meltfptr[511])
- /*_.VALDATA___V512*/ meltfptr[511] = (void *) sy_MULTIPLE_MAP;
+ if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V513*/ meltfptr[512])
+ /*_.VALDATA___V513*/ meltfptr[512] = (void *) sy_MULTIPLE_MAP;
}
/*^getnamedsymbol */
@@ -24312,8 +24652,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CLASS_NREP */
{
melt_ptr_t sy_CLASS_NREP = meltgc_named_symbol ("CLASS_NREP", MELT_GET);
- if (sy_CLASS_NREP && NULL == /*_.VALDATA___V514*/ meltfptr[513])
- /*_.VALDATA___V514*/ meltfptr[513] = (void *) sy_CLASS_NREP;
+ if (sy_CLASS_NREP && NULL == /*_.VALDATA___V515*/ meltfptr[514])
+ /*_.VALDATA___V515*/ meltfptr[514] = (void *) sy_CLASS_NREP;
}
/*^getnamedsymbol */
@@ -24321,8 +24661,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:SET_CONTENT */
{
melt_ptr_t sy_SET_CONTENT = meltgc_named_symbol ("SET_CONTENT", MELT_GET);
- if (sy_SET_CONTENT && NULL == /*_.VALDATA___V516*/ meltfptr[515])
- /*_.VALDATA___V516*/ meltfptr[515] = (void *) sy_SET_CONTENT;
+ if (sy_SET_CONTENT && NULL == /*_.VALDATA___V517*/ meltfptr[516])
+ /*_.VALDATA___V517*/ meltfptr[516] = (void *) sy_SET_CONTENT;
}
/*^getnamedsymbol */
@@ -24332,8 +24672,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_MATCHER =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_MATCHER", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_MATCHER
- && NULL == /*_.VALDATA___V524*/ meltfptr[523])
- /*_.VALDATA___V524*/ meltfptr[523] =
+ && NULL == /*_.VALDATA___V525*/ meltfptr[524])
+ /*_.VALDATA___V525*/ meltfptr[524] =
(void *) sy_CLASS_SOURCE_PATTERN_MATCHER;
}
@@ -24343,8 +24683,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ANY_BINDING =
meltgc_named_symbol ("CLASS_ANY_BINDING", MELT_GET);
- if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V526*/ meltfptr[525])
- /*_.VALDATA___V526*/ meltfptr[525] = (void *) sy_CLASS_ANY_BINDING;
+ if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V527*/ meltfptr[526])
+ /*_.VALDATA___V527*/ meltfptr[526] = (void *) sy_CLASS_ANY_BINDING;
}
/*^getnamedsymbol */
@@ -24352,8 +24692,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:FIND_ENV */
{
melt_ptr_t sy_FIND_ENV = meltgc_named_symbol ("FIND_ENV", MELT_GET);
- if (sy_FIND_ENV && NULL == /*_.VALDATA___V528*/ meltfptr[527])
- /*_.VALDATA___V528*/ meltfptr[527] = (void *) sy_FIND_ENV;
+ if (sy_FIND_ENV && NULL == /*_.VALDATA___V529*/ meltfptr[528])
+ /*_.VALDATA___V529*/ meltfptr[528] = (void *) sy_FIND_ENV;
}
/*^getnamedsymbol */
@@ -24361,8 +24701,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:FRESH_ENV */
{
melt_ptr_t sy_FRESH_ENV = meltgc_named_symbol ("FRESH_ENV", MELT_GET);
- if (sy_FRESH_ENV && NULL == /*_.VALDATA___V530*/ meltfptr[529])
- /*_.VALDATA___V530*/ meltfptr[529] = (void *) sy_FRESH_ENV;
+ if (sy_FRESH_ENV && NULL == /*_.VALDATA___V531*/ meltfptr[530])
+ /*_.VALDATA___V531*/ meltfptr[530] = (void *) sy_FRESH_ENV;
}
/*^getnamedsymbol */
@@ -24370,8 +24710,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PUT_ENV */
{
melt_ptr_t sy_PUT_ENV = meltgc_named_symbol ("PUT_ENV", MELT_GET);
- if (sy_PUT_ENV && NULL == /*_.VALDATA___V532*/ meltfptr[531])
- /*_.VALDATA___V532*/ meltfptr[531] = (void *) sy_PUT_ENV;
+ if (sy_PUT_ENV && NULL == /*_.VALDATA___V533*/ meltfptr[532])
+ /*_.VALDATA___V533*/ meltfptr[532] = (void *) sy_PUT_ENV;
}
/*^getnamedsymbol */
@@ -24380,8 +24720,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MULTIPLE_TO_LIST =
meltgc_named_symbol ("MULTIPLE_TO_LIST", MELT_GET);
- if (sy_MULTIPLE_TO_LIST && NULL == /*_.VALDATA___V534*/ meltfptr[533])
- /*_.VALDATA___V534*/ meltfptr[533] = (void *) sy_MULTIPLE_TO_LIST;
+ if (sy_MULTIPLE_TO_LIST && NULL == /*_.VALDATA___V535*/ meltfptr[534])
+ /*_.VALDATA___V535*/ meltfptr[534] = (void *) sy_MULTIPLE_TO_LIST;
}
/*^getnamedsymbol */
@@ -24391,8 +24731,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MATCH_GRAPHIC_DOT_PREFIX =
meltgc_named_symbol ("MATCH_GRAPHIC_DOT_PREFIX", MELT_GET);
if (sy_MATCH_GRAPHIC_DOT_PREFIX
- && NULL == /*_.VALDATA___V539*/ meltfptr[538])
- /*_.VALDATA___V539*/ meltfptr[538] =
+ && NULL == /*_.VALDATA___V540*/ meltfptr[539])
+ /*_.VALDATA___V540*/ meltfptr[539] =
(void *) sy_MATCH_GRAPHIC_DOT_PREFIX;
}
@@ -24402,8 +24742,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_STRING =
meltgc_named_symbol ("DISCR_STRING", MELT_GET);
- if (sy_DISCR_STRING && NULL == /*_.VALDATA___V544*/ meltfptr[543])
- /*_.VALDATA___V544*/ meltfptr[543] = (void *) sy_DISCR_STRING;
+ if (sy_DISCR_STRING && NULL == /*_.VALDATA___V545*/ meltfptr[544])
+ /*_.VALDATA___V545*/ meltfptr[544] = (void *) sy_DISCR_STRING;
}
/*^getnamedsymbol */
@@ -24412,8 +24752,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_REGISTER_OPTION =
meltgc_named_symbol ("REGISTER_OPTION", MELT_GET);
- if (sy_REGISTER_OPTION && NULL == /*_.VALDATA___V546*/ meltfptr[545])
- /*_.VALDATA___V546*/ meltfptr[545] = (void *) sy_REGISTER_OPTION;
+ if (sy_REGISTER_OPTION && NULL == /*_.VALDATA___V547*/ meltfptr[546])
+ /*_.VALDATA___V547*/ meltfptr[546] = (void *) sy_REGISTER_OPTION;
}
/*^getnamedsymbol */
@@ -24422,8 +24762,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATCH_GRAPHIC =
meltgc_named_symbol ("MATCH_GRAPHIC", MELT_GET);
- if (sy_MATCH_GRAPHIC && NULL == /*_.VALDATA___V548*/ meltfptr[547])
- /*_.VALDATA___V548*/ meltfptr[547] = (void *) sy_MATCH_GRAPHIC;
+ if (sy_MATCH_GRAPHIC && NULL == /*_.VALDATA___V549*/ meltfptr[548])
+ /*_.VALDATA___V549*/ meltfptr[548] = (void *) sy_MATCH_GRAPHIC;
}
/*^getnamedsymbol */
@@ -24432,8 +24772,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_MATCH_GRAPHIC =
meltgc_named_symbol ("CLASS_MATCH_GRAPHIC", MELT_GET);
- if (sy_CLASS_MATCH_GRAPHIC && NULL == /*_.VALDATA___V551*/ meltfptr[550])
- /*_.VALDATA___V551*/ meltfptr[550] = (void *) sy_CLASS_MATCH_GRAPHIC;
+ if (sy_CLASS_MATCH_GRAPHIC && NULL == /*_.VALDATA___V552*/ meltfptr[551])
+ /*_.VALDATA___V552*/ meltfptr[551] = (void *) sy_CLASS_MATCH_GRAPHIC;
}
/*^getnamedsymbol */
@@ -24442,8 +24782,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_PROPED =
meltgc_named_symbol ("CLASS_PROPED", MELT_GET);
- if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V553*/ meltfptr[552])
- /*_.VALDATA___V553*/ meltfptr[552] = (void *) sy_CLASS_PROPED;
+ if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V554*/ meltfptr[553])
+ /*_.VALDATA___V554*/ meltfptr[553] = (void *) sy_CLASS_PROPED;
}
/*^getnamedsymbol */
@@ -24452,8 +24792,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCHGX_FILENAME =
meltgc_named_symbol ("MCHGX_FILENAME", MELT_GET);
- if (sy_MCHGX_FILENAME && NULL == /*_.VALDATA___V569*/ meltfptr[568])
- /*_.VALDATA___V569*/ meltfptr[568] = (void *) sy_MCHGX_FILENAME;
+ if (sy_MCHGX_FILENAME && NULL == /*_.VALDATA___V570*/ meltfptr[569])
+ /*_.VALDATA___V570*/ meltfptr[569] = (void *) sy_MCHGX_FILENAME;
}
/*^getnamedsymbol */
@@ -24462,8 +24802,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCHGX_NODOUT =
meltgc_named_symbol ("MCHGX_NODOUT", MELT_GET);
- if (sy_MCHGX_NODOUT && NULL == /*_.VALDATA___V571*/ meltfptr[570])
- /*_.VALDATA___V571*/ meltfptr[570] = (void *) sy_MCHGX_NODOUT;
+ if (sy_MCHGX_NODOUT && NULL == /*_.VALDATA___V572*/ meltfptr[571])
+ /*_.VALDATA___V572*/ meltfptr[571] = (void *) sy_MCHGX_NODOUT;
}
/*^getnamedsymbol */
@@ -24472,8 +24812,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCHGX_EDGOUT =
meltgc_named_symbol ("MCHGX_EDGOUT", MELT_GET);
- if (sy_MCHGX_EDGOUT && NULL == /*_.VALDATA___V573*/ meltfptr[572])
- /*_.VALDATA___V573*/ meltfptr[572] = (void *) sy_MCHGX_EDGOUT;
+ if (sy_MCHGX_EDGOUT && NULL == /*_.VALDATA___V574*/ meltfptr[573])
+ /*_.VALDATA___V574*/ meltfptr[573] = (void *) sy_MCHGX_EDGOUT;
}
/*^getnamedsymbol */
@@ -24482,8 +24822,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCHGX_DATANAMEMAP =
meltgc_named_symbol ("MCHGX_DATANAMEMAP", MELT_GET);
- if (sy_MCHGX_DATANAMEMAP && NULL == /*_.VALDATA___V575*/ meltfptr[574])
- /*_.VALDATA___V575*/ meltfptr[574] = (void *) sy_MCHGX_DATANAMEMAP;
+ if (sy_MCHGX_DATANAMEMAP && NULL == /*_.VALDATA___V576*/ meltfptr[575])
+ /*_.VALDATA___V576*/ meltfptr[575] = (void *) sy_MCHGX_DATANAMEMAP;
}
/*^getnamedsymbol */
@@ -24492,8 +24832,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCHGX_STEPNAMEMAP =
meltgc_named_symbol ("MCHGX_STEPNAMEMAP", MELT_GET);
- if (sy_MCHGX_STEPNAMEMAP && NULL == /*_.VALDATA___V577*/ meltfptr[576])
- /*_.VALDATA___V577*/ meltfptr[576] = (void *) sy_MCHGX_STEPNAMEMAP;
+ if (sy_MCHGX_STEPNAMEMAP && NULL == /*_.VALDATA___V578*/ meltfptr[577])
+ /*_.VALDATA___V578*/ meltfptr[577] = (void *) sy_MCHGX_STEPNAMEMAP;
}
/*^getnamedsymbol */
@@ -24502,8 +24842,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATCHGRAPHIC_LABEL =
meltgc_named_symbol ("MATCHGRAPHIC_LABEL", MELT_GET);
- if (sy_MATCHGRAPHIC_LABEL && NULL == /*_.VALDATA___V581*/ meltfptr[580])
- /*_.VALDATA___V581*/ meltfptr[580] = (void *) sy_MATCHGRAPHIC_LABEL;
+ if (sy_MATCHGRAPHIC_LABEL && NULL == /*_.VALDATA___V582*/ meltfptr[581])
+ /*_.VALDATA___V582*/ meltfptr[581] = (void *) sy_MATCHGRAPHIC_LABEL;
}
/*^getnamedsymbol */
@@ -24512,8 +24852,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CLONED_SYMBOL =
meltgc_named_symbol ("CLASS_CLONED_SYMBOL", MELT_GET);
- if (sy_CLASS_CLONED_SYMBOL && NULL == /*_.VALDATA___V587*/ meltfptr[586])
- /*_.VALDATA___V587*/ meltfptr[586] = (void *) sy_CLASS_CLONED_SYMBOL;
+ if (sy_CLASS_CLONED_SYMBOL && NULL == /*_.VALDATA___V590*/ meltfptr[589])
+ /*_.VALDATA___V590*/ meltfptr[589] = (void *) sy_CLASS_CLONED_SYMBOL;
}
/*^getnamedsymbol */
@@ -24522,8 +24862,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_STRBUF =
meltgc_named_symbol ("DISCR_STRBUF", MELT_GET);
- if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V597*/ meltfptr[596])
- /*_.VALDATA___V597*/ meltfptr[596] = (void *) sy_DISCR_STRBUF;
+ if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V600*/ meltfptr[599])
+ /*_.VALDATA___V600*/ meltfptr[599] = (void *) sy_DISCR_STRBUF;
}
/*^getnamedsymbol */
@@ -24532,8 +24872,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_SOURCE_MATCH =
meltgc_named_symbol ("CLASS_SOURCE_MATCH", MELT_GET);
- if (sy_CLASS_SOURCE_MATCH && NULL == /*_.VALDATA___V606*/ meltfptr[605])
- /*_.VALDATA___V606*/ meltfptr[605] = (void *) sy_CLASS_SOURCE_MATCH;
+ if (sy_CLASS_SOURCE_MATCH && NULL == /*_.VALDATA___V609*/ meltfptr[608])
+ /*_.VALDATA___V609*/ meltfptr[608] = (void *) sy_CLASS_SOURCE_MATCH;
}
/*^getnamedsymbol */
@@ -24542,8 +24882,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_ENVIRONMENT =
meltgc_named_symbol ("CLASS_ENVIRONMENT", MELT_GET);
- if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V608*/ meltfptr[607])
- /*_.VALDATA___V608*/ meltfptr[607] = (void *) sy_CLASS_ENVIRONMENT;
+ if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V611*/ meltfptr[610])
+ /*_.VALDATA___V611*/ meltfptr[610] = (void *) sy_CLASS_ENVIRONMENT;
}
/*^getnamedsymbol */
@@ -24551,8 +24891,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_MATCHED_ */
{
melt_ptr_t sy_MATCHED_ = meltgc_named_symbol ("_MATCHED_", MELT_GET);
- if (sy_MATCHED_ && NULL == /*_.VALDATA___V600*/ meltfptr[599])
- /*_.VALDATA___V600*/ meltfptr[599] = (void *) sy_MATCHED_;
+ if (sy_MATCHED_ && NULL == /*_.VALDATA___V603*/ meltfptr[602])
+ /*_.VALDATA___V603*/ meltfptr[602] = (void *) sy_MATCHED_;
}
/*^getnamedsymbol */
@@ -24562,8 +24902,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_MATCH_CASE =
meltgc_named_symbol ("CLASS_SOURCE_MATCH_CASE", MELT_GET);
if (sy_CLASS_SOURCE_MATCH_CASE
- && NULL == /*_.VALDATA___V610*/ meltfptr[609])
- /*_.VALDATA___V610*/ meltfptr[609] =
+ && NULL == /*_.VALDATA___V613*/ meltfptr[612])
+ /*_.VALDATA___V613*/ meltfptr[612] =
(void *) sy_CLASS_SOURCE_MATCH_CASE;
}
@@ -24573,8 +24913,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_WRAP_NORMAL_LETSEQ =
meltgc_named_symbol ("WRAP_NORMAL_LETSEQ", MELT_GET);
- if (sy_WRAP_NORMAL_LETSEQ && NULL == /*_.VALDATA___V612*/ meltfptr[611])
- /*_.VALDATA___V612*/ meltfptr[611] = (void *) sy_WRAP_NORMAL_LETSEQ;
+ if (sy_WRAP_NORMAL_LETSEQ && NULL == /*_.VALDATA___V615*/ meltfptr[614])
+ /*_.VALDATA___V615*/ meltfptr[614] = (void *) sy_WRAP_NORMAL_LETSEQ;
}
/*^getnamedsymbol */
@@ -24582,8 +24922,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_VOID */
{
melt_ptr_t sy_CTYPE_VOID = meltgc_named_symbol ("CTYPE_VOID", MELT_GET);
- if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V614*/ meltfptr[613])
- /*_.VALDATA___V614*/ meltfptr[613] = (void *) sy_CTYPE_VOID;
+ if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V617*/ meltfptr[616])
+ /*_.VALDATA___V617*/ meltfptr[616] = (void *) sy_CTYPE_VOID;
}
/*^getnamedsymbol */
@@ -24591,8 +24931,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MATCHRES_ */
{
melt_ptr_t sy_MATCHRES_ = meltgc_named_symbol ("MATCHRES_", MELT_GET);
- if (sy_MATCHRES_ && NULL == /*_.VALDATA___V603*/ meltfptr[602])
- /*_.VALDATA___V603*/ meltfptr[602] = (void *) sy_MATCHRES_;
+ if (sy_MATCHRES_ && NULL == /*_.VALDATA___V606*/ meltfptr[605])
+ /*_.VALDATA___V606*/ meltfptr[605] = (void *) sy_MATCHRES_;
}
/*^getnamedsymbol */
@@ -24602,8 +24942,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCHING_CONTEXT =
meltgc_named_symbol ("CLASS_MATCHING_CONTEXT", MELT_GET);
if (sy_CLASS_MATCHING_CONTEXT
- && NULL == /*_.VALDATA___V616*/ meltfptr[615])
- /*_.VALDATA___V616*/ meltfptr[615] = (void *) sy_CLASS_MATCHING_CONTEXT;
+ && NULL == /*_.VALDATA___V619*/ meltfptr[618])
+ /*_.VALDATA___V619*/ meltfptr[618] = (void *) sy_CLASS_MATCHING_CONTEXT;
}
/*^getnamedsymbol */
@@ -24612,8 +24952,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCTX_NORMCTXT =
meltgc_named_symbol ("MCTX_NORMCTXT", MELT_GET);
- if (sy_MCTX_NORMCTXT && NULL == /*_.VALDATA___V642*/ meltfptr[641])
- /*_.VALDATA___V642*/ meltfptr[641] = (void *) sy_MCTX_NORMCTXT;
+ if (sy_MCTX_NORMCTXT && NULL == /*_.VALDATA___V645*/ meltfptr[644])
+ /*_.VALDATA___V645*/ meltfptr[644] = (void *) sy_MCTX_NORMCTXT;
}
/*^getnamedsymbol */
@@ -24621,8 +24961,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCTX_SOURCE */
{
melt_ptr_t sy_MCTX_SOURCE = meltgc_named_symbol ("MCTX_SOURCE", MELT_GET);
- if (sy_MCTX_SOURCE && NULL == /*_.VALDATA___V644*/ meltfptr[643])
- /*_.VALDATA___V644*/ meltfptr[643] = (void *) sy_MCTX_SOURCE;
+ if (sy_MCTX_SOURCE && NULL == /*_.VALDATA___V647*/ meltfptr[646])
+ /*_.VALDATA___V647*/ meltfptr[646] = (void *) sy_MCTX_SOURCE;
}
/*^getnamedsymbol */
@@ -24631,8 +24971,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCTX_NMATCHED =
meltgc_named_symbol ("MCTX_NMATCHED", MELT_GET);
- if (sy_MCTX_NMATCHED && NULL == /*_.VALDATA___V646*/ meltfptr[645])
- /*_.VALDATA___V646*/ meltfptr[645] = (void *) sy_MCTX_NMATCHED;
+ if (sy_MCTX_NMATCHED && NULL == /*_.VALDATA___V649*/ meltfptr[648])
+ /*_.VALDATA___V649*/ meltfptr[648] = (void *) sy_MCTX_NMATCHED;
}
/*^getnamedsymbol */
@@ -24641,8 +24981,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCTX_NMATBIND =
meltgc_named_symbol ("MCTX_NMATBIND", MELT_GET);
- if (sy_MCTX_NMATBIND && NULL == /*_.VALDATA___V648*/ meltfptr[647])
- /*_.VALDATA___V648*/ meltfptr[647] = (void *) sy_MCTX_NMATBIND;
+ if (sy_MCTX_NMATBIND && NULL == /*_.VALDATA___V651*/ meltfptr[650])
+ /*_.VALDATA___V651*/ meltfptr[650] = (void *) sy_MCTX_NMATBIND;
}
/*^getnamedsymbol */
@@ -24650,8 +24990,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCTX_CASES */
{
melt_ptr_t sy_MCTX_CASES = meltgc_named_symbol ("MCTX_CASES", MELT_GET);
- if (sy_MCTX_CASES && NULL == /*_.VALDATA___V650*/ meltfptr[649])
- /*_.VALDATA___V650*/ meltfptr[649] = (void *) sy_MCTX_CASES;
+ if (sy_MCTX_CASES && NULL == /*_.VALDATA___V653*/ meltfptr[652])
+ /*_.VALDATA___V653*/ meltfptr[652] = (void *) sy_MCTX_CASES;
}
/*^getnamedsymbol */
@@ -24659,8 +24999,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCTX_ENV */
{
melt_ptr_t sy_MCTX_ENV = meltgc_named_symbol ("MCTX_ENV", MELT_GET);
- if (sy_MCTX_ENV && NULL == /*_.VALDATA___V652*/ meltfptr[651])
- /*_.VALDATA___V652*/ meltfptr[651] = (void *) sy_MCTX_ENV;
+ if (sy_MCTX_ENV && NULL == /*_.VALDATA___V655*/ meltfptr[654])
+ /*_.VALDATA___V655*/ meltfptr[654] = (void *) sy_MCTX_ENV;
}
/*^getnamedsymbol */
@@ -24668,8 +25008,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCTX_MDATA */
{
melt_ptr_t sy_MCTX_MDATA = meltgc_named_symbol ("MCTX_MDATA", MELT_GET);
- if (sy_MCTX_MDATA && NULL == /*_.VALDATA___V654*/ meltfptr[653])
- /*_.VALDATA___V654*/ meltfptr[653] = (void *) sy_MCTX_MDATA;
+ if (sy_MCTX_MDATA && NULL == /*_.VALDATA___V657*/ meltfptr[656])
+ /*_.VALDATA___V657*/ meltfptr[656] = (void *) sy_MCTX_MDATA;
}
/*^getnamedsymbol */
@@ -24678,8 +25018,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCTX_VARHANDLERS =
meltgc_named_symbol ("MCTX_VARHANDLERS", MELT_GET);
- if (sy_MCTX_VARHANDLERS && NULL == /*_.VALDATA___V656*/ meltfptr[655])
- /*_.VALDATA___V656*/ meltfptr[655] = (void *) sy_MCTX_VARHANDLERS;
+ if (sy_MCTX_VARHANDLERS && NULL == /*_.VALDATA___V659*/ meltfptr[658])
+ /*_.VALDATA___V659*/ meltfptr[658] = (void *) sy_MCTX_VARHANDLERS;
}
/*^getnamedsymbol */
@@ -24687,8 +25027,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCTX_FLAGS */
{
melt_ptr_t sy_MCTX_FLAGS = meltgc_named_symbol ("MCTX_FLAGS", MELT_GET);
- if (sy_MCTX_FLAGS && NULL == /*_.VALDATA___V658*/ meltfptr[657])
- /*_.VALDATA___V658*/ meltfptr[657] = (void *) sy_MCTX_FLAGS;
+ if (sy_MCTX_FLAGS && NULL == /*_.VALDATA___V661*/ meltfptr[660])
+ /*_.VALDATA___V661*/ meltfptr[660] = (void *) sy_MCTX_FLAGS;
}
/*^getnamedsymbol */
@@ -24697,8 +25037,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCTX_ENDLABEL =
meltgc_named_symbol ("MCTX_ENDLABEL", MELT_GET);
- if (sy_MCTX_ENDLABEL && NULL == /*_.VALDATA___V660*/ meltfptr[659])
- /*_.VALDATA___V660*/ meltfptr[659] = (void *) sy_MCTX_ENDLABEL;
+ if (sy_MCTX_ENDLABEL && NULL == /*_.VALDATA___V663*/ meltfptr[662])
+ /*_.VALDATA___V663*/ meltfptr[662] = (void *) sy_MCTX_ENDLABEL;
}
/*^getnamedsymbol */
@@ -24707,8 +25047,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_MATCH_CASE =
meltgc_named_symbol ("CLASS_MATCH_CASE", MELT_GET);
- if (sy_CLASS_MATCH_CASE && NULL == /*_.VALDATA___V662*/ meltfptr[661])
- /*_.VALDATA___V662*/ meltfptr[661] = (void *) sy_CLASS_MATCH_CASE;
+ if (sy_CLASS_MATCH_CASE && NULL == /*_.VALDATA___V665*/ meltfptr[664])
+ /*_.VALDATA___V665*/ meltfptr[664] = (void *) sy_CLASS_MATCH_CASE;
}
/*^getnamedsymbol */
@@ -24716,8 +25056,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCASE_MCTXT */
{
melt_ptr_t sy_MCASE_MCTXT = meltgc_named_symbol ("MCASE_MCTXT", MELT_GET);
- if (sy_MCASE_MCTXT && NULL == /*_.VALDATA___V676*/ meltfptr[675])
- /*_.VALDATA___V676*/ meltfptr[675] = (void *) sy_MCASE_MCTXT;
+ if (sy_MCASE_MCTXT && NULL == /*_.VALDATA___V679*/ meltfptr[678])
+ /*_.VALDATA___V679*/ meltfptr[678] = (void *) sy_MCASE_MCTXT;
}
/*^getnamedsymbol */
@@ -24726,8 +25066,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCASE_SOURCE =
meltgc_named_symbol ("MCASE_SOURCE", MELT_GET);
- if (sy_MCASE_SOURCE && NULL == /*_.VALDATA___V678*/ meltfptr[677])
- /*_.VALDATA___V678*/ meltfptr[677] = (void *) sy_MCASE_SOURCE;
+ if (sy_MCASE_SOURCE && NULL == /*_.VALDATA___V681*/ meltfptr[680])
+ /*_.VALDATA___V681*/ meltfptr[680] = (void *) sy_MCASE_SOURCE;
}
/*^getnamedsymbol */
@@ -24735,8 +25075,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCASE_INDEX */
{
melt_ptr_t sy_MCASE_INDEX = meltgc_named_symbol ("MCASE_INDEX", MELT_GET);
- if (sy_MCASE_INDEX && NULL == /*_.VALDATA___V680*/ meltfptr[679])
- /*_.VALDATA___V680*/ meltfptr[679] = (void *) sy_MCASE_INDEX;
+ if (sy_MCASE_INDEX && NULL == /*_.VALDATA___V683*/ meltfptr[682])
+ /*_.VALDATA___V683*/ meltfptr[682] = (void *) sy_MCASE_INDEX;
}
/*^getnamedsymbol */
@@ -24745,8 +25085,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MCASE_VARMAP =
meltgc_named_symbol ("MCASE_VARMAP", MELT_GET);
- if (sy_MCASE_VARMAP && NULL == /*_.VALDATA___V682*/ meltfptr[681])
- /*_.VALDATA___V682*/ meltfptr[681] = (void *) sy_MCASE_VARMAP;
+ if (sy_MCASE_VARMAP && NULL == /*_.VALDATA___V685*/ meltfptr[684])
+ /*_.VALDATA___V685*/ meltfptr[684] = (void *) sy_MCASE_VARMAP;
}
/*^getnamedsymbol */
@@ -24755,8 +25095,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_MATCHED_DATA =
meltgc_named_symbol ("CLASS_MATCHED_DATA", MELT_GET);
- if (sy_CLASS_MATCHED_DATA && NULL == /*_.VALDATA___V684*/ meltfptr[683])
- /*_.VALDATA___V684*/ meltfptr[683] = (void *) sy_CLASS_MATCHED_DATA;
+ if (sy_CLASS_MATCHED_DATA && NULL == /*_.VALDATA___V687*/ meltfptr[686])
+ /*_.VALDATA___V687*/ meltfptr[686] = (void *) sy_CLASS_MATCHED_DATA;
}
/*^getnamedsymbol */
@@ -24764,8 +25104,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MDATA_SYMB */
{
melt_ptr_t sy_MDATA_SYMB = meltgc_named_symbol ("MDATA_SYMB", MELT_GET);
- if (sy_MDATA_SYMB && NULL == /*_.VALDATA___V698*/ meltfptr[697])
- /*_.VALDATA___V698*/ meltfptr[697] = (void *) sy_MDATA_SYMB;
+ if (sy_MDATA_SYMB && NULL == /*_.VALDATA___V701*/ meltfptr[700])
+ /*_.VALDATA___V701*/ meltfptr[700] = (void *) sy_MDATA_SYMB;
}
/*^getnamedsymbol */
@@ -24773,8 +25113,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MDATA_CTYPE */
{
melt_ptr_t sy_MDATA_CTYPE = meltgc_named_symbol ("MDATA_CTYPE", MELT_GET);
- if (sy_MDATA_CTYPE && NULL == /*_.VALDATA___V700*/ meltfptr[699])
- /*_.VALDATA___V700*/ meltfptr[699] = (void *) sy_MDATA_CTYPE;
+ if (sy_MDATA_CTYPE && NULL == /*_.VALDATA___V703*/ meltfptr[702])
+ /*_.VALDATA___V703*/ meltfptr[702] = (void *) sy_MDATA_CTYPE;
}
/*^getnamedsymbol */
@@ -24782,8 +25122,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MDATA_ORIG */
{
melt_ptr_t sy_MDATA_ORIG = meltgc_named_symbol ("MDATA_ORIG", MELT_GET);
- if (sy_MDATA_ORIG && NULL == /*_.VALDATA___V702*/ meltfptr[701])
- /*_.VALDATA___V702*/ meltfptr[701] = (void *) sy_MDATA_ORIG;
+ if (sy_MDATA_ORIG && NULL == /*_.VALDATA___V705*/ meltfptr[704])
+ /*_.VALDATA___V705*/ meltfptr[704] = (void *) sy_MDATA_ORIG;
}
/*^getnamedsymbol */
@@ -24791,8 +25131,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MDATA_STEPS */
{
melt_ptr_t sy_MDATA_STEPS = meltgc_named_symbol ("MDATA_STEPS", MELT_GET);
- if (sy_MDATA_STEPS && NULL == /*_.VALDATA___V704*/ meltfptr[703])
- /*_.VALDATA___V704*/ meltfptr[703] = (void *) sy_MDATA_STEPS;
+ if (sy_MDATA_STEPS && NULL == /*_.VALDATA___V707*/ meltfptr[706])
+ /*_.VALDATA___V707*/ meltfptr[706] = (void *) sy_MDATA_STEPS;
}
/*^getnamedsymbol */
@@ -24802,8 +25142,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCHED_NORMAL_DATA =
meltgc_named_symbol ("CLASS_MATCHED_NORMAL_DATA", MELT_GET);
if (sy_CLASS_MATCHED_NORMAL_DATA
- && NULL == /*_.VALDATA___V706*/ meltfptr[705])
- /*_.VALDATA___V706*/ meltfptr[705] =
+ && NULL == /*_.VALDATA___V709*/ meltfptr[708])
+ /*_.VALDATA___V709*/ meltfptr[708] =
(void *) sy_CLASS_MATCHED_NORMAL_DATA;
}
@@ -24814,8 +25154,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCHED_BINDING =
meltgc_named_symbol ("CLASS_MATCHED_BINDING", MELT_GET);
if (sy_CLASS_MATCHED_BINDING
- && NULL == /*_.VALDATA___V712*/ meltfptr[711])
- /*_.VALDATA___V712*/ meltfptr[711] = (void *) sy_CLASS_MATCHED_BINDING;
+ && NULL == /*_.VALDATA___V715*/ meltfptr[714])
+ /*_.VALDATA___V715*/ meltfptr[714] = (void *) sy_CLASS_MATCHED_BINDING;
}
/*^getnamedsymbol */
@@ -24824,8 +25164,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATCHBIND_DATA =
meltgc_named_symbol ("MATCHBIND_DATA", MELT_GET);
- if (sy_MATCHBIND_DATA && NULL == /*_.VALDATA___V722*/ meltfptr[721])
- /*_.VALDATA___V722*/ meltfptr[721] = (void *) sy_MATCHBIND_DATA;
+ if (sy_MATCHBIND_DATA && NULL == /*_.VALDATA___V725*/ meltfptr[724])
+ /*_.VALDATA___V725*/ meltfptr[724] = (void *) sy_MATCHBIND_DATA;
}
/*^getnamedsymbol */
@@ -24834,8 +25174,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATCHBIND_NBOCC =
meltgc_named_symbol ("MATCHBIND_NBOCC", MELT_GET);
- if (sy_MATCHBIND_NBOCC && NULL == /*_.VALDATA___V724*/ meltfptr[723])
- /*_.VALDATA___V724*/ meltfptr[723] = (void *) sy_MATCHBIND_NBOCC;
+ if (sy_MATCHBIND_NBOCC && NULL == /*_.VALDATA___V727*/ meltfptr[726])
+ /*_.VALDATA___V727*/ meltfptr[726] = (void *) sy_MATCHBIND_NBOCC;
}
/*^getnamedsymbol */
@@ -24844,8 +25184,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORMALIZE_BINDING =
meltgc_named_symbol ("NORMALIZE_BINDING", MELT_GET);
- if (sy_NORMALIZE_BINDING && NULL == /*_.VALDATA___V728*/ meltfptr[727])
- /*_.VALDATA___V728*/ meltfptr[727] = (void *) sy_NORMALIZE_BINDING;
+ if (sy_NORMALIZE_BINDING && NULL == /*_.VALDATA___V731*/ meltfptr[730])
+ /*_.VALDATA___V731*/ meltfptr[730] = (void *) sy_NORMALIZE_BINDING;
}
/*^getnamedsymbol */
@@ -24854,8 +25194,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_MATCH_FLAG =
meltgc_named_symbol ("CLASS_MATCH_FLAG", MELT_GET);
- if (sy_CLASS_MATCH_FLAG && NULL == /*_.VALDATA___V730*/ meltfptr[729])
- /*_.VALDATA___V730*/ meltfptr[729] = (void *) sy_CLASS_MATCH_FLAG;
+ if (sy_CLASS_MATCH_FLAG && NULL == /*_.VALDATA___V733*/ meltfptr[732])
+ /*_.VALDATA___V733*/ meltfptr[732] = (void *) sy_CLASS_MATCH_FLAG;
}
/*^getnamedsymbol */
@@ -24863,8 +25203,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MFLAG_SPAT */
{
melt_ptr_t sy_MFLAG_SPAT = meltgc_named_symbol ("MFLAG_SPAT", MELT_GET);
- if (sy_MFLAG_SPAT && NULL == /*_.VALDATA___V744*/ meltfptr[743])
- /*_.VALDATA___V744*/ meltfptr[743] = (void *) sy_MFLAG_SPAT;
+ if (sy_MFLAG_SPAT && NULL == /*_.VALDATA___V747*/ meltfptr[746])
+ /*_.VALDATA___V747*/ meltfptr[746] = (void *) sy_MFLAG_SPAT;
}
/*^getnamedsymbol */
@@ -24872,8 +25212,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MFLAG_RANK */
{
melt_ptr_t sy_MFLAG_RANK = meltgc_named_symbol ("MFLAG_RANK", MELT_GET);
- if (sy_MFLAG_RANK && NULL == /*_.VALDATA___V746*/ meltfptr[745])
- /*_.VALDATA___V746*/ meltfptr[745] = (void *) sy_MFLAG_RANK;
+ if (sy_MFLAG_RANK && NULL == /*_.VALDATA___V749*/ meltfptr[748])
+ /*_.VALDATA___V749*/ meltfptr[748] = (void *) sy_MFLAG_RANK;
}
/*^getnamedsymbol */
@@ -24882,8 +25222,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MFLAG_STRING =
meltgc_named_symbol ("MFLAG_STRING", MELT_GET);
- if (sy_MFLAG_STRING && NULL == /*_.VALDATA___V748*/ meltfptr[747])
- /*_.VALDATA___V748*/ meltfptr[747] = (void *) sy_MFLAG_STRING;
+ if (sy_MFLAG_STRING && NULL == /*_.VALDATA___V751*/ meltfptr[750])
+ /*_.VALDATA___V751*/ meltfptr[750] = (void *) sy_MFLAG_STRING;
}
/*^getnamedsymbol */
@@ -24892,8 +25232,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MFLAG_SETSTEP =
meltgc_named_symbol ("MFLAG_SETSTEP", MELT_GET);
- if (sy_MFLAG_SETSTEP && NULL == /*_.VALDATA___V750*/ meltfptr[749])
- /*_.VALDATA___V750*/ meltfptr[749] = (void *) sy_MFLAG_SETSTEP;
+ if (sy_MFLAG_SETSTEP && NULL == /*_.VALDATA___V753*/ meltfptr[752])
+ /*_.VALDATA___V753*/ meltfptr[752] = (void *) sy_MFLAG_SETSTEP;
}
/*^getnamedsymbol */
@@ -24902,8 +25242,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_MATCH_STEP =
meltgc_named_symbol ("CLASS_MATCH_STEP", MELT_GET);
- if (sy_CLASS_MATCH_STEP && NULL == /*_.VALDATA___V752*/ meltfptr[751])
- /*_.VALDATA___V752*/ meltfptr[751] = (void *) sy_CLASS_MATCH_STEP;
+ if (sy_CLASS_MATCH_STEP && NULL == /*_.VALDATA___V755*/ meltfptr[754])
+ /*_.VALDATA___V755*/ meltfptr[754] = (void *) sy_CLASS_MATCH_STEP;
}
/*^getnamedsymbol */
@@ -24913,8 +25253,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_THEN =
meltgc_named_symbol ("CLASS_MATCH_STEP_THEN", MELT_GET);
if (sy_CLASS_MATCH_STEP_THEN
- && NULL == /*_.VALDATA___V758*/ meltfptr[757])
- /*_.VALDATA___V758*/ meltfptr[757] = (void *) sy_CLASS_MATCH_STEP_THEN;
+ && NULL == /*_.VALDATA___V761*/ meltfptr[760])
+ /*_.VALDATA___V761*/ meltfptr[760] = (void *) sy_CLASS_MATCH_STEP_THEN;
}
/*^getnamedsymbol */
@@ -24922,8 +25262,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTEP_THEN */
{
melt_ptr_t sy_MSTEP_THEN = meltgc_named_symbol ("MSTEP_THEN", MELT_GET);
- if (sy_MSTEP_THEN && NULL == /*_.VALDATA___V766*/ meltfptr[765])
- /*_.VALDATA___V766*/ meltfptr[765] = (void *) sy_MSTEP_THEN;
+ if (sy_MSTEP_THEN && NULL == /*_.VALDATA___V769*/ meltfptr[768])
+ /*_.VALDATA___V769*/ meltfptr[768] = (void *) sy_MSTEP_THEN;
}
/*^getnamedsymbol */
@@ -24933,8 +25273,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_CLEAR =
meltgc_named_symbol ("CLASS_MATCH_STEP_CLEAR", MELT_GET);
if (sy_CLASS_MATCH_STEP_CLEAR
- && NULL == /*_.VALDATA___V768*/ meltfptr[767])
- /*_.VALDATA___V768*/ meltfptr[767] = (void *) sy_CLASS_MATCH_STEP_CLEAR;
+ && NULL == /*_.VALDATA___V771*/ meltfptr[770])
+ /*_.VALDATA___V771*/ meltfptr[770] = (void *) sy_CLASS_MATCH_STEP_CLEAR;
}
/*^getnamedsymbol */
@@ -24943,8 +25283,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEP_CLEARDATA =
meltgc_named_symbol ("MSTEP_CLEARDATA", MELT_GET);
- if (sy_MSTEP_CLEARDATA && NULL == /*_.VALDATA___V776*/ meltfptr[775])
- /*_.VALDATA___V776*/ meltfptr[775] = (void *) sy_MSTEP_CLEARDATA;
+ if (sy_MSTEP_CLEARDATA && NULL == /*_.VALDATA___V779*/ meltfptr[778])
+ /*_.VALDATA___V779*/ meltfptr[778] = (void *) sy_MSTEP_CLEARDATA;
}
/*^getnamedsymbol */
@@ -24954,8 +25294,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_WITH_FLAG =
meltgc_named_symbol ("CLASS_MATCH_STEP_WITH_FLAG", MELT_GET);
if (sy_CLASS_MATCH_STEP_WITH_FLAG
- && NULL == /*_.VALDATA___V778*/ meltfptr[777])
- /*_.VALDATA___V778*/ meltfptr[777] =
+ && NULL == /*_.VALDATA___V781*/ meltfptr[780])
+ /*_.VALDATA___V781*/ meltfptr[780] =
(void *) sy_CLASS_MATCH_STEP_WITH_FLAG;
}
@@ -24964,8 +25304,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTEP_FLAG */
{
melt_ptr_t sy_MSTEP_FLAG = meltgc_named_symbol ("MSTEP_FLAG", MELT_GET);
- if (sy_MSTEP_FLAG && NULL == /*_.VALDATA___V786*/ meltfptr[785])
- /*_.VALDATA___V786*/ meltfptr[785] = (void *) sy_MSTEP_FLAG;
+ if (sy_MSTEP_FLAG && NULL == /*_.VALDATA___V789*/ meltfptr[788])
+ /*_.VALDATA___V789*/ meltfptr[788] = (void *) sy_MSTEP_FLAG;
}
/*^getnamedsymbol */
@@ -24975,8 +25315,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_WITH_DATA =
meltgc_named_symbol ("CLASS_MATCH_STEP_WITH_DATA", MELT_GET);
if (sy_CLASS_MATCH_STEP_WITH_DATA
- && NULL == /*_.VALDATA___V788*/ meltfptr[787])
- /*_.VALDATA___V788*/ meltfptr[787] =
+ && NULL == /*_.VALDATA___V791*/ meltfptr[790])
+ /*_.VALDATA___V791*/ meltfptr[790] =
(void *) sy_CLASS_MATCH_STEP_WITH_DATA;
}
@@ -24985,8 +25325,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTEP_DATA */
{
melt_ptr_t sy_MSTEP_DATA = meltgc_named_symbol ("MSTEP_DATA", MELT_GET);
- if (sy_MSTEP_DATA && NULL == /*_.VALDATA___V798*/ meltfptr[797])
- /*_.VALDATA___V798*/ meltfptr[797] = (void *) sy_MSTEP_DATA;
+ if (sy_MSTEP_DATA && NULL == /*_.VALDATA___V801*/ meltfptr[800])
+ /*_.VALDATA___V801*/ meltfptr[800] = (void *) sy_MSTEP_DATA;
}
/*^getnamedsymbol */
@@ -24994,8 +25334,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTEP_INDEX */
{
melt_ptr_t sy_MSTEP_INDEX = meltgc_named_symbol ("MSTEP_INDEX", MELT_GET);
- if (sy_MSTEP_INDEX && NULL == /*_.VALDATA___V800*/ meltfptr[799])
- /*_.VALDATA___V800*/ meltfptr[799] = (void *) sy_MSTEP_INDEX;
+ if (sy_MSTEP_INDEX && NULL == /*_.VALDATA___V803*/ meltfptr[802])
+ /*_.VALDATA___V803*/ meltfptr[802] = (void *) sy_MSTEP_INDEX;
}
/*^getnamedsymbol */
@@ -25005,8 +25345,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_FLAG_SET =
meltgc_named_symbol ("CLASS_MATCH_STEP_FLAG_SET", MELT_GET);
if (sy_CLASS_MATCH_STEP_FLAG_SET
- && NULL == /*_.VALDATA___V802*/ meltfptr[801])
- /*_.VALDATA___V802*/ meltfptr[801] =
+ && NULL == /*_.VALDATA___V805*/ meltfptr[804])
+ /*_.VALDATA___V805*/ meltfptr[804] =
(void *) sy_CLASS_MATCH_STEP_FLAG_SET;
}
@@ -25017,8 +25357,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_FLAG_OPERATION =
meltgc_named_symbol ("CLASS_MATCH_STEP_FLAG_OPERATION", MELT_GET);
if (sy_CLASS_MATCH_STEP_FLAG_OPERATION
- && NULL == /*_.VALDATA___V808*/ meltfptr[807])
- /*_.VALDATA___V808*/ meltfptr[807] =
+ && NULL == /*_.VALDATA___V811*/ meltfptr[810])
+ /*_.VALDATA___V811*/ meltfptr[810] =
(void *) sy_CLASS_MATCH_STEP_FLAG_OPERATION;
}
@@ -25028,8 +25368,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEP_FLAGARGS =
meltgc_named_symbol ("MSTEP_FLAGARGS", MELT_GET);
- if (sy_MSTEP_FLAGARGS && NULL == /*_.VALDATA___V816*/ meltfptr[815])
- /*_.VALDATA___V816*/ meltfptr[815] = (void *) sy_MSTEP_FLAGARGS;
+ if (sy_MSTEP_FLAGARGS && NULL == /*_.VALDATA___V819*/ meltfptr[818])
+ /*_.VALDATA___V819*/ meltfptr[818] = (void *) sy_MSTEP_FLAGARGS;
}
/*^getnamedsymbol */
@@ -25039,8 +25379,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_FLAG_CONJUNCTION =
meltgc_named_symbol ("CLASS_MATCH_STEP_FLAG_CONJUNCTION", MELT_GET);
if (sy_CLASS_MATCH_STEP_FLAG_CONJUNCTION
- && NULL == /*_.VALDATA___V818*/ meltfptr[817])
- /*_.VALDATA___V818*/ meltfptr[817] =
+ && NULL == /*_.VALDATA___V821*/ meltfptr[820])
+ /*_.VALDATA___V821*/ meltfptr[820] =
(void *) sy_CLASS_MATCH_STEP_FLAG_CONJUNCTION;
}
@@ -25051,8 +25391,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_FLAG_DISJUNCTION =
meltgc_named_symbol ("CLASS_MATCH_STEP_FLAG_DISJUNCTION", MELT_GET);
if (sy_CLASS_MATCH_STEP_FLAG_DISJUNCTION
- && NULL == /*_.VALDATA___V824*/ meltfptr[823])
- /*_.VALDATA___V824*/ meltfptr[823] =
+ && NULL == /*_.VALDATA___V827*/ meltfptr[826])
+ /*_.VALDATA___V827*/ meltfptr[826] =
(void *) sy_CLASS_MATCH_STEP_FLAG_DISJUNCTION;
}
@@ -25063,8 +25403,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG =
meltgc_named_symbol ("CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", MELT_GET);
if (sy_CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG
- && NULL == /*_.VALDATA___V830*/ meltfptr[829])
- /*_.VALDATA___V830*/ meltfptr[829] =
+ && NULL == /*_.VALDATA___V833*/ meltfptr[832])
+ /*_.VALDATA___V833*/ meltfptr[832] =
(void *) sy_CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG;
}
@@ -25074,8 +25414,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPSUCCESS_VAROCC =
meltgc_named_symbol ("MSTEPSUCCESS_VAROCC", MELT_GET);
- if (sy_MSTEPSUCCESS_VAROCC && NULL == /*_.VALDATA___V842*/ meltfptr[841])
- /*_.VALDATA___V842*/ meltfptr[841] = (void *) sy_MSTEPSUCCESS_VAROCC;
+ if (sy_MSTEPSUCCESS_VAROCC && NULL == /*_.VALDATA___V845*/ meltfptr[844])
+ /*_.VALDATA___V845*/ meltfptr[844] = (void *) sy_MSTEPSUCCESS_VAROCC;
}
/*^getnamedsymbol */
@@ -25084,8 +25424,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPSUCCESS_BINDS =
meltgc_named_symbol ("MSTEPSUCCESS_BINDS", MELT_GET);
- if (sy_MSTEPSUCCESS_BINDS && NULL == /*_.VALDATA___V844*/ meltfptr[843])
- /*_.VALDATA___V844*/ meltfptr[843] = (void *) sy_MSTEPSUCCESS_BINDS;
+ if (sy_MSTEPSUCCESS_BINDS && NULL == /*_.VALDATA___V847*/ meltfptr[846])
+ /*_.VALDATA___V847*/ meltfptr[846] = (void *) sy_MSTEPSUCCESS_BINDS;
}
/*^getnamedsymbol */
@@ -25094,8 +25434,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPSUCCESS_BODY =
meltgc_named_symbol ("MSTEPSUCCESS_BODY", MELT_GET);
- if (sy_MSTEPSUCCESS_BODY && NULL == /*_.VALDATA___V846*/ meltfptr[845])
- /*_.VALDATA___V846*/ meltfptr[845] = (void *) sy_MSTEPSUCCESS_BODY;
+ if (sy_MSTEPSUCCESS_BODY && NULL == /*_.VALDATA___V849*/ meltfptr[848])
+ /*_.VALDATA___V849*/ meltfptr[848] = (void *) sy_MSTEPSUCCESS_BODY;
}
/*^getnamedsymbol */
@@ -25105,8 +25445,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST
- && NULL == /*_.VALDATA___V848*/ meltfptr[847])
- /*_.VALDATA___V848*/ meltfptr[847] = (void *) sy_CLASS_MATCH_STEP_TEST;
+ && NULL == /*_.VALDATA___V851*/ meltfptr[850])
+ /*_.VALDATA___V851*/ meltfptr[850] = (void *) sy_CLASS_MATCH_STEP_TEST;
}
/*^getnamedsymbol */
@@ -25114,8 +25454,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTEP_ELSE */
{
melt_ptr_t sy_MSTEP_ELSE = meltgc_named_symbol ("MSTEP_ELSE", MELT_GET);
- if (sy_MSTEP_ELSE && NULL == /*_.VALDATA___V856*/ meltfptr[855])
- /*_.VALDATA___V856*/ meltfptr[855] = (void *) sy_MSTEP_ELSE;
+ if (sy_MSTEP_ELSE && NULL == /*_.VALDATA___V859*/ meltfptr[858])
+ /*_.VALDATA___V859*/ meltfptr[858] = (void *) sy_MSTEP_ELSE;
}
/*^getnamedsymbol */
@@ -25125,8 +25465,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_VARIABLE =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_VARIABLE", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_VARIABLE
- && NULL == /*_.VALDATA___V858*/ meltfptr[857])
- /*_.VALDATA___V858*/ meltfptr[857] =
+ && NULL == /*_.VALDATA___V861*/ meltfptr[860])
+ /*_.VALDATA___V861*/ meltfptr[860] =
(void *) sy_CLASS_MATCH_STEP_TEST_VARIABLE;
}
@@ -25136,8 +25476,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPTESTVAR_DATA =
meltgc_named_symbol ("MSTEPTESTVAR_DATA", MELT_GET);
- if (sy_MSTEPTESTVAR_DATA && NULL == /*_.VALDATA___V866*/ meltfptr[865])
- /*_.VALDATA___V866*/ meltfptr[865] = (void *) sy_MSTEPTESTVAR_DATA;
+ if (sy_MSTEPTESTVAR_DATA && NULL == /*_.VALDATA___V869*/ meltfptr[868])
+ /*_.VALDATA___V869*/ meltfptr[868] = (void *) sy_MSTEPTESTVAR_DATA;
}
/*^getnamedsymbol */
@@ -25147,8 +25487,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_CONSTANT =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_CONSTANT", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_CONSTANT
- && NULL == /*_.VALDATA___V868*/ meltfptr[867])
- /*_.VALDATA___V868*/ meltfptr[867] =
+ && NULL == /*_.VALDATA___V871*/ meltfptr[870])
+ /*_.VALDATA___V871*/ meltfptr[870] =
(void *) sy_CLASS_MATCH_STEP_TEST_CONSTANT;
}
@@ -25158,8 +25498,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPTESTCONST_DATA =
meltgc_named_symbol ("MSTEPTESTCONST_DATA", MELT_GET);
- if (sy_MSTEPTESTCONST_DATA && NULL == /*_.VALDATA___V878*/ meltfptr[877])
- /*_.VALDATA___V878*/ meltfptr[877] = (void *) sy_MSTEPTESTCONST_DATA;
+ if (sy_MSTEPTESTCONST_DATA && NULL == /*_.VALDATA___V881*/ meltfptr[880])
+ /*_.VALDATA___V881*/ meltfptr[880] = (void *) sy_MSTEPTESTCONST_DATA;
}
/*^getnamedsymbol */
@@ -25168,8 +25508,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTEPTESTCONST_BIND =
meltgc_named_symbol ("MSTEPTESTCONST_BIND", MELT_GET);
- if (sy_MSTEPTESTCONST_BIND && NULL == /*_.VALDATA___V880*/ meltfptr[879])
- /*_.VALDATA___V880*/ meltfptr[879] = (void *) sy_MSTEPTESTCONST_BIND;
+ if (sy_MSTEPTESTCONST_BIND && NULL == /*_.VALDATA___V883*/ meltfptr[882])
+ /*_.VALDATA___V883*/ meltfptr[882] = (void *) sy_MSTEPTESTCONST_BIND;
}
/*^getnamedsymbol */
@@ -25179,8 +25519,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_GROUP =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_GROUP", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_GROUP
- && NULL == /*_.VALDATA___V882*/ meltfptr[881])
- /*_.VALDATA___V882*/ meltfptr[881] =
+ && NULL == /*_.VALDATA___V885*/ meltfptr[884])
+ /*_.VALDATA___V885*/ meltfptr[884] =
(void *) sy_CLASS_MATCH_STEP_TEST_GROUP;
}
@@ -25190,8 +25530,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTGROUP_START =
meltgc_named_symbol ("MSTGROUP_START", MELT_GET);
- if (sy_MSTGROUP_START && NULL == /*_.VALDATA___V894*/ meltfptr[893])
- /*_.VALDATA___V894*/ meltfptr[893] = (void *) sy_MSTGROUP_START;
+ if (sy_MSTGROUP_START && NULL == /*_.VALDATA___V897*/ meltfptr[896])
+ /*_.VALDATA___V897*/ meltfptr[896] = (void *) sy_MSTGROUP_START;
}
/*^getnamedsymbol */
@@ -25200,8 +25540,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTGROUP_THEN =
meltgc_named_symbol ("MSTGROUP_THEN", MELT_GET);
- if (sy_MSTGROUP_THEN && NULL == /*_.VALDATA___V896*/ meltfptr[895])
- /*_.VALDATA___V896*/ meltfptr[895] = (void *) sy_MSTGROUP_THEN;
+ if (sy_MSTGROUP_THEN && NULL == /*_.VALDATA___V899*/ meltfptr[898])
+ /*_.VALDATA___V899*/ meltfptr[898] = (void *) sy_MSTGROUP_THEN;
}
/*^getnamedsymbol */
@@ -25210,8 +25550,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTGROUP_ELSE =
meltgc_named_symbol ("MSTGROUP_ELSE", MELT_GET);
- if (sy_MSTGROUP_ELSE && NULL == /*_.VALDATA___V898*/ meltfptr[897])
- /*_.VALDATA___V898*/ meltfptr[897] = (void *) sy_MSTGROUP_ELSE;
+ if (sy_MSTGROUP_ELSE && NULL == /*_.VALDATA___V901*/ meltfptr[900])
+ /*_.VALDATA___V901*/ meltfptr[900] = (void *) sy_MSTGROUP_ELSE;
}
/*^getnamedsymbol */
@@ -25221,8 +25561,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_INSTANCE =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_INSTANCE", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_INSTANCE
- && NULL == /*_.VALDATA___V900*/ meltfptr[899])
- /*_.VALDATA___V900*/ meltfptr[899] =
+ && NULL == /*_.VALDATA___V903*/ meltfptr[902])
+ /*_.VALDATA___V903*/ meltfptr[902] =
(void *) sy_CLASS_MATCH_STEP_TEST_INSTANCE;
}
@@ -25232,8 +25572,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTINS_CLASS =
meltgc_named_symbol ("MSTINS_CLASS", MELT_GET);
- if (sy_MSTINS_CLASS && NULL == /*_.VALDATA___V910*/ meltfptr[909])
- /*_.VALDATA___V910*/ meltfptr[909] = (void *) sy_MSTINS_CLASS;
+ if (sy_MSTINS_CLASS && NULL == /*_.VALDATA___V913*/ meltfptr[912])
+ /*_.VALDATA___V913*/ meltfptr[912] = (void *) sy_MSTINS_CLASS;
}
/*^getnamedsymbol */
@@ -25242,8 +25582,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTINS_SLOTS =
meltgc_named_symbol ("MSTINS_SLOTS", MELT_GET);
- if (sy_MSTINS_SLOTS && NULL == /*_.VALDATA___V912*/ meltfptr[911])
- /*_.VALDATA___V912*/ meltfptr[911] = (void *) sy_MSTINS_SLOTS;
+ if (sy_MSTINS_SLOTS && NULL == /*_.VALDATA___V915*/ meltfptr[914])
+ /*_.VALDATA___V915*/ meltfptr[914] = (void *) sy_MSTINS_SLOTS;
}
/*^getnamedsymbol */
@@ -25253,8 +25593,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_MULTIPLE =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_MULTIPLE", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_MULTIPLE
- && NULL == /*_.VALDATA___V914*/ meltfptr[913])
- /*_.VALDATA___V914*/ meltfptr[913] =
+ && NULL == /*_.VALDATA___V917*/ meltfptr[916])
+ /*_.VALDATA___V917*/ meltfptr[916] =
(void *) sy_CLASS_MATCH_STEP_TEST_MULTIPLE;
}
@@ -25264,8 +25604,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTTUP_COMPONENTS =
meltgc_named_symbol ("MSTTUP_COMPONENTS", MELT_GET);
- if (sy_MSTTUP_COMPONENTS && NULL == /*_.VALDATA___V922*/ meltfptr[921])
- /*_.VALDATA___V922*/ meltfptr[921] = (void *) sy_MSTTUP_COMPONENTS;
+ if (sy_MSTTUP_COMPONENTS && NULL == /*_.VALDATA___V925*/ meltfptr[924])
+ /*_.VALDATA___V925*/ meltfptr[924] = (void *) sy_MSTTUP_COMPONENTS;
}
/*^getnamedsymbol */
@@ -25275,8 +25615,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_STEP_TEST_MATCHER =
meltgc_named_symbol ("CLASS_MATCH_STEP_TEST_MATCHER", MELT_GET);
if (sy_CLASS_MATCH_STEP_TEST_MATCHER
- && NULL == /*_.VALDATA___V924*/ meltfptr[923])
- /*_.VALDATA___V924*/ meltfptr[923] =
+ && NULL == /*_.VALDATA___V927*/ meltfptr[926])
+ /*_.VALDATA___V927*/ meltfptr[926] =
(void *) sy_CLASS_MATCH_STEP_TEST_MATCHER;
}
@@ -25286,8 +25626,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MSTMA_MATCHER =
meltgc_named_symbol ("MSTMA_MATCHER", MELT_GET);
- if (sy_MSTMA_MATCHER && NULL == /*_.VALDATA___V938*/ meltfptr[937])
- /*_.VALDATA___V938*/ meltfptr[937] = (void *) sy_MSTMA_MATCHER;
+ if (sy_MSTMA_MATCHER && NULL == /*_.VALDATA___V941*/ meltfptr[940])
+ /*_.VALDATA___V941*/ meltfptr[940] = (void *) sy_MSTMA_MATCHER;
}
/*^getnamedsymbol */
@@ -25295,8 +25635,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTMA_BINDS */
{
melt_ptr_t sy_MSTMA_BINDS = meltgc_named_symbol ("MSTMA_BINDS", MELT_GET);
- if (sy_MSTMA_BINDS && NULL == /*_.VALDATA___V940*/ meltfptr[939])
- /*_.VALDATA___V940*/ meltfptr[939] = (void *) sy_MSTMA_BINDS;
+ if (sy_MSTMA_BINDS && NULL == /*_.VALDATA___V943*/ meltfptr[942])
+ /*_.VALDATA___V943*/ meltfptr[942] = (void *) sy_MSTMA_BINDS;
}
/*^getnamedsymbol */
@@ -25304,8 +25644,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTMA_INS */
{
melt_ptr_t sy_MSTMA_INS = meltgc_named_symbol ("MSTMA_INS", MELT_GET);
- if (sy_MSTMA_INS && NULL == /*_.VALDATA___V942*/ meltfptr[941])
- /*_.VALDATA___V942*/ meltfptr[941] = (void *) sy_MSTMA_INS;
+ if (sy_MSTMA_INS && NULL == /*_.VALDATA___V945*/ meltfptr[944])
+ /*_.VALDATA___V945*/ meltfptr[944] = (void *) sy_MSTMA_INS;
}
/*^getnamedsymbol */
@@ -25313,8 +25653,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MSTMA_OUTS */
{
melt_ptr_t sy_MSTMA_OUTS = meltgc_named_symbol ("MSTMA_OUTS", MELT_GET);
- if (sy_MSTMA_OUTS && NULL == /*_.VALDATA___V944*/ meltfptr[943])
- /*_.VALDATA___V944*/ meltfptr[943] = (void *) sy_MSTMA_OUTS;
+ if (sy_MSTMA_OUTS && NULL == /*_.VALDATA___V947*/ meltfptr[946])
+ /*_.VALDATA___V947*/ meltfptr[946] = (void *) sy_MSTMA_OUTS;
}
/*^getnamedsymbol */
@@ -25324,8 +25664,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_FLAG =
meltgc_named_symbol ("CLASS_NREP_MATCH_FLAG", MELT_GET);
if (sy_CLASS_NREP_MATCH_FLAG
- && NULL == /*_.VALDATA___V946*/ meltfptr[945])
- /*_.VALDATA___V946*/ meltfptr[945] = (void *) sy_CLASS_NREP_MATCH_FLAG;
+ && NULL == /*_.VALDATA___V949*/ meltfptr[948])
+ /*_.VALDATA___V949*/ meltfptr[948] = (void *) sy_CLASS_NREP_MATCH_FLAG;
}
/*^getnamedsymbol */
@@ -25334,8 +25674,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SIMPLE =
meltgc_named_symbol ("CLASS_NREP_SIMPLE", MELT_GET);
- if (sy_CLASS_NREP_SIMPLE && NULL == /*_.VALDATA___V948*/ meltfptr[947])
- /*_.VALDATA___V948*/ meltfptr[947] = (void *) sy_CLASS_NREP_SIMPLE;
+ if (sy_CLASS_NREP_SIMPLE && NULL == /*_.VALDATA___V951*/ meltfptr[950])
+ /*_.VALDATA___V951*/ meltfptr[950] = (void *) sy_CLASS_NREP_SIMPLE;
}
/*^getnamedsymbol */
@@ -25343,8 +25683,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NRPFLA_FLAG */
{
melt_ptr_t sy_NRPFLA_FLAG = meltgc_named_symbol ("NRPFLA_FLAG", MELT_GET);
- if (sy_NRPFLA_FLAG && NULL == /*_.VALDATA___V958*/ meltfptr[957])
- /*_.VALDATA___V958*/ meltfptr[957] = (void *) sy_NRPFLA_FLAG;
+ if (sy_NRPFLA_FLAG && NULL == /*_.VALDATA___V961*/ meltfptr[960])
+ /*_.VALDATA___V961*/ meltfptr[960] = (void *) sy_NRPFLA_FLAG;
}
/*^getnamedsymbol */
@@ -25353,8 +25693,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NRPFLA_NMATCH =
meltgc_named_symbol ("NRPFLA_NMATCH", MELT_GET);
- if (sy_NRPFLA_NMATCH && NULL == /*_.VALDATA___V960*/ meltfptr[959])
- /*_.VALDATA___V960*/ meltfptr[959] = (void *) sy_NRPFLA_NMATCH;
+ if (sy_NRPFLA_NMATCH && NULL == /*_.VALDATA___V963*/ meltfptr[962])
+ /*_.VALDATA___V963*/ meltfptr[962] = (void *) sy_NRPFLA_NMATCH;
}
/*^getnamedsymbol */
@@ -25364,8 +25704,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCHED_DATA =
meltgc_named_symbol ("CLASS_NREP_MATCHED_DATA", MELT_GET);
if (sy_CLASS_NREP_MATCHED_DATA
- && NULL == /*_.VALDATA___V962*/ meltfptr[961])
- /*_.VALDATA___V962*/ meltfptr[961] =
+ && NULL == /*_.VALDATA___V965*/ meltfptr[964])
+ /*_.VALDATA___V965*/ meltfptr[964] =
(void *) sy_CLASS_NREP_MATCHED_DATA;
}
@@ -25375,8 +25715,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NRMATD_CTYPE =
meltgc_named_symbol ("NRMATD_CTYPE", MELT_GET);
- if (sy_NRMATD_CTYPE && NULL == /*_.VALDATA___V974*/ meltfptr[973])
- /*_.VALDATA___V974*/ meltfptr[973] = (void *) sy_NRMATD_CTYPE;
+ if (sy_NRMATD_CTYPE && NULL == /*_.VALDATA___V977*/ meltfptr[976])
+ /*_.VALDATA___V977*/ meltfptr[976] = (void *) sy_NRMATD_CTYPE;
}
/*^getnamedsymbol */
@@ -25385,8 +25725,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NRMATD_MDATA =
meltgc_named_symbol ("NRMATD_MDATA", MELT_GET);
- if (sy_NRMATD_MDATA && NULL == /*_.VALDATA___V976*/ meltfptr[975])
- /*_.VALDATA___V976*/ meltfptr[975] = (void *) sy_NRMATD_MDATA;
+ if (sy_NRMATD_MDATA && NULL == /*_.VALDATA___V979*/ meltfptr[978])
+ /*_.VALDATA___V979*/ meltfptr[978] = (void *) sy_NRMATD_MDATA;
}
/*^getnamedsymbol */
@@ -25394,8 +25734,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NRMATD_RANK */
{
melt_ptr_t sy_NRMATD_RANK = meltgc_named_symbol ("NRMATD_RANK", MELT_GET);
- if (sy_NRMATD_RANK && NULL == /*_.VALDATA___V978*/ meltfptr[977])
- /*_.VALDATA___V978*/ meltfptr[977] = (void *) sy_NRMATD_RANK;
+ if (sy_NRMATD_RANK && NULL == /*_.VALDATA___V981*/ meltfptr[980])
+ /*_.VALDATA___V981*/ meltfptr[980] = (void *) sy_NRMATD_RANK;
}
/*^getnamedsymbol */
@@ -25404,8 +25744,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_SCAN_SUBPATTERNS =
meltgc_named_symbol ("SCAN_SUBPATTERNS", MELT_GET);
- if (sy_SCAN_SUBPATTERNS && NULL == /*_.VALDATA___V982*/ meltfptr[981])
- /*_.VALDATA___V982*/ meltfptr[981] = (void *) sy_SCAN_SUBPATTERNS;
+ if (sy_SCAN_SUBPATTERNS && NULL == /*_.VALDATA___V985*/ meltfptr[984])
+ /*_.VALDATA___V985*/ meltfptr[984] = (void *) sy_SCAN_SUBPATTERNS;
}
/*^getnamedsymbol */
@@ -25413,8 +25753,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:RECV */
{
melt_ptr_t sy_RECV = meltgc_named_symbol ("RECV", MELT_GET);
- if (sy_RECV && NULL == /*_.VALDATA___V984*/ meltfptr[983])
- /*_.VALDATA___V984*/ meltfptr[983] = (void *) sy_RECV;
+ if (sy_RECV && NULL == /*_.VALDATA___V987*/ meltfptr[986])
+ /*_.VALDATA___V987*/ meltfptr[986] = (void *) sy_RECV;
}
/*^getnamedsymbol */
@@ -25422,8 +25762,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:FUN */
{
melt_ptr_t sy_FUN = meltgc_named_symbol ("FUN", MELT_GET);
- if (sy_FUN && NULL == /*_.VALDATA___V987*/ meltfptr[986])
- /*_.VALDATA___V987*/ meltfptr[986] = (void *) sy_FUN;
+ if (sy_FUN && NULL == /*_.VALDATA___V990*/ meltfptr[989])
+ /*_.VALDATA___V990*/ meltfptr[989] = (void *) sy_FUN;
}
/*^getnamedsymbol */
@@ -25431,8 +25771,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTX */
{
melt_ptr_t sy_CTX = meltgc_named_symbol ("CTX", MELT_GET);
- if (sy_CTX && NULL == /*_.VALDATA___V990*/ meltfptr[989])
- /*_.VALDATA___V990*/ meltfptr[989] = (void *) sy_CTX;
+ if (sy_CTX && NULL == /*_.VALDATA___V993*/ meltfptr[992])
+ /*_.VALDATA___V993*/ meltfptr[992] = (void *) sy_CTX;
}
/*^getnamedsymbol */
@@ -25441,8 +25781,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_SCAN_STEP_DATA =
meltgc_named_symbol ("SCAN_STEP_DATA", MELT_GET);
- if (sy_SCAN_STEP_DATA && NULL == /*_.VALDATA___V996*/ meltfptr[995])
- /*_.VALDATA___V996*/ meltfptr[995] = (void *) sy_SCAN_STEP_DATA;
+ if (sy_SCAN_STEP_DATA && NULL == /*_.VALDATA___V999*/ meltfptr[998])
+ /*_.VALDATA___V999*/ meltfptr[998] = (void *) sy_SCAN_STEP_DATA;
}
/*^getnamedsymbol */
@@ -25450,8 +25790,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:STEP */
{
melt_ptr_t sy_STEP = meltgc_named_symbol ("STEP", MELT_GET);
- if (sy_STEP && NULL == /*_.VALDATA___V998*/ meltfptr[997])
- /*_.VALDATA___V998*/ meltfptr[997] = (void *) sy_STEP;
+ if (sy_STEP && NULL == /*_.VALDATA___V1001*/ meltfptr[1000])
+ /*_.VALDATA___V1001*/ meltfptr[1000] = (void *) sy_STEP;
}
/*^getnamedsymbol */
@@ -25460,8 +25800,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_SCAN_STEP_FLAG =
meltgc_named_symbol ("SCAN_STEP_FLAG", MELT_GET);
- if (sy_SCAN_STEP_FLAG && NULL == /*_.VALDATA___V1006*/ meltfptr[1005])
- /*_.VALDATA___V1006*/ meltfptr[1005] = (void *) sy_SCAN_STEP_FLAG;
+ if (sy_SCAN_STEP_FLAG && NULL == /*_.VALDATA___V1009*/ meltfptr[1008])
+ /*_.VALDATA___V1009*/ meltfptr[1008] = (void *) sy_SCAN_STEP_FLAG;
}
/*^getnamedsymbol */
@@ -25470,8 +25810,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PUT_THEN_MATCH =
meltgc_named_symbol ("PUT_THEN_MATCH", MELT_GET);
- if (sy_PUT_THEN_MATCH && NULL == /*_.VALDATA___V1031*/ meltfptr[1030])
- /*_.VALDATA___V1031*/ meltfptr[1030] = (void *) sy_PUT_THEN_MATCH;
+ if (sy_PUT_THEN_MATCH && NULL == /*_.VALDATA___V1036*/ meltfptr[1035])
+ /*_.VALDATA___V1036*/ meltfptr[1035] = (void *) sy_PUT_THEN_MATCH;
}
/*^getnamedsymbol */
@@ -25479,8 +25819,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:THENSTEP */
{
melt_ptr_t sy_THENSTEP = meltgc_named_symbol ("THENSTEP", MELT_GET);
- if (sy_THENSTEP && NULL == /*_.VALDATA___V1034*/ meltfptr[1033])
- /*_.VALDATA___V1034*/ meltfptr[1033] = (void *) sy_THENSTEP;
+ if (sy_THENSTEP && NULL == /*_.VALDATA___V1039*/ meltfptr[1038])
+ /*_.VALDATA___V1039*/ meltfptr[1038] = (void *) sy_THENSTEP;
}
/*^getnamedsymbol */
@@ -25489,8 +25829,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_PUT_ELSE_MATCH =
meltgc_named_symbol ("PUT_ELSE_MATCH", MELT_GET);
- if (sy_PUT_ELSE_MATCH && NULL == /*_.VALDATA___V1046*/ meltfptr[1045])
- /*_.VALDATA___V1046*/ meltfptr[1045] = (void *) sy_PUT_ELSE_MATCH;
+ if (sy_PUT_ELSE_MATCH && NULL == /*_.VALDATA___V1053*/ meltfptr[1052])
+ /*_.VALDATA___V1053*/ meltfptr[1052] = (void *) sy_PUT_ELSE_MATCH;
}
/*^getnamedsymbol */
@@ -25498,8 +25838,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:ELSESTEP */
{
melt_ptr_t sy_ELSESTEP = meltgc_named_symbol ("ELSESTEP", MELT_GET);
- if (sy_ELSESTEP && NULL == /*_.VALDATA___V1049*/ meltfptr[1048])
- /*_.VALDATA___V1049*/ meltfptr[1048] = (void *) sy_ELSESTEP;
+ if (sy_ELSESTEP && NULL == /*_.VALDATA___V1056*/ meltfptr[1055])
+ /*_.VALDATA___V1056*/ meltfptr[1055] = (void *) sy_ELSESTEP;
}
/*^getnamedsymbol */
@@ -25508,8 +25848,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_TRANSLATE_PATTERN =
meltgc_named_symbol ("TRANSLATE_PATTERN", MELT_GET);
- if (sy_TRANSLATE_PATTERN && NULL == /*_.VALDATA___V1069*/ meltfptr[1068])
- /*_.VALDATA___V1069*/ meltfptr[1068] = (void *) sy_TRANSLATE_PATTERN;
+ if (sy_TRANSLATE_PATTERN && NULL == /*_.VALDATA___V1084*/ meltfptr[1083])
+ /*_.VALDATA___V1084*/ meltfptr[1083] = (void *) sy_TRANSLATE_PATTERN;
}
/*^getnamedsymbol */
@@ -25517,8 +25857,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MDATA */
{
melt_ptr_t sy_MDATA = meltgc_named_symbol ("MDATA", MELT_GET);
- if (sy_MDATA && NULL == /*_.VALDATA___V1072*/ meltfptr[1071])
- /*_.VALDATA___V1072*/ meltfptr[1071] = (void *) sy_MDATA;
+ if (sy_MDATA && NULL == /*_.VALDATA___V1087*/ meltfptr[1086])
+ /*_.VALDATA___V1087*/ meltfptr[1086] = (void *) sy_MDATA;
}
/*^getnamedsymbol */
@@ -25526,8 +25866,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:MCASE */
{
melt_ptr_t sy_MCASE = meltgc_named_symbol ("MCASE", MELT_GET);
- if (sy_MCASE && NULL == /*_.VALDATA___V1075*/ meltfptr[1074])
- /*_.VALDATA___V1075*/ meltfptr[1074] = (void *) sy_MCASE;
+ if (sy_MCASE && NULL == /*_.VALDATA___V1090*/ meltfptr[1089])
+ /*_.VALDATA___V1090*/ meltfptr[1089] = (void *) sy_MCASE;
}
/*^getnamedsymbol */
@@ -25535,8 +25875,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:VARMAP */
{
melt_ptr_t sy_VARMAP = meltgc_named_symbol ("VARMAP", MELT_GET);
- if (sy_VARMAP && NULL == /*_.VALDATA___V1078*/ meltfptr[1077])
- /*_.VALDATA___V1078*/ meltfptr[1077] = (void *) sy_VARMAP;
+ if (sy_VARMAP && NULL == /*_.VALDATA___V1093*/ meltfptr[1092])
+ /*_.VALDATA___V1093*/ meltfptr[1092] = (void *) sy_VARMAP;
}
/*^getnamedsymbol */
@@ -25544,8 +25884,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:SLOC */
{
melt_ptr_t sy_SLOC = meltgc_named_symbol ("SLOC", MELT_GET);
- if (sy_SLOC && NULL == /*_.VALDATA___V1081*/ meltfptr[1080])
- /*_.VALDATA___V1081*/ meltfptr[1080] = (void *) sy_SLOC;
+ if (sy_SLOC && NULL == /*_.VALDATA___V1096*/ meltfptr[1095])
+ /*_.VALDATA___V1096*/ meltfptr[1095] = (void *) sy_SLOC;
}
/*^getnamedsymbol */
@@ -25555,8 +25895,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_SOURCE_PATTERN_LIST =
meltgc_named_symbol ("CLASS_SOURCE_PATTERN_LIST", MELT_GET);
if (sy_CLASS_SOURCE_PATTERN_LIST
- && NULL == /*_.VALDATA___V1096*/ meltfptr[1095])
- /*_.VALDATA___V1096*/ meltfptr[1095] =
+ && NULL == /*_.VALDATA___V1111*/ meltfptr[1110])
+ /*_.VALDATA___V1111*/ meltfptr[1110] =
(void *) sy_CLASS_SOURCE_PATTERN_LIST;
}
@@ -25565,8 +25905,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:PATUPLECOMP */
{
melt_ptr_t sy_PATUPLECOMP = meltgc_named_symbol ("PATUPLECOMP", MELT_GET);
- if (sy_PATUPLECOMP && NULL == /*_.VALDATA___V1103*/ meltfptr[1102])
- /*_.VALDATA___V1103*/ meltfptr[1102] = (void *) sy_PATUPLECOMP;
+ if (sy_PATUPLECOMP && NULL == /*_.VALDATA___V1118*/ meltfptr[1117])
+ /*_.VALDATA___V1118*/ meltfptr[1117] = (void *) sy_PATUPLECOMP;
}
/*^getnamedsymbol */
@@ -25576,8 +25916,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_MATCHGRAPHIC_ALTSTEP =
meltgc_named_symbol ("MATCHGRAPHIC_ALTSTEP", MELT_GET);
if (sy_MATCHGRAPHIC_ALTSTEP
- && NULL == /*_.VALDATA___V1121*/ meltfptr[1120])
- /*_.VALDATA___V1121*/ meltfptr[1120] = (void *) sy_MATCHGRAPHIC_ALTSTEP;
+ && NULL == /*_.VALDATA___V1136*/ meltfptr[1135])
+ /*_.VALDATA___V1136*/ meltfptr[1135] = (void *) sy_MATCHGRAPHIC_ALTSTEP;
}
/*^getnamedsymbol */
@@ -25585,8 +25925,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:ADD2OUT */
{
melt_ptr_t sy_ADD2OUT = meltgc_named_symbol ("ADD2OUT", MELT_GET);
- if (sy_ADD2OUT && NULL == /*_.VALDATA___V1129*/ meltfptr[1128])
- /*_.VALDATA___V1129*/ meltfptr[1128] = (void *) sy_ADD2OUT;
+ if (sy_ADD2OUT && NULL == /*_.VALDATA___V1146*/ meltfptr[1145])
+ /*_.VALDATA___V1146*/ meltfptr[1145] = (void *) sy_ADD2OUT;
}
/*^getnamedsymbol */
@@ -25595,8 +25935,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_DISCR_INTEGER =
meltgc_named_symbol ("DISCR_INTEGER", MELT_GET);
- if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1148*/ meltfptr[1147])
- /*_.VALDATA___V1148*/ meltfptr[1147] = (void *) sy_DISCR_INTEGER;
+ if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1165*/ meltfptr[1164])
+ /*_.VALDATA___V1165*/ meltfptr[1164] = (void *) sy_DISCR_INTEGER;
}
/*^getnamedsymbol */
@@ -25606,8 +25946,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_COMPARE_NAMED_ALPHA =
meltgc_named_symbol ("COMPARE_NAMED_ALPHA", MELT_GET);
if (sy_COMPARE_NAMED_ALPHA
- && NULL == /*_.VALDATA___V1150*/ meltfptr[1149])
- /*_.VALDATA___V1150*/ meltfptr[1149] = (void *) sy_COMPARE_NAMED_ALPHA;
+ && NULL == /*_.VALDATA___V1167*/ meltfptr[1166])
+ /*_.VALDATA___V1167*/ meltfptr[1166] = (void *) sy_COMPARE_NAMED_ALPHA;
}
/*^getnamedsymbol */
@@ -25617,8 +25957,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_ALTMATCH =
meltgc_named_symbol ("CLASS_NREP_ALTMATCH", MELT_GET);
if (sy_CLASS_NREP_ALTMATCH
- && NULL == /*_.VALDATA___V1152*/ meltfptr[1151])
- /*_.VALDATA___V1152*/ meltfptr[1151] = (void *) sy_CLASS_NREP_ALTMATCH;
+ && NULL == /*_.VALDATA___V1169*/ meltfptr[1168])
+ /*_.VALDATA___V1169*/ meltfptr[1168] = (void *) sy_CLASS_NREP_ALTMATCH;
}
/*^getnamedsymbol */
@@ -25627,8 +25967,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NAMATCH_MATCHED =
meltgc_named_symbol ("NAMATCH_MATCHED", MELT_GET);
- if (sy_NAMATCH_MATCHED && NULL == /*_.VALDATA___V1166*/ meltfptr[1165])
- /*_.VALDATA___V1166*/ meltfptr[1165] = (void *) sy_NAMATCH_MATCHED;
+ if (sy_NAMATCH_MATCHED && NULL == /*_.VALDATA___V1183*/ meltfptr[1182])
+ /*_.VALDATA___V1183*/ meltfptr[1182] = (void *) sy_NAMATCH_MATCHED;
}
/*^getnamedsymbol */
@@ -25637,8 +25977,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NAMATCH_RESULT =
meltgc_named_symbol ("NAMATCH_RESULT", MELT_GET);
- if (sy_NAMATCH_RESULT && NULL == /*_.VALDATA___V1168*/ meltfptr[1167])
- /*_.VALDATA___V1168*/ meltfptr[1167] = (void *) sy_NAMATCH_RESULT;
+ if (sy_NAMATCH_RESULT && NULL == /*_.VALDATA___V1185*/ meltfptr[1184])
+ /*_.VALDATA___V1185*/ meltfptr[1184] = (void *) sy_NAMATCH_RESULT;
}
/*^getnamedsymbol */
@@ -25647,8 +25987,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NAMATCH_BODY =
meltgc_named_symbol ("NAMATCH_BODY", MELT_GET);
- if (sy_NAMATCH_BODY && NULL == /*_.VALDATA___V1170*/ meltfptr[1169])
- /*_.VALDATA___V1170*/ meltfptr[1169] = (void *) sy_NAMATCH_BODY;
+ if (sy_NAMATCH_BODY && NULL == /*_.VALDATA___V1187*/ meltfptr[1186])
+ /*_.VALDATA___V1187*/ meltfptr[1186] = (void *) sy_NAMATCH_BODY;
}
/*^getnamedsymbol */
@@ -25657,8 +25997,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NAMATCH_FLAGS =
meltgc_named_symbol ("NAMATCH_FLAGS", MELT_GET);
- if (sy_NAMATCH_FLAGS && NULL == /*_.VALDATA___V1172*/ meltfptr[1171])
- /*_.VALDATA___V1172*/ meltfptr[1171] = (void *) sy_NAMATCH_FLAGS;
+ if (sy_NAMATCH_FLAGS && NULL == /*_.VALDATA___V1189*/ meltfptr[1188])
+ /*_.VALDATA___V1189*/ meltfptr[1188] = (void *) sy_NAMATCH_FLAGS;
}
/*^getnamedsymbol */
@@ -25668,8 +26008,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_LABEL =
meltgc_named_symbol ("CLASS_NREP_MATCH_LABEL", MELT_GET);
if (sy_CLASS_NREP_MATCH_LABEL
- && NULL == /*_.VALDATA___V1174*/ meltfptr[1173])
- /*_.VALDATA___V1174*/ meltfptr[1173] =
+ && NULL == /*_.VALDATA___V1191*/ meltfptr[1190])
+ /*_.VALDATA___V1191*/ meltfptr[1190] =
(void *) sy_CLASS_NREP_MATCH_LABEL;
}
@@ -25678,8 +26018,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NMLAB_STEP */
{
melt_ptr_t sy_NMLAB_STEP = meltgc_named_symbol ("NMLAB_STEP", MELT_GET);
- if (sy_NMLAB_STEP && NULL == /*_.VALDATA___V1182*/ meltfptr[1181])
- /*_.VALDATA___V1182*/ meltfptr[1181] = (void *) sy_NMLAB_STEP;
+ if (sy_NMLAB_STEP && NULL == /*_.VALDATA___V1199*/ meltfptr[1198])
+ /*_.VALDATA___V1199*/ meltfptr[1198] = (void *) sy_NMLAB_STEP;
}
/*^getnamedsymbol */
@@ -25689,8 +26029,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_LABEL_END =
meltgc_named_symbol ("CLASS_NREP_MATCH_LABEL_END", MELT_GET);
if (sy_CLASS_NREP_MATCH_LABEL_END
- && NULL == /*_.VALDATA___V1184*/ meltfptr[1183])
- /*_.VALDATA___V1184*/ meltfptr[1183] =
+ && NULL == /*_.VALDATA___V1201*/ meltfptr[1200])
+ /*_.VALDATA___V1201*/ meltfptr[1200] =
(void *) sy_CLASS_NREP_MATCH_LABEL_END;
}
@@ -25701,8 +26041,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_JUMP =
meltgc_named_symbol ("CLASS_NREP_MATCH_JUMP", MELT_GET);
if (sy_CLASS_NREP_MATCH_JUMP
- && NULL == /*_.VALDATA___V1190*/ meltfptr[1189])
- /*_.VALDATA___V1190*/ meltfptr[1189] =
+ && NULL == /*_.VALDATA___V1207*/ meltfptr[1206])
+ /*_.VALDATA___V1207*/ meltfptr[1206] =
(void *) sy_CLASS_NREP_MATCH_JUMP;
}
@@ -25711,8 +26051,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NMJMP_LABEL */
{
melt_ptr_t sy_NMJMP_LABEL = meltgc_named_symbol ("NMJMP_LABEL", MELT_GET);
- if (sy_NMJMP_LABEL && NULL == /*_.VALDATA___V1198*/ meltfptr[1197])
- /*_.VALDATA___V1198*/ meltfptr[1197] = (void *) sy_NMJMP_LABEL;
+ if (sy_NMJMP_LABEL && NULL == /*_.VALDATA___V1215*/ meltfptr[1214])
+ /*_.VALDATA___V1215*/ meltfptr[1214] = (void *) sy_NMJMP_LABEL;
}
/*^getnamedsymbol */
@@ -25722,8 +26062,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_ACTION =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_ACTION", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_ACTION
- && NULL == /*_.VALDATA___V1200*/ meltfptr[1199])
- /*_.VALDATA___V1200*/ meltfptr[1199] =
+ && NULL == /*_.VALDATA___V1217*/ meltfptr[1216])
+ /*_.VALDATA___V1217*/ meltfptr[1216] =
(void *) sy_CLASS_NREP_MATCH_DATA_ACTION;
}
@@ -25732,8 +26072,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NMDAC_DATA */
{
melt_ptr_t sy_NMDAC_DATA = meltgc_named_symbol ("NMDAC_DATA", MELT_GET);
- if (sy_NMDAC_DATA && NULL == /*_.VALDATA___V1208*/ meltfptr[1207])
- /*_.VALDATA___V1208*/ meltfptr[1207] = (void *) sy_NMDAC_DATA;
+ if (sy_NMDAC_DATA && NULL == /*_.VALDATA___V1225*/ meltfptr[1224])
+ /*_.VALDATA___V1225*/ meltfptr[1224] = (void *) sy_NMDAC_DATA;
}
/*^getnamedsymbol */
@@ -25743,8 +26083,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_INITIALIZER =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_INITIALIZER", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_INITIALIZER
- && NULL == /*_.VALDATA___V1210*/ meltfptr[1209])
- /*_.VALDATA___V1210*/ meltfptr[1209] =
+ && NULL == /*_.VALDATA___V1227*/ meltfptr[1226])
+ /*_.VALDATA___V1227*/ meltfptr[1226] =
(void *) sy_CLASS_NREP_MATCH_DATA_INITIALIZER;
}
@@ -25755,8 +26095,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_CLEAR =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_CLEAR", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_CLEAR
- && NULL == /*_.VALDATA___V1216*/ meltfptr[1215])
- /*_.VALDATA___V1216*/ meltfptr[1215] =
+ && NULL == /*_.VALDATA___V1233*/ meltfptr[1232])
+ /*_.VALDATA___V1233*/ meltfptr[1232] =
(void *) sy_CLASS_NREP_MATCH_DATA_CLEAR;
}
@@ -25767,8 +26107,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_MATCH_DATA_FINALIZER =
meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_FINALIZER", MELT_GET);
if (sy_CLASS_NREP_MATCH_DATA_FINALIZER
- && NULL == /*_.VALDATA___V1222*/ meltfptr[1221])
- /*_.VALDATA___V1222*/ meltfptr[1221] =
+ && NULL == /*_.VALDATA___V1239*/ meltfptr[1238])
+ /*_.VALDATA___V1239*/ meltfptr[1238] =
(void *) sy_CLASS_NREP_MATCH_DATA_FINALIZER;
}
@@ -25779,8 +26119,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_JUMP_WHEN_IS_A =
meltgc_named_symbol ("CLASS_NREP_JUMP_WHEN_IS_A", MELT_GET);
if (sy_CLASS_NREP_JUMP_WHEN_IS_A
- && NULL == /*_.VALDATA___V1228*/ meltfptr[1227])
- /*_.VALDATA___V1228*/ meltfptr[1227] =
+ && NULL == /*_.VALDATA___V1245*/ meltfptr[1244])
+ /*_.VALDATA___V1245*/ meltfptr[1244] =
(void *) sy_CLASS_NREP_JUMP_WHEN_IS_A;
}
@@ -25790,8 +26130,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTESTISA_VALUE =
meltgc_named_symbol ("NTESTISA_VALUE", MELT_GET);
- if (sy_NTESTISA_VALUE && NULL == /*_.VALDATA___V1240*/ meltfptr[1239])
- /*_.VALDATA___V1240*/ meltfptr[1239] = (void *) sy_NTESTISA_VALUE;
+ if (sy_NTESTISA_VALUE && NULL == /*_.VALDATA___V1257*/ meltfptr[1256])
+ /*_.VALDATA___V1257*/ meltfptr[1256] = (void *) sy_NTESTISA_VALUE;
}
/*^getnamedsymbol */
@@ -25800,8 +26140,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTESTISA_CLASS =
meltgc_named_symbol ("NTESTISA_CLASS", MELT_GET);
- if (sy_NTESTISA_CLASS && NULL == /*_.VALDATA___V1242*/ meltfptr[1241])
- /*_.VALDATA___V1242*/ meltfptr[1241] = (void *) sy_NTESTISA_CLASS;
+ if (sy_NTESTISA_CLASS && NULL == /*_.VALDATA___V1259*/ meltfptr[1258])
+ /*_.VALDATA___V1259*/ meltfptr[1258] = (void *) sy_NTESTISA_CLASS;
}
/*^getnamedsymbol */
@@ -25810,8 +26150,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NTESTISA_JUMP =
meltgc_named_symbol ("NTESTISA_JUMP", MELT_GET);
- if (sy_NTESTISA_JUMP && NULL == /*_.VALDATA___V1244*/ meltfptr[1243])
- /*_.VALDATA___V1244*/ meltfptr[1243] = (void *) sy_NTESTISA_JUMP;
+ if (sy_NTESTISA_JUMP && NULL == /*_.VALDATA___V1261*/ meltfptr[1260])
+ /*_.VALDATA___V1261*/ meltfptr[1260] = (void *) sy_NTESTISA_JUMP;
}
/*^getnamedsymbol */
@@ -25821,8 +26161,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_MATCH_NORMALIZATION_CONTEXT =
meltgc_named_symbol ("CLASS_MATCH_NORMALIZATION_CONTEXT", MELT_GET);
if (sy_CLASS_MATCH_NORMALIZATION_CONTEXT
- && NULL == /*_.VALDATA___V1246*/ meltfptr[1245])
- /*_.VALDATA___V1246*/ meltfptr[1245] =
+ && NULL == /*_.VALDATA___V1263*/ meltfptr[1262])
+ /*_.VALDATA___V1263*/ meltfptr[1262] =
(void *) sy_CLASS_MATCH_NORMALIZATION_CONTEXT;
}
@@ -25832,8 +26172,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_RESLOC =
meltgc_named_symbol ("MATNORX_RESLOC", MELT_GET);
- if (sy_MATNORX_RESLOC && NULL == /*_.VALDATA___V1272*/ meltfptr[1271])
- /*_.VALDATA___V1272*/ meltfptr[1271] = (void *) sy_MATNORX_RESLOC;
+ if (sy_MATNORX_RESLOC && NULL == /*_.VALDATA___V1289*/ meltfptr[1288])
+ /*_.VALDATA___V1289*/ meltfptr[1288] = (void *) sy_MATNORX_RESLOC;
}
/*^getnamedsymbol */
@@ -25842,8 +26182,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_NMATCH =
meltgc_named_symbol ("MATNORX_NMATCH", MELT_GET);
- if (sy_MATNORX_NMATCH && NULL == /*_.VALDATA___V1274*/ meltfptr[1273])
- /*_.VALDATA___V1274*/ meltfptr[1273] = (void *) sy_MATNORX_NMATCH;
+ if (sy_MATNORX_NMATCH && NULL == /*_.VALDATA___V1291*/ meltfptr[1290])
+ /*_.VALDATA___V1291*/ meltfptr[1290] = (void *) sy_MATNORX_NMATCH;
}
/*^getnamedsymbol */
@@ -25852,8 +26192,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_DATAMAP =
meltgc_named_symbol ("MATNORX_DATAMAP", MELT_GET);
- if (sy_MATNORX_DATAMAP && NULL == /*_.VALDATA___V1276*/ meltfptr[1275])
- /*_.VALDATA___V1276*/ meltfptr[1275] = (void *) sy_MATNORX_DATAMAP;
+ if (sy_MATNORX_DATAMAP && NULL == /*_.VALDATA___V1293*/ meltfptr[1292])
+ /*_.VALDATA___V1293*/ meltfptr[1292] = (void *) sy_MATNORX_DATAMAP;
}
/*^getnamedsymbol */
@@ -25862,8 +26202,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_FLAGMAP =
meltgc_named_symbol ("MATNORX_FLAGMAP", MELT_GET);
- if (sy_MATNORX_FLAGMAP && NULL == /*_.VALDATA___V1278*/ meltfptr[1277])
- /*_.VALDATA___V1278*/ meltfptr[1277] = (void *) sy_MATNORX_FLAGMAP;
+ if (sy_MATNORX_FLAGMAP && NULL == /*_.VALDATA___V1295*/ meltfptr[1294])
+ /*_.VALDATA___V1295*/ meltfptr[1294] = (void *) sy_MATNORX_FLAGMAP;
}
/*^getnamedsymbol */
@@ -25872,8 +26212,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_STEPMAP =
meltgc_named_symbol ("MATNORX_STEPMAP", MELT_GET);
- if (sy_MATNORX_STEPMAP && NULL == /*_.VALDATA___V1280*/ meltfptr[1279])
- /*_.VALDATA___V1280*/ meltfptr[1279] = (void *) sy_MATNORX_STEPMAP;
+ if (sy_MATNORX_STEPMAP && NULL == /*_.VALDATA___V1297*/ meltfptr[1296])
+ /*_.VALDATA___V1297*/ meltfptr[1296] = (void *) sy_MATNORX_STEPMAP;
}
/*^getnamedsymbol */
@@ -25882,8 +26222,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_MDATAQUEUE =
meltgc_named_symbol ("MATNORX_MDATAQUEUE", MELT_GET);
- if (sy_MATNORX_MDATAQUEUE && NULL == /*_.VALDATA___V1282*/ meltfptr[1281])
- /*_.VALDATA___V1282*/ meltfptr[1281] = (void *) sy_MATNORX_MDATAQUEUE;
+ if (sy_MATNORX_MDATAQUEUE && NULL == /*_.VALDATA___V1299*/ meltfptr[1298])
+ /*_.VALDATA___V1299*/ meltfptr[1298] = (void *) sy_MATNORX_MDATAQUEUE;
}
/*^getnamedsymbol */
@@ -25892,8 +26232,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_MSTEPQUEUE =
meltgc_named_symbol ("MATNORX_MSTEPQUEUE", MELT_GET);
- if (sy_MATNORX_MSTEPQUEUE && NULL == /*_.VALDATA___V1284*/ meltfptr[1283])
- /*_.VALDATA___V1284*/ meltfptr[1283] = (void *) sy_MATNORX_MSTEPQUEUE;
+ if (sy_MATNORX_MSTEPQUEUE && NULL == /*_.VALDATA___V1301*/ meltfptr[1300])
+ /*_.VALDATA___V1301*/ meltfptr[1300] = (void *) sy_MATNORX_MSTEPQUEUE;
}
/*^getnamedsymbol */
@@ -25902,8 +26242,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_BODYLIST =
meltgc_named_symbol ("MATNORX_BODYLIST", MELT_GET);
- if (sy_MATNORX_BODYLIST && NULL == /*_.VALDATA___V1286*/ meltfptr[1285])
- /*_.VALDATA___V1286*/ meltfptr[1285] = (void *) sy_MATNORX_BODYLIST;
+ if (sy_MATNORX_BODYLIST && NULL == /*_.VALDATA___V1303*/ meltfptr[1302])
+ /*_.VALDATA___V1303*/ meltfptr[1302] = (void *) sy_MATNORX_BODYLIST;
}
/*^getnamedsymbol */
@@ -25912,8 +26252,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_ENDLABEL =
meltgc_named_symbol ("MATNORX_ENDLABEL", MELT_GET);
- if (sy_MATNORX_ENDLABEL && NULL == /*_.VALDATA___V1288*/ meltfptr[1287])
- /*_.VALDATA___V1288*/ meltfptr[1287] = (void *) sy_MATNORX_ENDLABEL;
+ if (sy_MATNORX_ENDLABEL && NULL == /*_.VALDATA___V1305*/ meltfptr[1304])
+ /*_.VALDATA___V1305*/ meltfptr[1304] = (void *) sy_MATNORX_ENDLABEL;
}
/*^getnamedsymbol */
@@ -25922,8 +26262,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATNORX_MATCHCTXT =
meltgc_named_symbol ("MATNORX_MATCHCTXT", MELT_GET);
- if (sy_MATNORX_MATCHCTXT && NULL == /*_.VALDATA___V1290*/ meltfptr[1289])
- /*_.VALDATA___V1290*/ meltfptr[1289] = (void *) sy_MATNORX_MATCHCTXT;
+ if (sy_MATNORX_MATCHCTXT && NULL == /*_.VALDATA___V1307*/ meltfptr[1306])
+ /*_.VALDATA___V1307*/ meltfptr[1306] = (void *) sy_MATNORX_MATCHCTXT;
}
/*^getnamedsymbol */
@@ -25932,8 +26272,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_NORMALIZE_STEP =
meltgc_named_symbol ("NORMALIZE_STEP", MELT_GET);
- if (sy_NORMALIZE_STEP && NULL == /*_.VALDATA___V1294*/ meltfptr[1293])
- /*_.VALDATA___V1294*/ meltfptr[1293] = (void *) sy_NORMALIZE_STEP;
+ if (sy_NORMALIZE_STEP && NULL == /*_.VALDATA___V1311*/ meltfptr[1310])
+ /*_.VALDATA___V1311*/ meltfptr[1310] = (void *) sy_NORMALIZE_STEP;
}
/*^getnamedsymbol */
@@ -25941,8 +26281,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NMCTXT */
{
melt_ptr_t sy_NMCTXT = meltgc_named_symbol ("NMCTXT", MELT_GET);
- if (sy_NMCTXT && NULL == /*_.VALDATA___V1297*/ meltfptr[1296])
- /*_.VALDATA___V1297*/ meltfptr[1296] = (void *) sy_NMCTXT;
+ if (sy_NMCTXT && NULL == /*_.VALDATA___V1314*/ meltfptr[1313])
+ /*_.VALDATA___V1314*/ meltfptr[1313] = (void *) sy_NMCTXT;
}
/*^getnamedsymbol */
@@ -25951,8 +26291,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_SETQ =
meltgc_named_symbol ("CLASS_NREP_SETQ", MELT_GET);
- if (sy_CLASS_NREP_SETQ && NULL == /*_.VALDATA___V1317*/ meltfptr[1316])
- /*_.VALDATA___V1317*/ meltfptr[1316] = (void *) sy_CLASS_NREP_SETQ;
+ if (sy_CLASS_NREP_SETQ && NULL == /*_.VALDATA___V1334*/ meltfptr[1333])
+ /*_.VALDATA___V1334*/ meltfptr[1333] = (void *) sy_CLASS_NREP_SETQ;
}
/*^getnamedsymbol */
@@ -25961,8 +26301,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_CHUNK =
meltgc_named_symbol ("CLASS_NREP_CHUNK", MELT_GET);
- if (sy_CLASS_NREP_CHUNK && NULL == /*_.VALDATA___V1324*/ meltfptr[1323])
- /*_.VALDATA___V1324*/ meltfptr[1323] = (void *) sy_CLASS_NREP_CHUNK;
+ if (sy_CLASS_NREP_CHUNK && NULL == /*_.VALDATA___V1341*/ meltfptr[1340])
+ /*_.VALDATA___V1341*/ meltfptr[1340] = (void *) sy_CLASS_NREP_CHUNK;
}
/*^getnamedsymbol */
@@ -25971,8 +26311,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_AND_MATCH_FLAGS =
meltgc_named_symbol ("AND_MATCH_FLAGS", MELT_GET);
- if (sy_AND_MATCH_FLAGS && NULL == /*_.VALDATA___V1321*/ meltfptr[1320])
- /*_.VALDATA___V1321*/ meltfptr[1320] = (void *) sy_AND_MATCH_FLAGS;
+ if (sy_AND_MATCH_FLAGS && NULL == /*_.VALDATA___V1338*/ meltfptr[1337])
+ /*_.VALDATA___V1338*/ meltfptr[1337] = (void *) sy_AND_MATCH_FLAGS;
}
/*^getnamedsymbol */
@@ -25980,8 +26320,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:CTYPE_LONG */
{
melt_ptr_t sy_CTYPE_LONG = meltgc_named_symbol ("CTYPE_LONG", MELT_GET);
- if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1326*/ meltfptr[1325])
- /*_.VALDATA___V1326*/ meltfptr[1325] = (void *) sy_CTYPE_LONG;
+ if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1343*/ meltfptr[1342])
+ /*_.VALDATA___V1343*/ meltfptr[1342] = (void *) sy_CTYPE_LONG;
}
/*^getnamedsymbol */
@@ -25991,8 +26331,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_DISCR_VERBATIM_STRING =
meltgc_named_symbol ("DISCR_VERBATIM_STRING", MELT_GET);
if (sy_DISCR_VERBATIM_STRING
- && NULL == /*_.VALDATA___V1328*/ meltfptr[1327])
- /*_.VALDATA___V1328*/ meltfptr[1327] =
+ && NULL == /*_.VALDATA___V1345*/ meltfptr[1344])
+ /*_.VALDATA___V1345*/ meltfptr[1344] =
(void *) sy_DISCR_VERBATIM_STRING;
}
@@ -26002,8 +26342,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_IFISA =
meltgc_named_symbol ("CLASS_NREP_IFISA", MELT_GET);
- if (sy_CLASS_NREP_IFISA && NULL == /*_.VALDATA___V1334*/ meltfptr[1333])
- /*_.VALDATA___V1334*/ meltfptr[1333] = (void *) sy_CLASS_NREP_IFISA;
+ if (sy_CLASS_NREP_IFISA && NULL == /*_.VALDATA___V1351*/ meltfptr[1350])
+ /*_.VALDATA___V1351*/ meltfptr[1350] = (void *) sy_CLASS_NREP_IFISA;
}
/*^getnamedsymbol */
@@ -26012,8 +26352,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_PROGN =
meltgc_named_symbol ("CLASS_NREP_PROGN", MELT_GET);
- if (sy_CLASS_NREP_PROGN && NULL == /*_.VALDATA___V1336*/ meltfptr[1335])
- /*_.VALDATA___V1336*/ meltfptr[1335] = (void *) sy_CLASS_NREP_PROGN;
+ if (sy_CLASS_NREP_PROGN && NULL == /*_.VALDATA___V1353*/ meltfptr[1352])
+ /*_.VALDATA___V1353*/ meltfptr[1352] = (void *) sy_CLASS_NREP_PROGN;
}
/*^getnamedsymbol */
@@ -26023,19 +26363,30 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_CLASS_NREP_IFTUPLESIZED =
meltgc_named_symbol ("CLASS_NREP_IFTUPLESIZED", MELT_GET);
if (sy_CLASS_NREP_IFTUPLESIZED
- && NULL == /*_.VALDATA___V1340*/ meltfptr[1339])
- /*_.VALDATA___V1340*/ meltfptr[1339] =
+ && NULL == /*_.VALDATA___V1357*/ meltfptr[1356])
+ /*_.VALDATA___V1357*/ meltfptr[1356] =
(void *) sy_CLASS_NREP_IFTUPLESIZED;
}
/*^getnamedsymbol */
+ /*getnamedsym:CLASS_NREP_IFCOMMON */
+ {
+ melt_ptr_t sy_CLASS_NREP_IFCOMMON =
+ meltgc_named_symbol ("CLASS_NREP_IFCOMMON", MELT_GET);
+ if (sy_CLASS_NREP_IFCOMMON
+ && NULL == /*_.VALDATA___V1359*/ meltfptr[1358])
+ /*_.VALDATA___V1359*/ meltfptr[1358] = (void *) sy_CLASS_NREP_IFCOMMON;
+ }
+
+ /*^getnamedsymbol */
+
/*getnamedsym:CLASS_NREP_IFSAME */
{
melt_ptr_t sy_CLASS_NREP_IFSAME =
meltgc_named_symbol ("CLASS_NREP_IFSAME", MELT_GET);
- if (sy_CLASS_NREP_IFSAME && NULL == /*_.VALDATA___V1344*/ meltfptr[1343])
- /*_.VALDATA___V1344*/ meltfptr[1343] = (void *) sy_CLASS_NREP_IFSAME;
+ if (sy_CLASS_NREP_IFSAME && NULL == /*_.VALDATA___V1363*/ meltfptr[1362])
+ /*_.VALDATA___V1363*/ meltfptr[1362] = (void *) sy_CLASS_NREP_IFSAME;
}
/*^getnamedsymbol */
@@ -26043,8 +26394,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:LIST_MAP */
{
melt_ptr_t sy_LIST_MAP = meltgc_named_symbol ("LIST_MAP", MELT_GET);
- if (sy_LIST_MAP && NULL == /*_.VALDATA___V1352*/ meltfptr[1351])
- /*_.VALDATA___V1352*/ meltfptr[1351] = (void *) sy_LIST_MAP;
+ if (sy_LIST_MAP && NULL == /*_.VALDATA___V1371*/ meltfptr[1370])
+ /*_.VALDATA___V1371*/ meltfptr[1370] = (void *) sy_LIST_MAP;
}
/*^getnamedsymbol */
@@ -26053,8 +26404,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_NREP_IF =
meltgc_named_symbol ("CLASS_NREP_IF", MELT_GET);
- if (sy_CLASS_NREP_IF && NULL == /*_.VALDATA___V1356*/ meltfptr[1355])
- /*_.VALDATA___V1356*/ meltfptr[1355] = (void *) sy_CLASS_NREP_IF;
+ if (sy_CLASS_NREP_IF && NULL == /*_.VALDATA___V1375*/ meltfptr[1374])
+ /*_.VALDATA___V1375*/ meltfptr[1374] = (void *) sy_CLASS_NREP_IF;
}
/*^getnamedsymbol */
@@ -26064,8 +26415,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_NORMALIZE_TEST_MATCHER =
meltgc_named_symbol ("NORMALIZE_TEST_MATCHER", MELT_GET);
if (sy_NORMALIZE_TEST_MATCHER
- && NULL == /*_.VALDATA___V1358*/ meltfptr[1357])
- /*_.VALDATA___V1358*/ meltfptr[1357] =
+ && NULL == /*_.VALDATA___V1377*/ meltfptr[1376])
+ /*_.VALDATA___V1377*/ meltfptr[1376] =
(void *) sy_NORMALIZE_TEST_MATCHER;
}
@@ -26074,8 +26425,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NDATA */
{
melt_ptr_t sy_NDATA = meltgc_named_symbol ("NDATA", MELT_GET);
- if (sy_NDATA && NULL == /*_.VALDATA___V1362*/ meltfptr[1361])
- /*_.VALDATA___V1362*/ meltfptr[1361] = (void *) sy_NDATA;
+ if (sy_NDATA && NULL == /*_.VALDATA___V1381*/ meltfptr[1380])
+ /*_.VALDATA___V1381*/ meltfptr[1380] = (void *) sy_NDATA;
}
/*^getnamedsymbol */
@@ -26083,8 +26434,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:BINDLIST */
{
melt_ptr_t sy_BINDLIST = meltgc_named_symbol ("BINDLIST", MELT_GET);
- if (sy_BINDLIST && NULL == /*_.VALDATA___V1365*/ meltfptr[1364])
- /*_.VALDATA___V1365*/ meltfptr[1364] = (void *) sy_BINDLIST;
+ if (sy_BINDLIST && NULL == /*_.VALDATA___V1384*/ meltfptr[1383])
+ /*_.VALDATA___V1384*/ meltfptr[1383] = (void *) sy_BINDLIST;
}
/*^getnamedsymbol */
@@ -26092,8 +26443,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NJELSE */
{
melt_ptr_t sy_NJELSE = meltgc_named_symbol ("NJELSE", MELT_GET);
- if (sy_NJELSE && NULL == /*_.VALDATA___V1369*/ meltfptr[1368])
- /*_.VALDATA___V1369*/ meltfptr[1368] = (void *) sy_NJELSE;
+ if (sy_NJELSE && NULL == /*_.VALDATA___V1388*/ meltfptr[1387])
+ /*_.VALDATA___V1388*/ meltfptr[1387] = (void *) sy_NJELSE;
}
/*^getnamedsymbol */
@@ -26103,8 +26454,8 @@ start_module_melt (void *modargp_)
melt_ptr_t sy_NORMALIZE_FILL_MATCHER =
meltgc_named_symbol ("NORMALIZE_FILL_MATCHER", MELT_GET);
if (sy_NORMALIZE_FILL_MATCHER
- && NULL == /*_.VALDATA___V1375*/ meltfptr[1374])
- /*_.VALDATA___V1375*/ meltfptr[1374] =
+ && NULL == /*_.VALDATA___V1394*/ meltfptr[1393])
+ /*_.VALDATA___V1394*/ meltfptr[1393] =
(void *) sy_NORMALIZE_FILL_MATCHER;
}
@@ -26113,8 +26464,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:NOUTS */
{
melt_ptr_t sy_NOUTS = meltgc_named_symbol ("NOUTS", MELT_GET);
- if (sy_NOUTS && NULL == /*_.VALDATA___V1381*/ meltfptr[1380])
- /*_.VALDATA___V1381*/ meltfptr[1380] = (void *) sy_NOUTS;
+ if (sy_NOUTS && NULL == /*_.VALDATA___V1400*/ meltfptr[1399])
+ /*_.VALDATA___V1400*/ meltfptr[1399] = (void *) sy_NOUTS;
}
/*^getnamedsymbol */
@@ -26122,8 +26473,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:TESTDATA */
{
melt_ptr_t sy_TESTDATA = meltgc_named_symbol ("TESTDATA", MELT_GET);
- if (sy_TESTDATA && NULL == /*_.VALDATA___V1385*/ meltfptr[1384])
- /*_.VALDATA___V1385*/ meltfptr[1384] = (void *) sy_TESTDATA;
+ if (sy_TESTDATA && NULL == /*_.VALDATA___V1404*/ meltfptr[1403])
+ /*_.VALDATA___V1404*/ meltfptr[1403] = (void *) sy_TESTDATA;
}
/*^getnamedsymbol */
@@ -26132,8 +26483,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_CLASS_CMATCHER =
meltgc_named_symbol ("CLASS_CMATCHER", MELT_GET);
- if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1397*/ meltfptr[1396])
- /*_.VALDATA___V1397*/ meltfptr[1396] = (void *) sy_CLASS_CMATCHER;
+ if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1416*/ meltfptr[1415])
+ /*_.VALDATA___V1416*/ meltfptr[1415] = (void *) sy_CLASS_CMATCHER;
}
/*^getnamedsymbol */
@@ -26141,8 +26492,8 @@ start_module_melt (void *modargp_)
/*getnamedsym:_MATCHRES */
{
melt_ptr_t sy_MATCHRES = meltgc_named_symbol ("_MATCHRES", MELT_GET);
- if (sy_MATCHRES && NULL == /*_.VALDATA___V1406*/ meltfptr[1405])
- /*_.VALDATA___V1406*/ meltfptr[1405] = (void *) sy_MATCHRES;
+ if (sy_MATCHRES && NULL == /*_.VALDATA___V1425*/ meltfptr[1424])
+ /*_.VALDATA___V1425*/ meltfptr[1424] = (void *) sy_MATCHRES;
}
/*^getnamedsymbol */
@@ -26151,8 +26502,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_MATCHED_DATA =
meltgc_named_symbol ("_MATCHED_DATA", MELT_GET);
- if (sy_MATCHED_DATA && NULL == /*_.VALDATA___V1413*/ meltfptr[1412])
- /*_.VALDATA___V1413*/ meltfptr[1412] = (void *) sy_MATCHED_DATA;
+ if (sy_MATCHED_DATA && NULL == /*_.VALDATA___V1432*/ meltfptr[1431])
+ /*_.VALDATA___V1432*/ meltfptr[1431] = (void *) sy_MATCHED_DATA;
}
/*^getnamedkeyword */
@@ -26161,8 +26512,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t kw_TRUE = meltgc_named_keyword ("TRUE", MELT_GET);
if (kw_TRUE)
- /*_.VALDATA___V1429*/
- meltfptr[1428] = (void *) kw_TRUE;
+ /*_.VALDATA___V1448*/
+ meltfptr[1447] = (void *) kw_TRUE;
}
/*^getnamedsymbol */
@@ -26171,8 +26522,8 @@ start_module_melt (void *modargp_)
{
melt_ptr_t sy_ALTERNATE_MATCH =
meltgc_named_symbol ("ALTERNATE_MATCH", MELT_GET);
- if (sy_ALTERNATE_MATCH && NULL == /*_.VALDATA___V1434*/ meltfptr[1433])
- /*_.VALDATA___V1434*/ meltfptr[1433] = (void *) sy_ALTERNATE_MATCH;
+ if (sy_ALTERNATE_MATCH && NULL == /*_.VALDATA___V1453*/ meltfptr[1452])
+ /*_.VALDATA___V1453*/ meltfptr[1452] = (void *) sy_ALTERNATE_MATCH;
}
/*^comment */
@@ -26209,7 +26560,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_ROOT__V7*/ meltfptr[6] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V92*/ meltfptr[91]),
+ (melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26231,7 +26582,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SELECTOR__V8*/ meltfptr[7] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V144*/ meltfptr[143]),
+ (melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26253,7 +26604,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]),
+ (melt_ptr_t) ( /*_.VALDATA___V151*/ meltfptr[150]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26275,7 +26626,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NAMED__V10*/ meltfptr[9] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]),
+ (melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26297,7 +26648,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.INSTALL_METHOD__V11*/ meltfptr[10] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]),
+ (melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26319,7 +26670,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_ANY_RECEIVER__V12*/ meltfptr[11] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V156*/ meltfptr[155]),
+ (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26341,7 +26692,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]),
+ (melt_ptr_t) ( /*_.VALDATA___V161*/ meltfptr[160]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26363,7 +26714,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]),
+ (melt_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26385,7 +26736,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]),
+ (melt_ptr_t) ( /*_.VALDATA___V169*/ meltfptr[168]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26407,7 +26758,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]),
+ (melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26429,7 +26780,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.NORMAL_EXP__V17*/ meltfptr[16] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]),
+ (melt_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26451,7 +26802,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.LIST_APPEND2LIST__V18*/ meltfptr[17] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]),
+ (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26473,7 +26824,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.GET_CTYPE__V19*/ meltfptr[18] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]),
+ (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26495,7 +26846,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_CTYPE__V20*/ meltfptr[19] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]),
+ (melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26517,7 +26868,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_LOCATED__V21*/ meltfptr[20] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]),
+ (melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26539,7 +26890,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]),
+ (melt_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26561,7 +26912,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CTYPE_VALUE__V23*/ meltfptr[22] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]),
+ (melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26583,7 +26934,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]),
+ (melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26605,7 +26956,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_CLASS__V25*/ meltfptr[24] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]),
+ (melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26627,7 +26978,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]),
+ (melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26649,7 +27000,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_FIELD__V27*/ meltfptr[26] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]),
+ (melt_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26671,7 +27022,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]),
+ (melt_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26693,7 +27044,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]),
+ (melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26715,7 +27066,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]),
+ (melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26737,7 +27088,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.NORMALIZE_TUPLE__V31*/ meltfptr[30] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]),
+ (melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26759,7 +27110,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]),
+ (melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26781,7 +27132,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]),
+ (melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26803,7 +27154,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SYMBOL__V34*/ meltfptr[33] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V217*/ meltfptr[216]),
+ (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26825,7 +27176,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]),
+ (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26847,7 +27198,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]),
+ (melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26869,7 +27220,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]),
+ (melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26891,7 +27242,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_LIST__V38*/ meltfptr[37] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]),
+ (melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26913,7 +27264,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_CONTAINER__V39*/ meltfptr[38] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]),
+ (melt_ptr_t) ( /*_.VALDATA___V430*/ meltfptr[429]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26935,7 +27286,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V440*/ meltfptr[439]),
+ (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26957,7 +27308,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]),
+ (melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -26979,7 +27330,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]),
+ (melt_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27001,7 +27352,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/ meltfptr[42] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]),
+ (melt_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27023,7 +27374,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_MULTIPLE__V44*/ meltfptr[43] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]),
+ (melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27045,7 +27396,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461]),
+ (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27067,7 +27418,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_LET_BINDING__V46*/ meltfptr[45] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]),
+ (melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27089,7 +27440,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_UNSAFE_GET_FIELD__V47*/ meltfptr[46] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]),
+ (melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27111,7 +27462,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLONE_SYMBOL__V48*/ meltfptr[47] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]),
+ (melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27133,7 +27484,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/ meltfptr[48] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]),
+ (melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27155,7 +27506,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]),
+ (melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27177,7 +27528,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]),
+ (melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27199,7 +27550,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V52*/ meltfptr[51] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]),
+ (melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27221,7 +27572,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/ meltfptr[52] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]),
+ (melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27243,7 +27594,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.MULTIPLE_MAP__V54*/ meltfptr[53] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]),
+ (melt_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27265,7 +27616,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP__V55*/ meltfptr[54] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]),
+ (melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27287,7 +27638,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.SET_CONTENT__V56*/ meltfptr[55] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]),
+ (melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27309,7 +27660,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]),
+ (melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27331,7 +27682,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_ANY_BINDING__V58*/ meltfptr[57] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]),
+ (melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27353,7 +27704,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.FIND_ENV__V59*/ meltfptr[58] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]),
+ (melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27375,7 +27726,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.FRESH_ENV__V60*/ meltfptr[59] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]),
+ (melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27397,7 +27748,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.PUT_ENV__V61*/ meltfptr[60] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]),
+ (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27419,7 +27770,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]),
+ (melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27441,7 +27792,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_STRING__V63*/ meltfptr[62] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]),
+ (melt_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27463,7 +27814,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.REGISTER_OPTION__V64*/ meltfptr[63] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545]),
+ (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27485,7 +27836,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_PROPED__V65*/ meltfptr[64] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]),
+ (melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27507,7 +27858,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]),
+ (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27529,7 +27880,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_STRBUF__V67*/ meltfptr[66] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]),
+ (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27551,7 +27902,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]),
+ (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27573,7 +27924,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]),
+ (melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27595,7 +27946,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]),
+ (melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27617,7 +27968,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.WRAP_NORMAL_LETSEQ__V71*/ meltfptr[70] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]),
+ (melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27639,7 +27990,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CTYPE_VOID__V72*/ meltfptr[71] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]),
+ (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27661,7 +28012,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.NORMALIZE_BINDING__V73*/ meltfptr[72] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]),
+ (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27683,7 +28034,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]),
+ (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27705,7 +28056,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_SOURCE_PATTERN_LIST__V75*/ meltfptr[74] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]),
+ (melt_ptr_t) ( /*_.VALDATA___V1111*/ meltfptr[1110]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27727,7 +28078,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.ADD2OUT__V76*/ meltfptr[75] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1129*/ meltfptr[1128]),
+ (melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27749,7 +28100,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_INTEGER__V77*/ meltfptr[76] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]),
+ (melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27771,7 +28122,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.COMPARE_NAMED_ALPHA__V78*/ meltfptr[77] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1150*/ meltfptr[1149]),
+ (melt_ptr_t) ( /*_.VALDATA___V1167*/ meltfptr[1166]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27793,7 +28144,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_SETQ__V79*/ meltfptr[78] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]),
+ (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27815,7 +28166,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323]),
+ (melt_ptr_t) ( /*_.VALDATA___V1341*/ meltfptr[1340]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27837,7 +28188,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CTYPE_LONG__V81*/ meltfptr[80] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325]),
+ (melt_ptr_t) ( /*_.VALDATA___V1343*/ meltfptr[1342]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27859,7 +28210,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.DISCR_VERBATIM_STRING__V82*/ meltfptr[81] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327]),
+ (melt_ptr_t) ( /*_.VALDATA___V1345*/ meltfptr[1344]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27881,7 +28232,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_IFISA__V83*/ meltfptr[82] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]),
+ (melt_ptr_t) ( /*_.VALDATA___V1351*/ meltfptr[1350]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27903,7 +28254,7 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_PROGN__V84*/ meltfptr[83] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]),
+ (melt_ptr_t) ( /*_.VALDATA___V1353*/ meltfptr[1352]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27925,7 +28276,29 @@ start_module_melt (void *modargp_)
argtab[2].meltbp_cstring = "warmelt-normatch";
/*_.CLASS_NREP_IFTUPLESIZED__V85*/ meltfptr[84] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]),
+ (melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]),
+ (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
+ ""), argtab, "", (union meltparam_un *) 0);
+ }
+
+ /*^apply */
+
+ /*apply */
+ {
+ union meltparam_un argtab[3];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+
+ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3];
+ /*^apply.arg */
+
+ argtab[1].meltbp_cstring = "CLASS_NREP_IFCOMMON";
+ /*^apply.arg */
+
+ argtab[2].meltbp_cstring = "warmelt-normatch";
+ /*_.CLASS_NREP_IFCOMMON__V86*/ meltfptr[85] =
+ melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
+ (melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27945,9 +28318,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-normatch";
- /*_.CLASS_NREP_IFSAME__V86*/ meltfptr[85] =
+ /*_.CLASS_NREP_IFSAME__V87*/ meltfptr[86] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343]),
+ (melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27967,9 +28340,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-normatch";
- /*_.LIST_MAP__V87*/ meltfptr[86] =
+ /*_.LIST_MAP__V88*/ meltfptr[87] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]),
+ (melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -27989,9 +28362,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-normatch";
- /*_.CLASS_NREP_IF__V88*/ meltfptr[87] =
+ /*_.CLASS_NREP_IF__V89*/ meltfptr[88] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355]),
+ (melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -28011,9 +28384,9 @@ start_module_melt (void *modargp_)
/*^apply.arg */
argtab[2].meltbp_cstring = "warmelt-normatch";
- /*_.CLASS_CMATCHER__V89*/ meltfptr[88] =
+ /*_.CLASS_CMATCHER__V90*/ meltfptr[89] =
melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]),
- (melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]),
+ (melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415]),
(MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING
""), argtab, "", (union meltparam_un *) 0);
}
@@ -28086,1014 +28459,1016 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V90*/ meltfptr[89])) ==
+ ( /*_.VALDATA___V91*/ meltfptr[90])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V90*/ meltfptr[89]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V90*/ meltfptr[89]))->obj_vartab[1] =
+ ( /*_.VALDATA___V91*/ meltfptr[90]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V91*/ meltfptr[90]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V91*/ meltfptr[90]);
+ /*_.VALSTR___V92*/ meltfptr[91]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V90*/ meltfptr[89]);
+ meltgc_touch ( /*_.VALDATA___V91*/ meltfptr[90]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V92*/ meltfptr[91])) ==
+ ( /*_.VALDATA___V93*/ meltfptr[92])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V92*/ meltfptr[91]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V92*/ meltfptr[91]))->obj_vartab[1] =
+ ( /*_.VALDATA___V93*/ meltfptr[92]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V93*/ meltfptr[92]);
+ /*_.VALSTR___V94*/ meltfptr[93]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V92*/ meltfptr[91]);
+ meltgc_touch ( /*_.VALDATA___V93*/ meltfptr[92]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93])) ==
+ ( /*_.VALDATA___V95*/ meltfptr[94])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]))->obj_vartab[1] =
+ ( /*_.VALDATA___V95*/ meltfptr[94]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V95*/ meltfptr[94]);
+ /*_.VALSTR___V96*/ meltfptr[95]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93])) ==
+ ( /*_.VALDATA___V95*/ meltfptr[94])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]))->obj_vartab[4] =
+ ( /*_.VALDATA___V95*/ meltfptr[94]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*putupl#12 */
melt_assertmsg ("putupl #12 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V96*/ meltfptr[95])) ==
+ ( /*_.VALTUP___V97*/ meltfptr[96])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #12 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V96*/
- meltfptr[95]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V96*/ meltfptr[95]))->tabval[0] =
+ ( /*_.VALTUP___V97*/
+ meltfptr[96]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V97*/ meltfptr[96]))->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V96*/ meltfptr[95]);
+ meltgc_touch ( /*_.VALTUP___V97*/ meltfptr[96]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93])) ==
+ ( /*_.VALDATA___V95*/ meltfptr[94])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]))->obj_vartab[5] =
+ ( /*_.VALDATA___V95*/ meltfptr[94]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V96*/ meltfptr[95]);
+ /*_.VALTUP___V97*/ meltfptr[96]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V97*/ meltfptr[96])) ==
+ ( /*_.VALDATA___V98*/ meltfptr[97])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V97*/ meltfptr[96]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[1] =
+ ( /*_.VALDATA___V98*/ meltfptr[97]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V98*/ meltfptr[97]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V98*/ meltfptr[97]);
+ /*_.VALSTR___V99*/ meltfptr[98]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V97*/ meltfptr[96])) ==
+ ( /*_.VALDATA___V98*/ meltfptr[97])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V97*/ meltfptr[96]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[2] =
+ ( /*_.VALDATA___V98*/ meltfptr[97]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V98*/ meltfptr[97]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V97*/ meltfptr[96]);
+ meltgc_touch ( /*_.VALDATA___V98*/ meltfptr[97]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V99*/ meltfptr[98])) ==
+ ( /*_.VALDATA___V100*/ meltfptr[99])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V99*/ meltfptr[98]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V99*/ meltfptr[98]))->obj_vartab[1] =
+ ( /*_.VALDATA___V100*/
+ meltfptr[99]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V100*/ meltfptr[99]);
+ /*_.VALSTR___V101*/ meltfptr[100]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V99*/ meltfptr[98])) ==
+ ( /*_.VALDATA___V100*/ meltfptr[99])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V99*/ meltfptr[98]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V99*/ meltfptr[98]))->obj_vartab[2] =
+ ( /*_.VALDATA___V100*/
+ meltfptr[99]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V99*/ meltfptr[98]);
+ meltgc_touch ( /*_.VALDATA___V100*/ meltfptr[99]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V101*/ meltfptr[100])) ==
+ ( /*_.VALDATA___V102*/ meltfptr[101])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V101*/
- meltfptr[100]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V101*/ meltfptr[100]))->obj_vartab[1] =
+ ( /*_.VALDATA___V102*/
+ meltfptr[101]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V102*/ meltfptr[101]);
+ /*_.VALSTR___V103*/ meltfptr[102]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V101*/ meltfptr[100])) ==
+ ( /*_.VALDATA___V102*/ meltfptr[101])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V101*/
- meltfptr[100]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V101*/ meltfptr[100]))->obj_vartab[2] =
+ ( /*_.VALDATA___V102*/
+ meltfptr[101]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V101*/ meltfptr[100]);
+ meltgc_touch ( /*_.VALDATA___V102*/ meltfptr[101]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V103*/ meltfptr[102])) ==
+ ( /*_.VALDATA___V104*/ meltfptr[103])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V103*/
- meltfptr[102]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V103*/ meltfptr[102]))->obj_vartab[1] =
+ ( /*_.VALDATA___V104*/
+ meltfptr[103]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V104*/ meltfptr[103]);
+ /*_.VALSTR___V105*/ meltfptr[104]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V103*/ meltfptr[102])) ==
+ ( /*_.VALDATA___V104*/ meltfptr[103])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V103*/
- meltfptr[102]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V103*/ meltfptr[102]))->obj_vartab[2] =
+ ( /*_.VALDATA___V104*/
+ meltfptr[103]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V103*/ meltfptr[102]);
+ meltgc_touch ( /*_.VALDATA___V104*/ meltfptr[103]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V105*/ meltfptr[104])) ==
+ ( /*_.VALDATA___V106*/ meltfptr[105])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V105*/
- meltfptr[104]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V105*/ meltfptr[104]))->obj_vartab[1] =
+ ( /*_.VALDATA___V106*/
+ meltfptr[105]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V106*/ meltfptr[105]);
+ /*_.VALSTR___V107*/ meltfptr[106]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V105*/ meltfptr[104])) ==
+ ( /*_.VALDATA___V106*/ meltfptr[105])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V105*/
- meltfptr[104]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V105*/ meltfptr[104]))->obj_vartab[2] =
+ ( /*_.VALDATA___V106*/
+ meltfptr[105]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V105*/ meltfptr[104]);
+ meltgc_touch ( /*_.VALDATA___V106*/ meltfptr[105]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V107*/ meltfptr[106])) ==
+ ( /*_.VALDATA___V108*/ meltfptr[107])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V107*/
- meltfptr[106]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V107*/ meltfptr[106]))->obj_vartab[1] =
+ ( /*_.VALDATA___V108*/
+ meltfptr[107]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V108*/ meltfptr[107]);
+ /*_.VALSTR___V109*/ meltfptr[108]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V107*/ meltfptr[106])) ==
+ ( /*_.VALDATA___V108*/ meltfptr[107])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V107*/
- meltfptr[106]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V107*/ meltfptr[106]))->obj_vartab[2] =
+ ( /*_.VALDATA___V108*/
+ meltfptr[107]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V107*/ meltfptr[106]);
+ meltgc_touch ( /*_.VALDATA___V108*/ meltfptr[107]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V109*/ meltfptr[108])) ==
+ ( /*_.VALDATA___V110*/ meltfptr[109])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V109*/
- meltfptr[108]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V109*/ meltfptr[108]))->obj_vartab[1] =
+ ( /*_.VALDATA___V110*/
+ meltfptr[109]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V110*/ meltfptr[109]);
+ /*_.VALSTR___V111*/ meltfptr[110]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V109*/ meltfptr[108])) ==
+ ( /*_.VALDATA___V110*/ meltfptr[109])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V109*/
- meltfptr[108]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V109*/ meltfptr[108]))->obj_vartab[2] =
+ ( /*_.VALDATA___V110*/
+ meltfptr[109]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V109*/ meltfptr[108]);
+ meltgc_touch ( /*_.VALDATA___V110*/ meltfptr[109]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V111*/ meltfptr[110])) ==
+ ( /*_.VALDATA___V112*/ meltfptr[111])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V111*/
- meltfptr[110]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V111*/ meltfptr[110]))->obj_vartab[1] =
+ ( /*_.VALDATA___V112*/
+ meltfptr[111]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V112*/ meltfptr[111]);
+ /*_.VALSTR___V113*/ meltfptr[112]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V111*/ meltfptr[110])) ==
+ ( /*_.VALDATA___V112*/ meltfptr[111])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V111*/
- meltfptr[110]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V111*/ meltfptr[110]))->obj_vartab[2] =
+ ( /*_.VALDATA___V112*/
+ meltfptr[111]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V111*/ meltfptr[110]);
+ meltgc_touch ( /*_.VALDATA___V112*/ meltfptr[111]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V113*/ meltfptr[112])) ==
+ ( /*_.VALDATA___V114*/ meltfptr[113])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V113*/
- meltfptr[112]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V113*/ meltfptr[112]))->obj_vartab[1] =
+ ( /*_.VALDATA___V114*/
+ meltfptr[113]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V114*/ meltfptr[113]);
+ /*_.VALSTR___V115*/ meltfptr[114]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V113*/ meltfptr[112])) ==
+ ( /*_.VALDATA___V114*/ meltfptr[113])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V113*/
- meltfptr[112]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V113*/ meltfptr[112]))->obj_vartab[2] =
+ ( /*_.VALDATA___V114*/
+ meltfptr[113]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V113*/ meltfptr[112]);
+ meltgc_touch ( /*_.VALDATA___V114*/ meltfptr[113]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V115*/ meltfptr[114])) ==
+ ( /*_.VALDATA___V116*/ meltfptr[115])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V115*/
- meltfptr[114]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[1] =
+ ( /*_.VALDATA___V116*/
+ meltfptr[115]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V116*/ meltfptr[115]);
+ /*_.VALSTR___V117*/ meltfptr[116]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V115*/ meltfptr[114])) ==
+ ( /*_.VALDATA___V116*/ meltfptr[115])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V115*/
- meltfptr[114]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[2] =
+ ( /*_.VALDATA___V116*/
+ meltfptr[115]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V115*/ meltfptr[114]);
+ meltgc_touch ( /*_.VALDATA___V116*/ meltfptr[115]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V117*/ meltfptr[116])) ==
+ ( /*_.VALDATA___V118*/ meltfptr[117])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V117*/
- meltfptr[116]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V117*/ meltfptr[116]))->obj_vartab[1] =
+ ( /*_.VALDATA___V118*/
+ meltfptr[117]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V118*/ meltfptr[117]);
+ /*_.VALSTR___V119*/ meltfptr[118]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V117*/ meltfptr[116])) ==
+ ( /*_.VALDATA___V118*/ meltfptr[117])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V117*/
- meltfptr[116]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V117*/ meltfptr[116]))->obj_vartab[2] =
+ ( /*_.VALDATA___V118*/
+ meltfptr[117]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V94*/ meltfptr[93]);
+ /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V117*/ meltfptr[116]);
+ meltgc_touch ( /*_.VALDATA___V118*/ meltfptr[117]);
/*putupl#13 */
melt_assertmsg ("putupl #13 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #13 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V98*/ meltfptr[97]);
/*putupl#14 */
melt_assertmsg ("putupl #14 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #14 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V99*/ meltfptr[98]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]);
/*putupl#15 */
melt_assertmsg ("putupl #15 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #15 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V101*/ meltfptr[100]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]);
/*putupl#16 */
melt_assertmsg ("putupl #16 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #16 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V103*/ meltfptr[102]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]);
/*putupl#17 */
melt_assertmsg ("putupl #17 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #17 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V105*/ meltfptr[104]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]);
/*putupl#18 */
melt_assertmsg ("putupl #18 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #18 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V107*/ meltfptr[106]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]);
/*putupl#19 */
melt_assertmsg ("putupl #19 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #19 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V109*/ meltfptr[108]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]);
/*putupl#20 */
melt_assertmsg ("putupl #20 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #20 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V111*/ meltfptr[110]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]);
/*putupl#21 */
melt_assertmsg ("putupl #21 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #21 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V113*/ meltfptr[112]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]);
/*putupl#22 */
melt_assertmsg ("putupl #22 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #22 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V115*/ meltfptr[114]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]);
/*putupl#23 */
melt_assertmsg ("putupl #23 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V119*/ meltfptr[118])) ==
+ ( /*_.VALTUP___V120*/ meltfptr[119])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #23 checkoff",
(10 >= 0
&& 10 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V119*/
- meltfptr[118]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V119*/ meltfptr[118]))->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V117*/ meltfptr[116]);
+ ( /*_.VALTUP___V120*/
+ meltfptr[119]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V120*/ meltfptr[119]))->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V119*/ meltfptr[118]);
+ meltgc_touch ( /*_.VALTUP___V120*/ meltfptr[119]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93])) ==
+ ( /*_.VALDATA___V95*/ meltfptr[94])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V94*/ meltfptr[93]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]))->obj_vartab[6] =
+ ( /*_.VALDATA___V95*/ meltfptr[94]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V119*/ meltfptr[118]);
+ /*_.VALTUP___V120*/ meltfptr[119]);
MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V94*/ meltfptr[93]);
+ meltgc_touch ( /*_.VALDATA___V95*/ meltfptr[94]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V120*/ meltfptr[119])) ==
+ ( /*_.VALDATA___V121*/ meltfptr[120])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V120*/
- meltfptr[119]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119]))->obj_vartab[1] =
+ ( /*_.VALDATA___V121*/
+ meltfptr[120]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V121*/ meltfptr[120]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V121*/ meltfptr[120]);
+ /*_.VALSTR___V122*/ meltfptr[121]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V120*/ meltfptr[119]);
+ meltgc_touch ( /*_.VALDATA___V121*/ meltfptr[120]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V122*/ meltfptr[121])) ==
+ ( /*_.VALDATA___V123*/ meltfptr[122])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V122*/
- meltfptr[121]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V122*/ meltfptr[121]))->obj_vartab[1] =
+ ( /*_.VALDATA___V123*/
+ meltfptr[122]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V123*/ meltfptr[122]);
+ /*_.VALSTR___V124*/ meltfptr[123]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V122*/ meltfptr[121]);
+ meltgc_touch ( /*_.VALDATA___V123*/ meltfptr[122]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V124*/ meltfptr[123])) ==
+ ( /*_.VALDATA___V125*/ meltfptr[124])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V124*/
- meltfptr[123]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V124*/ meltfptr[123]))->obj_vartab[1] =
+ ( /*_.VALDATA___V125*/
+ meltfptr[124]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V125*/ meltfptr[124]);
+ /*_.VALSTR___V126*/ meltfptr[125]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V124*/ meltfptr[123]);
+ meltgc_touch ( /*_.VALDATA___V125*/ meltfptr[124]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V126*/ meltfptr[125])) ==
+ ( /*_.VALDATA___V127*/ meltfptr[126])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V126*/
- meltfptr[125]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V126*/ meltfptr[125]))->obj_vartab[1] =
+ ( /*_.VALDATA___V127*/
+ meltfptr[126]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V127*/ meltfptr[126]);
+ /*_.VALSTR___V128*/ meltfptr[127]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V126*/ meltfptr[125]);
+ meltgc_touch ( /*_.VALDATA___V127*/ meltfptr[126]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V128*/ meltfptr[127])) ==
+ ( /*_.VALDATA___V129*/ meltfptr[128])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V128*/
- meltfptr[127]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V128*/ meltfptr[127]))->obj_vartab[1] =
+ ( /*_.VALDATA___V129*/
+ meltfptr[128]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V129*/ meltfptr[128]);
+ /*_.VALSTR___V130*/ meltfptr[129]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V128*/ meltfptr[127]);
+ meltgc_touch ( /*_.VALDATA___V129*/ meltfptr[128]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V130*/ meltfptr[129])) ==
+ ( /*_.VALDATA___V131*/ meltfptr[130])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V130*/
- meltfptr[129]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V130*/ meltfptr[129]))->obj_vartab[1] =
+ ( /*_.VALDATA___V131*/
+ meltfptr[130]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V131*/ meltfptr[130]);
+ /*_.VALSTR___V132*/ meltfptr[131]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V130*/ meltfptr[129]);
+ meltgc_touch ( /*_.VALDATA___V131*/ meltfptr[130]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V132*/ meltfptr[131])) ==
+ ( /*_.VALDATA___V133*/ meltfptr[132])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V132*/
- meltfptr[131]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V132*/ meltfptr[131]))->obj_vartab[1] =
+ ( /*_.VALDATA___V133*/
+ meltfptr[132]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V133*/ meltfptr[132]);
+ /*_.VALSTR___V134*/ meltfptr[133]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V132*/ meltfptr[131]);
+ meltgc_touch ( /*_.VALDATA___V133*/ meltfptr[132]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V134*/ meltfptr[133])) ==
+ ( /*_.VALDATA___V135*/ meltfptr[134])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V134*/
- meltfptr[133]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V134*/ meltfptr[133]))->obj_vartab[1] =
+ ( /*_.VALDATA___V135*/
+ meltfptr[134]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V135*/ meltfptr[134]);
+ /*_.VALSTR___V136*/ meltfptr[135]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V134*/ meltfptr[133]);
+ meltgc_touch ( /*_.VALDATA___V135*/ meltfptr[134]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V136*/ meltfptr[135])) ==
+ ( /*_.VALDATA___V137*/ meltfptr[136])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V136*/
- meltfptr[135]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V136*/ meltfptr[135]))->obj_vartab[1] =
+ ( /*_.VALDATA___V137*/
+ meltfptr[136]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V137*/ meltfptr[136]);
+ /*_.VALSTR___V138*/ meltfptr[137]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V136*/ meltfptr[135]);
+ meltgc_touch ( /*_.VALDATA___V137*/ meltfptr[136]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V138*/ meltfptr[137])) ==
+ ( /*_.VALDATA___V139*/ meltfptr[138])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V138*/
- meltfptr[137]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V138*/ meltfptr[137]))->obj_vartab[1] =
+ ( /*_.VALDATA___V139*/
+ meltfptr[138]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V139*/ meltfptr[138]);
+ /*_.VALSTR___V140*/ meltfptr[139]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V138*/ meltfptr[137]);
+ meltgc_touch ( /*_.VALDATA___V139*/ meltfptr[138]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V140*/ meltfptr[139])) ==
+ ( /*_.VALDATA___V141*/ meltfptr[140])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V140*/
- meltfptr[139]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V140*/ meltfptr[139]))->obj_vartab[1] =
+ ( /*_.VALDATA___V141*/
+ meltfptr[140]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V141*/ meltfptr[140]);
+ /*_.VALSTR___V142*/ meltfptr[141]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V140*/ meltfptr[139]);
+ meltgc_touch ( /*_.VALDATA___V141*/ meltfptr[140]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V142*/ meltfptr[141])) ==
+ ( /*_.VALDATA___V143*/ meltfptr[142])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V142*/
- meltfptr[141]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V142*/ meltfptr[141]))->obj_vartab[1] =
+ ( /*_.VALDATA___V143*/
+ meltfptr[142]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V143*/ meltfptr[142]);
+ /*_.VALSTR___V144*/ meltfptr[143]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V142*/ meltfptr[141]);
+ meltgc_touch ( /*_.VALDATA___V143*/ meltfptr[142]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V144*/ meltfptr[143])) ==
+ ( /*_.VALDATA___V145*/ meltfptr[144])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V144*/
- meltfptr[143]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V144*/ meltfptr[143]))->obj_vartab[1] =
+ ( /*_.VALDATA___V145*/
+ meltfptr[144]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V145*/ meltfptr[144]);
+ /*_.VALSTR___V146*/ meltfptr[145]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V144*/ meltfptr[143]);
+ meltgc_touch ( /*_.VALDATA___V145*/ meltfptr[144]);
MELT_LOCATION ("warmelt-normatch.melt:78:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V146*/ meltfptr[145])) ==
+ ( /*_.VALDATA___V147*/ meltfptr[146])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V146*/
- meltfptr[145]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]))->obj_vartab[1] =
+ ( /*_.VALDATA___V147*/
+ meltfptr[146]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V147*/ meltfptr[146]);
+ /*_.VALSTR___V148*/ meltfptr[147]);
MELT_LOCATION ("warmelt-normatch.melt:78:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V146*/ meltfptr[145]);
+ meltgc_touch ( /*_.VALDATA___V147*/ meltfptr[146]);
MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V148*/ meltfptr[147])) ==
+ ( /*_.VALROUT___V149*/ meltfptr[148])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_59__SCANPAT_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V148*/ meltfptr[147])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V149*/ meltfptr[148])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk");
@@ -29101,133 +29476,133 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V148*/ meltfptr[147])) ==
+ ( /*_.VALROUT___V149*/ meltfptr[148])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V148*/ meltfptr[147])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V149*/ meltfptr[148])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V148*/ meltfptr[147])) ==
+ ( /*_.VALROUT___V149*/ meltfptr[148])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_59__SCANPAT_ANYRECV#2",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V148*/ meltfptr[147])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V149*/ meltfptr[148])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V148*/ meltfptr[147]);
+ meltgc_touch ( /*_.VALROUT___V149*/ meltfptr[148]);
/*putclosurout#6 */
melt_assertmsg ("putclosrout#6 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V149*/ meltfptr[148])) ==
+ ( /*_.VALCLO___V150*/ meltfptr[149])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#6 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V148*/ meltfptr[147])) ==
+ ( /*_.VALROUT___V149*/ meltfptr[148])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V149*/ meltfptr[148])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V148*/ meltfptr[147]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V150*/ meltfptr[149])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V149*/ meltfptr[148]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V149*/ meltfptr[148]);
+ meltgc_touch ( /*_.VALCLO___V150*/ meltfptr[149]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V150*/ meltfptr[149])) ==
+ ( /*_.VALDATA___V151*/ meltfptr[150])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V150*/
- meltfptr[149]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[1] =
+ ( /*_.VALDATA___V151*/
+ meltfptr[150]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V151*/ meltfptr[150]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V151*/ meltfptr[150]);
+ /*_.VALSTR___V152*/ meltfptr[151]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V150*/ meltfptr[149]);
+ meltgc_touch ( /*_.VALDATA___V151*/ meltfptr[150]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V152*/ meltfptr[151])) ==
+ ( /*_.VALDATA___V153*/ meltfptr[152])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V152*/
- meltfptr[151]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]))->obj_vartab[1] =
+ ( /*_.VALDATA___V153*/
+ meltfptr[152]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V153*/ meltfptr[152]);
+ /*_.VALSTR___V154*/ meltfptr[153]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V152*/ meltfptr[151]);
+ meltgc_touch ( /*_.VALDATA___V153*/ meltfptr[152]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V154*/ meltfptr[153])) ==
+ ( /*_.VALDATA___V155*/ meltfptr[154])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V154*/
- meltfptr[153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]))->obj_vartab[1] =
+ ( /*_.VALDATA___V155*/
+ meltfptr[154]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V155*/ meltfptr[154]);
+ /*_.VALSTR___V156*/ meltfptr[155]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V154*/ meltfptr[153]);
+ meltgc_touch ( /*_.VALDATA___V155*/ meltfptr[154]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V156*/ meltfptr[155])) ==
+ ( /*_.VALDATA___V157*/ meltfptr[156])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V156*/
- meltfptr[155]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V156*/ meltfptr[155]))->obj_vartab[1] =
+ ( /*_.VALDATA___V157*/
+ meltfptr[156]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V157*/ meltfptr[156]);
+ /*_.VALSTR___V158*/ meltfptr[157]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V156*/ meltfptr[155]);
+ meltgc_touch ( /*_.VALDATA___V157*/ meltfptr[156]);
MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V158*/ meltfptr[157])) ==
+ ( /*_.VALROUT___V159*/ meltfptr[158])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_69__SCANPAT_ANYPATTERN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V158*/ meltfptr[157])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V159*/ meltfptr[158])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk");
@@ -29235,12 +29610,12 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V158*/ meltfptr[157])) ==
+ ( /*_.VALROUT___V159*/ meltfptr[158])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_69__SCANPAT_ANYPATTERN#1",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V158*/ meltfptr[157])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V159*/ meltfptr[158])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk");
@@ -29248,76 +29623,76 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V158*/ meltfptr[157])) ==
+ ( /*_.VALROUT___V159*/ meltfptr[158])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V158*/ meltfptr[157])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V159*/ meltfptr[158])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V158*/ meltfptr[157])) ==
+ ( /*_.VALROUT___V159*/ meltfptr[158])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_69__SCANPAT_ANYPATTERN#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V158*/ meltfptr[157])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V159*/ meltfptr[158])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V158*/ meltfptr[157]);
+ meltgc_touch ( /*_.VALROUT___V159*/ meltfptr[158]);
/*putclosurout#7 */
melt_assertmsg ("putclosrout#7 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V159*/ meltfptr[158])) ==
+ ( /*_.VALCLO___V160*/ meltfptr[159])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#7 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V158*/ meltfptr[157])) ==
+ ( /*_.VALROUT___V159*/ meltfptr[158])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V159*/ meltfptr[158])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V158*/ meltfptr[157]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V160*/ meltfptr[159])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V159*/ meltfptr[158]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V159*/ meltfptr[158]);
+ meltgc_touch ( /*_.VALCLO___V160*/ meltfptr[159]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V160*/ meltfptr[159])) ==
+ ( /*_.VALDATA___V161*/ meltfptr[160])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V160*/
- meltfptr[159]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]))->obj_vartab[1] =
+ ( /*_.VALDATA___V161*/
+ meltfptr[160]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V161*/ meltfptr[160]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V161*/ meltfptr[160]);
+ /*_.VALSTR___V162*/ meltfptr[161]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V160*/ meltfptr[159]);
+ meltgc_touch ( /*_.VALDATA___V161*/ meltfptr[160]);
MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V162*/ meltfptr[161])) ==
+ ( /*_.VALROUT___V163*/ meltfptr[162])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_73__SCANPAT_SRCPATVAR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V162*/ meltfptr[161])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V163*/ meltfptr[162])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk");
@@ -29325,77 +29700,77 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V162*/ meltfptr[161])) ==
+ ( /*_.VALROUT___V163*/ meltfptr[162])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V162*/ meltfptr[161])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V163*/ meltfptr[162])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V162*/ meltfptr[161])) ==
+ ( /*_.VALROUT___V163*/ meltfptr[162])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_73__SCANPAT_SRCPATVAR#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V162*/ meltfptr[161])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V163*/ meltfptr[162])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V162*/ meltfptr[161]);
+ meltgc_touch ( /*_.VALROUT___V163*/ meltfptr[162]);
/*putclosurout#8 */
melt_assertmsg ("putclosrout#8 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V163*/ meltfptr[162])) ==
+ ( /*_.VALCLO___V164*/ meltfptr[163])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#8 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V162*/ meltfptr[161])) ==
+ ( /*_.VALROUT___V163*/ meltfptr[162])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V163*/ meltfptr[162])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V162*/ meltfptr[161]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V164*/ meltfptr[163])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V163*/ meltfptr[162]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V163*/ meltfptr[162]);
+ meltgc_touch ( /*_.VALCLO___V164*/ meltfptr[163]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V164*/ meltfptr[163])) ==
+ ( /*_.VALDATA___V165*/ meltfptr[164])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V164*/
- meltfptr[163]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[1] =
+ ( /*_.VALDATA___V165*/
+ meltfptr[164]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V165*/ meltfptr[164]);
+ /*_.VALSTR___V166*/ meltfptr[165]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V164*/ meltfptr[163]);
+ meltgc_touch ( /*_.VALDATA___V165*/ meltfptr[164]);
MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V166*/ meltfptr[165])) ==
+ ( /*_.VALROUT___V167*/ meltfptr[166])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_77__SCANPAT_SRCPATJOKER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V166*/ meltfptr[165])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V167*/ meltfptr[166])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk");
@@ -29403,80 +29778,80 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V166*/ meltfptr[165])) ==
+ ( /*_.VALROUT___V167*/ meltfptr[166])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V166*/ meltfptr[165])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V167*/ meltfptr[166])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V166*/ meltfptr[165])) ==
+ ( /*_.VALROUT___V167*/ meltfptr[166])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_77__SCANPAT_SRCPATJOKER#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V166*/ meltfptr[165])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V167*/ meltfptr[166])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V166*/ meltfptr[165]);
+ meltgc_touch ( /*_.VALROUT___V167*/ meltfptr[166]);
/*putclosurout#9 */
melt_assertmsg ("putclosrout#9 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V167*/ meltfptr[166])) ==
+ ( /*_.VALCLO___V168*/ meltfptr[167])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#9 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V166*/ meltfptr[165])) ==
+ ( /*_.VALROUT___V167*/ meltfptr[166])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V167*/ meltfptr[166])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V166*/ meltfptr[165]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V168*/ meltfptr[167])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V167*/ meltfptr[166]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V167*/ meltfptr[166]);
+ meltgc_touch ( /*_.VALCLO___V168*/ meltfptr[167]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V168*/ meltfptr[167])) ==
+ ( /*_.VALDATA___V169*/ meltfptr[168])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V168*/
- meltfptr[167]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]))->obj_vartab[1] =
+ ( /*_.VALDATA___V169*/
+ meltfptr[168]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V169*/ meltfptr[168]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V169*/ meltfptr[168]);
+ /*_.VALSTR___V170*/ meltfptr[169]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V168*/ meltfptr[167]);
+ meltgc_touch ( /*_.VALDATA___V169*/ meltfptr[168]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
@@ -29484,25 +29859,25 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#2",
NULL != ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
@@ -29510,13 +29885,13 @@ warmelt_normatch_initialmeltchunk_0 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#3",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[3] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
@@ -29535,13 +29910,13 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#4",
NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[4] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
@@ -29549,13 +29924,13 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#5",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[5] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
@@ -29563,13 +29938,13 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#6",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
@@ -29577,161 +29952,161 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_81__SCANPAT_SRCPATCONSTANT#7",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V170*/ meltfptr[169])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V171*/ meltfptr[170])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V170*/ meltfptr[169]);
+ meltgc_touch ( /*_.VALROUT___V171*/ meltfptr[170]);
/*putclosurout#10 */
melt_assertmsg ("putclosrout#10 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V171*/ meltfptr[170])) ==
+ ( /*_.VALCLO___V172*/ meltfptr[171])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#10 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V170*/ meltfptr[169])) ==
+ ( /*_.VALROUT___V171*/ meltfptr[170])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V171*/ meltfptr[170])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V170*/ meltfptr[169]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V172*/ meltfptr[171])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V171*/ meltfptr[170]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V171*/ meltfptr[170]);
+ meltgc_touch ( /*_.VALCLO___V172*/ meltfptr[171]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V172*/ meltfptr[171])) ==
+ ( /*_.VALDATA___V173*/ meltfptr[172])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V172*/
- meltfptr[171]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[1] =
+ ( /*_.VALDATA___V173*/
+ meltfptr[172]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V173*/ meltfptr[172]);
+ /*_.VALSTR___V174*/ meltfptr[173]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V172*/ meltfptr[171]);
+ meltgc_touch ( /*_.VALDATA___V173*/ meltfptr[172]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V174*/ meltfptr[173])) ==
+ ( /*_.VALDATA___V175*/ meltfptr[174])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V174*/
- meltfptr[173]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[1] =
+ ( /*_.VALDATA___V175*/
+ meltfptr[174]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V175*/ meltfptr[174]);
+ /*_.VALSTR___V176*/ meltfptr[175]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V174*/ meltfptr[173]);
+ meltgc_touch ( /*_.VALDATA___V175*/ meltfptr[174]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V176*/ meltfptr[175])) ==
+ ( /*_.VALDATA___V177*/ meltfptr[176])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V176*/
- meltfptr[175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[1] =
+ ( /*_.VALDATA___V177*/
+ meltfptr[176]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V177*/ meltfptr[176]);
+ /*_.VALSTR___V178*/ meltfptr[177]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V176*/ meltfptr[175]);
+ meltgc_touch ( /*_.VALDATA___V177*/ meltfptr[176]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V178*/ meltfptr[177])) ==
+ ( /*_.VALDATA___V179*/ meltfptr[178])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V178*/
- meltfptr[177]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]))->obj_vartab[1] =
+ ( /*_.VALDATA___V179*/
+ meltfptr[178]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V179*/ meltfptr[178]);
+ /*_.VALSTR___V180*/ meltfptr[179]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V178*/ meltfptr[177]);
+ meltgc_touch ( /*_.VALDATA___V179*/ meltfptr[178]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V180*/ meltfptr[179])) ==
+ ( /*_.VALDATA___V181*/ meltfptr[180])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V180*/
- meltfptr[179]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]))->obj_vartab[1] =
+ ( /*_.VALDATA___V181*/
+ meltfptr[180]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V181*/ meltfptr[180]);
+ /*_.VALSTR___V182*/ meltfptr[181]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V180*/ meltfptr[179]);
+ meltgc_touch ( /*_.VALDATA___V181*/ meltfptr[180]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V182*/ meltfptr[181])) ==
+ ( /*_.VALDATA___V183*/ meltfptr[182])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V182*/
- meltfptr[181]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]))->obj_vartab[1] =
+ ( /*_.VALDATA___V183*/
+ meltfptr[182]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V183*/ meltfptr[182]);
+ /*_.VALSTR___V184*/ meltfptr[183]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V182*/ meltfptr[181]);
+ meltgc_touch ( /*_.VALDATA___V183*/ meltfptr[182]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_95__SCANPAT_SRCPATCONSTRUCT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V184*/ meltfptr[183])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V185*/ meltfptr[184])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
@@ -29739,25 +30114,25 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V184*/ meltfptr[183])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V185*/ meltfptr[184])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_95__SCANPAT_SRCPATCONSTRUCT#2",
NULL != ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]));
- ((meltroutine_ptr_t) /*_.VALROUT___V184*/ meltfptr[183])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V185*/ meltfptr[184])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
@@ -29765,13 +30140,13 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_95__SCANPAT_SRCPATCONSTRUCT#3",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V184*/ meltfptr[183])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V185*/ meltfptr[184])->tabval[3] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
@@ -29779,1169 +30154,1169 @@ warmelt_normatch_initialmeltchunk_1 (struct frame_start_module_melt_st
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V184*/ meltfptr[183])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V185*/ meltfptr[184])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V184*/ meltfptr[183]);
+ meltgc_touch ( /*_.VALROUT___V185*/ meltfptr[184]);
/*putclosurout#11 */
melt_assertmsg ("putclosrout#11 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V185*/ meltfptr[184])) ==
+ ( /*_.VALCLO___V186*/ meltfptr[185])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#11 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V184*/ meltfptr[183])) ==
+ ( /*_.VALROUT___V185*/ meltfptr[184])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V185*/ meltfptr[184])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V184*/ meltfptr[183]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V186*/ meltfptr[185])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V185*/ meltfptr[184]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V185*/ meltfptr[184]);
+ meltgc_touch ( /*_.VALCLO___V186*/ meltfptr[185]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V186*/ meltfptr[185])) ==
+ ( /*_.VALDATA___V187*/ meltfptr[186])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V186*/
- meltfptr[185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[1] =
+ ( /*_.VALDATA___V187*/
+ meltfptr[186]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V187*/ meltfptr[186]);
+ /*_.VALSTR___V188*/ meltfptr[187]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V186*/ meltfptr[185]);
+ meltgc_touch ( /*_.VALDATA___V187*/ meltfptr[186]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V188*/ meltfptr[187])) ==
+ ( /*_.VALDATA___V189*/ meltfptr[188])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V188*/
- meltfptr[187]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[1] =
+ ( /*_.VALDATA___V189*/
+ meltfptr[188]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V189*/ meltfptr[188]);
+ /*_.VALSTR___V190*/ meltfptr[189]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V188*/ meltfptr[187]);
+ meltgc_touch ( /*_.VALDATA___V189*/ meltfptr[188]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#3",
NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#4",
NULL !=
( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#5",
NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#6",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_101__SCANPAT_SRCPATOBJECT#8",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V190*/ meltfptr[189])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V191*/ meltfptr[190])->tabval[8] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
- MELT_LOCATION ("warmelt-normatch.melt:241:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V190*/ meltfptr[189]);
+ meltgc_touch ( /*_.VALROUT___V191*/ meltfptr[190]);
/*putclosurout#12 */
melt_assertmsg ("putclosrout#12 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V191*/ meltfptr[190])) ==
+ ( /*_.VALCLO___V192*/ meltfptr[191])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#12 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V190*/ meltfptr[189])) ==
+ ( /*_.VALROUT___V191*/ meltfptr[190])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V191*/ meltfptr[190])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V190*/ meltfptr[189]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V192*/ meltfptr[191])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V191*/ meltfptr[190]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V191*/ meltfptr[190]);
+ meltgc_touch ( /*_.VALCLO___V192*/ meltfptr[191]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V192*/ meltfptr[191])) ==
+ ( /*_.VALDATA___V193*/ meltfptr[192])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V192*/
- meltfptr[191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[1] =
+ ( /*_.VALDATA___V193*/
+ meltfptr[192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V193*/ meltfptr[192]);
+ /*_.VALSTR___V194*/ meltfptr[193]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V192*/ meltfptr[191]);
+ meltgc_touch ( /*_.VALDATA___V193*/ meltfptr[192]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V194*/ meltfptr[193])) ==
+ ( /*_.VALDATA___V195*/ meltfptr[194])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V194*/
- meltfptr[193]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[1] =
+ ( /*_.VALDATA___V195*/
+ meltfptr[194]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V195*/ meltfptr[194]);
+ /*_.VALSTR___V196*/ meltfptr[195]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V194*/ meltfptr[193]);
+ meltgc_touch ( /*_.VALDATA___V195*/ meltfptr[194]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V196*/ meltfptr[195])) ==
+ ( /*_.VALDATA___V197*/ meltfptr[196])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V196*/
- meltfptr[195]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[1] =
+ ( /*_.VALDATA___V197*/
+ meltfptr[196]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V197*/ meltfptr[196]);
+ /*_.VALSTR___V198*/ meltfptr[197]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V196*/ meltfptr[195]);
+ meltgc_touch ( /*_.VALDATA___V197*/ meltfptr[196]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V198*/ meltfptr[197])) ==
+ ( /*_.VALDATA___V199*/ meltfptr[198])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V198*/
- meltfptr[197]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] =
+ ( /*_.VALDATA___V199*/
+ meltfptr[198]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V199*/ meltfptr[198]);
+ /*_.VALSTR___V200*/ meltfptr[199]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V198*/ meltfptr[197]);
+ meltgc_touch ( /*_.VALDATA___V199*/ meltfptr[198]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#2",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#3",
NULL != ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#4",
NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#5",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#6",
NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[6] =
(melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_111__SCANPAT_SRCPATCOMPOSITE#7",
NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]));
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[7] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V200*/ meltfptr[199])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V201*/ meltfptr[200])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-normatch.melt:279:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V200*/ meltfptr[199]);
+ meltgc_touch ( /*_.VALROUT___V201*/ meltfptr[200]);
/*putclosurout#13 */
melt_assertmsg ("putclosrout#13 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V201*/ meltfptr[200])) ==
+ ( /*_.VALCLO___V202*/ meltfptr[201])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#13 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V200*/ meltfptr[199])) ==
+ ( /*_.VALROUT___V201*/ meltfptr[200])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V201*/ meltfptr[200])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V200*/ meltfptr[199]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V202*/ meltfptr[201])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V201*/ meltfptr[200]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V201*/ meltfptr[200]);
+ meltgc_touch ( /*_.VALCLO___V202*/ meltfptr[201]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V202*/ meltfptr[201])) ==
+ ( /*_.VALDATA___V203*/ meltfptr[202])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V202*/
- meltfptr[201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]))->obj_vartab[1] =
+ ( /*_.VALDATA___V203*/
+ meltfptr[202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V203*/ meltfptr[202]);
+ /*_.VALSTR___V204*/ meltfptr[203]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V202*/ meltfptr[201]);
+ meltgc_touch ( /*_.VALDATA___V203*/ meltfptr[202]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V204*/ meltfptr[203])) ==
+ ( /*_.VALDATA___V205*/ meltfptr[204])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V204*/
- meltfptr[203]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] =
+ ( /*_.VALDATA___V205*/
+ meltfptr[204]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V205*/ meltfptr[204]);
+ /*_.VALSTR___V206*/ meltfptr[205]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V204*/ meltfptr[203]);
+ meltgc_touch ( /*_.VALDATA___V205*/ meltfptr[204]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V206*/ meltfptr[205])) ==
+ ( /*_.VALDATA___V207*/ meltfptr[206])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V206*/
- meltfptr[205]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] =
+ ( /*_.VALDATA___V207*/
+ meltfptr[206]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V207*/ meltfptr[206]);
+ /*_.VALSTR___V208*/ meltfptr[207]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V206*/ meltfptr[205]);
+ meltgc_touch ( /*_.VALDATA___V207*/ meltfptr[206]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V208*/ meltfptr[207])) ==
+ ( /*_.VALDATA___V209*/ meltfptr[208])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V208*/
- meltfptr[207]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[1] =
+ ( /*_.VALDATA___V209*/
+ meltfptr[208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V209*/ meltfptr[208]);
+ /*_.VALSTR___V210*/ meltfptr[209]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V208*/ meltfptr[207]);
+ meltgc_touch ( /*_.VALDATA___V209*/ meltfptr[208]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#3",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#4",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[4] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#5",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:353:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V211*/ meltfptr[210])) ==
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_127__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V212*/ meltfptr[211])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:353:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V211*/ meltfptr[210])) ==
+ ( /*_.VALROUT___V212*/ meltfptr[211])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_127__LAMBDA_#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V212*/ meltfptr[211])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:353:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V211*/ meltfptr[210]);
+ meltgc_touch ( /*_.VALROUT___V212*/ meltfptr[211]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#6",
- NULL != ( /*_.VALROUT___V211*/ meltfptr[210]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[6] =
- (melt_ptr_t) ( /*_.VALROUT___V211*/ meltfptr[210]);
+ NULL != ( /*_.VALROUT___V212*/ meltfptr[211]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALROUT___V212*/ meltfptr[211]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#8",
NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#9",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V210*/ meltfptr[209])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V211*/ meltfptr[210])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:341:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V210*/ meltfptr[209]);
+ meltgc_touch ( /*_.VALROUT___V211*/ meltfptr[210]);
/*putclosurout#14 */
melt_assertmsg ("putclosrout#14 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V212*/ meltfptr[211])) ==
+ ( /*_.VALCLO___V213*/ meltfptr[212])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#14 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V210*/ meltfptr[209])) ==
+ ( /*_.VALROUT___V211*/ meltfptr[210])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V212*/ meltfptr[211])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V210*/ meltfptr[209]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V213*/ meltfptr[212])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V211*/ meltfptr[210]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V212*/ meltfptr[211]);
+ meltgc_touch ( /*_.VALCLO___V213*/ meltfptr[212]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V213*/ meltfptr[212])) ==
+ ( /*_.VALDATA___V214*/ meltfptr[213])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V213*/
- meltfptr[212]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]))->obj_vartab[1] =
+ ( /*_.VALDATA___V214*/
+ meltfptr[213]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V214*/ meltfptr[213]);
+ /*_.VALSTR___V215*/ meltfptr[214]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V213*/ meltfptr[212]);
+ meltgc_touch ( /*_.VALDATA___V214*/ meltfptr[213]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V215*/ meltfptr[214])) ==
+ ( /*_.VALDATA___V216*/ meltfptr[215])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V215*/
- meltfptr[214]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[1] =
+ ( /*_.VALDATA___V216*/
+ meltfptr[215]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V216*/ meltfptr[215]);
+ /*_.VALSTR___V217*/ meltfptr[216]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V215*/ meltfptr[214]);
+ meltgc_touch ( /*_.VALDATA___V216*/ meltfptr[215]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V217*/ meltfptr[216])) ==
+ ( /*_.VALDATA___V218*/ meltfptr[217])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V217*/
- meltfptr[216]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V217*/ meltfptr[216]))->obj_vartab[1] =
+ ( /*_.VALDATA___V218*/
+ meltfptr[217]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V218*/ meltfptr[217]);
+ /*_.VALSTR___V219*/ meltfptr[218]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V217*/ meltfptr[216]);
+ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]);
- MELT_LOCATION ("warmelt-normatch.melt:415:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V219*/ meltfptr[218])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_130__SCANPAT_SRCPATAND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V219*/ meltfptr[218])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:415:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V219*/ meltfptr[218])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V219*/ meltfptr[218])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:415:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V219*/ meltfptr[218])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_130__SCANPAT_SRCPATAND#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V219*/ meltfptr[218])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-normatch.melt:415:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V219*/ meltfptr[218])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V219*/ meltfptr[218])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V220*/ meltfptr[219])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-normatch.melt:415:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V219*/ meltfptr[218]);
+ meltgc_touch ( /*_.VALROUT___V220*/ meltfptr[219]);
/*putclosurout#15 */
melt_assertmsg ("putclosrout#15 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V220*/ meltfptr[219])) ==
+ ( /*_.VALCLO___V221*/ meltfptr[220])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#15 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V219*/ meltfptr[218])) ==
+ ( /*_.VALROUT___V220*/ meltfptr[219])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V220*/ meltfptr[219])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V219*/ meltfptr[218]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V221*/ meltfptr[220])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V220*/ meltfptr[219]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V220*/ meltfptr[219]);
+ meltgc_touch ( /*_.VALCLO___V221*/ meltfptr[220]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V221*/ meltfptr[220])) ==
+ ( /*_.VALDATA___V222*/ meltfptr[221])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V221*/
- meltfptr[220]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]))->obj_vartab[1] =
+ ( /*_.VALDATA___V222*/
+ meltfptr[221]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V222*/ meltfptr[221]);
+ /*_.VALSTR___V223*/ meltfptr[222]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V221*/ meltfptr[220]);
+ meltgc_touch ( /*_.VALDATA___V222*/ meltfptr[221]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V223*/ meltfptr[222])) ==
+ ( /*_.VALDATA___V224*/ meltfptr[223])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V223*/
- meltfptr[222]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]))->obj_vartab[1] =
+ ( /*_.VALDATA___V224*/
+ meltfptr[223]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V224*/ meltfptr[223]);
+ /*_.VALSTR___V225*/ meltfptr[224]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V223*/ meltfptr[222]);
+ meltgc_touch ( /*_.VALDATA___V224*/ meltfptr[223]);
- MELT_LOCATION ("warmelt-normatch.melt:442:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:443:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V225*/ meltfptr[224])) ==
+ ( /*_.VALDATA___V226*/ meltfptr[225])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V225*/
- meltfptr[224]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[1] =
+ ( /*_.VALDATA___V226*/
+ meltfptr[225]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V226*/ meltfptr[225]);
+ /*_.VALSTR___V227*/ meltfptr[226]);
- MELT_LOCATION ("warmelt-normatch.melt:442:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:443:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V225*/ meltfptr[224]);
+ meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V227*/ meltfptr[226])) ==
+ ( /*_.VALDATA___V228*/ meltfptr[227])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V227*/
- meltfptr[226]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V227*/ meltfptr[226]))->obj_vartab[1] =
+ ( /*_.VALDATA___V228*/
+ meltfptr[227]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V228*/ meltfptr[227]);
+ /*_.VALSTR___V229*/ meltfptr[228]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V227*/ meltfptr[226]);
+ meltgc_touch ( /*_.VALDATA___V228*/ meltfptr[227]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V229*/ meltfptr[228])) ==
+ ( /*_.VALDATA___V230*/ meltfptr[229])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V229*/
- meltfptr[228]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[1] =
+ ( /*_.VALDATA___V230*/
+ meltfptr[229]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V230*/ meltfptr[229]);
+ /*_.VALSTR___V231*/ meltfptr[230]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V229*/ meltfptr[228])) ==
+ ( /*_.VALDATA___V230*/ meltfptr[229])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V229*/
- meltfptr[228]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[4] =
+ ( /*_.VALDATA___V230*/
+ meltfptr[229]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*putupl#24 */
melt_assertmsg ("putupl #24 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V231*/ meltfptr[230])) ==
+ ( /*_.VALTUP___V232*/ meltfptr[231])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #24 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V231*/
- meltfptr[230]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V231*/ meltfptr[230]))->tabval[0] =
+ ( /*_.VALTUP___V232*/
+ meltfptr[231]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V232*/ meltfptr[231]))->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V231*/ meltfptr[230]);
+ meltgc_touch ( /*_.VALTUP___V232*/ meltfptr[231]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V229*/ meltfptr[228])) ==
+ ( /*_.VALDATA___V230*/ meltfptr[229])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V229*/
- meltfptr[228]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[5] =
+ ( /*_.VALDATA___V230*/
+ meltfptr[229]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V231*/ meltfptr[230]);
+ /*_.VALTUP___V232*/ meltfptr[231]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V232*/ meltfptr[231])) ==
+ ( /*_.VALDATA___V233*/ meltfptr[232])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V232*/
- meltfptr[231]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[1] =
+ ( /*_.VALDATA___V233*/
+ meltfptr[232]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V233*/ meltfptr[232]);
+ /*_.VALSTR___V234*/ meltfptr[233]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V232*/ meltfptr[231])) ==
+ ( /*_.VALDATA___V233*/ meltfptr[232])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V232*/
- meltfptr[231]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[2] =
+ ( /*_.VALDATA___V233*/
+ meltfptr[232]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V229*/ meltfptr[228]);
+ /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V232*/ meltfptr[231]);
+ meltgc_touch ( /*_.VALDATA___V233*/ meltfptr[232]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V234*/ meltfptr[233])) ==
+ ( /*_.VALDATA___V235*/ meltfptr[234])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V234*/
- meltfptr[233]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] =
+ ( /*_.VALDATA___V235*/
+ meltfptr[234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V235*/ meltfptr[234]);
+ /*_.VALSTR___V236*/ meltfptr[235]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V234*/ meltfptr[233])) ==
+ ( /*_.VALDATA___V235*/ meltfptr[234])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V234*/
- meltfptr[233]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[2] =
+ ( /*_.VALDATA___V235*/
+ meltfptr[234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V229*/ meltfptr[228]);
+ /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V234*/ meltfptr[233]);
+ meltgc_touch ( /*_.VALDATA___V235*/ meltfptr[234]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V236*/ meltfptr[235])) ==
+ ( /*_.VALDATA___V237*/ meltfptr[236])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V236*/
- meltfptr[235]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] =
+ ( /*_.VALDATA___V237*/
+ meltfptr[236]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V237*/ meltfptr[236]);
+ /*_.VALSTR___V238*/ meltfptr[237]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V236*/ meltfptr[235])) ==
+ ( /*_.VALDATA___V237*/ meltfptr[236])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V236*/
- meltfptr[235]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[2] =
+ ( /*_.VALDATA___V237*/
+ meltfptr[236]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V229*/ meltfptr[228]);
+ /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V236*/ meltfptr[235]);
+ meltgc_touch ( /*_.VALDATA___V237*/ meltfptr[236]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V238*/ meltfptr[237])) ==
+ ( /*_.VALDATA___V239*/ meltfptr[238])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V238*/
- meltfptr[237]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[1] =
+ ( /*_.VALDATA___V239*/
+ meltfptr[238]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V239*/ meltfptr[238]);
+ /*_.VALSTR___V240*/ meltfptr[239]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V238*/ meltfptr[237])) ==
+ ( /*_.VALDATA___V239*/ meltfptr[238])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V238*/
- meltfptr[237]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[2] =
+ ( /*_.VALDATA___V239*/
+ meltfptr[238]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V229*/ meltfptr[228]);
+ /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V238*/ meltfptr[237]);
+ meltgc_touch ( /*_.VALDATA___V239*/ meltfptr[238]);
/*putupl#25 */
melt_assertmsg ("putupl #25 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V240*/ meltfptr[239])) ==
+ ( /*_.VALTUP___V241*/ meltfptr[240])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #25 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V240*/
- meltfptr[239]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V240*/ meltfptr[239]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]);
+ ( /*_.VALTUP___V241*/
+ meltfptr[240]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V241*/ meltfptr[240]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]);
/*putupl#26 */
melt_assertmsg ("putupl #26 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V240*/ meltfptr[239])) ==
+ ( /*_.VALTUP___V241*/ meltfptr[240])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #26 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V240*/
- meltfptr[239]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V240*/ meltfptr[239]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]);
+ ( /*_.VALTUP___V241*/
+ meltfptr[240]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V241*/ meltfptr[240]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]);
/*putupl#27 */
melt_assertmsg ("putupl #27 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V240*/ meltfptr[239])) ==
+ ( /*_.VALTUP___V241*/ meltfptr[240])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #27 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V240*/
- meltfptr[239]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V240*/ meltfptr[239]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]);
+ ( /*_.VALTUP___V241*/
+ meltfptr[240]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V241*/ meltfptr[240]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]);
#undef meltfram__
@@ -30957,205 +31332,205 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#28*/
melt_assertmsg ("putupl #28 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V240*/ meltfptr[239])) ==
+ ( /*_.VALTUP___V241*/ meltfptr[240])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #28 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V240*/
- meltfptr[239]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V240*/ meltfptr[239]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]);
+ ( /*_.VALTUP___V241*/
+ meltfptr[240]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V241*/ meltfptr[240]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V240*/ meltfptr[239]);
+ meltgc_touch ( /*_.VALTUP___V241*/ meltfptr[240]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V229*/ meltfptr[228])) ==
+ ( /*_.VALDATA___V230*/ meltfptr[229])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V229*/
- meltfptr[228]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[6] =
+ ( /*_.VALDATA___V230*/
+ meltfptr[229]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V240*/ meltfptr[239]);
+ /*_.VALTUP___V241*/ meltfptr[240]);
- MELT_LOCATION ("warmelt-normatch.melt:447:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V229*/ meltfptr[228]);
+ meltgc_touch ( /*_.VALDATA___V230*/ meltfptr[229]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V241*/ meltfptr[240])) ==
+ ( /*_.VALDATA___V242*/ meltfptr[241])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V241*/
- meltfptr[240]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]))->obj_vartab[1] =
+ ( /*_.VALDATA___V242*/
+ meltfptr[241]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V242*/ meltfptr[241]);
+ /*_.VALSTR___V243*/ meltfptr[242]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V241*/ meltfptr[240]);
+ meltgc_touch ( /*_.VALDATA___V242*/ meltfptr[241]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V243*/ meltfptr[242])) ==
+ ( /*_.VALDATA___V244*/ meltfptr[243])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V243*/
- meltfptr[242]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]))->obj_vartab[1] =
+ ( /*_.VALDATA___V244*/
+ meltfptr[243]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V244*/ meltfptr[243]);
+ /*_.VALSTR___V245*/ meltfptr[244]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V243*/ meltfptr[242]);
+ meltgc_touch ( /*_.VALDATA___V244*/ meltfptr[243]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V245*/ meltfptr[244])) ==
+ ( /*_.VALDATA___V246*/ meltfptr[245])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V245*/
- meltfptr[244]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[1] =
+ ( /*_.VALDATA___V246*/
+ meltfptr[245]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V246*/ meltfptr[245]);
+ /*_.VALSTR___V247*/ meltfptr[246]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V245*/ meltfptr[244]);
+ meltgc_touch ( /*_.VALDATA___V246*/ meltfptr[245]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V247*/ meltfptr[246])) ==
+ ( /*_.VALDATA___V248*/ meltfptr[247])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V247*/
- meltfptr[246]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[1] =
+ ( /*_.VALDATA___V248*/
+ meltfptr[247]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V248*/ meltfptr[247]);
+ /*_.VALSTR___V249*/ meltfptr[248]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V247*/ meltfptr[246]);
+ meltgc_touch ( /*_.VALDATA___V248*/ meltfptr[247]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V249*/ meltfptr[248])) ==
+ ( /*_.VALDATA___V250*/ meltfptr[249])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V249*/
- meltfptr[248]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]))->obj_vartab[1] =
+ ( /*_.VALDATA___V250*/
+ meltfptr[249]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V250*/ meltfptr[249]);
+ /*_.VALSTR___V251*/ meltfptr[250]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V249*/ meltfptr[248]);
+ meltgc_touch ( /*_.VALDATA___V250*/ meltfptr[249]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V251*/ meltfptr[250])) ==
+ ( /*_.VALDATA___V252*/ meltfptr[251])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V251*/
- meltfptr[250]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]))->obj_vartab[1] =
+ ( /*_.VALDATA___V252*/
+ meltfptr[251]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V252*/ meltfptr[251]);
+ /*_.VALSTR___V253*/ meltfptr[252]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V251*/ meltfptr[250]);
+ meltgc_touch ( /*_.VALDATA___V252*/ meltfptr[251]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V254*/ meltfptr[253])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[1] =
+ ( /*_.VALDATA___V254*/
+ meltfptr[253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V254*/ meltfptr[253]);
+ /*_.VALSTR___V255*/ meltfptr[254]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V254*/ meltfptr[253])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[4] =
+ ( /*_.VALDATA___V254*/
+ meltfptr[253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#29 */
melt_assertmsg ("putupl #29 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V255*/ meltfptr[254])) ==
+ ( /*_.VALTUP___V256*/ meltfptr[255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #29 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V255*/
- meltfptr[254]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[0] =
+ ( /*_.VALTUP___V256*/
+ meltfptr[255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V256*/ meltfptr[255]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31166,15 +31541,15 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#30 */
melt_assertmsg ("putupl #30 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V255*/ meltfptr[254])) ==
+ ( /*_.VALTUP___V256*/ meltfptr[255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #30 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V255*/
- meltfptr[254]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[1] =
+ ( /*_.VALTUP___V256*/
+ meltfptr[255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V256*/ meltfptr[255]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31185,296 +31560,296 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#31 */
melt_assertmsg ("putupl #31 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V255*/ meltfptr[254])) ==
+ ( /*_.VALTUP___V256*/ meltfptr[255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #31 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V255*/
- meltfptr[254]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V255*/ meltfptr[254]))->tabval[2] =
+ ( /*_.VALTUP___V256*/
+ meltfptr[255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V256*/ meltfptr[255]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V255*/ meltfptr[254]);
+ meltgc_touch ( /*_.VALTUP___V256*/ meltfptr[255]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V254*/ meltfptr[253])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[5] =
+ ( /*_.VALDATA___V254*/
+ meltfptr[253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V255*/ meltfptr[254]);
+ /*_.VALTUP___V256*/ meltfptr[255]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V256*/ meltfptr[255])) ==
+ ( /*_.VALDATA___V257*/ meltfptr[256])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V256*/
- meltfptr[255]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[1] =
+ ( /*_.VALDATA___V257*/
+ meltfptr[256]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V257*/ meltfptr[256]);
+ /*_.VALSTR___V258*/ meltfptr[257]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V256*/ meltfptr[255])) ==
+ ( /*_.VALDATA___V257*/ meltfptr[256])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V256*/
- meltfptr[255]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[2] =
+ ( /*_.VALDATA___V257*/
+ meltfptr[256]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V256*/ meltfptr[255]);
+ meltgc_touch ( /*_.VALDATA___V257*/ meltfptr[256]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V258*/ meltfptr[257])) ==
+ ( /*_.VALDATA___V259*/ meltfptr[258])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V258*/
- meltfptr[257]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[1] =
+ ( /*_.VALDATA___V259*/
+ meltfptr[258]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V259*/ meltfptr[258]);
+ /*_.VALSTR___V260*/ meltfptr[259]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V258*/ meltfptr[257])) ==
+ ( /*_.VALDATA___V259*/ meltfptr[258])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V258*/
- meltfptr[257]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[2] =
+ ( /*_.VALDATA___V259*/
+ meltfptr[258]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V258*/ meltfptr[257]);
+ meltgc_touch ( /*_.VALDATA___V259*/ meltfptr[258]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V260*/ meltfptr[259])) ==
+ ( /*_.VALDATA___V261*/ meltfptr[260])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V260*/
- meltfptr[259]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]))->obj_vartab[1] =
+ ( /*_.VALDATA___V261*/
+ meltfptr[260]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V261*/ meltfptr[260]);
+ /*_.VALSTR___V262*/ meltfptr[261]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V260*/ meltfptr[259])) ==
+ ( /*_.VALDATA___V261*/ meltfptr[260])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V260*/
- meltfptr[259]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]))->obj_vartab[2] =
+ ( /*_.VALDATA___V261*/
+ meltfptr[260]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V260*/ meltfptr[259]);
+ meltgc_touch ( /*_.VALDATA___V261*/ meltfptr[260]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V262*/ meltfptr[261])) ==
+ ( /*_.VALDATA___V263*/ meltfptr[262])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V262*/
- meltfptr[261]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]))->obj_vartab[1] =
+ ( /*_.VALDATA___V263*/
+ meltfptr[262]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V263*/ meltfptr[262]);
+ /*_.VALSTR___V264*/ meltfptr[263]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V262*/ meltfptr[261])) ==
+ ( /*_.VALDATA___V263*/ meltfptr[262])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V262*/
- meltfptr[261]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]))->obj_vartab[2] =
+ ( /*_.VALDATA___V263*/
+ meltfptr[262]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V262*/ meltfptr[261]);
+ meltgc_touch ( /*_.VALDATA___V263*/ meltfptr[262]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V265*/ meltfptr[264])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[1] =
+ ( /*_.VALDATA___V265*/
+ meltfptr[264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V265*/ meltfptr[264]);
+ /*_.VALSTR___V266*/ meltfptr[265]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V264*/ meltfptr[263])) ==
+ ( /*_.VALDATA___V265*/ meltfptr[264])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V264*/
- meltfptr[263]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[2] =
+ ( /*_.VALDATA___V265*/
+ meltfptr[264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V264*/ meltfptr[263]);
+ meltgc_touch ( /*_.VALDATA___V265*/ meltfptr[264]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V266*/ meltfptr[265])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V266*/
- meltfptr[265]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[1] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V267*/ meltfptr[266]);
+ /*_.VALSTR___V268*/ meltfptr[267]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V266*/ meltfptr[265])) ==
+ ( /*_.VALDATA___V267*/ meltfptr[266])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V266*/
- meltfptr[265]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[2] =
+ ( /*_.VALDATA___V267*/
+ meltfptr[266]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V266*/ meltfptr[265]);
+ meltgc_touch ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#32 */
melt_assertmsg ("putupl #32 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #32 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[0] =
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31485,294 +31860,294 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#33 */
melt_assertmsg ("putupl #33 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #33 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#34 */
melt_assertmsg ("putupl #34 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #34 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#35 */
melt_assertmsg ("putupl #35 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #35 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#36 */
melt_assertmsg ("putupl #36 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #36 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#37 */
melt_assertmsg ("putupl #37 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #37 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#38 */
melt_assertmsg ("putupl #38 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V268*/ meltfptr[267])) ==
+ ( /*_.VALTUP___V269*/ meltfptr[268])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #38 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V268*/
- meltfptr[267]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V269*/
+ meltfptr[268]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V269*/ meltfptr[268]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V268*/ meltfptr[267]);
+ meltgc_touch ( /*_.VALTUP___V269*/ meltfptr[268]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V253*/ meltfptr[252])) ==
+ ( /*_.VALDATA___V254*/ meltfptr[253])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V253*/
- meltfptr[252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[6] =
+ ( /*_.VALDATA___V254*/
+ meltfptr[253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V268*/ meltfptr[267]);
+ /*_.VALTUP___V269*/ meltfptr[268]);
- MELT_LOCATION ("warmelt-normatch.melt:466:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V253*/ meltfptr[252]);
+ meltgc_touch ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V269*/ meltfptr[268])) ==
+ ( /*_.VALDATA___V270*/ meltfptr[269])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V269*/
- meltfptr[268]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]))->obj_vartab[1] =
+ ( /*_.VALDATA___V270*/
+ meltfptr[269]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V270*/ meltfptr[269]);
+ /*_.VALSTR___V271*/ meltfptr[270]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V269*/ meltfptr[268]);
+ meltgc_touch ( /*_.VALDATA___V270*/ meltfptr[269]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V271*/ meltfptr[270])) ==
+ ( /*_.VALDATA___V272*/ meltfptr[271])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V271*/
- meltfptr[270]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]))->obj_vartab[1] =
+ ( /*_.VALDATA___V272*/
+ meltfptr[271]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V272*/ meltfptr[271]);
+ /*_.VALSTR___V273*/ meltfptr[272]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V271*/ meltfptr[270]);
+ meltgc_touch ( /*_.VALDATA___V272*/ meltfptr[271]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V273*/ meltfptr[272])) ==
+ ( /*_.VALDATA___V274*/ meltfptr[273])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V273*/
- meltfptr[272]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] =
+ ( /*_.VALDATA___V274*/
+ meltfptr[273]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V274*/ meltfptr[273]);
+ /*_.VALSTR___V275*/ meltfptr[274]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]);
+ meltgc_touch ( /*_.VALDATA___V274*/ meltfptr[273]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V275*/ meltfptr[274])) ==
+ ( /*_.VALDATA___V276*/ meltfptr[275])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V275*/
- meltfptr[274]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]))->obj_vartab[1] =
+ ( /*_.VALDATA___V276*/
+ meltfptr[275]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V276*/ meltfptr[275]);
+ /*_.VALSTR___V277*/ meltfptr[276]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V275*/ meltfptr[274]);
+ meltgc_touch ( /*_.VALDATA___V276*/ meltfptr[275]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V277*/ meltfptr[276])) ==
+ ( /*_.VALDATA___V278*/ meltfptr[277])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V277*/
- meltfptr[276]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V277*/ meltfptr[276]))->obj_vartab[1] =
+ ( /*_.VALDATA___V278*/
+ meltfptr[277]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V278*/ meltfptr[277]);
+ /*_.VALSTR___V279*/ meltfptr[278]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V277*/ meltfptr[276]);
+ meltgc_touch ( /*_.VALDATA___V278*/ meltfptr[277]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V279*/ meltfptr[278])) ==
+ ( /*_.VALDATA___V280*/ meltfptr[279])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V279*/
- meltfptr[278]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]))->obj_vartab[1] =
+ ( /*_.VALDATA___V280*/
+ meltfptr[279]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V280*/ meltfptr[279]);
+ /*_.VALSTR___V281*/ meltfptr[280]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V279*/ meltfptr[278]);
+ meltgc_touch ( /*_.VALDATA___V280*/ meltfptr[279]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V281*/ meltfptr[280])) ==
+ ( /*_.VALDATA___V282*/ meltfptr[281])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V281*/
- meltfptr[280]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]))->obj_vartab[1] =
+ ( /*_.VALDATA___V282*/
+ meltfptr[281]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V282*/ meltfptr[281]);
+ /*_.VALSTR___V283*/ meltfptr[282]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V281*/ meltfptr[280]);
+ meltgc_touch ( /*_.VALDATA___V282*/ meltfptr[281]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V284*/ meltfptr[283])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[1] =
+ ( /*_.VALDATA___V284*/
+ meltfptr[283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V284*/ meltfptr[283]);
+ /*_.VALSTR___V285*/ meltfptr[284]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V284*/ meltfptr[283])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[4] =
+ ( /*_.VALDATA___V284*/
+ meltfptr[283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#39 */
melt_assertmsg ("putupl #39 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V286*/ meltfptr[285])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #39 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[0] =
+ ( /*_.VALTUP___V286*/
+ meltfptr[285]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31783,15 +32158,15 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#40 */
melt_assertmsg ("putupl #40 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V286*/ meltfptr[285])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #40 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[1] =
+ ( /*_.VALTUP___V286*/
+ meltfptr[285]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31802,105 +32177,105 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#41 */
melt_assertmsg ("putupl #41 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V286*/ meltfptr[285])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #41 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[2] =
+ ( /*_.VALTUP___V286*/
+ meltfptr[285]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#42 */
melt_assertmsg ("putupl #42 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V285*/ meltfptr[284])) ==
+ ( /*_.VALTUP___V286*/ meltfptr[285])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #42 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V285*/
- meltfptr[284]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V285*/ meltfptr[284]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V286*/
+ meltfptr[285]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V285*/ meltfptr[284]);
+ meltgc_touch ( /*_.VALTUP___V286*/ meltfptr[285]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V284*/ meltfptr[283])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[5] =
+ ( /*_.VALDATA___V284*/
+ meltfptr[283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V285*/ meltfptr[284]);
+ /*_.VALTUP___V286*/ meltfptr[285]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V286*/ meltfptr[285])) ==
+ ( /*_.VALDATA___V287*/ meltfptr[286])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V286*/
- meltfptr[285]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] =
+ ( /*_.VALDATA___V287*/
+ meltfptr[286]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V287*/ meltfptr[286]);
+ /*_.VALSTR___V288*/ meltfptr[287]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V286*/ meltfptr[285])) ==
+ ( /*_.VALDATA___V287*/ meltfptr[286])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V286*/
- meltfptr[285]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[2] =
+ ( /*_.VALDATA___V287*/
+ meltfptr[286]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V283*/ meltfptr[282]);
+ /*_.VALDATA___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]);
+ meltgc_touch ( /*_.VALDATA___V287*/ meltfptr[286]);
/*putupl#43 */
melt_assertmsg ("putupl #43 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #43 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[0] =
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -31911,213 +32286,213 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#44 */
melt_assertmsg ("putupl #44 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #44 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#45 */
melt_assertmsg ("putupl #45 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #45 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#46 */
melt_assertmsg ("putupl #46 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #46 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#47 */
melt_assertmsg ("putupl #47 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #47 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#48 */
melt_assertmsg ("putupl #48 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #48 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#49 */
melt_assertmsg ("putupl #49 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #49 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#50 */
melt_assertmsg ("putupl #50 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V288*/ meltfptr[287])) ==
+ ( /*_.VALTUP___V289*/ meltfptr[288])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #50 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V288*/
- meltfptr[287]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]);
+ ( /*_.VALTUP___V289*/
+ meltfptr[288]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V288*/ meltfptr[287]);
+ meltgc_touch ( /*_.VALTUP___V289*/ meltfptr[288]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V283*/ meltfptr[282])) ==
+ ( /*_.VALDATA___V284*/ meltfptr[283])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V283*/
- meltfptr[282]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]))->obj_vartab[6] =
+ ( /*_.VALDATA___V284*/
+ meltfptr[283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V288*/ meltfptr[287]);
+ /*_.VALTUP___V289*/ meltfptr[288]);
- MELT_LOCATION ("warmelt-normatch.melt:481:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V283*/ meltfptr[282]);
+ meltgc_touch ( /*_.VALDATA___V284*/ meltfptr[283]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V289*/ meltfptr[288])) ==
+ ( /*_.VALDATA___V290*/ meltfptr[289])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V289*/
- meltfptr[288]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]))->obj_vartab[1] =
+ ( /*_.VALDATA___V290*/
+ meltfptr[289]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V290*/ meltfptr[289]);
+ /*_.VALSTR___V291*/ meltfptr[290]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V289*/ meltfptr[288]);
+ meltgc_touch ( /*_.VALDATA___V290*/ meltfptr[289]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V291*/ meltfptr[290])) ==
+ ( /*_.VALDATA___V292*/ meltfptr[291])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V291*/
- meltfptr[290]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]))->obj_vartab[1] =
+ ( /*_.VALDATA___V292*/
+ meltfptr[291]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V292*/ meltfptr[291]);
+ /*_.VALSTR___V293*/ meltfptr[292]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V291*/ meltfptr[290]);
+ meltgc_touch ( /*_.VALDATA___V292*/ meltfptr[291]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V294*/ meltfptr[293])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] =
+ ( /*_.VALDATA___V294*/
+ meltfptr[293]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V294*/ meltfptr[293]);
+ /*_.VALSTR___V295*/ meltfptr[294]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V294*/ meltfptr[293])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[4] =
+ ( /*_.VALDATA___V294*/
+ meltfptr[293]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#51 */
melt_assertmsg ("putupl #51 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V296*/ meltfptr[295])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #51 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[0] =
+ ( /*_.VALTUP___V296*/
+ meltfptr[295]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32128,15 +32503,15 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#52 */
melt_assertmsg ("putupl #52 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V296*/ meltfptr[295])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #52 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[1] =
+ ( /*_.VALTUP___V296*/
+ meltfptr[295]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32147,105 +32522,105 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#53 */
melt_assertmsg ("putupl #53 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V296*/ meltfptr[295])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #53 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[2] =
+ ( /*_.VALTUP___V296*/
+ meltfptr[295]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#54 */
melt_assertmsg ("putupl #54 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V295*/ meltfptr[294])) ==
+ ( /*_.VALTUP___V296*/ meltfptr[295])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #54 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V295*/
- meltfptr[294]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V296*/
+ meltfptr[295]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V295*/ meltfptr[294]);
+ meltgc_touch ( /*_.VALTUP___V296*/ meltfptr[295]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V294*/ meltfptr[293])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[5] =
+ ( /*_.VALDATA___V294*/
+ meltfptr[293]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V295*/ meltfptr[294]);
+ /*_.VALTUP___V296*/ meltfptr[295]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V296*/ meltfptr[295])) ==
+ ( /*_.VALDATA___V297*/ meltfptr[296])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V296*/
- meltfptr[295]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[1] =
+ ( /*_.VALDATA___V297*/
+ meltfptr[296]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V297*/ meltfptr[296]);
+ /*_.VALSTR___V298*/ meltfptr[297]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V296*/ meltfptr[295])) ==
+ ( /*_.VALDATA___V297*/ meltfptr[296])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V296*/
- meltfptr[295]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[2] =
+ ( /*_.VALDATA___V297*/
+ meltfptr[296]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V293*/ meltfptr[292]);
+ /*_.VALDATA___V294*/ meltfptr[293]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V296*/ meltfptr[295]);
+ meltgc_touch ( /*_.VALDATA___V297*/ meltfptr[296]);
/*putupl#55 */
melt_assertmsg ("putupl #55 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #55 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[0] =
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32256,213 +32631,213 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#56 */
melt_assertmsg ("putupl #56 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #56 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#57 */
melt_assertmsg ("putupl #57 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #57 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#58 */
melt_assertmsg ("putupl #58 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #58 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#59 */
melt_assertmsg ("putupl #59 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #59 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#60 */
melt_assertmsg ("putupl #60 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #60 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#61 */
melt_assertmsg ("putupl #61 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #61 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#62 */
melt_assertmsg ("putupl #62 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V298*/ meltfptr[297])) ==
+ ( /*_.VALTUP___V299*/ meltfptr[298])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #62 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V298*/
- meltfptr[297]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]);
+ ( /*_.VALTUP___V299*/
+ meltfptr[298]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V299*/ meltfptr[298]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V298*/ meltfptr[297]);
+ meltgc_touch ( /*_.VALTUP___V299*/ meltfptr[298]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V293*/ meltfptr[292])) ==
+ ( /*_.VALDATA___V294*/ meltfptr[293])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V293*/
- meltfptr[292]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[6] =
+ ( /*_.VALDATA___V294*/
+ meltfptr[293]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V298*/ meltfptr[297]);
+ /*_.VALTUP___V299*/ meltfptr[298]);
- MELT_LOCATION ("warmelt-normatch.melt:487:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V293*/ meltfptr[292]);
+ meltgc_touch ( /*_.VALDATA___V294*/ meltfptr[293]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V299*/ meltfptr[298])) ==
+ ( /*_.VALDATA___V300*/ meltfptr[299])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V299*/
- meltfptr[298]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]))->obj_vartab[1] =
+ ( /*_.VALDATA___V300*/
+ meltfptr[299]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V300*/ meltfptr[299]);
+ /*_.VALSTR___V301*/ meltfptr[300]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V299*/ meltfptr[298]);
+ meltgc_touch ( /*_.VALDATA___V300*/ meltfptr[299]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V301*/ meltfptr[300])) ==
+ ( /*_.VALDATA___V302*/ meltfptr[301])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V301*/
- meltfptr[300]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]))->obj_vartab[1] =
+ ( /*_.VALDATA___V302*/
+ meltfptr[301]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V302*/ meltfptr[301]);
+ /*_.VALSTR___V303*/ meltfptr[302]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V301*/ meltfptr[300]);
+ meltgc_touch ( /*_.VALDATA___V302*/ meltfptr[301]);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V303*/ meltfptr[302])) ==
+ ( /*_.VALDATA___V304*/ meltfptr[303])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V303*/
- meltfptr[302]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[1] =
+ ( /*_.VALDATA___V304*/
+ meltfptr[303]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V304*/ meltfptr[303]);
+ /*_.VALSTR___V305*/ meltfptr[304]);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V303*/ meltfptr[302])) ==
+ ( /*_.VALDATA___V304*/ meltfptr[303])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V303*/
- meltfptr[302]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[4] =
+ ( /*_.VALDATA___V304*/
+ meltfptr[303]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V293*/ meltfptr[292]);
+ /*_.VALDATA___V294*/ meltfptr[293]);
/*putupl#63 */
melt_assertmsg ("putupl #63 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V305*/ meltfptr[304])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #63 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V305*/
- meltfptr[304]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[0] =
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32473,15 +32848,15 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#64 */
melt_assertmsg ("putupl #64 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V305*/ meltfptr[304])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #64 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V305*/
- meltfptr[304]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[1] =
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32492,78 +32867,78 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#65 */
melt_assertmsg ("putupl #65 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V305*/ meltfptr[304])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #65 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V305*/
- meltfptr[304]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[2] =
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#66 */
melt_assertmsg ("putupl #66 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V305*/ meltfptr[304])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #66 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V305*/
- meltfptr[304]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#67 */
melt_assertmsg ("putupl #67 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V305*/ meltfptr[304])) ==
+ ( /*_.VALTUP___V306*/ meltfptr[305])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #67 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V305*/
- meltfptr[304]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
+ ( /*_.VALTUP___V306*/
+ meltfptr[305]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V305*/ meltfptr[304]);
+ meltgc_touch ( /*_.VALTUP___V306*/ meltfptr[305]);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V303*/ meltfptr[302])) ==
+ ( /*_.VALDATA___V304*/ meltfptr[303])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V303*/
- meltfptr[302]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[5] =
+ ( /*_.VALDATA___V304*/
+ meltfptr[303]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V305*/ meltfptr[304]);
+ /*_.VALTUP___V306*/ meltfptr[305]);
/*putupl#68 */
melt_assertmsg ("putupl #68 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #68 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[0] =
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32574,16 +32949,16 @@ warmelt_normatch_initialmeltchunk_2 (struct frame_start_module_melt_st
/*putupl#69 */
melt_assertmsg ("putupl #69 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #69 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
#undef meltfram__
@@ -32599,180 +32974,180 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#70*/
melt_assertmsg ("putupl #70 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #70 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#71 */
melt_assertmsg ("putupl #71 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #71 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#72 */
melt_assertmsg ("putupl #72 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #72 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#73 */
melt_assertmsg ("putupl #73 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #73 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#74 */
melt_assertmsg ("putupl #74 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #74 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#75 */
melt_assertmsg ("putupl #75 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V306*/ meltfptr[305])) ==
+ ( /*_.VALTUP___V307*/ meltfptr[306])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #75 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V306*/
- meltfptr[305]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V306*/ meltfptr[305]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]);
+ ( /*_.VALTUP___V307*/
+ meltfptr[306]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V307*/ meltfptr[306]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V306*/ meltfptr[305]);
+ meltgc_touch ( /*_.VALTUP___V307*/ meltfptr[306]);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V303*/ meltfptr[302])) ==
+ ( /*_.VALDATA___V304*/ meltfptr[303])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V303*/
- meltfptr[302]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V303*/ meltfptr[302]))->obj_vartab[6] =
+ ( /*_.VALDATA___V304*/
+ meltfptr[303]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V306*/ meltfptr[305]);
+ /*_.VALTUP___V307*/ meltfptr[306]);
- MELT_LOCATION ("warmelt-normatch.melt:493:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V303*/ meltfptr[302]);
+ meltgc_touch ( /*_.VALDATA___V304*/ meltfptr[303]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V307*/ meltfptr[306])) ==
+ ( /*_.VALDATA___V308*/ meltfptr[307])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V307*/
- meltfptr[306]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]))->obj_vartab[1] =
+ ( /*_.VALDATA___V308*/
+ meltfptr[307]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V308*/ meltfptr[307]);
+ /*_.VALSTR___V309*/ meltfptr[308]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V307*/ meltfptr[306]);
+ meltgc_touch ( /*_.VALDATA___V308*/ meltfptr[307]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V309*/ meltfptr[308])) ==
+ ( /*_.VALDATA___V310*/ meltfptr[309])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V309*/
- meltfptr[308]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[1] =
+ ( /*_.VALDATA___V310*/
+ meltfptr[309]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V310*/ meltfptr[309]);
+ /*_.VALSTR___V311*/ meltfptr[310]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V309*/ meltfptr[308])) ==
+ ( /*_.VALDATA___V310*/ meltfptr[309])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V309*/
- meltfptr[308]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[4] =
+ ( /*_.VALDATA___V310*/
+ meltfptr[309]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#76 */
melt_assertmsg ("putupl #76 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V311*/ meltfptr[310])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #76 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V311*/
- meltfptr[310]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[0] =
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32783,15 +33158,15 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#77 */
melt_assertmsg ("putupl #77 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V311*/ meltfptr[310])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #77 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V311*/
- meltfptr[310]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[1] =
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32802,146 +33177,146 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#78 */
melt_assertmsg ("putupl #78 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V311*/ meltfptr[310])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #78 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V311*/
- meltfptr[310]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[2] =
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#79 */
melt_assertmsg ("putupl #79 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V311*/ meltfptr[310])) ==
+ ( /*_.VALTUP___V312*/ meltfptr[311])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #79 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V311*/
- meltfptr[310]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V311*/ meltfptr[310]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V312*/
+ meltfptr[311]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V312*/ meltfptr[311]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V311*/ meltfptr[310]);
+ meltgc_touch ( /*_.VALTUP___V312*/ meltfptr[311]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V309*/ meltfptr[308])) ==
+ ( /*_.VALDATA___V310*/ meltfptr[309])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V309*/
- meltfptr[308]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[5] =
+ ( /*_.VALDATA___V310*/
+ meltfptr[309]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V311*/ meltfptr[310]);
+ /*_.VALTUP___V312*/ meltfptr[311]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V313*/ meltfptr[312])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[1] =
+ ( /*_.VALDATA___V313*/
+ meltfptr[312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V313*/ meltfptr[312]);
+ /*_.VALSTR___V314*/ meltfptr[313]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V312*/ meltfptr[311])) ==
+ ( /*_.VALDATA___V313*/ meltfptr[312])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V312*/
- meltfptr[311]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]))->obj_vartab[2] =
+ ( /*_.VALDATA___V313*/
+ meltfptr[312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V309*/ meltfptr[308]);
+ /*_.VALDATA___V310*/ meltfptr[309]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V312*/ meltfptr[311]);
+ meltgc_touch ( /*_.VALDATA___V313*/ meltfptr[312]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V314*/ meltfptr[313])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V314*/
- meltfptr[313]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313]))->obj_vartab[1] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V315*/ meltfptr[314]);
+ /*_.VALSTR___V316*/ meltfptr[315]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V314*/ meltfptr[313])) ==
+ ( /*_.VALDATA___V315*/ meltfptr[314])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V314*/
- meltfptr[313]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313]))->obj_vartab[2] =
+ ( /*_.VALDATA___V315*/
+ meltfptr[314]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V309*/ meltfptr[308]);
+ /*_.VALDATA___V310*/ meltfptr[309]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V314*/ meltfptr[313]);
+ meltgc_touch ( /*_.VALDATA___V315*/ meltfptr[314]);
/*putupl#80 */
melt_assertmsg ("putupl #80 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #80 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[0] =
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -32952,246 +33327,246 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#81 */
melt_assertmsg ("putupl #81 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #81 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#82 */
melt_assertmsg ("putupl #82 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #82 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#83 */
melt_assertmsg ("putupl #83 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #83 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#84 */
melt_assertmsg ("putupl #84 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #84 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#85 */
melt_assertmsg ("putupl #85 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #85 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#86 */
melt_assertmsg ("putupl #86 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #86 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#87 */
melt_assertmsg ("putupl #87 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #87 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]);
/*putupl#88 */
melt_assertmsg ("putupl #88 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V316*/ meltfptr[315])) ==
+ ( /*_.VALTUP___V317*/ meltfptr[316])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #88 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V316*/
- meltfptr[315]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V316*/ meltfptr[315]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313]);
+ ( /*_.VALTUP___V317*/
+ meltfptr[316]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V316*/ meltfptr[315]);
+ meltgc_touch ( /*_.VALTUP___V317*/ meltfptr[316]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V309*/ meltfptr[308])) ==
+ ( /*_.VALDATA___V310*/ meltfptr[309])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V309*/
- meltfptr[308]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]))->obj_vartab[6] =
+ ( /*_.VALDATA___V310*/
+ meltfptr[309]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V316*/ meltfptr[315]);
+ /*_.VALTUP___V317*/ meltfptr[316]);
- MELT_LOCATION ("warmelt-normatch.melt:499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V309*/ meltfptr[308]);
+ meltgc_touch ( /*_.VALDATA___V310*/ meltfptr[309]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V317*/ meltfptr[316])) ==
+ ( /*_.VALDATA___V318*/ meltfptr[317])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V317*/
- meltfptr[316]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]))->obj_vartab[1] =
+ ( /*_.VALDATA___V318*/
+ meltfptr[317]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V318*/ meltfptr[317]);
+ /*_.VALSTR___V319*/ meltfptr[318]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V317*/ meltfptr[316]);
+ meltgc_touch ( /*_.VALDATA___V318*/ meltfptr[317]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V319*/ meltfptr[318])) ==
+ ( /*_.VALDATA___V320*/ meltfptr[319])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V319*/
- meltfptr[318]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]))->obj_vartab[1] =
+ ( /*_.VALDATA___V320*/
+ meltfptr[319]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V320*/ meltfptr[319]);
+ /*_.VALSTR___V321*/ meltfptr[320]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V319*/ meltfptr[318]);
+ meltgc_touch ( /*_.VALDATA___V320*/ meltfptr[319]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V321*/ meltfptr[320])) ==
+ ( /*_.VALDATA___V322*/ meltfptr[321])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V321*/
- meltfptr[320]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[1] =
+ ( /*_.VALDATA___V322*/
+ meltfptr[321]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V322*/ meltfptr[321]);
+ /*_.VALSTR___V323*/ meltfptr[322]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V321*/ meltfptr[320]);
+ meltgc_touch ( /*_.VALDATA___V322*/ meltfptr[321]);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V323*/ meltfptr[322])) ==
+ ( /*_.VALDATA___V324*/ meltfptr[323])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V323*/
- meltfptr[322]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]))->obj_vartab[1] =
+ ( /*_.VALDATA___V324*/
+ meltfptr[323]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V324*/ meltfptr[323]);
+ /*_.VALSTR___V325*/ meltfptr[324]);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V323*/ meltfptr[322])) ==
+ ( /*_.VALDATA___V324*/ meltfptr[323])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V323*/
- meltfptr[322]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]))->obj_vartab[4] =
+ ( /*_.VALDATA___V324*/
+ meltfptr[323]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V253*/ meltfptr[252]);
+ /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#89 */
melt_assertmsg ("putupl #89 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V325*/ meltfptr[324])) ==
+ ( /*_.VALTUP___V326*/ meltfptr[325])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #89 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V325*/
- meltfptr[324]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V325*/ meltfptr[324]))->tabval[0] =
+ ( /*_.VALTUP___V326*/
+ meltfptr[325]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33202,15 +33577,15 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#90 */
melt_assertmsg ("putupl #90 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V325*/ meltfptr[324])) ==
+ ( /*_.VALTUP___V326*/ meltfptr[325])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #90 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V325*/
- meltfptr[324]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V325*/ meltfptr[324]))->tabval[1] =
+ ( /*_.VALTUP___V326*/
+ meltfptr[325]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33221,64 +33596,64 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#91 */
melt_assertmsg ("putupl #91 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V325*/ meltfptr[324])) ==
+ ( /*_.VALTUP___V326*/ meltfptr[325])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #91 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V325*/
- meltfptr[324]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V325*/ meltfptr[324]))->tabval[2] =
+ ( /*_.VALTUP___V326*/
+ meltfptr[325]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#92 */
melt_assertmsg ("putupl #92 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V325*/ meltfptr[324])) ==
+ ( /*_.VALTUP___V326*/ meltfptr[325])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #92 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V325*/
- meltfptr[324]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V325*/ meltfptr[324]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V326*/
+ meltfptr[325]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V325*/ meltfptr[324]);
+ meltgc_touch ( /*_.VALTUP___V326*/ meltfptr[325]);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V323*/ meltfptr[322])) ==
+ ( /*_.VALDATA___V324*/ meltfptr[323])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V323*/
- meltfptr[322]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]))->obj_vartab[5] =
+ ( /*_.VALDATA___V324*/
+ meltfptr[323]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V325*/ meltfptr[324]);
+ /*_.VALTUP___V326*/ meltfptr[325]);
/*putupl#93 */
melt_assertmsg ("putupl #93 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #93 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[0] =
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33289,180 +33664,180 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#94 */
melt_assertmsg ("putupl #94 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #94 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#95 */
melt_assertmsg ("putupl #95 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #95 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#96 */
melt_assertmsg ("putupl #96 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #96 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#97 */
melt_assertmsg ("putupl #97 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #97 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#98 */
melt_assertmsg ("putupl #98 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #98 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#99 */
melt_assertmsg ("putupl #99 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V326*/ meltfptr[325])) ==
+ ( /*_.VALTUP___V327*/ meltfptr[326])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #99 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V326*/
- meltfptr[325]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V326*/ meltfptr[325]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V327*/
+ meltfptr[326]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V327*/ meltfptr[326]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V326*/ meltfptr[325]);
+ meltgc_touch ( /*_.VALTUP___V327*/ meltfptr[326]);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V323*/ meltfptr[322])) ==
+ ( /*_.VALDATA___V324*/ meltfptr[323])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V323*/
- meltfptr[322]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]))->obj_vartab[6] =
+ ( /*_.VALDATA___V324*/
+ meltfptr[323]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V326*/ meltfptr[325]);
+ /*_.VALTUP___V327*/ meltfptr[326]);
- MELT_LOCATION ("warmelt-normatch.melt:507:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V323*/ meltfptr[322]);
+ meltgc_touch ( /*_.VALDATA___V324*/ meltfptr[323]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V327*/ meltfptr[326])) ==
+ ( /*_.VALDATA___V328*/ meltfptr[327])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V327*/
- meltfptr[326]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]))->obj_vartab[1] =
+ ( /*_.VALDATA___V328*/
+ meltfptr[327]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V328*/ meltfptr[327]);
+ /*_.VALSTR___V329*/ meltfptr[328]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V327*/ meltfptr[326]);
+ meltgc_touch ( /*_.VALDATA___V328*/ meltfptr[327]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V329*/ meltfptr[328])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V329*/
- meltfptr[328]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[1] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V330*/ meltfptr[329]);
+ /*_.VALSTR___V331*/ meltfptr[330]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V329*/ meltfptr[328])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V329*/
- meltfptr[328]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[4] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V323*/ meltfptr[322]);
+ /*_.VALDATA___V324*/ meltfptr[323]);
/*putupl#100 */
melt_assertmsg ("putupl #100 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V331*/ meltfptr[330])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #100 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V331*/
- meltfptr[330]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V331*/ meltfptr[330]))->tabval[0] =
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33473,15 +33848,15 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#101 */
melt_assertmsg ("putupl #101 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V331*/ meltfptr[330])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #101 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V331*/
- meltfptr[330]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V331*/ meltfptr[330]))->tabval[1] =
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33492,201 +33867,201 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#102 */
melt_assertmsg ("putupl #102 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V331*/ meltfptr[330])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #102 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V331*/
- meltfptr[330]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V331*/ meltfptr[330]))->tabval[2] =
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#103 */
melt_assertmsg ("putupl #103 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V331*/ meltfptr[330])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #103 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V331*/
- meltfptr[330]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V331*/ meltfptr[330]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#104 */
melt_assertmsg ("putupl #104 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V331*/ meltfptr[330])) ==
+ ( /*_.VALTUP___V332*/ meltfptr[331])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #104 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V331*/
- meltfptr[330]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V331*/ meltfptr[330]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ ( /*_.VALTUP___V332*/
+ meltfptr[331]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V332*/ meltfptr[331]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V331*/ meltfptr[330]);
+ meltgc_touch ( /*_.VALTUP___V332*/ meltfptr[331]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V329*/ meltfptr[328])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V329*/
- meltfptr[328]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[5] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V331*/ meltfptr[330]);
+ /*_.VALTUP___V332*/ meltfptr[331]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V332*/ meltfptr[331])) ==
+ ( /*_.VALDATA___V333*/ meltfptr[332])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V332*/
- meltfptr[331]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[1] =
+ ( /*_.VALDATA___V333*/
+ meltfptr[332]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V333*/ meltfptr[332]);
+ /*_.VALSTR___V334*/ meltfptr[333]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V332*/ meltfptr[331])) ==
+ ( /*_.VALDATA___V333*/ meltfptr[332])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V332*/
- meltfptr[331]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[2] =
+ ( /*_.VALDATA___V333*/
+ meltfptr[332]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V329*/ meltfptr[328]);
+ /*_.VALDATA___V330*/ meltfptr[329]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V332*/ meltfptr[331]);
+ meltgc_touch ( /*_.VALDATA___V333*/ meltfptr[332]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V335*/ meltfptr[334])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[1] =
+ ( /*_.VALDATA___V335*/
+ meltfptr[334]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V335*/ meltfptr[334]);
+ /*_.VALSTR___V336*/ meltfptr[335]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V334*/ meltfptr[333])) ==
+ ( /*_.VALDATA___V335*/ meltfptr[334])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V334*/
- meltfptr[333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[2] =
+ ( /*_.VALDATA___V335*/
+ meltfptr[334]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V329*/ meltfptr[328]);
+ /*_.VALDATA___V330*/ meltfptr[329]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V334*/ meltfptr[333]);
+ meltgc_touch ( /*_.VALDATA___V335*/ meltfptr[334]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V336*/ meltfptr[335])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V336*/
- meltfptr[335]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]))->obj_vartab[1] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V337*/ meltfptr[336]);
+ /*_.VALSTR___V338*/ meltfptr[337]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V336*/ meltfptr[335])) ==
+ ( /*_.VALDATA___V337*/ meltfptr[336])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V336*/
- meltfptr[335]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]))->obj_vartab[2] =
+ ( /*_.VALDATA___V337*/
+ meltfptr[336]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V329*/ meltfptr[328]);
+ /*_.VALDATA___V330*/ meltfptr[329]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V336*/ meltfptr[335]);
+ meltgc_touch ( /*_.VALDATA___V337*/ meltfptr[336]);
/*putupl#105 */
melt_assertmsg ("putupl #105 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #105 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[0] =
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33697,279 +34072,279 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#106 */
melt_assertmsg ("putupl #106 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #106 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#107 */
melt_assertmsg ("putupl #107 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #107 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#108 */
melt_assertmsg ("putupl #108 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #108 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#109 */
melt_assertmsg ("putupl #109 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #109 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#110 */
melt_assertmsg ("putupl #110 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #110 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#111 */
melt_assertmsg ("putupl #111 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #111 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#112 */
melt_assertmsg ("putupl #112 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #112 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V333*/ meltfptr[332]);
/*putupl#113 */
melt_assertmsg ("putupl #113 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #113 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]);
/*putupl#114 */
melt_assertmsg ("putupl #114 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V338*/ meltfptr[337])) ==
+ ( /*_.VALTUP___V339*/ meltfptr[338])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #114 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V338*/
- meltfptr[337]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V338*/ meltfptr[337]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]);
+ ( /*_.VALTUP___V339*/
+ meltfptr[338]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V339*/ meltfptr[338]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V338*/ meltfptr[337]);
+ meltgc_touch ( /*_.VALTUP___V339*/ meltfptr[338]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V329*/ meltfptr[328])) ==
+ ( /*_.VALDATA___V330*/ meltfptr[329])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V329*/
- meltfptr[328]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[6] =
+ ( /*_.VALDATA___V330*/
+ meltfptr[329]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V338*/ meltfptr[337]);
+ /*_.VALTUP___V339*/ meltfptr[338]);
- MELT_LOCATION ("warmelt-normatch.melt:515:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V329*/ meltfptr[328]);
+ meltgc_touch ( /*_.VALDATA___V330*/ meltfptr[329]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V339*/ meltfptr[338])) ==
+ ( /*_.VALDATA___V340*/ meltfptr[339])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V339*/
- meltfptr[338]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]))->obj_vartab[1] =
+ ( /*_.VALDATA___V340*/
+ meltfptr[339]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V340*/ meltfptr[339]);
+ /*_.VALSTR___V341*/ meltfptr[340]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V339*/ meltfptr[338]);
+ meltgc_touch ( /*_.VALDATA___V340*/ meltfptr[339]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V341*/ meltfptr[340])) ==
+ ( /*_.VALDATA___V342*/ meltfptr[341])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V341*/
- meltfptr[340]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]))->obj_vartab[1] =
+ ( /*_.VALDATA___V342*/
+ meltfptr[341]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V342*/ meltfptr[341]);
+ /*_.VALSTR___V343*/ meltfptr[342]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V341*/ meltfptr[340]);
+ meltgc_touch ( /*_.VALDATA___V342*/ meltfptr[341]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V343*/ meltfptr[342])) ==
+ ( /*_.VALDATA___V344*/ meltfptr[343])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V343*/
- meltfptr[342]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]))->obj_vartab[1] =
+ ( /*_.VALDATA___V344*/
+ meltfptr[343]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V344*/ meltfptr[343]);
+ /*_.VALSTR___V345*/ meltfptr[344]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V343*/ meltfptr[342]);
+ meltgc_touch ( /*_.VALDATA___V344*/ meltfptr[343]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V345*/ meltfptr[344])) ==
+ ( /*_.VALDATA___V346*/ meltfptr[345])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V345*/
- meltfptr[344]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]))->obj_vartab[1] =
+ ( /*_.VALDATA___V346*/
+ meltfptr[345]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V346*/ meltfptr[345]);
+ /*_.VALSTR___V347*/ meltfptr[346]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V345*/ meltfptr[344]);
+ meltgc_touch ( /*_.VALDATA___V346*/ meltfptr[345]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V348*/ meltfptr[347])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[1] =
+ ( /*_.VALDATA___V348*/
+ meltfptr[347]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V348*/ meltfptr[347]);
+ /*_.VALSTR___V349*/ meltfptr[348]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V348*/ meltfptr[347])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[4] =
+ ( /*_.VALDATA___V348*/
+ meltfptr[347]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V323*/ meltfptr[322]);
+ /*_.VALDATA___V324*/ meltfptr[323]);
/*putupl#115 */
melt_assertmsg ("putupl #115 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V350*/ meltfptr[349])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #115 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[0] =
+ ( /*_.VALTUP___V350*/
+ meltfptr[349]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V350*/ meltfptr[349]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33980,15 +34355,15 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#116 */
melt_assertmsg ("putupl #116 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V350*/ meltfptr[349])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #116 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[1] =
+ ( /*_.VALTUP___V350*/
+ meltfptr[349]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V350*/ meltfptr[349]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -33999,119 +34374,119 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#117 */
melt_assertmsg ("putupl #117 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V350*/ meltfptr[349])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #117 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[2] =
+ ( /*_.VALTUP___V350*/
+ meltfptr[349]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V350*/ meltfptr[349]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#118 */
melt_assertmsg ("putupl #118 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V350*/ meltfptr[349])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #118 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V350*/
+ meltfptr[349]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V350*/ meltfptr[349]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#119 */
melt_assertmsg ("putupl #119 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V349*/ meltfptr[348])) ==
+ ( /*_.VALTUP___V350*/ meltfptr[349])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #119 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V349*/
- meltfptr[348]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V349*/ meltfptr[348]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ ( /*_.VALTUP___V350*/
+ meltfptr[349]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V350*/ meltfptr[349]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V349*/ meltfptr[348]);
+ meltgc_touch ( /*_.VALTUP___V350*/ meltfptr[349]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V348*/ meltfptr[347])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[5] =
+ ( /*_.VALDATA___V348*/
+ meltfptr[347]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V349*/ meltfptr[348]);
+ /*_.VALTUP___V350*/ meltfptr[349]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V350*/ meltfptr[349])) ==
+ ( /*_.VALDATA___V351*/ meltfptr[350])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V350*/
- meltfptr[349]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] =
+ ( /*_.VALDATA___V351*/
+ meltfptr[350]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V351*/ meltfptr[350]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V351*/ meltfptr[350]);
+ /*_.VALSTR___V352*/ meltfptr[351]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V350*/ meltfptr[349])) ==
+ ( /*_.VALDATA___V351*/ meltfptr[350])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V350*/
- meltfptr[349]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[2] =
+ ( /*_.VALDATA___V351*/
+ meltfptr[350]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V351*/ meltfptr[350]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V347*/ meltfptr[346]);
+ /*_.VALDATA___V348*/ meltfptr[347]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]);
+ meltgc_touch ( /*_.VALDATA___V351*/ meltfptr[350]);
/*putupl#120 */
melt_assertmsg ("putupl #120 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #120 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[0] =
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34122,161 +34497,161 @@ warmelt_normatch_initialmeltchunk_3 (struct frame_start_module_melt_st
/*putupl#121 */
melt_assertmsg ("putupl #121 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #121 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#122 */
melt_assertmsg ("putupl #122 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #122 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#123 */
melt_assertmsg ("putupl #123 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #123 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#124 */
melt_assertmsg ("putupl #124 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #124 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#125 */
melt_assertmsg ("putupl #125 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #125 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#126 */
melt_assertmsg ("putupl #126 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #126 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#127 */
melt_assertmsg ("putupl #127 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V352*/ meltfptr[351])) ==
+ ( /*_.VALTUP___V353*/ meltfptr[352])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #127 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V352*/
- meltfptr[351]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]);
+ ( /*_.VALTUP___V353*/
+ meltfptr[352]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V351*/ meltfptr[350]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V352*/ meltfptr[351]);
+ meltgc_touch ( /*_.VALTUP___V353*/ meltfptr[352]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V347*/ meltfptr[346])) ==
+ ( /*_.VALDATA___V348*/ meltfptr[347])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V347*/
- meltfptr[346]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[6] =
+ ( /*_.VALDATA___V348*/
+ meltfptr[347]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V352*/ meltfptr[351]);
+ /*_.VALTUP___V353*/ meltfptr[352]);
- MELT_LOCATION ("warmelt-normatch.melt:523:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V347*/ meltfptr[346]);
+ meltgc_touch ( /*_.VALDATA___V348*/ meltfptr[347]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V353*/ meltfptr[352])) ==
+ ( /*_.VALDATA___V354*/ meltfptr[353])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V353*/
- meltfptr[352]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]))->obj_vartab[1] =
+ ( /*_.VALDATA___V354*/
+ meltfptr[353]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V354*/ meltfptr[353]);
+ /*_.VALSTR___V355*/ meltfptr[354]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V353*/ meltfptr[352]);
+ meltgc_touch ( /*_.VALDATA___V354*/ meltfptr[353]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V355*/ meltfptr[354])) ==
+ ( /*_.VALDATA___V356*/ meltfptr[355])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V355*/
- meltfptr[354]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]))->obj_vartab[1] =
+ ( /*_.VALDATA___V356*/
+ meltfptr[355]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V356*/ meltfptr[355]);
+ /*_.VALSTR___V357*/ meltfptr[356]);
#undef meltfram__
@@ -34290,56 +34665,56 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
#undef meltcallcount
#define meltcallcount 0L
/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V355*/ meltfptr[354]);
+ meltgc_touch ( /*_.VALDATA___V356*/ meltfptr[355]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V358*/ meltfptr[357])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[1] =
+ ( /*_.VALDATA___V358*/
+ meltfptr[357]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V358*/ meltfptr[357]);
+ /*_.VALSTR___V359*/ meltfptr[358]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V358*/ meltfptr[357])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[4] =
+ ( /*_.VALDATA___V358*/
+ meltfptr[357]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V323*/ meltfptr[322]);
+ /*_.VALDATA___V324*/ meltfptr[323]);
/*putupl#128 */
melt_assertmsg ("putupl #128 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V360*/ meltfptr[359])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #128 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[0] =
+ ( /*_.VALTUP___V360*/
+ meltfptr[359]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V360*/ meltfptr[359]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34350,15 +34725,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#129 */
melt_assertmsg ("putupl #129 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V360*/ meltfptr[359])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #129 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[1] =
+ ( /*_.VALTUP___V360*/
+ meltfptr[359]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V360*/ meltfptr[359]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34369,242 +34744,242 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#130 */
melt_assertmsg ("putupl #130 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V360*/ meltfptr[359])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #130 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[2] =
+ ( /*_.VALTUP___V360*/
+ meltfptr[359]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V360*/ meltfptr[359]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#131 */
melt_assertmsg ("putupl #131 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V360*/ meltfptr[359])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #131 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V360*/
+ meltfptr[359]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V360*/ meltfptr[359]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#132 */
melt_assertmsg ("putupl #132 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V359*/ meltfptr[358])) ==
+ ( /*_.VALTUP___V360*/ meltfptr[359])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #132 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V359*/
- meltfptr[358]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ ( /*_.VALTUP___V360*/
+ meltfptr[359]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V360*/ meltfptr[359]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V359*/ meltfptr[358]);
+ meltgc_touch ( /*_.VALTUP___V360*/ meltfptr[359]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V358*/ meltfptr[357])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[5] =
+ ( /*_.VALDATA___V358*/
+ meltfptr[357]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V359*/ meltfptr[358]);
+ /*_.VALTUP___V360*/ meltfptr[359]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V360*/ meltfptr[359])) ==
+ ( /*_.VALDATA___V361*/ meltfptr[360])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V360*/
- meltfptr[359]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[1] =
+ ( /*_.VALDATA___V361*/
+ meltfptr[360]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V361*/ meltfptr[360]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V361*/ meltfptr[360]);
+ /*_.VALSTR___V362*/ meltfptr[361]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V360*/ meltfptr[359])) ==
+ ( /*_.VALDATA___V361*/ meltfptr[360])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V360*/
- meltfptr[359]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[2] =
+ ( /*_.VALDATA___V361*/
+ meltfptr[360]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V361*/ meltfptr[360]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V357*/ meltfptr[356]);
+ /*_.VALDATA___V358*/ meltfptr[357]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]);
+ meltgc_touch ( /*_.VALDATA___V361*/ meltfptr[360]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V362*/ meltfptr[361])) ==
+ ( /*_.VALDATA___V363*/ meltfptr[362])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V362*/
- meltfptr[361]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[1] =
+ ( /*_.VALDATA___V363*/
+ meltfptr[362]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V363*/ meltfptr[362]);
+ /*_.VALSTR___V364*/ meltfptr[363]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V362*/ meltfptr[361])) ==
+ ( /*_.VALDATA___V363*/ meltfptr[362])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V362*/
- meltfptr[361]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[2] =
+ ( /*_.VALDATA___V363*/
+ meltfptr[362]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V357*/ meltfptr[356]);
+ /*_.VALDATA___V358*/ meltfptr[357]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V362*/ meltfptr[361]);
+ meltgc_touch ( /*_.VALDATA___V363*/ meltfptr[362]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V365*/ meltfptr[364])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[1] =
+ ( /*_.VALDATA___V365*/
+ meltfptr[364]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V365*/ meltfptr[364]);
+ /*_.VALSTR___V366*/ meltfptr[365]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V364*/ meltfptr[363])) ==
+ ( /*_.VALDATA___V365*/ meltfptr[364])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V364*/
- meltfptr[363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[2] =
+ ( /*_.VALDATA___V365*/
+ meltfptr[364]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V357*/ meltfptr[356]);
+ /*_.VALDATA___V358*/ meltfptr[357]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V364*/ meltfptr[363]);
+ meltgc_touch ( /*_.VALDATA___V365*/ meltfptr[364]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V366*/ meltfptr[365])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V366*/
- meltfptr[365]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V366*/ meltfptr[365]))->obj_vartab[1] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V367*/ meltfptr[366]);
+ /*_.VALSTR___V368*/ meltfptr[367]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V366*/ meltfptr[365])) ==
+ ( /*_.VALDATA___V367*/ meltfptr[366])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V366*/
- meltfptr[365]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V366*/ meltfptr[365]))->obj_vartab[2] =
+ ( /*_.VALDATA___V367*/
+ meltfptr[366]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V357*/ meltfptr[356]);
+ /*_.VALDATA___V358*/ meltfptr[357]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V366*/ meltfptr[365]);
+ meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]);
/*putupl#133 */
melt_assertmsg ("putupl #133 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #133 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[0] =
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34615,312 +34990,312 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#134 */
melt_assertmsg ("putupl #134 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #134 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#135 */
melt_assertmsg ("putupl #135 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #135 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#136 */
melt_assertmsg ("putupl #136 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #136 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#137 */
melt_assertmsg ("putupl #137 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #137 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#138 */
melt_assertmsg ("putupl #138 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #138 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#139 */
melt_assertmsg ("putupl #139 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #139 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#140 */
melt_assertmsg ("putupl #140 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #140 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V361*/ meltfptr[360]);
/*putupl#141 */
melt_assertmsg ("putupl #141 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #141 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]);
/*putupl#142 */
melt_assertmsg ("putupl #142 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #142 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]);
/*putupl#143 */
melt_assertmsg ("putupl #143 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V368*/ meltfptr[367])) ==
+ ( /*_.VALTUP___V369*/ meltfptr[368])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #143 checkoff",
(10 >= 0
&& 10 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V368*/
- meltfptr[367]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V368*/ meltfptr[367]))->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V366*/ meltfptr[365]);
+ ( /*_.VALTUP___V369*/
+ meltfptr[368]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V368*/ meltfptr[367]);
+ meltgc_touch ( /*_.VALTUP___V369*/ meltfptr[368]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V357*/ meltfptr[356])) ==
+ ( /*_.VALDATA___V358*/ meltfptr[357])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V357*/
- meltfptr[356]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[6] =
+ ( /*_.VALDATA___V358*/
+ meltfptr[357]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V368*/ meltfptr[367]);
+ /*_.VALTUP___V369*/ meltfptr[368]);
- MELT_LOCATION ("warmelt-normatch.melt:529:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V357*/ meltfptr[356]);
+ meltgc_touch ( /*_.VALDATA___V358*/ meltfptr[357]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V369*/ meltfptr[368])) ==
+ ( /*_.VALDATA___V370*/ meltfptr[369])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V369*/
- meltfptr[368]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]))->obj_vartab[1] =
+ ( /*_.VALDATA___V370*/
+ meltfptr[369]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V370*/ meltfptr[369]);
+ /*_.VALSTR___V371*/ meltfptr[370]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V369*/ meltfptr[368]);
+ meltgc_touch ( /*_.VALDATA___V370*/ meltfptr[369]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V371*/ meltfptr[370])) ==
+ ( /*_.VALDATA___V372*/ meltfptr[371])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V371*/
- meltfptr[370]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V371*/ meltfptr[370]))->obj_vartab[1] =
+ ( /*_.VALDATA___V372*/
+ meltfptr[371]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V372*/ meltfptr[371]);
+ /*_.VALSTR___V373*/ meltfptr[372]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V371*/ meltfptr[370]);
+ meltgc_touch ( /*_.VALDATA___V372*/ meltfptr[371]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V373*/ meltfptr[372])) ==
+ ( /*_.VALDATA___V374*/ meltfptr[373])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V373*/
- meltfptr[372]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]))->obj_vartab[1] =
+ ( /*_.VALDATA___V374*/
+ meltfptr[373]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V374*/ meltfptr[373]);
+ /*_.VALSTR___V375*/ meltfptr[374]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V373*/ meltfptr[372]);
+ meltgc_touch ( /*_.VALDATA___V374*/ meltfptr[373]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V375*/ meltfptr[374])) ==
+ ( /*_.VALDATA___V376*/ meltfptr[375])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V375*/
- meltfptr[374]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]))->obj_vartab[1] =
+ ( /*_.VALDATA___V376*/
+ meltfptr[375]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V376*/ meltfptr[375]);
+ /*_.VALSTR___V377*/ meltfptr[376]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V375*/ meltfptr[374]);
+ meltgc_touch ( /*_.VALDATA___V376*/ meltfptr[375]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V377*/ meltfptr[376])) ==
+ ( /*_.VALDATA___V378*/ meltfptr[377])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V377*/
- meltfptr[376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[1] =
+ ( /*_.VALDATA___V378*/
+ meltfptr[377]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V378*/ meltfptr[377]);
+ /*_.VALSTR___V379*/ meltfptr[378]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V377*/ meltfptr[376]);
+ meltgc_touch ( /*_.VALDATA___V378*/ meltfptr[377]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V379*/ meltfptr[378])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V379*/
- meltfptr[378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]))->obj_vartab[1] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V380*/ meltfptr[379]);
+ /*_.VALSTR___V381*/ meltfptr[380]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V379*/ meltfptr[378])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V379*/
- meltfptr[378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]))->obj_vartab[4] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V323*/ meltfptr[322]);
+ /*_.VALDATA___V324*/ meltfptr[323]);
/*putupl#144 */
melt_assertmsg ("putupl #144 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V381*/ meltfptr[380])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #144 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V381*/
- meltfptr[380]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V381*/ meltfptr[380]))->tabval[0] =
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34931,15 +35306,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#145 */
melt_assertmsg ("putupl #145 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V381*/ meltfptr[380])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #145 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V381*/
- meltfptr[380]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V381*/ meltfptr[380]))->tabval[1] =
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -34950,160 +35325,160 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#146 */
melt_assertmsg ("putupl #146 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V381*/ meltfptr[380])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #146 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V381*/
- meltfptr[380]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V381*/ meltfptr[380]))->tabval[2] =
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#147 */
melt_assertmsg ("putupl #147 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V381*/ meltfptr[380])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #147 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V381*/
- meltfptr[380]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V381*/ meltfptr[380]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#148 */
melt_assertmsg ("putupl #148 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V381*/ meltfptr[380])) ==
+ ( /*_.VALTUP___V382*/ meltfptr[381])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #148 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V381*/
- meltfptr[380]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V381*/ meltfptr[380]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ ( /*_.VALTUP___V382*/
+ meltfptr[381]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V382*/ meltfptr[381]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V381*/ meltfptr[380]);
+ meltgc_touch ( /*_.VALTUP___V382*/ meltfptr[381]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V379*/ meltfptr[378])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V379*/
- meltfptr[378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]))->obj_vartab[5] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V381*/ meltfptr[380]);
+ /*_.VALTUP___V382*/ meltfptr[381]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V382*/ meltfptr[381])) ==
+ ( /*_.VALDATA___V383*/ meltfptr[382])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V382*/
- meltfptr[381]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[1] =
+ ( /*_.VALDATA___V383*/
+ meltfptr[382]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V383*/ meltfptr[382]);
+ /*_.VALSTR___V384*/ meltfptr[383]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V382*/ meltfptr[381])) ==
+ ( /*_.VALDATA___V383*/ meltfptr[382])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V382*/
- meltfptr[381]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[2] =
+ ( /*_.VALDATA___V383*/
+ meltfptr[382]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V379*/ meltfptr[378]);
+ /*_.VALDATA___V380*/ meltfptr[379]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V382*/ meltfptr[381]);
+ meltgc_touch ( /*_.VALDATA___V383*/ meltfptr[382]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V385*/ meltfptr[384])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[1] =
+ ( /*_.VALDATA___V385*/
+ meltfptr[384]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V385*/ meltfptr[384]);
+ /*_.VALSTR___V386*/ meltfptr[385]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V384*/ meltfptr[383])) ==
+ ( /*_.VALDATA___V385*/ meltfptr[384])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V384*/
- meltfptr[383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[2] =
+ ( /*_.VALDATA___V385*/
+ meltfptr[384]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V379*/ meltfptr[378]);
+ /*_.VALDATA___V380*/ meltfptr[379]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V384*/ meltfptr[383]);
+ meltgc_touch ( /*_.VALDATA___V385*/ meltfptr[384]);
/*putupl#149 */
melt_assertmsg ("putupl #149 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #149 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[0] =
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35114,246 +35489,246 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#150 */
melt_assertmsg ("putupl #150 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #150 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#151 */
melt_assertmsg ("putupl #151 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #151 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#152 */
melt_assertmsg ("putupl #152 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #152 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#153 */
melt_assertmsg ("putupl #153 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #153 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#154 */
melt_assertmsg ("putupl #154 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #154 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#155 */
melt_assertmsg ("putupl #155 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #155 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#156 */
melt_assertmsg ("putupl #156 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #156 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]);
/*putupl#157 */
melt_assertmsg ("putupl #157 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V386*/ meltfptr[385])) ==
+ ( /*_.VALTUP___V387*/ meltfptr[386])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #157 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V386*/
- meltfptr[385]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]);
+ ( /*_.VALTUP___V387*/
+ meltfptr[386]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V387*/ meltfptr[386]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V386*/ meltfptr[385]);
+ meltgc_touch ( /*_.VALTUP___V387*/ meltfptr[386]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V379*/ meltfptr[378])) ==
+ ( /*_.VALDATA___V380*/ meltfptr[379])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V379*/
- meltfptr[378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]))->obj_vartab[6] =
+ ( /*_.VALDATA___V380*/
+ meltfptr[379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V386*/ meltfptr[385]);
+ /*_.VALTUP___V387*/ meltfptr[386]);
- MELT_LOCATION ("warmelt-normatch.melt:541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V379*/ meltfptr[378]);
+ meltgc_touch ( /*_.VALDATA___V380*/ meltfptr[379]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V387*/ meltfptr[386])) ==
+ ( /*_.VALDATA___V388*/ meltfptr[387])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V387*/
- meltfptr[386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[1] =
+ ( /*_.VALDATA___V388*/
+ meltfptr[387]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V388*/ meltfptr[387]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V388*/ meltfptr[387]);
+ /*_.VALSTR___V389*/ meltfptr[388]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]);
+ meltgc_touch ( /*_.VALDATA___V388*/ meltfptr[387]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V389*/ meltfptr[388])) ==
+ ( /*_.VALDATA___V390*/ meltfptr[389])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V389*/
- meltfptr[388]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]))->obj_vartab[1] =
+ ( /*_.VALDATA___V390*/
+ meltfptr[389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V390*/ meltfptr[389]);
+ /*_.VALSTR___V391*/ meltfptr[390]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V389*/ meltfptr[388]);
+ meltgc_touch ( /*_.VALDATA___V390*/ meltfptr[389]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V391*/ meltfptr[390])) ==
+ ( /*_.VALDATA___V392*/ meltfptr[391])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V391*/
- meltfptr[390]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V391*/ meltfptr[390]))->obj_vartab[1] =
+ ( /*_.VALDATA___V392*/
+ meltfptr[391]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V392*/ meltfptr[391]);
+ /*_.VALSTR___V393*/ meltfptr[392]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V391*/ meltfptr[390]);
+ meltgc_touch ( /*_.VALDATA___V392*/ meltfptr[391]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V393*/ meltfptr[392])) ==
+ ( /*_.VALDATA___V394*/ meltfptr[393])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V393*/
- meltfptr[392]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V393*/ meltfptr[392]))->obj_vartab[1] =
+ ( /*_.VALDATA___V394*/
+ meltfptr[393]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V394*/ meltfptr[393]);
+ /*_.VALSTR___V395*/ meltfptr[394]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V393*/ meltfptr[392])) ==
+ ( /*_.VALDATA___V394*/ meltfptr[393])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V393*/
- meltfptr[392]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V393*/ meltfptr[392]))->obj_vartab[4] =
+ ( /*_.VALDATA___V394*/
+ meltfptr[393]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V323*/ meltfptr[322]);
+ /*_.VALDATA___V324*/ meltfptr[323]);
/*putupl#158 */
melt_assertmsg ("putupl #158 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V395*/ meltfptr[394])) ==
+ ( /*_.VALTUP___V396*/ meltfptr[395])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #158 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V395*/
- meltfptr[394]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V395*/ meltfptr[394]))->tabval[0] =
+ ( /*_.VALTUP___V396*/
+ meltfptr[395]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V396*/ meltfptr[395]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35364,15 +35739,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#159 */
melt_assertmsg ("putupl #159 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V395*/ meltfptr[394])) ==
+ ( /*_.VALTUP___V396*/ meltfptr[395])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #159 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V395*/
- meltfptr[394]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V395*/ meltfptr[394]))->tabval[1] =
+ ( /*_.VALTUP___V396*/
+ meltfptr[395]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V396*/ meltfptr[395]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35383,119 +35758,119 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#160 */
melt_assertmsg ("putupl #160 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V395*/ meltfptr[394])) ==
+ ( /*_.VALTUP___V396*/ meltfptr[395])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #160 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V395*/
- meltfptr[394]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V395*/ meltfptr[394]))->tabval[2] =
+ ( /*_.VALTUP___V396*/
+ meltfptr[395]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V396*/ meltfptr[395]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#161 */
melt_assertmsg ("putupl #161 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V395*/ meltfptr[394])) ==
+ ( /*_.VALTUP___V396*/ meltfptr[395])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #161 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V395*/
- meltfptr[394]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V395*/ meltfptr[394]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ ( /*_.VALTUP___V396*/
+ meltfptr[395]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V396*/ meltfptr[395]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
/*putupl#162 */
melt_assertmsg ("putupl #162 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V395*/ meltfptr[394])) ==
+ ( /*_.VALTUP___V396*/ meltfptr[395])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #162 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V395*/
- meltfptr[394]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V395*/ meltfptr[394]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ ( /*_.VALTUP___V396*/
+ meltfptr[395]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V396*/ meltfptr[395]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V395*/ meltfptr[394]);
+ meltgc_touch ( /*_.VALTUP___V396*/ meltfptr[395]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V393*/ meltfptr[392])) ==
+ ( /*_.VALDATA___V394*/ meltfptr[393])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V393*/
- meltfptr[392]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V393*/ meltfptr[392]))->obj_vartab[5] =
+ ( /*_.VALDATA___V394*/
+ meltfptr[393]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V395*/ meltfptr[394]);
+ /*_.VALTUP___V396*/ meltfptr[395]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V396*/ meltfptr[395])) ==
+ ( /*_.VALDATA___V397*/ meltfptr[396])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V396*/
- meltfptr[395]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] =
+ ( /*_.VALDATA___V397*/
+ meltfptr[396]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V397*/ meltfptr[396]);
+ /*_.VALSTR___V398*/ meltfptr[397]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V396*/ meltfptr[395])) ==
+ ( /*_.VALDATA___V397*/ meltfptr[396])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V396*/
- meltfptr[395]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[2] =
+ ( /*_.VALDATA___V397*/
+ meltfptr[396]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V393*/ meltfptr[392]);
+ /*_.VALDATA___V394*/ meltfptr[393]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V396*/ meltfptr[395]);
+ meltgc_touch ( /*_.VALDATA___V397*/ meltfptr[396]);
/*putupl#163 */
melt_assertmsg ("putupl #163 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #163 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[0] =
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35506,232 +35881,232 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#164 */
melt_assertmsg ("putupl #164 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #164 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]);
/*putupl#165 */
melt_assertmsg ("putupl #165 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #165 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]);
/*putupl#166 */
melt_assertmsg ("putupl #166 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #166 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]);
/*putupl#167 */
melt_assertmsg ("putupl #167 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #167 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]);
/*putupl#168 */
melt_assertmsg ("putupl #168 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #168 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]);
/*putupl#169 */
melt_assertmsg ("putupl #169 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #169 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]);
/*putupl#170 */
melt_assertmsg ("putupl #170 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V398*/ meltfptr[397])) ==
+ ( /*_.VALTUP___V399*/ meltfptr[398])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #170 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V398*/
- meltfptr[397]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]);
+ ( /*_.VALTUP___V399*/
+ meltfptr[398]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V399*/ meltfptr[398]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V397*/ meltfptr[396]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V398*/ meltfptr[397]);
+ meltgc_touch ( /*_.VALTUP___V399*/ meltfptr[398]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V393*/ meltfptr[392])) ==
+ ( /*_.VALDATA___V394*/ meltfptr[393])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V393*/
- meltfptr[392]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V393*/ meltfptr[392]))->obj_vartab[6] =
+ ( /*_.VALDATA___V394*/
+ meltfptr[393]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V398*/ meltfptr[397]);
+ /*_.VALTUP___V399*/ meltfptr[398]);
- MELT_LOCATION ("warmelt-normatch.melt:550:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V393*/ meltfptr[392]);
+ meltgc_touch ( /*_.VALDATA___V394*/ meltfptr[393]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V399*/ meltfptr[398])) ==
+ ( /*_.VALDATA___V400*/ meltfptr[399])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V399*/
- meltfptr[398]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]))->obj_vartab[1] =
+ ( /*_.VALDATA___V400*/
+ meltfptr[399]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V400*/ meltfptr[399]);
+ /*_.VALSTR___V401*/ meltfptr[400]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V399*/ meltfptr[398]);
+ meltgc_touch ( /*_.VALDATA___V400*/ meltfptr[399]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V401*/ meltfptr[400])) ==
+ ( /*_.VALDATA___V402*/ meltfptr[401])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V401*/
- meltfptr[400]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[1] =
+ ( /*_.VALDATA___V402*/
+ meltfptr[401]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V402*/ meltfptr[401]);
+ /*_.VALSTR___V403*/ meltfptr[402]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V401*/ meltfptr[400]);
+ meltgc_touch ( /*_.VALDATA___V402*/ meltfptr[401]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V403*/ meltfptr[402])) ==
+ ( /*_.VALDATA___V404*/ meltfptr[403])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V403*/
- meltfptr[402]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]))->obj_vartab[1] =
+ ( /*_.VALDATA___V404*/
+ meltfptr[403]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V404*/ meltfptr[403]);
+ /*_.VALSTR___V405*/ meltfptr[404]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V403*/ meltfptr[402]);
+ meltgc_touch ( /*_.VALDATA___V404*/ meltfptr[403]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V405*/ meltfptr[404])) ==
+ ( /*_.VALDATA___V406*/ meltfptr[405])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V405*/
- meltfptr[404]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[1] =
+ ( /*_.VALDATA___V406*/
+ meltfptr[405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V406*/ meltfptr[405]);
+ /*_.VALSTR___V407*/ meltfptr[406]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V405*/ meltfptr[404])) ==
+ ( /*_.VALDATA___V406*/ meltfptr[405])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V405*/
- meltfptr[404]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[4] =
+ ( /*_.VALDATA___V406*/
+ meltfptr[405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]);
/*putupl#171 */
melt_assertmsg ("putupl #171 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V407*/ meltfptr[406])) ==
+ ( /*_.VALTUP___V408*/ meltfptr[407])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #171 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V407*/
- meltfptr[406]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V407*/ meltfptr[406]))->tabval[0] =
+ ( /*_.VALTUP___V408*/
+ meltfptr[407]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V408*/ meltfptr[407]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35742,15 +36117,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#172 */
melt_assertmsg ("putupl #172 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V407*/ meltfptr[406])) ==
+ ( /*_.VALTUP___V408*/ meltfptr[407])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #172 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V407*/
- meltfptr[406]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V407*/ meltfptr[406]))->tabval[1] =
+ ( /*_.VALTUP___V408*/
+ meltfptr[407]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V408*/ meltfptr[407]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35761,15 +36136,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#173 */
melt_assertmsg ("putupl #173 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V407*/ meltfptr[406])) ==
+ ( /*_.VALTUP___V408*/ meltfptr[407])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #173 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V407*/
- meltfptr[406]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V407*/ meltfptr[406]))->tabval[2] =
+ ( /*_.VALTUP___V408*/
+ meltfptr[407]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V408*/ meltfptr[407]))->tabval[2] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35780,173 +36155,173 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#174 */
melt_assertmsg ("putupl #174 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V407*/ meltfptr[406])) ==
+ ( /*_.VALTUP___V408*/ meltfptr[407])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #174 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V407*/
- meltfptr[406]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V407*/ meltfptr[406]))->tabval[3] =
+ ( /*_.VALTUP___V408*/
+ meltfptr[407]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V408*/ meltfptr[407]))->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V407*/ meltfptr[406]);
+ meltgc_touch ( /*_.VALTUP___V408*/ meltfptr[407]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V405*/ meltfptr[404])) ==
+ ( /*_.VALDATA___V406*/ meltfptr[405])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V405*/
- meltfptr[404]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[5] =
+ ( /*_.VALDATA___V406*/
+ meltfptr[405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V407*/ meltfptr[406]);
+ /*_.VALTUP___V408*/ meltfptr[407]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V409*/ meltfptr[408])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[1] =
+ ( /*_.VALDATA___V409*/
+ meltfptr[408]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V409*/ meltfptr[408]);
+ /*_.VALSTR___V410*/ meltfptr[409]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V408*/ meltfptr[407])) ==
+ ( /*_.VALDATA___V409*/ meltfptr[408])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V408*/
- meltfptr[407]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[2] =
+ ( /*_.VALDATA___V409*/
+ meltfptr[408]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V405*/ meltfptr[404]);
+ /*_.VALDATA___V406*/ meltfptr[405]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V408*/ meltfptr[407]);
+ meltgc_touch ( /*_.VALDATA___V409*/ meltfptr[408]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V410*/ meltfptr[409])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V410*/
- meltfptr[409]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[1] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V411*/ meltfptr[410]);
+ /*_.VALSTR___V412*/ meltfptr[411]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V410*/ meltfptr[409])) ==
+ ( /*_.VALDATA___V411*/ meltfptr[410])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V410*/
- meltfptr[409]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[2] =
+ ( /*_.VALDATA___V411*/
+ meltfptr[410]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V405*/ meltfptr[404]);
+ /*_.VALDATA___V406*/ meltfptr[405]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V410*/ meltfptr[409]);
+ meltgc_touch ( /*_.VALDATA___V411*/ meltfptr[410]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V412*/ meltfptr[411])) ==
+ ( /*_.VALDATA___V413*/ meltfptr[412])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V412*/
- meltfptr[411]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[1] =
+ ( /*_.VALDATA___V413*/
+ meltfptr[412]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V413*/ meltfptr[412]);
+ /*_.VALSTR___V414*/ meltfptr[413]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V412*/ meltfptr[411])) ==
+ ( /*_.VALDATA___V413*/ meltfptr[412])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V412*/
- meltfptr[411]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[2] =
+ ( /*_.VALDATA___V413*/
+ meltfptr[412]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V405*/ meltfptr[404]);
+ /*_.VALDATA___V406*/ meltfptr[405]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V412*/ meltfptr[411]);
+ meltgc_touch ( /*_.VALDATA___V413*/ meltfptr[412]);
/*putupl#175 */
melt_assertmsg ("putupl #175 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V414*/ meltfptr[413])) ==
+ ( /*_.VALTUP___V415*/ meltfptr[414])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #175 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V414*/
- meltfptr[413]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[0] =
+ ( /*_.VALTUP___V415*/
+ meltfptr[414]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35957,15 +36332,15 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#176 */
melt_assertmsg ("putupl #176 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V414*/ meltfptr[413])) ==
+ ( /*_.VALTUP___V415*/ meltfptr[414])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #176 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V414*/
- meltfptr[413]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[1] =
+ ( /*_.VALTUP___V415*/
+ meltfptr[414]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -35976,16 +36351,16 @@ warmelt_normatch_initialmeltchunk_4 (struct frame_start_module_melt_st
/*putupl#177 */
melt_assertmsg ("putupl #177 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V414*/ meltfptr[413])) ==
+ ( /*_.VALTUP___V415*/ meltfptr[414])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #177 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V414*/
- meltfptr[413]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]);
+ ( /*_.VALTUP___V415*/
+ meltfptr[414]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V409*/ meltfptr[408]);
#undef meltfram__
@@ -36001,1403 +36376,1403 @@ warmelt_normatch_initialmeltchunk_5 (struct frame_start_module_melt_st
/*putupl#178*/
melt_assertmsg ("putupl #178 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V414*/ meltfptr[413])) ==
+ ( /*_.VALTUP___V415*/ meltfptr[414])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #178 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V414*/
- meltfptr[413]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]);
+ ( /*_.VALTUP___V415*/
+ meltfptr[414]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]);
/*putupl#179 */
melt_assertmsg ("putupl #179 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V414*/ meltfptr[413])) ==
+ ( /*_.VALTUP___V415*/ meltfptr[414])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #179 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V414*/
- meltfptr[413]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]);
+ ( /*_.VALTUP___V415*/
+ meltfptr[414]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V414*/ meltfptr[413]);
+ meltgc_touch ( /*_.VALTUP___V415*/ meltfptr[414]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V405*/ meltfptr[404])) ==
+ ( /*_.VALDATA___V406*/ meltfptr[405])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V405*/
- meltfptr[404]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[6] =
+ ( /*_.VALDATA___V406*/
+ meltfptr[405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V414*/ meltfptr[413]);
+ /*_.VALTUP___V415*/ meltfptr[414]);
- MELT_LOCATION ("warmelt-normatch.melt:558:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V405*/ meltfptr[404]);
+ meltgc_touch ( /*_.VALDATA___V406*/ meltfptr[405]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V415*/ meltfptr[414])) ==
+ ( /*_.VALDATA___V416*/ meltfptr[415])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V415*/
- meltfptr[414]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]))->obj_vartab[1] =
+ ( /*_.VALDATA___V416*/
+ meltfptr[415]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V416*/ meltfptr[415]);
+ /*_.VALSTR___V417*/ meltfptr[416]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V415*/ meltfptr[414]);
+ meltgc_touch ( /*_.VALDATA___V416*/ meltfptr[415]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V417*/ meltfptr[416])) ==
+ ( /*_.VALDATA___V418*/ meltfptr[417])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V417*/
- meltfptr[416]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]))->obj_vartab[1] =
+ ( /*_.VALDATA___V418*/
+ meltfptr[417]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V418*/ meltfptr[417]);
+ /*_.VALSTR___V419*/ meltfptr[418]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V417*/ meltfptr[416]);
+ meltgc_touch ( /*_.VALDATA___V418*/ meltfptr[417]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V419*/ meltfptr[418])) ==
+ ( /*_.VALDATA___V420*/ meltfptr[419])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V419*/
- meltfptr[418]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]))->obj_vartab[1] =
+ ( /*_.VALDATA___V420*/
+ meltfptr[419]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V420*/ meltfptr[419]);
+ /*_.VALSTR___V421*/ meltfptr[420]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V419*/ meltfptr[418]);
+ meltgc_touch ( /*_.VALDATA___V420*/ meltfptr[419]);
- MELT_LOCATION ("warmelt-normatch.melt:567:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V421*/ meltfptr[420])) ==
+ ( /*_.VALROUT___V422*/ meltfptr[421])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_332__REGISTER_NEW_NORMTESTER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:567:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V421*/ meltfptr[420])) ==
+ ( /*_.VALROUT___V422*/ meltfptr[421])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:567:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V421*/ meltfptr[420])) ==
+ ( /*_.VALROUT___V422*/ meltfptr[421])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:567:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V421*/ meltfptr[420])) ==
+ ( /*_.VALROUT___V422*/ meltfptr[421])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_332__REGISTER_NEW_NORMTESTER#3",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[3] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:567:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V421*/ meltfptr[420]);
+ meltgc_touch ( /*_.VALROUT___V422*/ meltfptr[421]);
/*putclosurout#16 */
melt_assertmsg ("putclosrout#16 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V422*/ meltfptr[421])) ==
+ ( /*_.VALCLO___V423*/ meltfptr[422])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#16 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V421*/ meltfptr[420])) ==
+ ( /*_.VALROUT___V422*/ meltfptr[421])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V422*/ meltfptr[421])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V421*/ meltfptr[420]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V423*/ meltfptr[422])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V422*/ meltfptr[421]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V422*/ meltfptr[421]);
+ meltgc_touch ( /*_.VALCLO___V423*/ meltfptr[422]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V423*/ meltfptr[422])) ==
+ ( /*_.VALDATA___V424*/ meltfptr[423])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V423*/
- meltfptr[422]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]))->obj_vartab[1] =
+ ( /*_.VALDATA___V424*/
+ meltfptr[423]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V424*/ meltfptr[423]);
+ /*_.VALSTR___V425*/ meltfptr[424]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V423*/ meltfptr[422]);
+ meltgc_touch ( /*_.VALDATA___V424*/ meltfptr[423]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_336__PUT_TESTER_THEN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V283*/ meltfptr[282]);
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
+ NULL != /*_.VALDATA___V284*/ meltfptr[283]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V329*/ meltfptr[328]);
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]);
+ NULL != /*_.VALDATA___V330*/ meltfptr[329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_336__PUT_TESTER_THEN#4",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:627:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V427*/ meltfptr[426])) ==
+ ( /*_.VALROUT___V428*/ meltfptr[427])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_340__SET_NEW_TESTER_LAST_THEN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:627:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V427*/ meltfptr[426])) ==
+ ( /*_.VALROUT___V428*/ meltfptr[427])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:627:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V427*/ meltfptr[426])) ==
+ ( /*_.VALROUT___V428*/ meltfptr[427])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_340__SET_NEW_TESTER_LAST_THEN#2",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
/*putclosurout#17 */
melt_assertmsg ("putclosrout#17 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V428*/ meltfptr[427])) ==
+ ( /*_.VALCLO___V429*/ meltfptr[428])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#17 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V428*/ meltfptr[427])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V425*/ meltfptr[424]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V429*/ meltfptr[428])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V426*/ meltfptr[425]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V428*/ meltfptr[427]);
+ meltgc_touch ( /*_.VALCLO___V429*/ meltfptr[428]);
- MELT_LOCATION ("warmelt-normatch.melt:627:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V427*/ meltfptr[426])) ==
+ ( /*_.VALROUT___V428*/ meltfptr[427])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V428*/ meltfptr[427]);
- ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V428*/ meltfptr[427]);
+ NULL != /*_.VALCLO___V429*/ meltfptr[428]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]);
- MELT_LOCATION ("warmelt-normatch.melt:627:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V427*/ meltfptr[426]);
+ meltgc_touch ( /*_.VALROUT___V428*/ meltfptr[427]);
/*putclosurout#18 */
melt_assertmsg ("putclosrout#18 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V426*/ meltfptr[425])) ==
+ ( /*_.VALCLO___V427*/ meltfptr[426])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#18 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V427*/ meltfptr[426])) ==
+ ( /*_.VALROUT___V428*/ meltfptr[427])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V426*/ meltfptr[425])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V427*/ meltfptr[426]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V427*/ meltfptr[426])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V426*/ meltfptr[425]);
+ meltgc_touch ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V425*/ meltfptr[424])) ==
+ ( /*_.VALROUT___V426*/ meltfptr[425])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V425*/ meltfptr[424])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V426*/ meltfptr[425])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V425*/ meltfptr[424]);
+ meltgc_touch ( /*_.VALROUT___V426*/ meltfptr[425]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V429*/ meltfptr[428])) ==
+ ( /*_.VALDATA___V430*/ meltfptr[429])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V429*/
- meltfptr[428]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]))->obj_vartab[1] =
+ ( /*_.VALDATA___V430*/
+ meltfptr[429]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V430*/ meltfptr[429]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V430*/ meltfptr[429]);
+ /*_.VALSTR___V431*/ meltfptr[430]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V429*/ meltfptr[428]);
+ meltgc_touch ( /*_.VALDATA___V430*/ meltfptr[429]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_342__SET_NEW_TESTER_ALL_ELSES#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V432*/ meltfptr[431])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V432*/ meltfptr[431])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_342__SET_NEW_TESTER_ALL_ELSES#2",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V432*/ meltfptr[431])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V432*/ meltfptr[431])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
/*putclosurout#19 */
melt_assertmsg ("putclosrout#19 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V432*/ meltfptr[431])) ==
+ ( /*_.VALCLO___V433*/ meltfptr[432])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#19 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V432*/ meltfptr[431])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V431*/ meltfptr[430]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V433*/ meltfptr[432])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V432*/ meltfptr[431]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V432*/ meltfptr[431]);
+ meltgc_touch ( /*_.VALCLO___V433*/ meltfptr[432]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V431*/ meltfptr[430])) ==
+ ( /*_.VALROUT___V432*/ meltfptr[431])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V432*/ meltfptr[431]);
- ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V432*/ meltfptr[431]);
+ NULL != /*_.VALCLO___V433*/ meltfptr[432]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V432*/ meltfptr[431])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V433*/ meltfptr[432]);
- MELT_LOCATION ("warmelt-normatch.melt:652:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V431*/ meltfptr[430]);
+ meltgc_touch ( /*_.VALROUT___V432*/ meltfptr[431]);
- MELT_LOCATION ("warmelt-normatch.melt:716:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V433*/ meltfptr[432])) ==
+ ( /*_.VALROUT___V434*/ meltfptr[433])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_344__NORMPAT_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:716:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V433*/ meltfptr[432])) ==
+ ( /*_.VALROUT___V434*/ meltfptr[433])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:716:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V433*/ meltfptr[432])) ==
+ ( /*_.VALROUT___V434*/ meltfptr[433])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_344__NORMPAT_ANYRECV#2",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:716:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V433*/ meltfptr[432])) ==
+ ( /*_.VALROUT___V434*/ meltfptr[433])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_344__NORMPAT_ANYRECV#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:716:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V433*/ meltfptr[432]);
+ meltgc_touch ( /*_.VALROUT___V434*/ meltfptr[433]);
/*putclosurout#20 */
melt_assertmsg ("putclosrout#20 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V434*/ meltfptr[433])) ==
+ ( /*_.VALCLO___V435*/ meltfptr[434])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#20 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V433*/ meltfptr[432])) ==
+ ( /*_.VALROUT___V434*/ meltfptr[433])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V434*/ meltfptr[433])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V433*/ meltfptr[432]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V435*/ meltfptr[434])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V434*/ meltfptr[433]);
+ meltgc_touch ( /*_.VALCLO___V435*/ meltfptr[434]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_346__NORMPAT_ANYPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_346__NORMPAT_ANYPAT#2",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_346__NORMPAT_ANYPAT#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_346__NORMPAT_ANYPAT#4",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:732:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V435*/ meltfptr[434]);
+ meltgc_touch ( /*_.VALROUT___V436*/ meltfptr[435]);
/*putclosurout#21 */
melt_assertmsg ("putclosrout#21 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V436*/ meltfptr[435])) ==
+ ( /*_.VALCLO___V437*/ meltfptr[436])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#21 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V435*/ meltfptr[434])) ==
+ ( /*_.VALROUT___V436*/ meltfptr[435])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V436*/ meltfptr[435])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V435*/ meltfptr[434]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V437*/ meltfptr[436])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V436*/ meltfptr[435]);
+ meltgc_touch ( /*_.VALCLO___V437*/ meltfptr[436]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#1",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V347*/ meltfptr[346]);
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ NULL != /*_.VALDATA___V348*/ meltfptr[347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#6",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[6] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:770:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V438*/ meltfptr[437])) ==
+ ( /*_.VALROUT___V439*/ meltfptr[438])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V439*/ meltfptr[438])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:770:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V438*/ meltfptr[437])) ==
+ ( /*_.VALROUT___V439*/ meltfptr[438])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_352__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V439*/ meltfptr[438])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:770:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V438*/ meltfptr[437]);
+ meltgc_touch ( /*_.VALROUT___V439*/ meltfptr[438]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#7",
- NULL != ( /*_.VALROUT___V438*/ meltfptr[437]));
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437]);
+ NULL != ( /*_.VALROUT___V439*/ meltfptr[438]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V439*/ meltfptr[438]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#8",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[9] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
- MELT_LOCATION ("warmelt-normatch.melt:752:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V437*/ meltfptr[436]);
+ meltgc_touch ( /*_.VALROUT___V438*/ meltfptr[437]);
/*putclosurout#22 */
melt_assertmsg ("putclosrout#22 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V439*/ meltfptr[438])) ==
+ ( /*_.VALCLO___V440*/ meltfptr[439])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#22 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V437*/ meltfptr[436])) ==
+ ( /*_.VALROUT___V438*/ meltfptr[437])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V439*/ meltfptr[438])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V437*/ meltfptr[436]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V440*/ meltfptr[439])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V439*/ meltfptr[438]);
+ meltgc_touch ( /*_.VALCLO___V440*/ meltfptr[439]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V440*/ meltfptr[439])) ==
+ ( /*_.VALDATA___V441*/ meltfptr[440])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V440*/
- meltfptr[439]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V440*/ meltfptr[439]))->obj_vartab[1] =
+ ( /*_.VALDATA___V441*/
+ meltfptr[440]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V441*/ meltfptr[440]);
+ /*_.VALSTR___V442*/ meltfptr[441]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V440*/ meltfptr[439]);
+ meltgc_touch ( /*_.VALDATA___V441*/ meltfptr[440]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#4",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V439*/ meltfptr[438]);
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V439*/ meltfptr[438]);
+ NULL != /*_.VALCLO___V440*/ meltfptr[439]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V440*/ meltfptr[439]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#7",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[7] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#8",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#9",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#10",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#11",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#12",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V442*/ meltfptr[441])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V443*/ meltfptr[442])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-normatch.melt:804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V442*/ meltfptr[441]);
+ meltgc_touch ( /*_.VALROUT___V443*/ meltfptr[442]);
/*putclosurout#23 */
melt_assertmsg ("putclosrout#23 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V443*/ meltfptr[442])) ==
+ ( /*_.VALCLO___V444*/ meltfptr[443])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#23 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V442*/ meltfptr[441])) ==
+ ( /*_.VALROUT___V443*/ meltfptr[442])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V443*/ meltfptr[442])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V442*/ meltfptr[441]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V444*/ meltfptr[443])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V443*/ meltfptr[442]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V443*/ meltfptr[442]);
+ meltgc_touch ( /*_.VALCLO___V444*/ meltfptr[443]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V444*/ meltfptr[443])) ==
+ ( /*_.VALDATA___V445*/ meltfptr[444])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V444*/
- meltfptr[443]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[1] =
+ ( /*_.VALDATA___V445*/
+ meltfptr[444]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V445*/ meltfptr[444]);
+ /*_.VALSTR___V446*/ meltfptr[445]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V444*/ meltfptr[443]);
+ meltgc_touch ( /*_.VALDATA___V445*/ meltfptr[444]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V446*/ meltfptr[445])) ==
+ ( /*_.VALDATA___V447*/ meltfptr[446])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V446*/
- meltfptr[445]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] =
+ ( /*_.VALDATA___V447*/
+ meltfptr[446]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V447*/ meltfptr[446]);
+ /*_.VALSTR___V448*/ meltfptr[447]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]);
+ meltgc_touch ( /*_.VALDATA___V447*/ meltfptr[446]);
- MELT_LOCATION ("warmelt-normatch.melt:948:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V448*/ meltfptr[447])) ==
+ ( /*_.VALROUT___V449*/ meltfptr[448])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_359__NORMPAT_JOKERPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V449*/ meltfptr[448])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:948:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V448*/ meltfptr[447])) ==
+ ( /*_.VALROUT___V449*/ meltfptr[448])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_359__NORMPAT_JOKERPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V449*/ meltfptr[448])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
- MELT_LOCATION ("warmelt-normatch.melt:948:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V448*/ meltfptr[447])) ==
+ ( /*_.VALROUT___V449*/ meltfptr[448])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V449*/ meltfptr[448])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:948:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V448*/ meltfptr[447]);
+ meltgc_touch ( /*_.VALROUT___V449*/ meltfptr[448]);
/*putclosurout#24 */
melt_assertmsg ("putclosrout#24 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V449*/ meltfptr[448])) ==
+ ( /*_.VALCLO___V450*/ meltfptr[449])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#24 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V448*/ meltfptr[447])) ==
+ ( /*_.VALROUT___V449*/ meltfptr[448])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V449*/ meltfptr[448])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V448*/ meltfptr[447]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V450*/ meltfptr[449])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V449*/ meltfptr[448]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V449*/ meltfptr[448]);
+ meltgc_touch ( /*_.VALCLO___V450*/ meltfptr[449]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/ meltfptr[42]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/ meltfptr[42]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#4",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#5",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[5] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#6",
NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V379*/ meltfptr[378]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]);
+ NULL != /*_.VALDATA___V380*/ meltfptr[379]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#10",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[10] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:996:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V451*/ meltfptr[450])) ==
+ ( /*_.VALROUT___V452*/ meltfptr[451])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:996:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V451*/ meltfptr[450])) ==
+ ( /*_.VALROUT___V452*/ meltfptr[451])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_365__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:996:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V451*/ meltfptr[450]);
+ meltgc_touch ( /*_.VALROUT___V452*/ meltfptr[451]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#11",
- NULL != ( /*_.VALROUT___V451*/ meltfptr[450]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V451*/ meltfptr[450]);
+ NULL != ( /*_.VALROUT___V452*/ meltfptr[451]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V452*/ meltfptr[451]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#12",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#13",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[14] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#15",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#16",
NULL !=
( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#17",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V452*/ meltfptr[451])) ==
+ ( /*_.VALROUT___V453*/ meltfptr[452])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#0",
NULL !=
( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V452*/ meltfptr[451])) ==
+ ( /*_.VALROUT___V453*/ meltfptr[452])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#1",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
@@ -37411,1485 +37786,1485 @@ warmelt_normatch_initialmeltchunk_6 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V452*/ meltfptr[451])) ==
+ ( /*_.VALROUT___V453*/ meltfptr[452])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V453*/ meltfptr[452]));
- ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V453*/ meltfptr[452]);
+ NULL != ( /*_.VALBXINT___V454*/ meltfptr[453]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V454*/ meltfptr[453]);
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V452*/ meltfptr[451])) ==
+ ( /*_.VALROUT___V453*/ meltfptr[452])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#3",
- NULL != ( /*_.VALBXINT___V454*/ meltfptr[453]));
- ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[3] =
- (melt_ptr_t) ( /*_.VALBXINT___V454*/ meltfptr[453]);
+ NULL != ( /*_.VALBXINT___V455*/ meltfptr[454]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALBXINT___V455*/ meltfptr[454]);
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V452*/ meltfptr[451])) ==
+ ( /*_.VALROUT___V453*/ meltfptr[452])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#4",
- NULL != ( /*_.VALBXINT___V455*/ meltfptr[454]));
- ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[4] =
- (melt_ptr_t) ( /*_.VALBXINT___V455*/ meltfptr[454]);
+ NULL != ( /*_.VALBXINT___V456*/ meltfptr[455]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALBXINT___V456*/ meltfptr[455]);
- MELT_LOCATION ("warmelt-normatch.melt:1041:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V452*/ meltfptr[451]);
+ meltgc_touch ( /*_.VALROUT___V453*/ meltfptr[452]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#18",
- NULL != ( /*_.VALROUT___V452*/ meltfptr[451]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[18] =
- (melt_ptr_t) ( /*_.VALROUT___V452*/ meltfptr[451]);
+ NULL != ( /*_.VALROUT___V453*/ meltfptr[452]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#19",
NULL !=
( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#20",
NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[20] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#21",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[21] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#22",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[24] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V456*/ meltfptr[455])) ==
+ ( /*_.VALROUT___V457*/ meltfptr[456])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_372__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V456*/ meltfptr[455])) ==
+ ( /*_.VALROUT___V457*/ meltfptr[456])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_372__LAMBDA_#1",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V456*/ meltfptr[455])) ==
+ ( /*_.VALROUT___V457*/ meltfptr[456])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V456*/ meltfptr[455])) ==
+ ( /*_.VALROUT___V457*/ meltfptr[456])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1068:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1069:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V456*/ meltfptr[455]);
+ meltgc_touch ( /*_.VALROUT___V457*/ meltfptr[456]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#25",
- NULL != ( /*_.VALROUT___V456*/ meltfptr[455]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[25] =
- (melt_ptr_t) ( /*_.VALROUT___V456*/ meltfptr[455]);
+ NULL != ( /*_.VALROUT___V457*/ meltfptr[456]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#26",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[26] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#27",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[27] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#28",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[28] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#29",
NULL != ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[29] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#30",
NULL !=
( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[30] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V47*/ meltfptr[46]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#31",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[31] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#32",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[32] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#33",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[33] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[33] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_INSTANCEPAT#34",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[34] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[34] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[35] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V451*/ meltfptr[450])->tabval[35] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:962:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V450*/ meltfptr[449]);
+ meltgc_touch ( /*_.VALROUT___V451*/ meltfptr[450]);
/*putclosurout#25 */
melt_assertmsg ("putclosrout#25 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V457*/ meltfptr[456])) ==
+ ( /*_.VALCLO___V458*/ meltfptr[457])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#25 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V450*/ meltfptr[449])) ==
+ ( /*_.VALROUT___V451*/ meltfptr[450])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V457*/ meltfptr[456])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V450*/ meltfptr[449]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V458*/ meltfptr[457])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V451*/ meltfptr[450]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V457*/ meltfptr[456]);
+ meltgc_touch ( /*_.VALCLO___V458*/ meltfptr[457]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V458*/ meltfptr[457])) ==
+ ( /*_.VALDATA___V459*/ meltfptr[458])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V458*/
- meltfptr[457]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[1] =
+ ( /*_.VALDATA___V459*/
+ meltfptr[458]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V459*/ meltfptr[458]);
+ /*_.VALSTR___V460*/ meltfptr[459]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V458*/ meltfptr[457]);
+ meltgc_touch ( /*_.VALDATA___V459*/ meltfptr[458]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V460*/ meltfptr[459])) ==
+ ( /*_.VALDATA___V461*/ meltfptr[460])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V460*/
- meltfptr[459]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] =
+ ( /*_.VALDATA___V461*/
+ meltfptr[460]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V461*/ meltfptr[460]);
+ /*_.VALSTR___V462*/ meltfptr[461]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V460*/ meltfptr[459]);
+ meltgc_touch ( /*_.VALDATA___V461*/ meltfptr[460]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V462*/ meltfptr[461])) ==
+ ( /*_.VALDATA___V463*/ meltfptr[462])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V462*/
- meltfptr[461]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461]))->obj_vartab[1] =
+ ( /*_.VALDATA___V463*/
+ meltfptr[462]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V463*/ meltfptr[462]);
+ /*_.VALSTR___V464*/ meltfptr[463]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V462*/ meltfptr[461]);
+ meltgc_touch ( /*_.VALDATA___V463*/ meltfptr[462]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V464*/ meltfptr[463])) ==
+ ( /*_.VALDATA___V465*/ meltfptr[464])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V464*/
- meltfptr[463]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] =
+ ( /*_.VALDATA___V465*/
+ meltfptr[464]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V465*/ meltfptr[464]);
+ /*_.VALSTR___V466*/ meltfptr[465]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V464*/ meltfptr[463]);
+ meltgc_touch ( /*_.VALDATA___V465*/ meltfptr[464]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V466*/ meltfptr[465])) ==
+ ( /*_.VALDATA___V467*/ meltfptr[466])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V466*/
- meltfptr[465]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]))->obj_vartab[1] =
+ ( /*_.VALDATA___V467*/
+ meltfptr[466]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V467*/ meltfptr[466]);
+ /*_.VALSTR___V468*/ meltfptr[467]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V466*/ meltfptr[465]);
+ meltgc_touch ( /*_.VALDATA___V467*/ meltfptr[466]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V468*/ meltfptr[467])) ==
+ ( /*_.VALDATA___V469*/ meltfptr[468])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V468*/
- meltfptr[467]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] =
+ ( /*_.VALDATA___V469*/
+ meltfptr[468]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V469*/ meltfptr[468]);
+ /*_.VALSTR___V470*/ meltfptr[469]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V468*/ meltfptr[467]);
+ meltgc_touch ( /*_.VALDATA___V469*/ meltfptr[468]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V470*/ meltfptr[469])) ==
+ ( /*_.VALDATA___V471*/ meltfptr[470])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V470*/
- meltfptr[469]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]))->obj_vartab[1] =
+ ( /*_.VALDATA___V471*/
+ meltfptr[470]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V471*/ meltfptr[470]);
+ /*_.VALSTR___V472*/ meltfptr[471]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V470*/ meltfptr[469]);
+ meltgc_touch ( /*_.VALDATA___V471*/ meltfptr[470]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V473*/ meltfptr[472])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] =
+ ( /*_.VALDATA___V473*/
+ meltfptr[472]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V473*/ meltfptr[472]);
+ /*_.VALSTR___V474*/ meltfptr[473]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V473*/ meltfptr[472])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[4] =
+ ( /*_.VALDATA___V473*/
+ meltfptr[472]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*putupl#180 */
melt_assertmsg ("putupl #180 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V474*/ meltfptr[473])) ==
+ ( /*_.VALTUP___V475*/ meltfptr[474])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #180 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V474*/
- meltfptr[473]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[0] =
+ ( /*_.VALTUP___V475*/
+ meltfptr[474]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V475*/ meltfptr[474]))->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V474*/ meltfptr[473]);
+ meltgc_touch ( /*_.VALTUP___V475*/ meltfptr[474]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V473*/ meltfptr[472])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[5] =
+ ( /*_.VALDATA___V473*/
+ meltfptr[472]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V474*/ meltfptr[473]);
+ /*_.VALTUP___V475*/ meltfptr[474]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V475*/ meltfptr[474])) ==
+ ( /*_.VALDATA___V476*/ meltfptr[475])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V475*/
- meltfptr[474]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[1] =
+ ( /*_.VALDATA___V476*/
+ meltfptr[475]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V476*/ meltfptr[475]);
+ /*_.VALSTR___V477*/ meltfptr[476]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V475*/ meltfptr[474])) ==
+ ( /*_.VALDATA___V476*/ meltfptr[475])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V475*/
- meltfptr[474]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[2] =
+ ( /*_.VALDATA___V476*/
+ meltfptr[475]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V472*/ meltfptr[471]);
+ /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V475*/ meltfptr[474]);
+ meltgc_touch ( /*_.VALDATA___V476*/ meltfptr[475]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V477*/ meltfptr[476])) ==
+ ( /*_.VALDATA___V478*/ meltfptr[477])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V477*/
- meltfptr[476]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[1] =
+ ( /*_.VALDATA___V478*/
+ meltfptr[477]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V478*/ meltfptr[477]);
+ /*_.VALSTR___V479*/ meltfptr[478]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V477*/ meltfptr[476])) ==
+ ( /*_.VALDATA___V478*/ meltfptr[477])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V477*/
- meltfptr[476]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[2] =
+ ( /*_.VALDATA___V478*/
+ meltfptr[477]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V472*/ meltfptr[471]);
+ /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V477*/ meltfptr[476]);
+ meltgc_touch ( /*_.VALDATA___V478*/ meltfptr[477]);
/*putupl#181 */
melt_assertmsg ("putupl #181 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V479*/ meltfptr[478])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #181 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V479*/
- meltfptr[478]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V479*/ meltfptr[478]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]);
/*putupl#182 */
melt_assertmsg ("putupl #182 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V479*/ meltfptr[478])) ==
+ ( /*_.VALTUP___V480*/ meltfptr[479])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #182 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V479*/
- meltfptr[478]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V479*/ meltfptr[478]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]);
+ ( /*_.VALTUP___V480*/
+ meltfptr[479]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V479*/ meltfptr[478]);
+ meltgc_touch ( /*_.VALTUP___V480*/ meltfptr[479]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V472*/ meltfptr[471])) ==
+ ( /*_.VALDATA___V473*/ meltfptr[472])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V472*/
- meltfptr[471]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[6] =
+ ( /*_.VALDATA___V473*/
+ meltfptr[472]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V479*/ meltfptr[478]);
+ /*_.VALTUP___V480*/ meltfptr[479]);
- MELT_LOCATION ("warmelt-normatch.melt:1144:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1145:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V472*/ meltfptr[471]);
+ meltgc_touch ( /*_.VALDATA___V473*/ meltfptr[472]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V480*/ meltfptr[479])) ==
+ ( /*_.VALDATA___V481*/ meltfptr[480])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V480*/
- meltfptr[479]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]))->obj_vartab[1] =
+ ( /*_.VALDATA___V481*/
+ meltfptr[480]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V481*/ meltfptr[480]);
+ /*_.VALSTR___V482*/ meltfptr[481]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V480*/ meltfptr[479]);
+ meltgc_touch ( /*_.VALDATA___V481*/ meltfptr[480]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V482*/ meltfptr[481])) ==
+ ( /*_.VALDATA___V483*/ meltfptr[482])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V482*/
- meltfptr[481]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[1] =
+ ( /*_.VALDATA___V483*/
+ meltfptr[482]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V483*/ meltfptr[482]);
+ /*_.VALSTR___V484*/ meltfptr[483]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V482*/ meltfptr[481]);
+ meltgc_touch ( /*_.VALDATA___V483*/ meltfptr[482]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/ meltfptr[48]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/ meltfptr[48]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#4",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V393*/ meltfptr[392]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V393*/ meltfptr[392]);
+ NULL != /*_.VALDATA___V394*/ meltfptr[393]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#8",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[8] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V485*/ meltfptr[484])) ==
+ ( /*_.VALROUT___V486*/ meltfptr[485])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V485*/ meltfptr[484])) ==
+ ( /*_.VALROUT___V486*/ meltfptr[485])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_399__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1184:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1185:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V485*/ meltfptr[484]);
+ meltgc_touch ( /*_.VALROUT___V486*/ meltfptr[485]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#9",
- NULL != ( /*_.VALROUT___V485*/ meltfptr[484]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V485*/ meltfptr[484]);
+ NULL != ( /*_.VALROUT___V486*/ meltfptr[485]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V486*/ meltfptr[485]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#10",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#11",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[12] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#13",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#14",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[14] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#16",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[16] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#17",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[17] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#19",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V486*/ meltfptr[485])) ==
+ ( /*_.VALROUT___V487*/ meltfptr[486])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V486*/ meltfptr[485])) ==
+ ( /*_.VALROUT___V487*/ meltfptr[486])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_404__LAMBDA_#1",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V486*/ meltfptr[485])) ==
+ ( /*_.VALROUT___V487*/ meltfptr[486])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_404__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V487*/ meltfptr[486]));
- ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V487*/ meltfptr[486]);
+ NULL != ( /*_.VALBXINT___V488*/ meltfptr[487]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V488*/ meltfptr[487]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V486*/ meltfptr[485])) ==
+ ( /*_.VALROUT___V487*/ meltfptr[486])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_404__LAMBDA_#3",
- NULL != ( /*_.VALBXINT___V488*/ meltfptr[487]));
- ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[3] =
- (melt_ptr_t) ( /*_.VALBXINT___V488*/ meltfptr[487]);
+ NULL != ( /*_.VALBXINT___V489*/ meltfptr[488]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALBXINT___V489*/ meltfptr[488]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V486*/ meltfptr[485])) ==
+ ( /*_.VALROUT___V487*/ meltfptr[486])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_404__LAMBDA_#4",
- NULL != ( /*_.VALBXINT___V489*/ meltfptr[488]));
- ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[4] =
- (melt_ptr_t) ( /*_.VALBXINT___V489*/ meltfptr[488]);
+ NULL != ( /*_.VALBXINT___V490*/ meltfptr[489]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALBXINT___V490*/ meltfptr[489]);
- MELT_LOCATION ("warmelt-normatch.melt:1243:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1244:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V486*/ meltfptr[485]);
+ meltgc_touch ( /*_.VALROUT___V487*/ meltfptr[486]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#20",
- NULL != ( /*_.VALROUT___V486*/ meltfptr[485]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[20] =
- (melt_ptr_t) ( /*_.VALROUT___V486*/ meltfptr[485]);
+ NULL != ( /*_.VALROUT___V487*/ meltfptr[486]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALROUT___V487*/ meltfptr[486]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#21",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[21] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#22",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[24] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V490*/ meltfptr[489])) ==
+ ( /*_.VALROUT___V491*/ meltfptr[490])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_408__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V490*/ meltfptr[489])) ==
+ ( /*_.VALROUT___V491*/ meltfptr[490])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_408__LAMBDA_#1",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V490*/ meltfptr[489])) ==
+ ( /*_.VALROUT___V491*/ meltfptr[490])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V490*/ meltfptr[489])) ==
+ ( /*_.VALROUT___V491*/ meltfptr[490])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1264:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1265:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V490*/ meltfptr[489]);
+ meltgc_touch ( /*_.VALROUT___V491*/ meltfptr[490]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#25",
- NULL != ( /*_.VALROUT___V490*/ meltfptr[489]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[25] =
- (melt_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489]);
+ NULL != ( /*_.VALROUT___V491*/ meltfptr[490]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#26",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[26] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#27",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[27] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#28",
NULL != ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[28] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#29",
NULL !=
( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V52*/
meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[29] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#30",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[30] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V491*/ meltfptr[490])) ==
+ ( /*_.VALDATA___V492*/ meltfptr[491])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V491*/
- meltfptr[490]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]))->obj_vartab[1] =
+ ( /*_.VALDATA___V492*/
+ meltfptr[491]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V492*/ meltfptr[491]);
+ /*_.VALSTR___V493*/ meltfptr[492]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V491*/ meltfptr[490]);
+ meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#31",
- NULL != ( /*_.VALDATA___V491*/ meltfptr[490]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[31] =
- (melt_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]);
+ NULL != ( /*_.VALDATA___V492*/ meltfptr[491]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[31] =
+ (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#32",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[32] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#33",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[33] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[33] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_395__NORMPAT_TUPLEPAT#34",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[34] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[34] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V484*/ meltfptr[483])->tabval[35] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[35] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:1153:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1154:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V484*/ meltfptr[483]);
+ meltgc_touch ( /*_.VALROUT___V485*/ meltfptr[484]);
/*putclosurout#26 */
melt_assertmsg ("putclosrout#26 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V493*/ meltfptr[492])) ==
+ ( /*_.VALCLO___V494*/ meltfptr[493])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#26 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V484*/ meltfptr[483])) ==
+ ( /*_.VALROUT___V485*/ meltfptr[484])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V493*/ meltfptr[492])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V484*/ meltfptr[483]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V494*/ meltfptr[493])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V485*/ meltfptr[484]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V493*/ meltfptr[492]);
+ meltgc_touch ( /*_.VALCLO___V494*/ meltfptr[493]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V494*/ meltfptr[493])) ==
+ ( /*_.VALDATA___V495*/ meltfptr[494])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V494*/
- meltfptr[493]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]))->obj_vartab[1] =
+ ( /*_.VALDATA___V495*/
+ meltfptr[494]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V495*/ meltfptr[494]);
+ /*_.VALSTR___V496*/ meltfptr[495]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V494*/ meltfptr[493]);
+ meltgc_touch ( /*_.VALDATA___V495*/ meltfptr[494]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V496*/ meltfptr[495])) ==
+ ( /*_.VALDATA___V497*/ meltfptr[496])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V496*/
- meltfptr[495]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]))->obj_vartab[1] =
+ ( /*_.VALDATA___V497*/
+ meltfptr[496]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V497*/ meltfptr[496]);
+ /*_.VALSTR___V498*/ meltfptr[497]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V496*/ meltfptr[495]);
+ meltgc_touch ( /*_.VALDATA___V497*/ meltfptr[496]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V498*/ meltfptr[497])) ==
+ ( /*_.VALDATA___V499*/ meltfptr[498])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V498*/
- meltfptr[497]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]))->obj_vartab[1] =
+ ( /*_.VALDATA___V499*/
+ meltfptr[498]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V499*/ meltfptr[498]);
+ /*_.VALSTR___V500*/ meltfptr[499]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V498*/ meltfptr[497]);
+ meltgc_touch ( /*_.VALDATA___V499*/ meltfptr[498]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V500*/ meltfptr[499])) ==
+ ( /*_.VALDATA___V501*/ meltfptr[500])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V500*/
- meltfptr[499]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] =
+ ( /*_.VALDATA___V501*/
+ meltfptr[500]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V501*/ meltfptr[500]);
+ /*_.VALSTR___V502*/ meltfptr[501]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V500*/ meltfptr[499]);
+ meltgc_touch ( /*_.VALDATA___V501*/ meltfptr[500]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
@@ -38903,1533 +39278,1533 @@ warmelt_normatch_initialmeltchunk_7 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#4",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#5",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[5] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#6",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V503*/ meltfptr[502])) ==
+ ( /*_.VALROUT___V504*/ meltfptr[503])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_415__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V503*/ meltfptr[502])) ==
+ ( /*_.VALROUT___V504*/ meltfptr[503])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_415__LAMBDA_#1",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V503*/ meltfptr[502])) ==
+ ( /*_.VALROUT___V504*/ meltfptr[503])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V503*/ meltfptr[502])) ==
+ ( /*_.VALROUT___V504*/ meltfptr[503])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1348:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1349:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V503*/ meltfptr[502]);
+ meltgc_touch ( /*_.VALROUT___V504*/ meltfptr[503]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_413__NORMPAT_ANDPAT#9",
- NULL != ( /*_.VALROUT___V503*/ meltfptr[502]));
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V503*/ meltfptr[502]);
+ NULL != ( /*_.VALROUT___V504*/ meltfptr[503]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V504*/ meltfptr[503]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V502*/ meltfptr[501])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:1339:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V502*/ meltfptr[501]);
+ meltgc_touch ( /*_.VALROUT___V503*/ meltfptr[502]);
/*putclosurout#27 */
melt_assertmsg ("putclosrout#27 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V504*/ meltfptr[503])) ==
+ ( /*_.VALCLO___V505*/ meltfptr[504])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#27 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V502*/ meltfptr[501])) ==
+ ( /*_.VALROUT___V503*/ meltfptr[502])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V504*/ meltfptr[503])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V502*/ meltfptr[501]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V505*/ meltfptr[504])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V503*/ meltfptr[502]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V504*/ meltfptr[503]);
+ meltgc_touch ( /*_.VALCLO___V505*/ meltfptr[504]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#4",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#5",
NULL !=
( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/
meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[5] =
(melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/ meltfptr[52]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V329*/ meltfptr[328]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]);
+ NULL != /*_.VALDATA___V330*/ meltfptr[329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#7",
NULL != ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[7] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#9",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#10",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[10] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V506*/ meltfptr[505])) ==
+ ( /*_.VALROUT___V507*/ meltfptr[506])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V506*/ meltfptr[505])) ==
+ ( /*_.VALROUT___V507*/ meltfptr[506])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V506*/ meltfptr[505])) ==
+ ( /*_.VALROUT___V507*/ meltfptr[506])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#2",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[2] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1417:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1418:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V506*/ meltfptr[505]);
+ meltgc_touch ( /*_.VALROUT___V507*/ meltfptr[506]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#11",
- NULL != ( /*_.VALROUT___V506*/ meltfptr[505]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[11] =
- (melt_ptr_t) ( /*_.VALROUT___V506*/ meltfptr[505]);
+ NULL != ( /*_.VALROUT___V507*/ meltfptr[506]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#12",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[13] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#15",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V293*/ meltfptr[292]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]);
+ NULL != /*_.VALDATA___V294*/ meltfptr[293]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#17",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[17] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#18",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[18] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#19",
NULL != ( /*_.CLASS_NREP__V55*/ meltfptr[54]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_NREP__V55*/ meltfptr[54]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V432*/ meltfptr[431]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[20] =
- (melt_ptr_t) ( /*_.VALCLO___V432*/ meltfptr[431]);
+ NULL != /*_.VALCLO___V433*/ meltfptr[432]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALCLO___V433*/ meltfptr[432]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#21",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[21] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#22",
NULL != ( /*_.SET_CONTENT__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[22] =
(melt_ptr_t) ( /*_.SET_CONTENT__V56*/ meltfptr[55]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[23] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#24",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[24] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V507*/ meltfptr[506])) ==
+ ( /*_.VALROUT___V508*/ meltfptr[507])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_425__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V507*/ meltfptr[506])) ==
+ ( /*_.VALROUT___V508*/ meltfptr[507])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_425__LAMBDA_#1",
NULL != ( /*_.SET_CONTENT__V56*/ meltfptr[55]));
- ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[1] =
(melt_ptr_t) ( /*_.SET_CONTENT__V56*/ meltfptr[55]);
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V507*/ meltfptr[506])) ==
+ ( /*_.VALROUT___V508*/ meltfptr[507])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V507*/ meltfptr[506])) ==
+ ( /*_.VALROUT___V508*/ meltfptr[507])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_425__LAMBDA_#3",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1497:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1498:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V507*/ meltfptr[506]);
+ meltgc_touch ( /*_.VALROUT___V508*/ meltfptr[507]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#25",
- NULL != ( /*_.VALROUT___V507*/ meltfptr[506]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[25] =
- (melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506]);
+ NULL != ( /*_.VALROUT___V508*/ meltfptr[507]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[26] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[26] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V309*/ meltfptr[308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V309*/ meltfptr[308]);
+ NULL != /*_.VALDATA___V310*/ meltfptr[309]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[28] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[29] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#30",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[30] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#31",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[31] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#32",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[32] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V508*/ meltfptr[507])) ==
+ ( /*_.VALROUT___V509*/ meltfptr[508])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V229*/ meltfptr[228]);
- ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V229*/ meltfptr[228]);
+ NULL != /*_.VALDATA___V230*/ meltfptr[229]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V509*/ meltfptr[508])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]);
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V508*/ meltfptr[507])) ==
+ ( /*_.VALROUT___V509*/ meltfptr[508])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V509*/ meltfptr[508])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V508*/ meltfptr[507])) ==
+ ( /*_.VALROUT___V509*/ meltfptr[508])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#2",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V509*/ meltfptr[508])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V508*/ meltfptr[507])) ==
+ ( /*_.VALROUT___V509*/ meltfptr[508])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V509*/ meltfptr[508])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1551:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1552:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V508*/ meltfptr[507]);
+ meltgc_touch ( /*_.VALROUT___V509*/ meltfptr[508]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_416__NORMPAT_ORPAT#33",
- NULL != ( /*_.VALROUT___V508*/ meltfptr[507]));
- ((meltroutine_ptr_t) /*_.VALROUT___V505*/ meltfptr[504])->tabval[33] =
- (melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507]);
+ NULL != ( /*_.VALROUT___V509*/ meltfptr[508]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V506*/ meltfptr[505])->tabval[33] =
+ (melt_ptr_t) ( /*_.VALROUT___V509*/ meltfptr[508]);
- MELT_LOCATION ("warmelt-normatch.melt:1388:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1389:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V505*/ meltfptr[504]);
+ meltgc_touch ( /*_.VALROUT___V506*/ meltfptr[505]);
/*putclosurout#28 */
melt_assertmsg ("putclosrout#28 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V509*/ meltfptr[508])) ==
+ ( /*_.VALCLO___V510*/ meltfptr[509])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#28 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V505*/ meltfptr[504])) ==
+ ( /*_.VALROUT___V506*/ meltfptr[505])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V509*/ meltfptr[508])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V505*/ meltfptr[504]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V510*/ meltfptr[509])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V506*/ meltfptr[505]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V509*/ meltfptr[508]);
+ meltgc_touch ( /*_.VALCLO___V510*/ meltfptr[509]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V510*/ meltfptr[509])) ==
+ ( /*_.VALDATA___V511*/ meltfptr[510])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V510*/
- meltfptr[509]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]))->obj_vartab[1] =
+ ( /*_.VALDATA___V511*/
+ meltfptr[510]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V511*/ meltfptr[510]);
+ /*_.VALSTR___V512*/ meltfptr[511]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V510*/ meltfptr[509]);
+ meltgc_touch ( /*_.VALDATA___V511*/ meltfptr[510]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V512*/ meltfptr[511])) ==
+ ( /*_.VALDATA___V513*/ meltfptr[512])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V512*/
- meltfptr[511]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] =
+ ( /*_.VALDATA___V513*/
+ meltfptr[512]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V513*/ meltfptr[512]);
+ /*_.VALSTR___V514*/ meltfptr[513]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V512*/ meltfptr[511]);
+ meltgc_touch ( /*_.VALDATA___V513*/ meltfptr[512]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V514*/ meltfptr[513])) ==
+ ( /*_.VALDATA___V515*/ meltfptr[514])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V514*/
- meltfptr[513]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]))->obj_vartab[1] =
+ ( /*_.VALDATA___V515*/
+ meltfptr[514]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V515*/ meltfptr[514]);
+ /*_.VALSTR___V516*/ meltfptr[515]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V514*/ meltfptr[513]);
+ meltgc_touch ( /*_.VALDATA___V515*/ meltfptr[514]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V516*/ meltfptr[515])) ==
+ ( /*_.VALDATA___V517*/ meltfptr[516])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V516*/
- meltfptr[515]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] =
+ ( /*_.VALDATA___V517*/
+ meltfptr[516]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V517*/ meltfptr[516]);
+ /*_.VALSTR___V518*/ meltfptr[517]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V516*/ meltfptr[515]);
+ meltgc_touch ( /*_.VALDATA___V517*/ meltfptr[516]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#4",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#5",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[5] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#6",
NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#7",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#8",
NULL != ( /*_.FIND_ENV__V59*/ meltfptr[58]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[8] =
(melt_ptr_t) ( /*_.FIND_ENV__V59*/ meltfptr[58]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#9",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[9] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#10",
NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[10] =
(melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#11",
NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[11] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#12",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#13",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#14",
NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[14] =
(melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#15",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#16",
NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[16] =
(melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V357*/ meltfptr[356]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]);
+ NULL != /*_.VALDATA___V358*/ meltfptr[357]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#20",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[20] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V519*/ meltfptr[518])) ==
+ ( /*_.VALROUT___V520*/ meltfptr[519])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V519*/ meltfptr[518])) ==
+ ( /*_.VALROUT___V520*/ meltfptr[519])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_441__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1722:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1723:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V519*/ meltfptr[518]);
+ meltgc_touch ( /*_.VALROUT___V520*/ meltfptr[519]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#21",
- NULL != ( /*_.VALROUT___V519*/ meltfptr[518]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[21] =
- (melt_ptr_t) ( /*_.VALROUT___V519*/ meltfptr[518]);
+ NULL != ( /*_.VALROUT___V520*/ meltfptr[519]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALROUT___V520*/ meltfptr[519]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#23",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[23] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[23] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V520*/ meltfptr[519])) ==
+ ( /*_.VALROUT___V521*/ meltfptr[520])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V520*/ meltfptr[519])) ==
+ ( /*_.VALROUT___V521*/ meltfptr[520])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_442__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1735:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1736:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V520*/ meltfptr[519]);
+ meltgc_touch ( /*_.VALROUT___V521*/ meltfptr[520]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#24",
- NULL != ( /*_.VALROUT___V520*/ meltfptr[519]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[24] =
- (melt_ptr_t) ( /*_.VALROUT___V520*/ meltfptr[519]);
+ NULL != ( /*_.VALROUT___V521*/ meltfptr[520]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#25",
NULL != ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[25] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#26",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[26] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#27",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[27] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#28",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[28] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#29",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[29] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#30",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[30] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#31",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[31] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#32",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[32] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#1",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#2",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[2] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#3",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#4",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#5",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V521*/ meltfptr[520])) ==
+ ( /*_.VALROUT___V522*/ meltfptr[521])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#6",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:1747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1748:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V521*/ meltfptr[520]);
+ meltgc_touch ( /*_.VALROUT___V522*/ meltfptr[521]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#33",
- NULL != ( /*_.VALROUT___V521*/ meltfptr[520]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[33] =
- (melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520]);
+ NULL != ( /*_.VALROUT___V522*/ meltfptr[521]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[33] =
+ (melt_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#34",
NULL != ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[34] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[34] =
(melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#35",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[35] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[35] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[36] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[36] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
#undef meltfram__
@@ -40442,678 +40817,678 @@ warmelt_normatch_initialmeltchunk_8 (struct frame_start_module_melt_st
#define meltfram__ (*meltmeltframptr__)
#undef meltcallcount
#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#37",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[37] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[37] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#38",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[38] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[38] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[39] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[39] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V522*/ meltfptr[521])) ==
+ ( /*_.VALROUT___V523*/ meltfptr[522])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_446__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V523*/ meltfptr[522])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V522*/ meltfptr[521])) ==
+ ( /*_.VALROUT___V523*/ meltfptr[522])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[1] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V523*/ meltfptr[522])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:1817:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1818:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V522*/ meltfptr[521]);
+ meltgc_touch ( /*_.VALROUT___V523*/ meltfptr[522]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#40",
- NULL != ( /*_.VALROUT___V522*/ meltfptr[521]));
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[40] =
- (melt_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521]);
+ NULL != ( /*_.VALROUT___V523*/ meltfptr[522]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[40] =
+ (melt_ptr_t) ( /*_.VALROUT___V523*/ meltfptr[522]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V518*/ meltfptr[517])->tabval[41] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V519*/ meltfptr[518])->tabval[41] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1585:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V518*/ meltfptr[517]);
+ meltgc_touch ( /*_.VALROUT___V519*/ meltfptr[518]);
/*putclosurout#29 */
melt_assertmsg ("putclosrout#29 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V523*/ meltfptr[522])) ==
+ ( /*_.VALCLO___V524*/ meltfptr[523])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#29 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V518*/ meltfptr[517])) ==
+ ( /*_.VALROUT___V519*/ meltfptr[518])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V523*/ meltfptr[522])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V518*/ meltfptr[517]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V524*/ meltfptr[523])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V519*/ meltfptr[518]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V523*/ meltfptr[522]);
+ meltgc_touch ( /*_.VALCLO___V524*/ meltfptr[523]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V524*/ meltfptr[523])) ==
+ ( /*_.VALDATA___V525*/ meltfptr[524])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V524*/
- meltfptr[523]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] =
+ ( /*_.VALDATA___V525*/
+ meltfptr[524]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V525*/ meltfptr[524]);
+ /*_.VALSTR___V526*/ meltfptr[525]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]);
+ meltgc_touch ( /*_.VALDATA___V525*/ meltfptr[524]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V526*/ meltfptr[525])) ==
+ ( /*_.VALDATA___V527*/ meltfptr[526])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V526*/
- meltfptr[525]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]))->obj_vartab[1] =
+ ( /*_.VALDATA___V527*/
+ meltfptr[526]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V527*/ meltfptr[526]);
+ /*_.VALSTR___V528*/ meltfptr[527]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V526*/ meltfptr[525]);
+ meltgc_touch ( /*_.VALDATA___V527*/ meltfptr[526]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V528*/ meltfptr[527])) ==
+ ( /*_.VALDATA___V529*/ meltfptr[528])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V528*/
- meltfptr[527]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]))->obj_vartab[1] =
+ ( /*_.VALDATA___V529*/
+ meltfptr[528]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V529*/ meltfptr[528]);
+ /*_.VALSTR___V530*/ meltfptr[529]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V528*/ meltfptr[527]);
+ meltgc_touch ( /*_.VALDATA___V529*/ meltfptr[528]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V530*/ meltfptr[529])) ==
+ ( /*_.VALDATA___V531*/ meltfptr[530])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V530*/
- meltfptr[529]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[1] =
+ ( /*_.VALDATA___V531*/
+ meltfptr[530]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V531*/ meltfptr[530]);
+ /*_.VALSTR___V532*/ meltfptr[531]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V530*/ meltfptr[529]);
+ meltgc_touch ( /*_.VALDATA___V531*/ meltfptr[530]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V532*/ meltfptr[531])) ==
+ ( /*_.VALDATA___V533*/ meltfptr[532])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V532*/
- meltfptr[531]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] =
+ ( /*_.VALDATA___V533*/
+ meltfptr[532]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V533*/ meltfptr[532]);
+ /*_.VALSTR___V534*/ meltfptr[533]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V532*/ meltfptr[531]);
+ meltgc_touch ( /*_.VALDATA___V533*/ meltfptr[532]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V534*/ meltfptr[533])) ==
+ ( /*_.VALDATA___V535*/ meltfptr[534])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V534*/
- meltfptr[533]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[1] =
+ ( /*_.VALDATA___V535*/
+ meltfptr[534]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V535*/ meltfptr[534]);
+ /*_.VALSTR___V536*/ meltfptr[535]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V534*/ meltfptr[533]);
+ meltgc_touch ( /*_.VALDATA___V535*/ meltfptr[534]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#2",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V347*/ meltfptr[346]);
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V347*/ meltfptr[346]);
+ NULL != /*_.VALDATA___V348*/ meltfptr[347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#7",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[7] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V537*/ meltfptr[536])) ==
+ ( /*_.VALROUT___V538*/ meltfptr[537])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V537*/ meltfptr[536])) ==
+ ( /*_.VALROUT___V538*/ meltfptr[537])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_449__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1877:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1878:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V537*/ meltfptr[536]);
+ meltgc_touch ( /*_.VALROUT___V538*/ meltfptr[537]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#8",
- NULL != ( /*_.VALROUT___V537*/ meltfptr[536]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[8] =
- (melt_ptr_t) ( /*_.VALROUT___V537*/ meltfptr[536]);
+ NULL != ( /*_.VALROUT___V538*/ meltfptr[537]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALROUT___V538*/ meltfptr[537]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#9",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V422*/ meltfptr[421]);
- ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[10] =
- (melt_ptr_t) ( /*_.VALCLO___V422*/ meltfptr[421]);
+ NULL != /*_.VALCLO___V423*/ meltfptr[422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALCLO___V423*/ meltfptr[422]);
- MELT_LOCATION ("warmelt-normatch.melt:1843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1844:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V536*/ meltfptr[535]);
+ meltgc_touch ( /*_.VALROUT___V537*/ meltfptr[536]);
/*putclosurout#30 */
melt_assertmsg ("putclosrout#30 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V538*/ meltfptr[537])) ==
+ ( /*_.VALCLO___V539*/ meltfptr[538])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#30 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V536*/ meltfptr[535])) ==
+ ( /*_.VALROUT___V537*/ meltfptr[536])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V538*/ meltfptr[537])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V536*/ meltfptr[535]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V539*/ meltfptr[538])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V537*/ meltfptr[536]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V538*/ meltfptr[537]);
+ meltgc_touch ( /*_.VALCLO___V539*/ meltfptr[538]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V539*/ meltfptr[538])) ==
+ ( /*_.VALDATA___V540*/ meltfptr[539])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V539*/
- meltfptr[538]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538]))->obj_vartab[1] =
+ ( /*_.VALDATA___V540*/
+ meltfptr[539]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V540*/ meltfptr[539]);
+ /*_.VALSTR___V541*/ meltfptr[540]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V539*/ meltfptr[538]);
+ meltgc_touch ( /*_.VALDATA___V540*/ meltfptr[539]);
- MELT_LOCATION ("warmelt-normatch.melt:1919:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1920:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V541*/ meltfptr[540])) ==
+ ( /*_.VALDATA___V542*/ meltfptr[541])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V541*/
- meltfptr[540]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]))->obj_vartab[0] =
+ ( /*_.VALDATA___V542*/
+ meltfptr[541]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]))->obj_vartab[0] =
(melt_ptr_t) (
( /*nil */ NULL));
- MELT_LOCATION ("warmelt-normatch.melt:1919:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1920:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V541*/ meltfptr[540]);
+ meltgc_touch ( /*_.VALDATA___V542*/ meltfptr[541]);
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V542*/ meltfptr[541])) ==
+ ( /*_.VALROUT___V543*/ meltfptr[542])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_453__MATCH_GRAPHIC_OPTSET#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V542*/ meltfptr[541])) ==
+ ( /*_.VALROUT___V543*/ meltfptr[542])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_453__MATCH_GRAPHIC_OPTSET#1",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V542*/ meltfptr[541])) ==
+ ( /*_.VALROUT___V543*/ meltfptr[542])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V541*/ meltfptr[540]);
- ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]);
+ NULL != /*_.VALDATA___V542*/ meltfptr[541]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]);
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V542*/ meltfptr[541])) ==
+ ( /*_.VALROUT___V543*/ meltfptr[542])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_453__MATCH_GRAPHIC_OPTSET#3",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:1922:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1923:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V542*/ meltfptr[541]);
+ meltgc_touch ( /*_.VALROUT___V543*/ meltfptr[542]);
/*putclosurout#31 */
melt_assertmsg ("putclosrout#31 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V543*/ meltfptr[542])) ==
+ ( /*_.VALCLO___V544*/ meltfptr[543])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#31 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V542*/ meltfptr[541])) ==
+ ( /*_.VALROUT___V543*/ meltfptr[542])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V543*/ meltfptr[542])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V542*/ meltfptr[541]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V544*/ meltfptr[543])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V543*/ meltfptr[542]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V543*/ meltfptr[542]);
+ meltgc_touch ( /*_.VALCLO___V544*/ meltfptr[543]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V544*/ meltfptr[543])) ==
+ ( /*_.VALDATA___V545*/ meltfptr[544])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V544*/
- meltfptr[543]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[1] =
+ ( /*_.VALDATA___V545*/
+ meltfptr[544]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V545*/ meltfptr[544]);
+ /*_.VALSTR___V546*/ meltfptr[545]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V544*/ meltfptr[543]);
+ meltgc_touch ( /*_.VALDATA___V545*/ meltfptr[544]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V546*/ meltfptr[545])) ==
+ ( /*_.VALDATA___V547*/ meltfptr[546])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V546*/
- meltfptr[545]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545]))->obj_vartab[1] =
+ ( /*_.VALDATA___V547*/
+ meltfptr[546]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V547*/ meltfptr[546]);
+ /*_.VALSTR___V548*/ meltfptr[547]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V546*/ meltfptr[545]);
+ meltgc_touch ( /*_.VALDATA___V547*/ meltfptr[546]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V548*/ meltfptr[547])) ==
+ ( /*_.VALDATA___V549*/ meltfptr[548])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V548*/
- meltfptr[547]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[1] =
+ ( /*_.VALDATA___V549*/
+ meltfptr[548]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V549*/ meltfptr[548]);
+ /*_.VALSTR___V550*/ meltfptr[549]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V548*/ meltfptr[547]);
+ meltgc_touch ( /*_.VALDATA___V549*/ meltfptr[548]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V551*/ meltfptr[550])) ==
+ ( /*_.VALDATA___V552*/ meltfptr[551])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V551*/
- meltfptr[550]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]))->obj_vartab[1] =
+ ( /*_.VALDATA___V552*/
+ meltfptr[551]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V552*/ meltfptr[551]);
+ /*_.VALSTR___V553*/ meltfptr[552]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V551*/ meltfptr[550]);
+ meltgc_touch ( /*_.VALDATA___V552*/ meltfptr[551]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V553*/ meltfptr[552])) ==
+ ( /*_.VALDATA___V554*/ meltfptr[553])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V553*/
- meltfptr[552]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]))->obj_vartab[1] =
+ ( /*_.VALDATA___V554*/
+ meltfptr[553]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V554*/ meltfptr[553]);
+ /*_.VALSTR___V555*/ meltfptr[554]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V553*/ meltfptr[552]);
+ meltgc_touch ( /*_.VALDATA___V554*/ meltfptr[553]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V555*/ meltfptr[554])) ==
+ ( /*_.VALDATA___V556*/ meltfptr[555])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V555*/
- meltfptr[554]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[1] =
+ ( /*_.VALDATA___V556*/
+ meltfptr[555]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V556*/ meltfptr[555]);
+ /*_.VALSTR___V557*/ meltfptr[556]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V555*/ meltfptr[554])) ==
+ ( /*_.VALDATA___V556*/ meltfptr[555])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V555*/
- meltfptr[554]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[4] =
+ ( /*_.VALDATA___V556*/
+ meltfptr[555]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*putupl#183 */
melt_assertmsg ("putupl #183 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V557*/ meltfptr[556])) ==
+ ( /*_.VALTUP___V558*/ meltfptr[557])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #183 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V557*/
- meltfptr[556]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V557*/ meltfptr[556]))->tabval[0] =
+ ( /*_.VALTUP___V558*/
+ meltfptr[557]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V558*/ meltfptr[557]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41123,255 +41498,255 @@ warmelt_normatch_initialmeltchunk_8 (struct frame_start_module_melt_st
/*putupl#184 */
melt_assertmsg ("putupl #184 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V557*/ meltfptr[556])) ==
+ ( /*_.VALTUP___V558*/ meltfptr[557])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #184 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V557*/
- meltfptr[556]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V557*/ meltfptr[556]))->tabval[1] =
+ ( /*_.VALTUP___V558*/
+ meltfptr[557]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V558*/ meltfptr[557]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V557*/ meltfptr[556]);
+ meltgc_touch ( /*_.VALTUP___V558*/ meltfptr[557]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V555*/ meltfptr[554])) ==
+ ( /*_.VALDATA___V556*/ meltfptr[555])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V555*/
- meltfptr[554]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[5] =
+ ( /*_.VALDATA___V556*/
+ meltfptr[555]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V557*/ meltfptr[556]);
+ /*_.VALTUP___V558*/ meltfptr[557]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V558*/ meltfptr[557])) ==
+ ( /*_.VALDATA___V559*/ meltfptr[558])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V558*/
- meltfptr[557]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[1] =
+ ( /*_.VALDATA___V559*/
+ meltfptr[558]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V559*/ meltfptr[558]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V559*/ meltfptr[558]);
+ /*_.VALSTR___V560*/ meltfptr[559]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V558*/ meltfptr[557])) ==
+ ( /*_.VALDATA___V559*/ meltfptr[558])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V558*/
- meltfptr[557]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[2] =
+ ( /*_.VALDATA___V559*/
+ meltfptr[558]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V559*/ meltfptr[558]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V555*/ meltfptr[554]);
+ /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V558*/ meltfptr[557]);
+ meltgc_touch ( /*_.VALDATA___V559*/ meltfptr[558]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V560*/ meltfptr[559])) ==
+ ( /*_.VALDATA___V561*/ meltfptr[560])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V560*/
- meltfptr[559]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] =
+ ( /*_.VALDATA___V561*/
+ meltfptr[560]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V561*/ meltfptr[560]);
+ /*_.VALSTR___V562*/ meltfptr[561]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V560*/ meltfptr[559])) ==
+ ( /*_.VALDATA___V561*/ meltfptr[560])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V560*/
- meltfptr[559]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[2] =
+ ( /*_.VALDATA___V561*/
+ meltfptr[560]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V555*/ meltfptr[554]);
+ /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V560*/ meltfptr[559]);
+ meltgc_touch ( /*_.VALDATA___V561*/ meltfptr[560]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V562*/ meltfptr[561])) ==
+ ( /*_.VALDATA___V563*/ meltfptr[562])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V562*/
- meltfptr[561]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[1] =
+ ( /*_.VALDATA___V563*/
+ meltfptr[562]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V563*/ meltfptr[562]);
+ /*_.VALSTR___V564*/ meltfptr[563]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V562*/ meltfptr[561])) ==
+ ( /*_.VALDATA___V563*/ meltfptr[562])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V562*/
- meltfptr[561]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[2] =
+ ( /*_.VALDATA___V563*/
+ meltfptr[562]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V555*/ meltfptr[554]);
+ /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V562*/ meltfptr[561]);
+ meltgc_touch ( /*_.VALDATA___V563*/ meltfptr[562]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V565*/ meltfptr[564])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[1] =
+ ( /*_.VALDATA___V565*/
+ meltfptr[564]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V565*/ meltfptr[564]);
+ /*_.VALSTR___V566*/ meltfptr[565]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V564*/ meltfptr[563])) ==
+ ( /*_.VALDATA___V565*/ meltfptr[564])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V564*/
- meltfptr[563]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[2] =
+ ( /*_.VALDATA___V565*/
+ meltfptr[564]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V555*/ meltfptr[554]);
+ /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V564*/ meltfptr[563]);
+ meltgc_touch ( /*_.VALDATA___V565*/ meltfptr[564]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V566*/ meltfptr[565])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V566*/
- meltfptr[565]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[1] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V567*/ meltfptr[566]);
+ /*_.VALSTR___V568*/ meltfptr[567]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V566*/ meltfptr[565])) ==
+ ( /*_.VALDATA___V567*/ meltfptr[566])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V566*/
- meltfptr[565]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[2] =
+ ( /*_.VALDATA___V567*/
+ meltfptr[566]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V555*/ meltfptr[554]);
+ /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V566*/ meltfptr[565]);
+ meltgc_touch ( /*_.VALDATA___V567*/ meltfptr[566]);
/*putupl#185 */
melt_assertmsg ("putupl #185 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #185 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[0] =
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -41381,2419 +41756,2465 @@ warmelt_normatch_initialmeltchunk_8 (struct frame_start_module_melt_st
/*putupl#186 */
melt_assertmsg ("putupl #186 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #186 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V559*/ meltfptr[558]);
/*putupl#187 */
melt_assertmsg ("putupl #187 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #187 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]);
/*putupl#188 */
melt_assertmsg ("putupl #188 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #188 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]);
/*putupl#189 */
melt_assertmsg ("putupl #189 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #189 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]);
/*putupl#190 */
melt_assertmsg ("putupl #190 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V568*/ meltfptr[567])) ==
+ ( /*_.VALTUP___V569*/ meltfptr[568])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #190 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V568*/
- meltfptr[567]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]);
+ ( /*_.VALTUP___V569*/
+ meltfptr[568]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V569*/ meltfptr[568]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V568*/ meltfptr[567]);
+ meltgc_touch ( /*_.VALTUP___V569*/ meltfptr[568]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V555*/ meltfptr[554])) ==
+ ( /*_.VALDATA___V556*/ meltfptr[555])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V555*/
- meltfptr[554]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[6] =
+ ( /*_.VALDATA___V556*/
+ meltfptr[555]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V568*/ meltfptr[567]);
+ /*_.VALTUP___V569*/ meltfptr[568]);
- MELT_LOCATION ("warmelt-normatch.melt:1937:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V555*/ meltfptr[554]);
+ meltgc_touch ( /*_.VALDATA___V556*/ meltfptr[555]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V569*/ meltfptr[568])) ==
+ ( /*_.VALDATA___V570*/ meltfptr[569])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V569*/
- meltfptr[568]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]))->obj_vartab[1] =
+ ( /*_.VALDATA___V570*/
+ meltfptr[569]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V570*/ meltfptr[569]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V570*/ meltfptr[569]);
+ /*_.VALSTR___V571*/ meltfptr[570]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]);
+ meltgc_touch ( /*_.VALDATA___V570*/ meltfptr[569]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V571*/ meltfptr[570])) ==
+ ( /*_.VALDATA___V572*/ meltfptr[571])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V571*/
- meltfptr[570]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] =
+ ( /*_.VALDATA___V572*/
+ meltfptr[571]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V572*/ meltfptr[571]);
+ /*_.VALSTR___V573*/ meltfptr[572]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V571*/ meltfptr[570]);
+ meltgc_touch ( /*_.VALDATA___V572*/ meltfptr[571]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V573*/ meltfptr[572])) ==
+ ( /*_.VALDATA___V574*/ meltfptr[573])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V573*/
- meltfptr[572]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[1] =
+ ( /*_.VALDATA___V574*/
+ meltfptr[573]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V574*/ meltfptr[573]);
+ /*_.VALSTR___V575*/ meltfptr[574]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V573*/ meltfptr[572]);
+ meltgc_touch ( /*_.VALDATA___V574*/ meltfptr[573]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V575*/ meltfptr[574])) ==
+ ( /*_.VALDATA___V576*/ meltfptr[575])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V575*/
- meltfptr[574]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V575*/ meltfptr[574]))->obj_vartab[1] =
+ ( /*_.VALDATA___V576*/
+ meltfptr[575]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V576*/ meltfptr[575]);
+ /*_.VALSTR___V577*/ meltfptr[576]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V575*/ meltfptr[574]);
+ meltgc_touch ( /*_.VALDATA___V576*/ meltfptr[575]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V577*/ meltfptr[576])) ==
+ ( /*_.VALDATA___V578*/ meltfptr[577])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V577*/
- meltfptr[576]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]))->obj_vartab[1] =
+ ( /*_.VALDATA___V578*/
+ meltfptr[577]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V578*/ meltfptr[577]);
+ /*_.VALSTR___V579*/ meltfptr[578]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V577*/ meltfptr[576]);
+ meltgc_touch ( /*_.VALDATA___V578*/ meltfptr[577]);
- MELT_LOCATION ("warmelt-normatch.melt:1951:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1952:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V579*/ meltfptr[578])) ==
+ ( /*_.VALROUT___V580*/ meltfptr[579])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V580*/ meltfptr[579])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1951:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1952:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V579*/ meltfptr[578])) ==
+ ( /*_.VALROUT___V580*/ meltfptr[579])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg ("putroutconst constnull.drout_490__MG_OUT_NODE_NAME#1",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V580*/ meltfptr[579])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:1951:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1952:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V579*/ meltfptr[578]);
+ meltgc_touch ( /*_.VALROUT___V580*/ meltfptr[579]);
/*putclosurout#32 */
melt_assertmsg ("putclosrout#32 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V580*/ meltfptr[579])) ==
+ ( /*_.VALCLO___V581*/ meltfptr[580])) ==
MELTOBMAG_CLOSURE);
melt_assertmsg ("putclosrout#32 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V579*/ meltfptr[578])) ==
+ ( /*_.VALROUT___V580*/ meltfptr[579])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V580*/ meltfptr[579])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V579*/ meltfptr[578]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V581*/ meltfptr[580])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V580*/ meltfptr[579]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V580*/ meltfptr[579]);
+ meltgc_touch ( /*_.VALCLO___V581*/ meltfptr[580]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V581*/ meltfptr[580])) ==
+ ( /*_.VALDATA___V582*/ meltfptr[581])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V581*/
- meltfptr[580]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]))->obj_vartab[1] =
+ ( /*_.VALDATA___V582*/
+ meltfptr[581]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V582*/ meltfptr[581]);
+ /*_.VALSTR___V583*/ meltfptr[582]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V581*/ meltfptr[580]);
+ meltgc_touch ( /*_.VALDATA___V582*/ meltfptr[581]);
- MELT_LOCATION ("warmelt-normatch.melt:1974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1976:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V583*/ meltfptr[582])) ==
+ ( /*_.VALDATA___V584*/ meltfptr[583])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V583*/
- meltfptr[582]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V583*/ meltfptr[582]))->obj_vartab[1] =
+ ( /*_.VALDATA___V584*/
+ meltfptr[583]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V584*/ meltfptr[583]);
+ /*_.VALSTR___V585*/ meltfptr[584]);
- MELT_LOCATION ("warmelt-normatch.melt:1974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1976:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V583*/ meltfptr[582]);
+ meltgc_touch ( /*_.VALDATA___V584*/ meltfptr[583]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V586*/ meltfptr[585])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY_TEST#0",
+ melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY#0",
+ NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V586*/ meltfptr[585])->tabval[0] =
+ (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V586*/ meltfptr[585])) ==
+ MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V586*/ meltfptr[585])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1978:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V586*/ meltfptr[585]);
+
+ /*putclosurout#33 */
+ melt_assertmsg ("putclosrout#33 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V587*/ meltfptr[586])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#33 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V586*/ meltfptr[585])) ==
+ MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V587*/ meltfptr[586])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V586*/ meltfptr[585]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V587*/ meltfptr[586]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
+ MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V580*/ meltfptr[579]);
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V580*/ meltfptr[579]);
+ NULL != /*_.VALCLO___V581*/ meltfptr[580]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V581*/ meltfptr[580]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY_TEST#4",
+ melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#4",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY_TEST#5",
+ melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#5",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_496__MGLABEL_ANY_TEST#6",
+ melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#6",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V585*/ meltfptr[584])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:1977:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1988:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V585*/ meltfptr[584]);
+ meltgc_touch ( /*_.VALROUT___V588*/ meltfptr[587]);
- /*putclosurout#33 */
- melt_assertmsg ("putclosrout#33 checkclo",
+ /*putclosurout#34 */
+ melt_assertmsg ("putclosrout#34 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V586*/ meltfptr[585])) ==
+ ( /*_.VALCLO___V589*/ meltfptr[588])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#33 checkrout",
+ melt_assertmsg ("putclosrout#34 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V585*/ meltfptr[584])) ==
+ ( /*_.VALROUT___V588*/ meltfptr[587])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V586*/ meltfptr[585])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V585*/ meltfptr[584]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V589*/ meltfptr[588])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V588*/ meltfptr[587]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V586*/ meltfptr[585]);
+ meltgc_touch ( /*_.VALCLO___V589*/ meltfptr[588]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V587*/ meltfptr[586])) ==
+ ( /*_.VALDATA___V590*/ meltfptr[589])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V587*/
- meltfptr[586]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]))->obj_vartab[1] =
+ ( /*_.VALDATA___V590*/
+ meltfptr[589]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V588*/ meltfptr[587]);
+ /*_.VALSTR___V591*/ meltfptr[590]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V587*/ meltfptr[586]);
+ meltgc_touch ( /*_.VALDATA___V590*/ meltfptr[589]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_500__MGLABEL_INSTANCE_TEST#0",
+ ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_8 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_9 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V379*/ meltfptr[378]);
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]);
+ NULL != /*_.VALDATA___V380*/ meltfptr[379]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V580*/ meltfptr[579]);
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V580*/ meltfptr[579]);
+ NULL != /*_.VALCLO___V581*/ meltfptr[580]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V581*/ meltfptr[580]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_500__MGLABEL_INSTANCE_TEST#4",
+ ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#4",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_500__MGLABEL_INSTANCE_TEST#5",
+ ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#5",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_8 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_9 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_500__MGLABEL_INSTANCE_TEST#6",
+ ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#6",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_500__MGLABEL_INSTANCE_TEST#7",
+ ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#7",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V592*/ meltfptr[591])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:2037:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2048:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V589*/ meltfptr[588]);
+ meltgc_touch ( /*_.VALROUT___V592*/ meltfptr[591]);
- /*putclosurout#34 */
- melt_assertmsg ("putclosrout#34 checkclo",
+ /*putclosurout#35 */
+ melt_assertmsg ("putclosrout#35 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V590*/ meltfptr[589])) ==
+ ( /*_.VALCLO___V593*/ meltfptr[592])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#34 checkrout",
+ melt_assertmsg ("putclosrout#35 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V589*/ meltfptr[588])) ==
+ ( /*_.VALROUT___V592*/ meltfptr[591])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V590*/ meltfptr[589])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V589*/ meltfptr[588]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V593*/ meltfptr[592])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V592*/ meltfptr[591]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V590*/ meltfptr[589]);
+ meltgc_touch ( /*_.VALCLO___V593*/ meltfptr[592]);
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V591*/ meltfptr[590])) ==
+ ( /*_.VALROUT___V594*/ meltfptr[593])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_SUCCESS_TEST#0",
+ melt_checkmsg ("putroutconst constnull.drout_504__MGLABEL_SUCCESS_TEST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V591*/ meltfptr[590])) ==
+ ( /*_.VALROUT___V594*/ meltfptr[593])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V283*/ meltfptr[282]);
- ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
+ NULL != /*_.VALDATA___V284*/ meltfptr[283]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V591*/ meltfptr[590])) ==
+ ( /*_.VALROUT___V594*/ meltfptr[593])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V591*/ meltfptr[590])) ==
+ ( /*_.VALROUT___V594*/ meltfptr[593])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V580*/ meltfptr[579]);
- ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V580*/ meltfptr[579]);
+ NULL != /*_.VALCLO___V581*/ meltfptr[580]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V581*/ meltfptr[580]);
- MELT_LOCATION ("warmelt-normatch.melt:2102:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2113:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V591*/ meltfptr[590]);
+ meltgc_touch ( /*_.VALROUT___V594*/ meltfptr[593]);
- /*putclosurout#35 */
- melt_assertmsg ("putclosrout#35 checkclo",
+ /*putclosurout#36 */
+ melt_assertmsg ("putclosrout#36 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V592*/ meltfptr[591])) ==
+ ( /*_.VALCLO___V595*/ meltfptr[594])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#35 checkrout",
+ melt_assertmsg ("putclosrout#36 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V591*/ meltfptr[590])) ==
+ ( /*_.VALROUT___V594*/ meltfptr[593])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V592*/ meltfptr[591])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V591*/ meltfptr[590]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V595*/ meltfptr[594])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V592*/ meltfptr[591]);
+ meltgc_touch ( /*_.VALCLO___V595*/ meltfptr[594]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_504__MATCHGRAPHIC_TESTS#0",
+ melt_checkmsg ("putroutconst constnull.drout_506__MATCHGRAPHIC_TESTS#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V593*/ meltfptr[592])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V593*/ meltfptr[592])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V593*/ meltfptr[592])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V580*/ meltfptr[579]);
- ((meltroutine_ptr_t) /*_.VALROUT___V593*/ meltfptr[592])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V580*/ meltfptr[579]);
+ NULL != /*_.VALCLO___V581*/ meltfptr[580]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V581*/ meltfptr[580]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V583*/ meltfptr[582]);
- ((meltroutine_ptr_t) /*_.VALROUT___V593*/ meltfptr[592])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V583*/ meltfptr[582]);
+ NULL != /*_.VALDATA___V584*/ meltfptr[583]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583]);
- MELT_LOCATION ("warmelt-normatch.melt:2142:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2153:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V593*/ meltfptr[592]);
+ meltgc_touch ( /*_.VALROUT___V596*/ meltfptr[595]);
- /*putclosurout#36 */
- melt_assertmsg ("putclosrout#36 checkclo",
+ /*putclosurout#37 */
+ melt_assertmsg ("putclosrout#37 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V594*/ meltfptr[593])) ==
+ ( /*_.VALCLO___V597*/ meltfptr[596])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#36 checkrout",
+ melt_assertmsg ("putclosrout#37 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V593*/ meltfptr[592])) ==
+ ( /*_.VALROUT___V596*/ meltfptr[595])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V594*/ meltfptr[593])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V593*/ meltfptr[592]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V597*/ meltfptr[596])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V594*/ meltfptr[593]);
+ meltgc_touch ( /*_.VALCLO___V597*/ meltfptr[596]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE#0",
+ ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#0",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE#1",
+ ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_506__MG_DRAW_MATCH_GRAPHVIZ_FILE#2",
+ ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#2",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V594*/ meltfptr[593]);
- ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V594*/ meltfptr[593]);
+ NULL != /*_.VALCLO___V597*/ meltfptr[596]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V597*/ meltfptr[596]);
- MELT_LOCATION ("warmelt-normatch.melt:2195:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2206:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V595*/ meltfptr[594]);
+ meltgc_touch ( /*_.VALROUT___V598*/ meltfptr[597]);
- /*putclosurout#37 */
- melt_assertmsg ("putclosrout#37 checkclo",
+ /*putclosurout#38 */
+ melt_assertmsg ("putclosrout#38 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V596*/ meltfptr[595])) ==
+ ( /*_.VALCLO___V599*/ meltfptr[598])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#37 checkrout",
+ melt_assertmsg ("putclosrout#38 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V595*/ meltfptr[594])) ==
+ ( /*_.VALROUT___V598*/ meltfptr[597])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V596*/ meltfptr[595])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V595*/ meltfptr[594]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V599*/ meltfptr[598])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V596*/ meltfptr[595]);
+ meltgc_touch ( /*_.VALCLO___V599*/ meltfptr[598]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V597*/ meltfptr[596])) ==
+ ( /*_.VALDATA___V600*/ meltfptr[599])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V597*/
- meltfptr[596]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]))->obj_vartab[1] =
+ ( /*_.VALDATA___V600*/
+ meltfptr[599]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V598*/ meltfptr[597]);
+ /*_.VALSTR___V601*/ meltfptr[600]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V597*/ meltfptr[596]);
+ meltgc_touch ( /*_.VALDATA___V600*/ meltfptr[599]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#0",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#0",
NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#1",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#1",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#2",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#2",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#3",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#4",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#4",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#5",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#5",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#6",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#6",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#7",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#7",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[7] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#8",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#8",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[8] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#9",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#9",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[9] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V600*/ meltfptr[599])) ==
+ ( /*_.VALDATA___V603*/ meltfptr[602])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V600*/
- meltfptr[599]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[1] =
+ ( /*_.VALDATA___V603*/
+ meltfptr[602]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V601*/ meltfptr[600]);
+ /*_.VALSTR___V604*/ meltfptr[603]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V600*/ meltfptr[599]);
+ meltgc_touch ( /*_.VALDATA___V603*/ meltfptr[602]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#10",
- NULL != ( /*_.VALDATA___V600*/ meltfptr[599]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]);
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#10",
+ NULL != ( /*_.VALDATA___V603*/ meltfptr[602]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#11",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#11",
NULL !=
( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#12",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#12",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#13",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#13",
NULL !=
( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V94*/ meltfptr[93]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V94*/ meltfptr[93]);
+ NULL != /*_.VALDATA___V95*/ meltfptr[94]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#15",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#15",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V146*/ meltfptr[145]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V146*/ meltfptr[145]);
+ NULL != /*_.VALDATA___V147*/ meltfptr[146]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V225*/ meltfptr[224]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V225*/ meltfptr[224]);
+ NULL != /*_.VALDATA___V226*/ meltfptr[225]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#18",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#18",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[18] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#19",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#19",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V602*/ meltfptr[601])) ==
+ ( /*_.VALROUT___V605*/ meltfptr[604])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_520__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_522__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V605*/ meltfptr[604])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V602*/ meltfptr[601])) ==
+ ( /*_.VALROUT___V605*/ meltfptr[604])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_520__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_522__LAMBDA_#1",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V605*/ meltfptr[604])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:2360:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2371:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V602*/ meltfptr[601]);
+ meltgc_touch ( /*_.VALROUT___V605*/ meltfptr[604]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#20",
- NULL != ( /*_.VALROUT___V602*/ meltfptr[601]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[20] =
- (melt_ptr_t) ( /*_.VALROUT___V602*/ meltfptr[601]);
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#20",
+ NULL != ( /*_.VALROUT___V605*/ meltfptr[604]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALROUT___V605*/ meltfptr[604]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V283*/ meltfptr[282]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]);
+ NULL != /*_.VALDATA___V284*/ meltfptr[283]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V426*/ meltfptr[425]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[22] =
- (melt_ptr_t) ( /*_.VALCLO___V426*/ meltfptr[425]);
+ NULL != /*_.VALCLO___V427*/ meltfptr[426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALCLO___V427*/ meltfptr[426]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V253*/ meltfptr[252]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]);
+ NULL != /*_.VALDATA___V254*/ meltfptr[253]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V323*/ meltfptr[322]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V323*/ meltfptr[322]);
+ NULL != /*_.VALDATA___V324*/ meltfptr[323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V432*/ meltfptr[431]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[25] =
- (melt_ptr_t) ( /*_.VALCLO___V432*/ meltfptr[431]);
+ NULL != /*_.VALCLO___V433*/ meltfptr[432]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALCLO___V433*/ meltfptr[432]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#26",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#26",
NULL !=
( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/
meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[26] =
(melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/ meltfptr[52]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#27",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#27",
NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[27] =
(melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#28",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#28",
NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[28] =
(melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#29",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#29",
NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[29] =
(melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#30",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#30",
NULL != ( /*_.WRAP_NORMAL_LETSEQ__V71*/ meltfptr[70]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[30] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[30] =
(melt_ptr_t) ( /*_.WRAP_NORMAL_LETSEQ__V71*/ meltfptr[70]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#31",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#31",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[31] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[31] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#32",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#32",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[32] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#33",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#33",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[33] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[33] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V405*/ meltfptr[404]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[34] =
- (melt_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]);
+ NULL != /*_.VALDATA___V406*/ meltfptr[405]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[34] =
+ (melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V603*/ meltfptr[602])) ==
+ ( /*_.VALDATA___V606*/ meltfptr[605])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V603*/
- meltfptr[602]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]))->obj_vartab[1] =
+ ( /*_.VALDATA___V606*/
+ meltfptr[605]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V604*/ meltfptr[603]);
+ /*_.VALSTR___V607*/ meltfptr[606]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V603*/ meltfptr[602]);
+ meltgc_touch ( /*_.VALDATA___V606*/ meltfptr[605]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#35",
- NULL != ( /*_.VALDATA___V603*/ meltfptr[602]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[35] =
- (melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]);
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#35",
+ NULL != ( /*_.VALDATA___V606*/ meltfptr[605]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[35] =
+ (melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_510__NORMEXP_MATCH#36",
+ melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#36",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[36] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[36] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V541*/ meltfptr[540]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[37] =
- (melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]);
+ NULL != /*_.VALDATA___V542*/ meltfptr[541]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[37] =
+ (melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V596*/ meltfptr[595]);
- ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[38] =
- (melt_ptr_t) ( /*_.VALCLO___V596*/ meltfptr[595]);
+ NULL != /*_.VALCLO___V599*/ meltfptr[598]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[38] =
+ (melt_ptr_t) ( /*_.VALCLO___V599*/ meltfptr[598]);
- MELT_LOCATION ("warmelt-normatch.melt:2263:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2274:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V599*/ meltfptr[598]);
+ meltgc_touch ( /*_.VALROUT___V602*/ meltfptr[601]);
- /*putclosurout#38 */
- melt_assertmsg ("putclosrout#38 checkclo",
+ /*putclosurout#39 */
+ melt_assertmsg ("putclosrout#39 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V605*/ meltfptr[604])) ==
+ ( /*_.VALCLO___V608*/ meltfptr[607])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#38 checkrout",
+ melt_assertmsg ("putclosrout#39 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V599*/ meltfptr[598])) ==
+ ( /*_.VALROUT___V602*/ meltfptr[601])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V605*/ meltfptr[604])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V599*/ meltfptr[598]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V608*/ meltfptr[607])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V602*/ meltfptr[601]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V605*/ meltfptr[604]);
+ meltgc_touch ( /*_.VALCLO___V608*/ meltfptr[607]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V606*/ meltfptr[605])) ==
+ ( /*_.VALDATA___V609*/ meltfptr[608])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V606*/
- meltfptr[605]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]))->obj_vartab[1] =
+ ( /*_.VALDATA___V609*/
+ meltfptr[608]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V607*/ meltfptr[606]);
+ /*_.VALSTR___V610*/ meltfptr[609]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V606*/ meltfptr[605]);
+ meltgc_touch ( /*_.VALDATA___V609*/ meltfptr[608]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V608*/ meltfptr[607])) ==
+ ( /*_.VALDATA___V611*/ meltfptr[610])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V608*/
- meltfptr[607]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[1] =
+ ( /*_.VALDATA___V611*/
+ meltfptr[610]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V609*/ meltfptr[608]);
+ /*_.VALSTR___V612*/ meltfptr[611]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V608*/ meltfptr[607]);
+ meltgc_touch ( /*_.VALDATA___V611*/ meltfptr[610]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V610*/ meltfptr[609])) ==
+ ( /*_.VALDATA___V613*/ meltfptr[612])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V610*/
- meltfptr[609]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[1] =
+ ( /*_.VALDATA___V613*/
+ meltfptr[612]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V611*/ meltfptr[610]);
+ /*_.VALSTR___V614*/ meltfptr[613]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V610*/ meltfptr[609]);
+ meltgc_touch ( /*_.VALDATA___V613*/ meltfptr[612]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V612*/ meltfptr[611])) ==
+ ( /*_.VALDATA___V615*/ meltfptr[614])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V612*/
- meltfptr[611]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]))->obj_vartab[1] =
+ ( /*_.VALDATA___V615*/
+ meltfptr[614]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V613*/ meltfptr[612]);
+ /*_.VALSTR___V616*/ meltfptr[615]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V612*/ meltfptr[611]);
+ meltgc_touch ( /*_.VALDATA___V615*/ meltfptr[614]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V614*/ meltfptr[613])) ==
+ ( /*_.VALDATA___V617*/ meltfptr[616])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V614*/
- meltfptr[613]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]))->obj_vartab[1] =
+ ( /*_.VALDATA___V617*/
+ meltfptr[616]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V615*/ meltfptr[614]);
+ /*_.VALSTR___V618*/ meltfptr[617]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V614*/ meltfptr[613]);
+ meltgc_touch ( /*_.VALDATA___V617*/ meltfptr[616]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V616*/ meltfptr[615])) ==
+ ( /*_.VALDATA___V619*/ meltfptr[618])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V616*/
- meltfptr[615]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] =
+ ( /*_.VALDATA___V619*/
+ meltfptr[618]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V617*/ meltfptr[616]);
+ /*_.VALSTR___V620*/ meltfptr[619]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V616*/ meltfptr[615]);
+ meltgc_touch ( /*_.VALDATA___V619*/ meltfptr[618]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[1] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V619*/ meltfptr[618]);
+ /*_.VALSTR___V622*/ meltfptr[621]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[4] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*putupl#191 */
melt_assertmsg ("putupl #191 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V620*/ meltfptr[619])) ==
+ ( /*_.VALTUP___V623*/ meltfptr[622])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #191 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V620*/
- meltfptr[619]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V620*/ meltfptr[619]))->tabval[0] =
+ ( /*_.VALTUP___V623*/
+ meltfptr[622]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V623*/ meltfptr[622]))->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V620*/ meltfptr[619]);
+ meltgc_touch ( /*_.VALTUP___V623*/ meltfptr[622]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[5] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V620*/ meltfptr[619]);
+ /*_.VALTUP___V623*/ meltfptr[622]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V621*/ meltfptr[620])) ==
+ ( /*_.VALDATA___V624*/ meltfptr[623])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V621*/
- meltfptr[620]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[1] =
+ ( /*_.VALDATA___V624*/
+ meltfptr[623]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V622*/ meltfptr[621]);
+ /*_.VALSTR___V625*/ meltfptr[624]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V621*/ meltfptr[620])) ==
+ ( /*_.VALDATA___V624*/ meltfptr[623])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V621*/
- meltfptr[620]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[2] =
+ ( /*_.VALDATA___V624*/
+ meltfptr[623]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V621*/ meltfptr[620]);
+ meltgc_touch ( /*_.VALDATA___V624*/ meltfptr[623]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V623*/ meltfptr[622])) ==
+ ( /*_.VALDATA___V626*/ meltfptr[625])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V623*/
- meltfptr[622]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]))->obj_vartab[1] =
+ ( /*_.VALDATA___V626*/
+ meltfptr[625]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V624*/ meltfptr[623]);
+ /*_.VALSTR___V627*/ meltfptr[626]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V623*/ meltfptr[622])) ==
+ ( /*_.VALDATA___V626*/ meltfptr[625])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V623*/
- meltfptr[622]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]))->obj_vartab[2] =
+ ( /*_.VALDATA___V626*/
+ meltfptr[625]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V623*/ meltfptr[622]);
+ meltgc_touch ( /*_.VALDATA___V626*/ meltfptr[625]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V625*/ meltfptr[624])) ==
+ ( /*_.VALDATA___V628*/ meltfptr[627])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V625*/
- meltfptr[624]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624]))->obj_vartab[1] =
+ ( /*_.VALDATA___V628*/
+ meltfptr[627]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V626*/ meltfptr[625]);
+ /*_.VALSTR___V629*/ meltfptr[628]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V625*/ meltfptr[624])) ==
+ ( /*_.VALDATA___V628*/ meltfptr[627])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V625*/
- meltfptr[624]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624]))->obj_vartab[2] =
+ ( /*_.VALDATA___V628*/
+ meltfptr[627]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V625*/ meltfptr[624]);
+ meltgc_touch ( /*_.VALDATA___V628*/ meltfptr[627]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V627*/ meltfptr[626])) ==
+ ( /*_.VALDATA___V630*/ meltfptr[629])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V627*/
- meltfptr[626]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->obj_vartab[1] =
+ ( /*_.VALDATA___V630*/
+ meltfptr[629]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V628*/ meltfptr[627]);
+ /*_.VALSTR___V631*/ meltfptr[630]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V627*/ meltfptr[626])) ==
+ ( /*_.VALDATA___V630*/ meltfptr[629])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V627*/
- meltfptr[626]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->obj_vartab[2] =
+ ( /*_.VALDATA___V630*/
+ meltfptr[629]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V627*/ meltfptr[626]);
+ meltgc_touch ( /*_.VALDATA___V630*/ meltfptr[629]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V629*/ meltfptr[628])) ==
+ ( /*_.VALDATA___V632*/ meltfptr[631])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V629*/
- meltfptr[628]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] =
+ ( /*_.VALDATA___V632*/
+ meltfptr[631]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V630*/ meltfptr[629]);
+ /*_.VALSTR___V633*/ meltfptr[632]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V629*/ meltfptr[628])) ==
+ ( /*_.VALDATA___V632*/ meltfptr[631])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V629*/
- meltfptr[628]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[2] =
+ ( /*_.VALDATA___V632*/
+ meltfptr[631]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V629*/ meltfptr[628]);
+ meltgc_touch ( /*_.VALDATA___V632*/ meltfptr[631]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V631*/ meltfptr[630])) ==
+ ( /*_.VALDATA___V634*/ meltfptr[633])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V631*/
- meltfptr[630]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[1] =
+ ( /*_.VALDATA___V634*/
+ meltfptr[633]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V632*/ meltfptr[631]);
+ /*_.VALSTR___V635*/ meltfptr[634]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V631*/ meltfptr[630])) ==
+ ( /*_.VALDATA___V634*/ meltfptr[633])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V631*/
- meltfptr[630]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[2] =
+ ( /*_.VALDATA___V634*/
+ meltfptr[633]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V631*/ meltfptr[630]);
+ meltgc_touch ( /*_.VALDATA___V634*/ meltfptr[633]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V633*/ meltfptr[632])) ==
+ ( /*_.VALDATA___V636*/ meltfptr[635])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V633*/
- meltfptr[632]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]))->obj_vartab[1] =
+ ( /*_.VALDATA___V636*/
+ meltfptr[635]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V634*/ meltfptr[633]);
+ /*_.VALSTR___V637*/ meltfptr[636]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V633*/ meltfptr[632])) ==
+ ( /*_.VALDATA___V636*/ meltfptr[635])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V633*/
- meltfptr[632]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]))->obj_vartab[2] =
+ ( /*_.VALDATA___V636*/
+ meltfptr[635]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V633*/ meltfptr[632]);
+ meltgc_touch ( /*_.VALDATA___V636*/ meltfptr[635]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V635*/ meltfptr[634])) ==
+ ( /*_.VALDATA___V638*/ meltfptr[637])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V635*/
- meltfptr[634]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[1] =
+ ( /*_.VALDATA___V638*/
+ meltfptr[637]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V636*/ meltfptr[635]);
+ /*_.VALSTR___V639*/ meltfptr[638]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V635*/ meltfptr[634])) ==
+ ( /*_.VALDATA___V638*/ meltfptr[637])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V635*/
- meltfptr[634]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[2] =
+ ( /*_.VALDATA___V638*/
+ meltfptr[637]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V635*/ meltfptr[634]);
+ meltgc_touch ( /*_.VALDATA___V638*/ meltfptr[637]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V637*/ meltfptr[636])) ==
+ ( /*_.VALDATA___V640*/ meltfptr[639])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V637*/
- meltfptr[636]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] =
+ ( /*_.VALDATA___V640*/
+ meltfptr[639]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V638*/ meltfptr[637]);
+ /*_.VALSTR___V641*/ meltfptr[640]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V637*/ meltfptr[636])) ==
+ ( /*_.VALDATA___V640*/ meltfptr[639])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V637*/
- meltfptr[636]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[2] =
+ ( /*_.VALDATA___V640*/
+ meltfptr[639]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V637*/ meltfptr[636]);
+ meltgc_touch ( /*_.VALDATA___V640*/ meltfptr[639]);
+
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_9 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V639*/ meltfptr[638])) ==
+ ( /*_.VALDATA___V642*/ meltfptr[641])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V639*/
- meltfptr[638]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V639*/ meltfptr[638]))->obj_vartab[1] =
+ ( /*_.VALDATA___V642*/
+ meltfptr[641]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V640*/ meltfptr[639]);
+ /*_.VALSTR___V643*/ meltfptr[642]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V639*/ meltfptr[638])) ==
+ ( /*_.VALDATA___V642*/ meltfptr[641])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V639*/
- meltfptr[638]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V639*/ meltfptr[638]))->obj_vartab[2] =
+ ( /*_.VALDATA___V642*/
+ meltfptr[641]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V618*/ meltfptr[617]);
+ /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V639*/ meltfptr[638]);
+ meltgc_touch ( /*_.VALDATA___V642*/ meltfptr[641]);
/*putupl#192 */
melt_assertmsg ("putupl #192 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #192 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]);
/*putupl#193 */
melt_assertmsg ("putupl #193 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #193 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_9 */
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putupl#194*/
+ /*putupl#194 */
melt_assertmsg ("putupl #194 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #194 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]);
/*putupl#195 */
melt_assertmsg ("putupl #195 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #195 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]);
/*putupl#196 */
melt_assertmsg ("putupl #196 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #196 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]);
/*putupl#197 */
melt_assertmsg ("putupl #197 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #197 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]);
/*putupl#198 */
melt_assertmsg ("putupl #198 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #198 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]);
/*putupl#199 */
melt_assertmsg ("putupl #199 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #199 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]);
/*putupl#200 */
melt_assertmsg ("putupl #200 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #200 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]);
/*putupl#201 */
melt_assertmsg ("putupl #201 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V641*/ meltfptr[640])) ==
+ ( /*_.VALTUP___V644*/ meltfptr[643])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #201 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V641*/
- meltfptr[640]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V641*/ meltfptr[640]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V639*/ meltfptr[638]);
+ ( /*_.VALTUP___V644*/
+ meltfptr[643]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V644*/ meltfptr[643]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V641*/ meltfptr[640]);
+ meltgc_touch ( /*_.VALTUP___V644*/ meltfptr[643]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V618*/ meltfptr[617])) ==
+ ( /*_.VALDATA___V621*/ meltfptr[620])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V618*/
- meltfptr[617]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[6] =
+ ( /*_.VALDATA___V621*/
+ meltfptr[620]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V641*/ meltfptr[640]);
+ /*_.VALTUP___V644*/ meltfptr[643]);
- MELT_LOCATION ("warmelt-normatch.melt:2593:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2604:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V618*/ meltfptr[617]);
+ meltgc_touch ( /*_.VALDATA___V621*/ meltfptr[620]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V642*/ meltfptr[641])) ==
+ ( /*_.VALDATA___V645*/ meltfptr[644])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V642*/
- meltfptr[641]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]))->obj_vartab[1] =
+ ( /*_.VALDATA___V645*/
+ meltfptr[644]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V645*/ meltfptr[644]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V643*/ meltfptr[642]);
+ /*_.VALSTR___V646*/ meltfptr[645]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V642*/ meltfptr[641]);
+ meltgc_touch ( /*_.VALDATA___V645*/ meltfptr[644]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V644*/ meltfptr[643])) ==
+ ( /*_.VALDATA___V647*/ meltfptr[646])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V644*/
- meltfptr[643]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[1] =
+ ( /*_.VALDATA___V647*/
+ meltfptr[646]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V645*/ meltfptr[644]);
+ /*_.VALSTR___V648*/ meltfptr[647]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V644*/ meltfptr[643]);
+ meltgc_touch ( /*_.VALDATA___V647*/ meltfptr[646]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V646*/ meltfptr[645])) ==
+ ( /*_.VALDATA___V649*/ meltfptr[648])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V646*/
- meltfptr[645]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] =
+ ( /*_.VALDATA___V649*/
+ meltfptr[648]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V647*/ meltfptr[646]);
+ /*_.VALSTR___V650*/ meltfptr[649]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V646*/ meltfptr[645]);
+ meltgc_touch ( /*_.VALDATA___V649*/ meltfptr[648]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V648*/ meltfptr[647])) ==
+ ( /*_.VALDATA___V651*/ meltfptr[650])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V648*/
- meltfptr[647]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[1] =
+ ( /*_.VALDATA___V651*/
+ meltfptr[650]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V649*/ meltfptr[648]);
+ /*_.VALSTR___V652*/ meltfptr[651]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V648*/ meltfptr[647]);
+ meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V650*/ meltfptr[649])) ==
+ ( /*_.VALDATA___V653*/ meltfptr[652])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V650*/
- meltfptr[649]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[1] =
+ ( /*_.VALDATA___V653*/
+ meltfptr[652]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V651*/ meltfptr[650]);
+ /*_.VALSTR___V654*/ meltfptr[653]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V650*/ meltfptr[649]);
+ meltgc_touch ( /*_.VALDATA___V653*/ meltfptr[652]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V652*/ meltfptr[651])) ==
+ ( /*_.VALDATA___V655*/ meltfptr[654])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V652*/
- meltfptr[651]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V652*/ meltfptr[651]))->obj_vartab[1] =
+ ( /*_.VALDATA___V655*/
+ meltfptr[654]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V653*/ meltfptr[652]);
+ /*_.VALSTR___V656*/ meltfptr[655]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V652*/ meltfptr[651]);
+ meltgc_touch ( /*_.VALDATA___V655*/ meltfptr[654]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V654*/ meltfptr[653])) ==
+ ( /*_.VALDATA___V657*/ meltfptr[656])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V654*/
- meltfptr[653]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]))->obj_vartab[1] =
+ ( /*_.VALDATA___V657*/
+ meltfptr[656]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V655*/ meltfptr[654]);
+ /*_.VALSTR___V658*/ meltfptr[657]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V654*/ meltfptr[653]);
+ meltgc_touch ( /*_.VALDATA___V657*/ meltfptr[656]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V656*/ meltfptr[655])) ==
+ ( /*_.VALDATA___V659*/ meltfptr[658])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V656*/
- meltfptr[655]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]))->obj_vartab[1] =
+ ( /*_.VALDATA___V659*/
+ meltfptr[658]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V657*/ meltfptr[656]);
+ /*_.VALSTR___V660*/ meltfptr[659]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V656*/ meltfptr[655]);
+ meltgc_touch ( /*_.VALDATA___V659*/ meltfptr[658]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V658*/ meltfptr[657])) ==
+ ( /*_.VALDATA___V661*/ meltfptr[660])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V658*/
- meltfptr[657]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657]))->obj_vartab[1] =
+ ( /*_.VALDATA___V661*/
+ meltfptr[660]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V659*/ meltfptr[658]);
+ /*_.VALSTR___V662*/ meltfptr[661]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V658*/ meltfptr[657]);
+ meltgc_touch ( /*_.VALDATA___V661*/ meltfptr[660]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V660*/ meltfptr[659])) ==
+ ( /*_.VALDATA___V663*/ meltfptr[662])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V660*/
- meltfptr[659]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]))->obj_vartab[1] =
+ ( /*_.VALDATA___V663*/
+ meltfptr[662]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V661*/ meltfptr[660]);
+ /*_.VALSTR___V664*/ meltfptr[663]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V660*/ meltfptr[659]);
+ meltgc_touch ( /*_.VALDATA___V663*/ meltfptr[662]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V662*/ meltfptr[661])) ==
+ ( /*_.VALDATA___V665*/ meltfptr[664])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V662*/
- meltfptr[661]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[1] =
+ ( /*_.VALDATA___V665*/
+ meltfptr[664]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V663*/ meltfptr[662]);
+ /*_.VALSTR___V666*/ meltfptr[665]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V662*/ meltfptr[661]);
+ meltgc_touch ( /*_.VALDATA___V665*/ meltfptr[664]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V664*/ meltfptr[663])) ==
+ ( /*_.VALDATA___V667*/ meltfptr[666])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V664*/
- meltfptr[663]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[1] =
+ ( /*_.VALDATA___V667*/
+ meltfptr[666]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V665*/ meltfptr[664]);
+ /*_.VALSTR___V668*/ meltfptr[667]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V664*/ meltfptr[663])) ==
+ ( /*_.VALDATA___V667*/ meltfptr[666])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V664*/
- meltfptr[663]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[4] =
+ ( /*_.VALDATA___V667*/
+ meltfptr[666]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*putupl#202 */
melt_assertmsg ("putupl #202 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V666*/ meltfptr[665])) ==
+ ( /*_.VALTUP___V669*/ meltfptr[668])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #202 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V666*/
- meltfptr[665]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V666*/ meltfptr[665]))->tabval[0] =
+ ( /*_.VALTUP___V669*/
+ meltfptr[668]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -43803,214 +44224,214 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#203 */
melt_assertmsg ("putupl #203 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V666*/ meltfptr[665])) ==
+ ( /*_.VALTUP___V669*/ meltfptr[668])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #203 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V666*/
- meltfptr[665]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V666*/ meltfptr[665]))->tabval[1] =
+ ( /*_.VALTUP___V669*/
+ meltfptr[668]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V669*/ meltfptr[668]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V666*/ meltfptr[665]);
+ meltgc_touch ( /*_.VALTUP___V669*/ meltfptr[668]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V664*/ meltfptr[663])) ==
+ ( /*_.VALDATA___V667*/ meltfptr[666])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V664*/
- meltfptr[663]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[5] =
+ ( /*_.VALDATA___V667*/
+ meltfptr[666]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V666*/ meltfptr[665]);
+ /*_.VALTUP___V669*/ meltfptr[668]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V667*/ meltfptr[666])) ==
+ ( /*_.VALDATA___V670*/ meltfptr[669])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V667*/
- meltfptr[666]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[1] =
+ ( /*_.VALDATA___V670*/
+ meltfptr[669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V668*/ meltfptr[667]);
+ /*_.VALSTR___V671*/ meltfptr[670]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V667*/ meltfptr[666])) ==
+ ( /*_.VALDATA___V670*/ meltfptr[669])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V667*/
- meltfptr[666]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[2] =
+ ( /*_.VALDATA___V670*/
+ meltfptr[669]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V664*/ meltfptr[663]);
+ /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V667*/ meltfptr[666]);
+ meltgc_touch ( /*_.VALDATA___V670*/ meltfptr[669]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V669*/ meltfptr[668])) ==
+ ( /*_.VALDATA___V672*/ meltfptr[671])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V669*/
- meltfptr[668]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]))->obj_vartab[1] =
+ ( /*_.VALDATA___V672*/
+ meltfptr[671]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V670*/ meltfptr[669]);
+ /*_.VALSTR___V673*/ meltfptr[672]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V669*/ meltfptr[668])) ==
+ ( /*_.VALDATA___V672*/ meltfptr[671])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V669*/
- meltfptr[668]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]))->obj_vartab[2] =
+ ( /*_.VALDATA___V672*/
+ meltfptr[671]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V664*/ meltfptr[663]);
+ /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V669*/ meltfptr[668]);
+ meltgc_touch ( /*_.VALDATA___V672*/ meltfptr[671]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V671*/ meltfptr[670])) ==
+ ( /*_.VALDATA___V674*/ meltfptr[673])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V671*/
- meltfptr[670]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]))->obj_vartab[1] =
+ ( /*_.VALDATA___V674*/
+ meltfptr[673]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V672*/ meltfptr[671]);
+ /*_.VALSTR___V675*/ meltfptr[674]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V671*/ meltfptr[670])) ==
+ ( /*_.VALDATA___V674*/ meltfptr[673])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V671*/
- meltfptr[670]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]))->obj_vartab[2] =
+ ( /*_.VALDATA___V674*/
+ meltfptr[673]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V664*/ meltfptr[663]);
+ /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V671*/ meltfptr[670]);
+ meltgc_touch ( /*_.VALDATA___V674*/ meltfptr[673]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V673*/ meltfptr[672])) ==
+ ( /*_.VALDATA___V676*/ meltfptr[675])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V673*/
- meltfptr[672]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[1] =
+ ( /*_.VALDATA___V676*/
+ meltfptr[675]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V674*/ meltfptr[673]);
+ /*_.VALSTR___V677*/ meltfptr[676]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V673*/ meltfptr[672])) ==
+ ( /*_.VALDATA___V676*/ meltfptr[675])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V673*/
- meltfptr[672]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[2] =
+ ( /*_.VALDATA___V676*/
+ meltfptr[675]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V664*/ meltfptr[663]);
+ /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V673*/ meltfptr[672]);
+ meltgc_touch ( /*_.VALDATA___V676*/ meltfptr[675]);
/*putupl#204 */
melt_assertmsg ("putupl #204 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V675*/ meltfptr[674])) ==
+ ( /*_.VALTUP___V678*/ meltfptr[677])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #204 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V675*/
- meltfptr[674]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[0] =
+ ( /*_.VALTUP___V678*/
+ meltfptr[677]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44020,228 +44441,228 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#205 */
melt_assertmsg ("putupl #205 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V675*/ meltfptr[674])) ==
+ ( /*_.VALTUP___V678*/ meltfptr[677])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #205 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V675*/
- meltfptr[674]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
+ ( /*_.VALTUP___V678*/
+ meltfptr[677]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]);
/*putupl#206 */
melt_assertmsg ("putupl #206 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V675*/ meltfptr[674])) ==
+ ( /*_.VALTUP___V678*/ meltfptr[677])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #206 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V675*/
- meltfptr[674]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]);
+ ( /*_.VALTUP___V678*/
+ meltfptr[677]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]);
/*putupl#207 */
melt_assertmsg ("putupl #207 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V675*/ meltfptr[674])) ==
+ ( /*_.VALTUP___V678*/ meltfptr[677])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #207 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V675*/
- meltfptr[674]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]);
+ ( /*_.VALTUP___V678*/
+ meltfptr[677]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]);
/*putupl#208 */
melt_assertmsg ("putupl #208 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V675*/ meltfptr[674])) ==
+ ( /*_.VALTUP___V678*/ meltfptr[677])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #208 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V675*/
- meltfptr[674]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]);
+ ( /*_.VALTUP___V678*/
+ meltfptr[677]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V678*/ meltfptr[677]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V675*/ meltfptr[674]);
+ meltgc_touch ( /*_.VALTUP___V678*/ meltfptr[677]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V664*/ meltfptr[663])) ==
+ ( /*_.VALDATA___V667*/ meltfptr[666])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V664*/
- meltfptr[663]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[6] =
+ ( /*_.VALDATA___V667*/
+ meltfptr[666]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V675*/ meltfptr[674]);
+ /*_.VALTUP___V678*/ meltfptr[677]);
- MELT_LOCATION ("warmelt-normatch.melt:2617:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2628:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V664*/ meltfptr[663]);
+ meltgc_touch ( /*_.VALDATA___V667*/ meltfptr[666]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V676*/ meltfptr[675])) ==
+ ( /*_.VALDATA___V679*/ meltfptr[678])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V676*/
- meltfptr[675]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[1] =
+ ( /*_.VALDATA___V679*/
+ meltfptr[678]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V677*/ meltfptr[676]);
+ /*_.VALSTR___V680*/ meltfptr[679]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V676*/ meltfptr[675]);
+ meltgc_touch ( /*_.VALDATA___V679*/ meltfptr[678]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V678*/ meltfptr[677])) ==
+ ( /*_.VALDATA___V681*/ meltfptr[680])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V678*/
- meltfptr[677]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[1] =
+ ( /*_.VALDATA___V681*/
+ meltfptr[680]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V679*/ meltfptr[678]);
+ /*_.VALSTR___V682*/ meltfptr[681]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]);
+ meltgc_touch ( /*_.VALDATA___V681*/ meltfptr[680]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V680*/ meltfptr[679])) ==
+ ( /*_.VALDATA___V683*/ meltfptr[682])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V680*/
- meltfptr[679]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]))->obj_vartab[1] =
+ ( /*_.VALDATA___V683*/
+ meltfptr[682]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V683*/ meltfptr[682]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V681*/ meltfptr[680]);
+ /*_.VALSTR___V684*/ meltfptr[683]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V680*/ meltfptr[679]);
+ meltgc_touch ( /*_.VALDATA___V683*/ meltfptr[682]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V682*/ meltfptr[681])) ==
+ ( /*_.VALDATA___V685*/ meltfptr[684])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V682*/
- meltfptr[681]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] =
+ ( /*_.VALDATA___V685*/
+ meltfptr[684]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V683*/ meltfptr[682]);
+ /*_.VALSTR___V686*/ meltfptr[685]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]);
+ meltgc_touch ( /*_.VALDATA___V685*/ meltfptr[684]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V684*/ meltfptr[683])) ==
+ ( /*_.VALDATA___V687*/ meltfptr[686])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V684*/
- meltfptr[683]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[1] =
+ ( /*_.VALDATA___V687*/
+ meltfptr[686]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V685*/ meltfptr[684]);
+ /*_.VALSTR___V688*/ meltfptr[687]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V684*/ meltfptr[683]);
+ meltgc_touch ( /*_.VALDATA___V687*/ meltfptr[686]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V687*/ meltfptr[686]);
+ /*_.VALSTR___V690*/ meltfptr[689]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[4] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*putupl#209 */
melt_assertmsg ("putupl #209 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #209 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[0] =
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44251,214 +44672,214 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#210 */
melt_assertmsg ("putupl #210 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V688*/ meltfptr[687])) ==
+ ( /*_.VALTUP___V691*/ meltfptr[690])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #210 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V688*/
- meltfptr[687]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V688*/ meltfptr[687]))->tabval[1] =
+ ( /*_.VALTUP___V691*/
+ meltfptr[690]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V691*/ meltfptr[690]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V688*/ meltfptr[687]);
+ meltgc_touch ( /*_.VALTUP___V691*/ meltfptr[690]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[5] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V688*/ meltfptr[687]);
+ /*_.VALTUP___V691*/ meltfptr[690]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V689*/ meltfptr[688])) ==
+ ( /*_.VALDATA___V692*/ meltfptr[691])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V689*/
- meltfptr[688]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[1] =
+ ( /*_.VALDATA___V692*/
+ meltfptr[691]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V690*/ meltfptr[689]);
+ /*_.VALSTR___V693*/ meltfptr[692]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V689*/ meltfptr[688])) ==
+ ( /*_.VALDATA___V692*/ meltfptr[691])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V689*/
- meltfptr[688]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[2] =
+ ( /*_.VALDATA___V692*/
+ meltfptr[691]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V689*/ meltfptr[688]);
+ meltgc_touch ( /*_.VALDATA___V692*/ meltfptr[691]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V691*/ meltfptr[690])) ==
+ ( /*_.VALDATA___V694*/ meltfptr[693])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V691*/
- meltfptr[690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]))->obj_vartab[1] =
+ ( /*_.VALDATA___V694*/
+ meltfptr[693]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V692*/ meltfptr[691]);
+ /*_.VALSTR___V695*/ meltfptr[694]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V691*/ meltfptr[690])) ==
+ ( /*_.VALDATA___V694*/ meltfptr[693])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V691*/
- meltfptr[690]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]))->obj_vartab[2] =
+ ( /*_.VALDATA___V694*/
+ meltfptr[693]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V691*/ meltfptr[690]);
+ meltgc_touch ( /*_.VALDATA___V694*/ meltfptr[693]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V693*/ meltfptr[692])) ==
+ ( /*_.VALDATA___V696*/ meltfptr[695])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V693*/
- meltfptr[692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]))->obj_vartab[1] =
+ ( /*_.VALDATA___V696*/
+ meltfptr[695]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V694*/ meltfptr[693]);
+ /*_.VALSTR___V697*/ meltfptr[696]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V693*/ meltfptr[692])) ==
+ ( /*_.VALDATA___V696*/ meltfptr[695])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V693*/
- meltfptr[692]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]))->obj_vartab[2] =
+ ( /*_.VALDATA___V696*/
+ meltfptr[695]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V693*/ meltfptr[692]);
+ meltgc_touch ( /*_.VALDATA___V696*/ meltfptr[695]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V695*/ meltfptr[694])) ==
+ ( /*_.VALDATA___V698*/ meltfptr[697])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V695*/
- meltfptr[694]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->obj_vartab[1] =
+ ( /*_.VALDATA___V698*/
+ meltfptr[697]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V696*/ meltfptr[695]);
+ /*_.VALSTR___V699*/ meltfptr[698]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V695*/ meltfptr[694])) ==
+ ( /*_.VALDATA___V698*/ meltfptr[697])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V695*/
- meltfptr[694]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->obj_vartab[2] =
+ ( /*_.VALDATA___V698*/
+ meltfptr[697]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V695*/ meltfptr[694]);
+ meltgc_touch ( /*_.VALDATA___V698*/ meltfptr[697]);
/*putupl#211 */
melt_assertmsg ("putupl #211 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V697*/ meltfptr[696])) ==
+ ( /*_.VALTUP___V700*/ meltfptr[699])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #211 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V697*/
- meltfptr[696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[0] =
+ ( /*_.VALTUP___V700*/
+ meltfptr[699]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V700*/ meltfptr[699]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44468,228 +44889,228 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#212 */
melt_assertmsg ("putupl #212 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V697*/ meltfptr[696])) ==
+ ( /*_.VALTUP___V700*/ meltfptr[699])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #212 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V697*/
- meltfptr[696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
+ ( /*_.VALTUP___V700*/
+ meltfptr[699]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V700*/ meltfptr[699]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]);
/*putupl#213 */
melt_assertmsg ("putupl #213 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V697*/ meltfptr[696])) ==
+ ( /*_.VALTUP___V700*/ meltfptr[699])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #213 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V697*/
- meltfptr[696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]);
+ ( /*_.VALTUP___V700*/
+ meltfptr[699]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V700*/ meltfptr[699]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]);
/*putupl#214 */
melt_assertmsg ("putupl #214 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V697*/ meltfptr[696])) ==
+ ( /*_.VALTUP___V700*/ meltfptr[699])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #214 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V697*/
- meltfptr[696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]);
+ ( /*_.VALTUP___V700*/
+ meltfptr[699]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V700*/ meltfptr[699]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]);
/*putupl#215 */
melt_assertmsg ("putupl #215 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V697*/ meltfptr[696])) ==
+ ( /*_.VALTUP___V700*/ meltfptr[699])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #215 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V697*/
- meltfptr[696]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]);
+ ( /*_.VALTUP___V700*/
+ meltfptr[699]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V700*/ meltfptr[699]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V697*/ meltfptr[696]);
+ meltgc_touch ( /*_.VALTUP___V700*/ meltfptr[699]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V686*/ meltfptr[685])) ==
+ ( /*_.VALDATA___V689*/ meltfptr[688])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V686*/
- meltfptr[685]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[6] =
+ ( /*_.VALDATA___V689*/
+ meltfptr[688]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V697*/ meltfptr[696]);
+ /*_.VALTUP___V700*/ meltfptr[699]);
- MELT_LOCATION ("warmelt-normatch.melt:2629:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2640:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V686*/ meltfptr[685]);
+ meltgc_touch ( /*_.VALDATA___V689*/ meltfptr[688]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V698*/ meltfptr[697])) ==
+ ( /*_.VALDATA___V701*/ meltfptr[700])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V698*/
- meltfptr[697]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[1] =
+ ( /*_.VALDATA___V701*/
+ meltfptr[700]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V699*/ meltfptr[698]);
+ /*_.VALSTR___V702*/ meltfptr[701]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V698*/ meltfptr[697]);
+ meltgc_touch ( /*_.VALDATA___V701*/ meltfptr[700]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V700*/ meltfptr[699])) ==
+ ( /*_.VALDATA___V703*/ meltfptr[702])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V700*/
- meltfptr[699]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[1] =
+ ( /*_.VALDATA___V703*/
+ meltfptr[702]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V701*/ meltfptr[700]);
+ /*_.VALSTR___V704*/ meltfptr[703]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]);
+ meltgc_touch ( /*_.VALDATA___V703*/ meltfptr[702]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V702*/ meltfptr[701])) ==
+ ( /*_.VALDATA___V705*/ meltfptr[704])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V702*/
- meltfptr[701]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]))->obj_vartab[1] =
+ ( /*_.VALDATA___V705*/
+ meltfptr[704]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V703*/ meltfptr[702]);
+ /*_.VALSTR___V706*/ meltfptr[705]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V702*/ meltfptr[701]);
+ meltgc_touch ( /*_.VALDATA___V705*/ meltfptr[704]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V704*/ meltfptr[703])) ==
+ ( /*_.VALDATA___V707*/ meltfptr[706])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V704*/
- meltfptr[703]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[1] =
+ ( /*_.VALDATA___V707*/
+ meltfptr[706]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V705*/ meltfptr[704]);
+ /*_.VALSTR___V708*/ meltfptr[707]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V704*/ meltfptr[703]);
+ meltgc_touch ( /*_.VALDATA___V707*/ meltfptr[706]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V706*/ meltfptr[705])) ==
+ ( /*_.VALDATA___V709*/ meltfptr[708])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V706*/
- meltfptr[705]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]))->obj_vartab[1] =
+ ( /*_.VALDATA___V709*/
+ meltfptr[708]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V707*/ meltfptr[706]);
+ /*_.VALSTR___V710*/ meltfptr[709]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V706*/ meltfptr[705]);
+ meltgc_touch ( /*_.VALDATA___V709*/ meltfptr[708]);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V708*/ meltfptr[707])) ==
+ ( /*_.VALDATA___V711*/ meltfptr[710])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V708*/
- meltfptr[707]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[1] =
+ ( /*_.VALDATA___V711*/
+ meltfptr[710]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V709*/ meltfptr[708]);
+ /*_.VALSTR___V712*/ meltfptr[711]);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V708*/ meltfptr[707])) ==
+ ( /*_.VALDATA___V711*/ meltfptr[710])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V708*/
- meltfptr[707]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[4] =
+ ( /*_.VALDATA___V711*/
+ meltfptr[710]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V686*/ meltfptr[685]);
+ /*_.VALDATA___V689*/ meltfptr[688]);
/*putupl#216 */
melt_assertmsg ("putupl #216 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V710*/ meltfptr[709])) ==
+ ( /*_.VALTUP___V713*/ meltfptr[712])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #216 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V710*/
- meltfptr[709]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[0] =
+ ( /*_.VALTUP___V713*/
+ meltfptr[712]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44699,64 +45120,64 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#217 */
melt_assertmsg ("putupl #217 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V710*/ meltfptr[709])) ==
+ ( /*_.VALTUP___V713*/ meltfptr[712])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #217 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V710*/
- meltfptr[709]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[1] =
+ ( /*_.VALTUP___V713*/
+ meltfptr[712]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]);
/*putupl#218 */
melt_assertmsg ("putupl #218 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V710*/ meltfptr[709])) ==
+ ( /*_.VALTUP___V713*/ meltfptr[712])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #218 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V710*/
- meltfptr[709]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ ( /*_.VALTUP___V713*/
+ meltfptr[712]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V710*/ meltfptr[709]);
+ meltgc_touch ( /*_.VALTUP___V713*/ meltfptr[712]);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V708*/ meltfptr[707])) ==
+ ( /*_.VALDATA___V711*/ meltfptr[710])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V708*/
- meltfptr[707]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[5] =
+ ( /*_.VALDATA___V711*/
+ meltfptr[710]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V710*/ meltfptr[709]);
+ /*_.VALTUP___V713*/ meltfptr[712]);
/*putupl#219 */
melt_assertmsg ("putupl #219 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V711*/ meltfptr[710])) ==
+ ( /*_.VALTUP___V714*/ meltfptr[713])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #219 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V711*/
- meltfptr[710]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[0] =
+ ( /*_.VALTUP___V714*/
+ meltfptr[713]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V714*/ meltfptr[713]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44766,152 +45187,163 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#220 */
melt_assertmsg ("putupl #220 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V711*/ meltfptr[710])) ==
+ ( /*_.VALTUP___V714*/ meltfptr[713])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #220 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V711*/
- meltfptr[710]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
+ ( /*_.VALTUP___V714*/
+ meltfptr[713]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V714*/ meltfptr[713]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]);
/*putupl#221 */
melt_assertmsg ("putupl #221 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V711*/ meltfptr[710])) ==
+ ( /*_.VALTUP___V714*/ meltfptr[713])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #221 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V711*/
- meltfptr[710]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]);
+ ( /*_.VALTUP___V714*/
+ meltfptr[713]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V714*/ meltfptr[713]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]);
/*putupl#222 */
melt_assertmsg ("putupl #222 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V711*/ meltfptr[710])) ==
+ ( /*_.VALTUP___V714*/ meltfptr[713])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #222 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V711*/
- meltfptr[710]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]);
+ ( /*_.VALTUP___V714*/
+ meltfptr[713]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V714*/ meltfptr[713]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]);
/*putupl#223 */
melt_assertmsg ("putupl #223 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V711*/ meltfptr[710])) ==
+ ( /*_.VALTUP___V714*/ meltfptr[713])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #223 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V711*/
- meltfptr[710]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]);
+ ( /*_.VALTUP___V714*/
+ meltfptr[713]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V714*/ meltfptr[713]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V711*/ meltfptr[710]);
+ meltgc_touch ( /*_.VALTUP___V714*/ meltfptr[713]);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V708*/ meltfptr[707])) ==
+ ( /*_.VALDATA___V711*/ meltfptr[710])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V708*/
- meltfptr[707]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[6] =
+ ( /*_.VALDATA___V711*/
+ meltfptr[710]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V711*/ meltfptr[710]);
+ /*_.VALTUP___V714*/ meltfptr[713]);
- MELT_LOCATION ("warmelt-normatch.melt:2644:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2655:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V708*/ meltfptr[707]);
+ meltgc_touch ( /*_.VALDATA___V711*/ meltfptr[710]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V712*/ meltfptr[711])) ==
+ ( /*_.VALDATA___V715*/ meltfptr[714])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V712*/
- meltfptr[711]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] =
+ ( /*_.VALDATA___V715*/
+ meltfptr[714]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V713*/ meltfptr[712]);
+ /*_.VALSTR___V716*/ meltfptr[715]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V712*/ meltfptr[711]);
+ meltgc_touch ( /*_.VALDATA___V715*/ meltfptr[714]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[1] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V715*/ meltfptr[714]);
+ /*_.VALSTR___V718*/ meltfptr[717]);
+
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_10 */
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[4] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
/*putupl#224 */
melt_assertmsg ("putupl #224 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #224 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[0] =
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -44922,143 +45354,132 @@ warmelt_normatch_initialmeltchunk_10 (struct frame_start_module_melt_st
/*putupl#225 */
melt_assertmsg ("putupl #225 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V716*/ meltfptr[715])) ==
+ ( /*_.VALTUP___V719*/ meltfptr[718])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #225 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V716*/
- meltfptr[715]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V716*/ meltfptr[715]))->tabval[1] =
+ ( /*_.VALTUP___V719*/
+ meltfptr[718]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V716*/ meltfptr[715]);
+ meltgc_touch ( /*_.VALTUP___V719*/ meltfptr[718]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[5] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V716*/ meltfptr[715]);
+ /*_.VALTUP___V719*/ meltfptr[718]);
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_10 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V717*/ meltfptr[716])) ==
+ ( /*_.VALDATA___V720*/ meltfptr[719])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V717*/
- meltfptr[716]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[1] =
+ ( /*_.VALDATA___V720*/
+ meltfptr[719]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V718*/ meltfptr[717]);
+ /*_.VALSTR___V721*/ meltfptr[720]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V717*/ meltfptr[716])) ==
+ ( /*_.VALDATA___V720*/ meltfptr[719])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V717*/
- meltfptr[716]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[2] =
+ ( /*_.VALDATA___V720*/
+ meltfptr[719]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V714*/ meltfptr[713]);
+ /*_.VALDATA___V717*/ meltfptr[716]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V717*/ meltfptr[716]);
+ meltgc_touch ( /*_.VALDATA___V720*/ meltfptr[719]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V719*/ meltfptr[718])) ==
+ ( /*_.VALDATA___V722*/ meltfptr[721])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V719*/
- meltfptr[718]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]))->obj_vartab[1] =
+ ( /*_.VALDATA___V722*/
+ meltfptr[721]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V720*/ meltfptr[719]);
+ /*_.VALSTR___V723*/ meltfptr[722]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V719*/ meltfptr[718])) ==
+ ( /*_.VALDATA___V722*/ meltfptr[721])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V719*/
- meltfptr[718]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]))->obj_vartab[2] =
+ ( /*_.VALDATA___V722*/
+ meltfptr[721]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V714*/ meltfptr[713]);
+ /*_.VALDATA___V717*/ meltfptr[716]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V719*/ meltfptr[718]);
+ meltgc_touch ( /*_.VALDATA___V722*/ meltfptr[721]);
/*putupl#226 */
melt_assertmsg ("putupl #226 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V721*/ meltfptr[720])) ==
+ ( /*_.VALTUP___V724*/ meltfptr[723])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #226 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V721*/
- meltfptr[720]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V721*/ meltfptr[720]))->tabval[0] =
+ ( /*_.VALTUP___V724*/
+ meltfptr[723]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45069,265 +45490,265 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#227 */
melt_assertmsg ("putupl #227 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V721*/ meltfptr[720])) ==
+ ( /*_.VALTUP___V724*/ meltfptr[723])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #227 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V721*/
- meltfptr[720]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V721*/ meltfptr[720]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]);
+ ( /*_.VALTUP___V724*/
+ meltfptr[723]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]);
/*putupl#228 */
melt_assertmsg ("putupl #228 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V721*/ meltfptr[720])) ==
+ ( /*_.VALTUP___V724*/ meltfptr[723])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #228 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V721*/
- meltfptr[720]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V721*/ meltfptr[720]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V719*/ meltfptr[718]);
+ ( /*_.VALTUP___V724*/
+ meltfptr[723]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V721*/ meltfptr[720]);
+ meltgc_touch ( /*_.VALTUP___V724*/ meltfptr[723]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V714*/ meltfptr[713])) ==
+ ( /*_.VALDATA___V717*/ meltfptr[716])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V714*/
- meltfptr[713]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[6] =
+ ( /*_.VALDATA___V717*/
+ meltfptr[716]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V721*/ meltfptr[720]);
+ /*_.VALTUP___V724*/ meltfptr[723]);
- MELT_LOCATION ("warmelt-normatch.melt:2650:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2661:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V714*/ meltfptr[713]);
+ meltgc_touch ( /*_.VALDATA___V717*/ meltfptr[716]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V722*/ meltfptr[721])) ==
+ ( /*_.VALDATA___V725*/ meltfptr[724])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V722*/
- meltfptr[721]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] =
+ ( /*_.VALDATA___V725*/
+ meltfptr[724]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V725*/ meltfptr[724]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V723*/ meltfptr[722]);
+ /*_.VALSTR___V726*/ meltfptr[725]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V722*/ meltfptr[721]);
+ meltgc_touch ( /*_.VALDATA___V725*/ meltfptr[724]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V724*/ meltfptr[723])) ==
+ ( /*_.VALDATA___V727*/ meltfptr[726])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V724*/
- meltfptr[723]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]))->obj_vartab[1] =
+ ( /*_.VALDATA___V727*/
+ meltfptr[726]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V725*/ meltfptr[724]);
+ /*_.VALSTR___V728*/ meltfptr[727]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V724*/ meltfptr[723]);
+ meltgc_touch ( /*_.VALDATA___V727*/ meltfptr[726]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V714*/ meltfptr[713]);
- ((meltroutine_ptr_t) /*_.VALROUT___V726*/ meltfptr[725])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]);
+ NULL != /*_.VALDATA___V717*/ meltfptr[716]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V729*/ meltfptr[728])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_637__NORMBIND_MATCHBIND#1",
+ melt_checkmsg ("putroutconst constnull.drout_639__NORMBIND_MATCHBIND#1",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V726*/ meltfptr[725])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V729*/ meltfptr[728])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_637__NORMBIND_MATCHBIND#2",
+ melt_checkmsg ("putroutconst constnull.drout_639__NORMBIND_MATCHBIND#2",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V726*/ meltfptr[725])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V729*/ meltfptr[728])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_637__NORMBIND_MATCHBIND#3",
+ melt_checkmsg ("putroutconst constnull.drout_639__NORMBIND_MATCHBIND#3",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V726*/ meltfptr[725])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V729*/ meltfptr[728])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V726*/ meltfptr[725])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V729*/ meltfptr[728])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2670:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V726*/ meltfptr[725]);
+ meltgc_touch ( /*_.VALROUT___V729*/ meltfptr[728]);
- /*putclosurout#39 */
- melt_assertmsg ("putclosrout#39 checkclo",
+ /*putclosurout#40 */
+ melt_assertmsg ("putclosrout#40 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V727*/ meltfptr[726])) ==
+ ( /*_.VALCLO___V730*/ meltfptr[729])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#39 checkrout",
+ melt_assertmsg ("putclosrout#40 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V726*/ meltfptr[725])) ==
+ ( /*_.VALROUT___V729*/ meltfptr[728])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V727*/ meltfptr[726])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V726*/ meltfptr[725]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V730*/ meltfptr[729])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V729*/ meltfptr[728]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V727*/ meltfptr[726]);
+ meltgc_touch ( /*_.VALCLO___V730*/ meltfptr[729]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V728*/ meltfptr[727])) ==
+ ( /*_.VALDATA___V731*/ meltfptr[730])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V728*/
- meltfptr[727]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[1] =
+ ( /*_.VALDATA___V731*/
+ meltfptr[730]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V729*/ meltfptr[728]);
+ /*_.VALSTR___V732*/ meltfptr[731]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V728*/ meltfptr[727]);
+ meltgc_touch ( /*_.VALDATA___V731*/ meltfptr[730]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V730*/ meltfptr[729])) ==
+ ( /*_.VALDATA___V733*/ meltfptr[732])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V730*/
- meltfptr[729]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] =
+ ( /*_.VALDATA___V733*/
+ meltfptr[732]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V731*/ meltfptr[730]);
+ /*_.VALSTR___V734*/ meltfptr[733]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V730*/ meltfptr[729]);
+ meltgc_touch ( /*_.VALDATA___V733*/ meltfptr[732]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V733*/ meltfptr[732]);
+ /*_.VALSTR___V736*/ meltfptr[735]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[4] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#229 */
melt_assertmsg ("putupl #229 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #229 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[0] =
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45337,15 +45758,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#230 */
melt_assertmsg ("putupl #230 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #230 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[1] =
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45355,214 +45776,214 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#231 */
melt_assertmsg ("putupl #231 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V734*/ meltfptr[733])) ==
+ ( /*_.VALTUP___V737*/ meltfptr[736])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #231 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V734*/
- meltfptr[733]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[2] =
+ ( /*_.VALTUP___V737*/
+ meltfptr[736]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V737*/ meltfptr[736]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V734*/ meltfptr[733]);
+ meltgc_touch ( /*_.VALTUP___V737*/ meltfptr[736]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[5] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V734*/ meltfptr[733]);
+ /*_.VALTUP___V737*/ meltfptr[736]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V735*/ meltfptr[734])) ==
+ ( /*_.VALDATA___V738*/ meltfptr[737])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V735*/
- meltfptr[734]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] =
+ ( /*_.VALDATA___V738*/
+ meltfptr[737]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V736*/ meltfptr[735]);
+ /*_.VALSTR___V739*/ meltfptr[738]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V735*/ meltfptr[734])) ==
+ ( /*_.VALDATA___V738*/ meltfptr[737])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V735*/
- meltfptr[734]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[2] =
+ ( /*_.VALDATA___V738*/
+ meltfptr[737]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V735*/ meltfptr[734]);
+ meltgc_touch ( /*_.VALDATA___V738*/ meltfptr[737]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V737*/ meltfptr[736])) ==
+ ( /*_.VALDATA___V740*/ meltfptr[739])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V737*/
- meltfptr[736]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] =
+ ( /*_.VALDATA___V740*/
+ meltfptr[739]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V738*/ meltfptr[737]);
+ /*_.VALSTR___V741*/ meltfptr[740]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V737*/ meltfptr[736])) ==
+ ( /*_.VALDATA___V740*/ meltfptr[739])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V737*/
- meltfptr[736]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[2] =
+ ( /*_.VALDATA___V740*/
+ meltfptr[739]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V737*/ meltfptr[736]);
+ meltgc_touch ( /*_.VALDATA___V740*/ meltfptr[739]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V739*/ meltfptr[738])) ==
+ ( /*_.VALDATA___V742*/ meltfptr[741])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V739*/
- meltfptr[738]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] =
+ ( /*_.VALDATA___V742*/
+ meltfptr[741]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V740*/ meltfptr[739]);
+ /*_.VALSTR___V743*/ meltfptr[742]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V739*/ meltfptr[738])) ==
+ ( /*_.VALDATA___V742*/ meltfptr[741])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V739*/
- meltfptr[738]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] =
+ ( /*_.VALDATA___V742*/
+ meltfptr[741]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V739*/ meltfptr[738]);
+ meltgc_touch ( /*_.VALDATA___V742*/ meltfptr[741]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V741*/ meltfptr[740])) ==
+ ( /*_.VALDATA___V744*/ meltfptr[743])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V741*/
- meltfptr[740]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[1] =
+ ( /*_.VALDATA___V744*/
+ meltfptr[743]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V742*/ meltfptr[741]);
+ /*_.VALSTR___V745*/ meltfptr[744]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V741*/ meltfptr[740])) ==
+ ( /*_.VALDATA___V744*/ meltfptr[743])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V741*/
- meltfptr[740]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[2] =
+ ( /*_.VALDATA___V744*/
+ meltfptr[743]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V732*/ meltfptr[731]);
+ /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V741*/ meltfptr[740]);
+ meltgc_touch ( /*_.VALDATA___V744*/ meltfptr[743]);
/*putupl#232 */
melt_assertmsg ("putupl #232 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #232 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[0] =
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45572,15 +45993,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#233 */
melt_assertmsg ("putupl #233 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #233 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[1] =
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45590,228 +46011,228 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#234 */
melt_assertmsg ("putupl #234 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #234 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]);
/*putupl#235 */
melt_assertmsg ("putupl #235 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #235 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]);
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]);
/*putupl#236 */
melt_assertmsg ("putupl #236 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #236 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]);
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]);
/*putupl#237 */
melt_assertmsg ("putupl #237 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V743*/ meltfptr[742])) ==
+ ( /*_.VALTUP___V746*/ meltfptr[745])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #237 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V743*/
- meltfptr[742]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]);
+ ( /*_.VALTUP___V746*/
+ meltfptr[745]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V746*/ meltfptr[745]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V743*/ meltfptr[742]);
+ meltgc_touch ( /*_.VALTUP___V746*/ meltfptr[745]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V732*/ meltfptr[731])) ==
+ ( /*_.VALDATA___V735*/ meltfptr[734])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V732*/
- meltfptr[731]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[6] =
+ ( /*_.VALDATA___V735*/
+ meltfptr[734]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V743*/ meltfptr[742]);
+ /*_.VALTUP___V746*/ meltfptr[745]);
- MELT_LOCATION ("warmelt-normatch.melt:2684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2695:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V732*/ meltfptr[731]);
+ meltgc_touch ( /*_.VALDATA___V735*/ meltfptr[734]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V744*/ meltfptr[743])) ==
+ ( /*_.VALDATA___V747*/ meltfptr[746])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V744*/
- meltfptr[743]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]))->obj_vartab[1] =
+ ( /*_.VALDATA___V747*/
+ meltfptr[746]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V745*/ meltfptr[744]);
+ /*_.VALSTR___V748*/ meltfptr[747]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V744*/ meltfptr[743]);
+ meltgc_touch ( /*_.VALDATA___V747*/ meltfptr[746]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V746*/ meltfptr[745])) ==
+ ( /*_.VALDATA___V749*/ meltfptr[748])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V746*/
- meltfptr[745]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]))->obj_vartab[1] =
+ ( /*_.VALDATA___V749*/
+ meltfptr[748]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V747*/ meltfptr[746]);
+ /*_.VALSTR___V750*/ meltfptr[749]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V746*/ meltfptr[745]);
+ meltgc_touch ( /*_.VALDATA___V749*/ meltfptr[748]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V748*/ meltfptr[747])) ==
+ ( /*_.VALDATA___V751*/ meltfptr[750])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V748*/
- meltfptr[747]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] =
+ ( /*_.VALDATA___V751*/
+ meltfptr[750]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V749*/ meltfptr[748]);
+ /*_.VALSTR___V752*/ meltfptr[751]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V748*/ meltfptr[747]);
+ meltgc_touch ( /*_.VALDATA___V751*/ meltfptr[750]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V750*/ meltfptr[749])) ==
+ ( /*_.VALDATA___V753*/ meltfptr[752])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V750*/
- meltfptr[749]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[1] =
+ ( /*_.VALDATA___V753*/
+ meltfptr[752]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V751*/ meltfptr[750]);
+ /*_.VALSTR___V754*/ meltfptr[753]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]);
+ meltgc_touch ( /*_.VALDATA___V753*/ meltfptr[752]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V752*/ meltfptr[751])) ==
+ ( /*_.VALDATA___V755*/ meltfptr[754])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V752*/
- meltfptr[751]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[1] =
+ ( /*_.VALDATA___V755*/
+ meltfptr[754]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V753*/ meltfptr[752]);
+ /*_.VALSTR___V756*/ meltfptr[755]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V752*/ meltfptr[751]);
+ meltgc_touch ( /*_.VALDATA___V755*/ meltfptr[754]);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V754*/ meltfptr[753])) ==
+ ( /*_.VALDATA___V757*/ meltfptr[756])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V754*/
- meltfptr[753]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]))->obj_vartab[1] =
+ ( /*_.VALDATA___V757*/
+ meltfptr[756]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V755*/ meltfptr[754]);
+ /*_.VALSTR___V758*/ meltfptr[757]);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V754*/ meltfptr[753])) ==
+ ( /*_.VALDATA___V757*/ meltfptr[756])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V754*/
- meltfptr[753]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]))->obj_vartab[4] =
+ ( /*_.VALDATA___V757*/
+ meltfptr[756]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#238 */
melt_assertmsg ("putupl #238 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V756*/ meltfptr[755])) ==
+ ( /*_.VALTUP___V759*/ meltfptr[758])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #238 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V756*/
- meltfptr[755]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V756*/ meltfptr[755]))->tabval[0] =
+ ( /*_.VALTUP___V759*/
+ meltfptr[758]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45821,15 +46242,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#239 */
melt_assertmsg ("putupl #239 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V756*/ meltfptr[755])) ==
+ ( /*_.VALTUP___V759*/ meltfptr[758])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #239 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V756*/
- meltfptr[755]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V756*/ meltfptr[755]))->tabval[1] =
+ ( /*_.VALTUP___V759*/
+ meltfptr[758]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45839,50 +46260,50 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#240 */
melt_assertmsg ("putupl #240 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V756*/ meltfptr[755])) ==
+ ( /*_.VALTUP___V759*/ meltfptr[758])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #240 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V756*/
- meltfptr[755]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V756*/ meltfptr[755]))->tabval[2] =
+ ( /*_.VALTUP___V759*/
+ meltfptr[758]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V756*/ meltfptr[755]);
+ meltgc_touch ( /*_.VALTUP___V759*/ meltfptr[758]);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V754*/ meltfptr[753])) ==
+ ( /*_.VALDATA___V757*/ meltfptr[756])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V754*/
- meltfptr[753]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]))->obj_vartab[5] =
+ ( /*_.VALDATA___V757*/
+ meltfptr[756]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V756*/ meltfptr[755]);
+ /*_.VALTUP___V759*/ meltfptr[758]);
/*putupl#241 */
melt_assertmsg ("putupl #241 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V757*/ meltfptr[756])) ==
+ ( /*_.VALTUP___V760*/ meltfptr[759])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #241 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V757*/
- meltfptr[756]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V757*/ meltfptr[756]))->tabval[0] =
+ ( /*_.VALTUP___V760*/
+ meltfptr[759]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V760*/ meltfptr[759]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45892,15 +46313,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#242 */
melt_assertmsg ("putupl #242 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V757*/ meltfptr[756])) ==
+ ( /*_.VALTUP___V760*/ meltfptr[759])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #242 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V757*/
- meltfptr[756]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V757*/ meltfptr[756]))->tabval[1] =
+ ( /*_.VALTUP___V760*/
+ meltfptr[759]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V760*/ meltfptr[759]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -45908,98 +46329,98 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1))));
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V757*/ meltfptr[756]);
+ meltgc_touch ( /*_.VALTUP___V760*/ meltfptr[759]);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V754*/ meltfptr[753])) ==
+ ( /*_.VALDATA___V757*/ meltfptr[756])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V754*/
- meltfptr[753]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]))->obj_vartab[6] =
+ ( /*_.VALDATA___V757*/
+ meltfptr[756]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V757*/ meltfptr[756]);
+ /*_.VALTUP___V760*/ meltfptr[759]);
- MELT_LOCATION ("warmelt-normatch.melt:2700:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2711:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V754*/ meltfptr[753]);
+ meltgc_touch ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V758*/ meltfptr[757])) ==
+ ( /*_.VALDATA___V761*/ meltfptr[760])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V758*/
- meltfptr[757]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]))->obj_vartab[1] =
+ ( /*_.VALDATA___V761*/
+ meltfptr[760]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V759*/ meltfptr[758]);
+ /*_.VALSTR___V762*/ meltfptr[761]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V758*/ meltfptr[757]);
+ meltgc_touch ( /*_.VALDATA___V761*/ meltfptr[760]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V760*/ meltfptr[759])) ==
+ ( /*_.VALDATA___V763*/ meltfptr[762])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V760*/
- meltfptr[759]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[1] =
+ ( /*_.VALDATA___V763*/
+ meltfptr[762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V761*/ meltfptr[760]);
+ /*_.VALSTR___V764*/ meltfptr[763]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V760*/ meltfptr[759])) ==
+ ( /*_.VALDATA___V763*/ meltfptr[762])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V760*/
- meltfptr[759]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[4] =
+ ( /*_.VALDATA___V763*/
+ meltfptr[762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V754*/ meltfptr[753]);
+ /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#243 */
melt_assertmsg ("putupl #243 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V762*/ meltfptr[761])) ==
+ ( /*_.VALTUP___V765*/ meltfptr[764])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #243 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V762*/
- meltfptr[761]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[0] =
+ ( /*_.VALTUP___V765*/
+ meltfptr[764]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46009,15 +46430,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#244 */
melt_assertmsg ("putupl #244 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V762*/ meltfptr[761])) ==
+ ( /*_.VALTUP___V765*/ meltfptr[764])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #244 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V762*/
- meltfptr[761]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[1] =
+ ( /*_.VALTUP___V765*/
+ meltfptr[764]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46027,105 +46448,105 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#245 */
melt_assertmsg ("putupl #245 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V762*/ meltfptr[761])) ==
+ ( /*_.VALTUP___V765*/ meltfptr[764])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #245 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V762*/
- meltfptr[761]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[2] =
+ ( /*_.VALTUP___V765*/
+ meltfptr[764]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#246 */
melt_assertmsg ("putupl #246 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V762*/ meltfptr[761])) ==
+ ( /*_.VALTUP___V765*/ meltfptr[764])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #246 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V762*/
- meltfptr[761]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V762*/ meltfptr[761]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V765*/
+ meltfptr[764]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V762*/ meltfptr[761]);
+ meltgc_touch ( /*_.VALTUP___V765*/ meltfptr[764]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V760*/ meltfptr[759])) ==
+ ( /*_.VALDATA___V763*/ meltfptr[762])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V760*/
- meltfptr[759]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[5] =
+ ( /*_.VALDATA___V763*/
+ meltfptr[762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V762*/ meltfptr[761]);
+ /*_.VALTUP___V765*/ meltfptr[764]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V763*/ meltfptr[762])) ==
+ ( /*_.VALDATA___V766*/ meltfptr[765])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V763*/
- meltfptr[762]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[1] =
+ ( /*_.VALDATA___V766*/
+ meltfptr[765]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V764*/ meltfptr[763]);
+ /*_.VALSTR___V767*/ meltfptr[766]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V763*/ meltfptr[762])) ==
+ ( /*_.VALDATA___V766*/ meltfptr[765])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V763*/
- meltfptr[762]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[2] =
+ ( /*_.VALDATA___V766*/
+ meltfptr[765]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V760*/ meltfptr[759]);
+ /*_.VALDATA___V763*/ meltfptr[762]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V763*/ meltfptr[762]);
+ meltgc_touch ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#247 */
melt_assertmsg ("putupl #247 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V765*/ meltfptr[764])) ==
+ ( /*_.VALTUP___V768*/ meltfptr[767])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #247 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V765*/
- meltfptr[764]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[0] =
+ ( /*_.VALTUP___V768*/
+ meltfptr[767]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V768*/ meltfptr[767]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46135,15 +46556,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#248 */
melt_assertmsg ("putupl #248 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V765*/ meltfptr[764])) ==
+ ( /*_.VALTUP___V768*/ meltfptr[767])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #248 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V765*/
- meltfptr[764]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[1] =
+ ( /*_.VALTUP___V768*/
+ meltfptr[767]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V768*/ meltfptr[767]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46153,129 +46574,129 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#249 */
melt_assertmsg ("putupl #249 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V765*/ meltfptr[764])) ==
+ ( /*_.VALTUP___V768*/ meltfptr[767])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #249 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V765*/
- meltfptr[764]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V768*/
+ meltfptr[767]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V768*/ meltfptr[767]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V765*/ meltfptr[764]);
+ meltgc_touch ( /*_.VALTUP___V768*/ meltfptr[767]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V760*/ meltfptr[759])) ==
+ ( /*_.VALDATA___V763*/ meltfptr[762])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V760*/
- meltfptr[759]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[6] =
+ ( /*_.VALDATA___V763*/
+ meltfptr[762]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V765*/ meltfptr[764]);
+ /*_.VALTUP___V768*/ meltfptr[767]);
- MELT_LOCATION ("warmelt-normatch.melt:2706:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2717:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V760*/ meltfptr[759]);
+ meltgc_touch ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V766*/ meltfptr[765])) ==
+ ( /*_.VALDATA___V769*/ meltfptr[768])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V766*/
- meltfptr[765]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]))->obj_vartab[1] =
+ ( /*_.VALDATA___V769*/
+ meltfptr[768]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V767*/ meltfptr[766]);
+ /*_.VALSTR___V770*/ meltfptr[769]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V766*/ meltfptr[765]);
+ meltgc_touch ( /*_.VALDATA___V769*/ meltfptr[768]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V768*/ meltfptr[767])) ==
+ ( /*_.VALDATA___V771*/ meltfptr[770])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V768*/
- meltfptr[767]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[1] =
+ ( /*_.VALDATA___V771*/
+ meltfptr[770]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V769*/ meltfptr[768]);
+ /*_.VALSTR___V772*/ meltfptr[771]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V768*/ meltfptr[767]);
+ meltgc_touch ( /*_.VALDATA___V771*/ meltfptr[770]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V770*/ meltfptr[769])) ==
+ ( /*_.VALDATA___V773*/ meltfptr[772])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V770*/
- meltfptr[769]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[1] =
+ ( /*_.VALDATA___V773*/
+ meltfptr[772]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V771*/ meltfptr[770]);
+ /*_.VALSTR___V774*/ meltfptr[773]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V770*/ meltfptr[769])) ==
+ ( /*_.VALDATA___V773*/ meltfptr[772])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V770*/
- meltfptr[769]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[4] =
+ ( /*_.VALDATA___V773*/
+ meltfptr[772]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V760*/ meltfptr[759]);
+ /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#250 */
melt_assertmsg ("putupl #250 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V772*/ meltfptr[771])) ==
+ ( /*_.VALTUP___V775*/ meltfptr[774])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #250 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V772*/
- meltfptr[771]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[0] =
+ ( /*_.VALTUP___V775*/
+ meltfptr[774]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46285,15 +46706,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#251 */
melt_assertmsg ("putupl #251 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V772*/ meltfptr[771])) ==
+ ( /*_.VALTUP___V775*/ meltfptr[774])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #251 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V772*/
- meltfptr[771]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[1] =
+ ( /*_.VALTUP___V775*/
+ meltfptr[774]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46303,119 +46724,119 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#252 */
melt_assertmsg ("putupl #252 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V772*/ meltfptr[771])) ==
+ ( /*_.VALTUP___V775*/ meltfptr[774])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #252 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V772*/
- meltfptr[771]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[2] =
+ ( /*_.VALTUP___V775*/
+ meltfptr[774]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#253 */
melt_assertmsg ("putupl #253 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V772*/ meltfptr[771])) ==
+ ( /*_.VALTUP___V775*/ meltfptr[774])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #253 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V772*/
- meltfptr[771]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V775*/
+ meltfptr[774]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#254 */
melt_assertmsg ("putupl #254 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V772*/ meltfptr[771])) ==
+ ( /*_.VALTUP___V775*/ meltfptr[774])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #254 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V772*/
- meltfptr[771]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V775*/
+ meltfptr[774]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V772*/ meltfptr[771]);
+ meltgc_touch ( /*_.VALTUP___V775*/ meltfptr[774]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V770*/ meltfptr[769])) ==
+ ( /*_.VALDATA___V773*/ meltfptr[772])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V770*/
- meltfptr[769]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[5] =
+ ( /*_.VALDATA___V773*/
+ meltfptr[772]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V772*/ meltfptr[771]);
+ /*_.VALTUP___V775*/ meltfptr[774]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V773*/ meltfptr[772])) ==
+ ( /*_.VALDATA___V776*/ meltfptr[775])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V773*/
- meltfptr[772]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[1] =
+ ( /*_.VALDATA___V776*/
+ meltfptr[775]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V774*/ meltfptr[773]);
+ /*_.VALSTR___V777*/ meltfptr[776]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V773*/ meltfptr[772])) ==
+ ( /*_.VALDATA___V776*/ meltfptr[775])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V773*/
- meltfptr[772]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[2] =
+ ( /*_.VALDATA___V776*/
+ meltfptr[775]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V770*/ meltfptr[769]);
+ /*_.VALDATA___V773*/ meltfptr[772]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V773*/ meltfptr[772]);
+ meltgc_touch ( /*_.VALDATA___V776*/ meltfptr[775]);
/*putupl#255 */
melt_assertmsg ("putupl #255 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V775*/ meltfptr[774])) ==
+ ( /*_.VALTUP___V778*/ meltfptr[777])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #255 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V775*/
- meltfptr[774]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[0] =
+ ( /*_.VALTUP___V778*/
+ meltfptr[777]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V778*/ meltfptr[777]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46425,15 +46846,15 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#256 */
melt_assertmsg ("putupl #256 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V775*/ meltfptr[774])) ==
+ ( /*_.VALTUP___V778*/ meltfptr[777])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #256 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V775*/
- meltfptr[774]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[1] =
+ ( /*_.VALTUP___V778*/
+ meltfptr[777]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V778*/ meltfptr[777]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46443,143 +46864,154 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#257 */
melt_assertmsg ("putupl #257 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V775*/ meltfptr[774])) ==
+ ( /*_.VALTUP___V778*/ meltfptr[777])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #257 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V775*/
- meltfptr[774]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V778*/
+ meltfptr[777]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V778*/ meltfptr[777]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#258 */
melt_assertmsg ("putupl #258 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V775*/ meltfptr[774])) ==
+ ( /*_.VALTUP___V778*/ meltfptr[777])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #258 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V775*/
- meltfptr[774]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]);
+ ( /*_.VALTUP___V778*/
+ meltfptr[777]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V778*/ meltfptr[777]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V775*/ meltfptr[774]);
+ meltgc_touch ( /*_.VALTUP___V778*/ meltfptr[777]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V770*/ meltfptr[769])) ==
+ ( /*_.VALDATA___V773*/ meltfptr[772])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V770*/
- meltfptr[769]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[6] =
+ ( /*_.VALDATA___V773*/
+ meltfptr[772]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V775*/ meltfptr[774]);
+ /*_.VALTUP___V778*/ meltfptr[777]);
- MELT_LOCATION ("warmelt-normatch.melt:2713:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V770*/ meltfptr[769]);
+ meltgc_touch ( /*_.VALDATA___V773*/ meltfptr[772]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V776*/ meltfptr[775])) ==
+ ( /*_.VALDATA___V779*/ meltfptr[778])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V776*/
- meltfptr[775]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] =
+ ( /*_.VALDATA___V779*/
+ meltfptr[778]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V777*/ meltfptr[776]);
+ /*_.VALSTR___V780*/ meltfptr[779]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V776*/ meltfptr[775]);
+ meltgc_touch ( /*_.VALDATA___V779*/ meltfptr[778]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V778*/ meltfptr[777])) ==
+ ( /*_.VALDATA___V781*/ meltfptr[780])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V778*/
- meltfptr[777]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[1] =
+ ( /*_.VALDATA___V781*/
+ meltfptr[780]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V779*/ meltfptr[778]);
+ /*_.VALSTR___V782*/ meltfptr[781]);
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V778*/ meltfptr[777]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_11 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*touch:VALUEDATA_*/
+ meltgc_touch ( /*_.VALDATA___V781*/ meltfptr[780]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V780*/ meltfptr[779])) ==
+ ( /*_.VALDATA___V783*/ meltfptr[782])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V780*/
- meltfptr[779]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[1] =
+ ( /*_.VALDATA___V783*/
+ meltfptr[782]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V781*/ meltfptr[780]);
+ /*_.VALSTR___V784*/ meltfptr[783]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V780*/ meltfptr[779])) ==
+ ( /*_.VALDATA___V783*/ meltfptr[782])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V780*/
- meltfptr[779]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[4] =
+ ( /*_.VALDATA___V783*/
+ meltfptr[782]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V760*/ meltfptr[759]);
+ /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#259 */
melt_assertmsg ("putupl #259 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V782*/ meltfptr[781])) ==
+ ( /*_.VALTUP___V785*/ meltfptr[784])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #259 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V782*/
- meltfptr[781]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[0] =
+ ( /*_.VALTUP___V785*/
+ meltfptr[784]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46589,148 +47021,137 @@ warmelt_normatch_initialmeltchunk_11 (struct frame_start_module_melt_st
/*putupl#260 */
melt_assertmsg ("putupl #260 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V782*/ meltfptr[781])) ==
+ ( /*_.VALTUP___V785*/ meltfptr[784])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #260 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V782*/
- meltfptr[781]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[1] =
+ ( /*_.VALTUP___V785*/
+ meltfptr[784]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
(melt_field_object
((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1))));
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_11 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putupl#261*/
+ /*putupl#261 */
melt_assertmsg ("putupl #261 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V782*/ meltfptr[781])) ==
+ ( /*_.VALTUP___V785*/ meltfptr[784])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #261 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V782*/
- meltfptr[781]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[2] =
+ ( /*_.VALTUP___V785*/
+ meltfptr[784]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#262 */
melt_assertmsg ("putupl #262 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V782*/ meltfptr[781])) ==
+ ( /*_.VALTUP___V785*/ meltfptr[784])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #262 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V782*/
- meltfptr[781]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V785*/
+ meltfptr[784]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#263 */
melt_assertmsg ("putupl #263 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V782*/ meltfptr[781])) ==
+ ( /*_.VALTUP___V785*/ meltfptr[784])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #263 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V782*/
- meltfptr[781]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V785*/
+ meltfptr[784]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V782*/ meltfptr[781]);
+ meltgc_touch ( /*_.VALTUP___V785*/ meltfptr[784]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V780*/ meltfptr[779])) ==
+ ( /*_.VALDATA___V783*/ meltfptr[782])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V780*/
- meltfptr[779]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[5] =
+ ( /*_.VALDATA___V783*/
+ meltfptr[782]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V782*/ meltfptr[781]);
+ /*_.VALTUP___V785*/ meltfptr[784]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V783*/ meltfptr[782])) ==
+ ( /*_.VALDATA___V786*/ meltfptr[785])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V783*/
- meltfptr[782]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[1] =
+ ( /*_.VALDATA___V786*/
+ meltfptr[785]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V784*/ meltfptr[783]);
+ /*_.VALSTR___V787*/ meltfptr[786]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V783*/ meltfptr[782])) ==
+ ( /*_.VALDATA___V786*/ meltfptr[785])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V783*/
- meltfptr[782]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[2] =
+ ( /*_.VALDATA___V786*/
+ meltfptr[785]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V780*/ meltfptr[779]);
+ /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V783*/ meltfptr[782]);
+ meltgc_touch ( /*_.VALDATA___V786*/ meltfptr[785]);
/*putupl#264 */
melt_assertmsg ("putupl #264 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V785*/ meltfptr[784])) ==
+ ( /*_.VALTUP___V788*/ meltfptr[787])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #264 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V785*/
- meltfptr[784]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[0] =
+ ( /*_.VALTUP___V788*/
+ meltfptr[787]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V788*/ meltfptr[787]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46740,15 +47161,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#265 */
melt_assertmsg ("putupl #265 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V785*/ meltfptr[784])) ==
+ ( /*_.VALTUP___V788*/ meltfptr[787])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #265 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V785*/
- meltfptr[784]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[1] =
+ ( /*_.VALTUP___V788*/
+ meltfptr[787]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V788*/ meltfptr[787]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46758,143 +47179,143 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#266 */
melt_assertmsg ("putupl #266 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V785*/ meltfptr[784])) ==
+ ( /*_.VALTUP___V788*/ meltfptr[787])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #266 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V785*/
- meltfptr[784]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V788*/
+ meltfptr[787]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V788*/ meltfptr[787]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#267 */
melt_assertmsg ("putupl #267 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V785*/ meltfptr[784])) ==
+ ( /*_.VALTUP___V788*/ meltfptr[787])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #267 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V785*/
- meltfptr[784]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V785*/ meltfptr[784]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
+ ( /*_.VALTUP___V788*/
+ meltfptr[787]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V788*/ meltfptr[787]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V785*/ meltfptr[784]);
+ meltgc_touch ( /*_.VALTUP___V788*/ meltfptr[787]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V780*/ meltfptr[779])) ==
+ ( /*_.VALDATA___V783*/ meltfptr[782])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V780*/
- meltfptr[779]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[6] =
+ ( /*_.VALDATA___V783*/
+ meltfptr[782]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V785*/ meltfptr[784]);
+ /*_.VALTUP___V788*/ meltfptr[787]);
- MELT_LOCATION ("warmelt-normatch.melt:2718:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2729:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V780*/ meltfptr[779]);
+ meltgc_touch ( /*_.VALDATA___V783*/ meltfptr[782]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V786*/ meltfptr[785])) ==
+ ( /*_.VALDATA___V789*/ meltfptr[788])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V786*/
- meltfptr[785]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[1] =
+ ( /*_.VALDATA___V789*/
+ meltfptr[788]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V787*/ meltfptr[786]);
+ /*_.VALSTR___V790*/ meltfptr[789]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V786*/ meltfptr[785]);
+ meltgc_touch ( /*_.VALDATA___V789*/ meltfptr[788]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V788*/ meltfptr[787])) ==
+ ( /*_.VALDATA___V791*/ meltfptr[790])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V788*/
- meltfptr[787]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[1] =
+ ( /*_.VALDATA___V791*/
+ meltfptr[790]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V789*/ meltfptr[788]);
+ /*_.VALSTR___V792*/ meltfptr[791]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V788*/ meltfptr[787]);
+ meltgc_touch ( /*_.VALDATA___V791*/ meltfptr[790]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V790*/ meltfptr[789])) ==
+ ( /*_.VALDATA___V793*/ meltfptr[792])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V790*/
- meltfptr[789]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]))->obj_vartab[1] =
+ ( /*_.VALDATA___V793*/
+ meltfptr[792]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V791*/ meltfptr[790]);
+ /*_.VALSTR___V794*/ meltfptr[793]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V790*/ meltfptr[789])) ==
+ ( /*_.VALDATA___V793*/ meltfptr[792])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V790*/
- meltfptr[789]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]))->obj_vartab[4] =
+ ( /*_.VALDATA___V793*/
+ meltfptr[792]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V760*/ meltfptr[759]);
+ /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#268 */
melt_assertmsg ("putupl #268 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V792*/ meltfptr[791])) ==
+ ( /*_.VALTUP___V795*/ meltfptr[794])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #268 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V792*/
- meltfptr[791]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V792*/ meltfptr[791]))->tabval[0] =
+ ( /*_.VALTUP___V795*/
+ meltfptr[794]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V795*/ meltfptr[794]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46904,15 +47325,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#269 */
melt_assertmsg ("putupl #269 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V792*/ meltfptr[791])) ==
+ ( /*_.VALTUP___V795*/ meltfptr[794])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #269 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V792*/
- meltfptr[791]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V792*/ meltfptr[791]))->tabval[1] =
+ ( /*_.VALTUP___V795*/
+ meltfptr[794]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V795*/ meltfptr[794]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -46922,160 +47343,160 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#270 */
melt_assertmsg ("putupl #270 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V792*/ meltfptr[791])) ==
+ ( /*_.VALTUP___V795*/ meltfptr[794])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #270 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V792*/
- meltfptr[791]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V792*/ meltfptr[791]))->tabval[2] =
+ ( /*_.VALTUP___V795*/
+ meltfptr[794]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V795*/ meltfptr[794]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#271 */
melt_assertmsg ("putupl #271 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V792*/ meltfptr[791])) ==
+ ( /*_.VALTUP___V795*/ meltfptr[794])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #271 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V792*/
- meltfptr[791]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V792*/ meltfptr[791]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V795*/
+ meltfptr[794]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V795*/ meltfptr[794]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#272 */
melt_assertmsg ("putupl #272 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V792*/ meltfptr[791])) ==
+ ( /*_.VALTUP___V795*/ meltfptr[794])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #272 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V792*/
- meltfptr[791]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V792*/ meltfptr[791]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V795*/
+ meltfptr[794]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V795*/ meltfptr[794]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V792*/ meltfptr[791]);
+ meltgc_touch ( /*_.VALTUP___V795*/ meltfptr[794]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V790*/ meltfptr[789])) ==
+ ( /*_.VALDATA___V793*/ meltfptr[792])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V790*/
- meltfptr[789]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]))->obj_vartab[5] =
+ ( /*_.VALDATA___V793*/
+ meltfptr[792]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V792*/ meltfptr[791]);
+ /*_.VALTUP___V795*/ meltfptr[794]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V793*/ meltfptr[792])) ==
+ ( /*_.VALDATA___V796*/ meltfptr[795])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V793*/
- meltfptr[792]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[1] =
+ ( /*_.VALDATA___V796*/
+ meltfptr[795]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V794*/ meltfptr[793]);
+ /*_.VALSTR___V797*/ meltfptr[796]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V793*/ meltfptr[792])) ==
+ ( /*_.VALDATA___V796*/ meltfptr[795])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V793*/
- meltfptr[792]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[2] =
+ ( /*_.VALDATA___V796*/
+ meltfptr[795]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V790*/ meltfptr[789]);
+ /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V793*/ meltfptr[792]);
+ meltgc_touch ( /*_.VALDATA___V796*/ meltfptr[795]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V795*/ meltfptr[794])) ==
+ ( /*_.VALDATA___V798*/ meltfptr[797])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V795*/
- meltfptr[794]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[1] =
+ ( /*_.VALDATA___V798*/
+ meltfptr[797]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V796*/ meltfptr[795]);
+ /*_.VALSTR___V799*/ meltfptr[798]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V795*/ meltfptr[794])) ==
+ ( /*_.VALDATA___V798*/ meltfptr[797])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V795*/
- meltfptr[794]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[2] =
+ ( /*_.VALDATA___V798*/
+ meltfptr[797]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V790*/ meltfptr[789]);
+ /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V795*/ meltfptr[794]);
+ meltgc_touch ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#273 */
melt_assertmsg ("putupl #273 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V797*/ meltfptr[796])) ==
+ ( /*_.VALTUP___V800*/ meltfptr[799])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #273 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V797*/
- meltfptr[796]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V797*/ meltfptr[796]))->tabval[0] =
+ ( /*_.VALTUP___V800*/
+ meltfptr[799]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47085,15 +47506,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#274 */
melt_assertmsg ("putupl #274 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V797*/ meltfptr[796])) ==
+ ( /*_.VALTUP___V800*/ meltfptr[799])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #274 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V797*/
- meltfptr[796]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V797*/ meltfptr[796]))->tabval[1] =
+ ( /*_.VALTUP___V800*/
+ meltfptr[799]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47103,176 +47524,176 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#275 */
melt_assertmsg ("putupl #275 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V797*/ meltfptr[796])) ==
+ ( /*_.VALTUP___V800*/ meltfptr[799])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #275 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V797*/
- meltfptr[796]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V797*/ meltfptr[796]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V800*/
+ meltfptr[799]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#276 */
melt_assertmsg ("putupl #276 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V797*/ meltfptr[796])) ==
+ ( /*_.VALTUP___V800*/ meltfptr[799])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #276 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V797*/
- meltfptr[796]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V797*/ meltfptr[796]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V800*/
+ meltfptr[799]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#277 */
melt_assertmsg ("putupl #277 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V797*/ meltfptr[796])) ==
+ ( /*_.VALTUP___V800*/ meltfptr[799])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #277 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V797*/
- meltfptr[796]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V797*/ meltfptr[796]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V800*/
+ meltfptr[799]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V797*/ meltfptr[796]);
+ meltgc_touch ( /*_.VALTUP___V800*/ meltfptr[799]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V790*/ meltfptr[789])) ==
+ ( /*_.VALDATA___V793*/ meltfptr[792])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V790*/
- meltfptr[789]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]))->obj_vartab[6] =
+ ( /*_.VALDATA___V793*/
+ meltfptr[792]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V797*/ meltfptr[796]);
+ /*_.VALTUP___V800*/ meltfptr[799]);
- MELT_LOCATION ("warmelt-normatch.melt:2724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2735:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V790*/ meltfptr[789]);
+ meltgc_touch ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V798*/ meltfptr[797])) ==
+ ( /*_.VALDATA___V801*/ meltfptr[800])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V798*/
- meltfptr[797]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] =
+ ( /*_.VALDATA___V801*/
+ meltfptr[800]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V799*/ meltfptr[798]);
+ /*_.VALSTR___V802*/ meltfptr[801]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V798*/ meltfptr[797]);
+ meltgc_touch ( /*_.VALDATA___V801*/ meltfptr[800]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V800*/ meltfptr[799])) ==
+ ( /*_.VALDATA___V803*/ meltfptr[802])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V800*/
- meltfptr[799]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799]))->obj_vartab[1] =
+ ( /*_.VALDATA___V803*/
+ meltfptr[802]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V801*/ meltfptr[800]);
+ /*_.VALSTR___V804*/ meltfptr[803]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V800*/ meltfptr[799]);
+ meltgc_touch ( /*_.VALDATA___V803*/ meltfptr[802]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V802*/ meltfptr[801])) ==
+ ( /*_.VALDATA___V805*/ meltfptr[804])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V802*/
- meltfptr[801]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]))->obj_vartab[1] =
+ ( /*_.VALDATA___V805*/
+ meltfptr[804]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V803*/ meltfptr[802]);
+ /*_.VALSTR___V806*/ meltfptr[805]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V802*/ meltfptr[801]);
+ meltgc_touch ( /*_.VALDATA___V805*/ meltfptr[804]);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V804*/ meltfptr[803])) ==
+ ( /*_.VALDATA___V807*/ meltfptr[806])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V804*/
- meltfptr[803]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[1] =
+ ( /*_.VALDATA___V807*/
+ meltfptr[806]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V805*/ meltfptr[804]);
+ /*_.VALSTR___V808*/ meltfptr[807]);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V804*/ meltfptr[803])) ==
+ ( /*_.VALDATA___V807*/ meltfptr[806])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V804*/
- meltfptr[803]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[4] =
+ ( /*_.VALDATA___V807*/
+ meltfptr[806]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V780*/ meltfptr[779]);
+ /*_.VALDATA___V783*/ meltfptr[782]);
/*putupl#278 */
melt_assertmsg ("putupl #278 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #278 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[0] =
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47282,15 +47703,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#279 */
melt_assertmsg ("putupl #279 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #279 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[1] =
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47300,92 +47721,92 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#280 */
melt_assertmsg ("putupl #280 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #280 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[2] =
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#281 */
melt_assertmsg ("putupl #281 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #281 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#282 */
melt_assertmsg ("putupl #282 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #282 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#283 */
melt_assertmsg ("putupl #283 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V806*/ meltfptr[805])) ==
+ ( /*_.VALTUP___V809*/ meltfptr[808])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #283 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V806*/
- meltfptr[805]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ ( /*_.VALTUP___V809*/
+ meltfptr[808]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V809*/ meltfptr[808]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V806*/ meltfptr[805]);
+ meltgc_touch ( /*_.VALTUP___V809*/ meltfptr[808]);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V804*/ meltfptr[803])) ==
+ ( /*_.VALDATA___V807*/ meltfptr[806])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V804*/
- meltfptr[803]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[5] =
+ ( /*_.VALDATA___V807*/
+ meltfptr[806]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V806*/ meltfptr[805]);
+ /*_.VALTUP___V809*/ meltfptr[808]);
/*putupl#284 */
melt_assertmsg ("putupl #284 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #284 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[0] =
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47395,15 +47816,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#285 */
melt_assertmsg ("putupl #285 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #285 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[1] =
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47413,124 +47834,124 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#286 */
melt_assertmsg ("putupl #286 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #286 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#287 */
melt_assertmsg ("putupl #287 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V807*/ meltfptr[806])) ==
+ ( /*_.VALTUP___V810*/ meltfptr[809])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #287 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V807*/
- meltfptr[806]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V807*/ meltfptr[806]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
+ ( /*_.VALTUP___V810*/
+ meltfptr[809]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V810*/ meltfptr[809]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V807*/ meltfptr[806]);
+ meltgc_touch ( /*_.VALTUP___V810*/ meltfptr[809]);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V804*/ meltfptr[803])) ==
+ ( /*_.VALDATA___V807*/ meltfptr[806])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V804*/
- meltfptr[803]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[6] =
+ ( /*_.VALDATA___V807*/
+ meltfptr[806]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V807*/ meltfptr[806]);
+ /*_.VALTUP___V810*/ meltfptr[809]);
- MELT_LOCATION ("warmelt-normatch.melt:2736:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V804*/ meltfptr[803]);
+ meltgc_touch ( /*_.VALDATA___V807*/ meltfptr[806]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V808*/ meltfptr[807])) ==
+ ( /*_.VALDATA___V811*/ meltfptr[810])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V808*/
- meltfptr[807]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]))->obj_vartab[1] =
+ ( /*_.VALDATA___V811*/
+ meltfptr[810]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V809*/ meltfptr[808]);
+ /*_.VALSTR___V812*/ meltfptr[811]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V808*/ meltfptr[807]);
+ meltgc_touch ( /*_.VALDATA___V811*/ meltfptr[810]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V810*/ meltfptr[809])) ==
+ ( /*_.VALDATA___V813*/ meltfptr[812])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V810*/
- meltfptr[809]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[1] =
+ ( /*_.VALDATA___V813*/
+ meltfptr[812]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V811*/ meltfptr[810]);
+ /*_.VALSTR___V814*/ meltfptr[813]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V810*/ meltfptr[809])) ==
+ ( /*_.VALDATA___V813*/ meltfptr[812])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V810*/
- meltfptr[809]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[4] =
+ ( /*_.VALDATA___V813*/
+ meltfptr[812]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V780*/ meltfptr[779]);
+ /*_.VALDATA___V783*/ meltfptr[782]);
/*putupl#288 */
melt_assertmsg ("putupl #288 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #288 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[0] =
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47540,15 +47961,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#289 */
melt_assertmsg ("putupl #289 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #289 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[1] =
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47558,133 +47979,133 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#290 */
melt_assertmsg ("putupl #290 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #290 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[2] =
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#291 */
melt_assertmsg ("putupl #291 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #291 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#292 */
melt_assertmsg ("putupl #292 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #292 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#293 */
melt_assertmsg ("putupl #293 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V812*/ meltfptr[811])) ==
+ ( /*_.VALTUP___V815*/ meltfptr[814])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #293 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V812*/
- meltfptr[811]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V812*/ meltfptr[811]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ ( /*_.VALTUP___V815*/
+ meltfptr[814]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V812*/ meltfptr[811]);
+ meltgc_touch ( /*_.VALTUP___V815*/ meltfptr[814]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V810*/ meltfptr[809])) ==
+ ( /*_.VALDATA___V813*/ meltfptr[812])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V810*/
- meltfptr[809]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[5] =
+ ( /*_.VALDATA___V813*/
+ meltfptr[812]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V812*/ meltfptr[811]);
+ /*_.VALTUP___V815*/ meltfptr[814]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V813*/ meltfptr[812])) ==
+ ( /*_.VALDATA___V816*/ meltfptr[815])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V813*/
- meltfptr[812]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] =
+ ( /*_.VALDATA___V816*/
+ meltfptr[815]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V814*/ meltfptr[813]);
+ /*_.VALSTR___V817*/ meltfptr[816]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V813*/ meltfptr[812])) ==
+ ( /*_.VALDATA___V816*/ meltfptr[815])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V813*/
- meltfptr[812]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[2] =
+ ( /*_.VALDATA___V816*/
+ meltfptr[815]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V810*/ meltfptr[809]);
+ /*_.VALDATA___V813*/ meltfptr[812]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V813*/ meltfptr[812]);
+ meltgc_touch ( /*_.VALDATA___V816*/ meltfptr[815]);
/*putupl#294 */
melt_assertmsg ("putupl #294 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V815*/ meltfptr[814])) ==
+ ( /*_.VALTUP___V818*/ meltfptr[817])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #294 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V815*/
- meltfptr[814]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[0] =
+ ( /*_.VALTUP___V818*/
+ meltfptr[817]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47694,15 +48115,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#295 */
melt_assertmsg ("putupl #295 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V815*/ meltfptr[814])) ==
+ ( /*_.VALTUP___V818*/ meltfptr[817])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #295 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V815*/
- meltfptr[814]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[1] =
+ ( /*_.VALTUP___V818*/
+ meltfptr[817]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47712,157 +48133,157 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#296 */
melt_assertmsg ("putupl #296 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V815*/ meltfptr[814])) ==
+ ( /*_.VALTUP___V818*/ meltfptr[817])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #296 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V815*/
- meltfptr[814]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V818*/
+ meltfptr[817]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#297 */
melt_assertmsg ("putupl #297 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V815*/ meltfptr[814])) ==
+ ( /*_.VALTUP___V818*/ meltfptr[817])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #297 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V815*/
- meltfptr[814]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
+ ( /*_.VALTUP___V818*/
+ meltfptr[817]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
/*putupl#298 */
melt_assertmsg ("putupl #298 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V815*/ meltfptr[814])) ==
+ ( /*_.VALTUP___V818*/ meltfptr[817])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #298 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V815*/
- meltfptr[814]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
+ ( /*_.VALTUP___V818*/
+ meltfptr[817]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V815*/ meltfptr[814]);
+ meltgc_touch ( /*_.VALTUP___V818*/ meltfptr[817]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V810*/ meltfptr[809])) ==
+ ( /*_.VALDATA___V813*/ meltfptr[812])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V810*/
- meltfptr[809]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[6] =
+ ( /*_.VALDATA___V813*/
+ meltfptr[812]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V815*/ meltfptr[814]);
+ /*_.VALTUP___V818*/ meltfptr[817]);
- MELT_LOCATION ("warmelt-normatch.melt:2742:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2753:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V810*/ meltfptr[809]);
+ meltgc_touch ( /*_.VALDATA___V813*/ meltfptr[812]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V816*/ meltfptr[815])) ==
+ ( /*_.VALDATA___V819*/ meltfptr[818])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V816*/
- meltfptr[815]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[1] =
+ ( /*_.VALDATA___V819*/
+ meltfptr[818]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V817*/ meltfptr[816]);
+ /*_.VALSTR___V820*/ meltfptr[819]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V816*/ meltfptr[815]);
+ meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V818*/ meltfptr[817])) ==
+ ( /*_.VALDATA___V821*/ meltfptr[820])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V818*/
- meltfptr[817]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V818*/ meltfptr[817]))->obj_vartab[1] =
+ ( /*_.VALDATA___V821*/
+ meltfptr[820]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V819*/ meltfptr[818]);
+ /*_.VALSTR___V822*/ meltfptr[821]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V818*/ meltfptr[817]);
+ meltgc_touch ( /*_.VALDATA___V821*/ meltfptr[820]);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V820*/ meltfptr[819])) ==
+ ( /*_.VALDATA___V823*/ meltfptr[822])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V820*/
- meltfptr[819]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]))->obj_vartab[1] =
+ ( /*_.VALDATA___V823*/
+ meltfptr[822]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V821*/ meltfptr[820]);
+ /*_.VALSTR___V824*/ meltfptr[823]);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V820*/ meltfptr[819])) ==
+ ( /*_.VALDATA___V823*/ meltfptr[822])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V820*/
- meltfptr[819]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]))->obj_vartab[4] =
+ ( /*_.VALDATA___V823*/
+ meltfptr[822]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V810*/ meltfptr[809]);
+ /*_.VALDATA___V813*/ meltfptr[812]);
/*putupl#299 */
melt_assertmsg ("putupl #299 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #299 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[0] =
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47872,15 +48293,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#300 */
melt_assertmsg ("putupl #300 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #300 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[1] =
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47890,106 +48311,106 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#301 */
melt_assertmsg ("putupl #301 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #301 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[2] =
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#302 */
melt_assertmsg ("putupl #302 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #302 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#303 */
melt_assertmsg ("putupl #303 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #303 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#304 */
melt_assertmsg ("putupl #304 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #304 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
/*putupl#305 */
melt_assertmsg ("putupl #305 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V822*/ meltfptr[821])) ==
+ ( /*_.VALTUP___V825*/ meltfptr[824])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #305 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V822*/
- meltfptr[821]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V822*/ meltfptr[821]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ ( /*_.VALTUP___V825*/
+ meltfptr[824]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V825*/ meltfptr[824]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V822*/ meltfptr[821]);
+ meltgc_touch ( /*_.VALTUP___V825*/ meltfptr[824]);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V820*/ meltfptr[819])) ==
+ ( /*_.VALDATA___V823*/ meltfptr[822])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V820*/
- meltfptr[819]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]))->obj_vartab[5] =
+ ( /*_.VALDATA___V823*/
+ meltfptr[822]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V822*/ meltfptr[821]);
+ /*_.VALTUP___V825*/ meltfptr[824]);
/*putupl#306 */
melt_assertmsg ("putupl #306 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V823*/ meltfptr[822])) ==
+ ( /*_.VALTUP___V826*/ meltfptr[825])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #306 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V823*/
- meltfptr[822]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V823*/ meltfptr[822]))->tabval[0] =
+ ( /*_.VALTUP___V826*/
+ meltfptr[825]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V826*/ meltfptr[825]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -47999,15 +48420,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#307 */
melt_assertmsg ("putupl #307 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V823*/ meltfptr[822])) ==
+ ( /*_.VALTUP___V826*/ meltfptr[825])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #307 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V823*/
- meltfptr[822]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V823*/ meltfptr[822]))->tabval[1] =
+ ( /*_.VALTUP___V826*/
+ meltfptr[825]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V826*/ meltfptr[825]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48017,138 +48438,138 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#308 */
melt_assertmsg ("putupl #308 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V823*/ meltfptr[822])) ==
+ ( /*_.VALTUP___V826*/ meltfptr[825])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #308 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V823*/
- meltfptr[822]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V823*/ meltfptr[822]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V826*/
+ meltfptr[825]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V826*/ meltfptr[825]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#309 */
melt_assertmsg ("putupl #309 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V823*/ meltfptr[822])) ==
+ ( /*_.VALTUP___V826*/ meltfptr[825])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #309 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V823*/
- meltfptr[822]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V823*/ meltfptr[822]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
+ ( /*_.VALTUP___V826*/
+ meltfptr[825]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V826*/ meltfptr[825]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
/*putupl#310 */
melt_assertmsg ("putupl #310 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V823*/ meltfptr[822])) ==
+ ( /*_.VALTUP___V826*/ meltfptr[825])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #310 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V823*/
- meltfptr[822]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V823*/ meltfptr[822]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
+ ( /*_.VALTUP___V826*/
+ meltfptr[825]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V826*/ meltfptr[825]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V823*/ meltfptr[822]);
+ meltgc_touch ( /*_.VALTUP___V826*/ meltfptr[825]);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V820*/ meltfptr[819])) ==
+ ( /*_.VALDATA___V823*/ meltfptr[822])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V820*/
- meltfptr[819]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]))->obj_vartab[6] =
+ ( /*_.VALDATA___V823*/
+ meltfptr[822]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V823*/ meltfptr[822]);
+ /*_.VALTUP___V826*/ meltfptr[825]);
- MELT_LOCATION ("warmelt-normatch.melt:2747:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2758:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V820*/ meltfptr[819]);
+ meltgc_touch ( /*_.VALDATA___V823*/ meltfptr[822]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V824*/ meltfptr[823])) ==
+ ( /*_.VALDATA___V827*/ meltfptr[826])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V824*/
- meltfptr[823]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[1] =
+ ( /*_.VALDATA___V827*/
+ meltfptr[826]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V825*/ meltfptr[824]);
+ /*_.VALSTR___V828*/ meltfptr[827]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V824*/ meltfptr[823]);
+ meltgc_touch ( /*_.VALDATA___V827*/ meltfptr[826]);
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V826*/ meltfptr[825])) ==
+ ( /*_.VALDATA___V829*/ meltfptr[828])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V826*/
- meltfptr[825]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[1] =
+ ( /*_.VALDATA___V829*/
+ meltfptr[828]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V827*/ meltfptr[826]);
+ /*_.VALSTR___V830*/ meltfptr[829]);
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V826*/ meltfptr[825])) ==
+ ( /*_.VALDATA___V829*/ meltfptr[828])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V826*/
- meltfptr[825]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[4] =
+ ( /*_.VALDATA___V829*/
+ meltfptr[828]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V810*/ meltfptr[809]);
+ /*_.VALDATA___V813*/ meltfptr[812]);
/*putupl#311 */
melt_assertmsg ("putupl #311 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #311 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[0] =
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48158,15 +48579,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#312 */
melt_assertmsg ("putupl #312 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #312 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[1] =
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48176,106 +48597,117 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#313 */
melt_assertmsg ("putupl #313 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #313 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[2] =
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#314 */
melt_assertmsg ("putupl #314 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #314 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#315 */
melt_assertmsg ("putupl #315 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #315 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#316 */
melt_assertmsg ("putupl #316 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #316 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
/*putupl#317 */
melt_assertmsg ("putupl #317 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V828*/ meltfptr[827])) ==
+ ( /*_.VALTUP___V831*/ meltfptr[830])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #317 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V828*/
- meltfptr[827]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V828*/ meltfptr[827]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ ( /*_.VALTUP___V831*/
+ meltfptr[830]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V828*/ meltfptr[827]);
+ meltgc_touch ( /*_.VALTUP___V831*/ meltfptr[830]);
+
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_12 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V826*/ meltfptr[825])) ==
+ ( /*_.VALDATA___V829*/ meltfptr[828])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V826*/
- meltfptr[825]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[5] =
+ ( /*_.VALDATA___V829*/
+ meltfptr[828]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V828*/ meltfptr[827]);
+ /*_.VALTUP___V831*/ meltfptr[830]);
/*putupl#318 */
melt_assertmsg ("putupl #318 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V829*/ meltfptr[828])) ==
+ ( /*_.VALTUP___V832*/ meltfptr[831])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #318 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V829*/
- meltfptr[828]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V829*/ meltfptr[828]))->tabval[0] =
+ ( /*_.VALTUP___V832*/
+ meltfptr[831]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48285,15 +48717,15 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#319 */
melt_assertmsg ("putupl #319 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V829*/ meltfptr[828])) ==
+ ( /*_.VALTUP___V832*/ meltfptr[831])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #319 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V829*/
- meltfptr[828]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V829*/ meltfptr[828]))->tabval[1] =
+ ( /*_.VALTUP___V832*/
+ meltfptr[831]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48303,149 +48735,138 @@ warmelt_normatch_initialmeltchunk_12 (struct frame_start_module_melt_st
/*putupl#320 */
melt_assertmsg ("putupl #320 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V829*/ meltfptr[828])) ==
+ ( /*_.VALTUP___V832*/ meltfptr[831])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #320 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V829*/
- meltfptr[828]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V829*/ meltfptr[828]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V832*/
+ meltfptr[831]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#321 */
melt_assertmsg ("putupl #321 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V829*/ meltfptr[828])) ==
+ ( /*_.VALTUP___V832*/ meltfptr[831])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #321 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V829*/
- meltfptr[828]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V829*/ meltfptr[828]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
-
+ ( /*_.VALTUP___V832*/
+ meltfptr[831]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_12 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putupl#322*/
+ /*putupl#322 */
melt_assertmsg ("putupl #322 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V829*/ meltfptr[828])) ==
+ ( /*_.VALTUP___V832*/ meltfptr[831])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #322 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V829*/
- meltfptr[828]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V829*/ meltfptr[828]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
+ ( /*_.VALTUP___V832*/
+ meltfptr[831]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V829*/ meltfptr[828]);
+ meltgc_touch ( /*_.VALTUP___V832*/ meltfptr[831]);
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V826*/ meltfptr[825])) ==
+ ( /*_.VALDATA___V829*/ meltfptr[828])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V826*/
- meltfptr[825]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[6] =
+ ( /*_.VALDATA___V829*/
+ meltfptr[828]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V829*/ meltfptr[828]);
+ /*_.VALTUP___V832*/ meltfptr[831]);
- MELT_LOCATION ("warmelt-normatch.melt:2754:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2765:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V826*/ meltfptr[825]);
+ meltgc_touch ( /*_.VALDATA___V829*/ meltfptr[828]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V830*/ meltfptr[829])) ==
+ ( /*_.VALDATA___V833*/ meltfptr[832])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V830*/
- meltfptr[829]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[1] =
+ ( /*_.VALDATA___V833*/
+ meltfptr[832]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V831*/ meltfptr[830]);
+ /*_.VALSTR___V834*/ meltfptr[833]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V830*/ meltfptr[829]);
+ meltgc_touch ( /*_.VALDATA___V833*/ meltfptr[832]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V832*/ meltfptr[831])) ==
+ ( /*_.VALDATA___V835*/ meltfptr[834])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V832*/
- meltfptr[831]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]))->obj_vartab[1] =
+ ( /*_.VALDATA___V835*/
+ meltfptr[834]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V833*/ meltfptr[832]);
+ /*_.VALSTR___V836*/ meltfptr[835]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V832*/ meltfptr[831])) ==
+ ( /*_.VALDATA___V835*/ meltfptr[834])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V832*/
- meltfptr[831]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]))->obj_vartab[4] =
+ ( /*_.VALDATA___V835*/
+ meltfptr[834]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V780*/ meltfptr[779]);
+ /*_.VALDATA___V783*/ meltfptr[782]);
/*putupl#323 */
melt_assertmsg ("putupl #323 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #323 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[0] =
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48455,15 +48876,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#324 */
melt_assertmsg ("putupl #324 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #324 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[1] =
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48473,215 +48894,215 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#325 */
melt_assertmsg ("putupl #325 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #325 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[2] =
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#326 */
melt_assertmsg ("putupl #326 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #326 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#327 */
melt_assertmsg ("putupl #327 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #327 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#328 */
melt_assertmsg ("putupl #328 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V834*/ meltfptr[833])) ==
+ ( /*_.VALTUP___V837*/ meltfptr[836])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #328 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V834*/
- meltfptr[833]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V834*/ meltfptr[833]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ ( /*_.VALTUP___V837*/
+ meltfptr[836]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V834*/ meltfptr[833]);
+ meltgc_touch ( /*_.VALTUP___V837*/ meltfptr[836]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V832*/ meltfptr[831])) ==
+ ( /*_.VALDATA___V835*/ meltfptr[834])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V832*/
- meltfptr[831]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]))->obj_vartab[5] =
+ ( /*_.VALDATA___V835*/
+ meltfptr[834]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V834*/ meltfptr[833]);
+ /*_.VALTUP___V837*/ meltfptr[836]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V835*/ meltfptr[834])) ==
+ ( /*_.VALDATA___V838*/ meltfptr[837])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V835*/
- meltfptr[834]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] =
+ ( /*_.VALDATA___V838*/
+ meltfptr[837]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V836*/ meltfptr[835]);
+ /*_.VALSTR___V839*/ meltfptr[838]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V835*/ meltfptr[834])) ==
+ ( /*_.VALDATA___V838*/ meltfptr[837])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V835*/
- meltfptr[834]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[2] =
+ ( /*_.VALDATA___V838*/
+ meltfptr[837]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V832*/ meltfptr[831]);
+ /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V835*/ meltfptr[834]);
+ meltgc_touch ( /*_.VALDATA___V838*/ meltfptr[837]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V837*/ meltfptr[836])) ==
+ ( /*_.VALDATA___V840*/ meltfptr[839])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V837*/
- meltfptr[836]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] =
+ ( /*_.VALDATA___V840*/
+ meltfptr[839]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V838*/ meltfptr[837]);
+ /*_.VALSTR___V841*/ meltfptr[840]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V837*/ meltfptr[836])) ==
+ ( /*_.VALDATA___V840*/ meltfptr[839])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V837*/
- meltfptr[836]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[2] =
+ ( /*_.VALDATA___V840*/
+ meltfptr[839]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V832*/ meltfptr[831]);
+ /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V837*/ meltfptr[836]);
+ meltgc_touch ( /*_.VALDATA___V840*/ meltfptr[839]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V839*/ meltfptr[838])) ==
+ ( /*_.VALDATA___V842*/ meltfptr[841])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V839*/
- meltfptr[838]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]))->obj_vartab[1] =
+ ( /*_.VALDATA___V842*/
+ meltfptr[841]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V840*/ meltfptr[839]);
+ /*_.VALSTR___V843*/ meltfptr[842]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V839*/ meltfptr[838])) ==
+ ( /*_.VALDATA___V842*/ meltfptr[841])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V839*/
- meltfptr[838]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]))->obj_vartab[2] =
+ ( /*_.VALDATA___V842*/
+ meltfptr[841]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V832*/ meltfptr[831]);
+ /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V839*/ meltfptr[838]);
+ meltgc_touch ( /*_.VALDATA___V842*/ meltfptr[841]);
/*putupl#329 */
melt_assertmsg ("putupl #329 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #329 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[0] =
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48691,15 +49112,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#330 */
melt_assertmsg ("putupl #330 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #330 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[1] =
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48709,223 +49130,223 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#331 */
melt_assertmsg ("putupl #331 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #331 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#332 */
melt_assertmsg ("putupl #332 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #332 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]);
/*putupl#333 */
melt_assertmsg ("putupl #333 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #333 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]);
/*putupl#334 */
melt_assertmsg ("putupl #334 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #334 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]);
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839]);
/*putupl#335 */
melt_assertmsg ("putupl #335 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V841*/ meltfptr[840])) ==
+ ( /*_.VALTUP___V844*/ meltfptr[843])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #335 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V841*/
- meltfptr[840]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V841*/ meltfptr[840]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]);
+ ( /*_.VALTUP___V844*/
+ meltfptr[843]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V844*/ meltfptr[843]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V841*/ meltfptr[840]);
+ meltgc_touch ( /*_.VALTUP___V844*/ meltfptr[843]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V832*/ meltfptr[831])) ==
+ ( /*_.VALDATA___V835*/ meltfptr[834])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V832*/
- meltfptr[831]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]))->obj_vartab[6] =
+ ( /*_.VALDATA___V835*/
+ meltfptr[834]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V841*/ meltfptr[840]);
+ /*_.VALTUP___V844*/ meltfptr[843]);
- MELT_LOCATION ("warmelt-normatch.melt:2762:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2773:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V832*/ meltfptr[831]);
+ meltgc_touch ( /*_.VALDATA___V835*/ meltfptr[834]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V842*/ meltfptr[841])) ==
+ ( /*_.VALDATA___V845*/ meltfptr[844])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V842*/
- meltfptr[841]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]))->obj_vartab[1] =
+ ( /*_.VALDATA___V845*/
+ meltfptr[844]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V845*/ meltfptr[844]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V843*/ meltfptr[842]);
+ /*_.VALSTR___V846*/ meltfptr[845]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V842*/ meltfptr[841]);
+ meltgc_touch ( /*_.VALDATA___V845*/ meltfptr[844]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V844*/ meltfptr[843])) ==
+ ( /*_.VALDATA___V847*/ meltfptr[846])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V844*/
- meltfptr[843]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]))->obj_vartab[1] =
+ ( /*_.VALDATA___V847*/
+ meltfptr[846]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V847*/ meltfptr[846]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V845*/ meltfptr[844]);
+ /*_.VALSTR___V848*/ meltfptr[847]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V844*/ meltfptr[843]);
+ meltgc_touch ( /*_.VALDATA___V847*/ meltfptr[846]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V846*/ meltfptr[845])) ==
+ ( /*_.VALDATA___V849*/ meltfptr[848])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V846*/
- meltfptr[845]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[1] =
+ ( /*_.VALDATA___V849*/
+ meltfptr[848]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V847*/ meltfptr[846]);
+ /*_.VALSTR___V850*/ meltfptr[849]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V846*/ meltfptr[845]);
+ meltgc_touch ( /*_.VALDATA___V849*/ meltfptr[848]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V848*/ meltfptr[847])) ==
+ ( /*_.VALDATA___V851*/ meltfptr[850])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V848*/
- meltfptr[847]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] =
+ ( /*_.VALDATA___V851*/
+ meltfptr[850]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V849*/ meltfptr[848]);
+ /*_.VALSTR___V852*/ meltfptr[851]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]);
+ meltgc_touch ( /*_.VALDATA___V851*/ meltfptr[850]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V850*/ meltfptr[849])) ==
+ ( /*_.VALDATA___V853*/ meltfptr[852])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V850*/
- meltfptr[849]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[1] =
+ ( /*_.VALDATA___V853*/
+ meltfptr[852]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V851*/ meltfptr[850]);
+ /*_.VALSTR___V854*/ meltfptr[853]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V850*/ meltfptr[849])) ==
+ ( /*_.VALDATA___V853*/ meltfptr[852])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V850*/
- meltfptr[849]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[4] =
+ ( /*_.VALDATA___V853*/
+ meltfptr[852]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V790*/ meltfptr[789]);
+ /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#336 */
melt_assertmsg ("putupl #336 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #336 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[0] =
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48935,15 +49356,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#337 */
melt_assertmsg ("putupl #337 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #337 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[1] =
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -48953,133 +49374,133 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#338 */
melt_assertmsg ("putupl #338 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #338 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[2] =
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#339 */
melt_assertmsg ("putupl #339 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #339 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#340 */
melt_assertmsg ("putupl #340 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #340 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#341 */
melt_assertmsg ("putupl #341 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V852*/ meltfptr[851])) ==
+ ( /*_.VALTUP___V855*/ meltfptr[854])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #341 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V852*/
- meltfptr[851]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V852*/ meltfptr[851]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V855*/
+ meltfptr[854]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V852*/ meltfptr[851]);
+ meltgc_touch ( /*_.VALTUP___V855*/ meltfptr[854]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V850*/ meltfptr[849])) ==
+ ( /*_.VALDATA___V853*/ meltfptr[852])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V850*/
- meltfptr[849]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[5] =
+ ( /*_.VALDATA___V853*/
+ meltfptr[852]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V852*/ meltfptr[851]);
+ /*_.VALTUP___V855*/ meltfptr[854]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V853*/ meltfptr[852])) ==
+ ( /*_.VALDATA___V856*/ meltfptr[855])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V853*/
- meltfptr[852]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[1] =
+ ( /*_.VALDATA___V856*/
+ meltfptr[855]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V854*/ meltfptr[853]);
+ /*_.VALSTR___V857*/ meltfptr[856]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V853*/ meltfptr[852])) ==
+ ( /*_.VALDATA___V856*/ meltfptr[855])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V853*/
- meltfptr[852]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[2] =
+ ( /*_.VALDATA___V856*/
+ meltfptr[855]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V853*/ meltfptr[852]);
+ meltgc_touch ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#342 */
melt_assertmsg ("putupl #342 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #342 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[0] =
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49089,15 +49510,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#343 */
melt_assertmsg ("putupl #343 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #343 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[1] =
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49107,171 +49528,171 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#344 */
melt_assertmsg ("putupl #344 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #344 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#345 */
melt_assertmsg ("putupl #345 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #345 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#346 */
melt_assertmsg ("putupl #346 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #346 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#347 */
melt_assertmsg ("putupl #347 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V855*/ meltfptr[854])) ==
+ ( /*_.VALTUP___V858*/ meltfptr[857])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #347 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V855*/
- meltfptr[854]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V855*/ meltfptr[854]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V858*/
+ meltfptr[857]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V858*/ meltfptr[857]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V855*/ meltfptr[854]);
+ meltgc_touch ( /*_.VALTUP___V858*/ meltfptr[857]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V850*/ meltfptr[849])) ==
+ ( /*_.VALDATA___V853*/ meltfptr[852])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V850*/
- meltfptr[849]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[6] =
+ ( /*_.VALDATA___V853*/
+ meltfptr[852]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V855*/ meltfptr[854]);
+ /*_.VALTUP___V858*/ meltfptr[857]);
- MELT_LOCATION ("warmelt-normatch.melt:2774:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2785:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V850*/ meltfptr[849]);
+ meltgc_touch ( /*_.VALDATA___V853*/ meltfptr[852]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V856*/ meltfptr[855])) ==
+ ( /*_.VALDATA___V859*/ meltfptr[858])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V856*/
- meltfptr[855]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] =
+ ( /*_.VALDATA___V859*/
+ meltfptr[858]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V857*/ meltfptr[856]);
+ /*_.VALSTR___V860*/ meltfptr[859]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V856*/ meltfptr[855]);
+ meltgc_touch ( /*_.VALDATA___V859*/ meltfptr[858]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V858*/ meltfptr[857])) ==
+ ( /*_.VALDATA___V861*/ meltfptr[860])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V858*/
- meltfptr[857]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] =
+ ( /*_.VALDATA___V861*/
+ meltfptr[860]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V859*/ meltfptr[858]);
+ /*_.VALSTR___V862*/ meltfptr[861]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V858*/ meltfptr[857]);
+ meltgc_touch ( /*_.VALDATA___V861*/ meltfptr[860]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V860*/ meltfptr[859])) ==
+ ( /*_.VALDATA___V863*/ meltfptr[862])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V860*/
- meltfptr[859]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] =
+ ( /*_.VALDATA___V863*/
+ meltfptr[862]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V861*/ meltfptr[860]);
+ /*_.VALSTR___V864*/ meltfptr[863]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V860*/ meltfptr[859])) ==
+ ( /*_.VALDATA___V863*/ meltfptr[862])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V860*/
- meltfptr[859]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[4] =
+ ( /*_.VALDATA___V863*/
+ meltfptr[862]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#348 */
melt_assertmsg ("putupl #348 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #348 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[0] =
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49281,15 +49702,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#349 */
melt_assertmsg ("putupl #349 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #349 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[1] =
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49299,147 +49720,147 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#350 */
melt_assertmsg ("putupl #350 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #350 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[2] =
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#351 */
melt_assertmsg ("putupl #351 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #351 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#352 */
melt_assertmsg ("putupl #352 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #352 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#353 */
melt_assertmsg ("putupl #353 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #353 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#354 */
melt_assertmsg ("putupl #354 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V862*/ meltfptr[861])) ==
+ ( /*_.VALTUP___V865*/ meltfptr[864])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #354 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V862*/
- meltfptr[861]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V865*/
+ meltfptr[864]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V862*/ meltfptr[861]);
+ meltgc_touch ( /*_.VALTUP___V865*/ meltfptr[864]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V860*/ meltfptr[859])) ==
+ ( /*_.VALDATA___V863*/ meltfptr[862])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V860*/
- meltfptr[859]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[5] =
+ ( /*_.VALDATA___V863*/
+ meltfptr[862]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V862*/ meltfptr[861]);
+ /*_.VALTUP___V865*/ meltfptr[864]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V863*/ meltfptr[862])) ==
+ ( /*_.VALDATA___V866*/ meltfptr[865])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V863*/
- meltfptr[862]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[1] =
+ ( /*_.VALDATA___V866*/
+ meltfptr[865]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V864*/ meltfptr[863]);
+ /*_.VALSTR___V867*/ meltfptr[866]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V863*/ meltfptr[862])) ==
+ ( /*_.VALDATA___V866*/ meltfptr[865])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V863*/
- meltfptr[862]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[2] =
+ ( /*_.VALDATA___V866*/
+ meltfptr[865]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V860*/ meltfptr[859]);
+ /*_.VALDATA___V863*/ meltfptr[862]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V863*/ meltfptr[862]);
+ meltgc_touch ( /*_.VALDATA___V866*/ meltfptr[865]);
/*putupl#355 */
melt_assertmsg ("putupl #355 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #355 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[0] =
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49449,15 +49870,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#356 */
melt_assertmsg ("putupl #356 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #356 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[1] =
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49467,185 +49888,185 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#357 */
melt_assertmsg ("putupl #357 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #357 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#358 */
melt_assertmsg ("putupl #358 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #358 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#359 */
melt_assertmsg ("putupl #359 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #359 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#360 */
melt_assertmsg ("putupl #360 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #360 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#361 */
melt_assertmsg ("putupl #361 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V865*/ meltfptr[864])) ==
+ ( /*_.VALTUP___V868*/ meltfptr[867])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #361 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V865*/
- meltfptr[864]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V865*/ meltfptr[864]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]);
+ ( /*_.VALTUP___V868*/
+ meltfptr[867]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V865*/ meltfptr[864]);
+ meltgc_touch ( /*_.VALTUP___V868*/ meltfptr[867]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V860*/ meltfptr[859])) ==
+ ( /*_.VALDATA___V863*/ meltfptr[862])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V860*/
- meltfptr[859]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[6] =
+ ( /*_.VALDATA___V863*/
+ meltfptr[862]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V865*/ meltfptr[864]);
+ /*_.VALTUP___V868*/ meltfptr[867]);
- MELT_LOCATION ("warmelt-normatch.melt:2782:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V860*/ meltfptr[859]);
+ meltgc_touch ( /*_.VALDATA___V863*/ meltfptr[862]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V866*/ meltfptr[865])) ==
+ ( /*_.VALDATA___V869*/ meltfptr[868])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V866*/
- meltfptr[865]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[1] =
+ ( /*_.VALDATA___V869*/
+ meltfptr[868]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V867*/ meltfptr[866]);
+ /*_.VALSTR___V870*/ meltfptr[869]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V866*/ meltfptr[865]);
+ meltgc_touch ( /*_.VALDATA___V869*/ meltfptr[868]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V868*/ meltfptr[867])) ==
+ ( /*_.VALDATA___V871*/ meltfptr[870])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V868*/
- meltfptr[867]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] =
+ ( /*_.VALDATA___V871*/
+ meltfptr[870]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V869*/ meltfptr[868]);
+ /*_.VALSTR___V872*/ meltfptr[871]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V868*/ meltfptr[867]);
+ meltgc_touch ( /*_.VALDATA___V871*/ meltfptr[870]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V870*/ meltfptr[869])) ==
+ ( /*_.VALDATA___V873*/ meltfptr[872])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V870*/
- meltfptr[869]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[1] =
+ ( /*_.VALDATA___V873*/
+ meltfptr[872]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V871*/ meltfptr[870]);
+ /*_.VALSTR___V874*/ meltfptr[873]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V870*/ meltfptr[869])) ==
+ ( /*_.VALDATA___V873*/ meltfptr[872])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V870*/
- meltfptr[869]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[4] =
+ ( /*_.VALDATA___V873*/
+ meltfptr[872]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#362 */
melt_assertmsg ("putupl #362 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #362 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[0] =
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49655,15 +50076,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#363 */
melt_assertmsg ("putupl #363 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #363 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[1] =
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49673,188 +50094,188 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#364 */
melt_assertmsg ("putupl #364 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #364 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[2] =
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#365 */
melt_assertmsg ("putupl #365 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #365 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#366 */
melt_assertmsg ("putupl #366 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #366 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#367 */
melt_assertmsg ("putupl #367 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #367 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#368 */
melt_assertmsg ("putupl #368 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V872*/ meltfptr[871])) ==
+ ( /*_.VALTUP___V875*/ meltfptr[874])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #368 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V872*/
- meltfptr[871]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V872*/ meltfptr[871]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V875*/
+ meltfptr[874]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V875*/ meltfptr[874]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V872*/ meltfptr[871]);
+ meltgc_touch ( /*_.VALTUP___V875*/ meltfptr[874]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V870*/ meltfptr[869])) ==
+ ( /*_.VALDATA___V873*/ meltfptr[872])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V870*/
- meltfptr[869]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[5] =
+ ( /*_.VALDATA___V873*/
+ meltfptr[872]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V872*/ meltfptr[871]);
+ /*_.VALTUP___V875*/ meltfptr[874]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V873*/ meltfptr[872])) ==
+ ( /*_.VALDATA___V876*/ meltfptr[875])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V873*/
- meltfptr[872]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[1] =
+ ( /*_.VALDATA___V876*/
+ meltfptr[875]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V874*/ meltfptr[873]);
+ /*_.VALSTR___V877*/ meltfptr[876]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V873*/ meltfptr[872])) ==
+ ( /*_.VALDATA___V876*/ meltfptr[875])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V873*/
- meltfptr[872]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[2] =
+ ( /*_.VALDATA___V876*/
+ meltfptr[875]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V870*/ meltfptr[869]);
+ /*_.VALDATA___V873*/ meltfptr[872]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V873*/ meltfptr[872]);
+ meltgc_touch ( /*_.VALDATA___V876*/ meltfptr[875]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V875*/ meltfptr[874])) ==
+ ( /*_.VALDATA___V878*/ meltfptr[877])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V875*/
- meltfptr[874]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]))->obj_vartab[1] =
+ ( /*_.VALDATA___V878*/
+ meltfptr[877]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V876*/ meltfptr[875]);
+ /*_.VALSTR___V879*/ meltfptr[878]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V875*/ meltfptr[874])) ==
+ ( /*_.VALDATA___V878*/ meltfptr[877])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V875*/
- meltfptr[874]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]))->obj_vartab[2] =
+ ( /*_.VALDATA___V878*/
+ meltfptr[877]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V870*/ meltfptr[869]);
+ /*_.VALDATA___V873*/ meltfptr[872]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V875*/ meltfptr[874]);
+ meltgc_touch ( /*_.VALDATA___V878*/ meltfptr[877]);
/*putupl#369 */
melt_assertmsg ("putupl #369 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #369 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[0] =
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49864,15 +50285,15 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#370 */
melt_assertmsg ("putupl #370 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #370 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[1] =
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -49882,229 +50303,229 @@ warmelt_normatch_initialmeltchunk_13 (struct frame_start_module_melt_st
/*putupl#371 */
melt_assertmsg ("putupl #371 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #371 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#372 */
melt_assertmsg ("putupl #372 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #372 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#373 */
melt_assertmsg ("putupl #373 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #373 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#374 */
melt_assertmsg ("putupl #374 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #374 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#375 */
melt_assertmsg ("putupl #375 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #375 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]);
/*putupl#376 */
melt_assertmsg ("putupl #376 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V877*/ meltfptr[876])) ==
+ ( /*_.VALTUP___V880*/ meltfptr[879])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #376 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V877*/
- meltfptr[876]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V877*/ meltfptr[876]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]);
+ ( /*_.VALTUP___V880*/
+ meltfptr[879]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V877*/ meltfptr[876]);
+ meltgc_touch ( /*_.VALTUP___V880*/ meltfptr[879]);
+
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_13 */
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V870*/ meltfptr[869])) ==
+ ( /*_.VALDATA___V873*/ meltfptr[872])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V870*/
- meltfptr[869]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[6] =
+ ( /*_.VALDATA___V873*/
+ meltfptr[872]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V877*/ meltfptr[876]);
+ /*_.VALTUP___V880*/ meltfptr[879]);
- MELT_LOCATION ("warmelt-normatch.melt:2788:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2799:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V870*/ meltfptr[869]);
+ meltgc_touch ( /*_.VALDATA___V873*/ meltfptr[872]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V878*/ meltfptr[877])) ==
+ ( /*_.VALDATA___V881*/ meltfptr[880])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V878*/
- meltfptr[877]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[1] =
+ ( /*_.VALDATA___V881*/
+ meltfptr[880]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V879*/ meltfptr[878]);
+ /*_.VALSTR___V882*/ meltfptr[881]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V878*/ meltfptr[877]);
+ meltgc_touch ( /*_.VALDATA___V881*/ meltfptr[880]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V880*/ meltfptr[879])) ==
+ ( /*_.VALDATA___V883*/ meltfptr[882])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V880*/
- meltfptr[879]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]))->obj_vartab[1] =
+ ( /*_.VALDATA___V883*/
+ meltfptr[882]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V881*/ meltfptr[880]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_13 */
+ /*_.VALSTR___V884*/ meltfptr[883]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V880*/ meltfptr[879]);
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V883*/ meltfptr[882]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V882*/ meltfptr[881])) ==
+ ( /*_.VALDATA___V885*/ meltfptr[884])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V882*/
- meltfptr[881]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[1] =
+ ( /*_.VALDATA___V885*/
+ meltfptr[884]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V883*/ meltfptr[882]);
+ /*_.VALSTR___V886*/ meltfptr[885]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V882*/ meltfptr[881]);
+ meltgc_touch ( /*_.VALDATA___V885*/ meltfptr[884]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[1] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V885*/ meltfptr[884]);
+ /*_.VALSTR___V888*/ meltfptr[887]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[4] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#377 */
melt_assertmsg ("putupl #377 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #377 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[0] =
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50114,15 +50535,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#378 */
melt_assertmsg ("putupl #378 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #378 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[1] =
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50132,229 +50553,229 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#379 */
melt_assertmsg ("putupl #379 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #379 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[2] =
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#380 */
melt_assertmsg ("putupl #380 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #380 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#381 */
melt_assertmsg ("putupl #381 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #381 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#382 */
melt_assertmsg ("putupl #382 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #382 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#383 */
melt_assertmsg ("putupl #383 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V886*/ meltfptr[885])) ==
+ ( /*_.VALTUP___V889*/ meltfptr[888])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #383 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V886*/
- meltfptr[885]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V889*/
+ meltfptr[888]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V889*/ meltfptr[888]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V886*/ meltfptr[885]);
+ meltgc_touch ( /*_.VALTUP___V889*/ meltfptr[888]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[5] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V886*/ meltfptr[885]);
+ /*_.VALTUP___V889*/ meltfptr[888]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V887*/ meltfptr[886])) ==
+ ( /*_.VALDATA___V890*/ meltfptr[889])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V887*/
- meltfptr[886]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[1] =
+ ( /*_.VALDATA___V890*/
+ meltfptr[889]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V888*/ meltfptr[887]);
+ /*_.VALSTR___V891*/ meltfptr[890]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V887*/ meltfptr[886])) ==
+ ( /*_.VALDATA___V890*/ meltfptr[889])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V887*/
- meltfptr[886]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[2] =
+ ( /*_.VALDATA___V890*/
+ meltfptr[889]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V884*/ meltfptr[883]);
+ /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V887*/ meltfptr[886]);
+ meltgc_touch ( /*_.VALDATA___V890*/ meltfptr[889]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V889*/ meltfptr[888])) ==
+ ( /*_.VALDATA___V892*/ meltfptr[891])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V889*/
- meltfptr[888]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V889*/ meltfptr[888]))->obj_vartab[1] =
+ ( /*_.VALDATA___V892*/
+ meltfptr[891]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V890*/ meltfptr[889]);
+ /*_.VALSTR___V893*/ meltfptr[892]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V889*/ meltfptr[888])) ==
+ ( /*_.VALDATA___V892*/ meltfptr[891])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V889*/
- meltfptr[888]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V889*/ meltfptr[888]))->obj_vartab[2] =
+ ( /*_.VALDATA___V892*/
+ meltfptr[891]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V884*/ meltfptr[883]);
+ /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V889*/ meltfptr[888]);
+ meltgc_touch ( /*_.VALDATA___V892*/ meltfptr[891]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V891*/ meltfptr[890])) ==
+ ( /*_.VALDATA___V894*/ meltfptr[893])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V891*/
- meltfptr[890]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]))->obj_vartab[1] =
+ ( /*_.VALDATA___V894*/
+ meltfptr[893]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V892*/ meltfptr[891]);
+ /*_.VALSTR___V895*/ meltfptr[894]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V891*/ meltfptr[890])) ==
+ ( /*_.VALDATA___V894*/ meltfptr[893])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V891*/
- meltfptr[890]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]))->obj_vartab[2] =
+ ( /*_.VALDATA___V894*/
+ meltfptr[893]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V884*/ meltfptr[883]);
+ /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V891*/ meltfptr[890]);
+ meltgc_touch ( /*_.VALDATA___V894*/ meltfptr[893]);
/*putupl#384 */
melt_assertmsg ("putupl #384 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #384 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[0] =
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50364,15 +50785,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#385 */
melt_assertmsg ("putupl #385 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #385 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[1] =
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50382,251 +50803,251 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#386 */
melt_assertmsg ("putupl #386 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #386 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#387 */
melt_assertmsg ("putupl #387 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #387 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#388 */
melt_assertmsg ("putupl #388 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #388 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#389 */
melt_assertmsg ("putupl #389 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #389 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#390 */
melt_assertmsg ("putupl #390 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #390 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]);
/*putupl#391 */
melt_assertmsg ("putupl #391 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #391 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V889*/ meltfptr[888]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]);
/*putupl#392 */
melt_assertmsg ("putupl #392 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V893*/ meltfptr[892])) ==
+ ( /*_.VALTUP___V896*/ meltfptr[895])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #392 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V893*/
- meltfptr[892]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V893*/ meltfptr[892]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]);
+ ( /*_.VALTUP___V896*/
+ meltfptr[895]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V896*/ meltfptr[895]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V893*/ meltfptr[892]);
+ meltgc_touch ( /*_.VALTUP___V896*/ meltfptr[895]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V884*/ meltfptr[883])) ==
+ ( /*_.VALDATA___V887*/ meltfptr[886])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V884*/
- meltfptr[883]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[6] =
+ ( /*_.VALDATA___V887*/
+ meltfptr[886]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V893*/ meltfptr[892]);
+ /*_.VALTUP___V896*/ meltfptr[895]);
- MELT_LOCATION ("warmelt-normatch.melt:2794:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V884*/ meltfptr[883]);
+ meltgc_touch ( /*_.VALDATA___V887*/ meltfptr[886]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V894*/ meltfptr[893])) ==
+ ( /*_.VALDATA___V897*/ meltfptr[896])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V894*/
- meltfptr[893]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] =
+ ( /*_.VALDATA___V897*/
+ meltfptr[896]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V895*/ meltfptr[894]);
+ /*_.VALSTR___V898*/ meltfptr[897]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V894*/ meltfptr[893]);
+ meltgc_touch ( /*_.VALDATA___V897*/ meltfptr[896]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V896*/ meltfptr[895])) ==
+ ( /*_.VALDATA___V899*/ meltfptr[898])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V896*/
- meltfptr[895]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] =
+ ( /*_.VALDATA___V899*/
+ meltfptr[898]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V897*/ meltfptr[896]);
+ /*_.VALSTR___V900*/ meltfptr[899]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V896*/ meltfptr[895]);
+ meltgc_touch ( /*_.VALDATA___V899*/ meltfptr[898]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V898*/ meltfptr[897])) ==
+ ( /*_.VALDATA___V901*/ meltfptr[900])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V898*/
- meltfptr[897]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]))->obj_vartab[1] =
+ ( /*_.VALDATA___V901*/
+ meltfptr[900]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V899*/ meltfptr[898]);
+ /*_.VALSTR___V902*/ meltfptr[901]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V898*/ meltfptr[897]);
+ meltgc_touch ( /*_.VALDATA___V901*/ meltfptr[900]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V900*/ meltfptr[899])) ==
+ ( /*_.VALDATA___V903*/ meltfptr[902])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V900*/
- meltfptr[899]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[1] =
+ ( /*_.VALDATA___V903*/
+ meltfptr[902]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V901*/ meltfptr[900]);
+ /*_.VALSTR___V904*/ meltfptr[903]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]);
+ meltgc_touch ( /*_.VALDATA___V903*/ meltfptr[902]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V902*/ meltfptr[901])) ==
+ ( /*_.VALDATA___V905*/ meltfptr[904])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V902*/
- meltfptr[901]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] =
+ ( /*_.VALDATA___V905*/
+ meltfptr[904]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V903*/ meltfptr[902]);
+ /*_.VALSTR___V906*/ meltfptr[905]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V902*/ meltfptr[901])) ==
+ ( /*_.VALDATA___V905*/ meltfptr[904])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V902*/
- meltfptr[901]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[4] =
+ ( /*_.VALDATA___V905*/
+ meltfptr[904]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#393 */
melt_assertmsg ("putupl #393 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #393 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[0] =
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50636,15 +51057,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#394 */
melt_assertmsg ("putupl #394 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #394 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[1] =
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50654,188 +51075,188 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#395 */
melt_assertmsg ("putupl #395 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #395 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[2] =
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#396 */
melt_assertmsg ("putupl #396 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #396 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#397 */
melt_assertmsg ("putupl #397 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #397 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#398 */
melt_assertmsg ("putupl #398 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #398 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#399 */
melt_assertmsg ("putupl #399 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V904*/ meltfptr[903])) ==
+ ( /*_.VALTUP___V907*/ meltfptr[906])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #399 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V904*/
- meltfptr[903]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V904*/ meltfptr[903]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V907*/
+ meltfptr[906]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V904*/ meltfptr[903]);
+ meltgc_touch ( /*_.VALTUP___V907*/ meltfptr[906]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V902*/ meltfptr[901])) ==
+ ( /*_.VALDATA___V905*/ meltfptr[904])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V902*/
- meltfptr[901]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[5] =
+ ( /*_.VALDATA___V905*/
+ meltfptr[904]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V904*/ meltfptr[903]);
+ /*_.VALTUP___V907*/ meltfptr[906]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V905*/ meltfptr[904])) ==
+ ( /*_.VALDATA___V908*/ meltfptr[907])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V905*/
- meltfptr[904]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] =
+ ( /*_.VALDATA___V908*/
+ meltfptr[907]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V906*/ meltfptr[905]);
+ /*_.VALSTR___V909*/ meltfptr[908]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V905*/ meltfptr[904])) ==
+ ( /*_.VALDATA___V908*/ meltfptr[907])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V905*/
- meltfptr[904]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[2] =
+ ( /*_.VALDATA___V908*/
+ meltfptr[907]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V902*/ meltfptr[901]);
+ /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V905*/ meltfptr[904]);
+ meltgc_touch ( /*_.VALDATA___V908*/ meltfptr[907]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V907*/ meltfptr[906])) ==
+ ( /*_.VALDATA___V910*/ meltfptr[909])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V907*/
- meltfptr[906]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]))->obj_vartab[1] =
+ ( /*_.VALDATA___V910*/
+ meltfptr[909]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V908*/ meltfptr[907]);
+ /*_.VALSTR___V911*/ meltfptr[910]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V907*/ meltfptr[906])) ==
+ ( /*_.VALDATA___V910*/ meltfptr[909])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V907*/
- meltfptr[906]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]))->obj_vartab[2] =
+ ( /*_.VALDATA___V910*/
+ meltfptr[909]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V902*/ meltfptr[901]);
+ /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V907*/ meltfptr[906]);
+ meltgc_touch ( /*_.VALDATA___V910*/ meltfptr[909]);
/*putupl#400 */
melt_assertmsg ("putupl #400 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #400 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[0] =
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50845,15 +51266,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#401 */
melt_assertmsg ("putupl #401 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #401 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[1] =
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -50863,218 +51284,218 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#402 */
melt_assertmsg ("putupl #402 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #402 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#403 */
melt_assertmsg ("putupl #403 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #403 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#404 */
melt_assertmsg ("putupl #404 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #404 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#405 */
melt_assertmsg ("putupl #405 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #405 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#406 */
melt_assertmsg ("putupl #406 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #406 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]);
/*putupl#407 */
melt_assertmsg ("putupl #407 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V909*/ meltfptr[908])) ==
+ ( /*_.VALTUP___V912*/ meltfptr[911])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #407 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V909*/
- meltfptr[908]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V909*/ meltfptr[908]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]);
+ ( /*_.VALTUP___V912*/
+ meltfptr[911]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V912*/ meltfptr[911]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V909*/ meltfptr[908]);
+ meltgc_touch ( /*_.VALTUP___V912*/ meltfptr[911]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V902*/ meltfptr[901])) ==
+ ( /*_.VALDATA___V905*/ meltfptr[904])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V902*/
- meltfptr[901]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[6] =
+ ( /*_.VALDATA___V905*/
+ meltfptr[904]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V909*/ meltfptr[908]);
+ /*_.VALTUP___V912*/ meltfptr[911]);
- MELT_LOCATION ("warmelt-normatch.melt:2805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2816:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V902*/ meltfptr[901]);
+ meltgc_touch ( /*_.VALDATA___V905*/ meltfptr[904]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V910*/ meltfptr[909])) ==
+ ( /*_.VALDATA___V913*/ meltfptr[912])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V910*/
- meltfptr[909]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]))->obj_vartab[1] =
+ ( /*_.VALDATA___V913*/
+ meltfptr[912]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V913*/ meltfptr[912]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V911*/ meltfptr[910]);
+ /*_.VALSTR___V914*/ meltfptr[913]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V910*/ meltfptr[909]);
+ meltgc_touch ( /*_.VALDATA___V913*/ meltfptr[912]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V912*/ meltfptr[911])) ==
+ ( /*_.VALDATA___V915*/ meltfptr[914])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V912*/
- meltfptr[911]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] =
+ ( /*_.VALDATA___V915*/
+ meltfptr[914]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V913*/ meltfptr[912]);
+ /*_.VALSTR___V916*/ meltfptr[915]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V912*/ meltfptr[911]);
+ meltgc_touch ( /*_.VALDATA___V915*/ meltfptr[914]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V914*/ meltfptr[913])) ==
+ ( /*_.VALDATA___V917*/ meltfptr[916])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V914*/
- meltfptr[913]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] =
+ ( /*_.VALDATA___V917*/
+ meltfptr[916]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V915*/ meltfptr[914]);
+ /*_.VALSTR___V918*/ meltfptr[917]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V914*/ meltfptr[913]);
+ meltgc_touch ( /*_.VALDATA___V917*/ meltfptr[916]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V916*/ meltfptr[915])) ==
+ ( /*_.VALDATA___V919*/ meltfptr[918])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V916*/
- meltfptr[915]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[1] =
+ ( /*_.VALDATA___V919*/
+ meltfptr[918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V917*/ meltfptr[916]);
+ /*_.VALSTR___V920*/ meltfptr[919]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V916*/ meltfptr[915])) ==
+ ( /*_.VALDATA___V919*/ meltfptr[918])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V916*/
- meltfptr[915]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[4] =
+ ( /*_.VALDATA___V919*/
+ meltfptr[918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#408 */
melt_assertmsg ("putupl #408 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #408 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[0] =
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51084,15 +51505,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#409 */
melt_assertmsg ("putupl #409 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #409 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[1] =
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51102,147 +51523,147 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#410 */
melt_assertmsg ("putupl #410 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #410 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[2] =
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#411 */
melt_assertmsg ("putupl #411 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #411 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#412 */
melt_assertmsg ("putupl #412 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #412 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#413 */
melt_assertmsg ("putupl #413 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #413 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#414 */
melt_assertmsg ("putupl #414 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V918*/ meltfptr[917])) ==
+ ( /*_.VALTUP___V921*/ meltfptr[920])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #414 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V918*/
- meltfptr[917]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V921*/
+ meltfptr[920]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V918*/ meltfptr[917]);
+ meltgc_touch ( /*_.VALTUP___V921*/ meltfptr[920]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V916*/ meltfptr[915])) ==
+ ( /*_.VALDATA___V919*/ meltfptr[918])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V916*/
- meltfptr[915]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[5] =
+ ( /*_.VALDATA___V919*/
+ meltfptr[918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V918*/ meltfptr[917]);
+ /*_.VALTUP___V921*/ meltfptr[920]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V919*/ meltfptr[918])) ==
+ ( /*_.VALDATA___V922*/ meltfptr[921])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V919*/
- meltfptr[918]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[1] =
+ ( /*_.VALDATA___V922*/
+ meltfptr[921]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V920*/ meltfptr[919]);
+ /*_.VALSTR___V923*/ meltfptr[922]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V919*/ meltfptr[918])) ==
+ ( /*_.VALDATA___V922*/ meltfptr[921])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V919*/
- meltfptr[918]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[2] =
+ ( /*_.VALDATA___V922*/
+ meltfptr[921]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V916*/ meltfptr[915]);
+ /*_.VALDATA___V919*/ meltfptr[918]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V919*/ meltfptr[918]);
+ meltgc_touch ( /*_.VALDATA___V922*/ meltfptr[921]);
/*putupl#415 */
melt_assertmsg ("putupl #415 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #415 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[0] =
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51252,15 +51673,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#416 */
melt_assertmsg ("putupl #416 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #416 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[1] =
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51270,185 +51691,185 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#417 */
melt_assertmsg ("putupl #417 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #417 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#418 */
melt_assertmsg ("putupl #418 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #418 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#419 */
melt_assertmsg ("putupl #419 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #419 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#420 */
melt_assertmsg ("putupl #420 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #420 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#421 */
melt_assertmsg ("putupl #421 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V921*/ meltfptr[920])) ==
+ ( /*_.VALTUP___V924*/ meltfptr[923])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #421 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V921*/
- meltfptr[920]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V921*/ meltfptr[920]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
+ ( /*_.VALTUP___V924*/
+ meltfptr[923]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V924*/ meltfptr[923]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V921*/ meltfptr[920]);
+ meltgc_touch ( /*_.VALTUP___V924*/ meltfptr[923]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V916*/ meltfptr[915])) ==
+ ( /*_.VALDATA___V919*/ meltfptr[918])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V916*/
- meltfptr[915]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[6] =
+ ( /*_.VALDATA___V919*/
+ meltfptr[918]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V921*/ meltfptr[920]);
+ /*_.VALTUP___V924*/ meltfptr[923]);
- MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2824:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V916*/ meltfptr[915]);
+ meltgc_touch ( /*_.VALDATA___V919*/ meltfptr[918]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V922*/ meltfptr[921])) ==
+ ( /*_.VALDATA___V925*/ meltfptr[924])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V922*/
- meltfptr[921]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]))->obj_vartab[1] =
+ ( /*_.VALDATA___V925*/
+ meltfptr[924]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V923*/ meltfptr[922]);
+ /*_.VALSTR___V926*/ meltfptr[925]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V922*/ meltfptr[921]);
+ meltgc_touch ( /*_.VALDATA___V925*/ meltfptr[924]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V924*/ meltfptr[923])) ==
+ ( /*_.VALDATA___V927*/ meltfptr[926])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V924*/
- meltfptr[923]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] =
+ ( /*_.VALDATA___V927*/
+ meltfptr[926]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V925*/ meltfptr[924]);
+ /*_.VALSTR___V928*/ meltfptr[927]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V924*/ meltfptr[923]);
+ meltgc_touch ( /*_.VALDATA___V927*/ meltfptr[926]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V926*/ meltfptr[925])) ==
+ ( /*_.VALDATA___V929*/ meltfptr[928])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V926*/
- meltfptr[925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] =
+ ( /*_.VALDATA___V929*/
+ meltfptr[928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V927*/ meltfptr[926]);
+ /*_.VALSTR___V930*/ meltfptr[929]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V926*/ meltfptr[925])) ==
+ ( /*_.VALDATA___V929*/ meltfptr[928])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V926*/
- meltfptr[925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[4] =
+ ( /*_.VALDATA___V929*/
+ meltfptr[928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[4] =
(melt_ptr_t) (
- /*_.VALDATA___V850*/ meltfptr[849]);
+ /*_.VALDATA___V853*/ meltfptr[852]);
/*putupl#422 */
melt_assertmsg ("putupl #422 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #422 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[0] =
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51458,15 +51879,15 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#423 */
melt_assertmsg ("putupl #423 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #423 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[1] =
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51476,281 +51897,281 @@ warmelt_normatch_initialmeltchunk_14 (struct frame_start_module_melt_st
/*putupl#424 */
melt_assertmsg ("putupl #424 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #424 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[2] =
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
/*putupl#425 */
melt_assertmsg ("putupl #425 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #425 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
/*putupl#426 */
melt_assertmsg ("putupl #426 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #426 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
/*putupl#427 */
melt_assertmsg ("putupl #427 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #427 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
/*putupl#428 */
melt_assertmsg ("putupl #428 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V928*/ meltfptr[927])) ==
+ ( /*_.VALTUP___V931*/ meltfptr[930])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #428 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V928*/
- meltfptr[927]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V928*/ meltfptr[927]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ ( /*_.VALTUP___V931*/
+ meltfptr[930]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V931*/ meltfptr[930]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V928*/ meltfptr[927]);
+ meltgc_touch ( /*_.VALTUP___V931*/ meltfptr[930]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V926*/ meltfptr[925])) ==
+ ( /*_.VALDATA___V929*/ meltfptr[928])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V926*/
- meltfptr[925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[5] =
+ ( /*_.VALDATA___V929*/
+ meltfptr[928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V928*/ meltfptr[927]);
+ /*_.VALTUP___V931*/ meltfptr[930]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V929*/ meltfptr[928])) ==
+ ( /*_.VALDATA___V932*/ meltfptr[931])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V929*/
- meltfptr[928]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[1] =
+ ( /*_.VALDATA___V932*/
+ meltfptr[931]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V930*/ meltfptr[929]);
+ /*_.VALSTR___V933*/ meltfptr[932]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V929*/ meltfptr[928])) ==
+ ( /*_.VALDATA___V932*/ meltfptr[931])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V929*/
- meltfptr[928]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[2] =
+ ( /*_.VALDATA___V932*/
+ meltfptr[931]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V926*/ meltfptr[925]);
+ /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V929*/ meltfptr[928]);
+ meltgc_touch ( /*_.VALDATA___V932*/ meltfptr[931]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V931*/ meltfptr[930])) ==
+ ( /*_.VALDATA___V934*/ meltfptr[933])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V931*/
- meltfptr[930]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[1] =
+ ( /*_.VALDATA___V934*/
+ meltfptr[933]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V932*/ meltfptr[931]);
+ /*_.VALSTR___V935*/ meltfptr[934]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V931*/ meltfptr[930])) ==
+ ( /*_.VALDATA___V934*/ meltfptr[933])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V931*/
- meltfptr[930]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]))->obj_vartab[2] =
+ ( /*_.VALDATA___V934*/
+ meltfptr[933]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V926*/ meltfptr[925]);
+ /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V931*/ meltfptr[930]);
+ meltgc_touch ( /*_.VALDATA___V934*/ meltfptr[933]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V933*/ meltfptr[932])) ==
+ ( /*_.VALDATA___V936*/ meltfptr[935])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V933*/
- meltfptr[932]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]))->obj_vartab[1] =
+ ( /*_.VALDATA___V936*/
+ meltfptr[935]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V934*/ meltfptr[933]);
+ /*_.VALSTR___V937*/ meltfptr[936]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_14 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V933*/ meltfptr[932])) ==
+ ( /*_.VALDATA___V936*/ meltfptr[935])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V933*/
- meltfptr[932]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]))->obj_vartab[2] =
+ ( /*_.VALDATA___V936*/
+ meltfptr[935]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V926*/ meltfptr[925]);
+ /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V933*/ meltfptr[932]);
+ meltgc_touch ( /*_.VALDATA___V936*/ meltfptr[935]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V935*/ meltfptr[934])) ==
+ ( /*_.VALDATA___V938*/ meltfptr[937])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V935*/
- meltfptr[934]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[1] =
+ ( /*_.VALDATA___V938*/
+ meltfptr[937]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V936*/ meltfptr[935]);
+ /*_.VALSTR___V939*/ meltfptr[938]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V935*/ meltfptr[934])) ==
+ ( /*_.VALDATA___V938*/ meltfptr[937])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V935*/
- meltfptr[934]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[2] =
+ ( /*_.VALDATA___V938*/
+ meltfptr[937]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V926*/ meltfptr[925]);
+ /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V935*/ meltfptr[934]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_14 */
+ meltgc_touch ( /*_.VALDATA___V938*/ meltfptr[937]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putupl#429*/
+ /*putupl#429 */
melt_assertmsg ("putupl #429 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #429 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[0] =
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51760,15 +52181,15 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#430 */
melt_assertmsg ("putupl #430 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #430 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[1] =
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -51778,303 +52199,303 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#431 */
melt_assertmsg ("putupl #431 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #431 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]);
/*putupl#432 */
melt_assertmsg ("putupl #432 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #432 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]);
/*putupl#433 */
melt_assertmsg ("putupl #433 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #433 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]);
/*putupl#434 */
melt_assertmsg ("putupl #434 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #434 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]);
/*putupl#435 */
melt_assertmsg ("putupl #435 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #435 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]);
/*putupl#436 */
melt_assertmsg ("putupl #436 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #436 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]);
/*putupl#437 */
melt_assertmsg ("putupl #437 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #437 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]);
/*putupl#438 */
melt_assertmsg ("putupl #438 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V937*/ meltfptr[936])) ==
+ ( /*_.VALTUP___V940*/ meltfptr[939])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #438 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V937*/
- meltfptr[936]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]);
+ ( /*_.VALTUP___V940*/
+ meltfptr[939]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V937*/ meltfptr[936]);
+ meltgc_touch ( /*_.VALTUP___V940*/ meltfptr[939]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V926*/ meltfptr[925])) ==
+ ( /*_.VALDATA___V929*/ meltfptr[928])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V926*/
- meltfptr[925]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[6] =
+ ( /*_.VALDATA___V929*/
+ meltfptr[928]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V937*/ meltfptr[936]);
+ /*_.VALTUP___V940*/ meltfptr[939]);
- MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2832:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V926*/ meltfptr[925]);
+ meltgc_touch ( /*_.VALDATA___V929*/ meltfptr[928]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V938*/ meltfptr[937])) ==
+ ( /*_.VALDATA___V941*/ meltfptr[940])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V938*/
- meltfptr[937]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[1] =
+ ( /*_.VALDATA___V941*/
+ meltfptr[940]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V939*/ meltfptr[938]);
+ /*_.VALSTR___V942*/ meltfptr[941]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V938*/ meltfptr[937]);
+ meltgc_touch ( /*_.VALDATA___V941*/ meltfptr[940]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V940*/ meltfptr[939])) ==
+ ( /*_.VALDATA___V943*/ meltfptr[942])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V940*/
- meltfptr[939]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[1] =
+ ( /*_.VALDATA___V943*/
+ meltfptr[942]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V941*/ meltfptr[940]);
+ /*_.VALSTR___V944*/ meltfptr[943]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V940*/ meltfptr[939]);
+ meltgc_touch ( /*_.VALDATA___V943*/ meltfptr[942]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V942*/ meltfptr[941])) ==
+ ( /*_.VALDATA___V945*/ meltfptr[944])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V942*/
- meltfptr[941]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[1] =
+ ( /*_.VALDATA___V945*/
+ meltfptr[944]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V943*/ meltfptr[942]);
+ /*_.VALSTR___V946*/ meltfptr[945]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V942*/ meltfptr[941]);
+ meltgc_touch ( /*_.VALDATA___V945*/ meltfptr[944]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V944*/ meltfptr[943])) ==
+ ( /*_.VALDATA___V947*/ meltfptr[946])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V944*/
- meltfptr[943]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[1] =
+ ( /*_.VALDATA___V947*/
+ meltfptr[946]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V945*/ meltfptr[944]);
+ /*_.VALSTR___V948*/ meltfptr[947]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V944*/ meltfptr[943]);
+ meltgc_touch ( /*_.VALDATA___V947*/ meltfptr[946]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V946*/ meltfptr[945])) ==
+ ( /*_.VALDATA___V949*/ meltfptr[948])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V946*/
- meltfptr[945]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]))->obj_vartab[1] =
+ ( /*_.VALDATA___V949*/
+ meltfptr[948]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V947*/ meltfptr[946]);
+ /*_.VALSTR___V950*/ meltfptr[949]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V946*/ meltfptr[945]);
+ meltgc_touch ( /*_.VALDATA___V949*/ meltfptr[948]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V948*/ meltfptr[947])) ==
+ ( /*_.VALDATA___V951*/ meltfptr[950])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V948*/
- meltfptr[947]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]))->obj_vartab[1] =
+ ( /*_.VALDATA___V951*/
+ meltfptr[950]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V949*/ meltfptr[948]);
+ /*_.VALSTR___V952*/ meltfptr[951]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V948*/ meltfptr[947]);
+ meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V950*/ meltfptr[949])) ==
+ ( /*_.VALDATA___V953*/ meltfptr[952])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V950*/
- meltfptr[949]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[1] =
+ ( /*_.VALDATA___V953*/
+ meltfptr[952]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V951*/ meltfptr[950]);
+ /*_.VALSTR___V954*/ meltfptr[953]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V950*/ meltfptr[949])) ==
+ ( /*_.VALDATA___V953*/ meltfptr[952])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V950*/
- meltfptr[949]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[4] =
+ ( /*_.VALDATA___V953*/
+ meltfptr[952]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
/*putupl#439 */
melt_assertmsg ("putupl #439 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V952*/ meltfptr[951])) ==
+ ( /*_.VALTUP___V955*/ meltfptr[954])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #439 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V952*/
- meltfptr[951]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V952*/ meltfptr[951]))->tabval[0] =
+ ( /*_.VALTUP___V955*/
+ meltfptr[954]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52085,15 +52506,15 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#440 */
melt_assertmsg ("putupl #440 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V952*/ meltfptr[951])) ==
+ ( /*_.VALTUP___V955*/ meltfptr[954])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #440 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V952*/
- meltfptr[951]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V952*/ meltfptr[951]))->tabval[1] =
+ ( /*_.VALTUP___V955*/
+ meltfptr[954]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52104,132 +52525,132 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#441 */
melt_assertmsg ("putupl #441 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V952*/ meltfptr[951])) ==
+ ( /*_.VALTUP___V955*/ meltfptr[954])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #441 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V952*/
- meltfptr[951]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V952*/ meltfptr[951]))->tabval[2] =
+ ( /*_.VALTUP___V955*/
+ meltfptr[954]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V952*/ meltfptr[951]);
+ meltgc_touch ( /*_.VALTUP___V955*/ meltfptr[954]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V950*/ meltfptr[949])) ==
+ ( /*_.VALDATA___V953*/ meltfptr[952])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V950*/
- meltfptr[949]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[5] =
+ ( /*_.VALDATA___V953*/
+ meltfptr[952]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V952*/ meltfptr[951]);
+ /*_.VALTUP___V955*/ meltfptr[954]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V953*/ meltfptr[952])) ==
+ ( /*_.VALDATA___V956*/ meltfptr[955])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V953*/
- meltfptr[952]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] =
+ ( /*_.VALDATA___V956*/
+ meltfptr[955]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V954*/ meltfptr[953]);
+ /*_.VALSTR___V957*/ meltfptr[956]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V953*/ meltfptr[952])) ==
+ ( /*_.VALDATA___V956*/ meltfptr[955])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V953*/
- meltfptr[952]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[2] =
+ ( /*_.VALDATA___V956*/
+ meltfptr[955]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V950*/ meltfptr[949]);
+ /*_.VALDATA___V953*/ meltfptr[952]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V953*/ meltfptr[952]);
+ meltgc_touch ( /*_.VALDATA___V956*/ meltfptr[955]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V955*/ meltfptr[954])) ==
+ ( /*_.VALDATA___V958*/ meltfptr[957])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V955*/
- meltfptr[954]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[1] =
+ ( /*_.VALDATA___V958*/
+ meltfptr[957]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V956*/ meltfptr[955]);
+ /*_.VALSTR___V959*/ meltfptr[958]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V955*/ meltfptr[954])) ==
+ ( /*_.VALDATA___V958*/ meltfptr[957])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V955*/
- meltfptr[954]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[2] =
+ ( /*_.VALDATA___V958*/
+ meltfptr[957]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V950*/ meltfptr[949]);
+ /*_.VALDATA___V953*/ meltfptr[952]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V955*/ meltfptr[954]);
+ meltgc_touch ( /*_.VALDATA___V958*/ meltfptr[957]);
/*putupl#442 */
melt_assertmsg ("putupl #442 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V957*/ meltfptr[956])) ==
+ ( /*_.VALTUP___V960*/ meltfptr[959])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #442 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V957*/
- meltfptr[956]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V957*/ meltfptr[956]))->tabval[0] =
+ ( /*_.VALTUP___V960*/
+ meltfptr[959]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52240,162 +52661,162 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#443 */
melt_assertmsg ("putupl #443 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V957*/ meltfptr[956])) ==
+ ( /*_.VALTUP___V960*/ meltfptr[959])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #443 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V957*/
- meltfptr[956]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V957*/ meltfptr[956]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
+ ( /*_.VALTUP___V960*/
+ meltfptr[959]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]);
/*putupl#444 */
melt_assertmsg ("putupl #444 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V957*/ meltfptr[956])) ==
+ ( /*_.VALTUP___V960*/ meltfptr[959])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #444 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V957*/
- meltfptr[956]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V957*/ meltfptr[956]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]);
+ ( /*_.VALTUP___V960*/
+ meltfptr[959]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V957*/ meltfptr[956]);
+ meltgc_touch ( /*_.VALTUP___V960*/ meltfptr[959]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V950*/ meltfptr[949])) ==
+ ( /*_.VALDATA___V953*/ meltfptr[952])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V950*/
- meltfptr[949]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]))->obj_vartab[6] =
+ ( /*_.VALDATA___V953*/
+ meltfptr[952]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V957*/ meltfptr[956]);
+ /*_.VALTUP___V960*/ meltfptr[959]);
- MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V950*/ meltfptr[949]);
+ meltgc_touch ( /*_.VALDATA___V953*/ meltfptr[952]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V958*/ meltfptr[957])) ==
+ ( /*_.VALDATA___V961*/ meltfptr[960])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V958*/
- meltfptr[957]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] =
+ ( /*_.VALDATA___V961*/
+ meltfptr[960]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V959*/ meltfptr[958]);
+ /*_.VALSTR___V962*/ meltfptr[961]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V958*/ meltfptr[957]);
+ meltgc_touch ( /*_.VALDATA___V961*/ meltfptr[960]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V960*/ meltfptr[959])) ==
+ ( /*_.VALDATA___V963*/ meltfptr[962])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V960*/
- meltfptr[959]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]))->obj_vartab[1] =
+ ( /*_.VALDATA___V963*/
+ meltfptr[962]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V963*/ meltfptr[962]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V961*/ meltfptr[960]);
+ /*_.VALSTR___V964*/ meltfptr[963]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V960*/ meltfptr[959]);
+ meltgc_touch ( /*_.VALDATA___V963*/ meltfptr[962]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V962*/ meltfptr[961])) ==
+ ( /*_.VALDATA___V965*/ meltfptr[964])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V962*/
- meltfptr[961]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] =
+ ( /*_.VALDATA___V965*/
+ meltfptr[964]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V965*/ meltfptr[964]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V963*/ meltfptr[962]);
+ /*_.VALSTR___V966*/ meltfptr[965]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V962*/ meltfptr[961]);
+ meltgc_touch ( /*_.VALDATA___V965*/ meltfptr[964]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V964*/ meltfptr[963])) ==
+ ( /*_.VALDATA___V967*/ meltfptr[966])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V964*/
- meltfptr[963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] =
+ ( /*_.VALDATA___V967*/
+ meltfptr[966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V965*/ meltfptr[964]);
+ /*_.VALSTR___V968*/ meltfptr[967]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V964*/ meltfptr[963])) ==
+ ( /*_.VALDATA___V967*/ meltfptr[966])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V964*/
- meltfptr[963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[4] =
+ ( /*_.VALDATA___V967*/
+ meltfptr[966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[4] =
(melt_ptr_t) (
/*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
/*putupl#445 */
melt_assertmsg ("putupl #445 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V966*/ meltfptr[965])) ==
+ ( /*_.VALTUP___V969*/ meltfptr[968])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #445 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V966*/
- meltfptr[965]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[0] =
+ ( /*_.VALTUP___V969*/
+ meltfptr[968]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V969*/ meltfptr[968]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52406,15 +52827,15 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#446 */
melt_assertmsg ("putupl #446 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V966*/ meltfptr[965])) ==
+ ( /*_.VALTUP___V969*/ meltfptr[968])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #446 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V966*/
- meltfptr[965]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[1] =
+ ( /*_.VALTUP___V969*/
+ meltfptr[968]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V969*/ meltfptr[968]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52425,173 +52846,173 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#447 */
melt_assertmsg ("putupl #447 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V966*/ meltfptr[965])) ==
+ ( /*_.VALTUP___V969*/ meltfptr[968])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #447 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V966*/
- meltfptr[965]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[2] =
+ ( /*_.VALTUP___V969*/
+ meltfptr[968]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V969*/ meltfptr[968]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V966*/ meltfptr[965]);
+ meltgc_touch ( /*_.VALTUP___V969*/ meltfptr[968]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V964*/ meltfptr[963])) ==
+ ( /*_.VALDATA___V967*/ meltfptr[966])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V964*/
- meltfptr[963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[5] =
+ ( /*_.VALDATA___V967*/
+ meltfptr[966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[5] =
(melt_ptr_t) (
- /*_.VALTUP___V966*/ meltfptr[965]);
+ /*_.VALTUP___V969*/ meltfptr[968]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V967*/ meltfptr[966])) ==
+ ( /*_.VALDATA___V970*/ meltfptr[969])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V967*/
- meltfptr[966]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[1] =
+ ( /*_.VALDATA___V970*/
+ meltfptr[969]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V968*/ meltfptr[967]);
+ /*_.VALSTR___V971*/ meltfptr[970]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V967*/ meltfptr[966])) ==
+ ( /*_.VALDATA___V970*/ meltfptr[969])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V967*/
- meltfptr[966]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[2] =
+ ( /*_.VALDATA___V970*/
+ meltfptr[969]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V964*/ meltfptr[963]);
+ /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V967*/ meltfptr[966]);
+ meltgc_touch ( /*_.VALDATA___V970*/ meltfptr[969]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V969*/ meltfptr[968])) ==
+ ( /*_.VALDATA___V972*/ meltfptr[971])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V969*/
- meltfptr[968]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]))->obj_vartab[1] =
+ ( /*_.VALDATA___V972*/
+ meltfptr[971]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V970*/ meltfptr[969]);
+ /*_.VALSTR___V973*/ meltfptr[972]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V969*/ meltfptr[968])) ==
+ ( /*_.VALDATA___V972*/ meltfptr[971])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V969*/
- meltfptr[968]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]))->obj_vartab[2] =
+ ( /*_.VALDATA___V972*/
+ meltfptr[971]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V964*/ meltfptr[963]);
+ /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V969*/ meltfptr[968]);
+ meltgc_touch ( /*_.VALDATA___V972*/ meltfptr[971]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V971*/ meltfptr[970])) ==
+ ( /*_.VALDATA___V974*/ meltfptr[973])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V971*/
- meltfptr[970]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]))->obj_vartab[1] =
+ ( /*_.VALDATA___V974*/
+ meltfptr[973]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V972*/ meltfptr[971]);
+ /*_.VALSTR___V975*/ meltfptr[974]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V971*/ meltfptr[970])) ==
+ ( /*_.VALDATA___V974*/ meltfptr[973])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V971*/
- meltfptr[970]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]))->obj_vartab[2] =
+ ( /*_.VALDATA___V974*/
+ meltfptr[973]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]))->obj_vartab[2] =
(melt_ptr_t) (
- /*_.VALDATA___V964*/ meltfptr[963]);
+ /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V971*/ meltfptr[970]);
+ meltgc_touch ( /*_.VALDATA___V974*/ meltfptr[973]);
/*putupl#448 */
melt_assertmsg ("putupl #448 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V973*/ meltfptr[972])) ==
+ ( /*_.VALTUP___V976*/ meltfptr[975])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #448 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V973*/
- meltfptr[972]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[0] =
+ ( /*_.VALTUP___V976*/
+ meltfptr[975]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V976*/ meltfptr[975]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -52602,6483 +53023,6819 @@ warmelt_normatch_initialmeltchunk_15 (struct frame_start_module_melt_st
/*putupl#449 */
melt_assertmsg ("putupl #449 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V973*/ meltfptr[972])) ==
+ ( /*_.VALTUP___V976*/ meltfptr[975])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #449 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V973*/
- meltfptr[972]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]);
+ ( /*_.VALTUP___V976*/
+ meltfptr[975]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V976*/ meltfptr[975]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]);
/*putupl#450 */
melt_assertmsg ("putupl #450 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V973*/ meltfptr[972])) ==
+ ( /*_.VALTUP___V976*/ meltfptr[975])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #450 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V973*/
- meltfptr[972]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]);
+ ( /*_.VALTUP___V976*/
+ meltfptr[975]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V976*/ meltfptr[975]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]);
/*putupl#451 */
melt_assertmsg ("putupl #451 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V973*/ meltfptr[972])) ==
+ ( /*_.VALTUP___V976*/ meltfptr[975])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #451 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V973*/
- meltfptr[972]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]);
+ ( /*_.VALTUP___V976*/
+ meltfptr[975]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V976*/ meltfptr[975]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V973*/ meltfptr[972]);
+ meltgc_touch ( /*_.VALTUP___V976*/ meltfptr[975]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V964*/ meltfptr[963])) ==
+ ( /*_.VALDATA___V967*/ meltfptr[966])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V964*/
- meltfptr[963]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[6] =
+ ( /*_.VALDATA___V967*/
+ meltfptr[966]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]))->obj_vartab[6] =
(melt_ptr_t) (
- /*_.VALTUP___V973*/ meltfptr[972]);
+ /*_.VALTUP___V976*/ meltfptr[975]);
- MELT_LOCATION ("warmelt-normatch.melt:2843:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2854:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]);
+ meltgc_touch ( /*_.VALDATA___V967*/ meltfptr[966]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V974*/ meltfptr[973])) ==
+ ( /*_.VALDATA___V977*/ meltfptr[976])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V974*/
- meltfptr[973]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]))->obj_vartab[1] =
+ ( /*_.VALDATA___V977*/
+ meltfptr[976]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V975*/ meltfptr[974]);
+ /*_.VALSTR___V978*/ meltfptr[977]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V974*/ meltfptr[973]);
+ meltgc_touch ( /*_.VALDATA___V977*/ meltfptr[976]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V976*/ meltfptr[975])) ==
+ ( /*_.VALDATA___V979*/ meltfptr[978])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V976*/
- meltfptr[975]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]))->obj_vartab[1] =
+ ( /*_.VALDATA___V979*/
+ meltfptr[978]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V977*/ meltfptr[976]);
+ /*_.VALSTR___V980*/ meltfptr[979]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V976*/ meltfptr[975]);
+ meltgc_touch ( /*_.VALDATA___V979*/ meltfptr[978]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V978*/ meltfptr[977])) ==
+ ( /*_.VALDATA___V981*/ meltfptr[980])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V978*/
- meltfptr[977]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[1] =
+ ( /*_.VALDATA___V981*/
+ meltfptr[980]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V979*/ meltfptr[978]);
+ /*_.VALSTR___V982*/ meltfptr[981]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V978*/ meltfptr[977]);
+ meltgc_touch ( /*_.VALDATA___V981*/ meltfptr[980]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_891__MAKE_MATCH_FLAG#0",
+ melt_checkmsg ("putroutconst constnull.drout_893__MAKE_MATCH_FLAG#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V980*/ meltfptr[979])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V983*/ meltfptr[982])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_891__MAKE_MATCH_FLAG#1",
+ melt_checkmsg ("putroutconst constnull.drout_893__MAKE_MATCH_FLAG#1",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V980*/ meltfptr[979])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V983*/ meltfptr[982])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V980*/ meltfptr[979])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V983*/ meltfptr[982])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V980*/ meltfptr[979])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V983*/ meltfptr[982])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_891__MAKE_MATCH_FLAG#4",
+ melt_checkmsg ("putroutconst constnull.drout_893__MAKE_MATCH_FLAG#4",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V980*/ meltfptr[979])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V983*/ meltfptr[982])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:2856:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2867:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V980*/ meltfptr[979]);
+ meltgc_touch ( /*_.VALROUT___V983*/ meltfptr[982]);
- /*putclosurout#40 */
- melt_assertmsg ("putclosrout#40 checkclo",
+ /*putclosurout#41 */
+ melt_assertmsg ("putclosrout#41 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V981*/ meltfptr[980])) ==
+ ( /*_.VALCLO___V984*/ meltfptr[983])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#40 checkrout",
+ melt_assertmsg ("putclosrout#41 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V980*/ meltfptr[979])) ==
+ ( /*_.VALROUT___V983*/ meltfptr[982])) ==
MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V981*/ meltfptr[980])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V980*/ meltfptr[979]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V984*/ meltfptr[983])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V983*/ meltfptr[982]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V981*/ meltfptr[980]);
+ meltgc_touch ( /*_.VALCLO___V984*/ meltfptr[983]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V982*/ meltfptr[981])) ==
+ ( /*_.VALDATA___V985*/ meltfptr[984])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V982*/
- meltfptr[981]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] =
+ ( /*_.VALDATA___V985*/
+ meltfptr[984]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V983*/ meltfptr[982]);
+ /*_.VALSTR___V986*/ meltfptr[985]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V982*/ meltfptr[981]);
+ meltgc_touch ( /*_.VALDATA___V985*/ meltfptr[984]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V984*/ meltfptr[983])) ==
+ ( /*_.VALDATA___V987*/ meltfptr[986])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V984*/
- meltfptr[983]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[1] =
+ ( /*_.VALDATA___V987*/
+ meltfptr[986]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V985*/ meltfptr[984]);
+ /*_.VALSTR___V988*/ meltfptr[987]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V984*/ meltfptr[983]);
+ meltgc_touch ( /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V986*/ meltfptr[985])) ==
+ ( /*_.VALDATA___V989*/ meltfptr[988])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V986*/
- meltfptr[985]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]))->obj_vartab[0] =
+ ( /*_.VALDATA___V989*/
+ meltfptr[988]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[0] =
(melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V986*/ meltfptr[985])) ==
+ ( /*_.VALDATA___V989*/ meltfptr[988])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V986*/
- meltfptr[985]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]))->obj_vartab[1] =
+ ( /*_.VALDATA___V989*/
+ meltfptr[988]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[1] =
(melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V986*/ meltfptr[985]);
+ meltgc_touch ( /*_.VALDATA___V989*/ meltfptr[988]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V987*/ meltfptr[986])) ==
+ ( /*_.VALDATA___V990*/ meltfptr[989])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V987*/
- meltfptr[986]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]))->obj_vartab[1] =
+ ( /*_.VALDATA___V990*/
+ meltfptr[989]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V988*/ meltfptr[987]);
+ /*_.VALSTR___V991*/ meltfptr[990]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V987*/ meltfptr[986]);
+ meltgc_touch ( /*_.VALDATA___V990*/ meltfptr[989]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V989*/ meltfptr[988])) ==
+ ( /*_.VALDATA___V992*/ meltfptr[991])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V989*/
- meltfptr[988]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[0] =
+ ( /*_.VALDATA___V992*/
+ meltfptr[991]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[0] =
(melt_ptr_t) (
- /*_.VALDATA___V987*/ meltfptr[986]);
+ /*_.VALDATA___V990*/ meltfptr[989]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V989*/ meltfptr[988])) ==
+ ( /*_.VALDATA___V992*/ meltfptr[991])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V989*/
- meltfptr[988]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]))->obj_vartab[1] =
+ ( /*_.VALDATA___V992*/
+ meltfptr[991]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[1] =
(melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V989*/ meltfptr[988]);
+ meltgc_touch ( /*_.VALDATA___V992*/ meltfptr[991]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V990*/ meltfptr[989])) ==
+ ( /*_.VALDATA___V993*/ meltfptr[992])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V990*/
- meltfptr[989]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] =
+ ( /*_.VALDATA___V993*/
+ meltfptr[992]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V991*/ meltfptr[990]);
+ /*_.VALSTR___V994*/ meltfptr[993]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V990*/ meltfptr[989]);
+ meltgc_touch ( /*_.VALDATA___V993*/ meltfptr[992]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V992*/ meltfptr[991])) ==
+ ( /*_.VALDATA___V995*/ meltfptr[994])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V992*/
- meltfptr[991]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[0] =
+ ( /*_.VALDATA___V995*/
+ meltfptr[994]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[0] =
(melt_ptr_t) (
- /*_.VALDATA___V990*/ meltfptr[989]);
+ /*_.VALDATA___V993*/ meltfptr[992]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V992*/ meltfptr[991])) ==
+ ( /*_.VALDATA___V995*/ meltfptr[994])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V992*/
- meltfptr[991]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[1] =
+ ( /*_.VALDATA___V995*/
+ meltfptr[994]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[1] =
(melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V992*/ meltfptr[991]);
+ meltgc_touch ( /*_.VALDATA___V995*/ meltfptr[994]);
/*putupl#452 */
melt_assertmsg ("putupl #452 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V993*/ meltfptr[992])) ==
+ ( /*_.VALTUP___V996*/ meltfptr[995])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #452 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V993*/
- meltfptr[992]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V993*/ meltfptr[992]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]);
+ ( /*_.VALTUP___V996*/
+ meltfptr[995]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]);
/*putupl#453 */
melt_assertmsg ("putupl #453 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V993*/ meltfptr[992])) ==
+ ( /*_.VALTUP___V996*/ meltfptr[995])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #453 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V993*/
- meltfptr[992]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V993*/ meltfptr[992]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V989*/ meltfptr[988]);
+ ( /*_.VALTUP___V996*/
+ meltfptr[995]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]);
/*putupl#454 */
melt_assertmsg ("putupl #454 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V993*/ meltfptr[992])) ==
+ ( /*_.VALTUP___V996*/ meltfptr[995])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #454 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V993*/
- meltfptr[992]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V993*/ meltfptr[992]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]);
+ ( /*_.VALTUP___V996*/
+ meltfptr[995]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V993*/ meltfptr[992]);
+ meltgc_touch ( /*_.VALTUP___V996*/ meltfptr[995]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V994*/ meltfptr[993])) ==
+ ( /*_.VALDATA___V997*/ meltfptr[996])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V994*/
- meltfptr[993]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[1] =
+ ( /*_.VALDATA___V997*/
+ meltfptr[996]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V995*/ meltfptr[994]);
+ /*_.VALSTR___V998*/ meltfptr[997]);
- MELT_LOCATION ("warmelt-normatch.melt:2885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V994*/ meltfptr[993]);
+ meltgc_touch ( /*_.VALDATA___V997*/ meltfptr[996]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V996*/ meltfptr[995])) ==
+ ( /*_.VALDATA___V999*/ meltfptr[998])) ==
MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V996*/
- meltfptr[995]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]))->obj_vartab[1] =
+ ( /*_.VALDATA___V999*/
+ meltfptr[998]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]))->obj_vartab[1] =
(melt_ptr_t) (
- /*_.VALSTR___V997*/ meltfptr[996]);
+ /*_.VALSTR___V1000*/ meltfptr[999]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V996*/ meltfptr[995]);
+ meltgc_touch ( /*_.VALDATA___V999*/ meltfptr[998]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V998*/ meltfptr[997])) ==
- MELTOBMAG_OBJECT);
+ ( /*_.VALDATA___V1001*/ meltfptr[1000]))
+ == MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V998*/
- meltfptr[997]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]))->obj_vartab[1] =
- (melt_ptr_t) (
- /*_.VALSTR___V999*/ meltfptr[998]);
+ ( /*_.VALDATA___V1001*/
+ meltfptr[1000]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1002*/ meltfptr[1001]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V998*/ meltfptr[997]);
+ meltgc_touch ( /*_.VALDATA___V1001*/ meltfptr[1000]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/ meltfptr[999])) ==
- MELTOBMAG_OBJECT);
+ ( /*_.VALDATA___V1003*/ meltfptr[1002]))
+ == MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/
- meltfptr[999]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1000*/ meltfptr[999]))->obj_vartab[0] =
- (melt_ptr_t) (
- /*_.VALDATA___V998*/ meltfptr[997]);
+ ( /*_.VALDATA___V1003*/
+ meltfptr[1002]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]))->
+ obj_vartab[0] = (melt_ptr_t) (
+ /*_.VALDATA___V1001*/ meltfptr[1000]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/ meltfptr[999])) ==
- MELTOBMAG_OBJECT);
+ ( /*_.VALDATA___V1003*/ meltfptr[1002]))
+ == MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1000*/
- meltfptr[999]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1000*/ meltfptr[999]))->obj_vartab[1] =
- (melt_ptr_t) (
- ((void *) (MELT_PREDEF (CTYPE_VALUE))));
+ ( /*_.VALDATA___V1003*/
+ meltfptr[1002]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ ((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1000*/ meltfptr[999]);
+ meltgc_touch ( /*_.VALDATA___V1003*/ meltfptr[1002]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1001*/ meltfptr[1000]))
+ ( /*_.VALDATA___V1004*/ meltfptr[1003]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1001*/
- meltfptr[1000]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]))->
+ ( /*_.VALDATA___V1004*/
+ meltfptr[1003]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V987*/ meltfptr[986]);
+ /*_.VALDATA___V990*/ meltfptr[989]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1001*/ meltfptr[1000]))
+ ( /*_.VALDATA___V1004*/ meltfptr[1003]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1001*/
- meltfptr[1000]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]))->
+ ( /*_.VALDATA___V1004*/
+ meltfptr[1003]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1001*/ meltfptr[1000]);
+ meltgc_touch ( /*_.VALDATA___V1004*/ meltfptr[1003]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/ meltfptr[1001]))
+ ( /*_.VALDATA___V1005*/ meltfptr[1004]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/
- meltfptr[1001]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]))->
+ ( /*_.VALDATA___V1005*/
+ meltfptr[1004]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V990*/ meltfptr[989]);
+ /*_.VALDATA___V993*/ meltfptr[992]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/ meltfptr[1001]))
+ ( /*_.VALDATA___V1005*/ meltfptr[1004]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1002*/
- meltfptr[1001]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]))->
+ ( /*_.VALDATA___V1005*/
+ meltfptr[1004]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1002*/ meltfptr[1001]);
+ meltgc_touch ( /*_.VALDATA___V1005*/ meltfptr[1004]);
+
- /*putupl#455 */
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_15 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_16 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*putupl#455*/
melt_assertmsg ("putupl #455 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/ meltfptr[1002])) ==
+ ( /*_.VALTUP___V1006*/ meltfptr[1005])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #455 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/
- meltfptr[1002]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1003*/ meltfptr[1002]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1000*/ meltfptr[999]);
+ ( /*_.VALTUP___V1006*/
+ meltfptr[1005]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1006*/ meltfptr[1005]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]);
/*putupl#456 */
melt_assertmsg ("putupl #456 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/ meltfptr[1002])) ==
+ ( /*_.VALTUP___V1006*/ meltfptr[1005])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #456 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/
- meltfptr[1002]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1003*/ meltfptr[1002]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]);
+ ( /*_.VALTUP___V1006*/
+ meltfptr[1005]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1006*/ meltfptr[1005]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]);
/*putupl#457 */
melt_assertmsg ("putupl #457 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/ meltfptr[1002])) ==
+ ( /*_.VALTUP___V1006*/ meltfptr[1005])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #457 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1003*/
- meltfptr[1002]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1003*/ meltfptr[1002]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]);
+ ( /*_.VALTUP___V1006*/
+ meltfptr[1005]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1006*/ meltfptr[1005]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1003*/ meltfptr[1002]);
+ meltgc_touch ( /*_.VALTUP___V1006*/ meltfptr[1005]);
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1004*/ meltfptr[1003]))
+ ( /*_.VALDATA___V1007*/ meltfptr[1006]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1004*/
- meltfptr[1003]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]))->
+ ( /*_.VALDATA___V1007*/
+ meltfptr[1006]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1005*/ meltfptr[1004]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_15 */
+ /*_.VALSTR___V1008*/ meltfptr[1007]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_16 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:2891:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2902:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1004*/ meltfptr[1003]);
+ meltgc_touch ( /*_.VALDATA___V1007*/ meltfptr[1006]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/ meltfptr[1005]))
+ ( /*_.VALDATA___V1009*/ meltfptr[1008]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/
- meltfptr[1005]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005]))->
+ ( /*_.VALDATA___V1009*/
+ meltfptr[1008]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1007*/ meltfptr[1006]);
+ /*_.VALSTR___V1010*/ meltfptr[1009]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1006*/ meltfptr[1005]);
+ meltgc_touch ( /*_.VALDATA___V1009*/ meltfptr[1008]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V998*/ meltfptr[997]);
+ /*_.VALDATA___V1001*/ meltfptr[1000]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/ meltfptr[1007]))
+ ( /*_.VALDATA___V1011*/ meltfptr[1010]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1008*/
- meltfptr[1007]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))->
+ ( /*_.VALDATA___V1011*/
+ meltfptr[1010]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1009*/ meltfptr[1008]))
+ ( /*_.VALDATA___V1012*/ meltfptr[1011]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1009*/
- meltfptr[1008]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]))->
+ ( /*_.VALDATA___V1012*/
+ meltfptr[1011]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V987*/ meltfptr[986]);
+ /*_.VALDATA___V990*/ meltfptr[989]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1009*/ meltfptr[1008]))
+ ( /*_.VALDATA___V1012*/ meltfptr[1011]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1009*/
- meltfptr[1008]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]))->
+ ( /*_.VALDATA___V1012*/
+ meltfptr[1011]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1009*/ meltfptr[1008]);
+ meltgc_touch ( /*_.VALDATA___V1012*/ meltfptr[1011]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1010*/ meltfptr[1009]))
+ ( /*_.VALDATA___V1013*/ meltfptr[1012]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1010*/
- meltfptr[1009]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009]))->
+ ( /*_.VALDATA___V1013*/
+ meltfptr[1012]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V990*/ meltfptr[989]);
+ /*_.VALDATA___V993*/ meltfptr[992]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1010*/ meltfptr[1009]))
+ ( /*_.VALDATA___V1013*/ meltfptr[1012]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1010*/
- meltfptr[1009]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009]))->
+ ( /*_.VALDATA___V1013*/
+ meltfptr[1012]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1010*/ meltfptr[1009]);
+ meltgc_touch ( /*_.VALDATA___V1013*/ meltfptr[1012]);
/*putupl#458 */
melt_assertmsg ("putupl #458 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/ meltfptr[1010])) ==
+ ( /*_.VALTUP___V1014*/ meltfptr[1013])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #458 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/
- meltfptr[1010]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1011*/ meltfptr[1010]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]);
+ ( /*_.VALTUP___V1014*/
+ meltfptr[1013]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1014*/ meltfptr[1013]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]);
/*putupl#459 */
melt_assertmsg ("putupl #459 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/ meltfptr[1010])) ==
+ ( /*_.VALTUP___V1014*/ meltfptr[1013])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #459 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/
- meltfptr[1010]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1011*/ meltfptr[1010]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]);
+ ( /*_.VALTUP___V1014*/
+ meltfptr[1013]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1014*/ meltfptr[1013]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]);
/*putupl#460 */
melt_assertmsg ("putupl #460 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/ meltfptr[1010])) ==
+ ( /*_.VALTUP___V1014*/ meltfptr[1013])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #460 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1011*/
- meltfptr[1010]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1011*/ meltfptr[1010]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009]);
+ ( /*_.VALTUP___V1014*/
+ meltfptr[1013]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1014*/ meltfptr[1013]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1011*/ meltfptr[1010]);
+ meltgc_touch ( /*_.VALTUP___V1014*/ meltfptr[1013]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1012*/ meltfptr[1011]))
+ ( /*_.VALDATA___V1015*/ meltfptr[1014]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1012*/
- meltfptr[1011]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]))->
+ ( /*_.VALDATA___V1015*/
+ meltfptr[1014]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1013*/ meltfptr[1012]);
+ /*_.VALSTR___V1016*/ meltfptr[1015]);
- MELT_LOCATION ("warmelt-normatch.melt:2896:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1012*/ meltfptr[1011]);
+ meltgc_touch ( /*_.VALDATA___V1015*/ meltfptr[1014]);
- MELT_LOCATION ("warmelt-normatch.melt:2901:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2912:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1014*/ meltfptr[1013]))
+ ( /*_.VALROUT___V1017*/ meltfptr[1016]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_925__SCANSUBPAT_ANYRECV#0",
+ melt_checkmsg ("putroutconst constnull.drout_927__SCANSUBPAT_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1014*/ meltfptr[1013])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1017*/ meltfptr[1016])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2901:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2912:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1014*/ meltfptr[1013]);
+ meltgc_touch ( /*_.VALROUT___V1017*/ meltfptr[1016]);
- /*putclosurout#41 */
- melt_assertmsg ("putclosrout#41 checkclo",
+ /*putclosurout#42 */
+ melt_assertmsg ("putclosrout#42 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1015*/ meltfptr[1014])) ==
+ ( /*_.VALCLO___V1018*/ meltfptr[1017])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#41 checkrout",
+ melt_assertmsg ("putclosrout#42 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1014*/ meltfptr[1013]))
+ ( /*_.VALROUT___V1017*/ meltfptr[1016]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1015*/ meltfptr[1014])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1014*/ meltfptr[1013]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1018*/ meltfptr[1017])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1017*/ meltfptr[1016]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1015*/ meltfptr[1014]);
+ meltgc_touch ( /*_.VALCLO___V1018*/ meltfptr[1017]);
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2920:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1016*/ meltfptr[1015]))
+ ( /*_.VALROUT___V1019*/ meltfptr[1018]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_927__SCANSUBPAT_NOOP#0",
+ melt_checkmsg ("putroutconst constnull.drout_929__SCANSTEPDATA_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1016*/ meltfptr[1015])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1019*/ meltfptr[1018])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2909:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2920:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1016*/ meltfptr[1015]);
+ meltgc_touch ( /*_.VALROUT___V1019*/ meltfptr[1018]);
- /*putclosurout#42 */
- melt_assertmsg ("putclosrout#42 checkclo",
+ /*putclosurout#43 */
+ melt_assertmsg ("putclosrout#43 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1017*/ meltfptr[1016])) ==
+ ( /*_.VALCLO___V1020*/ meltfptr[1019])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#42 checkrout",
+ melt_assertmsg ("putclosrout#43 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1016*/ meltfptr[1015]))
+ ( /*_.VALROUT___V1019*/ meltfptr[1018]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1017*/ meltfptr[1016])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1016*/ meltfptr[1015]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1020*/ meltfptr[1019])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1019*/ meltfptr[1018]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1017*/ meltfptr[1016]);
+ meltgc_touch ( /*_.VALCLO___V1020*/ meltfptr[1019]);
- MELT_LOCATION ("warmelt-normatch.melt:2916:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2928:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1018*/ meltfptr[1017]))
+ ( /*_.VALROUT___V1021*/ meltfptr[1020]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_929__SCANSUBPAT_OR#0",
+ melt_checkmsg ("putroutconst constnull.drout_931__SCANSTEPFLAG_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1018*/ meltfptr[1017])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1021*/ meltfptr[1020])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2916:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2928:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1018*/ meltfptr[1017]);
+ meltgc_touch ( /*_.VALROUT___V1021*/ meltfptr[1020]);
- /*putclosurout#43 */
- melt_assertmsg ("putclosrout#43 checkclo",
+ /*putclosurout#44 */
+ melt_assertmsg ("putclosrout#44 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1019*/ meltfptr[1018])) ==
+ ( /*_.VALCLO___V1022*/ meltfptr[1021])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#43 checkrout",
+ melt_assertmsg ("putclosrout#44 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1018*/ meltfptr[1017]))
+ ( /*_.VALROUT___V1021*/ meltfptr[1020]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1019*/ meltfptr[1018])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1018*/ meltfptr[1017]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1022*/ meltfptr[1021])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1021*/ meltfptr[1020]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1019*/ meltfptr[1018]);
+ meltgc_touch ( /*_.VALCLO___V1022*/ meltfptr[1021]);
- MELT_LOCATION ("warmelt-normatch.melt:2925:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1020*/ meltfptr[1019]))
+ ( /*_.VALROUT___V1023*/ meltfptr[1022]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_931__SCANSUBPAT_AND#0",
+ melt_checkmsg ("putroutconst constnull.drout_933__SCANSUBPAT_NOOP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1020*/ meltfptr[1019])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1023*/ meltfptr[1022])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2925:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2936:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1020*/ meltfptr[1019]);
+ meltgc_touch ( /*_.VALROUT___V1023*/ meltfptr[1022]);
- /*putclosurout#44 */
- melt_assertmsg ("putclosrout#44 checkclo",
+ /*putclosurout#45 */
+ melt_assertmsg ("putclosrout#45 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1021*/ meltfptr[1020])) ==
+ ( /*_.VALCLO___V1024*/ meltfptr[1023])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#44 checkrout",
+ melt_assertmsg ("putclosrout#45 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1020*/ meltfptr[1019]))
+ ( /*_.VALROUT___V1023*/ meltfptr[1022]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1021*/ meltfptr[1020])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1020*/ meltfptr[1019]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1024*/ meltfptr[1023])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1023*/ meltfptr[1022]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1021*/ meltfptr[1020]);
+ meltgc_touch ( /*_.VALCLO___V1024*/ meltfptr[1023]);
- MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2943:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1022*/ meltfptr[1021]))
+ ( /*_.VALROUT___V1025*/ meltfptr[1024]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_933__SCANSUBPAT_CONSTRUCT#0",
+ melt_checkmsg ("putroutconst constnull.drout_935__SCANSUBPAT_OR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1022*/ meltfptr[1021])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1025*/ meltfptr[1024])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2943:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1022*/ meltfptr[1021]);
+ meltgc_touch ( /*_.VALROUT___V1025*/ meltfptr[1024]);
- /*putclosurout#45 */
- melt_assertmsg ("putclosrout#45 checkclo",
+ /*putclosurout#46 */
+ melt_assertmsg ("putclosrout#46 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1023*/ meltfptr[1022])) ==
+ ( /*_.VALCLO___V1026*/ meltfptr[1025])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#45 checkrout",
+ melt_assertmsg ("putclosrout#46 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1022*/ meltfptr[1021]))
+ ( /*_.VALROUT___V1025*/ meltfptr[1024]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1023*/ meltfptr[1022])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1022*/ meltfptr[1021]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1026*/ meltfptr[1025])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1025*/ meltfptr[1024]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1023*/ meltfptr[1022]);
+ meltgc_touch ( /*_.VALCLO___V1026*/ meltfptr[1025]);
- MELT_LOCATION ("warmelt-normatch.melt:2944:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2952:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1024*/ meltfptr[1023]))
+ ( /*_.VALROUT___V1027*/ meltfptr[1026]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_935__SCANSUBPAT_OBJECT#0",
+ melt_checkmsg ("putroutconst constnull.drout_937__SCANSUBPAT_AND#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1024*/ meltfptr[1023])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1027*/ meltfptr[1026])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2944:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2952:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1027*/ meltfptr[1026]);
+
+ /*putclosurout#47 */
+ melt_assertmsg ("putclosrout#47 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1028*/ meltfptr[1027])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#47 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1027*/ meltfptr[1026]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1028*/ meltfptr[1027])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1027*/ meltfptr[1026]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1028*/ meltfptr[1027]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:2963:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1024*/ meltfptr[1023]))
+ ( /*_.VALROUT___V1029*/ meltfptr[1028]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_935__SCANSUBPAT_OBJECT#1",
+ melt_checkmsg ("putroutconst constnull.drout_939__SCANSUBPAT_CONSTRUCT#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1029*/ meltfptr[1028])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:2963:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1029*/ meltfptr[1028]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_939__SCANSUBPAT_CONSTRUCT#1",
NULL !=
- ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1024*/ meltfptr[1023])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
+ ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1029*/ meltfptr[1028])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]);
- MELT_LOCATION ("warmelt-normatch.melt:2944:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2963:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1024*/ meltfptr[1023]);
+ meltgc_touch ( /*_.VALROUT___V1029*/ meltfptr[1028]);
- /*putclosurout#46 */
- melt_assertmsg ("putclosrout#46 checkclo",
+ /*putclosurout#48 */
+ melt_assertmsg ("putclosrout#48 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1025*/ meltfptr[1024])) ==
+ ( /*_.VALCLO___V1030*/ meltfptr[1029])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#46 checkrout",
+ melt_assertmsg ("putclosrout#48 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1024*/ meltfptr[1023]))
+ ( /*_.VALROUT___V1029*/ meltfptr[1028]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1025*/ meltfptr[1024])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1024*/ meltfptr[1023]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1030*/ meltfptr[1029])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1029*/ meltfptr[1028]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1025*/ meltfptr[1024]);
+ meltgc_touch ( /*_.VALCLO___V1030*/ meltfptr[1029]);
- MELT_LOCATION ("warmelt-normatch.melt:2954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2978:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1026*/ meltfptr[1025]))
+ ( /*_.VALROUT___V1031*/ meltfptr[1030]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_937__SCANSUBPAT_CONSTRUCT#0",
+ melt_checkmsg ("putroutconst constnull.drout_941__SCANSUBPAT_OBJECT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1026*/ meltfptr[1025])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1031*/ meltfptr[1030])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2978:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1031*/ meltfptr[1030]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_941__SCANSUBPAT_OBJECT#1",
+ NULL !=
+ ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1031*/ meltfptr[1030])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:2978:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1026*/ meltfptr[1025]);
+ meltgc_touch ( /*_.VALROUT___V1031*/ meltfptr[1030]);
- /*putclosurout#47 */
- melt_assertmsg ("putclosrout#47 checkclo",
+ /*putclosurout#49 */
+ melt_assertmsg ("putclosrout#49 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1027*/ meltfptr[1026])) ==
+ ( /*_.VALCLO___V1032*/ meltfptr[1031])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#47 checkrout",
+ melt_assertmsg ("putclosrout#49 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1026*/ meltfptr[1025]))
+ ( /*_.VALROUT___V1031*/ meltfptr[1030]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1027*/ meltfptr[1026])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1026*/ meltfptr[1025]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1032*/ meltfptr[1031])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1031*/ meltfptr[1030]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1027*/ meltfptr[1026]);
+ meltgc_touch ( /*_.VALCLO___V1032*/ meltfptr[1031]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#0",
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#2",
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#2",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#3",
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#4",
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#4",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#5",
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#5",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V997*/ meltfptr[996]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1029*/ meltfptr[1028]))
+ ( /*_.VALROUT___V1034*/ meltfptr[1033]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_941__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_945__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1029*/ meltfptr[1028])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1034*/ meltfptr[1033])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1029*/ meltfptr[1028]))
+ ( /*_.VALROUT___V1034*/ meltfptr[1033]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_941__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_945__LAMBDA_#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1029*/ meltfptr[1028])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1034*/ meltfptr[1033])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1029*/ meltfptr[1028]))
+ ( /*_.VALROUT___V1034*/ meltfptr[1033]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_941__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_945__LAMBDA_#2",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1029*/ meltfptr[1028])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1034*/ meltfptr[1033])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:2974:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1034*/ meltfptr[1033]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V997*/ meltfptr[996]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1034*/ meltfptr[1033])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3000:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1029*/ meltfptr[1028]);
+ meltgc_touch ( /*_.VALROUT___V1034*/ meltfptr[1033]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_939__FILL_MATCHCASE#6",
- NULL != ( /*_.VALROUT___V1029*/ meltfptr[1028]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[6] =
- (melt_ptr_t) ( /*_.VALROUT___V1029*/ meltfptr[1028]);
-
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
- /*^putroutconstnotnull */
- /*putroutconstnotnull */
- melt_assertmsg ("putroutconstnotnull checkrout",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
- == MELTOBMAG_ROUTINE);
- melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V994*/ meltfptr[993]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1028*/ meltfptr[1027])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]);
+ melt_checkmsg ("putroutconst constnull.drout_943__FILL_MATCHCASE#7",
+ NULL != ( /*_.VALROUT___V1034*/ meltfptr[1033]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1034*/ meltfptr[1033]);
- MELT_LOCATION ("warmelt-normatch.melt:2964:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2989:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1028*/ meltfptr[1027]);
+ meltgc_touch ( /*_.VALROUT___V1033*/ meltfptr[1032]);
- /*putclosurout#48 */
- melt_assertmsg ("putclosrout#48 checkclo",
+ /*putclosurout#50 */
+ melt_assertmsg ("putclosrout#50 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1030*/ meltfptr[1029])) ==
+ ( /*_.VALCLO___V1035*/ meltfptr[1034])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#48 checkrout",
+ melt_assertmsg ("putclosrout#50 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1028*/ meltfptr[1027]))
+ ( /*_.VALROUT___V1033*/ meltfptr[1032]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1030*/ meltfptr[1029])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1028*/ meltfptr[1027]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1035*/ meltfptr[1034])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1033*/ meltfptr[1032]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1030*/ meltfptr[1029]);
+ meltgc_touch ( /*_.VALCLO___V1035*/ meltfptr[1034]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1031*/ meltfptr[1030]))
+ ( /*_.VALDATA___V1036*/ meltfptr[1035]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1031*/
- meltfptr[1030]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]))->
+ ( /*_.VALDATA___V1036*/
+ meltfptr[1035]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1032*/ meltfptr[1031]);
+ /*_.VALSTR___V1037*/ meltfptr[1036]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1031*/ meltfptr[1030]);
+ meltgc_touch ( /*_.VALDATA___V1036*/ meltfptr[1035]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1033*/ meltfptr[1032]))
+ ( /*_.VALDATA___V1038*/ meltfptr[1037]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1033*/
- meltfptr[1032]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]))->
+ ( /*_.VALDATA___V1038*/
+ meltfptr[1037]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1033*/ meltfptr[1032]))
+ ( /*_.VALDATA___V1038*/ meltfptr[1037]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1033*/
- meltfptr[1032]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]))->
+ ( /*_.VALDATA___V1038*/
+ meltfptr[1037]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1033*/ meltfptr[1032]);
+ meltgc_touch ( /*_.VALDATA___V1038*/ meltfptr[1037]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/ meltfptr[1033]))
+ ( /*_.VALDATA___V1039*/ meltfptr[1038]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/
- meltfptr[1033]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1034*/ meltfptr[1033]))->
+ ( /*_.VALDATA___V1039*/
+ meltfptr[1038]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1035*/ meltfptr[1034]);
+ /*_.VALSTR___V1040*/ meltfptr[1039]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1034*/ meltfptr[1033]);
+ meltgc_touch ( /*_.VALDATA___V1039*/ meltfptr[1038]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/ meltfptr[1035]))
+ ( /*_.VALDATA___V1041*/ meltfptr[1040]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/
- meltfptr[1035]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]))->
+ ( /*_.VALDATA___V1041*/
+ meltfptr[1040]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1034*/ meltfptr[1033]);
+ /*_.VALDATA___V1039*/ meltfptr[1038]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/ meltfptr[1035]))
+ ( /*_.VALDATA___V1041*/ meltfptr[1040]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1036*/
- meltfptr[1035]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]))->
+ ( /*_.VALDATA___V1041*/
+ meltfptr[1040]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1036*/ meltfptr[1035]);
+ meltgc_touch ( /*_.VALDATA___V1041*/ meltfptr[1040]);
/*putupl#461 */
melt_assertmsg ("putupl #461 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1037*/ meltfptr[1036])) ==
+ ( /*_.VALTUP___V1042*/ meltfptr[1041])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #461 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1037*/
- meltfptr[1036]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]);
+ ( /*_.VALTUP___V1042*/
+ meltfptr[1041]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1042*/ meltfptr[1041]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
/*putupl#462 */
melt_assertmsg ("putupl #462 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1037*/ meltfptr[1036])) ==
+ ( /*_.VALTUP___V1042*/ meltfptr[1041])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #462 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1037*/
- meltfptr[1036]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1036*/ meltfptr[1035]);
+ ( /*_.VALTUP___V1042*/
+ meltfptr[1041]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1042*/ meltfptr[1041]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1037*/ meltfptr[1036]);
+ meltgc_touch ( /*_.VALTUP___V1042*/ meltfptr[1041]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1038*/ meltfptr[1037]))
+ ( /*_.VALDATA___V1043*/ meltfptr[1042]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1038*/
- meltfptr[1037]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]))->
+ ( /*_.VALDATA___V1043*/
+ meltfptr[1042]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1039*/ meltfptr[1038]);
+ /*_.VALSTR___V1044*/ meltfptr[1043]);
- MELT_LOCATION ("warmelt-normatch.melt:2999:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3039:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ meltgc_touch ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1045*/ meltfptr[1044]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_955__PUTTHEN_MATCHANY#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1045*/ meltfptr[1044])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1045*/ meltfptr[1044]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_955__PUTTHEN_MATCHANY#1",
+ NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1045*/ meltfptr[1044])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3044:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1045*/ meltfptr[1044]);
+
+ /*putclosurout#51 */
+ melt_assertmsg ("putclosrout#51 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1046*/ meltfptr[1045])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#51 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1045*/ meltfptr[1044]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1046*/ meltfptr[1045])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1045*/ meltfptr[1044]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1046*/ meltfptr[1045]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1040*/ meltfptr[1039]))
+ ( /*_.VALROUT___V1047*/ meltfptr[1046]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1047*/ meltfptr[1046])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1040*/ meltfptr[1039]))
+ ( /*_.VALROUT___V1047*/ meltfptr[1046]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_951__START_STEP#1",
+ melt_checkmsg ("putroutconst constnull.drout_957__START_STEP#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1047*/ meltfptr[1046])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1040*/ meltfptr[1039]))
+ ( /*_.VALROUT___V1047*/ meltfptr[1046]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1047*/ meltfptr[1046])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3004:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3053:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1040*/ meltfptr[1039]);
+ meltgc_touch ( /*_.VALROUT___V1047*/ meltfptr[1046]);
- /*putclosurout#49 */
- melt_assertmsg ("putclosrout#49 checkclo",
+ /*putclosurout#52 */
+ melt_assertmsg ("putclosrout#52 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1041*/ meltfptr[1040])) ==
+ ( /*_.VALCLO___V1048*/ meltfptr[1047])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#49 checkrout",
+ melt_assertmsg ("putclosrout#52 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1040*/ meltfptr[1039]))
+ ( /*_.VALROUT___V1047*/ meltfptr[1046]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1041*/ meltfptr[1040])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1048*/ meltfptr[1047])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1047*/ meltfptr[1046]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1041*/ meltfptr[1040]);
+ meltgc_touch ( /*_.VALCLO___V1048*/ meltfptr[1047]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_953__PUTTHEN_MATCHTHEN#0",
+ melt_checkmsg ("putroutconst constnull.drout_959__PUTTHEN_MATCHTHEN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V760*/ meltfptr[759]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ NULL != /*_.VALDATA___V763*/ meltfptr[762]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V902*/ meltfptr[901]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]);
+ NULL != /*_.VALDATA___V905*/ meltfptr[904]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1041*/ meltfptr[1040]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040]);
+ NULL != /*_.VALCLO___V1048*/ meltfptr[1047]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1048*/ meltfptr[1047]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1042*/ meltfptr[1041])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1049*/ meltfptr[1048])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3023:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1042*/ meltfptr[1041]);
+ meltgc_touch ( /*_.VALROUT___V1049*/ meltfptr[1048]);
- /*putclosurout#50 */
- melt_assertmsg ("putclosrout#50 checkclo",
+ /*putclosurout#53 */
+ melt_assertmsg ("putclosrout#53 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1043*/ meltfptr[1042])) ==
+ ( /*_.VALCLO___V1050*/ meltfptr[1049])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#50 checkrout",
+ melt_assertmsg ("putclosrout#53 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1042*/ meltfptr[1041]))
+ ( /*_.VALROUT___V1049*/ meltfptr[1048]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1043*/ meltfptr[1042])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1042*/ meltfptr[1041]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1050*/ meltfptr[1049])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1049*/ meltfptr[1048]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1043*/ meltfptr[1042]);
+ meltgc_touch ( /*_.VALCLO___V1050*/ meltfptr[1049]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_955__PUTTHEN_MATCHGROUP#0",
+ melt_checkmsg ("putroutconst constnull.drout_961__PUTTHEN_MATCHGROUP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1044*/ meltfptr[1043])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1044*/ meltfptr[1043])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1044*/ meltfptr[1043])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1043*/ meltfptr[1042]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1044*/ meltfptr[1043])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1043*/ meltfptr[1042]);
+ NULL != /*_.VALCLO___V1050*/ meltfptr[1049]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1050*/ meltfptr[1049]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1044*/ meltfptr[1043])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3062:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3111:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1044*/ meltfptr[1043]);
+ meltgc_touch ( /*_.VALROUT___V1051*/ meltfptr[1050]);
- /*putclosurout#51 */
- melt_assertmsg ("putclosrout#51 checkclo",
+ /*putclosurout#54 */
+ melt_assertmsg ("putclosrout#54 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1045*/ meltfptr[1044])) ==
+ ( /*_.VALCLO___V1052*/ meltfptr[1051])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#51 checkrout",
+ melt_assertmsg ("putclosrout#54 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1044*/ meltfptr[1043]))
+ ( /*_.VALROUT___V1051*/ meltfptr[1050]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1045*/ meltfptr[1044])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1044*/ meltfptr[1043]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1052*/ meltfptr[1051])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1051*/ meltfptr[1050]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1045*/ meltfptr[1044]);
+ meltgc_touch ( /*_.VALCLO___V1052*/ meltfptr[1051]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/ meltfptr[1045]))
+ ( /*_.VALDATA___V1053*/ meltfptr[1052]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/
- meltfptr[1045]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045]))->
+ ( /*_.VALDATA___V1053*/
+ meltfptr[1052]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1047*/ meltfptr[1046]);
+ /*_.VALSTR___V1054*/ meltfptr[1053]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1046*/ meltfptr[1045]);
+ meltgc_touch ( /*_.VALDATA___V1053*/ meltfptr[1052]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/ meltfptr[1047]))
+ ( /*_.VALDATA___V1055*/ meltfptr[1054]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/
- meltfptr[1047]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]))->
+ ( /*_.VALDATA___V1055*/
+ meltfptr[1054]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1055*/ meltfptr[1054]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/ meltfptr[1047]))
+ ( /*_.VALDATA___V1055*/ meltfptr[1054]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1048*/
- meltfptr[1047]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]))->
+ ( /*_.VALDATA___V1055*/
+ meltfptr[1054]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1055*/ meltfptr[1054]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1048*/ meltfptr[1047]);
+ meltgc_touch ( /*_.VALDATA___V1055*/ meltfptr[1054]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1049*/ meltfptr[1048]))
+ ( /*_.VALDATA___V1056*/ meltfptr[1055]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1049*/
- meltfptr[1048]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]))->
+ ( /*_.VALDATA___V1056*/
+ meltfptr[1055]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1050*/ meltfptr[1049]);
+ /*_.VALSTR___V1057*/ meltfptr[1056]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1049*/ meltfptr[1048]);
+ meltgc_touch ( /*_.VALDATA___V1056*/ meltfptr[1055]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1051*/ meltfptr[1050]))
+ ( /*_.VALDATA___V1058*/ meltfptr[1057]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1051*/
- meltfptr[1050]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1051*/ meltfptr[1050]))->
+ ( /*_.VALDATA___V1058*/
+ meltfptr[1057]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1049*/ meltfptr[1048]);
+ /*_.VALDATA___V1056*/ meltfptr[1055]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1051*/ meltfptr[1050]))
+ ( /*_.VALDATA___V1058*/ meltfptr[1057]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1051*/
- meltfptr[1050]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1051*/ meltfptr[1050]))->
+ ( /*_.VALDATA___V1058*/
+ meltfptr[1057]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1051*/ meltfptr[1050]);
+ meltgc_touch ( /*_.VALDATA___V1058*/ meltfptr[1057]);
/*putupl#463 */
melt_assertmsg ("putupl #463 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1052*/ meltfptr[1051])) ==
+ ( /*_.VALTUP___V1059*/ meltfptr[1058])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #463 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1052*/
- meltfptr[1051]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1052*/ meltfptr[1051]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]);
+ ( /*_.VALTUP___V1059*/
+ meltfptr[1058]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1059*/ meltfptr[1058]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1055*/ meltfptr[1054]);
/*putupl#464 */
melt_assertmsg ("putupl #464 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1052*/ meltfptr[1051])) ==
+ ( /*_.VALTUP___V1059*/ meltfptr[1058])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #464 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1052*/
- meltfptr[1051]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1052*/ meltfptr[1051]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1051*/ meltfptr[1050]);
+ ( /*_.VALTUP___V1059*/
+ meltfptr[1058]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1059*/ meltfptr[1058]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]);
- /*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1052*/ meltfptr[1051]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_16 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_17 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*touch:INITUP_*/
+ meltgc_touch ( /*_.VALTUP___V1059*/ meltfptr[1058]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1053*/ meltfptr[1052]))
+ ( /*_.VALDATA___V1060*/ meltfptr[1059]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1053*/
- meltfptr[1052]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]))->
+ ( /*_.VALDATA___V1060*/
+ meltfptr[1059]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1054*/ meltfptr[1053]);
+ /*_.VALSTR___V1061*/ meltfptr[1060]);
- MELT_LOCATION ("warmelt-normatch.melt:3090:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3141:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ meltgc_touch ( /*_.VALDATA___V1060*/ meltfptr[1059]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1062*/ meltfptr[1061]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_972__PUTELSE_MATCHANY#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1062*/ meltfptr[1061])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1062*/ meltfptr[1061]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_972__PUTELSE_MATCHANY#1",
+ NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1062*/ meltfptr[1061])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3146:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1062*/ meltfptr[1061]);
+
+ /*putclosurout#55 */
+ melt_assertmsg ("putclosrout#55 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1063*/ meltfptr[1062])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#55 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1062*/ meltfptr[1061]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1063*/ meltfptr[1062])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1062*/ meltfptr[1061]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1063*/ meltfptr[1062]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_966__PUTELSE_MATCHSTEPTHEN#0",
+ ("putroutconst constnull.drout_974__PUTELSE_MATCHSTEPTHEN#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1064*/ meltfptr[1063])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V760*/ meltfptr[759]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ NULL != /*_.VALDATA___V763*/ meltfptr[762]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1064*/ meltfptr[1063])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1064*/ meltfptr[1063])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1041*/ meltfptr[1040]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040]);
+ NULL != /*_.VALCLO___V1048*/ meltfptr[1047]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1064*/ meltfptr[1063])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1048*/ meltfptr[1047]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1064*/ meltfptr[1063])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3096:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3156:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1055*/ meltfptr[1054]);
+ meltgc_touch ( /*_.VALROUT___V1064*/ meltfptr[1063]);
- /*putclosurout#52 */
- melt_assertmsg ("putclosrout#52 checkclo",
+ /*putclosurout#56 */
+ melt_assertmsg ("putclosrout#56 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1056*/ meltfptr[1055])) ==
+ ( /*_.VALCLO___V1065*/ meltfptr[1064])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#52 checkrout",
+ melt_assertmsg ("putclosrout#56 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1055*/ meltfptr[1054]))
+ ( /*_.VALROUT___V1064*/ meltfptr[1063]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1056*/ meltfptr[1055])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1065*/ meltfptr[1064])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1064*/ meltfptr[1063]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1056*/ meltfptr[1055]);
+ meltgc_touch ( /*_.VALCLO___V1065*/ meltfptr[1064]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_968__PUTELSE_MATCHTEST#0",
+ melt_checkmsg ("putroutconst constnull.drout_976__PUTELSE_MATCHTEST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1041*/ meltfptr[1040]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040]);
+ NULL != /*_.VALCLO___V1048*/ meltfptr[1047]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1048*/ meltfptr[1047]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_16 */
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_17 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1066*/ meltfptr[1065])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3131:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3191:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1057*/ meltfptr[1056]);
+ meltgc_touch ( /*_.VALROUT___V1066*/ meltfptr[1065]);
- /*putclosurout#53 */
- melt_assertmsg ("putclosrout#53 checkclo",
+ /*putclosurout#57 */
+ melt_assertmsg ("putclosrout#57 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1058*/ meltfptr[1057])) ==
+ ( /*_.VALCLO___V1067*/ meltfptr[1066])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#53 checkrout",
+ melt_assertmsg ("putclosrout#57 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1057*/ meltfptr[1056]))
+ ( /*_.VALROUT___V1066*/ meltfptr[1065]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1058*/ meltfptr[1057])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1067*/ meltfptr[1066])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1066*/ meltfptr[1065]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1058*/ meltfptr[1057]);
+ meltgc_touch ( /*_.VALCLO___V1067*/ meltfptr[1066]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_970__PUTELSE_MATCHGROUP#0",
+ melt_checkmsg ("putroutconst constnull.drout_978__PUTELSE_MATCHGROUP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1059*/ meltfptr[1058])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1059*/ meltfptr[1058])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1059*/ meltfptr[1058])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1041*/ meltfptr[1040]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1059*/ meltfptr[1058])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040]);
+ NULL != /*_.VALCLO___V1048*/ meltfptr[1047]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1048*/ meltfptr[1047]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1059*/ meltfptr[1058])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3185:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3245:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1059*/ meltfptr[1058]);
+ meltgc_touch ( /*_.VALROUT___V1068*/ meltfptr[1067]);
- /*putclosurout#54 */
- melt_assertmsg ("putclosrout#54 checkclo",
+ /*putclosurout#58 */
+ melt_assertmsg ("putclosrout#58 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1060*/ meltfptr[1059])) ==
+ ( /*_.VALCLO___V1069*/ meltfptr[1068])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#54 checkrout",
+ melt_assertmsg ("putclosrout#58 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1059*/ meltfptr[1058]))
+ ( /*_.VALROUT___V1068*/ meltfptr[1067]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1060*/ meltfptr[1059])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1059*/ meltfptr[1058]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1069*/ meltfptr[1068])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1068*/ meltfptr[1067]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1060*/ meltfptr[1059]);
+ meltgc_touch ( /*_.VALCLO___V1069*/ meltfptr[1068]);
- MELT_LOCATION ("warmelt-normatch.melt:3228:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3288:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1061*/ meltfptr[1060]))
+ ( /*_.VALROUT___V1070*/ meltfptr[1069]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V902*/ meltfptr[901]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1061*/ meltfptr[1060])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]);
+ NULL != /*_.VALDATA___V905*/ meltfptr[904]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:3228:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3288:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1070*/ meltfptr[1069]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_980__SCANSTEPDATA_TESTINS#1",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[1] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3288:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1061*/ meltfptr[1060]);
+ meltgc_touch ( /*_.VALROUT___V1070*/ meltfptr[1069]);
- /*putclosurout#55 */
- melt_assertmsg ("putclosrout#55 checkclo",
+ /*putclosurout#59 */
+ melt_assertmsg ("putclosrout#59 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1062*/ meltfptr[1061])) ==
+ ( /*_.VALCLO___V1071*/ meltfptr[1070])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#55 checkrout",
+ melt_assertmsg ("putclosrout#59 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1061*/ meltfptr[1060]))
+ ( /*_.VALROUT___V1070*/ meltfptr[1069]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1062*/ meltfptr[1061])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1061*/ meltfptr[1060]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1071*/ meltfptr[1070])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1062*/ meltfptr[1061]);
+ meltgc_touch ( /*_.VALCLO___V1071*/ meltfptr[1070]);
- MELT_LOCATION ("warmelt-normatch.melt:3239:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3300:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1072*/ meltfptr[1071]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_982__SCANSTEPDATA_TESTTUPLE#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3300:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1063*/ meltfptr[1062]))
+ ( /*_.VALROUT___V1072*/ meltfptr[1071]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V926*/ meltfptr[925]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1063*/ meltfptr[1062])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]);
+ NULL != /*_.VALDATA___V919*/ meltfptr[918]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
- MELT_LOCATION ("warmelt-normatch.melt:3239:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3300:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1063*/ meltfptr[1062]);
+ meltgc_touch ( /*_.VALROUT___V1072*/ meltfptr[1071]);
- /*putclosurout#56 */
- melt_assertmsg ("putclosrout#56 checkclo",
+ /*putclosurout#60 */
+ melt_assertmsg ("putclosrout#60 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1064*/ meltfptr[1063])) ==
+ ( /*_.VALCLO___V1073*/ meltfptr[1072])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#56 checkrout",
+ melt_assertmsg ("putclosrout#60 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1063*/ meltfptr[1062]))
+ ( /*_.VALROUT___V1072*/ meltfptr[1071]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1064*/ meltfptr[1063])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1063*/ meltfptr[1062]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1073*/ meltfptr[1072])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1064*/ meltfptr[1063]);
+ meltgc_touch ( /*_.VALCLO___V1073*/ meltfptr[1072]);
- MELT_LOCATION ("warmelt-normatch.melt:3250:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3317:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1074*/ meltfptr[1073]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_984__SCANSTEPDATA_TESTWITHFLAG#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1074*/ meltfptr[1073])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3317:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1074*/ meltfptr[1073]);
+
+ /*putclosurout#61 */
+ melt_assertmsg ("putclosrout#61 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1075*/ meltfptr[1074])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#61 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1074*/ meltfptr[1073]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1075*/ meltfptr[1074])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1074*/ meltfptr[1073]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1075*/ meltfptr[1074]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3323:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1065*/ meltfptr[1064]))
+ ( /*_.VALROUT___V1076*/ meltfptr[1075]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V780*/ meltfptr[779]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1065*/ meltfptr[1064])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ NULL != /*_.VALDATA___V929*/ meltfptr[928]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1076*/ meltfptr[1075])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:3250:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3323:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1065*/ meltfptr[1064]);
+ meltgc_touch ( /*_.VALROUT___V1076*/ meltfptr[1075]);
- /*putclosurout#57 */
- melt_assertmsg ("putclosrout#57 checkclo",
+ /*putclosurout#62 */
+ melt_assertmsg ("putclosrout#62 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1066*/ meltfptr[1065])) ==
+ ( /*_.VALCLO___V1077*/ meltfptr[1076])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#57 checkrout",
+ melt_assertmsg ("putclosrout#62 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1065*/ meltfptr[1064]))
+ ( /*_.VALROUT___V1076*/ meltfptr[1075]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1066*/ meltfptr[1065])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1065*/ meltfptr[1064]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1077*/ meltfptr[1076])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1076*/ meltfptr[1075]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1066*/ meltfptr[1065]);
+ meltgc_touch ( /*_.VALCLO___V1077*/ meltfptr[1076]);
- MELT_LOCATION ("warmelt-normatch.melt:3259:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3334:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1067*/ meltfptr[1066]))
+ ( /*_.VALROUT___V1078*/ meltfptr[1077]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V810*/ meltfptr[809]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1067*/ meltfptr[1066])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ NULL != /*_.VALDATA___V783*/ meltfptr[782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1078*/ meltfptr[1077])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:3259:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3334:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1067*/ meltfptr[1066]);
+ meltgc_touch ( /*_.VALROUT___V1078*/ meltfptr[1077]);
- /*putclosurout#58 */
- melt_assertmsg ("putclosrout#58 checkclo",
+ /*putclosurout#63 */
+ melt_assertmsg ("putclosrout#63 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1068*/ meltfptr[1067])) ==
+ ( /*_.VALCLO___V1079*/ meltfptr[1078])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#58 checkrout",
+ melt_assertmsg ("putclosrout#63 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1067*/ meltfptr[1066]))
+ ( /*_.VALROUT___V1078*/ meltfptr[1077]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1068*/ meltfptr[1067])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1067*/ meltfptr[1066]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1079*/ meltfptr[1078])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1078*/ meltfptr[1077]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1068*/ meltfptr[1067]);
+ meltgc_touch ( /*_.VALCLO___V1079*/ meltfptr[1078]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3343:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1080*/ meltfptr[1079]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V813*/ meltfptr[812]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1080*/ meltfptr[1079])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3343:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1080*/ meltfptr[1079]);
+
+ /*putclosurout#64 */
+ melt_assertmsg ("putclosrout#64 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1081*/ meltfptr[1080])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#64 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1080*/ meltfptr[1079]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1081*/ meltfptr[1080])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1080*/ meltfptr[1079]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1081*/ meltfptr[1080]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1082*/ meltfptr[1081]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_992__SCANSTEPFLAG_STEPWITHDATA#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1082*/ meltfptr[1081])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1082*/ meltfptr[1081]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1082*/ meltfptr[1081])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3361:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1082*/ meltfptr[1081]);
+
+ /*putclosurout#65 */
+ melt_assertmsg ("putclosrout#65 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1083*/ meltfptr[1082])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#65 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1082*/ meltfptr[1081]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1083*/ meltfptr[1082])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1082*/ meltfptr[1081]);
+
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1083*/ meltfptr[1082]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/ meltfptr[1068]))
+ ( /*_.VALDATA___V1084*/ meltfptr[1083]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/
- meltfptr[1068]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]))->
+ ( /*_.VALDATA___V1084*/
+ meltfptr[1083]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1070*/ meltfptr[1069]);
+ /*_.VALSTR___V1085*/ meltfptr[1084]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1069*/ meltfptr[1068]);
+ meltgc_touch ( /*_.VALDATA___V1084*/ meltfptr[1083]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/ meltfptr[1070]))
+ ( /*_.VALDATA___V1086*/ meltfptr[1085]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/
- meltfptr[1070]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))->
+ ( /*_.VALDATA___V1086*/
+ meltfptr[1085]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/ meltfptr[1070]))
+ ( /*_.VALDATA___V1086*/ meltfptr[1085]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1071*/
- meltfptr[1070]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))->
+ ( /*_.VALDATA___V1086*/
+ meltfptr[1085]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1071*/ meltfptr[1070]);
+ meltgc_touch ( /*_.VALDATA___V1086*/ meltfptr[1085]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1072*/ meltfptr[1071]))
+ ( /*_.VALDATA___V1087*/ meltfptr[1086]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1072*/
- meltfptr[1071]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071]))->
+ ( /*_.VALDATA___V1087*/
+ meltfptr[1086]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1073*/ meltfptr[1072]);
+ /*_.VALSTR___V1088*/ meltfptr[1087]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1072*/ meltfptr[1071]);
+ meltgc_touch ( /*_.VALDATA___V1087*/ meltfptr[1086]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1074*/ meltfptr[1073]))
+ ( /*_.VALDATA___V1089*/ meltfptr[1088]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1074*/
- meltfptr[1073]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]))->
+ ( /*_.VALDATA___V1089*/
+ meltfptr[1088]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1072*/ meltfptr[1071]);
+ /*_.VALDATA___V1087*/ meltfptr[1086]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1074*/ meltfptr[1073]))
+ ( /*_.VALDATA___V1089*/ meltfptr[1088]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1074*/
- meltfptr[1073]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]))->
+ ( /*_.VALDATA___V1089*/
+ meltfptr[1088]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1074*/ meltfptr[1073]);
+ meltgc_touch ( /*_.VALDATA___V1089*/ meltfptr[1088]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1075*/ meltfptr[1074]))
+ ( /*_.VALDATA___V1090*/ meltfptr[1089]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1075*/
- meltfptr[1074]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1075*/ meltfptr[1074]))->
+ ( /*_.VALDATA___V1090*/
+ meltfptr[1089]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1076*/ meltfptr[1075]);
+ /*_.VALSTR___V1091*/ meltfptr[1090]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1075*/ meltfptr[1074]);
+ meltgc_touch ( /*_.VALDATA___V1090*/ meltfptr[1089]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1077*/ meltfptr[1076]))
+ ( /*_.VALDATA___V1092*/ meltfptr[1091]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1077*/
- meltfptr[1076]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1077*/ meltfptr[1076]))->
+ ( /*_.VALDATA___V1092*/
+ meltfptr[1091]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1075*/ meltfptr[1074]);
+ /*_.VALDATA___V1090*/ meltfptr[1089]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1077*/ meltfptr[1076]))
+ ( /*_.VALDATA___V1092*/ meltfptr[1091]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1077*/
- meltfptr[1076]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1077*/ meltfptr[1076]))->
+ ( /*_.VALDATA___V1092*/
+ meltfptr[1091]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1077*/ meltfptr[1076]);
+ meltgc_touch ( /*_.VALDATA___V1092*/ meltfptr[1091]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1078*/ meltfptr[1077]))
+ ( /*_.VALDATA___V1093*/ meltfptr[1092]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1078*/
- meltfptr[1077]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077]))->
+ ( /*_.VALDATA___V1093*/
+ meltfptr[1092]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1079*/ meltfptr[1078]);
+ /*_.VALSTR___V1094*/ meltfptr[1093]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1078*/ meltfptr[1077]);
+ meltgc_touch ( /*_.VALDATA___V1093*/ meltfptr[1092]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1080*/ meltfptr[1079]))
+ ( /*_.VALDATA___V1095*/ meltfptr[1094]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1080*/
- meltfptr[1079]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]))->
+ ( /*_.VALDATA___V1095*/
+ meltfptr[1094]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1078*/ meltfptr[1077]);
+ /*_.VALDATA___V1093*/ meltfptr[1092]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1080*/ meltfptr[1079]))
+ ( /*_.VALDATA___V1095*/ meltfptr[1094]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1080*/
- meltfptr[1079]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]))->
+ ( /*_.VALDATA___V1095*/
+ meltfptr[1094]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1080*/ meltfptr[1079]);
+ meltgc_touch ( /*_.VALDATA___V1095*/ meltfptr[1094]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1081*/ meltfptr[1080]))
+ ( /*_.VALDATA___V1096*/ meltfptr[1095]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1081*/
- meltfptr[1080]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1081*/ meltfptr[1080]))->
+ ( /*_.VALDATA___V1096*/
+ meltfptr[1095]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1082*/ meltfptr[1081]);
+ /*_.VALSTR___V1097*/ meltfptr[1096]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1081*/ meltfptr[1080]);
+ meltgc_touch ( /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1083*/ meltfptr[1082]))
+ ( /*_.VALDATA___V1098*/ meltfptr[1097]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1083*/
- meltfptr[1082]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]))->
+ ( /*_.VALDATA___V1098*/
+ meltfptr[1097]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1081*/ meltfptr[1080]);
+ /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1083*/ meltfptr[1082]))
+ ( /*_.VALDATA___V1098*/ meltfptr[1097]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1083*/
- meltfptr[1082]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]))->
+ ( /*_.VALDATA___V1098*/
+ meltfptr[1097]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1083*/ meltfptr[1082]);
+ meltgc_touch ( /*_.VALDATA___V1098*/ meltfptr[1097]);
/*putupl#465 */
melt_assertmsg ("putupl #465 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
+ ( /*_.VALTUP___V1099*/ meltfptr[1098])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #465 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/
- meltfptr[1083]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]);
+ ( /*_.VALTUP___V1099*/
+ meltfptr[1098]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1099*/ meltfptr[1098]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]);
/*putupl#466 */
melt_assertmsg ("putupl #466 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
+ ( /*_.VALTUP___V1099*/ meltfptr[1098])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #466 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/
- meltfptr[1083]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]);
+ ( /*_.VALTUP___V1099*/
+ meltfptr[1098]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1099*/ meltfptr[1098]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]);
/*putupl#467 */
melt_assertmsg ("putupl #467 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
+ ( /*_.VALTUP___V1099*/ meltfptr[1098])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #467 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/
- meltfptr[1083]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1077*/ meltfptr[1076]);
+ ( /*_.VALTUP___V1099*/
+ meltfptr[1098]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1099*/ meltfptr[1098]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]);
/*putupl#468 */
melt_assertmsg ("putupl #468 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
+ ( /*_.VALTUP___V1099*/ meltfptr[1098])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #468 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/
- meltfptr[1083]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]);
+ ( /*_.VALTUP___V1099*/
+ meltfptr[1098]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1099*/ meltfptr[1098]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]);
/*putupl#469 */
melt_assertmsg ("putupl #469 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/ meltfptr[1083])) ==
+ ( /*_.VALTUP___V1099*/ meltfptr[1098])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #469 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1084*/
- meltfptr[1083]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1083*/ meltfptr[1082]);
+ ( /*_.VALTUP___V1099*/
+ meltfptr[1098]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1099*/ meltfptr[1098]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1084*/ meltfptr[1083]);
+ meltgc_touch ( /*_.VALTUP___V1099*/ meltfptr[1098]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1085*/ meltfptr[1084]))
+ ( /*_.VALDATA___V1100*/ meltfptr[1099]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1085*/
- meltfptr[1084]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]))->
+ ( /*_.VALDATA___V1100*/
+ meltfptr[1099]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1086*/ meltfptr[1085]);
+ /*_.VALSTR___V1101*/ meltfptr[1100]);
- MELT_LOCATION ("warmelt-normatch.melt:3277:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3370:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ meltgc_touch ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3377:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1087*/ meltfptr[1086]))
+ ( /*_.VALROUT___V1102*/ meltfptr[1101]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_998__TRANSLPAT_ANYRECV#0",
+ melt_checkmsg ("putroutconst constnull.drout_1012__TRANSLPAT_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1087*/ meltfptr[1086])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1102*/ meltfptr[1101])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3377:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1087*/ meltfptr[1086]);
+ meltgc_touch ( /*_.VALROUT___V1102*/ meltfptr[1101]);
- /*putclosurout#59 */
- melt_assertmsg ("putclosrout#59 checkclo",
+ /*putclosurout#66 */
+ melt_assertmsg ("putclosrout#66 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1088*/ meltfptr[1087])) ==
+ ( /*_.VALCLO___V1103*/ meltfptr[1102])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#59 checkrout",
+ melt_assertmsg ("putclosrout#66 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1087*/ meltfptr[1086]))
+ ( /*_.VALROUT___V1102*/ meltfptr[1101]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1088*/ meltfptr[1087])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1087*/ meltfptr[1086]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1103*/ meltfptr[1102])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1102*/ meltfptr[1101]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1088*/ meltfptr[1087]);
+ meltgc_touch ( /*_.VALCLO___V1103*/ meltfptr[1102]);
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1089*/ meltfptr[1088]))
+ ( /*_.VALROUT___V1104*/ meltfptr[1103]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1000__TRANSLPAT_JOKERPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1014__TRANSLPAT_JOKERPAT#0",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1089*/ meltfptr[1088])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1104*/ meltfptr[1103])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1089*/ meltfptr[1088]))
+ ( /*_.VALROUT___V1104*/ meltfptr[1103]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1000__TRANSLPAT_JOKERPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1014__TRANSLPAT_JOKERPAT#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1089*/ meltfptr[1088])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1104*/ meltfptr[1103])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3294:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3387:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1089*/ meltfptr[1088]);
+ meltgc_touch ( /*_.VALROUT___V1104*/ meltfptr[1103]);
- /*putclosurout#60 */
- melt_assertmsg ("putclosrout#60 checkclo",
+ /*putclosurout#67 */
+ melt_assertmsg ("putclosrout#67 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1090*/ meltfptr[1089])) ==
+ ( /*_.VALCLO___V1105*/ meltfptr[1104])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#60 checkrout",
+ melt_assertmsg ("putclosrout#67 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1089*/ meltfptr[1088]))
+ ( /*_.VALROUT___V1104*/ meltfptr[1103]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1090*/ meltfptr[1089])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1089*/ meltfptr[1088]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1105*/ meltfptr[1104])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1104*/ meltfptr[1103]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1090*/ meltfptr[1089]);
+ meltgc_touch ( /*_.VALCLO___V1105*/ meltfptr[1104]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#5",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#5",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#6",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#6",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#7",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#7",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[7] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#9",
- NULL != ( /*_.VALSTR___V1092*/ meltfptr[1091]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[9] =
- (melt_ptr_t) ( /*_.VALSTR___V1092*/ meltfptr[1091]);
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#9",
+ NULL != ( /*_.VALSTR___V1107*/ meltfptr[1106]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALSTR___V1107*/ meltfptr[1106]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1002__TRANSLPAT_CONSTPAT#10",
+ melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_CONSTPAT#10",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V870*/ meltfptr[869]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1091*/ meltfptr[1090])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V870*/ meltfptr[869]);
+ NULL != /*_.VALDATA___V873*/ meltfptr[872]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1106*/ meltfptr[1105])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]);
- MELT_LOCATION ("warmelt-normatch.melt:3302:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1091*/ meltfptr[1090]);
+ meltgc_touch ( /*_.VALROUT___V1106*/ meltfptr[1105]);
- /*putclosurout#61 */
- melt_assertmsg ("putclosrout#61 checkclo",
+ /*putclosurout#68 */
+ melt_assertmsg ("putclosrout#68 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1093*/ meltfptr[1092])) ==
+ ( /*_.VALCLO___V1108*/ meltfptr[1107])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#61 checkrout",
+ melt_assertmsg ("putclosrout#68 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1091*/ meltfptr[1090]))
+ ( /*_.VALROUT___V1106*/ meltfptr[1105]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1093*/ meltfptr[1092])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1091*/ meltfptr[1090]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1108*/ meltfptr[1107])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1106*/ meltfptr[1105]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1093*/ meltfptr[1092]);
+ meltgc_touch ( /*_.VALCLO___V1108*/ meltfptr[1107]);
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1094*/ meltfptr[1093]))
+ ( /*_.VALROUT___V1109*/ meltfptr[1108]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1005__TRANSLPAT_LISTPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1019__TRANSLPAT_LISTPAT#0",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_LIST__V75*/ meltfptr[74]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1094*/ meltfptr[1093])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_LIST__V75*/ meltfptr[74]);
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1094*/ meltfptr[1093]))
+ ( /*_.VALROUT___V1109*/ meltfptr[1108]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1005__TRANSLPAT_LISTPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1019__TRANSLPAT_LISTPAT#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1094*/ meltfptr[1093])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3448:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1094*/ meltfptr[1093]);
+ meltgc_touch ( /*_.VALROUT___V1109*/ meltfptr[1108]);
- /*putclosurout#62 */
- melt_assertmsg ("putclosrout#62 checkclo",
+ /*putclosurout#69 */
+ melt_assertmsg ("putclosrout#69 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1095*/ meltfptr[1094])) ==
+ ( /*_.VALCLO___V1110*/ meltfptr[1109])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#62 checkrout",
+ melt_assertmsg ("putclosrout#69 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1094*/ meltfptr[1093]))
+ ( /*_.VALROUT___V1109*/ meltfptr[1108]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1095*/ meltfptr[1094])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1094*/ meltfptr[1093]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1110*/ meltfptr[1109])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1109*/ meltfptr[1108]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1095*/ meltfptr[1094]);
+ meltgc_touch ( /*_.VALCLO___V1110*/ meltfptr[1109]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1096*/ meltfptr[1095]))
+ ( /*_.VALDATA___V1111*/ meltfptr[1110]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1096*/
- meltfptr[1095]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]))->
+ ( /*_.VALDATA___V1111*/
+ meltfptr[1110]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1111*/ meltfptr[1110]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1097*/ meltfptr[1096]);
+ /*_.VALSTR___V1112*/ meltfptr[1111]);
- /*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_17 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_18 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*touch:VALUEDATA_*/
+ meltgc_touch ( /*_.VALDATA___V1111*/ meltfptr[1110]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/ meltfptr[48]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/ meltfptr[48]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#4",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#4",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#5",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#5",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#6",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#6",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#8",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#8",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#9",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#9",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[9] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#10",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#10",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#12",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#12",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1099*/ meltfptr[1098]))
+ ( /*_.VALROUT___V1114*/ meltfptr[1113]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V472*/ meltfptr[471]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1099*/ meltfptr[1098])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]);
+ NULL != /*_.VALDATA___V473*/ meltfptr[472]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1099*/ meltfptr[1098]))
+ ( /*_.VALROUT___V1114*/ meltfptr[1113]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1011__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1025__LAMBDA_#1",
NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1099*/ meltfptr[1098])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1099*/ meltfptr[1098]))
+ ( /*_.VALROUT___V1114*/ meltfptr[1113]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1011__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V1100*/ meltfptr[1099]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1099*/ meltfptr[1098])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V1100*/ meltfptr[1099]);
+ melt_checkmsg ("putroutconst constnull.drout_1025__LAMBDA_#2",
+ NULL != ( /*_.VALBXINT___V1115*/ meltfptr[1114]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1115*/ meltfptr[1114]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1099*/ meltfptr[1098]))
+ ( /*_.VALROUT___V1114*/ meltfptr[1113]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1011__LAMBDA_#3",
- NULL != ( /*_.VALBXINT___V1101*/ meltfptr[1100]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1099*/ meltfptr[1098])->tabval[3] =
- (melt_ptr_t) ( /*_.VALBXINT___V1101*/ meltfptr[1100]);
+ melt_checkmsg ("putroutconst constnull.drout_1025__LAMBDA_#3",
+ NULL != ( /*_.VALBXINT___V1116*/ meltfptr[1115]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1116*/ meltfptr[1115]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1099*/ meltfptr[1098]))
+ ( /*_.VALROUT___V1114*/ meltfptr[1113]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1011__LAMBDA_#4",
- NULL != ( /*_.VALBXINT___V1102*/ meltfptr[1101]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1099*/ meltfptr[1098])->tabval[4] =
- (melt_ptr_t) ( /*_.VALBXINT___V1102*/ meltfptr[1101]);
+ melt_checkmsg ("putroutconst constnull.drout_1025__LAMBDA_#4",
+ NULL != ( /*_.VALBXINT___V1117*/ meltfptr[1116]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1117*/ meltfptr[1116]);
- MELT_LOCATION ("warmelt-normatch.melt:3395:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1099*/ meltfptr[1098]);
+ meltgc_touch ( /*_.VALROUT___V1114*/ meltfptr[1113]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#13",
- NULL != ( /*_.VALROUT___V1099*/ meltfptr[1098]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[13] =
- (melt_ptr_t) ( /*_.VALROUT___V1099*/ meltfptr[1098]);
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#13",
+ NULL != ( /*_.VALROUT___V1114*/ meltfptr[1113]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALROUT___V1114*/ meltfptr[1113]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V916*/ meltfptr[915]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]);
+ NULL != /*_.VALDATA___V919*/ meltfptr[918]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#17",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#17",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[17] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1103*/ meltfptr[1102]))
+ ( /*_.VALDATA___V1118*/ meltfptr[1117]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1103*/
- meltfptr[1102]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1103*/ meltfptr[1102]))->
+ ( /*_.VALDATA___V1118*/
+ meltfptr[1117]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1118*/ meltfptr[1117]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1104*/ meltfptr[1103]);
+ /*_.VALSTR___V1119*/ meltfptr[1118]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1103*/ meltfptr[1102]);
+ meltgc_touch ( /*_.VALDATA___V1118*/ meltfptr[1117]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#18",
- NULL != ( /*_.VALDATA___V1103*/ meltfptr[1102]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V1103*/ meltfptr[1102]);
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#18",
+ NULL != ( /*_.VALDATA___V1118*/ meltfptr[1117]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V1118*/ meltfptr[1117]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#19",
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#19",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[19] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[20] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[22] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1009__TRANSLPAT_TUPLEPAT#23",
- NULL != ( /*_.VALSTR___V1105*/ meltfptr[1104]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[23] =
- (melt_ptr_t) ( /*_.VALSTR___V1105*/ meltfptr[1104]);
+ melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_TUPLEPAT#23",
+ NULL != ( /*_.VALSTR___V1120*/ meltfptr[1119]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALSTR___V1120*/ meltfptr[1119]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V820*/ meltfptr[819]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]);
+ NULL != /*_.VALDATA___V823*/ meltfptr[822]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[25] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[26] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_17 */
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[26] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_18 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1098*/ meltfptr[1097])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1113*/ meltfptr[1112])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:3366:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3459:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1098*/ meltfptr[1097]);
+ meltgc_touch ( /*_.VALROUT___V1113*/ meltfptr[1112]);
- /*putclosurout#63 */
- melt_assertmsg ("putclosrout#63 checkclo",
+ /*putclosurout#70 */
+ melt_assertmsg ("putclosrout#70 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1106*/ meltfptr[1105])) ==
+ ( /*_.VALCLO___V1121*/ meltfptr[1120])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#63 checkrout",
+ melt_assertmsg ("putclosrout#70 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1098*/ meltfptr[1097]))
+ ( /*_.VALROUT___V1113*/ meltfptr[1112]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1106*/ meltfptr[1105])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1098*/ meltfptr[1097]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1121*/ meltfptr[1120])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1113*/ meltfptr[1112]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1106*/ meltfptr[1105]);
+ meltgc_touch ( /*_.VALCLO___V1121*/ meltfptr[1120]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/ meltfptr[42]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/ meltfptr[42]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#4",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#4",
NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#6",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#6",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#7",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#7",
NULL !=
( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#8",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#8",
NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V902*/ meltfptr[901]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]);
+ NULL != /*_.VALDATA___V905*/ meltfptr[904]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#11",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#11",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#13",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#13",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#14",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#14",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[14] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/
meltfptr[14]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#15",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#15",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[15] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#16",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#16",
NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[16] =
(melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V820*/ meltfptr[819]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]);
+ NULL != /*_.VALDATA___V823*/ meltfptr[822]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_INSPAT#20",
+ melt_checkmsg ("putroutconst constnull.drout_1032__TRANSLPAT_INSPAT#20",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[20] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1107*/ meltfptr[1106])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1122*/ meltfptr[1121])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:3532:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3627:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1107*/ meltfptr[1106]);
+ meltgc_touch ( /*_.VALROUT___V1122*/ meltfptr[1121]);
- /*putclosurout#64 */
- melt_assertmsg ("putclosrout#64 checkclo",
+ /*putclosurout#71 */
+ melt_assertmsg ("putclosrout#71 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1108*/ meltfptr[1107])) ==
+ ( /*_.VALCLO___V1123*/ meltfptr[1122])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#64 checkrout",
+ melt_assertmsg ("putclosrout#71 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1107*/ meltfptr[1106]))
+ ( /*_.VALROUT___V1122*/ meltfptr[1121]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1108*/ meltfptr[1107])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1107*/ meltfptr[1106]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1123*/ meltfptr[1122])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1122*/ meltfptr[1121]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1108*/ meltfptr[1107]);
+ meltgc_touch ( /*_.VALCLO___V1123*/ meltfptr[1122]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_VARPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1034__TRANSLPAT_VARPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_VARPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1034__TRANSLPAT_VARPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_VARPAT#6",
+ melt_checkmsg ("putroutconst constnull.drout_1034__TRANSLPAT_VARPAT#6",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V860*/ meltfptr[859]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]);
+ NULL != /*_.VALDATA___V863*/ meltfptr[862]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1109*/ meltfptr[1108])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1124*/ meltfptr[1123])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3689:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3785:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1109*/ meltfptr[1108]);
+ meltgc_touch ( /*_.VALROUT___V1124*/ meltfptr[1123]);
- /*putclosurout#65 */
- melt_assertmsg ("putclosrout#65 checkclo",
+ /*putclosurout#72 */
+ melt_assertmsg ("putclosrout#72 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1110*/ meltfptr[1109])) ==
+ ( /*_.VALCLO___V1125*/ meltfptr[1124])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#65 checkrout",
+ melt_assertmsg ("putclosrout#72 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1109*/ meltfptr[1108]))
+ ( /*_.VALROUT___V1124*/ meltfptr[1123]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1110*/ meltfptr[1109])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1109*/ meltfptr[1108]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1125*/ meltfptr[1124])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1124*/ meltfptr[1123]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1110*/ meltfptr[1109]);
+ meltgc_touch ( /*_.VALCLO___V1125*/ meltfptr[1124]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#4",
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#4",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#7",
- NULL != ( /*_.VALSTR___V1112*/ meltfptr[1111]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[7] =
- (melt_ptr_t) ( /*_.VALSTR___V1112*/ meltfptr[1111]);
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#7",
+ NULL != ( /*_.VALSTR___V1127*/ meltfptr[1126]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALSTR___V1127*/ meltfptr[1126]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V820*/ meltfptr[819]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]);
+ NULL != /*_.VALDATA___V823*/ meltfptr[822]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#12",
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#12",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[12] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1022__TRANSLPAT_ANDPAT#13",
+ melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_ANDPAT#13",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[13] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V810*/ meltfptr[809]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1111*/ meltfptr[1110])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ NULL != /*_.VALDATA___V813*/ meltfptr[812]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1126*/ meltfptr[1125])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
- MELT_LOCATION ("warmelt-normatch.melt:3781:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3877:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1111*/ meltfptr[1110]);
+ meltgc_touch ( /*_.VALROUT___V1126*/ meltfptr[1125]);
- /*putclosurout#66 */
- melt_assertmsg ("putclosrout#66 checkclo",
+ /*putclosurout#73 */
+ melt_assertmsg ("putclosrout#73 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1113*/ meltfptr[1112])) ==
+ ( /*_.VALCLO___V1128*/ meltfptr[1127])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#66 checkrout",
+ melt_assertmsg ("putclosrout#73 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1111*/ meltfptr[1110]))
+ ( /*_.VALROUT___V1126*/ meltfptr[1125]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1113*/ meltfptr[1112])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1111*/ meltfptr[1110]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1128*/ meltfptr[1127])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1126*/ meltfptr[1125]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1113*/ meltfptr[1112]);
+ meltgc_touch ( /*_.VALCLO___V1128*/ meltfptr[1127]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#7",
- NULL != ( /*_.VALSTR___V1115*/ meltfptr[1114]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[7] =
- (melt_ptr_t) ( /*_.VALSTR___V1115*/ meltfptr[1114]);
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#7",
+ NULL != ( /*_.VALSTR___V1130*/ meltfptr[1129]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALSTR___V1130*/ meltfptr[1129]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V826*/ meltfptr[825]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]);
+ NULL != /*_.VALDATA___V829*/ meltfptr[828]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#9",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#9",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#10",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#10",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#11",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#11",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[11] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#12",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#12",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1116*/ meltfptr[1115]))
+ ( /*_.VALROUT___V1131*/ meltfptr[1130]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1028__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1042__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1116*/ meltfptr[1115])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1116*/ meltfptr[1115]))
+ ( /*_.VALROUT___V1131*/ meltfptr[1130]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1028__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1042__LAMBDA_#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1116*/ meltfptr[1115])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]);
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1116*/ meltfptr[1115]))
+ ( /*_.VALROUT___V1131*/ meltfptr[1130]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1116*/ meltfptr[1115])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3904:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4000:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1116*/ meltfptr[1115]);
+ meltgc_touch ( /*_.VALROUT___V1131*/ meltfptr[1130]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#14",
- NULL != ( /*_.VALROUT___V1116*/ meltfptr[1115]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[14] =
- (melt_ptr_t) ( /*_.VALROUT___V1116*/ meltfptr[1115]);
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#14",
+ NULL != ( /*_.VALROUT___V1131*/ meltfptr[1130]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALROUT___V1131*/ meltfptr[1130]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V770*/ meltfptr[769]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]);
+ NULL != /*_.VALDATA___V773*/ meltfptr[772]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[18] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#19",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#19",
NULL !=
( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/
meltfptr[52]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[19] =
(melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V53*/ meltfptr[52]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#20",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#20",
NULL != ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[20] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#21",
- NULL != ( /*_.VALROUT___V1117*/ meltfptr[1116]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[21] =
- (melt_ptr_t) ( /*_.VALROUT___V1117*/ meltfptr[1116]);
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#21",
+ NULL != ( /*_.VALROUT___V1132*/ meltfptr[1131]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#22",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#22",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_18 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_19 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#23",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#23",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[23] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[23] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1025__TRANSLPAT_ORPAT#24",
+ melt_checkmsg ("putroutconst constnull.drout_1039__TRANSLPAT_ORPAT#24",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[24] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V810*/ meltfptr[809]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1114*/ meltfptr[1113])->tabval[25] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ NULL != /*_.VALDATA___V813*/ meltfptr[812]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1129*/ meltfptr[1128])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
- MELT_LOCATION ("warmelt-normatch.melt:3865:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3961:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1114*/ meltfptr[1113]);
+ meltgc_touch ( /*_.VALROUT___V1129*/ meltfptr[1128]);
- /*putclosurout#67 */
- melt_assertmsg ("putclosrout#67 checkclo",
+ /*putclosurout#74 */
+ melt_assertmsg ("putclosrout#74 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1118*/ meltfptr[1117])) ==
+ ( /*_.VALCLO___V1133*/ meltfptr[1132])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#67 checkrout",
+ melt_assertmsg ("putclosrout#74 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1114*/ meltfptr[1113]))
+ ( /*_.VALROUT___V1129*/ meltfptr[1128]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1118*/ meltfptr[1117])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1114*/ meltfptr[1113]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1133*/ meltfptr[1132])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1129*/ meltfptr[1128]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1118*/ meltfptr[1117]);
+ meltgc_touch ( /*_.VALCLO___V1133*/ meltfptr[1132]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#0",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#1",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#1",
NULL !=
( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#5",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#5",
NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V981*/ meltfptr[980]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V981*/ meltfptr[980]);
+ NULL != /*_.VALCLO___V984*/ meltfptr[983]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V984*/ meltfptr[983]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#7",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#7",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#8",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#8",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#9",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#9",
NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[9] =
(melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#10",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#10",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[10] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#11",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#11",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#12",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#12",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#13",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#13",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[15] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V926*/ meltfptr[925]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]);
+ NULL != /*_.VALDATA___V929*/ meltfptr[928]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[17] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#18",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#18",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[18] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1053*/ meltfptr[1052]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V1053*/ meltfptr[1052]);
+ NULL != /*_.VALDATA___V1060*/ meltfptr[1059]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#20",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#20",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[20] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#21",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#21",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[21] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[25] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V820*/ meltfptr[819]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[26] =
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]);
+ NULL != /*_.VALDATA___V823*/ meltfptr[822]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[26] =
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1030__TRANSLPAT_PATMAT#27",
+ melt_checkmsg ("putroutconst constnull.drout_1044__TRANSLPAT_PATMAT#27",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[27] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[27] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[28] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1134*/ meltfptr[1133])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:3989:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4085:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1119*/ meltfptr[1118]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_18 */
+ meltgc_touch ( /*_.VALROUT___V1134*/ meltfptr[1133]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_19 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putclosurout#68*/
- melt_assertmsg ("putclosrout#68 checkclo",
+ /*putclosurout#75 */
+ melt_assertmsg ("putclosrout#75 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1120*/ meltfptr[1119])) ==
+ ( /*_.VALCLO___V1135*/ meltfptr[1134])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#68 checkrout",
+ melt_assertmsg ("putclosrout#75 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1119*/ meltfptr[1118]))
+ ( /*_.VALROUT___V1134*/ meltfptr[1133]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1120*/ meltfptr[1119])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1135*/ meltfptr[1134])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1134*/ meltfptr[1133]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1120*/ meltfptr[1119]);
+ meltgc_touch ( /*_.VALCLO___V1135*/ meltfptr[1134]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1121*/ meltfptr[1120]))
+ ( /*_.VALDATA___V1136*/ meltfptr[1135]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1121*/
- meltfptr[1120]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1121*/ meltfptr[1120]))->
+ ( /*_.VALDATA___V1136*/
+ meltfptr[1135]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1122*/ meltfptr[1121]);
+ /*_.VALSTR___V1137*/ meltfptr[1136]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1121*/ meltfptr[1120]);
+ meltgc_touch ( /*_.VALDATA___V1136*/ meltfptr[1135]);
- MELT_LOCATION ("warmelt-normatch.melt:4211:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4307:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1123*/ meltfptr[1122]))
+ ( /*_.VALDATA___V1138*/ meltfptr[1137]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1123*/
- meltfptr[1122]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1123*/ meltfptr[1122]))->
+ ( /*_.VALDATA___V1138*/
+ meltfptr[1137]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1124*/ meltfptr[1123]);
+ /*_.VALSTR___V1139*/ meltfptr[1138]);
- MELT_LOCATION ("warmelt-normatch.melt:4211:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4307:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1123*/ meltfptr[1122]);
+ meltgc_touch ( /*_.VALDATA___V1138*/ meltfptr[1137]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_1050__MGALTSTEP_ANY#0",
+ NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[0] =
+ (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_1050__MGALTSTEP_ANY#1",
+ NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:4311:/ initchunk");
+ /*^touch */
+ /*touch:IROUTVAL_ */
+ meltgc_touch ( /*_.VALROUT___V1140*/ meltfptr[1139]);
+
+ /*putclosurout#76 */
+ melt_assertmsg ("putclosrout#76 checkclo",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALCLO___V1141*/ meltfptr[1140])) ==
+ MELTOBMAG_CLOSURE);
+ melt_assertmsg ("putclosrout#76 checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1140*/ meltfptr[1139]))
+ == MELTOBMAG_ROUTINE);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1141*/ meltfptr[1140])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ /*touch:DATACLOSURE_ */
+ meltgc_touch ( /*_.VALCLO___V1141*/ meltfptr[1140]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1036__MGALTSTEP_STEPTESTVAR#0",
+ ("putroutconst constnull.drout_1052__MGALTSTEP_STEPTESTVAR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V860*/ meltfptr[859]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]);
+ NULL != /*_.VALDATA___V863*/ meltfptr[862]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1036__MGALTSTEP_STEPTESTVAR#3",
+ ("putroutconst constnull.drout_1052__MGALTSTEP_STEPTESTVAR#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1036__MGALTSTEP_STEPTESTVAR#5",
+ ("putroutconst constnull.drout_1052__MGALTSTEP_STEPTESTVAR#5",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1125*/ meltfptr[1124])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1142*/ meltfptr[1141])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:4218:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4322:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1125*/ meltfptr[1124]);
+ meltgc_touch ( /*_.VALROUT___V1142*/ meltfptr[1141]);
- /*putclosurout#69 */
- melt_assertmsg ("putclosrout#69 checkclo",
+ /*putclosurout#77 */
+ melt_assertmsg ("putclosrout#77 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1126*/ meltfptr[1125])) ==
+ ( /*_.VALCLO___V1143*/ meltfptr[1142])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#69 checkrout",
+ melt_assertmsg ("putclosrout#77 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1125*/ meltfptr[1124]))
+ ( /*_.VALROUT___V1142*/ meltfptr[1141]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1126*/ meltfptr[1125])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1125*/ meltfptr[1124]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1143*/ meltfptr[1142])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1142*/ meltfptr[1141]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1126*/ meltfptr[1125]);
+ meltgc_touch ( /*_.VALCLO___V1143*/ meltfptr[1142]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1038__MGALTSTEP_STEPTESTINST#0",
+ ("putroutconst constnull.drout_1054__MGALTSTEP_STEPTESTINST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V902*/ meltfptr[901]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]);
+ NULL != /*_.VALDATA___V905*/ meltfptr[904]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1038__MGALTSTEP_STEPTESTINST#3",
+ ("putroutconst constnull.drout_1054__MGALTSTEP_STEPTESTINST#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1038__MGALTSTEP_STEPTESTINST#5",
+ ("putroutconst constnull.drout_1054__MGALTSTEP_STEPTESTINST#5",
NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1038__MGALTSTEP_STEPTESTINST#6",
+ ("putroutconst constnull.drout_1054__MGALTSTEP_STEPTESTINST#6",
NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1038__MGALTSTEP_STEPTESTINST#7",
+ ("putroutconst constnull.drout_1054__MGALTSTEP_STEPTESTINST#7",
NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1127*/ meltfptr[1126])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1144*/ meltfptr[1143])->tabval[7] =
(melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
- MELT_LOCATION ("warmelt-normatch.melt:4284:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4388:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1127*/ meltfptr[1126]);
+ meltgc_touch ( /*_.VALROUT___V1144*/ meltfptr[1143]);
- /*putclosurout#70 */
- melt_assertmsg ("putclosrout#70 checkclo",
+ /*putclosurout#78 */
+ melt_assertmsg ("putclosrout#78 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1128*/ meltfptr[1127])) ==
+ ( /*_.VALCLO___V1145*/ meltfptr[1144])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#70 checkrout",
+ melt_assertmsg ("putclosrout#78 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1127*/ meltfptr[1126]))
+ ( /*_.VALROUT___V1144*/ meltfptr[1143]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1128*/ meltfptr[1127])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1127*/ meltfptr[1126]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1145*/ meltfptr[1144])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1144*/ meltfptr[1143]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1128*/ meltfptr[1127]);
+ meltgc_touch ( /*_.VALCLO___V1145*/ meltfptr[1144]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1129*/ meltfptr[1128]))
+ ( /*_.VALDATA___V1146*/ meltfptr[1145]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1129*/
- meltfptr[1128]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1129*/ meltfptr[1128]))->
+ ( /*_.VALDATA___V1146*/
+ meltfptr[1145]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1130*/ meltfptr[1129]);
+ /*_.VALSTR___V1147*/ meltfptr[1146]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1129*/ meltfptr[1128]);
+ meltgc_touch ( /*_.VALDATA___V1146*/ meltfptr[1145]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1042__MGALTSTEP_STEPTESTMULT#0",
+ ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTMULT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V916*/ meltfptr[915]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]);
+ NULL != /*_.VALDATA___V919*/ meltfptr[918]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1042__MGALTSTEP_STEPTESTMULT#3",
+ ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTMULT#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1042__MGALTSTEP_STEPTESTMULT#4",
+ ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTMULT#4",
NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[4] =
(melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1131*/ meltfptr[1130])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4459:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1131*/ meltfptr[1130]);
+ meltgc_touch ( /*_.VALROUT___V1148*/ meltfptr[1147]);
- /*putclosurout#71 */
- melt_assertmsg ("putclosrout#71 checkclo",
+ /*putclosurout#79 */
+ melt_assertmsg ("putclosrout#79 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1132*/ meltfptr[1131])) ==
+ ( /*_.VALCLO___V1149*/ meltfptr[1148])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#71 checkrout",
+ melt_assertmsg ("putclosrout#79 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1131*/ meltfptr[1130]))
+ ( /*_.VALROUT___V1148*/ meltfptr[1147]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1132*/ meltfptr[1131])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1131*/ meltfptr[1130]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1149*/ meltfptr[1148])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1132*/ meltfptr[1131]);
+ meltgc_touch ( /*_.VALCLO___V1149*/ meltfptr[1148]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1044__MGALTSTEP_STEPTESTGROUP#0",
+ ("putroutconst constnull.drout_1060__MGALTSTEP_STEPTESTGROUP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1044__MGALTSTEP_STEPTESTGROUP#3",
+ ("putroutconst constnull.drout_1060__MGALTSTEP_STEPTESTGROUP#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1044__MGALTSTEP_STEPTESTGROUP#4",
+ ("putroutconst constnull.drout_1060__MGALTSTEP_STEPTESTGROUP#4",
NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1133*/ meltfptr[1132])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[4] =
(melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
- MELT_LOCATION ("warmelt-normatch.melt:4420:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4529:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1133*/ meltfptr[1132]);
+ meltgc_touch ( /*_.VALROUT___V1150*/ meltfptr[1149]);
- /*putclosurout#72 */
- melt_assertmsg ("putclosrout#72 checkclo",
+ /*putclosurout#80 */
+ melt_assertmsg ("putclosrout#80 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1134*/ meltfptr[1133])) ==
+ ( /*_.VALCLO___V1151*/ meltfptr[1150])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#72 checkrout",
+ melt_assertmsg ("putclosrout#80 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1133*/ meltfptr[1132]))
+ ( /*_.VALROUT___V1150*/ meltfptr[1149]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1134*/ meltfptr[1133])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1133*/ meltfptr[1132]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1151*/ meltfptr[1150])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1134*/ meltfptr[1133]);
+ meltgc_touch ( /*_.VALCLO___V1151*/ meltfptr[1150]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1046__MGALTSTEP_STEPTESTMATCHER#0",
+ ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V926*/ meltfptr[925]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]);
+ NULL != /*_.VALDATA___V929*/ meltfptr[928]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1046__MGALTSTEP_STEPTESTMATCHER#3",
+ ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMATCHER#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1046__MGALTSTEP_STEPTESTMATCHER#5",
+ ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMATCHER#5",
NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1046__MGALTSTEP_STEPTESTMATCHER#6",
+ ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMATCHER#6",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1046__MGALTSTEP_STEPTESTMATCHER#7",
+ ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMATCHER#7",
NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-normatch.melt:4464:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4573:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1135*/ meltfptr[1134]);
+ meltgc_touch ( /*_.VALROUT___V1152*/ meltfptr[1151]);
- /*putclosurout#73 */
- melt_assertmsg ("putclosrout#73 checkclo",
+ /*putclosurout#81 */
+ melt_assertmsg ("putclosrout#81 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1136*/ meltfptr[1135])) ==
+ ( /*_.VALCLO___V1153*/ meltfptr[1152])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#73 checkrout",
+ melt_assertmsg ("putclosrout#81 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1135*/ meltfptr[1134]))
+ ( /*_.VALROUT___V1152*/ meltfptr[1151]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1136*/ meltfptr[1135])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1153*/ meltfptr[1152])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1136*/ meltfptr[1135]);
+ meltgc_touch ( /*_.VALCLO___V1153*/ meltfptr[1152]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1048__MGALTSTEP_STEPSUCCESS#0",
+ ("putroutconst constnull.drout_1064__MGALTSTEP_STEPSUCCESS#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V832*/ meltfptr[831]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]);
+ NULL != /*_.VALDATA___V835*/ meltfptr[834]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1048__MGALTSTEP_STEPSUCCESS#4",
+ ("putroutconst constnull.drout_1064__MGALTSTEP_STEPSUCCESS#4",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1048__MGALTSTEP_STEPSUCCESS#5",
+ ("putroutconst constnull.drout_1064__MGALTSTEP_STEPSUCCESS#5",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V780*/ meltfptr[779]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ NULL != /*_.VALDATA___V783*/ meltfptr[782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:4541:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4650:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1137*/ meltfptr[1136]);
+ meltgc_touch ( /*_.VALROUT___V1154*/ meltfptr[1153]);
- /*putclosurout#74 */
- melt_assertmsg ("putclosrout#74 checkclo",
+ /*putclosurout#82 */
+ melt_assertmsg ("putclosrout#82 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1138*/ meltfptr[1137])) ==
+ ( /*_.VALCLO___V1155*/ meltfptr[1154])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#74 checkrout",
+ melt_assertmsg ("putclosrout#82 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1137*/ meltfptr[1136]))
+ ( /*_.VALROUT___V1154*/ meltfptr[1153]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1138*/ meltfptr[1137])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1137*/ meltfptr[1136]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1155*/ meltfptr[1154])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1138*/ meltfptr[1137]);
+ meltgc_touch ( /*_.VALCLO___V1155*/ meltfptr[1154]);
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1139*/ meltfptr[1138]))
+ ( /*_.VALROUT___V1156*/ meltfptr[1155]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1050__MGALTSTEP_STEPCLEAR#0",
+ melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPCLEAR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1139*/ meltfptr[1138]))
+ ( /*_.VALROUT___V1156*/ meltfptr[1155]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V770*/ meltfptr[769]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]);
+ NULL != /*_.VALDATA___V773*/ meltfptr[772]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]);
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1139*/ meltfptr[1138]))
+ ( /*_.VALROUT___V1156*/ meltfptr[1155]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1139*/ meltfptr[1138]))
+ ( /*_.VALROUT___V1156*/ meltfptr[1155]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1050__MGALTSTEP_STEPCLEAR#3",
+ melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPCLEAR#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1139*/ meltfptr[1138])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4610:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1139*/ meltfptr[1138]);
+ meltgc_touch ( /*_.VALROUT___V1156*/ meltfptr[1155]);
- /*putclosurout#75 */
- melt_assertmsg ("putclosrout#75 checkclo",
+ /*putclosurout#83 */
+ melt_assertmsg ("putclosrout#83 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1140*/ meltfptr[1139])) ==
+ ( /*_.VALCLO___V1157*/ meltfptr[1156])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#75 checkrout",
+ melt_assertmsg ("putclosrout#83 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1139*/ meltfptr[1138]))
+ ( /*_.VALROUT___V1156*/ meltfptr[1155]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1140*/ meltfptr[1139])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1139*/ meltfptr[1138]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1157*/ meltfptr[1156])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1140*/ meltfptr[1139]);
+ meltgc_touch ( /*_.VALCLO___V1157*/ meltfptr[1156]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1052__MGALTSTEP_STEPFLAGSET#0",
+ ("putroutconst constnull.drout_1068__MGALTSTEP_STEPFLAGSET#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1052__MGALTSTEP_STEPFLAGSET#3",
+ ("putroutconst constnull.drout_1068__MGALTSTEP_STEPFLAGSET#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1052__MGALTSTEP_STEPFLAGSET#5",
+ ("putroutconst constnull.drout_1068__MGALTSTEP_STEPFLAGSET#5",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1141*/ meltfptr[1140])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:4667:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4776:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1141*/ meltfptr[1140]);
+ meltgc_touch ( /*_.VALROUT___V1158*/ meltfptr[1157]);
- /*putclosurout#76 */
- melt_assertmsg ("putclosrout#76 checkclo",
+ /*putclosurout#84 */
+ melt_assertmsg ("putclosrout#84 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1142*/ meltfptr[1141])) ==
+ ( /*_.VALCLO___V1159*/ meltfptr[1158])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#76 checkrout",
+ melt_assertmsg ("putclosrout#84 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1141*/ meltfptr[1140]))
+ ( /*_.VALROUT___V1158*/ meltfptr[1157]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1142*/ meltfptr[1141])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1141*/ meltfptr[1140]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1159*/ meltfptr[1158])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1142*/ meltfptr[1141]);
+ meltgc_touch ( /*_.VALCLO___V1159*/ meltfptr[1158]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1054__MGALTSTEP_STEPFLAGOPER#0",
+ ("putroutconst constnull.drout_1070__MGALTSTEP_STEPFLAGOPER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V810*/ meltfptr[809]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]);
+ NULL != /*_.VALDATA___V813*/ meltfptr[812]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1054__MGALTSTEP_STEPFLAGOPER#3",
+ ("putroutconst constnull.drout_1070__MGALTSTEP_STEPFLAGOPER#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_19 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1054__MGALTSTEP_STEPFLAGOPER#5",
+ ("putroutconst constnull.drout_1070__MGALTSTEP_STEPFLAGOPER#5",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V780*/ meltfptr[779]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1143*/ meltfptr[1142])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ NULL != /*_.VALDATA___V783*/ meltfptr[782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:4719:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4828:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1143*/ meltfptr[1142]);
+ meltgc_touch ( /*_.VALROUT___V1160*/ meltfptr[1159]);
- /*putclosurout#77 */
- melt_assertmsg ("putclosrout#77 checkclo",
+ /*putclosurout#85 */
+ melt_assertmsg ("putclosrout#85 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1144*/ meltfptr[1143])) ==
+ ( /*_.VALCLO___V1161*/ meltfptr[1160])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#77 checkrout",
+ melt_assertmsg ("putclosrout#85 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1143*/ meltfptr[1142]))
+ ( /*_.VALROUT___V1160*/ meltfptr[1159]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1144*/ meltfptr[1143])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1143*/ meltfptr[1142]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1161*/ meltfptr[1160])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1144*/ meltfptr[1143]);
+ meltgc_touch ( /*_.VALCLO___V1161*/ meltfptr[1160]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#0",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#3",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#3",
NULL !=
( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#4",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#4",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#5",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#5",
NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[5] =
(melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#6",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#6",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#7",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#7",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1085*/ meltfptr[1084]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]);
+ NULL != /*_.VALDATA___V1100*/ meltfptr[1099]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#9",
+ melt_checkmsg ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#9",
NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V714*/ meltfptr[713]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]);
+ NULL != /*_.VALDATA___V717*/ meltfptr[716]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#12",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#12",
NULL != ( /*_.DISCR_INTEGER__V77*/ meltfptr[76]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V77*/ meltfptr[76]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#13",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#13",
NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[13] =
(melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#14",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#14",
NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[14] =
(melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#15",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#15",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[15] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V832*/ meltfptr[831]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]);
+ NULL != /*_.VALDATA___V835*/ meltfptr[834]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#17",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#17",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#18",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#18",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[18] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#19",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#19",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[19] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#20",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#20",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[20] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#21",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#21",
NULL != ( /*_.COMPARE_NAMED_ALPHA__V78*/ meltfptr[77]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[21] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[21] =
(melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V78*/ meltfptr[77]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#22",
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#22",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1146*/ meltfptr[1145]))
+ ( /*_.VALROUT___V1163*/ meltfptr[1162]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1060__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1076__LAMBDA_#0",
NULL != ( /*_.COMPARE_NAMED_ALPHA__V78*/ meltfptr[77]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1146*/ meltfptr[1145])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1163*/ meltfptr[1162])->tabval[0] =
(melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V78*/ meltfptr[77]);
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1146*/ meltfptr[1145]))
+ ( /*_.VALROUT___V1163*/ meltfptr[1162]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1060__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1076__LAMBDA_#1",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1146*/ meltfptr[1145])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1163*/ meltfptr[1162])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:4901:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5010:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1146*/ meltfptr[1145]);
+ meltgc_touch ( /*_.VALROUT___V1163*/ meltfptr[1162]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1056__TRANSLATE_MATCHCASE#23",
- NULL != ( /*_.VALROUT___V1146*/ meltfptr[1145]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[23] =
- (melt_ptr_t) ( /*_.VALROUT___V1146*/ meltfptr[1145]);
+ ("putroutconst constnull.drout_1072__TRANSLATE_MATCHCASE#23",
+ NULL != ( /*_.VALROUT___V1163*/ meltfptr[1162]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALROUT___V1163*/ meltfptr[1162]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1038*/ meltfptr[1037]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1145*/ meltfptr[1144])->tabval[24] =
- (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]);
+ NULL != /*_.VALDATA___V1043*/ meltfptr[1042]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]);
- MELT_LOCATION ("warmelt-normatch.melt:4814:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4923:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1145*/ meltfptr[1144]);
+ meltgc_touch ( /*_.VALROUT___V1162*/ meltfptr[1161]);
- /*putclosurout#78 */
- melt_assertmsg ("putclosrout#78 checkclo",
+ /*putclosurout#86 */
+ melt_assertmsg ("putclosrout#86 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1147*/ meltfptr[1146])) ==
+ ( /*_.VALCLO___V1164*/ meltfptr[1163])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#78 checkrout",
+ melt_assertmsg ("putclosrout#86 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1145*/ meltfptr[1144]))
+ ( /*_.VALROUT___V1162*/ meltfptr[1161]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1147*/ meltfptr[1146])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1145*/ meltfptr[1144]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1164*/ meltfptr[1163])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1147*/ meltfptr[1146]);
+ meltgc_touch ( /*_.VALCLO___V1164*/ meltfptr[1163]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/ meltfptr[1147]))
+ ( /*_.VALDATA___V1165*/ meltfptr[1164]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/
- meltfptr[1147]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]))->
+ ( /*_.VALDATA___V1165*/
+ meltfptr[1164]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1149*/ meltfptr[1148]);
+ /*_.VALSTR___V1166*/ meltfptr[1165]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1148*/ meltfptr[1147]);
+ meltgc_touch ( /*_.VALDATA___V1165*/ meltfptr[1164]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/ meltfptr[1149]))
+ ( /*_.VALDATA___V1167*/ meltfptr[1166]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/
- meltfptr[1149]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1150*/ meltfptr[1149]))->
+ ( /*_.VALDATA___V1167*/
+ meltfptr[1166]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1167*/ meltfptr[1166]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1151*/ meltfptr[1150]);
+ /*_.VALSTR___V1168*/ meltfptr[1167]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1150*/ meltfptr[1149]);
+ meltgc_touch ( /*_.VALDATA___V1167*/ meltfptr[1166]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1152*/ meltfptr[1151]))
+ ( /*_.VALDATA___V1169*/ meltfptr[1168]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1152*/
- meltfptr[1151]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151]))->
+ ( /*_.VALDATA___V1169*/
+ meltfptr[1168]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1153*/ meltfptr[1152]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_19 */
+ /*_.VALSTR___V1170*/ meltfptr[1169]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*touch:VALUEDATA_*/
- meltgc_touch ( /*_.VALDATA___V1152*/ meltfptr[1151]);
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1169*/ meltfptr[1168]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/ meltfptr[1153]))
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/
- meltfptr[1153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]))->
+ ( /*_.VALDATA___V1171*/
+ meltfptr[1170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1155*/ meltfptr[1154]);
+ /*_.VALSTR___V1172*/ meltfptr[1171]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/ meltfptr[1153]))
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/
- meltfptr[1153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]))->
+ ( /*_.VALDATA___V1171*/
+ meltfptr[1170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_NREP_TYPED_EXPRESSION__V37*/
meltfptr[36]);
@@ -59086,15 +59843,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#470 */
melt_assertmsg ("putupl #470 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/ meltfptr[1155])) ==
+ ( /*_.VALTUP___V1173*/ meltfptr[1172])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #470 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/
- meltfptr[1155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1156*/ meltfptr[1155]))->tabval[0] =
+ ( /*_.VALTUP___V1173*/
+ meltfptr[1172]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1173*/ meltfptr[1172]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59105,15 +59862,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#471 */
melt_assertmsg ("putupl #471 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/ meltfptr[1155])) ==
+ ( /*_.VALTUP___V1173*/ meltfptr[1172])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #471 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/
- meltfptr[1155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1156*/ meltfptr[1155]))->tabval[1] =
+ ( /*_.VALTUP___V1173*/
+ meltfptr[1172]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1173*/ meltfptr[1172]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59124,15 +59881,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#472 */
melt_assertmsg ("putupl #472 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/ meltfptr[1155])) ==
+ ( /*_.VALTUP___V1173*/ meltfptr[1172])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #472 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/
- meltfptr[1155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1156*/ meltfptr[1155]))->tabval[2] =
+ ( /*_.VALTUP___V1173*/
+ meltfptr[1172]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1173*/ meltfptr[1172]))->tabval[2] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59143,214 +59900,214 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#473 */
melt_assertmsg ("putupl #473 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/ meltfptr[1155])) ==
+ ( /*_.VALTUP___V1173*/ meltfptr[1172])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #473 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1156*/
- meltfptr[1155]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1156*/ meltfptr[1155]))->tabval[3] =
+ ( /*_.VALTUP___V1173*/
+ meltfptr[1172]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1173*/ meltfptr[1172]))->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1156*/ meltfptr[1155]);
+ meltgc_touch ( /*_.VALTUP___V1173*/ meltfptr[1172]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/ meltfptr[1153]))
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/
- meltfptr[1153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]))->
+ ( /*_.VALDATA___V1171*/
+ meltfptr[1170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1156*/ meltfptr[1155]);
+ /*_.VALTUP___V1173*/ meltfptr[1172]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1157*/ meltfptr[1156]))
+ ( /*_.VALDATA___V1174*/ meltfptr[1173]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1157*/
- meltfptr[1156]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1157*/ meltfptr[1156]))->
+ ( /*_.VALDATA___V1174*/
+ meltfptr[1173]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1158*/ meltfptr[1157]);
+ /*_.VALSTR___V1175*/ meltfptr[1174]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1157*/ meltfptr[1156]))
+ ( /*_.VALDATA___V1174*/ meltfptr[1173]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1157*/
- meltfptr[1156]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1157*/ meltfptr[1156]))->
+ ( /*_.VALDATA___V1174*/
+ meltfptr[1173]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1154*/ meltfptr[1153]);
+ /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1157*/ meltfptr[1156]);
+ meltgc_touch ( /*_.VALDATA___V1174*/ meltfptr[1173]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/ meltfptr[1158]))
+ ( /*_.VALDATA___V1176*/ meltfptr[1175]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/
- meltfptr[1158]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1159*/ meltfptr[1158]))->
+ ( /*_.VALDATA___V1176*/
+ meltfptr[1175]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1160*/ meltfptr[1159]);
+ /*_.VALSTR___V1177*/ meltfptr[1176]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/ meltfptr[1158]))
+ ( /*_.VALDATA___V1176*/ meltfptr[1175]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1159*/
- meltfptr[1158]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1159*/ meltfptr[1158]))->
+ ( /*_.VALDATA___V1176*/
+ meltfptr[1175]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1154*/ meltfptr[1153]);
+ /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1159*/ meltfptr[1158]);
+ meltgc_touch ( /*_.VALDATA___V1176*/ meltfptr[1175]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1161*/ meltfptr[1160]))
+ ( /*_.VALDATA___V1178*/ meltfptr[1177]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1161*/
- meltfptr[1160]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]))->
+ ( /*_.VALDATA___V1178*/
+ meltfptr[1177]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1162*/ meltfptr[1161]);
+ /*_.VALSTR___V1179*/ meltfptr[1178]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1161*/ meltfptr[1160]))
+ ( /*_.VALDATA___V1178*/ meltfptr[1177]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1161*/
- meltfptr[1160]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]))->
+ ( /*_.VALDATA___V1178*/
+ meltfptr[1177]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1154*/ meltfptr[1153]);
+ /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1161*/ meltfptr[1160]);
+ meltgc_touch ( /*_.VALDATA___V1178*/ meltfptr[1177]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1163*/ meltfptr[1162]))
+ ( /*_.VALDATA___V1180*/ meltfptr[1179]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1163*/
- meltfptr[1162]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]))->
+ ( /*_.VALDATA___V1180*/
+ meltfptr[1179]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1164*/ meltfptr[1163]);
+ /*_.VALSTR___V1181*/ meltfptr[1180]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1163*/ meltfptr[1162]))
+ ( /*_.VALDATA___V1180*/ meltfptr[1179]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1163*/
- meltfptr[1162]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]))->
+ ( /*_.VALDATA___V1180*/
+ meltfptr[1179]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1154*/ meltfptr[1153]);
+ /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1163*/ meltfptr[1162]);
+ meltgc_touch ( /*_.VALDATA___V1180*/ meltfptr[1179]);
/*putupl#474 */
melt_assertmsg ("putupl #474 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #474 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[0] =
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59361,15 +60118,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#475 */
melt_assertmsg ("putupl #475 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #475 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[1] =
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59380,213 +60137,213 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#476 */
melt_assertmsg ("putupl #476 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #476 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1157*/ meltfptr[1156]);
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]);
/*putupl#477 */
melt_assertmsg ("putupl #477 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #477 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1159*/ meltfptr[1158]);
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]);
/*putupl#478 */
melt_assertmsg ("putupl #478 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #478 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]);
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]);
/*putupl#479 */
melt_assertmsg ("putupl #479 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/ meltfptr[1164])) ==
+ ( /*_.VALTUP___V1182*/ meltfptr[1181])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #479 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1165*/
- meltfptr[1164]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]);
+ ( /*_.VALTUP___V1182*/
+ meltfptr[1181]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1182*/ meltfptr[1181]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1165*/ meltfptr[1164]);
+ meltgc_touch ( /*_.VALTUP___V1182*/ meltfptr[1181]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/ meltfptr[1153]))
+ ( /*_.VALDATA___V1171*/ meltfptr[1170]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1154*/
- meltfptr[1153]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]))->
+ ( /*_.VALDATA___V1171*/
+ meltfptr[1170]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1165*/ meltfptr[1164]);
+ /*_.VALTUP___V1182*/ meltfptr[1181]);
- MELT_LOCATION ("warmelt-normatch.melt:4928:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5037:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1154*/ meltfptr[1153]);
+ meltgc_touch ( /*_.VALDATA___V1171*/ meltfptr[1170]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1166*/ meltfptr[1165]))
+ ( /*_.VALDATA___V1183*/ meltfptr[1182]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1166*/
- meltfptr[1165]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165]))->
+ ( /*_.VALDATA___V1183*/
+ meltfptr[1182]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1183*/ meltfptr[1182]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1167*/ meltfptr[1166]);
+ /*_.VALSTR___V1184*/ meltfptr[1183]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1166*/ meltfptr[1165]);
+ meltgc_touch ( /*_.VALDATA___V1183*/ meltfptr[1182]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/ meltfptr[1167]))
+ ( /*_.VALDATA___V1185*/ meltfptr[1184]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/
- meltfptr[1167]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]))->
+ ( /*_.VALDATA___V1185*/
+ meltfptr[1184]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1185*/ meltfptr[1184]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1169*/ meltfptr[1168]);
+ /*_.VALSTR___V1186*/ meltfptr[1185]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1168*/ meltfptr[1167]);
+ meltgc_touch ( /*_.VALDATA___V1185*/ meltfptr[1184]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/ meltfptr[1169]))
+ ( /*_.VALDATA___V1187*/ meltfptr[1186]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/
- meltfptr[1169]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]))->
+ ( /*_.VALDATA___V1187*/
+ meltfptr[1186]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1187*/ meltfptr[1186]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1171*/ meltfptr[1170]);
+ /*_.VALSTR___V1188*/ meltfptr[1187]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1170*/ meltfptr[1169]);
+ meltgc_touch ( /*_.VALDATA___V1187*/ meltfptr[1186]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/ meltfptr[1171]))
+ ( /*_.VALDATA___V1189*/ meltfptr[1188]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/
- meltfptr[1171]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))->
+ ( /*_.VALDATA___V1189*/
+ meltfptr[1188]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1173*/ meltfptr[1172]);
+ /*_.VALSTR___V1190*/ meltfptr[1189]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1172*/ meltfptr[1171]);
+ meltgc_touch ( /*_.VALDATA___V1189*/ meltfptr[1188]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/ meltfptr[1173]))
+ ( /*_.VALDATA___V1191*/ meltfptr[1190]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/
- meltfptr[1173]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]))->
+ ( /*_.VALDATA___V1191*/
+ meltfptr[1190]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1175*/ meltfptr[1174]);
+ /*_.VALSTR___V1192*/ meltfptr[1191]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1174*/ meltfptr[1173]);
+ meltgc_touch ( /*_.VALDATA___V1191*/ meltfptr[1190]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]))
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/
- meltfptr[1175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
+ ( /*_.VALDATA___V1193*/
+ meltfptr[1192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1177*/ meltfptr[1176]);
+ /*_.VALSTR___V1194*/ meltfptr[1193]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]))
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/
- meltfptr[1175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
+ ( /*_.VALDATA___V1193*/
+ meltfptr[1192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_NREP_EXPRESSION__V36*/
meltfptr[35]);
@@ -59594,15 +60351,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#480 */
melt_assertmsg ("putupl #480 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/ meltfptr[1177])) ==
+ ( /*_.VALTUP___V1195*/ meltfptr[1194])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #480 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/
- meltfptr[1177]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[0] =
+ ( /*_.VALTUP___V1195*/
+ meltfptr[1194]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1195*/ meltfptr[1194]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59613,15 +60370,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#481 */
melt_assertmsg ("putupl #481 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/ meltfptr[1177])) ==
+ ( /*_.VALTUP___V1195*/ meltfptr[1194])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #481 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/
- meltfptr[1177]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[1] =
+ ( /*_.VALTUP___V1195*/
+ meltfptr[1194]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1195*/ meltfptr[1194]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59632,91 +60389,91 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#482 */
melt_assertmsg ("putupl #482 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/ meltfptr[1177])) ==
+ ( /*_.VALTUP___V1195*/ meltfptr[1194])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #482 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1178*/
- meltfptr[1177]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[2] =
+ ( /*_.VALTUP___V1195*/
+ meltfptr[1194]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1195*/ meltfptr[1194]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1178*/ meltfptr[1177]);
+ meltgc_touch ( /*_.VALTUP___V1195*/ meltfptr[1194]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]))
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/
- meltfptr[1175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
+ ( /*_.VALDATA___V1193*/
+ meltfptr[1192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1178*/ meltfptr[1177]);
+ /*_.VALTUP___V1195*/ meltfptr[1194]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1179*/ meltfptr[1178]))
+ ( /*_.VALDATA___V1196*/ meltfptr[1195]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1179*/
- meltfptr[1178]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]))->
+ ( /*_.VALDATA___V1196*/
+ meltfptr[1195]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1180*/ meltfptr[1179]);
+ /*_.VALSTR___V1197*/ meltfptr[1196]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1179*/ meltfptr[1178]))
+ ( /*_.VALDATA___V1196*/ meltfptr[1195]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1179*/
- meltfptr[1178]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]))->
+ ( /*_.VALDATA___V1196*/
+ meltfptr[1195]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1176*/ meltfptr[1175]);
+ /*_.VALDATA___V1193*/ meltfptr[1192]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1179*/ meltfptr[1178]);
+ meltgc_touch ( /*_.VALDATA___V1196*/ meltfptr[1195]);
/*putupl#483 */
melt_assertmsg ("putupl #483 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1181*/ meltfptr[1180])) ==
+ ( /*_.VALTUP___V1198*/ meltfptr[1197])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #483 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1181*/
- meltfptr[1180]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1181*/ meltfptr[1180]))->tabval[0] =
+ ( /*_.VALTUP___V1198*/
+ meltfptr[1197]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1198*/ meltfptr[1197]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59727,129 +60484,129 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#484 */
melt_assertmsg ("putupl #484 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1181*/ meltfptr[1180])) ==
+ ( /*_.VALTUP___V1198*/ meltfptr[1197])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #484 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1181*/
- meltfptr[1180]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1181*/ meltfptr[1180]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]);
+ ( /*_.VALTUP___V1198*/
+ meltfptr[1197]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1198*/ meltfptr[1197]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1181*/ meltfptr[1180]);
+ meltgc_touch ( /*_.VALTUP___V1198*/ meltfptr[1197]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/ meltfptr[1175]))
+ ( /*_.VALDATA___V1193*/ meltfptr[1192]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1176*/
- meltfptr[1175]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))->
+ ( /*_.VALDATA___V1193*/
+ meltfptr[1192]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1181*/ meltfptr[1180]);
+ /*_.VALTUP___V1198*/ meltfptr[1197]);
- MELT_LOCATION ("warmelt-normatch.melt:4943:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ meltgc_touch ( /*_.VALDATA___V1193*/ meltfptr[1192]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/ meltfptr[1181]))
+ ( /*_.VALDATA___V1199*/ meltfptr[1198]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/
- meltfptr[1181]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]))->
+ ( /*_.VALDATA___V1199*/
+ meltfptr[1198]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1183*/ meltfptr[1182]);
+ /*_.VALSTR___V1200*/ meltfptr[1199]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1182*/ meltfptr[1181]);
+ meltgc_touch ( /*_.VALDATA___V1199*/ meltfptr[1198]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/ meltfptr[1183]))
+ ( /*_.VALDATA___V1201*/ meltfptr[1200]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/
- meltfptr[1183]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]))->
+ ( /*_.VALDATA___V1201*/
+ meltfptr[1200]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1185*/ meltfptr[1184]);
+ /*_.VALSTR___V1202*/ meltfptr[1201]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1184*/ meltfptr[1183]);
+ meltgc_touch ( /*_.VALDATA___V1201*/ meltfptr[1200]);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]))
+ ( /*_.VALDATA___V1203*/ meltfptr[1202]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/
- meltfptr[1185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))->
+ ( /*_.VALDATA___V1203*/
+ meltfptr[1202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1187*/ meltfptr[1186]);
+ /*_.VALSTR___V1204*/ meltfptr[1203]);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]))
+ ( /*_.VALDATA___V1203*/ meltfptr[1202]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/
- meltfptr[1185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))->
+ ( /*_.VALDATA___V1203*/
+ meltfptr[1202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.VALDATA___V1176*/ meltfptr[1175]);
+ /*_.VALDATA___V1193*/ meltfptr[1192]);
/*putupl#485 */
melt_assertmsg ("putupl #485 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/ meltfptr[1187])) ==
+ ( /*_.VALTUP___V1205*/ meltfptr[1204])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #485 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/
- meltfptr[1187]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[0] =
+ ( /*_.VALTUP___V1205*/
+ meltfptr[1204]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59860,15 +60617,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#486 */
melt_assertmsg ("putupl #486 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/ meltfptr[1187])) ==
+ ( /*_.VALTUP___V1205*/ meltfptr[1204])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #486 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/
- meltfptr[1187]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[1] =
+ ( /*_.VALTUP___V1205*/
+ meltfptr[1204]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59879,64 +60636,64 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#487 */
melt_assertmsg ("putupl #487 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/ meltfptr[1187])) ==
+ ( /*_.VALTUP___V1205*/ meltfptr[1204])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #487 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/
- meltfptr[1187]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[2] =
+ ( /*_.VALTUP___V1205*/
+ meltfptr[1204]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#488 */
melt_assertmsg ("putupl #488 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/ meltfptr[1187])) ==
+ ( /*_.VALTUP___V1205*/ meltfptr[1204])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #488 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1188*/
- meltfptr[1187]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ ( /*_.VALTUP___V1205*/
+ meltfptr[1204]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1188*/ meltfptr[1187]);
+ meltgc_touch ( /*_.VALTUP___V1205*/ meltfptr[1204]);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]))
+ ( /*_.VALDATA___V1203*/ meltfptr[1202]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/
- meltfptr[1185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))->
+ ( /*_.VALDATA___V1203*/
+ meltfptr[1202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1188*/ meltfptr[1187]);
+ /*_.VALTUP___V1205*/ meltfptr[1204]);
/*putupl#489 */
melt_assertmsg ("putupl #489 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1189*/ meltfptr[1188])) ==
+ ( /*_.VALTUP___V1206*/ meltfptr[1205])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #489 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1189*/
- meltfptr[1188]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[0] =
+ ( /*_.VALTUP___V1206*/
+ meltfptr[1205]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1206*/ meltfptr[1205]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -59947,95 +60704,95 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#490 */
melt_assertmsg ("putupl #490 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1189*/ meltfptr[1188])) ==
+ ( /*_.VALTUP___V1206*/ meltfptr[1205])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #490 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1189*/
- meltfptr[1188]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]);
+ ( /*_.VALTUP___V1206*/
+ meltfptr[1205]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1206*/ meltfptr[1205]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1189*/ meltfptr[1188]);
+ meltgc_touch ( /*_.VALTUP___V1206*/ meltfptr[1205]);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/ meltfptr[1185]))
+ ( /*_.VALDATA___V1203*/ meltfptr[1202]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1186*/
- meltfptr[1185]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))->
+ ( /*_.VALDATA___V1203*/
+ meltfptr[1202]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1189*/ meltfptr[1188]);
+ /*_.VALTUP___V1206*/ meltfptr[1205]);
- MELT_LOCATION ("warmelt-normatch.melt:4950:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5059:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1186*/ meltfptr[1185]);
+ meltgc_touch ( /*_.VALDATA___V1203*/ meltfptr[1202]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/ meltfptr[1189]))
+ ( /*_.VALDATA___V1207*/ meltfptr[1206]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/
- meltfptr[1189]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]))->
+ ( /*_.VALDATA___V1207*/
+ meltfptr[1206]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1191*/ meltfptr[1190]);
+ /*_.VALSTR___V1208*/ meltfptr[1207]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1190*/ meltfptr[1189]);
+ meltgc_touch ( /*_.VALDATA___V1207*/ meltfptr[1206]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1209*/
+ meltfptr[1208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1193*/ meltfptr[1192]);
+ /*_.VALSTR___V1210*/ meltfptr[1209]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1209*/
+ meltfptr[1208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_NREP_EXPRESSION__V36*/
meltfptr[35]);
@@ -60043,15 +60800,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#491 */
melt_assertmsg ("putupl #491 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/ meltfptr[1193])) ==
+ ( /*_.VALTUP___V1211*/ meltfptr[1210])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #491 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/
- meltfptr[1193]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1194*/ meltfptr[1193]))->tabval[0] =
+ ( /*_.VALTUP___V1211*/
+ meltfptr[1210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1211*/ meltfptr[1210]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60062,15 +60819,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#492 */
melt_assertmsg ("putupl #492 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/ meltfptr[1193])) ==
+ ( /*_.VALTUP___V1211*/ meltfptr[1210])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #492 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/
- meltfptr[1193]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1194*/ meltfptr[1193]))->tabval[1] =
+ ( /*_.VALTUP___V1211*/
+ meltfptr[1210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1211*/ meltfptr[1210]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60081,91 +60838,91 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#493 */
melt_assertmsg ("putupl #493 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/ meltfptr[1193])) ==
+ ( /*_.VALTUP___V1211*/ meltfptr[1210])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #493 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1194*/
- meltfptr[1193]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1194*/ meltfptr[1193]))->tabval[2] =
+ ( /*_.VALTUP___V1211*/
+ meltfptr[1210]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1211*/ meltfptr[1210]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1194*/ meltfptr[1193]);
+ meltgc_touch ( /*_.VALTUP___V1211*/ meltfptr[1210]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1209*/
+ meltfptr[1208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1194*/ meltfptr[1193]);
+ /*_.VALTUP___V1211*/ meltfptr[1210]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1195*/ meltfptr[1194]))
+ ( /*_.VALDATA___V1212*/ meltfptr[1211]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1195*/
- meltfptr[1194]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))->
+ ( /*_.VALDATA___V1212*/
+ meltfptr[1211]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1196*/ meltfptr[1195]);
+ /*_.VALSTR___V1213*/ meltfptr[1212]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1195*/ meltfptr[1194]))
+ ( /*_.VALDATA___V1212*/ meltfptr[1211]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1195*/
- meltfptr[1194]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))->
+ ( /*_.VALDATA___V1212*/
+ meltfptr[1211]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1192*/ meltfptr[1191]);
+ /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1195*/ meltfptr[1194]);
+ meltgc_touch ( /*_.VALDATA___V1212*/ meltfptr[1211]);
/*putupl#494 */
melt_assertmsg ("putupl #494 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1197*/ meltfptr[1196])) ==
+ ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #494 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1197*/
- meltfptr[1196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1197*/ meltfptr[1196]))->tabval[0] =
+ ( /*_.VALTUP___V1214*/
+ meltfptr[1213]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60176,114 +60933,125 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#495 */
melt_assertmsg ("putupl #495 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1197*/ meltfptr[1196])) ==
+ ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #495 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1197*/
- meltfptr[1196]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1197*/ meltfptr[1196]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]);
+ ( /*_.VALTUP___V1214*/
+ meltfptr[1213]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1197*/ meltfptr[1196]);
+ meltgc_touch ( /*_.VALTUP___V1214*/ meltfptr[1213]);
+
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_20 */
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/ meltfptr[1191]))
+ ( /*_.VALDATA___V1209*/ meltfptr[1208]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1192*/
- meltfptr[1191]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))->
+ ( /*_.VALDATA___V1209*/
+ meltfptr[1208]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1197*/ meltfptr[1196]);
+ /*_.VALTUP___V1214*/ meltfptr[1213]);
- MELT_LOCATION ("warmelt-normatch.melt:4954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5063:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ meltgc_touch ( /*_.VALDATA___V1209*/ meltfptr[1208]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1198*/ meltfptr[1197]))
+ ( /*_.VALDATA___V1215*/ meltfptr[1214]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1198*/
- meltfptr[1197]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197]))->
+ ( /*_.VALDATA___V1215*/
+ meltfptr[1214]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1199*/ meltfptr[1198]);
+ /*_.VALSTR___V1216*/ meltfptr[1215]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1198*/ meltfptr[1197]);
+ meltgc_touch ( /*_.VALDATA___V1215*/ meltfptr[1214]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1200*/ meltfptr[1199]))
+ ( /*_.VALDATA___V1217*/ meltfptr[1216]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1200*/
- meltfptr[1199]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]))->
+ ( /*_.VALDATA___V1217*/
+ meltfptr[1216]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1201*/ meltfptr[1200]);
+ /*_.VALSTR___V1218*/ meltfptr[1217]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1200*/ meltfptr[1199]);
+ meltgc_touch ( /*_.VALDATA___V1217*/ meltfptr[1216]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]))
+ ( /*_.VALDATA___V1219*/ meltfptr[1218]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/
- meltfptr[1201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))->
+ ( /*_.VALDATA___V1219*/
+ meltfptr[1218]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1203*/ meltfptr[1202]);
+ /*_.VALSTR___V1220*/ meltfptr[1219]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]))
+ ( /*_.VALDATA___V1219*/ meltfptr[1218]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/
- meltfptr[1201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))->
+ ( /*_.VALDATA___V1219*/
+ meltfptr[1218]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_NREP_EXPRESSION__V36*/
meltfptr[35]);
@@ -60291,15 +61059,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#496 */
melt_assertmsg ("putupl #496 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/ meltfptr[1203])) ==
+ ( /*_.VALTUP___V1221*/ meltfptr[1220])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #496 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/
- meltfptr[1203]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1204*/ meltfptr[1203]))->tabval[0] =
+ ( /*_.VALTUP___V1221*/
+ meltfptr[1220]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1221*/ meltfptr[1220]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60310,15 +61078,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#497 */
melt_assertmsg ("putupl #497 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/ meltfptr[1203])) ==
+ ( /*_.VALTUP___V1221*/ meltfptr[1220])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #497 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/
- meltfptr[1203]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1204*/ meltfptr[1203]))->tabval[1] =
+ ( /*_.VALTUP___V1221*/
+ meltfptr[1220]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1221*/ meltfptr[1220]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60329,91 +61097,91 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#498 */
melt_assertmsg ("putupl #498 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/ meltfptr[1203])) ==
+ ( /*_.VALTUP___V1221*/ meltfptr[1220])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #498 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1204*/
- meltfptr[1203]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1204*/ meltfptr[1203]))->tabval[2] =
+ ( /*_.VALTUP___V1221*/
+ meltfptr[1220]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1221*/ meltfptr[1220]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1204*/ meltfptr[1203]);
+ meltgc_touch ( /*_.VALTUP___V1221*/ meltfptr[1220]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]))
+ ( /*_.VALDATA___V1219*/ meltfptr[1218]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/
- meltfptr[1201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))->
+ ( /*_.VALDATA___V1219*/
+ meltfptr[1218]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1204*/ meltfptr[1203]);
+ /*_.VALTUP___V1221*/ meltfptr[1220]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1205*/ meltfptr[1204]))
+ ( /*_.VALDATA___V1222*/ meltfptr[1221]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1205*/
- meltfptr[1204]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]))->
+ ( /*_.VALDATA___V1222*/
+ meltfptr[1221]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1206*/ meltfptr[1205]);
+ /*_.VALSTR___V1223*/ meltfptr[1222]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1205*/ meltfptr[1204]))
+ ( /*_.VALDATA___V1222*/ meltfptr[1221]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1205*/
- meltfptr[1204]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]))->
+ ( /*_.VALDATA___V1222*/
+ meltfptr[1221]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1202*/ meltfptr[1201]);
+ /*_.VALDATA___V1219*/ meltfptr[1218]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1205*/ meltfptr[1204]);
+ meltgc_touch ( /*_.VALDATA___V1222*/ meltfptr[1221]);
/*putupl#499 */
melt_assertmsg ("putupl #499 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1207*/ meltfptr[1206])) ==
+ ( /*_.VALTUP___V1224*/ meltfptr[1223])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #499 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1207*/
- meltfptr[1206]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[0] =
+ ( /*_.VALTUP___V1224*/
+ meltfptr[1223]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60424,129 +61192,129 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#500 */
melt_assertmsg ("putupl #500 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1207*/ meltfptr[1206])) ==
+ ( /*_.VALTUP___V1224*/ meltfptr[1223])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #500 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1207*/
- meltfptr[1206]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]);
+ ( /*_.VALTUP___V1224*/
+ meltfptr[1223]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1207*/ meltfptr[1206]);
+ meltgc_touch ( /*_.VALTUP___V1224*/ meltfptr[1223]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/ meltfptr[1201]))
+ ( /*_.VALDATA___V1219*/ meltfptr[1218]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1202*/
- meltfptr[1201]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))->
+ ( /*_.VALDATA___V1219*/
+ meltfptr[1218]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1207*/ meltfptr[1206]);
+ /*_.VALTUP___V1224*/ meltfptr[1223]);
- MELT_LOCATION ("warmelt-normatch.melt:4960:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5069:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ meltgc_touch ( /*_.VALDATA___V1219*/ meltfptr[1218]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/ meltfptr[1207]))
+ ( /*_.VALDATA___V1225*/ meltfptr[1224]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/
- meltfptr[1207]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207]))->
+ ( /*_.VALDATA___V1225*/
+ meltfptr[1224]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1225*/ meltfptr[1224]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1209*/ meltfptr[1208]);
+ /*_.VALSTR___V1226*/ meltfptr[1225]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1208*/ meltfptr[1207]);
+ meltgc_touch ( /*_.VALDATA___V1225*/ meltfptr[1224]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/ meltfptr[1209]))
+ ( /*_.VALDATA___V1227*/ meltfptr[1226]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/
- meltfptr[1209]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]))->
+ ( /*_.VALDATA___V1227*/
+ meltfptr[1226]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1227*/ meltfptr[1226]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1211*/ meltfptr[1210]);
+ /*_.VALSTR___V1228*/ meltfptr[1227]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1210*/ meltfptr[1209]);
+ meltgc_touch ( /*_.VALDATA___V1227*/ meltfptr[1226]);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]))
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/
- meltfptr[1211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
+ ( /*_.VALDATA___V1229*/
+ meltfptr[1228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1213*/ meltfptr[1212]);
+ /*_.VALSTR___V1230*/ meltfptr[1229]);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]))
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/
- meltfptr[1211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
+ ( /*_.VALDATA___V1229*/
+ meltfptr[1228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.VALDATA___V1202*/ meltfptr[1201]);
+ /*_.VALDATA___V1219*/ meltfptr[1218]);
/*putupl#501 */
melt_assertmsg ("putupl #501 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
+ ( /*_.VALTUP___V1231*/ meltfptr[1230])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #501 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/
- meltfptr[1213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[0] =
+ ( /*_.VALTUP___V1231*/
+ meltfptr[1230]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60557,15 +61325,15 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#502 */
melt_assertmsg ("putupl #502 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
+ ( /*_.VALTUP___V1231*/ meltfptr[1230])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #502 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/
- meltfptr[1213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[1] =
+ ( /*_.VALTUP___V1231*/
+ meltfptr[1230]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60576,64 +61344,64 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#503 */
melt_assertmsg ("putupl #503 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
+ ( /*_.VALTUP___V1231*/ meltfptr[1230])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #503 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/
- meltfptr[1213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[2] =
+ ( /*_.VALTUP___V1231*/
+ meltfptr[1230]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#504 */
melt_assertmsg ("putupl #504 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/ meltfptr[1213])) ==
+ ( /*_.VALTUP___V1231*/ meltfptr[1230])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #504 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1214*/
- meltfptr[1213]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ ( /*_.VALTUP___V1231*/
+ meltfptr[1230]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1214*/ meltfptr[1213]);
+ meltgc_touch ( /*_.VALTUP___V1231*/ meltfptr[1230]);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]))
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/
- meltfptr[1211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
+ ( /*_.VALDATA___V1229*/
+ meltfptr[1228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1214*/ meltfptr[1213]);
+ /*_.VALTUP___V1231*/ meltfptr[1230]);
/*putupl#505 */
melt_assertmsg ("putupl #505 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1215*/ meltfptr[1214])) ==
+ ( /*_.VALTUP___V1232*/ meltfptr[1231])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #505 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1215*/
- meltfptr[1214]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1215*/ meltfptr[1214]))->tabval[0] =
+ ( /*_.VALTUP___V1232*/
+ meltfptr[1231]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1232*/ meltfptr[1231]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60644,121 +61412,110 @@ warmelt_normatch_initialmeltchunk_20 (struct frame_start_module_melt_st
/*putupl#506 */
melt_assertmsg ("putupl #506 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1215*/ meltfptr[1214])) ==
+ ( /*_.VALTUP___V1232*/ meltfptr[1231])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #506 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1215*/
- meltfptr[1214]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1215*/ meltfptr[1214]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]);
+ ( /*_.VALTUP___V1232*/
+ meltfptr[1231]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1232*/ meltfptr[1231]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1215*/ meltfptr[1214]);
+ meltgc_touch ( /*_.VALTUP___V1232*/ meltfptr[1231]);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/ meltfptr[1211]))
+ ( /*_.VALDATA___V1229*/ meltfptr[1228]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1212*/
- meltfptr[1211]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]))->
+ ( /*_.VALDATA___V1229*/
+ meltfptr[1228]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1215*/ meltfptr[1214]);
+ /*_.VALTUP___V1232*/ meltfptr[1231]);
- MELT_LOCATION ("warmelt-normatch.melt:4966:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5075:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1212*/ meltfptr[1211]);
+ meltgc_touch ( /*_.VALDATA___V1229*/ meltfptr[1228]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1216*/ meltfptr[1215]))
+ ( /*_.VALDATA___V1233*/ meltfptr[1232]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1216*/
- meltfptr[1215]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215]))->
+ ( /*_.VALDATA___V1233*/
+ meltfptr[1232]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1217*/ meltfptr[1216]);
+ /*_.VALSTR___V1234*/ meltfptr[1233]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1216*/ meltfptr[1215]);
+ meltgc_touch ( /*_.VALDATA___V1233*/ meltfptr[1232]);
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/ meltfptr[1217]))
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/
- meltfptr[1217]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]))->
+ ( /*_.VALDATA___V1235*/
+ meltfptr[1234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1219*/ meltfptr[1218]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_20 */
+ /*_.VALSTR___V1236*/ meltfptr[1235]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/ meltfptr[1217]))
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/
- meltfptr[1217]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]))->
+ ( /*_.VALDATA___V1235*/
+ meltfptr[1234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.VALDATA___V1202*/ meltfptr[1201]);
+ /*_.VALDATA___V1219*/ meltfptr[1218]);
/*putupl#507 */
melt_assertmsg ("putupl #507 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/ meltfptr[1219])) ==
+ ( /*_.VALTUP___V1237*/ meltfptr[1236])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #507 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/
- meltfptr[1219]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[0] =
+ ( /*_.VALTUP___V1237*/
+ meltfptr[1236]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1237*/ meltfptr[1236]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60769,15 +61526,15 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#508 */
melt_assertmsg ("putupl #508 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/ meltfptr[1219])) ==
+ ( /*_.VALTUP___V1237*/ meltfptr[1236])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #508 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/
- meltfptr[1219]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[1] =
+ ( /*_.VALTUP___V1237*/
+ meltfptr[1236]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1237*/ meltfptr[1236]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60788,64 +61545,64 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#509 */
melt_assertmsg ("putupl #509 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/ meltfptr[1219])) ==
+ ( /*_.VALTUP___V1237*/ meltfptr[1236])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #509 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/
- meltfptr[1219]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[2] =
+ ( /*_.VALTUP___V1237*/
+ meltfptr[1236]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1237*/ meltfptr[1236]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#510 */
melt_assertmsg ("putupl #510 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/ meltfptr[1219])) ==
+ ( /*_.VALTUP___V1237*/ meltfptr[1236])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #510 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1220*/
- meltfptr[1219]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ ( /*_.VALTUP___V1237*/
+ meltfptr[1236]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1237*/ meltfptr[1236]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1220*/ meltfptr[1219]);
+ meltgc_touch ( /*_.VALTUP___V1237*/ meltfptr[1236]);
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/ meltfptr[1217]))
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/
- meltfptr[1217]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]))->
+ ( /*_.VALDATA___V1235*/
+ meltfptr[1234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1220*/ meltfptr[1219]);
+ /*_.VALTUP___V1237*/ meltfptr[1236]);
/*putupl#511 */
melt_assertmsg ("putupl #511 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1221*/ meltfptr[1220])) ==
+ ( /*_.VALTUP___V1238*/ meltfptr[1237])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #511 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1221*/
- meltfptr[1220]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1221*/ meltfptr[1220]))->tabval[0] =
+ ( /*_.VALTUP___V1238*/
+ meltfptr[1237]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60856,110 +61613,110 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#512 */
melt_assertmsg ("putupl #512 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1221*/ meltfptr[1220])) ==
+ ( /*_.VALTUP___V1238*/ meltfptr[1237])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #512 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1221*/
- meltfptr[1220]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1221*/ meltfptr[1220]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]);
+ ( /*_.VALTUP___V1238*/
+ meltfptr[1237]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1221*/ meltfptr[1220]);
+ meltgc_touch ( /*_.VALTUP___V1238*/ meltfptr[1237]);
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/ meltfptr[1217]))
+ ( /*_.VALDATA___V1235*/ meltfptr[1234]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1218*/
- meltfptr[1217]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]))->
+ ( /*_.VALDATA___V1235*/
+ meltfptr[1234]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1221*/ meltfptr[1220]);
+ /*_.VALTUP___V1238*/ meltfptr[1237]);
- MELT_LOCATION ("warmelt-normatch.melt:4973:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5082:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1218*/ meltfptr[1217]);
+ meltgc_touch ( /*_.VALDATA___V1235*/ meltfptr[1234]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/ meltfptr[1221]))
+ ( /*_.VALDATA___V1239*/ meltfptr[1238]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/
- meltfptr[1221]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]))->
+ ( /*_.VALDATA___V1239*/
+ meltfptr[1238]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1223*/ meltfptr[1222]);
+ /*_.VALSTR___V1240*/ meltfptr[1239]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1222*/ meltfptr[1221]);
+ meltgc_touch ( /*_.VALDATA___V1239*/ meltfptr[1238]);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]))
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/
- meltfptr[1223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))->
+ ( /*_.VALDATA___V1241*/
+ meltfptr[1240]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1225*/ meltfptr[1224]);
+ /*_.VALSTR___V1242*/ meltfptr[1241]);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]))
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/
- meltfptr[1223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))->
+ ( /*_.VALDATA___V1241*/
+ meltfptr[1240]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))->
obj_vartab[4] = (melt_ptr_t) (
- /*_.VALDATA___V1202*/ meltfptr[1201]);
+ /*_.VALDATA___V1219*/ meltfptr[1218]);
/*putupl#513 */
melt_assertmsg ("putupl #513 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/ meltfptr[1225])) ==
+ ( /*_.VALTUP___V1243*/ meltfptr[1242])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #513 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/
- meltfptr[1225]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1226*/ meltfptr[1225]))->tabval[0] =
+ ( /*_.VALTUP___V1243*/
+ meltfptr[1242]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1243*/ meltfptr[1242]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60970,15 +61727,15 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#514 */
melt_assertmsg ("putupl #514 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/ meltfptr[1225])) ==
+ ( /*_.VALTUP___V1243*/ meltfptr[1242])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #514 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/
- meltfptr[1225]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1226*/ meltfptr[1225]))->tabval[1] =
+ ( /*_.VALTUP___V1243*/
+ meltfptr[1242]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1243*/ meltfptr[1242]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -60989,64 +61746,64 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#515 */
melt_assertmsg ("putupl #515 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/ meltfptr[1225])) ==
+ ( /*_.VALTUP___V1243*/ meltfptr[1242])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #515 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/
- meltfptr[1225]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1226*/ meltfptr[1225]))->tabval[2] =
+ ( /*_.VALTUP___V1243*/
+ meltfptr[1242]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1243*/ meltfptr[1242]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*putupl#516 */
melt_assertmsg ("putupl #516 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/ meltfptr[1225])) ==
+ ( /*_.VALTUP___V1243*/ meltfptr[1242])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #516 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1226*/
- meltfptr[1225]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1226*/ meltfptr[1225]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]);
+ ( /*_.VALTUP___V1243*/
+ meltfptr[1242]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1243*/ meltfptr[1242]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1226*/ meltfptr[1225]);
+ meltgc_touch ( /*_.VALTUP___V1243*/ meltfptr[1242]);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]))
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/
- meltfptr[1223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))->
+ ( /*_.VALDATA___V1241*/
+ meltfptr[1240]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1226*/ meltfptr[1225]);
+ /*_.VALTUP___V1243*/ meltfptr[1242]);
/*putupl#517 */
melt_assertmsg ("putupl #517 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1227*/ meltfptr[1226])) ==
+ ( /*_.VALTUP___V1244*/ meltfptr[1243])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #517 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1227*/
- meltfptr[1226]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1227*/ meltfptr[1226]))->tabval[0] =
+ ( /*_.VALTUP___V1244*/
+ meltfptr[1243]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1244*/ meltfptr[1243]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -61057,95 +61814,95 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#518 */
melt_assertmsg ("putupl #518 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1227*/ meltfptr[1226])) ==
+ ( /*_.VALTUP___V1244*/ meltfptr[1243])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #518 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1227*/
- meltfptr[1226]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1227*/ meltfptr[1226]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]);
+ ( /*_.VALTUP___V1244*/
+ meltfptr[1243]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1244*/ meltfptr[1243]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1227*/ meltfptr[1226]);
+ meltgc_touch ( /*_.VALTUP___V1244*/ meltfptr[1243]);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/ meltfptr[1223]))
+ ( /*_.VALDATA___V1241*/ meltfptr[1240]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1224*/
- meltfptr[1223]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))->
+ ( /*_.VALDATA___V1241*/
+ meltfptr[1240]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1227*/ meltfptr[1226]);
+ /*_.VALTUP___V1244*/ meltfptr[1243]);
- MELT_LOCATION ("warmelt-normatch.melt:4980:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5089:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1224*/ meltfptr[1223]);
+ meltgc_touch ( /*_.VALDATA___V1241*/ meltfptr[1240]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/ meltfptr[1227]))
+ ( /*_.VALDATA___V1245*/ meltfptr[1244]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/
- meltfptr[1227]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]))->
+ ( /*_.VALDATA___V1245*/
+ meltfptr[1244]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1245*/ meltfptr[1244]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1229*/ meltfptr[1228]);
+ /*_.VALSTR___V1246*/ meltfptr[1245]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1228*/ meltfptr[1227]);
+ meltgc_touch ( /*_.VALDATA___V1245*/ meltfptr[1244]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]))
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/
- meltfptr[1229]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))->
+ ( /*_.VALDATA___V1247*/
+ meltfptr[1246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1231*/ meltfptr[1230]);
+ /*_.VALSTR___V1248*/ meltfptr[1247]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]))
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/
- meltfptr[1229]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))->
+ ( /*_.VALDATA___V1247*/
+ meltfptr[1246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_NREP_EXPRESSION__V36*/
meltfptr[35]);
@@ -61153,15 +61910,15 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#519 */
melt_assertmsg ("putupl #519 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/ meltfptr[1231])) ==
+ ( /*_.VALTUP___V1249*/ meltfptr[1248])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #519 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/
- meltfptr[1231]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1232*/ meltfptr[1231]))->tabval[0] =
+ ( /*_.VALTUP___V1249*/
+ meltfptr[1248]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1249*/ meltfptr[1248]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -61172,15 +61929,15 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#520 */
melt_assertmsg ("putupl #520 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/ meltfptr[1231])) ==
+ ( /*_.VALTUP___V1249*/ meltfptr[1248])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #520 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/
- meltfptr[1231]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1232*/ meltfptr[1231]))->tabval[1] =
+ ( /*_.VALTUP___V1249*/
+ meltfptr[1248]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1249*/ meltfptr[1248]))->tabval[1] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -61191,173 +61948,173 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#521 */
melt_assertmsg ("putupl #521 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/ meltfptr[1231])) ==
+ ( /*_.VALTUP___V1249*/ meltfptr[1248])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #521 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1232*/
- meltfptr[1231]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1232*/ meltfptr[1231]))->tabval[2] =
+ ( /*_.VALTUP___V1249*/
+ meltfptr[1248]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1249*/ meltfptr[1248]))->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1232*/ meltfptr[1231]);
+ meltgc_touch ( /*_.VALTUP___V1249*/ meltfptr[1248]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]))
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/
- meltfptr[1229]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))->
+ ( /*_.VALDATA___V1247*/
+ meltfptr[1246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1232*/ meltfptr[1231]);
+ /*_.VALTUP___V1249*/ meltfptr[1248]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1233*/ meltfptr[1232]))
+ ( /*_.VALDATA___V1250*/ meltfptr[1249]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1233*/
- meltfptr[1232]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))->
+ ( /*_.VALDATA___V1250*/
+ meltfptr[1249]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1234*/ meltfptr[1233]);
+ /*_.VALSTR___V1251*/ meltfptr[1250]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1233*/ meltfptr[1232]))
+ ( /*_.VALDATA___V1250*/ meltfptr[1249]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1233*/
- meltfptr[1232]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))->
+ ( /*_.VALDATA___V1250*/
+ meltfptr[1249]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1230*/ meltfptr[1229]);
+ /*_.VALDATA___V1247*/ meltfptr[1246]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1233*/ meltfptr[1232]);
+ meltgc_touch ( /*_.VALDATA___V1250*/ meltfptr[1249]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1235*/ meltfptr[1234]))
+ ( /*_.VALDATA___V1252*/ meltfptr[1251]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1235*/
- meltfptr[1234]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
+ ( /*_.VALDATA___V1252*/
+ meltfptr[1251]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1236*/ meltfptr[1235]);
+ /*_.VALSTR___V1253*/ meltfptr[1252]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1235*/ meltfptr[1234]))
+ ( /*_.VALDATA___V1252*/ meltfptr[1251]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1235*/
- meltfptr[1234]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]))->
+ ( /*_.VALDATA___V1252*/
+ meltfptr[1251]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1230*/ meltfptr[1229]);
+ /*_.VALDATA___V1247*/ meltfptr[1246]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1235*/ meltfptr[1234]);
+ meltgc_touch ( /*_.VALDATA___V1252*/ meltfptr[1251]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1237*/ meltfptr[1236]))
+ ( /*_.VALDATA___V1254*/ meltfptr[1253]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1237*/
- meltfptr[1236]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1237*/ meltfptr[1236]))->
+ ( /*_.VALDATA___V1254*/
+ meltfptr[1253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1238*/ meltfptr[1237]);
+ /*_.VALSTR___V1255*/ meltfptr[1254]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1237*/ meltfptr[1236]))
+ ( /*_.VALDATA___V1254*/ meltfptr[1253]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1237*/
- meltfptr[1236]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1237*/ meltfptr[1236]))->
+ ( /*_.VALDATA___V1254*/
+ meltfptr[1253]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1230*/ meltfptr[1229]);
+ /*_.VALDATA___V1247*/ meltfptr[1246]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1237*/ meltfptr[1236]);
+ meltgc_touch ( /*_.VALDATA___V1254*/ meltfptr[1253]);
/*putupl#522 */
melt_assertmsg ("putupl #522 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/ meltfptr[1238])) ==
+ ( /*_.VALTUP___V1256*/ meltfptr[1255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #522 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/
- meltfptr[1238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1239*/ meltfptr[1238]))->tabval[0] =
+ ( /*_.VALTUP___V1256*/
+ meltfptr[1255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1256*/ meltfptr[1255]))->tabval[0] =
(melt_ptr_t) ( /*multacc */
(melt_multiple_nth
(( /*fieldacc */
@@ -61368,7352 +62125,7482 @@ warmelt_normatch_initialmeltchunk_21 (struct frame_start_module_melt_st
/*putupl#523 */
melt_assertmsg ("putupl #523 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/ meltfptr[1238])) ==
+ ( /*_.VALTUP___V1256*/ meltfptr[1255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #523 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/
- meltfptr[1238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1239*/ meltfptr[1238]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]);
+ ( /*_.VALTUP___V1256*/
+ meltfptr[1255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1256*/ meltfptr[1255]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]);
/*putupl#524 */
melt_assertmsg ("putupl #524 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/ meltfptr[1238])) ==
+ ( /*_.VALTUP___V1256*/ meltfptr[1255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #524 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/
- meltfptr[1238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1239*/ meltfptr[1238]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]);
+ ( /*_.VALTUP___V1256*/
+ meltfptr[1255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1256*/ meltfptr[1255]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]);
/*putupl#525 */
melt_assertmsg ("putupl #525 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/ meltfptr[1238])) ==
+ ( /*_.VALTUP___V1256*/ meltfptr[1255])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #525 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1239*/
- meltfptr[1238]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1239*/ meltfptr[1238]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1237*/ meltfptr[1236]);
+ ( /*_.VALTUP___V1256*/
+ meltfptr[1255]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1256*/ meltfptr[1255]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1239*/ meltfptr[1238]);
+ meltgc_touch ( /*_.VALTUP___V1256*/ meltfptr[1255]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/ meltfptr[1229]))
+ ( /*_.VALDATA___V1247*/ meltfptr[1246]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1230*/
- meltfptr[1229]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))->
+ ( /*_.VALDATA___V1247*/
+ meltfptr[1246]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1239*/ meltfptr[1238]);
+ /*_.VALTUP___V1256*/ meltfptr[1255]);
- MELT_LOCATION ("warmelt-normatch.melt:4988:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1230*/ meltfptr[1229]);
+ meltgc_touch ( /*_.VALDATA___V1247*/ meltfptr[1246]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/ meltfptr[1239]))
+ ( /*_.VALDATA___V1257*/ meltfptr[1256]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/
- meltfptr[1239]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]))->
+ ( /*_.VALDATA___V1257*/
+ meltfptr[1256]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1241*/ meltfptr[1240]);
+ /*_.VALSTR___V1258*/ meltfptr[1257]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1240*/ meltfptr[1239]);
+ meltgc_touch ( /*_.VALDATA___V1257*/ meltfptr[1256]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/ meltfptr[1241]))
+ ( /*_.VALDATA___V1259*/ meltfptr[1258]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/
- meltfptr[1241]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]))->
+ ( /*_.VALDATA___V1259*/
+ meltfptr[1258]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1243*/ meltfptr[1242]);
+ /*_.VALSTR___V1260*/ meltfptr[1259]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1242*/ meltfptr[1241]);
+ meltgc_touch ( /*_.VALDATA___V1259*/ meltfptr[1258]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/ meltfptr[1243]))
+ ( /*_.VALDATA___V1261*/ meltfptr[1260]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/
- meltfptr[1243]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]))->
+ ( /*_.VALDATA___V1261*/
+ meltfptr[1260]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1245*/ meltfptr[1244]);
+ /*_.VALSTR___V1262*/ meltfptr[1261]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1244*/ meltfptr[1243]);
+ meltgc_touch ( /*_.VALDATA___V1261*/ meltfptr[1260]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/ meltfptr[1245]))
+ ( /*_.VALDATA___V1263*/ meltfptr[1262]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/
- meltfptr[1245]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]))->
+ ( /*_.VALDATA___V1263*/
+ meltfptr[1262]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1263*/ meltfptr[1262]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1247*/ meltfptr[1246]);
+ /*_.VALSTR___V1264*/ meltfptr[1263]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1246*/ meltfptr[1245]);
+ meltgc_touch ( /*_.VALDATA___V1263*/ meltfptr[1262]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]))
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/
- meltfptr[1247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))->
+ ( /*_.VALDATA___V1265*/
+ meltfptr[1264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1249*/ meltfptr[1248]);
+ /*_.VALSTR___V1266*/ meltfptr[1265]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]))
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(4 >= 0
&& 4 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/
- meltfptr[1247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))->
+ ( /*_.VALDATA___V1265*/
+ meltfptr[1264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
obj_vartab[4] = (melt_ptr_t) (
/*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*putupl#526 */
melt_assertmsg ("putupl #526 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1250*/ meltfptr[1249])) ==
+ ( /*_.VALTUP___V1267*/ meltfptr[1266])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #526 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1250*/
- meltfptr[1249]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1250*/ meltfptr[1249]))->tabval[0] =
+ ( /*_.VALTUP___V1267*/
+ meltfptr[1266]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1267*/ meltfptr[1266]))->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1250*/ meltfptr[1249]);
+ meltgc_touch ( /*_.VALTUP___V1267*/ meltfptr[1266]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]))
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(5 >= 0
&& 5 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/
- meltfptr[1247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))->
+ ( /*_.VALDATA___V1265*/
+ meltfptr[1264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
obj_vartab[5] = (melt_ptr_t) (
- /*_.VALTUP___V1250*/ meltfptr[1249]);
+ /*_.VALTUP___V1267*/ meltfptr[1266]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1251*/ meltfptr[1250]))
+ ( /*_.VALDATA___V1268*/ meltfptr[1267]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1251*/
- meltfptr[1250]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1251*/ meltfptr[1250]))->
+ ( /*_.VALDATA___V1268*/
+ meltfptr[1267]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1252*/ meltfptr[1251]);
+ /*_.VALSTR___V1269*/ meltfptr[1268]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1251*/ meltfptr[1250]))
+ ( /*_.VALDATA___V1268*/ meltfptr[1267]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1251*/
- meltfptr[1250]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1251*/ meltfptr[1250]))->
+ ( /*_.VALDATA___V1268*/
+ meltfptr[1267]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1251*/ meltfptr[1250]);
+ meltgc_touch ( /*_.VALDATA___V1268*/ meltfptr[1267]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1253*/ meltfptr[1252]))
+ ( /*_.VALDATA___V1270*/ meltfptr[1269]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1253*/
- meltfptr[1252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]))->
+ ( /*_.VALDATA___V1270*/
+ meltfptr[1269]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1254*/ meltfptr[1253]);
+ /*_.VALSTR___V1271*/ meltfptr[1270]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1253*/ meltfptr[1252]))
+ ( /*_.VALDATA___V1270*/ meltfptr[1269]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1253*/
- meltfptr[1252]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]))->
+ ( /*_.VALDATA___V1270*/
+ meltfptr[1269]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1253*/ meltfptr[1252]);
+ meltgc_touch ( /*_.VALDATA___V1270*/ meltfptr[1269]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1255*/ meltfptr[1254]))
+ ( /*_.VALDATA___V1272*/ meltfptr[1271]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1255*/
- meltfptr[1254]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))->
+ ( /*_.VALDATA___V1272*/
+ meltfptr[1271]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1256*/ meltfptr[1255]);
+ /*_.VALSTR___V1273*/ meltfptr[1272]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1255*/ meltfptr[1254]))
+ ( /*_.VALDATA___V1272*/ meltfptr[1271]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1255*/
- meltfptr[1254]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))->
+ ( /*_.VALDATA___V1272*/
+ meltfptr[1271]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1255*/ meltfptr[1254]);
+ meltgc_touch ( /*_.VALDATA___V1272*/ meltfptr[1271]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1257*/ meltfptr[1256]))
+ ( /*_.VALDATA___V1274*/ meltfptr[1273]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1257*/
- meltfptr[1256]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]))->
+ ( /*_.VALDATA___V1274*/
+ meltfptr[1273]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1258*/ meltfptr[1257]);
+ /*_.VALSTR___V1275*/ meltfptr[1274]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1257*/ meltfptr[1256]))
+ ( /*_.VALDATA___V1274*/ meltfptr[1273]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1257*/
- meltfptr[1256]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]))->
+ ( /*_.VALDATA___V1274*/
+ meltfptr[1273]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1257*/ meltfptr[1256]);
+ meltgc_touch ( /*_.VALDATA___V1274*/ meltfptr[1273]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1259*/ meltfptr[1258]))
+ ( /*_.VALDATA___V1276*/ meltfptr[1275]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1259*/
- meltfptr[1258]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]))->
+ ( /*_.VALDATA___V1276*/
+ meltfptr[1275]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1260*/ meltfptr[1259]);
+ /*_.VALSTR___V1277*/ meltfptr[1276]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1259*/ meltfptr[1258]))
+ ( /*_.VALDATA___V1276*/ meltfptr[1275]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1259*/
- meltfptr[1258]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]))->
+ ( /*_.VALDATA___V1276*/
+ meltfptr[1275]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1259*/ meltfptr[1258]);
+ meltgc_touch ( /*_.VALDATA___V1276*/ meltfptr[1275]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1261*/ meltfptr[1260]))
+ ( /*_.VALDATA___V1278*/ meltfptr[1277]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1261*/
- meltfptr[1260]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))->
+ ( /*_.VALDATA___V1278*/
+ meltfptr[1277]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1262*/ meltfptr[1261]);
+ /*_.VALSTR___V1279*/ meltfptr[1278]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1261*/ meltfptr[1260]))
+ ( /*_.VALDATA___V1278*/ meltfptr[1277]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1261*/
- meltfptr[1260]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))->
+ ( /*_.VALDATA___V1278*/
+ meltfptr[1277]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1261*/ meltfptr[1260]);
+ meltgc_touch ( /*_.VALDATA___V1278*/ meltfptr[1277]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1263*/ meltfptr[1262]))
+ ( /*_.VALDATA___V1280*/ meltfptr[1279]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1263*/
- meltfptr[1262]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1263*/ meltfptr[1262]))->
+ ( /*_.VALDATA___V1280*/
+ meltfptr[1279]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1264*/ meltfptr[1263]);
+ /*_.VALSTR___V1281*/ meltfptr[1280]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1263*/ meltfptr[1262]))
+ ( /*_.VALDATA___V1280*/ meltfptr[1279]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1263*/
- meltfptr[1262]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1263*/ meltfptr[1262]))->
+ ( /*_.VALDATA___V1280*/
+ meltfptr[1279]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1263*/ meltfptr[1262]);
+ meltgc_touch ( /*_.VALDATA___V1280*/ meltfptr[1279]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1265*/ meltfptr[1264]))
+ ( /*_.VALDATA___V1282*/ meltfptr[1281]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1265*/
- meltfptr[1264]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
+ ( /*_.VALDATA___V1282*/
+ meltfptr[1281]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1266*/ meltfptr[1265]);
+ /*_.VALSTR___V1283*/ meltfptr[1282]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_21 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_22 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1265*/ meltfptr[1264]))
+ ( /*_.VALDATA___V1282*/ meltfptr[1281]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1265*/
- meltfptr[1264]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
+ ( /*_.VALDATA___V1282*/
+ meltfptr[1281]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1265*/ meltfptr[1264]);
+ meltgc_touch ( /*_.VALDATA___V1282*/ meltfptr[1281]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/ meltfptr[1266]))
+ ( /*_.VALDATA___V1284*/ meltfptr[1283]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/
- meltfptr[1266]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1267*/ meltfptr[1266]))->
+ ( /*_.VALDATA___V1284*/
+ meltfptr[1283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1268*/ meltfptr[1267]);
+ /*_.VALSTR___V1285*/ meltfptr[1284]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/ meltfptr[1266]))
+ ( /*_.VALDATA___V1284*/ meltfptr[1283]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1267*/
- meltfptr[1266]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1267*/ meltfptr[1266]))->
+ ( /*_.VALDATA___V1284*/
+ meltfptr[1283]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1267*/ meltfptr[1266]);
+ meltgc_touch ( /*_.VALDATA___V1284*/ meltfptr[1283]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1269*/ meltfptr[1268]))
+ ( /*_.VALDATA___V1286*/ meltfptr[1285]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1269*/
- meltfptr[1268]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1269*/ meltfptr[1268]))->
+ ( /*_.VALDATA___V1286*/
+ meltfptr[1285]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1270*/ meltfptr[1269]);
+ /*_.VALSTR___V1287*/ meltfptr[1286]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1269*/ meltfptr[1268]))
+ ( /*_.VALDATA___V1286*/ meltfptr[1285]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(2 >= 0
&& 2 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1269*/
- meltfptr[1268]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1269*/ meltfptr[1268]))->
+ ( /*_.VALDATA___V1286*/
+ meltfptr[1285]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]))->
obj_vartab[2] = (melt_ptr_t) (
- /*_.VALDATA___V1248*/ meltfptr[1247]);
+ /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1269*/ meltfptr[1268]);
+ meltgc_touch ( /*_.VALDATA___V1286*/ meltfptr[1285]);
/*putupl#527 */
melt_assertmsg ("putupl #527 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #527 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1251*/ meltfptr[1250]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]);
/*putupl#528 */
melt_assertmsg ("putupl #528 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #528 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]);
/*putupl#529 */
melt_assertmsg ("putupl #529 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #529 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]);
/*putupl#530 */
melt_assertmsg ("putupl #530 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #530 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]);
/*putupl#531 */
melt_assertmsg ("putupl #531 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #531 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]);
/*putupl#532 */
melt_assertmsg ("putupl #532 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #532 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]);
/*putupl#533 */
melt_assertmsg ("putupl #533 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #533 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1263*/ meltfptr[1262]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]);
/*putupl#534 */
melt_assertmsg ("putupl #534 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #534 checkoff",
(7 >= 0
&& 7 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]);
/*putupl#535 */
melt_assertmsg ("putupl #535 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #535 checkoff",
(8 >= 0
&& 8 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1267*/ meltfptr[1266]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]);
/*putupl#536 */
melt_assertmsg ("putupl #536 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/ meltfptr[1270])) ==
+ ( /*_.VALTUP___V1288*/ meltfptr[1287])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #536 checkoff",
(9 >= 0
&& 9 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1271*/
- meltfptr[1270]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1271*/ meltfptr[1270]))->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V1269*/ meltfptr[1268]);
+ ( /*_.VALTUP___V1288*/
+ meltfptr[1287]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1288*/ meltfptr[1287]))->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1271*/ meltfptr[1270]);
+ meltgc_touch ( /*_.VALTUP___V1288*/ meltfptr[1287]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/ meltfptr[1247]))
+ ( /*_.VALDATA___V1265*/ meltfptr[1264]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(6 >= 0
&& 6 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1248*/
- meltfptr[1247]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))->
+ ( /*_.VALDATA___V1265*/
+ meltfptr[1264]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))->
obj_vartab[6] = (melt_ptr_t) (
- /*_.VALTUP___V1271*/ meltfptr[1270]);
+ /*_.VALTUP___V1288*/ meltfptr[1287]);
- MELT_LOCATION ("warmelt-normatch.melt:4997:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5106:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ meltgc_touch ( /*_.VALDATA___V1265*/ meltfptr[1264]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1272*/ meltfptr[1271]))
+ ( /*_.VALDATA___V1289*/ meltfptr[1288]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1272*/
- meltfptr[1271]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]))->
+ ( /*_.VALDATA___V1289*/
+ meltfptr[1288]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1289*/ meltfptr[1288]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1273*/ meltfptr[1272]);
+ /*_.VALSTR___V1290*/ meltfptr[1289]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1272*/ meltfptr[1271]);
+ meltgc_touch ( /*_.VALDATA___V1289*/ meltfptr[1288]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1274*/ meltfptr[1273]))
+ ( /*_.VALDATA___V1291*/ meltfptr[1290]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1274*/
- meltfptr[1273]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]))->
+ ( /*_.VALDATA___V1291*/
+ meltfptr[1290]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1291*/ meltfptr[1290]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1275*/ meltfptr[1274]);
+ /*_.VALSTR___V1292*/ meltfptr[1291]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1274*/ meltfptr[1273]);
+ meltgc_touch ( /*_.VALDATA___V1291*/ meltfptr[1290]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1276*/ meltfptr[1275]))
+ ( /*_.VALDATA___V1293*/ meltfptr[1292]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1276*/
- meltfptr[1275]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]))->
+ ( /*_.VALDATA___V1293*/
+ meltfptr[1292]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1293*/ meltfptr[1292]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1277*/ meltfptr[1276]);
+ /*_.VALSTR___V1294*/ meltfptr[1293]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1276*/ meltfptr[1275]);
+ meltgc_touch ( /*_.VALDATA___V1293*/ meltfptr[1292]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1278*/ meltfptr[1277]))
+ ( /*_.VALDATA___V1295*/ meltfptr[1294]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1278*/
- meltfptr[1277]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]))->
+ ( /*_.VALDATA___V1295*/
+ meltfptr[1294]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1279*/ meltfptr[1278]);
+ /*_.VALSTR___V1296*/ meltfptr[1295]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1278*/ meltfptr[1277]);
+ meltgc_touch ( /*_.VALDATA___V1295*/ meltfptr[1294]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1280*/ meltfptr[1279]))
+ ( /*_.VALDATA___V1297*/ meltfptr[1296]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1280*/
- meltfptr[1279]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]))->
+ ( /*_.VALDATA___V1297*/
+ meltfptr[1296]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1297*/ meltfptr[1296]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1281*/ meltfptr[1280]);
+ /*_.VALSTR___V1298*/ meltfptr[1297]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1280*/ meltfptr[1279]);
+ meltgc_touch ( /*_.VALDATA___V1297*/ meltfptr[1296]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1282*/ meltfptr[1281]))
+ ( /*_.VALDATA___V1299*/ meltfptr[1298]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1282*/
- meltfptr[1281]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]))->
+ ( /*_.VALDATA___V1299*/
+ meltfptr[1298]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1283*/ meltfptr[1282]);
+ /*_.VALSTR___V1300*/ meltfptr[1299]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1282*/ meltfptr[1281]);
+ meltgc_touch ( /*_.VALDATA___V1299*/ meltfptr[1298]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1284*/ meltfptr[1283]))
+ ( /*_.VALDATA___V1301*/ meltfptr[1300]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1284*/
- meltfptr[1283]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]))->
+ ( /*_.VALDATA___V1301*/
+ meltfptr[1300]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1301*/ meltfptr[1300]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1285*/ meltfptr[1284]);
+ /*_.VALSTR___V1302*/ meltfptr[1301]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1284*/ meltfptr[1283]);
+ meltgc_touch ( /*_.VALDATA___V1301*/ meltfptr[1300]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1286*/ meltfptr[1285]))
+ ( /*_.VALDATA___V1303*/ meltfptr[1302]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1286*/
- meltfptr[1285]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]))->
+ ( /*_.VALDATA___V1303*/
+ meltfptr[1302]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1303*/ meltfptr[1302]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1287*/ meltfptr[1286]);
+ /*_.VALSTR___V1304*/ meltfptr[1303]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1286*/ meltfptr[1285]);
+ meltgc_touch ( /*_.VALDATA___V1303*/ meltfptr[1302]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1288*/ meltfptr[1287]))
+ ( /*_.VALDATA___V1305*/ meltfptr[1304]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1288*/
- meltfptr[1287]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]))->
+ ( /*_.VALDATA___V1305*/
+ meltfptr[1304]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1289*/ meltfptr[1288]);
+ /*_.VALSTR___V1306*/ meltfptr[1305]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1288*/ meltfptr[1287]);
+ meltgc_touch ( /*_.VALDATA___V1305*/ meltfptr[1304]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1290*/ meltfptr[1289]))
+ ( /*_.VALDATA___V1307*/ meltfptr[1306]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1290*/
- meltfptr[1289]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]))->
+ ( /*_.VALDATA___V1307*/
+ meltfptr[1306]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1291*/ meltfptr[1290]);
+ /*_.VALSTR___V1308*/ meltfptr[1307]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1290*/ meltfptr[1289]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_21 */
+ meltgc_touch ( /*_.VALDATA___V1307*/ meltfptr[1306]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_22 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1292*/ meltfptr[1291]))
+ ( /*_.VALROUT___V1309*/ meltfptr[1308]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1203__ALTMATCH_NORMALIZE_FLAG#0",
+ ("putroutconst constnull.drout_1219__ALTMATCH_NORMALIZE_FLAG#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1309*/ meltfptr[1308])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1292*/ meltfptr[1291]))
+ ( /*_.VALROUT___V1309*/ meltfptr[1308]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1309*/ meltfptr[1308])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1292*/ meltfptr[1291]))
+ ( /*_.VALROUT___V1309*/ meltfptr[1308]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1309*/ meltfptr[1308])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1292*/ meltfptr[1291]))
+ ( /*_.VALROUT___V1309*/ meltfptr[1308]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V950*/ meltfptr[949]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1292*/ meltfptr[1291])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
+ NULL != /*_.VALDATA___V953*/ meltfptr[952]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1309*/ meltfptr[1308])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
- MELT_LOCATION ("warmelt-normatch.melt:5029:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5138:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1292*/ meltfptr[1291]);
+ meltgc_touch ( /*_.VALROUT___V1309*/ meltfptr[1308]);
- /*putclosurout#79 */
- melt_assertmsg ("putclosrout#79 checkclo",
+ /*putclosurout#87 */
+ melt_assertmsg ("putclosrout#87 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1293*/ meltfptr[1292])) ==
+ ( /*_.VALCLO___V1310*/ meltfptr[1309])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#79 checkrout",
+ melt_assertmsg ("putclosrout#87 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1292*/ meltfptr[1291]))
+ ( /*_.VALROUT___V1309*/ meltfptr[1308]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1293*/ meltfptr[1292])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1292*/ meltfptr[1291]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1310*/ meltfptr[1309])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1309*/ meltfptr[1308]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1293*/ meltfptr[1292]);
+ meltgc_touch ( /*_.VALCLO___V1310*/ meltfptr[1309]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1294*/ meltfptr[1293]))
+ ( /*_.VALDATA___V1311*/ meltfptr[1310]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1294*/
- meltfptr[1293]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]))->
+ ( /*_.VALDATA___V1311*/
+ meltfptr[1310]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1295*/ meltfptr[1294]);
+ /*_.VALSTR___V1312*/ meltfptr[1311]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1294*/ meltfptr[1293]);
+ meltgc_touch ( /*_.VALDATA___V1311*/ meltfptr[1310]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1296*/ meltfptr[1295]))
+ ( /*_.VALDATA___V1313*/ meltfptr[1312]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1296*/
- meltfptr[1295]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]))->
+ ( /*_.VALDATA___V1313*/
+ meltfptr[1312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V998*/ meltfptr[997]);
+ /*_.VALDATA___V1001*/ meltfptr[1000]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1296*/ meltfptr[1295]))
+ ( /*_.VALDATA___V1313*/ meltfptr[1312]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1296*/
- meltfptr[1295]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]))->
+ ( /*_.VALDATA___V1313*/
+ meltfptr[1312]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1296*/ meltfptr[1295]);
+ meltgc_touch ( /*_.VALDATA___V1313*/ meltfptr[1312]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/ meltfptr[1296]))
+ ( /*_.VALDATA___V1314*/ meltfptr[1313]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/
- meltfptr[1296]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1297*/ meltfptr[1296]))->
+ ( /*_.VALDATA___V1314*/
+ meltfptr[1313]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1298*/ meltfptr[1297]);
+ /*_.VALSTR___V1315*/ meltfptr[1314]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1297*/ meltfptr[1296]);
+ meltgc_touch ( /*_.VALDATA___V1314*/ meltfptr[1313]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1299*/ meltfptr[1298]))
+ ( /*_.VALDATA___V1316*/ meltfptr[1315]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1299*/
- meltfptr[1298]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]))->
+ ( /*_.VALDATA___V1316*/
+ meltfptr[1315]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1297*/ meltfptr[1296]);
+ /*_.VALDATA___V1314*/ meltfptr[1313]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1299*/ meltfptr[1298]))
+ ( /*_.VALDATA___V1316*/ meltfptr[1315]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1299*/
- meltfptr[1298]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]))->
+ ( /*_.VALDATA___V1316*/
+ meltfptr[1315]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1299*/ meltfptr[1298]);
+ meltgc_touch ( /*_.VALDATA___V1316*/ meltfptr[1315]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1300*/ meltfptr[1299]))
+ ( /*_.VALDATA___V1317*/ meltfptr[1316]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1300*/
- meltfptr[1299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]))->
+ ( /*_.VALDATA___V1317*/
+ meltfptr[1316]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1081*/ meltfptr[1080]);
+ /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1300*/ meltfptr[1299]))
+ ( /*_.VALDATA___V1317*/ meltfptr[1316]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1300*/
- meltfptr[1299]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]))->
+ ( /*_.VALDATA___V1317*/
+ meltfptr[1316]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1300*/ meltfptr[1299]);
+ meltgc_touch ( /*_.VALDATA___V1317*/ meltfptr[1316]);
/*putupl#537 */
melt_assertmsg ("putupl #537 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/ meltfptr[1300])) ==
+ ( /*_.VALTUP___V1318*/ meltfptr[1317])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #537 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/
- meltfptr[1300]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1301*/ meltfptr[1300]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]);
+ ( /*_.VALTUP___V1318*/
+ meltfptr[1317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1318*/ meltfptr[1317]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]);
/*putupl#538 */
melt_assertmsg ("putupl #538 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/ meltfptr[1300])) ==
+ ( /*_.VALTUP___V1318*/ meltfptr[1317])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #538 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/
- meltfptr[1300]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1301*/ meltfptr[1300]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]);
+ ( /*_.VALTUP___V1318*/
+ meltfptr[1317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1318*/ meltfptr[1317]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]);
/*putupl#539 */
melt_assertmsg ("putupl #539 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/ meltfptr[1300])) ==
+ ( /*_.VALTUP___V1318*/ meltfptr[1317])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #539 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1301*/
- meltfptr[1300]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1301*/ meltfptr[1300]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]);
+ ( /*_.VALTUP___V1318*/
+ meltfptr[1317]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1318*/ meltfptr[1317]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1301*/ meltfptr[1300]);
+ meltgc_touch ( /*_.VALTUP___V1318*/ meltfptr[1317]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1302*/ meltfptr[1301]))
+ ( /*_.VALDATA___V1319*/ meltfptr[1318]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1302*/
- meltfptr[1301]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301]))->
+ ( /*_.VALDATA___V1319*/
+ meltfptr[1318]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1303*/ meltfptr[1302]);
+ /*_.VALSTR___V1320*/ meltfptr[1319]);
- MELT_LOCATION ("warmelt-normatch.melt:5052:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5161:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1302*/ meltfptr[1301]);
+ meltgc_touch ( /*_.VALDATA___V1319*/ meltfptr[1318]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#0",
+ ("putroutconst constnull.drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1304*/ meltfptr[1303])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1304*/ meltfptr[1303])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#2",
+ ("putroutconst constnull.drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#2",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1304*/ meltfptr[1303])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[2] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1304*/ meltfptr[1303])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1215__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#4",
+ ("putroutconst constnull.drout_1231__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#4",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1304*/ meltfptr[1303])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:5061:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5170:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1304*/ meltfptr[1303]);
+ meltgc_touch ( /*_.VALROUT___V1321*/ meltfptr[1320]);
- /*putclosurout#80 */
- melt_assertmsg ("putclosrout#80 checkclo",
+ /*putclosurout#88 */
+ melt_assertmsg ("putclosrout#88 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1305*/ meltfptr[1304])) ==
+ ( /*_.VALCLO___V1322*/ meltfptr[1321])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#80 checkrout",
+ melt_assertmsg ("putclosrout#88 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1304*/ meltfptr[1303]))
+ ( /*_.VALROUT___V1321*/ meltfptr[1320]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1305*/ meltfptr[1304])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1304*/ meltfptr[1303]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1322*/ meltfptr[1321])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1321*/ meltfptr[1320]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1305*/ meltfptr[1304]);
+ meltgc_touch ( /*_.VALCLO___V1322*/ meltfptr[1321]);
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1306*/ meltfptr[1305]))
+ ( /*_.VALROUT___V1323*/ meltfptr[1322]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1217__MATCH_STEP_INDEX#0",
+ melt_checkmsg ("putroutconst constnull.drout_1233__MATCH_STEP_INDEX#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1306*/ meltfptr[1305]))
+ ( /*_.VALROUT___V1323*/ meltfptr[1322]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1306*/ meltfptr[1305]))
+ ( /*_.VALROUT___V1323*/ meltfptr[1322]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1306*/ meltfptr[1305]))
+ ( /*_.VALROUT___V1323*/ meltfptr[1322]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1305*/ meltfptr[1304]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1306*/ meltfptr[1305])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1305*/ meltfptr[1304]);
+ NULL != /*_.VALCLO___V1322*/ meltfptr[1321]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1322*/ meltfptr[1321]);
- MELT_LOCATION ("warmelt-normatch.melt:5095:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5204:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1306*/ meltfptr[1305]);
+ meltgc_touch ( /*_.VALROUT___V1323*/ meltfptr[1322]);
- /*putclosurout#81 */
- melt_assertmsg ("putclosrout#81 checkclo",
+ /*putclosurout#89 */
+ melt_assertmsg ("putclosrout#89 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1307*/ meltfptr[1306])) ==
+ ( /*_.VALCLO___V1324*/ meltfptr[1323])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#81 checkrout",
+ melt_assertmsg ("putclosrout#89 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1306*/ meltfptr[1305]))
+ ( /*_.VALROUT___V1323*/ meltfptr[1322]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1307*/ meltfptr[1306])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1306*/ meltfptr[1305]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1324*/ meltfptr[1323])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1307*/ meltfptr[1306]);
+ meltgc_touch ( /*_.VALCLO___V1324*/ meltfptr[1323]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1219__COMPLETE_NORMSTEP_IF_LAST#0",
+ ("putroutconst constnull.drout_1235__COMPLETE_NORMSTEP_IF_LAST#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1305*/ meltfptr[1304]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1305*/ meltfptr[1304]);
+ NULL != /*_.VALCLO___V1322*/ meltfptr[1321]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1322*/ meltfptr[1321]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1307*/ meltfptr[1306]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1307*/ meltfptr[1306]);
+ NULL != /*_.VALCLO___V1324*/ meltfptr[1323]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1324*/ meltfptr[1323]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1219__COMPLETE_NORMSTEP_IF_LAST#7",
+ ("putroutconst constnull.drout_1235__COMPLETE_NORMSTEP_IF_LAST#7",
NULL != ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V964*/ meltfptr[963]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
+ NULL != /*_.VALDATA___V967*/ meltfptr[966]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1218*/ meltfptr[1217]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]);
+ NULL != /*_.VALDATA___V1235*/ meltfptr[1234]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V1235*/ meltfptr[1234]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1224*/ meltfptr[1223]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]);
+ NULL != /*_.VALDATA___V1241*/ meltfptr[1240]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1219__COMPLETE_NORMSTEP_IF_LAST#11",
+ ("putroutconst constnull.drout_1235__COMPLETE_NORMSTEP_IF_LAST#11",
NULL != ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[11] =
(melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1219__COMPLETE_NORMSTEP_IF_LAST#12",
+ ("putroutconst constnull.drout_1235__COMPLETE_NORMSTEP_IF_LAST#12",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1308*/ meltfptr[1307])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1325*/ meltfptr[1324])->tabval[12] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:5121:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5230:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1308*/ meltfptr[1307]);
+ meltgc_touch ( /*_.VALROUT___V1325*/ meltfptr[1324]);
- /*putclosurout#82 */
- melt_assertmsg ("putclosrout#82 checkclo",
+ /*putclosurout#90 */
+ melt_assertmsg ("putclosrout#90 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1309*/ meltfptr[1308])) ==
+ ( /*_.VALCLO___V1326*/ meltfptr[1325])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#82 checkrout",
+ melt_assertmsg ("putclosrout#90 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1308*/ meltfptr[1307]))
+ ( /*_.VALROUT___V1325*/ meltfptr[1324]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1309*/ meltfptr[1308])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1308*/ meltfptr[1307]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1326*/ meltfptr[1325])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1325*/ meltfptr[1324]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ meltgc_touch ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1310*/ meltfptr[1309]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1221__NORMSTEP_ANYRECV#0",
+ melt_checkmsg ("putroutconst constnull.drout_1237__NORMSTEP_ANYRECV#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1310*/ meltfptr[1309]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1310*/ meltfptr[1309]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1221__NORMSTEP_ANYRECV#2",
+ melt_checkmsg ("putroutconst constnull.drout_1237__NORMSTEP_ANYRECV#2",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1310*/ meltfptr[1309])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:5200:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5309:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1310*/ meltfptr[1309]);
+ meltgc_touch ( /*_.VALROUT___V1327*/ meltfptr[1326]);
- /*putclosurout#83 */
- melt_assertmsg ("putclosrout#83 checkclo",
+ /*putclosurout#91 */
+ melt_assertmsg ("putclosrout#91 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1311*/ meltfptr[1310])) ==
+ ( /*_.VALCLO___V1328*/ meltfptr[1327])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#83 checkrout",
+ melt_assertmsg ("putclosrout#91 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1310*/ meltfptr[1309]))
+ ( /*_.VALROUT___V1327*/ meltfptr[1326]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1311*/ meltfptr[1310])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1310*/ meltfptr[1309]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1328*/ meltfptr[1327])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1311*/ meltfptr[1310]);
+ meltgc_touch ( /*_.VALCLO___V1328*/ meltfptr[1327]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1223__NORMSTEP_MFLAGSET#0",
+ melt_checkmsg ("putroutconst constnull.drout_1239__NORMSTEP_MFLAGSET#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V804*/ meltfptr[803]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]);
+ NULL != /*_.VALDATA___V807*/ meltfptr[806]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1310__ALTMATCH_NORMALIZE_STEP#0",
+ ("putroutconst constnull.drout_1328__ALTMATCH_NORMALIZE_STEP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1331*/ meltfptr[1330])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1331*/ meltfptr[1330])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1331*/ meltfptr[1330])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1310__ALTMATCH_NORMALIZE_STEP#3",
+ ("putroutconst constnull.drout_1328__ALTMATCH_NORMALIZE_STEP#3",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1331*/ meltfptr[1330])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1176*/ meltfptr[1175]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1314*/ meltfptr[1313])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ NULL != /*_.VALDATA___V1193*/ meltfptr[1192]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1331*/ meltfptr[1330])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]);
- MELT_LOCATION ("warmelt-normatch.melt:6045:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6196:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1314*/ meltfptr[1313]);
+ meltgc_touch ( /*_.VALROUT___V1331*/ meltfptr[1330]);
- /*putclosurout#84 */
- melt_assertmsg ("putclosrout#84 checkclo",
+ /*putclosurout#92 */
+ melt_assertmsg ("putclosrout#92 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1313*/ meltfptr[1312])) ==
+ ( /*_.VALCLO___V1330*/ meltfptr[1329])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#84 checkrout",
+ melt_assertmsg ("putclosrout#92 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1314*/ meltfptr[1313]))
+ ( /*_.VALROUT___V1331*/ meltfptr[1330]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1313*/ meltfptr[1312])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1314*/ meltfptr[1313]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1330*/ meltfptr[1329])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1331*/ meltfptr[1330]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ meltgc_touch ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1293*/ meltfptr[1292]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1293*/ meltfptr[1292]);
+ NULL != /*_.VALCLO___V1310*/ meltfptr[1309]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1310*/ meltfptr[1309]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1223__NORMSTEP_MFLAGSET#5",
+ melt_checkmsg ("putroutconst constnull.drout_1239__NORMSTEP_MFLAGSET#5",
NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1223__NORMSTEP_MFLAGSET#6",
- NULL != ( /*_.VALBXINT___V1315*/ meltfptr[1314]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[6] =
- (melt_ptr_t) ( /*_.VALBXINT___V1315*/ meltfptr[1314]);
+ melt_checkmsg ("putroutconst constnull.drout_1239__NORMSTEP_MFLAGSET#6",
+ NULL != ( /*_.VALBXINT___V1332*/ meltfptr[1331]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1332*/ meltfptr[1331]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1312*/ meltfptr[1311])->tabval[8] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1329*/ meltfptr[1328])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5213:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5322:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1312*/ meltfptr[1311]);
+ meltgc_touch ( /*_.VALROUT___V1329*/ meltfptr[1328]);
- /*putclosurout#85 */
- melt_assertmsg ("putclosrout#85 checkclo",
+ /*putclosurout#93 */
+ melt_assertmsg ("putclosrout#93 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1316*/ meltfptr[1315])) ==
+ ( /*_.VALCLO___V1333*/ meltfptr[1332])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#85 checkrout",
+ melt_assertmsg ("putclosrout#93 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1312*/ meltfptr[1311]))
+ ( /*_.VALROUT___V1329*/ meltfptr[1328]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1316*/ meltfptr[1315])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1312*/ meltfptr[1311]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1333*/ meltfptr[1332])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1329*/ meltfptr[1328]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1316*/ meltfptr[1315]);
+ meltgc_touch ( /*_.VALCLO___V1333*/ meltfptr[1332]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1317*/ meltfptr[1316]))
+ ( /*_.VALDATA___V1334*/ meltfptr[1333]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1317*/
- meltfptr[1316]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]))->
+ ( /*_.VALDATA___V1334*/
+ meltfptr[1333]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1318*/ meltfptr[1317]);
+ /*_.VALSTR___V1335*/ meltfptr[1334]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1317*/ meltfptr[1316]);
+ meltgc_touch ( /*_.VALDATA___V1334*/ meltfptr[1333]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#0",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V820*/ meltfptr[819]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]);
+ NULL != /*_.VALDATA___V823*/ meltfptr[822]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]);
+
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_22 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_23 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1293*/ meltfptr[1292]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1293*/ meltfptr[1292]);
+ NULL != /*_.VALCLO___V1310*/ meltfptr[1309]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1310*/ meltfptr[1309]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#5",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#5",
NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#7",
- NULL != ( /*_.VALBXINT___V1320*/ meltfptr[1319]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[7] =
- (melt_ptr_t) ( /*_.VALBXINT___V1320*/ meltfptr[1319]);
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#7",
+ NULL != ( /*_.VALBXINT___V1337*/ meltfptr[1336]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1337*/ meltfptr[1336]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#8",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#8",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#9",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#9",
NULL != ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1321*/ meltfptr[1320]))
+ ( /*_.VALDATA___V1338*/ meltfptr[1337]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1321*/
- meltfptr[1320]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320]))->
+ ( /*_.VALDATA___V1338*/
+ meltfptr[1337]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1322*/ meltfptr[1321]);
+ /*_.VALSTR___V1339*/ meltfptr[1338]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1321*/ meltfptr[1320]);
+ meltgc_touch ( /*_.VALDATA___V1338*/ meltfptr[1337]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#10",
- NULL != ( /*_.VALDATA___V1321*/ meltfptr[1320]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320]);
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#10",
+ NULL != ( /*_.VALDATA___V1338*/ meltfptr[1337]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#11",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#11",
NULL != ( /*_.CTYPE_LONG__V81*/ meltfptr[80]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V81*/ meltfptr[80]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#12",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#12",
NULL != ( /*_.DISCR_VERBATIM_STRING__V82*/ meltfptr[81]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V82*/ meltfptr[81]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1228__NORMSTEP_MFLAGCONJ#13",
+ melt_checkmsg ("putroutconst constnull.drout_1244__NORMSTEP_MFLAGCONJ#13",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[13] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1319*/ meltfptr[1318])->tabval[14] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1336*/ meltfptr[1335])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5346:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1319*/ meltfptr[1318]);
+ meltgc_touch ( /*_.VALROUT___V1336*/ meltfptr[1335]);
- /*putclosurout#86 */
- melt_assertmsg ("putclosrout#86 checkclo",
+ /*putclosurout#94 */
+ melt_assertmsg ("putclosrout#94 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1323*/ meltfptr[1322])) ==
+ ( /*_.VALCLO___V1340*/ meltfptr[1339])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#86 checkrout",
+ melt_assertmsg ("putclosrout#94 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1319*/ meltfptr[1318]))
+ ( /*_.VALROUT___V1336*/ meltfptr[1335]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1323*/ meltfptr[1322])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1319*/ meltfptr[1318]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1340*/ meltfptr[1339])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1336*/ meltfptr[1335]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1323*/ meltfptr[1322]);
+ meltgc_touch ( /*_.VALCLO___V1340*/ meltfptr[1339]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1324*/ meltfptr[1323]))
+ ( /*_.VALDATA___V1341*/ meltfptr[1340]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1324*/
- meltfptr[1323]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323]))->
+ ( /*_.VALDATA___V1341*/
+ meltfptr[1340]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1341*/ meltfptr[1340]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1325*/ meltfptr[1324]);
+ /*_.VALSTR___V1342*/ meltfptr[1341]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1324*/ meltfptr[1323]);
+ meltgc_touch ( /*_.VALDATA___V1341*/ meltfptr[1340]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1326*/ meltfptr[1325]))
+ ( /*_.VALDATA___V1343*/ meltfptr[1342]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1326*/
- meltfptr[1325]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325]))->
+ ( /*_.VALDATA___V1343*/
+ meltfptr[1342]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1343*/ meltfptr[1342]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1327*/ meltfptr[1326]);
+ /*_.VALSTR___V1344*/ meltfptr[1343]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1326*/ meltfptr[1325]);
+ meltgc_touch ( /*_.VALDATA___V1343*/ meltfptr[1342]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1328*/ meltfptr[1327]))
+ ( /*_.VALDATA___V1345*/ meltfptr[1344]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1328*/
- meltfptr[1327]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327]))->
+ ( /*_.VALDATA___V1345*/
+ meltfptr[1344]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1345*/ meltfptr[1344]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1329*/ meltfptr[1328]);
+ /*_.VALSTR___V1346*/ meltfptr[1345]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1328*/ meltfptr[1327]);
+ meltgc_touch ( /*_.VALDATA___V1345*/ meltfptr[1344]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#0",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V902*/ meltfptr[901]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]);
+ NULL != /*_.VALDATA___V905*/ meltfptr[904]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1312__ALTMATCH_NORMALIZE_MDATA#0",
+ ("putroutconst constnull.drout_1330__ALTMATCH_NORMALIZE_MDATA#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V708*/ meltfptr[707]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]);
+ NULL != /*_.VALDATA___V711*/ meltfptr[710]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1312__ALTMATCH_NORMALIZE_MDATA#4",
+ ("putroutconst constnull.drout_1330__ALTMATCH_NORMALIZE_MDATA#4",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V964*/ meltfptr[963]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
+ NULL != /*_.VALDATA___V967*/ meltfptr[966]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1312__ALTMATCH_NORMALIZE_MDATA#6",
+ ("putroutconst constnull.drout_1330__ALTMATCH_NORMALIZE_MDATA#6",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1212*/ meltfptr[1211]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1332*/ meltfptr[1331])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1212*/ meltfptr[1211]);
+ NULL != /*_.VALDATA___V1229*/ meltfptr[1228]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]);
- MELT_LOCATION ("warmelt-normatch.melt:6078:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6229:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1332*/ meltfptr[1331]);
+ meltgc_touch ( /*_.VALROUT___V1349*/ meltfptr[1348]);
- /*putclosurout#87 */
- melt_assertmsg ("putclosrout#87 checkclo",
+ /*putclosurout#95 */
+ melt_assertmsg ("putclosrout#95 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1331*/ meltfptr[1330])) ==
+ ( /*_.VALCLO___V1348*/ meltfptr[1347])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#87 checkrout",
+ melt_assertmsg ("putclosrout#95 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1332*/ meltfptr[1331]))
+ ( /*_.VALROUT___V1349*/ meltfptr[1348]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1331*/ meltfptr[1330])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1332*/ meltfptr[1331]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1348*/ meltfptr[1347])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ meltgc_touch ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#4",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#4",
NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
-
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_22 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_23 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#9",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#9",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[9] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#10",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#10",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#11",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#11",
NULL != ( /*_.CLASS_NREP_IFISA__V83*/ meltfptr[82]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V83*/ meltfptr[82]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#12",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#12",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[12] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1176*/ meltfptr[1175]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ NULL != /*_.VALDATA___V1193*/ meltfptr[1192]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#15",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#15",
NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V47*/ meltfptr[46]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V47*/ meltfptr[46]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#16",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#16",
NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#17",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#17",
NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#18",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#18",
NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[18] =
(melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#19",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#19",
NULL != ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1239__NORMSTEP_MTESTINSTANCE#20",
+ ("putroutconst constnull.drout_1255__NORMSTEP_MTESTINSTANCE#20",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1330*/ meltfptr[1329])->tabval[20] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[20] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:5300:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5409:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1330*/ meltfptr[1329]);
+ meltgc_touch ( /*_.VALROUT___V1347*/ meltfptr[1346]);
- /*putclosurout#88 */
- melt_assertmsg ("putclosrout#88 checkclo",
+ /*putclosurout#96 */
+ melt_assertmsg ("putclosrout#96 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1333*/ meltfptr[1332])) ==
+ ( /*_.VALCLO___V1350*/ meltfptr[1349])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#88 checkrout",
+ melt_assertmsg ("putclosrout#96 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1330*/ meltfptr[1329]))
+ ( /*_.VALROUT___V1347*/ meltfptr[1346]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1333*/ meltfptr[1332])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1330*/ meltfptr[1329]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1350*/ meltfptr[1349])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1333*/ meltfptr[1332]);
+ meltgc_touch ( /*_.VALCLO___V1350*/ meltfptr[1349]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1334*/ meltfptr[1333]))
+ ( /*_.VALDATA___V1351*/ meltfptr[1350]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1334*/
- meltfptr[1333]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]))->
+ ( /*_.VALDATA___V1351*/
+ meltfptr[1350]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1351*/ meltfptr[1350]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1335*/ meltfptr[1334]);
+ /*_.VALSTR___V1352*/ meltfptr[1351]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1334*/ meltfptr[1333]);
+ meltgc_touch ( /*_.VALDATA___V1351*/ meltfptr[1350]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1336*/ meltfptr[1335]))
+ ( /*_.VALDATA___V1353*/ meltfptr[1352]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1336*/
- meltfptr[1335]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]))->
+ ( /*_.VALDATA___V1353*/
+ meltfptr[1352]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1353*/ meltfptr[1352]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1337*/ meltfptr[1336]);
+ /*_.VALSTR___V1354*/ meltfptr[1353]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1336*/ meltfptr[1335]);
+ meltgc_touch ( /*_.VALDATA___V1353*/ meltfptr[1352]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#0",
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V916*/ meltfptr[915]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]);
+ NULL != /*_.VALDATA___V919*/ meltfptr[918]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#8",
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#8",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#9",
+ NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[9] =
+ (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#9",
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#10",
NULL != ( /*_.CLASS_NREP_IFTUPLESIZED__V85*/ meltfptr[84]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V85*/ meltfptr[84]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#11",
+ NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[11] =
+ (melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1176*/ meltfptr[1175]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]);
+ NULL != /*_.VALDATA___V1193*/ meltfptr[1192]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[11] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#12",
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#14",
NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V52*/ meltfptr[51]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[14] =
(melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V52*/ meltfptr[51]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#13",
- NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[13] =
- (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#15",
+ NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[15] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1245__NORMSTEP_MTESTMULTIPLE#14",
- NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1338*/ meltfptr[1337])->tabval[14] =
- (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#16",
+ NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[16] =
+ (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#17",
+ NULL != ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[17] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#18",
+ NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[18] =
+ (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:5411:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1261__NORMSTEP_MTESTMULTIPLE#19",
+ NULL != ( /*_.CLASS_NREP_IFCOMMON__V86*/ meltfptr[85]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1355*/ meltfptr[1354])->tabval[19] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFCOMMON__V86*/ meltfptr[85]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5520:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1338*/ meltfptr[1337]);
+ meltgc_touch ( /*_.VALROUT___V1355*/ meltfptr[1354]);
- /*putclosurout#89 */
- melt_assertmsg ("putclosrout#89 checkclo",
+ /*putclosurout#97 */
+ melt_assertmsg ("putclosrout#97 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1339*/ meltfptr[1338])) ==
+ ( /*_.VALCLO___V1356*/ meltfptr[1355])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#89 checkrout",
+ melt_assertmsg ("putclosrout#97 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1338*/ meltfptr[1337]))
+ ( /*_.VALROUT___V1355*/ meltfptr[1354]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1339*/ meltfptr[1338])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1338*/ meltfptr[1337]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1356*/ meltfptr[1355])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1355*/ meltfptr[1354]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1339*/ meltfptr[1338]);
+ meltgc_touch ( /*_.VALCLO___V1356*/ meltfptr[1355]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1340*/ meltfptr[1339]))
+ ( /*_.VALDATA___V1357*/ meltfptr[1356]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1340*/
- meltfptr[1339]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]))->
+ ( /*_.VALDATA___V1357*/
+ meltfptr[1356]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1341*/ meltfptr[1340]);
+ /*_.VALSTR___V1358*/ meltfptr[1357]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1340*/ meltfptr[1339]);
+ meltgc_touch ( /*_.VALDATA___V1357*/ meltfptr[1356]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ /*putslot */
+ melt_assertmsg ("putslot checkobj",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALDATA___V1359*/ meltfptr[1358]))
+ == MELTOBMAG_OBJECT);
+
+ melt_assertmsg ("putslot checkoff",
+ (1 >= 0
+ && 1 <
+ melt_object_length ((melt_ptr_t)
+ ( /*_.VALDATA___V1359*/
+ meltfptr[1358]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]))->
+ obj_vartab[1] = (melt_ptr_t) (
+ /*_.VALSTR___V1360*/ meltfptr[1359]);
+
+ /*touch:VALUEDATA_ */
+ meltgc_touch ( /*_.VALDATA___V1359*/ meltfptr[1358]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1249__NORMSTEP_MTESTVAR#0",
+ melt_checkmsg ("putroutconst constnull.drout_1267__NORMSTEP_MTESTVAR#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V860*/ meltfptr[859]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]);
+ NULL != /*_.VALDATA___V863*/ meltfptr[862]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1249__NORMSTEP_MTESTVAR#7",
- NULL != ( /*_.CLASS_NREP_IFSAME__V86*/ meltfptr[85]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[7] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IFSAME__V86*/ meltfptr[85]);
+ melt_checkmsg ("putroutconst constnull.drout_1267__NORMSTEP_MTESTVAR#7",
+ NULL != ( /*_.CLASS_NREP_IFSAME__V87*/ meltfptr[86]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[7] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IFSAME__V87*/ meltfptr[86]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1249__NORMSTEP_MTESTVAR#8",
+ melt_checkmsg ("putroutconst constnull.drout_1267__NORMSTEP_MTESTVAR#8",
NULL != ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1342*/ meltfptr[1341])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1361*/ meltfptr[1360])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V84*/ meltfptr[83]);
- MELT_LOCATION ("warmelt-normatch.melt:5478:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5629:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1342*/ meltfptr[1341]);
+ meltgc_touch ( /*_.VALROUT___V1361*/ meltfptr[1360]);
- /*putclosurout#90 */
- melt_assertmsg ("putclosrout#90 checkclo",
+ /*putclosurout#98 */
+ melt_assertmsg ("putclosrout#98 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1343*/ meltfptr[1342])) ==
+ ( /*_.VALCLO___V1362*/ meltfptr[1361])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#90 checkrout",
+ melt_assertmsg ("putclosrout#98 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1342*/ meltfptr[1341]))
+ ( /*_.VALROUT___V1361*/ meltfptr[1360]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1343*/ meltfptr[1342])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1342*/ meltfptr[1341]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1362*/ meltfptr[1361])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1361*/ meltfptr[1360]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1343*/ meltfptr[1342]);
+ meltgc_touch ( /*_.VALCLO___V1362*/ meltfptr[1361]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1344*/ meltfptr[1343]))
+ ( /*_.VALDATA___V1363*/ meltfptr[1362]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1344*/
- meltfptr[1343]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343]))->
+ ( /*_.VALDATA___V1363*/
+ meltfptr[1362]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1345*/ meltfptr[1344]);
+ /*_.VALSTR___V1364*/ meltfptr[1363]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1344*/ meltfptr[1343]);
+ meltgc_touch ( /*_.VALDATA___V1363*/ meltfptr[1362]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#0",
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V884*/ meltfptr[883]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]);
+ NULL != /*_.VALDATA___V887*/ meltfptr[886]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#5",
- NULL != ( /*_.LIST_MAP__V87*/ meltfptr[86]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[5] =
- (melt_ptr_t) ( /*_.LIST_MAP__V87*/ meltfptr[86]);
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#5",
+ NULL != ( /*_.LIST_MAP__V88*/ meltfptr[87]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[5] =
+ (melt_ptr_t) ( /*_.LIST_MAP__V88*/ meltfptr[87]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1347*/ meltfptr[1346]))
+ ( /*_.VALROUT___V1366*/ meltfptr[1365]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1366*/ meltfptr[1365])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5578:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5729:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1347*/ meltfptr[1346]);
+ meltgc_touch ( /*_.VALROUT___V1366*/ meltfptr[1365]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#7",
- NULL != ( /*_.VALROUT___V1347*/ meltfptr[1346]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[7] =
- (melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346]);
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#7",
+ NULL != ( /*_.VALROUT___V1366*/ meltfptr[1365]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALROUT___V1366*/ meltfptr[1365]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#8",
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#8",
NULL != ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[8] =
(melt_ptr_t) ( /*_.MULTIPLE_MAP__V54*/ meltfptr[53]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[9] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5732:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1348*/ meltfptr[1347]))
+ ( /*_.VALROUT___V1367*/ meltfptr[1366]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1348*/ meltfptr[1347])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5732:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1348*/ meltfptr[1347]);
+ meltgc_touch ( /*_.VALROUT___V1367*/ meltfptr[1366]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#10",
- NULL != ( /*_.VALROUT___V1348*/ meltfptr[1347]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[10] =
- (melt_ptr_t) ( /*_.VALROUT___V1348*/ meltfptr[1347]);
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#10",
+ NULL != ( /*_.VALROUT___V1367*/ meltfptr[1366]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[11] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[11] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1349*/ meltfptr[1348]))
+ ( /*_.VALROUT___V1368*/ meltfptr[1367]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5594:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5745:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1349*/ meltfptr[1348]);
+ meltgc_touch ( /*_.VALROUT___V1368*/ meltfptr[1367]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#12",
- NULL != ( /*_.VALROUT___V1349*/ meltfptr[1348]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[12] =
- (melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348]);
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#12",
+ NULL != ( /*_.VALROUT___V1368*/ meltfptr[1367]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALROUT___V1368*/ meltfptr[1367]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[13] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5748:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1350*/ meltfptr[1349]))
+ ( /*_.VALROUT___V1369*/ meltfptr[1368]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1350*/ meltfptr[1349])->tabval[0] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5597:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5748:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1350*/ meltfptr[1349]);
+ meltgc_touch ( /*_.VALROUT___V1369*/ meltfptr[1368]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_MGROUP#14",
- NULL != ( /*_.VALROUT___V1350*/ meltfptr[1349]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1346*/ meltfptr[1345])->tabval[14] =
- (melt_ptr_t) ( /*_.VALROUT___V1350*/ meltfptr[1349]);
+ melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MGROUP#14",
+ NULL != ( /*_.VALROUT___V1369*/ meltfptr[1368]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALROUT___V1369*/ meltfptr[1368]);
- MELT_LOCATION ("warmelt-normatch.melt:5555:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5706:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1346*/ meltfptr[1345]);
+ meltgc_touch ( /*_.VALROUT___V1365*/ meltfptr[1364]);
- /*putclosurout#91 */
- melt_assertmsg ("putclosrout#91 checkclo",
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_23 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_24 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*putclosurout#99*/
+ melt_assertmsg ("putclosrout#99 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1351*/ meltfptr[1350])) ==
+ ( /*_.VALCLO___V1370*/ meltfptr[1369])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#91 checkrout",
+ melt_assertmsg ("putclosrout#99 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1346*/ meltfptr[1345]))
+ ( /*_.VALROUT___V1365*/ meltfptr[1364]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1351*/ meltfptr[1350])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1346*/ meltfptr[1345]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1370*/ meltfptr[1369])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1351*/ meltfptr[1350]);
+ meltgc_touch ( /*_.VALCLO___V1370*/ meltfptr[1369]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1352*/ meltfptr[1351]))
+ ( /*_.VALDATA___V1371*/ meltfptr[1370]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1352*/
- meltfptr[1351]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]))->
+ ( /*_.VALDATA___V1371*/
+ meltfptr[1370]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1353*/ meltfptr[1352]);
+ /*_.VALSTR___V1372*/ meltfptr[1371]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1352*/ meltfptr[1351]);
+ meltgc_touch ( /*_.VALDATA___V1371*/ meltfptr[1370]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#0",
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V832*/ meltfptr[831]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]);
+ NULL != /*_.VALDATA___V835*/ meltfptr[834]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1293*/ meltfptr[1292]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1293*/ meltfptr[1292]);
+ NULL != /*_.VALCLO___V1310*/ meltfptr[1309]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1310*/ meltfptr[1309]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[6] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#7",
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#7",
NULL != ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V79*/ meltfptr[78]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#8",
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#8",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#9",
- NULL != ( /*_.CLASS_NREP_IF__V88*/ meltfptr[87]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[9] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IF__V88*/ meltfptr[87]);
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#9",
+ NULL != ( /*_.CLASS_NREP_IF__V89*/ meltfptr[88]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[9] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IF__V89*/ meltfptr[88]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#10",
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#10",
NULL != ( /*_.WRAP_NORMAL_LETSEQ__V71*/ meltfptr[70]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[10] =
(melt_ptr_t) ( /*_.WRAP_NORMAL_LETSEQ__V71*/ meltfptr[70]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1261__NORMSTEP_MSUCCWHENFLAG#11",
+ ("putroutconst constnull.drout_1279__NORMSTEP_MSUCCWHENFLAG#11",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:5623:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5774:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1354*/ meltfptr[1353]);
+ meltgc_touch ( /*_.VALROUT___V1373*/ meltfptr[1372]);
- /*putclosurout#92 */
- melt_assertmsg ("putclosrout#92 checkclo",
+ /*putclosurout#100 */
+ melt_assertmsg ("putclosrout#100 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1355*/ meltfptr[1354])) ==
+ ( /*_.VALCLO___V1374*/ meltfptr[1373])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#92 checkrout",
+ melt_assertmsg ("putclosrout#100 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1354*/ meltfptr[1353]))
+ ( /*_.VALROUT___V1373*/ meltfptr[1372]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1355*/ meltfptr[1354])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1374*/ meltfptr[1373])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1355*/ meltfptr[1354]);
+ meltgc_touch ( /*_.VALCLO___V1374*/ meltfptr[1373]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1356*/ meltfptr[1355]))
+ ( /*_.VALDATA___V1375*/ meltfptr[1374]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1356*/
- meltfptr[1355]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355]))->
+ ( /*_.VALDATA___V1375*/
+ meltfptr[1374]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1357*/ meltfptr[1356]);
+ /*_.VALSTR___V1376*/ meltfptr[1375]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1356*/ meltfptr[1355]);
+ meltgc_touch ( /*_.VALDATA___V1375*/ meltfptr[1374]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1358*/ meltfptr[1357]))
+ ( /*_.VALDATA___V1377*/ meltfptr[1376]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1358*/
- meltfptr[1357]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357]))->
+ ( /*_.VALDATA___V1377*/
+ meltfptr[1376]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1359*/ meltfptr[1358]);
+ /*_.VALSTR___V1378*/ meltfptr[1377]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1358*/ meltfptr[1357]);
+ meltgc_touch ( /*_.VALDATA___V1377*/ meltfptr[1376]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1360*/ meltfptr[1359]))
+ ( /*_.VALDATA___V1379*/ meltfptr[1378]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1360*/
- meltfptr[1359]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]))->
+ ( /*_.VALDATA___V1379*/
+ meltfptr[1378]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1360*/ meltfptr[1359]))
+ ( /*_.VALDATA___V1379*/ meltfptr[1378]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1360*/
- meltfptr[1359]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]))->
+ ( /*_.VALDATA___V1379*/
+ meltfptr[1378]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1360*/ meltfptr[1359]);
+ meltgc_touch ( /*_.VALDATA___V1379*/ meltfptr[1378]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1361*/ meltfptr[1360]))
+ ( /*_.VALDATA___V1380*/ meltfptr[1379]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1361*/
- meltfptr[1360]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]))->
+ ( /*_.VALDATA___V1380*/
+ meltfptr[1379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1081*/ meltfptr[1080]);
+ /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1361*/ meltfptr[1360]))
+ ( /*_.VALDATA___V1380*/ meltfptr[1379]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1361*/
- meltfptr[1360]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]))->
+ ( /*_.VALDATA___V1380*/
+ meltfptr[1379]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1361*/ meltfptr[1360]);
+ meltgc_touch ( /*_.VALDATA___V1380*/ meltfptr[1379]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1362*/ meltfptr[1361]))
+ ( /*_.VALDATA___V1381*/ meltfptr[1380]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1362*/
- meltfptr[1361]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361]))->
+ ( /*_.VALDATA___V1381*/
+ meltfptr[1380]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1363*/ meltfptr[1362]);
+ /*_.VALSTR___V1382*/ meltfptr[1381]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1362*/ meltfptr[1361]);
+ meltgc_touch ( /*_.VALDATA___V1381*/ meltfptr[1380]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1364*/ meltfptr[1363]))
+ ( /*_.VALDATA___V1383*/ meltfptr[1382]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1364*/
- meltfptr[1363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363]))->
+ ( /*_.VALDATA___V1383*/
+ meltfptr[1382]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1362*/ meltfptr[1361]);
+ /*_.VALDATA___V1381*/ meltfptr[1380]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1364*/ meltfptr[1363]))
+ ( /*_.VALDATA___V1383*/ meltfptr[1382]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1364*/
- meltfptr[1363]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363]))->
+ ( /*_.VALDATA___V1383*/
+ meltfptr[1382]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1364*/ meltfptr[1363]);
+ meltgc_touch ( /*_.VALDATA___V1383*/ meltfptr[1382]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1365*/ meltfptr[1364]))
+ ( /*_.VALDATA___V1384*/ meltfptr[1383]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1365*/
- meltfptr[1364]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364]))->
+ ( /*_.VALDATA___V1384*/
+ meltfptr[1383]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1366*/ meltfptr[1365]);
+ /*_.VALSTR___V1385*/ meltfptr[1384]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1365*/ meltfptr[1364]);
+ meltgc_touch ( /*_.VALDATA___V1384*/ meltfptr[1383]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/ meltfptr[1366]))
+ ( /*_.VALDATA___V1386*/ meltfptr[1385]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/
- meltfptr[1366]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1367*/ meltfptr[1366]))->
+ ( /*_.VALDATA___V1386*/
+ meltfptr[1385]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1365*/ meltfptr[1364]);
+ /*_.VALDATA___V1384*/ meltfptr[1383]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/ meltfptr[1366]))
+ ( /*_.VALDATA___V1386*/ meltfptr[1385]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1367*/
- meltfptr[1366]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1367*/ meltfptr[1366]))->
+ ( /*_.VALDATA___V1386*/
+ meltfptr[1385]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1367*/ meltfptr[1366]);
+ meltgc_touch ( /*_.VALDATA___V1386*/ meltfptr[1385]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1368*/ meltfptr[1367]))
+ ( /*_.VALDATA___V1387*/ meltfptr[1386]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1368*/
- meltfptr[1367]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]))->
+ ( /*_.VALDATA___V1387*/
+ meltfptr[1386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1297*/ meltfptr[1296]);
+ /*_.VALDATA___V1314*/ meltfptr[1313]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1368*/ meltfptr[1367]))
+ ( /*_.VALDATA___V1387*/ meltfptr[1386]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1368*/
- meltfptr[1367]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]))->
+ ( /*_.VALDATA___V1387*/
+ meltfptr[1386]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1368*/ meltfptr[1367]);
+ meltgc_touch ( /*_.VALDATA___V1387*/ meltfptr[1386]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1369*/ meltfptr[1368]))
+ ( /*_.VALDATA___V1388*/ meltfptr[1387]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1369*/
- meltfptr[1368]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1369*/ meltfptr[1368]))->
+ ( /*_.VALDATA___V1388*/
+ meltfptr[1387]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1370*/ meltfptr[1369]);
+ /*_.VALSTR___V1389*/ meltfptr[1388]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1369*/ meltfptr[1368]);
+ meltgc_touch ( /*_.VALDATA___V1388*/ meltfptr[1387]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/ meltfptr[1370]))
+ ( /*_.VALDATA___V1390*/ meltfptr[1389]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/
- meltfptr[1370]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]))->
+ ( /*_.VALDATA___V1390*/
+ meltfptr[1389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1369*/ meltfptr[1368]);
+ /*_.VALDATA___V1388*/ meltfptr[1387]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/ meltfptr[1370]))
+ ( /*_.VALDATA___V1390*/ meltfptr[1389]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1371*/
- meltfptr[1370]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]))->
+ ( /*_.VALDATA___V1390*/
+ meltfptr[1389]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1371*/ meltfptr[1370]);
+ meltgc_touch ( /*_.VALDATA___V1390*/ meltfptr[1389]);
/*putupl#540 */
melt_assertmsg ("putupl #540 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #540 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_23 */
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_24 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putupl#541*/
+ /*putupl#541 */
melt_assertmsg ("putupl #541 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #541 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]);
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]);
/*putupl#542 */
melt_assertmsg ("putupl #542 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #542 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363]);
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]);
/*putupl#543 */
melt_assertmsg ("putupl #543 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #543 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1367*/ meltfptr[1366]);
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]);
/*putupl#544 */
melt_assertmsg ("putupl #544 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #544 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]);
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]);
/*putupl#545 */
melt_assertmsg ("putupl #545 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/ meltfptr[1371])) ==
+ ( /*_.VALTUP___V1391*/ meltfptr[1390])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #545 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1372*/
- meltfptr[1371]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1372*/ meltfptr[1371]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]);
+ ( /*_.VALTUP___V1391*/
+ meltfptr[1390]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1391*/ meltfptr[1390]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1372*/ meltfptr[1371]);
+ meltgc_touch ( /*_.VALTUP___V1391*/ meltfptr[1390]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1373*/ meltfptr[1372]))
+ ( /*_.VALDATA___V1392*/ meltfptr[1391]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1373*/
- meltfptr[1372]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372]))->
+ ( /*_.VALDATA___V1392*/
+ meltfptr[1391]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1374*/ meltfptr[1373]);
+ /*_.VALSTR___V1393*/ meltfptr[1392]);
- MELT_LOCATION ("warmelt-normatch.melt:5690:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5841:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1373*/ meltfptr[1372]);
+ meltgc_touch ( /*_.VALDATA___V1392*/ meltfptr[1391]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/ meltfptr[1374]))
+ ( /*_.VALDATA___V1394*/ meltfptr[1393]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/
- meltfptr[1374]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]))->
+ ( /*_.VALDATA___V1394*/
+ meltfptr[1393]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1376*/ meltfptr[1375]);
+ /*_.VALSTR___V1395*/ meltfptr[1394]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1375*/ meltfptr[1374]);
+ meltgc_touch ( /*_.VALDATA___V1394*/ meltfptr[1393]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/ meltfptr[1376]))
+ ( /*_.VALDATA___V1396*/ meltfptr[1395]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/
- meltfptr[1376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]))->
+ ( /*_.VALDATA___V1396*/
+ meltfptr[1395]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V984*/ meltfptr[983]);
+ /*_.VALDATA___V987*/ meltfptr[986]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/ meltfptr[1376]))
+ ( /*_.VALDATA___V1396*/ meltfptr[1395]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1377*/
- meltfptr[1376]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]))->
+ ( /*_.VALDATA___V1396*/
+ meltfptr[1395]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1377*/ meltfptr[1376]);
+ meltgc_touch ( /*_.VALDATA___V1396*/ meltfptr[1395]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1378*/ meltfptr[1377]))
+ ( /*_.VALDATA___V1397*/ meltfptr[1396]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1378*/
- meltfptr[1377]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]))->
+ ( /*_.VALDATA___V1397*/
+ meltfptr[1396]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1081*/ meltfptr[1080]);
+ /*_.VALDATA___V1096*/ meltfptr[1095]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1378*/ meltfptr[1377]))
+ ( /*_.VALDATA___V1397*/ meltfptr[1396]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1378*/
- meltfptr[1377]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]))->
+ ( /*_.VALDATA___V1397*/
+ meltfptr[1396]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1378*/ meltfptr[1377]);
+ meltgc_touch ( /*_.VALDATA___V1397*/ meltfptr[1396]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/ meltfptr[1378]))
+ ( /*_.VALDATA___V1398*/ meltfptr[1397]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/
- meltfptr[1378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))->
+ ( /*_.VALDATA___V1398*/
+ meltfptr[1397]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1362*/ meltfptr[1361]);
+ /*_.VALDATA___V1381*/ meltfptr[1380]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/ meltfptr[1378]))
+ ( /*_.VALDATA___V1398*/ meltfptr[1397]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1379*/
- meltfptr[1378]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))->
+ ( /*_.VALDATA___V1398*/
+ meltfptr[1397]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1379*/ meltfptr[1378]);
+ meltgc_touch ( /*_.VALDATA___V1398*/ meltfptr[1397]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1380*/ meltfptr[1379]))
+ ( /*_.VALDATA___V1399*/ meltfptr[1398]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1380*/
- meltfptr[1379]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))->
+ ( /*_.VALDATA___V1399*/
+ meltfptr[1398]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1365*/ meltfptr[1364]);
+ /*_.VALDATA___V1384*/ meltfptr[1383]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1380*/ meltfptr[1379]))
+ ( /*_.VALDATA___V1399*/ meltfptr[1398]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1380*/
- meltfptr[1379]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))->
+ ( /*_.VALDATA___V1399*/
+ meltfptr[1398]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1380*/ meltfptr[1379]);
+ meltgc_touch ( /*_.VALDATA___V1399*/ meltfptr[1398]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/ meltfptr[1380]))
+ ( /*_.VALDATA___V1400*/ meltfptr[1399]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/
- meltfptr[1380]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]))->
+ ( /*_.VALDATA___V1400*/
+ meltfptr[1399]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1382*/ meltfptr[1381]);
+ /*_.VALSTR___V1401*/ meltfptr[1400]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1381*/ meltfptr[1380]);
+ meltgc_touch ( /*_.VALDATA___V1400*/ meltfptr[1399]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1383*/ meltfptr[1382]))
+ ( /*_.VALDATA___V1402*/ meltfptr[1401]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1383*/
- meltfptr[1382]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]))->
+ ( /*_.VALDATA___V1402*/
+ meltfptr[1401]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1381*/ meltfptr[1380]);
+ /*_.VALDATA___V1400*/ meltfptr[1399]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1383*/ meltfptr[1382]))
+ ( /*_.VALDATA___V1402*/ meltfptr[1401]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1383*/
- meltfptr[1382]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]))->
+ ( /*_.VALDATA___V1402*/
+ meltfptr[1401]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1383*/ meltfptr[1382]);
+ meltgc_touch ( /*_.VALDATA___V1402*/ meltfptr[1401]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1384*/ meltfptr[1383]))
+ ( /*_.VALDATA___V1403*/ meltfptr[1402]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1384*/
- meltfptr[1383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]))->
+ ( /*_.VALDATA___V1403*/
+ meltfptr[1402]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1403*/ meltfptr[1402]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1297*/ meltfptr[1296]);
+ /*_.VALDATA___V1314*/ meltfptr[1313]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1384*/ meltfptr[1383]))
+ ( /*_.VALDATA___V1403*/ meltfptr[1402]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1384*/
- meltfptr[1383]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]))->
+ ( /*_.VALDATA___V1403*/
+ meltfptr[1402]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1403*/ meltfptr[1402]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1384*/ meltfptr[1383]);
+ meltgc_touch ( /*_.VALDATA___V1403*/ meltfptr[1402]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/ meltfptr[1384]))
+ ( /*_.VALDATA___V1404*/ meltfptr[1403]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/
- meltfptr[1384]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384]))->
+ ( /*_.VALDATA___V1404*/
+ meltfptr[1403]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1386*/ meltfptr[1385]);
+ /*_.VALSTR___V1405*/ meltfptr[1404]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1385*/ meltfptr[1384]);
+ meltgc_touch ( /*_.VALDATA___V1404*/ meltfptr[1403]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/ meltfptr[1386]))
+ ( /*_.VALDATA___V1406*/ meltfptr[1405]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(0 >= 0
&& 0 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/
- meltfptr[1386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))->
+ ( /*_.VALDATA___V1406*/
+ meltfptr[1405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]))->
obj_vartab[0] = (melt_ptr_t) (
- /*_.VALDATA___V1385*/ meltfptr[1384]);
+ /*_.VALDATA___V1404*/ meltfptr[1403]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/ meltfptr[1386]))
+ ( /*_.VALDATA___V1406*/ meltfptr[1405]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1387*/
- meltfptr[1386]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))->
+ ( /*_.VALDATA___V1406*/
+ meltfptr[1405]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]))->
obj_vartab[1] = (melt_ptr_t) (
((void *) (MELT_PREDEF (CTYPE_VALUE))));
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1387*/ meltfptr[1386]);
+ meltgc_touch ( /*_.VALDATA___V1406*/ meltfptr[1405]);
/*putupl#546 */
melt_assertmsg ("putupl #546 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #546 checkoff",
(0 >= 0
&& 0 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]);
/*putupl#547 */
melt_assertmsg ("putupl #547 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #547 checkoff",
(1 >= 0
&& 1 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]);
/*putupl#548 */
melt_assertmsg ("putupl #548 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #548 checkoff",
(2 >= 0
&& 2 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]);
/*putupl#549 */
melt_assertmsg ("putupl #549 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #549 checkoff",
(3 >= 0
&& 3 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]);
/*putupl#550 */
melt_assertmsg ("putupl #550 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #550 checkoff",
(4 >= 0
&& 4 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]);
/*putupl#551 */
melt_assertmsg ("putupl #551 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #551 checkoff",
(5 >= 0
&& 5 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V1403*/ meltfptr[1402]);
/*putupl#552 */
melt_assertmsg ("putupl #552 checktup",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/ meltfptr[1387])) ==
+ ( /*_.VALTUP___V1407*/ meltfptr[1406])) ==
MELTOBMAG_MULTIPLE);
melt_assertmsg ("putupl #552 checkoff",
(6 >= 0
&& 6 <
melt_multiple_length ((melt_ptr_t)
- ( /*_.VALTUP___V1388*/
- meltfptr[1387]))));
- ((meltmultiple_ptr_t) ( /*_.VALTUP___V1388*/ meltfptr[1387]))->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]);
+ ( /*_.VALTUP___V1407*/
+ meltfptr[1406]))));
+ ((meltmultiple_ptr_t) ( /*_.VALTUP___V1407*/ meltfptr[1406]))->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]);
/*touch:INITUP_ */
- meltgc_touch ( /*_.VALTUP___V1388*/ meltfptr[1387]);
+ meltgc_touch ( /*_.VALTUP___V1407*/ meltfptr[1406]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^putslot */
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1389*/ meltfptr[1388]))
+ ( /*_.VALDATA___V1408*/ meltfptr[1407]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1389*/
- meltfptr[1388]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388]))->
+ ( /*_.VALDATA___V1408*/
+ meltfptr[1407]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1390*/ meltfptr[1389]);
+ /*_.VALSTR___V1409*/ meltfptr[1408]);
- MELT_LOCATION ("warmelt-normatch.melt:5694:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5845:/ initchunk");
/*^touch */
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1389*/ meltfptr[1388]);
+ meltgc_touch ( /*_.VALDATA___V1408*/ meltfptr[1407]);
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1391*/ meltfptr[1390]))
+ ( /*_.VALROUT___V1410*/ meltfptr[1409]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1298__NORMTESTMATCH_CATCHALL#0",
+ ("putroutconst constnull.drout_1316__NORMTESTMATCH_CATCHALL#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1391*/ meltfptr[1390]))
+ ( /*_.VALROUT___V1410*/ meltfptr[1409]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1298__NORMTESTMATCH_CATCHALL#1",
+ ("putroutconst constnull.drout_1316__NORMTESTMATCH_CATCHALL#1",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:5698:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5849:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1391*/ meltfptr[1390]);
+ meltgc_touch ( /*_.VALROUT___V1410*/ meltfptr[1409]);
- /*putclosurout#93 */
- melt_assertmsg ("putclosrout#93 checkclo",
+ /*putclosurout#101 */
+ melt_assertmsg ("putclosrout#101 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1392*/ meltfptr[1391])) ==
+ ( /*_.VALCLO___V1411*/ meltfptr[1410])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#93 checkrout",
+ melt_assertmsg ("putclosrout#101 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1391*/ meltfptr[1390]))
+ ( /*_.VALROUT___V1410*/ meltfptr[1409]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1392*/ meltfptr[1391])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1411*/ meltfptr[1410])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1410*/ meltfptr[1409]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1392*/ meltfptr[1391]);
+ meltgc_touch ( /*_.VALCLO___V1411*/ meltfptr[1410]);
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1300__NORMFILLMATCH_CATCHALL#0",
+ ("putroutconst constnull.drout_1318__NORMFILLMATCH_CATCHALL#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1300__NORMFILLMATCH_CATCHALL#1",
+ ("putroutconst constnull.drout_1318__NORMFILLMATCH_CATCHALL#1",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1393*/ meltfptr[1392])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:5712:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5863:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1393*/ meltfptr[1392]);
+ meltgc_touch ( /*_.VALROUT___V1412*/ meltfptr[1411]);
- /*putclosurout#94 */
- melt_assertmsg ("putclosrout#94 checkclo",
+ /*putclosurout#102 */
+ melt_assertmsg ("putclosrout#102 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1394*/ meltfptr[1393])) ==
+ ( /*_.VALCLO___V1413*/ meltfptr[1412])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#94 checkrout",
+ melt_assertmsg ("putclosrout#102 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1393*/ meltfptr[1392]))
+ ( /*_.VALROUT___V1412*/ meltfptr[1411]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1394*/ meltfptr[1393])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1393*/ meltfptr[1392]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1413*/ meltfptr[1412])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1394*/ meltfptr[1393]);
+ meltgc_touch ( /*_.VALCLO___V1413*/ meltfptr[1412]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#0",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#1",
- NULL != ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]);
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#1",
+ NULL != ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#3",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#3",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#4",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#4",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#5",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#5",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[5] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#6",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#6",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#7",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#7",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#8",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#8",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[8] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#9",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#9",
NULL != ( /*_.DISCR_VERBATIM_STRING__V82*/ meltfptr[81]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[9] =
(melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V82*/ meltfptr[81]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#10",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#10",
NULL != ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#11",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#11",
NULL != ( /*_.CTYPE_LONG__V81*/ meltfptr[80]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[11] =
(melt_ptr_t) ( /*_.CTYPE_LONG__V81*/ meltfptr[80]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#12",
- NULL != ( /*_.CLASS_NREP_IF__V88*/ meltfptr[87]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[12] =
- (melt_ptr_t) ( /*_.CLASS_NREP_IF__V88*/ meltfptr[87]);
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#12",
+ NULL != ( /*_.CLASS_NREP_IF__V89*/ meltfptr[88]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[12] =
+ (melt_ptr_t) ( /*_.CLASS_NREP_IF__V89*/ meltfptr[88]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#13",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#13",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[13] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#14",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#14",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[14] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#15",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#15",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#16",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#16",
NULL != ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#17",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#17",
NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1302__NORMTESTMATCH_CMATCHER#18",
+ ("putroutconst constnull.drout_1320__NORMTESTMATCH_CMATCHER#18",
NULL != ( /*_.CLASS_NREP__V55*/ meltfptr[54]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1395*/ meltfptr[1394])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1414*/ meltfptr[1413])->tabval[18] =
(melt_ptr_t) ( /*_.CLASS_NREP__V55*/ meltfptr[54]);
- MELT_LOCATION ("warmelt-normatch.melt:5724:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5875:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1395*/ meltfptr[1394]);
+ meltgc_touch ( /*_.VALROUT___V1414*/ meltfptr[1413]);
- /*putclosurout#95 */
- melt_assertmsg ("putclosrout#95 checkclo",
+ /*putclosurout#103 */
+ melt_assertmsg ("putclosrout#103 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1396*/ meltfptr[1395])) ==
+ ( /*_.VALCLO___V1415*/ meltfptr[1414])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#95 checkrout",
+ melt_assertmsg ("putclosrout#103 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1395*/ meltfptr[1394]))
+ ( /*_.VALROUT___V1414*/ meltfptr[1413]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1396*/ meltfptr[1395])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1395*/ meltfptr[1394]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1415*/ meltfptr[1414])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1414*/ meltfptr[1413]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1396*/ meltfptr[1395]);
+ meltgc_touch ( /*_.VALCLO___V1415*/ meltfptr[1414]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1397*/ meltfptr[1396]))
+ ( /*_.VALDATA___V1416*/ meltfptr[1415]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1397*/
- meltfptr[1396]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]))->
+ ( /*_.VALDATA___V1416*/
+ meltfptr[1415]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1398*/ meltfptr[1397]);
+ /*_.VALSTR___V1417*/ meltfptr[1416]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1397*/ meltfptr[1396]);
+ meltgc_touch ( /*_.VALDATA___V1416*/ meltfptr[1415]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#0",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_24 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_25 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#1",
- NULL != ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[1] =
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]);
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#1",
+ NULL != ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[1] =
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#2",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#2",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#3",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#3",
NULL != ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V80*/ meltfptr[79]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#4",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#4",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[4] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#5",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#5",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#6",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#6",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[6] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1306__NORMFILLMATCH_CMATCHER#7",
+ ("putroutconst constnull.drout_1324__NORMFILLMATCH_CMATCHER#7",
NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1399*/ meltfptr[1398])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]);
- MELT_LOCATION ("warmelt-normatch.melt:5809:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5960:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1399*/ meltfptr[1398]);
+ meltgc_touch ( /*_.VALROUT___V1418*/ meltfptr[1417]);
- /*putclosurout#96 */
- melt_assertmsg ("putclosrout#96 checkclo",
+ /*putclosurout#104 */
+ melt_assertmsg ("putclosrout#104 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1400*/ meltfptr[1399])) ==
+ ( /*_.VALCLO___V1419*/ meltfptr[1418])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#96 checkrout",
+ melt_assertmsg ("putclosrout#104 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1399*/ meltfptr[1398]))
+ ( /*_.VALROUT___V1418*/ meltfptr[1417]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1400*/ meltfptr[1399])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1399*/ meltfptr[1398]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1419*/ meltfptr[1418])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1418*/ meltfptr[1417]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1400*/ meltfptr[1399]);
+ meltgc_touch ( /*_.VALCLO___V1419*/ meltfptr[1418]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#0",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V926*/ meltfptr[925]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]);
+ NULL != /*_.VALDATA___V929*/ meltfptr[928]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#3",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#3",
NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1192*/ meltfptr[1191]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]);
+ NULL != /*_.VALDATA___V1209*/ meltfptr[1208]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1209*/ meltfptr[1208]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1309*/ meltfptr[1308]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[7] =
- (melt_ptr_t) ( /*_.VALCLO___V1309*/ meltfptr[1308]);
+ NULL != /*_.VALCLO___V1326*/ meltfptr[1325]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALCLO___V1326*/ meltfptr[1325]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#9",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#9",
NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[9] =
(melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#10",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#10",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[10] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#11",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#11",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[11] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#12",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#12",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[12] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[12] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#13",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#13",
NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[13] =
(melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#14",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#14",
NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[14] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[14] =
(melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#15",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#15",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[15] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#16",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#16",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[16] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#17",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#17",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1308__NORMSTEP_MTESTMATCHER#18",
+ ("putroutconst constnull.drout_1326__NORMSTEP_MTESTMATCHER#18",
NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[18] =
(melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[19] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V964*/ meltfptr[963]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[20] =
- (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]);
+ NULL != /*_.VALDATA___V967*/ meltfptr[966]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1373*/ meltfptr[1372]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372]);
+ NULL != /*_.VALDATA___V1392*/ meltfptr[1391]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1389*/ meltfptr[1388]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388]);
+ NULL != /*_.VALDATA___V1408*/ meltfptr[1407]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]);
- MELT_LOCATION ("warmelt-normatch.melt:5885:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6036:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1401*/ meltfptr[1400]);
+ meltgc_touch ( /*_.VALROUT___V1420*/ meltfptr[1419]);
- /*putclosurout#97 */
- melt_assertmsg ("putclosrout#97 checkclo",
+ /*putclosurout#105 */
+ melt_assertmsg ("putclosrout#105 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1402*/ meltfptr[1401])) ==
+ ( /*_.VALCLO___V1421*/ meltfptr[1420])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#97 checkrout",
+ melt_assertmsg ("putclosrout#105 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1401*/ meltfptr[1400]))
+ ( /*_.VALROUT___V1420*/ meltfptr[1419]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1402*/ meltfptr[1401])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1421*/ meltfptr[1420])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1402*/ meltfptr[1401]);
+ meltgc_touch ( /*_.VALCLO___V1421*/ meltfptr[1420]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA#0",
+ ("putroutconst constnull.drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA#2",
+ ("putroutconst constnull.drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA#2",
NULL != ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1305*/ meltfptr[1304]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[3] =
- (melt_ptr_t) ( /*_.VALCLO___V1305*/ meltfptr[1304]);
+ NULL != /*_.VALCLO___V1322*/ meltfptr[1321]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALCLO___V1322*/ meltfptr[1321]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1314__ALTMATCH_HANDLE_NORMALIZED_MDATA#4",
+ ("putroutconst constnull.drout_1332__ALTMATCH_HANDLE_NORMALIZED_MDATA#4",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1313*/ meltfptr[1312]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1313*/ meltfptr[1312]);
+ NULL != /*_.VALCLO___V1330*/ meltfptr[1329]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1422*/ meltfptr[1421])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1330*/ meltfptr[1329]);
- MELT_LOCATION ("warmelt-normatch.melt:6122:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6273:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1403*/ meltfptr[1402]);
+ meltgc_touch ( /*_.VALROUT___V1422*/ meltfptr[1421]);
- /*putclosurout#98 */
- melt_assertmsg ("putclosrout#98 checkclo",
+ /*putclosurout#106 */
+ melt_assertmsg ("putclosrout#106 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1404*/ meltfptr[1403])) ==
+ ( /*_.VALCLO___V1423*/ meltfptr[1422])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#98 checkrout",
+ melt_assertmsg ("putclosrout#106 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1403*/ meltfptr[1402]))
+ ( /*_.VALROUT___V1422*/ meltfptr[1421]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1404*/ meltfptr[1403])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1423*/ meltfptr[1422])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1422*/ meltfptr[1421]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1404*/ meltfptr[1403]);
+ meltgc_touch ( /*_.VALCLO___V1423*/ meltfptr[1422]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#0",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1154*/ meltfptr[1153]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]);
+ NULL != /*_.VALDATA___V1171*/ meltfptr[1170]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#2",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#2",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[2] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_24 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_25 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*putslot*/
+ /*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1406*/ meltfptr[1405]))
+ ( /*_.VALDATA___V1425*/ meltfptr[1424]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1406*/
- meltfptr[1405]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]))->
+ ( /*_.VALDATA___V1425*/
+ meltfptr[1424]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1425*/ meltfptr[1424]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1407*/ meltfptr[1406]);
+ /*_.VALSTR___V1426*/ meltfptr[1425]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1406*/ meltfptr[1405]);
+ meltgc_touch ( /*_.VALDATA___V1425*/ meltfptr[1424]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#3",
- NULL != ( /*_.VALDATA___V1406*/ meltfptr[1405]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]);
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#3",
+ NULL != ( /*_.VALDATA___V1425*/ meltfptr[1424]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V1425*/ meltfptr[1424]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#4",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#4",
NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#5",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#5",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#6",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#6",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1316__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#7",
+ ("putroutconst constnull.drout_1334__ALTMATCH_MAKE_MATCH_NORMALIZATION_CONTEXT#7",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1186*/ meltfptr[1185]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]);
+ NULL != /*_.VALDATA___V1203*/ meltfptr[1202]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1405*/ meltfptr[1404])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6160:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6311:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1405*/ meltfptr[1404]);
+ meltgc_touch ( /*_.VALROUT___V1424*/ meltfptr[1423]);
- /*putclosurout#99 */
- melt_assertmsg ("putclosrout#99 checkclo",
+ /*putclosurout#107 */
+ melt_assertmsg ("putclosrout#107 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1408*/ meltfptr[1407])) ==
+ ( /*_.VALCLO___V1427*/ meltfptr[1426])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#99 checkrout",
+ melt_assertmsg ("putclosrout#107 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1405*/ meltfptr[1404]))
+ ( /*_.VALROUT___V1424*/ meltfptr[1423]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1408*/ meltfptr[1407])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1405*/ meltfptr[1404]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1427*/ meltfptr[1426])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1408*/ meltfptr[1407]);
+ meltgc_touch ( /*_.VALCLO___V1427*/ meltfptr[1426]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT#0",
+ ("putroutconst constnull.drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1248*/ meltfptr[1247]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]);
+ NULL != /*_.VALDATA___V1265*/ meltfptr[1264]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1331*/ meltfptr[1330]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[2] =
- (melt_ptr_t) ( /*_.VALCLO___V1331*/ meltfptr[1330]);
+ NULL != /*_.VALCLO___V1348*/ meltfptr[1347]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[3] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[3] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT#4",
+ ("putroutconst constnull.drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT#4",
NULL != ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[4] =
(melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V74*/ meltfptr[73]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1404*/ meltfptr[1403]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[5] =
- (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]);
+ NULL != /*_.VALCLO___V1423*/ meltfptr[1422]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALCLO___V1423*/ meltfptr[1422]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1302*/ meltfptr[1301]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301]);
+ NULL != /*_.VALDATA___V1319*/ meltfptr[1318]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT#7",
+ ("putroutconst constnull.drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT#7",
NULL != ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[7] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT#8",
+ ("putroutconst constnull.drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT#8",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[8] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1429*/ meltfptr[1428]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1322__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1340__LAMBDA_#0",
NULL != ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1429*/ meltfptr[1428])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]);
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1410*/ meltfptr[1409]))
+ ( /*_.VALROUT___V1429*/ meltfptr[1428]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1322__LAMBDA_#1",
+ melt_checkmsg ("putroutconst constnull.drout_1340__LAMBDA_#1",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1410*/ meltfptr[1409])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1429*/ meltfptr[1428])->tabval[1] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6271:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6422:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1410*/ meltfptr[1409]);
+ meltgc_touch ( /*_.VALROUT___V1429*/ meltfptr[1428]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1320__ALTMATCH_NORMALIZE_MATCH_CONTEXT#9",
- NULL != ( /*_.VALROUT___V1410*/ meltfptr[1409]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1409*/ meltfptr[1408])->tabval[9] =
- (melt_ptr_t) ( /*_.VALROUT___V1410*/ meltfptr[1409]);
+ ("putroutconst constnull.drout_1338__ALTMATCH_NORMALIZE_MATCH_CONTEXT#9",
+ NULL != ( /*_.VALROUT___V1429*/ meltfptr[1428]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALROUT___V1429*/ meltfptr[1428]);
- MELT_LOCATION ("warmelt-normatch.melt:6223:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6374:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1409*/ meltfptr[1408]);
+ meltgc_touch ( /*_.VALROUT___V1428*/ meltfptr[1427]);
- /*putclosurout#100 */
- melt_assertmsg ("putclosrout#100 checkclo",
+ /*putclosurout#108 */
+ melt_assertmsg ("putclosrout#108 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1411*/ meltfptr[1410])) ==
+ ( /*_.VALCLO___V1430*/ meltfptr[1429])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#100 checkrout",
+ melt_assertmsg ("putclosrout#108 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1409*/ meltfptr[1408]))
+ ( /*_.VALROUT___V1428*/ meltfptr[1427]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1411*/ meltfptr[1410])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1409*/ meltfptr[1408]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1430*/ meltfptr[1429])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1411*/ meltfptr[1410]);
+ meltgc_touch ( /*_.VALCLO___V1430*/ meltfptr[1429]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#0",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#0",
NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[0] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#1",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#1",
NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[1] =
(melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#2",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#2",
NULL !=
( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#3",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#4",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#4",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[4] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#5",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#5",
NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[5] =
(melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#6",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#6",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#7",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#7",
NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[7] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[7] =
(melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#8",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#8",
NULL != ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[8] =
(melt_ptr_t) ( /*_.CLONE_SYMBOL__V48*/ meltfptr[47]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1413*/ meltfptr[1412]))
+ ( /*_.VALDATA___V1432*/ meltfptr[1431]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1413*/
- meltfptr[1412]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1413*/ meltfptr[1412]))->
+ ( /*_.VALDATA___V1432*/
+ meltfptr[1431]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1432*/ meltfptr[1431]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1414*/ meltfptr[1413]);
+ /*_.VALSTR___V1433*/ meltfptr[1432]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1413*/ meltfptr[1412]);
+ meltgc_touch ( /*_.VALDATA___V1432*/ meltfptr[1431]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#9",
- NULL != ( /*_.VALDATA___V1413*/ meltfptr[1412]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V1413*/ meltfptr[1412]);
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#9",
+ NULL != ( /*_.VALDATA___V1432*/ meltfptr[1431]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V1432*/ meltfptr[1431]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#10",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#10",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[10] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#11",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#11",
NULL != ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V45*/ meltfptr[44]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V708*/ meltfptr[707]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[12] =
- (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]);
+ NULL != /*_.VALDATA___V711*/ meltfptr[710]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[12] =
+ (melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1186*/ meltfptr[1185]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[13] =
- (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]);
+ NULL != /*_.VALDATA___V1203*/ meltfptr[1202]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V618*/ meltfptr[617]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]);
+ NULL != /*_.VALDATA___V621*/ meltfptr[620]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[14] =
+ (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#15",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#15",
NULL !=
( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[15] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V70*/ meltfptr[69]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V664*/ meltfptr[663]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[16] =
- (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]);
+ NULL != /*_.VALDATA___V667*/ meltfptr[666]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[16] =
+ (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#17",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#17",
NULL != ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[17] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[17] =
(melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V50*/ meltfptr[49]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1030*/ meltfptr[1029]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[18] =
- (melt_ptr_t) ( /*_.VALCLO___V1030*/ meltfptr[1029]);
+ NULL != /*_.VALCLO___V1035*/ meltfptr[1034]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALCLO___V1035*/ meltfptr[1034]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#19",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#19",
NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[19] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[19] =
(melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1147*/ meltfptr[1146]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[20] =
- (melt_ptr_t) ( /*_.VALCLO___V1147*/ meltfptr[1146]);
+ NULL != /*_.VALCLO___V1164*/ meltfptr[1163]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALCLO___V1164*/ meltfptr[1163]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V832*/ meltfptr[831]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]);
+ NULL != /*_.VALDATA___V835*/ meltfptr[834]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#22",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#22",
NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[22] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[22] =
(melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#23",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#23",
NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[23] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[23] =
(melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#24",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#24",
NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[24] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[24] =
(melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#25",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#25",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[25] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#26",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#26",
NULL != ( /*_.CTYPE_VOID__V72*/ meltfptr[71]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[26] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[26] =
(melt_ptr_t) ( /*_.CTYPE_VOID__V72*/ meltfptr[71]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V541*/ meltfptr[540]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]);
+ NULL != /*_.VALDATA___V542*/ meltfptr[541]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#28",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#28",
NULL != ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[28] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[28] =
(melt_ptr_t) ( /*_.CLASS_CONTAINER__V39*/ meltfptr[38]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#0",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#0",
NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[0] =
(melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#1",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#1",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[1] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#2",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#2",
NULL != ( /*_.DISCR_INTEGER__V77*/ meltfptr[76]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_INTEGER__V77*/ meltfptr[76]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#3",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#3",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[3] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#4",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#4",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[4] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V555*/ meltfptr[554]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[5] =
- (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]);
+ NULL != /*_.VALDATA___V556*/ meltfptr[555]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[5] =
+ (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#6",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#6",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[6] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[6] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#8",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#8",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[8] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[8] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#9",
+ melt_checkmsg ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#9",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[9] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[9] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#10",
+ NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[10] =
+ (melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#10",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#11",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[10] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[11] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#11",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#12",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[11] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[12] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1337__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1337__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#2",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1337__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#4",
+ NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[4] =
+ (melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1337__LAMBDA_#4",
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#5",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[4] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[5] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1417*/ meltfptr[1416]))
+ ( /*_.VALROUT___V1436*/ meltfptr[1435]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1337__LAMBDA_#5",
+ melt_checkmsg ("putroutconst constnull.drout_1355__LAMBDA_#6",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1417*/ meltfptr[1416])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[6] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:6547:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6698:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1417*/ meltfptr[1416]);
+ meltgc_touch ( /*_.VALROUT___V1436*/ meltfptr[1435]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_25 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#12",
- NULL != ( /*_.VALROUT___V1417*/ meltfptr[1416]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[12] =
- (melt_ptr_t) ( /*_.VALROUT___V1417*/ meltfptr[1416]);
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#13",
+ NULL != ( /*_.VALROUT___V1436*/ meltfptr[1435]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[13] =
+ (melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#13",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#14",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[13] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[14] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[14] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[15] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#15",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#16",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[15] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[16] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#16",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#17",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[16] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[17] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[17] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[18] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#18",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#19",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[18] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[19] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1004*/ meltfptr[1003]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[19] =
- (melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]);
+ NULL != /*_.VALDATA___V1007*/ meltfptr[1006]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[20] =
+ (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1012*/ meltfptr[1011]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[20] =
- (melt_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]);
+ NULL != /*_.VALDATA___V1015*/ meltfptr[1014]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[21] =
+ (melt_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V760*/ meltfptr[759]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[21] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ NULL != /*_.VALDATA___V763*/ meltfptr[762]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[22] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[22] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[23] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V780*/ meltfptr[779]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[23] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ NULL != /*_.VALDATA___V783*/ meltfptr[782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[24] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#2",
+ melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#2",
NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[2] =
(melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#3",
+ melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#3",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[3] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V790*/ meltfptr[789]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[4] =
- (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]);
+ NULL != /*_.VALDATA___V793*/ meltfptr[792]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#5",
+ melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#5",
NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[5] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[5] =
(melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1004*/ meltfptr[1003]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[6] =
- (melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]);
+ NULL != /*_.VALDATA___V1007*/ meltfptr[1006]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[6] =
+ (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1012*/ meltfptr[1011]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[7] =
- (melt_ptr_t) ( /*_.VALDATA___V1012*/ meltfptr[1011]);
+ NULL != /*_.VALDATA___V1015*/ meltfptr[1014]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[7] =
+ (melt_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V760*/ meltfptr[759]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[8] =
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]);
+ NULL != /*_.VALDATA___V763*/ meltfptr[762]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[8] =
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V850*/ meltfptr[849]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[9] =
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]);
+ NULL != /*_.VALDATA___V853*/ meltfptr[852]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[9] =
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1418*/ meltfptr[1417]))
+ ( /*_.VALROUT___V1437*/ meltfptr[1436]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V780*/ meltfptr[779]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1418*/ meltfptr[1417])->tabval[10] =
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]);
+ NULL != /*_.VALDATA___V783*/ meltfptr[782]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1437*/ meltfptr[1436])->tabval[10] =
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]);
- MELT_LOCATION ("warmelt-normatch.melt:6581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6731:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1418*/ meltfptr[1417]);
+ meltgc_touch ( /*_.VALROUT___V1437*/ meltfptr[1436]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#24",
- NULL != ( /*_.VALROUT___V1418*/ meltfptr[1417]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[24] =
- (melt_ptr_t) ( /*_.VALROUT___V1418*/ meltfptr[1417]);
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#25",
+ NULL != ( /*_.VALROUT___V1437*/ meltfptr[1436]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[25] =
+ (melt_ptr_t) ( /*_.VALROUT___V1437*/ meltfptr[1436]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#25",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#26",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[25] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[26] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[26] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[27] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[27] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[28] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1419*/ meltfptr[1418]))
+ ( /*_.VALROUT___V1438*/ meltfptr[1437]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1339__LAMBDA_#0",
+ melt_checkmsg ("putroutconst constnull.drout_1357__LAMBDA_#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1419*/ meltfptr[1418])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1419*/ meltfptr[1418]))
+ ( /*_.VALROUT___V1438*/ meltfptr[1437]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1419*/ meltfptr[1418])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1419*/ meltfptr[1418]))
+ ( /*_.VALROUT___V1438*/ meltfptr[1437]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1419*/ meltfptr[1418])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6616:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6767:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1419*/ meltfptr[1418]);
+ meltgc_touch ( /*_.VALROUT___V1438*/ meltfptr[1437]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#28",
- NULL != ( /*_.VALROUT___V1419*/ meltfptr[1418]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[28] =
- (melt_ptr_t) ( /*_.VALROUT___V1419*/ meltfptr[1418]);
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#29",
+ NULL != ( /*_.VALROUT___V1438*/ meltfptr[1437]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
+ /*^putroutconstnotnull */
+ /*putroutconstnotnull */
+ melt_assertmsg ("putroutconstnotnull checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
+ == MELTOBMAG_ROUTINE);
+ melt_assertmsg ("putroutconstnotnull notnullconst",
+ NULL != /*_.VALDATA___V689*/ meltfptr[688]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[30] =
+ (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#29",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#31",
NULL != ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[29] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[31] =
(melt_ptr_t) ( /*_.DISCR_MULTIPLE__V44*/ meltfptr[43]);
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1420*/ meltfptr[1419]))
+ ( /*_.VALROUT___V1439*/ meltfptr[1438]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1340__LAMBDA_#0",
- NULL != ( /*_.VALBXINT___V1421*/ meltfptr[1420]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[0] =
- (melt_ptr_t) ( /*_.VALBXINT___V1421*/ meltfptr[1420]);
+ melt_checkmsg ("putroutconst constnull.drout_1358__LAMBDA_#0",
+ NULL != ( /*_.VALBXINT___V1440*/ meltfptr[1439]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1439*/ meltfptr[1438])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1440*/ meltfptr[1439]);
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1420*/ meltfptr[1419]))
+ ( /*_.VALROUT___V1439*/ meltfptr[1438]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1340__LAMBDA_#1",
- NULL != ( /*_.VALBXINT___V1422*/ meltfptr[1421]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[1] =
- (melt_ptr_t) ( /*_.VALBXINT___V1422*/ meltfptr[1421]);
+ melt_checkmsg ("putroutconst constnull.drout_1358__LAMBDA_#1",
+ NULL != ( /*_.VALBXINT___V1441*/ meltfptr[1440]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1439*/ meltfptr[1438])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1441*/ meltfptr[1440]);
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1420*/ meltfptr[1419]))
+ ( /*_.VALROUT___V1439*/ meltfptr[1438]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1340__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V1423*/ meltfptr[1422]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V1423*/ meltfptr[1422]);
+ melt_checkmsg ("putroutconst constnull.drout_1358__LAMBDA_#2",
+ NULL != ( /*_.VALBXINT___V1442*/ meltfptr[1441]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1439*/ meltfptr[1438])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1442*/ meltfptr[1441]);
- MELT_LOCATION ("warmelt-normatch.melt:6658:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6807:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1420*/ meltfptr[1419]);
+ meltgc_touch ( /*_.VALROUT___V1439*/ meltfptr[1438]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#30",
- NULL != ( /*_.VALROUT___V1420*/ meltfptr[1419]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[30] =
- (melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419]);
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#32",
+ NULL != ( /*_.VALROUT___V1439*/ meltfptr[1438]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[32] =
+ (melt_ptr_t) ( /*_.VALROUT___V1439*/ meltfptr[1438]);
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1424*/ meltfptr[1423]))
+ ( /*_.VALROUT___V1443*/ meltfptr[1442]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1344__LAMBDA_#0",
- NULL != ( /*_.VALBXINT___V1425*/ meltfptr[1424]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[0] =
- (melt_ptr_t) ( /*_.VALBXINT___V1425*/ meltfptr[1424]);
+ melt_checkmsg ("putroutconst constnull.drout_1362__LAMBDA_#0",
+ NULL != ( /*_.VALBXINT___V1444*/ meltfptr[1443]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1444*/ meltfptr[1443]);
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1424*/ meltfptr[1423]))
+ ( /*_.VALROUT___V1443*/ meltfptr[1442]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1344__LAMBDA_#1",
- NULL != ( /*_.VALBXINT___V1426*/ meltfptr[1425]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[1] =
- (melt_ptr_t) ( /*_.VALBXINT___V1426*/ meltfptr[1425]);
+ melt_checkmsg ("putroutconst constnull.drout_1362__LAMBDA_#1",
+ NULL != ( /*_.VALBXINT___V1445*/ meltfptr[1444]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1445*/ meltfptr[1444]);
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1424*/ meltfptr[1423]))
+ ( /*_.VALROUT___V1443*/ meltfptr[1442]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1344__LAMBDA_#2",
- NULL != ( /*_.VALBXINT___V1427*/ meltfptr[1426]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[2] =
- (melt_ptr_t) ( /*_.VALBXINT___V1427*/ meltfptr[1426]);
+ melt_checkmsg ("putroutconst constnull.drout_1362__LAMBDA_#2",
+ NULL != ( /*_.VALBXINT___V1446*/ meltfptr[1445]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1443*/ meltfptr[1442])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALBXINT___V1446*/ meltfptr[1445]);
- MELT_LOCATION ("warmelt-normatch.melt:6677:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6826:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1424*/ meltfptr[1423]);
+ meltgc_touch ( /*_.VALROUT___V1443*/ meltfptr[1442]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#31",
- NULL != ( /*_.VALROUT___V1424*/ meltfptr[1423]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[31] =
- (melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423]);
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#33",
+ NULL != ( /*_.VALROUT___V1443*/ meltfptr[1442]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[33] =
+ (melt_ptr_t) ( /*_.VALROUT___V1443*/ meltfptr[1442]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
- /*^putroutconstnotnull */
- /*putroutconstnotnull */
- melt_assertmsg ("putroutconstnotnull checkrout",
- melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
- == MELTOBMAG_ROUTINE);
- melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V686*/ meltfptr[685]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[32] =
- (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]);
-
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#33",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#34",
NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[33] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[34] =
(melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#34",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#35",
NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[34] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[35] =
(melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
+ /*^putroutconst */
+ /*putroutconst */
+ melt_assertmsg ("putroutconst checkrout",
+ melt_magic_discr ((melt_ptr_t)
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
+ == MELTOBMAG_ROUTINE);
+ if (MELT_HAS_INITIAL_ENVIRONMENT)
+ melt_checkmsg
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#36",
+ NULL != ( /*_.ADD2OUT__V76*/ meltfptr[75]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[36] =
+ (melt_ptr_t) ( /*_.ADD2OUT__V76*/ meltfptr[75]);
+
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1335__MG_ALTDRAW_GRAPHVIZ#35",
+ ("putroutconst constnull.drout_1353__MG_ALTDRAW_GRAPHVIZ#37",
NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[35] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[37] =
(melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V754*/ meltfptr[753]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[36] =
- (melt_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]);
+ NULL != /*_.VALDATA___V757*/ meltfptr[756]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[38] =
+ (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V832*/ meltfptr[831]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[37] =
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]);
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_25 */
+ NULL != /*_.VALDATA___V835*/ meltfptr[834]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[39] =
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]);
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1123*/ meltfptr[1122]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[38] =
- (melt_ptr_t) ( /*_.VALDATA___V1123*/ meltfptr[1122]);
+ NULL != /*_.VALDATA___V1138*/ meltfptr[1137]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1435*/ meltfptr[1434])->tabval[40] =
+ (melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]);
- MELT_LOCATION ("warmelt-normatch.melt:6509:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6660:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1416*/ meltfptr[1415]);
+ meltgc_touch ( /*_.VALROUT___V1435*/ meltfptr[1434]);
- /*putclosurout#101 */
- melt_assertmsg ("putclosrout#101 checkclo",
+ /*putclosurout#109 */
+ melt_assertmsg ("putclosrout#109 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1415*/ meltfptr[1414])) ==
+ ( /*_.VALCLO___V1434*/ meltfptr[1433])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#101 checkrout",
+ melt_assertmsg ("putclosrout#109 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1416*/ meltfptr[1415]))
+ ( /*_.VALROUT___V1435*/ meltfptr[1434]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1415*/ meltfptr[1414])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1434*/ meltfptr[1433])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1435*/ meltfptr[1434]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1415*/ meltfptr[1414]);
+ meltgc_touch ( /*_.VALCLO___V1434*/ meltfptr[1433]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1415*/ meltfptr[1414]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[29] =
- (melt_ptr_t) ( /*_.VALCLO___V1415*/ meltfptr[1414]);
+ NULL != /*_.VALCLO___V1434*/ meltfptr[1433]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[29] =
+ (melt_ptr_t) ( /*_.VALCLO___V1434*/ meltfptr[1433]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1408*/ meltfptr[1407]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[30] =
- (melt_ptr_t) ( /*_.VALCLO___V1408*/ meltfptr[1407]);
+ NULL != /*_.VALCLO___V1427*/ meltfptr[1426]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[30] =
+ (melt_ptr_t) ( /*_.VALCLO___V1427*/ meltfptr[1426]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1411*/ meltfptr[1410]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[31] =
- (melt_ptr_t) ( /*_.VALCLO___V1411*/ meltfptr[1410]);
+ NULL != /*_.VALCLO___V1430*/ meltfptr[1429]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[31] =
+ (melt_ptr_t) ( /*_.VALCLO___V1430*/ meltfptr[1429]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#32",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#32",
NULL != ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[32] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[32] =
(melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V51*/ meltfptr[50]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V950*/ meltfptr[949]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[33] =
- (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
+ NULL != /*_.VALDATA___V953*/ meltfptr[952]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[33] =
+ (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[34] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[34] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V950*/ meltfptr[949]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[0] =
- (melt_ptr_t) ( /*_.VALDATA___V950*/ meltfptr[949]);
+ NULL != /*_.VALDATA___V953*/ meltfptr[952]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[0] =
+ (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1429*/ meltfptr[1428]))
+ ( /*_.VALDATA___V1448*/ meltfptr[1447]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1429*/
- meltfptr[1428]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428]))->
+ ( /*_.VALDATA___V1448*/
+ meltfptr[1447]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1430*/ meltfptr[1429]);
+ /*_.VALSTR___V1449*/ meltfptr[1448]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1429*/ meltfptr[1428]);
+ meltgc_touch ( /*_.VALDATA___V1448*/ meltfptr[1447]);
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1327__LAMBDA_#1",
- NULL != ( /*_.VALDATA___V1429*/ meltfptr[1428]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[1] =
- (melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428]);
+ melt_checkmsg ("putroutconst constnull.drout_1345__LAMBDA_#1",
+ NULL != ( /*_.VALDATA___V1448*/ meltfptr[1447]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[1] =
+ (melt_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447]);
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1428*/ meltfptr[1427]))
+ ( /*_.VALROUT___V1447*/ meltfptr[1446]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V732*/ meltfptr[731]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[2] =
- (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]);
+ NULL != /*_.VALDATA___V735*/ meltfptr[734]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[2] =
+ (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]);
- MELT_LOCATION ("warmelt-normatch.melt:6467:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6618:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1428*/ meltfptr[1427]);
+ meltgc_touch ( /*_.VALROUT___V1447*/ meltfptr[1446]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#35",
- NULL != ( /*_.VALROUT___V1428*/ meltfptr[1427]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[35] =
- (melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427]);
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#35",
+ NULL != ( /*_.VALROUT___V1447*/ meltfptr[1446]));
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[35] =
+ (melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
- melt_checkmsg ("putroutconst constnull.drout_1323__NORMEXP_ALTMATCH#36",
+ melt_checkmsg ("putroutconst constnull.drout_1341__NORMEXP_ALTMATCH#36",
NULL != ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[36] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[36] =
(melt_ptr_t) ( /*_.CLASS_LET_BINDING__V46*/ meltfptr[45]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALDATA___V1154*/ meltfptr[1153]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[37] =
- (melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]);
+ NULL != /*_.VALDATA___V1171*/ meltfptr[1170]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1431*/ meltfptr[1430])->tabval[37] =
+ (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]);
- MELT_LOCATION ("warmelt-normatch.melt:6299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6450:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1412*/ meltfptr[1411]);
+ meltgc_touch ( /*_.VALROUT___V1431*/ meltfptr[1430]);
- /*putclosurout#102 */
- melt_assertmsg ("putclosrout#102 checkclo",
+ /*putclosurout#110 */
+ melt_assertmsg ("putclosrout#110 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1431*/ meltfptr[1430])) ==
+ ( /*_.VALCLO___V1450*/ meltfptr[1449])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#102 checkrout",
+ melt_assertmsg ("putclosrout#110 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1412*/ meltfptr[1411]))
+ ( /*_.VALROUT___V1431*/ meltfptr[1430]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1431*/ meltfptr[1430])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1450*/ meltfptr[1449])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1431*/ meltfptr[1430]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1431*/ meltfptr[1430]);
+ meltgc_touch ( /*_.VALCLO___V1450*/ meltfptr[1449]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1330__ALTERNATE_MATCH_OPTSET#0",
+ ("putroutconst constnull.drout_1348__ALTERNATE_MATCH_OPTSET#0",
NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[0] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[0] =
(melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1330__ALTERNATE_MATCH_OPTSET#1",
+ ("putroutconst constnull.drout_1348__ALTERNATE_MATCH_OPTSET#1",
NULL != ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[1] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[1] =
(melt_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1330__ALTERNATE_MATCH_OPTSET#2",
+ ("putroutconst constnull.drout_1348__ALTERNATE_MATCH_OPTSET#2",
NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[2] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[2] =
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^putroutconst */
/*putroutconst */
melt_assertmsg ("putroutconst checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
if (MELT_HAS_INITIAL_ENVIRONMENT)
melt_checkmsg
- ("putroutconst constnull.drout_1330__ALTERNATE_MATCH_OPTSET#3",
+ ("putroutconst constnull.drout_1348__ALTERNATE_MATCH_OPTSET#3",
NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16]));
- ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[3] =
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[3] =
(melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^putroutconstnotnull */
/*putroutconstnotnull */
melt_assertmsg ("putroutconstnotnull checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
melt_assertmsg ("putroutconstnotnull notnullconst",
- NULL != /*_.VALCLO___V1431*/ meltfptr[1430]);
- ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[4] =
- (melt_ptr_t) ( /*_.VALCLO___V1431*/ meltfptr[1430]);
+ NULL != /*_.VALCLO___V1450*/ meltfptr[1449]);
+ ((meltroutine_ptr_t) /*_.VALROUT___V1451*/ meltfptr[1450])->tabval[4] =
+ (melt_ptr_t) ( /*_.VALCLO___V1450*/ meltfptr[1449]);
- MELT_LOCATION ("warmelt-normatch.melt:6494:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6645:/ initchunk");
/*^touch */
/*touch:IROUTVAL_ */
- meltgc_touch ( /*_.VALROUT___V1432*/ meltfptr[1431]);
+ meltgc_touch ( /*_.VALROUT___V1451*/ meltfptr[1450]);
- /*putclosurout#103 */
- melt_assertmsg ("putclosrout#103 checkclo",
+ /*putclosurout#111 */
+ melt_assertmsg ("putclosrout#111 checkclo",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALCLO___V1433*/ meltfptr[1432])) ==
+ ( /*_.VALCLO___V1452*/ meltfptr[1451])) ==
MELTOBMAG_CLOSURE);
- melt_assertmsg ("putclosrout#103 checkrout",
+ melt_assertmsg ("putclosrout#111 checkrout",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALROUT___V1432*/ meltfptr[1431]))
+ ( /*_.VALROUT___V1451*/ meltfptr[1450]))
== MELTOBMAG_ROUTINE);
- ((meltclosure_ptr_t) /*_.VALCLO___V1433*/ meltfptr[1432])->rout =
- (meltroutine_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431]);
+ ((meltclosure_ptr_t) /*_.VALCLO___V1452*/ meltfptr[1451])->rout =
+ (meltroutine_ptr_t) ( /*_.VALROUT___V1451*/ meltfptr[1450]);
/*touch:DATACLOSURE_ */
- meltgc_touch ( /*_.VALCLO___V1433*/ meltfptr[1432]);
+ meltgc_touch ( /*_.VALCLO___V1452*/ meltfptr[1451]);
/*putslot */
melt_assertmsg ("putslot checkobj",
melt_magic_discr ((melt_ptr_t)
- ( /*_.VALDATA___V1434*/ meltfptr[1433]))
+ ( /*_.VALDATA___V1453*/ meltfptr[1452]))
== MELTOBMAG_OBJECT);
melt_assertmsg ("putslot checkoff",
(1 >= 0
&& 1 <
melt_object_length ((melt_ptr_t)
- ( /*_.VALDATA___V1434*/
- meltfptr[1433]))));
- ((meltobject_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433]))->
+ ( /*_.VALDATA___V1453*/
+ meltfptr[1452]))));
+ ((meltobject_ptr_t) ( /*_.VALDATA___V1453*/ meltfptr[1452]))->
obj_vartab[1] = (melt_ptr_t) (
- /*_.VALSTR___V1435*/ meltfptr[1434]);
+ /*_.VALSTR___V1454*/ meltfptr[1453]);
/*touch:VALUEDATA_ */
- meltgc_touch ( /*_.VALDATA___V1434*/ meltfptr[1433]);
+ meltgc_touch ( /*_.VALDATA___V1453*/ meltfptr[1452]);
/**COMMENT: before toplevel body **/ ;
@@ -68729,7 +69616,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*then */
{
/*^cond.then */
- /*_.OR___V1437*/ meltfptr[1436] =
+ /*_.OR___V1456*/ meltfptr[1455] =
/*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */
/*_.CONTENV___V2*/ meltfptr[1];;
}
@@ -68745,8 +69632,8 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 3, "SYSDATA_CONT_FRESH_ENV");
- /*_.SYSDATA_CONT_FRESH_ENV__V1438*/
- meltfptr[1437] = slot;
+ /*_.SYSDATA_CONT_FRESH_ENV__V1457*/
+ meltfptr[1456] = slot;
};
;
/*^apply */
@@ -68756,22 +69643,22 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_cstring = "warmelt-normatch";
- /*_.FUN___V1439*/ meltfptr[1438] =
+ /*_.FUN___V1458*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
- ( /*_.SYSDATA_CONT_FRESH_ENV__V1438*/
- meltfptr[1437]),
+ ( /*_.SYSDATA_CONT_FRESH_ENV__V1457*/
+ meltfptr[1456]),
(melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]),
(MELTBPARSTR_CSTRING ""), argtab, "",
(union meltparam_un *) 0);
}
;
- /*_.OR___V1437*/ meltfptr[1436] = /*_.FUN___V1439*/ meltfptr[1438];;
+ /*_.OR___V1456*/ meltfptr[1455] = /*_.FUN___V1458*/ meltfptr[1457];;
/*epilog */
MELT_LOCATION ("warmelt-normatch.melt:3:/ clear");
- /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V1438*/ meltfptr[1437] = 0;
+ /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V1457*/ meltfptr[1456] = 0;
/*^clear */
- /*clear *//*_.FUN___V1439*/ meltfptr[1438] = 0;
+ /*clear *//*_.FUN___V1458*/ meltfptr[1457] = 0;
}
;
}
@@ -68784,7 +69671,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.OR___V1437*/ meltfptr[1436] = 0;
+ /*clear *//*_.OR___V1456*/ meltfptr[1455] = 0;
}
MELT_LOCATION ("warmelt-normatch.melt:95:/ initchunk");
@@ -68799,11 +69686,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V149*/ meltfptr[148];
- /*_.INSTALL_METHOD__V1440*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V150*/ meltfptr[149];
+ /*_.INSTALL_METHOD__V1459*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -68815,7 +69702,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1440*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1459*/ meltfptr[1456] = 0;
}
MELT_LOCATION ("warmelt-normatch.melt:112:/ initchunk");
@@ -68830,11 +69717,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V159*/ meltfptr[158];
- /*_.INSTALL_METHOD__V1441*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V160*/ meltfptr[159];
+ /*_.INSTALL_METHOD__V1460*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/
@@ -68846,7 +69733,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1441*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1460*/ meltfptr[1457] = 0;
}
MELT_LOCATION ("warmelt-normatch.melt:146:/ initchunk");
@@ -68861,11 +69748,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V163*/ meltfptr[162];
- /*_.INSTALL_METHOD__V1442*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V164*/ meltfptr[163];
+ /*_.INSTALL_METHOD__V1461*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/
@@ -68877,7 +69764,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1442*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1461*/ meltfptr[1455] = 0;
}
MELT_LOCATION ("warmelt-normatch.melt:158:/ initchunk");
@@ -68892,11 +69779,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V167*/ meltfptr[166];
- /*_.INSTALL_METHOD__V1443*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V168*/ meltfptr[167];
+ /*_.INSTALL_METHOD__V1462*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -68905,7 +69792,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1443*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1462*/ meltfptr[1456] = 0;
}
MELT_LOCATION ("warmelt-normatch.melt:210:/ initchunk");
@@ -68920,11 +69807,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V171*/ meltfptr[170];
- /*_.INSTALL_METHOD__V1444*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V172*/ meltfptr[171];
+ /*_.INSTALL_METHOD__V1463*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/
@@ -68936,10 +69823,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1444*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1463*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:234:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:235:/ initchunk");
/*^block */
/*anyblock */
{
@@ -68951,11 +69838,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V185*/ meltfptr[184];
- /*_.INSTALL_METHOD__V1445*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V186*/ meltfptr[185];
+ /*_.INSTALL_METHOD__V1464*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/
@@ -68967,10 +69854,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1445*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1464*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:273:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:274:/ initchunk");
/*^block */
/*anyblock */
{
@@ -68982,11 +69869,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V191*/ meltfptr[190];
- /*_.INSTALL_METHOD__V1446*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V192*/ meltfptr[191];
+ /*_.INSTALL_METHOD__V1465*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/
@@ -68998,10 +69885,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1446*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1465*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:334:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:335:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69013,11 +69900,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V201*/ meltfptr[200];
- /*_.INSTALL_METHOD__V1447*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V202*/ meltfptr[201];
+ /*_.INSTALL_METHOD__V1466*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/
@@ -69029,10 +69916,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1447*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1466*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:407:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:408:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69044,11 +69931,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V212*/ meltfptr[211];
- /*_.INSTALL_METHOD__V1448*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V213*/ meltfptr[212];
+ /*_.INSTALL_METHOD__V1467*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/
@@ -69060,10 +69947,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1448*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1467*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:430:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:431:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69075,11 +69962,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V220*/ meltfptr[219];
- /*_.INSTALL_METHOD__V1449*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V221*/ meltfptr[220];
+ /*_.INSTALL_METHOD__V1468*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/
@@ -69091,10 +69978,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1449*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1468*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:727:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:728:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69106,11 +69993,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V434*/ meltfptr[433];
- /*_.INSTALL_METHOD__V1450*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V435*/ meltfptr[434];
+ /*_.INSTALL_METHOD__V1469*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -69122,10 +70009,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1450*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1469*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:745:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:746:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69137,11 +70024,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V436*/ meltfptr[435];
- /*_.INSTALL_METHOD__V1451*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V437*/ meltfptr[436];
+ /*_.INSTALL_METHOD__V1470*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/
@@ -69153,10 +70040,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1451*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1470*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:940:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:941:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69168,11 +70055,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V443*/ meltfptr[442];
- /*_.INSTALL_METHOD__V1452*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V444*/ meltfptr[443];
+ /*_.INSTALL_METHOD__V1471*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/
@@ -69184,10 +70071,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1452*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1471*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:954:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:955:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69199,11 +70086,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V449*/ meltfptr[448];
- /*_.INSTALL_METHOD__V1453*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V450*/ meltfptr[449];
+ /*_.INSTALL_METHOD__V1472*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -69212,10 +70099,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1453*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1472*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1141:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1142:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69227,11 +70114,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V457*/ meltfptr[456];
- /*_.INSTALL_METHOD__V1454*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V458*/ meltfptr[457];
+ /*_.INSTALL_METHOD__V1473*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/
@@ -69243,10 +70130,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1454*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1473*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1333:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1334:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69258,11 +70145,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V493*/ meltfptr[492];
- /*_.INSTALL_METHOD__V1455*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V494*/ meltfptr[493];
+ /*_.INSTALL_METHOD__V1474*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/
@@ -69274,10 +70161,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1455*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1474*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1377:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1378:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69289,11 +70176,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V504*/ meltfptr[503];
- /*_.INSTALL_METHOD__V1456*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V505*/ meltfptr[504];
+ /*_.INSTALL_METHOD__V1475*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/
@@ -69305,10 +70192,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1456*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1475*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1577:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1578:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69320,11 +70207,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V509*/ meltfptr[508];
- /*_.INSTALL_METHOD__V1457*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V510*/ meltfptr[509];
+ /*_.INSTALL_METHOD__V1476*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/
@@ -69336,10 +70223,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1457*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1476*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1838:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1839:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69351,11 +70238,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V523*/ meltfptr[522];
- /*_.INSTALL_METHOD__V1458*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V524*/ meltfptr[523];
+ /*_.INSTALL_METHOD__V1477*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/
@@ -69367,10 +70254,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1458*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1477*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1909:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1910:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69382,11 +70269,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V538*/ meltfptr[537];
- /*_.INSTALL_METHOD__V1459*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V539*/ meltfptr[538];
+ /*_.INSTALL_METHOD__V1478*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/
@@ -69398,10 +70285,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1459*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1478*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1931:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69413,14 +70300,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALSTR___V550*/ meltfptr[549];
+ (melt_ptr_t *) & /*_.VALSTR___V551*/ meltfptr[550];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V543*/ meltfptr[542];
- /*_.REGISTER_OPTION__V1460*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V544*/ meltfptr[543];
+ /*_.REGISTER_OPTION__V1479*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.REGISTER_OPTION__V64*/ meltfptr[63]),
- (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]),
+ (melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69428,10 +70315,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.REGISTER_OPTION__V1460*/ meltfptr[1436] = 0;
+ /*clear *//*_.REGISTER_OPTION__V1479*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2034:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:1986:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69443,14 +70330,15 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V583*/ meltfptr[582];
+ (melt_ptr_t *) & /*_.VALDATA___V584*/ meltfptr[583];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V586*/ meltfptr[585];
- /*_.INSTALL_METHOD__V1461*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V587*/ meltfptr[586];
+ /*_.INSTALL_METHOD__V1480*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]),
+ (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
+ meltfptr[11]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69458,10 +70346,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1461*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1480*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2099:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2045:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69473,14 +70361,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V583*/ meltfptr[582];
+ (melt_ptr_t *) & /*_.VALDATA___V584*/ meltfptr[583];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V590*/ meltfptr[589];
- /*_.INSTALL_METHOD__V1462*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V589*/ meltfptr[588];
+ /*_.INSTALL_METHOD__V1481*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]),
+ (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69488,10 +70376,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1462*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1481*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2137:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2110:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69503,14 +70391,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V583*/ meltfptr[582];
+ (melt_ptr_t *) & /*_.VALDATA___V584*/ meltfptr[583];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V592*/ meltfptr[591];
- /*_.INSTALL_METHOD__V1463*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V593*/ meltfptr[592];
+ /*_.INSTALL_METHOD__V1482*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V283*/ meltfptr[282]),
+ (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69518,10 +70406,40 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1463*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1482*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2581:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2148:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V584*/ meltfptr[583];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V595*/ meltfptr[594];
+ /*_.INSTALL_METHOD__V1483*/ meltfptr[1456] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1483*/ meltfptr[1456] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:2592:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69536,8 +70454,8 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.NORMAL_EXP__V17*/ meltfptr[16];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V605*/ meltfptr[604];
- /*_.INSTALL_METHOD__V1464*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V608*/ meltfptr[607];
+ /*_.INSTALL_METHOD__V1484*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/
@@ -69549,10 +70467,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1464*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1484*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2681:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2692:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69567,11 +70485,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
(melt_ptr_t *) & /*_.NORMALIZE_BINDING__V73*/ meltfptr[72];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V727*/ meltfptr[726];
- /*_.INSTALL_METHOD__V1465*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V730*/ meltfptr[729];
+ /*_.INSTALL_METHOD__V1485*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]),
+ (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69579,10 +70497,72 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1465*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1485*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2907:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2918:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1018*/ meltfptr[1017];
+ /*_.INSTALL_METHOD__V1486*/ meltfptr[1456] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
+ meltfptr[11]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1486*/ meltfptr[1456] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:2926:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1007*/ meltfptr[1006];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1020*/ meltfptr[1019];
+ /*_.INSTALL_METHOD__V1487*/ meltfptr[1457] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
+ meltfptr[11]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1487*/ meltfptr[1457] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:2934:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69594,11 +70574,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V1015*/ meltfptr[1014];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1015*/ meltfptr[1014];
- /*_.INSTALL_METHOD__V1466*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1022*/ meltfptr[1021];
+ /*_.INSTALL_METHOD__V1488*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -69610,10 +70590,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1466*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1488*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2913:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2940:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69625,11 +70605,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1017*/ meltfptr[1016];
- /*_.INSTALL_METHOD__V1467*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1024*/ meltfptr[1023];
+ /*_.INSTALL_METHOD__V1489*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/
@@ -69641,10 +70621,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1467*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1489*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2914:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2941:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69656,11 +70636,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1017*/ meltfptr[1016];
- /*_.INSTALL_METHOD__V1468*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1024*/ meltfptr[1023];
+ /*_.INSTALL_METHOD__V1490*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/
@@ -69672,10 +70652,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1468*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1490*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2923:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2950:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69687,11 +70667,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1019*/ meltfptr[1018];
- /*_.INSTALL_METHOD__V1469*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1026*/ meltfptr[1025];
+ /*_.INSTALL_METHOD__V1491*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/
@@ -69703,10 +70683,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1469*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1491*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2932:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2960:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69718,11 +70698,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1021*/ meltfptr[1020];
- /*_.INSTALL_METHOD__V1470*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1028*/ meltfptr[1027];
+ /*_.INSTALL_METHOD__V1492*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/
@@ -69734,10 +70714,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1470*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1492*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2942:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2976:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69749,11 +70729,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1023*/ meltfptr[1022];
- /*_.INSTALL_METHOD__V1471*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1030*/ meltfptr[1029];
+ /*_.INSTALL_METHOD__V1493*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/
@@ -69765,10 +70745,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1471*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1493*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2952:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:2986:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69780,11 +70760,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V997*/ meltfptr[996];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1025*/ meltfptr[1024];
- /*_.INSTALL_METHOD__V1472*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1032*/ meltfptr[1031];
+ /*_.INSTALL_METHOD__V1494*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/
@@ -69796,10 +70776,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1472*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1494*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:2961:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3051:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69811,15 +70791,104 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V994*/ meltfptr[993];
+ (melt_ptr_t *) & /*_.VALDATA___V1043*/ meltfptr[1042];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1023*/ meltfptr[1022];
- /*_.INSTALL_METHOD__V1473*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1046*/ meltfptr[1045];
+ /*_.INSTALL_METHOD__V1495*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/
- meltfptr[21]),
+ (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1495*/ meltfptr[1456] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:3107:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1043*/ meltfptr[1042];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1050*/ meltfptr[1049];
+ /*_.INSTALL_METHOD__V1496*/ meltfptr[1457] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1496*/ meltfptr[1457] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:3136:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1043*/ meltfptr[1042];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1052*/ meltfptr[1051];
+ /*_.INSTALL_METHOD__V1497*/ meltfptr[1455] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1497*/ meltfptr[1455] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:3153:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1060*/ meltfptr[1059];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1063*/ meltfptr[1062];
+ /*_.INSTALL_METHOD__V1498*/ meltfptr[1456] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69827,10 +70896,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1473*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1498*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3058:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3187:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69842,14 +70911,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1038*/ meltfptr[1037];
+ (melt_ptr_t *) & /*_.VALDATA___V1060*/ meltfptr[1059];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1043*/ meltfptr[1042];
- /*_.INSTALL_METHOD__V1474*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1065*/ meltfptr[1064];
+ /*_.INSTALL_METHOD__V1499*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]),
+ (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69857,10 +70926,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1474*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1499*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3087:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3241:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69872,14 +70941,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1038*/ meltfptr[1037];
+ (melt_ptr_t *) & /*_.VALDATA___V1060*/ meltfptr[1059];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1045*/ meltfptr[1044];
- /*_.INSTALL_METHOD__V1475*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1067*/ meltfptr[1066];
+ /*_.INSTALL_METHOD__V1500*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]),
+ (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69887,10 +70956,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1475*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1500*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3127:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3284:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69902,14 +70971,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1053*/ meltfptr[1052];
+ (melt_ptr_t *) & /*_.VALDATA___V1060*/ meltfptr[1059];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1056*/ meltfptr[1055];
- /*_.INSTALL_METHOD__V1476*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1069*/ meltfptr[1068];
+ /*_.INSTALL_METHOD__V1501*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]),
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69917,10 +70986,21 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1476*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1501*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3181:/ initchunk");
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_26 */
+
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_27 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+ MELT_LOCATION ("warmelt-normatch.melt:3298:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69932,14 +71012,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1053*/ meltfptr[1052];
+ (melt_ptr_t *) & /*_.VALDATA___V1007*/ meltfptr[1006];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1058*/ meltfptr[1057];
- /*_.INSTALL_METHOD__V1477*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1071*/ meltfptr[1070];
+ /*_.INSTALL_METHOD__V1502*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]),
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69947,10 +71027,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1477*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1502*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3224:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3313:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69962,14 +71042,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1053*/ meltfptr[1052];
+ (melt_ptr_t *) & /*_.VALDATA___V1007*/ meltfptr[1006];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1060*/ meltfptr[1059];
- /*_.INSTALL_METHOD__V1478*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1073*/ meltfptr[1072];
+ /*_.INSTALL_METHOD__V1503*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]),
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -69977,10 +71057,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1478*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1503*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3237:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3320:/ initchunk");
/*^block */
/*anyblock */
{
@@ -69992,14 +71072,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1004*/ meltfptr[1003];
+ (melt_ptr_t *) & /*_.VALDATA___V1007*/ meltfptr[1006];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1062*/ meltfptr[1061];
- /*_.INSTALL_METHOD__V1479*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1075*/ meltfptr[1074];
+ /*_.INSTALL_METHOD__V1504*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]),
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70007,10 +71087,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1479*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1504*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3248:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3332:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70022,14 +71102,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1004*/ meltfptr[1003];
+ (melt_ptr_t *) & /*_.VALDATA___V1007*/ meltfptr[1006];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1064*/ meltfptr[1063];
- /*_.INSTALL_METHOD__V1480*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1077*/ meltfptr[1076];
+ /*_.INSTALL_METHOD__V1505*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]),
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70037,10 +71117,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1480*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1505*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3256:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3340:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70052,14 +71132,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1012*/ meltfptr[1011];
+ (melt_ptr_t *) & /*_.VALDATA___V1015*/ meltfptr[1014];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1066*/ meltfptr[1065];
- /*_.INSTALL_METHOD__V1481*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1079*/ meltfptr[1078];
+ /*_.INSTALL_METHOD__V1506*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]),
+ (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70067,10 +71147,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1481*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1506*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3272:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3356:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70082,14 +71162,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1012*/ meltfptr[1011];
+ (melt_ptr_t *) & /*_.VALDATA___V1015*/ meltfptr[1014];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1068*/ meltfptr[1067];
- /*_.INSTALL_METHOD__V1482*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1081*/ meltfptr[1080];
+ /*_.INSTALL_METHOD__V1507*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]),
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70097,10 +71177,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1482*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1507*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3292:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3365:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70112,11 +71192,41 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1015*/ meltfptr[1014];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1088*/ meltfptr[1087];
- /*_.INSTALL_METHOD__V1483*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1083*/ meltfptr[1082];
+ /*_.INSTALL_METHOD__V1508*/ meltfptr[1457] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1508*/ meltfptr[1457] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:3385:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1103*/ meltfptr[1102];
+ /*_.INSTALL_METHOD__V1509*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -70128,10 +71238,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1483*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1509*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3299:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3392:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70143,11 +71253,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1090*/ meltfptr[1089];
- /*_.INSTALL_METHOD__V1484*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1105*/ meltfptr[1104];
+ /*_.INSTALL_METHOD__V1510*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0);
@@ -70156,10 +71266,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1484*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1510*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3350:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3443:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70171,11 +71281,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1093*/ meltfptr[1092];
- /*_.INSTALL_METHOD__V1485*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1108*/ meltfptr[1107];
+ /*_.INSTALL_METHOD__V1511*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/
@@ -70187,10 +71297,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1485*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1511*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3361:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3454:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70202,11 +71312,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1095*/ meltfptr[1094];
- /*_.INSTALL_METHOD__V1486*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1110*/ meltfptr[1109];
+ /*_.INSTALL_METHOD__V1512*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_LIST__V75*/
@@ -70218,10 +71328,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1486*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1512*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3527:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3620:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70233,11 +71343,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1106*/ meltfptr[1105];
- /*_.INSTALL_METHOD__V1487*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1121*/ meltfptr[1120];
+ /*_.INSTALL_METHOD__V1513*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V49*/
@@ -70249,10 +71359,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1487*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1513*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3684:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3779:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70264,11 +71374,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1108*/ meltfptr[1107];
- /*_.INSTALL_METHOD__V1488*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1123*/ meltfptr[1122];
+ /*_.INSTALL_METHOD__V1514*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V43*/
@@ -70280,10 +71390,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1488*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1514*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3775:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3871:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70295,11 +71405,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1110*/ meltfptr[1109];
- /*_.INSTALL_METHOD__V1489*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1125*/ meltfptr[1124];
+ /*_.INSTALL_METHOD__V1515*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/
@@ -70311,10 +71421,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1489*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1515*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3860:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:3956:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70326,11 +71436,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1113*/ meltfptr[1112];
- /*_.INSTALL_METHOD__V1490*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1128*/ meltfptr[1127];
+ /*_.INSTALL_METHOD__V1516*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/
@@ -70342,10 +71452,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1490*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1516*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:3983:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4079:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70357,11 +71467,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1118*/ meltfptr[1117];
- /*_.INSTALL_METHOD__V1491*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1133*/ meltfptr[1132];
+ /*_.INSTALL_METHOD__V1517*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/
@@ -70373,10 +71483,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1491*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1517*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4206:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4302:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70388,11 +71498,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1085*/ meltfptr[1084];
+ (melt_ptr_t *) & /*_.VALDATA___V1100*/ meltfptr[1099];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1120*/ meltfptr[1119];
- /*_.INSTALL_METHOD__V1492*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1135*/ meltfptr[1134];
+ /*_.INSTALL_METHOD__V1518*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/
@@ -70404,10 +71514,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1492*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1518*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4280:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4318:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70419,14 +71529,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1126*/ meltfptr[1125];
- /*_.INSTALL_METHOD__V1493*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1141*/ meltfptr[1140];
+ /*_.INSTALL_METHOD__V1519*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]),
+ (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70434,10 +71544,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1493*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1519*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4350:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4384:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70449,14 +71559,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1128*/ meltfptr[1127];
- /*_.INSTALL_METHOD__V1494*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1143*/ meltfptr[1142];
+ /*_.INSTALL_METHOD__V1520*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]),
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70464,10 +71574,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1494*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1520*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4417:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4454:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70479,14 +71589,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1132*/ meltfptr[1131];
- /*_.INSTALL_METHOD__V1495*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1145*/ meltfptr[1144];
+ /*_.INSTALL_METHOD__V1521*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]),
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70494,10 +71604,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1495*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1521*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4461:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4526:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70509,14 +71619,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1134*/ meltfptr[1133];
- /*_.INSTALL_METHOD__V1496*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1149*/ meltfptr[1148];
+ /*_.INSTALL_METHOD__V1522*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]),
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70524,10 +71634,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1496*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1522*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4537:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4570:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70539,14 +71649,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1136*/ meltfptr[1135];
- /*_.INSTALL_METHOD__V1497*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1151*/ meltfptr[1150];
+ /*_.INSTALL_METHOD__V1523*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]),
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70554,10 +71664,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1497*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1523*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4646:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70569,14 +71679,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1138*/ meltfptr[1137];
- /*_.INSTALL_METHOD__V1498*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1153*/ meltfptr[1152];
+ /*_.INSTALL_METHOD__V1524*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]),
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70584,10 +71694,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1498*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1524*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4665:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4715:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70599,14 +71709,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1140*/ meltfptr[1139];
- /*_.INSTALL_METHOD__V1499*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1155*/ meltfptr[1154];
+ /*_.INSTALL_METHOD__V1525*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]),
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70614,10 +71724,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1499*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1525*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4717:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4774:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70629,14 +71739,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1142*/ meltfptr[1141];
- /*_.INSTALL_METHOD__V1500*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1157*/ meltfptr[1156];
+ /*_.INSTALL_METHOD__V1526*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]),
+ (melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70644,10 +71754,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1500*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1526*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:4805:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4826:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70659,14 +71769,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1123*/ meltfptr[1122];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1144*/ meltfptr[1143];
- /*_.INSTALL_METHOD__V1501*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1159*/ meltfptr[1158];
+ /*_.INSTALL_METHOD__V1527*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]),
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70674,10 +71784,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1501*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1527*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5210:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:4914:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70689,11 +71799,41 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1138*/ meltfptr[1137];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1311*/ meltfptr[1310];
- /*_.INSTALL_METHOD__V1502*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1161*/ meltfptr[1160];
+ /*_.INSTALL_METHOD__V1528*/ meltfptr[1456] =
+ melt_apply ((meltclosure_ptr_t)
+ ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
+ (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]),
+ (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
+ }
+ ;
+ /*epilog */
+
+ /*^clear */
+ /*clear *//*_.INSTALL_METHOD__V1528*/ meltfptr[1456] = 0;
+ }
+
+ MELT_LOCATION ("warmelt-normatch.melt:5319:/ initchunk");
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^apply */
+ /*apply */
+ {
+ union meltparam_un argtab[2];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
+ /*^apply.arg */
+ argtab[1].meltbp_aptr =
+ (melt_ptr_t *) & /*_.VALCLO___V1328*/ meltfptr[1327];
+ /*_.INSTALL_METHOD__V1529*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -70705,10 +71845,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1502*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1529*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5235:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5344:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70720,14 +71860,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1316*/ meltfptr[1315];
- /*_.INSTALL_METHOD__V1503*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1333*/ meltfptr[1332];
+ /*_.INSTALL_METHOD__V1530*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]),
+ (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70735,10 +71875,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1503*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1530*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5296:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5405:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70750,14 +71890,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1323*/ meltfptr[1322];
- /*_.INSTALL_METHOD__V1504*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1340*/ meltfptr[1339];
+ /*_.INSTALL_METHOD__V1531*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V820*/ meltfptr[819]),
+ (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70765,10 +71905,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1504*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1531*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5406:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5515:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70780,14 +71920,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1333*/ meltfptr[1332];
- /*_.INSTALL_METHOD__V1505*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1350*/ meltfptr[1349];
+ /*_.INSTALL_METHOD__V1532*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]),
+ (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70795,10 +71935,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1505*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1532*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5473:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5624:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70810,14 +71950,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1339*/ meltfptr[1338];
- /*_.INSTALL_METHOD__V1506*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1356*/ meltfptr[1355];
+ /*_.INSTALL_METHOD__V1533*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]),
+ (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70825,10 +71965,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1506*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1533*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5552:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5703:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70840,14 +71980,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1343*/ meltfptr[1342];
- /*_.INSTALL_METHOD__V1507*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1362*/ meltfptr[1361];
+ /*_.INSTALL_METHOD__V1534*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]),
+ (melt_ptr_t) ( /*_.VALDATA___V863*/ meltfptr[862]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70855,10 +71995,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1507*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1534*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5619:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5770:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70870,14 +72010,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1351*/ meltfptr[1350];
- /*_.INSTALL_METHOD__V1508*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1370*/ meltfptr[1369];
+ /*_.INSTALL_METHOD__V1535*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]),
+ (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70885,10 +72025,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1508*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1535*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5682:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5833:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70900,14 +72040,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1355*/ meltfptr[1354];
- /*_.INSTALL_METHOD__V1509*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1374*/ meltfptr[1373];
+ /*_.INSTALL_METHOD__V1536*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V832*/ meltfptr[831]),
+ (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -70915,10 +72055,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1509*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1536*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5710:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5861:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70930,11 +72070,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1373*/ meltfptr[1372];
+ (melt_ptr_t *) & /*_.VALDATA___V1392*/ meltfptr[1391];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1392*/ meltfptr[1391];
- /*_.INSTALL_METHOD__V1510*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1411*/ meltfptr[1410];
+ /*_.INSTALL_METHOD__V1537*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -70946,10 +72086,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1510*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1537*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5721:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5872:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70961,11 +72101,11 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1389*/ meltfptr[1388];
+ (melt_ptr_t *) & /*_.VALDATA___V1408*/ meltfptr[1407];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1394*/ meltfptr[1393];
- /*_.INSTALL_METHOD__V1511*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1413*/ meltfptr[1412];
+ /*_.INSTALL_METHOD__V1538*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
(melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V12*/
@@ -70977,10 +72117,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1511*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1538*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5804:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:5955:/ initchunk");
/*^block */
/*anyblock */
{
@@ -70992,14 +72132,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1373*/ meltfptr[1372];
+ (melt_ptr_t *) & /*_.VALDATA___V1392*/ meltfptr[1391];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1396*/ meltfptr[1395];
- /*_.INSTALL_METHOD__V1512*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1415*/ meltfptr[1414];
+ /*_.INSTALL_METHOD__V1539*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]),
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71007,10 +72147,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1512*/ meltfptr[1437] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1539*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:5881:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6032:/ initchunk");
/*^block */
/*anyblock */
{
@@ -71022,14 +72162,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1389*/ meltfptr[1388];
+ (melt_ptr_t *) & /*_.VALDATA___V1408*/ meltfptr[1407];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1400*/ meltfptr[1399];
- /*_.INSTALL_METHOD__V1513*/ meltfptr[1438] =
+ (melt_ptr_t *) & /*_.VALCLO___V1419*/ meltfptr[1418];
+ /*_.INSTALL_METHOD__V1540*/ meltfptr[1456] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.CLASS_CMATCHER__V89*/ meltfptr[88]),
+ (melt_ptr_t) ( /*_.CLASS_CMATCHER__V90*/ meltfptr[89]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71037,10 +72177,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1513*/ meltfptr[1438] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1540*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:6040:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6191:/ initchunk");
/*^block */
/*anyblock */
{
@@ -71052,14 +72192,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1302*/ meltfptr[1301];
+ (melt_ptr_t *) & /*_.VALDATA___V1319*/ meltfptr[1318];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1402*/ meltfptr[1401];
- /*_.INSTALL_METHOD__V1514*/ meltfptr[1436] =
+ (melt_ptr_t *) & /*_.VALCLO___V1421*/ meltfptr[1420];
+ /*_.INSTALL_METHOD__V1541*/ meltfptr[1457] =
melt_apply ((meltclosure_ptr_t)
( /*_.INSTALL_METHOD__V11*/ meltfptr[10]),
- (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]),
+ (melt_ptr_t) ( /*_.VALDATA___V929*/ meltfptr[928]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71067,10 +72207,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.INSTALL_METHOD__V1514*/ meltfptr[1436] = 0;
+ /*clear *//*_.INSTALL_METHOD__V1541*/ meltfptr[1457] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:6499:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6650:/ initchunk");
/*^block */
/*anyblock */
{
@@ -71082,14 +72222,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALSTR___V1436*/ meltfptr[1435];
+ (melt_ptr_t *) & /*_.VALSTR___V1455*/ meltfptr[1454];
/*^apply.arg */
argtab[1].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALCLO___V1433*/ meltfptr[1432];
- /*_.REGISTER_OPTION__V1515*/ meltfptr[1437] =
+ (melt_ptr_t *) & /*_.VALCLO___V1452*/ meltfptr[1451];
+ /*_.REGISTER_OPTION__V1542*/ meltfptr[1455] =
melt_apply ((meltclosure_ptr_t)
( /*_.REGISTER_OPTION__V64*/ meltfptr[63]),
- (melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433]),
+ (melt_ptr_t) ( /*_.VALDATA___V1453*/ meltfptr[1452]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71097,10 +72237,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.REGISTER_OPTION__V1515*/ meltfptr[1437] = 0;
+ /*clear *//*_.REGISTER_OPTION__V1542*/ meltfptr[1455] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:6819:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:6966:/ initchunk");
/*^block */
/*anyblock */
{
@@ -71109,8 +72249,8 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1516*/
- meltfptr[1438] = slot;
+ /*_.VALUEXPORTER___V1543*/
+ meltfptr[1456] = slot;
};
;
/*^apply */
@@ -71120,14 +72260,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V94*/ meltfptr[93];
+ (melt_ptr_t *) & /*_.VALDATA___V95*/ meltfptr[94];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_PATTERN_CONTEXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V90*/ meltfptr[89]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V91*/ meltfptr[90]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71139,14 +72279,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V97*/ meltfptr[96];
+ (melt_ptr_t *) & /*_.VALDATA___V98*/ meltfptr[97];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_NORMCTXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V121*/ meltfptr[120]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71158,14 +72298,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V99*/ meltfptr[98];
+ (melt_ptr_t *) & /*_.VALDATA___V100*/ meltfptr[99];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_SRC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V122*/ meltfptr[121]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71177,14 +72317,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V101*/ meltfptr[100];
+ (melt_ptr_t *) & /*_.VALDATA___V102*/ meltfptr[101];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_ENV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V124*/ meltfptr[123]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71196,14 +72336,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V103*/ meltfptr[102];
+ (melt_ptr_t *) & /*_.VALDATA___V104*/ meltfptr[103];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_MAPATVAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V126*/ meltfptr[125]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71215,14 +72355,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V105*/ meltfptr[104];
+ (melt_ptr_t *) & /*_.VALDATA___V106*/ meltfptr[105];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_MAPATCST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V128*/ meltfptr[127]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71234,14 +72374,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V107*/ meltfptr[106];
+ (melt_ptr_t *) & /*_.VALDATA___V108*/ meltfptr[107];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_MAPOR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V130*/ meltfptr[129]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71253,14 +72393,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V109*/ meltfptr[108];
+ (melt_ptr_t *) & /*_.VALDATA___V110*/ meltfptr[109];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_BINDLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V132*/ meltfptr[131]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71272,14 +72412,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V111*/ meltfptr[110];
+ (melt_ptr_t *) & /*_.VALDATA___V112*/ meltfptr[111];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_STUFFMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V134*/ meltfptr[133]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71291,14 +72431,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V113*/ meltfptr[112];
+ (melt_ptr_t *) & /*_.VALDATA___V114*/ meltfptr[113];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_PVARLOCMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V136*/ meltfptr[135]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71310,14 +72450,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V115*/ meltfptr[114];
+ (melt_ptr_t *) & /*_.VALDATA___V116*/ meltfptr[115];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_TESTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V138*/ meltfptr[137]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71329,14 +72469,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V117*/ meltfptr[116];
+ (melt_ptr_t *) & /*_.VALDATA___V118*/ meltfptr[117];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : PCTN_VARHANDLERS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V140*/ meltfptr[139]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71348,14 +72488,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V253*/ meltfptr[252];
+ (melt_ptr_t *) & /*_.VALDATA___V254*/ meltfptr[253];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_ANY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71367,14 +72507,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V256*/ meltfptr[255];
+ (melt_ptr_t *) & /*_.VALDATA___V257*/ meltfptr[256];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_MATCHED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71386,14 +72526,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V258*/ meltfptr[257];
+ (melt_ptr_t *) & /*_.VALDATA___V259*/ meltfptr[258];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71405,14 +72545,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V260*/ meltfptr[259];
+ (melt_ptr_t *) & /*_.VALDATA___V261*/ meltfptr[260];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_ELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71424,14 +72564,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V262*/ meltfptr[261];
+ (melt_ptr_t *) & /*_.VALDATA___V263*/ meltfptr[262];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_NORMATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71443,14 +72583,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V264*/ meltfptr[263];
+ (melt_ptr_t *) & /*_.VALDATA___V265*/ meltfptr[264];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_LOCCLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V277*/ meltfptr[276]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71462,14 +72602,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V266*/ meltfptr[265];
+ (melt_ptr_t *) & /*_.VALDATA___V267*/ meltfptr[266];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTEST_COMEFROM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71481,14 +72621,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V323*/ meltfptr[322];
+ (melt_ptr_t *) & /*_.VALDATA___V324*/ meltfptr[323];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_ANYTESTER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71500,14 +72640,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V329*/ meltfptr[328];
+ (melt_ptr_t *) & /*_.VALDATA___V330*/ meltfptr[329];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_DISJUNCTION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71519,14 +72659,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V332*/ meltfptr[331];
+ (melt_ptr_t *) & /*_.VALDATA___V333*/ meltfptr[332];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTDISJUNCTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71538,14 +72678,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V334*/ meltfptr[333];
+ (melt_ptr_t *) & /*_.VALDATA___V335*/ meltfptr[334];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTDISJ_FRESHORVAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71557,14 +72697,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V336*/ meltfptr[335];
+ (melt_ptr_t *) & /*_.VALDATA___V337*/ meltfptr[336];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTDISJ_SETORVAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71576,14 +72716,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V379*/ meltfptr[378];
+ (melt_ptr_t *) & /*_.VALDATA___V380*/ meltfptr[379];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_INSTANCE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71595,14 +72735,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V382*/ meltfptr[381];
+ (melt_ptr_t *) & /*_.VALDATA___V383*/ meltfptr[382];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTINST_CLASS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V388*/ meltfptr[387]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71614,14 +72754,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V384*/ meltfptr[383];
+ (melt_ptr_t *) & /*_.VALDATA___V385*/ meltfptr[384];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTINST_FIELDLOCS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71633,14 +72773,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V357*/ meltfptr[356];
+ (melt_ptr_t *) & /*_.VALDATA___V358*/ meltfptr[357];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_MATCHER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71652,14 +72792,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V360*/ meltfptr[359];
+ (melt_ptr_t *) & /*_.VALDATA___V361*/ meltfptr[360];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTMATCH_MATCHER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71671,14 +72811,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V362*/ meltfptr[361];
+ (melt_ptr_t *) & /*_.VALDATA___V363*/ meltfptr[362];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTMATCH_MATNDATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V371*/ meltfptr[370]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71690,14 +72830,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V364*/ meltfptr[363];
+ (melt_ptr_t *) & /*_.VALDATA___V365*/ meltfptr[364];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTMATCH_INARGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71709,14 +72849,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V366*/ meltfptr[365];
+ (melt_ptr_t *) & /*_.VALDATA___V367*/ meltfptr[366];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTMATCH_OUTLOCS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71728,14 +72868,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V293*/ meltfptr[292];
+ (melt_ptr_t *) & /*_.VALDATA___V294*/ meltfptr[293];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_OR_CLEAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71747,14 +72887,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V296*/ meltfptr[295];
+ (melt_ptr_t *) & /*_.VALDATA___V297*/ meltfptr[296];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTORCLEAR_LOCSYM */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71766,14 +72906,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V303*/ meltfptr[302];
+ (melt_ptr_t *) & /*_.VALDATA___V304*/ meltfptr[303];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_OR_INITIAL_CLEAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71785,14 +72925,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V309*/ meltfptr[308];
+ (melt_ptr_t *) & /*_.VALDATA___V310*/ meltfptr[309];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_OR_TRANSMIT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71804,14 +72944,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V312*/ meltfptr[311];
+ (melt_ptr_t *) & /*_.VALDATA___V313*/ meltfptr[312];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTORTRANSMIT_DST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71823,14 +72963,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V314*/ meltfptr[313];
+ (melt_ptr_t *) & /*_.VALDATA___V315*/ meltfptr[314];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTORTRANSMIT_SRC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71842,14 +72982,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V347*/ meltfptr[346];
+ (melt_ptr_t *) & /*_.VALDATA___V348*/ meltfptr[347];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_SAME */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71861,14 +73001,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V350*/ meltfptr[349];
+ (melt_ptr_t *) & /*_.VALDATA___V351*/ meltfptr[350];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTSAME_IDENTICAL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71880,14 +73020,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V283*/ meltfptr[282];
+ (melt_ptr_t *) & /*_.VALDATA___V284*/ meltfptr[283];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_SUCCESS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71899,14 +73039,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V286*/ meltfptr[285];
+ (melt_ptr_t *) & /*_.VALDATA___V287*/ meltfptr[286];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTSUCCESS_DO */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71918,14 +73058,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V393*/ meltfptr[392];
+ (melt_ptr_t *) & /*_.VALDATA___V394*/ meltfptr[393];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMTESTER_TUPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V391*/ meltfptr[390]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71937,14 +73077,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V396*/ meltfptr[395];
+ (melt_ptr_t *) & /*_.VALDATA___V397*/ meltfptr[396];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTTUPLE_COMPONENTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71956,14 +73096,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V405*/ meltfptr[404];
+ (melt_ptr_t *) & /*_.VALDATA___V406*/ meltfptr[405];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71975,14 +73115,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V408*/ meltfptr[407];
+ (melt_ptr_t *) & /*_.VALDATA___V409*/ meltfptr[408];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMATCH_TESTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -71994,14 +73134,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V410*/ meltfptr[409];
+ (melt_ptr_t *) & /*_.VALDATA___V411*/ meltfptr[410];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMATCH_STUFFMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72013,14 +73153,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V412*/ meltfptr[411];
+ (melt_ptr_t *) & /*_.VALDATA___V413*/ meltfptr[412];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMATCH_MATCHED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72032,14 +73172,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V664*/ meltfptr[663];
+ (melt_ptr_t *) & /*_.VALDATA___V667*/ meltfptr[666];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_CASE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72051,14 +73191,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V667*/ meltfptr[666];
+ (melt_ptr_t *) & /*_.VALDATA___V670*/ meltfptr[669];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCASE_MCTXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72070,14 +73210,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V669*/ meltfptr[668];
+ (melt_ptr_t *) & /*_.VALDATA___V672*/ meltfptr[671];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCASE_SOURCE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72089,14 +73229,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V671*/ meltfptr[670];
+ (melt_ptr_t *) & /*_.VALDATA___V674*/ meltfptr[673];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCASE_INDEX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V683*/ meltfptr[682]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72108,14 +73248,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V673*/ meltfptr[672];
+ (melt_ptr_t *) & /*_.VALDATA___V676*/ meltfptr[675];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCASE_VARMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72127,14 +73267,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V732*/ meltfptr[731];
+ (melt_ptr_t *) & /*_.VALDATA___V735*/ meltfptr[734];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72146,14 +73286,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V735*/ meltfptr[734];
+ (melt_ptr_t *) & /*_.VALDATA___V738*/ meltfptr[737];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MFLAG_SPAT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72165,14 +73305,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V737*/ meltfptr[736];
+ (melt_ptr_t *) & /*_.VALDATA___V740*/ meltfptr[739];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MFLAG_RANK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72184,14 +73324,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V739*/ meltfptr[738];
+ (melt_ptr_t *) & /*_.VALDATA___V742*/ meltfptr[741];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MFLAG_STRING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72203,14 +73343,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V741*/ meltfptr[740];
+ (melt_ptr_t *) & /*_.VALDATA___V744*/ meltfptr[743];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MFLAG_SETSTEP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72222,14 +73362,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1248*/ meltfptr[1247];
+ (melt_ptr_t *) & /*_.VALDATA___V1265*/ meltfptr[1264];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_NORMALIZATION_CONTEXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1263*/ meltfptr[1262]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72241,14 +73381,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1251*/ meltfptr[1250];
+ (melt_ptr_t *) & /*_.VALDATA___V1268*/ meltfptr[1267];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_RESLOC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1289*/ meltfptr[1288]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72260,14 +73400,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1253*/ meltfptr[1252];
+ (melt_ptr_t *) & /*_.VALDATA___V1270*/ meltfptr[1269];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_NMATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1291*/ meltfptr[1290]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72279,14 +73419,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1255*/ meltfptr[1254];
+ (melt_ptr_t *) & /*_.VALDATA___V1272*/ meltfptr[1271];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_DATAMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1293*/ meltfptr[1292]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72298,14 +73438,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1257*/ meltfptr[1256];
+ (melt_ptr_t *) & /*_.VALDATA___V1274*/ meltfptr[1273];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_FLAGMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72317,14 +73457,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1259*/ meltfptr[1258];
+ (melt_ptr_t *) & /*_.VALDATA___V1276*/ meltfptr[1275];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_STEPMAP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1297*/ meltfptr[1296]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72336,14 +73476,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1261*/ meltfptr[1260];
+ (melt_ptr_t *) & /*_.VALDATA___V1278*/ meltfptr[1277];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_MDATAQUEUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72355,14 +73495,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1263*/ meltfptr[1262];
+ (melt_ptr_t *) & /*_.VALDATA___V1280*/ meltfptr[1279];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_MSTEPQUEUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1301*/ meltfptr[1300]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72374,14 +73514,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1265*/ meltfptr[1264];
+ (melt_ptr_t *) & /*_.VALDATA___V1282*/ meltfptr[1281];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_BODYLIST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1303*/ meltfptr[1302]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72393,14 +73533,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1267*/ meltfptr[1266];
+ (melt_ptr_t *) & /*_.VALDATA___V1284*/ meltfptr[1283];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_ENDLABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72412,14 +73552,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1269*/ meltfptr[1268];
+ (melt_ptr_t *) & /*_.VALDATA___V1286*/ meltfptr[1285];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATNORX_MATCHCTXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72431,14 +73571,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V754*/ meltfptr[753];
+ (melt_ptr_t *) & /*_.VALDATA___V757*/ meltfptr[756];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72450,14 +73590,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V770*/ meltfptr[769];
+ (melt_ptr_t *) & /*_.VALDATA___V773*/ meltfptr[772];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_CLEAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72469,14 +73609,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V773*/ meltfptr[772];
+ (melt_ptr_t *) & /*_.VALDATA___V776*/ meltfptr[775];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_CLEARDATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72488,14 +73628,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V820*/ meltfptr[819];
+ (melt_ptr_t *) & /*_.VALDATA___V823*/ meltfptr[822];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_FLAG_CONJUNCTION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V818*/ meltfptr[817]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72507,14 +73647,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V826*/ meltfptr[825];
+ (melt_ptr_t *) & /*_.VALDATA___V829*/ meltfptr[828];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_FLAG_DISJUNCTION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72526,14 +73666,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V810*/ meltfptr[809];
+ (melt_ptr_t *) & /*_.VALDATA___V813*/ meltfptr[812];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_FLAG_OPERATION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72545,14 +73685,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V813*/ meltfptr[812];
+ (melt_ptr_t *) & /*_.VALDATA___V816*/ meltfptr[815];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_FLAGARGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72564,14 +73704,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V804*/ meltfptr[803];
+ (melt_ptr_t *) & /*_.VALDATA___V807*/ meltfptr[806];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_FLAG_SET */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72583,14 +73723,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V832*/ meltfptr[831];
+ (melt_ptr_t *) & /*_.VALDATA___V835*/ meltfptr[834];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72602,14 +73742,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V835*/ meltfptr[834];
+ (melt_ptr_t *) & /*_.VALDATA___V838*/ meltfptr[837];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEPSUCCESS_VAROCC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V845*/ meltfptr[844]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72621,14 +73761,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V837*/ meltfptr[836];
+ (melt_ptr_t *) & /*_.VALDATA___V840*/ meltfptr[839];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEPSUCCESS_BINDS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V847*/ meltfptr[846]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72640,14 +73780,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V839*/ meltfptr[838];
+ (melt_ptr_t *) & /*_.VALDATA___V842*/ meltfptr[841];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEPSUCCESS_BODY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72659,14 +73799,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V850*/ meltfptr[849];
+ (melt_ptr_t *) & /*_.VALDATA___V853*/ meltfptr[852];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72678,14 +73818,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V853*/ meltfptr[852];
+ (melt_ptr_t *) & /*_.VALDATA___V856*/ meltfptr[855];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_ELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72697,14 +73837,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V884*/ meltfptr[883];
+ (melt_ptr_t *) & /*_.VALDATA___V887*/ meltfptr[886];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST_GROUP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72716,14 +73856,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V887*/ meltfptr[886];
+ (melt_ptr_t *) & /*_.VALDATA___V890*/ meltfptr[889];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTGROUP_START */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72735,14 +73875,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V889*/ meltfptr[888];
+ (melt_ptr_t *) & /*_.VALDATA___V892*/ meltfptr[891];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTGROUP_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72754,14 +73894,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V891*/ meltfptr[890];
+ (melt_ptr_t *) & /*_.VALDATA___V894*/ meltfptr[893];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTGROUP_ELSE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72773,14 +73913,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V902*/ meltfptr[901];
+ (melt_ptr_t *) & /*_.VALDATA___V905*/ meltfptr[904];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST_INSTANCE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72792,14 +73932,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V905*/ meltfptr[904];
+ (melt_ptr_t *) & /*_.VALDATA___V908*/ meltfptr[907];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTINS_CLASS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V913*/ meltfptr[912]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72811,14 +73951,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V907*/ meltfptr[906];
+ (melt_ptr_t *) & /*_.VALDATA___V910*/ meltfptr[909];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTINS_SLOTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72830,14 +73970,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V926*/ meltfptr[925];
+ (melt_ptr_t *) & /*_.VALDATA___V929*/ meltfptr[928];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST_MATCHER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72849,14 +73989,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V929*/ meltfptr[928];
+ (melt_ptr_t *) & /*_.VALDATA___V932*/ meltfptr[931];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTMA_MATCHER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72868,14 +74008,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V931*/ meltfptr[930];
+ (melt_ptr_t *) & /*_.VALDATA___V934*/ meltfptr[933];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTMA_BINDS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72887,14 +74027,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V933*/ meltfptr[932];
+ (melt_ptr_t *) & /*_.VALDATA___V936*/ meltfptr[935];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTMA_INS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72906,14 +74046,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V935*/ meltfptr[934];
+ (melt_ptr_t *) & /*_.VALDATA___V938*/ meltfptr[937];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTMA_OUTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72925,14 +74065,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V916*/ meltfptr[915];
+ (melt_ptr_t *) & /*_.VALDATA___V919*/ meltfptr[918];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST_MULTIPLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72944,14 +74084,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V919*/ meltfptr[918];
+ (melt_ptr_t *) & /*_.VALDATA___V922*/ meltfptr[921];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTTUP_COMPONENTS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72963,14 +74103,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V860*/ meltfptr[859];
+ (melt_ptr_t *) & /*_.VALDATA___V863*/ meltfptr[862];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_TEST_VARIABLE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -72982,14 +74122,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V863*/ meltfptr[862];
+ (melt_ptr_t *) & /*_.VALDATA___V866*/ meltfptr[865];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEPTESTVAR_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73001,14 +74141,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V760*/ meltfptr[759];
+ (melt_ptr_t *) & /*_.VALDATA___V763*/ meltfptr[762];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73020,14 +74160,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V763*/ meltfptr[762];
+ (melt_ptr_t *) & /*_.VALDATA___V766*/ meltfptr[765];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_THEN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73039,14 +74179,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V790*/ meltfptr[789];
+ (melt_ptr_t *) & /*_.VALDATA___V793*/ meltfptr[792];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_WITH_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73058,14 +74198,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V793*/ meltfptr[792];
+ (melt_ptr_t *) & /*_.VALDATA___V796*/ meltfptr[795];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73077,14 +74217,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V795*/ meltfptr[794];
+ (melt_ptr_t *) & /*_.VALDATA___V798*/ meltfptr[797];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_INDEX */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73096,14 +74236,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V780*/ meltfptr[779];
+ (melt_ptr_t *) & /*_.VALDATA___V783*/ meltfptr[782];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCH_STEP_WITH_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73115,14 +74255,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V783*/ meltfptr[782];
+ (melt_ptr_t *) & /*_.VALDATA___V786*/ meltfptr[785];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MSTEP_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73134,14 +74274,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V714*/ meltfptr[713];
+ (melt_ptr_t *) & /*_.VALDATA___V717*/ meltfptr[716];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHED_BINDING */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73153,14 +74293,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V717*/ meltfptr[716];
+ (melt_ptr_t *) & /*_.VALDATA___V720*/ meltfptr[719];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATCHBIND_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V725*/ meltfptr[724]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73172,14 +74312,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V719*/ meltfptr[718];
+ (melt_ptr_t *) & /*_.VALDATA___V722*/ meltfptr[721];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MATCHBIND_NBOCC */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73191,14 +74331,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V686*/ meltfptr[685];
+ (melt_ptr_t *) & /*_.VALDATA___V689*/ meltfptr[688];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHED_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73210,14 +74350,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V689*/ meltfptr[688];
+ (melt_ptr_t *) & /*_.VALDATA___V692*/ meltfptr[691];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MDATA_SYMB */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73229,14 +74369,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V691*/ meltfptr[690];
+ (melt_ptr_t *) & /*_.VALDATA___V694*/ meltfptr[693];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MDATA_CTYPE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73248,14 +74388,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V693*/ meltfptr[692];
+ (melt_ptr_t *) & /*_.VALDATA___V696*/ meltfptr[695];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MDATA_ORIG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73267,14 +74407,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V695*/ meltfptr[694];
+ (melt_ptr_t *) & /*_.VALDATA___V698*/ meltfptr[697];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MDATA_STEPS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73286,14 +74426,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V708*/ meltfptr[707];
+ (melt_ptr_t *) & /*_.VALDATA___V711*/ meltfptr[710];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHED_NORMAL_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73305,14 +74445,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V618*/ meltfptr[617];
+ (melt_ptr_t *) & /*_.VALDATA___V621*/ meltfptr[620];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHING_CONTEXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73324,14 +74464,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V621*/ meltfptr[620];
+ (melt_ptr_t *) & /*_.VALDATA___V624*/ meltfptr[623];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_NORMCTXT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V645*/ meltfptr[644]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73343,14 +74483,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V623*/ meltfptr[622];
+ (melt_ptr_t *) & /*_.VALDATA___V626*/ meltfptr[625];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_SOURCE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73362,14 +74502,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V625*/ meltfptr[624];
+ (melt_ptr_t *) & /*_.VALDATA___V628*/ meltfptr[627];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_NMATCHED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73381,14 +74521,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V627*/ meltfptr[626];
+ (melt_ptr_t *) & /*_.VALDATA___V630*/ meltfptr[629];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_NMATBIND */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73400,14 +74540,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V629*/ meltfptr[628];
+ (melt_ptr_t *) & /*_.VALDATA___V632*/ meltfptr[631];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_CASES */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73419,14 +74559,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V631*/ meltfptr[630];
+ (melt_ptr_t *) & /*_.VALDATA___V634*/ meltfptr[633];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_ENV */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V652*/ meltfptr[651]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73438,14 +74578,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V633*/ meltfptr[632];
+ (melt_ptr_t *) & /*_.VALDATA___V636*/ meltfptr[635];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_MDATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73457,14 +74597,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V635*/ meltfptr[634];
+ (melt_ptr_t *) & /*_.VALDATA___V638*/ meltfptr[637];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_VARHANDLERS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73476,14 +74616,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V637*/ meltfptr[636];
+ (melt_ptr_t *) & /*_.VALDATA___V640*/ meltfptr[639];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_FLAGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73495,14 +74635,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V639*/ meltfptr[638];
+ (melt_ptr_t *) & /*_.VALDATA___V642*/ meltfptr[641];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : MCTX_ENDLABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73514,14 +74654,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1154*/ meltfptr[1153];
+ (melt_ptr_t *) & /*_.VALDATA___V1171*/ meltfptr[1170];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_ALTMATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73533,14 +74673,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1157*/ meltfptr[1156];
+ (melt_ptr_t *) & /*_.VALDATA___V1174*/ meltfptr[1173];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_MATCHED */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1183*/ meltfptr[1182]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73552,14 +74692,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1159*/ meltfptr[1158];
+ (melt_ptr_t *) & /*_.VALDATA___V1176*/ meltfptr[1175];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_RESULT */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1185*/ meltfptr[1184]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73571,14 +74711,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1161*/ meltfptr[1160];
+ (melt_ptr_t *) & /*_.VALDATA___V1178*/ meltfptr[1177];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_BODY */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1187*/ meltfptr[1186]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73590,14 +74730,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1163*/ meltfptr[1162];
+ (melt_ptr_t *) & /*_.VALDATA___V1180*/ meltfptr[1179];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_FLAGS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73609,14 +74749,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1230*/ meltfptr[1229];
+ (melt_ptr_t *) & /*_.VALDATA___V1247*/ meltfptr[1246];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_JUMP_WHEN_IS_A */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1245*/ meltfptr[1244]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73628,14 +74768,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1233*/ meltfptr[1232];
+ (melt_ptr_t *) & /*_.VALDATA___V1250*/ meltfptr[1249];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTESTISA_VALUE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1257*/ meltfptr[1256]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73647,14 +74787,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1235*/ meltfptr[1234];
+ (melt_ptr_t *) & /*_.VALDATA___V1252*/ meltfptr[1251];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTESTISA_CLASS */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73666,14 +74806,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1237*/ meltfptr[1236];
+ (melt_ptr_t *) & /*_.VALDATA___V1254*/ meltfptr[1253];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NTESTISA_JUMP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73685,14 +74825,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1202*/ meltfptr[1201];
+ (melt_ptr_t *) & /*_.VALDATA___V1219*/ meltfptr[1218];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_DATA_ACTION */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73704,14 +74844,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1205*/ meltfptr[1204];
+ (melt_ptr_t *) & /*_.VALDATA___V1222*/ meltfptr[1221];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMDAC_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1225*/ meltfptr[1224]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73723,14 +74863,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1218*/ meltfptr[1217];
+ (melt_ptr_t *) & /*_.VALDATA___V1235*/ meltfptr[1234];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_DATA_CLEAR */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73742,14 +74882,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1224*/ meltfptr[1223];
+ (melt_ptr_t *) & /*_.VALDATA___V1241*/ meltfptr[1240];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_DATA_FINALIZER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73761,14 +74901,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1212*/ meltfptr[1211];
+ (melt_ptr_t *) & /*_.VALDATA___V1229*/ meltfptr[1228];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_DATA_INITIALIZER */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1227*/ meltfptr[1226]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73780,14 +74920,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V950*/ meltfptr[949];
+ (melt_ptr_t *) & /*_.VALDATA___V953*/ meltfptr[952];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73799,14 +74939,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V953*/ meltfptr[952];
+ (melt_ptr_t *) & /*_.VALDATA___V956*/ meltfptr[955];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NRPFLA_FLAG */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73818,14 +74958,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V955*/ meltfptr[954];
+ (melt_ptr_t *) & /*_.VALDATA___V958*/ meltfptr[957];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NRPFLA_NMATCH */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V963*/ meltfptr[962]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73837,14 +74977,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1192*/ meltfptr[1191];
+ (melt_ptr_t *) & /*_.VALDATA___V1209*/ meltfptr[1208];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_JUMP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73856,14 +74996,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1195*/ meltfptr[1194];
+ (melt_ptr_t *) & /*_.VALDATA___V1212*/ meltfptr[1211];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMJMP_LABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73875,14 +75015,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1176*/ meltfptr[1175];
+ (melt_ptr_t *) & /*_.VALDATA___V1193*/ meltfptr[1192];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_LABEL */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1174*/ meltfptr[1173]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73894,14 +75034,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1179*/ meltfptr[1178];
+ (melt_ptr_t *) & /*_.VALDATA___V1196*/ meltfptr[1195];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NMLAB_STEP */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73913,14 +75053,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V1186*/ meltfptr[1185];
+ (melt_ptr_t *) & /*_.VALDATA___V1203*/ meltfptr[1202];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCH_LABEL_END */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73932,14 +75072,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V964*/ meltfptr[963];
+ (melt_ptr_t *) & /*_.VALDATA___V967*/ meltfptr[966];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCHED_DATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V965*/ meltfptr[964]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73951,14 +75091,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V967*/ meltfptr[966];
+ (melt_ptr_t *) & /*_.VALDATA___V970*/ meltfptr[969];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NRMATD_CTYPE */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73970,14 +75110,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V969*/ meltfptr[968];
+ (melt_ptr_t *) & /*_.VALDATA___V972*/ meltfptr[971];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NRMATD_MDATA */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -73989,14 +75129,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V971*/ meltfptr[970];
+ (melt_ptr_t *) & /*_.VALDATA___V974*/ meltfptr[973];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NRMATD_RANK */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1516*/ meltfptr[1438]),
- (melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]),
+ ( /*_.VALUEXPORTER___V1543*/ meltfptr[1456]),
+ (melt_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -74004,10 +75144,10 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1516*/ meltfptr[1438] = 0;
+ /*clear *//*_.VALUEXPORTER___V1543*/ meltfptr[1456] = 0;
}
- MELT_LOCATION ("warmelt-normatch.melt:6873:/ initchunk");
+ MELT_LOCATION ("warmelt-normatch.melt:7020:/ initchunk");
/*^block */
/*anyblock */
{
@@ -74016,8 +75156,8 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
{
melt_ptr_t slot = 0;
melt_object_get_field (slot, (melt_ptr_t) (((void *) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");
- /*_.VALUEXPORTER___V1517*/
- meltfptr[1436] = slot;
+ /*_.VALUEXPORTER___V1544*/
+ meltfptr[1457] = slot;
};
;
/*^apply */
@@ -74027,14 +75167,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V146*/ meltfptr[145];
+ (melt_ptr_t *) & /*_.VALDATA___V147*/ meltfptr[146];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : SCAN_PATTERN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1517*/ meltfptr[1436]),
- (melt_ptr_t) ( /*_.VALDATA___V142*/ meltfptr[141]),
+ ( /*_.VALUEXPORTER___V1544*/ meltfptr[1457]),
+ (melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -74046,14 +75186,14 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
memset (&argtab, 0, sizeof (argtab));
/*^apply.arg */
argtab[0].meltbp_aptr =
- (melt_ptr_t *) & /*_.VALDATA___V225*/ meltfptr[224];
+ (melt_ptr_t *) & /*_.VALDATA___V226*/ meltfptr[225];
/*^apply.arg */
argtab[1].meltbp_aptr = (melt_ptr_t *) &
/*quasi.cur.mod.env.cont norm.exp.val : NORMAL_PATTERN */
/*_.CONTENV___V2*/ meltfptr[1];
melt_apply ((meltclosure_ptr_t)
- ( /*_.VALUEXPORTER___V1517*/ meltfptr[1436]),
- (melt_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]),
+ ( /*_.VALUEXPORTER___V1544*/ meltfptr[1457]),
+ (melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]),
(MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "",
(union meltparam_un *) 0);
}
@@ -74061,7 +75201,7 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*epilog */
/*^clear */
- /*clear *//*_.VALUEXPORTER___V1517*/ meltfptr[1436] = 0;
+ /*clear *//*_.VALUEXPORTER___V1544*/ meltfptr[1457] = 0;
}
/**COMMENT: after toplevel body **/ ;
@@ -74124,1275 +75264,1270 @@ warmelt_normatch_initialmeltchunk_26 (struct frame_start_module_melt_st
/*internsym:CLASS_PATTERN_CONTEXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V90*/ meltfptr[89]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V91*/ meltfptr[90]));
/*internsym:CLASS_ROOT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V92*/ meltfptr[91]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92]));
/*internsym:PCTN_NORMCTXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V121*/ meltfptr[120]));
/*internsym:PCTN_SRC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V122*/ meltfptr[121]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122]));
/*internsym:PCTN_ENV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V124*/ meltfptr[123]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124]));
/*internsym:PCTN_MAPATVAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V126*/ meltfptr[125]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126]));
/*internsym:PCTN_MAPATCST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V128*/ meltfptr[127]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128]));
/*internsym:PCTN_MAPOR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V130*/ meltfptr[129]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130]));
/*internsym:PCTN_BINDLIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V132*/ meltfptr[131]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132]));
/*internsym:PCTN_STUFFMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V134*/ meltfptr[133]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]));
/*internsym:PCTN_PVARLOCMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V136*/ meltfptr[135]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136]));
/*internsym:PCTN_TESTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V138*/ meltfptr[137]));
-
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138]));
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_26 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_27 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:PCTN_VARHANDLERS*/
+ /*internsym:PCTN_VARHANDLERS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V140*/ meltfptr[139]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140]));
/*internsym:SCAN_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V142*/ meltfptr[141]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142]));
/*internsym:CLASS_SELECTOR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V144*/ meltfptr[143]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144]));
/*internsym:MELT_DEBUG_FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V150*/ meltfptr[149]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V151*/ meltfptr[150]));
/*internsym:CLASS_NAMED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V152*/ meltfptr[151]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]));
/*internsym:INSTALL_METHOD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]));
/*internsym:DISCR_ANY_RECEIVER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V156*/ meltfptr[155]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]));
/*internsym:CLASS_SOURCE_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V160*/ meltfptr[159]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V161*/ meltfptr[160]));
/*internsym:CLASS_SOURCE_PATTERN_VARIABLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V164*/ meltfptr[163]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V165*/ meltfptr[164]));
/*internsym:CLASS_SOURCE_PATTERN_JOKER_VARIABLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V168*/ meltfptr[167]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V169*/ meltfptr[168]));
/*internsym:CLASS_SOURCE_PATTERN_CONSTANT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V173*/ meltfptr[172]));
/*internsym:NORMAL_EXP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174]));
/*internsym:LIST_APPEND2LIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]));
/*internsym:GET_CTYPE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V178*/ meltfptr[177]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]));
/*internsym:CLASS_CTYPE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180]));
/*internsym:CLASS_LOCATED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]));
/*internsym:CLASS_SOURCE_PATTERN_CONSTRUCT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V187*/ meltfptr[186]));
/*internsym:CTYPE_VALUE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]));
/*internsym:CLASS_SOURCE_PATTERN_OBJECT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]));
/*internsym:CLASS_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V194*/ meltfptr[193]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]));
/*internsym:CLASS_SOURCE_FIELD_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]));
/*internsym:CLASS_FIELD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198]));
/*internsym:CLASS_SOURCE_PATTERN_COMPOSITE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V203*/ meltfptr[202]));
/*internsym:CLASS_ANY_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]));
/*internsym:CLASS_FORMAL_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]));
/*internsym:NORMALIZE_TUPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]));
/*internsym:CLASS_SOURCE_PATTERN_OR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]));
/*internsym:DISCR_MAP_OBJECTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]));
/*internsym:CLASS_SYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V217*/ meltfptr[216]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]));
/*internsym:CLASS_SOURCE_PATTERN_AND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]));
/*internsym:NORMAL_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V223*/ meltfptr[222]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]));
/*internsym:CLASS_NORMAL_OR_VARIABLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V227*/ meltfptr[226]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]));
/*internsym:NORVAR_NOREXP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]));
/*internsym:NORVAR_LOCSYM */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V243*/ meltfptr[242]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]));
/*internsym:NORVAR_PATVAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]));
/*internsym:NORVAR_NREPOR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]));
/*internsym:CLASS_NORMTESTER_ANY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V249*/ meltfptr[248]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]));
/*internsym:CLASS_NREP_EXPRESSION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]));
/*internsym:NTEST_MATCHED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]));
/*internsym:NTEST_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]));
/*internsym:NTEST_ELSE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273]));
/*internsym:NTEST_NORMATCH */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]));
/*internsym:NTEST_LOCCLIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V277*/ meltfptr[276]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]));
/*internsym:NTEST_COMEFROM */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V279*/ meltfptr[278]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]));
/*internsym:CLASS_NORMTESTER_SUCCESS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V281*/ meltfptr[280]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]));
/*internsym:NTSUCCESS_DO */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]));
/*internsym:CLASS_NORMTESTER_OR_CLEAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291]));
/*internsym:NTORCLEAR_LOCSYM */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]));
/*internsym:CLASS_NORMTESTER_OR_INITIAL_CLEAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V301*/ meltfptr[300]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]));
/*internsym:CLASS_NORMTESTER_OR_TRANSMIT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]));
/*internsym:NTORTRANSMIT_DST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]));
/*internsym:NTORTRANSMIT_SRC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V319*/ meltfptr[318]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]));
/*internsym:CLASS_NORMTESTER_ANYTESTER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]));
/*internsym:CLASS_NORMTESTER_DISJUNCTION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V327*/ meltfptr[326]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]));
/*internsym:NTDISJUNCTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]));
/*internsym:NTDISJ_FRESHORVAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]));
/*internsym:NTDISJ_SETORVAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]));
/*internsym:CLASS_NORMTESTER_SAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345]));
/*internsym:NTSAME_IDENTICAL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]));
/*internsym:CLASS_NORMTESTER_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V355*/ meltfptr[354]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]));
/*internsym:NTMATCH_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]));
/*internsym:NTMATCH_MATNDATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V371*/ meltfptr[370]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]));
/*internsym:NTMATCH_INARGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V373*/ meltfptr[372]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]));
/*internsym:NTMATCH_OUTLOCS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375]));
/*internsym:CLASS_NORMTESTER_INSTANCE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]));
/*internsym:NTINST_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V388*/ meltfptr[387]));
/*internsym:NTINST_FIELDLOCS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]));
/*internsym:CLASS_NORMTESTER_TUPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V391*/ meltfptr[390]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]));
/*internsym:NTTUPLE_COMPONENTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]));
+
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_27 */
- /*internsym:CLASS_NREP_MATCH */
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_28 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:CLASS_NREP_MATCH*/
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]));
/*internsym:CLASS_NREP_TYPED_EXPRESSION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]));
/*internsym:NMATCH_TESTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]));
/*internsym:NMATCH_STUFFMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]));
/*internsym:NMATCH_MATCHED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]));
/*internsym:DISCR_LIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423]));
/*internsym:CLASS_CONTAINER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V430*/ meltfptr[429]));
/*internsym:CLASS_NREP_LOCSYMOCC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V440*/ meltfptr[439]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]));
/*internsym:CLASS_NORMAL_LET_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]));
/*internsym:CLASS_NORMALIZATION_CONTEXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446]));
/*internsym:CLASS_SOURCE_PATTERN_INSTANCE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V459*/ meltfptr[458]));
/*internsym:DISCR_MULTIPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]));
/*internsym:CLASS_NREP_SYMOCC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]));
/*internsym:CLASS_LET_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464]));
/*internsym:CLASS_NREP_UNSAFE_GET_FIELD */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]));
/*internsym:CLONE_SYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]));
/*internsym:CLASS_TUPLE_COMPONENT_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]));
/*internsym:TUPCP_PATTERN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]));
/*internsym:TUPCP_INDEX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]));
/*internsym:CLASS_SOURCE_PATTERN_TUPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]));
/*internsym:DISCR_CONSTANT_INTEGER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]));
/*internsym:LIST_TO_MULTIPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V498*/ meltfptr[497]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498]));
/*internsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]));
/*internsym:NTHCOMP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V491*/ meltfptr[490]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]));
/*internsym:MAPOBJECT_SORTED_ATTRIBUTE_TUPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V510*/ meltfptr[509]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]));
/*internsym:MULTIPLE_MAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V513*/ meltfptr[512]));
/*internsym:CLASS_NREP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]));
/*internsym:SET_CONTENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]));
/*internsym:CLASS_SOURCE_PATTERN_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]));
/*internsym:CLASS_ANY_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]));
/*internsym:FIND_ENV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]));
/*internsym:FRESH_ENV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]));
/*internsym:PUT_ENV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]));
/*internsym:MULTIPLE_TO_LIST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]));
/*internsym:MATCH_GRAPHIC_DOT_PREFIX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]));
/*internsym:DISCR_STRING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V545*/ meltfptr[544]));
/*internsym:REGISTER_OPTION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]));
/*internsym:MATCH_GRAPHIC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548]));
/*internsym:CLASS_MATCH_GRAPHIC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]));
/*internsym:CLASS_PROPED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V553*/ meltfptr[552]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]));
/*internsym:MCHGX_FILENAME */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V570*/ meltfptr[569]));
/*internsym:MCHGX_NODOUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]));
/*internsym:MCHGX_EDGOUT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]));
/*internsym:MCHGX_DATANAMEMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V575*/ meltfptr[574]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]));
/*internsym:MCHGX_STEPNAMEMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]));
/*internsym:MATCHGRAPHIC_LABEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]));
/*internsym:CLASS_CLONED_SYMBOL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]));
/*internsym:DISCR_STRBUF */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]));
/*internsym:CLASS_SOURCE_MATCH */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]));
/*internsym:CLASS_ENVIRONMENT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]));
/*internsym:_MATCHED_ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]));
/*internsym:CLASS_SOURCE_MATCH_CASE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]));
/*internsym:WRAP_NORMAL_LETSEQ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V612*/ meltfptr[611]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]));
/*internsym:CTYPE_VOID */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V614*/ meltfptr[613]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]));
/*internsym:MATCHRES_ */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V603*/ meltfptr[602]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]));
/*internsym:CLASS_MATCHING_CONTEXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]));
/*internsym:MCTX_NORMCTXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V645*/ meltfptr[644]));
/*internsym:MCTX_SOURCE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]));
/*internsym:MCTX_NMATCHED */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]));
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_27 */
-
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_28 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:MCTX_NMATBIND*/
+ /*internsym:MCTX_NMATBIND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]));
/*internsym:MCTX_CASES */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V650*/ meltfptr[649]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]));
/*internsym:MCTX_ENV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V652*/ meltfptr[651]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]));
/*internsym:MCTX_MDATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V654*/ meltfptr[653]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]));
/*internsym:MCTX_VARHANDLERS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V656*/ meltfptr[655]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]));
/*internsym:MCTX_FLAGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660]));
/*internsym:MCTX_ENDLABEL */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]));
/*internsym:CLASS_MATCH_CASE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]));
/*internsym:MCASE_MCTXT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V679*/ meltfptr[678]));
/*internsym:MCASE_SOURCE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]));
/*internsym:MCASE_INDEX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V683*/ meltfptr[682]));
/*internsym:MCASE_VARMAP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]));
/*internsym:CLASS_MATCHED_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]));
/*internsym:MDATA_SYMB */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V701*/ meltfptr[700]));
/*internsym:MDATA_CTYPE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V703*/ meltfptr[702]));
/*internsym:MDATA_ORIG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V705*/ meltfptr[704]));
/*internsym:MDATA_STEPS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]));
/*internsym:CLASS_MATCHED_NORMAL_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]));
/*internsym:CLASS_MATCHED_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]));
/*internsym:MATCHBIND_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V725*/ meltfptr[724]));
/*internsym:MATCHBIND_NBOCC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V724*/ meltfptr[723]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V727*/ meltfptr[726]));
/*internsym:NORMALIZE_BINDING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]));
/*internsym:CLASS_MATCH_FLAG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]));
/*internsym:MFLAG_SPAT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V747*/ meltfptr[746]));
/*internsym:MFLAG_RANK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]));
/*internsym:MFLAG_STRING */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V751*/ meltfptr[750]));
/*internsym:MFLAG_SETSTEP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]));
/*internsym:CLASS_MATCH_STEP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]));
/*internsym:CLASS_MATCH_STEP_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]));
/*internsym:MSTEP_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]));
/*internsym:CLASS_MATCH_STEP_CLEAR */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]));
/*internsym:MSTEP_CLEARDATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]));
/*internsym:CLASS_MATCH_STEP_WITH_FLAG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V781*/ meltfptr[780]));
/*internsym:MSTEP_FLAG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V786*/ meltfptr[785]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]));
/*internsym:CLASS_MATCH_STEP_WITH_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]));
/*internsym:MSTEP_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]));
/*internsym:MSTEP_INDEX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]));
/*internsym:CLASS_MATCH_STEP_FLAG_SET */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]));
/*internsym:CLASS_MATCH_STEP_FLAG_OPERATION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]));
/*internsym:MSTEP_FLAGARGS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]));
/*internsym:CLASS_MATCH_STEP_FLAG_CONJUNCTION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V818*/ meltfptr[817]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]));
/*internsym:CLASS_MATCH_STEP_FLAG_DISJUNCTION */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]));
/*internsym:CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]));
/*internsym:MSTEPSUCCESS_VAROCC */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V845*/ meltfptr[844]));
/*internsym:MSTEPSUCCESS_BINDS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V847*/ meltfptr[846]));
/*internsym:MSTEPSUCCESS_BODY */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V849*/ meltfptr[848]));
/*internsym:CLASS_MATCH_STEP_TEST */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]));
/*internsym:MSTEP_ELSE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]));
/*internsym:CLASS_MATCH_STEP_TEST_VARIABLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860]));
/*internsym:MSTEPTESTVAR_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]));
/*internsym:CLASS_MATCH_STEP_TEST_CONSTANT */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]));
/*internsym:MSTEPTESTCONST_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]));
/*internsym:MSTEPTESTCONST_BIND */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]));
/*internsym:CLASS_MATCH_STEP_TEST_GROUP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]));
/*internsym:MSTGROUP_START */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V897*/ meltfptr[896]));
/*internsym:MSTGROUP_THEN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]));
/*internsym:MSTGROUP_ELSE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]));
/*internsym:CLASS_MATCH_STEP_TEST_INSTANCE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]));
/*internsym:MSTINS_CLASS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V913*/ meltfptr[912]));
/*internsym:MSTINS_SLOTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]));
/*internsym:CLASS_MATCH_STEP_TEST_MULTIPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V917*/ meltfptr[916]));
/*internsym:MSTTUP_COMPONENTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V922*/ meltfptr[921]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]));
/*internsym:CLASS_MATCH_STEP_TEST_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V927*/ meltfptr[926]));
/*internsym:MSTMA_MATCHER */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]));
/*internsym:MSTMA_BINDS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]));
/*internsym:MSTMA_INS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]));
/*internsym:MSTMA_OUTS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]));
/*internsym:CLASS_NREP_MATCH_FLAG */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]));
/*internsym:CLASS_NREP_SIMPLE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]));
+
+
+#undef meltfram__
+} /*end of warmelt_normatch_initialmeltchunk_28 */
- /*internsym:NRPFLA_FLAG */
+void MELT_MODULE_VISIBILITY
+warmelt_normatch_initialmeltchunk_29 (struct frame_start_module_melt_st
+ *meltmeltframptr__, char predefinited[])
+{
+#define meltfram__ (*meltmeltframptr__)
+#undef meltcallcount
+#define meltcallcount 0L
+/*internsym:NRPFLA_FLAG*/
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]));
/*internsym:NRPFLA_NMATCH */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V963*/ meltfptr[962]));
/*internsym:CLASS_NREP_MATCHED_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V965*/ meltfptr[964]));
/*internsym:NRMATD_CTYPE */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]));
/*internsym:NRMATD_MDATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V979*/ meltfptr[978]));
/*internsym:NRMATD_RANK */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V981*/ meltfptr[980]));
/*internsym:SCAN_SUBPATTERNS */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]));
/*internsym:RECV */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]));
/*internsym:FUN */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]));
/*internsym:CTX */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]));
/*internsym:SCAN_STEP_DATA */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]));
+ meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]));
/*internsym:STEP */
(void)
- meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]));
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1001*/ meltfptr[1000]));
/*internsym:SCAN_STEP_FLAG */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1006*/ meltfptr[1005]));
+ ( /*_.VALDATA___V1009*/ meltfptr[1008]));
/*internsym:PUT_THEN_MATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1031*/ meltfptr[1030]));
+ ( /*_.VALDATA___V1036*/ meltfptr[1035]));
/*internsym:THENSTEP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1034*/ meltfptr[1033]));
+ ( /*_.VALDATA___V1039*/ meltfptr[1038]));
/*internsym:PUT_ELSE_MATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1046*/ meltfptr[1045]));
+ ( /*_.VALDATA___V1053*/ meltfptr[1052]));
/*internsym:ELSESTEP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1049*/ meltfptr[1048]));
+ ( /*_.VALDATA___V1056*/ meltfptr[1055]));
/*internsym:TRANSLATE_PATTERN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1069*/ meltfptr[1068]));
+ ( /*_.VALDATA___V1084*/ meltfptr[1083]));
/*internsym:MDATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1072*/ meltfptr[1071]));
+ ( /*_.VALDATA___V1087*/ meltfptr[1086]));
/*internsym:MCASE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1075*/ meltfptr[1074]));
+ ( /*_.VALDATA___V1090*/ meltfptr[1089]));
/*internsym:VARMAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1078*/ meltfptr[1077]));
+ ( /*_.VALDATA___V1093*/ meltfptr[1092]));
/*internsym:SLOC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1081*/ meltfptr[1080]));
+ ( /*_.VALDATA___V1096*/ meltfptr[1095]));
/*internsym:CLASS_SOURCE_PATTERN_LIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1096*/ meltfptr[1095]));
+ ( /*_.VALDATA___V1111*/ meltfptr[1110]));
/*internsym:PATUPLECOMP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1103*/ meltfptr[1102]));
+ ( /*_.VALDATA___V1118*/ meltfptr[1117]));
/*internsym:MATCHGRAPHIC_ALTSTEP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1121*/ meltfptr[1120]));
+ ( /*_.VALDATA___V1136*/ meltfptr[1135]));
/*internsym:ADD2OUT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1129*/ meltfptr[1128]));
+ ( /*_.VALDATA___V1146*/ meltfptr[1145]));
/*internsym:DISCR_INTEGER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1148*/ meltfptr[1147]));
+ ( /*_.VALDATA___V1165*/ meltfptr[1164]));
/*internsym:COMPARE_NAMED_ALPHA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1150*/ meltfptr[1149]));
+ ( /*_.VALDATA___V1167*/ meltfptr[1166]));
/*internsym:CLASS_NREP_ALTMATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1152*/ meltfptr[1151]));
+ ( /*_.VALDATA___V1169*/ meltfptr[1168]));
/*internsym:NAMATCH_MATCHED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1166*/ meltfptr[1165]));
+ ( /*_.VALDATA___V1183*/ meltfptr[1182]));
/*internsym:NAMATCH_RESULT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1168*/ meltfptr[1167]));
+ ( /*_.VALDATA___V1185*/ meltfptr[1184]));
/*internsym:NAMATCH_BODY */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1170*/ meltfptr[1169]));
+ ( /*_.VALDATA___V1187*/ meltfptr[1186]));
/*internsym:NAMATCH_FLAGS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1172*/ meltfptr[1171]));
+ ( /*_.VALDATA___V1189*/ meltfptr[1188]));
/*internsym:CLASS_NREP_MATCH_LABEL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1174*/ meltfptr[1173]));
+ ( /*_.VALDATA___V1191*/ meltfptr[1190]));
/*internsym:NMLAB_STEP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1182*/ meltfptr[1181]));
+ ( /*_.VALDATA___V1199*/ meltfptr[1198]));
/*internsym:CLASS_NREP_MATCH_LABEL_END */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1184*/ meltfptr[1183]));
+ ( /*_.VALDATA___V1201*/ meltfptr[1200]));
/*internsym:CLASS_NREP_MATCH_JUMP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1190*/ meltfptr[1189]));
+ ( /*_.VALDATA___V1207*/ meltfptr[1206]));
/*internsym:NMJMP_LABEL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1198*/ meltfptr[1197]));
+ ( /*_.VALDATA___V1215*/ meltfptr[1214]));
/*internsym:CLASS_NREP_MATCH_DATA_ACTION */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1200*/ meltfptr[1199]));
+ ( /*_.VALDATA___V1217*/ meltfptr[1216]));
/*internsym:NMDAC_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1208*/ meltfptr[1207]));
+ ( /*_.VALDATA___V1225*/ meltfptr[1224]));
/*internsym:CLASS_NREP_MATCH_DATA_INITIALIZER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1210*/ meltfptr[1209]));
+ ( /*_.VALDATA___V1227*/ meltfptr[1226]));
/*internsym:CLASS_NREP_MATCH_DATA_CLEAR */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1216*/ meltfptr[1215]));
+ ( /*_.VALDATA___V1233*/ meltfptr[1232]));
/*internsym:CLASS_NREP_MATCH_DATA_FINALIZER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1222*/ meltfptr[1221]));
+ ( /*_.VALDATA___V1239*/ meltfptr[1238]));
/*internsym:CLASS_NREP_JUMP_WHEN_IS_A */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1228*/ meltfptr[1227]));
+ ( /*_.VALDATA___V1245*/ meltfptr[1244]));
/*internsym:NTESTISA_VALUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1240*/ meltfptr[1239]));
+ ( /*_.VALDATA___V1257*/ meltfptr[1256]));
/*internsym:NTESTISA_CLASS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1242*/ meltfptr[1241]));
+ ( /*_.VALDATA___V1259*/ meltfptr[1258]));
/*internsym:NTESTISA_JUMP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1244*/ meltfptr[1243]));
+ ( /*_.VALDATA___V1261*/ meltfptr[1260]));
/*internsym:CLASS_MATCH_NORMALIZATION_CONTEXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1246*/ meltfptr[1245]));
+ ( /*_.VALDATA___V1263*/ meltfptr[1262]));
/*internsym:MATNORX_RESLOC */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1272*/ meltfptr[1271]));
+ ( /*_.VALDATA___V1289*/ meltfptr[1288]));
/*internsym:MATNORX_NMATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1274*/ meltfptr[1273]));
+ ( /*_.VALDATA___V1291*/ meltfptr[1290]));
/*internsym:MATNORX_DATAMAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1276*/ meltfptr[1275]));
+ ( /*_.VALDATA___V1293*/ meltfptr[1292]));
/*internsym:MATNORX_FLAGMAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1278*/ meltfptr[1277]));
+ ( /*_.VALDATA___V1295*/ meltfptr[1294]));
/*internsym:MATNORX_STEPMAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1280*/ meltfptr[1279]));
+ ( /*_.VALDATA___V1297*/ meltfptr[1296]));
/*internsym:MATNORX_MDATAQUEUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1282*/ meltfptr[1281]));
+ ( /*_.VALDATA___V1299*/ meltfptr[1298]));
/*internsym:MATNORX_MSTEPQUEUE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1284*/ meltfptr[1283]));
+ ( /*_.VALDATA___V1301*/ meltfptr[1300]));
/*internsym:MATNORX_BODYLIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1286*/ meltfptr[1285]));
+ ( /*_.VALDATA___V1303*/ meltfptr[1302]));
/*internsym:MATNORX_ENDLABEL */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1288*/ meltfptr[1287]));
+ ( /*_.VALDATA___V1305*/ meltfptr[1304]));
/*internsym:MATNORX_MATCHCTXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1290*/ meltfptr[1289]));
+ ( /*_.VALDATA___V1307*/ meltfptr[1306]));
/*internsym:NORMALIZE_STEP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1294*/ meltfptr[1293]));
-
-
-#undef meltfram__
-} /*end of warmelt_normatch_initialmeltchunk_28 */
+ ( /*_.VALDATA___V1311*/ meltfptr[1310]));
-void MELT_MODULE_VISIBILITY
-warmelt_normatch_initialmeltchunk_29 (struct frame_start_module_melt_st
- *meltmeltframptr__, char predefinited[])
-{
-#define meltfram__ (*meltmeltframptr__)
-#undef meltcallcount
-#define meltcallcount 0L
-/*internsym:NMCTXT*/
+ /*internsym:NMCTXT */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1297*/ meltfptr[1296]));
+ ( /*_.VALDATA___V1314*/ meltfptr[1313]));
/*internsym:CLASS_NREP_SETQ */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1317*/ meltfptr[1316]));
+ ( /*_.VALDATA___V1334*/ meltfptr[1333]));
/*internsym:CLASS_NREP_CHUNK */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1324*/ meltfptr[1323]));
+ ( /*_.VALDATA___V1341*/ meltfptr[1340]));
/*internsym:AND_MATCH_FLAGS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1321*/ meltfptr[1320]));
+ ( /*_.VALDATA___V1338*/ meltfptr[1337]));
/*internsym:CTYPE_LONG */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1326*/ meltfptr[1325]));
+ ( /*_.VALDATA___V1343*/ meltfptr[1342]));
/*internsym:DISCR_VERBATIM_STRING */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1328*/ meltfptr[1327]));
+ ( /*_.VALDATA___V1345*/ meltfptr[1344]));
/*internsym:CLASS_NREP_IFISA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1334*/ meltfptr[1333]));
+ ( /*_.VALDATA___V1351*/ meltfptr[1350]));
/*internsym:CLASS_NREP_PROGN */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1336*/ meltfptr[1335]));
+ ( /*_.VALDATA___V1353*/ meltfptr[1352]));
/*internsym:CLASS_NREP_IFTUPLESIZED */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1340*/ meltfptr[1339]));
+ ( /*_.VALDATA___V1357*/ meltfptr[1356]));
+
+ /*internsym:CLASS_NREP_IFCOMMON */
+ (void)
+ meltgc_intern_symbol ((melt_ptr_t)
+ ( /*_.VALDATA___V1359*/ meltfptr[1358]));
/*internsym:CLASS_NREP_IFSAME */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1344*/ meltfptr[1343]));
+ ( /*_.VALDATA___V1363*/ meltfptr[1362]));
/*internsym:LIST_MAP */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1352*/ meltfptr[1351]));
+ ( /*_.VALDATA___V1371*/ meltfptr[1370]));
/*internsym:CLASS_NREP_IF */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1356*/ meltfptr[1355]));
+ ( /*_.VALDATA___V1375*/ meltfptr[1374]));
/*internsym:NORMALIZE_TEST_MATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1358*/ meltfptr[1357]));
+ ( /*_.VALDATA___V1377*/ meltfptr[1376]));
/*internsym:NDATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1362*/ meltfptr[1361]));
+ ( /*_.VALDATA___V1381*/ meltfptr[1380]));
/*internsym:BINDLIST */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1365*/ meltfptr[1364]));
+ ( /*_.VALDATA___V1384*/ meltfptr[1383]));
/*internsym:NJELSE */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1369*/ meltfptr[1368]));
+ ( /*_.VALDATA___V1388*/ meltfptr[1387]));
/*internsym:NORMALIZE_FILL_MATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1375*/ meltfptr[1374]));
+ ( /*_.VALDATA___V1394*/ meltfptr[1393]));
/*internsym:NOUTS */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1381*/ meltfptr[1380]));
+ ( /*_.VALDATA___V1400*/ meltfptr[1399]));
/*internsym:TESTDATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1385*/ meltfptr[1384]));
+ ( /*_.VALDATA___V1404*/ meltfptr[1403]));
/*internsym:CLASS_CMATCHER */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1397*/ meltfptr[1396]));
+ ( /*_.VALDATA___V1416*/ meltfptr[1415]));
/*internsym:_MATCHRES */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1406*/ meltfptr[1405]));
+ ( /*_.VALDATA___V1425*/ meltfptr[1424]));
/*internsym:_MATCHED_DATA */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1413*/ meltfptr[1412]));
+ ( /*_.VALDATA___V1432*/ meltfptr[1431]));
/*internkeyw:TRUE */
(void)
meltgc_intern_keyword ((melt_ptr_t)
- ( /*_.VALDATA___V1429*/ meltfptr[1428]));
+ ( /*_.VALDATA___V1448*/ meltfptr[1447]));
/*internsym:ALTERNATE_MATCH */
(void)
meltgc_intern_symbol ((melt_ptr_t)
- ( /*_.VALDATA___V1434*/ meltfptr[1433]));
+ ( /*_.VALDATA___V1453*/ meltfptr[1452]));
/**COMMENT: set retinit from boxloc **/ ;
@@ -75412,20 +76547,20 @@ forward_or_mark_module_start_frame_warmelt_normatch (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -1446);
+ meltframptr_->mcfr_nbvar == /*minihash */ -306);
if (!marking && melt_is_forwarding)
{
dbgprintf
("forward_or_mark_module_start_frame_warmelt_normatch forwarding %d pointers in frame %p",
- 1517, (void *) meltframptr_);
- for (ix = 0; ix < 1517; ix++)
+ 1544, (void *) meltframptr_);
+ for (ix = 0; ix < 1544; ix++)
MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]);
return;
} /*end forwarding */
dbgprintf
("forward_or_mark_module_start_frame_warmelt_normatch marking in frame %p",
(void *) meltframptr_);
- for (ix = 0; ix < 1517; ix++)
+ for (ix = 0; ix < 1544; ix++)
if (meltframptr_->mcfr_varptr[ix])
gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]);
diff --git a/gcc/melt/generated/warmelt-outobj+01.c b/gcc/melt/generated/warmelt-outobj+01.c
index ad8674a9218..fde359bf24d 100644
--- a/gcc/melt/generated/warmelt-outobj+01.c
+++ b/gcc/melt/generated/warmelt-outobj+01.c
@@ -3484,7 +3484,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:120:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.RECV__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -3864,7 +3869,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-outobj.melt:133:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OCLASS__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OCLASS__V18*/
+ meltfptr[17]),
+ (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-outobj+02.c b/gcc/melt/generated/warmelt-outobj+02.c
index 41773403c13..947becc26e9 100644
--- a/gcc/melt/generated/warmelt-outobj+02.c
+++ b/gcc/melt/generated/warmelt-outobj+02.c
@@ -4141,7 +4141,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ROU__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4160,7 +4166,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:1138:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.ROU__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4197,7 +4209,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-outobj.melt:1142:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CTYPE_VALUE */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CTYPE_VALUE */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4293,7 +4311,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:1151:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!CTYPE_VALUE */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!CTYPE_VALUE */ meltfrout->
+ tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4553,7 +4578,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJVALUE */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJVALUE */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4572,7 +4603,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:1159:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OLOC__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJLOCV */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4591,7 +4628,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:1160:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OCTYP__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[2])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OCTYP__V6*/ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_CTYPE */
+ meltfrout->tabval[2])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -4805,7 +4848,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:1178:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OMARKER__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OMARKER__V8*/
+ meltfptr[7]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -8131,7 +8180,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:1474:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.PINI__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -9362,7 +9417,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURBODY__V29*/ meltfptr[28]), (melt_ptr_t) (( /*!CLASS_OBJINSTR */ meltfrout->tabval[18])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURBODY__V29*/
+ meltfptr[28]),
+ (melt_ptr_t) (( /*!CLASS_OBJINSTR */ meltfrout->tabval[18])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -11958,7 +12019,12 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:1867:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETARGREST */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.GARG__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJGETARGREST */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-outobj+03.c b/gcc/melt/generated/warmelt-outobj+03.c
index 1e170d85b03..11f93324c8a 100644
--- a/gcc/melt/generated/warmelt-outobj+03.c
+++ b/gcc/melt/generated/warmelt-outobj+03.c
@@ -17322,7 +17322,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:3256:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTPAIR */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTPAIR */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17341,7 +17347,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3257:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTPAIRHEAD */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTPAIRHEAD */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17360,7 +17371,14 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3258:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) (( /*!OBJPUTPAIRHEAD_COUNTER */ meltfrout->tabval[2])), (melt_ptr_t) (( /*!CLASS_CONTAINER */ meltfrout->tabval[3])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ (( /*!OBJPUTPAIRHEAD_COUNTER */
+ meltfrout->tabval[2])),
+ (melt_ptr_t) (( /*!CLASS_CONTAINER */
+ meltfrout->tabval[3])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17713,7 +17731,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:3283:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTPAIR */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTPAIR */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -17732,7 +17756,12 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3284:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTPAIRTAIL */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTPAIRTAIL */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18050,7 +18079,13 @@ lab_endgetargs:;
};
;
MELT_LOCATION ("warmelt-outobj.melt:3307:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18069,7 +18104,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3308:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -18088,7 +18129,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3309:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OPUT__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_OBJPUTLIST */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-outobj+04.c b/gcc/melt/generated/warmelt-outobj+04.c
index ad87ce3ab7b..45573d13858 100644
--- a/gcc/melt/generated/warmelt-outobj+04.c
+++ b/gcc/melt/generated/warmelt-outobj+04.c
@@ -5850,7 +5850,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3785:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_FIELD */
+ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -5869,7 +5875,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:3785:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.FLD_OWNCLASS__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.FLD_OWNCLASS__V6*/ meltfptr[5]),
+ (melt_ptr_t) (( /*!CLASS_NAMED */
+ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -6437,7 +6449,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[0])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V2*/ meltfptr[1]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[0])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -7656,7 +7673,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V18*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[4])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIL__V18*/
+ meltfptr[14]),
+ (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[4])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10158,7 +10181,13 @@ lab_endgetargs:;
{
MELT_LOCATION ("warmelt-outobj.melt:4222:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.OBEL__V68*/ meltfptr[67]), (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[26])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.OBEL__V68*/
+ meltfptr[67]),
+ (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[26])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10255,7 +10284,13 @@ lab_endgetargs:;
{
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.SECFIL__V75*/ meltfptr[70]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.SECFIL__V75*/
+ meltfptr[70]),
+ (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10502,7 +10537,12 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.MODCTX__V4*/ meltfptr[3]),
+ (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10800,7 +10840,13 @@ lab_endgetargs:;
/*^cond */
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V91*/ meltfptr[87]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIL__V91*/
+ meltfptr[87]),
+ (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10819,7 +10865,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:4259:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V91*/ meltfptr[87]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIL__V91*/
+ meltfptr[87]),
+ (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
@@ -10838,7 +10890,13 @@ lab_endgetargs:;
}
;
MELT_LOCATION ("warmelt-outobj.melt:4260:/ cond");
- /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V91*/ meltfptr[87]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))) /*then */
+ /*cond */ if (
+ /*ifisa */
+ melt_is_instance_of ((melt_ptr_t)
+ ( /*_.CURFIL__V91*/
+ meltfptr[87]),
+ (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[28])))
+ ) /*then */
{
/*^cond.then */
/*^getslot */
diff --git a/gcc/melt/generated/warmelt-outobj+meltdesc.c b/gcc/melt/generated/warmelt-outobj+meltdesc.c
index b1113e01774..b06e7e0e17c 100644
--- a/gcc/melt/generated/warmelt-outobj+meltdesc.c
+++ b/gcc/melt/generated/warmelt-outobj+meltdesc.c
@@ -3,8 +3,8 @@
/* These identifiers are generated in warmelt-outobj.melt
& handled in melt-runtime.c carefully. */
/* version of the GCC compiler & MELT runtime generating this */
-const char melt_genversionstr[]="4.7.0 20120206 (experimental) [melt-branch revision 183954] MELT_0.9.3+";
-const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_183954]";
+const char melt_genversionstr[]="4.7.0 20120210 (experimental) [melt-branch revision 184154] MELT_0.9.3+";
+const char melt_versionmeltstr[]="0.9.3+ [melt-branch_revision_184154]";
/* source name & real path of the module */
/*MELTMODULENAME MELT-STAGE-ZERO/warmelt-outobj */
@@ -12,17 +12,17 @@ const char melt_modulename[]="warmelt-outobj";
const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.7.0/melt-modules/warmelt-outobj";
/* hash of preprocessed melt-run.h generating this */
-const char melt_prepromd5meltrun[]="eaea4b183121664c2038c366297e0f4f";
+const char melt_prepromd5meltrun[]="fda62b37f738bcce7889bd62cdace583";
/* hexmd5checksum of primary C file */
-const char melt_primaryhexmd5[]="6c88edd8b21f4240f9e136dec959ce73";
+const char melt_primaryhexmd5[]="e508b75ca6b57cd4669461833cf92d1b";
/* hexmd5checksum of secondary C files */
const char* const melt_secondaryhexmd5tab[]={
/*nosecfile*/ (const char*)0,
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+01.c #1 */ "9523dd3d1f04bc47cedcd3e091fa8fed",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+02.c #2 */ "1c019dfd2855a0b4838f7688ea160692",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+03.c #3 */ "2cdd43024b657b55be78f2e45079506c",
- /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+04.c #4 */ "27ef3f085349e15fb196dcf66c1c35b6",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+01.c #1 */ "86e2a075ca192a89639da88788b6711f",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+02.c #2 */ "9dbe86bca78344ab547c0260408832fc",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+03.c #3 */ "069601243079d4c124df04c5e315ade5",
+ /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+04.c #4 */ "c878bcdcae5648366dd2543df1fbeb58",
/*nosecfile*/ (const char*)0,
/*nosecfile*/ (const char*)0,
(const char*)0 };
@@ -31,9 +31,9 @@ const char* const melt_secondaryhexmd5tab[]={
const int melt_lastsecfileindex=4;
/* cumulated checksum of primary & secondary files */
-const char melt_cumulated_hexmd5[]="cae3398efd4fe9702c85355ef79fbc6d" ;
+const char melt_cumulated_hexmd5[]="221e20798dba7e2622eabac512933804" ;
/* include the timestamp file */
-#define meltmod_warmelt_outobj_mds__cae3398efd4fe9702c85355ef79fbc6d 1
+#define meltmod_warmelt_outobj_mds__221e20798dba7e2622eabac512933804 1
#include "warmelt-outobj+melttime.h"
/* end of melt descriptor file */
diff --git a/gcc/melt/generated/warmelt-outobj+melttime.h b/gcc/melt/generated/warmelt-outobj+melttime.h
index 2768cbe6724..f7d64df49f5 100644
--- a/gcc/melt/generated/warmelt-outobj+melttime.h
+++ b/gcc/melt/generated/warmelt-outobj+melttime.h
@@ -5,14 +5,14 @@
/* This warmelt-outobj+melttime.h is included from warmelt-outobj+meltdesc.c only. */
-#if meltmod_warmelt_outobj_mds__cae3398efd4fe9702c85355ef79fbc6d
+#if meltmod_warmelt_outobj_mds__221e20798dba7e2622eabac512933804
/* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-outobj */
/*MELT BOOTSTRAP*/
-const char melt_gen_timestamp[]="Tue Feb 7 11:05:26 2012 CET";
-const long long melt_gen_timenum=1328609126;
+const char melt_gen_timestamp[]="Tue Feb 14 12:33:28 2012 CET";
+const long long melt_gen_timenum=1329219208;
const char melt_build_timestamp[]= __DATE__ "@" __TIME__;
-#else /* ! meltmod_warmelt_outobj_mds__cae3398efd4fe9702c85355ef79fbc6d */
+#else /* ! meltmod_warmelt_outobj_mds__221e20798dba7e2622eabac512933804 */
#error invalid timestamp file for MELT-STAGE-ZERO/warmelt-outobj
-#endif /* meltmod_warmelt_outobj_mds__cae3398efd4fe9702c85355ef79fbc6d */
+#endif /* meltmod_warmelt_outobj_mds__221e20798dba7e2622eabac512933804 */
diff --git a/gcc/melt/generated/warmelt-outobj.c b/gcc/melt/generated/warmelt-outobj.c
index 74e7b31acd7..a47f9ae406c 100644
--- a/gcc/melt/generated/warmelt-outobj.c
+++ b/gcc/melt/generated/warmelt-outobj.c
@@ -3280,7 +3280,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
dbgprintf ("start initialize_module_meltdata_warmelt_outobj iniframp__=%p",
(void *) iniframp__);
melt_assertmsg ("check module initial frame",
- iniframp__->mcfr_nbvar == /*minihash */ -755);
+ iniframp__->mcfr_nbvar == /*minihash */ -3872);
struct cdata_st
{
@@ -5313,7 +5313,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_121__PREVLOC_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V37*/ meltfptr[36]);
- cdat->dobj_121__PREVLOC_CONTAINER.obj_hash = 92590098;
+ cdat->dobj_121__PREVLOC_CONTAINER.obj_hash = 615174098;
cdat->dobj_121__PREVLOC_CONTAINER.obj_len = 1;
@@ -5363,7 +5363,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_124__PREVIMPLBUF_CONTAINER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V37*/ meltfptr[36]);
- cdat->dobj_124__PREVIMPLBUF_CONTAINER.obj_hash = 490241652;
+ cdat->dobj_124__PREVIMPLBUF_CONTAINER.obj_hash = 338427329;
cdat->dobj_124__PREVIMPLBUF_CONTAINER.obj_len = 1;
/*inirout drout_125__LINE_AND_FILE_OF_LOCATION */
@@ -8214,7 +8214,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_361__OBJPUTPAIRHEAD_COUNTER.meltobj_class =
(meltobject_ptr_t) ( /*_.CLASS_CONTAINER__V37*/ meltfptr[36]);
- cdat->dobj_361__OBJPUTPAIRHEAD_COUNTER.obj_hash = 1069059064;
+ cdat->dobj_361__OBJPUTPAIRHEAD_COUNTER.obj_hash = 725710044;
cdat->dobj_361__OBJPUTPAIRHEAD_COUNTER.obj_len = 1;
/*iniboxint dint_362__ */
@@ -9266,7 +9266,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_448__CLASS_SECONDARY_C_FILE.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_CLASS))));
cdat->dobj_448__CLASS_SECONDARY_C_FILE.obj_num = MELTOBMAG_OBJECT;
- cdat->dobj_448__CLASS_SECONDARY_C_FILE.obj_hash = 1062522118;
+ cdat->dobj_448__CLASS_SECONDARY_C_FILE.obj_hash = 524376730;
cdat->dobj_448__CLASS_SECONDARY_C_FILE.obj_len = 8;
@@ -9336,7 +9336,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_454__SECFIL_MODNAM.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_454__SECFIL_MODNAM.obj_num = 0;
- cdat->dobj_454__SECFIL_MODNAM.obj_hash = 594606803;
+ cdat->dobj_454__SECFIL_MODNAM.obj_hash = 656502019;
cdat->dobj_454__SECFIL_MODNAM.obj_len = 4;
@@ -9391,7 +9391,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_458__SECFIL_PATH.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_458__SECFIL_PATH.obj_num = 1;
- cdat->dobj_458__SECFIL_PATH.obj_hash = 723878289;
+ cdat->dobj_458__SECFIL_PATH.obj_hash = 388513846;
cdat->dobj_458__SECFIL_PATH.obj_len = 4;
@@ -9448,7 +9448,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_462__SECFIL_DECLBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_462__SECFIL_DECLBUF.obj_num = 2;
- cdat->dobj_462__SECFIL_DECLBUF.obj_hash = 244965587;
+ cdat->dobj_462__SECFIL_DECLBUF.obj_hash = 673012517;
cdat->dobj_462__SECFIL_DECLBUF.obj_len = 4;
@@ -9507,7 +9507,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_466__SECFIL_IMPLBUF.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FIELD))));
cdat->dobj_466__SECFIL_IMPLBUF.obj_num = 3;
- cdat->dobj_466__SECFIL_IMPLBUF.obj_hash = 638118042;
+ cdat->dobj_466__SECFIL_IMPLBUF.obj_hash = 423073153;
cdat->dobj_466__SECFIL_IMPLBUF.obj_len = 4;
@@ -9566,7 +9566,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_470__GENERATED_C_FILENAME.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_470__GENERATED_C_FILENAME.obj_hash = 735676227;
+ cdat->dobj_470__GENERATED_C_FILENAME.obj_hash = 350823972;
cdat->dobj_470__GENERATED_C_FILENAME.obj_len = 5;
/*inimult dtup_471__GENERATED_C_FILENAME */
@@ -9625,7 +9625,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_475.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_475.obj_num = 0;
- cdat->dobj_475.obj_hash = 135820249;
+ cdat->dobj_475.obj_hash = 479173313;
cdat->dobj_475.obj_len = 2;
@@ -9672,7 +9672,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_478.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_478.obj_num = 1;
- cdat->dobj_478.obj_hash = 746856724;
+ cdat->dobj_478.obj_hash = 219093321;
cdat->dobj_478.obj_len = 2;
@@ -9719,7 +9719,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_481.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_481.obj_num = 2;
- cdat->dobj_481.obj_hash = 182629363;
+ cdat->dobj_481.obj_hash = 938832411;
cdat->dobj_481.obj_len = 2;
@@ -9766,7 +9766,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_484.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_484.obj_num = 3;
- cdat->dobj_484.obj_hash = 508209370;
+ cdat->dobj_484.obj_hash = 66783380;
cdat->dobj_484.obj_len = 2;
@@ -10493,7 +10493,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
meltobj_magic == MELTOBMAG_OBJECT);
cdat->dobj_540__MELT_ARGUMENT.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_PRIMITIVE))));
- cdat->dobj_540__MELT_ARGUMENT.obj_hash = 580308981;
+ cdat->dobj_540__MELT_ARGUMENT.obj_hash = 704849838;
cdat->dobj_540__MELT_ARGUMENT.obj_len = 5;
/*inimult dtup_541__MELT_ARGUMENT */
@@ -10550,7 +10550,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__,
cdat->dobj_545.meltobj_class =
(meltobject_ptr_t) (((void *) (MELT_PREDEF (CLASS_FORMAL_BINDING))));
cdat->dobj_545.obj_num = 0;
- cdat->dobj_545.obj_hash = 187649357;
+ cdat->dobj_545.obj_hash = 1061151944;
cdat->dobj_545.obj_len = 2;
@@ -10782,7 +10782,8 @@ start_module_melt (void *modargp_)
melt_topframe = (struct melt_callframe_st *) &meltfram__;
/**initial routine prologue**/
/* set initial frame marking */
- ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -755;
+ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar =
+ /*minihash */ -3872;
((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout =
forward_or_mark_module_start_frame_warmelt_outobj;
/**COMMENT: get previous environment **/ ;
@@ -31697,7 +31698,7 @@ forward_or_mark_module_start_frame_warmelt_outobj (struct melt_callframe_st
int ix = 0;
initial_frame_st *meltframptr_ = (initial_frame_st *) fp;
melt_assertmsg ("check module frame",
- meltframptr_->mcfr_nbvar == /*minihash */ -755);
+ meltframptr_->mcfr_nbvar == /*minihash */ -3872);
if (!marking && melt_is_forwarding)
{
dbgprintf